1 if {[string compare $command "SplitAngle"] == 0 } {
2 puts "TODO ?OCC23127 ALL: Faulty shapes in variables faulty_1 to faulty_2 "
3 puts "TODO ?DEBUG_OCC24121 Windows: Faulty shapes in variables faulty_1 to faulty_"
6 restore [locate_data_file P-ROUES.brep] a