!COMPILER-GENERATED INTERFACE MODULE: Wed Jun 21 09:15:02 2017 MODULE FINDPERIOD__genmod INTERFACE SUBROUTINE FINDPERIOD(X,Y,NVAL,MINX,MAXX,SLEN,WFC,XSTEP,MV, & &RESULT) INTEGER(KIND=4), INTENT(IN) :: NVAL REAL(KIND=4), INTENT(IN) :: X(NVAL) REAL(KIND=4), INTENT(IN) :: Y(NVAL) REAL(KIND=4), INTENT(IN) :: MINX REAL(KIND=4), INTENT(IN) :: MAXX REAL(KIND=4), INTENT(IN) :: SLEN REAL(KIND=4), INTENT(IN) :: WFC REAL(KIND=4), INTENT(IN) :: XSTEP REAL(KIND=4), INTENT(IN) :: MV REAL(KIND=4), INTENT(OUT) :: RESULT(4) END SUBROUTINE FINDPERIOD END INTERFACE END MODULE FINDPERIOD__genmod