File |
Line number |
Procedure |
Code |
./pkg/bling/bling_carbon_chem.F |
554 |
CARBON_COEFFS |
_RL P1atm |
./pkg/bling/bling_carbon_chem.F |
597 |
CARBON_COEFFS |
P1atm = 1.01325 _d 0 ! bars |
./pkg/bling/bling_carbon_chem.F |
609 |
CARBON_COEFFS |
fugf(i,j,bi,bj) = exp( (B+2. _d 0*delta) * P1atm / RT) |
./pkg/bling/bling_carbon_chem.F |
814 |
CARBON_COEFFS_PRESSURE_DEP |
_RL P1atm |
./pkg/bling/bling_carbon_chem.F |
893 |
CARBON_COEFFS_PRESSURE_DEP |
P1atm = 1.01325 _d 0 ! bars |
./pkg/bling/bling_carbon_chem.F |
906 |
CARBON_COEFFS_PRESSURE_DEP |
fugf(i,j,bi,bj) = exp( (B+2. _d 0*delta) * P1atm / RT) |
./pkg/dic/carbon_chem.F |
566 |
CARBON_COEFFS |
_RL P1atm |
./pkg/dic/carbon_chem.F |
609 |
CARBON_COEFFS |
P1atm = 1.01325 _d 0 ! bars |
./pkg/dic/carbon_chem.F |
615 |
CARBON_COEFFS |
fugf(i,j,bi,bj) = exp( (B+2. _d 0*delta) * P1atm / RT) |