/[MITgcm]/MITgcm/pkg/aim_v23/phy_suflux_sice.F
ViewVC logotype

Diff of /MITgcm/pkg/aim_v23/phy_suflux_sice.F

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph | View Patch Patch

revision 1.2 by jmc, Thu Apr 8 00:14:09 2004 UTC revision 1.3 by jmc, Fri May 21 17:43:04 2004 UTC
# Line 9  C     !INTERFACE: Line 9  C     !INTERFACE:
9        SUBROUTINE SUFLUX_SICE(        SUBROUTINE SUFLUX_SICE(
10       I                   PSA, FMASK, EMISloc,       I                   PSA, FMASK, EMISloc,
11       I                   Tsurf, dTskin, SSR, SLRD,       I                   Tsurf, dTskin, SSR, SLRD,
12       I                   T0, Q0, EnPrec, CDENVV,       I                   T0, Q0, CDENVV,
13       O                   SHF, EVAP, SLRU,       O                   SHF, EVAP, SLRU,
14       O                   Evp0, dEvp, Slr0, dSlr, sFlx,       O                   Evp0, dEvp, Slr0, dSlr, sFlx,
15       O                   TSFC, TSKIN,       O                   TSFC, TSKIN,
# Line 54  C    SSR    :: sfc sw radiation (net flu Line 54  C    SSR    :: sfc sw radiation (net flu
54  C    SLRD   :: sfc lw radiation (downward flux)(2-dim)  C    SLRD   :: sfc lw radiation (downward flux)(2-dim)
55  C    T0     :: near-surface air temperature    (2-dim)  C    T0     :: near-surface air temperature    (2-dim)
56  C    Q0     :: near-surface sp. humidity [g/kg](2-dim)  C    Q0     :: near-surface sp. humidity [g/kg](2-dim)
 C    EnPrec :: energy of precipitation (snow, rain temp) [J/g]  
57  C    CDENVV :: sensible heat flux coefficient  (2-dim)  C    CDENVV :: sensible heat flux coefficient  (2-dim)
58  C--   Output:  C--   Output:
59  C    SHF    :: sensible heat flux              (2-dim)  C    SHF    :: sensible heat flux              (2-dim)
# Line 75  C-- Line 74  C--
74        _RL  PSA(NGP), FMASK(NGP), EMISloc        _RL  PSA(NGP), FMASK(NGP), EMISloc
75        _RL  Tsurf(NGP), dTskin(NGP)        _RL  Tsurf(NGP), dTskin(NGP)
76        _RL  SSR(NGP), SLRD(NGP)        _RL  SSR(NGP), SLRD(NGP)
77        _RL  T0(NGP), Q0(NGP), CDENVV(NGP), EnPrec(NGP)        _RL  T0(NGP), Q0(NGP), CDENVV(NGP)
78    
79        _RL  SHF(NGP), EVAP(NGP), SLRU(NGP)        _RL  SHF(NGP), EVAP(NGP), SLRU(NGP)
80        _RL  Evp0(NGP), dEvp(NGP), Slr0(NGP), dSlr(NGP), sFlx(NGP,0:2)        _RL  Evp0(NGP), dEvp(NGP), Slr0(NGP), dSlr(NGP), sFlx(NGP,0:2)
Legend:
Removed from v.1.2  
changed lines
  Added in v.1.3
  ViewVC Help
Powered by ViewVC 1.1.22