SOLUTION_SPECIES Hfo_sOH + H+ = Hfo_sOH2+ -log_k 8.29 -add_constant -1ENDSOLUTION 1Na 1Cl 1 chargeSURFACE 1 Hfo_sOH 1 600 1USER_PRINT10 PRINT "Log10K(Hfo_sOH2+): ", LK_SPECIES("Hfo_sOH2+")END
SURFACE_SPECIES Hfo_sOH + H+ = Hfo_sOH2+ -log_k 8.29 -add_constant -1ENDSOLUTION 1Na 1Cl 1 chargeENDUSE solution 1SURFACE 1 Hfo_sOH 1 600 1USER_PRINT100 PRINT "Log10K(Hfo_sOH2+): ", LK_SPECIES("Hfo_sOH2+")110 F_KJ_V_EQ = 96.4935120 R_KJ_DEG_MOL = 0.00831470130 REM equation 15 of PHREEQC version 2, 1999 manual140 lk = LA("Hfo_sOH2+") - LA("H+") - LA("Hfo_sOH") \ + LOG10(EXP[1*F_KJ_V_EQ*EDL("psi","Hfo")/(R_KJ_DEG_MOL*TK)]) 150 PRINT "Alternatively: ", lkEND