| File |
Line number |
Procedure |
Code |
|
./pkg/generic_advdiff/gad_biharm_x.F |
12 |
GAD_BIHARM_X |
I xA,del2T,diffK4, |
|
./pkg/generic_advdiff/gad_biharm_x.F |
38 |
GAD_BIHARM_X |
_RL diffK4 |
|
./pkg/generic_advdiff/gad_biharm_x.F |
55 |
GAD_BIHARM_X |
dfx(i,j) = dfx(i,j) + diffK4*xA(i,j) |
|
./pkg/generic_advdiff/gad_biharm_y.F |
12 |
GAD_BIHARM_Y |
I yA,del2T,diffK4, |
|
./pkg/generic_advdiff/gad_biharm_y.F |
38 |
GAD_BIHARM_Y |
_RL diffK4 |
|
./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_calc_rhs.F |
100 |
GAD_CALC_RHS |
_RL diffKh, diffK4 |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
14 |
GAD_CALC_RHS |
I diffKh, diffK4, KappaR, diffKr4, TracerN, TracAB, |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
201 |
GAD_CALC_RHS |
IF (diffK4 .NE. 0.) THEN |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
310 |
GAD_CALC_RHS |
IF (diffK4 .NE. 0.) THEN |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
311 |
GAD_CALC_RHS |
CALL GAD_BIHARM_X(bi,bj,k,xA,df4,diffK4,df,myThid) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
335 |
GAD_CALC_RHS |
& (diffKh.NE.0. .OR. diffK4 .NE.0. .OR. trUseGMRedi) ) THEN |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
450 |
GAD_CALC_RHS |
IF (diffK4 .NE. 0.) THEN |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
451 |
GAD_CALC_RHS |
CALL GAD_BIHARM_Y(bi,bj,k,yA,df4,diffK4,df,myThid) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
475 |
GAD_CALC_RHS |
& (diffKh.NE.0. .OR. diffK4 .NE.0. .OR. trUseGMRedi) ) THEN |