| File |
Line number |
Procedure |
Code |
|
./pkg/gmredi/gmredi_k3d.F |
443 |
GMREDI_K3D |
mskp1 = oneRL |
|
./pkg/gmredi/gmredi_k3d.F |
444 |
GMREDI_K3D |
IF ( k.EQ.Nr ) mskp1 = zeroRL |
|
./pkg/gmredi/gmredi_k3d.F |
448 |
GMREDI_K3D |
& *op5*(N(i,j,k)+mskp1*N(i,j,kp1)) |
|
./pkg/gmredi/gmredi_k3d.F |
487 |
GMREDI_K3D |
mskp1 = oneRL |
|
./pkg/gmredi/gmredi_k3d.F |
488 |
GMREDI_K3D |
IF ( k.EQ.Nr ) mskp1 = zeroRL |
|
./pkg/gmredi/gmredi_k3d.F |
494 |
GMREDI_K3D |
N2loc(i,j,k) = op5*(N2(i,j,k)+mskp1*N2(i,j,kp1)) |
|
./pkg/gmredi/gmredi_k3d.F |
88 |
GMREDI_K3D |
_RL hsurf, mskp1 |
|
./pkg/monitor/mon_ke.F |
115 |
MON_KE |
& +wVel(i,j,kp1,bi,bj)*wVel(i,j,kp1,bi,bj)*mskp1 |
|
./pkg/monitor/mon_ke.F |
36 |
MON_KE |
_RL numPnts,theVol,tmpVal, mskp1, msk_1 |
|
./pkg/monitor/mon_ke.F |
72 |
MON_KE |
mskp1 = 1. |
|
./pkg/monitor/mon_ke.F |
73 |
MON_KE |
IF ( k.GE.Nr ) mskp1 = 0. |