<p><b>laura@ucar.edu</b> 2011-02-09 09:32:26 -0700 (Wed, 09 Feb 2011)</p><p>updated with new land-surface initialization variables, and others<br>
</p><hr noshade><pre><font color="gray">Modified: branches/atmos_physics/src/core_nhyd_atmos/Registry
===================================================================
--- branches/atmos_physics/src/core_nhyd_atmos/Registry        2011-02-09 16:07:59 UTC (rev 722)
+++ branches/atmos_physics/src/core_nhyd_atmos/Registry        2011-02-09 16:32:26 UTC (rev 723)
@@ -269,6 +269,10 @@
 namelist character physics  input_soil_data             STAS
 namelist integer   physics  num_soil_layers             5
 
+#... DIMENSION NEEDED FOR LONGWAVE AND SHORTWAVE RADIATION FLUXES TO INCLUDE AN ADDITIONAL LAYER
+#... BETWEEN THE TOP OF THE MODEL AND THE TOP OF THE ATMOSPHERE
+dim nVertLevelsP2 nVertLevels+2
+
 #... DIMENSION NEEDED FOR NUMBER OF SOIL LAYERS:
 dim nSoilLevels namelist:num_soil_layers
 
@@ -411,7 +415,6 @@
 # lh        :latent heat flux at the surface                                                 [W/m2]
 # mavail    :surface moisture availability                                                      [-]
 # mol       :T* in similarity theory                                                            [K]
-# pblh      :PBL height                                                                         [m]
 # psih      :similarity theory for heat                                                         [-]
 # psim      :similarity theory for momentum                                                     [-]
 # q2        :specific humidity at 2m                                                        [kg/kg]
@@ -446,7 +449,6 @@
 var persistent real    lh       ( nCells Time               ) 1  ro lh             diag_physics - -
 var persistent real    mavail   ( nCells Time               ) 1  ro mavail         diag_physics - -
 var persistent real    mol      ( nCells Time               ) 1  ro mol            diag_physics - -
-var persistent real    pblh     ( nCells Time               ) 1  ro pblh           diag_physics - -
 var persistent real    psim     ( nCells Time               ) 1  ro psim           diag_physics - -
 var persistent real    psih     ( nCells Time               ) 1  ro psih           diag_physics - -
 var persistent real    q2       ( nCells Time               ) 1  ro q2             diag_physics - -
@@ -476,7 +478,7 @@
 # swdnb     :all-sky downwelling shortwave flux at bottom-of-atmosphere                     [J m-2]
 # swdnbc    :clear-sky downwelling shortwave flux at bottom-of-atmosphere                   [J m-2]
 # swdnt     :all-sky downwelling shortwave flux at top-of-atmosphere                        [J m-2]
-# swdntc    :clear-sky downelling shortwave flux at top-of-atmosphere                       [J m-2] 
+# swdntc    :clear-sky downwelling shortwave flux at top-of-atmosphere                      [J m-2] 
 # swupb     :all-sky upwelling shortwave flux at bottom-of-atmosphere                       [J m-2]
 # swupbc    :clear-sky upwelling shortwave flux at bottom-of-atmosphere                     [J m-2]
 # swupt     :all-sky upwelling shortwave flux at top-of-atmosphere                          [J m-2]
@@ -487,24 +489,25 @@
 # swupflxc  :
 # rthratensw:uncoupled theta tendency due to shortwave radiation                            [K s-1]
 
