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