| File |
Line number |
Procedure |
Code |
|
./pkg/opps/opps_calc.F |
472 |
OPPS_CALC |
_RL t1, t2, t3, t4, s1, s3o2, p1, p2, sp5, p1t1 |
|
./pkg/opps/opps_calc.F |
518 |
OPPS_CALC |
t3 = t2*t1 |
|
./pkg/opps/opps_calc.F |
519 |
OPPS_CALC |
t4 = t3*t1 |
|
./pkg/opps/opps_calc.F |
554 |
OPPS_CALC |
& + eosJMDCFw(4)*t3 |
|
./pkg/opps/opps_calc.F |
563 |
OPPS_CALC |
& + eosJMDCSw(4)*t3 |
|
./pkg/opps/opps_calc.F |
580 |
OPPS_CALC |
& + eosJMDCKFw(4)*t3 |
|
./pkg/opps/opps_calc.F |
587 |
OPPS_CALC |
& + eosJMDCKSw(4)*t3 |
|
./pkg/opps/opps_calc.F |
598 |
OPPS_CALC |
& + eosJMDCKP(4)*t3 |
|
./pkg/seaice/seaice_budget_ice_if.F |
227 |
SEAICE_BUDGET_ICE_IF |
t3 = t2*t1 |
|
./pkg/seaice/seaice_budget_ice_if.F |
245 |
SEAICE_BUDGET_ICE_IF |
dFiDTs1 = 4.0 * D3*t3 + effConduct + D1*UG(I,J) + |
|
./pkg/seaice/seaice_budget_ice_if.F |
284 |
SEAICE_BUDGET_ICE_IF |
t3 = t2*t1 |
|
./pkg/seaice/seaice_budget_ice_if.F |
84 |
SEAICE_BUDGET_ICE_IF |
_RL t1, t2, t3, t4 |
|
./pkg/seaice/seaice_budget_ocean_if.F |
65 |
SEAICE_BUDGET_OCEAN_IF |
_RL t1, t2, t3, t4 |
|
./pkg/seaice/seaice_solve4temp.F |
138 |
SEAICE_SOLVE4TEMP |
_RL t1, t2, t3, t4 |
|
./pkg/seaice/seaice_solve4temp.F |
416 |
SEAICE_SOLVE4TEMP |
t3 = t2*t1 |
|
./pkg/seaice/seaice_solve4temp.F |
422 |
SEAICE_SOLVE4TEMP |
qhice(I,J)=QS1*(C1*t4+C2*t3 +C3*t2+C4*t1+C5) |
|
./pkg/seaice/seaice_solve4temp.F |
445 |
SEAICE_SOLVE4TEMP |
A3(I,J) = 4.0 _d 0 * D3 * t3 + effConduct(I,J) + D1*UG(I,J) |
|
./pkg/seaice/seaice_solve4temp.F |
456 |
SEAICE_SOLVE4TEMP |
dFiDTs1 = 4.0 _d 0 * D3*t3 + effConduct(I,J) + D1*UG(I,J) |
|
./pkg/seaice/seaice_solve4temp.F |
558 |
SEAICE_SOLVE4TEMP |
t3 = t2*t1 |
|
./pkg/seaice/seaice_solve4temp.F |
589 |
SEAICE_SOLVE4TEMP |
t3 = t2*t1 |
|
./pkg/seaice/seaice_solve4temp.F |
591 |
SEAICE_SOLVE4TEMP |
qhice(I,J)=QS1*(C1*t4+C2*t3 +C3*t2+C4*t1+C5) |
|
./model/src/find_alpha.F |
137 |
FIND_ALPHA |
t3 = t2*t1 |
|
./model/src/find_alpha.F |
156 |
FIND_ALPHA |
& + 4.*eosJMDCFw(5)*t3 |
|
./model/src/find_alpha.F |
157 |
FIND_ALPHA |
& + 5.*eosJMDCFw(6)*t3*t1 |
|
./model/src/find_alpha.F |
164 |
FIND_ALPHA |
& + 4.*eosJMDCSw(5)*t3 |
|
./model/src/find_alpha.F |
176 |
FIND_ALPHA |
& + 4.*eosJMDCKFw(5)*t3 |
|
./model/src/find_alpha.F |
317 |
FIND_BETA |
_RL t1, t2, t3, s1, s3o2, p1, sp5, p1t1 |
|
./model/src/find_alpha.F |
397 |
FIND_BETA |
t3 = t2*t1 |
|
./model/src/find_alpha.F |
417 |
FIND_BETA |
& + eosJMDCSw(4)*t3 |
|
./model/src/find_alpha.F |
418 |
FIND_BETA |
& + eosJMDCSw(5)*t3*t1 |
|
./model/src/find_alpha.F |
433 |
FIND_BETA |
& + eosJMDCKSw(4)*t3 |
|
./model/src/find_alpha.F |
55 |
FIND_ALPHA |
_RL t1, t2, t3, s1, s3o2, p1, p2, sp5, p1t1 |
|
./model/src/find_rho.F |
259 |
FIND_RHOP0 |
_RL t, t2, t3, t4, s, s3o2 |
|
./model/src/find_rho.F |
267 |
FIND_RHOP0 |
t3 = t2*t |
|
./model/src/find_rho.F |
268 |
FIND_RHOP0 |
t4 = t3*t |
|
./model/src/find_rho.F |
283 |
FIND_RHOP0 |
& + eosJMDCFw(4)*t3 |
|
./model/src/find_rho.F |
292 |
FIND_RHOP0 |
& + eosJMDCSw(4)*t3 |
|
./model/src/find_rho.F |
350 |
FIND_BULKMOD |
_RL t, t2, t3, t4, s, s3o2, p, p2 |
|
./model/src/find_rho.F |
358 |
FIND_BULKMOD |
t3 = t2*t |
|
./model/src/find_rho.F |
359 |
FIND_BULKMOD |
t4 = t3*t |
|
./model/src/find_rho.F |
376 |
FIND_BULKMOD |
& + eosJMDCKFw(4)*t3 |
|
./model/src/find_rho.F |
383 |
FIND_BULKMOD |
& + eosJMDCKSw(4)*t3 |
|
./model/src/find_rho.F |
394 |
FIND_BULKMOD |
& + eosJMDCKP(4)*t3 |
|
./model/src/find_rho.F |
595 |
FIND_RHO_SCALAR |
_RL t1, t2, t3, t4, s1, s3o2, p1, p2, sp5, p1t1 |
|
./model/src/find_rho.F |
617 |
FIND_RHO_SCALAR |
t3 = t2*t1 |
|
./model/src/find_rho.F |
618 |
FIND_RHO_SCALAR |
t4 = t3*t1 |
|
./model/src/find_rho.F |
666 |
FIND_RHO_SCALAR |
& + eosJMDCFw(4)*t3 |
|
./model/src/find_rho.F |
675 |
FIND_RHO_SCALAR |
& + eosJMDCSw(4)*t3 |
|
./model/src/find_rho.F |
692 |
FIND_RHO_SCALAR |
& + eosJMDCKFw(4)*t3 |
|
./model/src/find_rho.F |
699 |
FIND_RHO_SCALAR |
& + eosJMDCKSw(4)*t3 |
|
./model/src/find_rho.F |
710 |
FIND_RHO_SCALAR |
& + eosJMDCKP(4)*t3 |