File |
Line number |
Procedure |
Code |
./model/src/calc_3d_diffusivity.F |
265 |
CALC_3D_DIFFUSIVITY |
mixSurf = pCellMix_select/10 |
./model/src/calc_3d_diffusivity.F |
321 |
CALC_3D_DIFFUSIVITY |
IF ( mixSurf.GE.1 ) THEN |
./model/src/calc_3d_diffusivity.F |
332 |
CALC_3D_DIFFUSIVITY |
IF ( mixSurf.EQ.2 ) THEN |
./model/src/calc_3d_diffusivity.F |
338 |
CALC_3D_DIFFUSIVITY |
ELSEIF ( mixSurf.EQ.3 ) THEN |
./model/src/calc_3d_diffusivity.F |
344 |
CALC_3D_DIFFUSIVITY |
ELSEIF ( mixSurf.EQ.4 ) THEN |
./model/src/calc_3d_diffusivity.F |
352 |
CALC_3D_DIFFUSIVITY |
IF ( mixSurf.GE.1 ) THEN |
./model/src/calc_3d_diffusivity.F |
77 |
CALC_3D_DIFFUSIVITY |
INTEGER km, mixSurf, mixBott |
./model/src/calc_viscosity.F |
158 |
CALC_VISCOSITY |
mixSurf = pCellMix_select/10 |
./model/src/calc_viscosity.F |
257 |
CALC_VISCOSITY |
IF ( mixSurf.GE.1 ) THEN |
./model/src/calc_viscosity.F |
269 |
CALC_VISCOSITY |
IF ( mixSurf.EQ.2 ) THEN |
./model/src/calc_viscosity.F |
275 |
CALC_VISCOSITY |
ELSEIF ( mixSurf.EQ.3 ) THEN |
./model/src/calc_viscosity.F |
281 |
CALC_VISCOSITY |
ELSEIF ( mixSurf.EQ.4 ) THEN |
./model/src/calc_viscosity.F |
289 |
CALC_VISCOSITY |
IF ( mixSurf.GE.1 ) THEN |
./model/src/calc_viscosity.F |
301 |
CALC_VISCOSITY |
IF ( mixSurf.GE.1 ) THEN |
./model/src/calc_viscosity.F |
313 |
CALC_VISCOSITY |
IF ( mixSurf.EQ.2 ) THEN |
./model/src/calc_viscosity.F |
319 |
CALC_VISCOSITY |
ELSEIF ( mixSurf.EQ.3 ) THEN |
./model/src/calc_viscosity.F |
325 |
CALC_VISCOSITY |
ELSEIF ( mixSurf.EQ.4 ) THEN |
./model/src/calc_viscosity.F |
333 |
CALC_VISCOSITY |
IF ( mixSurf.GE.1 ) THEN |
./model/src/calc_viscosity.F |
50 |
CALC_VISCOSITY |
INTEGER km, mixSurf, mixBott |