1 puts "================"
3 puts "================"
5 ######################################################################################
6 # Bug of STEP read/write
7 ######################################################################################
11 restore [locate_data_file OCC22805-spiral_solid.brep] s
12 stepwrite 0 s $imagedir/${test_image}.stp
13 stepread $imagedir/${test_image}.stp result *
14 set info [checkshape result_1]
16 if { [regexp {This shape seems to be valid} $info]} {
17 puts "OK ${BugNumber}"
19 puts "Faulty ${BugNumber}"
22 renamevar result_1 result
23 checkprops result -s 14447.5
24 checkview -display result -3d -path ${imagedir}/${test_image}.png