[ REQ 6185]: Bug in postscript generator

[rjm at dcre.leeds.ac.uk]

Hi,
        The postscript generator seems to much up when vect objects
lie with bits out side the bounding box. For example with the following
command file loaded into geomview, instead of drawing two parabola's
one with some points outside of the bounding box, the postcript file
has the two end of one of the parabolas joined up.

		ttfn
			Rich

---------------------------------------------------------------------------
(progn
 (merge-baseap appearance {
         face
         -edge
         vect
         -transparent
         evert
          shading smooth
         -normal
           normscale 1
           linewidth 1 
  material {
        shininess 15.000000
        ka 0.300000
        kd 1.000000
        ks 0.300000
        alpha 1.000000
        ambient 1.000000 1.000000 1.000000
        diffuse 1.000000 1.000000 1.000000
        specular 1.000000 1.000000 1.000000
        edgecolor 0.000000 0.000000 0.000000
        normalcolor 1.000000 1.000000 1.000000
  }
  lighting {
        ambient 0.2 0.2 0.2
        localviewer 1
        attenconst 0
        attenmult 0
        replacelights
        light {
                ambient 0.000000 0.000000 0.000000
                color 0.750000 0.750000 0.750000
                position 0.000000 0.000000 10.000000 0.000000
        }
        light {
                ambient 0.000000 0.000000 0.000000
                color 0.600000 0.600000 0.600000
                position 0.000000 1.000000 -1.000000 0.000000
        }
        light {
                ambient 0.000000 0.000000 0.000000
                color 0.400000 0.400000 0.400000
                position 1.000000 -2.000000 -1.000000 0.000000
        }
  }
}
 ) # end base appearance
(merge-ap "worldgeom" appearance {
        * -face
}
) # end appearance "worldgeom"
(new-geometry "[g1]"    # pcurve<2>
{ LIST
{ COMMENT pcurve LSMP {
(x,a x^2,0);

x = [-0.9,1];
a = 0.6;
_precision = 1;
_steps = 16;
_clipping = 1000;
_dimension = 3;
_colour = -1;
}
}
{ COMMENT pcurve LSMP_EDIT_TIMESTAMP { 863008630 }
}
{ VECT
1 16 0
16

0

-0.9 0.486 0
-0.773333 0.358827 0
-0.646667 0.250907 0
-0.52 0.16224 0
-0.393333 0.092827 0
-0.266667 0.042667 0
-0.14 0.01176 0
-0.013333 0.000107 0
0.113333 0.007707 0
0.24 0.03456 0
0.366667 0.080667 0
0.493333 0.146027 0
0.62 0.23064 0
0.746667 0.334507 0
0.873333 0.457627 0
1 0.6 0

}
}
) # end geometry "[g1]" pcurve<2>
(bbox-draw "[g1]" off)
(bbox-color "[g1]" 0.000000 0.000000 0.000000)
(normalization "[g1]" none)
(name-object "[g1]" "pcurve<2>")

(new-geometry "[g2]"    # pcurve<1>
{ LIST
{ COMMENT pcurve LSMP {
(x,a x^2,0);

x = [-0.9,1.2];
a = 0.3;
_precision = 1;
_steps = 16;
_clipping = 1000;
_dimension = 3;
_colour = -1;
}
}
{ COMMENT pcurve LSMP_EDIT_TIMESTAMP { 863008630 }
}
{ VECT
1 16 0
16

0

-0.9 0.243 0
-0.76 0.17328 0
-0.62 0.11532 0
-0.48 0.06912 0
-0.34 0.03468 0
-0.2 0.012 0
-0.06 0.00108 0
0.08 0.00192 0
0.22 0.01452 0
0.36 0.03888 0
0.5 0.075 0
0.64 0.12288 0
0.78 0.18252 0
0.92 0.25392 0
1.06 0.33708 0
1.2 0.432 0

}
}
) # end geometry "[g2]" pcurve<1>
(ND-xform "[g2]" ntransform { 1 1
 1.0000000 
}
)
(bbox-draw "[g2]" off)
(bbox-color "[g2]" 0.000000 0.000000 0.000000)
(normalization "[g2]" none)
(name-object "[g2]" "pcurve<1>")

(window default { position 809 1258 487 936 })
(camera "Camera" camera {
camtoworld transform {
             1             0             0             0
             0             1             0             0
             0             0             1             0
             0             0             3             1

}
        perspective 0  stereo 0
        fov 2.2
        frameaspect 1
        focus 3
        near 0.07
        far 100
}
) # camera "Camera" ...
(backcolor "Camera" 1.000000 1.000000 1.000000)
(window "Camera" window { size 450 450 position 809 1258 487 936 resize curpos 809 1258 487 936 viewport 0 449 0 449 }
)
# end camera Camera

(ui-target "World")
)