*$ CREATE USMDMD.ADD
*COPY USMDMD
*                                                                      *
*=== Usmdmd ===========================================================*
*                                                                      *
*----------------------------------------------------------------------*
*                                                                      *
*     Copyright (C) 2020-2020      by  Alberto Fasso`, Alfredo Ferrari *
*     All Rights Reserved.                   & Paola Sala              *
*                                                                      *
*                                                                      *
*     USe fluka MeDflk MoDule: included in any routine which requires  *
*                              the Medflk array                        *
*                                                                      *
*     Created on  02 January 2020  by    Alberto Fasso`, Paola Sala    *
*                                          SLAC/USA     INFN - Milan   *
*                                                                      *
*     Last change on  03-Jan-20    by            Alberto Fasso`        *
*                                                  SLAC/USA            *
*                                                                      *
*----------------------------------------------------------------------*
*                                                                      *
* Start_GFort_seq
      USE AAMDMD
* End_GFort_seq
* Start_G95_seq
*     USE AAMDMD
* End_G95_seq