double precision delg1_z,delg1_g,lambda_g,lambda_z,
     & h1Z,h2Z,h3Z,h4Z,h1gam,h2gam,h3gam,h4gam,
     & delk_g,delk_z,tevscale
      double precision xdelg1_z,xdelg1_g,xlambda_g,xlambda_z,
     & h1tZ,h2tZ,h3tZ,h4tZ,h1tgam,h2tgam,h3tgam,h4tgam,
     & xdelk_g,xdelk_z
      logical anomtgc
      common/anomcoup/delg1_z,delg1_g,lambda_g,lambda_z,delk_g,delk_z,
     & h1Z,h2Z,h3Z,h4Z,h1gam,h2gam,h3gam,h4gam,
     & tevscale,anomtgc