2 puts "OCC23654 Markers recompute"
7 source $env(CSF_OCCTSamplesPath)/tcl/markers.tcl
9 set anImage1 $imagedir/${casename}_1.png
10 set anImage2 $imagedir/${casename}_2.png
14 vclose Driver1/Viewer1/View1 1
16 vinit name=View1 l=32 t=32 w=512 h=512
17 vactivate Driver1/Viewer1/View1