From 5c52b2744fddefce6387fae5f1d806d12ee68739 Mon Sep 17 00:00:00 2001 From: Scott R Charlton Date: Sat, 2 Nov 2013 01:09:12 +0000 Subject: [PATCH] updated f90 version git-svn-id: svn://136.177.114.72/svn_GW/IPhreeqc/trunk@8158 1feff8c3-07ed-0310-ac33-dd36852eb9cd --- doc/examples/F90GetVersionString.f90 | 1 + 1 file changed, 1 insertion(+) diff --git a/doc/examples/F90GetVersionString.f90 b/doc/examples/F90GetVersionString.f90 index 90512621..46a913af 100644 --- a/doc/examples/F90GetVersionString.f90 +++ b/doc/examples/F90GetVersionString.f90 @@ -2,6 +2,7 @@ PROGRAM example INCLUDE "IPhreeqc.f90.inc" CHARACTER(LEN=80) :: version + WRITE(*,*) 'Version:' CALL GetVersionString(version) WRITE(*,*) TRIM(version) END PROGRAM example