Symbol Description Uses
D2 10



File Line number Procedure Code
./pkg/fizhi/fizhi_turb.F 3747 TRBL20
      PARAMETER ( D2      = RF1       )
./pkg/fizhi/fizhi_turb.F 3752 TRBL20
      PARAMETER ( D2HALF = 0.5 * D2 )
./pkg/opps/opps_calc.F 102 OPPS_CALC
      _RL D1, D2
./pkg/opps/opps_calc.F 178 OPPS_CALC
        D2=STATE1( tracerEnv(k2+1,2), tracerEnv(k2+1,1),
./pkg/opps/opps_calc.F 180 OPPS_CALC
        De(k2+1)=D2
./pkg/opps/opps_calc.F 189 OPPS_CALC
        IF (D2-D1 .LT. STABILITY_THRESHOLD.or.k2.ne.k) THEN
./pkg/opps/opps_calc.F 574 NLOPPS
      REAL D1,D2,state1,Density
./pkg/opps/opps_calc.F 703 NLOPPS
            D2=state1(stemp(k2+1),ttemp(k2+1),k2+1)
./pkg/opps/opps_calc.F 704 NLOPPS
            De(k2+1)=D2
./pkg/opps/opps_calc.F 710 NLOPPS
            IF (D2-D1 .LT. STABILITY_THRESHOLD.or.k2.ne.k) THEN