real*4 coeff(4,max_elements) integer*4 expon(4,max_elements) common /recon_elements/ > coeff, !Coefficients. > expon !Exponents.