X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Fwham%2Fsrc%2Freadpdb.F;h=e90d954b0975443b3372a6d092fd33bc91ebb29a;hb=6304fe426dd266ba99503f2cc4a5b9d396511b2f;hp=6261f500af60dc0c33cce119c6d993ac7799fc51;hpb=357148eb01c1ea7e5cfd362d34f1e1ab61c8f2a8;p=unres.git diff --git a/source/wham/src/readpdb.F b/source/wham/src/readpdb.F index 6261f50..e90d954 100644 --- a/source/wham/src/readpdb.F +++ b/source/wham/src/readpdb.F @@ -25,6 +25,7 @@ c & ishift_pdb character*80 card double precision sccor(3,20) integer rescode + logical lsecondary efree_temp=0.0d0 ibeg=1 ishift1=0