4 *=== abltis ===========================================================*
6 *----------------------------------------------------------------------*
8 * This is the old ABLTIS common of Hadrin, extracted and put *
9 * into an include file *
11 * Created on 17 may 1995 by Alfredo Ferrari & Paola Sala *
14 * Last change on 07-feb-97 by Alfredo Ferrari *
16 * Included in the following routines: *
33 *----------------------------------------------------------------------*
35 COMMON / ABLTIS / AM (-6:MXPABL), GA (-6:MXPABL),
36 & TAU (-6:MXPABL), ICH (-6:MXPABL),
37 & IBAR (-6:MXPABL), K1 (-6:MXPABL),