| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_swrad.F |
2145 |
SAGPOL |
_RL one,expmin,e1,e2,e3,e4 |
|
./pkg/fizhi/fizhi_swrad.F |
2147 |
SAGPOL |
parameter (e1=1.0, e2=-2.507213e-1) |
|
./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 |
287 |
QSAT |
parameter ( e2 = 0.102164528e-02 * esfac ) |
|
./pkg/fizhi/fizhi_utils.F |
349 |
QSAT |
dqx = e0+T*(e1+T*(e2+T*(e3+T*(e4+T*(e5+T*e6))))) |
|
./pkg/openad/seawater.F |
156 |
SW_ADTG |
_RL a0,a1,a2,a3,b0,b1,c0,c1,c2,c3,d0,d1,e0,e1,e2 |
|
./pkg/openad/seawater.F |
179 |
SW_ADTG |
e2 = -2.1687 _d -16 |
|
./pkg/openad/seawater.F |
184 |
SW_ADTG |
& + ( e0 + (e1 + e2*T)*T )*P*P |
|
./pkg/opps/OPPS.h |
65 |
NO PROCEDURE |
_RL e2 |
|
./pkg/opps/OPPS.h |
83 |
NO PROCEDURE |
& e2, |
|
./pkg/opps/opps_calc.F |
195 |
OPPS_CALC |
newflux=oldflux+e2*radius*Wd(k2)*Dd(k2)* |
|
./pkg/opps/opps_calc.F |
591 |
NLOPPS |
REAL e2 |
|
./pkg/opps/opps_calc.F |
598 |
NLOPPS |
PARAMETER ( e2 = 2.E0*ENTRAINMENT_RATE ) |
|
./pkg/opps/opps_calc.F |
716 |
NLOPPS |
newflux=oldflux+e2*radius*Wd(k2)*Dd(k2)*0.50* |
|
./pkg/opps/opps_readparms.F |
110 |
OPPS_READPARMS |
e2 = 2.*ENTRAINMENT_RATE |
|
./model/src/seawater.F |
148 |
NO PROCEDURE |
_RL a0,a1,a2,a3,b0,b1,c0,c1,c2,c3,d0,d1,e0,e1,e2 |
|
./model/src/seawater.F |
171 |
NO PROCEDURE |
e2 = -2.1687 _d -16 |
|
./model/src/seawater.F |
176 |
NO PROCEDURE |
& + ( e0 + (e1 + e2*T)*T )*P*P |