aws <B>curved-edge-segment</B> object <EM>elp</EM> on xwindow <EM>vs</EM>.
</DD>
</DL>
<BR>
<BR>

<A NAME="40045"></A>
<B>draw-line-segment</B> <EM>s &amp;optional gc (vs *viewsurface*)
				(height (send vs :height))
				(x 0) (y 0) </EM>[function]

<DL COMPACT>
<DT> 
<DD> 
draws <B>line-edge-segment</B> object <EM>s</EM> on xwindow <EM>vs</EM>.
</DD>
</DL>
<BR>
<BR>

<A NAME="40058"></A>
<PRE><TT>
<B>draw-segments</B> <I>segs &amp;key (line-gc image::*red-gc*)      (ellipse-gc line-gc) [function]
<BR>(vs g