| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/seaice_growth.F |
200 |
SEAICE_GROWTH |
_RL a_FWbySublimMult (1:sNx,1:sNy,nITD) |
|
./pkg/seaice/seaice_growth.F |
453 |
SEAICE_GROWTH |
a_FWbySublimMult(I,J,IT) = 0.0 _d 0 |
|
./pkg/seaice/seaice_growth.F |
823 |
SEAICE_GROWTH |
O a_FWbySublimMult(1,1,IT), |
|
./pkg/seaice/seaice_growth.F |
871 |
SEAICE_GROWTH |
& + a_FWbySublimMult(I,J,IT)*areaFracFactor(I,J,IT) |
|
./pkg/seaice/seaice_growth.F |
878 |
SEAICE_GROWTH |
& + a_FWbySublimMult(I,J,IT)*recip_multDim |
|
./pkg/seaice/seaice_growth.F |
925 |
SEAICE_GROWTH |
a_FWbySublimMult(I,J,IT) = ZERO |
|
./pkg/seaice/seaice_growth.F |
927 |
SEAICE_GROWTH |
a_FWbySublimMult(I,J,IT) = SEAICE_deltaTtherm*recip_rhoIce |
|
./pkg/seaice/seaice_growth.F |
928 |
SEAICE_GROWTH |
& * a_FWbySublimMult(I,J,IT)*AREAITDpreTH(I,J,IT) |
|
./pkg/seaice/seaice_growth.F |
929 |
SEAICE_GROWTH |
r_FWbySublimMult(I,J,IT)=a_FWbySublimMult(I,J,IT) |