bali-phy: Error! [1mMain.hs:10.27-48:[1;31m error:[0m[1m
   • case expression failed pattern match
   [1;34m|[0m
[1;34m10[0m [1;34m| [0m  putStrLn $ show $ (case [1;31m(Nothing :: Maybe Int)[0m of
   [1;34m|[0m                           [1;31m^^^^^^^^^^^^^^^^^^^^^^[0m

