| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/seaice_do_ridging.F |
147 |
SEAICE_DO_RIDGING |
areaFraction(i,j) = 0. _d 0 |
|
./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 |
287 |
SEAICE_DO_RIDGING |
ridgingHEFF(i,j) = heffPR(i,j,k) * areaFraction(i,j) |
|
./pkg/seaice/seaice_do_ridging.F |
288 |
SEAICE_DO_RIDGING |
ridgingHsnw(i,j) = hsnwPR(i,j,k) * areaFraction(i,j) |
|
./pkg/seaice/seaice_do_ridging.F |
312 |
SEAICE_DO_RIDGING |
areaFraction(i,j) = 0. _d 0 |
|
./pkg/seaice/seaice_do_ridging.F |
326 |
SEAICE_DO_RIDGING |
areaFraction(i,j) = 0. _d 0 |
|
./pkg/seaice/seaice_do_ridging.F |
331 |
SEAICE_DO_RIDGING |
areaFraction(i,j) = ( hR - hL ) |
|
./pkg/seaice/seaice_do_ridging.F |
335 |
SEAICE_DO_RIDGING |
volFraction (i,j) = areaFraction(i,j)*( hR + hL ) |
|
./pkg/seaice/seaice_do_ridging.F |
354 |
SEAICE_DO_RIDGING |
areaFraction(i,j) = expL - expR |
|
./pkg/seaice/seaice_do_ridging.F |
368 |
SEAICE_DO_RIDGING |
areaFraction(i,j) = expL |
|
./pkg/seaice/seaice_do_ridging.F |
380 |
SEAICE_DO_RIDGING |
& +areaFraction(i,j)*ridgedArea(i,j) |
|
./pkg/seaice/seaice_do_ridging.F |
84 |
SEAICE_DO_RIDGING |
_RL areaFraction (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |