| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/seaice_growth.F |
205 |
SEAICE_GROWTH |
_RL a_FWbySublimMult (1:sNx,1:sNy,nITD) |
|
./pkg/seaice/seaice_growth.F |
471 |
SEAICE_GROWTH |
a_FWbySublimMult(I,J,IT) = 0.0 _d 0 |
|
./pkg/seaice/seaice_growth.F |
841 |
SEAICE_GROWTH |
O a_FWbySublimMult(1,1,IT), |
|
./pkg/seaice/seaice_growth.F |
889 |
SEAICE_GROWTH |
& + a_FWbySublimMult(I,J,IT)*areaFracFactor(I,J,IT) |
|
./pkg/seaice/seaice_growth.F |
896 |
SEAICE_GROWTH |
& + a_FWbySublimMult(I,J,IT)*SEAICE_PDF(IT) |
|
./pkg/seaice/seaice_growth.F |
943 |
SEAICE_GROWTH |
a_FWbySublimMult(I,J,IT) = ZERO |
|
./pkg/seaice/seaice_growth.F |
945 |
SEAICE_GROWTH |
a_FWbySublimMult(I,J,IT) = SEAICE_deltaTtherm*recip_rhoIce |
|
./pkg/seaice/seaice_growth.F |
946 |
SEAICE_GROWTH |
& * a_FWbySublimMult(I,J,IT)*AREAITDpreTH(I,J,IT) |
|
./pkg/seaice/seaice_growth.F |
947 |
SEAICE_GROWTH |
r_FWbySublimMult(I,J,IT)=a_FWbySublimMult(I,J,IT) |