!COMPILER-GENERATED INTERFACE MODULE: Wed Jun 21 09:15:03 2017 MODULE IDPDRV__genmod INTERFACE SUBROUTINE IDPDRV(NDP,XD,YD,ZD,NT,IPT,PD,WK) INTEGER(KIND=4) :: NT INTEGER(KIND=4) :: NDP REAL(KIND=4) :: XD(NDP) REAL(KIND=4) :: YD(NDP) REAL(KIND=4) :: ZD(NDP) INTEGER(KIND=4) :: IPT(3*NT) REAL(KIND=4) :: PD(5*NDP) REAL(KIND=4) :: WK(NDP) END SUBROUTINE IDPDRV END INTERFACE END MODULE IDPDRV__genmod