mirror of
https://git.gfz-potsdam.de/naaice/iphreeqc.git
synced 2025-12-15 16:18:22 +01:00
removed #
git-svn-id: svn://136.177.114.72/svn_GW/IPhreeqc/trunk@4447 1feff8c3-07ed-0310-ac33-dd36852eb9cd
This commit is contained in:
parent
4ea8bc1b14
commit
770fea9d2f
@ -21,7 +21,7 @@ PROGRAM example
|
||||
|
||||
DO i=1,GetComponentCount(id)
|
||||
CALL GetComponent(id, i, comp)
|
||||
WRITE(*,*) "comp #", i, "= ", comp
|
||||
WRITE(*,*) "comp ", i, " = ", comp
|
||||
ENDDO
|
||||
|
||||
IF (DestroyIPhreeqc(id).NE.IPQ_OK) THEN
|
||||
|
||||
@ -22,7 +22,7 @@ int main(void)
|
||||
}
|
||||
|
||||
for (i=0; i < GetComponentCount(id); ++i) {
|
||||
printf("comp #%d = %s\n", i, GetComponent(id, i));
|
||||
printf("comp %d = %s\n", i, GetComponent(id, i));
|
||||
}
|
||||
|
||||
if (DestroyIPhreeqc(id) != IPQ_OK) {
|
||||
|
||||
Loading…
x
Reference in New Issue
Block a user