if { [string compare $command "ShapeConvertRev"] == 0 } { puts "TODO OCC23127 ALL: Error : The area of the resulting shape is" } if {[string compare $command "ShapeDivide"] == 0 } { puts "TODO OCC23127 ALL: Status: FAIL2" puts "TODO OCC23127 ALL: Error: 12 Curve Only C0 after DT_ShapeDivide operation." } if {[string compare $command "SplitAngle"] == 0 } { puts "TODO OCC23127 ALL: Status: FAIL2" puts "TODO OCC23127 ALL: Faulty shapes in variables faulty_1 to faulty_2" } restore [locate_data_file ma-test11.rle] a