-var persistent real    coszr      ( nCells Time             ) 1   o coszr          diag_physics - -
-var persistent real    gsw        ( nCells Time             ) 1   o gsw            diag_physics - -
-var persistent real    swcf       ( nCells Time             ) 1   o swcf           diag_physics - -
-var persistent real    swdnb      ( nCells Time             ) 1   o swdnb          diag_physics - -
-var persistent real    swdnbc     ( nCells Time             ) 1   o swdnbc         diag_physics - -
-var persistent real    swdnt      ( nCells Time             ) 1   o swdnt          diag_physics - -
-var persistent real    swdntc     ( nCells Time             ) 1   o swdntc         diag_physics - -
-var persistent real    swupb      ( nCells Time             ) 1   o swupb          diag_physics - -
-var persistent real    swupbc     ( nCells Time             ) 1   o swupbc         diag_physics - -
-var persistent real    swupt      ( nCells Time             ) 1   o swupt          diag_physics - -
-var persistent real    swuptc     ( nCells Time             ) 1   o swuptc         diag_physics - -
-var persistent real    swdnflx    ( nCells Time             ) 1   o swdnflx        diag_physics - -
-var persistent real    swdnflxc   ( nCells Time             ) 1   o swdnflxc       diag_physics - -
-var persistent real    swupflx    ( nCells Time             ) 1   o swupflx        diag_physics - -
-var persistent real    swupflxc   ( nCells Time             ) 1   o swupflxc       diag_physics - -
+var persistent real    coszr      ( nCells Time               ) 1   o coszr        diag_physics - -
+var persistent real    gsw        ( nCells Time               ) 1   o gsw          diag_physics - -
+var persistent real    swcf       ( nCells Time               ) 1   o swcf         diag_physics - -
+var persistent real    swdnb      ( nCells Time               ) 1   o swdnb        diag_physics - -
+var persistent real    swdnbc     ( nCells Time               ) 1   o swdnbc       diag_physics - -
+var persistent real    swdnt      ( nCells Time               ) 1   o swdnt        diag_physics - -
+var persistent real    swdntc     ( nCells Time               ) 1   o swdntc       diag_physics - -
+var persistent real    swupb      ( nCells Time               ) 1   o swupb        diag_physics - -
+var persistent real    swupbc     ( nCells Time               ) 1   o swupbc       diag_physics - -
+var persistent real    swupt      ( nCells Time               ) 1   o swupt        diag_physics - -
+var persistent real    swuptc     ( nCells Time               ) 1   o swuptc       diag_physics - -
 
-var persistent real    rthratensw ( nVertLevels nCells Time ) 1   o rthratensw     tend_physics - -
+var persistent real    swdnflx    ( nVertLevelsP2 nCells Time ) 1   o swdnflx      diag_physics - -
+var persistent real    swdnflxc   ( nVertLevelsP2 nCells Time ) 1   o swdnflxc     diag_physics - -
+var persistent real    swupflx    ( nVertLevelsP2 nCells Time ) 1   o swupflx      diag_physics - -
+var persistent real    swupflxc   ( nVertLevelsP2 nCells Time ) 1   o swupflxc     diag_physics - -
 
+var persistent real    rthratensw ( nVertLevels nCells Time   ) 1   o rthratensw   tend_physics - -
+
 #--------------------------------------------------------------------------------------------------
 #... PARAMETERIZATION OF LONGWAVE RADIATION:
 #--------------------------------------------------------------------------------------------------
@@ -526,24 +529,25 @@
 # olrtoa    :outgoing longwave radiation at top-of-the-atmosphere                           [W m-2]
 # rthratenlw:uncoupled theta tendency due to longwave radiation                             [K s-1]
 
