Insert line into a variant (CADGEO)

C call:

C     CALL PVB448 (XS,YS,XE,YE,IC,IRET)

C     

C     The following variables must be defined beforehand:

C     

C     XS/YS : Starting point of the line

C     XE/YE : End point of the line

C     IC    : Colour of the line

C     IRET  : is not evaluated, but must be specified

C     

C     Example:

C     ---------------

C     Generate line

C     ---------------

      XS = 80.0

      YS = 100.0

      XE = 80.0

      YE = 150.0

      IC = 7

      CALL PVB448 (XS,YS,XE,YE,IC,IRET)