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

restore [locate_data_file CFI_11_d2ffd.rle]  s
tscale s 0 0 0 SCALE1 
explode s E 
blend result s 20*SCALE1 s_16
explode result So
tcopy result_1 result 

set square 1.85726e+06
