*$ CREATE REDVER.ADD *COPY REDVER * *=== redver ===========================================================* * *----------------------------------------------------------------------* * * * Created on 10 december 1991 by Alfredo Ferrari & Paola Sala * * Infn - Milan * * * * Last change on 10-dec-91 by Alfredo Ferrari * * * * This is the original common redver of Hadrin * * * * Included in the following routines: * * * * CALUMV * * DATESH * * HADRIV * * RCHANV * * BDHDR2 * * IEFUN * * SIGINT * * RCHANW * * * *----------------------------------------------------------------------* * COMMON / REDVER / THRESH (268), IRII (17) , IKII (17) , IEII (17)