Revert "Merge branch 'adasko' into devel"
[unres.git] / source / unres / src_MD / geomout.F
index 29e3529..69d7802 100644 (file)
@@ -130,7 +130,7 @@ C format.
       include 'COMMON.IOUNITS'
       include 'COMMON.HEADER'
       include 'COMMON.SBRIDGE'
-      character*50 tytul,fd
+      character*32 tytul,fd
       character*3 zahl
       character*6 res_num,pom,ucase
 #ifdef AIX