purescript-0.11.0: examples/failing/NonExhaustivePatGuard.purs

-- @shouldFailWith NoInstanceFound
module Main where

f :: Int -> Int
f x | 1 <- x = x