fay-0.18.0.0: tests/whereBind2.hs

import           Prelude

someFun :: Int -> String
someFun x = fun x
  where fun x | x < 50 = "ok"
              | otherwise = "nop"

main :: Fay ()
main = do
    putStrLn (someFun 30)
    putStrLn (someFun 100)