| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/seaice_do_ridging.F |
207 |
SEAICE_DO_RIDGING |
areaPR(i,j,k) = AREAITD(i,j,k,bi,bj) |
|
./pkg/seaice/seaice_do_ridging.F |
239 |
SEAICE_DO_RIDGING |
IF ( areaPR(i,j,k) .GT. SEAICE_area_reg |
|
./pkg/seaice/seaice_do_ridging.F |
270 |
SEAICE_DO_RIDGING |
doRidging(i,j) = areaPR(i,j,k) .GT. SEAICE_area_reg |
|
./pkg/seaice/seaice_do_ridging.F |
280 |
SEAICE_DO_RIDGING |
IF ( ridgingArea(i,j) .GT. areaPR(i,j,k) ) THEN |
|
./pkg/seaice/seaice_do_ridging.F |
281 |
SEAICE_DO_RIDGING |
ridgingArea(i,j) = areaPR(i,j,k) |
|
./pkg/seaice/seaice_do_ridging.F |
283 |
SEAICE_DO_RIDGING |
areaFraction(i,j) = ridgingArea(i,j)/areaPR(i,j,k) |
|
./pkg/seaice/seaice_do_ridging.F |
93 |
SEAICE_DO_RIDGING |
_RL areaPR (1-OLx:sNx+OLx,1-OLy:sNy+OLy,1:nITD) |