Add SVD impl for &ArrayBase, &mut ArrayBase

Author: termoshtt

src/svd.rs

@@ -15,6 +15,38 @@ impl<A, S, Su, Svt, Ss> SVD<ArrayBase<Su, Ix2>, ArrayBase<Ss, Ix1>, ArrayBase<Sv
           Su: DataOwned<Elem = A>,
           Svt: DataOwned<Elem = A>,
           Ss: DataOwned<Elem = A::Real>
+{
+    fn svd(mut self,
+           calc_u: bool,
+           calc_vt: bool)
+           -> Result<(Option<ArrayBase<Su, Ix2>>, ArrayBase<Ss, Ix1>, Option<ArrayBase<Svt, Ix2>>)> {
+        (&mut self).svd(calc_u, calc_vt)
+    }
+}
+
+impl<'a, A, S, Su, Svt, Ss> SVD<ArrayBase<Su, Ix2>, ArrayBase<Ss, Ix1>, ArrayBase<Svt, Ix2>> for &'a ArrayBase<S, Ix2>
+    where A: LapackScalar + Clone,
+          S: Data<Elem = A>,
+          Su: DataOwned<Elem = A>,
+          Svt: DataOwned<Elem = A>,
+          Ss: DataOwned<Elem = A::Real>
+{
+    fn svd(self,
+           calc_u: bool,
+           calc_vt: bool)
+           -> Result<(Option<ArrayBase<Su, Ix2>>, ArrayBase<Ss, Ix1>, Option<ArrayBase<Svt, Ix2>>)> {
+        let a = self.to_owned();
+        a.svd(calc_u, calc_vt)
+    }
+}
+
+impl<'a, A, S, Su, Svt, Ss> SVD<ArrayBase<Su, Ix2>, ArrayBase<Ss, Ix1>, ArrayBase<Svt, Ix2>>
+    for &'a mut ArrayBase<S, Ix2>
+    where A: LapackScalar,
+          S: DataMut<Elem = A>,
+          Su: DataOwned<Elem = A>,
+          Svt: DataOwned<Elem = A>,
+          Ss: DataOwned<Elem = A::Real>
 {
     fn svd(mut self,
            calc_u: bool,