# Original bug : pro13495
# Date : 4June98

# for "sfixpcu" command
pload XSDRAW

restore [locate_data_file CTO904_pro13495a.rle] a 
restore [locate_data_file pro13495b.rle] b

sfixpcu a a -f
sfixpcu b b -f

checkshape a
checkshape b

bcut result a b

set square 63800.8