Symbol Description Uses
d0 60


File Line number Procedure Code
./pkg/fizhi/fizhi_utils.F 222 QSAT 
      _RL d0, d1, d2, d3, d4, d5, d6
./pkg/fizhi/fizhi_utils.F 277 QSAT 
      parameter ( d0 = 0.535098336e+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_dst3_adv_r.F 106 GAD_DST3_ADV_R 
         psiM=d0+d1*thetaM
./pkg/generic_advdiff/gad_dst3_adv_r.F 116 GAD_DST3_ADV_R 
     &       *( tracer(i,j, k ) + (d0*Rj+d1*Rjp) )
./pkg/generic_advdiff/gad_dst3_adv_r.F 118 GAD_DST3_ADV_R 
     &       *( tracer(i,j,km1) - (d0*Rj+d1*Rjm) )
./pkg/generic_advdiff/gad_dst3_adv_r.F 61 GAD_DST3_ADV_R 
      _RL Rjm,Rj,Rjp,cfl,d0,d1
./pkg/generic_advdiff/gad_dst3_adv_r.F 89 GAD_DST3_ADV_R 
        d0=(2.-cfl)*(1.-cfl)*oneSixth
./pkg/generic_advdiff/gad_dst3_adv_r.F 98 GAD_DST3_ADV_R 
         psiP=d0+d1*thetaP
./pkg/generic_advdiff/gad_dst3_adv_x.F 105 GAD_DST3_ADV_X 
         psiM=d0+d1*thetaM
./pkg/generic_advdiff/gad_dst3_adv_x.F 115 GAD_DST3_ADV_X 
     &      *( Tracer(i-1,j) + (d0*Rj+d1*Rjm) )
./pkg/generic_advdiff/gad_dst3_adv_x.F 117 GAD_DST3_ADV_X 
     &      *( Tracer( i ,j) - (d0*Rj+d1*Rjp) )
./pkg/generic_advdiff/gad_dst3_adv_x.F 61 GAD_DST3_ADV_X 
      _RL Rjm,Rj,Rjp,uCFL,d0,d1
./pkg/generic_advdiff/gad_dst3_adv_x.F 88 GAD_DST3_ADV_X 
        d0=(2.-uCFL)*(1.-uCFL)*oneSixth
./pkg/generic_advdiff/gad_dst3_adv_x.F 97 GAD_DST3_ADV_X 
         psiP=d0+d1*thetaP
./pkg/generic_advdiff/gad_dst3_adv_y.F 104 GAD_DST3_ADV_Y 
         psiM=d0+d1*thetaM
./pkg/generic_advdiff/gad_dst3_adv_y.F 114 GAD_DST3_ADV_Y 
     &      *( Tracer(i,j-1) + (d0*Rj+d1*Rjm) )
./pkg/generic_advdiff/gad_dst3_adv_y.F 116 GAD_DST3_ADV_Y 
     &      *( Tracer(i, j ) - (d0*Rj+d1*Rjp) )
./pkg/generic_advdiff/gad_dst3_adv_y.F 60 GAD_DST3_ADV_Y 
      _RL Rjm,Rj,Rjp,vCFL,d0,d1
./pkg/generic_advdiff/gad_dst3_adv_y.F 87 GAD_DST3_ADV_Y 
        d0=(2.-vCFL)*(1.-vCFL)*oneSixth
./pkg/generic_advdiff/gad_dst3_adv_y.F 96 GAD_DST3_ADV_Y 
         psiP=d0+d1*thetaP
./pkg/generic_advdiff/gad_dst3fl_adv_r.F 106 GAD_DST3FL_ADV_R 
        psiP=d0+d1*thetaP
./pkg/generic_advdiff/gad_dst3fl_adv_r.F 109 GAD_DST3FL_ADV_R 
        psiM=d0+d1*thetaM
./pkg/generic_advdiff/gad_dst3fl_adv_r.F 56 GAD_DST3FL_ADV_R 
      _RL Rjm,Rj,Rjp,wCFL,d0,d1
./pkg/generic_advdiff/gad_dst3fl_adv_r.F 82 GAD_DST3FL_ADV_R 
        d0=(2. _d 0 -wCFL)*(1. _d 0 -wCFL)*oneSixth
./pkg/generic_advdiff/gad_dst3fl_adv_x.F 37 GAD_DST3FL_ADV_X 
      _RL Rjm,Rj,Rjp,uCFL,d0,d1,psiP,psiM,thetaP,thetaM
./pkg/generic_advdiff/gad_dst3fl_adv_x.F 64 GAD_DST3FL_ADV_X 
        d0=(2. _d 0 -uCFL)*(1. _d 0 -uCFL)*oneSixth
./pkg/generic_advdiff/gad_dst3fl_adv_x.F 88 GAD_DST3FL_ADV_X 
        psiP=d0+d1*thetaP
./pkg/generic_advdiff/gad_dst3fl_adv_x.F 91 GAD_DST3FL_ADV_X 
        psiM=d0+d1*thetaM
./pkg/generic_advdiff/gad_dst3fl_adv_y.F 37 GAD_DST3FL_ADV_Y 
      _RL Rjm,Rj,Rjp,vCFL,d0,d1,psiP,psiM,thetaP,thetaM
./pkg/generic_advdiff/gad_dst3fl_adv_y.F 60 GAD_DST3FL_ADV_Y 
        d0=(2. _d 0 -vCFL)*(1. _d 0 -vCFL)*oneSixth
./pkg/generic_advdiff/gad_dst3fl_adv_y.F 84 GAD_DST3FL_ADV_Y 
        psiP=d0+d1*thetaP
./pkg/generic_advdiff/gad_dst3fl_adv_y.F 87 GAD_DST3FL_ADV_Y 
        psiM=d0+d1*thetaM
./pkg/openad/seawater.F 156 SW_ADTG 
      _RL a0,a1,a2,a3,b0,b1,c0,c1,c2,c3,d0,d1,e0,e1,e2
./pkg/openad/seawater.F 174 SW_ADTG 
      d0 = -1.1351 _d -10
./pkg/openad/seawater.F 183 SW_ADTG 
     &     + ( (c0 + (c1 + (c2 + c3*T)*T)*T) + (d0 + d1*T)*(S-sref) )*P
./pkg/streamice/streamice_adv_flux_fl_x.F 122 STREAMICE_ADV_FLUX_FL_X 
                d0 = (2.-cfl)*(1.-cfl)/6.0
./pkg/streamice/streamice_adv_flux_fl_x.F 124 STREAMICE_ADV_FLUX_FL_X 
                psi = d0+d1*Cr
./pkg/streamice/streamice_adv_flux_fl_x.F 175 STREAMICE_ADV_FLUX_FL_X 
                d0 = (2.-cfl)*(1.-cfl)/6.0
./pkg/streamice/streamice_adv_flux_fl_x.F 177 STREAMICE_ADV_FLUX_FL_X 
                psi = d0+d1*Cr
./pkg/streamice/streamice_adv_flux_fl_x.F 43 STREAMICE_ADV_FLUX_FL_X 
      _RL uface, phi, cfl, Cr, rdenom, d0, d1, psi
./pkg/streamice/streamice_adv_flux_fl_y.F 125 STREAMICE_ADV_FLUX_FL_Y 
                d0 = (2.-cfl)*(1.-cfl)/6.0
./pkg/streamice/streamice_adv_flux_fl_y.F 127 STREAMICE_ADV_FLUX_FL_Y 
                psi = d0+d1*Cr
./pkg/streamice/streamice_adv_flux_fl_y.F 177 STREAMICE_ADV_FLUX_FL_Y 
                d0 = (2.-cfl)*(1.-cfl)/6.0
./pkg/streamice/streamice_adv_flux_fl_y.F 179 STREAMICE_ADV_FLUX_FL_Y 
                psi = d0+d1*Cr
./pkg/streamice/streamice_adv_flux_fl_y.F 43 STREAMICE_ADV_FLUX_FL_Y 
      _RL vface, phi, cfl, Cr, rdenom, d0, d1, psi
./model/src/seawater.F 148 NO PROCEDURE 
      _RL a0,a1,a2,a3,b0,b1,c0,c1,c2,c3,d0,d1,e0,e1,e2
./model/src/seawater.F 166 NO PROCEDURE 
      d0 = -1.1351 _d -10
./model/src/seawater.F 175 NO PROCEDURE 
     &     + ( (c0 + (c1 + (c2 + c3*T)*T)*T) + (d0 + d1*T)*(S-sref) )*P
./pkg/atm2d/init_atm2d.F 161 INIT_ATM2D 
            IF (atm_oc_wgt(j).LT.1.d0) THEN
./pkg/cheapaml/cheapaml_gad_dst3fl_adv_r.F 54 CHEAPAML_GAD_DST3FL_ADV_R 
      _RL Rjm,Rj,Rjp,wCFL,d0,d1
./pkg/cheapaml/cheapaml_gad_dst3fl_adv_r.F 71 CHEAPAML_GAD_DST3FL_ADV_R 
        d0=(2. _d 0 -wCFL)*(1. _d 0 -wCFL)*oneSixth
./pkg/cheapaml/cheapaml_gad_dst3fl_adv_r.F 78 CHEAPAML_GAD_DST3FL_ADV_R 
        psiP=d0+d1*thetaP
./pkg/cheapaml/cheapaml_gad_dst3fl_adv_r.F 81 CHEAPAML_GAD_DST3FL_ADV_R 
        psiM=d0+d1*thetaM
./lsopt/cubic.F 40 CUBIC 
         if (z1.ge.0.d0 .and. discri.ge.0.d0) then
./lsopt/cubic.F 42 CUBIC 
         else if (z1.le.0.d0 .and. discri.le.0.d0) then
./pkg/dic/car_flux_omega_top.F 107 CAR_FLUX_OMEGA_TOP 
                if (ko.eq.Nr.or.hFacC(i,j,ko+1,bi,bj).eq.0.d0) then
./pkg/dic/car_flux_omega_top.F 143 CAR_FLUX_OMEGA_TOP 
                 if (ko.eq.Nr.or.hFacC(i,j,ko+1,bi,bj).eq.0.d0)