puts "========"
puts "0030270: Modeling Algorithms - BRepBndLib should provide an option for skipping infinite entities"
puts "========"
puts ""

pload MODELING VISUALIZATION
restore [locate_data_file bug27448_b1255.brep] s
bounding s -print
bounding s -finite -shape b
smallview
donly b
fit
display s

xwd ${imagedir}/${casename}.png