SELECTED_OUTPUT ; -file output; -reset false; -ionic_strength false USER_PUNCH 10 s$ = s$ + STR$(GAMMA("HCO3-")) + STR$(ACT("H2O")) 20 PUNCH s$
ACT("CO2") = GAMMA("CO2")*MOL("CO2")LA("CO2") = LG("CO2") + LM("CO2")
SI("CO2(g)") = LA("CO2") - LK_PHASE("CO2(g)")
LK_PHASE("CO2(g)") = LA("CO2") - LOG10[PR_P("CO2(g)") * PR_PHI("CO2(g)")]
GAS_PHASECO2(g) 100
EQUILIBRIUM_PHASESCO2(g) 2