File |
Line number |
Procedure |
Code |
./pkg/fizhi/fizhi_swrad.F |
2145 |
SAGPOL |
_RL one,expmin,e1,e2,e3,e4 |
./pkg/fizhi/fizhi_swrad.F |
2148 |
SAGPOL |
parameter (e3=2.92732e-2, e4=-3.827800e-3) |
./pkg/fizhi/fizhi_swrad.F |
2151 |
SAGPOL |
expmn = ((e4*fin + e3)*fin+e2)*fin+e1 |
./pkg/fizhi/fizhi_utils.F |
223 |
QSAT |
_RL e0, e1, e2, e3, e4, e5, e6 |
./pkg/fizhi/fizhi_utils.F |
288 |
QSAT |
parameter ( e3 = 0.172979242e-04 * esfac ) |
./pkg/fizhi/fizhi_utils.F |
349 |
QSAT |
dqx = e0+T*(e1+T*(e2+T*(e3+T*(e4+T*(e5+T*e6))))) |
./pkg/gmredi/gmredi_readparms.F |
158 |
GMREDI_READPARMS |
GM_maxK3D = 20e3 |
./pkg/gmredi/gmredi_readparms.F |
159 |
GMREDI_READPARMS |
GM_K3D_Rmin = 30e3 |
./pkg/gmredi/gmredi_readparms.F |
160 |
GMREDI_READPARMS |
GM_K3D_Rmax = 75e3 |