X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Fwham%2Fsrc-HCD-5D%2Freadrtns.F;h=c733c379bb3a934f3fe9d47c775b7b8a9141007e;hb=e21f01074d00b176ae74cde1acff1e1295c0a3a5;hp=bca3771dfddfa9681c934941ffd2befbce7da759;hpb=b8621d392bf3be03d180598e133125736674d0e4;p=unres.git

diff --git a/source/wham/src-HCD-5D/readrtns.F b/source/wham/src-HCD-5D/readrtns.F
index bca3771..c733c37 100644
--- a/source/wham/src-HCD-5D/readrtns.F
+++ b/source/wham/src-HCD-5D/readrtns.F
@@ -412,7 +412,7 @@ c-------------------------------------------------------------------------------
       include "COMMON.PROTFILES"
       include "COMMON.PROT"
       include "COMMON.FREE"
-      character*64 bprotfile_temp
+      character*256 bprotfile_temp
       character*3 liczba,liczba2
       character*2 liczba1
       integer iunit,islice
@@ -472,7 +472,7 @@ c-------------------------------------------------------------------------------
       include "COMMON.SBRIDGE"
       include "COMMON.OBCINKA"
       real*4 csingle(3,maxres2)
-      character*64 nazwa,bprotfile_temp
+      character*256 nazwa,bprotfile_temp
       character*3 liczba
       character*2 liczba1
       integer i,j,ii,jj(maxslice),k,kk(maxslice),l,