void write(BinaryWriter& bin, const OScalar<T>& d)
void write(BinaryWriter& bin, const OLattice<T>& d)
void write(BinaryWriter& bin, const OScalar<T>& d){  if (Layout::primaryNode())     bin.writeArray((const char *)&(d.elem()), 		   sizeof(typename WordType<T>::Type_t), 		   sizeof(T) / sizeof(typename WordType<T>::Type_t));}