Symbol Description Uses
log 62



File Line number Procedure Code
./pkg/fizhi/fizhi_init_vars.F 146 FIZHI_INIT_VARS
     &             log((pephy(i,j,1,bi,bj)-pephy(i,j,L+1,bi,bj))*10.)
./pkg/fizhi/fizhi_utils.F 876 CHPPRM
      dum1   = log (vroot / (1. - vroot))
./pkg/fizhi/fizhi_utils.F 888 CHPPRM
      ufac(i) = log( (vgz2(ityp(i)) - d) / zoch(i) )
./pkg/fizhi/fizhi_utils.F 889 CHPPRM
     *        / log(  pblzet             / zoch(i) )
./pkg/fizhi/fizhi_utils.F 894 CHPPRM
      cdrc(i) = vkrm/log(cdsc(i))
./pkg/ggl90/ggl90_idemix.F 149 GGL90_IDEMIX
          fxc = log( fxc + sqrt( fxc*fxc -1.))
./pkg/seaice/seaice_growth.F 1100 SEAICE_GROWTH
     &         latMeltRate(i,j,it) = 1.6 _d -6 * exp(1.36*log(tmpscal1))
./pkg/seaice/seaice_itd_pickup.F 143 SEAICE_ITD_PICKUP
             LND_mu = log(HEFF(i,j,bi,bj)/AREA(i,j,bi,bj))
./pkg/seaice/seaice_itd_pickup.F 152 SEAICE_ITD_PICKUP
              LND_tmp = log(LND_x(LND_i))-LND_mu
./verification/fizhi-gridalt-hs/code/do_fizhi.F 185 DO_FIZHI
         term2=10. _d 0*log(termP/atm_po)
./verification/fizhi-gridalt-hs/code/fizhi_init_vars.F 126 FIZHI_INIT_VARS
     &             log((pephy(i,j,1,bi,bj)-pephy(i,j,L+1,bi,bj))*10.)
./verification/hs94.1x64x5/code/ini_theta.F 70 INI_THETA
            term2=10. _d 0*log((rC(K)/atm_po))
./verification/hs94.1x64x5/code_ad/ini_theta.F 70 INI_THETA
            term2=10. _d 0*log((rC(K)/atm_po))
./verification/hs94.1x64x5/code_oad/ini_theta.F 70 INI_THETA
            term2=10. _d 0*log((rC(K)/atm_po))
./verification/hs94.cs-32x32x5/code/ini_theta.F 70 INI_THETA
            term2=10. _d 0*log((rC(K)/atm_po))
./model/src/update_masks_etc.F 423 UPDATE_MASKS_ETC
            SMOOTHABS_RS = log(.5*(exp(x*sf)+exp(-x*sf)))*rsf
./model/src/update_masks_etc.F 460 UPDATE_MASKS_ETC
            SMOOTHABS_RL = log(.5*(exp(x*sf)+exp(-x*sf)))*rsf
./pkg/bling/bling_airseaflux.F 270 BLING_AIRSEAFLUX
              aTS  = log(aTT/aTK)
./pkg/bling/bling_carbon_chem.F 1006 CARBON_COEFFS_PRESSURE_DEP
     &          log(1.0 - 0.001005*s))
./pkg/bling/bling_carbon_chem.F 1011 CARBON_COEFFS_PRESSURE_DEP
     &          log(1.0 - 0.001005*s) +
./pkg/bling/bling_carbon_chem.F 1012 CARBON_COEFFS_PRESSURE_DEP
     &          log(1.0 + (0.1400/96.062)*(scl)/aks(i,j,bi,bj)))
./pkg/bling/bling_carbon_chem.F 584 CARBON_COEFFS
           dlogtk=log(tk)
./pkg/bling/bling_carbon_chem.F 616 CARBON_COEFFS
     &          90.9241 _d 0*log(tk100) - 1.47696 _d 0*tk1002 +
./pkg/bling/bling_carbon_chem.F 622 CARBON_COEFFS
     &        23.3585 _d 0 * log(tk100) +
./pkg/bling/bling_carbon_chem.F 670 CARBON_COEFFS
     &          log(1.0 _d 0-0.001005 _d 0*s))
./pkg/bling/bling_carbon_chem.F 686 CARBON_COEFFS
     &          log(1.0 _d 0 - 0.001005 _d 0*s))
./pkg/bling/bling_carbon_chem.F 691 CARBON_COEFFS
     &   1.525 _d 0*sqrtis + log(1.0 _d 0 - 0.001005 _d 0*s) +
./pkg/bling/bling_carbon_chem.F 692 CARBON_COEFFS
     &   log(1.0 _d 0 + (0.1400 _d 0/96.062 _d 0)*(scl)/aks(i,j,bi,bj)))
./pkg/bling/bling_carbon_chem.F 878 CARBON_COEFFS_PRESSURE_DEP
           dlogtk=log(tk)
./pkg/bling/bling_carbon_chem.F 913 CARBON_COEFFS_PRESSURE_DEP
     &          90.9241*log(tk100) - 1.47696*tk1002 +
