--- DarthVader/CalorimeterLevel2/src/millim.for 2006/11/22 08:31:11 1.2 +++ DarthVader/CalorimeterLevel2/src/millim.for 2008/12/12 16:18:21 1.3 @@ -23,6 +23,8 @@ COMMON / SHIFT / SHIFT SAVE / SHIFT / + MILLIM = 0 + AAA = AA + SHIFT II = LL - 1 K1 = INT(II / 32)