dest[i].elem() = src.elem(i);
int iouter = i >> INNER_LOG; int iinner = i & ((1 << INNER_LOG)-1);  dest[i].elem() = getSite(src.elem(iouter),iinner);
QDP_extract(multi1d<OScalar<T> >& dest, const OLattice<T>& src, const Subset& s){#if ! defined(QDP_NOT_IMPLEMENTED)  const int *tab = s.siteTable().slice();  for(int j=0; j < s.numSiteTable(); ++j)   {    int i = tab[j];    dest[i].elem() = src.elem(i);  }#else  QDP_error_exit("QDP_extract_UnorderedSubset not implemented");#endif}