puts "TODO ?DEBUG_OCC24121 Windows: TEST INCOMPLETE" box b -20 -20 -20 40 40 20 ellipse w 0 0 0 10 5 mkedge w w wire w w mkplane w w prism s w 2 0 30 tscale b 0 0 0 SCALE1 tscale s 0 0 0 SCALE1 explode s E bfuseblend result s b 1*SCALE1 set square 783698