| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/seaice_do_ridging.F |
172 |
SEAICE_DO_RIDGING |
netArea(i,j) = 0. _d 0 |
|
./pkg/seaice/seaice_do_ridging.F |
178 |
SEAICE_DO_RIDGING |
netArea(i,j) = netArea(i,j) + AREAITD(i,j,k,bi,bj) |
|
./pkg/seaice/seaice_do_ridging.F |
188 |
SEAICE_DO_RIDGING |
divAdv = (1. _d 0-netArea(i,j)-opnWtrFrac(i,j,bi,bj)) |
|
./pkg/seaice/seaice_do_ridging.F |
395 |
SEAICE_DO_RIDGING |
netArea(i,j) = 0. _d 0 |
|
./pkg/seaice/seaice_do_ridging.F |
401 |
SEAICE_DO_RIDGING |
netArea(i,j) = netArea(i,j) + AREAITD(i,j,k,bi,bj) |
|
./pkg/seaice/seaice_do_ridging.F |
408 |
SEAICE_DO_RIDGING |
tmp = netArea(i,j)+opnWtrFrac(i,j,bi,bj) |
|
./pkg/seaice/seaice_do_ridging.F |
74 |
SEAICE_DO_RIDGING |
_RL netArea (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |