c common block variables 
c the common block name is arbitrary, in this case, called chris 
c the variables should be the same type declaration, so there 
c should be one block for integers, one for reals, one for
c double precision, etc
c
c the dimension is n, which is given as a parameter 
c the dimension for g and chi take place in the common block declaration

        integer          n
        parameter        (n=3)
	double precision temp,chi,g

	COMMON /chris/ temp,chi(n),g(n)


c end of file