X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Funres%2Fsrc-HCD-5D%2Funres.F;h=08caadea92be6f3ab54697db7620cd9f18bed852;hb=05c1789531ec3f44dfebf41b426cb1204329e7ff;hp=f556eb6e1658ed2119dc7d8d8034ee31452b04e5;hpb=df5ad6c769f328b01ef15673420b789f998f0d83;p=unres.git

diff --git a/source/unres/src-HCD-5D/unres.F b/source/unres/src-HCD-5D/unres.F
index f556eb6..08caade 100644
--- a/source/unres/src-HCD-5D/unres.F
+++ b/source/unres/src-HCD-5D/unres.F
@@ -283,9 +283,9 @@ crc overlap test
         endif
 
         if (overlapsc) then 
-c          print *, 'Calling OVERLAP_SC'
+          write (iout,*) 'Calling OVERLAP_SC'
           call overlap_sc(fail)
-c          print *,"After overlap_sc"
+          write (iout,*) "After overlap_sc"
         endif 
 
         if (searchsc) then