exercise 3.6: amazing curve

03-typesandentities/exercises/ex3.6.hs

@@ -0,0 +1,8 @@
+-- Exercise 3.6
+-- George C. Privon
+-- 2023-09-05
+
+amazingCurve :: Int -> Int
+amazingCurve x = if x >= 50
+    then 100
+    else 2*x