!
!     $Id$
!
      variableName = "CPxStart CPyStart   "
      iRoffset = iRoffset+1
      call displayText2R   (command,iRoffset,iCoffset+iCindent,          &
     &     variableName,vars(iValue)%CPstart%x,vars(iValue)%CPstart%y)
!
      variableName = "CPxEnd   CPyEnd     "
      iRoffset = iRoffset+1
      call displayText2R   (command,iRoffset,iCoffset+iCindent,          &
     &     variableName,vars(iValue)%CPend%x,vars(iValue)%CPend%y)
!

