# Original bug : ger60598
# Date : 18Sept98

# for "sfixpcu" command
pload XSDRAW

restore [locate_data_file CTO900_ger60598c.rle] base
restore [locate_data_file ger60598d.rle] prism

sfixpcu base  base -f
sfixpcu prism prism -f

fsameparameter base

bcut result prism base

set square 16596