File |
Line number |
Procedure |
Code |
./model/src/ini_cg2d.F |
102 |
INI_CG2D |
& *faceArea*recip_dxC(I,J,bi,bj) |
./model/src/ini_cg2d.F |
103 |
INI_CG2D |
faceArea = _dxG(I,J,bi,bj)*drF(K) |
./model/src/ini_cg2d.F |
107 |
INI_CG2D |
& *faceArea*recip_dyC(I,J,bi,bj) |
./model/src/ini_cg2d.F |
54 |
INI_CG2D |
_RL faceArea |
./model/src/ini_cg2d.F |
98 |
INI_CG2D |
faceArea = _dyG(I,J,bi,bj)*drF(K) |
./model/src/ini_cg3d.F |
101 |
INI_CG3D |
faceArea = _rA(I,J,bi,bj) |
./model/src/ini_cg3d.F |
109 |
INI_CG3D |
aV3d(I,J,K,bi,bj) = faceArea*theRecip_Dr |
./model/src/ini_cg3d.F |
55 |
INI_CG3D |
_RL faceArea |
./model/src/ini_cg3d.F |
76 |
INI_CG3D |
faceArea = _dyG(I,J,bi,bj)*drF(K) |
./model/src/ini_cg3d.F |
78 |
INI_CG3D |
aW3d(I,J,K,bi,bj) = faceArea*recip_dxC(I,J,bi,bj) |
./model/src/ini_cg3d.F |
79 |
INI_CG3D |
faceArea = _dxG(I,J,bi,bj)*drF(K) |
./model/src/ini_cg3d.F |
81 |
INI_CG3D |
aS3d(I,J,K,bi,bj) = faceArea*recip_dyC(I,J,bi,bj) |
./model/src/ini_cg3d.F |
99 |
INI_CG3D |
faceArea = 0. |
./verification/rotating_tank/code/external_forcing.F |
255 |
EXTERNAL_FORCING_T |
_RL faceArea |
./verification/rotating_tank/code/external_forcing.F |
385 |
EXTERNAL_FORCING_T |
faceArea = drF(kLev)*dyG(i,j,bi,bj) |
./verification/rotating_tank/code/external_forcing.F |
387 |
EXTERNAL_FORCING_T |
& -faceArea*kDiffCyl*(theta(i,j,kLev,bi,bj) - tCyl) |
./verification/rotating_tank/code/external_forcing.F |
392 |
EXTERNAL_FORCING_T |
faceArea = drF(kLev)*dyG(i+1,j,bi,bj) |
./verification/rotating_tank/code/external_forcing.F |
394 |
EXTERNAL_FORCING_T |
& -faceArea*kDiffCyl*(tCyl - theta(i,j,kLev,bi,bj)) |
./verification/rotating_tank/code/external_forcing.F |
399 |
EXTERNAL_FORCING_T |
faceArea = drF(kLev)*dxG(i,j+1,bi,bj) |
./verification/rotating_tank/code/external_forcing.F |
401 |
EXTERNAL_FORCING_T |
& -faceArea*kDiffCyl*(tCyl-theta(i,j,kLev,bi,bj)) |
./verification/rotating_tank/code/external_forcing.F |
406 |
EXTERNAL_FORCING_T |
faceArea = drF(kLev)*dxG(i,j,bi,bj) |
./verification/rotating_tank/code/external_forcing.F |
408 |
EXTERNAL_FORCING_T |
& -faceArea*kDiffCyl*(theta(i,j,kLev,bi,bj) - tCyl) |
./model/src/update_cg2d.F |
55 |
UPDATE_CG2D |
_RL faceArea |
./model/src/update_cg2d.F |
82 |
UPDATE_CG2D |
faceArea = _dyG(I,J,bi,bj)*drF(K) |
./model/src/update_cg2d.F |
85 |
UPDATE_CG2D |
& faceArea*recip_dxC(I,J,bi,bj) |
./model/src/update_cg2d.F |
86 |
UPDATE_CG2D |
faceArea = _dxG(I,J,bi,bj)*drF(K) |
./model/src/update_cg2d.F |
89 |
UPDATE_CG2D |
& faceArea*recip_dyC(I,J,bi,bj) |