--- trunk/libf/dyn3d/iniprint.f90	2008/07/21 16:05:07	12
+++ trunk/libf/dyn3d/iniprint.f90	2008/07/25 19:59:34	13
@@ -14,7 +14,6 @@
 
     !-------------------------------------------------
 
-    print *, "Call sequence information: read_iniprint"
     print *, "Enter namelist 'iniprint_nml'."
     read(unit=*, nml=iniprint_nml)
     write(unit=*, nml=iniprint_nml)