Symbol Description Uses
d2 Temp. for hold difference 15



File Line number Procedure Code
./eesupp/src/different_multiple.F 40 NO PROCEDURE
      _RL  v1, v2, v3, v4, d1, d2, d3
./eesupp/src/different_multiple.F 59 NO PROCEDURE
          d2 = v2-v4
./eesupp/src/different_multiple.F 61 NO PROCEDURE
          IF ( ABS(d1) .LE. ABS(d2) .AND. ABS(d1) .LE. ABS(d3) )
./eesupp/src/diff_phase_multiple.F 41 NO PROCEDURE
      _RL  v1, v2, v3, v4, d1, d2, d3
./eesupp/src/diff_phase_multiple.F 60 NO PROCEDURE
          d2 = v2-v4
./eesupp/src/diff_phase_multiple.F 62 NO PROCEDURE
          IF ( ABS(d1) .LE. ABS(d2) .AND. ABS(d1) .LE. ABS(d3) )
./pkg/fizhi/fizhi_utils.F 222 QSAT
      _RL d0, d1, d2, d3, d4, d5, d6
./pkg/fizhi/fizhi_utils.F 279 QSAT
      parameter ( d2 = 0.129690326e-01 * esfac )
./pkg/fizhi/fizhi_utils.F 347 QSAT
       qx = d0+T*(d1+T*(d2+T*(d3+T*(d4+T*(d5+T*d6)))))
./pkg/fizhi/fizhi_turb.F 3737 TRBL20
      _RL b1,b2,d3,rf1,rf2,d3b2,d2,e5,d4,d1,d1half,d2half