More

2017-09-12 17:06:33 +03:00 · 2017-09-12 17:06:33 +03:00 · 92df99aa2b
parent 31f7bc363c
commit 92df99aa2b
1 changed files with 9 additions and 0 deletions
--- a/prax1/prax1.hs
+++ b/prax1/prax1.hs
@ -1 +1,10 @@
 -- This is a comment
+
+doubleMe x = x * 3
+
+doubleUs x y = doubleMe x + doubleMe y
+
+doubleSmallNumber x = if x <= 100 then doubleMe x else x
+
+-- ' <- uptick is used as convetion to mark lightly modified function
+doubleSmallNumber' x = (if x <= 100 then doubleMe x else x) + 1