| File |
Line number |
Procedure |
Code |
|
./pkg/gmredi/gmredi_calc_eigs.F |
13 |
GMREDI_CALC_EIGS |
O Rmid, vec) |
|
./pkg/gmredi/gmredi_calc_eigs.F |
239 |
GMREDI_CALC_EIGS |
Rmid(i,j) = 1.0/(SQRT(ABS(val(i,j)))+small) |
|
./pkg/gmredi/gmredi_calc_eigs.F |
241 |
GMREDI_CALC_EIGS |
Rmid(i,j) = zeroRL |
|
./pkg/gmredi/gmredi_calc_eigs.F |
295 |
GMREDI_CALC_EIGS |
Rmid(i,j) = c1(i,j)/ABS(fCori(i,j,bi,bj)) |
|
./pkg/gmredi/gmredi_calc_eigs.F |
46 |
GMREDI_CALC_EIGS |
_RL Rmid(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
|
./pkg/gmredi/gmredi_k3d.F |
137 |
GMREDI_K3D |
_RL Rmid(1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
|
./pkg/gmredi/gmredi_k3d.F |
460 |
GMREDI_K3D |
O Rmid, modesC(:,:,:,:,bi,bj)) |
|
./pkg/gmredi/gmredi_k3d.F |
466 |
GMREDI_K3D |
Rdef(i,j,bi,bj) = MIN(Rmid(i,j),Req) |