module ParserNoLambdaCase where f = \case "1" -> 1