git://git.uio.no / u / mrichter / AliRoot.git / commitdiff
? search:
summary | shortlog | log | commit | commitdiff | tree
raw | patch | inline | side by side (parent: 23ab796)
correct protection (ets .ne. 0).
authormorsch <morsch@f7af4fe6-9843-0410-8265-dc069ae4e863>
Fri, 7 Mar 2003 14:53:33 +0000 (14:53 +0000)
committermorsch <morsch@f7af4fe6-9843-0410-8265-dc069ae4e863>
Fri, 7 Mar 2003 14:53:33 +0000 (14:53 +0000)
EMCAL/jet_finder_ua1.F patch | blob | blame | history

diff --git a/EMCAL/jet_finder_ua1.F b/EMCAL/jet_finder_ua1.F
index 4cdc1cdeda9ad8a096bf2b2d9aee2765a3d6c655..41b09c0a111940367a379f68685509ab49761d9d 100644 (file)
--- a/EMCAL/jet_finder_ua1.F
+++ b/EMCAL/jet_finder_ua1.F
@@ -230,7 +230,7 @@ c*-reject cluster below minimum Ej_min
 c* protection (am)
             etas=eta+etas/ets
             arg = 0.
-            if (arg .ne. 0.) then
+            if (ets .ne. 0.) then
                if (abs(etas/ets) .lt. 23.719) then
                   arg = ets * cosh(etas/ets)
                else