Consistent printout
[u/mrichter/AliRoot.git] / EPOS / epos167 / epos-tim-155.f
index 1cfc466..4d360fc 100644 (file)
@@ -364,7 +364,7 @@ c......................................................................
       endif
       if (q2.lt.4.*q2fin+2.*amm2(idfl) )then
         if(ish.ge.9)then
-          write(ifch,'(a,i4,i4,2f15.8)') 'null:',0.
+          write(ifch,'(a,i4,i4,2f15.8)') 'null:',0
         endif
         q2=amm2(idfl)
         idfla=0