| File |
Line number |
Procedure |
Code |
|
./model/inc/PARAMS.h |
1013 |
NO PROCEDURE |
LOGICAL usePP81 |
|
./model/inc/PARAMS.h |
1061 |
NO PROCEDURE |
& useOPPS, usePP81, useKL10, useMY82, useGGL90, useKPP, |
|
./pkg/ggl90/ggl90_check.F |
75 |
GGL90_CHECK |
IF ( usePP81 ) THEN |
|
./model/src/calc_3d_diffusivity.F |
208 |
CALC_3D_DIFFUSIVITY |
IF (usePP81) THEN |
|
./model/src/calc_viscosity.F |
112 |
CALC_VISCOSITY |
& ( usePP81 .OR. useKL10 .OR. useMY82 .OR. useGGL90 ) |
|
./model/src/calc_viscosity.F |
76 |
CALC_VISCOSITY |
IF ( usePP81 .AND. k.LE.Nr ) THEN |
|
./pkg/my82/my82_check.F |
55 |
MY82_CHECK |
IF ( usePP81 ) THEN |
|
./pkg/opps/opps_check.F |
55 |
OPPS_CHECK |
IF ( usePP81 ) THEN |
|
./model/src/do_oceanic_phys.F |
1015 |
DO_OCEANIC_PHYS |
IF (usePP81) THEN |
|
./model/src/do_oceanic_phys.F |
852 |
DO_OCEANIC_PHYS |
& .OR. usePP81 .OR. useKL10 |
|
./pkg/pp81/pp81_readparms.F |
52 |
PP81_READPARMS |
IF ( .NOT.usePP81 ) THEN |
|
./model/src/do_the_model_io.F |
172 |
DO_THE_MODEL_IO |
IF ( usePP81 ) |
|
./pkg/timeave/timeave_statv_write.F |
72 |
TIMEAVE_STATV_WRITE |
useVariableK = useKPP .OR. usePP81 .OR. useMY82 .OR. useGGL90 |
|
./model/src/packages_boot.F |
118 |
PACKAGES_BOOT |
usePP81 =.FALSE. |
|
./model/src/packages_boot.F |
270 |
PACKAGES_BOOT |
CALL PACKAGES_PRINT_MSG( usePP81, 'PP81', ' ' ) |
|
./model/src/packages_boot.F |
54 |
PACKAGES_BOOT |
& usePP81, |
|
./model/src/packages_check.F |
225 |
PACKAGES_CHECK |
IF (usePP81) CALL PP81_CHECK( myThid ) |
|
./model/src/packages_check.F |
227 |
PACKAGES_CHECK |
IF (usePP81) CALL PACKAGES_ERROR_MSG('PP81',' ',myThid) |
|
./model/src/packages_init_fixed.F |
263 |
PACKAGES_INIT_FIXED |
IF ( usePP81 ) THEN |
|
./model/src/packages_init_variables.F |
177 |
PACKAGES_INIT_VARIABLES |
IF (usePP81) THEN |
|
./model/src/temp_integrate.F |
516 |
TEMP_INTEGRATE |
useVariableK = useKPP .OR. usePP81 .OR. useKL10 .OR. useMY82 |