| File |
Line number |
Procedure |
Code |
|
./pkg/generic_advdiff/gad_biharm_y.F |
13 |
GAD_BIHARM_Y |
O dfy, |
|
./pkg/generic_advdiff/gad_biharm_y.F |
43 |
GAD_BIHARM_Y |
_RL dfy (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/generic_advdiff/gad_biharm_y.F |
57 |
GAD_BIHARM_Y |
dfy(i,j) = dfy(i,j) + diffK4*yA(i,j) |
|
./pkg/generic_advdiff/gad_diff_y.F |
14 |
GAD_DIFF_Y |
O dfy, |
|
./pkg/generic_advdiff/gad_diff_y.F |
44 |
GAD_DIFF_Y |
_RL dfy (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/generic_advdiff/gad_diff_y.F |
52 |
GAD_DIFF_Y |
dfy(i,1-Oly)=0. |
|
./pkg/generic_advdiff/gad_diff_y.F |
56 |
GAD_DIFF_Y |
dfy(i,j) = -diffKh*yA(i,j) |
|
./pkg/ggl90/ggl90_calc.F |
112 |
GGL90_CALC |
_RL dfy(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/ggl90/ggl90_calc.F |
367 |
GGL90_CALC |
dfy(i,1-Oly)=0. _d 0 |
|
./pkg/ggl90/ggl90_calc.F |
371 |
GGL90_CALC |
dfy(i,j) = -GGL90diffTKEh*yA(i,j) |
|
./pkg/ggl90/ggl90_calc.F |
385 |
GGL90_CALC |
& +(dfy(i,j+1)-dfy(i,j)) |
|
./pkg/seaice/diffus.F |
100 |
DIFFUS |
& + dfy(I,J+1) - dfy(I,J) |
|
./pkg/seaice/diffus.F |
40 |
DIFFUS |
_RL dfy (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/seaice/diffus.F |
77 |
DIFFUS |
dfy(I,J) = 0. _d 0 |
|
./pkg/seaice/diffus.F |
87 |
DIFFUS |
dfy(I,J) = _dxG(I,J,bi,bj) * _recip_dyC(I,J,bi,bj) |
|
./pkg/cheapaml/gad_diff_2d_y.F |
14 |
GAD_DIFF_2D_Y |
O dfy, |
|
./pkg/cheapaml/gad_diff_2d_y.F |
42 |
GAD_DIFF_2D_Y |
_RL dfy (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/cheapaml/gad_diff_2d_y.F |
50 |
GAD_DIFF_2D_Y |
dfy(i,1-Oly)=0. |
|
./pkg/cheapaml/gad_diff_2d_y.F |
54 |
GAD_DIFF_2D_Y |
dfy(i,j) = -diffKh |
|
./pkg/cheapaml/gad_diff_2d_y.F |
61 |
GAD_DIFF_2D_Y |
if(jG.eq.ny.or.jG.eq.1)dfy(i,j)=0.d0 |