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