| File |
Line number |
Procedure |
Code |
|
./pkg/gmredi/gmredi_k3d.F |
1097 |
GMREDI_K3D |
CALL DIAGNOSTICS_FILL(Rmix, 'GM_RMIX ',0, 1,0,1,1,myThid) |
|
./pkg/gmredi/gmredi_k3d.F |
110 |
GMREDI_K3D |
_RL Rmix( 1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
|
./pkg/gmredi/gmredi_k3d.F |
332 |
GMREDI_K3D |
Rmix(i,j)=zeroRL |
|
./pkg/gmredi/gmredi_k3d.F |
550 |
GMREDI_K3D |
Rmix(i,j) = MIN(Rdef(i,j,bi,bj), RRhines(i,j)) |
|
./pkg/gmredi/gmredi_k3d.F |
551 |
GMREDI_K3D |
Rmix(i,j) = MAX(Rmix(i,j),GM_K3D_Rmin) |
|
./pkg/gmredi/gmredi_k3d.F |
585 |
GMREDI_K3D |
& *2*Rmix(i,j)*supp(i,j,k) |