| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/seaice_do_ridging.F |
149 |
SEAICE_DO_RIDGING |
ridgingHsnw(i,j) = 0. _d 0 |
|
./pkg/seaice/seaice_do_ridging.F |
291 |
SEAICE_DO_RIDGING |
ridgingHsnw(i,j) = hsnwPR(i,j,k) * areaFraction(i,j) |
|
./pkg/seaice/seaice_do_ridging.F |
296 |
SEAICE_DO_RIDGING |
& + SEAICE_rhoSnow*ridgingHsnw(i,j) |
|
./pkg/seaice/seaice_do_ridging.F |
299 |
SEAICE_DO_RIDGING |
ridgingHsnw(i,j) = ridgingHsnw(i,j) * SEAICEsnowFracRidge |
|
./pkg/seaice/seaice_do_ridging.F |
304 |
SEAICE_DO_RIDGING |
HSNOWITD(i,j,k,bi,bj)=HSNOWITD(i,j,k,bi,bj) - ridgingHsnw(i,j) |
|
./pkg/seaice/seaice_do_ridging.F |
387 |
SEAICE_DO_RIDGING |
& +volFraction(i,j)*ridgingHsnw(i,j)*SEAICEsnowFracRidge |
|
./pkg/seaice/seaice_do_ridging.F |
85 |
SEAICE_DO_RIDGING |
_RL ridgingHsnw (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |