max/iphreeqc
1
0
Fork 0
mirror of https://git.gfz-potsdam.de/naaice/iphreeqc.git synced 2025-12-15 16:18:22 +01:00
Code Issues Packages Projects Releases Wiki Activity

updated for linux

Browse Source 
git-svn-id: svn://136.177.114.72/svn_GW/IPhreeqc/branches/class@4209 1feff8c3-07ed-0310-ac33-dd36852eb9cd
This commit is contained in:
Scott R Charlton 2010-04-03 03:55:56 +00:00
parent ab2a305be8
commit 724085012c
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
test/kinn.f
View File

@ -23,7 +23,7 @@
CALL EQUILIBRIUM_PHASES('calcite', 0.0, 0.010)
CALL USER_PUNCH('Ca', 10)
!!!! CALL OutputLines
iresult = Run(.FALSE., .FALSE., .FALSE., .TRUE.)
iresult = RunAccumulated()
IF (iresult.NE.VR_OK) THEN
CALL OutputLastError
STOP