1 if { [string compare $command SplitAngle] == 0
2 || [string compare $command ShapeDivide] == 0
3 || [string compare $command ShapeConvertRev] == 0 } {
4 puts "TODO ?OCC24156 MacOS: Tcl Exception: File mal_tige.brep could not be found"
5 puts "TODO ?OCC24156 MacOS: TEST INCOMPLETE"
8 restore [locate_data_file mal_tige.brep] a