!COMPILER-GENERATED INTERFACE MODULE: Wed Jun 21 09:15:03 2017 MODULE IDPTIP__genmod INTERFACE SUBROUTINE IDPTIP(NDP,XD,YD,ZD,NT,IPT,NL,IPL,PDD,ITI,XII,YII& &,ZII) INTEGER(KIND=4) :: NL INTEGER(KIND=4) :: NT INTEGER(KIND=4) :: NDP REAL(KIND=4) :: XD(*) REAL(KIND=4) :: YD(*) REAL(KIND=4) :: ZD(*) INTEGER(KIND=4) :: IPT(3*NT) INTEGER(KIND=4) :: IPL(3*NL) REAL(KIND=4) :: PDD(5*NDP) INTEGER(KIND=4) :: ITI REAL(KIND=4) :: XII REAL(KIND=4) :: YII REAL(KIND=4) :: ZII END SUBROUTINE IDPTIP END INTERFACE END MODULE IDPTIP__genmod