source $env(CASROOT)/samples/tcl/raytrace.tcl vdump $imagedir/${test_image}.png puts "TEST COMPLETED"