From 92df99aa2bc13ad908003639a10666b852a57fed Mon Sep 17 00:00:00 2001 From: Arti Zirk Date: Tue, 12 Sep 2017 17:06:33 +0300 Subject: [PATCH] More --- prax1/prax1.hs | 9 +++++++++ 1 file changed, 9 insertions(+) diff --git a/prax1/prax1.hs b/prax1/prax1.hs index 5e7aa74..16ed447 100644 --- 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