6 restore [locate_data_file buc60708a.brep] a
8 restore [locate_data_file buc60708b.brep] b
13 set faces [explode result f]
14 set n [llength $faces]
16 set end [lindex $faces [expr $n-1]]
18 if { $end != "result_4" } {
19 puts " Faulty :Common operation was made wrongly"
21 puts " Common operation was made successfully"
23 checkprops result -s 13.4871
25 checkview -display result -2d -path ${imagedir}/${test_image}.png