t_onesvector (n) = vector (n,i,1)

t_zerovector (n) = vector(n,i,0)