        !COMPILER-GENERATED INTERFACE MODULE: Sun Oct 22 13:10:36 2017
        MODULE RP__genmod
          INTERFACE 
            SUBROUTINE RP(X,Y,F)
              REAL(KIND=4) :: X
              REAL(KIND=4) :: Y(5)
              REAL(KIND=4) :: F(5)
            END SUBROUTINE RP
          END INTERFACE 
        END MODULE RP__genmod
