File |
Line number |
Procedure |
Code |
./pkg/seaice/seaice_do_ridging.F |
168 |
SEAICE_DO_RIDGING |
closingRate(i,j) = SEAICEshearParm*shear + convergence |
./pkg/seaice/seaice_do_ridging.F |
194 |
SEAICE_DO_RIDGING |
& closingRate(i,j) = MAX(closingRate(i,j), -divAdv) |
./pkg/seaice/seaice_do_ridging.F |
197 |
SEAICE_DO_RIDGING |
openingRate(i,j) = closingRate(i,j) + divAdv |
./pkg/seaice/seaice_do_ridging.F |
225 |
SEAICE_DO_RIDGING |
grossClosing(i,j) = closingRate(i,j)*SEAICE_deltaTtherm |
./pkg/seaice/seaice_do_ridging.F |
417 |
SEAICE_DO_RIDGING |
closingRate(i,j) = MAX( 0. _d 0, -divAdv) |
./pkg/seaice/seaice_do_ridging.F |
421 |
SEAICE_DO_RIDGING |
closingRate(i,j) = 0. _d 0 |
./pkg/seaice/seaice_do_ridging.F |
80 |
SEAICE_DO_RIDGING |
_RL closingRate (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |