Symbol Description Uses
sqrtis 10


File Line number Procedure Code
./pkg/dic/carbon_chem.F 1069 CARBON_COEFFS_PRESSURE_DEP 
     &          (-458.79*invtk + 3.5913) * sqrtis +
./pkg/dic/carbon_chem.F 1085 CARBON_COEFFS_PRESSURE_DEP 
     &          (-13856*invtk + 324.57 - 47.986*dlogtk)*sqrtis +
./pkg/dic/carbon_chem.F 1092 CARBON_COEFFS_PRESSURE_DEP 
           akf(i,j,bi,bj)=exp(1590.2*invtk - 12.641 + 1.525*sqrtis +
./pkg/dic/carbon_chem.F 684 CARBON_COEFFS 
        _RL  sqrtis
./pkg/dic/carbon_chem.F 719 CARBON_COEFFS 
           sqrtis=sqrt(is)
./pkg/dic/carbon_chem.F 779 CARBON_COEFFS 
     &          (-458.79 _d 0*invtk + 3.5913 _d 0) * sqrtis +
./pkg/dic/carbon_chem.F 795 CARBON_COEFFS 
     &   (-13856. _d 0*invtk + 324.57 _d 0 - 47.986 _d 0*dlogtk)*sqrtis+
./pkg/dic/carbon_chem.F 803 CARBON_COEFFS 
     &   1.525 _d 0*sqrtis + log(1.0 _d 0 - 0.001005 _d 0*s) +
./pkg/dic/carbon_chem.F 913 CARBON_COEFFS_PRESSURE_DEP 
        _RL  sqrtis
./pkg/dic/carbon_chem.F 985 CARBON_COEFFS_PRESSURE_DEP 
           sqrtis=sqrt(is)