puts "========"
puts "Visualization, AIS_Dimension - add possibility to set custom text value"
puts "Test case creates three length dimensions where value is set as real,"
puts "as text and is reset to auto value state."
puts "========"

pload MODELING VISUALIZATION

vinit View1
vpoint p1 0 0 0
vpoint p2 50 50 0

vdimension dim1 -length -plane xoy -shapes p1 p2
vdimparam dim1 -flyout -15 -arrowlength 4 -showunits -value 10


vpoint p3 100 100 0
vpoint p4 150 150 0

vdimension dim2 -length -plane xoy -shapes p3 p4
vdimparam dim2 -flyout -15 -arrowlength 4 -hideunits -textvalue "w_1"
vfit


vpoint p5 200 200 0
vpoint p6 250 250 0

vdimension dim3 -length -plane xoy -shapes p5 p6
vdimparam dim3 -flyout -15 -arrowlength 4 -showunits -textvalue "w_1"
vdimparam dim3 -autovalue

vfit
vdump $imagedir/${casename}.png
