| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/seaice_do_ridging.F |
175 |
SEAICE_DO_RIDGING |
netArea(i,j) = 0. _d 0 |
|
./pkg/seaice/seaice_do_ridging.F |
181 |
SEAICE_DO_RIDGING |
netArea(i,j) = netArea(i,j) + AREAITD(i,j,k,bi,bj) |
|
./pkg/seaice/seaice_do_ridging.F |
191 |
SEAICE_DO_RIDGING |
divAdv = (1. _d 0-netArea(i,j)-opnWtrFrac(i,j,bi,bj)) |
|
./pkg/seaice/seaice_do_ridging.F |
398 |
SEAICE_DO_RIDGING |
netArea(i,j) = 0. _d 0 |
|
./pkg/seaice/seaice_do_ridging.F |
404 |
SEAICE_DO_RIDGING |
netArea(i,j) = netArea(i,j) + AREAITD(i,j,k,bi,bj) |
|
./pkg/seaice/seaice_do_ridging.F |
411 |
SEAICE_DO_RIDGING |
tmp = netArea(i,j)+opnWtrFrac(i,j,bi,bj) |
|
./pkg/seaice/seaice_do_ridging.F |
77 |
SEAICE_DO_RIDGING |
_RL netArea (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |