_aux_Mathlib_Combinatorics_Additive_DoublingConst___delab_app_Combinatorics_Additive_termσ[_]_1

Lean4

/-- Pretty printer defined by `notation3` command. -/
@[scoped delab✝ app.Finset.addConst]
public meta def «_aux_Mathlib_Combinatorics_Additive_DoublingConst___delab_app_Combinatorics_Additive_termσ[_]_1» :
    Delab✝ :=
  whenPPOption✝ getPPNotation✝ <|
    whenNotPPOption✝ getPPExplicit✝ <|
      withOverApp✝ 5
        (getExpr✝ >>= fun e✝ =>
          (matchApp✝
                  (matchApp✝
                    (matchApp✝ (matchApp✝ (matchApp✝ (matchExpr✝ (Expr.isConstOf✝ · `Finset.addConst)) pure✝) pure✝)
                      pure✝)
                    (matchVar✝ `A))
                  (matchVar✝ `A) >=>
                pure✝)
              MatchState.empty✝ >>=
            fun s✝ => MatchState.delabVar✝ s✝ `A (some✝ e✝) >>= fun A => withHeadRefIfTagAppFns✝ `(σ[$A]))

Похожие утверждения