X-Git-Url: http://git.uio.no/git/?p=u%2Fmrichter%2FAliRoot.git;a=blobdiff_plain;f=EVGEN%2FPartEloss%2Freadca3.f;h=bd569a28109b6dcbf8a47df6c1ebe46c99e24f2f;hp=30cb3b14bb4019d664de5e534f1538f807418630;hb=305197bda22b4617e8f5a1d1dc0697438458a0d3;hpb=93aa5a700d3f247e985796ba1b6abb327fc8d415

diff --git a/EVGEN/PartEloss/readca3.f b/EVGEN/PartEloss/readca3.f
index 30cb3b14bb4..bd569a28109 100644
--- a/EVGEN/PartEloss/readca3.f
+++ b/EVGEN/PartEloss/readca3.f
@@ -4,7 +4,6 @@
 *
       CHARACTER*100 CHROOT  
       CHARACTER*100 FILNAM
-      LOGICAL EXISTS
       CHROOT=' '
       CALL GETENVF('ALICE_ROOT',CHROOT)
       LNROOT = LNBLNK(CHROOT)