X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Fcluster%2Fwham%2Fsrc%2Freadpdb.F;h=8351702720f662cb4963cb05741387e3f9f6a931;hb=1ffd73d9e35f7523df8dd472e0a3dcdab00910b2;hp=a7b024f949945a6295c16e57dc24337b2cb5fd0a;hpb=357148eb01c1ea7e5cfd362d34f1e1ab61c8f2a8;p=unres.git

diff --git a/source/cluster/wham/src/readpdb.F b/source/cluster/wham/src/readpdb.F
index a7b024f..8351702 100644
--- a/source/cluster/wham/src/readpdb.F
+++ b/source/cluster/wham/src/readpdb.F
@@ -24,6 +24,7 @@ c    &  ishift_pdb
       character*80 card
       double precision sccor(3,20)
       integer rescode
+      logical lsecondary
       efree_temp=0.0d0
       ibeg=1
       ishift1=0