b045e6a4 |
1 | puts "================" |
2 | puts "OCC24142" |
3 | puts "================" |
4 | puts "" |
5 | ################################################################# |
6 | ## Wrong section curve |
7 | ################################################################# |
8 | |
9 | restore [locate_data_file OCC152.brep] sh |
10 | explode sh f |
11 | |
12 | mksurface s1 sh_3 |
13 | mksurface s2 sh_5 |
14 | |
15 | trim st1 s1 0 6.28318530717959 0 74.9999999999999 |
16 | trim st2 s2 0 6.28318530717959 -74.0551172696384 125.944882730362 |
17 | |
6d368502 |
18 | intersect cur st1 st2 |
b045e6a4 |
19 | |
6d368502 |
20 | if { [regexp -nocase "curve" [whatis cur]] } { |
21 | puts "Error: intersection curve is built while it should not" |
b045e6a4 |
22 | } |
23 | |
5747059b |
24 | checkview -display result -2d -path ${imagedir}/${test_image}.png |