Simulation Core
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

pump_dw__genmod.f90 617 B

1 year ago
123456789101112131415
  1. !COMPILER-GENERATED INTERFACE MODULE: Mon Jan 30 12:46:35 2023
  2. ! This source file is for reference only and may not completely
  3. ! represent the generated interface used by the compiler.
  4. MODULE PUMP_DW__genmod
  5. INTERFACE
  6. SUBROUTINE PUMP_DW(X1,X2,X3,X4,X5,PUMP_NO)
  7. REAL(KIND=4) :: X1
  8. REAL(KIND=4) :: X2
  9. REAL(KIND=4) :: X3
  10. REAL(KIND=4) :: X4
  11. REAL(KIND=4) :: X5
  12. INTEGER(KIND=4) :: PUMP_NO
  13. END SUBROUTINE PUMP_DW
  14. END INTERFACE
  15. END MODULE PUMP_DW__genmod