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

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

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

revision 1.1 by jmc, Fri Nov 22 17:17:03 2002 UTC revision 1.4 by jmc, Thu Jun 24 23:43:11 2004 UTC
# Line 61  c     P0 = 1. _d +5 Line 61  c     P0 = 1. _d +5
61  c     GG = 9.81 _d 0  c     GG = 9.81 _d 0
62  c     RD = 287. _d 0  c     RD = 287. _d 0
63  c     CP = 1004. _d 0  c     CP = 1004. _d 0
64        P0 = atm_po        P0 = atm_Po
65        GG = gravity        GG = gravity
66        RD = atm_cp*atm_kappa        RD = atm_Rd
67        CP = atm_cp        CP = atm_Cp
68  C     Latent heat is in J/g for consistency with spec.hum. in g/Kg  C     Latent heat is in J/g for consistency with spec.hum. in g/Kg
69        ALHC = 2501. _d 0        ALHC = 2501. _d 0
70          ALHF =  334. _d 0
71        SBC = 5.67 _d -8        SBC = 5.67 _d -8
72    C     Heat capacity of rain is also in J/g/K for the same reasons
73    c     rainCP = HeatCapacity_Cp / 1000. _d 0
74          rainCP = 4200. _d 0 / 1000. _d 0
75          tFreeze= celsius2K
76  C  C
77  C     1.2 Functions of sigma and latitude  C     1.2 Functions of sigma and latitude
78  C  C
# Line 117  C--   2. Constants for physical parametr Line 122  C--   2. Constants for physical parametr
122  c_FM  include "cls_inphys.h"  c_FM  include "cls_inphys.h"
123  #include "phy_const.h"  #include "phy_const.h"
124    
125    C-     pot. temp. increment for computing stability function derivative
126    C      note: use the discrete form: F(Ts+dTstab)-F(Ts-dTstab)/2.dTstab
127           dTstab = 1. _d 0
128    
129        _END_MASTER(myThid)        _END_MASTER(myThid)
130    
131  #endif /* ALLOW_AIM */  #endif /* ALLOW_AIM */
Legend:
Removed from v.1.1  
changed lines
  Added in v.1.4
  ViewVC Help
Powered by ViewVC 1.1.22