tests/v3d/face/G3

   1 # isolines on infinite prism based on spline edge with poles closed to 1.4e+6
   2
   3 if {[info commands testreadiges] == ""} {pload XSDRAW}
   4 testreadiges [locate_data_file bug29356.igs] a
   5
   6 mksurface s a
   7 viso c s 0
   8 dump c
   9 mkedge e c
  10
  11 haxo
  12 donly e
  13 prism r e 0 1 0 Inf
  14 fit
  15 xbounds r
  16
  17 vinit
  18 vdisplay r
  19 visos r 2 3 1
  20 vfit
  21 vzoom 3000
  22
  23 vdump $imagedir/${casename}_zoom.png