diff options
| author | Carlos Sosa <gnusosa@gnusosa.net> | 2020-03-21 18:41:35 -0700 |
|---|---|---|
| committer | Carlos Sosa <gnusosa@gnusosa.net> | 2020-03-21 18:41:35 -0700 |
| commit | d235a180b642f62b19acc582166255f015d38438 (patch) | |
| tree | bb022c82c393ff475b3e726e8ff4b0a4b79a2683 /ex2/Main.hs | |
| parent | f3e001044829f4864360df87a69695cb962e5d36 (diff) | |
Move to stack src directory
Diffstat (limited to 'ex2/Main.hs')
| -rw-r--r-- | ex2/Main.hs | 28 |
1 files changed, 0 insertions, 28 deletions
diff --git a/ex2/Main.hs b/ex2/Main.hs deleted file mode 100644 index 74d0054..0000000 --- a/ex2/Main.hs +++ /dev/null @@ -1,28 +0,0 @@ -import Shape - -main :: IO () -main = do - putStrLn "Convex Polygon:" - putStrLn - $ show - $ area - (polygon - [ (550, 450) - , (455, 519) - , (491, 631) - , (609, 631) - , (645, 519) - ] - ) - putStrLn "Concave Polygon:" - putStrLn - $ show - $ area - (polygon - [ (550, 580) - , (455, 519) - , (491, 631) - , (609, 631) - , (645, 519) - ] - ) |