| 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 |
285 |
QSAT |
parameter ( e0 = 0.469290530e+00 * 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 |
177 |
SW_ADTG |
e0 = -4.6206 _d -13 |
|
./pkg/openad/seawater.F |
184 |
SW_ADTG |
& + ( e0 + (e1 + e2*T)*T )*P*P |
|
./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 |
169 |
NO PROCEDURE |
e0 = -4.6206 _d -13 |
|
./model/src/seawater.F |
176 |
NO PROCEDURE |
& + ( e0 + (e1 + e2*T)*T )*P*P |