vdim -radius -name=dim -text=3d circle
vdisplay dim
vfit
-vmoveto 102 144
+vmoveto 110 111
-set x_coord 153
-set y_coord 153
+set x_coord 196
+set y_coord 196
checkcolor $x_coord $y_coord 0 1 1
if { $stat != 1 } {
# X axis rotation
vrotate $m_pi 0 0
vfit
-vmoveto 201 206
+vmoveto 208 200
-set x_coord 269
-set y_coord 123
+set x_coord 295
+set y_coord 113
checkcolor $x_coord $y_coord 0 1 1
if { $stat != 1 } {