|
123456789101112131415 |
- !COMPILER-GENERATED INTERFACE MODULE: Mon Jan 30 12:46:35 2023
- ! This source file is for reference only and may not completely
- ! represent the generated interface used by the compiler.
- MODULE PUMP_DIA__genmod
- INTERFACE
- SUBROUTINE PUMP_DIA(X1,X2,X3,X5,X6,PUMP_NO)
- REAL(KIND=4) :: X1
- REAL(KIND=4) :: X2
- REAL(KIND=4) :: X3
- REAL(KIND=4) :: X5
- REAL(KIND=4) :: X6
- INTEGER(KIND=4) :: PUMP_NO
- END SUBROUTINE PUMP_DIA
- END INTERFACE
- END MODULE PUMP_DIA__genmod
|