DESCRIPTION
This function get the diagonal part of a matrix.
csr<Float> a; dia<Float> d = diag(a);
TODO
Build a csr matrix from a diagonal one or from a vector:
dia<Float> d; csr<Float> a = diag(d); vec<Float> u; csr<Float> b = diag(u);
IMPLEMENTATION
template<class T, class M> dia<T,M> diag (const csr<T,M>& a)