*$ CREATE MULTMP.ADD
*COPY MULTMP
*
*=== multmp ===========================================================*
*
*----------------------------------------------------------------------*
*                                                                      *
*     Copyright (C) 1989-2005      by    Alfredo Ferrari & Paola Sala  *
*     All Rights Reserved.                                             *
*                                                                      *
*                                                                      *
*   Common multmp for the new multiple scattering in Fluka             *
*                  created by A. Ferrari & P. Sala on 23-oct-1989      *
*                                                                      *
*   Last change   on  24-mar-03  by  Alfredo Ferrari, INFN-Milan       *
*                                                                      *
*   Temporary common for saving intermediate mcs results and save time *
*                                                                      *
*----------------------------------------------------------------------*
*
      LOGICAL LMLTMP
      COMMON / MULTMP / EFBLCC, FANOUC, LMLTMP
      SAVE / MULTMP /