common/infoa/natom,nres,cg(maxatom),amass(maxatom),xchg(maxatom), &
      igrph(maxatom),lbres(600),ipres(600),iac(maxatom),no(1000)