puts "============"
puts "Visualization - Path Tracing, Ball sample"
puts "============"
puts ""

source $env(CSF_OCCTSamplesPath)/tcl/pathtrace_ball.tcl
vdump $imagedir/${casename}_zoom.png