-var persistent real    glw        ( nCells Time             ) 1   o glw            diag_physics - -
-var persistent real    lwcf       ( nCells Time             ) 1   o lwcf           diag_physics - -
-var persistent real    lwdnb      ( nCells Time             ) 1   o lwdnb          diag_physics - -
-var persistent real    lwdnbc     ( nCells Time             ) 1   o lwdnbc         diag_physics - -
-var persistent real    lwdnt      ( nCells Time             ) 1   o lwdnt          diag_physics - -
-var persistent real    lwdntc     ( nCells Time             ) 1   o lwdntc         diag_physics - -
-var persistent real    lwupb      ( nCells Time             ) 1   o lwupb          diag_physics - -
-var persistent real    lwupbc     ( nCells Time             ) 1   o lwupbc         diag_physics - -
-var persistent real    lwupt      ( nCells Time             ) 1   o lwupt          diag_physics - -
-var persistent real    lwuptc     ( nCells Time             ) 1   o lwuptc         diag_physics - -
-var persistent real    lwdnflx    ( nCells Time             ) 1   o lwdnflx        diag_physics - -
-var persistent real    lwdnflxc   ( nCells Time             ) 1   o lwdnflxc       diag_physics - -
-var persistent real    lwupflx    ( nCells Time             ) 1   o lwupflx        diag_physics - -
-var persistent real    lwupflxc   ( nCells Time             ) 1   o lwupflxc       diag_physics - -
-var persistent real    olrtoa     ( nCells Time             ) 1   o olrtoa         diag_physics - -
+var persistent real    glw        ( nCells Time               ) 1   o glw          diag_physics - -
+var persistent real    lwcf       ( nCells Time               ) 1   o lwcf         diag_physics - -
+var persistent real    lwdnb      ( nCells Time               ) 1   o lwdnb        diag_physics - -
+var persistent real    lwdnbc     ( nCells Time               ) 1   o lwdnbc       diag_physics - -
+var persistent real    lwdnt      ( nCells Time               ) 1   o lwdnt        diag_physics - -
+var persistent real    lwdntc     ( nCells Time               ) 1   o lwdntc       diag_physics - -
+var persistent real    lwupb      ( nCells Time               ) 1   o lwupb        diag_physics - -
+var persistent real    lwupbc     ( nCells Time               ) 1   o lwupbc       diag_physics - -
+var persistent real    lwupt      ( nCells Time               ) 1   o lwupt        diag_physics - -
+var persistent real    lwuptc     ( nCells Time               ) 1   o lwuptc       diag_physics - -
+var persistent real    olrtoa     ( nCells Time               ) 1   o olrtoa       diag_physics - -
 
-var persistent real    rthratenlw ( nVertLevels nCells Time ) 1  ro rthratenlw     tend_physics - -
+var persistent real    lwdnflx    ( nVertLevelsP2 nCells Time ) 1   o lwdnflx      diag_physics - -
+var persistent real    lwdnflxc   ( nVertLevelsP2 nCells Time ) 1   o lwdnflxc     diag_physics - -
+var persistent real    lwupflx    ( nVertLevelsP2 nCells Time ) 1   o lwupflx      diag_physics - -
+var persistent real    lwupflxc   ( nVertLevelsP2 nCells Time ) 1   o lwupflxc     diag_physics - -
 
+var persistent real    rthratenlw ( nVertLevels nCells Time   ) 1  ro rthratenlw   tend_physics - -
+
 #--------------------------------------------------------------------------------------------------
 #... PARAMERIZATION OF CLOUDINESS:
 #--------------------------------------------------------------------------------------------------
@@ -553,79 +557,91 @@
 var persistent real    cldfrac    ( nVertLevels nCells Time ) 1   o cldfrac        diag_physics - -
 
 #--------------------------------------------------------------------------------------------------
-#... PARAMERIZATION OF LAND-SURFACE SCHEME:
+#... PARAMETERIZATION OF LAND-SURFACE SCHEME:
 #--------------------------------------------------------------------------------------------------
 
-# noahres        :residual of the noah land-surface scheme energy budget                    [W m-2]
-
-
-var persistent real    noahres        ( nCells              ) 1   o noahres        diag_physics - -
-
-
-#--------------------------------------------------------------------------------------------------
-#... SURFACE CHARACTERISTICS THAT SHOULD BE GIVEN AS INPUTS (NEEDED IN LAND-SURFACE SCHEME):
-#--------------------------------------------------------------------------------------------------
-
 # acsnom         :accumulated melted snow                                                  [kg m-2]
 # acsnow         :accumulated snow                                                         [kg m-2]
 # canwat         :canopy water                                                             [kg m-2]
-# dzs            :thickness of soil layers                                                      [m]
-# fndsoilw       :soilw logical                                                                 [?]
-# fndsnowh       :snowh logical                                                                 [?]
-# rdmaxalb       :false set it to table values (?????)
-# sfcrunoff      :surface runoff                                                               [mm]
+# chklowq        :surface saturation flag                                                       [-]
+# grdflx         :ground heat flux                                                          [W m-2]
+# noahres        :residual of the noah land-surface scheme energy budget                    [W m-2]
+# potevp         :potential evaporation                                                     [W m-2]
+# qz0            :specific humidity at znt                                                [kg kg-1]
+# rib            :??
+# sfcrunoff      :surface runoff                                                            [m s-1]
 # smstav         :moisture availability                                                         [-]
 # smstot         :total moisture                                                           [m3 m-3]
