{-# LANGUAGE NoBinaryLiterals #-} module TFindLiteralIntCase where caseExpression x = case x of 57 -> "testing to find literals in matching cases" _ -> ""