--- gpamela/gpmain/gpmain.F	2002/07/11 16:02:14	3.1.1.1
+++ gpamela/gpmain/gpmain.F	2014/01/23 13:56:02	3.2
@@ -1,7 +1,10 @@
 *
-* $Id$
+* $Id: gpmain.F,v 3.1.1.1 2002/07/11 16:02:14 cafagna Exp $
+*
+* $Log: gpmain.F,v $
+* Revision 3.1.1.1  2002/07/11 16:02:14  cafagna
+* First GPAMELA release on CVS
 *
-* $Log$
 *
 #if !defined(GPAMELA_INTER)
 *CMZ :  2.02/00 10/10/2000  15.15.49  by  Francesco Cafagna
@@ -49,17 +52,20 @@
 *             Main structures printings.
 *
 *      CALL GPRINT('PART',0)
-      CALL GPRINT('MATE',0)
-      CALL GPRINT('TMED',0)
+c      CALL GPRINT('MATE',0)
+c      CALL GPRINT('TMED',0)
 * VOLU printout commented to avoid GEANT bug
 *      CALL GPRINT('VOLU',0)
 *
 *
 *             Start events processing.
+c      print *,' ciccio '
       CALL GRUN
+c      print *,' fiffi '
 *
 *             End of run.
       CALL UGLAST
+c      print *,' pluto '
       STOP
       END
 #endif