X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Funres%2Fsrc_MD-M%2Fgeomout.F;h=23246df40f93d277bafa7ed2770019ab3c9b16bf;hb=14b55af23c7da34bfdc10f315551c8e01a3a906a;hp=eed41a275244e8524238feb052223d705bd39387;hpb=d101c97dea752458d76055fdbae49c26fff03c1f;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