*------ Start of ver_geom.inc -------------------------------------*
        integer icopy, icol, iseen, nmed, irota, npars,
     &          mvols, mrots, nrots, nvols, irot_id
        real        phi,    position, par,  theta
        character*4 name,   mother,   shape, only
        character*2500 all_names                ! should be 7*MVOLS
        parameter (mvols=350)
        parameter (mrots= 45)
        common /gg_geom/   nvols, nrots,	! actually used
     &                     name      (mvols),	! volume name
     &                     mother    (mvols),	! mother volume name
     &                     icopy     (mvols),	! single/mult copies
     &                     shape     (mvols),	! 'box', 'tube' etc
     &                     position(3,mvols),	! position of center of volume
     &                     irota     (mvols),	! pointer to rotation matrices
     &                     icol      (mvols),	! color
     &                     iseen     (mvols),	! seen flag
     &                     nmed      (mvols),	! material indices
     &                     npars     (mvols),	! # of parameters
     &                     par    (10,mvols),	! parameters for type 'shape'
     &                     only      (mvols),	! 'only' or 'many'
     &                     irot_id   (mrots),	! matrix id
     &                     theta   (3,mrots),	! angles of the rotation
     &                     phi     (3,mrots),	! matrices
     &                     all_names		! string containing all
						! name(i). Filled by GG_GETG.
c------ End of ver_geom -------------------------------------------C