* * $Id$ * * $Log$ * *CMZ : 2.01/00 05/04/2000 14.35.18 by Marialuigia Ambriola *CMZ : 2.00/00 03/03/2000 15.39.06 by Francesco Cafagna *CMZ : 1.00/02 06/12/95 16.05.16 by Francesco Cafagna *-- Author : Francesco Cafagna 06/12/95 CDECK ID>, GXINT. *CMZ : 3.16/00 06/12/93 11.22.04 by Federico Carminati *-- Author : Rene Brun 03/01/89 PROGRAM GXINT * * GEANT main program. To link with the MOTIF user interface * the routine GPAWPP(NWGEAN,NWPAW) should be called, whereas * the routine GPAW(NWGEAN,NWPAW) gives access to the basic * graphics version. * #include "gpmem.inc" #include "gpzcom.inc" #include "gpzhbo.inc" * #if defined(GPAMELA_X11) CALL GPAW(NWGEAN,NWPAW) #endif #if defined(GPAMELA_PP) CALL GPAWPP(NWGEAN,NWPAW) #endif END