File |
Line number |
Procedure |
Code |
./pkg/bling/bling_carbon_chem.F |
542 |
CARBON_COEFFS |
_RL tk100 |
./pkg/bling/bling_carbon_chem.F |
581 |
CARBON_COEFFS |
tk100 = tk/100. _d 0 |
./pkg/bling/bling_carbon_chem.F |
582 |
CARBON_COEFFS |
tk1002=tk100*tk100 |
./pkg/bling/bling_carbon_chem.F |
615 |
CARBON_COEFFS |
ff(i,j,bi,bj) = exp(-162.8301 _d 0 + 218.2968 _d 0/tk100 + |
./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 |
617 |
CARBON_COEFFS |
& s * (.025695 _d 0 - .025225 _d 0*tk100 + |
./pkg/bling/bling_carbon_chem.F |
621 |
CARBON_COEFFS |
ak0(i,j,bi,bj) = exp(93.4517 _d 0/tk100 - 60.2409 _d 0 + |
./pkg/bling/bling_carbon_chem.F |
622 |
CARBON_COEFFS |
& 23.3585 _d 0 * log(tk100) + |
./pkg/bling/bling_carbon_chem.F |
623 |
CARBON_COEFFS |
& s * (0.023517 _d 0 - 0.023656 _d 0*tk100 + |
./pkg/bling/bling_carbon_chem.F |
802 |
CARBON_COEFFS_PRESSURE_DEP |
_RL tk100 |
./pkg/bling/bling_carbon_chem.F |
875 |
CARBON_COEFFS_PRESSURE_DEP |
tk100 = tk/100.0 |
./pkg/bling/bling_carbon_chem.F |
876 |
CARBON_COEFFS_PRESSURE_DEP |
tk1002=tk100*tk100 |
./pkg/bling/bling_carbon_chem.F |
912 |
CARBON_COEFFS_PRESSURE_DEP |
ff(i,j,bi,bj) = exp(-162.8301 + 218.2968/tk100 + |
./pkg/bling/bling_carbon_chem.F |
913 |
CARBON_COEFFS_PRESSURE_DEP |
& 90.9241*log(tk100) - 1.47696*tk1002 + |
./pkg/bling/bling_carbon_chem.F |
914 |
CARBON_COEFFS_PRESSURE_DEP |
& s * (.025695 - .025225*tk100 + |
./pkg/bling/bling_carbon_chem.F |
918 |
CARBON_COEFFS_PRESSURE_DEP |
ak0(i,j,bi,bj) = exp(93.4517/tk100 - 60.2409 + |
./pkg/bling/bling_carbon_chem.F |
919 |
CARBON_COEFFS_PRESSURE_DEP |
& 23.3585 * log(tk100) + |
./pkg/bling/bling_carbon_chem.F |
920 |
CARBON_COEFFS_PRESSURE_DEP |
& s * (0.023517 - 0.023656*tk100 + |
./pkg/dic/carbon_chem.F |
554 |
CARBON_COEFFS |
_RL tk100 |
./pkg/dic/carbon_chem.F |
593 |
CARBON_COEFFS |
tk100 = tk/100. _d 0 |
./pkg/dic/carbon_chem.F |
594 |
CARBON_COEFFS |
tk1002=tk100*tk100 |
./pkg/dic/carbon_chem.F |
619 |
CARBON_COEFFS |
ff(i,j,bi,bj) = exp(-162.8301 _d 0 + 218.2968 _d 0/tk100 + |
./pkg/dic/carbon_chem.F |
620 |
CARBON_COEFFS |
& 90.9241 _d 0*log(tk100) - 1.47696 _d 0*tk1002 + |
./pkg/dic/carbon_chem.F |
621 |
CARBON_COEFFS |
& s * (.025695 _d 0 - .025225 _d 0*tk100 + |
./pkg/dic/carbon_chem.F |
625 |
CARBON_COEFFS |
ak0(i,j,bi,bj) = exp(93.4517 _d 0/tk100 - 60.2409 _d 0 + |
./pkg/dic/carbon_chem.F |
626 |
CARBON_COEFFS |
& 23.3585 _d 0 * log(tk100) + |
./pkg/dic/carbon_chem.F |
627 |
CARBON_COEFFS |
& s * (0.023517 _d 0 - 0.023656 _d 0*tk100 + |
./pkg/dic/carbon_chem.F |
804 |
CARBON_COEFFS_PRESSURE_DEP |
_RL tk100 |
./pkg/dic/carbon_chem.F |
873 |
CARBON_COEFFS_PRESSURE_DEP |
tk100 = tk/100.0 |
./pkg/dic/carbon_chem.F |
874 |
CARBON_COEFFS_PRESSURE_DEP |
tk1002=tk100*tk100 |
./pkg/dic/carbon_chem.F |
888 |
CARBON_COEFFS_PRESSURE_DEP |
ff(i,j,bi,bj) = exp(-162.8301 + 218.2968/tk100 + |
./pkg/dic/carbon_chem.F |
889 |
CARBON_COEFFS_PRESSURE_DEP |
& 90.9241*log(tk100) - 1.47696*tk1002 + |
./pkg/dic/carbon_chem.F |
890 |
CARBON_COEFFS_PRESSURE_DEP |
& s * (.025695 - .025225*tk100 + |
./pkg/dic/carbon_chem.F |
894 |
CARBON_COEFFS_PRESSURE_DEP |
ak0(i,j,bi,bj) = exp(93.4517/tk100 - 60.2409 + |
./pkg/dic/carbon_chem.F |
895 |
CARBON_COEFFS_PRESSURE_DEP |
& 23.3585 * log(tk100) + |
./pkg/dic/carbon_chem.F |
896 |
CARBON_COEFFS_PRESSURE_DEP |
& s * (0.023517 - 0.023656*tk100 + |