| File |
Line number |
Procedure |
Code |
|
./model/src/ini_cg3d.F |
278 |
INI_CG3D |
zMC(i,j,k,bi,bj) = aC3d(I,J,K,bi,bj) |
|
./model/src/ini_cg3d.F |
289 |
INI_CG3D |
zMC(i,j,k,bi,bj) = 1. _d 0 |
|
./model/src/ini_cg3d.F |
298 |
INI_CG3D |
zMC(i,j,1,bi,bj)= |
|
./model/src/ini_cg3d.F |
299 |
INI_CG3D |
& 1. _d 0 / zMC(i,j,1,bi,bj) |
|
./model/src/ini_cg3d.F |
301 |
INI_CG3D |
& zMU(i,j,1,bi,bj)*zMC(i,j,1,bi,bj) |
|
./model/src/ini_cg3d.F |
307 |
INI_CG3D |
zMC(i,j,k,bi,bj) = 1. _d 0 / |
|
./model/src/ini_cg3d.F |
308 |
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 |
309 |
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 |
332 |
INI_CG3D |
zMC(i,j,k,bi,bj) = 1. |
|
./model/src/ini_cg3d.F |
348 |
INI_CG3D |
_EXCH_XYZ_R4(zMC, myThid) |
|
./model/src/ini_cg3d.F |
73 |
INI_CG3D |
zMC (I,J,K,bi,bj) = 0. |
|
./model/src/cg3d.F |
226 |
CG3D |
& zMC(I ,J ,K,bi,bj)*cg3d_r(I ,J ,K,bi,bj) |
|
./model/src/cg3d.F |
234 |
CG3D |
& zMC(I,J,K,bi,bj)*(cg3d_r(I,J,K ,bi,bj) |
|
./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) |