6 ########################################################
7 ## Result of cut and fuse operation are faulty shapes although arguments are valid.
8 ########################################################
10 restore [locate_data_file OCC497a.brep] a_1
13 restore [locate_data_file OCC497b.brep] a_2
20 if [catch {bcut result a_1 r1 } catch_result] {
21 puts "Faulty OCC497:function CUT works wrongly "
23 puts "OCC497 : function CUT works without hangs up "