!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_FORCEUPS__genmod
          INTERFACE 
            SUBROUTINE TD_FORCEUPS(I,TD_SEMIMUDVISC)
              INTEGER(KIND=4) :: I
              REAL(KIND=8) :: TD_SEMIMUDVISC
            END SUBROUTINE TD_FORCEUPS
          END INTERFACE 
        END MODULE TD_FORCEUPS__genmod