[occt.git] / tests / bugs / iges / bug272_1

puts "========"
puts "OCC272"
puts "========"

igesbrep [locate_data_file 919-001-T02-04-CP-VL.igs] a *

tpcompound result
checkshape result
checkshape result r

if { [llength [whatis result]] == 3 } {
    puts "Error : There is no result"
}

set 2dviewer 0
Commit	Line	Data
0e94a94e	1	puts "========"
	2	puts "OCC272"
	3	puts "========"
	4
	5	igesbrep [locate_data_file 919-001-T02-04-CP-VL.igs] a *
	6
	7	tpcompound result
352ffd73	8	checkshape result
352ffd73	9	checkshape result r
0e94a94e	10
	11	if { [llength [whatis result]] == 3 } {
	12	puts "Error : There is no result"
	13	}
	14
	15	set 2dviewer 0
	16