--- DarthVader/CalorimeterLevel2/src/cluster2.for	2008/12/12 16:18:20	1.4
+++ DarthVader/CalorimeterLevel2/src/cluster2.for	2014/01/16 15:29:13	1.5
@@ -52,7 +52,7 @@
             ENDDO
           ENDDO
 C
-          IGIRO = 0.
+          IGIRO = 0
 C
    50     CONTINUE
           MAX = LVMAX(QQQ,NCHA)