Symbol Description Uses
usePP81 19



File Line number Procedure Code
./pkg/ptracers/ptracers_calc_diff.F 96 PTRACERS_CALC_DIFF
        IF (usePP81) THEN
./model/inc/PARAMS.h 811 NO PROCEDURE
      LOGICAL usePP81
./model/inc/PARAMS.h 845 NO PROCEDURE
     &        useOPPS, usePP81, useMY82, useGGL90, useKPP,
./model/src/do_the_model_io.F 117 DO_THE_MODEL_IO
      IF (usePP81 .AND. myIter.NE.nIter0 )
./model/src/packages_init_variables.F 121 PACKAGES_INIT_VARIABLES
      IF (usePP81) THEN
./model/src/packages_readparms.F 133 PACKAGES_READPARMS
      IF (usePP81) CALL PP81_READPARMS( myThid )
./model/src/calc_3d_diffusivity.F 168 CALC_3D_DIFFUSIVITY
      IF (usePP81) THEN
./model/src/thermodynamics.F 673 THERMODYNAMICS
        useVariableK = useKPP .OR. usePP81 .OR. useMY82 .OR. useGGL90
./model/src/packages_check.F 55 PACKAGES_CHECK
      IF (usePP81) CALL PP81_CHECK( myThid )
./model/src/packages_check.F 57 PACKAGES_CHECK
      IF (usePP81) CALL PACKAGES_CHECK_ERROR('PP81', myThid)
./model/src/packages_boot.F 49 PACKAGES_BOOT
     &          usePP81,
./model/src/packages_boot.F 96 PACKAGES_BOOT
      usePP81         =.FALSE.
./model/src/calc_viscosity.F 68 CALC_VISCOSITY
      IF (usePP81) CALL PP81_CALC_VISC(
./model/src/do_oceanic_phys.F 527 DO_OCEANIC_PHYS
        IF (usePP81) THEN
./model/src/calc_diffusivity.F 115 CALC_DIFFUSIVITY
      IF (usePP81) THEN
./pkg/ggl90/ggl90_check.F 55 GGL90_CHECK
      IF ( usePP81 ) THEN
./pkg/opps/opps_check.F 55 OPPS_CHECK
      IF ( usePP81 ) THEN
./pkg/timeave/timeave_statv_write.F 68 TIMEAVE_STATV_WRITE
        useVariableK = useKPP .OR. usePP81 .OR. useMY82 .OR. useGGL90
./pkg/my82/my82_check.F 55 MY82_CHECK
      IF ( usePP81 ) THEN