puts "============" puts "CR25403: Wrong storage of model units in AIS_AngleDimension" puts "============" puts "" pload VISUALIZATION vfont add [locate_data_file DejaVuSans.ttf] SansFont vinit View1 vpoint angleP1 0 0 0 vpoint angleP2 50 50 50 vpoint angleP3 50 50 100 vdimension dim1 -angle -value 300 -modelunits deg -shapes angleP1 angleP2 angleP3 -font SansFont vdimension dim2 -length -value 10 -modelunits mm -showunits -plane yoz -shapes angleP1 angleP3 -font SansFont vfit vdump $imagedir/${casename}.png