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