| File |
Line number |
Procedure |
Code |
|
./pkg/ecco/cost_gencost_seaicev4.F |
422 |
GET_EXCONC_DECONC |
_RL const1,const2 |
|
./pkg/ecco/cost_gencost_seaicev4.F |
435 |
GET_EXCONC_DECONC |
const1=HeatCapacity_Cp*rhoNil*drF(1) |
|
./pkg/ecco/cost_gencost_seaicev4.F |
477 |
GET_EXCONC_DECONC |
& (deconcbar(i,j,k,bi,bj)-SEAICE_freeze)*const1 |
|
./pkg/ecco/cost_gencost_seaicev4.F |
512 |
GET_EXCONC_DECONC |
& ( (deconcbar(i,j,k,bi,bj)-SEAICE_freeze)*const1 |
|
./pkg/ecco/cost_gencost_seaicev4.F |
518 |
GET_EXCONC_DECONC |
& const2 ) - (epsilonTemp*const1) |