| File |
Line number |
Procedure |
Code |
|
./model/src/update_cg2d.F |
157 |
UPDATE_CG2D |
pS_tmp = aC2d(i,j,bi,bj)+aC2d(i,j-1,bi,bj) |
|
./model/src/update_cg2d.F |
158 |
UPDATE_CG2D |
IF ( pS_tmp .EQ. 0. ) THEN |
|
./model/src/update_cg2d.F |
162 |
UPDATE_CG2D |
& -aS2d(i,j,bi,bj)/((cg2dpcOffDFac *pS_tmp)**2 ) |
|
./model/src/update_cg2d.F |
52 |
UPDATE_CG2D |
_RL pW_tmp, pS_tmp |
|
./pkg/diagnostics/diag_cg2d.F |
146 |
DIAG_CG2D |
pS_tmp = aC2d(i,j,bi,bj)+aC2d(i,j-1,bi,bj) |
|
./pkg/diagnostics/diag_cg2d.F |
147 |
DIAG_CG2D |
IF ( pS_tmp .EQ. 0. ) THEN |
|
./pkg/diagnostics/diag_cg2d.F |
151 |
DIAG_CG2D |
& /( (diagCG_pcOffDFac*pS_tmp)**2 ) |
|
./pkg/diagnostics/diag_cg2d.F |
85 |
DIAG_CG2D |
_RL pW_tmp, pS_tmp |