# React script, saved Wed Apr 15 2015 by bfarrell data = "C:\Program Files\Gwb\Gtdata\thermo.tdat" verify conductivity = "C:\Program Files\Gwb\Gtdata\conductivity-USGS.dat" temperature initial = 300 C, final = 25 C H2O = 1 free kg swap Albite for Al+++ Albite = 20 free cm3 swap "Maximum Microcline" for K+ "Maximum Microcline" = 10 free cm3 swap Muscovite for H+ Muscovite = 5 free cm3 swap Quartz for SiO2(aq) Quartz = 2 free cm3 Na+ = 1 molal Cl- = 1 molal balance on Cl- suppress "Albite low"