Function tensor1 

pub fn tensor1<A>(xs: &[A]) -> Tensor
where
    A: Datum,