61c421bf |
1 | pload QAcommands |
2 | |
3 | #INTERFACE IGES |
4 | puts "========================" |
5 | puts " OCC435 " |
6 | puts " OCC405 " |
7 | puts "========================" |
8 | puts "" |
9 | ############################################################### |
10 | ## Exception Standard_ConstructuionError is rased in DRAW in the |
11 | ## GeomConvert_CompCurveToBSplineCurve on the attached shapes during command merge |
12 | ############################################################### |
13 | |
14 | restore [locate_data_file OCC435a.brep] a |
15 | explode a |
16 | set j 1 |
17 | repeat 8 { |
18 | explode a_$j |
19 | if { [catch {OCC405 result a_${j}_1 a_${j}_2} catch_result] } { |
20 | puts "Faulty OCC435 : merge operation was made incorrect" |
21 | } else { |
22 | puts " OCC435 OK: merge operation was made properly" |
23 | } |
24 | incr j |
25 | } |
26 | |
58cf74e0 |
27 | checkprops result -l 17.2848 |
28 | checkshape result |
29 | checksection result |
5747059b |
30 | checkview -display result -3d -path ${imagedir}/${test_image}.png |