puts "========"
puts "OCC25427"
puts "========"
puts ""
###############################################
# Algorithm of building plane from wire hangs
###############################################

smallview

restore [locate_data_file bug25427_w.brep] w

mkplane p w 1

fit

set only_screen_axo 1