void evaluate(OLattice<T>& dest, const Op& op, const QDPExpr<RHS,OScalar<T1> >& rhs, const Subset& s)
void evaluate(OLattice<T>& dest, const Op& op, const QDPExpr<RHS,OLattice<T1> >& rhs, const Subset s)
void evaluate(OLattice<T>& dest, const Op& op, const QDPExpr<RHS,OScalar<T1> >& rhs,	      const Subset& s){//  cerr << "In evaluate(olattice,oscalar)\n";  const int *tab = s.SiteTable()->slice();  for(int j=0; j < s.NumSiteTable(); ++j)   {    int i = tab[j];//    fprintf(stderr,"eval(olattice,oscalar): site %d\n",i);//    op(dest.elem(i), forEach(rhs, ElemLeaf(), OpCombine()));    op(dest.elem(i), forEach(rhs, EvalLeaf1(0), OpCombine()));  }}