5 #######################################################################
6 # Development of improvement of dimensions implementation
8 #######################################################################
11 vfont add [locate_data_file DejaVuSans.ttf] SansFont
15 vpoint lengthP2 50 50 50
16 vdimension dim1 -length -plane xoy -shapes lengthP1 lengthP2 -font SansFont
22 checkcolor $x_coord $y_coord 0 1 1
24 puts "Error : Highlighting of length dimension is wrong."
27 checkview -screenshot -3d -path ${imagedir}/${test_image}.png