5 #######################################################################
6 # Development of improvement of dimensions implementation
8 #######################################################################
13 vpoint lengthP2 50 50 50
14 vdimension length name=dim1 plane=xoy lengthP1 lengthP2
21 checkcolor $x_coord $y_coord 0 1 1
23 puts "Error : Highlighting of length dimension is wrong."