Adding test cases from chl grid

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

set os $env(os_type)

puts "BUC60591"
puts ""
puts "=================================="
puts "It takes visual check for this BUG"
puts "=================================="
puts ""
puts "consideration of \"buc60591d\" model"

igesbrep [locate_data_file buc60591d.igs] a *

tpcompound buc60591d
checkshape buc60591d r

######################################################################

catch {exec rm ${imagedir}/buc60591d.brep}
save buc60591d ${imagedir}/buc60591d.brep
catch {exec rm ${imagedir}/buc60591d_iges.igs}
brepiges buc60591d ${imagedir}/buc60591d_iges.igs
dall

restore ${imagedir}/buc60591d.brep buc60591d_brep
catch {exec rm ${imagedir}/buc60591d_brep.igs}
brepiges buc60591d_brep ${imagedir}/buc60591d_brep.igs
dall

igesbrep ${imagedir}/buc60591d_brep.igs d_brep_iges *
tpcompound buc60591d_brep_iges
checkshape buc60591d_brep_iges

igesbrep ${imagedir}/buc60591d_iges.igs d_iges *
tpcompound buc60591d_iges
checkshape buc60591d_iges

renamevar  buc60591d_iges result

set 2dviewer 0