Merge branch 'lipid' of mmka.chem.univ.gda.pl:unres into lipid
[unres.git] / source / unres / src_MD-M / fitsq.f
index 1c97e6d..2040074 100644 (file)
@@ -44,11 +44,11 @@ c
         enddo
       enddo
       rms=dabs(rms/fn)
-
+      
 c      write(iout,*)'xav = ',(xav(j),j=1,3)                                    
 c      write(iout,*)'yav = ',(yav(j),j=1,3)                                    
 c      write(iout,*)'t   = ',(t(j),j=1,3)
-c      write(iout,*)'rms=',rms
+      write(iout,*)'rms=',rms
       if (rms.lt.small) return