C
      COMMON /CPLTB/ FRPOS,BUFPOS,YX
      INTEGER    BUFPOS(2,TSMAX), FRPOS
      REAL       YX(BUFMAX)
C
      SAVE   /CPLTB/