# Original bug : fra60656
# Date : 23mar98

# for "sfixpcu" command
pload XSDRAW

restore [locate_data_file CTO900_fra60656-part.rle] part
restore [locate_data_file CTO900_fra60656-tool.rle] tool

sfixpcu part part -f
sfixpcu tool tool -f

checkshape part
checkshape tool

bcut result part tool

set square 1.21042e+06