| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/seaice_calc_ice_strength.F |
134 |
SEAICE_CALC_ICE_STRENGTH |
O hrMin, hrMax, hrExp, ridgeRatio, ridgingModeNorm, partFunc, |
|
./pkg/seaice/seaice_calc_ice_strength.F |
147 |
SEAICE_CALC_ICE_STRENGTH |
& + ( hrMax(i,j,k)**2 + hrMin(i,j,k)**2 |
|
./pkg/seaice/seaice_calc_ice_strength.F |
148 |
SEAICE_CALC_ICE_STRENGTH |
& + hrMax(i,j,k)*hrMin(i,j,k) )*tmpscal1 |
|
./pkg/seaice/seaice_calc_ice_strength.F |
72 |
SEAICE_CALC_ICE_STRENGTH |
_RL hrMax (1-OLx:sNx+OLx,1-OLy:sNy+OLy,1:nITD) |
|
./pkg/seaice/seaice_do_ridging.F |
158 |
SEAICE_DO_RIDGING |
O hrMin, hrMax, hrExp, ridgeRatio, ridgingModeNorm, partFunc, |
|
./pkg/seaice/seaice_do_ridging.F |
326 |
SEAICE_DO_RIDGING |
& hrMax(i,j,k) .LE. hLimit(l-1) ) THEN |
|
./pkg/seaice/seaice_do_ridging.F |
333 |
SEAICE_DO_RIDGING |
hR = MIN(hrMax(i,j,k), hLimit(l)) |
|
./pkg/seaice/seaice_do_ridging.F |
335 |
SEAICE_DO_RIDGING |
& / ( hrMax(i,j,k) - hrMin(i,j,k) ) |
|
./pkg/seaice/seaice_do_ridging.F |
339 |
SEAICE_DO_RIDGING |
& / ( hrMax(i,j,k) + hrMin(i,j,k) ) |
|
./pkg/seaice/seaice_do_ridging.F |
450 |
SEAICE_DO_RIDGING |
O hrMin, hrMax, hrExp, ridgeRatio, ridgingModeNorm, partFunc, |
|
./pkg/seaice/seaice_do_ridging.F |
70 |
SEAICE_DO_RIDGING |
_RL hrMax (1-OLx:sNx+OLx,1-OLy:sNy+OLy,1:nITD) |
|
./pkg/seaice/seaice_prepare_ridging.F |
15 |
SEAICE_PREPARE_RIDGING |
O hrMin, hrMax, hrExp, ridgeRatio, ridgingModeNorm, partFunc, |
|
./pkg/seaice/seaice_prepare_ridging.F |
205 |
SEAICE_PREPARE_RIDGING |
hrMax(i,j,k) = 0. _d 0 |
|
./pkg/seaice/seaice_prepare_ridging.F |
221 |
SEAICE_PREPARE_RIDGING |
hrMax(i,j,k) = 2. _d 0 * SQRT(hActual(i,j,k)*SEAICEhStar) |
|
./pkg/seaice/seaice_prepare_ridging.F |
225 |
SEAICE_PREPARE_RIDGING |
hrMax(i,j,k) = MAX(hrMax(i,j,k),hrMin(i,j,k)+SEAICE_hice_reg) |
|
./pkg/seaice/seaice_prepare_ridging.F |
228 |
SEAICE_PREPARE_RIDGING |
& 0.5 _d 0 * (hrMax(i,j,k)+hrMin(i,j,k))/hActual(i,j,k) |
|
./pkg/seaice/seaice_prepare_ridging.F |
70 |
SEAICE_PREPARE_RIDGING |
_RL hrMax (1-OLx:sNx+OLx,1-OLy:sNy+OLy,1:nITD) |