puts "========"
restore [locate_data_file OCC165-2.brep] f
-puts [checkshape f]
+checkshape f
set IsGood 1
if [catch {mkoffset res1 f 3 10 } result] {
} else {
#puts "OCC165 OK (case 1): function MKOFFSET works properly"
mkplane pl1_1 res1_1
- puts [checkshape pl1_1]
+ checkshape pl1_1
mkplane pl1_2 res1_2
- puts [checkshape pl1_2]
+ checkshape pl1_2
mkplane pl1_3 res1_3
- puts [checkshape pl1_3]
+ checkshape pl1_3
}
if [catch {mkoffset res2 f 3 -10 } result] {
} else {
#puts "OCC165 OK (case 2): function MKOFFSET works properly"
mkplane pl2_1 res2_1
- puts [checkshape pl2_1]
+ checkshape pl2_1
mkplane pl2_2 res2_2
- puts [checkshape pl2_2]
+ checkshape pl2_2
mkplane pl2_3 res2_3
- puts [checkshape pl2_3]
+ checkshape pl2_3
}
if {$IsGood == 1} {