Symbol Description Uses
usePP81 19


File Line number Procedure Code
./pkg/opps/opps_check.F 55 OPPS_CHECK 
      IF ( usePP81 ) THEN
./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)
./pkg/my82/my82_check.F 55 MY82_CHECK 
      IF ( usePP81 ) THEN
./model/src/do_oceanic_phys.F 434 DO_OCEANIC_PHYS 
        IF (usePP81) THEN
./model/src/packages_init_variables.F 121 PACKAGES_INIT_VARIABLES 
      IF (usePP81) THEN
./pkg/timeave/timeave_statv_write.F 80 TIMEAVE_STATV_WRITE 
        useVariableK = useKPP .OR. usePP81 .OR. useMY82 .OR. useGGL90
./model/src/packages_boot.F 48 PACKAGES_BOOT 
     &          usePP81,
./model/src/packages_boot.F 89 PACKAGES_BOOT 
      usePP81=.FALSE.
./model/src/do_the_model_io.F 114 DO_THE_MODEL_IO 
      IF (usePP81 .AND. myIter.NE.nIter0 )
./model/src/packages_readparms.F 131 PACKAGES_READPARMS 
      IF (usePP81) CALL PP81_READPARMS( myThid )
./model/src/thermodynamics.F 569 THERMODYNAMICS 
        useVariableK = useKPP .OR. usePP81 .OR. useMY82 .OR. useGGL90
./model/src/calc_3d_diffusivity.F 166 CALC_3D_DIFFUSIVITY 
      IF (usePP81) THEN
./model/inc/PARAMS.h 753 NO PROCEDURE 
      LOGICAL usePP81
./model/inc/PARAMS.h 785 NO PROCEDURE 
     &        usePP81, useMY82, useOPPS, useGGL90, useMATRIX,
./pkg/ptracers/ptracers_calc_diff.F 96 PTRACERS_CALC_DIFF 
        IF (usePP81) THEN
./pkg/ggl90/ggl90_check.F 55 GGL90_CHECK 
      IF ( usePP81 ) THEN
./model/src/calc_diffusivity.F 115 CALC_DIFFUSIVITY 
      IF (usePP81) THEN
./model/src/calc_viscosity.F 68 CALC_VISCOSITY 
      IF (usePP81) CALL PP81_CALC_VISC(