| File |
Line number |
Procedure |
Code |
|
./pkg/gmredi/gmredi_calc_tensor.F |
300 |
GMREDI_CALC_TENSOR |
dSigmaDx(i,j) = 0. _d 0 |
|
./pkg/gmredi/gmredi_calc_tensor.F |
312 |
GMREDI_CALC_TENSOR |
dSigmaDx(i,j)=op25*( sigmaX(i+1,j,k-1)+sigmaX(i,j,k-1) |
|
./pkg/gmredi/gmredi_calc_tensor.F |
372 |
GMREDI_CALC_TENSOR |
dSigmaH = dSigmaDx(i,j)*dSigmaDx(i,j) |
|
./pkg/gmredi/gmredi_calc_tensor.F |
424 |
GMREDI_CALC_TENSOR |
I dSigmaDx, dSigmaDy, |
|
./pkg/gmredi/gmredi_calc_tensor.F |
662 |
GMREDI_CALC_TENSOR |
dSigmaDx(i,j)=sigmaX(i,j,k) |
|
./pkg/gmredi/gmredi_calc_tensor.F |
690 |
GMREDI_CALC_TENSOR |
I dSigmaDx, dSigmaDy, |
|
./pkg/gmredi/gmredi_calc_tensor.F |
75 |
GMREDI_CALC_TENSOR |
_RL dSigmaDx(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/gmredi/gmredi_calc_tensor.F |
862 |
GMREDI_CALC_TENSOR |
dSigmaDx(i,j)=op25*( sigmaX(i, j ,k) +sigmaX(i+1, j ,k) |
|
./pkg/gmredi/gmredi_calc_tensor.F |
888 |
GMREDI_CALC_TENSOR |
I dSigmaDx, dSigmaDy, |
|
./pkg/gmredi/gmredi_k3d.F |
142 |
GMREDI_K3D |
_RL dSigmaDx(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr) |
|
./pkg/gmredi/gmredi_k3d.F |
347 |
GMREDI_K3D |
dSigmaDx(i,j,k)=zeroRL |
|
./pkg/gmredi/gmredi_k3d.F |
462 |
GMREDI_K3D |
dSigmaDx(i,j,k) = op5*(sigmaX(i,j,k)+sigmaX(i+1,j,k)) |
|
./pkg/gmredi/gmredi_k3d.F |
475 |
GMREDI_K3D |
M4loc(i,j,k) = g_reciprho_sq*( dSigmaDx(i,j,k)**2 |
|
./pkg/gmredi/gmredi_slope_limit.F |
14 |
GMREDI_SLOPE_LIMIT |
I dSigmaDx, dSigmaDy, |
|
./pkg/gmredi/gmredi_slope_limit.F |
164 |
GMREDI_SLOPE_LIMIT |
tmpFld(i,j) = dSigmaDx(i,j)*dSigmaDx(i,j) |
|
./pkg/gmredi/gmredi_slope_limit.F |
202 |
GMREDI_SLOPE_LIMIT |
SlopeX(i,j)=-dSigmaDx(i,j)*dRdSigmaLtd(i,j) |
|
./pkg/gmredi/gmredi_slope_limit.F |
246 |
GMREDI_SLOPE_LIMIT |
tmpFld(i,j) = dSigmaDx(i,j)*dSigmaDx(i,j) |
|
./pkg/gmredi/gmredi_slope_limit.F |
250 |
GMREDI_SLOPE_LIMIT |
SlopeX (i,j) = dSigmaDx(i,j)/locVar(i,j) |
|
./pkg/gmredi/gmredi_slope_limit.F |
403 |
GMREDI_SLOPE_LIMIT |
& dSigmaDx(i,j)*dSigmaDx(i,j) |
|
./pkg/gmredi/gmredi_slope_limit.F |
411 |
GMREDI_SLOPE_LIMIT |
SlopeSqr(i,j)=(dSigmaDx(i,j)*dSigmaDx(i,j) |
|
./pkg/gmredi/gmredi_slope_limit.F |
413 |
GMREDI_SLOPE_LIMIT |
SlopeX(i,j)=-dSigmaDx(i,j) |
|
./pkg/gmredi/gmredi_slope_limit.F |
468 |
GMREDI_SLOPE_LIMIT |
IF ( dSigmaDx(i,j) .NE. 0. ) THEN |
|
./pkg/gmredi/gmredi_slope_limit.F |
469 |
GMREDI_SLOPE_LIMIT |
SlopeX(i,j) = SIGN( GM_bigSlope, dSigmaDx(i,j) ) |
|
./pkg/gmredi/gmredi_slope_limit.F |
480 |
GMREDI_SLOPE_LIMIT |
SlopeX(i,j)=-dSigmaDx(i,j)*dRdSigmaLtd(i,j) |
|
./pkg/gmredi/gmredi_slope_limit.F |
86 |
GMREDI_SLOPE_LIMIT |
_RL dSigmaDx (1-Olx:sNx+Olx,1-Oly:sNy+Oly) |