| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/seaice_growth.F |
1220 |
SEAICE_GROWTH |
& MAX(MIN(r_FWbySublim(I,J),HSNOW(I,J,bi,bj)*SNOW2ICE),ZERO) |
|
./pkg/seaice/seaice_growth.F |
1223 |
SEAICE_GROWTH |
r_FWbySublim(I,J) = r_FWbySublim(I,J) - tmpscal2 |
|
./pkg/seaice/seaice_growth.F |
1242 |
SEAICE_GROWTH |
& MAX(MIN(r_FWbySublim(I,J),HEFF(I,J,bi,bj)),ZERO) |
|
./pkg/seaice/seaice_growth.F |
1245 |
SEAICE_GROWTH |
r_FWbySublim(I,J) = r_FWbySublim(I,J) - tmpscal2 |
|
./pkg/seaice/seaice_growth.F |
1260 |
SEAICE_GROWTH |
a_QbyATM_cover(I,J) = a_QbyATM_cover(I,J)-r_FWbySublim(I,J) |
|
./pkg/seaice/seaice_growth.F |
1261 |
SEAICE_GROWTH |
r_QbyATM_cover(I,J) = r_QbyATM_cover(I,J)-r_FWbySublim(I,J) |
|
./pkg/seaice/seaice_growth.F |
2127 |
SEAICE_GROWTH |
r_FWbySublim(I,J) = 0.0 _d 0 |
|
./pkg/seaice/seaice_growth.F |
2149 |
SEAICE_GROWTH |
r_FWbySublim(I,J)=r_FWbySublim(I,J) |
|
./pkg/seaice/seaice_growth.F |
2285 |
SEAICE_GROWTH |
& + a_FWbySublim(I,J) - r_FWbySublim(I,J) ) |
|
./pkg/seaice/seaice_growth.F |
2293 |
SEAICE_GROWTH |
& + ( d_HFRWbyRAIN(I,J) + r_FWbySublim(I,J) ) |
|
./pkg/seaice/seaice_growth.F |
2335 |
SEAICE_GROWTH |
& +r_FWbySublim(I,J) |
|
./pkg/seaice/seaice_growth.F |
2526 |
SEAICE_GROWTH |
& * (a_FWbySublim(I,J)-r_FWbySublim(I,J)) |
|
./pkg/seaice/seaice_growth.F |
2530 |
SEAICE_GROWTH |
& * r_FWbySublim(I,J) |
|
./pkg/seaice/seaice_growth.F |
2534 |
SEAICE_GROWTH |
& + r_FWbySublim(I,J)*convertHI2PRECIP |
|
./pkg/seaice/seaice_growth.F |
2535 |
SEAICE_GROWTH |
tmpscal2= ( a_FWbySublim(I,J)-r_FWbySublim(I,J) ) |
|
./pkg/seaice/seaice_growth.F |
261 |
SEAICE_GROWTH |
_RL r_FWbySublim (1:sNx,1:sNy) |
|
./pkg/seaice/seaice_growth.F |
436 |
SEAICE_GROWTH |
r_FWbySublim(I,J) = 0.0 _d 0 |
|
./pkg/seaice/seaice_growth.F |
965 |
SEAICE_GROWTH |
r_FWbySublim(I,J)=a_FWbySublim(I,J) |