Symbol Description Uses
smallNo 33


File Line number Procedure Code
./pkg/generic_advdiff/gad_dst3_adv_r.F 103 GAD_DST3_ADV_R 
         thetaM=(Rjp+smallNo)/(smallNo+Rj)
./pkg/generic_advdiff/gad_dst3_adv_r.F 62 GAD_DST3_ADV_R 
      _RL smallNo
./pkg/generic_advdiff/gad_dst3_adv_r.F 65 GAD_DST3_ADV_R 
       smallNo = 1.0D-20
./pkg/generic_advdiff/gad_dst3_adv_r.F 67 GAD_DST3_ADV_R 
       smallNo = 1.0D-20
./pkg/generic_advdiff/gad_dst3_adv_r.F 90 GAD_DST3_ADV_R 
        IF ( ABS(Rj).LT.smallNo .OR.
./pkg/generic_advdiff/gad_dst3_adv_r.F 91 GAD_DST3_ADV_R 
     &       ABS(Rjm).LT.smallNo ) THEN
./pkg/generic_advdiff/gad_dst3_adv_r.F 95 GAD_DST3_ADV_R 
         thetaP=(Rjm+smallNo)/(smallNo+Rj)
./pkg/generic_advdiff/gad_dst3_adv_r.F 98 GAD_DST3_ADV_R 
        IF ( ABS(Rj).LT.smallNo .OR.
./pkg/generic_advdiff/gad_dst3_adv_r.F 99 GAD_DST3_ADV_R 
     &       ABS(Rjp).LT.smallNo ) THEN
./pkg/generic_advdiff/gad_dst3_adv_x.F 102 GAD_DST3_ADV_X 
         thetaM=(Rjp+smallNo)/(smallNo+Rj)
./pkg/generic_advdiff/gad_dst3_adv_x.F 62 GAD_DST3_ADV_X 
      _RL smallNo
./pkg/generic_advdiff/gad_dst3_adv_x.F 66 GAD_DST3_ADV_X 
       smallNo = 1.0D-20
./pkg/generic_advdiff/gad_dst3_adv_x.F 68 GAD_DST3_ADV_X 
       smallNo = 1.0D-20
./pkg/generic_advdiff/gad_dst3_adv_x.F 89 GAD_DST3_ADV_X 
        IF ( ABS(Rj).LT.smallNo .OR.
./pkg/generic_advdiff/gad_dst3_adv_x.F 90 GAD_DST3_ADV_X 
     &       ABS(Rjm).LT.smallNo ) THEN
./pkg/generic_advdiff/gad_dst3_adv_x.F 94 GAD_DST3_ADV_X 
         thetaP=(Rjm+smallNo)/(smallNo+Rj)
./pkg/generic_advdiff/gad_dst3_adv_x.F 97 GAD_DST3_ADV_X 
        IF ( ABS(Rj).LT.smallNo .OR.
./pkg/generic_advdiff/gad_dst3_adv_x.F 98 GAD_DST3_ADV_X 
     &       ABS(Rjp).LT.smallNo ) THEN
./pkg/generic_advdiff/gad_dst3_adv_y.F 101 GAD_DST3_ADV_Y 
         thetaM=(Rjp+smallNo)/(smallNo+Rj)
./pkg/generic_advdiff/gad_dst3_adv_y.F 61 GAD_DST3_ADV_Y 
      _RL smallNo
./pkg/generic_advdiff/gad_dst3_adv_y.F 65 GAD_DST3_ADV_Y 
       smallNo = 1.0D-20
./pkg/generic_advdiff/gad_dst3_adv_y.F 67 GAD_DST3_ADV_Y 
       smallNo = 1.0D-20
./pkg/generic_advdiff/gad_dst3_adv_y.F 88 GAD_DST3_ADV_Y 
        IF ( ABS(Rj).LT.smallNo .OR.
./pkg/generic_advdiff/gad_dst3_adv_y.F 89 GAD_DST3_ADV_Y 
     &       ABS(Rjm).LT.smallNo ) THEN
./pkg/generic_advdiff/gad_dst3_adv_y.F 93 GAD_DST3_ADV_Y 
         thetaP=(Rjm+smallNo)/(smallNo+Rj)
./pkg/generic_advdiff/gad_dst3_adv_y.F 96 GAD_DST3_ADV_Y 
        IF ( ABS(Rj).LT.smallNo .OR.
./pkg/generic_advdiff/gad_dst3_adv_y.F 97 GAD_DST3_ADV_Y 
     &       ABS(Rjp).LT.smallNo ) THEN