Function rctensor1 

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