Add case...of code

common/code/Code.hs

@@ -51,3 +51,9 @@ addTwo (x:xs) = (x + 2) : addTwo xs
 
 f'' :: String -> Bool
 f'' xs = even . length . (\x -> x ++ "Hello world") $ xs
+
+g :: Int -> Bool
+g x = case x - 2 of
+  2 -> True
+  5 -> True
+  x -> False