*$ CREATE MGDDCM.ADD
*COPY MGDDCM
*
*=== mgddcm ===========================================================*
*
*----------------------------------------------------------------------*
*                                                                      *
*     Copyright (C) 1991-2005      by   Alfredo Ferrari                *
*     All Rights Reserved.                                             *
*                                                                      *
*                                                                      *
*     MGDraw Dump CoMmon:                                              *
*                                                                      *
*     Last change  on  06-jul-00   by   Alfredo Ferrari, INFN - Milan  *
*                                                                      *
*     description of the common block(s) and variable(s)               *
*                                                                      *
*     iodraw     = logical unit for the output of the trajectory/energy*
*                  deposition dump                                     *
*     lddraw     = logical flag for the trajectory/continuos energy    *
*                  deposition dumping                                  *
*     ledraw     = logical flag for the "on spot" energy deposition    *
*                  dumping                                             *
*     lsdraw     = logical flag for source particle dumping            *
*     ludraw     = logical flag for calling the dumping routine for    *
*                  user events                                         *
*                                                                      *
*----------------------------------------------------------------------*
*
      LOGICAL LDDRAW, LEDRAW, LSDRAW, LUDRAW
      CHARACTER CFDRAW*10
      COMMON / MGDDCM / IODRAW, LDDRAW, LEDRAW, LSDRAW, LUDRAW
      COMMON / CHMGDD / CFDRAW
      SAVE / MGDDCM /, / CHMGDD /