puts "TODO ?OCC22817 All:An exception was caught"
puts "TODO ?OCC22817 All:\\*\\* Exception \\*\\*"
puts "TODO ?OCC22817 All:TEST INCOMPLETE"

restore [locate_data_file CFI_13_e1ffm.rle] s
tscale s 0 0 0 SCALE1
explode s E
blend result s 7*SCALE1 s_2 7*SCALE1 s_12  7*SCALE1 s_1
explode result So
tcopy result_1 result

set square 669202