5 #######################################################################
6 # Development of improvement of dimensions implementation
8 #######################################################################
15 vcircle circle diamP1 diamP2 diamP3 0
16 verase diamP1 diamP2 diamP3
17 vdim -diam -name=dim4 circle
25 checkcolor $x_coord $y_coord 0 1 1
28 puts "Error : Highlighting of diameter dimension with 2d text is wrong."
32 vdim -diam -name=dim4 -text=3d circle
40 checkcolor $x_coord $y_coord 0 1 1
43 puts "Error : Highlighting of diameter dimension with 3d text is wrong."