+# snopcx         :snow phase change heat flux                                               [W m-2]
+# snotime        :??
 # snow           :snow water equivalent                                                    [kg m-2]
 # snowh          :physical snow depth                                                           [m]
 # thc            :thermal inertia                                              [Cal cm-1 K-1 s-0.5]
-# udrunoff       :underground runoff                                                           [mm]
-# vegfra         :vegetation fraction                                                           [-]
+# tmn            :soil temperature at lower boundary                                            [K]
+# udrunoff       :sub-surface runoff                                                        [m s-1]
+# z0             :background roughness length                                                   [m]
 # zs             :depth of centers of soil layers                                               [m]
 
-# sh2o           :soil liquid water                                                        [m3 m-3]
-
+var persistent real    acsnom     ( nCells Time             ) 1  ro acsnom         diag_physics - -
+var persistent real    acsnow     ( nCells Time             ) 1  ro acsnow         diag_physics - -
 var persistent real    canwat     ( nCells Time             ) 1  ro canwat         diag_physics - -
-var persistent real    dzs        ( nCells Time             ) 1  ro dzs            diag_physics - -   
-var persistent real    snowh      ( nCells Time             ) 1  ro snowh          diag_physics - -
-var persistent real    thc        ( nCells Time             ) 1  ro thc            diag_physics - - 
-var persistent real    vegfra     ( nCells Time             ) 1  ro vegfra         diag_physics - -   
-var persistent real    zs         ( nCells Time             ) 1  ro zs             diag_physics - -   
-
-var persistent real    acsnow     ( nCells Time             ) 1  ro acsnow         diag_physics - -
-var persistent real    acsnom     ( nCells Time             ) 1  ro acsnom         diag_physics - -
-var persistent real    sfcrunoff  ( nCells Time             ) 1  ro sgcrunoff      diag_physics - -   
+var persistent real    chklowq    ( nCells Time             ) 1  ro chklowq        diag_physics - -
+var persistent real    grdflx     ( nCells Time             ) 1  ro grdflx         diag_physics - -
+var persistent real    noahres    ( nCells Time             ) 1  ro noahres        diag_physics - -
+var persistent real    potevp     ( nCells Time             ) 1  ro potevp         diag_physics - -
+var persistent real    qz0        ( nCells Time             ) 1  ro qz0            diag_physics - -
+var persistent real    rib        ( nCells Time             ) 1  ro rib            diag_physics - -
+var persistent real    sfcrunoff  ( nCells Time             ) 1  ro sfcrunoff      diag_physics - -   
 var persistent real    smstav     ( nCells Time             ) 1  ro smstav         diag_physics - -   
 var persistent real    smstot     ( nCells Time             ) 1  ro smstot         diag_physics - -   
+var persistent real    snopcx     ( nCells Time             ) 1  ro snopcx         diag_physics - -
+var persistent real    snotime    ( nCells Time             ) 1  ro snotime        diag_physics - -
 var persistent real    snow       ( nCells Time             ) 1  ro snow           diag_physics - -
+var persistent real    snowh      ( nCells Time             ) 1  ro snowh          diag_physics - -
+var persistent real    thc        ( nCells Time             ) 1  ro thc            diag_physics - - 
+var persistent real    tmn        ( nCells Time             ) 1  ro tmn            diag_physics - -
 var persistent real    udrunoff   ( nCells Time             ) 1  ro udrunoff       diag_physics - -   
+var persistent real    z0         ( nCells Time             ) 1  ro z0             diag_physics - -   
+var persistent real    zs         ( nCells Time             ) 1  ro zs             diag_physics - -   
 
+# dzs            :thickness of soil layers                                                      [m]
+# smcrel         :soil moisture threshold below which transpiration begins to stress            [-]
+# sh2o           :soil liquid water                                                        [m3 m-3]
+# smois          :soil moisture                                                            [m3 m-3]
+# tslb           :soil temperature                                                              [K]
+
+var persistent real    dzs        ( nSoilLevels nCells Time ) 1  ro dzs            diag_physics - -
+var persistent real    smcrel     ( nSoilLevels nCells Time ) 1  ro smcrel         diag_physics - -
 var persistent real    sh2o       ( nSoilLevels nCells Time ) 1  ro sh2o           diag_physics - -
