diff options
| author | Charles <sircharlesaze@gmail.com> | 2020-03-15 14:34:31 +0100 |
|---|---|---|
| committer | Charles <sircharlesaze@gmail.com> | 2020-03-15 14:34:31 +0100 |
| commit | cc2593028c5f380e177adbf8905a43d665ac64cf (patch) | |
| tree | 3644e175344e1cc70b41ebb7a44cf1d9f3f2b09b /src/matrix.hs | |
| parent | 18c9cfd7c1fb4baf1789f178a8d56ddb8f0f1456 (diff) | |
| download | computorv2-cc2593028c5f380e177adbf8905a43d665ac64cf.tar.gz computorv2-cc2593028c5f380e177adbf8905a43d665ac64cf.tar.bz2 computorv2-cc2593028c5f380e177adbf8905a43d665ac64cf.zip | |
atom module with rational and imaginary types and operations
Diffstat (limited to 'src/matrix.hs')
| -rw-r--r-- | src/matrix.hs | 7 |
1 files changed, 0 insertions, 7 deletions
diff --git a/src/matrix.hs b/src/matrix.hs index 38780bb..7de634b 100644 --- a/src/matrix.hs +++ b/src/matrix.hs @@ -1,10 +1,3 @@ module Matrix where --- import Data.List --- newtype Matrix a = Matrix { getMatrix :: [MatrixRow a] } --- type MatrixRow a = [a] - --- instance Show a => Show (Matrix a) where --- show (Matrix m) = intercalate "\n" (map showLine m) --- where showLine l = "[ " ++ intercalate " , " (map show l) ++ " ]" |