expandFoldr — Mathlib

Lean4
@[term_parser 1000]
public meta def expandFoldr : Lean.ParserDescr✝ :=
  ParserDescr.node✝ `Mathlib.Notation3.expandFoldr 1024
    (ParserDescr.binary✝ `andthen
      (ParserDescr.binary✝ `andthen
        (ParserDescr.binary✝ `andthen
          (ParserDescr.binary✝ `andthen
            (ParserDescr.binary✝ `andthen
              (ParserDescr.binary✝ `andthen
                (ParserDescr.binary✝ `andthen
                  (ParserDescr.binary✝ `andthen
                    (ParserDescr.binary✝ `andthen
                      (ParserDescr.binary✝ `andthen
                        (ParserDescr.binary✝ `andthen (ParserDescr.symbol✝ "expand_foldr% ") (ParserDescr.symbol✝ "("))
                        (ParserDescr.const✝ `ident))
                      (ParserDescr.unary✝ `group (ParserDescr.const✝ `ppSpace)))
                    (ParserDescr.const✝ `ident))
                  (ParserDescr.symbol✝ " => "))
                (ParserDescr.cat✝ `term 0))
              (ParserDescr.symbol✝ ") "))
            (ParserDescr.cat✝ `term 1024))
          (ParserDescr.symbol✝ " ["))
        ((with_annotate_term"sepBy(" @ParserDescr.sepBy✝) (ParserDescr.cat✝ `term 0) "," (ParserDescr.symbol✝ ", ")
          Bool.false✝))
      (ParserDescr.symbol✝ "]"))
Похожие утверждения