|
1234567891011 |
- !COMPILER-GENERATED INTERFACE MODULE: Mon Jan 30 12:46:38 2023
- ! This source file is for reference only and may not completely
- ! represent the generated interface used by the compiler.
- MODULE TD_FORCEUPB__genmod
- INTERFACE
- SUBROUTINE TD_FORCEUPB(I,TD_SEMIMUDVISC)
- INTEGER(KIND=4) :: I
- REAL(KIND=8) :: TD_SEMIMUDVISC
- END SUBROUTINE TD_FORCEUPB
- END INTERFACE
- END MODULE TD_FORCEUPB__genmod
|