iphreeqc/test2/CO2test
Scott R Charlton 6546b94c28 Rearranging IPhreeqc
git-svn-id: svn://136.177.114.72/svn_GW/IPhreeqc/trunk@4108 1feff8c3-07ed-0310-ac33-dd36852eb9cd
2010-02-23 05:05:42 +00:00

19 lines
409 B
Plaintext

SELECTED_OUTPUT
-reset false
pH true
SOLUTION 1
units mol/kgw
Na 0.1
Cl 0.1
USER_PUNCH
-headings Ca name type conc etc
## -headings Ca name type conc etc etc1 etc2 etc3 etc4 etc5 etc6 etc7 etc8 etc9 etc10 #etc11
10 PUNCH TOT("Ca")
20 totelt=SYS("Ca",n,n$,t$,c)
30 FOR i=1 to n
40 PUNCH n$(i),t$(i),c(i)
50 NEXT i
EQUILIBRIUM_PHASES
CO2(g) -3.5 10
Calcite 0 10
END