| File |
Line number |
Procedure |
Code |
|
./model/src/cg2d.F |
101 |
CG2D |
_RL rhsNorm |
|
./model/src/cg2d.F |
131 |
CG2D |
rhsNorm = 1. _d 0 |
|
./model/src/cg2d.F |
132 |
CG2D |
IF ( rhsMax .NE. 0. ) rhsNorm = 1. _d 0 / rhsMax |
|
./model/src/cg2d.F |
137 |
CG2D |
cg2d_b(i,j,bi,bj) = cg2d_b(i,j,bi,bj)*rhsNorm |
|
./model/src/cg2d.F |
138 |
CG2D |
cg2d_x(i,j,bi,bj) = cg2d_x(i,j,bi,bj)*rhsNorm |
|
./model/src/cg2d.F |
386 |
CG2D |
cg2d_x(i,j,bi,bj) = cg2d_x(i,j,bi,bj)/rhsNorm |
|
./model/src/cg2d_ex0.F |
120 |
CG2D_EX0 |
rhsNorm(bi,bj) = 1. _d 0 |
|
./model/src/cg2d_ex0.F |
121 |
CG2D_EX0 |
IF ( rhsMaxLoc .NE. 0. ) rhsNorm(bi,bj) = 1. _d 0 / rhsMaxLoc |
|
./model/src/cg2d_ex0.F |
125 |
CG2D_EX0 |
cg2d_b(i,j,bi,bj) = cg2d_b(i,j,bi,bj)*rhsNorm(bi,bj) |
|
./model/src/cg2d_ex0.F |
126 |
CG2D_EX0 |
cg2d_x(i,j,bi,bj) = cg2d_x(i,j,bi,bj)*rhsNorm(bi,bj) |
|
./model/src/cg2d_ex0.F |
335 |
CG2D_EX0 |
cg2d_x(i,j,bi,bj) = cg2d_x(i,j,bi,bj)/rhsNorm(bi,bj) |
|
./model/src/cg2d_ex0.F |
94 |
CG2D_EX0 |
_RL rhsNorm(nSx,nSy) |
|
./model/src/cg2d_nsa.F |
110 |
CG2D_NSA |
_RL rhsMax, rhsNorm |
|
./model/src/cg2d_nsa.F |
162 |
CG2D_NSA |
rhsNorm = 1. _d 0 |
|
./model/src/cg2d_nsa.F |
163 |
CG2D_NSA |
IF ( rhsMax .NE. 0. ) rhsNorm = 1. _d 0 / rhsMax |
|
./model/src/cg2d_nsa.F |
168 |
CG2D_NSA |
cg2d_b(i,j,bi,bj) = cg2d_b(i,j,bi,bj)*rhsNorm |
|
./model/src/cg2d_nsa.F |
169 |
CG2D_NSA |
cg2d_x(i,j,bi,bj) = cg2d_x(i,j,bi,bj)*rhsNorm |
|
./model/src/cg2d_nsa.F |
375 |
CG2D_NSA |
cg2d_x(i,j,bi,bj) = cg2d_x(i,j,bi,bj)/rhsNorm |
|
./model/src/cg2d_sr.F |
109 |
CG2D_SR |
_RL rhsNorm |
|
./model/src/cg2d_sr.F |
136 |
CG2D_SR |
rhsNorm = 1. _d 0 |
|
./model/src/cg2d_sr.F |
137 |
CG2D_SR |
IF ( rhsMax .NE. 0. ) rhsNorm = 1. _d 0 / rhsMax |
|
./model/src/cg2d_sr.F |
142 |
CG2D_SR |
cg2d_b(i,j,bi,bj) = cg2d_b(i,j,bi,bj)*rhsNorm |
|
./model/src/cg2d_sr.F |
143 |
CG2D_SR |
cg2d_x(i,j,bi,bj) = cg2d_x(i,j,bi,bj)*rhsNorm |
|
./model/src/cg2d_sr.F |
442 |
CG2D_SR |
cg2d_x(i,j,bi,bj) = cg2d_x(i,j,bi,bj)/rhsNorm |
|
./model/src/cg3d.F |
108 |
CG3D |
_RL rhsNorm |
|
./model/src/cg3d.F |
152 |
CG3D |
rhsNorm = 1. _d 0 |
|
./model/src/cg3d.F |
153 |
CG3D |
IF ( rhsMax .NE. 0. ) rhsNorm = 1. _d 0 / rhsMax |
|
./model/src/cg3d.F |
159 |
CG3D |
cg3d_b(i,j,k,bi,bj) = cg3d_b(i,j,k,bi,bj)*rhsNorm |
|
./model/src/cg3d.F |
160 |
CG3D |
cg3d_x(i,j,k,bi,bj) = cg3d_x(i,j,k,bi,bj)*rhsNorm |
|
./model/src/cg3d.F |
528 |
CG3D |
cg3d_x(i,j,k,bi,bj) = cg3d_x(i,j,k,bi,bj)/rhsNorm |
|
./model/src/cg3d_ex0.F |
100 |
CG3D_EX0 |
_RL rhsNorm(nSx,nSy) |
|
./model/src/cg3d_ex0.F |
142 |
CG3D_EX0 |
rhsNorm(bi,bj) = 1. _d 0 |
|
./model/src/cg3d_ex0.F |
143 |
CG3D_EX0 |
IF ( rhsMaxLoc .NE. 0. ) rhsNorm(bi,bj) = 1. _d 0 / rhsMaxLoc |
|
./model/src/cg3d_ex0.F |
147 |
CG3D_EX0 |
cg3d_b(i,j,k,bi,bj) = cg3d_b(i,j,k,bi,bj)*rhsNorm(bi,bj) |
|
./model/src/cg3d_ex0.F |
148 |
CG3D_EX0 |
cg3d_x(i,j,k,bi,bj) = cg3d_x(i,j,k,bi,bj)*rhsNorm(bi,bj) |
|
./model/src/cg3d_ex0.F |
512 |
CG3D_EX0 |
cg3d_x(i,j,k,bi,bj) = cg3d_x(i,j,k,bi,bj)/rhsNorm(bi,bj) |