| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/seaice_do_ridging.F |
225 |
SEAICE_DO_RIDGING |
grossClosing(i,j) = closingRate(i,j)*SEAICE_deltaTtherm |
|
./pkg/seaice/seaice_do_ridging.F |
229 |
SEAICE_DO_RIDGING |
tmp = partFunc(i,j,0)*grossClosing(i,j) |
|
./pkg/seaice/seaice_do_ridging.F |
232 |
SEAICE_DO_RIDGING |
grossClosing(i,j) = grossClosing(i,j) * tmpFac |
|
./pkg/seaice/seaice_do_ridging.F |
244 |
SEAICE_DO_RIDGING |
tmp = partFunc(i,j,k)*grossClosing(i,j) |
|
./pkg/seaice/seaice_do_ridging.F |
247 |
SEAICE_DO_RIDGING |
grossClosing(i,j) = grossClosing(i,j) * tmpFac |
|
./pkg/seaice/seaice_do_ridging.F |
261 |
SEAICE_DO_RIDGING |
& - partFunc(i,j,0)*grossClosing(i,j) |
|
./pkg/seaice/seaice_do_ridging.F |
275 |
SEAICE_DO_RIDGING |
& .AND. grossClosing(i,j) .GT. 0. _d 0 |
|
./pkg/seaice/seaice_do_ridging.F |
282 |
SEAICE_DO_RIDGING |
ridgingArea(i,j) = partFunc(i,j,k)*grossClosing(i,j) |
|
./pkg/seaice/seaice_do_ridging.F |
81 |
SEAICE_DO_RIDGING |
_RL grossClosing (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |