USER_PRINT10 PRINT "PCO2: ", SI("CO2(g)")SOLUTION Charge balance with HCO3-pH 7.5-units mmol/kgwCa 1C(4) 5 chargeENDSOLUTION Adjust carbon to equibrium with calcitepH 7.5-units mmol/kgwCa 1C(4) 5 Calcite 0.0ENDSOLUTION Adjust carbon to specified log10(PCO2)pH 7.5-units mmol/kgwCa 1C(4) 5 CO2(g) -3.4END