diff options
| author | Charles <sircharlesaze@gmail.com> | 2020-03-14 12:41:34 +0100 |
|---|---|---|
| committer | Charles <sircharlesaze@gmail.com> | 2020-03-14 12:41:34 +0100 |
| commit | 18c9cfd7c1fb4baf1789f178a8d56ddb8f0f1456 (patch) | |
| tree | 7ad79406c98e0ed520a852616e9d8d48de6ab54d /src/imag.hs | |
| parent | e0ade28ab642c043501493fe7192b626a6a68115 (diff) | |
| download | computorv2-18c9cfd7c1fb4baf1789f178a8d56ddb8f0f1456.tar.gz computorv2-18c9cfd7c1fb4baf1789f178a8d56ddb8f0f1456.tar.bz2 computorv2-18c9cfd7c1fb4baf1789f178a8d56ddb8f0f1456.zip | |
Draft expr compatibility
Diffstat (limited to 'src/imag.hs')
| -rw-r--r-- | src/imag.hs | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/imag.hs b/src/imag.hs index 71c0607..16ac28e 100644 --- a/src/imag.hs +++ b/src/imag.hs @@ -1,6 +1,6 @@ module Imag where -newtype Imag = Imag { getImag :: Float } +-- newtype Imag = Imag { getImag :: Float } -instance Show Imag where - show (Imag i) = show i ++ "i" +-- instance Show Imag where +-- show (Imag i) = show i ++ "i" |