Symbol Description Uses
d2 Temp. for hold difference 41



File Line number Procedure Code
./pkg/fizhi/fizhi_turb.F 3739 TRBL20
      _RL b1,b2,d3,rf1,rf2,d3b2,d2,e5,d4,d1,d1half,d2half
./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/generic_advdiff/gad_os7mp_adv_r.F 172 GAD_OS7MP_ADV_R
         d2   = Del2 !( ( Qip + Qim ) - 2.*Qi  ) * MskI * MskIm
./pkg/generic_advdiff/gad_os7mp_adv_r.F 175 GAD_OS7MP_ADV_R
         A = 4. _d 0*d2 - d2p1
./pkg/generic_advdiff/gad_os7mp_adv_r.F 176 GAD_OS7MP_ADV_R
         B = 4. _d 0*d2p1 - d2
./pkg/generic_advdiff/gad_os7mp_adv_r.F 177 GAD_OS7MP_ADV_R
         C = d2
./pkg/generic_advdiff/gad_os7mp_adv_r.F 180 GAD_OS7MP_ADV_R
         A = 4. _d 0*d2m1 - d2
./pkg/generic_advdiff/gad_os7mp_adv_r.F 181 GAD_OS7MP_ADV_R
         B = 4. _d 0*d2 - d2m1
./pkg/generic_advdiff/gad_os7mp_adv_r.F 183 GAD_OS7MP_ADV_R
         D = d2
./pkg/generic_advdiff/gad_os7mp_adv_r.F 40 GAD_OS7MP_ADV_R
      _RL d2,d2p1,d2m1,A,B,C,D
./pkg/generic_advdiff/gad_os7mp_adv_x.F 176 GAD_OS7MP_ADV_X
         d2   = Del2 !( ( Qip + Qim ) - 2.*Qi  ) * MskI * MskIm
./pkg/generic_advdiff/gad_os7mp_adv_x.F 179 GAD_OS7MP_ADV_X
         A = 4. _d 0*d2 - d2p1
./pkg/generic_advdiff/gad_os7mp_adv_x.F 180 GAD_OS7MP_ADV_X
         B = 4. _d 0*d2p1 - d2
./pkg/generic_advdiff/gad_os7mp_adv_x.F 181 GAD_OS7MP_ADV_X
         C = d2
./pkg/generic_advdiff/gad_os7mp_adv_x.F 184 GAD_OS7MP_ADV_X
         A = 4. _d 0*d2m1 - d2
./pkg/generic_advdiff/gad_os7mp_adv_x.F 185 GAD_OS7MP_ADV_X
         B = 4. _d 0*d2 - d2m1
./pkg/generic_advdiff/gad_os7mp_adv_x.F 187 GAD_OS7MP_ADV_X
         D = d2
./pkg/generic_advdiff/gad_os7mp_adv_x.F 42 GAD_OS7MP_ADV_X
      _RL d2,d2p1,d2m1,A,B,C,D
./pkg/generic_advdiff/gad_os7mp_adv_y.F 176 GAD_OS7MP_ADV_Y
         d2   = Del2 !( ( Qip + Qim ) - 2.*Qi  ) * MskI * MskIm
./pkg/generic_advdiff/gad_os7mp_adv_y.F 179 GAD_OS7MP_ADV_Y
         A = 4. _d 0*d2 - d2p1
./pkg/generic_advdiff/gad_os7mp_adv_y.F 180 GAD_OS7MP_ADV_Y
         B = 4. _d 0*d2p1 - d2
./pkg/generic_advdiff/gad_os7mp_adv_y.F 181 GAD_OS7MP_ADV_Y
         C = d2
./pkg/generic_advdiff/gad_os7mp_adv_y.F 184 GAD_OS7MP_ADV_Y
         A = 4. _d 0*d2m1 - d2
./pkg/generic_advdiff/gad_os7mp_adv_y.F 185 GAD_OS7MP_ADV_Y
         B = 4. _d 0*d2 - d2m1
./pkg/generic_advdiff/gad_os7mp_adv_y.F 187 GAD_OS7MP_ADV_Y
         D = d2
./pkg/generic_advdiff/gad_os7mp_adv_y.F 42 GAD_OS7MP_ADV_Y
      _RL d2,d2p1,d2m1,A,B,C,D
./model/src/convective_weights.F 55 CONVECTIVE_WEIGHTS
      _RL dS,d1,d2
./model/src/convective_weights.F 66 CONVECTIVE_WEIGHTS
          d2 = _hFacC(i,j, k ,bi,bj)*drF( k )
./model/src/convective_weights.F 67 CONVECTIVE_WEIGHTS
          dS = d1+d2
./model/src/convective_weights.F 68 CONVECTIVE_WEIGHTS
          weightA(i,j) = d2/dS
./pkg/openad/ad_s_different_multiple.F 40 OAD_S_DIFFERENT_MULTIPLE
      _RL  v1, v2, v3, v4, d1, d2, d3
./pkg/openad/ad_s_different_multiple.F 59 OAD_S_DIFFERENT_MULTIPLE
          d2 = v2-v4
./pkg/openad/ad_s_different_multiple.F 61 OAD_S_DIFFERENT_MULTIPLE
          IF ( ABS(d1) .LT. 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 63 NO PROCEDURE
          d2 = v2-v4
./eesupp/src/diff_phase_multiple.F 65 NO PROCEDURE
          IF ( ABS(d1) .LT. ABS(d2) .AND. ABS(d1) .LE. ABS(d3) )
./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) .LT. ABS(d2) .AND. ABS(d1) .LE. ABS(d3) )