+var persistent real    smois      ( nSoilLevels nCells Time ) 1  ro smois          diag_physics - -
+var persistent real    tslb       ( nSoilLevels nCells Time ) 1  ro tslb           diag_physics - -
 
 #--------------------------------------------------------------------------------------------------
 #... SURFACE CHARACTERISTICS THAT NEED TO BE READ FROM GRID.NC:
 #--------------------------------------------------------------------------------------------------
 
+# lai            :leaf area index                                                               [-]
 # isltyp         :dominant soil category                                                        [-]
 # ivgtyp         :dominant vegetation category                                                  [-]
 # lu_index       :land mask field                                                               [-]
+# shdmin         :minimum areal fractional coverage of annual green vegetation                  [-]
+# shdmax         :maximum areal fractional coverage of annual green vegetation                  [-]
 # snoalb         :annual max snow albedo                                                        [-]
 # snowc          :flag indicating snow coverage (1 for snow cover)                              [-]
+# vegfra         :vegetation fraction                                                           [-]
 # xice           :sea-ice mask                                                                  [-]
 
-# smois          :soil moisture                                                            [m3 m-3]
-# tslb           :soil temperature                                                              [K]
-
+var persistent integer isltyp     ( nCells Time             ) 1 iro isltyp          sfc_input   - -
 var persistent integer ivgtyp     ( nCells Time             ) 1 iro ivgtyp          sfc_input   - -
-var persistent integer isltyp     ( nCells Time             ) 1 iro isltyp          sfc_input   - -
-var persistent real    lu_index   ( nCells Time             ) 1 iro lu_index        sfc_input   - -      
+var persistent real    lai        ( nCells Time             ) 1 iro lai             sfc_input   - -
+var persistent real    lu_index   ( nCells Time             ) 1 iro lu_index        sfc_input   - -
+var persistent real    shdmin     ( nCells Time             ) 1 iro shdmin          sfc_input   - -
+var persistent real    shdmax     ( nCells Time             ) 1 iro shdmax          sfc_input   - -
 var persistent real    snoalb     ( nCells Time             ) 1 iro snoalb          sfc_input   - -
 var persistent real    snowc      ( nCells Time             ) 1 iro snowc           sfc_input   - -
+var persistent real    vegfra     ( nCells Time             ) 1 Iro vegfra          sfc_input   - -   
 var persistent real    xice       ( nCells Time             ) 1 iro xice            sfc_input   - -
 
-var persistent real    smois      ( nSoilLevels nCells Time ) 1 iro smois           sfc_input   - -
-var persistent real    tslb       ( nSoilLevels nCells Time ) 1 iro tslb            sfc_input   - -
-
 #--------------------------------------------------------------------------------------------------
 #... OTHER SURFACE CHARACTERISTICS INITIALIZED USING SFC FIELDS FROM GRID.NC:
 #--------------------------------------------------------------------------------------------------
@@ -638,13 +654,11 @@
 # tsk            :surface-skin temperature                                                      [K]
 # xland          :land mask    (1 for land; 2 for water)                                        [-]
 # xicem          :ice mask from previous time-step                                              [-]
-# z0             :background roughness length                                                   [m]
 
-var persistent real    sfc_albbck ( nCells Time             ) 1  ro albbck          sfc_physics - -
-var persistent real    sfc_embck  ( nCells Time             ) 1  ro embck           sfc_physics - -
+var persistent real    sfc_albbck ( nCells Time             ) 1  ro sfc_albbck      sfc_physics - -
+var persistent real    sfc_emibck  ( nCells Time            ) 1  ro sfc_emibck      sfc_physics - -
 var persistent real    xicem      ( nCells Time             ) 1  ro xicem           sfc_physics - -
 var persistent real    xland      ( nCells Time             ) 1  ro xland           sfc_physics - -
-var persistent real    z0         ( nCells Time             ) 1  ro z0              sfc_physics - -
 
 var persistent real    sfc_albedo ( nCells Time             ) 1  ro sfc_albedo     diag_physics - -
 var persistent real    sfc_emiss  ( nCells Time             ) 1  ro sfc_emiss      diag_physics - -

</font>
</pre>