2 puts "========================"
4 puts "========================"
6 ##############################################
7 ## Result of bcut command is faulty although arguments are valid
8 ##############################################
10 restore [locate_data_file OCC528_1.brep] c1
13 restore [locate_data_file OCC528_2.brep] c2
16 if { [catch { bcut result c1 c2 } catch_result] } {
17 puts "OCC528 Faulty: function BCUT works wrongly"
19 puts "OCC528 OK:function BCUT works properly"