Symbol Description Uses
delta 39


File Line number Procedure Code
./pkg/kpp/kpp_routines.F 1520 ENHANCE 
      _RL delta
./pkg/kpp/kpp_routines.F 1527 ENHANCE 
            delta = (hbl(i) + zgrid(ki)) / (zgrid(ki) - zgrid(ki+1))
./pkg/kpp/kpp_routines.F 1531 ENHANCE 
               dstar         = (1.- delta)**2 * dkm1(i,md)
./pkg/kpp/kpp_routines.F 1532 ENHANCE 
     &                       + delta**2 * dkmp5
./pkg/kpp/kpp_routines.F 1533 ENHANCE 
               blmc(i,ki,md) = (1.- delta)*diffus(i,ki,md)
./pkg/kpp/kpp_routines.F 1534 ENHANCE 
     &                       + delta*dstar
./model/src/cg2d_sr.F 106 CG2D_SR 
      _RL    delta,  deltaTile(nSx,nSy)
./model/src/cg2d_sr.F 355 CG2D_SR 
       delta   = sumPhi(2,1,1)
./model/src/cg2d_sr.F 384 CG2D_SR 
       alpha = delta - (cgBeta*cgBeta)*alpha
./pkg/streamice/adstreamice_invert_surf_forthick.F 24 ADSTRMICE_H_INV 
      _RL rhoi, rhow, r, i_r, delta
./pkg/streamice/adstreamice_invert_surf_forthick.F 58 ADSTRMICE_H_INV 
     I            delta,
./pkg/streamice/adstreamice_invert_surf_forthick.F 65 ADSTRMICE_H_INV 
      delta=1-r
./pkg/streamice/adstreamice_invert_surf_forthick.F 76 ADSTRMICE_H_INV 
     &             delta,
./pkg/streamice/adstreamice_invert_surf_forthick.F 78 ADSTRMICE_H_INV 
     &             delta*hf,
./pkg/streamice/adstreamice_invert_surf_forthick.F 83 ADSTRMICE_H_INV 
     &          i_r * (fp-delta)/fp *
./pkg/streamice/streamice_invert_surf_forthick.F 11 STREAMICE_INVERT_SURF_FORTHICK 
     I            delta,
./pkg/streamice/streamice_invert_surf_forthick.F 44 STREAMICE_INVERT_SURF_FORTHICK 
     &           (1. _d 0 - delta)
./pkg/streamice/streamice_invert_surf_forthick.F 46 STREAMICE_INVERT_SURF_FORTHICK 
             IF (S(i,j,bi,bj) .gt. delta*HF) THEN
./pkg/streamice/streamice_invert_surf_forthick.F 49 STREAMICE_INVERT_SURF_FORTHICK 
              htmp = S(i,j,bi,bj)/delta
./pkg/streamice/streamice_invert_surf_forthick.F 61 STREAMICE_INVERT_SURF_FORTHICK 
     &           (1. _d 0 - delta)
./pkg/streamice/streamice_invert_surf_forthick.F 63 STREAMICE_INVERT_SURF_FORTHICK 
                IF (S(i,j,bi,bj) .gt. delta*HF) THEN
./pkg/streamice/streamice_invert_surf_forthick.F 66 STREAMICE_INVERT_SURF_FORTHICK 
                 htmp = S(i,j,bi,bj)/delta
./pkg/streamice/streamice_invert_surf_forthick.F 71 STREAMICE_INVERT_SURF_FORTHICK 
     &             delta,
./pkg/streamice/streamice_invert_surf_forthick.F 73 STREAMICE_INVERT_SURF_FORTHICK 
     &             delta*HF,
./pkg/streamice/streamice_invert_surf_forthick.F 78 STREAMICE_INVERT_SURF_FORTHICK 
     &             delta,
./pkg/streamice/streamice_invert_surf_forthick.F 80 STREAMICE_INVERT_SURF_FORTHICK 
     &             delta*HF,
./pkg/streamice/streamice_upd_ffrac_uncoupled.F 31 STREAMICE_UPD_FFRAC_UNCOUPLED 
      _RL OD, rhoi, rhow, delta, r, h, hf, i_r
./pkg/streamice/streamice_upd_ffrac_uncoupled.F 43 STREAMICE_UPD_FFRAC_UNCOUPLED 
      delta=1-r
./pkg/streamice/streamice_upd_ffrac_uncoupled.F 67 STREAMICE_UPD_FFRAC_UNCOUPLED 
     &       delta,
./pkg/streamice/streamice_upd_ffrac_uncoupled.F 69 STREAMICE_UPD_FFRAC_UNCOUPLED 
     &       delta*hf,
./pkg/dic/carbon_chem.F 569 CARBON_COEFFS 
        _RL  delta
./pkg/dic/carbon_chem.F 612 CARBON_COEFFS 
           delta = (57.7 _d 0 - 0.118 _d 0*tk)
./pkg/dic/carbon_chem.F 615 CARBON_COEFFS 
           fugf(i,j,bi,bj) = exp( (B+2. _d 0*delta) * P1atm / RT)
./pkg/dic/insol.F 41 INSOL 
       _RL  dayfrac, yday, delta
./pkg/dic/insol.F 59 INSOL 
        delta = (0.006918 _d 0
./pkg/dic/insol.F 73 INSOL 
          sun1 = -sin(delta)/cos(delta) * sin(lat)/cos(lat)
./pkg/dic/insol.F 77 INSOL 
          cosz = ( sin(delta)*sin(lat)+              !average zenith angle
./pkg/dic/insol.F 78 INSOL 
     &            (cos(delta)*cos(lat)*sin(dayhrs)/dayhrs) )