integer nmap,res1,res2,nstep,kang
      double precision ang_from,ang_to
      common /mapp/ ang_from(maxvar),ang_to(maxvar),nmap,kang(maxvar),
     &  res1(maxvar),res2(maxvar),nstep(maxvar)