
puts "========================"
puts "BUC60585"
puts "========================"

restore [locate_data_file buc60585b.brep] t
checkshape t
plane pt 2036.25  -97.5  -1460.499755859375  0.0  -1.0  0.0 1.0 0.0 0.0

psection result t pt

set length 22.0446
set 2dviewer 0

# checksection res
