| File |
Line number |
Procedure |
Code |
|
./pkg/bling/bling_carbon_chem.F |
1037 |
CARBON_COEFFS_PRESSURE_DEP |
tmpa1 = - 171.9065 - (0.077993*tk) + (2839.319/tk) |
|
./pkg/bling/bling_carbon_chem.F |
1038 |
CARBON_COEFFS_PRESSURE_DEP |
& + (71.595*log10(tk)) |
|
./pkg/bling/bling_carbon_chem.F |
1039 |
CARBON_COEFFS_PRESSURE_DEP |
tmpa2 = +(-0.77712 + (0.0028426*tk) + (178.34/tk) )*sqrts |
|
./pkg/bling/bling_carbon_chem.F |
1044 |
CARBON_COEFFS_PRESSURE_DEP |
tmpa1 = - 171.945 - (0.077993*tk) + (2903.293/tk) |
|
./pkg/bling/bling_carbon_chem.F |
1045 |
CARBON_COEFFS_PRESSURE_DEP |
& + (71.595*log10(tk)) |
|
./pkg/bling/bling_carbon_chem.F |
1046 |
CARBON_COEFFS_PRESSURE_DEP |
tmpa2 = +(-0.068393 + (0.0017276*tk) + (88.135/tk) )*sqrts |
|
./pkg/bling/bling_carbon_chem.F |
541 |
CARBON_COEFFS |
_RL tk |
|
./pkg/bling/bling_carbon_chem.F |
580 |
CARBON_COEFFS |
tk = 273.15 _d 0 + t |
|
./pkg/bling/bling_carbon_chem.F |
581 |
CARBON_COEFFS |
tk100 = tk/100. _d 0 |
|
./pkg/bling/bling_carbon_chem.F |
583 |
CARBON_COEFFS |
invtk=1.0 _d 0/tk |
|
./pkg/bling/bling_carbon_chem.F |
584 |
CARBON_COEFFS |
dlogtk=log(tk) |
|
./pkg/bling/bling_carbon_chem.F |
599 |
CARBON_COEFFS |
RT = Rgas*tk |
|
./pkg/bling/bling_carbon_chem.F |
600 |
CARBON_COEFFS |
delta = (57.7 _d 0 - 0.118 _d 0*tk) |
|
./pkg/bling/bling_carbon_chem.F |
601 |
CARBON_COEFFS |
B1 = -1636.75 _d 0 + 12.0408 _d 0*tk - 0.0327957 _d 0*tk*tk |
|
./pkg/bling/bling_carbon_chem.F |
602 |
CARBON_COEFFS |
B = B1 + 3.16528 _d 0*tk*tk*tk*(0.00001 _d 0) |
|
./pkg/bling/bling_carbon_chem.F |
641 |
CARBON_COEFFS |
& dlogtk + 0.053105 _d 0*sqrts*tk) |
|
./pkg/bling/bling_carbon_chem.F |
801 |
CARBON_COEFFS_PRESSURE_DEP |
_RL tk |
|
./pkg/bling/bling_carbon_chem.F |
874 |
CARBON_COEFFS_PRESSURE_DEP |
tk = 273.15 + t |
|
./pkg/bling/bling_carbon_chem.F |
875 |
CARBON_COEFFS_PRESSURE_DEP |
tk100 = tk/100.0 |
|
./pkg/bling/bling_carbon_chem.F |
877 |
CARBON_COEFFS_PRESSURE_DEP |
invtk=1.0/tk |
|
./pkg/bling/bling_carbon_chem.F |
878 |
CARBON_COEFFS_PRESSURE_DEP |
dlogtk=log(tk) |
|
./pkg/bling/bling_carbon_chem.F |
895 |
CARBON_COEFFS_PRESSURE_DEP |
RT = Rgas*tk |
|
./pkg/bling/bling_carbon_chem.F |
896 |
CARBON_COEFFS_PRESSURE_DEP |
delta = (57.7 _d 0 - 0.118 _d 0*tk) |
|
./pkg/bling/bling_carbon_chem.F |
897 |
CARBON_COEFFS_PRESSURE_DEP |
B1 = -1636.75 _d 0 + 12.0408 _d 0*tk - 0.0327957 _d 0*tk*tk |
|
./pkg/bling/bling_carbon_chem.F |
898 |
CARBON_COEFFS_PRESSURE_DEP |
B = B1 + 3.16528 _d 0*tk*tk*tk*(0.00001 _d 0) |
|
./pkg/bling/bling_carbon_chem.F |
936 |
CARBON_COEFFS_PRESSURE_DEP |
& exp( (24.2-0.085*t)*(pressc-1.0)/(83.143*tk) ) |
|
./pkg/bling/bling_carbon_chem.F |
943 |
CARBON_COEFFS_PRESSURE_DEP |
& exp( (16.4-0.040*t)*(pressc-1.0)/(83.143*tk) ) |
|
./pkg/bling/bling_carbon_chem.F |
951 |
CARBON_COEFFS_PRESSURE_DEP |
& dlogtk + 0.053105*sqrts*tk) |
|
./pkg/bling/bling_carbon_chem.F |
959 |
CARBON_COEFFS_PRESSURE_DEP |
pfactor = - (dv/(bigR*tk))*pressc |
|
./pkg/bling/bling_carbon_chem.F |
960 |
CARBON_COEFFS_PRESSURE_DEP |
& + (0.5*dk/(bigR*tk))*pressc*pressc |
|
./pkg/dic/carbon_chem.F |
1012 |
CARBON_COEFFS_PRESSURE_DEP |
tmpa1 = - 171.9065 - (0.077993*tk) + (2839.319/tk) |
|
./pkg/dic/carbon_chem.F |
1013 |
CARBON_COEFFS_PRESSURE_DEP |
& + (71.595*log10(tk)) |
|
./pkg/dic/carbon_chem.F |
1014 |
CARBON_COEFFS_PRESSURE_DEP |
tmpa2 = +(-0.77712 + (0.0028426*tk) + (178.34/tk) )*sqrts |
|
./pkg/dic/carbon_chem.F |
553 |
CARBON_COEFFS |
_RL tk |
|
./pkg/dic/carbon_chem.F |
592 |
CARBON_COEFFS |
tk = 273.15 _d 0 + t |
|
./pkg/dic/carbon_chem.F |
593 |
CARBON_COEFFS |
tk100 = tk/100. _d 0 |
|
./pkg/dic/carbon_chem.F |
595 |
CARBON_COEFFS |
invtk=1.0 _d 0/tk |
|
./pkg/dic/carbon_chem.F |
596 |
CARBON_COEFFS |
dlogtk=log(tk) |
|
./pkg/dic/carbon_chem.F |
611 |
CARBON_COEFFS |
RT = Rgas*tk |
|
./pkg/dic/carbon_chem.F |
612 |
CARBON_COEFFS |
delta = (57.7 _d 0 - 0.118 _d 0*tk) |
|
./pkg/dic/carbon_chem.F |
613 |
CARBON_COEFFS |
B1 = -1636.75 _d 0 + 12.0408 _d 0*tk - 0.0327957 _d 0*tk*tk |
|
./pkg/dic/carbon_chem.F |
614 |
CARBON_COEFFS |
B = B1 + 3.16528 _d 0*tk*tk*tk*(0.00001 _d 0) |
|
./pkg/dic/carbon_chem.F |
645 |
CARBON_COEFFS |
& dlogtk + 0.053105 _d 0*sqrts*tk) |
|
./pkg/dic/carbon_chem.F |
803 |
CARBON_COEFFS_PRESSURE_DEP |
_RL tk |
|
./pkg/dic/carbon_chem.F |
872 |
CARBON_COEFFS_PRESSURE_DEP |
tk = 273.15 + t |
|
./pkg/dic/carbon_chem.F |
873 |
CARBON_COEFFS_PRESSURE_DEP |
tk100 = tk/100.0 |
|
./pkg/dic/carbon_chem.F |
875 |
CARBON_COEFFS_PRESSURE_DEP |
invtk=1.0/tk |
|
./pkg/dic/carbon_chem.F |
876 |
CARBON_COEFFS_PRESSURE_DEP |
dlogtk=log(tk) |
|
./pkg/dic/carbon_chem.F |
912 |
CARBON_COEFFS_PRESSURE_DEP |
& exp( (24.2-0.085*t)*(pressc-1.0)/(83.143*tk) ) |
|
./pkg/dic/carbon_chem.F |
919 |
CARBON_COEFFS_PRESSURE_DEP |
& exp( (16.4-0.040*t)*(pressc-1.0)/(83.143*tk) ) |
|
./pkg/dic/carbon_chem.F |
927 |
CARBON_COEFFS_PRESSURE_DEP |
& dlogtk + 0.053105*sqrts*tk) |
|
./pkg/dic/carbon_chem.F |
935 |
CARBON_COEFFS_PRESSURE_DEP |
pfactor = - (dv/(bigR*tk))*pressc |
|
./pkg/dic/carbon_chem.F |
936 |
CARBON_COEFFS_PRESSURE_DEP |
& + (0.5*dk/(bigR*tk))*pressc*pressc |