*$ CREATE EMGTRN.ADD
*COPY EMGTRN
*
*=== emgtrn ==========================================================*
*
*---------------------------------------------------------------------*
*                                                                     *
*     Module Emgtrn:                                                  *
*                                                                     *
*          Last change A. Ferrari 02-nov-1993                         *
*          Created on 26-05-1991   by A. Ferrari, Infn-Milan          *
*                                                                     *
*          Included in:                                               *
*                               BDNOPT                                *
*                               ELECTR                                *
*                               KASKAD                                *
*                               MAGNEW                                *
*                               MAGEAS                                *
*                               MAGMOV                                *
*                               MULEMF                                *
*                               MULHAD                                *
*                                                                     *
*---------------------------------------------------------------------*
*
      LOGICAL LMCSMG
      COMMON / EMGTRN / UMCSMG, VMCSMG, WMCSMG, LMCSMG