0029807: [Regression to 7.0.0] Impossible to cut cone from prism
[occt.git] / tests / bugs / modalg_4 / bug745_2
1
2 puts "========"
3 puts "OCC745"
4 puts "========"
5 puts ""
6 ##################################################
7 ## This test does not terminate due to infinite loop in bissector calculation
8 ##################################################
9
10 restore [locate_data_file OCC745_2.brep] a 
11 checkshape a
12 mkplane pl a
13 topoload pl
14 drawcont
15 smallview -2D-
16 2dfit
17
18 set min 30
19 cpulimit [expr 60 * $min]
20
21 mat
22 puts "OCC745 OK"
23
24 renamevar pl result
25 checkprops result -s 5844.55 
26 checkshape result
27 checkview -display result -2d -path ${imagedir}/${test_image}.png