File |
Line number |
Procedure |
Code |
./pkg/bling/bling_carbon_chem.F |
556 |
CARBON_COEFFS |
_RL RT |
./pkg/bling/bling_carbon_chem.F |
599 |
CARBON_COEFFS |
RT = Rgas*tk |
./pkg/bling/bling_carbon_chem.F |
607 |
CARBON_COEFFS |
& / RT) |
./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 |
816 |
CARBON_COEFFS_PRESSURE_DEP |
_RL RT |
./pkg/bling/bling_carbon_chem.F |
895 |
CARBON_COEFFS_PRESSURE_DEP |
RT = Rgas*tk |
./pkg/bling/bling_carbon_chem.F |
904 |
CARBON_COEFFS_PRESSURE_DEP |
& / RT) |
./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 |
568 |
CARBON_COEFFS |
_RL RT |
./pkg/dic/carbon_chem.F |
611 |
CARBON_COEFFS |
RT = Rgas*tk |
./pkg/dic/carbon_chem.F |
615 |
CARBON_COEFFS |
fugf(i,j,bi,bj) = exp( (B+2. _d 0*delta) * P1atm / RT) |