!COMPILER-GENERATED INTERFACE MODULE: Wed Aug 09 13:18:13 2017
        MODULE VSM_U_XB__genmod
          INTERFACE 
            SUBROUTINE VSM_U_XB(UE,VE,H,KS,RHO,TAUWX,TAUWY,THETA,URMS,  &
     &OMEGA,K,DISS,E,ER,FCVISC,FACDEL,WS,FW,FACDF,SWGLM,N,SIGZ,UZ,VZ,   &
     &USTZ,NUTZ,UE_SED,VE_SED)
              INTEGER(KIND=4), INTENT(IN) :: N
              REAL(KIND=8), INTENT(IN) :: UE
              REAL(KIND=8), INTENT(IN) :: VE
              REAL(KIND=8), INTENT(IN) :: H
              REAL(KIND=8), INTENT(IN) :: KS
              REAL(KIND=8), INTENT(IN) :: RHO
              REAL(KIND=8), INTENT(IN) :: TAUWX
              REAL(KIND=8), INTENT(IN) :: TAUWY
              REAL(KIND=8), INTENT(IN) :: THETA
              REAL(KIND=8), INTENT(IN) :: URMS
              REAL(KIND=8), INTENT(IN) :: OMEGA
              REAL(KIND=8), INTENT(IN) :: K
              REAL(KIND=8), INTENT(IN) :: DISS
              REAL(KIND=8), INTENT(IN) :: E
              REAL(KIND=8), INTENT(IN) :: ER
              REAL(KIND=8), INTENT(IN) :: FCVISC
              REAL(KIND=8), INTENT(IN) :: FACDEL
              REAL(KIND=8), INTENT(IN) :: WS
              REAL(KIND=8), INTENT(IN) :: FW
              REAL(KIND=8), INTENT(IN) :: FACDF
              INTEGER(KIND=4), INTENT(IN) :: SWGLM
              REAL(KIND=8), INTENT(OUT) :: SIGZ(N)
              REAL(KIND=8), INTENT(OUT) :: UZ(N)
              REAL(KIND=8), INTENT(OUT) :: VZ(N)
              REAL(KIND=8), INTENT(OUT) :: USTZ(N)
              REAL(KIND=8), INTENT(OUT) :: NUTZ(N)
              REAL(KIND=8), INTENT(OUT) :: UE_SED
              REAL(KIND=8), INTENT(OUT) :: VE_SED
            END SUBROUTINE VSM_U_XB
          END INTERFACE 
        END MODULE VSM_U_XB__genmod