C                                           *--> FROM COMMON.FPLOTC
      COMMON/FPLOTC/IPRRCI,IFPLOT(4)
C