mkface ft ct
vinit
+# change maximum uv parameter value in drawer to display
+# isolines correctly
+vaspects -defaults -setMaxParamValue 1e+9
vdisplay ft
set x1 207
vselect ${x2} ${y2}
checkcolor ${x1} ${y1} 1 1 0
-set only_screen 0
+# dump image, than restore default maximum parameter value
+set aViewInfo [split [vviewlist long] "/"]
+set aImgFile ${imagedir}/${casename}
+foreach aStr $aViewInfo {
+ append aImgFile "_" [string trim $aStr]
+}
+append aImgFile ".png"
+vdump $aImgFile
+
+vaspects -defaults -setMaxParamValue 500000
+vclose