X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Funres%2Fsrc-HCD-5D%2Funres.F;h=4c60573756b48783cef7efec430a6dd228e3686a;hb=7a9066ef8247b567cb33f4f6f3483e076614c7c4;hp=2e0ebaf872c89a0a17240fc24712ddbd7d72be23;hpb=e9e7a2a71c54224a033e1fa3f9a60848b688eadb;p=unres.git diff --git a/source/unres/src-HCD-5D/unres.F b/source/unres/src-HCD-5D/unres.F index 2e0ebaf..4c60573 100644 --- a/source/unres/src-HCD-5D/unres.F +++ b/source/unres/src-HCD-5D/unres.F @@ -294,10 +294,10 @@ c print *,"after etotal" call enerprint(energy(0)) if (secondary_str) then call hairpin(.true.,nharp,iharp) -c print *,'after hairpin' + print *,'after hairpin' call secondary2(.true.) endif -c print *,'after secondary' + print *,'after secondary' if (minim) then crc overlap test if (indpdb.ne.0 .and. .not.dccart) then