c	spur_info.inc

      integer		len_line
      parameter	(len_line = 80)

      integer	max_annote
      parameter (max_annote=25)

      character*56 stndannote(max_annote)
      common /cb_stndannote/ stndannote

      character*80 annotation(max_annote)
      integer len_annote
      common /cb_annote/ annotation, len_annote

      integer*4 annoteoptions
      common /cb_annoteoptions/ annoteoptions
      
      character*80 nullstring
      common /cb_nullstring/ nullstring

c	integer		info_lentxt
c	parameter	(info_lentxt = 132)

c        integer         linfo_version
c        parameter       (linfo_version = 1)
c	integer		linfo_results
c	parameter	(linfo_results = 2)
c	integer		linfo_plottype
c	parameter	(linfo_plottype = 3)
c	integer		linfo_plotinfo
c	parameter	(linfo_plotinfo = 4)
c	integer		linfo_add
c	parameter	(linfo_add = 5)
c	integer		linfo_sub
c	parameter	(linfo_sub = 6)	
c	integer		linfo_illinst
c	parameter	(linfo_illinst = 7)
c	integer		linfo_messwav
c	parameter	(linfo_messwav = 8)
c	integer		linfo_messdet
c	parameter	(linfo_messdet = 9)
c	integer		linfo_messcol
c	parameter	(linfo_messcol = 10)
c	integer		linfo_messsample
c	parameter	(linfo_messsample = 11)
c	integer		linfo_centre
c	parameter	(linfo_centre = 12)
c	integer		linfo_beamstop
c	parameter	(linfo_beamstop = 13)
c	integer		linfo_norm
c	parameter	(linfo_norm = 14)
c	integer		linfo_shift
c	parameter	(linfo_shift = 15)
c	integer		linfo_eff
c	parameter	(linfo_eff = 16)
c	integer		linfo_analopt1
c	parameter	(linfo_analopt1 = 17)
c	integer		linfo_analopt2
c	parameter	(linfo_analopt2 = 18)
c	integer		linfo_numbx
c	parameter	(linfo_numbx = 19)
c	integer		linfo_numby
c	parameter	(linfo_numby = 20)
c        integer         linfo_smoo
c        parameter       (linfo_smoo = 21)
c        integer         linfo_warning
c        parameter       (linfo_warning = 22)
c
cc	integer		linfo_
cc	parameter	(linfo_ = )
c
c	integer		info_nmax
c	parameter	(info_nmax = 22)	!! number of lines of text.c
c
c
cc	Array of character strings
c	character	info_txt(info_nmax)*132, nullstring
c	common/info_info/ info_txt, nullstring
c
cc---------------------------------------------------------------
c
c	integer		nmax_alspur
c	parameter	(nmax_alspur = 10) !! max # of lines for al spurions.
c	character	info_alspur(nmax_alspur)*132
c	common/info_alspur/ info_alspur
c
cc---------------------------------------------------------------
c	integer		nmax_espur
c	parameter	(nmax_espur = 10)  !! max # of lines for elastic spurions.
c	character	info_espur(nmax_espur)*132
c	common/info_espur/ info_espur
c
cc---------------------------------------------------------------
c	integer		nmax_inspur
c	parameter	(nmax_inspur = 10) !! max # of lines of inelastic spurions.
c	character	info_inspur(nmax_inspur)*132
c	common/info_inspur/ info_inspu
c
