# Original bug : pro13555
# Date : 12June98

# for "sfixpcu" command
pload XSDRAW

restore [locate_data_file CTO904_pro13555a.rle] a 
restore [locate_data_file pro13555b.rle] b

sfixpcu a a -f
sfixpcu b b -f

checkshape a
checkshape b

bfuse result a b

set square 3479.01