1 puts "===================================================================="
2 puts "OCC28162: Draw Harness - eliminate usage of deprecated Local Context"
4 puts "===================================================================="
6 pload MODELING VISUALIZATION
10 box b -5 -10 -15 10 20 30
16 # Create a parallel relation from 2 edges.
19 vselect 165 170 $shift
24 vdump $imagedir/${casename}_edges.png