Symbol | Description | Uses |
aC | 8 |
File | Line number | Procedure | Code |
./model/src/ini_cg2d.F | 218 | INI_CG2D |
aC = aC2d( i, j, bi,bj) |
./model/src/ini_cg2d.F | 221 | INI_CG2D |
IF ( aC .EQ. 0. ) THEN |
./model/src/ini_cg2d.F | 224 | INI_CG2D |
pC(i,j,bi,bj) = 1. _d 0 / aC |
./model/src/ini_cg2d.F | 226 | INI_CG2D |
IF ( aC + aCw .EQ. 0. ) THEN |
./model/src/ini_cg2d.F | 230 | INI_CG2D |
& -aW2d(i,j,bi,bj)/((cg2dpcOffDFac *(aCw+aC))**2 ) |
./model/src/ini_cg2d.F | 232 | INI_CG2D |
IF ( aC + aCs .EQ. 0. ) THEN |
./model/src/ini_cg2d.F | 236 | INI_CG2D |
& -aS2d(i,j,bi,bj)/((cg2dpcOffDFac *(aCs+aC))**2 ) |
./model/src/ini_cg2d.F | 48 | INI_CG2D |
_RS aC, aCw, aCs |