X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Funres%2Fsrc_MD%2Fparmread.F;fp=source%2Funres%2Fsrc_MD%2Fparmread.F;h=4729ca5802d63dcc7c324b2dabb6e73fdd99b477;hb=aebadf9023e437f497f92dfcf2303c16f60917c1;hp=19682351828afa1f54b6b4153b5b108ae5f64ed2;hpb=7df7a3e6852853636f1e9d444068e63227b7e2a5;p=unres.git

diff --git a/source/unres/src_MD/parmread.F b/source/unres/src_MD/parmread.F
index 1968235..4729ca5 100644
--- a/source/unres/src_MD/parmread.F
+++ b/source/unres/src_MD/parmread.F
@@ -594,7 +594,7 @@ cc maxinter is maximum interaction sites
             write (iout,*) 'ityp',i,' jtyp',j
             write (iout,*) 'Fourier constants'
             do k=1,nterm_sccor(i,j)
-	      write (iout,'(2(1pe15.5))') v1sccor(k,l,i,j),v2sccor(k,l,i,j)
+      write (iout,'(2(1pe15.5))') v1sccor(k,l,i,j),v2sccor(k,l,i,j)
             enddo
             write (iout,*) 'Lorenz constants'
             do k=1,nlor_sccor(i,j)