./pkg/bling/bling_carbon_chem.F 919 CARBON_COEFFS_PRESSURE_DEP
     &        23.3585 * log(tk100) +
./pkg/bling/bling_carbon_chem.F 990 CARBON_COEFFS_PRESSURE_DEP
     &          log(1.0-0.001005*s))
./pkg/bulk_force/bulkf_formula_lanl.F 129 BULKF_FORMULA_LANL
              aln = log(ht/zref)
./pkg/bulk_force/bulkf_formula_lanl.F 157 BULKF_FORMULA_LANL
              rdn=xkar/(log(zref/zice))
./pkg/bulk_force/bulkf_formula_lanl.F 174 BULKF_FORMULA_LANL
     &                    (2. _d 0*log(5. _d -1*(1. _d 0+x)) +
./pkg/bulk_force/bulkf_formula_lanl.F 175 BULKF_FORMULA_LANL
     &                     2. _d 0*log(5. _d -1*(1. _d 0+xsq)) -
./pkg/bulk_force/bulkf_formula_lanl.F 178 BULKF_FORMULA_LANL
     &                     (2. _d 0*log(5. _d -1*(1. _d 0+xsq)))
./pkg/cfc/cfc11_surfforcing.F 84 CFC11_SURFFORCING
     &           +  A3_11 * log( ttemp )
./pkg/cfc/cfc12_surfforcing.F 84 CFC12_SURFFORCING
     &           +  A3_12 * log( ttemp )
./pkg/cheapaml/cheapaml_lanl_flux.F 155 CHEAPAML_LANL_FLUX
              rdn=xkar/(log(zref/zice))
./pkg/cheapaml/cheapaml_lanl_flux.F 172 CHEAPAML_LANL_FLUX
     &                    (2. _d 0*log(5. _d -1*(1. _d 0+x)) +
./pkg/cheapaml/cheapaml_lanl_flux.F 173 CHEAPAML_LANL_FLUX
     &                     2. _d 0*log(5. _d -1*(1. _d 0+xsq)) -
./pkg/cheapaml/cheapaml_lanl_flux.F 176 CHEAPAML_LANL_FLUX
     &                     (2. _d 0*log(5. _d -1*(1. _d 0+xsq)))
./pkg/cheapaml/cheapaml_lanl_flux.F 216 CHEAPAML_LANL_FLUX
     &                     (2. _d 0*log(5. _d -1*(1. _d 0+xsq)))
./pkg/cheapaml/cheapaml_lanl_flux.F 88 CHEAPAML_LANL_FLUX
              aln = log(ht/zref)
./pkg/dic/carbon_chem.F 596 CARBON_COEFFS
           dlogtk=log(tk)
./pkg/dic/carbon_chem.F 620 CARBON_COEFFS
     &          90.9241 _d 0*log(tk100) - 1.47696 _d 0*tk1002 +
./pkg/dic/carbon_chem.F 626 CARBON_COEFFS
     &        23.3585 _d 0 * log(tk100) +
./pkg/dic/carbon_chem.F 674 CARBON_COEFFS
     &          log(1.0 _d 0-0.001005 _d 0*s))
./pkg/dic/carbon_chem.F 690 CARBON_COEFFS
     &          log(1.0 _d 0 - 0.001005 _d 0*s))
./pkg/dic/carbon_chem.F 695 CARBON_COEFFS
     &   1.525 _d 0*sqrtis + log(1.0 _d 0 - 0.001005 _d 0*s) +
./pkg/dic/carbon_chem.F 696 CARBON_COEFFS
     &   log(1.0 _d 0 + (0.1400 _d 0/96.062 _d 0)*(scl)/aks(i,j,bi,bj)))
./pkg/dic/carbon_chem.F 876 CARBON_COEFFS_PRESSURE_DEP
           dlogtk=log(tk)
./pkg/dic/carbon_chem.F 889 CARBON_COEFFS_PRESSURE_DEP
     &          90.9241*log(tk100) - 1.47696*tk1002 +
./pkg/dic/carbon_chem.F 895 CARBON_COEFFS_PRESSURE_DEP
     &        23.3585 * log(tk100) +
./pkg/dic/carbon_chem.F 966 CARBON_COEFFS_PRESSURE_DEP
     &          log(1.0-0.001005*s))
./pkg/dic/carbon_chem.F 982 CARBON_COEFFS_PRESSURE_DEP
     &          log(1.0 - 0.001005*s))
./pkg/dic/carbon_chem.F 987 CARBON_COEFFS_PRESSURE_DEP
     &          log(1.0 - 0.001005*s) +
./pkg/dic/carbon_chem.F 988 CARBON_COEFFS_PRESSURE_DEP
     &          log(1.0 + (0.1400/96.062)*(scl)/aks(i,j,bi,bj)))
./pkg/dic/o2_surfforcing.F 93 O2_SURFFORCING
              aTS  = log(aTT/aTK)
./pkg/dic/phos_flux.F 104 PHOS_FLUX
        reminFac = exp(-Kremin*log(depth_l/zbase))
./pkg/dic/phos_flux.F 114 PHOS_FLUX
           reminFac = exp(-Kremin*log(depth_l/zbase))