d519e05be1ad473c70022883b11c255f6014dd10
[occt.git] / tests / bugs / modalg_1 / bug1255_1
1 puts "========="
2 puts " OCC1255 "
3 puts "========="
4 puts ""
5 ###############################################
6 ## Exception in command 'section'
7 #  (This script tests new topology)
8 ###############################################
9
10 puts "TODO #OCC26815 ALL: Error : The length of result shape is"
11
12 restore [locate_data_file OCC1255.brep] a 
13 checkshape a
14
15 plane p1 0 -36.8067 0 0 1 0
16 mkface f1 p1
17
18 if { [catch {bop a f1 } ] } {
19     puts "Faulty OCC1255: BOP operation was made wrongly"
20 } else {
21     bopsection result
22 }
23
24 checkprops result -l 5840.24 
25 checkshape result
26 checksection result
27 checkview -display result -2d -path ${imagedir}/${test_image}.png
28