File |
Line number |
Procedure |
Code |
./pkg/gmredi/gmredi_calc_tensor.F |
303 |
GMREDI_CALC_TENSOR |
dSigmaDy(i,j) = 0. _d 0 |
./pkg/gmredi/gmredi_calc_tensor.F |
317 |
GMREDI_CALC_TENSOR |
dSigmaDy(i,j)=op25*( sigmaY(i,j+1,k-1)+sigmaY(i,j,k-1) |
./pkg/gmredi/gmredi_calc_tensor.F |
375 |
GMREDI_CALC_TENSOR |
& + dSigmaDy(i,j)*dSigmaDy(i,j) |
./pkg/gmredi/gmredi_calc_tensor.F |
427 |
GMREDI_CALC_TENSOR |
I dSigmaDx, dSigmaDy, |
./pkg/gmredi/gmredi_calc_tensor.F |
680 |
GMREDI_CALC_TENSOR |
dSigmaDy(i,j)=op25*( sigmaY(i-1,j+1,k)+sigmaY(i,j+1,k) |
./pkg/gmredi/gmredi_calc_tensor.F |
706 |
GMREDI_CALC_TENSOR |
I dSigmaDx, dSigmaDy, |
./pkg/gmredi/gmredi_calc_tensor.F |
79 |
GMREDI_CALC_TENSOR |
_RL dSigmaDy(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/gmredi/gmredi_calc_tensor.F |
898 |
GMREDI_CALC_TENSOR |
dSigmaDy(i,j)=sigmaY(i,j,k) |
./pkg/gmredi/gmredi_calc_tensor.F |
921 |
GMREDI_CALC_TENSOR |
I dSigmaDx, dSigmaDy, |
./pkg/gmredi/gmredi_k3d.F |
144 |
GMREDI_K3D |
_RL dSigmaDy(1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr) |
./pkg/gmredi/gmredi_k3d.F |
331 |
GMREDI_K3D |
dSigmaDy(i,j,k)=zeroRL |
./pkg/gmredi/gmredi_k3d.F |
476 |
GMREDI_K3D |
dSigmaDy(i,j,k) = op5*(sigmaY(i,j,k)+sigmaY(i,j+1,k)) |
./pkg/gmredi/gmredi_k3d.F |
493 |
GMREDI_K3D |
& +dSigmaDy(i,j,k)**2 ) |
./pkg/gmredi/gmredi_slope_limit.F |
167 |
GMREDI_SLOPE_LIMIT |
& + dSigmaDy(i,j)*dSigmaDy(i,j) |
./pkg/gmredi/gmredi_slope_limit.F |
17 |
GMREDI_SLOPE_LIMIT |
I dSigmaDx, dSigmaDy, |
./pkg/gmredi/gmredi_slope_limit.F |
205 |
GMREDI_SLOPE_LIMIT |
SlopeY(i,j)=-dSigmaDy(i,j)*dRdSigmaLtd(i,j) |
./pkg/gmredi/gmredi_slope_limit.F |
249 |
GMREDI_SLOPE_LIMIT |
& + dSigmaDy(i,j)*dSigmaDy(i,j) |
./pkg/gmredi/gmredi_slope_limit.F |
253 |
GMREDI_SLOPE_LIMIT |
SlopeY (i,j) = dSigmaDy(i,j)/locVar(i,j) |
./pkg/gmredi/gmredi_slope_limit.F |
406 |
GMREDI_SLOPE_LIMIT |
& + dSigmaDy(i,j)*dSigmaDy(i,j) |
./pkg/gmredi/gmredi_slope_limit.F |
414 |
GMREDI_SLOPE_LIMIT |
& +dSigmaDy(i,j)*dSigmaDy(i,j))*dRdSigmaLtd(i,j) |
./pkg/gmredi/gmredi_slope_limit.F |
417 |
GMREDI_SLOPE_LIMIT |
SlopeY(i,j)=-dSigmaDy(i,j) |
./pkg/gmredi/gmredi_slope_limit.F |
475 |
GMREDI_SLOPE_LIMIT |
IF ( dSigmaDy(i,j) .NE. 0. ) THEN |
./pkg/gmredi/gmredi_slope_limit.F |
476 |
GMREDI_SLOPE_LIMIT |
SlopeY(i,j) = SIGN( GM_bigSlope, dSigmaDy(i,j) ) |
./pkg/gmredi/gmredi_slope_limit.F |
483 |
GMREDI_SLOPE_LIMIT |
SlopeY(i,j)=-dSigmaDy(i,j)*dRdSigmaLtd(i,j) |
./pkg/gmredi/gmredi_slope_limit.F |
90 |
GMREDI_SLOPE_LIMIT |
_RL dSigmaDy (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |