mirror of
https://git.gfz-potsdam.de/naaice/iphreeqc.git
synced 2025-12-16 08:38:23 +01:00
e5dcf9b9b0
git-svn-id: svn://136.177.114.72/svn_GW/IPhreeqc/trunk@8162 1feff8c3-07ed-0310-ac33-dd36852eb9cd
9 lines
181 B
Fortran
9 lines
181 B
Fortran
PROGRAM example
|
|
INCLUDE "IPhreeqc.f90.inc"
|
|
CHARACTER(LEN=80) :: version
|
|
|
|
WRITE(*,*) "Version:"
|
|
CALL GetVersionString(version)
|
|
WRITE(*,*) TRIM(version)
|
|
END PROGRAM example
|