| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/seaice_calc_ice_strength.F |
131 |
SEAICE_CALC_ICE_STRENGTH |
O hrMin, hrMax, hrExp, ridgeRatio, ridgingModeNorm, partFunc, |
|
./pkg/seaice/seaice_calc_ice_strength.F |
144 |
SEAICE_CALC_ICE_STRENGTH |
& + ( hrMax(i,j,k)**2 + hrMin(i,j,k)**2 |
|
./pkg/seaice/seaice_calc_ice_strength.F |
145 |
SEAICE_CALC_ICE_STRENGTH |
& + hrMax(i,j,k)*hrMin(i,j,k) )*tmpscal1 |
|
./pkg/seaice/seaice_calc_ice_strength.F |
73 |
SEAICE_CALC_ICE_STRENGTH |
_RL hrMax (1-OLx:sNx+OLx,1-OLy:sNy+OLy,1:nITD) |
|
./pkg/seaice/seaice_do_ridging.F |
155 |
SEAICE_DO_RIDGING |
O hrMin, hrMax, hrExp, ridgeRatio, ridgingModeNorm, partFunc, |
|
./pkg/seaice/seaice_do_ridging.F |
323 |
SEAICE_DO_RIDGING |
& hrMax(i,j,k) .LE. hLimit(l-1) ) THEN |
|
./pkg/seaice/seaice_do_ridging.F |
330 |
SEAICE_DO_RIDGING |
hR = MIN(hrMax(i,j,k), hLimit(l)) |
|
./pkg/seaice/seaice_do_ridging.F |
332 |
SEAICE_DO_RIDGING |
& / ( hrMax(i,j,k) - hrMin(i,j,k) ) |
|
./pkg/seaice/seaice_do_ridging.F |
336 |
SEAICE_DO_RIDGING |
& / ( hrMax(i,j,k) + hrMin(i,j,k) ) |
|
./pkg/seaice/seaice_do_ridging.F |
447 |
SEAICE_DO_RIDGING |
O hrMin, hrMax, hrExp, ridgeRatio, ridgingModeNorm, partFunc, |
|
./pkg/seaice/seaice_do_ridging.F |
67 |
SEAICE_DO_RIDGING |
_RL hrMax (1-OLx:sNx+OLx,1-OLy:sNy+OLy,1:nITD) |
|
./pkg/seaice/seaice_prepare_ridging.F |
12 |
SEAICE_PREPARE_RIDGING |
O hrMin, hrMax, hrExp, ridgeRatio, ridgingModeNorm, partFunc, |
|
./pkg/seaice/seaice_prepare_ridging.F |
202 |
SEAICE_PREPARE_RIDGING |
hrMax(i,j,k) = 0. _d 0 |
|
./pkg/seaice/seaice_prepare_ridging.F |
218 |
SEAICE_PREPARE_RIDGING |
hrMax(i,j,k) = 2. _d 0 * SQRT(hActual(i,j,k)*SEAICEhStar) |
|
./pkg/seaice/seaice_prepare_ridging.F |
222 |
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 |
225 |
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 |
67 |
SEAICE_PREPARE_RIDGING |
_RL hrMax (1-OLx:sNx+OLx,1-OLy:sNy+OLy,1:nITD) |