--- DarthVader/CalorimeterLevel2/src/elio.for 2006/05/19 13:15:50 1.1 +++ DarthVader/CalorimeterLevel2/src/elio.for 2006/12/13 13:42:45 1.2 @@ -89,7 +89,8 @@ C IF (NN.LE.0) NN = 1 NGIR = NCL(M,J) ! number of clusters in layer J of the M View - IF (NGIR.EQ.0) GOTO 5 +C IF (NGIR.EQ.0) GOTO 5 + IF (NGIR.NE.1) GOTO 5 IPP = 0. DO L = 1,NGIR CALL LASTRISCIA(CLUS(M,J,L),IN)