1 puts "========================"
4 puts "========================"
6 #################################################################
7 ## Exception while segment operation.
8 #################################################################
10 restore [locate_data_file OCC303a.brep] sh1
17 if [catch {segment result 22.07126804854423 23.6320483505636} catch_result] {
18 puts "Faulty OCC303 (case 1): function SEGMENT works wrongly"
20 puts "OCC303 OK (case 1): function SEGMENT works properly"