File |
Line number |
Procedure |
Code |
./model/src/cg3d.F |
279 |
CG3D |
cg3d_q(i,j,k,bi,bj) = zMC(i,j,k,bi,bj) |
./model/src/cg3d.F |
290 |
CG3D |
cg3d_q(i,j,k,bi,bj) = zMC(i,j,k,bi,bj) |
./model/src/cg3d_ex0.F |
276 |
CG3D_EX0 |
cg3d_q(i,j,k,bi,bj) = zMC(i,j,k,bi,bj) |
./model/src/cg3d_ex0.F |
287 |
CG3D_EX0 |
cg3d_q(i,j,k,bi,bj) = zMC(i,j,k,bi,bj) |
./model/src/ini_cg3d.F |
270 |
INI_CG3D |
zMC(i,j,k,bi,bj) = aC3d(i,j,k,bi,bj) |
./model/src/ini_cg3d.F |
283 |
INI_CG3D |
zMC(i,j,k,bi,bj) = 1. _d 0 |
./model/src/ini_cg3d.F |
293 |
INI_CG3D |
zMC(i,j,k,bi,bj) = 1. _d 0 / zMC(i,j,k,bi,bj) |
./model/src/ini_cg3d.F |
294 |
INI_CG3D |
zMU(i,j,k,bi,bj) = zMU(i,j,k,bi,bj)*zMC(i,j,k,bi,bj) |
./model/src/ini_cg3d.F |
300 |
INI_CG3D |
zMC(i,j,k,bi,bj) = 1. _d 0 / |
./model/src/ini_cg3d.F |
301 |
INI_CG3D |
& (zMC(i,j,k,bi,bj)-zML(i,j,k,bi,bj)*zMU(i,j,k-1,bi,bj)) |
./model/src/ini_cg3d.F |
302 |
INI_CG3D |
zMU(i,j,k,bi,bj) = zMU(i,j,k,bi,bj)*zMC(i,j,k,bi,bj) |
./model/src/ini_cg3d.F |
310 |
INI_CG3D |
zMC(i,j,k,bi,bj) = 1. |
./model/src/ini_cg3d.F |
326 |
INI_CG3D |
_EXCH_XYZ_RS(zMC, myThid) |
./model/src/ini_cg3d.F |
331 |
INI_CG3D |
CALL WRITE_FLD_XYZ_RS( 'zMC',' ',zMC, 0, myThid ) |
./model/src/ini_cg3d.F |
71 |
INI_CG3D |
zMC (i,j,k,bi,bj) = 0. |
./model/inc/CG3D.h |
33 |
NO PROCEDURE |
& zMC, zML, zMU, |
./model/inc/CG3D.h |
39 |
NO PROCEDURE |
_RS zMC (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |