X-Git-Url: http://gitweb.michael.orlitzky.com/?a=blobdiff_plain;ds=sidebyside;f=src%2FLinear%2FMatrix.hs;fp=src%2FMatrix.hs;h=63c0348cd9e6e0ce676ce5c17c1629890836a6e6;hb=3c5015c938c96f70b15c6292198a01390ee6540a;hp=ae1c5884af20623f27425e10dcd6e8e01e41e823;hpb=b5bc0c0bc71915093d0883e2fd923808ada4db6c;p=numerical-analysis.git diff --git a/src/Matrix.hs b/src/Linear/Matrix.hs similarity index 99% rename from src/Matrix.hs rename to src/Linear/Matrix.hs index ae1c588..63c0348 100644 --- a/src/Matrix.hs +++ b/src/Linear/Matrix.hs @@ -4,10 +4,9 @@ {-# LANGUAGE MultiParamTypeClasses #-} {-# LANGUAGE TypeFamilies #-} -module Matrix +module Linear.Matrix where -import Vector import Data.Vector.Fixed ( Dim, Vector @@ -20,6 +19,8 @@ import qualified Data.Vector.Fixed as V ( ) import Data.Vector.Fixed.Internal (arity) +import Linear.Vector + type Mat v w a = Vn v (Vn w a) type Mat2 a = Mat Vec2D Vec2D a type Mat3 a = Mat Vec3D Vec3D a