    MODULE UPDT
!>--------------------------------------------------------------------------------------------------
!> MODULE UPDT
!>
!> USE MODULES: F77KINDS
!>              PARMETA
!>
!> DRIVER     : READ_NHB
!>              SSTCH
!>--------------------------------------------------------------------------------------------------
    USE F77KINDS
    USE PARMETA , ONLY : IM, JM
!
    LOGICAL(KIND=L4KIND)                                                                        ::&
    & LSST 
!
    INTEGER(KIND=I4KIND)                                                                        ::&
    & NSST    , YR      , MON     , DAY     , UTC
!
    CHARACTER(LEN=10)                                                                           ::&
    & CHARDATE                                                                                   
!
    REAL   (KIND=R4KIND), DIMENSION(IM, JM)                                                     ::&
    & VARUPDATED
!
    REAL   (KIND=R4KIND), DIMENSION(IM, JM, 360)                                                ::&
    & SST_UP  
                                                                                    
    REAL   (KIND=R4KIND), DIMENSION(IM, JM, 12)                                                 ::&
    & VEGFRM  
!
    END MODULE UPDT




























