| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/seaice_do_ridging.F |
355 |
SEAICE_DO_RIDGING |
expL = EXP(-( hL - hrMin(i,j,k) )/hrExp(i,j,k) ) |
|
./pkg/seaice/seaice_do_ridging.F |
357 |
SEAICE_DO_RIDGING |
areaFraction(i,j) = expL - expR |
|
./pkg/seaice/seaice_do_ridging.F |
359 |
SEAICE_DO_RIDGING |
& ( ( hL + hrExp(i,j,k) ) * expL |
|
./pkg/seaice/seaice_do_ridging.F |
370 |
SEAICE_DO_RIDGING |
expL = EXP(-( hL - hrMin(i,j,k) )/hrExp(i,j,k) ) |
|
./pkg/seaice/seaice_do_ridging.F |
371 |
SEAICE_DO_RIDGING |
areaFraction(i,j) = expL |
|
./pkg/seaice/seaice_do_ridging.F |
372 |
SEAICE_DO_RIDGING |
volFraction (i,j) = ( hL + hrExp(i,j,k) ) * expL |
|
./pkg/seaice/seaice_do_ridging.F |
95 |
SEAICE_DO_RIDGING |
_RL tmp, tmpFac, hL, hR, expL, expR |