*
* Gigantic resonance cross sections
*
      PARAMETER(DATA1=64, DATA2=62, DATA3=27)
C     energies, cross-sections and errors for 1 neutron case
      real energy1(DATA1), cross1(DATA1), dcross1(DATA1), 
c     energies, cross-sections and errors for 2 neutrons case
     +     energy2(DATA2), cross2(DATA2), dcross2(DATA2),     
c     energies, cross-sections and errors for 3 neutrons case
     +     energy3(DATA3), cross3(DATA3), dcross3(DATA3)      
      common/gpgsigma/energy1, cross1, dcross1, 
     +     energy2, cross2, dcross2,
     +     energy3, cross3, dcross3