SCase11.hs:11:14: error: [GHC-39584]
    " SCase11.hs:14:16: sCase: Wildcard makes the remaining matches redundant:
        SCase11.hs:15:16-20: Var s
        SCase11.hs:16:16-22: Add a b
        SCase11.hs:17:16-28: Let _ _a b

    " In the quasi-quotation:
        [sCase|Expr e of
               Zero          -> 0
               Num i         -> i
               _ -> 3
               Var s         -> ite (s .== "a") 1 2
               Add a b       -> t e + t b
               Let _   _a  b -> t b
      |]
   |
11 | t e = [sCase|Expr e of
   |              ^^^^^^^^^...