X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Funres%2Fsrc_MD-M%2Fgeomout.F;h=23246df40f93d277bafa7ed2770019ab3c9b16bf;hb=05c18ccfcefc037cb8394bd779a4e51b7cbea6ec;hp=eed41a275244e8524238feb052223d705bd39387;hpb=d09b54932dd8b227a90f50766bae56f6bf66189c;p=unres.git diff --git a/source/unres/src_MD-M/geomout.F b/source/unres/src_MD-M/geomout.F index eed41a2..23246df 100644 --- a/source/unres/src_MD-M/geomout.F +++ b/source/unres/src_MD-M/geomout.F @@ -471,7 +471,7 @@ C print *,'A CHUJ',potEcomp(23) if (refstr) then call rms_nac_nnc(rms,frac,frac_nn,co,.false.) write (line1,'(i10,f15.2,3f12.3,f7.2,2f6.3,f12.3,f10.1,2f8.2, - & f9.2,i5,$)') + & f9.3,i5,$)') & itime,totT,EK,potE,totE, & rms,frac,frac_nn,kinetic_T,t_bath,gyrate(), & distance,potEcomp(23),me