Symbol Description Uses
D2 10



File Line number Procedure Code
./pkg/fizhi/fizhi_turb.F 4297 TRBL20
      PARAMETER ( D2      = RF1       )
./pkg/fizhi/fizhi_turb.F 4302 TRBL20
      PARAMETER ( D2HALF = 0.5 * D2 )
./pkg/opps/opps_calc.F 176 OPPS_CALC
        D2=state1( tracerEnv(k2+1,2), tracerEnv(k2+1,1),
./pkg/opps/opps_calc.F 178 OPPS_CALC
        De(k2+1)=D2
./pkg/opps/opps_calc.F 187 OPPS_CALC
        IF (D2-D1 .LT. STABILITY_THRESHOLD.or.k2.ne.k) THEN
./pkg/opps/opps_calc.F 730 NLOPPS
      REAL D1,D2,state1,Density
./pkg/opps/opps_calc.F 867 NLOPPS
            D2=state1(stemp(k2+1),ttemp(k2+1),k2+1)
./pkg/opps/opps_calc.F 868 NLOPPS
            De(k2+1)=D2
./pkg/opps/opps_calc.F 874 NLOPPS
            IF (D2-D1 .LT. STABILITY_THRESHOLD.or.k2.ne.k) THEN
./pkg/opps/opps_calc.F 96 OPPS_CALC
      _RL D1,D2,state1