| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_utils.F |
223 |
QSAT |
_RL e0, e1, e2, e3, e4, e5, e6 |
|
./pkg/fizhi/fizhi_utils.F |
286 |
QSAT |
parameter ( e1 = 0.333092511e-01 * esfac ) |
|
./pkg/fizhi/fizhi_utils.F |
349 |
QSAT |
dqx = e0+T*(e1+T*(e2+T*(e3+T*(e4+T*(e5+T*e6))))) |
|
./pkg/fizhi/fizhi_swrad.F |
2137 |
SAGPOL |
_RL one,expmin,e1,e2,e3,e4 |
|
./pkg/fizhi/fizhi_swrad.F |
2139 |
SAGPOL |
parameter (e1=1.0, e2=-2.507213e-1) |
|
./pkg/fizhi/fizhi_swrad.F |
2143 |
SAGPOL |
expmn = ((e4*fin + e3)*fin+e2)*fin+e1 |
|
./verification/fizhi-cs-aqualev20/code/fizhi_swrad.F |
2137 |
SAGPOL |
_RL one,expmin,e1,e2,e3,e4 |
|
./verification/fizhi-cs-aqualev20/code/fizhi_swrad.F |
2139 |
SAGPOL |
parameter (e1=1.0, e2=-2.507213e-1) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_swrad.F |
2143 |
SAGPOL |
expmn = ((e4*fin + e3)*fin+e2)*fin+e1 |
|
./pkg/ecco/sw_adtg.F |
22 |
NO PROCEDURE |
_RL a0,a1,a2,a3,b0,b1,c0,c1,c2,c3,d0,d1,e0,e1,e2 |
|
./pkg/ecco/sw_adtg.F |
44 |
NO PROCEDURE |
e1 = +1.8676 _d -14 |
|
./pkg/ecco/sw_adtg.F |
50 |
NO PROCEDURE |
& + ( e0 + (e1 + e2*T)*T )*P*P |