COMMON/HISTO2/idhist,nbBins,valmin,valmax,valunit PARAMETER (MaxHist = 10) LOGICAL histo COMMON/HISTO3/histo(MaxHist),histUnit(MaxHist),binWidth(MaxHist)