diff --git a/stage0/src/Init.lean b/stage0/src/Init.lean index 8e850e3eb0..d87f6604ad 100644 --- a/stage0/src/Init.lean +++ b/stage0/src/Init.lean @@ -17,3 +17,4 @@ import Init.Fix import Init.Meta import Init.NotationExtra import Init.SimpLemmas +import Init.Hints diff --git a/stage0/src/Init/Hints.lean b/stage0/src/Init/Hints.lean new file mode 100644 index 0000000000..e8a2904e63 --- /dev/null +++ b/stage0/src/Init/Hints.lean @@ -0,0 +1,12 @@ +/- +Copyright (c) 2021 Microsoft Corporation. All rights reserved. +Released under Apache 2.0 license as described in the file LICENSE. +Authors: Leonardo de Moura +-/ +prelude +import Init.NotationExtra + +/- Hint for making sure `Not p` is definitionally equal to `p → False` even when + `TransparencyMode.reducible` -/ +unif_hint (p : Prop) where + |- Not p =?= p → False diff --git a/stage0/src/Init/Meta.lean b/stage0/src/Init/Meta.lean index 534c8674e2..9e8c277a92 100644 --- a/stage0/src/Init/Meta.lean +++ b/stage0/src/Init/Meta.lean @@ -843,6 +843,7 @@ structure Config where iota : Bool := true proj : Bool := true ctorEq : Bool := true + decide : Bool := true deriving Inhabited, BEq, Repr end Meta.Simp diff --git a/stage0/src/Init/Prelude.lean b/stage0/src/Init/Prelude.lean index 436c032638..5243e3a17f 100644 --- a/stage0/src/Init/Prelude.lean +++ b/stage0/src/Init/Prelude.lean @@ -488,7 +488,7 @@ instance : Pow Nat where set_option bootstrap.genMatcherCode false in @[extern "lean_nat_dec_eq"] -def Nat.beq : Nat → Nat → Bool +def Nat.beq : (@& Nat) → (@& Nat) → Bool | zero, zero => true | zero, succ m => false | succ n, zero => false @@ -521,7 +521,7 @@ protected def Nat.decEq (n m : @& Nat) : Decidable (Eq n m) := set_option bootstrap.genMatcherCode false in @[extern "lean_nat_dec_le"] -def Nat.ble : Nat → Nat → Bool +def Nat.ble : @& Nat → @& Nat → Bool | zero, zero => true | zero, succ m => true | succ n, zero => false @@ -635,7 +635,7 @@ protected theorem Nat.ltOfLeOfNe {n m : Nat} (h₁ : LessEq n m) (h₂ : Not (Eq set_option bootstrap.genMatcherCode false in @[extern c inline "lean_nat_sub(#1, lean_box(1))"] -def Nat.pred : Nat → Nat +def Nat.pred : (@& Nat) → Nat | 0 => 0 | succ a => a @@ -701,7 +701,7 @@ def UInt8.size : Nat := 256 structure UInt8 where val : Fin UInt8.size -attribute [extern "lean_uint8_of_nat"] UInt8.mk +attribute [extern "lean_uint8_of_nat_mk"] UInt8.mk attribute [extern "lean_uint8_to_nat"] UInt8.val @[extern "lean_uint8_of_nat"] @@ -725,7 +725,7 @@ def UInt16.size : Nat := 65536 structure UInt16 where val : Fin UInt16.size -attribute [extern "lean_uint16_of_nat"] UInt16.mk +attribute [extern "lean_uint16_of_nat_mk"] UInt16.mk attribute [extern "lean_uint16_to_nat"] UInt16.val @[extern "lean_uint16_of_nat"] @@ -749,7 +749,7 @@ def UInt32.size : Nat := 4294967296 structure UInt32 where val : Fin UInt32.size -attribute [extern "lean_uint32_of_nat"] UInt32.mk +attribute [extern "lean_uint32_of_nat_mk"] UInt32.mk attribute [extern "lean_uint32_to_nat"] UInt32.val @[extern "lean_uint32_of_nat"] @@ -797,7 +797,7 @@ def UInt64.size : Nat := 18446744073709551616 structure UInt64 where val : Fin UInt64.size -attribute [extern "lean_uint64_of_nat"] UInt64.mk +attribute [extern "lean_uint64_of_nat_mk"] UInt64.mk attribute [extern "lean_uint64_to_nat"] UInt64.val @[extern "lean_uint64_of_nat"] @@ -828,7 +828,7 @@ theorem usizeSzEq : Or (Eq USize.size 4294967296) (Eq USize.size 184467440737095 structure USize where val : Fin USize.size -attribute [extern "lean_usize_of_nat"] USize.mk +attribute [extern "lean_usize_of_nat_mk"] USize.mk attribute [extern "lean_usize_to_nat"] USize.val @[extern "lean_usize_of_nat"] @@ -878,7 +878,7 @@ private theorem validCharIsUInt32 {n : Nat} (h : n.isValidChar) : Less n UInt32. | Or.inr ⟨_, h⟩ => Nat.ltTrans h (decide! : Less 1114112 UInt32.size) @[extern "lean_uint32_of_nat"] -private def Char.ofNatAux (n : Nat) (h : n.isValidChar) : Char := +private def Char.ofNatAux (n : @& Nat) (h : n.isValidChar) : Char := { val := ⟨{ val := n, isLt := validCharIsUInt32 h }⟩, valid := h } @[noinline, matchPattern] diff --git a/stage0/src/Init/SimpLemmas.lean b/stage0/src/Init/SimpLemmas.lean index 1e880f9098..57651d34c9 100644 --- a/stage0/src/Init/SimpLemmas.lean +++ b/stage0/src/Init/SimpLemmas.lean @@ -20,6 +20,15 @@ theorem eqTrue (h : p) : p = True := theorem eqFalse (h : ¬ p) : p = False := propext <| Iff.intro (fun h' => absurd h' h) (fun h' => False.elim h') +theorem eqFalse' (h : p → False) : p = False := + propext <| Iff.intro (fun h' => absurd h' h) (fun h' => False.elim h') + +theorem eqTrueOfDecide {p : Prop} {s : Decidable p} (h : decide p = true) : p = True := + propext <| Iff.intro (fun h => trivial) (fun _ => ofDecideEqTrue h) + +theorem eqFalseOfDecide {p : Prop} {s : Decidable p} (h : decide p = false) : p = False := + propext <| Iff.intro (fun h' => absurd h' (ofDecideEqFalse h)) (fun h => False.elim h) + theorem impCongr {p₁ p₂ : Sort u} {q₁ q₂ : Sort v} (h₁ : p₁ = p₂) (h₂ : q₁ = q₂) : (p₁ → q₁) = (p₂ → q₂) := h₁ ▸ h₂ ▸ rfl @@ -60,3 +69,22 @@ theorem diteCongr {s : Decidable b} [Decidable c] cases Decidable.em c with | inl h => rw [difPos h]; subst b; rw [difPos h]; exact h₂ h | inr h => rw [difNeg h]; subst b; rw [difNeg h]; exact h₃ h + +namespace Lean.Simp + +@[simp] theorem Ne_Eq (a b : α) : (a ≠ b) = Not (a = b) := rfl +@[simp] theorem ite_True (a b : α) : (if True then a else b) = a := rfl +@[simp] theorem ite_False (a b : α) : (if False then a else b) = b := rfl +@[simp] theorem And_self (p : Prop) : (p ∧ p) = p := propext <| Iff.intro (fun h => h.1) (fun h => ⟨h, h⟩) +@[simp] theorem And_True (p : Prop) : (p ∧ True) = p := propext <| Iff.intro (fun h => h.1) (fun h => ⟨h, trivial⟩) +@[simp] theorem True_And (p : Prop) : (True ∧ p) = p := propext <| Iff.intro (fun h => h.2) (fun h => ⟨trivial, h⟩) +@[simp] theorem And_False (p : Prop) : (p ∧ False) = False := propext <| Iff.intro (fun h => h.2) (fun h => False.elim h) +@[simp] theorem False_And (p : Prop) : (False ∧ p) = False := propext <| Iff.intro (fun h => h.1) (fun h => False.elim h) +@[simp] theorem Or_self (p : Prop) : (p ∨ p) = p := propext <| Iff.intro (fun | Or.inl h => h | Or.inr h => h) (fun h => Or.inl h) +@[simp] theorem Or_True (p : Prop) : (p ∨ True) = True := propext <| Iff.intro (fun h => trivial) (fun h => Or.inr trivial) +@[simp] theorem True_Or (p : Prop) : (True ∨ p) = True := propext <| Iff.intro (fun h => trivial) (fun h => Or.inl trivial) +@[simp] theorem Or_False (p : Prop) : (p ∨ False) = p := propext <| Iff.intro (fun | Or.inl h => h | Or.inr h => False.elim h) (fun h => Or.inl h) +@[simp] theorem False_Or (p : Prop) : (False ∨ p) = p := propext <| Iff.intro (fun | Or.inr h => h | Or.inl h => False.elim h) (fun h => Or.inr h) +@[simp] theorem Iff_self (p : Prop) : (p ↔ p) = True := propext <| Iff.intro (fun h => trivial) (fun _ => Iff.intro id id) + +end Lean.Simp diff --git a/stage0/src/Lean/Elab/Tactic/Simp.lean b/stage0/src/Lean/Elab/Tactic/Simp.lean index 94680f25d6..d00f658b1e 100644 --- a/stage0/src/Lean/Elab/Tactic/Simp.lean +++ b/stage0/src/Lean/Elab/Tactic/Simp.lean @@ -74,7 +74,7 @@ def elabSimpConfig (optConfig : Syntax) : TermElabM Meta.Simp.Config := do evalSimpConfig (← instantiateMVars c) /-- Return `some c`, if `e` is of the form `c.{?u_1, ..., ?u_n} ?m_1 ... ?m_k` -/ -private def isGlobalLemma? (e : Expr) : Option Name := +private def isGlobalDecl? (e : Expr) : Option Name := e.withApp fun f args => if f.isConst && args.all (·.isMVar) && f.constLevels!.all (·.isMVar) then some f.constName! @@ -94,17 +94,22 @@ private def elabSimpLemmas (stx : Syntax) (ctx : Simp.Context) : TacticM Simp.Co let (g, _) ← getMainGoal withMVarContext g do let mut lemmas := ctx.simpLemmas - for simpLemma in stx[1].getSepArgs do + let mut toUnfold : NameSet := {} + for arg in stx[1].getSepArgs do let post := - if simpLemma[0].isNone then + if arg[0].isNone then true else - simpLemma[0][0].getKind == ``Parser.Tactic.simpPost - let lemma ← elabTerm simpLemma[1] none (mayPostpone := false) - match isGlobalLemma? lemma with - | some declName => lemmas ← lemmas.addConst declName post - | none => lemmas ← lemmas.add lemma post - return { ctx with simpLemmas := lemmas } + arg[0][0].getKind == ``Parser.Tactic.simpPost + let arg ← elabTerm arg[1] none (mayPostpone := false) + match isGlobalDecl? arg with + | some declName => + if (← isProof arg) then + lemmas ← lemmas.addConst declName post + else + toUnfold := toUnfold.insert declName + | none => lemmas ← lemmas.add arg post + return { ctx with simpLemmas := lemmas, toUnfold := toUnfold } @[builtinTactic Lean.Parser.Tactic.simp] def evalSimp : Tactic := fun stx => do let ctx ← elabSimpLemmas stx[1] { config := (← elabSimpConfig stx[2]), simpLemmas := (← getSimpLemmas), congrLemmas := (← getCongrLemmas) } diff --git a/stage0/src/Lean/Meta/AppBuilder.lean b/stage0/src/Lean/Meta/AppBuilder.lean index 20cf09bb26..b9fd3c5f7d 100644 --- a/stage0/src/Lean/Meta/AppBuilder.lean +++ b/stage0/src/Lean/Meta/AppBuilder.lean @@ -436,10 +436,20 @@ def mkOfEqTrue (h : Expr) : MetaM Expr := def mkEqTrue (h : Expr) : MetaM Expr := mkAppM ``eqTrue #[h] -/-- Return `eqFalse h` -/ +/-- + Return `eqFalse h` + `h` must have type definitionally equal to `¬ p` in the current + reducibility setting. -/ def mkEqFalse (h : Expr) : MetaM Expr := mkAppM ``eqFalse #[h] +/-- + Return `eqFalse' h` + `h` must have type definitionally equal to `p → False` in the current + reducibility setting. -/ +def mkEqFalse' (h : Expr) : MetaM Expr := + mkAppM ``eqFalse' #[h] + def mkImpCongr (h₁ h₂ : Expr) : MetaM Expr := mkAppM ``impCongr #[h₁, h₂] diff --git a/stage0/src/Lean/Meta/Tactic/Simp/Rewrite.lean b/stage0/src/Lean/Meta/Tactic/Simp/Rewrite.lean index 20eafdace4..05fe2263e4 100644 --- a/stage0/src/Lean/Meta/Tactic/Simp/Rewrite.lean +++ b/stage0/src/Lean/Meta/Tactic/Simp/Rewrite.lean @@ -52,6 +52,7 @@ where | SimpLemmaKind.neg => return type.appArg! | SimpLemmaKind.eq => return type.appFn!.appArg! | SimpLemmaKind.iff => return type.appFn!.appArg! + | SimpLemmaKind.ne => mkEq type.appFn!.appArg! type.appArg! getRHS (kind : SimpLemmaKind) (type : Expr) : MetaM Expr := match kind with @@ -59,6 +60,7 @@ where | SimpLemmaKind.neg => return mkConst `False | SimpLemmaKind.eq => return type.appArg! | SimpLemmaKind.iff => return type.appArg! + | SimpLemmaKind.ne => return mkConst `False finalizeProof (kind : SimpLemmaKind) (proof : Expr) : MetaM Expr := match kind with @@ -66,6 +68,7 @@ where | SimpLemmaKind.iff => mkPropExt proof | SimpLemmaKind.pos => mkEqTrue proof | SimpLemmaKind.neg => mkEqFalse proof + | SimpLemmaKind.ne => mkEqFalse proof tryLemma? (lemma : SimpLemma) : SimpM (Option Result) := withNewMCtxDepth do @@ -91,12 +94,73 @@ where trace[Meta.Tactic.simp.unify]! "{lemma}, failed to unify {lhs} with {e}" return none -def preDefault (e : Expr) (discharge? : Expr → SimpM (Option Expr)) : SimpM Step := do +def rewriteCtorEq? (e : Expr) : MetaM (Option Result) := withReducibleAndInstances do + match e.eq? with + | none => return none + | some (_, lhs, rhs) => + let lhs ← whnf lhs + let rhs ← whnf rhs + let env ← getEnv + match lhs.constructorApp? env, rhs.constructorApp? env with + | some (c₁, _), some (c₂, _) => + if c₁.name != c₂.name then + withLocalDeclD `h e fun h => + return some { expr := mkConst ``False, proof? := (← mkEqFalse' (← mkLambdaFVars #[h] (← mkNoConfusion (mkConst ``False) h))) } + else + return none + | _, _ => return none + +@[inline] def tryRewriteCtorEq (e : Expr) (x : SimpM Step) : SimpM Step := do + match (← rewriteCtorEq? e) with + | some r => return Step.done r + | none => x + +def rewriteUsingDecide? (e : Expr) : MetaM (Option Result) := withReducibleAndInstances do + if e.hasFVar || e.hasMVar then + return none + else + try + let d ← mkDecide e + let r ← withDefault <| whnf d + if r.isConstOf ``true then + return some { expr := mkConst ``True, proof? := mkAppN (mkConst ``eqTrueOfDecide) #[e, d.appArg!, (← mkEqRefl (mkConst ``true))] } + else if r.isConstOf ``false then + let h ← mkEqRefl d + return some { expr := mkConst ``False, proof? := mkAppN (mkConst ``eqFalseOfDecide) #[e, d.appArg!, (← mkEqRefl (mkConst ``false))] } + else + return none + catch _ => + return none + +@[inline] def tryRewriteUsingDecide (e : Expr) (x : SimpM Step) : SimpM Step := do + if (← read).config.decide then + match (← rewriteUsingDecide? e) with + | some r => return Step.done r + | none => x + else + x + +@[inline] def tryUnfold (e : Expr) (x : SimpM Step) : SimpM Step := do + if e.isApp && e.getAppFn.isConst && (← read).toUnfold.contains e.getAppFn.constName! then + -- TODO: try simp lemmas + match (← withDefault <| unfoldDefinition? e) with + | some eNew => return Step.visit { expr := eNew } + | none => x + else + x + +def rewritePre (e : Expr) (discharge? : Expr → SimpM (Option Expr)) : SimpM Step := do let lemmas ← (← read).simpLemmas return Step.visit (← rewrite e lemmas.pre discharge? (tag := "pre")) -def postDefault (e : Expr) (discharge? : Expr → SimpM (Option Expr)) : SimpM Step := do +def rewritePost (e : Expr) (discharge? : Expr → SimpM (Option Expr)) : SimpM Step := do let lemmas ← (← read).simpLemmas return Step.visit (← rewrite e lemmas.post discharge? (tag := "post")) +def preDefault (e : Expr) (discharge? : Expr → SimpM (Option Expr)) : SimpM Step := + tryRewriteCtorEq e <| rewritePre e discharge? + +def postDefault (e : Expr) (discharge? : Expr → SimpM (Option Expr)) : SimpM Step := do + tryRewriteCtorEq e <| tryRewriteUsingDecide e <| tryUnfold e <| rewritePost e discharge? + end Lean.Meta.Simp diff --git a/stage0/src/Lean/Meta/Tactic/Simp/SimpLemmas.lean b/stage0/src/Lean/Meta/Tactic/Simp/SimpLemmas.lean index b61517bff9..11c4adb48a 100644 --- a/stage0/src/Lean/Meta/Tactic/Simp/SimpLemmas.lean +++ b/stage0/src/Lean/Meta/Tactic/Simp/SimpLemmas.lean @@ -7,11 +7,12 @@ import Lean.ScopedEnvExtension import Lean.Util.Recognizers import Lean.Meta.LevelDefEq import Lean.Meta.DiscrTree +import Lean.Meta.AppBuilder namespace Lean.Meta inductive SimpLemmaKind where - | eq | iff | pos | neg + | eq | iff | ne | pos | neg deriving Inhabited, BEq structure SimpLemma where @@ -85,6 +86,9 @@ def mkSimpLemmaCore (e : Expr) (val : Expr) (post : Bool) (prio : Nat) (name? : match type.iff? with | some (lhs, rhs) => pure (← DiscrTree.mkPath lhs, ← isPerm lhs rhs, SimpLemmaKind.iff) | none => + match type.ne? with + | some (_, lhs, rhs) => pure (← DiscrTree.mkPath (← mkEq lhs rhs), false, SimpLemmaKind.ne) + | none => match type.not? with | some lhs => pure (← DiscrTree.mkPath lhs, false, SimpLemmaKind.neg) | none => pure (← DiscrTree.mkPath type, false, SimpLemmaKind.pos) diff --git a/stage0/src/Lean/Meta/Tactic/Simp/Types.lean b/stage0/src/Lean/Meta/Tactic/Simp/Types.lean index e2b4bb4678..ea9b294670 100644 --- a/stage0/src/Lean/Meta/Tactic/Simp/Types.lean +++ b/stage0/src/Lean/Meta/Tactic/Simp/Types.lean @@ -21,6 +21,7 @@ structure Context where config : Config simpLemmas : SimpLemmas congrLemmas : CongrLemmas + toUnfold : NameSet := {} parent? : Option Expr := none structure State where diff --git a/stage0/src/Lean/PrettyPrinter/Delaborator/Builtins.lean b/stage0/src/Lean/PrettyPrinter/Delaborator/Builtins.lean index 365d2bd691..ca2b3ced56 100644 --- a/stage0/src/Lean/PrettyPrinter/Delaborator/Builtins.lean +++ b/stage0/src/Lean/PrettyPrinter/Delaborator/Builtins.lean @@ -576,7 +576,7 @@ partial def delabDoElems : DelabM (List Syntax) := do prependAndRec `(doElem|let $n:term ← $ma) else prependAndRec `(doElem|$ma:term) - | _ => delabAndRet + | _ => failure else if e.isLet then let Expr.letE n t v b _ ← getExpr | unreachable! let n ← getUnusedName n b @@ -587,10 +587,10 @@ partial def delabDoElems : DelabM (List Syntax) := do descend b 2 $ prependAndRec `(doElem|let $(mkIdent n) : $stxT := $stxV) else - delabAndRet + let stx ← delab + [←`(doElem|$stx:term)] where prependAndRec x : DelabM _ := List.cons <$> x <*> delabDoElems - delabAndRet : DelabM _ := do let stx ← delab; [←`(doElem|$stx:term)] @[builtinDelab app.Bind.bind] def delabDo : Delab := whenPPOption getPPNotation do diff --git a/stage0/src/Lean/Util/Recognizers.lean b/stage0/src/Lean/Util/Recognizers.lean index ff969f7469..34b47d5dd0 100644 --- a/stage0/src/Lean/Util/Recognizers.lean +++ b/stage0/src/Lean/Util/Recognizers.lean @@ -40,6 +40,9 @@ namespace Expr @[inline] def eq? (p : Expr) : Option (Expr × Expr × Expr) := p.app3? ``Eq +@[inline] def ne? (p : Expr) : Option (Expr × Expr × Expr) := + p.app3? ``Ne + @[inline] def iff? (p : Expr) : Option (Expr × Expr) := p.app2? ``Iff diff --git a/stage0/src/include/lean/lean.h b/stage0/src/include/lean/lean.h index 9aeca7aeca..4736328edc 100644 --- a/stage0/src/include/lean/lean.h +++ b/stage0/src/include/lean/lean.h @@ -1648,6 +1648,8 @@ static inline uint8_t lean_int_dec_nonneg(b_lean_obj_arg a) { uint8_t lean_uint8_of_big_nat(b_lean_obj_arg a); static inline uint8_t lean_uint8_of_nat(b_lean_obj_arg a) { return lean_is_scalar(a) ? (uint8_t)(lean_unbox(a)) : lean_uint8_of_big_nat(a); } +/* Remark: the following function is used to implement the constructor `UInt8.mk`. We can't annotate constructors with `@&` */ +static inline uint8_t lean_uint8_of_nat_mk(lean_obj_arg a) { uint8_t r = lean_uint8_of_nat(a); lean_dec(a); return r; } static inline lean_obj_res lean_uint8_to_nat(uint8_t a) { return lean_usize_to_nat((size_t)a); } static inline uint8_t lean_uint8_add(uint8_t a1, uint8_t a2) { return a1+a2; } static inline uint8_t lean_uint8_sub(uint8_t a1, uint8_t a2) { return a1-a2; } @@ -1670,6 +1672,8 @@ static inline uint8_t lean_uint8_dec_le(uint8_t a1, uint8_t a2) { return a1 <= a uint16_t lean_uint16_of_big_nat(b_lean_obj_arg a); static inline uint16_t lean_uint16_of_nat(b_lean_obj_arg a) { return lean_is_scalar(a) ? (int16_t)(lean_unbox(a)) : lean_uint16_of_big_nat(a); } +/* Remark: the following function is used to implement the constructor `UInt16.mk`. We can't annotate constructors with `@&` */ +static inline uint16_t lean_uint16_of_nat_mk(lean_obj_arg a) { uint16_t r = lean_uint16_of_nat(a); lean_dec(a); return r; } static inline lean_obj_res lean_uint16_to_nat(uint16_t a) { return lean_usize_to_nat((size_t)a); } static inline uint16_t lean_uint16_add(uint16_t a1, uint16_t a2) { return a1+a2; } static inline uint16_t lean_uint16_sub(uint16_t a1, uint16_t a2) { return a1-a2; } @@ -1692,6 +1696,8 @@ static inline uint8_t lean_uint16_dec_le(uint16_t a1, uint16_t a2) { return a1 < uint32_t lean_uint32_of_big_nat(b_lean_obj_arg a); static inline uint32_t lean_uint32_of_nat(b_lean_obj_arg a) { return lean_is_scalar(a) ? (uint32_t)(lean_unbox(a)) : lean_uint32_of_big_nat(a); } +/* Remark: the following function is used to implement the constructor `UInt32.mk`. We can't annotate constructors with `@&` */ +static inline uint32_t lean_uint32_of_nat_mk(lean_obj_arg a) { uint32_t r = lean_uint32_of_nat(a); lean_dec(a); return r; } static inline lean_obj_res lean_uint32_to_nat(uint32_t a) { return lean_usize_to_nat((size_t)a); } static inline uint32_t lean_uint32_add(uint32_t a1, uint32_t a2) { return a1+a2; } static inline uint32_t lean_uint32_sub(uint32_t a1, uint32_t a2) { return a1-a2; } @@ -1719,6 +1725,8 @@ static inline uint8_t lean_uint32_dec_le(uint32_t a1, uint32_t a2) { return a1 < uint64_t lean_uint64_of_big_nat(b_lean_obj_arg a); static inline uint64_t lean_uint64_of_nat(b_lean_obj_arg a) { return lean_is_scalar(a) ? (uint64_t)(lean_unbox(a)) : lean_uint64_of_big_nat(a); } +/* Remark: the following function is used to implement the constructor `UInt64.mk`. We can't annotate constructors with `@&` */ +static inline uint64_t lean_uint64_of_nat_mk(lean_obj_arg a) { uint64_t r = lean_uint64_of_nat(a); lean_dec(a); return r; } static inline uint64_t lean_uint64_add(uint64_t a1, uint64_t a2) { return a1+a2; } static inline uint64_t lean_uint64_sub(uint64_t a1, uint64_t a2) { return a1-a2; } static inline uint64_t lean_uint64_mul(uint64_t a1, uint64_t a2) { return a1*a2; } @@ -1741,6 +1749,8 @@ static inline uint8_t lean_uint64_dec_le(uint64_t a1, uint64_t a2) { return a1 < size_t lean_usize_of_big_nat(b_lean_obj_arg a); static inline size_t lean_usize_of_nat(b_lean_obj_arg a) { return lean_is_scalar(a) ? lean_unbox(a) : lean_usize_of_big_nat(a); } +/* Remark: the following function is used to implement the constructor `USize.mk`. We can't annotate constructors with `@&` */ +static inline size_t lean_usize_of_nat_mk(lean_obj_arg a) { size_t r = lean_usize_of_nat(a); lean_dec(a); return r; } static inline size_t lean_usize_add(size_t a1, size_t a2) { return a1+a2; } static inline size_t lean_usize_sub(size_t a1, size_t a2) { return a1-a2; } static inline size_t lean_usize_mul(size_t a1, size_t a2) { return a1*a2; } diff --git a/stage0/stdlib/CMakeLists.txt b/stage0/stdlib/CMakeLists.txt index 05b3160227..c9a0964c4e 100644 --- a/stage0/stdlib/CMakeLists.txt +++ b/stage0/stdlib/CMakeLists.txt @@ -1 +1 @@ -add_library (stage0 OBJECT ./Init.c ./Init/Classical.c ./Init/Coe.c ./Init/Control.c ./Init/Control/Basic.c ./Init/Control/EState.c ./Init/Control/Except.c ./Init/Control/Id.c ./Init/Control/Option.c ./Init/Control/Reader.c ./Init/Control/State.c ./Init/Control/StateRef.c ./Init/Core.c ./Init/Data.c ./Init/Data/Array.c ./Init/Data/Array/Basic.c ./Init/Data/Array/BinSearch.c ./Init/Data/Array/InsertionSort.c ./Init/Data/Array/QSort.c ./Init/Data/Array/Subarray.c ./Init/Data/Basic.c ./Init/Data/ByteArray.c ./Init/Data/ByteArray/Basic.c ./Init/Data/Char.c ./Init/Data/Char/Basic.c ./Init/Data/Fin.c ./Init/Data/Fin/Basic.c ./Init/Data/Float.c ./Init/Data/FloatArray.c ./Init/Data/FloatArray/Basic.c ./Init/Data/Format.c ./Init/Data/Format/Basic.c ./Init/Data/Format/Instances.c ./Init/Data/Format/Macro.c ./Init/Data/Hashable.c ./Init/Data/Int.c ./Init/Data/Int/Basic.c ./Init/Data/List.c ./Init/Data/List/Basic.c ./Init/Data/List/BasicAux.c ./Init/Data/List/Control.c ./Init/Data/Nat.c ./Init/Data/Nat/Basic.c ./Init/Data/Nat/Bitwise.c ./Init/Data/Nat/Control.c ./Init/Data/Nat/Div.c ./Init/Data/OfScientific.c ./Init/Data/Option.c ./Init/Data/Option/Basic.c ./Init/Data/Option/BasicAux.c ./Init/Data/Option/Instances.c ./Init/Data/Random.c ./Init/Data/Range.c ./Init/Data/Repr.c ./Init/Data/Stream.c ./Init/Data/String.c ./Init/Data/String/Basic.c ./Init/Data/String/Extra.c ./Init/Data/ToString.c ./Init/Data/ToString/Basic.c ./Init/Data/ToString/Macro.c ./Init/Data/UInt.c ./Init/Fix.c ./Init/Meta.c ./Init/Notation.c ./Init/NotationExtra.c ./Init/Prelude.c ./Init/SimpLemmas.c ./Init/SizeOf.c ./Init/System.c ./Init/System/FilePath.c ./Init/System/IO.c ./Init/System/IOError.c ./Init/System/Platform.c ./Init/System/ST.c ./Init/Util.c ./Init/WF.c ./Lean.c ./Lean/Attributes.c ./Lean/AuxRecursor.c ./Lean/Class.c ./Lean/Compiler.c ./Lean/Compiler/BorrowedAnnotation.c ./Lean/Compiler/ClosedTermCache.c ./Lean/Compiler/ConstFolding.c ./Lean/Compiler/ExportAttr.c ./Lean/Compiler/ExternAttr.c ./Lean/Compiler/IR.c ./Lean/Compiler/IR/Basic.c ./Lean/Compiler/IR/Borrow.c ./Lean/Compiler/IR/Boxing.c ./Lean/Compiler/IR/Checker.c ./Lean/Compiler/IR/CompilerM.c ./Lean/Compiler/IR/CtorLayout.c ./Lean/Compiler/IR/ElimDeadBranches.c ./Lean/Compiler/IR/ElimDeadVars.c ./Lean/Compiler/IR/EmitC.c ./Lean/Compiler/IR/EmitUtil.c ./Lean/Compiler/IR/ExpandResetReuse.c ./Lean/Compiler/IR/Format.c ./Lean/Compiler/IR/FreeVars.c ./Lean/Compiler/IR/LiveVars.c ./Lean/Compiler/IR/NormIds.c ./Lean/Compiler/IR/PushProj.c ./Lean/Compiler/IR/RC.c ./Lean/Compiler/IR/ResetReuse.c ./Lean/Compiler/IR/SimpCase.c ./Lean/Compiler/IR/Sorry.c ./Lean/Compiler/IR/UnboxResult.c ./Lean/Compiler/ImplementedByAttr.c ./Lean/Compiler/InitAttr.c ./Lean/Compiler/InlineAttrs.c ./Lean/Compiler/NameMangling.c ./Lean/Compiler/NeverExtractAttr.c ./Lean/Compiler/Specialize.c ./Lean/Compiler/Util.c ./Lean/CoreM.c ./Lean/Data.c ./Lean/Data/Format.c ./Lean/Data/Json.c ./Lean/Data/Json/Basic.c ./Lean/Data/Json/FromToJson.c ./Lean/Data/Json/Parser.c ./Lean/Data/Json/Printer.c ./Lean/Data/Json/Stream.c ./Lean/Data/JsonRpc.c ./Lean/Data/KVMap.c ./Lean/Data/LBool.c ./Lean/Data/LOption.c ./Lean/Data/Lsp.c ./Lean/Data/Lsp/Basic.c ./Lean/Data/Lsp/Capabilities.c ./Lean/Data/Lsp/Communication.c ./Lean/Data/Lsp/Diagnostics.c ./Lean/Data/Lsp/Extra.c ./Lean/Data/Lsp/InitShutdown.c ./Lean/Data/Lsp/Ipc.c ./Lean/Data/Lsp/LanguageFeatures.c ./Lean/Data/Lsp/TextSync.c ./Lean/Data/Lsp/Utf16.c ./Lean/Data/Lsp/Workspace.c ./Lean/Data/Name.c ./Lean/Data/NameTrie.c ./Lean/Data/Occurrences.c ./Lean/Data/OpenDecl.c ./Lean/Data/Options.c ./Lean/Data/Position.c ./Lean/Data/PrefixTree.c ./Lean/Data/SMap.c ./Lean/Data/Trie.c ./Lean/Declaration.c ./Lean/DeclarationRange.c ./Lean/DocString.c ./Lean/Elab.c ./Lean/Elab/App.c ./Lean/Elab/Attributes.c ./Lean/Elab/AutoBound.c ./Lean/Elab/Binders.c ./Lean/Elab/BuiltinNotation.c ./Lean/Elab/CollectFVars.c ./Lean/Elab/Command.c ./Lean/Elab/DeclModifiers.c ./Lean/Elab/DeclUtil.c ./Lean/Elab/Declaration.c ./Lean/Elab/DeclarationRange.c ./Lean/Elab/DefView.c ./Lean/Elab/Deriving.c ./Lean/Elab/Deriving/BEq.c ./Lean/Elab/Deriving/Basic.c ./Lean/Elab/Deriving/DecEq.c ./Lean/Elab/Deriving/FromToJson.c ./Lean/Elab/Deriving/Inhabited.c ./Lean/Elab/Deriving/Repr.c ./Lean/Elab/Deriving/SizeOf.c ./Lean/Elab/Deriving/Util.c ./Lean/Elab/Do.c ./Lean/Elab/Exception.c ./Lean/Elab/Extra.c ./Lean/Elab/Frontend.c ./Lean/Elab/Import.c ./Lean/Elab/Inductive.c ./Lean/Elab/InfoTree.c ./Lean/Elab/LetRec.c ./Lean/Elab/Level.c ./Lean/Elab/Log.c ./Lean/Elab/Match.c ./Lean/Elab/MutualDef.c ./Lean/Elab/PreDefinition.c ./Lean/Elab/PreDefinition/Basic.c ./Lean/Elab/PreDefinition/Main.c ./Lean/Elab/PreDefinition/MkInhabitant.c ./Lean/Elab/PreDefinition/Structural.c ./Lean/Elab/PreDefinition/WF.c ./Lean/Elab/Print.c ./Lean/Elab/Quotation.c ./Lean/Elab/Quotation/Util.c ./Lean/Elab/StructInst.c ./Lean/Elab/Structure.c ./Lean/Elab/Syntax.c ./Lean/Elab/SyntheticMVars.c ./Lean/Elab/Tactic.c ./Lean/Elab/Tactic/Basic.c ./Lean/Elab/Tactic/Binders.c ./Lean/Elab/Tactic/ElabTerm.c ./Lean/Elab/Tactic/Generalize.c ./Lean/Elab/Tactic/Induction.c ./Lean/Elab/Tactic/Injection.c ./Lean/Elab/Tactic/Location.c ./Lean/Elab/Tactic/Match.c ./Lean/Elab/Tactic/Rewrite.c ./Lean/Elab/Tactic/Simp.c ./Lean/Elab/Term.c ./Lean/Elab/Util.c ./Lean/Environment.c ./Lean/Eval.c ./Lean/Exception.c ./Lean/Expr.c ./Lean/HeadIndex.c ./Lean/Hygiene.c ./Lean/InternalExceptionId.c ./Lean/KeyedDeclsAttribute.c ./Lean/Level.c ./Lean/LocalContext.c ./Lean/Message.c ./Lean/Meta.c ./Lean/Meta/AbstractMVars.c ./Lean/Meta/AbstractNestedProofs.c ./Lean/Meta/AppBuilder.c ./Lean/Meta/Basic.c ./Lean/Meta/Check.c ./Lean/Meta/Closure.c ./Lean/Meta/Coe.c ./Lean/Meta/CollectMVars.c ./Lean/Meta/DiscrTree.c ./Lean/Meta/DiscrTreeTypes.c ./Lean/Meta/ExprDefEq.c ./Lean/Meta/ForEachExpr.c ./Lean/Meta/FunInfo.c ./Lean/Meta/GeneralizeTelescope.c ./Lean/Meta/GetConst.c ./Lean/Meta/Inductive.c ./Lean/Meta/InferType.c ./Lean/Meta/Instances.c ./Lean/Meta/KAbstract.c ./Lean/Meta/LevelDefEq.c ./Lean/Meta/Match.c ./Lean/Meta/Match/Basic.c ./Lean/Meta/Match/CaseArraySizes.c ./Lean/Meta/Match/CaseValues.c ./Lean/Meta/Match/MVarRenaming.c ./Lean/Meta/Match/Match.c ./Lean/Meta/Match/MatchPatternAttr.c ./Lean/Meta/Match/MatcherInfo.c ./Lean/Meta/MatchUtil.c ./Lean/Meta/Offset.c ./Lean/Meta/PPGoal.c ./Lean/Meta/RecursorInfo.c ./Lean/Meta/Reduce.c ./Lean/Meta/ReduceEval.c ./Lean/Meta/SizeOf.c ./Lean/Meta/SynthInstance.c ./Lean/Meta/Tactic.c ./Lean/Meta/Tactic/Apply.c ./Lean/Meta/Tactic/Assert.c ./Lean/Meta/Tactic/Assumption.c ./Lean/Meta/Tactic/Cases.c ./Lean/Meta/Tactic/Clear.c ./Lean/Meta/Tactic/Constructor.c ./Lean/Meta/Tactic/Delta.c ./Lean/Meta/Tactic/ElimInfo.c ./Lean/Meta/Tactic/FVarSubst.c ./Lean/Meta/Tactic/Generalize.c ./Lean/Meta/Tactic/Induction.c ./Lean/Meta/Tactic/Injection.c ./Lean/Meta/Tactic/Intro.c ./Lean/Meta/Tactic/Replace.c ./Lean/Meta/Tactic/Revert.c ./Lean/Meta/Tactic/Rewrite.c ./Lean/Meta/Tactic/Simp.c ./Lean/Meta/Tactic/Simp/CongrLemmas.c ./Lean/Meta/Tactic/Simp/Main.c ./Lean/Meta/Tactic/Simp/Rewrite.c ./Lean/Meta/Tactic/Simp/SimpLemmas.c ./Lean/Meta/Tactic/Simp/Types.c ./Lean/Meta/Tactic/Subst.c ./Lean/Meta/Tactic/Util.c ./Lean/Meta/Transform.c ./Lean/Meta/TransparencyMode.c ./Lean/Meta/UnificationHint.c ./Lean/Meta/WHNF.c ./Lean/MetavarContext.c ./Lean/Modifiers.c ./Lean/MonadEnv.c ./Lean/Parser.c ./Lean/Parser/Attr.c ./Lean/Parser/Basic.c ./Lean/Parser/Command.c ./Lean/Parser/Do.c ./Lean/Parser/Extension.c ./Lean/Parser/Extra.c ./Lean/Parser/Level.c ./Lean/Parser/Module.c ./Lean/Parser/StrInterpolation.c ./Lean/Parser/Syntax.c ./Lean/Parser/Tactic.c ./Lean/Parser/Term.c ./Lean/ParserCompiler.c ./Lean/ParserCompiler/Attribute.c ./Lean/PrettyPrinter.c ./Lean/PrettyPrinter/Basic.c ./Lean/PrettyPrinter/Delaborator.c ./Lean/PrettyPrinter/Delaborator/Basic.c ./Lean/PrettyPrinter/Delaborator/Builtins.c ./Lean/PrettyPrinter/Formatter.c ./Lean/PrettyPrinter/Parenthesizer.c ./Lean/ProjFns.c ./Lean/ReducibilityAttrs.c ./Lean/ResolveName.c ./Lean/Runtime.c ./Lean/ScopedEnvExtension.c ./Lean/Server.c ./Lean/Server/AsyncList.c ./Lean/Server/FileSource.c ./Lean/Server/FileWorker.c ./Lean/Server/InfoUtils.c ./Lean/Server/Snapshots.c ./Lean/Server/Utils.c ./Lean/Server/Watchdog.c ./Lean/Structure.c ./Lean/Syntax.c ./Lean/ToExpr.c ./Lean/Util.c ./Lean/Util/CollectFVars.c ./Lean/Util/CollectLevelParams.c ./Lean/Util/CollectMVars.c ./Lean/Util/Constructions.c ./Lean/Util/FindExpr.c ./Lean/Util/FindMVar.c ./Lean/Util/FoldConsts.c ./Lean/Util/ForEachExpr.c ./Lean/Util/MonadCache.c ./Lean/Util/OccursCheck.c ./Lean/Util/PPExt.c ./Lean/Util/Path.c ./Lean/Util/Profile.c ./Lean/Util/RecDepth.c ./Lean/Util/Recognizers.c ./Lean/Util/ReplaceExpr.c ./Lean/Util/ReplaceLevel.c ./Lean/Util/SCC.c ./Lean/Util/Sorry.c ./Lean/Util/Trace.c ./Leanpkg.c ./Leanpkg/Git.c ./Leanpkg/LeanVersion.c ./Leanpkg/Manifest.c ./Leanpkg/Proc.c ./Leanpkg/Resolve.c ./Leanpkg/Toml.c ./Std.c ./Std/Data.c ./Std/Data/AssocList.c ./Std/Data/BinomialHeap.c ./Std/Data/DList.c ./Std/Data/HashMap.c ./Std/Data/HashSet.c ./Std/Data/PersistentArray.c ./Std/Data/PersistentHashMap.c ./Std/Data/PersistentHashSet.c ./Std/Data/Queue.c ./Std/Data/RBMap.c ./Std/Data/RBTree.c ./Std/Data/Stack.c ./Std/ShareCommon.c ) +add_library (stage0 OBJECT ./Init.c ./Init/Classical.c ./Init/Coe.c ./Init/Control.c ./Init/Control/Basic.c ./Init/Control/EState.c ./Init/Control/Except.c ./Init/Control/Id.c ./Init/Control/Option.c ./Init/Control/Reader.c ./Init/Control/State.c ./Init/Control/StateRef.c ./Init/Core.c ./Init/Data.c ./Init/Data/Array.c ./Init/Data/Array/Basic.c ./Init/Data/Array/BinSearch.c ./Init/Data/Array/InsertionSort.c ./Init/Data/Array/QSort.c ./Init/Data/Array/Subarray.c ./Init/Data/Basic.c ./Init/Data/ByteArray.c ./Init/Data/ByteArray/Basic.c ./Init/Data/Char.c ./Init/Data/Char/Basic.c ./Init/Data/Fin.c ./Init/Data/Fin/Basic.c ./Init/Data/Float.c ./Init/Data/FloatArray.c ./Init/Data/FloatArray/Basic.c ./Init/Data/Format.c ./Init/Data/Format/Basic.c ./Init/Data/Format/Instances.c ./Init/Data/Format/Macro.c ./Init/Data/Hashable.c ./Init/Data/Int.c ./Init/Data/Int/Basic.c ./Init/Data/List.c ./Init/Data/List/Basic.c ./Init/Data/List/BasicAux.c ./Init/Data/List/Control.c ./Init/Data/Nat.c ./Init/Data/Nat/Basic.c ./Init/Data/Nat/Bitwise.c ./Init/Data/Nat/Control.c ./Init/Data/Nat/Div.c ./Init/Data/OfScientific.c ./Init/Data/Option.c ./Init/Data/Option/Basic.c ./Init/Data/Option/BasicAux.c ./Init/Data/Option/Instances.c ./Init/Data/Random.c ./Init/Data/Range.c ./Init/Data/Repr.c ./Init/Data/Stream.c ./Init/Data/String.c ./Init/Data/String/Basic.c ./Init/Data/String/Extra.c ./Init/Data/ToString.c ./Init/Data/ToString/Basic.c ./Init/Data/ToString/Macro.c ./Init/Data/UInt.c ./Init/Fix.c ./Init/Hints.c ./Init/Meta.c ./Init/Notation.c ./Init/NotationExtra.c ./Init/Prelude.c ./Init/SimpLemmas.c ./Init/SizeOf.c ./Init/System.c ./Init/System/FilePath.c ./Init/System/IO.c ./Init/System/IOError.c ./Init/System/Platform.c ./Init/System/ST.c ./Init/Util.c ./Init/WF.c ./Lean.c ./Lean/Attributes.c ./Lean/AuxRecursor.c ./Lean/Class.c ./Lean/Compiler.c ./Lean/Compiler/BorrowedAnnotation.c ./Lean/Compiler/ClosedTermCache.c ./Lean/Compiler/ConstFolding.c ./Lean/Compiler/ExportAttr.c ./Lean/Compiler/ExternAttr.c ./Lean/Compiler/IR.c ./Lean/Compiler/IR/Basic.c ./Lean/Compiler/IR/Borrow.c ./Lean/Compiler/IR/Boxing.c ./Lean/Compiler/IR/Checker.c ./Lean/Compiler/IR/CompilerM.c ./Lean/Compiler/IR/CtorLayout.c ./Lean/Compiler/IR/ElimDeadBranches.c ./Lean/Compiler/IR/ElimDeadVars.c ./Lean/Compiler/IR/EmitC.c ./Lean/Compiler/IR/EmitUtil.c ./Lean/Compiler/IR/ExpandResetReuse.c ./Lean/Compiler/IR/Format.c ./Lean/Compiler/IR/FreeVars.c ./Lean/Compiler/IR/LiveVars.c ./Lean/Compiler/IR/NormIds.c ./Lean/Compiler/IR/PushProj.c ./Lean/Compiler/IR/RC.c ./Lean/Compiler/IR/ResetReuse.c ./Lean/Compiler/IR/SimpCase.c ./Lean/Compiler/IR/Sorry.c ./Lean/Compiler/IR/UnboxResult.c ./Lean/Compiler/ImplementedByAttr.c ./Lean/Compiler/InitAttr.c ./Lean/Compiler/InlineAttrs.c ./Lean/Compiler/NameMangling.c ./Lean/Compiler/NeverExtractAttr.c ./Lean/Compiler/Specialize.c ./Lean/Compiler/Util.c ./Lean/CoreM.c ./Lean/Data.c ./Lean/Data/Format.c ./Lean/Data/Json.c ./Lean/Data/Json/Basic.c ./Lean/Data/Json/FromToJson.c ./Lean/Data/Json/Parser.c ./Lean/Data/Json/Printer.c ./Lean/Data/Json/Stream.c ./Lean/Data/JsonRpc.c ./Lean/Data/KVMap.c ./Lean/Data/LBool.c ./Lean/Data/LOption.c ./Lean/Data/Lsp.c ./Lean/Data/Lsp/Basic.c ./Lean/Data/Lsp/Capabilities.c ./Lean/Data/Lsp/Communication.c ./Lean/Data/Lsp/Diagnostics.c ./Lean/Data/Lsp/Extra.c ./Lean/Data/Lsp/InitShutdown.c ./Lean/Data/Lsp/Ipc.c ./Lean/Data/Lsp/LanguageFeatures.c ./Lean/Data/Lsp/TextSync.c ./Lean/Data/Lsp/Utf16.c ./Lean/Data/Lsp/Workspace.c ./Lean/Data/Name.c ./Lean/Data/NameTrie.c ./Lean/Data/Occurrences.c ./Lean/Data/OpenDecl.c ./Lean/Data/Options.c ./Lean/Data/Position.c ./Lean/Data/PrefixTree.c ./Lean/Data/SMap.c ./Lean/Data/Trie.c ./Lean/Declaration.c ./Lean/DeclarationRange.c ./Lean/DocString.c ./Lean/Elab.c ./Lean/Elab/App.c ./Lean/Elab/Attributes.c ./Lean/Elab/AutoBound.c ./Lean/Elab/Binders.c ./Lean/Elab/BuiltinNotation.c ./Lean/Elab/CollectFVars.c ./Lean/Elab/Command.c ./Lean/Elab/DeclModifiers.c ./Lean/Elab/DeclUtil.c ./Lean/Elab/Declaration.c ./Lean/Elab/DeclarationRange.c ./Lean/Elab/DefView.c ./Lean/Elab/Deriving.c ./Lean/Elab/Deriving/BEq.c ./Lean/Elab/Deriving/Basic.c ./Lean/Elab/Deriving/DecEq.c ./Lean/Elab/Deriving/FromToJson.c ./Lean/Elab/Deriving/Inhabited.c ./Lean/Elab/Deriving/Repr.c ./Lean/Elab/Deriving/SizeOf.c ./Lean/Elab/Deriving/Util.c ./Lean/Elab/Do.c ./Lean/Elab/Exception.c ./Lean/Elab/Extra.c ./Lean/Elab/Frontend.c ./Lean/Elab/Import.c ./Lean/Elab/Inductive.c ./Lean/Elab/InfoTree.c ./Lean/Elab/LetRec.c ./Lean/Elab/Level.c ./Lean/Elab/Log.c ./Lean/Elab/Match.c ./Lean/Elab/MutualDef.c ./Lean/Elab/PreDefinition.c ./Lean/Elab/PreDefinition/Basic.c ./Lean/Elab/PreDefinition/Main.c ./Lean/Elab/PreDefinition/MkInhabitant.c ./Lean/Elab/PreDefinition/Structural.c ./Lean/Elab/PreDefinition/WF.c ./Lean/Elab/Print.c ./Lean/Elab/Quotation.c ./Lean/Elab/Quotation/Util.c ./Lean/Elab/StructInst.c ./Lean/Elab/Structure.c ./Lean/Elab/Syntax.c ./Lean/Elab/SyntheticMVars.c ./Lean/Elab/Tactic.c ./Lean/Elab/Tactic/Basic.c ./Lean/Elab/Tactic/Binders.c ./Lean/Elab/Tactic/ElabTerm.c ./Lean/Elab/Tactic/Generalize.c ./Lean/Elab/Tactic/Induction.c ./Lean/Elab/Tactic/Injection.c ./Lean/Elab/Tactic/Location.c ./Lean/Elab/Tactic/Match.c ./Lean/Elab/Tactic/Rewrite.c ./Lean/Elab/Tactic/Simp.c ./Lean/Elab/Term.c ./Lean/Elab/Util.c ./Lean/Environment.c ./Lean/Eval.c ./Lean/Exception.c ./Lean/Expr.c ./Lean/HeadIndex.c ./Lean/Hygiene.c ./Lean/InternalExceptionId.c ./Lean/KeyedDeclsAttribute.c ./Lean/Level.c ./Lean/LocalContext.c ./Lean/Message.c ./Lean/Meta.c ./Lean/Meta/AbstractMVars.c ./Lean/Meta/AbstractNestedProofs.c ./Lean/Meta/AppBuilder.c ./Lean/Meta/Basic.c ./Lean/Meta/Check.c ./Lean/Meta/Closure.c ./Lean/Meta/Coe.c ./Lean/Meta/CollectMVars.c ./Lean/Meta/DiscrTree.c ./Lean/Meta/DiscrTreeTypes.c ./Lean/Meta/ExprDefEq.c ./Lean/Meta/ForEachExpr.c ./Lean/Meta/FunInfo.c ./Lean/Meta/GeneralizeTelescope.c ./Lean/Meta/GetConst.c ./Lean/Meta/Inductive.c ./Lean/Meta/InferType.c ./Lean/Meta/Instances.c ./Lean/Meta/KAbstract.c ./Lean/Meta/LevelDefEq.c ./Lean/Meta/Match.c ./Lean/Meta/Match/Basic.c ./Lean/Meta/Match/CaseArraySizes.c ./Lean/Meta/Match/CaseValues.c ./Lean/Meta/Match/MVarRenaming.c ./Lean/Meta/Match/Match.c ./Lean/Meta/Match/MatchPatternAttr.c ./Lean/Meta/Match/MatcherInfo.c ./Lean/Meta/MatchUtil.c ./Lean/Meta/Offset.c ./Lean/Meta/PPGoal.c ./Lean/Meta/RecursorInfo.c ./Lean/Meta/Reduce.c ./Lean/Meta/ReduceEval.c ./Lean/Meta/SizeOf.c ./Lean/Meta/SynthInstance.c ./Lean/Meta/Tactic.c ./Lean/Meta/Tactic/Apply.c ./Lean/Meta/Tactic/Assert.c ./Lean/Meta/Tactic/Assumption.c ./Lean/Meta/Tactic/Cases.c ./Lean/Meta/Tactic/Clear.c ./Lean/Meta/Tactic/Constructor.c ./Lean/Meta/Tactic/Delta.c ./Lean/Meta/Tactic/ElimInfo.c ./Lean/Meta/Tactic/FVarSubst.c ./Lean/Meta/Tactic/Generalize.c ./Lean/Meta/Tactic/Induction.c ./Lean/Meta/Tactic/Injection.c ./Lean/Meta/Tactic/Intro.c ./Lean/Meta/Tactic/Replace.c ./Lean/Meta/Tactic/Revert.c ./Lean/Meta/Tactic/Rewrite.c ./Lean/Meta/Tactic/Simp.c ./Lean/Meta/Tactic/Simp/CongrLemmas.c ./Lean/Meta/Tactic/Simp/Main.c ./Lean/Meta/Tactic/Simp/Rewrite.c ./Lean/Meta/Tactic/Simp/SimpLemmas.c ./Lean/Meta/Tactic/Simp/Types.c ./Lean/Meta/Tactic/Subst.c ./Lean/Meta/Tactic/Util.c ./Lean/Meta/Transform.c ./Lean/Meta/TransparencyMode.c ./Lean/Meta/UnificationHint.c ./Lean/Meta/WHNF.c ./Lean/MetavarContext.c ./Lean/Modifiers.c ./Lean/MonadEnv.c ./Lean/Parser.c ./Lean/Parser/Attr.c ./Lean/Parser/Basic.c ./Lean/Parser/Command.c ./Lean/Parser/Do.c ./Lean/Parser/Extension.c ./Lean/Parser/Extra.c ./Lean/Parser/Level.c ./Lean/Parser/Module.c ./Lean/Parser/StrInterpolation.c ./Lean/Parser/Syntax.c ./Lean/Parser/Tactic.c ./Lean/Parser/Term.c ./Lean/ParserCompiler.c ./Lean/ParserCompiler/Attribute.c ./Lean/PrettyPrinter.c ./Lean/PrettyPrinter/Basic.c ./Lean/PrettyPrinter/Delaborator.c ./Lean/PrettyPrinter/Delaborator/Basic.c ./Lean/PrettyPrinter/Delaborator/Builtins.c ./Lean/PrettyPrinter/Formatter.c ./Lean/PrettyPrinter/Parenthesizer.c ./Lean/ProjFns.c ./Lean/ReducibilityAttrs.c ./Lean/ResolveName.c ./Lean/Runtime.c ./Lean/ScopedEnvExtension.c ./Lean/Server.c ./Lean/Server/AsyncList.c ./Lean/Server/FileSource.c ./Lean/Server/FileWorker.c ./Lean/Server/InfoUtils.c ./Lean/Server/Snapshots.c ./Lean/Server/Utils.c ./Lean/Server/Watchdog.c ./Lean/Structure.c ./Lean/Syntax.c ./Lean/ToExpr.c ./Lean/Util.c ./Lean/Util/CollectFVars.c ./Lean/Util/CollectLevelParams.c ./Lean/Util/CollectMVars.c ./Lean/Util/Constructions.c ./Lean/Util/FindExpr.c ./Lean/Util/FindMVar.c ./Lean/Util/FoldConsts.c ./Lean/Util/ForEachExpr.c ./Lean/Util/MonadCache.c ./Lean/Util/OccursCheck.c ./Lean/Util/PPExt.c ./Lean/Util/Path.c ./Lean/Util/Profile.c ./Lean/Util/RecDepth.c ./Lean/Util/Recognizers.c ./Lean/Util/ReplaceExpr.c ./Lean/Util/ReplaceLevel.c ./Lean/Util/SCC.c ./Lean/Util/Sorry.c ./Lean/Util/Trace.c ./Leanpkg.c ./Leanpkg/Git.c ./Leanpkg/LeanVersion.c ./Leanpkg/Manifest.c ./Leanpkg/Proc.c ./Leanpkg/Resolve.c ./Leanpkg/Toml.c ./Std.c ./Std/Data.c ./Std/Data/AssocList.c ./Std/Data/BinomialHeap.c ./Std/Data/DList.c ./Std/Data/HashMap.c ./Std/Data/HashSet.c ./Std/Data/PersistentArray.c ./Std/Data/PersistentHashMap.c ./Std/Data/PersistentHashSet.c ./Std/Data/Queue.c ./Std/Data/RBMap.c ./Std/Data/RBTree.c ./Std/Data/Stack.c ./Std/ShareCommon.c ) diff --git a/stage0/stdlib/Init.c b/stage0/stdlib/Init.c index b60ff62f58..55451224d2 100644 --- a/stage0/stdlib/Init.c +++ b/stage0/stdlib/Init.c @@ -1,6 +1,6 @@ // Lean compiler output // Module: Init -// Imports: Init.Prelude Init.Notation Init.Core Init.Control Init.Data.Basic Init.WF Init.Data Init.System Init.Util Init.Fix Init.Meta Init.NotationExtra Init.SimpLemmas +// Imports: Init.Prelude Init.Notation Init.Core Init.Control Init.Data.Basic Init.WF Init.Data Init.System Init.Util Init.Fix Init.Meta Init.NotationExtra Init.SimpLemmas Init.Hints #include #if defined(__clang__) #pragma clang diagnostic ignored "-Wunused-parameter" @@ -26,6 +26,7 @@ lean_object* initialize_Init_Fix(lean_object*); lean_object* initialize_Init_Meta(lean_object*); lean_object* initialize_Init_NotationExtra(lean_object*); lean_object* initialize_Init_SimpLemmas(lean_object*); +lean_object* initialize_Init_Hints(lean_object*); static bool _G_initialized = false; lean_object* initialize_Init(lean_object* w) { lean_object * res; @@ -70,6 +71,9 @@ lean_dec_ref(res); res = initialize_Init_SimpLemmas(lean_io_mk_world()); if (lean_io_result_is_error(res)) return res; lean_dec_ref(res); +res = initialize_Init_Hints(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); return lean_io_result_mk_ok(lean_box(0)); } #ifdef __cplusplus diff --git a/stage0/stdlib/Init/Data/Char/Basic.c b/stage0/stdlib/Init/Data/Char/Basic.c index 300df5698a..d936164f96 100644 --- a/stage0/stdlib/Init/Data/Char/Basic.c +++ b/stage0/stdlib/Init/Data/Char/Basic.c @@ -398,6 +398,7 @@ x_9 = lean_unsigned_to_nat(32u); x_10 = lean_nat_add(x_2, x_9); lean_dec(x_2); x_11 = l_Char_ofNat(x_10); +lean_dec(x_10); return x_11; } } @@ -446,6 +447,7 @@ x_9 = lean_unsigned_to_nat(32u); x_10 = lean_nat_sub(x_2, x_9); lean_dec(x_2); x_11 = l_Char_ofNat(x_10); +lean_dec(x_10); return x_11; } } diff --git a/stage0/stdlib/Init/Hints.c b/stage0/stdlib/Init/Hints.c new file mode 100644 index 0000000000..2261fb717b --- /dev/null +++ b/stage0/stdlib/Init/Hints.c @@ -0,0 +1,29 @@ +// Lean compiler output +// Module: Init.Hints +// Imports: Init.NotationExtra +#include +#if defined(__clang__) +#pragma clang diagnostic ignored "-Wunused-parameter" +#pragma clang diagnostic ignored "-Wunused-label" +#elif defined(__GNUC__) && !defined(__CLANG__) +#pragma GCC diagnostic ignored "-Wunused-parameter" +#pragma GCC diagnostic ignored "-Wunused-label" +#pragma GCC diagnostic ignored "-Wunused-but-set-variable" +#endif +#ifdef __cplusplus +extern "C" { +#endif +lean_object* initialize_Init_NotationExtra(lean_object*); +static bool _G_initialized = false; +lean_object* initialize_Init_Hints(lean_object* w) { +lean_object * res; +if (_G_initialized) return lean_io_result_mk_ok(lean_box(0)); +_G_initialized = true; +res = initialize_Init_NotationExtra(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); +return lean_io_result_mk_ok(lean_box(0)); +} +#ifdef __cplusplus +} +#endif diff --git a/stage0/stdlib/Init/Meta.c b/stage0/stdlib/Init/Meta.c index 176a7b6fcf..82fb055f76 100644 --- a/stage0/stdlib/Init/Meta.c +++ b/stage0/stdlib/Init/Meta.c @@ -21,8 +21,8 @@ lean_object* l___private_Init_Meta_0__Lean_version_getMajor___boxed(lean_object* lean_object* lean_string_push(lean_object*, uint32_t); lean_object* l___private_Init_Meta_0__Lean_Syntax_decodeOctalLitAux___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Name_toString___closed__1; -lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____boxed(lean_object*, lean_object*); lean_object* l_Lean_Syntax_isIdOrAtom_x3f___boxed(lean_object*); +lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__23; lean_object* lean_array_set(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Syntax_decodeQuotedChar_match__6___rarg(lean_object*, lean_object*); lean_object* l_Lean_mkIdentFromRef(lean_object*); @@ -32,23 +32,23 @@ extern lean_object* l_Lean_fieldIdxKind; lean_object* l_Lean_Syntax_isNatLit_x3f___boxed(lean_object*); lean_object* l_Lean_Syntax_setTailInfoAux(lean_object*, lean_object*); lean_object* l___private_Init_Meta_0__Lean_quoteName___closed__5; +lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__2; lean_object* l_Lean_Syntax_isNameLit_x3f_match__1___rarg(lean_object*, lean_object*, lean_object*); lean_object* l___private_Init_Meta_0__Lean_Syntax_updateFirst___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Init_Meta_0__Lean_Syntax_decodeDecimalLitAux___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_instQuoteBool(uint8_t); lean_object* l_Lean_Syntax_decodeScientificLitVal_x3f_decodeAfterExp___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_forInUnsafe_loop___at_Lean_mkSepArray___spec__1(lean_object*, lean_object*, size_t, size_t, lean_object*); +lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__13; extern lean_object* l_instReprOption___rarg___closed__1; -lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__8; lean_object* lean_mk_empty_array_with_capacity(lean_object*); lean_object* l_Lean_evalOptPrio_match__1___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Syntax_expandInterpolatedStr___lambda__2(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__21; lean_object* l___private_Init_Meta_0__Lean_Syntax_updateFirst___at_Lean_Syntax_setHeadInfoAux___spec__1(lean_object*, lean_object*, lean_object*); -lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__1; extern lean_object* l_Lean_nullKind; lean_object* l_Lean_Syntax_getSepArgs___boxed(lean_object*); lean_object* l___private_Init_Meta_0__Array_filterSepElemsMAux___rarg___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__2; lean_object* l___private_Init_Meta_0__Lean_Syntax_decodeHexDigit(lean_object*, lean_object*); lean_object* l___private_Init_Meta_0__Lean_Syntax_updateFirst_match__1___rarg(lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Parser_Syntax_addPrec___closed__2; @@ -61,7 +61,6 @@ lean_object* l_Lean_Syntax_getHead_x3f___lambda__2(lean_object*, lean_object*, l uint32_t l_Lean_idBeginEscape; lean_object* l___private_Init_Meta_0__Lean_Syntax_decodeInterpStrQuotedChar_match__1(lean_object*); extern lean_object* l_Lean_Parser_Syntax_addPrio___closed__4; -lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__4; lean_object* l_Array_mapMUnsafe_map___at_Lean_expandMacros___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_withHeadRefOnly_match__1(lean_object*); lean_object* l_Lean_Syntax_expandInterpolatedStrChunks(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -88,17 +87,16 @@ lean_object* l___private_Init_Meta_0__Lean_quoteName___closed__7; uint8_t l_Lean_Meta_Simp_Config_ctorEq___default; lean_object* l_Lean_Syntax_decodeScientificLitVal_x3f_decodeAfterDot(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Syntax_toNat___boxed(lean_object*); +lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__6; uint8_t l_Lean_Meta_Simp_Config_memoize___default; -lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__9; -lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__27; lean_object* l_Lean_Syntax_getHead_x3f(lean_object*); -lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__17; lean_object* l___private_Init_Meta_0__Lean_Syntax_decodeInterpStrQuotedChar(lean_object*, lean_object*); extern lean_object* l_Array_empty___closed__1; lean_object* l_Array_forInUnsafe_loop___at_Lean_Syntax_expandInterpolatedStrChunks___spec__1___lambda__2___closed__1; lean_object* l_Array_forInUnsafe_loop___at_Lean_Syntax_expandInterpolatedStrChunks___spec__1___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Name_toStringWithSep_match__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Syntax_decodeQuotedChar_match__3(lean_object*); +lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__4; lean_object* l___private_Init_Meta_0__Lean_Syntax_isNatLitAux(lean_object*, lean_object*); lean_object* l_Lean_Syntax_SepArray_ofElemsUsingRef___rarg___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Init_Meta_0__Lean_quoteOption___rarg___closed__5; @@ -128,11 +126,13 @@ lean_object* l_Lean_Syntax_isLit_x3f_match__2___rarg(lean_object*, lean_object*, lean_object* l_Lean_Syntax_mkScientificLit(lean_object*, lean_object*); lean_object* l_Lean_isIdFirst___boxed(lean_object*); lean_object* l_Lean_mkHole___boxed(lean_object*); +lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__27; lean_object* l___private_Init_Meta_0__Array_filterSepElemsMAux___at_Array_filterSepElems___spec__2(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_array_push(lean_object*, lean_object*); lean_object* lean_array_get_size(lean_object*); extern lean_object* l_Option_instAlternativeOption___closed__1; lean_object* lean_string_append(lean_object*, lean_object*); +lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__9; lean_object* l_Lean_Syntax_setTailInfoAux_match__2(lean_object*); lean_object* l_Lean_Syntax_setInfo_match__1(lean_object*); lean_object* l_Array_forInUnsafe_loop___at_Lean_Syntax_expandInterpolatedStrChunks___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -142,20 +142,20 @@ lean_object* l___private_Init_Meta_0__Lean_Syntax_decodeHexDigit___boxed(lean_ob lean_object* l_Lean_Syntax_setTailInfo(lean_object*, lean_object*); lean_object* l_Lean_instQuoteArray(lean_object*); lean_object* lean_string_utf8_extract(lean_object*, lean_object*, lean_object*); -lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__21; lean_object* l_Lean_instQuoteProd_match__1(lean_object*, lean_object*, lean_object*); +uint8_t l_Lean_Meta_Simp_Config_decide___default; extern lean_object* l_Applicative_seqRight___default___rarg___closed__1; lean_object* l___private_Init_Data_String_Basic_0__Substring_takeWhileAux___at___private_Init_Meta_0__Lean_Syntax_decodeNameLitAux___spec__1___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Array_filterSepElemsM___at_Array_filterSepElems___spec__1(lean_object*, lean_object*); +lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__8; uint8_t l_Lean_Meta_Simp_Config_contextual___default; -lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__13; +lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__17; lean_object* l_Lean_instQuoteList___rarg(lean_object*); lean_object* lean_string_utf8_byte_size(lean_object*); lean_object* l_Lean_mkAtom(lean_object*); lean_object* l_Lean_NameGenerator_namePrefix___default; lean_object* l_Lean_Syntax_expandInterpolatedStr___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_instReprProd___rarg___closed__1; -lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__23; lean_object* l_Array_filterSepElems___boxed(lean_object*, lean_object*); lean_object* l_Lean_mkIdentFrom___boxed(lean_object*, lean_object*); lean_object* l_Lean_Syntax_getHead_x3f___lambda__4___boxed(lean_object*); @@ -166,40 +166,44 @@ lean_object* l_Lean_instQuoteBool___closed__1; uint8_t l_USize_decLt(size_t, size_t); lean_object* l_Lean_version_patch; extern lean_object* l_Lean_nameLitKind; +lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____boxed(lean_object*, lean_object*); lean_object* l___private_Init_Meta_0__Lean_Syntax_decodeInterpStrLit_loop_match__1___rarg(lean_object*, lean_object*); lean_object* l___private_Init_Meta_0__Lean_Syntax_isNatLitAux___boxed(lean_object*, lean_object*); lean_object* l_Lean_withHeadRefOnly___rarg___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__1; lean_object* l_Lean_instQuoteBool___boxed(lean_object*); lean_object* l_Lean_version_specialDesc; -lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__14; +lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__5; lean_object* lean_nat_add(lean_object*, lean_object*); lean_object* l_Lean_Syntax_mkSep___boxed(lean_object*, lean_object*); lean_object* l_Lean_MonadRef_mkInfoFromRefPos___at_myMacro____x40_Init_Notation___hyg_109____spec__1(lean_object*, lean_object*); lean_object* l_Lean_Syntax_decodeQuotedChar___boxed__const__6; lean_object* l_Lean_isSubScriptAlnum___boxed(lean_object*); lean_object* l_Array_mapSepElems(lean_object*, lean_object*); +lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__3; lean_object* l___private_Init_Meta_0__Lean_quoteName___closed__4; lean_object* l_Lean_Name_instReprName(lean_object*, lean_object*); extern lean_object* l_myMacro____x40_Init_Notation___hyg_12938____closed__14; lean_object* l_Lean_Name_toStringWithSep(lean_object*, lean_object*); lean_object* l_Lean_Syntax_SepArray_ofElems(lean_object*, lean_object*); lean_object* l_Lean_Syntax_decodeQuotedChar_match__3___rarg(lean_object*, lean_object*); -lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__5; +lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__15; extern lean_object* l_instReprBool___closed__4; extern lean_object* l_myMacro____x40_Init_Notation___hyg_13855____closed__9; lean_object* l_Lean_Name_capitalize_match__1(lean_object*); lean_object* l_Lean_version_major___closed__1; +lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_beqConfig____x40_Init_Meta___hyg_5775____boxed(lean_object*, lean_object*); lean_object* l_Lean_Syntax_isLit_x3f_match__1___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_instQuoteSubstring___closed__1; lean_object* lean_string_utf8_next(lean_object*, lean_object*); lean_object* l_Lean_Syntax_isAtom_match__1(lean_object*); -lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__22; extern lean_object* l_myMacro____x40_Init_Notation___hyg_2450____closed__4; lean_object* l_Lean_instQuoteSubstring___closed__2; lean_object* l_Lean_Syntax_isLit_x3f___boxed(lean_object*, lean_object*); lean_object* l___private_Init_Meta_0__Lean_quoteName___closed__8; lean_object* l_Lean_Syntax_hasArgs___boxed(lean_object*); lean_object* l___private_Init_Meta_0__Lean_Syntax_decodeInterpStrLit_loop___boxed(lean_object*, lean_object*, lean_object*); +lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__18; lean_object* l_Lean_Syntax_SepArray_getElems___rarg(lean_object*); lean_object* l_Array_findSomeRevM_x3f_find___at_Lean_Syntax_getTailInfo_x3f___spec__1(lean_object*, lean_object*, lean_object*); uint8_t l_Lean_Meta_Simp_Config_singlePass___default; @@ -231,11 +235,10 @@ lean_object* l_Lean_Syntax_setHeadInfoAux_match__1___rarg(lean_object*, lean_obj lean_object* l_Lean_Syntax_SepArray_ofElemsUsingRef___rarg___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*); uint8_t l_instDecidableNot___rarg(uint8_t); lean_object* l_Lean_Syntax_mkStrLit___boxed(lean_object*, lean_object*); -lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__25; lean_object* l_Lean_Syntax_mkApp_match__1___rarg(lean_object*, lean_object*, lean_object*); +lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__24; lean_object* l_Lean_Syntax_expandInterpolatedStr(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_numLitKind; -lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_beqConfig____x40_Init_Meta___hyg_5772____boxed(lean_object*, lean_object*); extern lean_object* l_myMacro____x40_Init_Notation___hyg_13855____closed__8; lean_object* l_Lean_Syntax_expandInterpolatedStrChunks_match__1___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_instQuoteString(lean_object*); @@ -245,7 +248,7 @@ lean_object* l_Array_mapSepElemsM(lean_object*); lean_object* l___private_Init_Meta_0__Lean_quoteName___closed__6; lean_object* lean_nat_sub(lean_object*, lean_object*); lean_object* l_Lean_termEvalPrio_x21_____closed__3; -lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__6; +lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__7; lean_object* l_Lean_instQuoteProd___rarg___closed__2; lean_object* l_Lean_Syntax_setHeadInfoAux_match__1(lean_object*); lean_object* l_Lean_mkFreshId___rarg___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*); @@ -261,10 +264,8 @@ lean_object* l_Lean_monadNameGeneratorLift___rarg(lean_object*, lean_object*); lean_object* l___private_Init_Data_String_Basic_0__Substring_takeWhileAux___at___private_Init_Meta_0__Lean_Syntax_decodeNameLitAux___spec__1(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Syntax_decodeQuotedChar_match__1___rarg(lean_object*, lean_object*); lean_object* l_Lean_Syntax_SepArray_getElems(lean_object*); -lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__7; lean_object* l_Lean_Syntax_getId___boxed(lean_object*); -uint8_t l___private_Init_Meta_0__Lean_Meta_Simp_beqConfig____x40_Init_Meta___hyg_5772_(lean_object*, lean_object*); -lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__24; +uint8_t l___private_Init_Meta_0__Lean_Meta_Simp_beqConfig____x40_Init_Meta___hyg_5775_(lean_object*, lean_object*); lean_object* l_Lean_Syntax_hasArgs_match__1___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_termEvalPrio_x21_____closed__5; lean_object* l___private_Init_Meta_0__Lean_quoteList___rarg(lean_object*, lean_object*); @@ -274,8 +275,8 @@ lean_object* l_Lean_Syntax_setTailInfo_match__1___rarg(lean_object*, lean_object lean_object* l___private_Init_Meta_0__Lean_Syntax_updateLast_match__1(lean_object*, lean_object*); lean_object* l_Lean_instQuoteProd___rarg___closed__1; lean_object* l_Lean_Syntax_isStrLit_x3f_match__1___rarg(lean_object*, lean_object*, lean_object*); +lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__25; lean_object* l_Lean_Name_capitalize_match__1___rarg(lean_object*, lean_object*, lean_object*); -lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_beqConfig____x40_Init_Meta___hyg_5772__match__1___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Syntax_SepArray_ofElems___boxed(lean_object*, lean_object*); lean_object* l___private_Init_Meta_0__Lean_Syntax_decodeHexLitAux(lean_object*, lean_object*, lean_object*); uint8_t l_Lean_isNumericSubscript(uint32_t); @@ -312,14 +313,14 @@ lean_object* l_Array_getSepElems___rarg(lean_object*); extern lean_object* l_Lean_reservedMacroScope; lean_object* l_Lean_NameGenerator_namePrefix___default___closed__1; lean_object* l_Lean_mkNullNode(lean_object*); +lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_beqConfig____x40_Init_Meta___hyg_5775__match__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Name_instToStringName; extern lean_object* l_Lean_Parser_Syntax_addPrio___closed__2; lean_object* l_Lean_instQuoteBool___closed__3; -lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__15; extern lean_object* l_term_x7b_____x3a___x2f_x2f___x7d___closed__3; lean_object* l_Nat_repr(lean_object*); lean_object* l_Array_mapSepElemsM___at_Array_mapSepElems___spec__1___boxed(lean_object*, lean_object*); -lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__18; +lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__22; lean_object* l_Lean_instQuoteSubstring___boxed(lean_object*); lean_object* l___private_Init_Meta_0__Lean_Syntax_decodeInterpStrQuotedChar_match__1___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_instQuoteSubstring(lean_object*); @@ -331,8 +332,9 @@ lean_object* l___private_Init_Meta_0__Lean_Syntax_decodeInterpStrQuotedChar___bo lean_object* l_Lean_Syntax_getHead_x3f_match__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_charLitKind; lean_object* l_Lean_NameGenerator_idx___default; -lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_beqConfig____x40_Init_Meta___hyg_5772__match__1(lean_object*); lean_object* l_Lean_Syntax_getTailInfo_x3f_match__1(lean_object*); +lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__28; +lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__14; lean_object* l___private_Init_Data_String_Basic_0__Substring_takeWhileAux___at___private_Init_Meta_0__Lean_Syntax_decodeNameLitAux___spec__2(lean_object*, lean_object*, lean_object*); lean_object* lean_array_to_list(lean_object*, lean_object*); lean_object* l_Lean_mkFreshId(lean_object*); @@ -342,10 +344,9 @@ lean_object* l_Lean_termEvalPrio_x21_____closed__7; lean_object* l_Lean_mkCIdent(lean_object*); lean_object* l_Lean_mkOptionalNode_match__1(lean_object*); lean_object* l_Lean_version_getIsRelease___boxed(lean_object*); -lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__3; +lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_beqConfig____x40_Init_Meta___hyg_5775__match__1(lean_object*); extern lean_object* l_Lean_numLitKind___closed__2; lean_object* l___private_Init_Meta_0__Lean_quoteName___closed__2; -lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_beqConfig____x40_Init_Meta___hyg_5772__match__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Syntax_isNameLit_x3f_match__1(lean_object*); lean_object* l_Array_findSomeRevM_x3f_find___at_Lean_Syntax_getTailInfo_x3f___spec__1___lambda__1(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Syntax_decodeQuotedChar_match__2(lean_object*); @@ -377,7 +378,6 @@ lean_object* l_Lean_Syntax_isNone_match__1(lean_object*); lean_object* l_Array_filterSepElemsM(lean_object*); extern lean_object* l_Lean_instInhabitedSyntax; lean_object* l_Lean_version_getSpecialDesc(lean_object*); -lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__10; lean_object* l_Lean_version_minor___closed__1; lean_object* l_Lean_mkCIdentFromRef___rarg___lambda__1(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_mkSepArray(lean_object*, lean_object*); @@ -389,10 +389,10 @@ lean_object* l_Lean_isNumericSubscript___boxed(lean_object*); lean_object* l_Lean_evalOptPrio(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Syntax_getOptionalIdent_x3f_match__1___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_termEvalPrec_x21_____closed__5; +lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_beqConfig____x40_Init_Meta___hyg_5775__match__1___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_NameGenerator_mkChild(lean_object*); extern lean_object* l_Lean_Parser_Syntax_addPrec___closed__10; extern lean_object* l_term_x7b_____x3a___x2f_x2f___x7d___closed__13; -lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__20; lean_object* l_Lean_Syntax_isCharLit_x3f___boxed(lean_object*); lean_object* l_Lean_Syntax_getId_match__1___rarg(lean_object*, lean_object*, lean_object*); size_t lean_usize_of_nat(lean_object*); @@ -421,7 +421,6 @@ lean_object* l_Lean_Option_hasQuote(lean_object*); uint8_t l_Lean_Syntax_isAtom(lean_object*); lean_object* l_Lean_Syntax_isToken_match__1(lean_object*); extern lean_object* l_Lean_nullKind___closed__2; -lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__16; uint8_t l_Lean_isLetterLike(uint32_t); lean_object* l_Lean_evalPrec(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Syntax_isStrLit_x3f___boxed(lean_object*); @@ -443,6 +442,7 @@ lean_object* l___private_Init_Meta_0__Array_mapSepElemsMAux___at_Array_mapSepEle lean_object* l_Lean_Syntax_decodeQuotedChar___boxed__const__2; lean_object* l_Array_mapMUnsafe_map___at_Lean_expandMacros___spec__1(size_t, size_t, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_instQuoteProd_match__1___rarg(lean_object*, lean_object*); +extern lean_object* l_Lean_Parser_Tactic_myMacro____x40_Init_Notation___hyg_16223____closed__1; lean_object* l___private_Init_Meta_0__Array_mapSepElemsMAux___rarg___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Syntax_setTailInfoAux_match__2___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Syntax_isLit_x3f_match__2(lean_object*); @@ -453,6 +453,7 @@ lean_object* l_Lean_Name_instReprName___closed__1; lean_object* l_Lean_termEvalPrec_x21_____closed__6; lean_object* l_Lean_Name_instReprName___boxed(lean_object*, lean_object*); lean_object* l_Lean_Syntax_decodeQuotedChar_match__6(lean_object*); +lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__16; lean_object* l___private_Init_Meta_0__Lean_quoteName_match__1(lean_object*); uint8_t l_Lean_version_getIsRelease(lean_object*); lean_object* l_Lean_Name_appendAfter(lean_object*, lean_object*); @@ -486,6 +487,7 @@ lean_object* l_Lean_Syntax_getHead_x3f_match__1(lean_object*); lean_object* l_Lean_Syntax_getArgs(lean_object*); lean_object* l_Lean_Syntax_decodeScientificLitVal_x3f(lean_object*); uint8_t l_Lean_isGreek(uint32_t); +lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__10; lean_object* l___private_Init_Meta_0__Lean_quoteList_match__1(lean_object*, lean_object*); lean_object* l_Lean_termEvalPrio_x21__; lean_object* l___private_Init_Meta_0__Lean_Syntax_decodeInterpStrQuotedChar___boxed__const__1; @@ -494,7 +496,7 @@ lean_object* l_Array_filterSepElems(lean_object*, lean_object*); lean_object* l_Array_mapSepElemsM___at_Array_mapSepElems___spec__1(lean_object*, lean_object*); lean_object* l___private_Init_Meta_0__Lean_Syntax_decodeHexLitAux_match__1(lean_object*); lean_object* l_Lean_Name_appendBefore_match__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923_(lean_object*, lean_object*); +lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938_(lean_object*, lean_object*); lean_object* l_Lean_mkSepArray_match__1___rarg(lean_object*, lean_object*); lean_object* l_Lean_instQuoteSubstring___closed__4; lean_object* l_Lean_mkOptionalNode_match__1___rarg(lean_object*, lean_object*, lean_object*); @@ -503,6 +505,7 @@ lean_object* l_Lean_Syntax_setHeadInfo_match__1___rarg(lean_object*, lean_object lean_object* l_Lean_expandMacros___boxed__const__1; lean_object* l_Lean_Syntax_getOptionalIdent_x3f(lean_object*); lean_object* l_Lean_evalPrec___closed__1; +lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__20; lean_object* l_Lean_Syntax_decodeCharLit_match__1(lean_object*); lean_object* l_Lean_Name_toStringWithSep___closed__1; lean_object* l_Lean_NameGenerator_curr(lean_object*); @@ -518,7 +521,6 @@ lean_object* l_Lean_isIdBeginEscape___boxed(lean_object*); lean_object* l_Lean_withHeadRefOnly_match__1___rarg(lean_object*, lean_object*, lean_object*); lean_object* l___private_Init_Meta_0__Array_filterSepElemsMAux___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Syntax_expandInterpolatedStr___lambda__1___closed__1; -lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__11; lean_object* lean_nat_mul(lean_object*, lean_object*); lean_object* l_Lean_Syntax_expandInterpolatedStr___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_mkCIdentFromRef___rarg(lean_object*, lean_object*, lean_object*); @@ -567,7 +569,6 @@ uint8_t l_Lean_Syntax_isOfKind(lean_object*, lean_object*); lean_object* l_Lean_Syntax_findAux_match__1(lean_object*); lean_object* l_Lean_Syntax_isNone___boxed(lean_object*); lean_object* l_Lean_instQuoteBool_match__1___rarg___boxed(lean_object*, lean_object*, lean_object*); -lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__12; lean_object* l_Lean_Syntax_isToken___boxed(lean_object*, lean_object*); lean_object* l_Lean_Syntax_getOptional_x3f_match__1___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_mkCIdentFrom___boxed(lean_object*, lean_object*); @@ -583,6 +584,7 @@ lean_object* l_Lean_expandMacros_match__2___rarg(lean_object*, lean_object*, lea lean_object* l_Array_forInUnsafe_loop___at_Lean_Syntax_findAux___spec__1(lean_object*, lean_object*, lean_object*, size_t, size_t, lean_object*); lean_object* l_Lean_Syntax_SepArray_instCoeTailSepArrayArraySyntax___closed__1; extern lean_object* l_Substring_splitOn_loop___closed__2; +lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__19; lean_object* l_Lean_Name_instReprName___closed__2; uint8_t l_Lean_isSubScriptAlnum(uint32_t); lean_object* l_Lean_Syntax_toNat_match__1(lean_object*); @@ -603,7 +605,6 @@ lean_object* l_Lean_Syntax_getOptional_x3f___boxed(lean_object*); lean_object* l_Lean_Syntax_setHeadInfoAux_match__2___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Syntax_decodeQuotedChar_match__1(lean_object*); lean_object* l_Lean_Syntax_getHead_x3f___closed__2; -lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__26; lean_object* l_Lean_mkCIdentFrom___closed__2; lean_object* l_Lean_instQuoteArray___rarg(lean_object*, lean_object*); lean_object* lean_nat_mod(lean_object*, lean_object*); @@ -614,6 +615,7 @@ lean_object* l_Lean_Meta_Simp_instBEqConfig___closed__1; lean_object* l_Lean_instQuoteProd___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Syntax_isScientificLit_x3f_match__1(lean_object*); lean_object* l___private_Init_Meta_0__Lean_quoteOption_match__1(lean_object*, lean_object*); +lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__26; uint8_t l_Lean_Meta_Simp_Config_proj___default; lean_object* l_Lean_Syntax_instCoeArraySyntaxSepArray(lean_object*); lean_object* l_Lean_Syntax_find_x3f(lean_object*, lean_object*); @@ -644,6 +646,7 @@ lean_object* l_Lean_Syntax_getHead_x3f___lambda__4(lean_object*); lean_object* l_Lean_Syntax_decodeQuotedChar_match__5___rarg(lean_object*, lean_object*); lean_object* l_Lean_instQuoteName___closed__1; lean_object* l___private_Init_Meta_0__Lean_Syntax_updateLast_match__1___rarg(lean_object*, lean_object*, lean_object*); +lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__12; lean_object* l_Lean_Syntax_findAux(lean_object*, lean_object*); lean_object* l_Lean_Syntax_decodeStrLitAux(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_termEvalPrec_x21_____closed__1; @@ -672,6 +675,7 @@ lean_object* l_Lean_termEvalPrec_x21_____closed__4; lean_object* l_Lean_Meta_Simp_instInhabitedConfig___closed__1; extern lean_object* l_Lean_Parser_Syntax_addPrec___closed__8; lean_object* l_Lean_termEvalPrio_x21_____closed__4; +lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__11; lean_object* l___private_Init_Meta_0__Lean_Syntax_updateLast___at_Lean_Syntax_setTailInfoAux___spec__1(lean_object*, lean_object*, lean_object*); uint8_t l_Lean_isIdRest(uint32_t); lean_object* l_Lean_Syntax_isIdent___boxed(lean_object*); @@ -683,7 +687,6 @@ uint8_t lean_nat_dec_lt(lean_object*, lean_object*); lean_object* l___private_Init_Meta_0__Array_mapSepElemsMAux___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); uint8_t l_Lean_Syntax_isIdent(lean_object*); lean_object* l_Lean_evalOptPrio_match__1(lean_object*); -lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__19; lean_object* l___private_Init_Meta_0__Lean_version_getMajor___boxed(lean_object* x_1) { _start: { @@ -7358,6 +7361,7 @@ x_49 = lean_nat_add(x_48, x_42); lean_dec(x_42); lean_dec(x_48); x_50 = l_Char_ofNat(x_49); +lean_dec(x_49); x_51 = lean_unbox_uint32(x_50); lean_dec(x_50); x_52 = lean_box_uint32(x_51); @@ -7389,6 +7393,7 @@ x_61 = lean_nat_add(x_60, x_53); lean_dec(x_53); lean_dec(x_60); x_62 = l_Char_ofNat(x_61); +lean_dec(x_61); x_63 = lean_unbox_uint32(x_62); lean_dec(x_62); x_64 = lean_box_uint32(x_63); @@ -7434,6 +7439,7 @@ x_76 = lean_nat_add(x_75, x_67); lean_dec(x_67); lean_dec(x_75); x_77 = l_Char_ofNat(x_76); +lean_dec(x_76); x_78 = lean_unbox_uint32(x_77); lean_dec(x_77); x_79 = lean_box_uint32(x_78); @@ -7505,6 +7511,7 @@ x_95 = lean_nat_add(x_94, x_92); lean_dec(x_92); lean_dec(x_94); x_96 = l_Char_ofNat(x_95); +lean_dec(x_95); x_97 = lean_unbox_uint32(x_96); lean_dec(x_96); x_98 = lean_box_uint32(x_97); @@ -7526,6 +7533,7 @@ x_103 = lean_nat_add(x_102, x_99); lean_dec(x_99); lean_dec(x_102); x_104 = l_Char_ofNat(x_103); +lean_dec(x_103); x_105 = lean_unbox_uint32(x_104); lean_dec(x_104); x_106 = lean_box_uint32(x_105); @@ -7561,6 +7569,7 @@ x_114 = lean_nat_add(x_113, x_109); lean_dec(x_109); lean_dec(x_113); x_115 = l_Char_ofNat(x_114); +lean_dec(x_114); x_116 = lean_unbox_uint32(x_115); lean_dec(x_115); x_117 = lean_box_uint32(x_116); @@ -11470,7 +11479,6 @@ lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_dec(x_6); x_8 = lean_unsigned_to_nat(2u); x_9 = lean_nat_add(x_1, x_8); -lean_dec(x_1); x_10 = l___private_Init_Meta_0__Array_filterSepElemsMAux___rarg(x_2, x_3, x_4, x_9, x_5); return x_10; } @@ -11489,7 +11497,6 @@ if (x_14 == 0) lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; x_15 = lean_unsigned_to_nat(2u); x_16 = lean_nat_add(x_1, x_15); -lean_dec(x_1); x_17 = lean_array_push(x_5, x_6); x_18 = l___private_Init_Meta_0__Array_filterSepElemsMAux___rarg(x_2, x_3, x_4, x_16, x_17); return x_18; @@ -11497,13 +11504,11 @@ return x_18; else { lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; -lean_inc(x_1); x_19 = lean_nat_sub(x_1, lean_box(1)); x_20 = lean_array_fget(x_3, x_19); lean_dec(x_19); x_21 = lean_unsigned_to_nat(2u); x_22 = lean_nat_add(x_1, x_21); -lean_dec(x_1); x_23 = lean_array_push(x_5, x_20); x_24 = lean_array_push(x_23, x_6); x_25 = l___private_Init_Meta_0__Array_filterSepElemsMAux___rarg(x_2, x_3, x_4, x_22, x_24); @@ -11515,7 +11520,6 @@ else lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; x_26 = lean_unsigned_to_nat(2u); x_27 = lean_nat_add(x_1, x_26); -lean_dec(x_1); x_28 = lean_array_push(x_5, x_6); x_29 = l___private_Init_Meta_0__Array_filterSepElemsMAux___rarg(x_2, x_3, x_4, x_27, x_28); return x_29; @@ -11581,6 +11585,7 @@ uint8_t x_8; lean_object* x_9; x_8 = lean_unbox(x_7); lean_dec(x_7); x_9 = l___private_Init_Meta_0__Array_filterSepElemsMAux___rarg___lambda__1(x_1, x_2, x_3, x_4, x_5, x_6, x_8); +lean_dec(x_1); return x_9; } } @@ -11658,7 +11663,6 @@ goto _start; else { lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; -lean_inc(x_3); x_21 = lean_nat_sub(x_3, lean_box(1)); x_22 = lean_array_fget(x_1, x_21); lean_dec(x_21); @@ -13233,13 +13237,21 @@ x_1 = 1; return x_1; } } +static uint8_t _init_l_Lean_Meta_Simp_Config_decide___default() { +_start: +{ +uint8_t x_1; +x_1 = 1; +return x_1; +} +} static lean_object* _init_l_Lean_Meta_Simp_instInhabitedConfig___closed__1() { _start: { lean_object* x_1; uint8_t x_2; lean_object* x_3; x_1 = lean_unsigned_to_nat(0u); x_2 = 0; -x_3 = lean_alloc_ctor(0, 1, 9); +x_3 = lean_alloc_ctor(0, 1, 10); lean_ctor_set(x_3, 0, x_1); lean_ctor_set_uint8(x_3, sizeof(void*)*1, x_2); lean_ctor_set_uint8(x_3, sizeof(void*)*1 + 1, x_2); @@ -13250,6 +13262,7 @@ lean_ctor_set_uint8(x_3, sizeof(void*)*1 + 5, x_2); lean_ctor_set_uint8(x_3, sizeof(void*)*1 + 6, x_2); lean_ctor_set_uint8(x_3, sizeof(void*)*1 + 7, x_2); lean_ctor_set_uint8(x_3, sizeof(void*)*1 + 8, x_2); +lean_ctor_set_uint8(x_3, sizeof(void*)*1 + 9, x_2); return x_3; } } @@ -13261,10 +13274,10 @@ x_1 = l_Lean_Meta_Simp_instInhabitedConfig___closed__1; return x_1; } } -lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_beqConfig____x40_Init_Meta___hyg_5772__match__1___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_beqConfig____x40_Init_Meta___hyg_5775__match__1___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { -lean_object* x_5; uint8_t x_6; uint8_t x_7; uint8_t x_8; uint8_t x_9; uint8_t x_10; uint8_t x_11; uint8_t x_12; uint8_t x_13; uint8_t x_14; lean_object* x_15; uint8_t x_16; uint8_t x_17; uint8_t x_18; uint8_t x_19; uint8_t x_20; uint8_t x_21; uint8_t x_22; uint8_t x_23; uint8_t x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; +lean_object* x_5; uint8_t x_6; uint8_t x_7; uint8_t x_8; uint8_t x_9; uint8_t x_10; uint8_t x_11; uint8_t x_12; uint8_t x_13; uint8_t x_14; uint8_t x_15; lean_object* x_16; uint8_t x_17; uint8_t x_18; uint8_t x_19; uint8_t x_20; uint8_t x_21; uint8_t x_22; uint8_t x_23; uint8_t x_24; uint8_t x_25; uint8_t x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; x_5 = lean_ctor_get(x_1, 0); lean_inc(x_5); x_6 = lean_ctor_get_uint8(x_1, sizeof(void*)*1); @@ -13276,63 +13289,67 @@ x_11 = lean_ctor_get_uint8(x_1, sizeof(void*)*1 + 5); x_12 = lean_ctor_get_uint8(x_1, sizeof(void*)*1 + 6); x_13 = lean_ctor_get_uint8(x_1, sizeof(void*)*1 + 7); x_14 = lean_ctor_get_uint8(x_1, sizeof(void*)*1 + 8); +x_15 = lean_ctor_get_uint8(x_1, sizeof(void*)*1 + 9); lean_dec(x_1); -x_15 = lean_ctor_get(x_2, 0); -lean_inc(x_15); -x_16 = lean_ctor_get_uint8(x_2, sizeof(void*)*1); -x_17 = lean_ctor_get_uint8(x_2, sizeof(void*)*1 + 1); -x_18 = lean_ctor_get_uint8(x_2, sizeof(void*)*1 + 2); -x_19 = lean_ctor_get_uint8(x_2, sizeof(void*)*1 + 3); -x_20 = lean_ctor_get_uint8(x_2, sizeof(void*)*1 + 4); -x_21 = lean_ctor_get_uint8(x_2, sizeof(void*)*1 + 5); -x_22 = lean_ctor_get_uint8(x_2, sizeof(void*)*1 + 6); -x_23 = lean_ctor_get_uint8(x_2, sizeof(void*)*1 + 7); -x_24 = lean_ctor_get_uint8(x_2, sizeof(void*)*1 + 8); +x_16 = lean_ctor_get(x_2, 0); +lean_inc(x_16); +x_17 = lean_ctor_get_uint8(x_2, sizeof(void*)*1); +x_18 = lean_ctor_get_uint8(x_2, sizeof(void*)*1 + 1); +x_19 = lean_ctor_get_uint8(x_2, sizeof(void*)*1 + 2); +x_20 = lean_ctor_get_uint8(x_2, sizeof(void*)*1 + 3); +x_21 = lean_ctor_get_uint8(x_2, sizeof(void*)*1 + 4); +x_22 = lean_ctor_get_uint8(x_2, sizeof(void*)*1 + 5); +x_23 = lean_ctor_get_uint8(x_2, sizeof(void*)*1 + 6); +x_24 = lean_ctor_get_uint8(x_2, sizeof(void*)*1 + 7); +x_25 = lean_ctor_get_uint8(x_2, sizeof(void*)*1 + 8); +x_26 = lean_ctor_get_uint8(x_2, sizeof(void*)*1 + 9); lean_dec(x_2); -x_25 = lean_box(x_6); -x_26 = lean_box(x_7); -x_27 = lean_box(x_8); -x_28 = lean_box(x_9); -x_29 = lean_box(x_10); -x_30 = lean_box(x_11); -x_31 = lean_box(x_12); -x_32 = lean_box(x_13); -x_33 = lean_box(x_14); -x_34 = lean_box(x_16); -x_35 = lean_box(x_17); -x_36 = lean_box(x_18); -x_37 = lean_box(x_19); -x_38 = lean_box(x_20); -x_39 = lean_box(x_21); -x_40 = lean_box(x_22); -x_41 = lean_box(x_23); -x_42 = lean_box(x_24); -{ lean_object* _aargs[] = {x_5, x_25, x_26, x_27, x_28, x_29, x_30, x_31, x_32, x_33, x_15, x_34, x_35, x_36, x_37, x_38, x_39, x_40, x_41, x_42}; -x_43 = lean_apply_m(x_3, 20, _aargs); } -return x_43; +x_27 = lean_box(x_6); +x_28 = lean_box(x_7); +x_29 = lean_box(x_8); +x_30 = lean_box(x_9); +x_31 = lean_box(x_10); +x_32 = lean_box(x_11); +x_33 = lean_box(x_12); +x_34 = lean_box(x_13); +x_35 = lean_box(x_14); +x_36 = lean_box(x_15); +x_37 = lean_box(x_17); +x_38 = lean_box(x_18); +x_39 = lean_box(x_19); +x_40 = lean_box(x_20); +x_41 = lean_box(x_21); +x_42 = lean_box(x_22); +x_43 = lean_box(x_23); +x_44 = lean_box(x_24); +x_45 = lean_box(x_25); +x_46 = lean_box(x_26); +{ lean_object* _aargs[] = {x_5, x_27, x_28, x_29, x_30, x_31, x_32, x_33, x_34, x_35, x_36, x_16, x_37, x_38, x_39, x_40, x_41, x_42, x_43, x_44, x_45, x_46}; +x_47 = lean_apply_m(x_3, 22, _aargs); } +return x_47; } } -lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_beqConfig____x40_Init_Meta___hyg_5772__match__1(lean_object* x_1) { +lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_beqConfig____x40_Init_Meta___hyg_5775__match__1(lean_object* x_1) { _start: { lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l___private_Init_Meta_0__Lean_Meta_Simp_beqConfig____x40_Init_Meta___hyg_5772__match__1___rarg___boxed), 4, 0); +x_2 = lean_alloc_closure((void*)(l___private_Init_Meta_0__Lean_Meta_Simp_beqConfig____x40_Init_Meta___hyg_5775__match__1___rarg___boxed), 4, 0); return x_2; } } -lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_beqConfig____x40_Init_Meta___hyg_5772__match__1___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_beqConfig____x40_Init_Meta___hyg_5775__match__1___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { lean_object* x_5; -x_5 = l___private_Init_Meta_0__Lean_Meta_Simp_beqConfig____x40_Init_Meta___hyg_5772__match__1___rarg(x_1, x_2, x_3, x_4); +x_5 = l___private_Init_Meta_0__Lean_Meta_Simp_beqConfig____x40_Init_Meta___hyg_5775__match__1___rarg(x_1, x_2, x_3, x_4); lean_dec(x_4); return x_5; } } -uint8_t l___private_Init_Meta_0__Lean_Meta_Simp_beqConfig____x40_Init_Meta___hyg_5772_(lean_object* x_1, lean_object* x_2) { +uint8_t l___private_Init_Meta_0__Lean_Meta_Simp_beqConfig____x40_Init_Meta___hyg_5775_(lean_object* x_1, lean_object* x_2) { _start: { -lean_object* x_3; uint8_t x_4; uint8_t x_5; uint8_t x_6; uint8_t x_7; uint8_t x_8; uint8_t x_9; uint8_t x_10; uint8_t x_11; uint8_t x_12; lean_object* x_13; uint8_t x_14; uint8_t x_15; uint8_t x_16; uint8_t x_17; uint8_t x_18; uint8_t x_19; uint8_t x_20; uint8_t x_21; uint8_t x_22; lean_object* x_23; lean_object* x_27; lean_object* x_33; lean_object* x_39; lean_object* x_45; lean_object* x_51; lean_object* x_57; lean_object* x_63; uint8_t x_69; +lean_object* x_3; uint8_t x_4; uint8_t x_5; uint8_t x_6; uint8_t x_7; uint8_t x_8; uint8_t x_9; uint8_t x_10; uint8_t x_11; uint8_t x_12; uint8_t x_13; lean_object* x_14; uint8_t x_15; uint8_t x_16; uint8_t x_17; uint8_t x_18; uint8_t x_19; uint8_t x_20; uint8_t x_21; uint8_t x_22; uint8_t x_23; uint8_t x_24; lean_object* x_25; lean_object* x_29; lean_object* x_35; lean_object* x_41; lean_object* x_47; lean_object* x_53; lean_object* x_59; lean_object* x_65; lean_object* x_71; uint8_t x_77; x_3 = lean_ctor_get(x_1, 0); x_4 = lean_ctor_get_uint8(x_1, sizeof(void*)*1); x_5 = lean_ctor_get_uint8(x_1, sizeof(void*)*1 + 1); @@ -13343,340 +13360,378 @@ x_9 = lean_ctor_get_uint8(x_1, sizeof(void*)*1 + 5); x_10 = lean_ctor_get_uint8(x_1, sizeof(void*)*1 + 6); x_11 = lean_ctor_get_uint8(x_1, sizeof(void*)*1 + 7); x_12 = lean_ctor_get_uint8(x_1, sizeof(void*)*1 + 8); -x_13 = lean_ctor_get(x_2, 0); -x_14 = lean_ctor_get_uint8(x_2, sizeof(void*)*1); -x_15 = lean_ctor_get_uint8(x_2, sizeof(void*)*1 + 1); -x_16 = lean_ctor_get_uint8(x_2, sizeof(void*)*1 + 2); -x_17 = lean_ctor_get_uint8(x_2, sizeof(void*)*1 + 3); -x_18 = lean_ctor_get_uint8(x_2, sizeof(void*)*1 + 4); -x_19 = lean_ctor_get_uint8(x_2, sizeof(void*)*1 + 5); -x_20 = lean_ctor_get_uint8(x_2, sizeof(void*)*1 + 6); -x_21 = lean_ctor_get_uint8(x_2, sizeof(void*)*1 + 7); -x_22 = lean_ctor_get_uint8(x_2, sizeof(void*)*1 + 8); -x_69 = lean_nat_dec_eq(x_3, x_13); -if (x_69 == 0) +x_13 = lean_ctor_get_uint8(x_1, sizeof(void*)*1 + 9); +x_14 = lean_ctor_get(x_2, 0); +x_15 = lean_ctor_get_uint8(x_2, sizeof(void*)*1); +x_16 = lean_ctor_get_uint8(x_2, sizeof(void*)*1 + 1); +x_17 = lean_ctor_get_uint8(x_2, sizeof(void*)*1 + 2); +x_18 = lean_ctor_get_uint8(x_2, sizeof(void*)*1 + 3); +x_19 = lean_ctor_get_uint8(x_2, sizeof(void*)*1 + 4); +x_20 = lean_ctor_get_uint8(x_2, sizeof(void*)*1 + 5); +x_21 = lean_ctor_get_uint8(x_2, sizeof(void*)*1 + 6); +x_22 = lean_ctor_get_uint8(x_2, sizeof(void*)*1 + 7); +x_23 = lean_ctor_get_uint8(x_2, sizeof(void*)*1 + 8); +x_24 = lean_ctor_get_uint8(x_2, sizeof(void*)*1 + 9); +x_77 = lean_nat_dec_eq(x_3, x_14); +if (x_77 == 0) { -uint8_t x_70; -x_70 = 0; -return x_70; +uint8_t x_78; +x_78 = 0; +return x_78; } else { if (x_4 == 0) { -if (x_14 == 0) +if (x_15 == 0) { -lean_object* x_71; -x_71 = lean_box(0); -x_63 = x_71; -goto block_68; +lean_object* x_79; +x_79 = lean_box(0); +x_71 = x_79; +goto block_76; } else { -uint8_t x_72; -x_72 = 0; -return x_72; +uint8_t x_80; +x_80 = 0; +return x_80; } } else { -if (x_14 == 0) +if (x_15 == 0) +{ +uint8_t x_81; +x_81 = 0; +return x_81; +} +else +{ +lean_object* x_82; +x_82 = lean_box(0); +x_71 = x_82; +goto block_76; +} +} +} +block_28: +{ +lean_dec(x_25); +if (x_13 == 0) +{ +if (x_24 == 0) +{ +uint8_t x_26; +x_26 = 1; +return x_26; +} +else +{ +uint8_t x_27; +x_27 = 0; +return x_27; +} +} +else +{ +return x_24; +} +} +block_34: +{ +lean_dec(x_29); +if (x_12 == 0) +{ +if (x_23 == 0) +{ +lean_object* x_30; +x_30 = lean_box(0); +x_25 = x_30; +goto block_28; +} +else +{ +uint8_t x_31; +x_31 = 0; +return x_31; +} +} +else +{ +if (x_23 == 0) +{ +uint8_t x_32; +x_32 = 0; +return x_32; +} +else +{ +lean_object* x_33; +x_33 = lean_box(0); +x_25 = x_33; +goto block_28; +} +} +} +block_40: +{ +lean_dec(x_35); +if (x_11 == 0) +{ +if (x_22 == 0) +{ +lean_object* x_36; +x_36 = lean_box(0); +x_29 = x_36; +goto block_34; +} +else +{ +uint8_t x_37; +x_37 = 0; +return x_37; +} +} +else +{ +if (x_22 == 0) +{ +uint8_t x_38; +x_38 = 0; +return x_38; +} +else +{ +lean_object* x_39; +x_39 = lean_box(0); +x_29 = x_39; +goto block_34; +} +} +} +block_46: +{ +lean_dec(x_41); +if (x_10 == 0) +{ +if (x_21 == 0) +{ +lean_object* x_42; +x_42 = lean_box(0); +x_35 = x_42; +goto block_40; +} +else +{ +uint8_t x_43; +x_43 = 0; +return x_43; +} +} +else +{ +if (x_21 == 0) +{ +uint8_t x_44; +x_44 = 0; +return x_44; +} +else +{ +lean_object* x_45; +x_45 = lean_box(0); +x_35 = x_45; +goto block_40; +} +} +} +block_52: +{ +lean_dec(x_47); +if (x_9 == 0) +{ +if (x_20 == 0) +{ +lean_object* x_48; +x_48 = lean_box(0); +x_41 = x_48; +goto block_46; +} +else +{ +uint8_t x_49; +x_49 = 0; +return x_49; +} +} +else +{ +if (x_20 == 0) +{ +uint8_t x_50; +x_50 = 0; +return x_50; +} +else +{ +lean_object* x_51; +x_51 = lean_box(0); +x_41 = x_51; +goto block_46; +} +} +} +block_58: +{ +lean_dec(x_53); +if (x_8 == 0) +{ +if (x_19 == 0) +{ +lean_object* x_54; +x_54 = lean_box(0); +x_47 = x_54; +goto block_52; +} +else +{ +uint8_t x_55; +x_55 = 0; +return x_55; +} +} +else +{ +if (x_19 == 0) +{ +uint8_t x_56; +x_56 = 0; +return x_56; +} +else +{ +lean_object* x_57; +x_57 = lean_box(0); +x_47 = x_57; +goto block_52; +} +} +} +block_64: +{ +lean_dec(x_59); +if (x_7 == 0) +{ +if (x_18 == 0) +{ +lean_object* x_60; +x_60 = lean_box(0); +x_53 = x_60; +goto block_58; +} +else +{ +uint8_t x_61; +x_61 = 0; +return x_61; +} +} +else +{ +if (x_18 == 0) +{ +uint8_t x_62; +x_62 = 0; +return x_62; +} +else +{ +lean_object* x_63; +x_63 = lean_box(0); +x_53 = x_63; +goto block_58; +} +} +} +block_70: +{ +lean_dec(x_65); +if (x_6 == 0) +{ +if (x_17 == 0) +{ +lean_object* x_66; +x_66 = lean_box(0); +x_59 = x_66; +goto block_64; +} +else +{ +uint8_t x_67; +x_67 = 0; +return x_67; +} +} +else +{ +if (x_17 == 0) +{ +uint8_t x_68; +x_68 = 0; +return x_68; +} +else +{ +lean_object* x_69; +x_69 = lean_box(0); +x_59 = x_69; +goto block_64; +} +} +} +block_76: +{ +lean_dec(x_71); +if (x_5 == 0) +{ +if (x_16 == 0) +{ +lean_object* x_72; +x_72 = lean_box(0); +x_65 = x_72; +goto block_70; +} +else { uint8_t x_73; x_73 = 0; return x_73; } -else -{ -lean_object* x_74; -x_74 = lean_box(0); -x_63 = x_74; -goto block_68; -} -} -} -block_26: -{ -lean_dec(x_23); -if (x_12 == 0) -{ -if (x_22 == 0) -{ -uint8_t x_24; -x_24 = 1; -return x_24; -} -else -{ -uint8_t x_25; -x_25 = 0; -return x_25; -} -} -else -{ -return x_22; -} -} -block_32: -{ -lean_dec(x_27); -if (x_11 == 0) -{ -if (x_21 == 0) -{ -lean_object* x_28; -x_28 = lean_box(0); -x_23 = x_28; -goto block_26; -} -else -{ -uint8_t x_29; -x_29 = 0; -return x_29; -} -} -else -{ -if (x_21 == 0) -{ -uint8_t x_30; -x_30 = 0; -return x_30; -} -else -{ -lean_object* x_31; -x_31 = lean_box(0); -x_23 = x_31; -goto block_26; -} -} -} -block_38: -{ -lean_dec(x_33); -if (x_10 == 0) -{ -if (x_20 == 0) -{ -lean_object* x_34; -x_34 = lean_box(0); -x_27 = x_34; -goto block_32; -} -else -{ -uint8_t x_35; -x_35 = 0; -return x_35; -} -} -else -{ -if (x_20 == 0) -{ -uint8_t x_36; -x_36 = 0; -return x_36; -} -else -{ -lean_object* x_37; -x_37 = lean_box(0); -x_27 = x_37; -goto block_32; -} -} -} -block_44: -{ -lean_dec(x_39); -if (x_9 == 0) -{ -if (x_19 == 0) -{ -lean_object* x_40; -x_40 = lean_box(0); -x_33 = x_40; -goto block_38; -} -else -{ -uint8_t x_41; -x_41 = 0; -return x_41; -} -} -else -{ -if (x_19 == 0) -{ -uint8_t x_42; -x_42 = 0; -return x_42; -} -else -{ -lean_object* x_43; -x_43 = lean_box(0); -x_33 = x_43; -goto block_38; -} -} -} -block_50: -{ -lean_dec(x_45); -if (x_8 == 0) -{ -if (x_18 == 0) -{ -lean_object* x_46; -x_46 = lean_box(0); -x_39 = x_46; -goto block_44; -} -else -{ -uint8_t x_47; -x_47 = 0; -return x_47; -} -} -else -{ -if (x_18 == 0) -{ -uint8_t x_48; -x_48 = 0; -return x_48; -} -else -{ -lean_object* x_49; -x_49 = lean_box(0); -x_39 = x_49; -goto block_44; -} -} -} -block_56: -{ -lean_dec(x_51); -if (x_7 == 0) -{ -if (x_17 == 0) -{ -lean_object* x_52; -x_52 = lean_box(0); -x_45 = x_52; -goto block_50; -} -else -{ -uint8_t x_53; -x_53 = 0; -return x_53; -} -} -else -{ -if (x_17 == 0) -{ -uint8_t x_54; -x_54 = 0; -return x_54; -} -else -{ -lean_object* x_55; -x_55 = lean_box(0); -x_45 = x_55; -goto block_50; -} -} -} -block_62: -{ -lean_dec(x_57); -if (x_6 == 0) -{ -if (x_16 == 0) -{ -lean_object* x_58; -x_58 = lean_box(0); -x_51 = x_58; -goto block_56; -} -else -{ -uint8_t x_59; -x_59 = 0; -return x_59; -} } else { if (x_16 == 0) { -uint8_t x_60; -x_60 = 0; -return x_60; +uint8_t x_74; +x_74 = 0; +return x_74; } else { -lean_object* x_61; -x_61 = lean_box(0); -x_51 = x_61; -goto block_56; -} -} -} -block_68: -{ -lean_dec(x_63); -if (x_5 == 0) -{ -if (x_15 == 0) -{ -lean_object* x_64; -x_64 = lean_box(0); -x_57 = x_64; -goto block_62; -} -else -{ -uint8_t x_65; -x_65 = 0; -return x_65; -} -} -else -{ -if (x_15 == 0) -{ -uint8_t x_66; -x_66 = 0; -return x_66; -} -else -{ -lean_object* x_67; -x_67 = lean_box(0); -x_57 = x_67; -goto block_62; +lean_object* x_75; +x_75 = lean_box(0); +x_65 = x_75; +goto block_70; } } } } } -lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_beqConfig____x40_Init_Meta___hyg_5772____boxed(lean_object* x_1, lean_object* x_2) { +lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_beqConfig____x40_Init_Meta___hyg_5775____boxed(lean_object* x_1, lean_object* x_2) { _start: { uint8_t x_3; lean_object* x_4; -x_3 = l___private_Init_Meta_0__Lean_Meta_Simp_beqConfig____x40_Init_Meta___hyg_5772_(x_1, x_2); +x_3 = l___private_Init_Meta_0__Lean_Meta_Simp_beqConfig____x40_Init_Meta___hyg_5775_(x_1, x_2); lean_dec(x_2); lean_dec(x_1); x_4 = lean_box(x_3); @@ -13687,7 +13742,7 @@ static lean_object* _init_l_Lean_Meta_Simp_instBEqConfig___closed__1() { _start: { lean_object* x_1; -x_1 = lean_alloc_closure((void*)(l___private_Init_Meta_0__Lean_Meta_Simp_beqConfig____x40_Init_Meta___hyg_5772____boxed), 2, 0); +x_1 = lean_alloc_closure((void*)(l___private_Init_Meta_0__Lean_Meta_Simp_beqConfig____x40_Init_Meta___hyg_5775____boxed), 2, 0); return x_1; } } @@ -13699,7 +13754,7 @@ x_1 = l_Lean_Meta_Simp_instBEqConfig___closed__1; return x_1; } } -static lean_object* _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__1() { +static lean_object* _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__1() { _start: { lean_object* x_1; @@ -13707,29 +13762,29 @@ x_1 = lean_mk_string("maxSteps"); return x_1; } } -static lean_object* _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__2() { +static lean_object* _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__2() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__1; +x_1 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__1; x_2 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -static lean_object* _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__3() { +static lean_object* _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__3() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = lean_box(0); -x_2 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__2; +x_2 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__2; x_3 = lean_alloc_ctor(4, 2, 0); lean_ctor_set(x_3, 0, x_1); lean_ctor_set(x_3, 1, x_2); return x_3; } } -static lean_object* _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__4() { +static lean_object* _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__4() { _start: { lean_object* x_1; lean_object* x_2; @@ -13739,19 +13794,19 @@ lean_ctor_set(x_2, 0, x_1); return x_2; } } -static lean_object* _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__5() { +static lean_object* _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__5() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__3; -x_2 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__4; +x_1 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__3; +x_2 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__4; x_3 = lean_alloc_ctor(4, 2, 0); lean_ctor_set(x_3, 0, x_1); lean_ctor_set(x_3, 1, x_2); return x_3; } } -static lean_object* _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__6() { +static lean_object* _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__6() { _start: { lean_object* x_1; @@ -13759,17 +13814,17 @@ x_1 = lean_mk_string("contextual"); return x_1; } } -static lean_object* _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__7() { +static lean_object* _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__7() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__6; +x_1 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__6; x_2 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -static lean_object* _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__8() { +static lean_object* _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__8() { _start: { lean_object* x_1; @@ -13777,17 +13832,17 @@ x_1 = lean_mk_string("memoize"); return x_1; } } -static lean_object* _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__9() { +static lean_object* _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__9() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__8; +x_1 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__8; x_2 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -static lean_object* _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__10() { +static lean_object* _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__10() { _start: { lean_object* x_1; @@ -13795,17 +13850,17 @@ x_1 = lean_mk_string("singlePass"); return x_1; } } -static lean_object* _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__11() { +static lean_object* _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__11() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__10; +x_1 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__10; x_2 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -static lean_object* _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__12() { +static lean_object* _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__12() { _start: { lean_object* x_1; @@ -13813,17 +13868,17 @@ x_1 = lean_mk_string("zeta"); return x_1; } } -static lean_object* _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__13() { +static lean_object* _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__13() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__12; +x_1 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__12; x_2 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -static lean_object* _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__14() { +static lean_object* _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__14() { _start: { lean_object* x_1; @@ -13831,17 +13886,17 @@ x_1 = lean_mk_string("beta"); return x_1; } } -static lean_object* _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__15() { +static lean_object* _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__15() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__14; +x_1 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__14; x_2 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -static lean_object* _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__16() { +static lean_object* _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__16() { _start: { lean_object* x_1; @@ -13849,17 +13904,17 @@ x_1 = lean_mk_string("eta"); return x_1; } } -static lean_object* _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__17() { +static lean_object* _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__17() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__16; +x_1 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__16; x_2 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -static lean_object* _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__18() { +static lean_object* _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__18() { _start: { lean_object* x_1; @@ -13867,17 +13922,17 @@ x_1 = lean_mk_string("iota"); return x_1; } } -static lean_object* _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__19() { +static lean_object* _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__19() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__18; +x_1 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__18; x_2 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -static lean_object* _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__20() { +static lean_object* _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__20() { _start: { lean_object* x_1; @@ -13885,17 +13940,17 @@ x_1 = lean_mk_string("proj"); return x_1; } } -static lean_object* _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__21() { +static lean_object* _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__21() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__20; +x_1 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__20; x_2 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -static lean_object* _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__22() { +static lean_object* _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__22() { _start: { lean_object* x_1; @@ -13903,17 +13958,27 @@ x_1 = lean_mk_string("ctorEq"); return x_1; } } -static lean_object* _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__23() { +static lean_object* _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__23() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__22; +x_1 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__22; x_2 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -static lean_object* _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__24() { +static lean_object* _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__24() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Parser_Tactic_myMacro____x40_Init_Notation___hyg_16223____closed__1; +x_2 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +static lean_object* _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__25() { _start: { lean_object* x_1; lean_object* x_2; @@ -13922,16 +13987,16 @@ x_2 = lean_string_length(x_1); return x_2; } } -static lean_object* _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__25() { +static lean_object* _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__26() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__24; +x_1 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__25; x_2 = lean_nat_to_int(x_1); return x_2; } } -static lean_object* _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__26() { +static lean_object* _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__27() { _start: { lean_object* x_1; lean_object* x_2; @@ -13941,7 +14006,7 @@ lean_ctor_set(x_2, 0, x_1); return x_2; } } -static lean_object* _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__27() { +static lean_object* _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__28() { _start: { lean_object* x_1; lean_object* x_2; @@ -13951,16 +14016,16 @@ lean_ctor_set(x_2, 0, x_1); return x_2; } } -lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923_(lean_object* x_1, lean_object* x_2) { +lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938_(lean_object* x_1, lean_object* x_2) { _start: { -lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; uint8_t x_16; uint8_t x_17; uint8_t x_18; uint8_t x_19; uint8_t x_20; uint8_t x_21; uint8_t x_22; uint8_t x_23; uint8_t x_24; lean_object* x_25; +lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; uint8_t x_16; uint8_t x_17; uint8_t x_18; uint8_t x_19; uint8_t x_20; uint8_t x_21; uint8_t x_22; uint8_t x_23; uint8_t x_24; uint8_t x_25; lean_object* x_26; x_3 = lean_ctor_get(x_1, 0); lean_inc(x_3); x_4 = l_Nat_repr(x_3); x_5 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_5, 0, x_4); -x_6 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__5; +x_6 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__5; x_7 = lean_alloc_ctor(4, 2, 0); lean_ctor_set(x_7, 0, x_6); lean_ctor_set(x_7, 1, x_5); @@ -13972,11 +14037,11 @@ x_10 = lean_box(1); x_11 = lean_alloc_ctor(4, 2, 0); lean_ctor_set(x_11, 0, x_9); lean_ctor_set(x_11, 1, x_10); -x_12 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__7; +x_12 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__7; x_13 = lean_alloc_ctor(4, 2, 0); lean_ctor_set(x_13, 0, x_11); lean_ctor_set(x_13, 1, x_12); -x_14 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__4; +x_14 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__4; x_15 = lean_alloc_ctor(4, 2, 0); lean_ctor_set(x_15, 0, x_13); lean_ctor_set(x_15, 1, x_14); @@ -13989,376 +14054,410 @@ x_21 = lean_ctor_get_uint8(x_1, sizeof(void*)*1 + 5); x_22 = lean_ctor_get_uint8(x_1, sizeof(void*)*1 + 6); x_23 = lean_ctor_get_uint8(x_1, sizeof(void*)*1 + 7); x_24 = lean_ctor_get_uint8(x_1, sizeof(void*)*1 + 8); +x_25 = lean_ctor_get_uint8(x_1, sizeof(void*)*1 + 9); lean_dec(x_1); if (x_16 == 0) { -lean_object* x_145; -x_145 = l_instReprBool___closed__2; -x_25 = x_145; -goto block_144; +lean_object* x_156; +x_156 = l_instReprBool___closed__2; +x_26 = x_156; +goto block_155; } else { -lean_object* x_146; -x_146 = l_instReprBool___closed__4; -x_25 = x_146; -goto block_144; +lean_object* x_157; +x_157 = l_instReprBool___closed__4; +x_26 = x_157; +goto block_155; } -block_144: +block_155: { -lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; -x_26 = lean_alloc_ctor(4, 2, 0); -lean_ctor_set(x_26, 0, x_15); -lean_ctor_set(x_26, 1, x_25); +lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; x_27 = lean_alloc_ctor(4, 2, 0); -lean_ctor_set(x_27, 0, x_26); -lean_ctor_set(x_27, 1, x_8); +lean_ctor_set(x_27, 0, x_15); +lean_ctor_set(x_27, 1, x_26); x_28 = lean_alloc_ctor(4, 2, 0); lean_ctor_set(x_28, 0, x_27); -lean_ctor_set(x_28, 1, x_10); -x_29 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__9; -x_30 = lean_alloc_ctor(4, 2, 0); -lean_ctor_set(x_30, 0, x_28); -lean_ctor_set(x_30, 1, x_29); +lean_ctor_set(x_28, 1, x_8); +x_29 = lean_alloc_ctor(4, 2, 0); +lean_ctor_set(x_29, 0, x_28); +lean_ctor_set(x_29, 1, x_10); +x_30 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__9; x_31 = lean_alloc_ctor(4, 2, 0); -lean_ctor_set(x_31, 0, x_30); -lean_ctor_set(x_31, 1, x_14); +lean_ctor_set(x_31, 0, x_29); +lean_ctor_set(x_31, 1, x_30); +x_32 = lean_alloc_ctor(4, 2, 0); +lean_ctor_set(x_32, 0, x_31); +lean_ctor_set(x_32, 1, x_14); if (x_17 == 0) { -lean_object* x_142; -x_142 = l_instReprBool___closed__2; -x_32 = x_142; -goto block_141; +lean_object* x_153; +x_153 = l_instReprBool___closed__2; +x_33 = x_153; +goto block_152; } else { -lean_object* x_143; -x_143 = l_instReprBool___closed__4; -x_32 = x_143; -goto block_141; +lean_object* x_154; +x_154 = l_instReprBool___closed__4; +x_33 = x_154; +goto block_152; } -block_141: +block_152: { -lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; -x_33 = lean_alloc_ctor(4, 2, 0); -lean_ctor_set(x_33, 0, x_31); -lean_ctor_set(x_33, 1, x_32); +lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; x_34 = lean_alloc_ctor(4, 2, 0); -lean_ctor_set(x_34, 0, x_33); -lean_ctor_set(x_34, 1, x_8); +lean_ctor_set(x_34, 0, x_32); +lean_ctor_set(x_34, 1, x_33); x_35 = lean_alloc_ctor(4, 2, 0); lean_ctor_set(x_35, 0, x_34); -lean_ctor_set(x_35, 1, x_10); -x_36 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__11; -x_37 = lean_alloc_ctor(4, 2, 0); -lean_ctor_set(x_37, 0, x_35); -lean_ctor_set(x_37, 1, x_36); +lean_ctor_set(x_35, 1, x_8); +x_36 = lean_alloc_ctor(4, 2, 0); +lean_ctor_set(x_36, 0, x_35); +lean_ctor_set(x_36, 1, x_10); +x_37 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__11; x_38 = lean_alloc_ctor(4, 2, 0); -lean_ctor_set(x_38, 0, x_37); -lean_ctor_set(x_38, 1, x_14); +lean_ctor_set(x_38, 0, x_36); +lean_ctor_set(x_38, 1, x_37); +x_39 = lean_alloc_ctor(4, 2, 0); +lean_ctor_set(x_39, 0, x_38); +lean_ctor_set(x_39, 1, x_14); if (x_18 == 0) { -lean_object* x_139; -x_139 = l_instReprBool___closed__2; -x_39 = x_139; -goto block_138; +lean_object* x_150; +x_150 = l_instReprBool___closed__2; +x_40 = x_150; +goto block_149; } else { -lean_object* x_140; -x_140 = l_instReprBool___closed__4; -x_39 = x_140; -goto block_138; +lean_object* x_151; +x_151 = l_instReprBool___closed__4; +x_40 = x_151; +goto block_149; } -block_138: +block_149: { -lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; -x_40 = lean_alloc_ctor(4, 2, 0); -lean_ctor_set(x_40, 0, x_38); -lean_ctor_set(x_40, 1, x_39); +lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; x_41 = lean_alloc_ctor(4, 2, 0); -lean_ctor_set(x_41, 0, x_40); -lean_ctor_set(x_41, 1, x_8); +lean_ctor_set(x_41, 0, x_39); +lean_ctor_set(x_41, 1, x_40); x_42 = lean_alloc_ctor(4, 2, 0); lean_ctor_set(x_42, 0, x_41); -lean_ctor_set(x_42, 1, x_10); -x_43 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__13; -x_44 = lean_alloc_ctor(4, 2, 0); -lean_ctor_set(x_44, 0, x_42); -lean_ctor_set(x_44, 1, x_43); +lean_ctor_set(x_42, 1, x_8); +x_43 = lean_alloc_ctor(4, 2, 0); +lean_ctor_set(x_43, 0, x_42); +lean_ctor_set(x_43, 1, x_10); +x_44 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__13; x_45 = lean_alloc_ctor(4, 2, 0); -lean_ctor_set(x_45, 0, x_44); -lean_ctor_set(x_45, 1, x_14); +lean_ctor_set(x_45, 0, x_43); +lean_ctor_set(x_45, 1, x_44); +x_46 = lean_alloc_ctor(4, 2, 0); +lean_ctor_set(x_46, 0, x_45); +lean_ctor_set(x_46, 1, x_14); if (x_19 == 0) { -lean_object* x_136; -x_136 = l_instReprBool___closed__2; -x_46 = x_136; -goto block_135; +lean_object* x_147; +x_147 = l_instReprBool___closed__2; +x_47 = x_147; +goto block_146; } else { -lean_object* x_137; -x_137 = l_instReprBool___closed__4; -x_46 = x_137; -goto block_135; +lean_object* x_148; +x_148 = l_instReprBool___closed__4; +x_47 = x_148; +goto block_146; } -block_135: +block_146: { -lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_object* x_51; lean_object* x_52; lean_object* x_53; -x_47 = lean_alloc_ctor(4, 2, 0); -lean_ctor_set(x_47, 0, x_45); -lean_ctor_set(x_47, 1, x_46); +lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_object* x_51; lean_object* x_52; lean_object* x_53; lean_object* x_54; x_48 = lean_alloc_ctor(4, 2, 0); -lean_ctor_set(x_48, 0, x_47); -lean_ctor_set(x_48, 1, x_8); +lean_ctor_set(x_48, 0, x_46); +lean_ctor_set(x_48, 1, x_47); x_49 = lean_alloc_ctor(4, 2, 0); lean_ctor_set(x_49, 0, x_48); -lean_ctor_set(x_49, 1, x_10); -x_50 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__15; -x_51 = lean_alloc_ctor(4, 2, 0); -lean_ctor_set(x_51, 0, x_49); -lean_ctor_set(x_51, 1, x_50); +lean_ctor_set(x_49, 1, x_8); +x_50 = lean_alloc_ctor(4, 2, 0); +lean_ctor_set(x_50, 0, x_49); +lean_ctor_set(x_50, 1, x_10); +x_51 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__15; x_52 = lean_alloc_ctor(4, 2, 0); -lean_ctor_set(x_52, 0, x_51); -lean_ctor_set(x_52, 1, x_14); +lean_ctor_set(x_52, 0, x_50); +lean_ctor_set(x_52, 1, x_51); +x_53 = lean_alloc_ctor(4, 2, 0); +lean_ctor_set(x_53, 0, x_52); +lean_ctor_set(x_53, 1, x_14); if (x_20 == 0) { -lean_object* x_133; -x_133 = l_instReprBool___closed__2; -x_53 = x_133; -goto block_132; +lean_object* x_144; +x_144 = l_instReprBool___closed__2; +x_54 = x_144; +goto block_143; } else { -lean_object* x_134; -x_134 = l_instReprBool___closed__4; -x_53 = x_134; -goto block_132; +lean_object* x_145; +x_145 = l_instReprBool___closed__4; +x_54 = x_145; +goto block_143; } -block_132: +block_143: { -lean_object* x_54; lean_object* x_55; lean_object* x_56; lean_object* x_57; lean_object* x_58; lean_object* x_59; lean_object* x_60; -x_54 = lean_alloc_ctor(4, 2, 0); -lean_ctor_set(x_54, 0, x_52); -lean_ctor_set(x_54, 1, x_53); +lean_object* x_55; lean_object* x_56; lean_object* x_57; lean_object* x_58; lean_object* x_59; lean_object* x_60; lean_object* x_61; x_55 = lean_alloc_ctor(4, 2, 0); -lean_ctor_set(x_55, 0, x_54); -lean_ctor_set(x_55, 1, x_8); +lean_ctor_set(x_55, 0, x_53); +lean_ctor_set(x_55, 1, x_54); x_56 = lean_alloc_ctor(4, 2, 0); lean_ctor_set(x_56, 0, x_55); -lean_ctor_set(x_56, 1, x_10); -x_57 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__17; -x_58 = lean_alloc_ctor(4, 2, 0); -lean_ctor_set(x_58, 0, x_56); -lean_ctor_set(x_58, 1, x_57); +lean_ctor_set(x_56, 1, x_8); +x_57 = lean_alloc_ctor(4, 2, 0); +lean_ctor_set(x_57, 0, x_56); +lean_ctor_set(x_57, 1, x_10); +x_58 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__17; x_59 = lean_alloc_ctor(4, 2, 0); -lean_ctor_set(x_59, 0, x_58); -lean_ctor_set(x_59, 1, x_14); +lean_ctor_set(x_59, 0, x_57); +lean_ctor_set(x_59, 1, x_58); +x_60 = lean_alloc_ctor(4, 2, 0); +lean_ctor_set(x_60, 0, x_59); +lean_ctor_set(x_60, 1, x_14); if (x_21 == 0) { -lean_object* x_130; -x_130 = l_instReprBool___closed__2; -x_60 = x_130; -goto block_129; +lean_object* x_141; +x_141 = l_instReprBool___closed__2; +x_61 = x_141; +goto block_140; } else { -lean_object* x_131; -x_131 = l_instReprBool___closed__4; -x_60 = x_131; -goto block_129; +lean_object* x_142; +x_142 = l_instReprBool___closed__4; +x_61 = x_142; +goto block_140; } -block_129: +block_140: { -lean_object* x_61; lean_object* x_62; lean_object* x_63; lean_object* x_64; lean_object* x_65; lean_object* x_66; lean_object* x_67; -x_61 = lean_alloc_ctor(4, 2, 0); -lean_ctor_set(x_61, 0, x_59); -lean_ctor_set(x_61, 1, x_60); +lean_object* x_62; lean_object* x_63; lean_object* x_64; lean_object* x_65; lean_object* x_66; lean_object* x_67; lean_object* x_68; x_62 = lean_alloc_ctor(4, 2, 0); -lean_ctor_set(x_62, 0, x_61); -lean_ctor_set(x_62, 1, x_8); +lean_ctor_set(x_62, 0, x_60); +lean_ctor_set(x_62, 1, x_61); x_63 = lean_alloc_ctor(4, 2, 0); lean_ctor_set(x_63, 0, x_62); -lean_ctor_set(x_63, 1, x_10); -x_64 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__19; -x_65 = lean_alloc_ctor(4, 2, 0); -lean_ctor_set(x_65, 0, x_63); -lean_ctor_set(x_65, 1, x_64); +lean_ctor_set(x_63, 1, x_8); +x_64 = lean_alloc_ctor(4, 2, 0); +lean_ctor_set(x_64, 0, x_63); +lean_ctor_set(x_64, 1, x_10); +x_65 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__19; x_66 = lean_alloc_ctor(4, 2, 0); -lean_ctor_set(x_66, 0, x_65); -lean_ctor_set(x_66, 1, x_14); +lean_ctor_set(x_66, 0, x_64); +lean_ctor_set(x_66, 1, x_65); +x_67 = lean_alloc_ctor(4, 2, 0); +lean_ctor_set(x_67, 0, x_66); +lean_ctor_set(x_67, 1, x_14); if (x_22 == 0) { -lean_object* x_127; -x_127 = l_instReprBool___closed__2; -x_67 = x_127; -goto block_126; +lean_object* x_138; +x_138 = l_instReprBool___closed__2; +x_68 = x_138; +goto block_137; } else { -lean_object* x_128; -x_128 = l_instReprBool___closed__4; -x_67 = x_128; -goto block_126; +lean_object* x_139; +x_139 = l_instReprBool___closed__4; +x_68 = x_139; +goto block_137; } -block_126: +block_137: { -lean_object* x_68; lean_object* x_69; lean_object* x_70; lean_object* x_71; lean_object* x_72; lean_object* x_73; -x_68 = lean_alloc_ctor(4, 2, 0); -lean_ctor_set(x_68, 0, x_66); -lean_ctor_set(x_68, 1, x_67); +lean_object* x_69; lean_object* x_70; lean_object* x_71; lean_object* x_72; lean_object* x_73; lean_object* x_74; lean_object* x_75; x_69 = lean_alloc_ctor(4, 2, 0); -lean_ctor_set(x_69, 0, x_68); -lean_ctor_set(x_69, 1, x_8); +lean_ctor_set(x_69, 0, x_67); +lean_ctor_set(x_69, 1, x_68); x_70 = lean_alloc_ctor(4, 2, 0); lean_ctor_set(x_70, 0, x_69); -lean_ctor_set(x_70, 1, x_10); -x_71 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__21; -x_72 = lean_alloc_ctor(4, 2, 0); -lean_ctor_set(x_72, 0, x_70); -lean_ctor_set(x_72, 1, x_71); +lean_ctor_set(x_70, 1, x_8); +x_71 = lean_alloc_ctor(4, 2, 0); +lean_ctor_set(x_71, 0, x_70); +lean_ctor_set(x_71, 1, x_10); +x_72 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__21; x_73 = lean_alloc_ctor(4, 2, 0); -lean_ctor_set(x_73, 0, x_72); -lean_ctor_set(x_73, 1, x_14); +lean_ctor_set(x_73, 0, x_71); +lean_ctor_set(x_73, 1, x_72); +x_74 = lean_alloc_ctor(4, 2, 0); +lean_ctor_set(x_74, 0, x_73); +lean_ctor_set(x_74, 1, x_14); if (x_23 == 0) { -lean_object* x_74; lean_object* x_75; lean_object* x_76; lean_object* x_77; lean_object* x_78; lean_object* x_79; lean_object* x_80; -x_74 = l_instReprBool___closed__2; -x_75 = lean_alloc_ctor(4, 2, 0); -lean_ctor_set(x_75, 0, x_73); -lean_ctor_set(x_75, 1, x_74); +lean_object* x_135; +x_135 = l_instReprBool___closed__2; +x_75 = x_135; +goto block_134; +} +else +{ +lean_object* x_136; +x_136 = l_instReprBool___closed__4; +x_75 = x_136; +goto block_134; +} +block_134: +{ +lean_object* x_76; lean_object* x_77; lean_object* x_78; lean_object* x_79; lean_object* x_80; lean_object* x_81; x_76 = lean_alloc_ctor(4, 2, 0); -lean_ctor_set(x_76, 0, x_75); -lean_ctor_set(x_76, 1, x_8); +lean_ctor_set(x_76, 0, x_74); +lean_ctor_set(x_76, 1, x_75); x_77 = lean_alloc_ctor(4, 2, 0); lean_ctor_set(x_77, 0, x_76); -lean_ctor_set(x_77, 1, x_10); -x_78 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__23; -x_79 = lean_alloc_ctor(4, 2, 0); -lean_ctor_set(x_79, 0, x_77); -lean_ctor_set(x_79, 1, x_78); +lean_ctor_set(x_77, 1, x_8); +x_78 = lean_alloc_ctor(4, 2, 0); +lean_ctor_set(x_78, 0, x_77); +lean_ctor_set(x_78, 1, x_10); +x_79 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__23; x_80 = lean_alloc_ctor(4, 2, 0); -lean_ctor_set(x_80, 0, x_79); -lean_ctor_set(x_80, 1, x_14); -if (x_24 == 0) -{ -lean_object* x_81; lean_object* x_82; lean_object* x_83; lean_object* x_84; lean_object* x_85; lean_object* x_86; lean_object* x_87; uint8_t x_88; lean_object* x_89; +lean_ctor_set(x_80, 0, x_78); +lean_ctor_set(x_80, 1, x_79); x_81 = lean_alloc_ctor(4, 2, 0); lean_ctor_set(x_81, 0, x_80); -lean_ctor_set(x_81, 1, x_74); -x_82 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__26; -x_83 = lean_alloc_ctor(4, 2, 0); -lean_ctor_set(x_83, 0, x_82); -lean_ctor_set(x_83, 1, x_81); -x_84 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__27; -x_85 = lean_alloc_ctor(4, 2, 0); -lean_ctor_set(x_85, 0, x_83); -lean_ctor_set(x_85, 1, x_84); -x_86 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__25; -x_87 = lean_alloc_ctor(3, 2, 0); -lean_ctor_set(x_87, 0, x_86); -lean_ctor_set(x_87, 1, x_85); -x_88 = 0; -x_89 = lean_alloc_ctor(5, 1, 1); -lean_ctor_set(x_89, 0, x_87); -lean_ctor_set_uint8(x_89, sizeof(void*)*1, x_88); -return x_89; -} -else -{ -lean_object* x_90; lean_object* x_91; lean_object* x_92; lean_object* x_93; lean_object* x_94; lean_object* x_95; lean_object* x_96; lean_object* x_97; uint8_t x_98; lean_object* x_99; -x_90 = l_instReprBool___closed__4; -x_91 = lean_alloc_ctor(4, 2, 0); -lean_ctor_set(x_91, 0, x_80); -lean_ctor_set(x_91, 1, x_90); -x_92 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__26; -x_93 = lean_alloc_ctor(4, 2, 0); -lean_ctor_set(x_93, 0, x_92); -lean_ctor_set(x_93, 1, x_91); -x_94 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__27; -x_95 = lean_alloc_ctor(4, 2, 0); -lean_ctor_set(x_95, 0, x_93); -lean_ctor_set(x_95, 1, x_94); -x_96 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__25; -x_97 = lean_alloc_ctor(3, 2, 0); -lean_ctor_set(x_97, 0, x_96); -lean_ctor_set(x_97, 1, x_95); -x_98 = 0; -x_99 = lean_alloc_ctor(5, 1, 1); -lean_ctor_set(x_99, 0, x_97); -lean_ctor_set_uint8(x_99, sizeof(void*)*1, x_98); -return x_99; -} -} -else -{ -lean_object* x_100; lean_object* x_101; lean_object* x_102; lean_object* x_103; lean_object* x_104; lean_object* x_105; lean_object* x_106; -x_100 = l_instReprBool___closed__4; -x_101 = lean_alloc_ctor(4, 2, 0); -lean_ctor_set(x_101, 0, x_73); -lean_ctor_set(x_101, 1, x_100); -x_102 = lean_alloc_ctor(4, 2, 0); -lean_ctor_set(x_102, 0, x_101); -lean_ctor_set(x_102, 1, x_8); -x_103 = lean_alloc_ctor(4, 2, 0); -lean_ctor_set(x_103, 0, x_102); -lean_ctor_set(x_103, 1, x_10); -x_104 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__23; -x_105 = lean_alloc_ctor(4, 2, 0); -lean_ctor_set(x_105, 0, x_103); -lean_ctor_set(x_105, 1, x_104); -x_106 = lean_alloc_ctor(4, 2, 0); -lean_ctor_set(x_106, 0, x_105); -lean_ctor_set(x_106, 1, x_14); +lean_ctor_set(x_81, 1, x_14); if (x_24 == 0) { -lean_object* x_107; lean_object* x_108; lean_object* x_109; lean_object* x_110; lean_object* x_111; lean_object* x_112; lean_object* x_113; lean_object* x_114; uint8_t x_115; lean_object* x_116; -x_107 = l_instReprBool___closed__2; -x_108 = lean_alloc_ctor(4, 2, 0); -lean_ctor_set(x_108, 0, x_106); -lean_ctor_set(x_108, 1, x_107); -x_109 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__26; -x_110 = lean_alloc_ctor(4, 2, 0); -lean_ctor_set(x_110, 0, x_109); -lean_ctor_set(x_110, 1, x_108); -x_111 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__27; -x_112 = lean_alloc_ctor(4, 2, 0); -lean_ctor_set(x_112, 0, x_110); -lean_ctor_set(x_112, 1, x_111); -x_113 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__25; -x_114 = lean_alloc_ctor(3, 2, 0); -lean_ctor_set(x_114, 0, x_113); -lean_ctor_set(x_114, 1, x_112); -x_115 = 0; -x_116 = lean_alloc_ctor(5, 1, 1); -lean_ctor_set(x_116, 0, x_114); -lean_ctor_set_uint8(x_116, sizeof(void*)*1, x_115); -return x_116; +lean_object* x_82; lean_object* x_83; lean_object* x_84; lean_object* x_85; lean_object* x_86; lean_object* x_87; lean_object* x_88; +x_82 = l_instReprBool___closed__2; +x_83 = lean_alloc_ctor(4, 2, 0); +lean_ctor_set(x_83, 0, x_81); +lean_ctor_set(x_83, 1, x_82); +x_84 = lean_alloc_ctor(4, 2, 0); +lean_ctor_set(x_84, 0, x_83); +lean_ctor_set(x_84, 1, x_8); +x_85 = lean_alloc_ctor(4, 2, 0); +lean_ctor_set(x_85, 0, x_84); +lean_ctor_set(x_85, 1, x_10); +x_86 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__24; +x_87 = lean_alloc_ctor(4, 2, 0); +lean_ctor_set(x_87, 0, x_85); +lean_ctor_set(x_87, 1, x_86); +x_88 = lean_alloc_ctor(4, 2, 0); +lean_ctor_set(x_88, 0, x_87); +lean_ctor_set(x_88, 1, x_14); +if (x_25 == 0) +{ +lean_object* x_89; lean_object* x_90; lean_object* x_91; lean_object* x_92; lean_object* x_93; lean_object* x_94; lean_object* x_95; uint8_t x_96; lean_object* x_97; +x_89 = lean_alloc_ctor(4, 2, 0); +lean_ctor_set(x_89, 0, x_88); +lean_ctor_set(x_89, 1, x_82); +x_90 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__27; +x_91 = lean_alloc_ctor(4, 2, 0); +lean_ctor_set(x_91, 0, x_90); +lean_ctor_set(x_91, 1, x_89); +x_92 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__28; +x_93 = lean_alloc_ctor(4, 2, 0); +lean_ctor_set(x_93, 0, x_91); +lean_ctor_set(x_93, 1, x_92); +x_94 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__26; +x_95 = lean_alloc_ctor(3, 2, 0); +lean_ctor_set(x_95, 0, x_94); +lean_ctor_set(x_95, 1, x_93); +x_96 = 0; +x_97 = lean_alloc_ctor(5, 1, 1); +lean_ctor_set(x_97, 0, x_95); +lean_ctor_set_uint8(x_97, sizeof(void*)*1, x_96); +return x_97; } else { -lean_object* x_117; lean_object* x_118; lean_object* x_119; lean_object* x_120; lean_object* x_121; lean_object* x_122; lean_object* x_123; uint8_t x_124; lean_object* x_125; -x_117 = lean_alloc_ctor(4, 2, 0); -lean_ctor_set(x_117, 0, x_106); -lean_ctor_set(x_117, 1, x_100); -x_118 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__26; -x_119 = lean_alloc_ctor(4, 2, 0); -lean_ctor_set(x_119, 0, x_118); -lean_ctor_set(x_119, 1, x_117); -x_120 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__27; -x_121 = lean_alloc_ctor(4, 2, 0); -lean_ctor_set(x_121, 0, x_119); -lean_ctor_set(x_121, 1, x_120); -x_122 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__25; -x_123 = lean_alloc_ctor(3, 2, 0); -lean_ctor_set(x_123, 0, x_122); -lean_ctor_set(x_123, 1, x_121); -x_124 = 0; -x_125 = lean_alloc_ctor(5, 1, 1); -lean_ctor_set(x_125, 0, x_123); -lean_ctor_set_uint8(x_125, sizeof(void*)*1, x_124); -return x_125; +lean_object* x_98; lean_object* x_99; lean_object* x_100; lean_object* x_101; lean_object* x_102; lean_object* x_103; lean_object* x_104; lean_object* x_105; uint8_t x_106; lean_object* x_107; +x_98 = l_instReprBool___closed__4; +x_99 = lean_alloc_ctor(4, 2, 0); +lean_ctor_set(x_99, 0, x_88); +lean_ctor_set(x_99, 1, x_98); +x_100 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__27; +x_101 = lean_alloc_ctor(4, 2, 0); +lean_ctor_set(x_101, 0, x_100); +lean_ctor_set(x_101, 1, x_99); +x_102 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__28; +x_103 = lean_alloc_ctor(4, 2, 0); +lean_ctor_set(x_103, 0, x_101); +lean_ctor_set(x_103, 1, x_102); +x_104 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__26; +x_105 = lean_alloc_ctor(3, 2, 0); +lean_ctor_set(x_105, 0, x_104); +lean_ctor_set(x_105, 1, x_103); +x_106 = 0; +x_107 = lean_alloc_ctor(5, 1, 1); +lean_ctor_set(x_107, 0, x_105); +lean_ctor_set_uint8(x_107, sizeof(void*)*1, x_106); +return x_107; +} +} +else +{ +lean_object* x_108; lean_object* x_109; lean_object* x_110; lean_object* x_111; lean_object* x_112; lean_object* x_113; lean_object* x_114; +x_108 = l_instReprBool___closed__4; +x_109 = lean_alloc_ctor(4, 2, 0); +lean_ctor_set(x_109, 0, x_81); +lean_ctor_set(x_109, 1, x_108); +x_110 = lean_alloc_ctor(4, 2, 0); +lean_ctor_set(x_110, 0, x_109); +lean_ctor_set(x_110, 1, x_8); +x_111 = lean_alloc_ctor(4, 2, 0); +lean_ctor_set(x_111, 0, x_110); +lean_ctor_set(x_111, 1, x_10); +x_112 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__24; +x_113 = lean_alloc_ctor(4, 2, 0); +lean_ctor_set(x_113, 0, x_111); +lean_ctor_set(x_113, 1, x_112); +x_114 = lean_alloc_ctor(4, 2, 0); +lean_ctor_set(x_114, 0, x_113); +lean_ctor_set(x_114, 1, x_14); +if (x_25 == 0) +{ +lean_object* x_115; lean_object* x_116; lean_object* x_117; lean_object* x_118; lean_object* x_119; lean_object* x_120; lean_object* x_121; lean_object* x_122; uint8_t x_123; lean_object* x_124; +x_115 = l_instReprBool___closed__2; +x_116 = lean_alloc_ctor(4, 2, 0); +lean_ctor_set(x_116, 0, x_114); +lean_ctor_set(x_116, 1, x_115); +x_117 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__27; +x_118 = lean_alloc_ctor(4, 2, 0); +lean_ctor_set(x_118, 0, x_117); +lean_ctor_set(x_118, 1, x_116); +x_119 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__28; +x_120 = lean_alloc_ctor(4, 2, 0); +lean_ctor_set(x_120, 0, x_118); +lean_ctor_set(x_120, 1, x_119); +x_121 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__26; +x_122 = lean_alloc_ctor(3, 2, 0); +lean_ctor_set(x_122, 0, x_121); +lean_ctor_set(x_122, 1, x_120); +x_123 = 0; +x_124 = lean_alloc_ctor(5, 1, 1); +lean_ctor_set(x_124, 0, x_122); +lean_ctor_set_uint8(x_124, sizeof(void*)*1, x_123); +return x_124; +} +else +{ +lean_object* x_125; lean_object* x_126; lean_object* x_127; lean_object* x_128; lean_object* x_129; lean_object* x_130; lean_object* x_131; uint8_t x_132; lean_object* x_133; +x_125 = lean_alloc_ctor(4, 2, 0); +lean_ctor_set(x_125, 0, x_114); +lean_ctor_set(x_125, 1, x_108); +x_126 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__27; +x_127 = lean_alloc_ctor(4, 2, 0); +lean_ctor_set(x_127, 0, x_126); +lean_ctor_set(x_127, 1, x_125); +x_128 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__28; +x_129 = lean_alloc_ctor(4, 2, 0); +lean_ctor_set(x_129, 0, x_127); +lean_ctor_set(x_129, 1, x_128); +x_130 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__26; +x_131 = lean_alloc_ctor(3, 2, 0); +lean_ctor_set(x_131, 0, x_130); +lean_ctor_set(x_131, 1, x_129); +x_132 = 0; +x_133 = lean_alloc_ctor(5, 1, 1); +lean_ctor_set(x_133, 0, x_131); +lean_ctor_set_uint8(x_133, sizeof(void*)*1, x_132); +return x_133; } } } @@ -14370,11 +14469,12 @@ return x_125; } } } -lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____boxed(lean_object* x_1, lean_object* x_2) { +} +lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____boxed(lean_object* x_1, lean_object* x_2) { _start: { lean_object* x_3; -x_3 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923_(x_1, x_2); +x_3 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938_(x_1, x_2); lean_dec(x_2); return x_3; } @@ -14383,7 +14483,7 @@ static lean_object* _init_l_Lean_Meta_Simp_instReprConfig___closed__1() { _start: { lean_object* x_1; -x_1 = lean_alloc_closure((void*)(l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____boxed), 2, 0); +x_1 = lean_alloc_closure((void*)(l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____boxed), 2, 0); return x_1; } } @@ -14609,6 +14709,7 @@ l_Lean_Meta_Simp_Config_eta___default = _init_l_Lean_Meta_Simp_Config_eta___defa l_Lean_Meta_Simp_Config_iota___default = _init_l_Lean_Meta_Simp_Config_iota___default(); l_Lean_Meta_Simp_Config_proj___default = _init_l_Lean_Meta_Simp_Config_proj___default(); l_Lean_Meta_Simp_Config_ctorEq___default = _init_l_Lean_Meta_Simp_Config_ctorEq___default(); +l_Lean_Meta_Simp_Config_decide___default = _init_l_Lean_Meta_Simp_Config_decide___default(); l_Lean_Meta_Simp_instInhabitedConfig___closed__1 = _init_l_Lean_Meta_Simp_instInhabitedConfig___closed__1(); lean_mark_persistent(l_Lean_Meta_Simp_instInhabitedConfig___closed__1); l_Lean_Meta_Simp_instInhabitedConfig = _init_l_Lean_Meta_Simp_instInhabitedConfig(); @@ -14617,60 +14718,62 @@ l_Lean_Meta_Simp_instBEqConfig___closed__1 = _init_l_Lean_Meta_Simp_instBEqConfi lean_mark_persistent(l_Lean_Meta_Simp_instBEqConfig___closed__1); l_Lean_Meta_Simp_instBEqConfig = _init_l_Lean_Meta_Simp_instBEqConfig(); lean_mark_persistent(l_Lean_Meta_Simp_instBEqConfig); -l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__1 = _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__1(); -lean_mark_persistent(l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__1); -l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__2 = _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__2(); -lean_mark_persistent(l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__2); -l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__3 = _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__3(); -lean_mark_persistent(l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__3); -l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__4 = _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__4(); -lean_mark_persistent(l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__4); -l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__5 = _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__5(); -lean_mark_persistent(l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__5); -l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__6 = _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__6(); -lean_mark_persistent(l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__6); -l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__7 = _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__7(); -lean_mark_persistent(l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__7); -l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__8 = _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__8(); -lean_mark_persistent(l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__8); -l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__9 = _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__9(); -lean_mark_persistent(l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__9); -l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__10 = _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__10(); -lean_mark_persistent(l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__10); -l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__11 = _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__11(); -lean_mark_persistent(l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__11); -l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__12 = _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__12(); -lean_mark_persistent(l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__12); -l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__13 = _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__13(); -lean_mark_persistent(l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__13); -l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__14 = _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__14(); -lean_mark_persistent(l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__14); -l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__15 = _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__15(); -lean_mark_persistent(l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__15); -l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__16 = _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__16(); -lean_mark_persistent(l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__16); -l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__17 = _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__17(); -lean_mark_persistent(l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__17); -l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__18 = _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__18(); -lean_mark_persistent(l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__18); -l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__19 = _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__19(); -lean_mark_persistent(l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__19); -l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__20 = _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__20(); -lean_mark_persistent(l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__20); -l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__21 = _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__21(); -lean_mark_persistent(l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__21); -l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__22 = _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__22(); -lean_mark_persistent(l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__22); -l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__23 = _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__23(); -lean_mark_persistent(l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__23); -l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__24 = _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__24(); -lean_mark_persistent(l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__24); -l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__25 = _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__25(); -lean_mark_persistent(l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__25); -l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__26 = _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__26(); -lean_mark_persistent(l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__26); -l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__27 = _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__27(); -lean_mark_persistent(l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__27); +l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__1 = _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__1(); +lean_mark_persistent(l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__1); +l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__2 = _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__2(); +lean_mark_persistent(l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__2); +l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__3 = _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__3(); +lean_mark_persistent(l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__3); +l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__4 = _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__4(); +lean_mark_persistent(l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__4); +l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__5 = _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__5(); +lean_mark_persistent(l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__5); +l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__6 = _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__6(); +lean_mark_persistent(l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__6); +l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__7 = _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__7(); +lean_mark_persistent(l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__7); +l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__8 = _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__8(); +lean_mark_persistent(l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__8); +l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__9 = _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__9(); +lean_mark_persistent(l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__9); +l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__10 = _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__10(); +lean_mark_persistent(l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__10); +l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__11 = _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__11(); +lean_mark_persistent(l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__11); +l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__12 = _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__12(); +lean_mark_persistent(l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__12); +l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__13 = _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__13(); +lean_mark_persistent(l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__13); +l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__14 = _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__14(); +lean_mark_persistent(l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__14); +l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__15 = _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__15(); +lean_mark_persistent(l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__15); +l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__16 = _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__16(); +lean_mark_persistent(l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__16); +l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__17 = _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__17(); +lean_mark_persistent(l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__17); +l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__18 = _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__18(); +lean_mark_persistent(l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__18); +l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__19 = _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__19(); +lean_mark_persistent(l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__19); +l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__20 = _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__20(); +lean_mark_persistent(l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__20); +l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__21 = _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__21(); +lean_mark_persistent(l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__21); +l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__22 = _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__22(); +lean_mark_persistent(l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__22); +l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__23 = _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__23(); +lean_mark_persistent(l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__23); +l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__24 = _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__24(); +lean_mark_persistent(l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__24); +l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__25 = _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__25(); +lean_mark_persistent(l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__25); +l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__26 = _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__26(); +lean_mark_persistent(l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__26); +l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__27 = _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__27(); +lean_mark_persistent(l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__27); +l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__28 = _init_l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__28(); +lean_mark_persistent(l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__28); l_Lean_Meta_Simp_instReprConfig___closed__1 = _init_l_Lean_Meta_Simp_instReprConfig___closed__1(); lean_mark_persistent(l_Lean_Meta_Simp_instReprConfig___closed__1); l_Lean_Meta_Simp_instReprConfig = _init_l_Lean_Meta_Simp_instReprConfig(); diff --git a/stage0/stdlib/Init/Prelude.c b/stage0/stdlib/Init/Prelude.c index dc5a32ef16..d7d3e124d1 100644 --- a/stage0/stdlib/Init/Prelude.c +++ b/stage0/stdlib/Init/Prelude.c @@ -42,9 +42,9 @@ lean_object* l_Lean_PrettyPrinter_instMonadQuotationUnexpandM___closed__9; lean_object* l_USize_mk___boxed(lean_object*); lean_object* l_withTheReader(lean_object*, lean_object*); lean_object* l_Nat_sub___boxed(lean_object*, lean_object*); -uint64_t lean_uint64_of_nat(lean_object*); +uint64_t lean_uint64_of_nat_mk(lean_object*); lean_object* l_Functor_mapConst___default(lean_object*); -size_t lean_usize_of_nat(lean_object*); +size_t lean_usize_of_nat_mk(lean_object*); lean_object* l_Fin_decLe___boxed(lean_object*); lean_object* l_Array_getD___rarg(lean_object*, lean_object*, lean_object*); lean_object* lean_mk_empty_array_with_capacity(lean_object*); @@ -251,7 +251,7 @@ lean_object* l___private_Init_Prelude_0__Lean_extractMainModule(lean_object*, le lean_object* l_ReaderT_instMonadReaderT(lean_object*, lean_object*); lean_object* l_System_Platform_getNumBits___boxed(lean_object*); lean_object* l_EStateM_instMonadStateOfEStateM___closed__3; -uint32_t lean_uint32_of_nat(lean_object*); +uint32_t lean_uint32_of_nat_mk(lean_object*); uint8_t l_instDecidableEqUInt64(uint64_t, uint64_t); lean_object* l_EStateM_instMonadEStateM___closed__8; lean_object* l_Lean_extractMacroScopes_match__1(lean_object*); @@ -396,7 +396,7 @@ lean_object* l_typedExpr___rarg___boxed(lean_object*); lean_object* l_Lean_Macro_instMonadRefMacroM; lean_object* l_Lean_Macro_throwError(lean_object*); lean_object* l_Lean_Macro_instMonadQuotationMacroM___lambda__1(lean_object*, lean_object*); -uint8_t lean_uint8_of_nat(lean_object*); +uint8_t lean_uint8_of_nat_mk(lean_object*); lean_object* l_Lean_scientificLitKind___closed__2; lean_object* l_List_set(lean_object*); lean_object* l_Lean_Syntax_getArg_match__1___rarg(lean_object*, lean_object*, lean_object*); @@ -510,7 +510,7 @@ lean_object* l_Monad_seq___default(lean_object*); lean_object* l_or_match__1___rarg(uint8_t, lean_object*, lean_object*); lean_object* l_Monad_seqLeft___default___rarg___lambda__1___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_instMonadLiftT__1___rarg___boxed(lean_object*); -uint16_t lean_uint16_of_nat(lean_object*); +uint16_t lean_uint16_of_nat_mk(lean_object*); lean_object* l___private_Init_Prelude_0__Lean_assembleParts_match__1(lean_object*); lean_object* l_Lean_Syntax_setKind_match__1___rarg(lean_object*, lean_object*, lean_object*); lean_object* l___private_Init_Prelude_0__Lean_assembleParts(lean_object*, lean_object*); @@ -753,6 +753,7 @@ lean_object* l_instInhabitedArrow___rarg(lean_object*, lean_object*); lean_object* l_EStateM_instInhabitedEStateM___rarg(lean_object*, lean_object*); lean_object* l_Function_const(lean_object*, lean_object*); lean_object* l_instDecidableEqChar_match__1___rarg___boxed(lean_object*, lean_object*, lean_object*); +lean_object* l_Char_ofNat___boxed(lean_object*); lean_object* l_ReaderT_map(lean_object*, lean_object*); lean_object* l_System_Platform_numBits___closed__1; lean_object* l_instDecidableLess___boxed(lean_object*, lean_object*); @@ -2389,6 +2390,8 @@ _start: { uint8_t x_3; lean_object* x_4; x_3 = lean_nat_dec_eq(x_1, x_2); +lean_dec(x_2); +lean_dec(x_1); x_4 = lean_box(x_3); return x_4; } @@ -2475,6 +2478,8 @@ _start: { uint8_t x_3; lean_object* x_4; x_3 = lean_nat_dec_le(x_1, x_2); +lean_dec(x_2); +lean_dec(x_1); x_4 = lean_box(x_3); return x_4; } @@ -2522,6 +2527,7 @@ _start: { lean_object* x_2; x_2 = lean_nat_sub(x_1, lean_box(1)); +lean_dec(x_1); return x_2; } } @@ -2778,7 +2784,7 @@ lean_object* l_UInt8_mk___boxed(lean_object* x_1) { _start: { uint8_t x_2; lean_object* x_3; -x_2 = lean_uint8_of_nat(x_1); +x_2 = lean_uint8_of_nat_mk(x_1); x_3 = lean_box(x_2); return x_3; } @@ -2866,7 +2872,7 @@ lean_object* l_UInt16_mk___boxed(lean_object* x_1) { _start: { uint16_t x_2; lean_object* x_3; -x_2 = lean_uint16_of_nat(x_1); +x_2 = lean_uint16_of_nat_mk(x_1); x_3 = lean_box(x_2); return x_3; } @@ -2954,7 +2960,7 @@ lean_object* l_UInt32_mk___boxed(lean_object* x_1) { _start: { uint32_t x_2; lean_object* x_3; -x_2 = lean_uint32_of_nat(x_1); +x_2 = lean_uint32_of_nat_mk(x_1); x_3 = lean_box_uint32(x_2); return x_3; } @@ -3144,7 +3150,7 @@ lean_object* l_UInt64_mk___boxed(lean_object* x_1) { _start: { uint64_t x_2; lean_object* x_3; -x_2 = lean_uint64_of_nat(x_1); +x_2 = lean_uint64_of_nat_mk(x_1); x_3 = lean_box_uint64(x_2); return x_3; } @@ -3242,7 +3248,7 @@ lean_object* l_USize_mk___boxed(lean_object* x_1) { _start: { size_t x_2; lean_object* x_3; -x_2 = lean_usize_of_nat(x_1); +x_2 = lean_usize_of_nat_mk(x_1); x_3 = lean_box_usize(x_2); return x_3; } @@ -3333,6 +3339,7 @@ _start: { uint32_t x_3; lean_object* x_4; x_3 = lean_uint32_of_nat(x_1); +lean_dec(x_1); x_4 = lean_box_uint32(x_3); return x_4; } @@ -3342,7 +3349,7 @@ _start: { lean_object* x_1; uint32_t x_2; lean_object* x_3; x_1 = lean_unsigned_to_nat(0u); -x_2 = lean_uint32_of_nat(x_1); +x_2 = lean_uint32_of_nat_mk(x_1); x_3 = lean_box_uint32(x_2); return x_3; } @@ -3361,7 +3368,6 @@ x_5 = lean_nat_dec_lt(x_4, x_1); if (x_5 == 0) { lean_object* x_6; -lean_dec(x_1); x_6 = l_Char_ofNat___closed__1; return x_6; } @@ -3373,7 +3379,6 @@ x_8 = lean_nat_dec_lt(x_1, x_7); if (x_8 == 0) { lean_object* x_9; -lean_dec(x_1); x_9 = l_Char_ofNat___closed__1; return x_9; } @@ -3395,6 +3400,15 @@ return x_13; } } } +lean_object* l_Char_ofNat___boxed(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = l_Char_ofNat(x_1); +lean_dec(x_1); +return x_2; +} +} lean_object* l_instDecidableEqChar_match__1___rarg(uint8_t x_1, lean_object* x_2, lean_object* x_3) { _start: { diff --git a/stage0/stdlib/Lean/Compiler/IR/Format.c b/stage0/stdlib/Lean/Compiler/IR/Format.c index c2c44692af..40fd6d1a0f 100644 --- a/stage0/stdlib/Lean/Compiler/IR/Format.c +++ b/stage0/stdlib/Lean/Compiler/IR/Format.c @@ -33,7 +33,6 @@ lean_object* l___private_Lean_Compiler_IR_Format_0__Lean_IR_formatExpr___closed_ lean_object* l___private_Lean_Compiler_IR_Format_0__Lean_IR_formatExpr___closed__3; extern lean_object* l_termDepIfThenElse___closed__11; lean_object* l_Lean_IR_formatFnBodyHead___closed__33; -extern lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__4; lean_object* l___private_Lean_Compiler_IR_Format_0__Lean_IR_formatExpr___closed__15; extern lean_object* l_Lean_IR_instToStringJoinPointId___closed__1; lean_object* l___private_Lean_Compiler_IR_Format_0__Lean_IR_formatIRType___closed__9; @@ -50,6 +49,7 @@ lean_object* l___private_Lean_Compiler_IR_Format_0__Lean_IR_formatIRType___close lean_object* l_Lean_IR_formatFnBodyHead___closed__24; extern lean_object* l_Std_Format_join___closed__1; lean_object* l___private_Lean_Compiler_IR_Format_0__Lean_IR_formatExpr___closed__22; +extern lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__4; lean_object* l_Lean_IR_instToStringIRType___closed__1; lean_object* l_Lean_IR_formatFnBody_loop(lean_object*, lean_object*); extern lean_object* l_Lean_instInhabitedParserDescr___closed__1; @@ -3432,7 +3432,7 @@ x_13 = l___private_Lean_Compiler_IR_Format_0__Lean_IR_formatIRType(x_3); x_14 = lean_alloc_ctor(4, 2, 0); lean_ctor_set(x_14, 0, x_12); lean_ctor_set(x_14, 1, x_13); -x_15 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__4; +x_15 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__4; x_16 = lean_alloc_ctor(4, 2, 0); lean_ctor_set(x_16, 0, x_14); lean_ctor_set(x_16, 1, x_15); @@ -3525,7 +3525,7 @@ x_53 = l_Lean_IR_formatFnBodyHead___closed__9; x_54 = lean_alloc_ctor(4, 2, 0); lean_ctor_set(x_54, 0, x_53); lean_ctor_set(x_54, 1, x_52); -x_55 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__4; +x_55 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__4; x_56 = lean_alloc_ctor(4, 2, 0); lean_ctor_set(x_56, 0, x_54); lean_ctor_set(x_56, 1, x_55); @@ -3633,7 +3633,7 @@ x_103 = l___private_Lean_Compiler_IR_Format_0__Lean_IR_formatIRType(x_84); x_104 = lean_alloc_ctor(4, 2, 0); lean_ctor_set(x_104, 0, x_102); lean_ctor_set(x_104, 1, x_103); -x_105 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__4; +x_105 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__4; x_106 = lean_alloc_ctor(4, 2, 0); lean_ctor_set(x_106, 0, x_104); lean_ctor_set(x_106, 1, x_105); @@ -4356,7 +4356,7 @@ x_15 = l___private_Lean_Compiler_IR_Format_0__Lean_IR_formatIRType(x_4); x_16 = lean_alloc_ctor(4, 2, 0); lean_ctor_set(x_16, 0, x_14); lean_ctor_set(x_16, 1, x_15); -x_17 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__4; +x_17 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__4; x_18 = lean_alloc_ctor(4, 2, 0); lean_ctor_set(x_18, 0, x_16); lean_ctor_set(x_18, 1, x_17); @@ -4506,7 +4506,7 @@ x_82 = l_Lean_IR_formatFnBodyHead___closed__9; x_83 = lean_alloc_ctor(4, 2, 0); lean_ctor_set(x_83, 0, x_82); lean_ctor_set(x_83, 1, x_81); -x_84 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__4; +x_84 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__4; x_85 = lean_alloc_ctor(4, 2, 0); lean_ctor_set(x_85, 0, x_83); lean_ctor_set(x_85, 1, x_84); @@ -4642,7 +4642,7 @@ x_146 = l___private_Lean_Compiler_IR_Format_0__Lean_IR_formatIRType(x_126); x_147 = lean_alloc_ctor(4, 2, 0); lean_ctor_set(x_147, 0, x_145); lean_ctor_set(x_147, 1, x_146); -x_148 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__4; +x_148 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__4; x_149 = lean_alloc_ctor(4, 2, 0); lean_ctor_set(x_149, 0, x_147); lean_ctor_set(x_149, 1, x_148); diff --git a/stage0/stdlib/Lean/Data/Format.c b/stage0/stdlib/Lean/Data/Format.c index 61aab61eb8..ad707dd256 100644 --- a/stage0/stdlib/Lean/Data/Format.c +++ b/stage0/stdlib/Lean/Data/Format.c @@ -20,10 +20,10 @@ lean_object* l_Std_Format_format_unicode___closed__1; lean_object* l_Lean_Option_register___at_Std_Format_initFn____x40_Lean_Data_Format___hyg_25____spec__1___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Std_Format_pretty_x27(lean_object*, lean_object*); lean_object* lean_name_mk_string(lean_object*, lean_object*); -extern lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__4; lean_object* l_Std_Format_joinSep___at_Lean_formatKVMap___spec__1(lean_object*, lean_object*); extern lean_object* l_Std_Format_defWidth; lean_object* l_Std_Format_initFn____x40_Lean_Data_Format___hyg_25____closed__2; +extern lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__4; lean_object* l_Std_Format_getWidth(lean_object*); extern lean_object* l_Lean_instInhabitedParserDescr___closed__1; extern lean_object* l_instReprSigma___rarg___closed__1; @@ -865,7 +865,7 @@ x_4 = l_Lean_Name_toString___closed__1; x_5 = l_Lean_Name_toStringWithSep(x_4, x_2); x_6 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_6, 0, x_5); -x_7 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__4; +x_7 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__4; x_8 = lean_alloc_ctor(4, 2, 0); lean_ctor_set(x_8, 0, x_6); lean_ctor_set(x_8, 1, x_7); @@ -1018,7 +1018,7 @@ x_8 = l_Lean_Name_toString___closed__1; x_9 = l_Lean_Name_toStringWithSep(x_8, x_6); x_10 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_10, 0, x_9); -x_11 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__4; +x_11 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__4; x_12 = lean_alloc_ctor(4, 2, 0); lean_ctor_set(x_12, 0, x_10); lean_ctor_set(x_12, 1, x_11); @@ -1156,7 +1156,7 @@ x_52 = l_Lean_Name_toString___closed__1; x_53 = l_Lean_Name_toStringWithSep(x_52, x_50); x_54 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_54, 0, x_53); -x_55 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__4; +x_55 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__4; x_56 = lean_alloc_ctor(4, 2, 0); lean_ctor_set(x_56, 0, x_54); lean_ctor_set(x_56, 1, x_55); diff --git a/stage0/stdlib/Lean/Data/Json/Parser.c b/stage0/stdlib/Lean/Data/Json/Parser.c index 9d09341eec..d5e329c980 100644 --- a/stage0/stdlib/Lean/Data/Json/Parser.c +++ b/stage0/stdlib/Lean/Data/Json/Parser.c @@ -1618,6 +1618,7 @@ x_47 = lean_nat_add(x_46, x_38); lean_dec(x_38); lean_dec(x_46); x_48 = l_Char_ofNat(x_47); +lean_dec(x_47); x_49 = lean_unbox_uint32(x_48); lean_dec(x_48); x_50 = lean_box_uint32(x_49); @@ -1651,6 +1652,7 @@ x_61 = lean_nat_add(x_60, x_52); lean_dec(x_52); lean_dec(x_60); x_62 = l_Char_ofNat(x_61); +lean_dec(x_61); x_63 = lean_unbox_uint32(x_62); lean_dec(x_62); x_64 = lean_box_uint32(x_63); diff --git a/stage0/stdlib/Lean/Data/Position.c b/stage0/stdlib/Lean/Data/Position.c index 8f90ca7dcc..e6f37bec50 100644 --- a/stage0/stdlib/Lean/Data/Position.c +++ b/stage0/stdlib/Lean/Data/Position.c @@ -19,16 +19,16 @@ lean_object* lean_nat_div(lean_object*, lean_object*); uint8_t l___private_Lean_Data_Position_0__Lean_decEqPosition____x40_Lean_Data_Position___hyg_16_(lean_object*, lean_object*); extern lean_object* l_instReprSigma___rarg___closed__2; lean_object* l_Lean_FileMap_ofString_loop(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -extern lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__4; lean_object* l_Lean_FileMap_ofString___closed__2; -extern lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__27; lean_object* l_Lean_instInhabitedPosition; extern lean_object* l_Array_empty___closed__1; +extern lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__4; extern lean_object* l_Lean_instInhabitedParserDescr___closed__1; extern lean_object* l_instReprSigma___rarg___closed__1; lean_object* l_Nat_decLt___boxed(lean_object*, lean_object*); extern lean_object* l_instInhabitedNat; extern lean_object* l_instReprSigma___rarg___closed__7; +extern lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__27; lean_object* lean_array_push(lean_object*, lean_object*); lean_object* lean_array_get_size(lean_object*); lean_object* lean_string_append(lean_object*, lean_object*); @@ -45,7 +45,6 @@ lean_object* l___private_Lean_Data_Position_0__Lean_reprPosition____x40_Lean_Dat lean_object* l_Lean_FileMap_toPosition_toColumn(lean_object*, lean_object*, lean_object*, lean_object*); uint8_t lean_nat_dec_eq(lean_object*, lean_object*); lean_object* l___private_Lean_Data_Position_0__Lean_decEqPosition____x40_Lean_Data_Position___hyg_16__match__1___rarg(lean_object*, lean_object*, lean_object*); -extern lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__25; lean_object* l_Lean_Position_instToStringPosition_match__1(lean_object*); lean_object* lean_nat_sub(lean_object*, lean_object*); lean_object* l_Array_back___at_Lean_FileMap_toPosition___spec__1___boxed(lean_object*); @@ -54,6 +53,7 @@ lean_object* l_Lean_instReprPosition___closed__1; lean_object* l_Lean_FileMap_toPosition_match__1___rarg(lean_object*, lean_object*); lean_object* l_Nat_repr(lean_object*); extern lean_object* l_instReprSigma___rarg___closed__5; +extern lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__28; lean_object* l_Lean_Position_instToFormatPosition_match__1___rarg(lean_object*, lean_object*); uint32_t lean_string_utf8_get(lean_object*, lean_object*); lean_object* l___private_Lean_Data_Position_0__Lean_reprPosition____x40_Lean_Data_Position___hyg_115____closed__1; @@ -79,8 +79,8 @@ lean_object* l_Lean_Position_lt___closed__1; lean_object* l_Lean_Position_instToFormatPosition_match__1(lean_object*); lean_object* l_Lean_instInhabitedPosition___closed__1; extern lean_object* l_Lean_mkOptionalNode___closed__2; -extern lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__26; lean_object* l___private_Lean_Data_Position_0__Lean_reprPosition____x40_Lean_Data_Position___hyg_115_(lean_object*, lean_object*); +extern lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__26; lean_object* l___private_Lean_Data_Position_0__Lean_reprPosition____x40_Lean_Data_Position___hyg_115____closed__4; extern lean_object* l_instReprSigma___rarg___closed__6; uint8_t lean_string_utf8_at_end(lean_object*, lean_object*); @@ -227,7 +227,7 @@ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = l___private_Lean_Data_Position_0__Lean_reprPosition____x40_Lean_Data_Position___hyg_115____closed__3; -x_2 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__4; +x_2 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__4; x_3 = lean_alloc_ctor(4, 2, 0); lean_ctor_set(x_3, 0, x_1); lean_ctor_set(x_3, 1, x_2); @@ -277,7 +277,7 @@ x_12 = l___private_Lean_Data_Position_0__Lean_reprPosition____x40_Lean_Data_Posi x_13 = lean_alloc_ctor(4, 2, 0); lean_ctor_set(x_13, 0, x_11); lean_ctor_set(x_13, 1, x_12); -x_14 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__4; +x_14 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__4; x_15 = lean_alloc_ctor(4, 2, 0); lean_ctor_set(x_15, 0, x_13); lean_ctor_set(x_15, 1, x_14); @@ -290,15 +290,15 @@ lean_ctor_set(x_18, 0, x_17); x_19 = lean_alloc_ctor(4, 2, 0); lean_ctor_set(x_19, 0, x_15); lean_ctor_set(x_19, 1, x_18); -x_20 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__26; +x_20 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__27; x_21 = lean_alloc_ctor(4, 2, 0); lean_ctor_set(x_21, 0, x_20); lean_ctor_set(x_21, 1, x_19); -x_22 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__27; +x_22 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__28; x_23 = lean_alloc_ctor(4, 2, 0); lean_ctor_set(x_23, 0, x_21); lean_ctor_set(x_23, 1, x_22); -x_24 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__25; +x_24 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__26; x_25 = lean_alloc_ctor(3, 2, 0); lean_ctor_set(x_25, 0, x_24); lean_ctor_set(x_25, 1, x_23); diff --git a/stage0/stdlib/Lean/DeclarationRange.c b/stage0/stdlib/Lean/DeclarationRange.c index 1117b2ebaf..bfd3356332 100644 --- a/stage0/stdlib/Lean/DeclarationRange.c +++ b/stage0/stdlib/Lean/DeclarationRange.c @@ -25,16 +25,15 @@ uint8_t l___private_Lean_Data_Position_0__Lean_decEqPosition____x40_Lean_Data_Po lean_object* l_Lean_PersistentEnvExtension_getModuleEntries___rarg(lean_object*, lean_object*, lean_object*); lean_object* lean_name_mk_string(lean_object*, lean_object*); lean_object* l_Lean_findDeclarationRanges_x3f___rarg___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -extern lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__4; extern lean_object* l_Lean_noConfusionExt; lean_object* l_Lean_declRangeExt___elambda__2(lean_object*); uint8_t l_Lean_Name_quickLt(lean_object*, lean_object*); lean_object* l_Array_binSearch___at_Lean_findDeclarationRangesCore_x3f___spec__3(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_registerInternalExceptionId___closed__2; -extern lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__27; lean_object* l_Lean_addDeclarationRanges(lean_object*); lean_object* l_Lean_instReprDeclarationRanges___closed__1; extern lean_object* l_Array_empty___closed__1; +extern lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__4; uint8_t l_Array_anyMUnsafe___at_Array_any___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_DeclarationRange_0__Lean_reprDeclarationRange____x40_Lean_DeclarationRange___hyg_203____closed__6; lean_object* lean_st_ref_get(lean_object*, lean_object*); @@ -42,6 +41,7 @@ lean_object* l___private_Lean_DeclarationRange_0__Lean_decEqDeclarationRange____ lean_object* l_Lean_declRangeExt___elambda__3___boxed(lean_object*, lean_object*); lean_object* l_Lean_declRangeExt; lean_object* l_Lean_mkMapDeclarationExtension___at_Lean_initFn____x40_Lean_DeclarationRange___hyg_338____spec__1___lambda__1(lean_object*); +extern lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__27; lean_object* lean_array_get_size(lean_object*); lean_object* lean_string_append(lean_object*, lean_object*); lean_object* l_Lean_instReprDeclarationRange; @@ -64,7 +64,6 @@ lean_object* l_Lean_MapDeclarationExtension_insert___rarg(lean_object*, lean_obj lean_object* l_Lean_mkMapDeclarationExtension___at_Lean_initFn____x40_Lean_DeclarationRange___hyg_338____spec__1(lean_object*, lean_object*); uint8_t lean_nat_dec_eq(lean_object*, lean_object*); lean_object* l_Lean_declRangeExt___elambda__4___boxed(lean_object*, lean_object*); -extern lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__25; lean_object* lean_nat_sub(lean_object*, lean_object*); lean_object* l___private_Lean_DeclarationRange_0__Lean_reprDeclarationRanges____x40_Lean_DeclarationRange___hyg_294_(lean_object*, lean_object*); lean_object* lean_array_swap(lean_object*, lean_object*, lean_object*); @@ -83,6 +82,7 @@ lean_object* l_Lean_registerPersistentEnvExtensionUnsafe___rarg___lambda__2(lean lean_object* l_Array_qsort___at_Lean_initFn____x40_Lean_DeclarationRange___hyg_338____spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_qsort___at_Lean_initFn____x40_Lean_DeclarationRange___hyg_338____spec__2(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_DeclarationRange_0__Lean_reprDeclarationRange____x40_Lean_DeclarationRange___hyg_203____closed__3; +extern lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__28; lean_object* l_Lean_instInhabitedDeclarationRanges___closed__1; lean_object* l_Lean_findDeclarationRangesCore_x3f___rarg___lambda__1(lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_DeclarationRange_0__Lean_reprDeclarationRange____x40_Lean_DeclarationRange___hyg_203____closed__10; @@ -140,8 +140,8 @@ lean_object* l_Lean_registerSimplePersistentEnvExtension___at_Lean_initFn____x40 extern lean_object* l_Lean_instInhabitedPosition___closed__1; lean_object* l___private_Lean_DeclarationRange_0__Lean_reprDeclarationRange____x40_Lean_DeclarationRange___hyg_203____closed__9; lean_object* l___private_Lean_DeclarationRange_0__Lean_reprDeclarationRange____x40_Lean_DeclarationRange___hyg_203_(lean_object*, lean_object*); -extern lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__26; lean_object* l___private_Lean_Data_Position_0__Lean_reprPosition____x40_Lean_Data_Position___hyg_115_(lean_object*, lean_object*); +extern lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__26; lean_object* l_Lean_declRangeExt___elambda__2___boxed(lean_object*); lean_object* l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_initFn____x40_Lean_DeclarationRange___hyg_338____spec__6(lean_object*, lean_object*); lean_object* l_EStateM_pure___rarg(lean_object*, lean_object*); @@ -323,7 +323,7 @@ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = l___private_Lean_DeclarationRange_0__Lean_reprDeclarationRange____x40_Lean_DeclarationRange___hyg_203____closed__3; -x_2 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__4; +x_2 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__4; x_3 = lean_alloc_ctor(4, 2, 0); lean_ctor_set(x_3, 0, x_1); lean_ctor_set(x_3, 1, x_2); @@ -408,7 +408,7 @@ x_12 = l___private_Lean_DeclarationRange_0__Lean_reprDeclarationRange____x40_Lea x_13 = lean_alloc_ctor(4, 2, 0); lean_ctor_set(x_13, 0, x_11); lean_ctor_set(x_13, 1, x_12); -x_14 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__4; +x_14 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__4; x_15 = lean_alloc_ctor(4, 2, 0); lean_ctor_set(x_15, 0, x_13); lean_ctor_set(x_15, 1, x_14); @@ -461,15 +461,15 @@ lean_ctor_set(x_35, 0, x_34); x_36 = lean_alloc_ctor(4, 2, 0); lean_ctor_set(x_36, 0, x_32); lean_ctor_set(x_36, 1, x_35); -x_37 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__26; +x_37 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__27; x_38 = lean_alloc_ctor(4, 2, 0); lean_ctor_set(x_38, 0, x_37); lean_ctor_set(x_38, 1, x_36); -x_39 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__27; +x_39 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__28; x_40 = lean_alloc_ctor(4, 2, 0); lean_ctor_set(x_40, 0, x_38); lean_ctor_set(x_40, 1, x_39); -x_41 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__25; +x_41 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__26; x_42 = lean_alloc_ctor(3, 2, 0); lean_ctor_set(x_42, 0, x_41); lean_ctor_set(x_42, 1, x_40); @@ -559,7 +559,7 @@ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = l___private_Lean_DeclarationRange_0__Lean_reprDeclarationRanges____x40_Lean_DeclarationRange___hyg_294____closed__3; -x_2 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__4; +x_2 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__4; x_3 = lean_alloc_ctor(4, 2, 0); lean_ctor_set(x_3, 0, x_1); lean_ctor_set(x_3, 1, x_2); @@ -608,7 +608,7 @@ x_12 = l___private_Lean_DeclarationRange_0__Lean_reprDeclarationRanges____x40_Le x_13 = lean_alloc_ctor(4, 2, 0); lean_ctor_set(x_13, 0, x_11); lean_ctor_set(x_13, 1, x_12); -x_14 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__4; +x_14 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__4; x_15 = lean_alloc_ctor(4, 2, 0); lean_ctor_set(x_15, 0, x_13); lean_ctor_set(x_15, 1, x_14); @@ -619,15 +619,15 @@ x_17 = l___private_Lean_DeclarationRange_0__Lean_reprDeclarationRange____x40_Lea x_18 = lean_alloc_ctor(4, 2, 0); lean_ctor_set(x_18, 0, x_15); lean_ctor_set(x_18, 1, x_17); -x_19 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__26; +x_19 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__27; x_20 = lean_alloc_ctor(4, 2, 0); lean_ctor_set(x_20, 0, x_19); lean_ctor_set(x_20, 1, x_18); -x_21 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__27; +x_21 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__28; x_22 = lean_alloc_ctor(4, 2, 0); lean_ctor_set(x_22, 0, x_20); lean_ctor_set(x_22, 1, x_21); -x_23 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__25; +x_23 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__26; x_24 = lean_alloc_ctor(3, 2, 0); lean_ctor_set(x_24, 0, x_23); lean_ctor_set(x_24, 1, x_22); diff --git a/stage0/stdlib/Lean/Elab/InfoTree.c b/stage0/stdlib/Lean/Elab/InfoTree.c index 9eaf81f141..f2e8d08ef2 100644 --- a/stage0/stdlib/Lean/Elab/InfoTree.c +++ b/stage0/stdlib/Lean/Elab/InfoTree.c @@ -26,7 +26,6 @@ lean_object* l_Lean_Elab_withInfoContext_x27___at_Lean_Elab_withInfoContext___sp lean_object* l_Array_modify___at_Lean_Elab_assignInfoHoleId___spec__4___boxed(lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_InternalExceptionId_toString___closed__1; lean_object* lean_array_uget(lean_object*, size_t); -extern lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__4; lean_object* l_Std_PersistentHashMap_insertAux___at_Lean_Elab_assignInfoHoleId___spec__2___lambda__1(lean_object*, lean_object*, size_t, size_t, size_t, size_t, lean_object*); lean_object* l_Lean_Elab_pushInfoTree___rarg___lambda__1(lean_object*, lean_object*); lean_object* l_Std_PersistentHashMap_find_x3f___at_Lean_Elab_InfoTree_substitute___spec__6(lean_object*, lean_object*); @@ -50,6 +49,7 @@ lean_object* l_Lean_Elab_InfoTree_format_match__1(lean_object*); extern lean_object* l_Array_empty___closed__1; lean_object* l_Lean_Meta_ppExpr(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_ContextInfo_runMetaM___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +extern lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__4; lean_object* l_Lean_Elab_withInfoContext_x27_match__1(lean_object*); lean_object* lean_st_ref_get(lean_object*, lean_object*); lean_object* l_Lean_Elab_enableInfoTree(lean_object*); @@ -2045,7 +2045,7 @@ lean_ctor_set(x_21, 1, x_20); x_22 = lean_alloc_ctor(4, 2, 0); lean_ctor_set(x_22, 0, x_21); lean_ctor_set(x_22, 1, x_11); -x_23 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__4; +x_23 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__4; x_24 = lean_alloc_ctor(4, 2, 0); lean_ctor_set(x_24, 0, x_22); lean_ctor_set(x_24, 1, x_23); @@ -2091,7 +2091,7 @@ lean_ctor_set(x_39, 1, x_38); x_40 = lean_alloc_ctor(4, 2, 0); lean_ctor_set(x_40, 0, x_39); lean_ctor_set(x_40, 1, x_11); -x_41 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__4; +x_41 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__4; x_42 = lean_alloc_ctor(4, 2, 0); lean_ctor_set(x_42, 0, x_40); lean_ctor_set(x_42, 1, x_41); diff --git a/stage0/stdlib/Lean/Elab/Quotation.c b/stage0/stdlib/Lean/Elab/Quotation.c index 9ae51ed8ff..6d4103099c 100644 --- a/stage0/stdlib/Lean/Elab/Quotation.c +++ b/stage0/stdlib/Lean/Elab/Quotation.c @@ -587,7 +587,6 @@ extern lean_object* l_instReprList___rarg___closed__2; lean_object* l_List_map___at___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_compileStxMatch___spec__7(lean_object*); lean_object* l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_quoteSyntax___lambda__6___closed__16; extern lean_object* l_Lean_Parser_Syntax_addPrec___closed__10; -extern lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__20; lean_object* l_Lean_Elab_Term_Quotation_mkTuple___lambda__3___closed__5; extern lean_object* l_Lean_Parser_Term_quot___elambda__1___closed__1; lean_object* l_Array_mapMUnsafe_map___at_Lean_Elab_Term_Quotation_match__syntax_expand___spec__6(size_t, size_t, lean_object*); @@ -791,6 +790,7 @@ lean_object* l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_getHead lean_object* l_List_head_x21___at___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_getHeadInfo___spec__1___boxed(lean_object*); lean_object* l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_compileStxMatch___closed__1; lean_object* l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_getHeadInfo___lambda__13___closed__5; +extern lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__20; lean_object* l_Array_foldrMUnsafe___at___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_quoteSyntax___spec__6___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_mapIdxM_map___at___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_getHeadInfo___spec__6___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Elab_Quotation_0__Lean_Elab_Term_Quotation_getHeadInfo___lambda__23___closed__11; @@ -18282,7 +18282,7 @@ lean_ctor_set(x_39, 0, x_20); lean_ctor_set(x_39, 1, x_38); lean_inc(x_2); x_40 = lean_array_push(x_2, x_39); -x_41 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__20; +x_41 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__20; lean_inc(x_1); x_42 = lean_name_mk_string(x_1, x_41); lean_inc(x_2); @@ -18606,7 +18606,7 @@ lean_ctor_set(x_179, 0, x_20); lean_ctor_set(x_179, 1, x_178); lean_inc(x_2); x_180 = lean_array_push(x_2, x_179); -x_181 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__20; +x_181 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__20; lean_inc(x_1); x_182 = lean_name_mk_string(x_1, x_181); lean_inc(x_2); diff --git a/stage0/stdlib/Lean/Elab/StructInst.c b/stage0/stdlib/Lean/Elab/StructInst.c index 45b4609b42..5eb78cb8db 100644 --- a/stage0/stdlib/Lean/Elab/StructInst.c +++ b/stage0/stdlib/Lean/Elab/StructInst.c @@ -67,7 +67,6 @@ lean_object* l_Lean_Elab_Term_StructInst_instToFormatFieldLHS_match__1___rarg(le lean_object* l_Lean_Elab_Term_StructInst_DefaultFields_step_match__2(lean_object*); lean_object* l___private_Lean_Elab_StructInst_0__Lean_Elab_Term_StructInst_groupFields___closed__1; lean_object* l___private_Lean_Elab_StructInst_0__Lean_Elab_Term_StructInst_elabStruct_match__6___rarg(lean_object*, lean_object*); -extern lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__4; lean_object* l_Lean_Elab_Term_StructInst_DefaultFields_findDefaultMissing_x3f_match__2(lean_object*); lean_object* lean_expr_update_mdata(lean_object*, lean_object*); lean_object* l___private_Lean_Elab_StructInst_0__Lean_Elab_Term_StructInst_elabModifyOp___closed__6; @@ -117,6 +116,7 @@ lean_object* l_Lean_Elab_Term_StructInst_markDefaultMissing(lean_object*); extern lean_object* l_Array_empty___closed__1; lean_object* lean_environment_find(lean_object*, lean_object*); extern lean_object* l_myMacro____x40_Init_Notation___hyg_14424____closed__11; +extern lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__4; lean_object* l_Lean_Elab_Term_StructInst_initFn____x40_Lean_Elab_StructInst___hyg_6703_(lean_object*); extern lean_object* l_myMacro____x40_Init_Notation___hyg_12336____closed__9; lean_object* l_Lean_Elab_Term_StructInst_DefaultFields_mkDefaultValueAux_x3f___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -5960,7 +5960,7 @@ x_3 = lean_ctor_get(x_2, 1); lean_inc(x_3); x_4 = l_Lean_Elab_Term_StructInst_formatField___closed__2; x_5 = l_Std_Format_joinSep___at_Lean_Elab_Term_StructInst_formatField___spec__1(x_3, x_4); -x_6 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__4; +x_6 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__4; x_7 = lean_alloc_ctor(4, 2, 0); lean_ctor_set(x_7, 0, x_5); lean_ctor_set(x_7, 1, x_6); diff --git a/stage0/stdlib/Lean/Elab/Tactic/Simp.c b/stage0/stdlib/Lean/Elab/Tactic/Simp.c index 9e2812c063..9daaa79aa6 100644 --- a/stage0/stdlib/Lean/Elab/Tactic/Simp.c +++ b/stage0/stdlib/Lean/Elab/Tactic/Simp.c @@ -26,6 +26,7 @@ lean_object* l_Lean_Elab_Tactic_evalSimpConfigUnsafe___closed__5; lean_object* l_Lean_Elab_Tactic_withMainMVarContext___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Tactic_elabSimpConfig___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Tactic_tryExactTrivial(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_Tactic_Simp_0__Lean_Elab_Tactic_isGlobalDecl_x3f___spec__2___closed__1; lean_object* l_Lean_Elab_Tactic_simpLocalDeclFVarId___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Tactic_simpLocalDecl___lambda__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Parser_Syntax_addPrec___closed__2; @@ -34,7 +35,7 @@ uint8_t l_USize_decEq(size_t, size_t); lean_object* lean_array_uget(lean_object*, size_t); lean_object* l_Lean_Meta_getCongrLemmas___rarg(lean_object*, lean_object*); lean_object* l_Lean_Elab_Tactic_simpTarget___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_List_foldr___at___private_Lean_Elab_Tactic_Simp_0__Lean_Elab_Tactic_isGlobalLemma_x3f___spec__1___boxed(lean_object*, lean_object*); +lean_object* l_List_foldr___at___private_Lean_Elab_Tactic_Simp_0__Lean_Elab_Tactic_isGlobalDecl_x3f___spec__1___boxed(lean_object*, lean_object*); lean_object* l_Lean_Elab_Tactic_tryExactTrivial_match__1___rarg(lean_object*, lean_object*); lean_object* l_Lean_Elab_Tactic_elabSimpConfig___closed__1; uint8_t l_Array_allM___at_Array_all___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*); @@ -50,11 +51,11 @@ lean_object* l_Lean_Elab_Tactic_simpLocalDecl___lambda__2___boxed(lean_object*, lean_object* l_Array_foldlMUnsafe_fold___at_Lean_Elab_Tactic_evalSimp___spec__3(lean_object*, lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_array_get_size(lean_object*); lean_object* l_Lean_Elab_Tactic_simpLocalDeclFVarId(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Elab_Tactic_Simp_0__Lean_Elab_Tactic_elabSimpLemmas_match__3(lean_object*); lean_object* l___private_Lean_Elab_Tactic_Simp_0__Lean_Elab_Tactic_elabSimpLemmas___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_Tactic_Simp_0__Lean_Elab_Tactic_isGlobalLemma_x3f___spec__2(lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Expr_getAppArgs___closed__1; lean_object* l_Array_foldlMUnsafe_fold___at_Lean_Elab_Tactic_evalSimp___spec__3___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Elab_Tactic_Simp_0__Lean_Elab_Tactic_isGlobalLemma_x3f(lean_object*); +lean_object* l_Std_RBNode_insert___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Tactic_simpAll_match__1___rarg(lean_object*, lean_object*); lean_object* l_Lean_KeyedDeclsAttribute_addBuiltin___rarg(lean_object*, lean_object*, lean_object*, lean_object*); uint8_t l_USize_decLt(size_t, size_t); @@ -64,10 +65,11 @@ extern lean_object* l_Lean_instInhabitedException___closed__1; lean_object* l_Lean_Elab_Tactic_simpTarget_match__2(lean_object*); lean_object* l_Lean_Elab_Tactic_simpTarget_match__2___rarg(lean_object*, lean_object*); lean_object* l_Lean_Expr_isMVar___boxed(lean_object*); -lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_Tactic_Simp_0__Lean_Elab_Tactic_isGlobalLemma_x3f___spec__2___closed__1; +lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_Tactic_Simp_0__Lean_Elab_Tactic_isGlobalDecl_x3f___spec__2(lean_object*, lean_object*, lean_object*); lean_object* l_Array_forInUnsafe_loop___at___private_Lean_Elab_Tactic_Simp_0__Lean_Elab_Tactic_elabSimpLemmas___spec__1(lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Tactic_evalSimpConfigUnsafe(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_replaceTargetEq(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +extern lean_object* l_Lean_NameSet_insert___closed__1; lean_object* l_Lean_Meta_getMVarType(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Tactic_evalSimp(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_forM___at_Lean_Elab_Tactic_evalSimp___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -86,6 +88,7 @@ lean_object* l_Lean_Elab_Tactic_evalSimpConfigUnsafe___closed__3; extern lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_Basic___hyg_550____closed__1; lean_object* l_Lean_Elab_Tactic_evalSimp___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_forInUnsafe_loop___at___private_Lean_Elab_Tactic_Simp_0__Lean_Elab_Tactic_elabSimpLemmas___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +uint8_t l_List_foldr___at___private_Lean_Elab_Tactic_Simp_0__Lean_Elab_Tactic_isGlobalDecl_x3f___spec__1(uint8_t, lean_object*); lean_object* l_Lean_Elab_Tactic_simpLocalDeclFVarId___lambda__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_forM___at_Lean_Elab_Tactic_evalTacticAux___spec__10___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Tactic_simpTarget_match__1(lean_object*); @@ -93,18 +96,20 @@ lean_object* l_Lean_Elab_Tactic_tryExactTrivial___closed__2; lean_object* l___private_Lean_Elab_Tactic_Simp_0__Lean_Elab_Tactic_elabSimpLemmas_match__1___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Tactic_getMainGoal(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Tactic_evalSimp___closed__1; +extern lean_object* l_Lean_Meta_Simp_rewrite_getRHS___closed__3; lean_object* l___private_Lean_Elab_Tactic_Simp_0__Lean_Elab_Tactic_elabSimpLemmas_match__1(lean_object*); lean_object* l_Lean_Elab_Tactic_tryExactTrivial___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_reverse___rarg(lean_object*); uint8_t l_Lean_Expr_isConst(lean_object*); lean_object* l___private_Lean_Elab_Tactic_Simp_0__Lean_Elab_Tactic_elabSimpLemmas___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); uint8_t l_Lean_Expr_isConstOf(lean_object*, lean_object*); +lean_object* l_Lean_Meta_isProof(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Tactic_simpLocalDeclFVarId_match__2(lean_object*); lean_object* l_Lean_Meta_withLCtx___at_Lean_Elab_Term_elabSyntheticHole___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_ReaderT_bind___at_Lean_Elab_Term_instMonadLogTermElabM___spec__2___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_elabTermEnsuringType___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); size_t lean_usize_of_nat(lean_object*); -extern lean_object* l_Lean_Meta_Simp_rewrite_getRHS___closed__2; +extern lean_object* l_Lean_NameSet_empty; extern lean_object* l_Lean_Elab_Tactic_tacticElabAttribute; lean_object* l_Lean_Elab_Tactic_evalSimpConfigUnsafe___closed__4; lean_object* l___private_Lean_Elab_Tactic_Simp_0__Lean_Elab_Tactic_elabSimpLemmas___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -112,8 +117,8 @@ lean_object* l_Lean_Meta_getSimpLemmas___rarg(lean_object*, lean_object*); lean_object* l_Lean_Elab_Tactic_evalExact___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Tactic_try___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_LocalDecl_fvarId(lean_object*); +extern lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_1455____closed__1; lean_object* l_Lean_LocalDecl_type(lean_object*); -uint8_t l_List_foldr___at___private_Lean_Elab_Tactic_Simp_0__Lean_Elab_Tactic_isGlobalLemma_x3f___spec__1(uint8_t, lean_object*); lean_object* l_Lean_Meta_throwTacticEx___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Tactic_evalSimp_match__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_assignExprMVar(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -142,6 +147,7 @@ extern lean_object* l_Lean_Parser_Tactic_simp___closed__2; lean_object* l_Lean_Elab_Tactic_simpAll___lambda__1___closed__1; lean_object* l_Lean_Elab_Tactic_evalSimpConfigUnsafe___closed__2; lean_object* l_Lean_Elab_Tactic_simpAll___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Elab_Tactic_Simp_0__Lean_Elab_Tactic_elabSimpLemmas_match__3___rarg(lean_object*, lean_object*); lean_object* l_Lean_Elab_Tactic_simpTarget_match__1___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Tactic_evalSimpConfigUnsafe___closed__1; lean_object* l_Lean_Elab_Tactic_elabTerm(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -171,8 +177,8 @@ lean_object* l_Lean_Expr_constName_x21(lean_object*); lean_object* l_Lean_Elab_Tactic_simpAll_match__1(lean_object*); extern lean_object* l_Lean_Meta_Simp_defaultMaxSteps; lean_object* l_Lean_Elab_Tactic_evalSimpConfig___rarg(lean_object*); -extern lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_1375____closed__1; lean_object* l_Lean_Meta_withNewMCtxDepth___at_Lean_Elab_Tactic_elabSimpConfig___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Elab_Tactic_Simp_0__Lean_Elab_Tactic_isGlobalDecl_x3f(lean_object*); lean_object* l_Lean_Elab_Term_withSynthesize___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); uint8_t lean_nat_dec_lt(lean_object*, lean_object*); lean_object* l_Lean_Elab_Tactic_simpLocalDeclFVarId___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -1079,7 +1085,7 @@ lean_dec(x_22); x_25 = lean_ctor_get(x_23, 0); lean_inc(x_25); lean_dec(x_23); -x_26 = l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_1375____closed__1; +x_26 = l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_1455____closed__1; x_27 = l_Lean_Elab_Tactic_simpAll___lambda__1___closed__3; x_28 = lean_box(0); x_29 = l_Lean_Meta_throwTacticEx___rarg(x_26, x_25, x_27, x_28, x_8, x_9, x_10, x_11, x_24); @@ -1235,7 +1241,7 @@ static lean_object* _init_l_Lean_Elab_Tactic_tryExactTrivial___closed__1() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Meta_Simp_rewrite_getRHS___closed__2; +x_1 = l_Lean_Meta_Simp_rewrite_getRHS___closed__3; x_2 = l_Lean_Parser_Tactic_intro___closed__3; x_3 = lean_name_mk_string(x_1, x_2); return x_3; @@ -1280,7 +1286,7 @@ if (x_16 == 0) lean_object* x_17; lean_object* x_18; lean_object* x_19; uint8_t x_20; x_17 = lean_ctor_get(x_15, 0); x_18 = lean_ctor_get(x_15, 1); -x_19 = l_Lean_Meta_Simp_rewrite_getRHS___closed__2; +x_19 = l_Lean_Meta_Simp_rewrite_getRHS___closed__3; x_20 = l_Lean_Expr_isConstOf(x_17, x_19); lean_dec(x_17); if (x_20 == 0) @@ -1313,7 +1319,7 @@ x_27 = lean_ctor_get(x_15, 1); lean_inc(x_27); lean_inc(x_26); lean_dec(x_15); -x_28 = l_Lean_Meta_Simp_rewrite_getRHS___closed__2; +x_28 = l_Lean_Meta_Simp_rewrite_getRHS___closed__3; x_29 = l_Lean_Expr_isConstOf(x_26, x_28); lean_dec(x_26); if (x_29 == 0) @@ -1639,7 +1645,7 @@ lean_object* x_1; uint8_t x_2; uint8_t x_3; lean_object* x_4; x_1 = l_Lean_Meta_Simp_defaultMaxSteps; x_2 = 0; x_3 = 1; -x_4 = lean_alloc_ctor(0, 1, 9); +x_4 = lean_alloc_ctor(0, 1, 10); lean_ctor_set(x_4, 0, x_1); lean_ctor_set_uint8(x_4, sizeof(void*)*1, x_2); lean_ctor_set_uint8(x_4, sizeof(void*)*1 + 1, x_3); @@ -1650,6 +1656,7 @@ lean_ctor_set_uint8(x_4, sizeof(void*)*1 + 5, x_3); lean_ctor_set_uint8(x_4, sizeof(void*)*1 + 6, x_3); lean_ctor_set_uint8(x_4, sizeof(void*)*1 + 7, x_3); lean_ctor_set_uint8(x_4, sizeof(void*)*1 + 8, x_3); +lean_ctor_set_uint8(x_4, sizeof(void*)*1 + 9, x_3); return x_4; } } @@ -1714,7 +1721,7 @@ lean_dec(x_1); return x_9; } } -uint8_t l_List_foldr___at___private_Lean_Elab_Tactic_Simp_0__Lean_Elab_Tactic_isGlobalLemma_x3f___spec__1(uint8_t x_1, lean_object* x_2) { +uint8_t l_List_foldr___at___private_Lean_Elab_Tactic_Simp_0__Lean_Elab_Tactic_isGlobalDecl_x3f___spec__1(uint8_t x_1, lean_object* x_2) { _start: { if (lean_obj_tag(x_2) == 0) @@ -1726,7 +1733,7 @@ else lean_object* x_3; lean_object* x_4; uint8_t x_5; uint8_t x_6; x_3 = lean_ctor_get(x_2, 0); x_4 = lean_ctor_get(x_2, 1); -x_5 = l_List_foldr___at___private_Lean_Elab_Tactic_Simp_0__Lean_Elab_Tactic_isGlobalLemma_x3f___spec__1(x_1, x_4); +x_5 = l_List_foldr___at___private_Lean_Elab_Tactic_Simp_0__Lean_Elab_Tactic_isGlobalDecl_x3f___spec__1(x_1, x_4); x_6 = l_Lean_Level_isMVar(x_3); if (x_6 == 0) { @@ -1741,7 +1748,7 @@ return x_5; } } } -static lean_object* _init_l_Lean_Expr_withAppAux___at___private_Lean_Elab_Tactic_Simp_0__Lean_Elab_Tactic_isGlobalLemma_x3f___spec__2___closed__1() { +static lean_object* _init_l_Lean_Expr_withAppAux___at___private_Lean_Elab_Tactic_Simp_0__Lean_Elab_Tactic_isGlobalDecl_x3f___spec__2___closed__1() { _start: { lean_object* x_1; @@ -1749,7 +1756,7 @@ x_1 = lean_alloc_closure((void*)(l_Lean_Expr_isMVar___boxed), 1, 0); return x_1; } } -lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_Tactic_Simp_0__Lean_Elab_Tactic_isGlobalLemma_x3f___spec__2(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_Tactic_Simp_0__Lean_Elab_Tactic_isGlobalDecl_x3f___spec__2(lean_object* x_1, lean_object* x_2, lean_object* x_3) { _start: { if (lean_obj_tag(x_1) == 5) @@ -1786,7 +1793,7 @@ else { lean_object* x_12; lean_object* x_13; lean_object* x_14; uint8_t x_15; x_12 = lean_array_get_size(x_2); -x_13 = l_Lean_Expr_withAppAux___at___private_Lean_Elab_Tactic_Simp_0__Lean_Elab_Tactic_isGlobalLemma_x3f___spec__2___closed__1; +x_13 = l_Lean_Expr_withAppAux___at___private_Lean_Elab_Tactic_Simp_0__Lean_Elab_Tactic_isGlobalDecl_x3f___spec__2___closed__1; x_14 = lean_unsigned_to_nat(0u); x_15 = l_Array_allM___at_Array_all___spec__1___rarg(x_13, x_2, x_14, x_12); lean_dec(x_12); @@ -1803,7 +1810,7 @@ else lean_object* x_17; uint8_t x_18; uint8_t x_19; x_17 = l_Lean_Expr_constLevels_x21(x_1); x_18 = 1; -x_19 = l_List_foldr___at___private_Lean_Elab_Tactic_Simp_0__Lean_Elab_Tactic_isGlobalLemma_x3f___spec__1(x_18, x_17); +x_19 = l_List_foldr___at___private_Lean_Elab_Tactic_Simp_0__Lean_Elab_Tactic_isGlobalDecl_x3f___spec__1(x_18, x_17); lean_dec(x_17); if (x_19 == 0) { @@ -1826,7 +1833,7 @@ return x_22; } } } -lean_object* l___private_Lean_Elab_Tactic_Simp_0__Lean_Elab_Tactic_isGlobalLemma_x3f(lean_object* x_1) { +lean_object* l___private_Lean_Elab_Tactic_Simp_0__Lean_Elab_Tactic_isGlobalDecl_x3f(lean_object* x_1) { _start: { lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; @@ -1838,17 +1845,17 @@ x_5 = lean_mk_array(x_3, x_4); x_6 = lean_unsigned_to_nat(1u); x_7 = lean_nat_sub(x_3, x_6); lean_dec(x_3); -x_8 = l_Lean_Expr_withAppAux___at___private_Lean_Elab_Tactic_Simp_0__Lean_Elab_Tactic_isGlobalLemma_x3f___spec__2(x_1, x_5, x_7); +x_8 = l_Lean_Expr_withAppAux___at___private_Lean_Elab_Tactic_Simp_0__Lean_Elab_Tactic_isGlobalDecl_x3f___spec__2(x_1, x_5, x_7); return x_8; } } -lean_object* l_List_foldr___at___private_Lean_Elab_Tactic_Simp_0__Lean_Elab_Tactic_isGlobalLemma_x3f___spec__1___boxed(lean_object* x_1, lean_object* x_2) { +lean_object* l_List_foldr___at___private_Lean_Elab_Tactic_Simp_0__Lean_Elab_Tactic_isGlobalDecl_x3f___spec__1___boxed(lean_object* x_1, lean_object* x_2) { _start: { uint8_t x_3; uint8_t x_4; lean_object* x_5; x_3 = lean_unbox(x_1); lean_dec(x_1); -x_4 = l_List_foldr___at___private_Lean_Elab_Tactic_Simp_0__Lean_Elab_Tactic_isGlobalLemma_x3f___spec__1(x_3, x_2); +x_4 = l_List_foldr___at___private_Lean_Elab_Tactic_Simp_0__Lean_Elab_Tactic_isGlobalDecl_x3f___spec__1(x_3, x_2); lean_dec(x_2); x_5 = lean_box(x_4); return x_5; @@ -1906,6 +1913,27 @@ x_2 = lean_alloc_closure((void*)(l___private_Lean_Elab_Tactic_Simp_0__Lean_Elab_ return x_2; } } +lean_object* l___private_Lean_Elab_Tactic_Simp_0__Lean_Elab_Tactic_elabSimpLemmas_match__3___rarg(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; lean_object* x_4; lean_object* x_5; +x_3 = lean_ctor_get(x_1, 0); +lean_inc(x_3); +x_4 = lean_ctor_get(x_1, 1); +lean_inc(x_4); +lean_dec(x_1); +x_5 = lean_apply_2(x_2, x_3, x_4); +return x_5; +} +} +lean_object* l___private_Lean_Elab_Tactic_Simp_0__Lean_Elab_Tactic_elabSimpLemmas_match__3(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l___private_Lean_Elab_Tactic_Simp_0__Lean_Elab_Tactic_elabSimpLemmas_match__3___rarg), 2, 0); +return x_2; +} +} lean_object* l_Array_forInUnsafe_loop___at___private_Lean_Elab_Tactic_Simp_0__Lean_Elab_Tactic_elabSimpLemmas___spec__1(lean_object* x_1, size_t x_2, size_t x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11, lean_object* x_12, lean_object* x_13) { _start: { @@ -1927,297 +1955,82 @@ return x_22; } else { -lean_object* x_23; lean_object* x_24; lean_object* x_25; uint8_t x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; uint8_t x_30; lean_object* x_31; +lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; uint8_t x_27; lean_object* x_28; lean_object* x_29; lean_object* x_68; lean_object* x_69; uint8_t x_70; lean_object* x_71; lean_object* x_72; lean_object* x_73; uint8_t x_74; lean_object* x_75; x_23 = lean_array_uget(x_1, x_3); -x_24 = lean_unsigned_to_nat(0u); -x_25 = l_Lean_Syntax_getArg(x_23, x_24); -x_26 = l_Lean_Syntax_isNone(x_25); -x_27 = lean_unsigned_to_nat(1u); -x_28 = l_Lean_Syntax_getArg(x_23, x_27); +x_24 = lean_ctor_get(x_4, 0); +lean_inc(x_24); +x_25 = lean_ctor_get(x_4, 1); +lean_inc(x_25); +if (lean_is_exclusive(x_4)) { + lean_ctor_release(x_4, 0); + lean_ctor_release(x_4, 1); + x_26 = x_4; +} else { + lean_dec_ref(x_4); + x_26 = lean_box(0); +} +x_68 = lean_unsigned_to_nat(0u); +x_69 = l_Lean_Syntax_getArg(x_23, x_68); +x_70 = l_Lean_Syntax_isNone(x_69); +x_71 = lean_unsigned_to_nat(1u); +x_72 = l_Lean_Syntax_getArg(x_23, x_71); lean_dec(x_23); -x_29 = lean_box(0); -x_30 = 0; +x_73 = lean_box(0); +x_74 = 0; lean_inc(x_12); lean_inc(x_11); lean_inc(x_10); lean_inc(x_9); lean_inc(x_8); lean_inc(x_7); -x_31 = l_Lean_Elab_Tactic_elabTerm(x_28, x_29, x_30, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_12, x_13); -if (x_26 == 0) +x_75 = l_Lean_Elab_Tactic_elabTerm(x_72, x_73, x_74, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_12, x_13); +if (x_70 == 0) { -if (lean_obj_tag(x_31) == 0) +if (lean_obj_tag(x_75) == 0) { -lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; uint8_t x_37; lean_object* x_38; -x_32 = lean_ctor_get(x_31, 0); -lean_inc(x_32); -x_33 = lean_ctor_get(x_31, 1); -lean_inc(x_33); -lean_dec(x_31); -x_34 = l_Lean_Syntax_getArg(x_25, x_24); -lean_dec(x_25); -x_35 = l_Lean_Syntax_getKind(x_34); -x_36 = l_Lean_Parser_Tactic_simpPost___closed__2; -x_37 = lean_name_eq(x_35, x_36); -lean_dec(x_35); -lean_inc(x_32); -x_38 = l___private_Lean_Elab_Tactic_Simp_0__Lean_Elab_Tactic_isGlobalLemma_x3f(x_32); -if (lean_obj_tag(x_38) == 0) -{ -lean_object* x_39; lean_object* x_40; -x_39 = lean_unsigned_to_nat(1000u); -lean_inc(x_12); -lean_inc(x_11); -lean_inc(x_10); -lean_inc(x_9); -x_40 = l_Lean_Meta_SimpLemmas_add(x_4, x_32, x_37, x_39, x_29, x_9, x_10, x_11, x_12, x_33); -if (lean_obj_tag(x_40) == 0) -{ -lean_object* x_41; lean_object* x_42; lean_object* x_43; -x_41 = lean_ctor_get(x_40, 0); -lean_inc(x_41); -x_42 = lean_ctor_get(x_40, 1); -lean_inc(x_42); -lean_dec(x_40); -x_43 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_43, 0, x_41); -x_14 = x_43; -x_15 = x_42; -goto block_20; -} -else -{ -uint8_t x_44; -lean_dec(x_12); -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -x_44 = !lean_is_exclusive(x_40); -if (x_44 == 0) -{ -return x_40; -} -else -{ -lean_object* x_45; lean_object* x_46; lean_object* x_47; -x_45 = lean_ctor_get(x_40, 0); -x_46 = lean_ctor_get(x_40, 1); -lean_inc(x_46); -lean_inc(x_45); -lean_dec(x_40); -x_47 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_47, 0, x_45); -lean_ctor_set(x_47, 1, x_46); -return x_47; -} -} -} -else -{ -lean_object* x_48; lean_object* x_49; lean_object* x_50; -lean_dec(x_32); -x_48 = lean_ctor_get(x_38, 0); -lean_inc(x_48); -lean_dec(x_38); -x_49 = lean_unsigned_to_nat(1000u); -lean_inc(x_12); -lean_inc(x_11); -lean_inc(x_10); -lean_inc(x_9); -x_50 = l_Lean_Meta_SimpLemmas_addConst(x_4, x_48, x_37, x_49, x_9, x_10, x_11, x_12, x_33); -if (lean_obj_tag(x_50) == 0) -{ -lean_object* x_51; lean_object* x_52; lean_object* x_53; -x_51 = lean_ctor_get(x_50, 0); -lean_inc(x_51); -x_52 = lean_ctor_get(x_50, 1); -lean_inc(x_52); -lean_dec(x_50); -x_53 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_53, 0, x_51); -x_14 = x_53; -x_15 = x_52; -goto block_20; -} -else -{ -uint8_t x_54; -lean_dec(x_12); -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -x_54 = !lean_is_exclusive(x_50); -if (x_54 == 0) -{ -return x_50; -} -else -{ -lean_object* x_55; lean_object* x_56; lean_object* x_57; -x_55 = lean_ctor_get(x_50, 0); -x_56 = lean_ctor_get(x_50, 1); -lean_inc(x_56); -lean_inc(x_55); -lean_dec(x_50); -x_57 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_57, 0, x_55); -lean_ctor_set(x_57, 1, x_56); -return x_57; -} -} -} -} -else -{ -uint8_t x_58; -lean_dec(x_25); -lean_dec(x_12); -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_4); -x_58 = !lean_is_exclusive(x_31); -if (x_58 == 0) -{ -return x_31; -} -else -{ -lean_object* x_59; lean_object* x_60; lean_object* x_61; -x_59 = lean_ctor_get(x_31, 0); -x_60 = lean_ctor_get(x_31, 1); -lean_inc(x_60); -lean_inc(x_59); -lean_dec(x_31); -x_61 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_61, 0, x_59); -lean_ctor_set(x_61, 1, x_60); -return x_61; -} -} -} -else -{ -lean_dec(x_25); -if (lean_obj_tag(x_31) == 0) -{ -lean_object* x_62; lean_object* x_63; lean_object* x_64; -x_62 = lean_ctor_get(x_31, 0); -lean_inc(x_62); -x_63 = lean_ctor_get(x_31, 1); -lean_inc(x_63); -lean_dec(x_31); -lean_inc(x_62); -x_64 = l___private_Lean_Elab_Tactic_Simp_0__Lean_Elab_Tactic_isGlobalLemma_x3f(x_62); -if (lean_obj_tag(x_64) == 0) -{ -uint8_t x_65; lean_object* x_66; lean_object* x_67; -x_65 = 1; -x_66 = lean_unsigned_to_nat(1000u); -lean_inc(x_12); -lean_inc(x_11); -lean_inc(x_10); -lean_inc(x_9); -x_67 = l_Lean_Meta_SimpLemmas_add(x_4, x_62, x_65, x_66, x_29, x_9, x_10, x_11, x_12, x_63); -if (lean_obj_tag(x_67) == 0) -{ -lean_object* x_68; lean_object* x_69; lean_object* x_70; -x_68 = lean_ctor_get(x_67, 0); -lean_inc(x_68); -x_69 = lean_ctor_get(x_67, 1); -lean_inc(x_69); -lean_dec(x_67); -x_70 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_70, 0, x_68); -x_14 = x_70; -x_15 = x_69; -goto block_20; -} -else -{ -uint8_t x_71; -lean_dec(x_12); -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -x_71 = !lean_is_exclusive(x_67); -if (x_71 == 0) -{ -return x_67; -} -else -{ -lean_object* x_72; lean_object* x_73; lean_object* x_74; -x_72 = lean_ctor_get(x_67, 0); -x_73 = lean_ctor_get(x_67, 1); -lean_inc(x_73); -lean_inc(x_72); -lean_dec(x_67); -x_74 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_74, 0, x_72); -lean_ctor_set(x_74, 1, x_73); -return x_74; -} -} -} -else -{ -lean_object* x_75; uint8_t x_76; lean_object* x_77; lean_object* x_78; -lean_dec(x_62); -x_75 = lean_ctor_get(x_64, 0); -lean_inc(x_75); -lean_dec(x_64); -x_76 = 1; -x_77 = lean_unsigned_to_nat(1000u); -lean_inc(x_12); -lean_inc(x_11); -lean_inc(x_10); -lean_inc(x_9); -x_78 = l_Lean_Meta_SimpLemmas_addConst(x_4, x_75, x_76, x_77, x_9, x_10, x_11, x_12, x_63); -if (lean_obj_tag(x_78) == 0) -{ -lean_object* x_79; lean_object* x_80; lean_object* x_81; -x_79 = lean_ctor_get(x_78, 0); -lean_inc(x_79); -x_80 = lean_ctor_get(x_78, 1); -lean_inc(x_80); -lean_dec(x_78); -x_81 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_81, 0, x_79); -x_14 = x_81; -x_15 = x_80; -goto block_20; +lean_object* x_76; lean_object* x_77; lean_object* x_78; lean_object* x_79; lean_object* x_80; uint8_t x_81; +x_76 = lean_ctor_get(x_75, 0); +lean_inc(x_76); +x_77 = lean_ctor_get(x_75, 1); +lean_inc(x_77); +lean_dec(x_75); +x_78 = l_Lean_Syntax_getArg(x_69, x_68); +lean_dec(x_69); +x_79 = l_Lean_Syntax_getKind(x_78); +x_80 = l_Lean_Parser_Tactic_simpPost___closed__2; +x_81 = lean_name_eq(x_79, x_80); +lean_dec(x_79); +x_27 = x_81; +x_28 = x_76; +x_29 = x_77; +goto block_67; } else { uint8_t x_82; +lean_dec(x_69); +lean_dec(x_26); +lean_dec(x_25); +lean_dec(x_24); lean_dec(x_12); lean_dec(x_11); lean_dec(x_10); lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); -x_82 = !lean_is_exclusive(x_78); +x_82 = !lean_is_exclusive(x_75); if (x_82 == 0) { -return x_78; +return x_75; } else { lean_object* x_83; lean_object* x_84; lean_object* x_85; -x_83 = lean_ctor_get(x_78, 0); -x_84 = lean_ctor_get(x_78, 1); +x_83 = lean_ctor_get(x_75, 0); +x_84 = lean_ctor_get(x_75, 1); lean_inc(x_84); lean_inc(x_83); -lean_dec(x_78); +lean_dec(x_75); x_85 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_85, 0, x_83); lean_ctor_set(x_85, 1, x_84); @@ -2225,34 +2038,258 @@ return x_85; } } } +else +{ +lean_dec(x_69); +if (lean_obj_tag(x_75) == 0) +{ +lean_object* x_86; lean_object* x_87; uint8_t x_88; +x_86 = lean_ctor_get(x_75, 0); +lean_inc(x_86); +x_87 = lean_ctor_get(x_75, 1); +lean_inc(x_87); +lean_dec(x_75); +x_88 = 1; +x_27 = x_88; +x_28 = x_86; +x_29 = x_87; +goto block_67; } else { -uint8_t x_86; +uint8_t x_89; +lean_dec(x_26); +lean_dec(x_25); +lean_dec(x_24); lean_dec(x_12); lean_dec(x_11); lean_dec(x_10); lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); -lean_dec(x_4); -x_86 = !lean_is_exclusive(x_31); -if (x_86 == 0) +x_89 = !lean_is_exclusive(x_75); +if (x_89 == 0) { -return x_31; +return x_75; } else { -lean_object* x_87; lean_object* x_88; lean_object* x_89; -x_87 = lean_ctor_get(x_31, 0); -x_88 = lean_ctor_get(x_31, 1); -lean_inc(x_88); -lean_inc(x_87); -lean_dec(x_31); -x_89 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_89, 0, x_87); -lean_ctor_set(x_89, 1, x_88); -return x_89; +lean_object* x_90; lean_object* x_91; lean_object* x_92; +x_90 = lean_ctor_get(x_75, 0); +x_91 = lean_ctor_get(x_75, 1); +lean_inc(x_91); +lean_inc(x_90); +lean_dec(x_75); +x_92 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_92, 0, x_90); +lean_ctor_set(x_92, 1, x_91); +return x_92; +} +} +} +block_67: +{ +lean_object* x_30; +lean_inc(x_28); +x_30 = l___private_Lean_Elab_Tactic_Simp_0__Lean_Elab_Tactic_isGlobalDecl_x3f(x_28); +if (lean_obj_tag(x_30) == 0) +{ +lean_object* x_31; lean_object* x_32; lean_object* x_33; +x_31 = lean_box(0); +x_32 = lean_unsigned_to_nat(1000u); +lean_inc(x_12); +lean_inc(x_11); +lean_inc(x_10); +lean_inc(x_9); +x_33 = l_Lean_Meta_SimpLemmas_add(x_25, x_28, x_27, x_32, x_31, x_9, x_10, x_11, x_12, x_29); +if (lean_obj_tag(x_33) == 0) +{ +lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; +x_34 = lean_ctor_get(x_33, 0); +lean_inc(x_34); +x_35 = lean_ctor_get(x_33, 1); +lean_inc(x_35); +lean_dec(x_33); +if (lean_is_scalar(x_26)) { + x_36 = lean_alloc_ctor(0, 2, 0); +} else { + x_36 = x_26; +} +lean_ctor_set(x_36, 0, x_24); +lean_ctor_set(x_36, 1, x_34); +x_37 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_37, 0, x_36); +x_14 = x_37; +x_15 = x_35; +goto block_20; +} +else +{ +uint8_t x_38; +lean_dec(x_26); +lean_dec(x_24); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +x_38 = !lean_is_exclusive(x_33); +if (x_38 == 0) +{ +return x_33; +} +else +{ +lean_object* x_39; lean_object* x_40; lean_object* x_41; +x_39 = lean_ctor_get(x_33, 0); +x_40 = lean_ctor_get(x_33, 1); +lean_inc(x_40); +lean_inc(x_39); +lean_dec(x_33); +x_41 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_41, 0, x_39); +lean_ctor_set(x_41, 1, x_40); +return x_41; +} +} +} +else +{ +lean_object* x_42; lean_object* x_43; +x_42 = lean_ctor_get(x_30, 0); +lean_inc(x_42); +lean_dec(x_30); +lean_inc(x_12); +lean_inc(x_11); +lean_inc(x_10); +lean_inc(x_9); +x_43 = l_Lean_Meta_isProof(x_28, x_9, x_10, x_11, x_12, x_29); +if (lean_obj_tag(x_43) == 0) +{ +lean_object* x_44; uint8_t x_45; +x_44 = lean_ctor_get(x_43, 0); +lean_inc(x_44); +x_45 = lean_unbox(x_44); +lean_dec(x_44); +if (x_45 == 0) +{ +lean_object* x_46; lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_object* x_51; +x_46 = lean_ctor_get(x_43, 1); +lean_inc(x_46); +lean_dec(x_43); +x_47 = l_Lean_NameSet_insert___closed__1; +x_48 = lean_box(0); +x_49 = l_Std_RBNode_insert___rarg(x_47, x_24, x_42, x_48); +if (lean_is_scalar(x_26)) { + x_50 = lean_alloc_ctor(0, 2, 0); +} else { + x_50 = x_26; +} +lean_ctor_set(x_50, 0, x_49); +lean_ctor_set(x_50, 1, x_25); +x_51 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_51, 0, x_50); +x_14 = x_51; +x_15 = x_46; +goto block_20; +} +else +{ +lean_object* x_52; lean_object* x_53; lean_object* x_54; +x_52 = lean_ctor_get(x_43, 1); +lean_inc(x_52); +lean_dec(x_43); +x_53 = lean_unsigned_to_nat(1000u); +lean_inc(x_12); +lean_inc(x_11); +lean_inc(x_10); +lean_inc(x_9); +x_54 = l_Lean_Meta_SimpLemmas_addConst(x_25, x_42, x_27, x_53, x_9, x_10, x_11, x_12, x_52); +if (lean_obj_tag(x_54) == 0) +{ +lean_object* x_55; lean_object* x_56; lean_object* x_57; lean_object* x_58; +x_55 = lean_ctor_get(x_54, 0); +lean_inc(x_55); +x_56 = lean_ctor_get(x_54, 1); +lean_inc(x_56); +lean_dec(x_54); +if (lean_is_scalar(x_26)) { + x_57 = lean_alloc_ctor(0, 2, 0); +} else { + x_57 = x_26; +} +lean_ctor_set(x_57, 0, x_24); +lean_ctor_set(x_57, 1, x_55); +x_58 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_58, 0, x_57); +x_14 = x_58; +x_15 = x_56; +goto block_20; +} +else +{ +uint8_t x_59; +lean_dec(x_26); +lean_dec(x_24); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +x_59 = !lean_is_exclusive(x_54); +if (x_59 == 0) +{ +return x_54; +} +else +{ +lean_object* x_60; lean_object* x_61; lean_object* x_62; +x_60 = lean_ctor_get(x_54, 0); +x_61 = lean_ctor_get(x_54, 1); +lean_inc(x_61); +lean_inc(x_60); +lean_dec(x_54); +x_62 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_62, 0, x_60); +lean_ctor_set(x_62, 1, x_61); +return x_62; +} +} +} +} +else +{ +uint8_t x_63; +lean_dec(x_42); +lean_dec(x_26); +lean_dec(x_25); +lean_dec(x_24); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +x_63 = !lean_is_exclusive(x_43); +if (x_63 == 0) +{ +return x_43; +} +else +{ +lean_object* x_64; lean_object* x_65; lean_object* x_66; +x_64 = lean_ctor_get(x_43, 0); +x_65 = lean_ctor_get(x_43, 1); +lean_inc(x_65); +lean_inc(x_64); +lean_dec(x_43); +x_66 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_66, 0, x_64); +lean_ctor_set(x_66, 1, x_65); +return x_66; +} } } } @@ -2275,22 +2312,27 @@ goto _start; lean_object* l___private_Lean_Elab_Tactic_Simp_0__Lean_Elab_Tactic_elabSimpLemmas___lambda__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11) { _start: { -lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; -x_12 = lean_ctor_get(x_1, 0); -x_13 = lean_ctor_get(x_1, 2); -x_14 = lean_ctor_get(x_1, 3); -lean_inc(x_14); -lean_inc(x_13); +lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; +x_12 = lean_ctor_get(x_2, 0); +x_13 = lean_ctor_get(x_2, 1); +x_14 = lean_ctor_get(x_1, 0); +x_15 = lean_ctor_get(x_1, 2); +x_16 = lean_ctor_get(x_1, 4); +lean_inc(x_16); lean_inc(x_12); -x_15 = lean_alloc_ctor(0, 4, 0); -lean_ctor_set(x_15, 0, x_12); -lean_ctor_set(x_15, 1, x_2); -lean_ctor_set(x_15, 2, x_13); -lean_ctor_set(x_15, 3, x_14); -x_16 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_16, 0, x_15); -lean_ctor_set(x_16, 1, x_11); -return x_16; +lean_inc(x_15); +lean_inc(x_13); +lean_inc(x_14); +x_17 = lean_alloc_ctor(0, 5, 0); +lean_ctor_set(x_17, 0, x_14); +lean_ctor_set(x_17, 1, x_13); +lean_ctor_set(x_17, 2, x_15); +lean_ctor_set(x_17, 3, x_12); +lean_ctor_set(x_17, 4, x_16); +x_18 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_18, 0, x_17); +lean_ctor_set(x_18, 1, x_11); +return x_18; } } static lean_object* _init_l___private_Lean_Elab_Tactic_Simp_0__Lean_Elab_Tactic_elabSimpLemmas___boxed__const__1() { @@ -2313,7 +2355,7 @@ lean_object* x_13; x_13 = l_Lean_Elab_Tactic_getMainGoal(x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11); if (lean_obj_tag(x_13) == 0) { -lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; size_t x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; +lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; size_t x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; x_14 = lean_ctor_get(x_13, 0); lean_inc(x_14); x_15 = lean_ctor_get(x_13, 1); @@ -2328,27 +2370,31 @@ x_18 = lean_unsigned_to_nat(1u); x_19 = l_Lean_Syntax_getArg(x_1, x_18); x_20 = l_Lean_Syntax_getSepArgs(x_19); lean_dec(x_19); -x_21 = lean_array_get_size(x_20); -x_22 = lean_usize_of_nat(x_21); -lean_dec(x_21); -x_23 = lean_box_usize(x_22); -x_24 = l___private_Lean_Elab_Tactic_Simp_0__Lean_Elab_Tactic_elabSimpLemmas___boxed__const__1; -x_25 = lean_alloc_closure((void*)(l_Array_forInUnsafe_loop___at___private_Lean_Elab_Tactic_Simp_0__Lean_Elab_Tactic_elabSimpLemmas___spec__1___boxed), 13, 4); -lean_closure_set(x_25, 0, x_20); -lean_closure_set(x_25, 1, x_23); -lean_closure_set(x_25, 2, x_24); -lean_closure_set(x_25, 3, x_17); -x_26 = lean_alloc_closure((void*)(l___private_Lean_Elab_Tactic_Simp_0__Lean_Elab_Tactic_elabSimpLemmas___lambda__1___boxed), 11, 1); -lean_closure_set(x_26, 0, x_2); -x_27 = lean_alloc_closure((void*)(l_ReaderT_bind___at_Lean_Elab_Tactic_withMacroExpansion___spec__2___rarg), 11, 2); -lean_closure_set(x_27, 0, x_25); -lean_closure_set(x_27, 1, x_26); -x_28 = l_Lean_Meta_withMVarContext___at_Lean_Elab_Tactic_withMainMVarContext___spec__1___rarg(x_16, x_27, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_15); -return x_28; +x_21 = l_Lean_NameSet_empty; +x_22 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_22, 0, x_21); +lean_ctor_set(x_22, 1, x_17); +x_23 = lean_array_get_size(x_20); +x_24 = lean_usize_of_nat(x_23); +lean_dec(x_23); +x_25 = lean_box_usize(x_24); +x_26 = l___private_Lean_Elab_Tactic_Simp_0__Lean_Elab_Tactic_elabSimpLemmas___boxed__const__1; +x_27 = lean_alloc_closure((void*)(l_Array_forInUnsafe_loop___at___private_Lean_Elab_Tactic_Simp_0__Lean_Elab_Tactic_elabSimpLemmas___spec__1___boxed), 13, 4); +lean_closure_set(x_27, 0, x_20); +lean_closure_set(x_27, 1, x_25); +lean_closure_set(x_27, 2, x_26); +lean_closure_set(x_27, 3, x_22); +x_28 = lean_alloc_closure((void*)(l___private_Lean_Elab_Tactic_Simp_0__Lean_Elab_Tactic_elabSimpLemmas___lambda__1___boxed), 11, 1); +lean_closure_set(x_28, 0, x_2); +x_29 = lean_alloc_closure((void*)(l_ReaderT_bind___at_Lean_Elab_Tactic_withMacroExpansion___spec__2___rarg), 11, 2); +lean_closure_set(x_29, 0, x_27); +lean_closure_set(x_29, 1, x_28); +x_30 = l_Lean_Meta_withMVarContext___at_Lean_Elab_Tactic_withMainMVarContext___spec__1___rarg(x_16, x_29, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_15); +return x_30; } else { -uint8_t x_29; +uint8_t x_31; lean_dec(x_10); lean_dec(x_9); lean_dec(x_8); @@ -2358,29 +2404,29 @@ lean_dec(x_5); lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); -x_29 = !lean_is_exclusive(x_13); -if (x_29 == 0) +x_31 = !lean_is_exclusive(x_13); +if (x_31 == 0) { return x_13; } else { -lean_object* x_30; lean_object* x_31; lean_object* x_32; -x_30 = lean_ctor_get(x_13, 0); -x_31 = lean_ctor_get(x_13, 1); -lean_inc(x_31); -lean_inc(x_30); +lean_object* x_32; lean_object* x_33; lean_object* x_34; +x_32 = lean_ctor_get(x_13, 0); +x_33 = lean_ctor_get(x_13, 1); +lean_inc(x_33); +lean_inc(x_32); lean_dec(x_13); -x_32 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_32, 0, x_30); -lean_ctor_set(x_32, 1, x_31); -return x_32; +x_34 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_34, 0, x_32); +lean_ctor_set(x_34, 1, x_33); +return x_34; } } } else { -lean_object* x_33; +lean_object* x_35; lean_dec(x_10); lean_dec(x_9); lean_dec(x_8); @@ -2389,10 +2435,10 @@ lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_3); -x_33 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_33, 0, x_2); -lean_ctor_set(x_33, 1, x_11); -return x_33; +x_35 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_35, 0, x_2); +lean_ctor_set(x_35, 1, x_11); +return x_35; } } } @@ -2424,6 +2470,7 @@ lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_3); +lean_dec(x_2); lean_dec(x_1); return x_12; } @@ -2665,7 +2712,7 @@ x_13 = l_Lean_Elab_Tactic_elabSimpConfig(x_12, x_4, x_5, x_6, x_7, x_8, x_9, x_1 lean_dec(x_12); if (lean_obj_tag(x_13) == 0) { -lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; +lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; x_14 = lean_ctor_get(x_13, 0); lean_inc(x_14); x_15 = lean_ctor_get(x_13, 1); @@ -2686,11 +2733,13 @@ lean_dec(x_19); x_22 = lean_unsigned_to_nat(1u); x_23 = l_Lean_Syntax_getArg(x_1, x_22); x_24 = lean_box(0); -x_25 = lean_alloc_ctor(0, 4, 0); -lean_ctor_set(x_25, 0, x_14); -lean_ctor_set(x_25, 1, x_17); -lean_ctor_set(x_25, 2, x_20); -lean_ctor_set(x_25, 3, x_24); +x_25 = l_Lean_NameSet_empty; +x_26 = lean_alloc_ctor(0, 5, 0); +lean_ctor_set(x_26, 0, x_14); +lean_ctor_set(x_26, 1, x_17); +lean_ctor_set(x_26, 2, x_20); +lean_ctor_set(x_26, 3, x_25); +lean_ctor_set(x_26, 4, x_24); lean_inc(x_9); lean_inc(x_8); lean_inc(x_7); @@ -2699,25 +2748,25 @@ lean_inc(x_5); lean_inc(x_4); lean_inc(x_3); lean_inc(x_2); -x_26 = l___private_Lean_Elab_Tactic_Simp_0__Lean_Elab_Tactic_elabSimpLemmas(x_23, x_25, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_21); +x_27 = l___private_Lean_Elab_Tactic_Simp_0__Lean_Elab_Tactic_elabSimpLemmas(x_23, x_26, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_21); lean_dec(x_23); -if (lean_obj_tag(x_26) == 0) +if (lean_obj_tag(x_27) == 0) { -lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; -x_27 = lean_ctor_get(x_26, 0); -lean_inc(x_27); -x_28 = lean_ctor_get(x_26, 1); +lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; +x_28 = lean_ctor_get(x_27, 0); lean_inc(x_28); -lean_dec(x_26); -x_29 = lean_unsigned_to_nat(3u); -x_30 = l_Lean_Syntax_getArg(x_1, x_29); -x_31 = l_Lean_Elab_Tactic_expandOptLocation(x_30); -lean_dec(x_30); -x_32 = l_Lean_Elab_Tactic_evalSimp___closed__1; -switch (lean_obj_tag(x_31)) { +x_29 = lean_ctor_get(x_27, 1); +lean_inc(x_29); +lean_dec(x_27); +x_30 = lean_unsigned_to_nat(3u); +x_31 = l_Lean_Syntax_getArg(x_1, x_30); +x_32 = l_Lean_Elab_Tactic_expandOptLocation(x_31); +lean_dec(x_31); +x_33 = l_Lean_Elab_Tactic_evalSimp___closed__1; +switch (lean_obj_tag(x_32)) { case 0: { -lean_object* x_33; +lean_object* x_34; lean_inc(x_9); lean_inc(x_8); lean_inc(x_7); @@ -2726,21 +2775,21 @@ lean_inc(x_5); lean_inc(x_4); lean_inc(x_3); lean_inc(x_2); -x_33 = l_Lean_Elab_Tactic_simpAll(x_27, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_28); -if (lean_obj_tag(x_33) == 0) +x_34 = l_Lean_Elab_Tactic_simpAll(x_28, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_29); +if (lean_obj_tag(x_34) == 0) { -lean_object* x_34; lean_object* x_35; lean_object* x_36; -x_34 = lean_ctor_get(x_33, 0); -lean_inc(x_34); -x_35 = lean_ctor_get(x_33, 1); +lean_object* x_35; lean_object* x_36; lean_object* x_37; +x_35 = lean_ctor_get(x_34, 0); lean_inc(x_35); -lean_dec(x_33); -x_36 = lean_apply_10(x_32, x_34, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_35); -return x_36; +x_36 = lean_ctor_get(x_34, 1); +lean_inc(x_36); +lean_dec(x_34); +x_37 = lean_apply_10(x_33, x_35, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_36); +return x_37; } else { -uint8_t x_37; +uint8_t x_38; lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); @@ -2749,29 +2798,29 @@ lean_dec(x_5); lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); -x_37 = !lean_is_exclusive(x_33); -if (x_37 == 0) +x_38 = !lean_is_exclusive(x_34); +if (x_38 == 0) { -return x_33; +return x_34; } else { -lean_object* x_38; lean_object* x_39; lean_object* x_40; -x_38 = lean_ctor_get(x_33, 0); -x_39 = lean_ctor_get(x_33, 1); +lean_object* x_39; lean_object* x_40; lean_object* x_41; +x_39 = lean_ctor_get(x_34, 0); +x_40 = lean_ctor_get(x_34, 1); +lean_inc(x_40); lean_inc(x_39); -lean_inc(x_38); -lean_dec(x_33); -x_40 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_40, 0, x_38); -lean_ctor_set(x_40, 1, x_39); -return x_40; +lean_dec(x_34); +x_41 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_41, 0, x_39); +lean_ctor_set(x_41, 1, x_40); +return x_41; } } } case 1: { -lean_object* x_41; +lean_object* x_42; lean_inc(x_9); lean_inc(x_8); lean_inc(x_7); @@ -2780,21 +2829,21 @@ lean_inc(x_5); lean_inc(x_4); lean_inc(x_3); lean_inc(x_2); -x_41 = l_Lean_Elab_Tactic_simpTarget(x_27, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_28); -if (lean_obj_tag(x_41) == 0) +x_42 = l_Lean_Elab_Tactic_simpTarget(x_28, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_29); +if (lean_obj_tag(x_42) == 0) { -lean_object* x_42; lean_object* x_43; lean_object* x_44; -x_42 = lean_ctor_get(x_41, 0); -lean_inc(x_42); -x_43 = lean_ctor_get(x_41, 1); +lean_object* x_43; lean_object* x_44; lean_object* x_45; +x_43 = lean_ctor_get(x_42, 0); lean_inc(x_43); -lean_dec(x_41); -x_44 = lean_apply_10(x_32, x_42, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_43); -return x_44; +x_44 = lean_ctor_get(x_42, 1); +lean_inc(x_44); +lean_dec(x_42); +x_45 = lean_apply_10(x_33, x_43, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_44); +return x_45; } else { -uint8_t x_45; +uint8_t x_46; lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); @@ -2803,36 +2852,36 @@ lean_dec(x_5); lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); -x_45 = !lean_is_exclusive(x_41); -if (x_45 == 0) +x_46 = !lean_is_exclusive(x_42); +if (x_46 == 0) { -return x_41; +return x_42; } else { -lean_object* x_46; lean_object* x_47; lean_object* x_48; -x_46 = lean_ctor_get(x_41, 0); -x_47 = lean_ctor_get(x_41, 1); +lean_object* x_47; lean_object* x_48; lean_object* x_49; +x_47 = lean_ctor_get(x_42, 0); +x_48 = lean_ctor_get(x_42, 1); +lean_inc(x_48); lean_inc(x_47); -lean_inc(x_46); -lean_dec(x_41); -x_48 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_48, 0, x_46); -lean_ctor_set(x_48, 1, x_47); -return x_48; +lean_dec(x_42); +x_49 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_49, 0, x_47); +lean_ctor_set(x_49, 1, x_48); +return x_49; } } } default: { -lean_object* x_49; lean_object* x_50; lean_object* x_51; lean_object* x_52; lean_object* x_53; -x_49 = lean_ctor_get(x_31, 0); -lean_inc(x_49); -lean_dec(x_31); -x_50 = lean_alloc_closure((void*)(l_Lean_Elab_Tactic_simpLocalDecl), 11, 1); -lean_closure_set(x_50, 0, x_27); -x_51 = lean_array_get_size(x_49); -x_52 = lean_unsigned_to_nat(0u); +lean_object* x_50; lean_object* x_51; lean_object* x_52; lean_object* x_53; lean_object* x_54; +x_50 = lean_ctor_get(x_32, 0); +lean_inc(x_50); +lean_dec(x_32); +x_51 = lean_alloc_closure((void*)(l_Lean_Elab_Tactic_simpLocalDecl), 11, 1); +lean_closure_set(x_51, 0, x_28); +x_52 = lean_array_get_size(x_50); +x_53 = lean_unsigned_to_nat(0u); lean_inc(x_9); lean_inc(x_8); lean_inc(x_7); @@ -2841,23 +2890,23 @@ lean_inc(x_5); lean_inc(x_4); lean_inc(x_3); lean_inc(x_2); -x_53 = l_Array_forM___at_Lean_Elab_Tactic_evalSimp___spec__1(x_50, x_49, x_52, x_51, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_28); -lean_dec(x_51); -lean_dec(x_49); -if (lean_obj_tag(x_53) == 0) +x_54 = l_Array_forM___at_Lean_Elab_Tactic_evalSimp___spec__1(x_51, x_50, x_53, x_52, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_29); +lean_dec(x_52); +lean_dec(x_50); +if (lean_obj_tag(x_54) == 0) { -lean_object* x_54; lean_object* x_55; lean_object* x_56; -x_54 = lean_ctor_get(x_53, 0); -lean_inc(x_54); -x_55 = lean_ctor_get(x_53, 1); +lean_object* x_55; lean_object* x_56; lean_object* x_57; +x_55 = lean_ctor_get(x_54, 0); lean_inc(x_55); -lean_dec(x_53); -x_56 = lean_apply_10(x_32, x_54, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_55); -return x_56; +x_56 = lean_ctor_get(x_54, 1); +lean_inc(x_56); +lean_dec(x_54); +x_57 = lean_apply_10(x_33, x_55, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_56); +return x_57; } else { -uint8_t x_57; +uint8_t x_58; lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); @@ -2866,23 +2915,23 @@ lean_dec(x_5); lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); -x_57 = !lean_is_exclusive(x_53); -if (x_57 == 0) +x_58 = !lean_is_exclusive(x_54); +if (x_58 == 0) { -return x_53; +return x_54; } else { -lean_object* x_58; lean_object* x_59; lean_object* x_60; -x_58 = lean_ctor_get(x_53, 0); -x_59 = lean_ctor_get(x_53, 1); +lean_object* x_59; lean_object* x_60; lean_object* x_61; +x_59 = lean_ctor_get(x_54, 0); +x_60 = lean_ctor_get(x_54, 1); +lean_inc(x_60); lean_inc(x_59); -lean_inc(x_58); -lean_dec(x_53); -x_60 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_60, 0, x_58); -lean_ctor_set(x_60, 1, x_59); -return x_60; +lean_dec(x_54); +x_61 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_61, 0, x_59); +lean_ctor_set(x_61, 1, x_60); +return x_61; } } } @@ -2890,7 +2939,7 @@ return x_60; } else { -uint8_t x_61; +uint8_t x_62; lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); @@ -2899,29 +2948,29 @@ lean_dec(x_5); lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); -x_61 = !lean_is_exclusive(x_26); -if (x_61 == 0) +x_62 = !lean_is_exclusive(x_27); +if (x_62 == 0) { -return x_26; +return x_27; } else { -lean_object* x_62; lean_object* x_63; lean_object* x_64; -x_62 = lean_ctor_get(x_26, 0); -x_63 = lean_ctor_get(x_26, 1); +lean_object* x_63; lean_object* x_64; lean_object* x_65; +x_63 = lean_ctor_get(x_27, 0); +x_64 = lean_ctor_get(x_27, 1); +lean_inc(x_64); lean_inc(x_63); -lean_inc(x_62); -lean_dec(x_26); -x_64 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_64, 0, x_62); -lean_ctor_set(x_64, 1, x_63); -return x_64; +lean_dec(x_27); +x_65 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_65, 0, x_63); +lean_ctor_set(x_65, 1, x_64); +return x_65; } } } else { -uint8_t x_65; +uint8_t x_66; lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); @@ -2930,23 +2979,23 @@ lean_dec(x_5); lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); -x_65 = !lean_is_exclusive(x_13); -if (x_65 == 0) +x_66 = !lean_is_exclusive(x_13); +if (x_66 == 0) { return x_13; } else { -lean_object* x_66; lean_object* x_67; lean_object* x_68; -x_66 = lean_ctor_get(x_13, 0); -x_67 = lean_ctor_get(x_13, 1); +lean_object* x_67; lean_object* x_68; lean_object* x_69; +x_67 = lean_ctor_get(x_13, 0); +x_68 = lean_ctor_get(x_13, 1); +lean_inc(x_68); lean_inc(x_67); -lean_inc(x_66); lean_dec(x_13); -x_68 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_68, 0, x_66); -lean_ctor_set(x_68, 1, x_67); -return x_68; +x_69 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_69, 0, x_67); +lean_ctor_set(x_69, 1, x_68); +return x_69; } } } @@ -3088,8 +3137,8 @@ l_Lean_Elab_Tactic_elabSimpConfig___closed__3 = _init_l_Lean_Elab_Tactic_elabSim lean_mark_persistent(l_Lean_Elab_Tactic_elabSimpConfig___closed__3); l_Lean_Elab_Tactic_elabSimpConfig___closed__4 = _init_l_Lean_Elab_Tactic_elabSimpConfig___closed__4(); lean_mark_persistent(l_Lean_Elab_Tactic_elabSimpConfig___closed__4); -l_Lean_Expr_withAppAux___at___private_Lean_Elab_Tactic_Simp_0__Lean_Elab_Tactic_isGlobalLemma_x3f___spec__2___closed__1 = _init_l_Lean_Expr_withAppAux___at___private_Lean_Elab_Tactic_Simp_0__Lean_Elab_Tactic_isGlobalLemma_x3f___spec__2___closed__1(); -lean_mark_persistent(l_Lean_Expr_withAppAux___at___private_Lean_Elab_Tactic_Simp_0__Lean_Elab_Tactic_isGlobalLemma_x3f___spec__2___closed__1); +l_Lean_Expr_withAppAux___at___private_Lean_Elab_Tactic_Simp_0__Lean_Elab_Tactic_isGlobalDecl_x3f___spec__2___closed__1 = _init_l_Lean_Expr_withAppAux___at___private_Lean_Elab_Tactic_Simp_0__Lean_Elab_Tactic_isGlobalDecl_x3f___spec__2___closed__1(); +lean_mark_persistent(l_Lean_Expr_withAppAux___at___private_Lean_Elab_Tactic_Simp_0__Lean_Elab_Tactic_isGlobalDecl_x3f___spec__2___closed__1); l___private_Lean_Elab_Tactic_Simp_0__Lean_Elab_Tactic_elabSimpLemmas___boxed__const__1 = _init_l___private_Lean_Elab_Tactic_Simp_0__Lean_Elab_Tactic_elabSimpLemmas___boxed__const__1(); lean_mark_persistent(l___private_Lean_Elab_Tactic_Simp_0__Lean_Elab_Tactic_elabSimpLemmas___boxed__const__1); l_Lean_Elab_Tactic_evalSimp___closed__1 = _init_l_Lean_Elab_Tactic_evalSimp___closed__1(); diff --git a/stage0/stdlib/Lean/Expr.c b/stage0/stdlib/Lean/Expr.c index 1ba95aaf30..25267bc6ff 100644 --- a/stage0/stdlib/Lean/Expr.c +++ b/stage0/stdlib/Lean/Expr.c @@ -467,7 +467,6 @@ lean_object* lean_expr_update_let(lean_object*, lean_object*, lean_object*, lean uint8_t l_Lean_Expr_isForall(lean_object*); uint8_t l_Lean_BinderInfo_isInstImplicit(uint8_t); lean_object* l_Lean_mkDecIsFalse(lean_object*, lean_object*); -extern lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__20; uint8_t lean_expr_quick_lt(lean_object*, lean_object*); uint8_t l_Lean_Expr_isLit(lean_object*); lean_object* l_Lean_mkFVar(lean_object*); @@ -597,6 +596,7 @@ lean_object* l_Lean_Expr_appArg_x21___closed__2; lean_object* l_Lean_mkApp7(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Expr_updateLambda_x21___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_expr_mk_proj(lean_object*, lean_object*, lean_object*); +extern lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__20; lean_object* l_Lean_Expr_isMVar_match__1(lean_object*); lean_object* l___private_Lean_Expr_0__Lean_Expr_getAppRevArgsAux_match__1(lean_object*); lean_object* l_Lean_Expr_appFn_x21___closed__2; @@ -3215,7 +3215,7 @@ return x_12; default: { lean_object* x_13; -x_13 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__20; +x_13 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__20; return x_13; } } diff --git a/stage0/stdlib/Lean/Meta/AppBuilder.c b/stage0/stdlib/Lean/Meta/AppBuilder.c index 4294871ecf..8ad086d0f6 100644 --- a/stage0/stdlib/Lean/Meta/AppBuilder.c +++ b/stage0/stdlib/Lean/Meta/AppBuilder.c @@ -226,6 +226,7 @@ lean_object* l_Lean_Meta_mkAppM___lambda__1___closed__5; lean_object* l_Lean_Meta_mkForallCongr___closed__2; lean_object* l_Lean_Meta_mkEqTrans___closed__2; lean_object* l_Lean_Meta_mkAppM___closed__2; +lean_object* l_Lean_Meta_mkEqFalse_x27___closed__2; lean_object* l_Lean_Meta_mkProjection_match__3(lean_object*); lean_object* l_Lean_Meta_mkEqTrue(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_mkForallCongr___closed__1; @@ -250,6 +251,7 @@ lean_object* l_Lean_Meta_mkEqNDRec___closed__4; lean_object* l___private_Lean_Meta_AppBuilder_0__Lean_Meta_mkAppMFinal___closed__2; uint8_t l_Lean_Expr_isForall(lean_object*); lean_object* l_Lean_Meta_mkEqRefl___closed__1; +lean_object* l_Lean_Meta_mkEqFalse_x27___closed__1; lean_object* l_Lean_Meta_whnf(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Meta_AppBuilder_0__Lean_Meta_mkAppMFinal___closed__1; lean_object* l_Lean_Meta_mkOfEqTrue___closed__1; @@ -325,6 +327,7 @@ lean_object* l_Lean_mkApp4(lean_object*, lean_object*, lean_object*, lean_object lean_object* l_Lean_Meta_getLevel(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_mkCongrArg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Meta_AppBuilder_0__Lean_Meta_mkAppOptMAux_match__1(lean_object*); +lean_object* l_Lean_Meta_mkEqFalse_x27(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_myMacro____x40_Init_Notation___hyg_10205____closed__7; lean_object* lean_st_ref_set(lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Meta_AppBuilder_0__Lean_Meta_mkAppMFinal___closed__3; @@ -337,7 +340,7 @@ lean_object* l_Lean_Meta_mkEqOfHEq___closed__3; extern lean_object* l_Lean_Meta_throwLetTypeMismatchMessage___rarg___closed__7; lean_object* l_Lean_Meta_mkEqMPR___closed__1; lean_object* l_Lean_Meta_inferType(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_AppBuilder___hyg_4144_(lean_object*); +lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_AppBuilder___hyg_4156_(lean_object*); extern lean_object* l_Lean_instInhabitedMessageData___closed__1; lean_object* l_Lean_Meta_isExprDefEq(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Meta_Basic_0__Lean_Meta_mkFreshExprMVarImpl(lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -11914,6 +11917,35 @@ x_10 = l_Lean_Meta_mkAppM(x_9, x_8, x_2, x_3, x_4, x_5, x_6); return x_10; } } +static lean_object* _init_l_Lean_Meta_mkEqFalse_x27___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("eqFalse'"); +return x_1; +} +} +static lean_object* _init_l_Lean_Meta_mkEqFalse_x27___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l_Lean_Meta_mkEqFalse_x27___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* l_Lean_Meta_mkEqFalse_x27(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { +_start: +{ +lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; +x_7 = l_Lean_mkOptionalNode___closed__2; +x_8 = lean_array_push(x_7, x_1); +x_9 = l_Lean_Meta_mkEqFalse_x27___closed__2; +x_10 = l_Lean_Meta_mkAppM(x_9, x_8, x_2, x_3, x_4, x_5, x_6); +return x_10; +} +} static lean_object* _init_l_Lean_Meta_mkImpCongr___closed__1() { _start: { @@ -12546,7 +12578,7 @@ x_10 = l___private_Lean_Meta_AppBuilder_0__Lean_Meta_mkBinaryOp(x_8, x_9, x_1, x return x_10; } } -lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_AppBuilder___hyg_4144_(lean_object* x_1) { +lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_AppBuilder___hyg_4156_(lean_object* x_1) { _start: { lean_object* x_2; lean_object* x_3; @@ -12802,6 +12834,10 @@ l_Lean_Meta_mkEqFalse___closed__1 = _init_l_Lean_Meta_mkEqFalse___closed__1(); lean_mark_persistent(l_Lean_Meta_mkEqFalse___closed__1); l_Lean_Meta_mkEqFalse___closed__2 = _init_l_Lean_Meta_mkEqFalse___closed__2(); lean_mark_persistent(l_Lean_Meta_mkEqFalse___closed__2); +l_Lean_Meta_mkEqFalse_x27___closed__1 = _init_l_Lean_Meta_mkEqFalse_x27___closed__1(); +lean_mark_persistent(l_Lean_Meta_mkEqFalse_x27___closed__1); +l_Lean_Meta_mkEqFalse_x27___closed__2 = _init_l_Lean_Meta_mkEqFalse_x27___closed__2(); +lean_mark_persistent(l_Lean_Meta_mkEqFalse_x27___closed__2); l_Lean_Meta_mkImpCongr___closed__1 = _init_l_Lean_Meta_mkImpCongr___closed__1(); lean_mark_persistent(l_Lean_Meta_mkImpCongr___closed__1); l_Lean_Meta_mkImpCongr___closed__2 = _init_l_Lean_Meta_mkImpCongr___closed__2(); @@ -12824,7 +12860,7 @@ l_Lean_Meta_mkNumeral___closed__2 = _init_l_Lean_Meta_mkNumeral___closed__2(); lean_mark_persistent(l_Lean_Meta_mkNumeral___closed__2); l_Lean_Meta_mkNumeral___closed__3 = _init_l_Lean_Meta_mkNumeral___closed__3(); lean_mark_persistent(l_Lean_Meta_mkNumeral___closed__3); -res = l_Lean_Meta_initFn____x40_Lean_Meta_AppBuilder___hyg_4144_(lean_io_mk_world()); +res = l_Lean_Meta_initFn____x40_Lean_Meta_AppBuilder___hyg_4156_(lean_io_mk_world()); if (lean_io_result_is_error(res)) return res; lean_dec_ref(res); return lean_io_result_mk_ok(lean_box(0)); diff --git a/stage0/stdlib/Lean/Meta/Tactic/Simp/CongrLemmas.c b/stage0/stdlib/Lean/Meta/Tactic/Simp/CongrLemmas.c index ecb3ed5811..b63ea89fe8 100644 --- a/stage0/stdlib/Lean/Meta/Tactic/Simp/CongrLemmas.c +++ b/stage0/stdlib/Lean/Meta/Tactic/Simp/CongrLemmas.c @@ -50,7 +50,6 @@ lean_object* l_Std_PersistentHashMap_insertAux___at_Lean_Meta_addCongrLemmaEntry lean_object* l_Lean_Meta_getCongrLemmas___rarg(lean_object*, lean_object*); lean_object* l___private_Lean_Meta_Tactic_Simp_CongrLemmas_0__Lean_Meta_reprCongrLemma____x40_Lean_Meta_Tactic_Simp_CongrLemmas___hyg_21_(lean_object*, lean_object*); lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_mkCongrLemma___spec__6(lean_object*, lean_object*, lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -extern lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__4; lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_mkCongrLemma___spec__5___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_LocalContext_fvarIdToDecl___default___closed__1; lean_object* l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at_Lean_Meta_mkCongrLemma___spec__10(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -60,7 +59,6 @@ lean_object* l_Lean_Meta_mkCongrLemma_match__4(lean_object*); lean_object* l_Lean_registerSimpleScopedEnvExtension___rarg(lean_object*, lean_object*); lean_object* l_Lean_SMap_toList___at___private_Lean_Meta_Tactic_Simp_CongrLemmas_0__Lean_Meta_reprCongrLemmas____x40_Lean_Meta_Tactic_Simp_CongrLemmas___hyg_117____spec__1(lean_object*); lean_object* l_Lean_Meta_CongrLemmas_get___boxed(lean_object*, lean_object*); -extern lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__27; lean_object* l___private_Lean_Meta_Tactic_Simp_CongrLemmas_0__Lean_Meta_reprCongrLemmas____x40_Lean_Meta_Tactic_Simp_CongrLemmas___hyg_117____closed__6; lean_object* l_Lean_SMap_fold___at___private_Lean_Meta_Tactic_Simp_CongrLemmas_0__Lean_Meta_reprCongrLemmas____x40_Lean_Meta_Tactic_Simp_CongrLemmas___hyg_117____spec__2___rarg___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_CongrLemmas_get(lean_object*, lean_object*); @@ -69,6 +67,7 @@ size_t l_USize_sub(size_t, size_t); extern lean_object* l_Array_empty___closed__1; extern lean_object* l_instReprProd___rarg___closed__2; lean_object* l_Std_HashMapImp_find_x3f___at_Lean_Meta_CongrLemmas_get___spec__5(lean_object*, lean_object*); +extern lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__4; uint8_t l_Lean_checkTraceOption(lean_object*, lean_object*); lean_object* lean_st_ref_get(lean_object*, lean_object*); lean_object* l_Std_PersistentHashMap_findAtAux___at_Lean_Meta_CongrLemmas_get___spec__4(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -80,6 +79,7 @@ lean_object* l_Lean_Meta_mkCongrLemma_onlyMVarsAt___boxed(lean_object*, lean_obj lean_object* l_Std_AssocList_replace___at_Lean_Meta_addCongrLemmaEntry___spec__13(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Expr_appFn_x21(lean_object*); extern lean_object* l_Lean_instHashableName___closed__1; +extern lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__27; lean_object* l_Array_toSubarray___rarg(lean_object*, lean_object*, lean_object*); lean_object* lean_array_push(lean_object*, lean_object*); lean_object* lean_array_get_size(lean_object*); @@ -136,7 +136,6 @@ lean_object* l___private_Lean_Meta_Tactic_Simp_CongrLemmas_0__Lean_Meta_reprCong uint8_t lean_nat_dec_eq(lean_object*, lean_object*); extern lean_object* l_Lean_NameSet_insert___closed__1; lean_object* l___private_Lean_Meta_Basic_0__Lean_Meta_forallMetaTelescopeReducingAux(lean_object*, uint8_t, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -extern lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__25; lean_object* lean_st_ref_take(lean_object*, lean_object*); extern lean_object* l_Std_PersistentHashMap_insertAux___rarg___closed__3; lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_mkCongrLemma___spec__6___closed__2; @@ -200,6 +199,7 @@ lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_mkCongrLemma___spec__8___la lean_object* l_Std_PersistentHashMap_foldlMAux___at___private_Lean_Meta_Tactic_Simp_CongrLemmas_0__Lean_Meta_reprCongrLemmas____x40_Lean_Meta_Tactic_Simp_CongrLemmas___hyg_117____spec__5___rarg___lambda__1(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_addCongrLemmaEntry_match__1(lean_object*); lean_object* l___private_Lean_Meta_Tactic_Simp_CongrLemmas_0__Lean_Meta_reprCongrLemmas____x40_Lean_Meta_Tactic_Simp_CongrLemmas___hyg_117____closed__2; +extern lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__28; lean_object* l_Std_PersistentHashMap_insertAux___at_Lean_Meta_addCongrLemmaEntry___spec__3___lambda__1(lean_object*, lean_object*, size_t, size_t, size_t, size_t, lean_object*); lean_object* lean_array_to_list(lean_object*, lean_object*); lean_object* l_Lean_Meta_mkCongrLemma___closed__1; @@ -325,9 +325,9 @@ lean_object* l_Lean_Meta_instInhabitedCongrLemmas; uint8_t l_Lean_Meta_mkCongrLemma_onlyMVarsAt___lambda__1(lean_object*, lean_object*); lean_object* l_Lean_Syntax_getArg(lean_object*, lean_object*); lean_object* l_Std_PersistentHashMap_find_x3f___at_Lean_Meta_CongrLemmas_get___spec__2(lean_object*, lean_object*); -extern lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__26; lean_object* l_Lean_Expr_withAppAux___at_Lean_Meta_mkCongrLemma___spec__11(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Expr_getAppFn(lean_object*); +extern lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__26; lean_object* l_Lean_Meta_congrExtension; lean_object* l_Lean_mkLevelParam(lean_object*); lean_object* l_Lean_Meta_mkCongrLemma_match__6___rarg(lean_object*, lean_object*); @@ -476,7 +476,7 @@ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = l___private_Lean_Meta_Tactic_Simp_CongrLemmas_0__Lean_Meta_reprCongrLemma____x40_Lean_Meta_Tactic_Simp_CongrLemmas___hyg_21____closed__3; -x_2 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__4; +x_2 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__4; x_3 = lean_alloc_ctor(4, 2, 0); lean_ctor_set(x_3, 0, x_1); lean_ctor_set(x_3, 1, x_2); @@ -567,7 +567,7 @@ x_15 = l___private_Lean_Meta_Tactic_Simp_CongrLemmas_0__Lean_Meta_reprCongrLemma x_16 = lean_alloc_ctor(4, 2, 0); lean_ctor_set(x_16, 0, x_14); lean_ctor_set(x_16, 1, x_15); -x_17 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__4; +x_17 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__4; x_18 = lean_alloc_ctor(4, 2, 0); lean_ctor_set(x_18, 0, x_16); lean_ctor_set(x_18, 1, x_17); @@ -648,15 +648,15 @@ lean_ctor_set(x_52, 1, x_17); x_53 = lean_alloc_ctor(4, 2, 0); lean_ctor_set(x_53, 0, x_52); lean_ctor_set(x_53, 1, x_35); -x_54 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__26; +x_54 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__27; x_55 = lean_alloc_ctor(4, 2, 0); lean_ctor_set(x_55, 0, x_54); lean_ctor_set(x_55, 1, x_53); -x_56 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__27; +x_56 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__28; x_57 = lean_alloc_ctor(4, 2, 0); lean_ctor_set(x_57, 0, x_55); lean_ctor_set(x_57, 1, x_56); -x_58 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__25; +x_58 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__26; x_59 = lean_alloc_ctor(3, 2, 0); lean_ctor_set(x_59, 0, x_58); lean_ctor_set(x_59, 1, x_57); @@ -690,15 +690,15 @@ lean_ctor_set(x_68, 1, x_17); x_69 = lean_alloc_ctor(4, 2, 0); lean_ctor_set(x_69, 0, x_68); lean_ctor_set(x_69, 1, x_35); -x_70 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__26; +x_70 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__27; x_71 = lean_alloc_ctor(4, 2, 0); lean_ctor_set(x_71, 0, x_70); lean_ctor_set(x_71, 1, x_69); -x_72 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__27; +x_72 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__28; x_73 = lean_alloc_ctor(4, 2, 0); lean_ctor_set(x_73, 0, x_71); lean_ctor_set(x_73, 1, x_72); -x_74 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__25; +x_74 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__26; x_75 = lean_alloc_ctor(3, 2, 0); lean_ctor_set(x_75, 0, x_74); lean_ctor_set(x_75, 1, x_73); @@ -1306,7 +1306,7 @@ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = l___private_Lean_Meta_Tactic_Simp_CongrLemmas_0__Lean_Meta_reprCongrLemmas____x40_Lean_Meta_Tactic_Simp_CongrLemmas___hyg_117____closed__3; -x_2 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__4; +x_2 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__4; x_3 = lean_alloc_ctor(4, 2, 0); lean_ctor_set(x_3, 0, x_1); lean_ctor_set(x_3, 1, x_2); @@ -1339,7 +1339,7 @@ static lean_object* _init_l___private_Lean_Meta_Tactic_Simp_CongrLemmas_0__Lean_ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__26; +x_1 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__27; x_2 = l___private_Lean_Meta_Tactic_Simp_CongrLemmas_0__Lean_Meta_reprCongrLemmas____x40_Lean_Meta_Tactic_Simp_CongrLemmas___hyg_117____closed__6; x_3 = lean_alloc_ctor(4, 2, 0); lean_ctor_set(x_3, 0, x_1); @@ -1352,7 +1352,7 @@ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = l___private_Lean_Meta_Tactic_Simp_CongrLemmas_0__Lean_Meta_reprCongrLemmas____x40_Lean_Meta_Tactic_Simp_CongrLemmas___hyg_117____closed__7; -x_2 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__27; +x_2 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__28; x_3 = lean_alloc_ctor(4, 2, 0); lean_ctor_set(x_3, 0, x_1); lean_ctor_set(x_3, 1, x_2); @@ -1363,7 +1363,7 @@ static lean_object* _init_l___private_Lean_Meta_Tactic_Simp_CongrLemmas_0__Lean_ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__25; +x_1 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__26; x_2 = l___private_Lean_Meta_Tactic_Simp_CongrLemmas_0__Lean_Meta_reprCongrLemmas____x40_Lean_Meta_Tactic_Simp_CongrLemmas___hyg_117____closed__8; x_3 = lean_alloc_ctor(3, 2, 0); lean_ctor_set(x_3, 0, x_1); @@ -1425,15 +1425,15 @@ x_19 = l___private_Lean_Meta_Tactic_Simp_CongrLemmas_0__Lean_Meta_reprCongrLemma x_20 = lean_alloc_ctor(4, 2, 0); lean_ctor_set(x_20, 0, x_19); lean_ctor_set(x_20, 1, x_18); -x_21 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__26; +x_21 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__27; x_22 = lean_alloc_ctor(4, 2, 0); lean_ctor_set(x_22, 0, x_21); lean_ctor_set(x_22, 1, x_20); -x_23 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__27; +x_23 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__28; x_24 = lean_alloc_ctor(4, 2, 0); lean_ctor_set(x_24, 0, x_22); lean_ctor_set(x_24, 1, x_23); -x_25 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__25; +x_25 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__26; x_26 = lean_alloc_ctor(3, 2, 0); lean_ctor_set(x_26, 0, x_25); lean_ctor_set(x_26, 1, x_24); diff --git a/stage0/stdlib/Lean/Meta/Tactic/Simp/Main.c b/stage0/stdlib/Lean/Meta/Tactic/Simp/Main.c index 522686c8f9..5b3d049281 100644 --- a/stage0/stdlib/Lean/Meta/Tactic/Simp/Main.c +++ b/stage0/stdlib/Lean/Meta/Tactic/Simp/Main.c @@ -214,6 +214,7 @@ lean_object* l_Lean_Meta_withNewMCtxDepth___at_Lean_Meta_Simp_simp_tryCongrLemma lean_object* l_Lean_Meta_Simp_initFn____x40_Lean_Meta_Tactic_Simp_Main___hyg_4_(lean_object*); lean_object* l_Lean_Meta_Simp_post(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_Simp_simp_simpArrow___closed__5; +extern lean_object* l_Lean_Meta_Simp_rewrite_getRHS___closed__3; extern lean_object* l_Lean_instInhabitedExpr; lean_object* l_Lean_Meta_Simp_simp_simpLambda_match__1___rarg(lean_object*, lean_object*, lean_object*); size_t lean_usize_modn(size_t, lean_object*); @@ -239,7 +240,6 @@ lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_simp_congrDefault___sp lean_object* l_Lean_Meta_Simp_simp_simpArrow___closed__15; extern lean_object* l_Lean_KernelException_toMessageData___closed__3; size_t lean_usize_of_nat(lean_object*); -extern lean_object* l_Lean_Meta_Simp_rewrite_getRHS___closed__2; lean_object* l_Lean_isProjectionFn___at___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_reduceProjFn_x3f___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_Simp_simp_withNewLemmas___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Meta_instInhabitedParamInfo; @@ -7720,12 +7720,12 @@ x_10 = !lean_is_exclusive(x_3); if (x_10 == 0) { lean_object* x_11; lean_object* x_12; lean_object* x_13; uint8_t x_38; lean_object* x_39; lean_object* x_49; lean_object* x_50; lean_object* x_51; uint8_t x_52; -x_11 = lean_ctor_get(x_3, 3); +x_11 = lean_ctor_get(x_3, 4); lean_dec(x_11); lean_inc(x_1); x_12 = lean_alloc_ctor(1, 1, 0); lean_ctor_set(x_12, 0, x_1); -lean_ctor_set(x_3, 3, x_12); +lean_ctor_set(x_3, 4, x_12); x_49 = lean_st_ref_get(x_8, x_9); x_50 = lean_ctor_get(x_49, 0); lean_inc(x_50); @@ -7909,132 +7909,135 @@ goto block_37; } else { -lean_object* x_61; lean_object* x_62; lean_object* x_63; lean_object* x_64; lean_object* x_65; lean_object* x_66; uint8_t x_88; lean_object* x_89; lean_object* x_99; lean_object* x_100; lean_object* x_101; uint8_t x_102; +lean_object* x_61; lean_object* x_62; lean_object* x_63; lean_object* x_64; lean_object* x_65; lean_object* x_66; lean_object* x_67; uint8_t x_89; lean_object* x_90; lean_object* x_100; lean_object* x_101; lean_object* x_102; uint8_t x_103; x_61 = lean_ctor_get(x_3, 0); x_62 = lean_ctor_get(x_3, 1); x_63 = lean_ctor_get(x_3, 2); +x_64 = lean_ctor_get(x_3, 3); +lean_inc(x_64); lean_inc(x_63); lean_inc(x_62); lean_inc(x_61); lean_dec(x_3); lean_inc(x_1); -x_64 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_64, 0, x_1); -x_65 = lean_alloc_ctor(0, 4, 0); -lean_ctor_set(x_65, 0, x_61); -lean_ctor_set(x_65, 1, x_62); -lean_ctor_set(x_65, 2, x_63); -lean_ctor_set(x_65, 3, x_64); -x_99 = lean_st_ref_get(x_8, x_9); -x_100 = lean_ctor_get(x_99, 0); -lean_inc(x_100); -x_101 = lean_ctor_get(x_100, 3); +x_65 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_65, 0, x_1); +x_66 = lean_alloc_ctor(0, 5, 0); +lean_ctor_set(x_66, 0, x_61); +lean_ctor_set(x_66, 1, x_62); +lean_ctor_set(x_66, 2, x_63); +lean_ctor_set(x_66, 3, x_64); +lean_ctor_set(x_66, 4, x_65); +x_100 = lean_st_ref_get(x_8, x_9); +x_101 = lean_ctor_get(x_100, 0); lean_inc(x_101); -lean_dec(x_100); -x_102 = lean_ctor_get_uint8(x_101, sizeof(void*)*1); +x_102 = lean_ctor_get(x_101, 3); +lean_inc(x_102); lean_dec(x_101); -if (x_102 == 0) +x_103 = lean_ctor_get_uint8(x_102, sizeof(void*)*1); +lean_dec(x_102); +if (x_103 == 0) { -lean_object* x_103; uint8_t x_104; -x_103 = lean_ctor_get(x_99, 1); -lean_inc(x_103); -lean_dec(x_99); -x_104 = 0; -x_88 = x_104; -x_89 = x_103; -goto block_98; +lean_object* x_104; uint8_t x_105; +x_104 = lean_ctor_get(x_100, 1); +lean_inc(x_104); +lean_dec(x_100); +x_105 = 0; +x_89 = x_105; +x_90 = x_104; +goto block_99; } else { -lean_object* x_105; lean_object* x_106; lean_object* x_107; lean_object* x_108; lean_object* x_109; uint8_t x_110; -x_105 = lean_ctor_get(x_99, 1); -lean_inc(x_105); -lean_dec(x_99); -x_106 = l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_synthesizeArgs___spec__3___closed__2; -x_107 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at_Lean_Meta_Simp_simp_simpForall___spec__4(x_106, x_2, x_65, x_4, x_5, x_6, x_7, x_8, x_105); -x_108 = lean_ctor_get(x_107, 0); -lean_inc(x_108); -x_109 = lean_ctor_get(x_107, 1); +lean_object* x_106; lean_object* x_107; lean_object* x_108; lean_object* x_109; lean_object* x_110; uint8_t x_111; +x_106 = lean_ctor_get(x_100, 1); +lean_inc(x_106); +lean_dec(x_100); +x_107 = l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_synthesizeArgs___spec__3___closed__2; +x_108 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at_Lean_Meta_Simp_simp_simpForall___spec__4(x_107, x_2, x_66, x_4, x_5, x_6, x_7, x_8, x_106); +x_109 = lean_ctor_get(x_108, 0); lean_inc(x_109); -lean_dec(x_107); -x_110 = lean_unbox(x_108); +x_110 = lean_ctor_get(x_108, 1); +lean_inc(x_110); lean_dec(x_108); -x_88 = x_110; -x_89 = x_109; -goto block_98; +x_111 = lean_unbox(x_109); +lean_dec(x_109); +x_89 = x_111; +x_90 = x_110; +goto block_99; } -block_87: +block_88: { -uint8_t x_67; -x_67 = l_Lean_Expr_isArrow(x_1); -if (x_67 == 0) +uint8_t x_68; +x_68 = l_Lean_Expr_isArrow(x_1); +if (x_68 == 0) { -lean_object* x_68; +lean_object* x_69; lean_inc(x_8); lean_inc(x_7); lean_inc(x_6); lean_inc(x_5); lean_inc(x_1); -x_68 = l_Lean_Meta_isProp(x_1, x_5, x_6, x_7, x_8, x_66); -if (lean_obj_tag(x_68) == 0) +x_69 = l_Lean_Meta_isProp(x_1, x_5, x_6, x_7, x_8, x_67); +if (lean_obj_tag(x_69) == 0) { -lean_object* x_69; uint8_t x_70; -x_69 = lean_ctor_get(x_68, 0); -lean_inc(x_69); -x_70 = lean_unbox(x_69); -lean_dec(x_69); -if (x_70 == 0) +lean_object* x_70; uint8_t x_71; +x_70 = lean_ctor_get(x_69, 0); +lean_inc(x_70); +x_71 = lean_unbox(x_70); +lean_dec(x_70); +if (x_71 == 0) { -lean_object* x_71; lean_object* x_72; lean_object* x_73; lean_object* x_74; lean_object* x_75; -lean_dec(x_65); +lean_object* x_72; lean_object* x_73; lean_object* x_74; lean_object* x_75; lean_object* x_76; +lean_dec(x_66); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_2); -x_71 = lean_ctor_get(x_68, 1); -lean_inc(x_71); -if (lean_is_exclusive(x_68)) { - lean_ctor_release(x_68, 0); - lean_ctor_release(x_68, 1); - x_72 = x_68; +x_72 = lean_ctor_get(x_69, 1); +lean_inc(x_72); +if (lean_is_exclusive(x_69)) { + lean_ctor_release(x_69, 0); + lean_ctor_release(x_69, 1); + x_73 = x_69; } else { - lean_dec_ref(x_68); - x_72 = lean_box(0); + lean_dec_ref(x_69); + x_73 = lean_box(0); } -x_73 = lean_box(0); -x_74 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_74, 0, x_1); -lean_ctor_set(x_74, 1, x_73); -if (lean_is_scalar(x_72)) { - x_75 = lean_alloc_ctor(0, 2, 0); +x_74 = lean_box(0); +x_75 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_75, 0, x_1); +lean_ctor_set(x_75, 1, x_74); +if (lean_is_scalar(x_73)) { + x_76 = lean_alloc_ctor(0, 2, 0); } else { - x_75 = x_72; + x_76 = x_73; } -lean_ctor_set(x_75, 0, x_74); -lean_ctor_set(x_75, 1, x_71); -return x_75; +lean_ctor_set(x_76, 0, x_75); +lean_ctor_set(x_76, 1, x_72); +return x_76; } else { -lean_object* x_76; lean_object* x_77; uint8_t x_78; lean_object* x_79; lean_object* x_80; lean_object* x_81; -x_76 = lean_ctor_get(x_68, 1); -lean_inc(x_76); -lean_dec(x_68); -x_77 = l_Lean_Expr_bindingName_x21(x_1); -x_78 = l_Lean_Expr_bindingInfo_x21(x_1); -x_79 = l_Lean_Expr_bindingDomain_x21(x_1); -x_80 = lean_alloc_closure((void*)(l_Lean_Meta_Simp_simp_simpForall___lambda__2___boxed), 10, 1); -lean_closure_set(x_80, 0, x_1); -x_81 = l_Lean_Meta_withLocalDecl___at_Lean_Meta_Simp_simp_simpForall___spec__2___rarg(x_77, x_78, x_79, x_80, x_2, x_65, x_4, x_5, x_6, x_7, x_8, x_76); -return x_81; +lean_object* x_77; lean_object* x_78; uint8_t x_79; lean_object* x_80; lean_object* x_81; lean_object* x_82; +x_77 = lean_ctor_get(x_69, 1); +lean_inc(x_77); +lean_dec(x_69); +x_78 = l_Lean_Expr_bindingName_x21(x_1); +x_79 = l_Lean_Expr_bindingInfo_x21(x_1); +x_80 = l_Lean_Expr_bindingDomain_x21(x_1); +x_81 = lean_alloc_closure((void*)(l_Lean_Meta_Simp_simp_simpForall___lambda__2___boxed), 10, 1); +lean_closure_set(x_81, 0, x_1); +x_82 = l_Lean_Meta_withLocalDecl___at_Lean_Meta_Simp_simp_simpForall___spec__2___rarg(x_78, x_79, x_80, x_81, x_2, x_66, x_4, x_5, x_6, x_7, x_8, x_77); +return x_82; } } else { -lean_object* x_82; lean_object* x_83; lean_object* x_84; lean_object* x_85; -lean_dec(x_65); +lean_object* x_83; lean_object* x_84; lean_object* x_85; lean_object* x_86; +lean_dec(x_66); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); @@ -8042,63 +8045,63 @@ lean_dec(x_5); lean_dec(x_4); lean_dec(x_2); lean_dec(x_1); -x_82 = lean_ctor_get(x_68, 0); -lean_inc(x_82); -x_83 = lean_ctor_get(x_68, 1); +x_83 = lean_ctor_get(x_69, 0); lean_inc(x_83); -if (lean_is_exclusive(x_68)) { - lean_ctor_release(x_68, 0); - lean_ctor_release(x_68, 1); - x_84 = x_68; +x_84 = lean_ctor_get(x_69, 1); +lean_inc(x_84); +if (lean_is_exclusive(x_69)) { + lean_ctor_release(x_69, 0); + lean_ctor_release(x_69, 1); + x_85 = x_69; } else { - lean_dec_ref(x_68); - x_84 = lean_box(0); + lean_dec_ref(x_69); + x_85 = lean_box(0); } -if (lean_is_scalar(x_84)) { - x_85 = lean_alloc_ctor(1, 2, 0); +if (lean_is_scalar(x_85)) { + x_86 = lean_alloc_ctor(1, 2, 0); } else { - x_85 = x_84; + x_86 = x_85; } -lean_ctor_set(x_85, 0, x_82); -lean_ctor_set(x_85, 1, x_83); -return x_85; -} -} -else -{ -lean_object* x_86; -x_86 = l_Lean_Meta_Simp_simp_simpArrow(x_1, x_2, x_65, x_4, x_5, x_6, x_7, x_8, x_66); +lean_ctor_set(x_86, 0, x_83); +lean_ctor_set(x_86, 1, x_84); return x_86; } } -block_98: +else { -if (x_88 == 0) +lean_object* x_87; +x_87 = l_Lean_Meta_Simp_simp_simpArrow(x_1, x_2, x_66, x_4, x_5, x_6, x_7, x_8, x_67); +return x_87; +} +} +block_99: { -x_66 = x_89; -goto block_87; +if (x_89 == 0) +{ +x_67 = x_90; +goto block_88; } else { -lean_object* x_90; lean_object* x_91; lean_object* x_92; lean_object* x_93; lean_object* x_94; lean_object* x_95; lean_object* x_96; lean_object* x_97; +lean_object* x_91; lean_object* x_92; lean_object* x_93; lean_object* x_94; lean_object* x_95; lean_object* x_96; lean_object* x_97; lean_object* x_98; lean_inc(x_1); -x_90 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_90, 0, x_1); -x_91 = l_Lean_Meta_Simp_simp_simpForall___closed__2; -x_92 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_92, 0, x_91); -lean_ctor_set(x_92, 1, x_90); -x_93 = l_Lean_KernelException_toMessageData___closed__15; -x_94 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_94, 0, x_92); -lean_ctor_set(x_94, 1, x_93); -x_95 = l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_synthesizeArgs___spec__3___closed__2; -x_96 = l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__3(x_95, x_94, x_2, x_65, x_4, x_5, x_6, x_7, x_8, x_89); -x_97 = lean_ctor_get(x_96, 1); -lean_inc(x_97); -lean_dec(x_96); -x_66 = x_97; -goto block_87; +x_91 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_91, 0, x_1); +x_92 = l_Lean_Meta_Simp_simp_simpForall___closed__2; +x_93 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_93, 0, x_92); +lean_ctor_set(x_93, 1, x_91); +x_94 = l_Lean_KernelException_toMessageData___closed__15; +x_95 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_95, 0, x_93); +lean_ctor_set(x_95, 1, x_94); +x_96 = l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_synthesizeArgs___spec__3___closed__2; +x_97 = l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__3(x_96, x_95, x_2, x_66, x_4, x_5, x_6, x_7, x_8, x_90); +x_98 = lean_ctor_get(x_97, 1); +lean_inc(x_98); +lean_dec(x_97); +x_67 = x_98; +goto block_88; } } } @@ -10308,37 +10311,40 @@ x_10 = !lean_is_exclusive(x_3); if (x_10 == 0) { lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; -x_11 = lean_ctor_get(x_3, 3); +x_11 = lean_ctor_get(x_3, 4); lean_dec(x_11); lean_inc(x_1); x_12 = lean_alloc_ctor(1, 1, 0); lean_ctor_set(x_12, 0, x_1); -lean_ctor_set(x_3, 3, x_12); +lean_ctor_set(x_3, 4, x_12); x_13 = l_Lean_Meta_Simp_simp_simpLambda___closed__1; x_14 = l_Lean_Meta_lambdaTelescope___at_Lean_Meta_Simp_simp_simpLambda___spec__4___rarg(x_1, x_13, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9); return x_14; } else { -lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; +lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; x_15 = lean_ctor_get(x_3, 0); x_16 = lean_ctor_get(x_3, 1); x_17 = lean_ctor_get(x_3, 2); +x_18 = lean_ctor_get(x_3, 3); +lean_inc(x_18); lean_inc(x_17); lean_inc(x_16); lean_inc(x_15); lean_dec(x_3); lean_inc(x_1); -x_18 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_18, 0, x_1); -x_19 = lean_alloc_ctor(0, 4, 0); -lean_ctor_set(x_19, 0, x_15); -lean_ctor_set(x_19, 1, x_16); -lean_ctor_set(x_19, 2, x_17); -lean_ctor_set(x_19, 3, x_18); -x_20 = l_Lean_Meta_Simp_simp_simpLambda___closed__1; -x_21 = l_Lean_Meta_lambdaTelescope___at_Lean_Meta_Simp_simp_simpLambda___spec__4___rarg(x_1, x_20, x_2, x_19, x_4, x_5, x_6, x_7, x_8, x_9); -return x_21; +x_19 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_19, 0, x_1); +x_20 = lean_alloc_ctor(0, 5, 0); +lean_ctor_set(x_20, 0, x_15); +lean_ctor_set(x_20, 1, x_16); +lean_ctor_set(x_20, 2, x_17); +lean_ctor_set(x_20, 3, x_18); +lean_ctor_set(x_20, 4, x_19); +x_21 = l_Lean_Meta_Simp_simp_simpLambda___closed__1; +x_22 = l_Lean_Meta_lambdaTelescope___at_Lean_Meta_Simp_simp_simpLambda___spec__4___rarg(x_1, x_21, x_2, x_20, x_4, x_5, x_6, x_7, x_8, x_9); +return x_22; } } } @@ -11519,35 +11525,38 @@ x_16 = !lean_is_exclusive(x_3); if (x_16 == 0) { lean_object* x_17; lean_object* x_18; lean_object* x_19; -x_17 = lean_ctor_get(x_3, 3); +x_17 = lean_ctor_get(x_3, 4); lean_dec(x_17); lean_inc(x_1); x_18 = lean_alloc_ctor(1, 1, 0); lean_ctor_set(x_18, 0, x_1); -lean_ctor_set(x_3, 3, x_18); +lean_ctor_set(x_3, 4, x_18); x_19 = l_Lean_Expr_withAppAux___at_Lean_Meta_Simp_simp_congrDefault___spec__2(x_1, x_13, x_15, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9); return x_19; } else { -lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; +lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; x_20 = lean_ctor_get(x_3, 0); x_21 = lean_ctor_get(x_3, 1); x_22 = lean_ctor_get(x_3, 2); +x_23 = lean_ctor_get(x_3, 3); +lean_inc(x_23); lean_inc(x_22); lean_inc(x_21); lean_inc(x_20); lean_dec(x_3); lean_inc(x_1); -x_23 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_23, 0, x_1); -x_24 = lean_alloc_ctor(0, 4, 0); -lean_ctor_set(x_24, 0, x_20); -lean_ctor_set(x_24, 1, x_21); -lean_ctor_set(x_24, 2, x_22); -lean_ctor_set(x_24, 3, x_23); -x_25 = l_Lean_Expr_withAppAux___at_Lean_Meta_Simp_simp_congrDefault___spec__2(x_1, x_13, x_15, x_2, x_24, x_4, x_5, x_6, x_7, x_8, x_9); -return x_25; +x_24 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_24, 0, x_1); +x_25 = lean_alloc_ctor(0, 5, 0); +lean_ctor_set(x_25, 0, x_20); +lean_ctor_set(x_25, 1, x_21); +lean_ctor_set(x_25, 2, x_22); +lean_ctor_set(x_25, 3, x_23); +lean_ctor_set(x_25, 4, x_24); +x_26 = l_Lean_Expr_withAppAux___at_Lean_Meta_Simp_simp_congrDefault___spec__2(x_1, x_13, x_15, x_2, x_25, x_4, x_5, x_6, x_7, x_8, x_9); +return x_26; } } } @@ -14727,7 +14736,7 @@ x_12 = lean_ctor_get(x_10, 0); x_13 = lean_ctor_get(x_10, 1); x_14 = lean_ctor_get(x_12, 0); lean_inc(x_14); -x_15 = l_Lean_Meta_Simp_rewrite_getRHS___closed__2; +x_15 = l_Lean_Meta_Simp_rewrite_getRHS___closed__3; x_16 = l_Lean_Expr_isConstOf(x_14, x_15); lean_dec(x_14); if (x_16 == 0) @@ -14860,7 +14869,7 @@ lean_inc(x_41); lean_dec(x_10); x_43 = lean_ctor_get(x_41, 0); lean_inc(x_43); -x_44 = l_Lean_Meta_Simp_rewrite_getRHS___closed__2; +x_44 = l_Lean_Meta_Simp_rewrite_getRHS___closed__3; x_45 = l_Lean_Expr_isConstOf(x_43, x_44); lean_dec(x_43); if (x_45 == 0) diff --git a/stage0/stdlib/Lean/Meta/Tactic/Simp/Rewrite.c b/stage0/stdlib/Lean/Meta/Tactic/Simp/Rewrite.c index 4193bc1779..4ebe80e150 100644 --- a/stage0/stdlib/Lean/Meta/Tactic/Simp/Rewrite.c +++ b/stage0/stdlib/Lean/Meta/Tactic/Simp/Rewrite.c @@ -22,13 +22,14 @@ extern lean_object* l_Array_forInUnsafe_loop___at___private_Lean_Meta_LevelDefEq lean_object* l_Lean_Meta_Simp_synthesizeArgs_match__3(lean_object*); lean_object* l_Lean_Meta_Simp_synthesizeArgs___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_rewrite___spec__3___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_Simp_rewriteUsingDecide_x3f(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_Simp_rewriteCtorEq_x3f_match__1(lean_object*); lean_object* l_Lean_Meta_Simp_rewrite_finalizeProof(uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_name_mk_string(lean_object*, lean_object*); extern lean_object* l___private_Lean_MonadEnv_0__Lean_supportedRecursors___closed__5; lean_object* lean_array_uget(lean_object*, size_t); -lean_object* l_Lean_Meta_Simp_preDefault___closed__1; +lean_object* l_Lean_Meta_Simp_tryRewriteUsingDecide(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_Simp_rewrite_tryLemma_x3f___lambda__4___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Meta_Simp_postDefault___closed__1; lean_object* l_Lean_Meta_Simp_synthesizeArgs_match__2(lean_object*); lean_object* l_Array_mapIdxM_map___at_Array_mapIdx___spec__1___rarg___lambda__1___boxed(lean_object*, lean_object*); lean_object* l_Lean_Meta_Simp_rewrite_tryLemma_x3f___lambda__3(uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -40,14 +41,20 @@ uint8_t l_Lean_checkTraceOption(lean_object*, lean_object*); lean_object* lean_st_ref_get(lean_object*, lean_object*); lean_object* l_Lean_Meta_SimpLemma_getName(lean_object*); lean_object* l_Lean_Meta_Simp_rewrite_getLHS(uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +extern lean_object* l_myMacro____x40_Init_Notation___hyg_6045____closed__4; lean_object* l_Lean_Meta_Simp_rewrite_match__1(lean_object*); +uint8_t lean_name_eq(lean_object*, lean_object*); +lean_object* l_Lean_Expr_constructorApp_x3f(lean_object*, lean_object*); lean_object* l_Lean_Meta_Simp_synthesizeArgs___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +uint8_t l_Lean_Expr_isApp(lean_object*); lean_object* l_Lean_Expr_appFn_x21(lean_object*); lean_object* l_Array_toSubarray___rarg(lean_object*, lean_object*, lean_object*); +lean_object* lean_array_push(lean_object*, lean_object*); lean_object* lean_array_get_size(lean_object*); lean_object* l_Lean_Meta_Simp_rewrite_tryLemma_x3f___lambda__2___closed__1; lean_object* l_Lean_Meta_Simp_rewrite_tryLemma_x3f___lambda__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_synthesizeArgs___spec__3___closed__5; +lean_object* l_Lean_Meta_unfoldDefinition_x3f(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_synthesizeArgs___spec__3___closed__6; lean_object* l_Lean_Meta_Simp_rewrite_finalizeProof___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Expr_appArg_x21(lean_object*); @@ -56,14 +63,23 @@ lean_object* l_Lean_Meta_Simp_postDefault(lean_object*, lean_object*, lean_objec lean_object* l_ReaderT_bind___at_Lean_Meta_Simp_rewrite_tryLemma_x3f___spec__1(lean_object*, lean_object*); uint8_t l_USize_decLt(size_t, size_t); lean_object* lean_nat_add(lean_object*, lean_object*); +lean_object* l_Lean_Meta_mkDecide(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_Simp_rewriteUsingDecide_x3f___closed__7; +lean_object* l_Lean_Meta_mkEqRefl(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_Simp_rewriteCtorEq_x3f___closed__2; lean_object* l_Lean_mkAppN(lean_object*, lean_object*); -lean_object* l_Lean_Meta_Simp_rewrite_finalizeProof_match__1___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_Simp_rewriteCtorEq_x3f___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_Simp_rewrite_finalizeProof_match__1___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_synthesizeArgs___spec__3___closed__11; +lean_object* l_Lean_Meta_Simp_rewritePre(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_Simp_rewrite_getLHS_match__1(lean_object*); +extern lean_object* l_Lean_instQuoteBool___closed__5; +lean_object* l_Lean_Meta_Simp_rewriteUsingDecide_x3f___closed__8; lean_object* l_Lean_Meta_Simp_rewrite_tryLemma_x3f_match__1(lean_object*); lean_object* l_Lean_Meta_Simp_rewrite(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_array_fget(lean_object*, lean_object*); -lean_object* l_Lean_Meta_Simp_rewrite_getLHS_match__1___rarg(uint8_t, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_Simp_rewriteCtorEq_x3f_match__2___rarg(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_Simp_rewrite_getLHS_match__1___rarg(uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_mkEqFalse(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); uint8_t lean_nat_dec_eq(lean_object*, lean_object*); lean_object* l___private_Lean_Meta_Basic_0__Lean_Meta_forallMetaTelescopeReducingAux(lean_object*, uint8_t, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -71,101 +87,142 @@ lean_object* lean_st_ref_take(lean_object*, lean_object*); lean_object* l_Lean_Meta_Simp_rewrite_tryLemma_x3f___lambda__3___closed__3; lean_object* lean_nat_sub(lean_object*, lean_object*); lean_object* l_Lean_Meta_Simp_synthesizeArgs___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_Simp_rewriteUsingDecide_x3f___closed__4; lean_object* l_Lean_Meta_Simp_synthesizeArgs___closed__1; lean_object* l_Lean_Meta_Simp_rewrite_getRHS_match__1(lean_object*); +lean_object* l_Lean_Meta_mkLambdaFVars(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_Simp_synthesizeArgs_match__1(lean_object*); -lean_object* l_Lean_Meta_Simp_rewrite_getRHS_match__1___rarg(uint8_t, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_Simp_rewrite_getRHS_match__1___rarg(uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_addTrace___at_Lean_Meta_Simp_synthesizeArgs___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_Simp_rewrite___closed__4; +lean_object* l_Lean_Meta_Simp_tryRewriteUsingDecide_match__1(lean_object*); lean_object* l_Lean_Meta_Simp_rewrite___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_Simp_rewrite_tryLemma_x3f___lambda__4(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +extern lean_object* l_Lean_instQuoteBool___closed__3; +lean_object* l_Lean_Meta_Simp_rewriteUsingDecide_x3f___closed__3; lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_synthesizeArgs___spec__3___closed__10; lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_synthesizeArgs___spec__3___closed__7; extern lean_object* l_Lean_Parser_Tactic_rewrite___closed__1; extern lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_Basic___hyg_550____closed__2; lean_object* l_Lean_Meta_Simp_synthesizeArgs_match__3___rarg(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_Simp_rewriteUsingDecide_x3f___closed__5; lean_object* l_Lean_Meta_Simp_synthesizeArgs_match__4(lean_object*); -lean_object* l_Lean_Meta_Simp_rewrite_getRHS_match__1___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_Simp_rewrite_getRHS_match__1___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_insertionSort_swapLoop___at_Lean_Meta_Simp_rewrite___spec__2___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +uint8_t l_Lean_Expr_isAppOfArity(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_Simp_rewrite_getRHS___closed__3; lean_object* l_Lean_Meta_Simp_synthesizeArgs_match__4___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_Array_insertionSort_swapLoop_match__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_mkEqTrue(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_Simp_rewriteUsingDecide_x3f___closed__6; +uint8_t l_Lean_Expr_isConst(lean_object*); extern lean_object* l_Lean_KernelException_toMessageData___closed__15; uint8_t l_Array_isEmpty___rarg(lean_object*); +lean_object* l_Lean_Meta_Simp_rewriteCtorEq_x3f___closed__3; +uint8_t l_Lean_Expr_isConstOf(lean_object*, lean_object*); lean_object* l_Lean_Meta_Simp_rewrite___closed__3; lean_object* l_Lean_Meta_Simp_rewrite_tryLemma_x3f___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_Simp_synthesizeArgs_match__1___rarg(lean_object*, lean_object*, lean_object*); uint8_t l_Lean_BinderInfo_isInstImplicit(uint8_t); lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_synthesizeArgs___spec__3(lean_object*, lean_object*, lean_object*, lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_whnf(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_Simp_rewrite___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Meta_synthInstance_x3f___lambda__2___closed__8; size_t lean_usize_of_nat(lean_object*); +extern lean_object* l_Lean_Syntax_mkAntiquotNode___closed__9; lean_object* l_Lean_Meta_Simp_rewrite_getRHS___closed__2; +extern lean_object* l_Lean_instToExprBool___lambda__1___closed__1; +lean_object* l_Lean_Meta_Simp_rewriteCtorEq_x3f_match__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_Simp_rewrite___closed__1; lean_object* l_Lean_Meta_Simp_rewrite___closed__2; lean_object* l_Lean_Meta_Simp_rewrite_getRHS___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Meta_Simp_rewrite_finalizeProof_match__1___rarg(uint8_t, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_Simp_rewrite_finalizeProof_match__1___rarg(uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_Simp_rewrite_getRHS___closed__1; lean_object* l_Lean_Meta_Simp_rewrite___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +extern lean_object* l_Lean_instToExprBool___lambda__1___closed__2; +lean_object* l_Lean_Meta_Simp_rewritePre___closed__1; lean_object* l_Array_insertionSort_swapLoop___at_Lean_Meta_Simp_rewrite___spec__2(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_Simp_rewriteCtorEq_x3f___closed__1; +lean_object* l_Lean_Meta_Simp_rewriteCtorEq_x3f(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_Simp_rewriteUsingDecide_x3f___closed__2; lean_object* l_Std_PersistentArray_push___rarg(lean_object*, lean_object*); +lean_object* l_Lean_Meta_Simp_rewritePost(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_trySynthInstance(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_hasAssignableMVar(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_Simp_rewrite_tryLemma_x3f___lambda__5___closed__2; lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_synthesizeArgs___spec__3___closed__12; lean_object* l_Lean_Meta_Simp_rewrite_getRHS___closed__4; +lean_object* l_Lean_Meta_Simp_rewriteUsingDecide_x3f___closed__1; uint8_t l_Lean_Expr_isMVar(lean_object*); lean_object* l_Lean_Meta_Simp_rewrite_tryLemma_x3f___lambda__5___closed__3; +uint8_t l_Lean_Expr_hasMVar(lean_object*); lean_object* l_Lean_Meta_Simp_rewrite_match__1___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_Simp_rewrite_tryLemma_x3f_match__1___rarg(lean_object*, lean_object*); lean_object* l_Lean_Meta_Simp_rewrite_tryLemma_x3f___lambda__5___closed__1; lean_object* l_Lean_Meta_Simp_preDefault(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Parser_Tactic_simp___closed__1; -lean_object* l_Lean_Meta_Simp_rewrite_getLHS_match__1___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_Simp_rewriteCtorEq_x3f_match__2(lean_object*); +lean_object* l_Lean_Meta_Simp_rewrite_getLHS_match__1___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_mkEqFalse_x27(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_st_ref_set(lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at_Lean_Meta_Simp_synthesizeArgs___spec__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_addMessageContextFull___at_Lean_Meta_instAddMessageContextMetaM___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_withNewMCtxDepth___at_Lean_Meta_Simp_rewrite_tryLemma_x3f___spec__2(lean_object*); lean_object* l_Lean_Meta_inferType(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_Simp_tryUnfold_match__1___rarg(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_Simp_rewritePost___closed__1; lean_object* l_Lean_Meta_isExprDefEq(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_addTrace___at_Lean_Meta_Simp_synthesizeArgs___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_synthesizeArgs___spec__3___closed__3; +lean_object* l_Lean_Meta_mkNoConfusion(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_instantiateMVars(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_insertionSort_swapLoop___at_Lean_Meta_Simp_rewrite___spec__2___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_rewrite___spec__3(lean_object*, lean_object*, lean_object*, lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_Simp_rewrite_tryLemma_x3f___lambda__3___closed__1; +lean_object* l_Lean_Meta_Simp_tryRewriteCtorEq(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_DiscrTree_getMatch___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_insertionSort_traverse___at_Lean_Meta_Simp_rewrite___spec__1(lean_object*, lean_object*, lean_object*); lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_synthesizeArgs___spec__3___closed__9; +lean_object* l_Lean_Meta_Simp_tryRewriteCtorEq_match__1___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_Simp_rewrite_tryLemma_x3f___lambda__3___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Parser_Tactic_changeWith___closed__3; +uint8_t l_Lean_NameSet_contains(lean_object*, lean_object*); +lean_object* l_Lean_Meta_Simp_tryUnfold_match__1(lean_object*); lean_object* l_Lean_Meta_SimpLemma_getValue(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_Simp_rewrite_tryLemma_x3f(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +extern lean_object* l_Lean_mkOptionalNode___closed__2; lean_object* l_Lean_Meta_Simp_rewrite_getRHS(uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Parser_Tactic_intro___closed__1; +lean_object* l_Lean_Expr_getAppFn(lean_object*); lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_synthesizeArgs___spec__3___closed__8; lean_object* l_Lean_Meta_Simp_rewrite_tryLemma_x3f___lambda__3___closed__4; lean_object* l_Lean_Meta_Simp_rewrite_tryLemma_x3f___lambda__2(uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Meta_SynthInstance_getInstances___lambda__2___closed__7; lean_object* l_Lean_Meta_Simp_rewrite_tryLemma_x3f___lambda__3___closed__2; +lean_object* l_Lean_Meta_Simp_tryRewriteCtorEq_match__1(lean_object*); lean_object* l_Lean_Meta_Simp_synthesizeArgs_match__2___rarg(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_mkEq(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_isProp(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_indentExpr(lean_object*); +uint8_t l_Lean_Expr_hasFVar(lean_object*); lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_synthesizeArgs___spec__3___closed__4; lean_object* l_Lean_Meta_Simp_synthesizeArgs(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_mkConst(lean_object*, lean_object*); lean_object* l_ReaderT_bind___at_Lean_Meta_Simp_rewrite_tryLemma_x3f___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Expr_constName_x21(lean_object*); lean_object* l_Lean_Meta_Simp_rewrite_tryLemma_x3f___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Array_findSomeM_x3f___rarg___closed__1; lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_synthesizeArgs___spec__3___closed__1; lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_synthesizeArgs___spec__3___closed__2; +lean_object* l_Lean_Meta_withLocalDecl___at___private_Lean_Meta_Tactic_Simp_SimpLemmas_0__Lean_Meta_isPerm___spec__1___rarg(lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_Simp_rewrite_match__2___rarg(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_Simp_tryUnfold(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_Simp_rewrite_getLHS___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at_Lean_Meta_Simp_synthesizeArgs___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); uint8_t lean_nat_dec_lt(lean_object*, lean_object*); lean_object* l_Std_fmt___at_Lean_Meta_instToMessageDataSimpLemma___spec__1(lean_object*); lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_synthesizeArgs___spec__3___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_Simp_tryRewriteUsingDecide_match__1___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_Simp_synthesizeArgs_match__1___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3) { _start: { @@ -3252,49 +3309,64 @@ lean_dec(x_2); return x_12; } } -lean_object* l_Lean_Meta_Simp_rewrite_getLHS_match__1___rarg(uint8_t x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { +lean_object* l_Lean_Meta_Simp_rewrite_getLHS_match__1___rarg(uint8_t x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { _start: { switch (x_1) { case 0: { -lean_object* x_6; lean_object* x_7; +lean_object* x_7; lean_object* x_8; +lean_dec(x_6); lean_dec(x_5); lean_dec(x_3); lean_dec(x_2); -x_6 = lean_box(0); -x_7 = lean_apply_1(x_4, x_6); -return x_7; +x_7 = lean_box(0); +x_8 = lean_apply_1(x_4, x_7); +return x_8; } case 1: { -lean_object* x_8; lean_object* x_9; +lean_object* x_9; lean_object* x_10; +lean_dec(x_6); lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); -x_8 = lean_box(0); -x_9 = lean_apply_1(x_5, x_8); -return x_9; +x_9 = lean_box(0); +x_10 = lean_apply_1(x_5, x_9); +return x_10; } case 2: { -lean_object* x_10; lean_object* x_11; +lean_object* x_11; lean_object* x_12; lean_dec(x_5); lean_dec(x_4); lean_dec(x_3); -x_10 = lean_box(0); -x_11 = lean_apply_1(x_2, x_10); -return x_11; +lean_dec(x_2); +x_11 = lean_box(0); +x_12 = lean_apply_1(x_6, x_11); +return x_12; +} +case 3: +{ +lean_object* x_13; lean_object* x_14; +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +x_13 = lean_box(0); +x_14 = lean_apply_1(x_2, x_13); +return x_14; } default: { -lean_object* x_12; lean_object* x_13; +lean_object* x_15; lean_object* x_16; +lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_2); -x_12 = lean_box(0); -x_13 = lean_apply_1(x_3, x_12); -return x_13; +x_15 = lean_box(0); +x_16 = lean_apply_1(x_3, x_15); +return x_16; } } } @@ -3303,63 +3375,78 @@ lean_object* l_Lean_Meta_Simp_rewrite_getLHS_match__1(lean_object* x_1) { _start: { lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l_Lean_Meta_Simp_rewrite_getLHS_match__1___rarg___boxed), 5, 0); +x_2 = lean_alloc_closure((void*)(l_Lean_Meta_Simp_rewrite_getLHS_match__1___rarg___boxed), 6, 0); return x_2; } } -lean_object* l_Lean_Meta_Simp_rewrite_getLHS_match__1___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { +lean_object* l_Lean_Meta_Simp_rewrite_getLHS_match__1___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { _start: { -uint8_t x_6; lean_object* x_7; -x_6 = lean_unbox(x_1); +uint8_t x_7; lean_object* x_8; +x_7 = lean_unbox(x_1); lean_dec(x_1); -x_7 = l_Lean_Meta_Simp_rewrite_getLHS_match__1___rarg(x_6, x_2, x_3, x_4, x_5); -return x_7; +x_8 = l_Lean_Meta_Simp_rewrite_getLHS_match__1___rarg(x_7, x_2, x_3, x_4, x_5, x_6); +return x_8; } } -lean_object* l_Lean_Meta_Simp_rewrite_getRHS_match__1___rarg(uint8_t x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { +lean_object* l_Lean_Meta_Simp_rewrite_getRHS_match__1___rarg(uint8_t x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { _start: { switch (x_1) { case 0: { -lean_object* x_6; lean_object* x_7; +lean_object* x_7; lean_object* x_8; +lean_dec(x_6); lean_dec(x_5); lean_dec(x_3); lean_dec(x_2); -x_6 = lean_box(0); -x_7 = lean_apply_1(x_4, x_6); -return x_7; +x_7 = lean_box(0); +x_8 = lean_apply_1(x_4, x_7); +return x_8; } case 1: { -lean_object* x_8; lean_object* x_9; +lean_object* x_9; lean_object* x_10; +lean_dec(x_6); lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); -x_8 = lean_box(0); -x_9 = lean_apply_1(x_5, x_8); -return x_9; +x_9 = lean_box(0); +x_10 = lean_apply_1(x_5, x_9); +return x_10; } case 2: { -lean_object* x_10; lean_object* x_11; +lean_object* x_11; lean_object* x_12; lean_dec(x_5); lean_dec(x_4); lean_dec(x_3); -x_10 = lean_box(0); -x_11 = lean_apply_1(x_2, x_10); -return x_11; +lean_dec(x_2); +x_11 = lean_box(0); +x_12 = lean_apply_1(x_6, x_11); +return x_12; +} +case 3: +{ +lean_object* x_13; lean_object* x_14; +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +x_13 = lean_box(0); +x_14 = lean_apply_1(x_2, x_13); +return x_14; } default: { -lean_object* x_12; lean_object* x_13; +lean_object* x_15; lean_object* x_16; +lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_2); -x_12 = lean_box(0); -x_13 = lean_apply_1(x_3, x_12); -return x_13; +x_15 = lean_box(0); +x_16 = lean_apply_1(x_3, x_15); +return x_16; } } } @@ -3368,63 +3455,78 @@ lean_object* l_Lean_Meta_Simp_rewrite_getRHS_match__1(lean_object* x_1) { _start: { lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l_Lean_Meta_Simp_rewrite_getRHS_match__1___rarg___boxed), 5, 0); +x_2 = lean_alloc_closure((void*)(l_Lean_Meta_Simp_rewrite_getRHS_match__1___rarg___boxed), 6, 0); return x_2; } } -lean_object* l_Lean_Meta_Simp_rewrite_getRHS_match__1___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { +lean_object* l_Lean_Meta_Simp_rewrite_getRHS_match__1___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { _start: { -uint8_t x_6; lean_object* x_7; -x_6 = lean_unbox(x_1); +uint8_t x_7; lean_object* x_8; +x_7 = lean_unbox(x_1); lean_dec(x_1); -x_7 = l_Lean_Meta_Simp_rewrite_getRHS_match__1___rarg(x_6, x_2, x_3, x_4, x_5); -return x_7; +x_8 = l_Lean_Meta_Simp_rewrite_getRHS_match__1___rarg(x_7, x_2, x_3, x_4, x_5, x_6); +return x_8; } } -lean_object* l_Lean_Meta_Simp_rewrite_finalizeProof_match__1___rarg(uint8_t x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { +lean_object* l_Lean_Meta_Simp_rewrite_finalizeProof_match__1___rarg(uint8_t x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { _start: { switch (x_1) { case 0: { -lean_object* x_6; lean_object* x_7; +lean_object* x_7; lean_object* x_8; +lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_3); -x_6 = lean_box(0); -x_7 = lean_apply_1(x_2, x_6); -return x_7; +x_7 = lean_box(0); +x_8 = lean_apply_1(x_2, x_7); +return x_8; } case 1: { -lean_object* x_8; lean_object* x_9; +lean_object* x_9; lean_object* x_10; +lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_2); -x_8 = lean_box(0); -x_9 = lean_apply_1(x_3, x_8); -return x_9; +x_9 = lean_box(0); +x_10 = lean_apply_1(x_3, x_9); +return x_10; } case 2: { -lean_object* x_10; lean_object* x_11; +lean_object* x_11; lean_object* x_12; lean_dec(x_5); -lean_dec(x_3); -lean_dec(x_2); -x_10 = lean_box(0); -x_11 = lean_apply_1(x_4, x_10); -return x_11; -} -default: -{ -lean_object* x_12; lean_object* x_13; lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); -x_12 = lean_box(0); -x_13 = lean_apply_1(x_5, x_12); -return x_13; +x_11 = lean_box(0); +x_12 = lean_apply_1(x_6, x_11); +return x_12; +} +case 3: +{ +lean_object* x_13; lean_object* x_14; +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_3); +lean_dec(x_2); +x_13 = lean_box(0); +x_14 = lean_apply_1(x_4, x_13); +return x_14; +} +default: +{ +lean_object* x_15; lean_object* x_16; +lean_dec(x_6); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +x_15 = lean_box(0); +x_16 = lean_apply_1(x_5, x_15); +return x_16; } } } @@ -3433,18 +3535,18 @@ lean_object* l_Lean_Meta_Simp_rewrite_finalizeProof_match__1(lean_object* x_1) { _start: { lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l_Lean_Meta_Simp_rewrite_finalizeProof_match__1___rarg___boxed), 5, 0); +x_2 = lean_alloc_closure((void*)(l_Lean_Meta_Simp_rewrite_finalizeProof_match__1___rarg___boxed), 6, 0); return x_2; } } -lean_object* l_Lean_Meta_Simp_rewrite_finalizeProof_match__1___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { +lean_object* l_Lean_Meta_Simp_rewrite_finalizeProof_match__1___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { _start: { -uint8_t x_6; lean_object* x_7; -x_6 = lean_unbox(x_1); +uint8_t x_7; lean_object* x_8; +x_7 = lean_unbox(x_1); lean_dec(x_1); -x_7 = l_Lean_Meta_Simp_rewrite_finalizeProof_match__1___rarg(x_6, x_2, x_3, x_4, x_5); -return x_7; +x_8 = l_Lean_Meta_Simp_rewrite_finalizeProof_match__1___rarg(x_7, x_2, x_3, x_4, x_5, x_6); +return x_8; } } lean_object* l_Lean_Meta_Simp_rewrite_tryLemma_x3f_match__1___rarg(lean_object* x_1, lean_object* x_2) { @@ -3542,34 +3644,57 @@ x_8 = lean_box(x_1); switch (lean_obj_tag(x_8)) { case 2: { -lean_object* x_9; -x_9 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_9, 0, x_2); -lean_ctor_set(x_9, 1, x_7); -return x_9; +lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; +x_9 = l_Lean_Expr_appFn_x21(x_2); +x_10 = l_Lean_Expr_appArg_x21(x_9); +lean_dec(x_9); +x_11 = l_Lean_Expr_appArg_x21(x_2); +lean_dec(x_2); +x_12 = l_Lean_Meta_mkEq(x_10, x_11, x_3, x_4, x_5, x_6, x_7); +return x_12; } case 3: { -lean_object* x_10; lean_object* x_11; -x_10 = l_Lean_Expr_appArg_x21(x_2); +lean_object* x_13; +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +x_13 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_13, 0, x_2); +lean_ctor_set(x_13, 1, x_7); +return x_13; +} +case 4: +{ +lean_object* x_14; lean_object* x_15; +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +x_14 = l_Lean_Expr_appArg_x21(x_2); lean_dec(x_2); -x_11 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_11, 0, x_10); -lean_ctor_set(x_11, 1, x_7); -return x_11; +x_15 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_15, 0, x_14); +lean_ctor_set(x_15, 1, x_7); +return x_15; } default: { -lean_object* x_12; lean_object* x_13; lean_object* x_14; +lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_dec(x_8); -x_12 = l_Lean_Expr_appFn_x21(x_2); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +x_16 = l_Lean_Expr_appFn_x21(x_2); lean_dec(x_2); -x_13 = l_Lean_Expr_appArg_x21(x_12); -lean_dec(x_12); -x_14 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_14, 0, x_13); -lean_ctor_set(x_14, 1, x_7); -return x_14; +x_17 = l_Lean_Expr_appArg_x21(x_16); +lean_dec(x_16); +x_18 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_18, 0, x_17); +lean_ctor_set(x_18, 1, x_7); +return x_18; } } } @@ -3581,29 +3706,25 @@ uint8_t x_8; lean_object* x_9; x_8 = lean_unbox(x_1); lean_dec(x_1); x_9 = l_Lean_Meta_Simp_rewrite_getLHS(x_8, x_2, x_3, x_4, x_5, x_6, x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); return x_9; } } static lean_object* _init_l_Lean_Meta_Simp_rewrite_getRHS___closed__1() { _start: { -lean_object* x_1; -x_1 = lean_mk_string("True"); -return x_1; +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l___private_Lean_MonadEnv_0__Lean_supportedRecursors___closed__5; +x_3 = l_Lean_mkConst(x_2, x_1); +return x_3; } } static lean_object* _init_l_Lean_Meta_Simp_rewrite_getRHS___closed__2() { _start: { -lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = lean_box(0); -x_2 = l_Lean_Meta_Simp_rewrite_getRHS___closed__1; -x_3 = lean_name_mk_string(x_1, x_2); -return x_3; +lean_object* x_1; +x_1 = lean_mk_string("True"); +return x_1; } } static lean_object* _init_l_Lean_Meta_Simp_rewrite_getRHS___closed__3() { @@ -3612,7 +3733,7 @@ _start: lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = lean_box(0); x_2 = l_Lean_Meta_Simp_rewrite_getRHS___closed__2; -x_3 = l_Lean_mkConst(x_2, x_1); +x_3 = lean_name_mk_string(x_1, x_2); return x_3; } } @@ -3621,7 +3742,7 @@ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = lean_box(0); -x_2 = l___private_Lean_MonadEnv_0__Lean_supportedRecursors___closed__5; +x_2 = l_Lean_Meta_Simp_rewrite_getRHS___closed__3; x_3 = l_Lean_mkConst(x_2, x_1); return x_3; } @@ -3635,7 +3756,7 @@ switch (lean_obj_tag(x_8)) { case 2: { lean_object* x_9; lean_object* x_10; -x_9 = l_Lean_Meta_Simp_rewrite_getRHS___closed__3; +x_9 = l_Lean_Meta_Simp_rewrite_getRHS___closed__1; x_10 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_10, 0, x_9); lean_ctor_set(x_10, 1, x_7); @@ -3650,16 +3771,25 @@ lean_ctor_set(x_12, 0, x_11); lean_ctor_set(x_12, 1, x_7); return x_12; } -default: +case 4: { lean_object* x_13; lean_object* x_14; -lean_dec(x_8); -x_13 = l_Lean_Expr_appArg_x21(x_2); +x_13 = l_Lean_Meta_Simp_rewrite_getRHS___closed__1; x_14 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_14, 0, x_13); lean_ctor_set(x_14, 1, x_7); return x_14; } +default: +{ +lean_object* x_15; lean_object* x_16; +lean_dec(x_8); +x_15 = l_Lean_Expr_appArg_x21(x_2); +x_16 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_16, 0, x_15); +lean_ctor_set(x_16, 1, x_7); +return x_16; +} } } } @@ -3681,36 +3811,39 @@ return x_9; lean_object* l_Lean_Meta_Simp_rewrite_finalizeProof(uint8_t x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { _start: { -switch (x_1) { +lean_object* x_8; +x_8 = lean_box(x_1); +switch (lean_obj_tag(x_8)) { case 0: { -lean_object* x_8; +lean_object* x_9; lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_3); -x_8 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_8, 0, x_2); -lean_ctor_set(x_8, 1, x_7); -return x_8; +x_9 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_9, 0, x_2); +lean_ctor_set(x_9, 1, x_7); +return x_9; } case 1: { -lean_object* x_9; -x_9 = l_Lean_Meta_mkPropExt(x_2, x_3, x_4, x_5, x_6, x_7); -return x_9; -} -case 2: -{ lean_object* x_10; -x_10 = l_Lean_Meta_mkEqTrue(x_2, x_3, x_4, x_5, x_6, x_7); +x_10 = l_Lean_Meta_mkPropExt(x_2, x_3, x_4, x_5, x_6, x_7); return x_10; } +case 3: +{ +lean_object* x_11; +x_11 = l_Lean_Meta_mkEqTrue(x_2, x_3, x_4, x_5, x_6, x_7); +return x_11; +} default: { -lean_object* x_11; -x_11 = l_Lean_Meta_mkEqFalse(x_2, x_3, x_4, x_5, x_6, x_7); -return x_11; +lean_object* x_12; +lean_dec(x_8); +x_12 = l_Lean_Meta_mkEqFalse(x_2, x_3, x_4, x_5, x_6, x_7); +return x_12; } } } @@ -4483,15 +4616,22 @@ lean_inc(x_7); x_25 = l_Lean_Meta_instantiateMVars(x_24, x_7, x_8, x_9, x_10, x_21); if (lean_obj_tag(x_25) == 0) { -lean_object* x_26; lean_object* x_27; uint8_t x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; +lean_object* x_26; lean_object* x_27; uint8_t x_28; lean_object* x_29; x_26 = lean_ctor_get(x_25, 0); lean_inc(x_26); x_27 = lean_ctor_get(x_25, 1); lean_inc(x_27); lean_dec(x_25); x_28 = lean_ctor_get_uint8(x_1, sizeof(void*)*4 + 2); +lean_inc(x_10); +lean_inc(x_9); +lean_inc(x_8); +lean_inc(x_7); lean_inc(x_26); x_29 = l_Lean_Meta_Simp_rewrite_getLHS(x_28, x_26, x_7, x_8, x_9, x_10, x_27); +if (lean_obj_tag(x_29) == 0) +{ +lean_object* x_30; lean_object* x_31; lean_object* x_32; x_30 = lean_ctor_get(x_29, 0); lean_inc(x_30); x_31 = lean_ctor_get(x_29, 1); @@ -4800,6 +4940,7 @@ return x_91; else { uint8_t x_92; +lean_dec(x_26); lean_dec(x_23); lean_dec(x_22); lean_dec(x_10); @@ -4812,19 +4953,19 @@ lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); -x_92 = !lean_is_exclusive(x_25); +x_92 = !lean_is_exclusive(x_29); if (x_92 == 0) { -return x_25; +return x_29; } else { lean_object* x_93; lean_object* x_94; lean_object* x_95; -x_93 = lean_ctor_get(x_25, 0); -x_94 = lean_ctor_get(x_25, 1); +x_93 = lean_ctor_get(x_29, 0); +x_94 = lean_ctor_get(x_29, 1); lean_inc(x_94); lean_inc(x_93); -lean_dec(x_25); +lean_dec(x_29); x_95 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_95, 0, x_93); lean_ctor_set(x_95, 1, x_94); @@ -4835,6 +4976,8 @@ return x_95; else { uint8_t x_96; +lean_dec(x_23); +lean_dec(x_22); lean_dec(x_10); lean_dec(x_9); lean_dec(x_8); @@ -4845,19 +4988,19 @@ lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); -x_96 = !lean_is_exclusive(x_18); +x_96 = !lean_is_exclusive(x_25); if (x_96 == 0) { -return x_18; +return x_25; } else { lean_object* x_97; lean_object* x_98; lean_object* x_99; -x_97 = lean_ctor_get(x_18, 0); -x_98 = lean_ctor_get(x_18, 1); +x_97 = lean_ctor_get(x_25, 0); +x_98 = lean_ctor_get(x_25, 1); lean_inc(x_98); lean_inc(x_97); -lean_dec(x_18); +lean_dec(x_25); x_99 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_99, 0, x_97); lean_ctor_set(x_99, 1, x_98); @@ -4878,23 +5021,56 @@ lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); -x_100 = !lean_is_exclusive(x_12); +x_100 = !lean_is_exclusive(x_18); if (x_100 == 0) { +return x_18; +} +else +{ +lean_object* x_101; lean_object* x_102; lean_object* x_103; +x_101 = lean_ctor_get(x_18, 0); +x_102 = lean_ctor_get(x_18, 1); +lean_inc(x_102); +lean_inc(x_101); +lean_dec(x_18); +x_103 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_103, 0, x_101); +lean_ctor_set(x_103, 1, x_102); +return x_103; +} +} +} +else +{ +uint8_t x_104; +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_104 = !lean_is_exclusive(x_12); +if (x_104 == 0) +{ return x_12; } else { -lean_object* x_101; lean_object* x_102; lean_object* x_103; -x_101 = lean_ctor_get(x_12, 0); -x_102 = lean_ctor_get(x_12, 1); -lean_inc(x_102); -lean_inc(x_101); +lean_object* x_105; lean_object* x_106; lean_object* x_107; +x_105 = lean_ctor_get(x_12, 0); +x_106 = lean_ctor_get(x_12, 1); +lean_inc(x_106); +lean_inc(x_105); lean_dec(x_12); -x_103 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_103, 0, x_101); -lean_ctor_set(x_103, 1, x_102); -return x_103; +x_107 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_107, 0, x_105); +lean_ctor_set(x_107, 1, x_106); +return x_107; } } } @@ -5626,7 +5802,3306 @@ lean_dec(x_4); return x_12; } } -static lean_object* _init_l_Lean_Meta_Simp_preDefault___closed__1() { +lean_object* l_Lean_Meta_Simp_rewriteCtorEq_x3f_match__1___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +if (lean_obj_tag(x_1) == 0) +{ +lean_object* x_5; +lean_dec(x_3); +x_5 = lean_apply_2(x_4, x_1, x_2); +return x_5; +} +else +{ +lean_object* x_6; +x_6 = lean_ctor_get(x_1, 0); +lean_inc(x_6); +if (lean_obj_tag(x_2) == 0) +{ +lean_object* x_7; +lean_dec(x_6); +lean_dec(x_3); +x_7 = lean_apply_2(x_4, x_1, x_2); +return x_7; +} +else +{ +lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; +lean_dec(x_4); +lean_dec(x_1); +x_8 = lean_ctor_get(x_2, 0); +lean_inc(x_8); +lean_dec(x_2); +x_9 = lean_ctor_get(x_6, 0); +lean_inc(x_9); +x_10 = lean_ctor_get(x_6, 1); +lean_inc(x_10); +lean_dec(x_6); +x_11 = lean_ctor_get(x_8, 0); +lean_inc(x_11); +x_12 = lean_ctor_get(x_8, 1); +lean_inc(x_12); +lean_dec(x_8); +x_13 = lean_apply_4(x_3, x_9, x_10, x_11, x_12); +return x_13; +} +} +} +} +lean_object* l_Lean_Meta_Simp_rewriteCtorEq_x3f_match__1(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_Lean_Meta_Simp_rewriteCtorEq_x3f_match__1___rarg), 4, 0); +return x_2; +} +} +lean_object* l_Lean_Meta_Simp_rewriteCtorEq_x3f_match__2___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +if (lean_obj_tag(x_1) == 0) +{ +lean_object* x_4; lean_object* x_5; +lean_dec(x_3); +x_4 = lean_box(0); +x_5 = lean_apply_1(x_2, x_4); +return x_5; +} +else +{ +lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; +lean_dec(x_2); +x_6 = lean_ctor_get(x_1, 0); +lean_inc(x_6); +lean_dec(x_1); +x_7 = lean_ctor_get(x_6, 1); +lean_inc(x_7); +x_8 = lean_ctor_get(x_6, 0); +lean_inc(x_8); +lean_dec(x_6); +x_9 = lean_ctor_get(x_7, 0); +lean_inc(x_9); +x_10 = lean_ctor_get(x_7, 1); +lean_inc(x_10); +lean_dec(x_7); +x_11 = lean_apply_3(x_3, x_8, x_9, x_10); +return x_11; +} +} +} +lean_object* l_Lean_Meta_Simp_rewriteCtorEq_x3f_match__2(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_Lean_Meta_Simp_rewriteCtorEq_x3f_match__2___rarg), 3, 0); +return x_2; +} +} +lean_object* l_Lean_Meta_Simp_rewriteCtorEq_x3f___lambda__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { +_start: +{ +lean_object* x_7; lean_object* x_8; +x_7 = l_Lean_Meta_Simp_rewrite_getRHS___closed__1; +lean_inc(x_5); +lean_inc(x_4); +lean_inc(x_3); +lean_inc(x_2); +lean_inc(x_1); +x_8 = l_Lean_Meta_mkNoConfusion(x_7, x_1, x_2, x_3, x_4, x_5, x_6); +if (lean_obj_tag(x_8) == 0) +{ +lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; +x_9 = lean_ctor_get(x_8, 0); +lean_inc(x_9); +x_10 = lean_ctor_get(x_8, 1); +lean_inc(x_10); +lean_dec(x_8); +x_11 = l_Lean_mkOptionalNode___closed__2; +x_12 = lean_array_push(x_11, x_1); +lean_inc(x_2); +x_13 = l_Lean_Meta_mkLambdaFVars(x_12, x_9, x_2, x_3, x_4, x_5, x_10); +if (lean_obj_tag(x_13) == 0) +{ +lean_object* x_14; lean_object* x_15; lean_object* x_16; +x_14 = lean_ctor_get(x_13, 0); +lean_inc(x_14); +x_15 = lean_ctor_get(x_13, 1); +lean_inc(x_15); +lean_dec(x_13); +x_16 = l_Lean_Meta_mkEqFalse_x27(x_14, x_2, x_3, x_4, x_5, x_15); +if (lean_obj_tag(x_16) == 0) +{ +uint8_t x_17; +x_17 = !lean_is_exclusive(x_16); +if (x_17 == 0) +{ +lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; +x_18 = lean_ctor_get(x_16, 0); +x_19 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_19, 0, x_18); +x_20 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_20, 0, x_7); +lean_ctor_set(x_20, 1, x_19); +x_21 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_21, 0, x_20); +lean_ctor_set(x_16, 0, x_21); +return x_16; +} +else +{ +lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; +x_22 = lean_ctor_get(x_16, 0); +x_23 = lean_ctor_get(x_16, 1); +lean_inc(x_23); +lean_inc(x_22); +lean_dec(x_16); +x_24 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_24, 0, x_22); +x_25 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_25, 0, x_7); +lean_ctor_set(x_25, 1, x_24); +x_26 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_26, 0, x_25); +x_27 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_27, 0, x_26); +lean_ctor_set(x_27, 1, x_23); +return x_27; +} +} +else +{ +uint8_t x_28; +x_28 = !lean_is_exclusive(x_16); +if (x_28 == 0) +{ +return x_16; +} +else +{ +lean_object* x_29; lean_object* x_30; lean_object* x_31; +x_29 = lean_ctor_get(x_16, 0); +x_30 = lean_ctor_get(x_16, 1); +lean_inc(x_30); +lean_inc(x_29); +lean_dec(x_16); +x_31 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_31, 0, x_29); +lean_ctor_set(x_31, 1, x_30); +return x_31; +} +} +} +else +{ +uint8_t x_32; +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +x_32 = !lean_is_exclusive(x_13); +if (x_32 == 0) +{ +return x_13; +} +else +{ +lean_object* x_33; lean_object* x_34; lean_object* x_35; +x_33 = lean_ctor_get(x_13, 0); +x_34 = lean_ctor_get(x_13, 1); +lean_inc(x_34); +lean_inc(x_33); +lean_dec(x_13); +x_35 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_35, 0, x_33); +lean_ctor_set(x_35, 1, x_34); +return x_35; +} +} +} +else +{ +uint8_t x_36; +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_36 = !lean_is_exclusive(x_8); +if (x_36 == 0) +{ +return x_8; +} +else +{ +lean_object* x_37; lean_object* x_38; lean_object* x_39; +x_37 = lean_ctor_get(x_8, 0); +x_38 = lean_ctor_get(x_8, 1); +lean_inc(x_38); +lean_inc(x_37); +lean_dec(x_8); +x_39 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_39, 0, x_37); +lean_ctor_set(x_39, 1, x_38); +return x_39; +} +} +} +} +static lean_object* _init_l_Lean_Meta_Simp_rewriteCtorEq_x3f___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("h"); +return x_1; +} +} +static lean_object* _init_l_Lean_Meta_Simp_rewriteCtorEq_x3f___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l_Lean_Meta_Simp_rewriteCtorEq_x3f___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +static lean_object* _init_l_Lean_Meta_Simp_rewriteCtorEq_x3f___closed__3() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_Meta_Simp_rewriteCtorEq_x3f___lambda__1), 6, 0); +return x_1; +} +} +lean_object* l_Lean_Meta_Simp_rewriteCtorEq_x3f(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { +_start: +{ +lean_object* x_7; lean_object* x_8; uint8_t x_9; +x_7 = l_myMacro____x40_Init_Notation___hyg_6045____closed__4; +x_8 = lean_unsigned_to_nat(3u); +x_9 = l_Lean_Expr_isAppOfArity(x_1, x_7, x_8); +if (x_9 == 0) +{ +lean_object* x_10; lean_object* x_11; +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_10 = lean_box(0); +x_11 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_11, 0, x_10); +lean_ctor_set(x_11, 1, x_6); +return x_11; +} +else +{ +lean_object* x_12; lean_object* x_13; lean_object* x_14; uint8_t x_15; +x_12 = l_Lean_Expr_appFn_x21(x_1); +x_13 = l_Lean_Expr_appArg_x21(x_12); +lean_dec(x_12); +x_14 = l_Lean_Expr_appArg_x21(x_1); +x_15 = !lean_is_exclusive(x_2); +if (x_15 == 0) +{ +lean_object* x_16; uint8_t x_17; +x_16 = lean_ctor_get(x_2, 0); +x_17 = !lean_is_exclusive(x_16); +if (x_17 == 0) +{ +uint8_t x_18; lean_object* x_19; +x_18 = 3; +lean_ctor_set_uint8(x_16, 5, x_18); +lean_inc(x_5); +lean_inc(x_4); +lean_inc(x_3); +lean_inc(x_2); +x_19 = l_Lean_Meta_whnf(x_13, x_2, x_3, x_4, x_5, x_6); +if (lean_obj_tag(x_19) == 0) +{ +lean_object* x_20; lean_object* x_21; lean_object* x_22; +x_20 = lean_ctor_get(x_19, 0); +lean_inc(x_20); +x_21 = lean_ctor_get(x_19, 1); +lean_inc(x_21); +lean_dec(x_19); +lean_inc(x_5); +lean_inc(x_4); +lean_inc(x_3); +lean_inc(x_2); +x_22 = l_Lean_Meta_whnf(x_14, x_2, x_3, x_4, x_5, x_21); +if (lean_obj_tag(x_22) == 0) +{ +lean_object* x_23; lean_object* x_24; lean_object* x_25; uint8_t x_26; +x_23 = lean_ctor_get(x_22, 0); +lean_inc(x_23); +x_24 = lean_ctor_get(x_22, 1); +lean_inc(x_24); +lean_dec(x_22); +x_25 = lean_st_ref_get(x_5, x_24); +x_26 = !lean_is_exclusive(x_25); +if (x_26 == 0) +{ +lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; +x_27 = lean_ctor_get(x_25, 0); +x_28 = lean_ctor_get(x_25, 1); +x_29 = lean_ctor_get(x_27, 0); +lean_inc(x_29); +lean_dec(x_27); +lean_inc(x_29); +x_30 = l_Lean_Expr_constructorApp_x3f(x_29, x_20); +if (lean_obj_tag(x_30) == 0) +{ +lean_object* x_31; +lean_dec(x_29); +lean_dec(x_23); +lean_dec(x_2); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_1); +x_31 = lean_box(0); +lean_ctor_set(x_25, 0, x_31); +return x_25; +} +else +{ +lean_object* x_32; lean_object* x_33; +x_32 = lean_ctor_get(x_30, 0); +lean_inc(x_32); +lean_dec(x_30); +x_33 = l_Lean_Expr_constructorApp_x3f(x_29, x_23); +if (lean_obj_tag(x_33) == 0) +{ +lean_object* x_34; +lean_dec(x_32); +lean_dec(x_2); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_1); +x_34 = lean_box(0); +lean_ctor_set(x_25, 0, x_34); +return x_25; +} +else +{ +lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; uint8_t x_42; +x_35 = lean_ctor_get(x_33, 0); +lean_inc(x_35); +lean_dec(x_33); +x_36 = lean_ctor_get(x_32, 0); +lean_inc(x_36); +lean_dec(x_32); +x_37 = lean_ctor_get(x_35, 0); +lean_inc(x_37); +lean_dec(x_35); +x_38 = lean_ctor_get(x_36, 0); +lean_inc(x_38); +lean_dec(x_36); +x_39 = lean_ctor_get(x_38, 0); +lean_inc(x_39); +lean_dec(x_38); +x_40 = lean_ctor_get(x_37, 0); +lean_inc(x_40); +lean_dec(x_37); +x_41 = lean_ctor_get(x_40, 0); +lean_inc(x_41); +lean_dec(x_40); +x_42 = lean_name_eq(x_39, x_41); +lean_dec(x_41); +lean_dec(x_39); +if (x_42 == 0) +{ +lean_object* x_43; uint8_t x_44; lean_object* x_45; lean_object* x_46; +lean_free_object(x_25); +x_43 = l_Lean_Meta_Simp_rewriteCtorEq_x3f___closed__2; +x_44 = 0; +x_45 = l_Lean_Meta_Simp_rewriteCtorEq_x3f___closed__3; +x_46 = l_Lean_Meta_withLocalDecl___at___private_Lean_Meta_Tactic_Simp_SimpLemmas_0__Lean_Meta_isPerm___spec__1___rarg(x_43, x_44, x_1, x_45, x_2, x_3, x_4, x_5, x_28); +if (lean_obj_tag(x_46) == 0) +{ +uint8_t x_47; +x_47 = !lean_is_exclusive(x_46); +if (x_47 == 0) +{ +return x_46; +} +else +{ +lean_object* x_48; lean_object* x_49; lean_object* x_50; +x_48 = lean_ctor_get(x_46, 0); +x_49 = lean_ctor_get(x_46, 1); +lean_inc(x_49); +lean_inc(x_48); +lean_dec(x_46); +x_50 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_50, 0, x_48); +lean_ctor_set(x_50, 1, x_49); +return x_50; +} +} +else +{ +uint8_t x_51; +x_51 = !lean_is_exclusive(x_46); +if (x_51 == 0) +{ +return x_46; +} +else +{ +lean_object* x_52; lean_object* x_53; lean_object* x_54; +x_52 = lean_ctor_get(x_46, 0); +x_53 = lean_ctor_get(x_46, 1); +lean_inc(x_53); +lean_inc(x_52); +lean_dec(x_46); +x_54 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_54, 0, x_52); +lean_ctor_set(x_54, 1, x_53); +return x_54; +} +} +} +else +{ +lean_object* x_55; +lean_dec(x_2); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_1); +x_55 = lean_box(0); +lean_ctor_set(x_25, 0, x_55); +return x_25; +} +} +} +} +else +{ +lean_object* x_56; lean_object* x_57; lean_object* x_58; lean_object* x_59; +x_56 = lean_ctor_get(x_25, 0); +x_57 = lean_ctor_get(x_25, 1); +lean_inc(x_57); +lean_inc(x_56); +lean_dec(x_25); +x_58 = lean_ctor_get(x_56, 0); +lean_inc(x_58); +lean_dec(x_56); +lean_inc(x_58); +x_59 = l_Lean_Expr_constructorApp_x3f(x_58, x_20); +if (lean_obj_tag(x_59) == 0) +{ +lean_object* x_60; lean_object* x_61; +lean_dec(x_58); +lean_dec(x_23); +lean_dec(x_2); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_1); +x_60 = lean_box(0); +x_61 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_61, 0, x_60); +lean_ctor_set(x_61, 1, x_57); +return x_61; +} +else +{ +lean_object* x_62; lean_object* x_63; +x_62 = lean_ctor_get(x_59, 0); +lean_inc(x_62); +lean_dec(x_59); +x_63 = l_Lean_Expr_constructorApp_x3f(x_58, x_23); +if (lean_obj_tag(x_63) == 0) +{ +lean_object* x_64; lean_object* x_65; +lean_dec(x_62); +lean_dec(x_2); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_1); +x_64 = lean_box(0); +x_65 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_65, 0, x_64); +lean_ctor_set(x_65, 1, x_57); +return x_65; +} +else +{ +lean_object* x_66; lean_object* x_67; lean_object* x_68; lean_object* x_69; lean_object* x_70; lean_object* x_71; lean_object* x_72; uint8_t x_73; +x_66 = lean_ctor_get(x_63, 0); +lean_inc(x_66); +lean_dec(x_63); +x_67 = lean_ctor_get(x_62, 0); +lean_inc(x_67); +lean_dec(x_62); +x_68 = lean_ctor_get(x_66, 0); +lean_inc(x_68); +lean_dec(x_66); +x_69 = lean_ctor_get(x_67, 0); +lean_inc(x_69); +lean_dec(x_67); +x_70 = lean_ctor_get(x_69, 0); +lean_inc(x_70); +lean_dec(x_69); +x_71 = lean_ctor_get(x_68, 0); +lean_inc(x_71); +lean_dec(x_68); +x_72 = lean_ctor_get(x_71, 0); +lean_inc(x_72); +lean_dec(x_71); +x_73 = lean_name_eq(x_70, x_72); +lean_dec(x_72); +lean_dec(x_70); +if (x_73 == 0) +{ +lean_object* x_74; uint8_t x_75; lean_object* x_76; lean_object* x_77; +x_74 = l_Lean_Meta_Simp_rewriteCtorEq_x3f___closed__2; +x_75 = 0; +x_76 = l_Lean_Meta_Simp_rewriteCtorEq_x3f___closed__3; +x_77 = l_Lean_Meta_withLocalDecl___at___private_Lean_Meta_Tactic_Simp_SimpLemmas_0__Lean_Meta_isPerm___spec__1___rarg(x_74, x_75, x_1, x_76, x_2, x_3, x_4, x_5, x_57); +if (lean_obj_tag(x_77) == 0) +{ +lean_object* x_78; lean_object* x_79; lean_object* x_80; lean_object* x_81; +x_78 = lean_ctor_get(x_77, 0); +lean_inc(x_78); +x_79 = lean_ctor_get(x_77, 1); +lean_inc(x_79); +if (lean_is_exclusive(x_77)) { + lean_ctor_release(x_77, 0); + lean_ctor_release(x_77, 1); + x_80 = x_77; +} else { + lean_dec_ref(x_77); + x_80 = lean_box(0); +} +if (lean_is_scalar(x_80)) { + x_81 = lean_alloc_ctor(0, 2, 0); +} else { + x_81 = x_80; +} +lean_ctor_set(x_81, 0, x_78); +lean_ctor_set(x_81, 1, x_79); +return x_81; +} +else +{ +lean_object* x_82; lean_object* x_83; lean_object* x_84; lean_object* x_85; +x_82 = lean_ctor_get(x_77, 0); +lean_inc(x_82); +x_83 = lean_ctor_get(x_77, 1); +lean_inc(x_83); +if (lean_is_exclusive(x_77)) { + lean_ctor_release(x_77, 0); + lean_ctor_release(x_77, 1); + x_84 = x_77; +} else { + lean_dec_ref(x_77); + x_84 = lean_box(0); +} +if (lean_is_scalar(x_84)) { + x_85 = lean_alloc_ctor(1, 2, 0); +} else { + x_85 = x_84; +} +lean_ctor_set(x_85, 0, x_82); +lean_ctor_set(x_85, 1, x_83); +return x_85; +} +} +else +{ +lean_object* x_86; lean_object* x_87; +lean_dec(x_2); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_1); +x_86 = lean_box(0); +x_87 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_87, 0, x_86); +lean_ctor_set(x_87, 1, x_57); +return x_87; +} +} +} +} +} +else +{ +uint8_t x_88; +lean_dec(x_20); +lean_dec(x_2); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_1); +x_88 = !lean_is_exclusive(x_22); +if (x_88 == 0) +{ +return x_22; +} +else +{ +lean_object* x_89; lean_object* x_90; lean_object* x_91; +x_89 = lean_ctor_get(x_22, 0); +x_90 = lean_ctor_get(x_22, 1); +lean_inc(x_90); +lean_inc(x_89); +lean_dec(x_22); +x_91 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_91, 0, x_89); +lean_ctor_set(x_91, 1, x_90); +return x_91; +} +} +} +else +{ +uint8_t x_92; +lean_dec(x_2); +lean_dec(x_14); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_1); +x_92 = !lean_is_exclusive(x_19); +if (x_92 == 0) +{ +return x_19; +} +else +{ +lean_object* x_93; lean_object* x_94; lean_object* x_95; +x_93 = lean_ctor_get(x_19, 0); +x_94 = lean_ctor_get(x_19, 1); +lean_inc(x_94); +lean_inc(x_93); +lean_dec(x_19); +x_95 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_95, 0, x_93); +lean_ctor_set(x_95, 1, x_94); +return x_95; +} +} +} +else +{ +uint8_t x_96; uint8_t x_97; uint8_t x_98; uint8_t x_99; uint8_t x_100; uint8_t x_101; uint8_t x_102; uint8_t x_103; uint8_t x_104; lean_object* x_105; lean_object* x_106; +x_96 = lean_ctor_get_uint8(x_16, 0); +x_97 = lean_ctor_get_uint8(x_16, 1); +x_98 = lean_ctor_get_uint8(x_16, 2); +x_99 = lean_ctor_get_uint8(x_16, 3); +x_100 = lean_ctor_get_uint8(x_16, 4); +x_101 = lean_ctor_get_uint8(x_16, 6); +x_102 = lean_ctor_get_uint8(x_16, 7); +x_103 = lean_ctor_get_uint8(x_16, 8); +lean_dec(x_16); +x_104 = 3; +x_105 = lean_alloc_ctor(0, 0, 9); +lean_ctor_set_uint8(x_105, 0, x_96); +lean_ctor_set_uint8(x_105, 1, x_97); +lean_ctor_set_uint8(x_105, 2, x_98); +lean_ctor_set_uint8(x_105, 3, x_99); +lean_ctor_set_uint8(x_105, 4, x_100); +lean_ctor_set_uint8(x_105, 5, x_104); +lean_ctor_set_uint8(x_105, 6, x_101); +lean_ctor_set_uint8(x_105, 7, x_102); +lean_ctor_set_uint8(x_105, 8, x_103); +lean_ctor_set(x_2, 0, x_105); +lean_inc(x_5); +lean_inc(x_4); +lean_inc(x_3); +lean_inc(x_2); +x_106 = l_Lean_Meta_whnf(x_13, x_2, x_3, x_4, x_5, x_6); +if (lean_obj_tag(x_106) == 0) +{ +lean_object* x_107; lean_object* x_108; lean_object* x_109; +x_107 = lean_ctor_get(x_106, 0); +lean_inc(x_107); +x_108 = lean_ctor_get(x_106, 1); +lean_inc(x_108); +lean_dec(x_106); +lean_inc(x_5); +lean_inc(x_4); +lean_inc(x_3); +lean_inc(x_2); +x_109 = l_Lean_Meta_whnf(x_14, x_2, x_3, x_4, x_5, x_108); +if (lean_obj_tag(x_109) == 0) +{ +lean_object* x_110; lean_object* x_111; lean_object* x_112; lean_object* x_113; lean_object* x_114; lean_object* x_115; lean_object* x_116; lean_object* x_117; +x_110 = lean_ctor_get(x_109, 0); +lean_inc(x_110); +x_111 = lean_ctor_get(x_109, 1); +lean_inc(x_111); +lean_dec(x_109); +x_112 = lean_st_ref_get(x_5, x_111); +x_113 = lean_ctor_get(x_112, 0); +lean_inc(x_113); +x_114 = lean_ctor_get(x_112, 1); +lean_inc(x_114); +if (lean_is_exclusive(x_112)) { + lean_ctor_release(x_112, 0); + lean_ctor_release(x_112, 1); + x_115 = x_112; +} else { + lean_dec_ref(x_112); + x_115 = lean_box(0); +} +x_116 = lean_ctor_get(x_113, 0); +lean_inc(x_116); +lean_dec(x_113); +lean_inc(x_116); +x_117 = l_Lean_Expr_constructorApp_x3f(x_116, x_107); +if (lean_obj_tag(x_117) == 0) +{ +lean_object* x_118; lean_object* x_119; +lean_dec(x_116); +lean_dec(x_110); +lean_dec(x_2); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_1); +x_118 = lean_box(0); +if (lean_is_scalar(x_115)) { + x_119 = lean_alloc_ctor(0, 2, 0); +} else { + x_119 = x_115; +} +lean_ctor_set(x_119, 0, x_118); +lean_ctor_set(x_119, 1, x_114); +return x_119; +} +else +{ +lean_object* x_120; lean_object* x_121; +x_120 = lean_ctor_get(x_117, 0); +lean_inc(x_120); +lean_dec(x_117); +x_121 = l_Lean_Expr_constructorApp_x3f(x_116, x_110); +if (lean_obj_tag(x_121) == 0) +{ +lean_object* x_122; lean_object* x_123; +lean_dec(x_120); +lean_dec(x_2); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_1); +x_122 = lean_box(0); +if (lean_is_scalar(x_115)) { + x_123 = lean_alloc_ctor(0, 2, 0); +} else { + x_123 = x_115; +} +lean_ctor_set(x_123, 0, x_122); +lean_ctor_set(x_123, 1, x_114); +return x_123; +} +else +{ +lean_object* x_124; lean_object* x_125; lean_object* x_126; lean_object* x_127; lean_object* x_128; lean_object* x_129; lean_object* x_130; uint8_t x_131; +x_124 = lean_ctor_get(x_121, 0); +lean_inc(x_124); +lean_dec(x_121); +x_125 = lean_ctor_get(x_120, 0); +lean_inc(x_125); +lean_dec(x_120); +x_126 = lean_ctor_get(x_124, 0); +lean_inc(x_126); +lean_dec(x_124); +x_127 = lean_ctor_get(x_125, 0); +lean_inc(x_127); +lean_dec(x_125); +x_128 = lean_ctor_get(x_127, 0); +lean_inc(x_128); +lean_dec(x_127); +x_129 = lean_ctor_get(x_126, 0); +lean_inc(x_129); +lean_dec(x_126); +x_130 = lean_ctor_get(x_129, 0); +lean_inc(x_130); +lean_dec(x_129); +x_131 = lean_name_eq(x_128, x_130); +lean_dec(x_130); +lean_dec(x_128); +if (x_131 == 0) +{ +lean_object* x_132; uint8_t x_133; lean_object* x_134; lean_object* x_135; +lean_dec(x_115); +x_132 = l_Lean_Meta_Simp_rewriteCtorEq_x3f___closed__2; +x_133 = 0; +x_134 = l_Lean_Meta_Simp_rewriteCtorEq_x3f___closed__3; +x_135 = l_Lean_Meta_withLocalDecl___at___private_Lean_Meta_Tactic_Simp_SimpLemmas_0__Lean_Meta_isPerm___spec__1___rarg(x_132, x_133, x_1, x_134, x_2, x_3, x_4, x_5, x_114); +if (lean_obj_tag(x_135) == 0) +{ +lean_object* x_136; lean_object* x_137; lean_object* x_138; lean_object* x_139; +x_136 = lean_ctor_get(x_135, 0); +lean_inc(x_136); +x_137 = lean_ctor_get(x_135, 1); +lean_inc(x_137); +if (lean_is_exclusive(x_135)) { + lean_ctor_release(x_135, 0); + lean_ctor_release(x_135, 1); + x_138 = x_135; +} else { + lean_dec_ref(x_135); + x_138 = lean_box(0); +} +if (lean_is_scalar(x_138)) { + x_139 = lean_alloc_ctor(0, 2, 0); +} else { + x_139 = x_138; +} +lean_ctor_set(x_139, 0, x_136); +lean_ctor_set(x_139, 1, x_137); +return x_139; +} +else +{ +lean_object* x_140; lean_object* x_141; lean_object* x_142; lean_object* x_143; +x_140 = lean_ctor_get(x_135, 0); +lean_inc(x_140); +x_141 = lean_ctor_get(x_135, 1); +lean_inc(x_141); +if (lean_is_exclusive(x_135)) { + lean_ctor_release(x_135, 0); + lean_ctor_release(x_135, 1); + x_142 = x_135; +} else { + lean_dec_ref(x_135); + x_142 = lean_box(0); +} +if (lean_is_scalar(x_142)) { + x_143 = lean_alloc_ctor(1, 2, 0); +} else { + x_143 = x_142; +} +lean_ctor_set(x_143, 0, x_140); +lean_ctor_set(x_143, 1, x_141); +return x_143; +} +} +else +{ +lean_object* x_144; lean_object* x_145; +lean_dec(x_2); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_1); +x_144 = lean_box(0); +if (lean_is_scalar(x_115)) { + x_145 = lean_alloc_ctor(0, 2, 0); +} else { + x_145 = x_115; +} +lean_ctor_set(x_145, 0, x_144); +lean_ctor_set(x_145, 1, x_114); +return x_145; +} +} +} +} +else +{ +lean_object* x_146; lean_object* x_147; lean_object* x_148; lean_object* x_149; +lean_dec(x_107); +lean_dec(x_2); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_1); +x_146 = lean_ctor_get(x_109, 0); +lean_inc(x_146); +x_147 = lean_ctor_get(x_109, 1); +lean_inc(x_147); +if (lean_is_exclusive(x_109)) { + lean_ctor_release(x_109, 0); + lean_ctor_release(x_109, 1); + x_148 = x_109; +} else { + lean_dec_ref(x_109); + x_148 = lean_box(0); +} +if (lean_is_scalar(x_148)) { + x_149 = lean_alloc_ctor(1, 2, 0); +} else { + x_149 = x_148; +} +lean_ctor_set(x_149, 0, x_146); +lean_ctor_set(x_149, 1, x_147); +return x_149; +} +} +else +{ +lean_object* x_150; lean_object* x_151; lean_object* x_152; lean_object* x_153; +lean_dec(x_2); +lean_dec(x_14); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_1); +x_150 = lean_ctor_get(x_106, 0); +lean_inc(x_150); +x_151 = lean_ctor_get(x_106, 1); +lean_inc(x_151); +if (lean_is_exclusive(x_106)) { + lean_ctor_release(x_106, 0); + lean_ctor_release(x_106, 1); + x_152 = x_106; +} else { + lean_dec_ref(x_106); + x_152 = lean_box(0); +} +if (lean_is_scalar(x_152)) { + x_153 = lean_alloc_ctor(1, 2, 0); +} else { + x_153 = x_152; +} +lean_ctor_set(x_153, 0, x_150); +lean_ctor_set(x_153, 1, x_151); +return x_153; +} +} +} +else +{ +lean_object* x_154; lean_object* x_155; lean_object* x_156; uint8_t x_157; uint8_t x_158; uint8_t x_159; uint8_t x_160; uint8_t x_161; uint8_t x_162; uint8_t x_163; uint8_t x_164; lean_object* x_165; uint8_t x_166; lean_object* x_167; lean_object* x_168; lean_object* x_169; +x_154 = lean_ctor_get(x_2, 0); +x_155 = lean_ctor_get(x_2, 1); +x_156 = lean_ctor_get(x_2, 2); +lean_inc(x_156); +lean_inc(x_155); +lean_inc(x_154); +lean_dec(x_2); +x_157 = lean_ctor_get_uint8(x_154, 0); +x_158 = lean_ctor_get_uint8(x_154, 1); +x_159 = lean_ctor_get_uint8(x_154, 2); +x_160 = lean_ctor_get_uint8(x_154, 3); +x_161 = lean_ctor_get_uint8(x_154, 4); +x_162 = lean_ctor_get_uint8(x_154, 6); +x_163 = lean_ctor_get_uint8(x_154, 7); +x_164 = lean_ctor_get_uint8(x_154, 8); +if (lean_is_exclusive(x_154)) { + x_165 = x_154; +} else { + lean_dec_ref(x_154); + x_165 = lean_box(0); +} +x_166 = 3; +if (lean_is_scalar(x_165)) { + x_167 = lean_alloc_ctor(0, 0, 9); +} else { + x_167 = x_165; +} +lean_ctor_set_uint8(x_167, 0, x_157); +lean_ctor_set_uint8(x_167, 1, x_158); +lean_ctor_set_uint8(x_167, 2, x_159); +lean_ctor_set_uint8(x_167, 3, x_160); +lean_ctor_set_uint8(x_167, 4, x_161); +lean_ctor_set_uint8(x_167, 5, x_166); +lean_ctor_set_uint8(x_167, 6, x_162); +lean_ctor_set_uint8(x_167, 7, x_163); +lean_ctor_set_uint8(x_167, 8, x_164); +x_168 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_168, 0, x_167); +lean_ctor_set(x_168, 1, x_155); +lean_ctor_set(x_168, 2, x_156); +lean_inc(x_5); +lean_inc(x_4); +lean_inc(x_3); +lean_inc(x_168); +x_169 = l_Lean_Meta_whnf(x_13, x_168, x_3, x_4, x_5, x_6); +if (lean_obj_tag(x_169) == 0) +{ +lean_object* x_170; lean_object* x_171; lean_object* x_172; +x_170 = lean_ctor_get(x_169, 0); +lean_inc(x_170); +x_171 = lean_ctor_get(x_169, 1); +lean_inc(x_171); +lean_dec(x_169); +lean_inc(x_5); +lean_inc(x_4); +lean_inc(x_3); +lean_inc(x_168); +x_172 = l_Lean_Meta_whnf(x_14, x_168, x_3, x_4, x_5, x_171); +if (lean_obj_tag(x_172) == 0) +{ +lean_object* x_173; lean_object* x_174; lean_object* x_175; lean_object* x_176; lean_object* x_177; lean_object* x_178; lean_object* x_179; lean_object* x_180; +x_173 = lean_ctor_get(x_172, 0); +lean_inc(x_173); +x_174 = lean_ctor_get(x_172, 1); +lean_inc(x_174); +lean_dec(x_172); +x_175 = lean_st_ref_get(x_5, x_174); +x_176 = lean_ctor_get(x_175, 0); +lean_inc(x_176); +x_177 = lean_ctor_get(x_175, 1); +lean_inc(x_177); +if (lean_is_exclusive(x_175)) { + lean_ctor_release(x_175, 0); + lean_ctor_release(x_175, 1); + x_178 = x_175; +} else { + lean_dec_ref(x_175); + x_178 = lean_box(0); +} +x_179 = lean_ctor_get(x_176, 0); +lean_inc(x_179); +lean_dec(x_176); +lean_inc(x_179); +x_180 = l_Lean_Expr_constructorApp_x3f(x_179, x_170); +if (lean_obj_tag(x_180) == 0) +{ +lean_object* x_181; lean_object* x_182; +lean_dec(x_179); +lean_dec(x_173); +lean_dec(x_168); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_1); +x_181 = lean_box(0); +if (lean_is_scalar(x_178)) { + x_182 = lean_alloc_ctor(0, 2, 0); +} else { + x_182 = x_178; +} +lean_ctor_set(x_182, 0, x_181); +lean_ctor_set(x_182, 1, x_177); +return x_182; +} +else +{ +lean_object* x_183; lean_object* x_184; +x_183 = lean_ctor_get(x_180, 0); +lean_inc(x_183); +lean_dec(x_180); +x_184 = l_Lean_Expr_constructorApp_x3f(x_179, x_173); +if (lean_obj_tag(x_184) == 0) +{ +lean_object* x_185; lean_object* x_186; +lean_dec(x_183); +lean_dec(x_168); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_1); +x_185 = lean_box(0); +if (lean_is_scalar(x_178)) { + x_186 = lean_alloc_ctor(0, 2, 0); +} else { + x_186 = x_178; +} +lean_ctor_set(x_186, 0, x_185); +lean_ctor_set(x_186, 1, x_177); +return x_186; +} +else +{ +lean_object* x_187; lean_object* x_188; lean_object* x_189; lean_object* x_190; lean_object* x_191; lean_object* x_192; lean_object* x_193; uint8_t x_194; +x_187 = lean_ctor_get(x_184, 0); +lean_inc(x_187); +lean_dec(x_184); +x_188 = lean_ctor_get(x_183, 0); +lean_inc(x_188); +lean_dec(x_183); +x_189 = lean_ctor_get(x_187, 0); +lean_inc(x_189); +lean_dec(x_187); +x_190 = lean_ctor_get(x_188, 0); +lean_inc(x_190); +lean_dec(x_188); +x_191 = lean_ctor_get(x_190, 0); +lean_inc(x_191); +lean_dec(x_190); +x_192 = lean_ctor_get(x_189, 0); +lean_inc(x_192); +lean_dec(x_189); +x_193 = lean_ctor_get(x_192, 0); +lean_inc(x_193); +lean_dec(x_192); +x_194 = lean_name_eq(x_191, x_193); +lean_dec(x_193); +lean_dec(x_191); +if (x_194 == 0) +{ +lean_object* x_195; uint8_t x_196; lean_object* x_197; lean_object* x_198; +lean_dec(x_178); +x_195 = l_Lean_Meta_Simp_rewriteCtorEq_x3f___closed__2; +x_196 = 0; +x_197 = l_Lean_Meta_Simp_rewriteCtorEq_x3f___closed__3; +x_198 = l_Lean_Meta_withLocalDecl___at___private_Lean_Meta_Tactic_Simp_SimpLemmas_0__Lean_Meta_isPerm___spec__1___rarg(x_195, x_196, x_1, x_197, x_168, x_3, x_4, x_5, x_177); +if (lean_obj_tag(x_198) == 0) +{ +lean_object* x_199; lean_object* x_200; lean_object* x_201; lean_object* x_202; +x_199 = lean_ctor_get(x_198, 0); +lean_inc(x_199); +x_200 = lean_ctor_get(x_198, 1); +lean_inc(x_200); +if (lean_is_exclusive(x_198)) { + lean_ctor_release(x_198, 0); + lean_ctor_release(x_198, 1); + x_201 = x_198; +} else { + lean_dec_ref(x_198); + x_201 = lean_box(0); +} +if (lean_is_scalar(x_201)) { + x_202 = lean_alloc_ctor(0, 2, 0); +} else { + x_202 = x_201; +} +lean_ctor_set(x_202, 0, x_199); +lean_ctor_set(x_202, 1, x_200); +return x_202; +} +else +{ +lean_object* x_203; lean_object* x_204; lean_object* x_205; lean_object* x_206; +x_203 = lean_ctor_get(x_198, 0); +lean_inc(x_203); +x_204 = lean_ctor_get(x_198, 1); +lean_inc(x_204); +if (lean_is_exclusive(x_198)) { + lean_ctor_release(x_198, 0); + lean_ctor_release(x_198, 1); + x_205 = x_198; +} else { + lean_dec_ref(x_198); + x_205 = lean_box(0); +} +if (lean_is_scalar(x_205)) { + x_206 = lean_alloc_ctor(1, 2, 0); +} else { + x_206 = x_205; +} +lean_ctor_set(x_206, 0, x_203); +lean_ctor_set(x_206, 1, x_204); +return x_206; +} +} +else +{ +lean_object* x_207; lean_object* x_208; +lean_dec(x_168); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_1); +x_207 = lean_box(0); +if (lean_is_scalar(x_178)) { + x_208 = lean_alloc_ctor(0, 2, 0); +} else { + x_208 = x_178; +} +lean_ctor_set(x_208, 0, x_207); +lean_ctor_set(x_208, 1, x_177); +return x_208; +} +} +} +} +else +{ +lean_object* x_209; lean_object* x_210; lean_object* x_211; lean_object* x_212; +lean_dec(x_170); +lean_dec(x_168); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_1); +x_209 = lean_ctor_get(x_172, 0); +lean_inc(x_209); +x_210 = lean_ctor_get(x_172, 1); +lean_inc(x_210); +if (lean_is_exclusive(x_172)) { + lean_ctor_release(x_172, 0); + lean_ctor_release(x_172, 1); + x_211 = x_172; +} else { + lean_dec_ref(x_172); + x_211 = lean_box(0); +} +if (lean_is_scalar(x_211)) { + x_212 = lean_alloc_ctor(1, 2, 0); +} else { + x_212 = x_211; +} +lean_ctor_set(x_212, 0, x_209); +lean_ctor_set(x_212, 1, x_210); +return x_212; +} +} +else +{ +lean_object* x_213; lean_object* x_214; lean_object* x_215; lean_object* x_216; +lean_dec(x_168); +lean_dec(x_14); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_1); +x_213 = lean_ctor_get(x_169, 0); +lean_inc(x_213); +x_214 = lean_ctor_get(x_169, 1); +lean_inc(x_214); +if (lean_is_exclusive(x_169)) { + lean_ctor_release(x_169, 0); + lean_ctor_release(x_169, 1); + x_215 = x_169; +} else { + lean_dec_ref(x_169); + x_215 = lean_box(0); +} +if (lean_is_scalar(x_215)) { + x_216 = lean_alloc_ctor(1, 2, 0); +} else { + x_216 = x_215; +} +lean_ctor_set(x_216, 0, x_213); +lean_ctor_set(x_216, 1, x_214); +return x_216; +} +} +} +} +} +lean_object* l_Lean_Meta_Simp_tryRewriteCtorEq_match__1___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +if (lean_obj_tag(x_1) == 0) +{ +lean_object* x_4; lean_object* x_5; +lean_dec(x_2); +x_4 = lean_box(0); +x_5 = lean_apply_1(x_3, x_4); +return x_5; +} +else +{ +lean_object* x_6; lean_object* x_7; +lean_dec(x_3); +x_6 = lean_ctor_get(x_1, 0); +lean_inc(x_6); +lean_dec(x_1); +x_7 = lean_apply_1(x_2, x_6); +return x_7; +} +} +} +lean_object* l_Lean_Meta_Simp_tryRewriteCtorEq_match__1(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_Lean_Meta_Simp_tryRewriteCtorEq_match__1___rarg), 3, 0); +return x_2; +} +} +lean_object* l_Lean_Meta_Simp_tryRewriteCtorEq(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9) { +_start: +{ +lean_object* x_10; +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_6); +lean_inc(x_5); +x_10 = l_Lean_Meta_Simp_rewriteCtorEq_x3f(x_1, x_5, x_6, x_7, x_8, x_9); +if (lean_obj_tag(x_10) == 0) +{ +lean_object* x_11; +x_11 = lean_ctor_get(x_10, 0); +lean_inc(x_11); +if (lean_obj_tag(x_11) == 0) +{ +lean_object* x_12; lean_object* x_13; +x_12 = lean_ctor_get(x_10, 1); +lean_inc(x_12); +lean_dec(x_10); +x_13 = lean_apply_7(x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_12); +return x_13; +} +else +{ +uint8_t x_14; +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +x_14 = !lean_is_exclusive(x_10); +if (x_14 == 0) +{ +lean_object* x_15; lean_object* x_16; lean_object* x_17; +x_15 = lean_ctor_get(x_10, 0); +lean_dec(x_15); +x_16 = lean_ctor_get(x_11, 0); +lean_inc(x_16); +lean_dec(x_11); +x_17 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_17, 0, x_16); +lean_ctor_set(x_10, 0, x_17); +return x_10; +} +else +{ +lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; +x_18 = lean_ctor_get(x_10, 1); +lean_inc(x_18); +lean_dec(x_10); +x_19 = lean_ctor_get(x_11, 0); +lean_inc(x_19); +lean_dec(x_11); +x_20 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_20, 0, x_19); +x_21 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_21, 0, x_20); +lean_ctor_set(x_21, 1, x_18); +return x_21; +} +} +} +else +{ +uint8_t x_22; +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +x_22 = !lean_is_exclusive(x_10); +if (x_22 == 0) +{ +return x_10; +} +else +{ +lean_object* x_23; lean_object* x_24; lean_object* x_25; +x_23 = lean_ctor_get(x_10, 0); +x_24 = lean_ctor_get(x_10, 1); +lean_inc(x_24); +lean_inc(x_23); +lean_dec(x_10); +x_25 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_25, 0, x_23); +lean_ctor_set(x_25, 1, x_24); +return x_25; +} +} +} +} +static lean_object* _init_l_Lean_Meta_Simp_rewriteUsingDecide_x3f___closed__1() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l___private_Lean_MonadEnv_0__Lean_supportedRecursors___closed__5; +x_3 = l_Lean_mkConst(x_2, x_1); +return x_3; +} +} +static lean_object* _init_l_Lean_Meta_Simp_rewriteUsingDecide_x3f___closed__2() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("eqFalseOfDecide"); +return x_1; +} +} +static lean_object* _init_l_Lean_Meta_Simp_rewriteUsingDecide_x3f___closed__3() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l_Lean_Meta_Simp_rewriteUsingDecide_x3f___closed__2; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +static lean_object* _init_l_Lean_Meta_Simp_rewriteUsingDecide_x3f___closed__4() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l_Lean_Meta_Simp_rewriteUsingDecide_x3f___closed__3; +x_3 = l_Lean_mkConst(x_2, x_1); +return x_3; +} +} +static lean_object* _init_l_Lean_Meta_Simp_rewriteUsingDecide_x3f___closed__5() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l_Lean_Meta_Simp_rewrite_getRHS___closed__3; +x_3 = l_Lean_mkConst(x_2, x_1); +return x_3; +} +} +static lean_object* _init_l_Lean_Meta_Simp_rewriteUsingDecide_x3f___closed__6() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("eqTrueOfDecide"); +return x_1; +} +} +static lean_object* _init_l_Lean_Meta_Simp_rewriteUsingDecide_x3f___closed__7() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l_Lean_Meta_Simp_rewriteUsingDecide_x3f___closed__6; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +static lean_object* _init_l_Lean_Meta_Simp_rewriteUsingDecide_x3f___closed__8() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l_Lean_Meta_Simp_rewriteUsingDecide_x3f___closed__7; +x_3 = l_Lean_mkConst(x_2, x_1); +return x_3; +} +} +lean_object* l_Lean_Meta_Simp_rewriteUsingDecide_x3f(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { +_start: +{ +uint8_t x_7; +x_7 = l_Lean_Expr_hasFVar(x_1); +if (x_7 == 0) +{ +uint8_t x_8; +x_8 = l_Lean_Expr_hasMVar(x_1); +if (x_8 == 0) +{ +uint8_t x_9; +x_9 = !lean_is_exclusive(x_2); +if (x_9 == 0) +{ +lean_object* x_10; uint8_t x_11; +x_10 = lean_ctor_get(x_2, 0); +x_11 = !lean_is_exclusive(x_10); +if (x_11 == 0) +{ +lean_object* x_12; lean_object* x_13; uint8_t x_14; uint8_t x_15; uint8_t x_16; uint8_t x_17; uint8_t x_18; uint8_t x_19; uint8_t x_20; uint8_t x_21; uint8_t x_22; lean_object* x_23; +x_12 = lean_ctor_get(x_2, 1); +x_13 = lean_ctor_get(x_2, 2); +x_14 = lean_ctor_get_uint8(x_10, 0); +x_15 = lean_ctor_get_uint8(x_10, 1); +x_16 = lean_ctor_get_uint8(x_10, 2); +x_17 = lean_ctor_get_uint8(x_10, 3); +x_18 = lean_ctor_get_uint8(x_10, 4); +x_19 = lean_ctor_get_uint8(x_10, 6); +x_20 = lean_ctor_get_uint8(x_10, 7); +x_21 = lean_ctor_get_uint8(x_10, 8); +x_22 = 3; +lean_ctor_set_uint8(x_10, 5, x_22); +lean_inc(x_13); +lean_inc(x_12); +lean_inc(x_5); +lean_inc(x_4); +lean_inc(x_3); +lean_inc(x_2); +lean_inc(x_1); +x_23 = l_Lean_Meta_mkDecide(x_1, x_2, x_3, x_4, x_5, x_6); +if (lean_obj_tag(x_23) == 0) +{ +lean_object* x_24; lean_object* x_25; uint8_t x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; +x_24 = lean_ctor_get(x_23, 0); +lean_inc(x_24); +x_25 = lean_ctor_get(x_23, 1); +lean_inc(x_25); +lean_dec(x_23); +x_26 = 1; +x_27 = lean_alloc_ctor(0, 0, 9); +lean_ctor_set_uint8(x_27, 0, x_14); +lean_ctor_set_uint8(x_27, 1, x_15); +lean_ctor_set_uint8(x_27, 2, x_16); +lean_ctor_set_uint8(x_27, 3, x_17); +lean_ctor_set_uint8(x_27, 4, x_18); +lean_ctor_set_uint8(x_27, 5, x_26); +lean_ctor_set_uint8(x_27, 6, x_19); +lean_ctor_set_uint8(x_27, 7, x_20); +lean_ctor_set_uint8(x_27, 8, x_21); +x_28 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_28, 0, x_27); +lean_ctor_set(x_28, 1, x_12); +lean_ctor_set(x_28, 2, x_13); +lean_inc(x_5); +lean_inc(x_4); +lean_inc(x_3); +lean_inc(x_24); +x_29 = l_Lean_Meta_whnf(x_24, x_28, x_3, x_4, x_5, x_25); +if (lean_obj_tag(x_29) == 0) +{ +uint8_t x_30; +x_30 = !lean_is_exclusive(x_29); +if (x_30 == 0) +{ +lean_object* x_31; lean_object* x_32; lean_object* x_33; uint8_t x_34; +x_31 = lean_ctor_get(x_29, 0); +x_32 = lean_ctor_get(x_29, 1); +x_33 = l_Lean_instQuoteBool___closed__5; +x_34 = l_Lean_Expr_isConstOf(x_31, x_33); +if (x_34 == 0) +{ +lean_object* x_35; uint8_t x_36; +x_35 = l_Lean_instQuoteBool___closed__3; +x_36 = l_Lean_Expr_isConstOf(x_31, x_35); +lean_dec(x_31); +if (x_36 == 0) +{ +lean_object* x_37; +lean_dec(x_24); +lean_dec(x_2); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_1); +x_37 = lean_box(0); +lean_ctor_set(x_29, 0, x_37); +return x_29; +} +else +{ +lean_object* x_38; +lean_free_object(x_29); +lean_inc(x_5); +lean_inc(x_4); +lean_inc(x_3); +lean_inc(x_2); +lean_inc(x_24); +x_38 = l_Lean_Meta_mkEqRefl(x_24, x_2, x_3, x_4, x_5, x_32); +if (lean_obj_tag(x_38) == 0) +{ +lean_object* x_39; lean_object* x_40; lean_object* x_41; +x_39 = lean_ctor_get(x_38, 1); +lean_inc(x_39); +lean_dec(x_38); +x_40 = l_Lean_instToExprBool___lambda__1___closed__1; +x_41 = l_Lean_Meta_mkEqRefl(x_40, x_2, x_3, x_4, x_5, x_39); +if (lean_obj_tag(x_41) == 0) +{ +uint8_t x_42; +x_42 = !lean_is_exclusive(x_41); +if (x_42 == 0) +{ +lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_object* x_51; lean_object* x_52; lean_object* x_53; lean_object* x_54; +x_43 = lean_ctor_get(x_41, 0); +x_44 = l_Lean_Expr_appArg_x21(x_24); +lean_dec(x_24); +x_45 = l_Lean_Syntax_mkAntiquotNode___closed__9; +x_46 = lean_array_push(x_45, x_1); +x_47 = lean_array_push(x_46, x_44); +x_48 = lean_array_push(x_47, x_43); +x_49 = l_Lean_Meta_Simp_rewriteUsingDecide_x3f___closed__4; +x_50 = l_Lean_mkAppN(x_49, x_48); +lean_dec(x_48); +x_51 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_51, 0, x_50); +x_52 = l_Lean_Meta_Simp_rewriteUsingDecide_x3f___closed__1; +x_53 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_53, 0, x_52); +lean_ctor_set(x_53, 1, x_51); +x_54 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_54, 0, x_53); +lean_ctor_set(x_41, 0, x_54); +return x_41; +} +else +{ +lean_object* x_55; lean_object* x_56; lean_object* x_57; lean_object* x_58; lean_object* x_59; lean_object* x_60; lean_object* x_61; lean_object* x_62; lean_object* x_63; lean_object* x_64; lean_object* x_65; lean_object* x_66; lean_object* x_67; lean_object* x_68; +x_55 = lean_ctor_get(x_41, 0); +x_56 = lean_ctor_get(x_41, 1); +lean_inc(x_56); +lean_inc(x_55); +lean_dec(x_41); +x_57 = l_Lean_Expr_appArg_x21(x_24); +lean_dec(x_24); +x_58 = l_Lean_Syntax_mkAntiquotNode___closed__9; +x_59 = lean_array_push(x_58, x_1); +x_60 = lean_array_push(x_59, x_57); +x_61 = lean_array_push(x_60, x_55); +x_62 = l_Lean_Meta_Simp_rewriteUsingDecide_x3f___closed__4; +x_63 = l_Lean_mkAppN(x_62, x_61); +lean_dec(x_61); +x_64 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_64, 0, x_63); +x_65 = l_Lean_Meta_Simp_rewriteUsingDecide_x3f___closed__1; +x_66 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_66, 0, x_65); +lean_ctor_set(x_66, 1, x_64); +x_67 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_67, 0, x_66); +x_68 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_68, 0, x_67); +lean_ctor_set(x_68, 1, x_56); +return x_68; +} +} +else +{ +uint8_t x_69; +lean_dec(x_24); +lean_dec(x_1); +x_69 = !lean_is_exclusive(x_41); +if (x_69 == 0) +{ +lean_object* x_70; lean_object* x_71; +x_70 = lean_ctor_get(x_41, 0); +lean_dec(x_70); +x_71 = lean_box(0); +lean_ctor_set_tag(x_41, 0); +lean_ctor_set(x_41, 0, x_71); +return x_41; +} +else +{ +lean_object* x_72; lean_object* x_73; lean_object* x_74; +x_72 = lean_ctor_get(x_41, 1); +lean_inc(x_72); +lean_dec(x_41); +x_73 = lean_box(0); +x_74 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_74, 0, x_73); +lean_ctor_set(x_74, 1, x_72); +return x_74; +} +} +} +else +{ +uint8_t x_75; +lean_dec(x_24); +lean_dec(x_2); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_1); +x_75 = !lean_is_exclusive(x_38); +if (x_75 == 0) +{ +lean_object* x_76; lean_object* x_77; +x_76 = lean_ctor_get(x_38, 0); +lean_dec(x_76); +x_77 = lean_box(0); +lean_ctor_set_tag(x_38, 0); +lean_ctor_set(x_38, 0, x_77); +return x_38; +} +else +{ +lean_object* x_78; lean_object* x_79; lean_object* x_80; +x_78 = lean_ctor_get(x_38, 1); +lean_inc(x_78); +lean_dec(x_38); +x_79 = lean_box(0); +x_80 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_80, 0, x_79); +lean_ctor_set(x_80, 1, x_78); +return x_80; +} +} +} +} +else +{ +lean_object* x_81; lean_object* x_82; +lean_free_object(x_29); +lean_dec(x_31); +x_81 = l_Lean_instToExprBool___lambda__1___closed__2; +x_82 = l_Lean_Meta_mkEqRefl(x_81, x_2, x_3, x_4, x_5, x_32); +if (lean_obj_tag(x_82) == 0) +{ +uint8_t x_83; +x_83 = !lean_is_exclusive(x_82); +if (x_83 == 0) +{ +lean_object* x_84; lean_object* x_85; lean_object* x_86; lean_object* x_87; lean_object* x_88; lean_object* x_89; lean_object* x_90; lean_object* x_91; lean_object* x_92; lean_object* x_93; lean_object* x_94; lean_object* x_95; +x_84 = lean_ctor_get(x_82, 0); +x_85 = l_Lean_Expr_appArg_x21(x_24); +lean_dec(x_24); +x_86 = l_Lean_Syntax_mkAntiquotNode___closed__9; +x_87 = lean_array_push(x_86, x_1); +x_88 = lean_array_push(x_87, x_85); +x_89 = lean_array_push(x_88, x_84); +x_90 = l_Lean_Meta_Simp_rewriteUsingDecide_x3f___closed__8; +x_91 = l_Lean_mkAppN(x_90, x_89); +lean_dec(x_89); +x_92 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_92, 0, x_91); +x_93 = l_Lean_Meta_Simp_rewriteUsingDecide_x3f___closed__5; +x_94 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_94, 0, x_93); +lean_ctor_set(x_94, 1, x_92); +x_95 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_95, 0, x_94); +lean_ctor_set(x_82, 0, x_95); +return x_82; +} +else +{ +lean_object* x_96; lean_object* x_97; lean_object* x_98; lean_object* x_99; lean_object* x_100; lean_object* x_101; lean_object* x_102; lean_object* x_103; lean_object* x_104; lean_object* x_105; lean_object* x_106; lean_object* x_107; lean_object* x_108; lean_object* x_109; +x_96 = lean_ctor_get(x_82, 0); +x_97 = lean_ctor_get(x_82, 1); +lean_inc(x_97); +lean_inc(x_96); +lean_dec(x_82); +x_98 = l_Lean_Expr_appArg_x21(x_24); +lean_dec(x_24); +x_99 = l_Lean_Syntax_mkAntiquotNode___closed__9; +x_100 = lean_array_push(x_99, x_1); +x_101 = lean_array_push(x_100, x_98); +x_102 = lean_array_push(x_101, x_96); +x_103 = l_Lean_Meta_Simp_rewriteUsingDecide_x3f___closed__8; +x_104 = l_Lean_mkAppN(x_103, x_102); +lean_dec(x_102); +x_105 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_105, 0, x_104); +x_106 = l_Lean_Meta_Simp_rewriteUsingDecide_x3f___closed__5; +x_107 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_107, 0, x_106); +lean_ctor_set(x_107, 1, x_105); +x_108 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_108, 0, x_107); +x_109 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_109, 0, x_108); +lean_ctor_set(x_109, 1, x_97); +return x_109; +} +} +else +{ +uint8_t x_110; +lean_dec(x_24); +lean_dec(x_1); +x_110 = !lean_is_exclusive(x_82); +if (x_110 == 0) +{ +lean_object* x_111; lean_object* x_112; +x_111 = lean_ctor_get(x_82, 0); +lean_dec(x_111); +x_112 = lean_box(0); +lean_ctor_set_tag(x_82, 0); +lean_ctor_set(x_82, 0, x_112); +return x_82; +} +else +{ +lean_object* x_113; lean_object* x_114; lean_object* x_115; +x_113 = lean_ctor_get(x_82, 1); +lean_inc(x_113); +lean_dec(x_82); +x_114 = lean_box(0); +x_115 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_115, 0, x_114); +lean_ctor_set(x_115, 1, x_113); +return x_115; +} +} +} +} +else +{ +lean_object* x_116; lean_object* x_117; lean_object* x_118; uint8_t x_119; +x_116 = lean_ctor_get(x_29, 0); +x_117 = lean_ctor_get(x_29, 1); +lean_inc(x_117); +lean_inc(x_116); +lean_dec(x_29); +x_118 = l_Lean_instQuoteBool___closed__5; +x_119 = l_Lean_Expr_isConstOf(x_116, x_118); +if (x_119 == 0) +{ +lean_object* x_120; uint8_t x_121; +x_120 = l_Lean_instQuoteBool___closed__3; +x_121 = l_Lean_Expr_isConstOf(x_116, x_120); +lean_dec(x_116); +if (x_121 == 0) +{ +lean_object* x_122; lean_object* x_123; +lean_dec(x_24); +lean_dec(x_2); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_1); +x_122 = lean_box(0); +x_123 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_123, 0, x_122); +lean_ctor_set(x_123, 1, x_117); +return x_123; +} +else +{ +lean_object* x_124; +lean_inc(x_5); +lean_inc(x_4); +lean_inc(x_3); +lean_inc(x_2); +lean_inc(x_24); +x_124 = l_Lean_Meta_mkEqRefl(x_24, x_2, x_3, x_4, x_5, x_117); +if (lean_obj_tag(x_124) == 0) +{ +lean_object* x_125; lean_object* x_126; lean_object* x_127; +x_125 = lean_ctor_get(x_124, 1); +lean_inc(x_125); +lean_dec(x_124); +x_126 = l_Lean_instToExprBool___lambda__1___closed__1; +x_127 = l_Lean_Meta_mkEqRefl(x_126, x_2, x_3, x_4, x_5, x_125); +if (lean_obj_tag(x_127) == 0) +{ +lean_object* x_128; lean_object* x_129; lean_object* x_130; lean_object* x_131; lean_object* x_132; lean_object* x_133; lean_object* x_134; lean_object* x_135; lean_object* x_136; lean_object* x_137; lean_object* x_138; lean_object* x_139; lean_object* x_140; lean_object* x_141; lean_object* x_142; +x_128 = lean_ctor_get(x_127, 0); +lean_inc(x_128); +x_129 = lean_ctor_get(x_127, 1); +lean_inc(x_129); +if (lean_is_exclusive(x_127)) { + lean_ctor_release(x_127, 0); + lean_ctor_release(x_127, 1); + x_130 = x_127; +} else { + lean_dec_ref(x_127); + x_130 = lean_box(0); +} +x_131 = l_Lean_Expr_appArg_x21(x_24); +lean_dec(x_24); +x_132 = l_Lean_Syntax_mkAntiquotNode___closed__9; +x_133 = lean_array_push(x_132, x_1); +x_134 = lean_array_push(x_133, x_131); +x_135 = lean_array_push(x_134, x_128); +x_136 = l_Lean_Meta_Simp_rewriteUsingDecide_x3f___closed__4; +x_137 = l_Lean_mkAppN(x_136, x_135); +lean_dec(x_135); +x_138 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_138, 0, x_137); +x_139 = l_Lean_Meta_Simp_rewriteUsingDecide_x3f___closed__1; +x_140 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_140, 0, x_139); +lean_ctor_set(x_140, 1, x_138); +x_141 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_141, 0, x_140); +if (lean_is_scalar(x_130)) { + x_142 = lean_alloc_ctor(0, 2, 0); +} else { + x_142 = x_130; +} +lean_ctor_set(x_142, 0, x_141); +lean_ctor_set(x_142, 1, x_129); +return x_142; +} +else +{ +lean_object* x_143; lean_object* x_144; lean_object* x_145; lean_object* x_146; +lean_dec(x_24); +lean_dec(x_1); +x_143 = lean_ctor_get(x_127, 1); +lean_inc(x_143); +if (lean_is_exclusive(x_127)) { + lean_ctor_release(x_127, 0); + lean_ctor_release(x_127, 1); + x_144 = x_127; +} else { + lean_dec_ref(x_127); + x_144 = lean_box(0); +} +x_145 = lean_box(0); +if (lean_is_scalar(x_144)) { + x_146 = lean_alloc_ctor(0, 2, 0); +} else { + x_146 = x_144; + lean_ctor_set_tag(x_146, 0); +} +lean_ctor_set(x_146, 0, x_145); +lean_ctor_set(x_146, 1, x_143); +return x_146; +} +} +else +{ +lean_object* x_147; lean_object* x_148; lean_object* x_149; lean_object* x_150; +lean_dec(x_24); +lean_dec(x_2); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_1); +x_147 = lean_ctor_get(x_124, 1); +lean_inc(x_147); +if (lean_is_exclusive(x_124)) { + lean_ctor_release(x_124, 0); + lean_ctor_release(x_124, 1); + x_148 = x_124; +} else { + lean_dec_ref(x_124); + x_148 = lean_box(0); +} +x_149 = lean_box(0); +if (lean_is_scalar(x_148)) { + x_150 = lean_alloc_ctor(0, 2, 0); +} else { + x_150 = x_148; + lean_ctor_set_tag(x_150, 0); +} +lean_ctor_set(x_150, 0, x_149); +lean_ctor_set(x_150, 1, x_147); +return x_150; +} +} +} +else +{ +lean_object* x_151; lean_object* x_152; +lean_dec(x_116); +x_151 = l_Lean_instToExprBool___lambda__1___closed__2; +x_152 = l_Lean_Meta_mkEqRefl(x_151, x_2, x_3, x_4, x_5, x_117); +if (lean_obj_tag(x_152) == 0) +{ +lean_object* x_153; lean_object* x_154; lean_object* x_155; lean_object* x_156; lean_object* x_157; lean_object* x_158; lean_object* x_159; lean_object* x_160; lean_object* x_161; lean_object* x_162; lean_object* x_163; lean_object* x_164; lean_object* x_165; lean_object* x_166; lean_object* x_167; +x_153 = lean_ctor_get(x_152, 0); +lean_inc(x_153); +x_154 = lean_ctor_get(x_152, 1); +lean_inc(x_154); +if (lean_is_exclusive(x_152)) { + lean_ctor_release(x_152, 0); + lean_ctor_release(x_152, 1); + x_155 = x_152; +} else { + lean_dec_ref(x_152); + x_155 = lean_box(0); +} +x_156 = l_Lean_Expr_appArg_x21(x_24); +lean_dec(x_24); +x_157 = l_Lean_Syntax_mkAntiquotNode___closed__9; +x_158 = lean_array_push(x_157, x_1); +x_159 = lean_array_push(x_158, x_156); +x_160 = lean_array_push(x_159, x_153); +x_161 = l_Lean_Meta_Simp_rewriteUsingDecide_x3f___closed__8; +x_162 = l_Lean_mkAppN(x_161, x_160); +lean_dec(x_160); +x_163 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_163, 0, x_162); +x_164 = l_Lean_Meta_Simp_rewriteUsingDecide_x3f___closed__5; +x_165 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_165, 0, x_164); +lean_ctor_set(x_165, 1, x_163); +x_166 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_166, 0, x_165); +if (lean_is_scalar(x_155)) { + x_167 = lean_alloc_ctor(0, 2, 0); +} else { + x_167 = x_155; +} +lean_ctor_set(x_167, 0, x_166); +lean_ctor_set(x_167, 1, x_154); +return x_167; +} +else +{ +lean_object* x_168; lean_object* x_169; lean_object* x_170; lean_object* x_171; +lean_dec(x_24); +lean_dec(x_1); +x_168 = lean_ctor_get(x_152, 1); +lean_inc(x_168); +if (lean_is_exclusive(x_152)) { + lean_ctor_release(x_152, 0); + lean_ctor_release(x_152, 1); + x_169 = x_152; +} else { + lean_dec_ref(x_152); + x_169 = lean_box(0); +} +x_170 = lean_box(0); +if (lean_is_scalar(x_169)) { + x_171 = lean_alloc_ctor(0, 2, 0); +} else { + x_171 = x_169; + lean_ctor_set_tag(x_171, 0); +} +lean_ctor_set(x_171, 0, x_170); +lean_ctor_set(x_171, 1, x_168); +return x_171; +} +} +} +} +else +{ +uint8_t x_172; +lean_dec(x_24); +lean_dec(x_2); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_1); +x_172 = !lean_is_exclusive(x_29); +if (x_172 == 0) +{ +lean_object* x_173; lean_object* x_174; +x_173 = lean_ctor_get(x_29, 0); +lean_dec(x_173); +x_174 = lean_box(0); +lean_ctor_set_tag(x_29, 0); +lean_ctor_set(x_29, 0, x_174); +return x_29; +} +else +{ +lean_object* x_175; lean_object* x_176; lean_object* x_177; +x_175 = lean_ctor_get(x_29, 1); +lean_inc(x_175); +lean_dec(x_29); +x_176 = lean_box(0); +x_177 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_177, 0, x_176); +lean_ctor_set(x_177, 1, x_175); +return x_177; +} +} +} +else +{ +uint8_t x_178; +lean_dec(x_2); +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_1); +x_178 = !lean_is_exclusive(x_23); +if (x_178 == 0) +{ +lean_object* x_179; lean_object* x_180; +x_179 = lean_ctor_get(x_23, 0); +lean_dec(x_179); +x_180 = lean_box(0); +lean_ctor_set_tag(x_23, 0); +lean_ctor_set(x_23, 0, x_180); +return x_23; +} +else +{ +lean_object* x_181; lean_object* x_182; lean_object* x_183; +x_181 = lean_ctor_get(x_23, 1); +lean_inc(x_181); +lean_dec(x_23); +x_182 = lean_box(0); +x_183 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_183, 0, x_182); +lean_ctor_set(x_183, 1, x_181); +return x_183; +} +} +} +else +{ +lean_object* x_184; lean_object* x_185; uint8_t x_186; uint8_t x_187; uint8_t x_188; uint8_t x_189; uint8_t x_190; uint8_t x_191; uint8_t x_192; uint8_t x_193; uint8_t x_194; lean_object* x_195; lean_object* x_196; +x_184 = lean_ctor_get(x_2, 1); +x_185 = lean_ctor_get(x_2, 2); +x_186 = lean_ctor_get_uint8(x_10, 0); +x_187 = lean_ctor_get_uint8(x_10, 1); +x_188 = lean_ctor_get_uint8(x_10, 2); +x_189 = lean_ctor_get_uint8(x_10, 3); +x_190 = lean_ctor_get_uint8(x_10, 4); +x_191 = lean_ctor_get_uint8(x_10, 6); +x_192 = lean_ctor_get_uint8(x_10, 7); +x_193 = lean_ctor_get_uint8(x_10, 8); +lean_dec(x_10); +x_194 = 3; +x_195 = lean_alloc_ctor(0, 0, 9); +lean_ctor_set_uint8(x_195, 0, x_186); +lean_ctor_set_uint8(x_195, 1, x_187); +lean_ctor_set_uint8(x_195, 2, x_188); +lean_ctor_set_uint8(x_195, 3, x_189); +lean_ctor_set_uint8(x_195, 4, x_190); +lean_ctor_set_uint8(x_195, 5, x_194); +lean_ctor_set_uint8(x_195, 6, x_191); +lean_ctor_set_uint8(x_195, 7, x_192); +lean_ctor_set_uint8(x_195, 8, x_193); +lean_inc(x_185); +lean_inc(x_184); +lean_ctor_set(x_2, 0, x_195); +lean_inc(x_5); +lean_inc(x_4); +lean_inc(x_3); +lean_inc(x_2); +lean_inc(x_1); +x_196 = l_Lean_Meta_mkDecide(x_1, x_2, x_3, x_4, x_5, x_6); +if (lean_obj_tag(x_196) == 0) +{ +lean_object* x_197; lean_object* x_198; uint8_t x_199; lean_object* x_200; lean_object* x_201; lean_object* x_202; +x_197 = lean_ctor_get(x_196, 0); +lean_inc(x_197); +x_198 = lean_ctor_get(x_196, 1); +lean_inc(x_198); +lean_dec(x_196); +x_199 = 1; +x_200 = lean_alloc_ctor(0, 0, 9); +lean_ctor_set_uint8(x_200, 0, x_186); +lean_ctor_set_uint8(x_200, 1, x_187); +lean_ctor_set_uint8(x_200, 2, x_188); +lean_ctor_set_uint8(x_200, 3, x_189); +lean_ctor_set_uint8(x_200, 4, x_190); +lean_ctor_set_uint8(x_200, 5, x_199); +lean_ctor_set_uint8(x_200, 6, x_191); +lean_ctor_set_uint8(x_200, 7, x_192); +lean_ctor_set_uint8(x_200, 8, x_193); +x_201 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_201, 0, x_200); +lean_ctor_set(x_201, 1, x_184); +lean_ctor_set(x_201, 2, x_185); +lean_inc(x_5); +lean_inc(x_4); +lean_inc(x_3); +lean_inc(x_197); +x_202 = l_Lean_Meta_whnf(x_197, x_201, x_3, x_4, x_5, x_198); +if (lean_obj_tag(x_202) == 0) +{ +lean_object* x_203; lean_object* x_204; lean_object* x_205; lean_object* x_206; uint8_t x_207; +x_203 = lean_ctor_get(x_202, 0); +lean_inc(x_203); +x_204 = lean_ctor_get(x_202, 1); +lean_inc(x_204); +if (lean_is_exclusive(x_202)) { + lean_ctor_release(x_202, 0); + lean_ctor_release(x_202, 1); + x_205 = x_202; +} else { + lean_dec_ref(x_202); + x_205 = lean_box(0); +} +x_206 = l_Lean_instQuoteBool___closed__5; +x_207 = l_Lean_Expr_isConstOf(x_203, x_206); +if (x_207 == 0) +{ +lean_object* x_208; uint8_t x_209; +x_208 = l_Lean_instQuoteBool___closed__3; +x_209 = l_Lean_Expr_isConstOf(x_203, x_208); +lean_dec(x_203); +if (x_209 == 0) +{ +lean_object* x_210; lean_object* x_211; +lean_dec(x_197); +lean_dec(x_2); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_1); +x_210 = lean_box(0); +if (lean_is_scalar(x_205)) { + x_211 = lean_alloc_ctor(0, 2, 0); +} else { + x_211 = x_205; +} +lean_ctor_set(x_211, 0, x_210); +lean_ctor_set(x_211, 1, x_204); +return x_211; +} +else +{ +lean_object* x_212; +lean_dec(x_205); +lean_inc(x_5); +lean_inc(x_4); +lean_inc(x_3); +lean_inc(x_2); +lean_inc(x_197); +x_212 = l_Lean_Meta_mkEqRefl(x_197, x_2, x_3, x_4, x_5, x_204); +if (lean_obj_tag(x_212) == 0) +{ +lean_object* x_213; lean_object* x_214; lean_object* x_215; +x_213 = lean_ctor_get(x_212, 1); +lean_inc(x_213); +lean_dec(x_212); +x_214 = l_Lean_instToExprBool___lambda__1___closed__1; +x_215 = l_Lean_Meta_mkEqRefl(x_214, x_2, x_3, x_4, x_5, x_213); +if (lean_obj_tag(x_215) == 0) +{ +lean_object* x_216; lean_object* x_217; lean_object* x_218; lean_object* x_219; lean_object* x_220; lean_object* x_221; lean_object* x_222; lean_object* x_223; lean_object* x_224; lean_object* x_225; lean_object* x_226; lean_object* x_227; lean_object* x_228; lean_object* x_229; lean_object* x_230; +x_216 = lean_ctor_get(x_215, 0); +lean_inc(x_216); +x_217 = lean_ctor_get(x_215, 1); +lean_inc(x_217); +if (lean_is_exclusive(x_215)) { + lean_ctor_release(x_215, 0); + lean_ctor_release(x_215, 1); + x_218 = x_215; +} else { + lean_dec_ref(x_215); + x_218 = lean_box(0); +} +x_219 = l_Lean_Expr_appArg_x21(x_197); +lean_dec(x_197); +x_220 = l_Lean_Syntax_mkAntiquotNode___closed__9; +x_221 = lean_array_push(x_220, x_1); +x_222 = lean_array_push(x_221, x_219); +x_223 = lean_array_push(x_222, x_216); +x_224 = l_Lean_Meta_Simp_rewriteUsingDecide_x3f___closed__4; +x_225 = l_Lean_mkAppN(x_224, x_223); +lean_dec(x_223); +x_226 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_226, 0, x_225); +x_227 = l_Lean_Meta_Simp_rewriteUsingDecide_x3f___closed__1; +x_228 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_228, 0, x_227); +lean_ctor_set(x_228, 1, x_226); +x_229 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_229, 0, x_228); +if (lean_is_scalar(x_218)) { + x_230 = lean_alloc_ctor(0, 2, 0); +} else { + x_230 = x_218; +} +lean_ctor_set(x_230, 0, x_229); +lean_ctor_set(x_230, 1, x_217); +return x_230; +} +else +{ +lean_object* x_231; lean_object* x_232; lean_object* x_233; lean_object* x_234; +lean_dec(x_197); +lean_dec(x_1); +x_231 = lean_ctor_get(x_215, 1); +lean_inc(x_231); +if (lean_is_exclusive(x_215)) { + lean_ctor_release(x_215, 0); + lean_ctor_release(x_215, 1); + x_232 = x_215; +} else { + lean_dec_ref(x_215); + x_232 = lean_box(0); +} +x_233 = lean_box(0); +if (lean_is_scalar(x_232)) { + x_234 = lean_alloc_ctor(0, 2, 0); +} else { + x_234 = x_232; + lean_ctor_set_tag(x_234, 0); +} +lean_ctor_set(x_234, 0, x_233); +lean_ctor_set(x_234, 1, x_231); +return x_234; +} +} +else +{ +lean_object* x_235; lean_object* x_236; lean_object* x_237; lean_object* x_238; +lean_dec(x_197); +lean_dec(x_2); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_1); +x_235 = lean_ctor_get(x_212, 1); +lean_inc(x_235); +if (lean_is_exclusive(x_212)) { + lean_ctor_release(x_212, 0); + lean_ctor_release(x_212, 1); + x_236 = x_212; +} else { + lean_dec_ref(x_212); + x_236 = lean_box(0); +} +x_237 = lean_box(0); +if (lean_is_scalar(x_236)) { + x_238 = lean_alloc_ctor(0, 2, 0); +} else { + x_238 = x_236; + lean_ctor_set_tag(x_238, 0); +} +lean_ctor_set(x_238, 0, x_237); +lean_ctor_set(x_238, 1, x_235); +return x_238; +} +} +} +else +{ +lean_object* x_239; lean_object* x_240; +lean_dec(x_205); +lean_dec(x_203); +x_239 = l_Lean_instToExprBool___lambda__1___closed__2; +x_240 = l_Lean_Meta_mkEqRefl(x_239, x_2, x_3, x_4, x_5, x_204); +if (lean_obj_tag(x_240) == 0) +{ +lean_object* x_241; lean_object* x_242; lean_object* x_243; lean_object* x_244; lean_object* x_245; lean_object* x_246; lean_object* x_247; lean_object* x_248; lean_object* x_249; lean_object* x_250; lean_object* x_251; lean_object* x_252; lean_object* x_253; lean_object* x_254; lean_object* x_255; +x_241 = lean_ctor_get(x_240, 0); +lean_inc(x_241); +x_242 = lean_ctor_get(x_240, 1); +lean_inc(x_242); +if (lean_is_exclusive(x_240)) { + lean_ctor_release(x_240, 0); + lean_ctor_release(x_240, 1); + x_243 = x_240; +} else { + lean_dec_ref(x_240); + x_243 = lean_box(0); +} +x_244 = l_Lean_Expr_appArg_x21(x_197); +lean_dec(x_197); +x_245 = l_Lean_Syntax_mkAntiquotNode___closed__9; +x_246 = lean_array_push(x_245, x_1); +x_247 = lean_array_push(x_246, x_244); +x_248 = lean_array_push(x_247, x_241); +x_249 = l_Lean_Meta_Simp_rewriteUsingDecide_x3f___closed__8; +x_250 = l_Lean_mkAppN(x_249, x_248); +lean_dec(x_248); +x_251 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_251, 0, x_250); +x_252 = l_Lean_Meta_Simp_rewriteUsingDecide_x3f___closed__5; +x_253 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_253, 0, x_252); +lean_ctor_set(x_253, 1, x_251); +x_254 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_254, 0, x_253); +if (lean_is_scalar(x_243)) { + x_255 = lean_alloc_ctor(0, 2, 0); +} else { + x_255 = x_243; +} +lean_ctor_set(x_255, 0, x_254); +lean_ctor_set(x_255, 1, x_242); +return x_255; +} +else +{ +lean_object* x_256; lean_object* x_257; lean_object* x_258; lean_object* x_259; +lean_dec(x_197); +lean_dec(x_1); +x_256 = lean_ctor_get(x_240, 1); +lean_inc(x_256); +if (lean_is_exclusive(x_240)) { + lean_ctor_release(x_240, 0); + lean_ctor_release(x_240, 1); + x_257 = x_240; +} else { + lean_dec_ref(x_240); + x_257 = lean_box(0); +} +x_258 = lean_box(0); +if (lean_is_scalar(x_257)) { + x_259 = lean_alloc_ctor(0, 2, 0); +} else { + x_259 = x_257; + lean_ctor_set_tag(x_259, 0); +} +lean_ctor_set(x_259, 0, x_258); +lean_ctor_set(x_259, 1, x_256); +return x_259; +} +} +} +else +{ +lean_object* x_260; lean_object* x_261; lean_object* x_262; lean_object* x_263; +lean_dec(x_197); +lean_dec(x_2); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_1); +x_260 = lean_ctor_get(x_202, 1); +lean_inc(x_260); +if (lean_is_exclusive(x_202)) { + lean_ctor_release(x_202, 0); + lean_ctor_release(x_202, 1); + x_261 = x_202; +} else { + lean_dec_ref(x_202); + x_261 = lean_box(0); +} +x_262 = lean_box(0); +if (lean_is_scalar(x_261)) { + x_263 = lean_alloc_ctor(0, 2, 0); +} else { + x_263 = x_261; + lean_ctor_set_tag(x_263, 0); +} +lean_ctor_set(x_263, 0, x_262); +lean_ctor_set(x_263, 1, x_260); +return x_263; +} +} +else +{ +lean_object* x_264; lean_object* x_265; lean_object* x_266; lean_object* x_267; +lean_dec(x_2); +lean_dec(x_185); +lean_dec(x_184); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_1); +x_264 = lean_ctor_get(x_196, 1); +lean_inc(x_264); +if (lean_is_exclusive(x_196)) { + lean_ctor_release(x_196, 0); + lean_ctor_release(x_196, 1); + x_265 = x_196; +} else { + lean_dec_ref(x_196); + x_265 = lean_box(0); +} +x_266 = lean_box(0); +if (lean_is_scalar(x_265)) { + x_267 = lean_alloc_ctor(0, 2, 0); +} else { + x_267 = x_265; + lean_ctor_set_tag(x_267, 0); +} +lean_ctor_set(x_267, 0, x_266); +lean_ctor_set(x_267, 1, x_264); +return x_267; +} +} +} +else +{ +lean_object* x_268; lean_object* x_269; lean_object* x_270; uint8_t x_271; uint8_t x_272; uint8_t x_273; uint8_t x_274; uint8_t x_275; uint8_t x_276; uint8_t x_277; uint8_t x_278; lean_object* x_279; uint8_t x_280; lean_object* x_281; lean_object* x_282; lean_object* x_283; +x_268 = lean_ctor_get(x_2, 0); +x_269 = lean_ctor_get(x_2, 1); +x_270 = lean_ctor_get(x_2, 2); +lean_inc(x_270); +lean_inc(x_269); +lean_inc(x_268); +lean_dec(x_2); +x_271 = lean_ctor_get_uint8(x_268, 0); +x_272 = lean_ctor_get_uint8(x_268, 1); +x_273 = lean_ctor_get_uint8(x_268, 2); +x_274 = lean_ctor_get_uint8(x_268, 3); +x_275 = lean_ctor_get_uint8(x_268, 4); +x_276 = lean_ctor_get_uint8(x_268, 6); +x_277 = lean_ctor_get_uint8(x_268, 7); +x_278 = lean_ctor_get_uint8(x_268, 8); +if (lean_is_exclusive(x_268)) { + x_279 = x_268; +} else { + lean_dec_ref(x_268); + x_279 = lean_box(0); +} +x_280 = 3; +if (lean_is_scalar(x_279)) { + x_281 = lean_alloc_ctor(0, 0, 9); +} else { + x_281 = x_279; +} +lean_ctor_set_uint8(x_281, 0, x_271); +lean_ctor_set_uint8(x_281, 1, x_272); +lean_ctor_set_uint8(x_281, 2, x_273); +lean_ctor_set_uint8(x_281, 3, x_274); +lean_ctor_set_uint8(x_281, 4, x_275); +lean_ctor_set_uint8(x_281, 5, x_280); +lean_ctor_set_uint8(x_281, 6, x_276); +lean_ctor_set_uint8(x_281, 7, x_277); +lean_ctor_set_uint8(x_281, 8, x_278); +lean_inc(x_270); +lean_inc(x_269); +x_282 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_282, 0, x_281); +lean_ctor_set(x_282, 1, x_269); +lean_ctor_set(x_282, 2, x_270); +lean_inc(x_5); +lean_inc(x_4); +lean_inc(x_3); +lean_inc(x_282); +lean_inc(x_1); +x_283 = l_Lean_Meta_mkDecide(x_1, x_282, x_3, x_4, x_5, x_6); +if (lean_obj_tag(x_283) == 0) +{ +lean_object* x_284; lean_object* x_285; uint8_t x_286; lean_object* x_287; lean_object* x_288; lean_object* x_289; +x_284 = lean_ctor_get(x_283, 0); +lean_inc(x_284); +x_285 = lean_ctor_get(x_283, 1); +lean_inc(x_285); +lean_dec(x_283); +x_286 = 1; +x_287 = lean_alloc_ctor(0, 0, 9); +lean_ctor_set_uint8(x_287, 0, x_271); +lean_ctor_set_uint8(x_287, 1, x_272); +lean_ctor_set_uint8(x_287, 2, x_273); +lean_ctor_set_uint8(x_287, 3, x_274); +lean_ctor_set_uint8(x_287, 4, x_275); +lean_ctor_set_uint8(x_287, 5, x_286); +lean_ctor_set_uint8(x_287, 6, x_276); +lean_ctor_set_uint8(x_287, 7, x_277); +lean_ctor_set_uint8(x_287, 8, x_278); +x_288 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_288, 0, x_287); +lean_ctor_set(x_288, 1, x_269); +lean_ctor_set(x_288, 2, x_270); +lean_inc(x_5); +lean_inc(x_4); +lean_inc(x_3); +lean_inc(x_284); +x_289 = l_Lean_Meta_whnf(x_284, x_288, x_3, x_4, x_5, x_285); +if (lean_obj_tag(x_289) == 0) +{ +lean_object* x_290; lean_object* x_291; lean_object* x_292; lean_object* x_293; uint8_t x_294; +x_290 = lean_ctor_get(x_289, 0); +lean_inc(x_290); +x_291 = lean_ctor_get(x_289, 1); +lean_inc(x_291); +if (lean_is_exclusive(x_289)) { + lean_ctor_release(x_289, 0); + lean_ctor_release(x_289, 1); + x_292 = x_289; +} else { + lean_dec_ref(x_289); + x_292 = lean_box(0); +} +x_293 = l_Lean_instQuoteBool___closed__5; +x_294 = l_Lean_Expr_isConstOf(x_290, x_293); +if (x_294 == 0) +{ +lean_object* x_295; uint8_t x_296; +x_295 = l_Lean_instQuoteBool___closed__3; +x_296 = l_Lean_Expr_isConstOf(x_290, x_295); +lean_dec(x_290); +if (x_296 == 0) +{ +lean_object* x_297; lean_object* x_298; +lean_dec(x_284); +lean_dec(x_282); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_1); +x_297 = lean_box(0); +if (lean_is_scalar(x_292)) { + x_298 = lean_alloc_ctor(0, 2, 0); +} else { + x_298 = x_292; +} +lean_ctor_set(x_298, 0, x_297); +lean_ctor_set(x_298, 1, x_291); +return x_298; +} +else +{ +lean_object* x_299; +lean_dec(x_292); +lean_inc(x_5); +lean_inc(x_4); +lean_inc(x_3); +lean_inc(x_282); +lean_inc(x_284); +x_299 = l_Lean_Meta_mkEqRefl(x_284, x_282, x_3, x_4, x_5, x_291); +if (lean_obj_tag(x_299) == 0) +{ +lean_object* x_300; lean_object* x_301; lean_object* x_302; +x_300 = lean_ctor_get(x_299, 1); +lean_inc(x_300); +lean_dec(x_299); +x_301 = l_Lean_instToExprBool___lambda__1___closed__1; +x_302 = l_Lean_Meta_mkEqRefl(x_301, x_282, x_3, x_4, x_5, x_300); +if (lean_obj_tag(x_302) == 0) +{ +lean_object* x_303; lean_object* x_304; lean_object* x_305; lean_object* x_306; lean_object* x_307; lean_object* x_308; lean_object* x_309; lean_object* x_310; lean_object* x_311; lean_object* x_312; lean_object* x_313; lean_object* x_314; lean_object* x_315; lean_object* x_316; lean_object* x_317; +x_303 = lean_ctor_get(x_302, 0); +lean_inc(x_303); +x_304 = lean_ctor_get(x_302, 1); +lean_inc(x_304); +if (lean_is_exclusive(x_302)) { + lean_ctor_release(x_302, 0); + lean_ctor_release(x_302, 1); + x_305 = x_302; +} else { + lean_dec_ref(x_302); + x_305 = lean_box(0); +} +x_306 = l_Lean_Expr_appArg_x21(x_284); +lean_dec(x_284); +x_307 = l_Lean_Syntax_mkAntiquotNode___closed__9; +x_308 = lean_array_push(x_307, x_1); +x_309 = lean_array_push(x_308, x_306); +x_310 = lean_array_push(x_309, x_303); +x_311 = l_Lean_Meta_Simp_rewriteUsingDecide_x3f___closed__4; +x_312 = l_Lean_mkAppN(x_311, x_310); +lean_dec(x_310); +x_313 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_313, 0, x_312); +x_314 = l_Lean_Meta_Simp_rewriteUsingDecide_x3f___closed__1; +x_315 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_315, 0, x_314); +lean_ctor_set(x_315, 1, x_313); +x_316 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_316, 0, x_315); +if (lean_is_scalar(x_305)) { + x_317 = lean_alloc_ctor(0, 2, 0); +} else { + x_317 = x_305; +} +lean_ctor_set(x_317, 0, x_316); +lean_ctor_set(x_317, 1, x_304); +return x_317; +} +else +{ +lean_object* x_318; lean_object* x_319; lean_object* x_320; lean_object* x_321; +lean_dec(x_284); +lean_dec(x_1); +x_318 = lean_ctor_get(x_302, 1); +lean_inc(x_318); +if (lean_is_exclusive(x_302)) { + lean_ctor_release(x_302, 0); + lean_ctor_release(x_302, 1); + x_319 = x_302; +} else { + lean_dec_ref(x_302); + x_319 = lean_box(0); +} +x_320 = lean_box(0); +if (lean_is_scalar(x_319)) { + x_321 = lean_alloc_ctor(0, 2, 0); +} else { + x_321 = x_319; + lean_ctor_set_tag(x_321, 0); +} +lean_ctor_set(x_321, 0, x_320); +lean_ctor_set(x_321, 1, x_318); +return x_321; +} +} +else +{ +lean_object* x_322; lean_object* x_323; lean_object* x_324; lean_object* x_325; +lean_dec(x_284); +lean_dec(x_282); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_1); +x_322 = lean_ctor_get(x_299, 1); +lean_inc(x_322); +if (lean_is_exclusive(x_299)) { + lean_ctor_release(x_299, 0); + lean_ctor_release(x_299, 1); + x_323 = x_299; +} else { + lean_dec_ref(x_299); + x_323 = lean_box(0); +} +x_324 = lean_box(0); +if (lean_is_scalar(x_323)) { + x_325 = lean_alloc_ctor(0, 2, 0); +} else { + x_325 = x_323; + lean_ctor_set_tag(x_325, 0); +} +lean_ctor_set(x_325, 0, x_324); +lean_ctor_set(x_325, 1, x_322); +return x_325; +} +} +} +else +{ +lean_object* x_326; lean_object* x_327; +lean_dec(x_292); +lean_dec(x_290); +x_326 = l_Lean_instToExprBool___lambda__1___closed__2; +x_327 = l_Lean_Meta_mkEqRefl(x_326, x_282, x_3, x_4, x_5, x_291); +if (lean_obj_tag(x_327) == 0) +{ +lean_object* x_328; lean_object* x_329; lean_object* x_330; lean_object* x_331; lean_object* x_332; lean_object* x_333; lean_object* x_334; lean_object* x_335; lean_object* x_336; lean_object* x_337; lean_object* x_338; lean_object* x_339; lean_object* x_340; lean_object* x_341; lean_object* x_342; +x_328 = lean_ctor_get(x_327, 0); +lean_inc(x_328); +x_329 = lean_ctor_get(x_327, 1); +lean_inc(x_329); +if (lean_is_exclusive(x_327)) { + lean_ctor_release(x_327, 0); + lean_ctor_release(x_327, 1); + x_330 = x_327; +} else { + lean_dec_ref(x_327); + x_330 = lean_box(0); +} +x_331 = l_Lean_Expr_appArg_x21(x_284); +lean_dec(x_284); +x_332 = l_Lean_Syntax_mkAntiquotNode___closed__9; +x_333 = lean_array_push(x_332, x_1); +x_334 = lean_array_push(x_333, x_331); +x_335 = lean_array_push(x_334, x_328); +x_336 = l_Lean_Meta_Simp_rewriteUsingDecide_x3f___closed__8; +x_337 = l_Lean_mkAppN(x_336, x_335); +lean_dec(x_335); +x_338 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_338, 0, x_337); +x_339 = l_Lean_Meta_Simp_rewriteUsingDecide_x3f___closed__5; +x_340 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_340, 0, x_339); +lean_ctor_set(x_340, 1, x_338); +x_341 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_341, 0, x_340); +if (lean_is_scalar(x_330)) { + x_342 = lean_alloc_ctor(0, 2, 0); +} else { + x_342 = x_330; +} +lean_ctor_set(x_342, 0, x_341); +lean_ctor_set(x_342, 1, x_329); +return x_342; +} +else +{ +lean_object* x_343; lean_object* x_344; lean_object* x_345; lean_object* x_346; +lean_dec(x_284); +lean_dec(x_1); +x_343 = lean_ctor_get(x_327, 1); +lean_inc(x_343); +if (lean_is_exclusive(x_327)) { + lean_ctor_release(x_327, 0); + lean_ctor_release(x_327, 1); + x_344 = x_327; +} else { + lean_dec_ref(x_327); + x_344 = lean_box(0); +} +x_345 = lean_box(0); +if (lean_is_scalar(x_344)) { + x_346 = lean_alloc_ctor(0, 2, 0); +} else { + x_346 = x_344; + lean_ctor_set_tag(x_346, 0); +} +lean_ctor_set(x_346, 0, x_345); +lean_ctor_set(x_346, 1, x_343); +return x_346; +} +} +} +else +{ +lean_object* x_347; lean_object* x_348; lean_object* x_349; lean_object* x_350; +lean_dec(x_284); +lean_dec(x_282); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_1); +x_347 = lean_ctor_get(x_289, 1); +lean_inc(x_347); +if (lean_is_exclusive(x_289)) { + lean_ctor_release(x_289, 0); + lean_ctor_release(x_289, 1); + x_348 = x_289; +} else { + lean_dec_ref(x_289); + x_348 = lean_box(0); +} +x_349 = lean_box(0); +if (lean_is_scalar(x_348)) { + x_350 = lean_alloc_ctor(0, 2, 0); +} else { + x_350 = x_348; + lean_ctor_set_tag(x_350, 0); +} +lean_ctor_set(x_350, 0, x_349); +lean_ctor_set(x_350, 1, x_347); +return x_350; +} +} +else +{ +lean_object* x_351; lean_object* x_352; lean_object* x_353; lean_object* x_354; +lean_dec(x_282); +lean_dec(x_270); +lean_dec(x_269); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_1); +x_351 = lean_ctor_get(x_283, 1); +lean_inc(x_351); +if (lean_is_exclusive(x_283)) { + lean_ctor_release(x_283, 0); + lean_ctor_release(x_283, 1); + x_352 = x_283; +} else { + lean_dec_ref(x_283); + x_352 = lean_box(0); +} +x_353 = lean_box(0); +if (lean_is_scalar(x_352)) { + x_354 = lean_alloc_ctor(0, 2, 0); +} else { + x_354 = x_352; + lean_ctor_set_tag(x_354, 0); +} +lean_ctor_set(x_354, 0, x_353); +lean_ctor_set(x_354, 1, x_351); +return x_354; +} +} +} +else +{ +lean_object* x_355; lean_object* x_356; +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_355 = lean_box(0); +x_356 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_356, 0, x_355); +lean_ctor_set(x_356, 1, x_6); +return x_356; +} +} +else +{ +lean_object* x_357; lean_object* x_358; +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_357 = lean_box(0); +x_358 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_358, 0, x_357); +lean_ctor_set(x_358, 1, x_6); +return x_358; +} +} +} +lean_object* l_Lean_Meta_Simp_tryRewriteUsingDecide_match__1___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +if (lean_obj_tag(x_1) == 0) +{ +lean_object* x_4; lean_object* x_5; +lean_dec(x_2); +x_4 = lean_box(0); +x_5 = lean_apply_1(x_3, x_4); +return x_5; +} +else +{ +lean_object* x_6; lean_object* x_7; +lean_dec(x_3); +x_6 = lean_ctor_get(x_1, 0); +lean_inc(x_6); +lean_dec(x_1); +x_7 = lean_apply_1(x_2, x_6); +return x_7; +} +} +} +lean_object* l_Lean_Meta_Simp_tryRewriteUsingDecide_match__1(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_Lean_Meta_Simp_tryRewriteUsingDecide_match__1___rarg), 3, 0); +return x_2; +} +} +lean_object* l_Lean_Meta_Simp_tryRewriteUsingDecide(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9) { +_start: +{ +lean_object* x_10; uint8_t x_11; +x_10 = lean_ctor_get(x_3, 0); +lean_inc(x_10); +x_11 = lean_ctor_get_uint8(x_10, sizeof(void*)*1 + 9); +lean_dec(x_10); +if (x_11 == 0) +{ +lean_object* x_12; +lean_dec(x_1); +x_12 = lean_apply_7(x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9); +return x_12; +} +else +{ +lean_object* x_13; lean_object* x_14; +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_6); +lean_inc(x_5); +x_13 = l_Lean_Meta_Simp_rewriteUsingDecide_x3f(x_1, x_5, x_6, x_7, x_8, x_9); +x_14 = lean_ctor_get(x_13, 0); +lean_inc(x_14); +if (lean_obj_tag(x_14) == 0) +{ +lean_object* x_15; lean_object* x_16; +x_15 = lean_ctor_get(x_13, 1); +lean_inc(x_15); +lean_dec(x_13); +x_16 = lean_apply_7(x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_15); +return x_16; +} +else +{ +uint8_t x_17; +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +x_17 = !lean_is_exclusive(x_13); +if (x_17 == 0) +{ +lean_object* x_18; lean_object* x_19; lean_object* x_20; +x_18 = lean_ctor_get(x_13, 0); +lean_dec(x_18); +x_19 = lean_ctor_get(x_14, 0); +lean_inc(x_19); +lean_dec(x_14); +x_20 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_20, 0, x_19); +lean_ctor_set(x_13, 0, x_20); +return x_13; +} +else +{ +lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; +x_21 = lean_ctor_get(x_13, 1); +lean_inc(x_21); +lean_dec(x_13); +x_22 = lean_ctor_get(x_14, 0); +lean_inc(x_22); +lean_dec(x_14); +x_23 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_23, 0, x_22); +x_24 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_24, 0, x_23); +lean_ctor_set(x_24, 1, x_21); +return x_24; +} +} +} +} +} +lean_object* l_Lean_Meta_Simp_tryUnfold_match__1___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +if (lean_obj_tag(x_1) == 0) +{ +lean_object* x_4; lean_object* x_5; +lean_dec(x_2); +x_4 = lean_box(0); +x_5 = lean_apply_1(x_3, x_4); +return x_5; +} +else +{ +lean_object* x_6; lean_object* x_7; +lean_dec(x_3); +x_6 = lean_ctor_get(x_1, 0); +lean_inc(x_6); +lean_dec(x_1); +x_7 = lean_apply_1(x_2, x_6); +return x_7; +} +} +} +lean_object* l_Lean_Meta_Simp_tryUnfold_match__1(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_Lean_Meta_Simp_tryUnfold_match__1___rarg), 3, 0); +return x_2; +} +} +lean_object* l_Lean_Meta_Simp_tryUnfold(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9) { +_start: +{ +uint8_t x_10; +x_10 = l_Lean_Expr_isApp(x_1); +if (x_10 == 0) +{ +lean_object* x_11; +lean_dec(x_1); +x_11 = lean_apply_7(x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9); +return x_11; +} +else +{ +lean_object* x_12; uint8_t x_13; +x_12 = l_Lean_Expr_getAppFn(x_1); +x_13 = l_Lean_Expr_isConst(x_12); +if (x_13 == 0) +{ +lean_object* x_14; +lean_dec(x_12); +lean_dec(x_1); +x_14 = lean_apply_7(x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9); +return x_14; +} +else +{ +lean_object* x_15; lean_object* x_16; uint8_t x_17; +x_15 = lean_ctor_get(x_3, 3); +lean_inc(x_15); +x_16 = l_Lean_Expr_constName_x21(x_12); +lean_dec(x_12); +x_17 = l_Lean_NameSet_contains(x_15, x_16); +lean_dec(x_16); +lean_dec(x_15); +if (x_17 == 0) +{ +lean_object* x_18; +lean_dec(x_1); +x_18 = lean_apply_7(x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9); +return x_18; +} +else +{ +lean_object* x_19; lean_object* x_20; lean_object* x_21; uint8_t x_22; +x_19 = lean_ctor_get(x_5, 0); +lean_inc(x_19); +x_20 = lean_ctor_get(x_5, 1); +lean_inc(x_20); +x_21 = lean_ctor_get(x_5, 2); +lean_inc(x_21); +x_22 = !lean_is_exclusive(x_19); +if (x_22 == 0) +{ +uint8_t x_23; lean_object* x_24; lean_object* x_25; +x_23 = 1; +lean_ctor_set_uint8(x_19, 5, x_23); +x_24 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_24, 0, x_19); +lean_ctor_set(x_24, 1, x_20); +lean_ctor_set(x_24, 2, x_21); +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_6); +x_25 = l_Lean_Meta_unfoldDefinition_x3f(x_1, x_24, x_6, x_7, x_8, x_9); +if (lean_obj_tag(x_25) == 0) +{ +lean_object* x_26; +x_26 = lean_ctor_get(x_25, 0); +lean_inc(x_26); +if (lean_obj_tag(x_26) == 0) +{ +lean_object* x_27; lean_object* x_28; +x_27 = lean_ctor_get(x_25, 1); +lean_inc(x_27); +lean_dec(x_25); +x_28 = lean_apply_7(x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_27); +return x_28; +} +else +{ +uint8_t x_29; +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +x_29 = !lean_is_exclusive(x_25); +if (x_29 == 0) +{ +lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; +x_30 = lean_ctor_get(x_25, 0); +lean_dec(x_30); +x_31 = lean_ctor_get(x_26, 0); +lean_inc(x_31); +lean_dec(x_26); +x_32 = lean_box(0); +x_33 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_33, 0, x_31); +lean_ctor_set(x_33, 1, x_32); +x_34 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_34, 0, x_33); +lean_ctor_set(x_25, 0, x_34); +return x_25; +} +else +{ +lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; +x_35 = lean_ctor_get(x_25, 1); +lean_inc(x_35); +lean_dec(x_25); +x_36 = lean_ctor_get(x_26, 0); +lean_inc(x_36); +lean_dec(x_26); +x_37 = lean_box(0); +x_38 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_38, 0, x_36); +lean_ctor_set(x_38, 1, x_37); +x_39 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_39, 0, x_38); +x_40 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_40, 0, x_39); +lean_ctor_set(x_40, 1, x_35); +return x_40; +} +} +} +else +{ +uint8_t x_41; +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +x_41 = !lean_is_exclusive(x_25); +if (x_41 == 0) +{ +return x_25; +} +else +{ +lean_object* x_42; lean_object* x_43; lean_object* x_44; +x_42 = lean_ctor_get(x_25, 0); +x_43 = lean_ctor_get(x_25, 1); +lean_inc(x_43); +lean_inc(x_42); +lean_dec(x_25); +x_44 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_44, 0, x_42); +lean_ctor_set(x_44, 1, x_43); +return x_44; +} +} +} +else +{ +uint8_t x_45; uint8_t x_46; uint8_t x_47; uint8_t x_48; uint8_t x_49; uint8_t x_50; uint8_t x_51; uint8_t x_52; uint8_t x_53; lean_object* x_54; lean_object* x_55; lean_object* x_56; +x_45 = lean_ctor_get_uint8(x_19, 0); +x_46 = lean_ctor_get_uint8(x_19, 1); +x_47 = lean_ctor_get_uint8(x_19, 2); +x_48 = lean_ctor_get_uint8(x_19, 3); +x_49 = lean_ctor_get_uint8(x_19, 4); +x_50 = lean_ctor_get_uint8(x_19, 6); +x_51 = lean_ctor_get_uint8(x_19, 7); +x_52 = lean_ctor_get_uint8(x_19, 8); +lean_dec(x_19); +x_53 = 1; +x_54 = lean_alloc_ctor(0, 0, 9); +lean_ctor_set_uint8(x_54, 0, x_45); +lean_ctor_set_uint8(x_54, 1, x_46); +lean_ctor_set_uint8(x_54, 2, x_47); +lean_ctor_set_uint8(x_54, 3, x_48); +lean_ctor_set_uint8(x_54, 4, x_49); +lean_ctor_set_uint8(x_54, 5, x_53); +lean_ctor_set_uint8(x_54, 6, x_50); +lean_ctor_set_uint8(x_54, 7, x_51); +lean_ctor_set_uint8(x_54, 8, x_52); +x_55 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_55, 0, x_54); +lean_ctor_set(x_55, 1, x_20); +lean_ctor_set(x_55, 2, x_21); +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_6); +x_56 = l_Lean_Meta_unfoldDefinition_x3f(x_1, x_55, x_6, x_7, x_8, x_9); +if (lean_obj_tag(x_56) == 0) +{ +lean_object* x_57; +x_57 = lean_ctor_get(x_56, 0); +lean_inc(x_57); +if (lean_obj_tag(x_57) == 0) +{ +lean_object* x_58; lean_object* x_59; +x_58 = lean_ctor_get(x_56, 1); +lean_inc(x_58); +lean_dec(x_56); +x_59 = lean_apply_7(x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_58); +return x_59; +} +else +{ +lean_object* x_60; lean_object* x_61; lean_object* x_62; lean_object* x_63; lean_object* x_64; lean_object* x_65; lean_object* x_66; +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +x_60 = lean_ctor_get(x_56, 1); +lean_inc(x_60); +if (lean_is_exclusive(x_56)) { + lean_ctor_release(x_56, 0); + lean_ctor_release(x_56, 1); + x_61 = x_56; +} else { + lean_dec_ref(x_56); + x_61 = lean_box(0); +} +x_62 = lean_ctor_get(x_57, 0); +lean_inc(x_62); +lean_dec(x_57); +x_63 = lean_box(0); +x_64 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_64, 0, x_62); +lean_ctor_set(x_64, 1, x_63); +x_65 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_65, 0, x_64); +if (lean_is_scalar(x_61)) { + x_66 = lean_alloc_ctor(0, 2, 0); +} else { + x_66 = x_61; +} +lean_ctor_set(x_66, 0, x_65); +lean_ctor_set(x_66, 1, x_60); +return x_66; +} +} +else +{ +lean_object* x_67; lean_object* x_68; lean_object* x_69; lean_object* x_70; +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +x_67 = lean_ctor_get(x_56, 0); +lean_inc(x_67); +x_68 = lean_ctor_get(x_56, 1); +lean_inc(x_68); +if (lean_is_exclusive(x_56)) { + lean_ctor_release(x_56, 0); + lean_ctor_release(x_56, 1); + x_69 = x_56; +} else { + lean_dec_ref(x_56); + x_69 = lean_box(0); +} +if (lean_is_scalar(x_69)) { + x_70 = lean_alloc_ctor(1, 2, 0); +} else { + x_70 = x_69; +} +lean_ctor_set(x_70, 0, x_67); +lean_ctor_set(x_70, 1, x_68); +return x_70; +} +} +} +} +} +} +} +static lean_object* _init_l_Lean_Meta_Simp_rewritePre___closed__1() { _start: { lean_object* x_1; @@ -5634,7 +9109,7 @@ x_1 = lean_mk_string("pre"); return x_1; } } -lean_object* l_Lean_Meta_Simp_preDefault(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9) { +lean_object* l_Lean_Meta_Simp_rewritePre(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9) { _start: { lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; @@ -5643,7 +9118,7 @@ lean_inc(x_10); x_11 = lean_ctor_get(x_10, 0); lean_inc(x_11); lean_dec(x_10); -x_12 = l_Lean_Meta_Simp_preDefault___closed__1; +x_12 = l_Lean_Meta_Simp_rewritePre___closed__1; x_13 = l_Lean_Meta_Simp_rewrite(x_1, x_11, x_2, x_12, x_3, x_4, x_5, x_6, x_7, x_8, x_9); if (lean_obj_tag(x_13) == 0) { @@ -5698,7 +9173,7 @@ return x_24; } } } -static lean_object* _init_l_Lean_Meta_Simp_postDefault___closed__1() { +static lean_object* _init_l_Lean_Meta_Simp_rewritePost___closed__1() { _start: { lean_object* x_1; @@ -5706,7 +9181,7 @@ x_1 = lean_mk_string("post"); return x_1; } } -lean_object* l_Lean_Meta_Simp_postDefault(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9) { +lean_object* l_Lean_Meta_Simp_rewritePost(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9) { _start: { lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; @@ -5715,7 +9190,7 @@ lean_inc(x_10); x_11 = lean_ctor_get(x_10, 1); lean_inc(x_11); lean_dec(x_10); -x_12 = l_Lean_Meta_Simp_postDefault___closed__1; +x_12 = l_Lean_Meta_Simp_rewritePost___closed__1; x_13 = l_Lean_Meta_Simp_rewrite(x_1, x_11, x_2, x_12, x_3, x_4, x_5, x_6, x_7, x_8, x_9); if (lean_obj_tag(x_13) == 0) { @@ -5770,6 +9245,828 @@ return x_24; } } } +lean_object* l_Lean_Meta_Simp_preDefault(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9) { +_start: +{ +lean_object* x_10; +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_6); +lean_inc(x_5); +lean_inc(x_1); +x_10 = l_Lean_Meta_Simp_rewriteCtorEq_x3f(x_1, x_5, x_6, x_7, x_8, x_9); +if (lean_obj_tag(x_10) == 0) +{ +lean_object* x_11; +x_11 = lean_ctor_get(x_10, 0); +lean_inc(x_11); +if (lean_obj_tag(x_11) == 0) +{ +lean_object* x_12; lean_object* x_13; +x_12 = lean_ctor_get(x_10, 1); +lean_inc(x_12); +lean_dec(x_10); +x_13 = l_Lean_Meta_Simp_rewritePre(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_12); +return x_13; +} +else +{ +uint8_t x_14; +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_14 = !lean_is_exclusive(x_10); +if (x_14 == 0) +{ +lean_object* x_15; lean_object* x_16; lean_object* x_17; +x_15 = lean_ctor_get(x_10, 0); +lean_dec(x_15); +x_16 = lean_ctor_get(x_11, 0); +lean_inc(x_16); +lean_dec(x_11); +x_17 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_17, 0, x_16); +lean_ctor_set(x_10, 0, x_17); +return x_10; +} +else +{ +lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; +x_18 = lean_ctor_get(x_10, 1); +lean_inc(x_18); +lean_dec(x_10); +x_19 = lean_ctor_get(x_11, 0); +lean_inc(x_19); +lean_dec(x_11); +x_20 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_20, 0, x_19); +x_21 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_21, 0, x_20); +lean_ctor_set(x_21, 1, x_18); +return x_21; +} +} +} +else +{ +uint8_t x_22; +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_22 = !lean_is_exclusive(x_10); +if (x_22 == 0) +{ +return x_10; +} +else +{ +lean_object* x_23; lean_object* x_24; lean_object* x_25; +x_23 = lean_ctor_get(x_10, 0); +x_24 = lean_ctor_get(x_10, 1); +lean_inc(x_24); +lean_inc(x_23); +lean_dec(x_10); +x_25 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_25, 0, x_23); +lean_ctor_set(x_25, 1, x_24); +return x_25; +} +} +} +} +lean_object* l_Lean_Meta_Simp_postDefault(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9) { +_start: +{ +lean_object* x_10; +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_6); +lean_inc(x_5); +lean_inc(x_1); +x_10 = l_Lean_Meta_Simp_rewriteCtorEq_x3f(x_1, x_5, x_6, x_7, x_8, x_9); +if (lean_obj_tag(x_10) == 0) +{ +lean_object* x_11; +x_11 = lean_ctor_get(x_10, 0); +lean_inc(x_11); +if (lean_obj_tag(x_11) == 0) +{ +lean_object* x_12; uint8_t x_13; +x_12 = lean_ctor_get(x_3, 0); +lean_inc(x_12); +x_13 = lean_ctor_get_uint8(x_12, sizeof(void*)*1 + 9); +lean_dec(x_12); +if (x_13 == 0) +{ +lean_object* x_14; uint8_t x_15; +x_14 = lean_ctor_get(x_10, 1); +lean_inc(x_14); +lean_dec(x_10); +x_15 = l_Lean_Expr_isApp(x_1); +if (x_15 == 0) +{ +lean_object* x_16; +x_16 = l_Lean_Meta_Simp_rewritePost(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_14); +return x_16; +} +else +{ +lean_object* x_17; uint8_t x_18; +x_17 = l_Lean_Expr_getAppFn(x_1); +x_18 = l_Lean_Expr_isConst(x_17); +if (x_18 == 0) +{ +lean_object* x_19; +lean_dec(x_17); +x_19 = l_Lean_Meta_Simp_rewritePost(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_14); +return x_19; +} +else +{ +lean_object* x_20; lean_object* x_21; uint8_t x_22; +x_20 = lean_ctor_get(x_3, 3); +lean_inc(x_20); +x_21 = l_Lean_Expr_constName_x21(x_17); +lean_dec(x_17); +x_22 = l_Lean_NameSet_contains(x_20, x_21); +lean_dec(x_21); +lean_dec(x_20); +if (x_22 == 0) +{ +lean_object* x_23; +x_23 = l_Lean_Meta_Simp_rewritePost(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_14); +return x_23; +} +else +{ +lean_object* x_24; lean_object* x_25; lean_object* x_26; uint8_t x_27; +x_24 = lean_ctor_get(x_5, 0); +lean_inc(x_24); +x_25 = lean_ctor_get(x_5, 1); +lean_inc(x_25); +x_26 = lean_ctor_get(x_5, 2); +lean_inc(x_26); +x_27 = !lean_is_exclusive(x_24); +if (x_27 == 0) +{ +uint8_t x_28; lean_object* x_29; lean_object* x_30; +x_28 = 1; +lean_ctor_set_uint8(x_24, 5, x_28); +x_29 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_29, 0, x_24); +lean_ctor_set(x_29, 1, x_25); +lean_ctor_set(x_29, 2, x_26); +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_6); +lean_inc(x_1); +x_30 = l_Lean_Meta_unfoldDefinition_x3f(x_1, x_29, x_6, x_7, x_8, x_14); +if (lean_obj_tag(x_30) == 0) +{ +lean_object* x_31; +x_31 = lean_ctor_get(x_30, 0); +lean_inc(x_31); +if (lean_obj_tag(x_31) == 0) +{ +lean_object* x_32; lean_object* x_33; +x_32 = lean_ctor_get(x_30, 1); +lean_inc(x_32); +lean_dec(x_30); +x_33 = l_Lean_Meta_Simp_rewritePost(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_32); +return x_33; +} +else +{ +uint8_t x_34; +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_34 = !lean_is_exclusive(x_30); +if (x_34 == 0) +{ +lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; +x_35 = lean_ctor_get(x_30, 0); +lean_dec(x_35); +x_36 = lean_ctor_get(x_31, 0); +lean_inc(x_36); +lean_dec(x_31); +x_37 = lean_box(0); +x_38 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_38, 0, x_36); +lean_ctor_set(x_38, 1, x_37); +x_39 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_39, 0, x_38); +lean_ctor_set(x_30, 0, x_39); +return x_30; +} +else +{ +lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; +x_40 = lean_ctor_get(x_30, 1); +lean_inc(x_40); +lean_dec(x_30); +x_41 = lean_ctor_get(x_31, 0); +lean_inc(x_41); +lean_dec(x_31); +x_42 = lean_box(0); +x_43 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_43, 0, x_41); +lean_ctor_set(x_43, 1, x_42); +x_44 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_44, 0, x_43); +x_45 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_45, 0, x_44); +lean_ctor_set(x_45, 1, x_40); +return x_45; +} +} +} +else +{ +uint8_t x_46; +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_46 = !lean_is_exclusive(x_30); +if (x_46 == 0) +{ +return x_30; +} +else +{ +lean_object* x_47; lean_object* x_48; lean_object* x_49; +x_47 = lean_ctor_get(x_30, 0); +x_48 = lean_ctor_get(x_30, 1); +lean_inc(x_48); +lean_inc(x_47); +lean_dec(x_30); +x_49 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_49, 0, x_47); +lean_ctor_set(x_49, 1, x_48); +return x_49; +} +} +} +else +{ +uint8_t x_50; uint8_t x_51; uint8_t x_52; uint8_t x_53; uint8_t x_54; uint8_t x_55; uint8_t x_56; uint8_t x_57; uint8_t x_58; lean_object* x_59; lean_object* x_60; lean_object* x_61; +x_50 = lean_ctor_get_uint8(x_24, 0); +x_51 = lean_ctor_get_uint8(x_24, 1); +x_52 = lean_ctor_get_uint8(x_24, 2); +x_53 = lean_ctor_get_uint8(x_24, 3); +x_54 = lean_ctor_get_uint8(x_24, 4); +x_55 = lean_ctor_get_uint8(x_24, 6); +x_56 = lean_ctor_get_uint8(x_24, 7); +x_57 = lean_ctor_get_uint8(x_24, 8); +lean_dec(x_24); +x_58 = 1; +x_59 = lean_alloc_ctor(0, 0, 9); +lean_ctor_set_uint8(x_59, 0, x_50); +lean_ctor_set_uint8(x_59, 1, x_51); +lean_ctor_set_uint8(x_59, 2, x_52); +lean_ctor_set_uint8(x_59, 3, x_53); +lean_ctor_set_uint8(x_59, 4, x_54); +lean_ctor_set_uint8(x_59, 5, x_58); +lean_ctor_set_uint8(x_59, 6, x_55); +lean_ctor_set_uint8(x_59, 7, x_56); +lean_ctor_set_uint8(x_59, 8, x_57); +x_60 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_60, 0, x_59); +lean_ctor_set(x_60, 1, x_25); +lean_ctor_set(x_60, 2, x_26); +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_6); +lean_inc(x_1); +x_61 = l_Lean_Meta_unfoldDefinition_x3f(x_1, x_60, x_6, x_7, x_8, x_14); +if (lean_obj_tag(x_61) == 0) +{ +lean_object* x_62; +x_62 = lean_ctor_get(x_61, 0); +lean_inc(x_62); +if (lean_obj_tag(x_62) == 0) +{ +lean_object* x_63; lean_object* x_64; +x_63 = lean_ctor_get(x_61, 1); +lean_inc(x_63); +lean_dec(x_61); +x_64 = l_Lean_Meta_Simp_rewritePost(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_63); +return x_64; +} +else +{ +lean_object* x_65; lean_object* x_66; lean_object* x_67; lean_object* x_68; lean_object* x_69; lean_object* x_70; lean_object* x_71; +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_65 = lean_ctor_get(x_61, 1); +lean_inc(x_65); +if (lean_is_exclusive(x_61)) { + lean_ctor_release(x_61, 0); + lean_ctor_release(x_61, 1); + x_66 = x_61; +} else { + lean_dec_ref(x_61); + x_66 = lean_box(0); +} +x_67 = lean_ctor_get(x_62, 0); +lean_inc(x_67); +lean_dec(x_62); +x_68 = lean_box(0); +x_69 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_69, 0, x_67); +lean_ctor_set(x_69, 1, x_68); +x_70 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_70, 0, x_69); +if (lean_is_scalar(x_66)) { + x_71 = lean_alloc_ctor(0, 2, 0); +} else { + x_71 = x_66; +} +lean_ctor_set(x_71, 0, x_70); +lean_ctor_set(x_71, 1, x_65); +return x_71; +} +} +else +{ +lean_object* x_72; lean_object* x_73; lean_object* x_74; lean_object* x_75; +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_72 = lean_ctor_get(x_61, 0); +lean_inc(x_72); +x_73 = lean_ctor_get(x_61, 1); +lean_inc(x_73); +if (lean_is_exclusive(x_61)) { + lean_ctor_release(x_61, 0); + lean_ctor_release(x_61, 1); + x_74 = x_61; +} else { + lean_dec_ref(x_61); + x_74 = lean_box(0); +} +if (lean_is_scalar(x_74)) { + x_75 = lean_alloc_ctor(1, 2, 0); +} else { + x_75 = x_74; +} +lean_ctor_set(x_75, 0, x_72); +lean_ctor_set(x_75, 1, x_73); +return x_75; +} +} +} +} +} +} +else +{ +lean_object* x_76; lean_object* x_77; lean_object* x_78; +x_76 = lean_ctor_get(x_10, 1); +lean_inc(x_76); +lean_dec(x_10); +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_6); +lean_inc(x_5); +lean_inc(x_1); +x_77 = l_Lean_Meta_Simp_rewriteUsingDecide_x3f(x_1, x_5, x_6, x_7, x_8, x_76); +x_78 = lean_ctor_get(x_77, 0); +lean_inc(x_78); +if (lean_obj_tag(x_78) == 0) +{ +lean_object* x_79; uint8_t x_80; +x_79 = lean_ctor_get(x_77, 1); +lean_inc(x_79); +lean_dec(x_77); +x_80 = l_Lean_Expr_isApp(x_1); +if (x_80 == 0) +{ +lean_object* x_81; +x_81 = l_Lean_Meta_Simp_rewritePost(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_79); +return x_81; +} +else +{ +lean_object* x_82; uint8_t x_83; +x_82 = l_Lean_Expr_getAppFn(x_1); +x_83 = l_Lean_Expr_isConst(x_82); +if (x_83 == 0) +{ +lean_object* x_84; +lean_dec(x_82); +x_84 = l_Lean_Meta_Simp_rewritePost(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_79); +return x_84; +} +else +{ +lean_object* x_85; lean_object* x_86; uint8_t x_87; +x_85 = lean_ctor_get(x_3, 3); +lean_inc(x_85); +x_86 = l_Lean_Expr_constName_x21(x_82); +lean_dec(x_82); +x_87 = l_Lean_NameSet_contains(x_85, x_86); +lean_dec(x_86); +lean_dec(x_85); +if (x_87 == 0) +{ +lean_object* x_88; +x_88 = l_Lean_Meta_Simp_rewritePost(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_79); +return x_88; +} +else +{ +lean_object* x_89; lean_object* x_90; lean_object* x_91; uint8_t x_92; +x_89 = lean_ctor_get(x_5, 0); +lean_inc(x_89); +x_90 = lean_ctor_get(x_5, 1); +lean_inc(x_90); +x_91 = lean_ctor_get(x_5, 2); +lean_inc(x_91); +x_92 = !lean_is_exclusive(x_89); +if (x_92 == 0) +{ +uint8_t x_93; lean_object* x_94; lean_object* x_95; +x_93 = 1; +lean_ctor_set_uint8(x_89, 5, x_93); +x_94 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_94, 0, x_89); +lean_ctor_set(x_94, 1, x_90); +lean_ctor_set(x_94, 2, x_91); +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_6); +lean_inc(x_1); +x_95 = l_Lean_Meta_unfoldDefinition_x3f(x_1, x_94, x_6, x_7, x_8, x_79); +if (lean_obj_tag(x_95) == 0) +{ +lean_object* x_96; +x_96 = lean_ctor_get(x_95, 0); +lean_inc(x_96); +if (lean_obj_tag(x_96) == 0) +{ +lean_object* x_97; lean_object* x_98; +x_97 = lean_ctor_get(x_95, 1); +lean_inc(x_97); +lean_dec(x_95); +x_98 = l_Lean_Meta_Simp_rewritePost(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_97); +return x_98; +} +else +{ +uint8_t x_99; +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_99 = !lean_is_exclusive(x_95); +if (x_99 == 0) +{ +lean_object* x_100; lean_object* x_101; lean_object* x_102; lean_object* x_103; lean_object* x_104; +x_100 = lean_ctor_get(x_95, 0); +lean_dec(x_100); +x_101 = lean_ctor_get(x_96, 0); +lean_inc(x_101); +lean_dec(x_96); +x_102 = lean_box(0); +x_103 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_103, 0, x_101); +lean_ctor_set(x_103, 1, x_102); +x_104 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_104, 0, x_103); +lean_ctor_set(x_95, 0, x_104); +return x_95; +} +else +{ +lean_object* x_105; lean_object* x_106; lean_object* x_107; lean_object* x_108; lean_object* x_109; lean_object* x_110; +x_105 = lean_ctor_get(x_95, 1); +lean_inc(x_105); +lean_dec(x_95); +x_106 = lean_ctor_get(x_96, 0); +lean_inc(x_106); +lean_dec(x_96); +x_107 = lean_box(0); +x_108 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_108, 0, x_106); +lean_ctor_set(x_108, 1, x_107); +x_109 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_109, 0, x_108); +x_110 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_110, 0, x_109); +lean_ctor_set(x_110, 1, x_105); +return x_110; +} +} +} +else +{ +uint8_t x_111; +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_111 = !lean_is_exclusive(x_95); +if (x_111 == 0) +{ +return x_95; +} +else +{ +lean_object* x_112; lean_object* x_113; lean_object* x_114; +x_112 = lean_ctor_get(x_95, 0); +x_113 = lean_ctor_get(x_95, 1); +lean_inc(x_113); +lean_inc(x_112); +lean_dec(x_95); +x_114 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_114, 0, x_112); +lean_ctor_set(x_114, 1, x_113); +return x_114; +} +} +} +else +{ +uint8_t x_115; uint8_t x_116; uint8_t x_117; uint8_t x_118; uint8_t x_119; uint8_t x_120; uint8_t x_121; uint8_t x_122; uint8_t x_123; lean_object* x_124; lean_object* x_125; lean_object* x_126; +x_115 = lean_ctor_get_uint8(x_89, 0); +x_116 = lean_ctor_get_uint8(x_89, 1); +x_117 = lean_ctor_get_uint8(x_89, 2); +x_118 = lean_ctor_get_uint8(x_89, 3); +x_119 = lean_ctor_get_uint8(x_89, 4); +x_120 = lean_ctor_get_uint8(x_89, 6); +x_121 = lean_ctor_get_uint8(x_89, 7); +x_122 = lean_ctor_get_uint8(x_89, 8); +lean_dec(x_89); +x_123 = 1; +x_124 = lean_alloc_ctor(0, 0, 9); +lean_ctor_set_uint8(x_124, 0, x_115); +lean_ctor_set_uint8(x_124, 1, x_116); +lean_ctor_set_uint8(x_124, 2, x_117); +lean_ctor_set_uint8(x_124, 3, x_118); +lean_ctor_set_uint8(x_124, 4, x_119); +lean_ctor_set_uint8(x_124, 5, x_123); +lean_ctor_set_uint8(x_124, 6, x_120); +lean_ctor_set_uint8(x_124, 7, x_121); +lean_ctor_set_uint8(x_124, 8, x_122); +x_125 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_125, 0, x_124); +lean_ctor_set(x_125, 1, x_90); +lean_ctor_set(x_125, 2, x_91); +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_6); +lean_inc(x_1); +x_126 = l_Lean_Meta_unfoldDefinition_x3f(x_1, x_125, x_6, x_7, x_8, x_79); +if (lean_obj_tag(x_126) == 0) +{ +lean_object* x_127; +x_127 = lean_ctor_get(x_126, 0); +lean_inc(x_127); +if (lean_obj_tag(x_127) == 0) +{ +lean_object* x_128; lean_object* x_129; +x_128 = lean_ctor_get(x_126, 1); +lean_inc(x_128); +lean_dec(x_126); +x_129 = l_Lean_Meta_Simp_rewritePost(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_128); +return x_129; +} +else +{ +lean_object* x_130; lean_object* x_131; lean_object* x_132; lean_object* x_133; lean_object* x_134; lean_object* x_135; lean_object* x_136; +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_130 = lean_ctor_get(x_126, 1); +lean_inc(x_130); +if (lean_is_exclusive(x_126)) { + lean_ctor_release(x_126, 0); + lean_ctor_release(x_126, 1); + x_131 = x_126; +} else { + lean_dec_ref(x_126); + x_131 = lean_box(0); +} +x_132 = lean_ctor_get(x_127, 0); +lean_inc(x_132); +lean_dec(x_127); +x_133 = lean_box(0); +x_134 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_134, 0, x_132); +lean_ctor_set(x_134, 1, x_133); +x_135 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_135, 0, x_134); +if (lean_is_scalar(x_131)) { + x_136 = lean_alloc_ctor(0, 2, 0); +} else { + x_136 = x_131; +} +lean_ctor_set(x_136, 0, x_135); +lean_ctor_set(x_136, 1, x_130); +return x_136; +} +} +else +{ +lean_object* x_137; lean_object* x_138; lean_object* x_139; lean_object* x_140; +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_137 = lean_ctor_get(x_126, 0); +lean_inc(x_137); +x_138 = lean_ctor_get(x_126, 1); +lean_inc(x_138); +if (lean_is_exclusive(x_126)) { + lean_ctor_release(x_126, 0); + lean_ctor_release(x_126, 1); + x_139 = x_126; +} else { + lean_dec_ref(x_126); + x_139 = lean_box(0); +} +if (lean_is_scalar(x_139)) { + x_140 = lean_alloc_ctor(1, 2, 0); +} else { + x_140 = x_139; +} +lean_ctor_set(x_140, 0, x_137); +lean_ctor_set(x_140, 1, x_138); +return x_140; +} +} +} +} +} +} +else +{ +uint8_t x_141; +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_141 = !lean_is_exclusive(x_77); +if (x_141 == 0) +{ +lean_object* x_142; lean_object* x_143; lean_object* x_144; +x_142 = lean_ctor_get(x_77, 0); +lean_dec(x_142); +x_143 = lean_ctor_get(x_78, 0); +lean_inc(x_143); +lean_dec(x_78); +x_144 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_144, 0, x_143); +lean_ctor_set(x_77, 0, x_144); +return x_77; +} +else +{ +lean_object* x_145; lean_object* x_146; lean_object* x_147; lean_object* x_148; +x_145 = lean_ctor_get(x_77, 1); +lean_inc(x_145); +lean_dec(x_77); +x_146 = lean_ctor_get(x_78, 0); +lean_inc(x_146); +lean_dec(x_78); +x_147 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_147, 0, x_146); +x_148 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_148, 0, x_147); +lean_ctor_set(x_148, 1, x_145); +return x_148; +} +} +} +} +else +{ +uint8_t x_149; +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_149 = !lean_is_exclusive(x_10); +if (x_149 == 0) +{ +lean_object* x_150; lean_object* x_151; lean_object* x_152; +x_150 = lean_ctor_get(x_10, 0); +lean_dec(x_150); +x_151 = lean_ctor_get(x_11, 0); +lean_inc(x_151); +lean_dec(x_11); +x_152 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_152, 0, x_151); +lean_ctor_set(x_10, 0, x_152); +return x_10; +} +else +{ +lean_object* x_153; lean_object* x_154; lean_object* x_155; lean_object* x_156; +x_153 = lean_ctor_get(x_10, 1); +lean_inc(x_153); +lean_dec(x_10); +x_154 = lean_ctor_get(x_11, 0); +lean_inc(x_154); +lean_dec(x_11); +x_155 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_155, 0, x_154); +x_156 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_156, 0, x_155); +lean_ctor_set(x_156, 1, x_153); +return x_156; +} +} +} +else +{ +uint8_t x_157; +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_157 = !lean_is_exclusive(x_10); +if (x_157 == 0) +{ +return x_10; +} +else +{ +lean_object* x_158; lean_object* x_159; lean_object* x_160; +x_158 = lean_ctor_get(x_10, 0); +x_159 = lean_ctor_get(x_10, 1); +lean_inc(x_159); +lean_inc(x_158); +lean_dec(x_10); +x_160 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_160, 0, x_158); +lean_ctor_set(x_160, 1, x_159); +return x_160; +} +} +} +} lean_object* initialize_Init(lean_object*); lean_object* initialize_Lean_Meta_SynthInstance(lean_object*); lean_object* initialize_Lean_Meta_Tactic_Simp_Types(lean_object*); @@ -5845,10 +10142,32 @@ l_Lean_Meta_Simp_rewrite___closed__3 = _init_l_Lean_Meta_Simp_rewrite___closed__ lean_mark_persistent(l_Lean_Meta_Simp_rewrite___closed__3); l_Lean_Meta_Simp_rewrite___closed__4 = _init_l_Lean_Meta_Simp_rewrite___closed__4(); lean_mark_persistent(l_Lean_Meta_Simp_rewrite___closed__4); -l_Lean_Meta_Simp_preDefault___closed__1 = _init_l_Lean_Meta_Simp_preDefault___closed__1(); -lean_mark_persistent(l_Lean_Meta_Simp_preDefault___closed__1); -l_Lean_Meta_Simp_postDefault___closed__1 = _init_l_Lean_Meta_Simp_postDefault___closed__1(); -lean_mark_persistent(l_Lean_Meta_Simp_postDefault___closed__1); +l_Lean_Meta_Simp_rewriteCtorEq_x3f___closed__1 = _init_l_Lean_Meta_Simp_rewriteCtorEq_x3f___closed__1(); +lean_mark_persistent(l_Lean_Meta_Simp_rewriteCtorEq_x3f___closed__1); +l_Lean_Meta_Simp_rewriteCtorEq_x3f___closed__2 = _init_l_Lean_Meta_Simp_rewriteCtorEq_x3f___closed__2(); +lean_mark_persistent(l_Lean_Meta_Simp_rewriteCtorEq_x3f___closed__2); +l_Lean_Meta_Simp_rewriteCtorEq_x3f___closed__3 = _init_l_Lean_Meta_Simp_rewriteCtorEq_x3f___closed__3(); +lean_mark_persistent(l_Lean_Meta_Simp_rewriteCtorEq_x3f___closed__3); +l_Lean_Meta_Simp_rewriteUsingDecide_x3f___closed__1 = _init_l_Lean_Meta_Simp_rewriteUsingDecide_x3f___closed__1(); +lean_mark_persistent(l_Lean_Meta_Simp_rewriteUsingDecide_x3f___closed__1); +l_Lean_Meta_Simp_rewriteUsingDecide_x3f___closed__2 = _init_l_Lean_Meta_Simp_rewriteUsingDecide_x3f___closed__2(); +lean_mark_persistent(l_Lean_Meta_Simp_rewriteUsingDecide_x3f___closed__2); +l_Lean_Meta_Simp_rewriteUsingDecide_x3f___closed__3 = _init_l_Lean_Meta_Simp_rewriteUsingDecide_x3f___closed__3(); +lean_mark_persistent(l_Lean_Meta_Simp_rewriteUsingDecide_x3f___closed__3); +l_Lean_Meta_Simp_rewriteUsingDecide_x3f___closed__4 = _init_l_Lean_Meta_Simp_rewriteUsingDecide_x3f___closed__4(); +lean_mark_persistent(l_Lean_Meta_Simp_rewriteUsingDecide_x3f___closed__4); +l_Lean_Meta_Simp_rewriteUsingDecide_x3f___closed__5 = _init_l_Lean_Meta_Simp_rewriteUsingDecide_x3f___closed__5(); +lean_mark_persistent(l_Lean_Meta_Simp_rewriteUsingDecide_x3f___closed__5); +l_Lean_Meta_Simp_rewriteUsingDecide_x3f___closed__6 = _init_l_Lean_Meta_Simp_rewriteUsingDecide_x3f___closed__6(); +lean_mark_persistent(l_Lean_Meta_Simp_rewriteUsingDecide_x3f___closed__6); +l_Lean_Meta_Simp_rewriteUsingDecide_x3f___closed__7 = _init_l_Lean_Meta_Simp_rewriteUsingDecide_x3f___closed__7(); +lean_mark_persistent(l_Lean_Meta_Simp_rewriteUsingDecide_x3f___closed__7); +l_Lean_Meta_Simp_rewriteUsingDecide_x3f___closed__8 = _init_l_Lean_Meta_Simp_rewriteUsingDecide_x3f___closed__8(); +lean_mark_persistent(l_Lean_Meta_Simp_rewriteUsingDecide_x3f___closed__8); +l_Lean_Meta_Simp_rewritePre___closed__1 = _init_l_Lean_Meta_Simp_rewritePre___closed__1(); +lean_mark_persistent(l_Lean_Meta_Simp_rewritePre___closed__1); +l_Lean_Meta_Simp_rewritePost___closed__1 = _init_l_Lean_Meta_Simp_rewritePost___closed__1(); +lean_mark_persistent(l_Lean_Meta_Simp_rewritePost___closed__1); return lean_io_result_mk_ok(lean_box(0)); } #ifdef __cplusplus diff --git a/stage0/stdlib/Lean/Meta/Tactic/Simp/SimpLemmas.c b/stage0/stdlib/Lean/Meta/Tactic/Simp/SimpLemmas.c index e6e0a61660..f906eb53f2 100644 --- a/stage0/stdlib/Lean/Meta/Tactic/Simp/SimpLemmas.c +++ b/stage0/stdlib/Lean/Meta/Tactic/Simp/SimpLemmas.c @@ -1,6 +1,6 @@ // Lean compiler output // Module: Lean.Meta.Tactic.Simp.SimpLemmas -// Imports: Init Lean.ScopedEnvExtension Lean.Util.Recognizers Lean.Meta.LevelDefEq Lean.Meta.DiscrTree +// Imports: Init Lean.ScopedEnvExtension Lean.Util.Recognizers Lean.Meta.LevelDefEq Lean.Meta.DiscrTree Lean.Meta.AppBuilder #include #if defined(__clang__) #pragma clang diagnostic ignored "-Wunused-parameter" @@ -14,29 +14,36 @@ extern "C" { #endif lean_object* l_Lean_Meta_mkSimpLemmaCore_match__1___rarg(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_208____closed__2; +lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_1455____lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); size_t l_USize_add(size_t, size_t); -lean_object* l___private_Lean_Meta_Basic_0__Lean_Meta_withNewMCtxDepthImp___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_modifyM___at_Lean_Meta_addSimpLemmaEntry___spec__15(lean_object*, lean_object*, lean_object*); lean_object* l_Std_PersistentHashMap_insertAtCollisionNodeAux___at_Lean_Meta_addSimpLemmaEntry___spec__10(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_stringToMessageData(lean_object*); lean_object* l_Lean_Meta_SimpLemma_name_x3f___default; lean_object* l_Std_fmt___at_Lean_Position_instToFormatPosition___spec__1(lean_object*); lean_object* lean_nat_div(lean_object*, lean_object*); +lean_object* l_List_map___at_Lean_Meta_addInstance___spec__1(lean_object*); lean_object* l_Lean_Meta_mkSimpLemmaCore_match__5___rarg(lean_object*, lean_object*); lean_object* l_Lean_Meta_addSimpLemmaEntry(lean_object*, lean_object*); +lean_object* l_Lean_Meta_mkSimpLemmaCore_match__6(lean_object*); +extern lean_object* l_Lean_Meta_Instances_discrTree___default___closed__1; +extern lean_object* l_myMacro____x40_Init_Core___hyg_1796____closed__4; lean_object* l_Array_back___at_Lean_Meta_addSimpLemmaEntry___spec__16___boxed(lean_object*); lean_object* l_Lean_Meta_SimpLemmas_add___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_name_mk_string(lean_object*, lean_object*); lean_object* l_Std_PersistentHashMap_insertAux___at_Lean_Meta_addSimpLemmaEntry___spec__6___boxed__const__2; -lean_object* l_Lean_ScopedEnvExtension_add___at_Lean_Meta_addSimpLemma___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Std_PersistentHashMap_findAtAux___at_Lean_Meta_addSimpLemmaEntry___spec__4(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_contains___at_Lean_Meta_addSimpLemmaEntry___spec__13___lambda__1___boxed(lean_object*, lean_object*); lean_object* l_Lean_Meta_instInhabitedSimpLemmas___closed__1; lean_object* l_Lean_Meta_mkSimpLemmaCore_match__1(lean_object*); lean_object* l_Lean_Meta_mkSimpLemmaCore___lambda__4___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_instInhabitedSimpLemmas; +lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_208____closed__1; lean_object* l_Lean_Meta_withLocalDecl___at___private_Lean_Meta_Tactic_Simp_SimpLemmas_0__Lean_Meta_isPerm___spec__1(lean_object*); +lean_object* l_Lean_Meta_mkSimpLemmaCore___lambda__3___closed__3; lean_object* l_Lean_registerSimpleScopedEnvExtension___rarg(lean_object*, lean_object*); +lean_object* l_Lean_throwError___at_Lean_Meta_addDefaultInstance___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Parser_Tactic_simpPost___closed__2; lean_object* l___private_Lean_Meta_Basic_0__Lean_Meta_withLocalDeclImp___rarg(lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Std_Format_join___closed__1; @@ -64,16 +71,14 @@ lean_object* l_Lean_ScopedEnvExtension_addScopedEntry___rarg(lean_object*, lean_ uint8_t l_Array_contains___at_Lean_Meta_addSimpLemmaEntry___spec__13(lean_object*, lean_object*); lean_object* l_Lean_Expr_appArg_x21(lean_object*); lean_object* l_Lean_Meta_instInhabitedSimpLemma___closed__1; -lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_1375____lambda__1(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*); lean_object* l_Std_PersistentHashMap_findAux___at_Lean_Meta_addSimpLemmaEntry___spec__3___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Array_modifyM___at_Lean_Meta_addSimpLemmaEntry___spec__15___boxed(lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Meta_Tactic_Simp_SimpLemmas_0__Lean_Meta_beqSimpLemmaKind____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_11__match__1___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_Tactic_Simp_SimpLemmas_0__Lean_Meta_beqSimpLemmaKind____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_11__match__1___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Std_PersistentHashMap_insertAux___at_Lean_Meta_addSimpLemmaEntry___spec__6(lean_object*, size_t, size_t, lean_object*, lean_object*); lean_object* lean_nat_add(lean_object*, lean_object*); -lean_object* l_Lean_throwError___at_Lean_Meta_mkSimpLemmaCore___spec__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_ScopedEnvExtension_instInhabitedDescr___rarg___closed__1; lean_object* l_Lean_ScopedEnvExtension_getState___at_Lean_Meta_getSimpLemmas___spec__1___boxed(lean_object*, lean_object*); -lean_object* l___private_Lean_Meta_Tactic_Simp_SimpLemmas_0__Lean_Meta_beqSimpLemmaKind____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_11__match__1___rarg(uint8_t, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_Tactic_Simp_SimpLemmas_0__Lean_Meta_beqSimpLemmaKind____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_11__match__1___rarg(uint8_t, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_mkSimpLemmaCore_match__4(lean_object*); lean_object* l_Lean_Meta_withLocalDecl___at___private_Lean_Meta_Tactic_Simp_SimpLemmas_0__Lean_Meta_isPerm___spec__1___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_myMacro____x40_Init_Notation___hyg_13855____closed__9; @@ -86,10 +91,11 @@ lean_object* l_Lean_getAttrParamOptPrio(lean_object*, lean_object*, lean_object* lean_object* l_Lean_ConstantInfo_levelParams(lean_object*); lean_object* l_Lean_Meta_getSimpLemmas(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_instToFormatSimpLemma(lean_object*); -lean_object* l_Lean_Meta_SimpLemmas_pre___default___closed__1; lean_object* lean_array_fget(lean_object*, lean_object*); uint8_t lean_nat_dec_eq(lean_object*, lean_object*); lean_object* l_Lean_Meta_instToFormatSimpLemma___closed__2; +lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_208____closed__4; +lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_1455____lambda__1(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Meta_DiscrTree_0__Lean_Meta_DiscrTree_insertAux___at_Lean_Meta_addSimpLemmaEntry___spec__11(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_SimpLemma_getValue_match__1___rarg(lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Meta_Basic_0__Lean_Meta_forallMetaTelescopeReducingAux(lean_object*, uint8_t, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -107,7 +113,6 @@ extern lean_object* l_myMacro____x40_Init_Core___hyg_172____closed__4; extern lean_object* l_Lean_Meta_DiscrTree_root___default___closed__1; lean_object* l_Lean_Meta_instBEqSimpLemmaKind___closed__1; lean_object* l_Lean_Meta_mkSimpLemma(lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Meta_withNewMCtxDepth___at_Lean_Meta_mkSimpLemmaCore___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_simpExtension; lean_object* l_Lean_Meta_simpExtension___closed__2; uint8_t l_Lean_Meta_instInhabitedSimpLemmaKind; @@ -118,45 +123,46 @@ lean_object* l_Std_PersistentHashMap_findAux___at_Lean_Meta_addSimpLemmaEntry___ lean_object* l_Lean_Meta_instToFormatSimpLemma___closed__1; lean_object* lean_array_fset(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_instToMessageDataSimpLemma(lean_object*); +lean_object* l_List_mapM___at___private_Lean_Meta_AppBuilder_0__Lean_Meta_mkFun___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Meta_instMetaEvalMetaM___rarg___closed__1; lean_object* l___private_Init_Data_Array_BinSearch_0__Array_binInsertAux___at_Lean_Meta_addSimpLemmaEntry___spec__17(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_addSimpLemma___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_MetaM_run___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Std_PersistentHashMap_insertAux___at_Lean_Meta_addSimpLemmaEntry___spec__6___lambda__1(lean_object*, lean_object*, size_t, size_t, size_t, size_t, lean_object*); -lean_object* l_Lean_throwError___at_Lean_Meta_mkSimpLemmaCore___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_208____closed__3; extern lean_object* l_myMacro____x40_Init_Notation___hyg_8971____closed__4; lean_object* l_Lean_Meta_withLetDecl___at___private_Lean_Meta_Tactic_Simp_SimpLemmas_0__Lean_Meta_isPerm___spec__2___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_ScopedEnvExtension_getState___at_Lean_Meta_getSimpLemmas___spec__1(lean_object*, lean_object*); +lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_208____closed__5; lean_object* l_Lean_Meta_addSimpLemma(lean_object*, uint8_t, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_mkSimpLemmaCore___lambda__3(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_modifyM___at_Lean_Meta_addSimpLemmaEntry___spec__9___boxed(lean_object*, lean_object*, lean_object*); uint8_t l_Lean_Expr_isAppOfArity(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_1455____closed__4; lean_object* l_Array_back___at_Lean_Meta_addSimpLemmaEntry___spec__16(lean_object*); -lean_object* l_List_map___at_Lean_Meta_addSimpLemma___spec__1(lean_object*); extern lean_object* l_Lean_MetavarContext_instantiateLevelMVars___at_Lean_Meta_instantiateLevelMVars___spec__1___closed__5; lean_object* l_Lean_registerBuiltinAttribute(lean_object*, lean_object*); extern lean_object* l_Lean_KernelException_toMessageData___closed__15; uint8_t l_Array_isEmpty___rarg(lean_object*); -lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_1375____closed__5; lean_object* l_Lean_Meta_mkSimpLemmaCore(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); size_t l_USize_mul(size_t, size_t); -lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_1375____closed__3; +lean_object* l_Lean_ScopedEnvExtension_add___at_Lean_Meta_addSimpLemma___spec__1(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Init_Data_Array_BinSearch_0__Array_binInsertAux___at_Lean_Meta_addSimpLemmaEntry___spec__17___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_1375____lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_203____closed__5; uint8_t l___private_Lean_Meta_Tactic_Simp_SimpLemmas_0__Lean_Meta_beqSimpLemmaKind____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_11_(uint8_t, uint8_t); lean_object* l_Lean_Meta_mkSimpLemmaCore___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Std_PersistentHashMap_insert___at_Lean_Meta_addSimpLemmaEntry___spec__5(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_mkSimpLemmaCore___lambda__3___closed__2; lean_object* l_Lean_Meta_getSimpLemmas___rarg(lean_object*, lean_object*); size_t l_USize_land(size_t, size_t); +lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_1455____closed__1; lean_object* l___private_Lean_Meta_Tactic_Simp_SimpLemmas_0__Lean_Meta_isPerm_match__1(lean_object*); lean_object* l_Lean_Meta_DiscrTree_mkPath(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_getConstInfo___at_Lean_Meta_getParamNames___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Std_PersistentHashMap_insertAux___at_Lean_Meta_addSimpLemmaEntry___spec__6___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_1375_(lean_object*); -lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_203_(lean_object*); +lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_1455_(lean_object*); +lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_208_(lean_object*); lean_object* l_Std_fmt___at_Lean_Level_PP_Result_format___spec__1(lean_object*); +lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_1455____closed__2; extern lean_object* l_Array_modifyM___at___private_Lean_Meta_DiscrTree_0__Lean_Meta_DiscrTree_insertAux___spec__2___rarg___closed__1; lean_object* l_Lean_Meta_mkSimpLemmaCore___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_mkSimpLemmaCore___closed__2; @@ -176,7 +182,6 @@ lean_object* l_Lean_Meta_mkSimpLemmaCore___lambda__3___closed__1; uint8_t l_USize_decLe(size_t, size_t); lean_object* l_Lean_Meta_SimpLemma_getValue___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_mkSimpLemmaCore___lambda__3___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_203____closed__3; lean_object* l_Lean_Meta_mkSimpLemmaCore___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_SimpLemma_getName_match__1___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Syntax_getKind(lean_object*); @@ -187,14 +192,12 @@ extern lean_object* l_Lean_Parser_Tactic_simp___closed__1; lean_object* l_Lean_Meta_mkSimpLemmaCore_match__3(lean_object*); extern lean_object* l_Lean_instInhabitedExpr___closed__1; lean_object* l_Lean_Meta_SimpLemmas_add(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_List_mapM___at_Lean_Meta_SimpLemma_getValue___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); uint8_t l_Lean_Meta_DiscrTree_Key_lt(lean_object*, lean_object*); extern lean_object* l_Lean_instInhabitedPersistentEnvExtension___closed__5; lean_object* l_Lean_Meta_getSimpLemmas___rarg___boxed(lean_object*, lean_object*); lean_object* l___private_Lean_Meta_Tactic_Simp_SimpLemmas_0__Lean_Meta_beqSimpLemmaKind____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_11____boxed(lean_object*, lean_object*); lean_object* l___private_Lean_Meta_Tactic_Simp_SimpLemmas_0__Lean_Meta_isPerm___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_st_ref_set(lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_addMessageContextFull___at_Lean_Meta_instAddMessageContextMetaM___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Std_PersistentHashMap_insertAux_traverse___at_Lean_Meta_addSimpLemmaEntry___spec__7___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); uint8_t l_Array_contains___at_Lean_Meta_addSimpLemmaEntry___spec__13___lambda__1(lean_object*, lean_object*); uint8_t l_Lean_Syntax_isNone(lean_object*); @@ -203,57 +206,52 @@ lean_object* l_Lean_Meta_inferType(lean_object*, lean_object*, lean_object*, lea lean_object* l_Array_modifyM___at_Lean_Meta_addSimpLemmaEntry___spec__9(lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_ScopedEnvExtension_getState___rarg___closed__3; lean_object* l_Lean_Meta_isExprDefEq(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_203____closed__4; lean_object* l_Lean_Meta_instantiateMVars(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_ScopedEnvExtension_add___at_Lean_Meta_addSimpLemma___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_EnvExtensionInterfaceUnsafe_instInhabitedExt___closed__1; -lean_object* l_Lean_Meta_mkSimpLemmaCore_match__4___rarg(lean_object*, lean_object*); +lean_object* l_Lean_Meta_mkSimpLemmaCore_match__4___rarg(lean_object*, lean_object*, lean_object*); extern size_t l_Std_PersistentHashMap_insertAux___rarg___closed__2; lean_object* l_Lean_PersistentEnvExtension_getState___rarg(lean_object*, lean_object*); lean_object* l_Lean_Meta_mkSimpLemma___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_ScopedEnvExtension_addEntry___rarg(lean_object*, lean_object*, lean_object*); -lean_object* l_List_mapM___at_Lean_Meta_SimpLemma_getValue___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Std_PersistentHashMap_find_x3f___at_Lean_Meta_addSimpLemmaEntry___spec__2(lean_object*, lean_object*); lean_object* l___private_Lean_Meta_Tactic_Simp_SimpLemmas_0__Lean_Meta_isPerm(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_SimpLemma_getValue(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Std_PersistentHashMap_insertAux___at_Lean_Meta_addSimpLemmaEntry___spec__6___boxed__const__1; -lean_object* l_Lean_Meta_mkFreshLevelMVar___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Syntax_getArg(lean_object*, lean_object*); lean_object* l_Lean_Meta_simpExtension___lambda__1___boxed(lean_object*); -lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_203____closed__1; lean_object* l_Array_modify___at_Lean_Meta_addSimpLemmaEntry___spec__8___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Array_binInsertM___at_Lean_Meta_addSimpLemmaEntry___spec__14___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Meta_Tactic_Simp_SimpLemmas_0__Lean_Meta_beqSimpLemmaKind____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_11__match__1(lean_object*); +lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_1455____closed__3; lean_object* l_Lean_Meta_instToFormatSimpLemma___closed__3; uint8_t l_List_isEmpty___rarg(lean_object*); lean_object* l_Lean_Meta_SimpLemmas_addConst(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_mkLevelParam(lean_object*); lean_object* l_Lean_Meta_simpExtension___closed__1; lean_object* lean_usize_to_nat(size_t); lean_object* l___private_Lean_Meta_Basic_0__Lean_Meta_withLetDeclImp___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_203____closed__2; -lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_1375____closed__4; +lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_1455____closed__5; +lean_object* l_Lean_Meta_mkEq(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_isProp(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Meta_Tactic_Simp_SimpLemmas_0__Lean_Meta_isPerm_match__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_SimpLemma_getName___closed__2; lean_object* l_Lean_indentExpr(lean_object*); lean_object* l___private_Init_Data_Array_BinSearch_0__Array_binInsertAux___at_Lean_Meta_addSimpLemmaEntry___spec__17___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_withNewMCtxDepth___at_Lean_Meta_synthInstance_x3f___spec__4___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); uint8_t l_Lean_Meta_instBEqSimpLemma(lean_object*, lean_object*); -lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_1375____closed__2; lean_object* l_Lean_mkConst(lean_object*, lean_object*); lean_object* l_Lean_Meta_SimpLemmas_addConst___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Meta_Tactic_Simp_SimpLemmas_0__Lean_Meta_isPerm___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_insertAt___rarg(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_mkSimpLemmaCore_match__6___rarg(lean_object*, lean_object*); lean_object* l_Lean_Meta_SimpLemma_getName___boxed(lean_object*); lean_object* l_Lean_Meta_SimpLemma_getName___closed__1; size_t l_Lean_Meta_DiscrTree_Key_hash(lean_object*); lean_object* lean_expr_update_const(lean_object*, lean_object*); lean_object* l___private_Init_Data_Array_BinSearch_0__Array_binInsertAux___at_Lean_Meta_addSimpLemmaEntry___spec__17___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_1375____closed__1; lean_object* l_Lean_Meta_getSimpLemmas___boxed(lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Meta_DiscrTree_instInhabitedTrie___closed__1; lean_object* l_Lean_Meta_withLocalDecl___at___private_Lean_Meta_Tactic_Simp_SimpLemmas_0__Lean_Meta_isPerm___spec__1___rarg(lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Meta_DiscrTree_empty(lean_object*); -lean_object* l_Lean_Meta_withNewMCtxDepth___at_Lean_Meta_mkSimpLemmaCore___spec__1(lean_object*); lean_object* l_Std_PersistentHashMap_insertAux_traverse___at_Lean_Meta_addSimpLemmaEntry___spec__7(size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_mkSimpLemmaCore_match__3___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_DiscrTree_insertCore___at_Lean_Meta_addSimpLemmaEntry___spec__1(lean_object*, lean_object*, lean_object*); @@ -261,7 +259,6 @@ lean_object* l_Std_PersistentHashMap_mkCollisionNode___rarg(lean_object*, lean_o lean_object* l_Lean_Meta_withLetDecl___at___private_Lean_Meta_Tactic_Simp_SimpLemmas_0__Lean_Meta_isPerm___spec__2(lean_object*); uint8_t lean_nat_dec_lt(lean_object*, lean_object*); lean_object* l_Std_fmt___at_Lean_Meta_instToMessageDataSimpLemma___spec__1(lean_object*); -lean_object* l_Lean_ScopedEnvExtension_add___at_Lean_Meta_addSimpLemma___spec__2(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static uint8_t _init_l_Lean_Meta_instInhabitedSimpLemmaKind() { _start: { @@ -270,112 +267,143 @@ x_1 = 0; return x_1; } } -lean_object* l___private_Lean_Meta_Tactic_Simp_SimpLemmas_0__Lean_Meta_beqSimpLemmaKind____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_11__match__1___rarg(uint8_t x_1, uint8_t x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { +lean_object* l___private_Lean_Meta_Tactic_Simp_SimpLemmas_0__Lean_Meta_beqSimpLemmaKind____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_11__match__1___rarg(uint8_t x_1, uint8_t x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { _start: { switch (x_1) { case 0: { -lean_object* x_8; +lean_object* x_9; +lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); -x_8 = lean_box(x_2); -if (lean_obj_tag(x_8) == 0) +x_9 = lean_box(x_2); +if (lean_obj_tag(x_9) == 0) { -lean_object* x_9; lean_object* x_10; -lean_dec(x_7); -x_9 = lean_box(0); -x_10 = lean_apply_1(x_3, x_9); -return x_10; +lean_object* x_10; lean_object* x_11; +lean_dec(x_8); +x_10 = lean_box(0); +x_11 = lean_apply_1(x_3, x_10); +return x_11; } else { -lean_object* x_11; lean_object* x_12; lean_object* x_13; -lean_dec(x_8); +lean_object* x_12; lean_object* x_13; lean_object* x_14; +lean_dec(x_9); lean_dec(x_3); -x_11 = lean_box(x_1); -x_12 = lean_box(x_2); -x_13 = lean_apply_2(x_7, x_11, x_12); -return x_13; +x_12 = lean_box(x_1); +x_13 = lean_box(x_2); +x_14 = lean_apply_2(x_8, x_12, x_13); +return x_14; } } case 1: { -lean_object* x_14; +lean_object* x_15; +lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); lean_dec(x_3); -x_14 = lean_box(x_2); -if (lean_obj_tag(x_14) == 1) +x_15 = lean_box(x_2); +if (lean_obj_tag(x_15) == 1) { -lean_object* x_15; lean_object* x_16; -lean_dec(x_7); -x_15 = lean_box(0); -x_16 = lean_apply_1(x_4, x_15); -return x_16; +lean_object* x_16; lean_object* x_17; +lean_dec(x_8); +x_16 = lean_box(0); +x_17 = lean_apply_1(x_4, x_16); +return x_17; } else { -lean_object* x_17; lean_object* x_18; lean_object* x_19; -lean_dec(x_14); +lean_object* x_18; lean_object* x_19; lean_object* x_20; +lean_dec(x_15); lean_dec(x_4); -x_17 = lean_box(x_1); -x_18 = lean_box(x_2); -x_19 = lean_apply_2(x_7, x_17, x_18); -return x_19; +x_18 = lean_box(x_1); +x_19 = lean_box(x_2); +x_20 = lean_apply_2(x_8, x_18, x_19); +return x_20; } } case 2: { -lean_object* x_20; +lean_object* x_21; +lean_dec(x_7); lean_dec(x_6); lean_dec(x_4); lean_dec(x_3); -x_20 = lean_box(x_2); -if (lean_obj_tag(x_20) == 2) +x_21 = lean_box(x_2); +if (lean_obj_tag(x_21) == 2) { -lean_object* x_21; lean_object* x_22; -lean_dec(x_7); -x_21 = lean_box(0); -x_22 = lean_apply_1(x_5, x_21); -return x_22; +lean_object* x_22; lean_object* x_23; +lean_dec(x_8); +x_22 = lean_box(0); +x_23 = lean_apply_1(x_5, x_22); +return x_23; } else { -lean_object* x_23; lean_object* x_24; lean_object* x_25; -lean_dec(x_20); +lean_object* x_24; lean_object* x_25; lean_object* x_26; +lean_dec(x_21); lean_dec(x_5); -x_23 = lean_box(x_1); -x_24 = lean_box(x_2); -x_25 = lean_apply_2(x_7, x_23, x_24); -return x_25; +x_24 = lean_box(x_1); +x_25 = lean_box(x_2); +x_26 = lean_apply_2(x_8, x_24, x_25); +return x_26; +} +} +case 3: +{ +lean_object* x_27; +lean_dec(x_7); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +x_27 = lean_box(x_2); +if (lean_obj_tag(x_27) == 3) +{ +lean_object* x_28; lean_object* x_29; +lean_dec(x_8); +x_28 = lean_box(0); +x_29 = lean_apply_1(x_6, x_28); +return x_29; +} +else +{ +lean_object* x_30; lean_object* x_31; lean_object* x_32; +lean_dec(x_27); +lean_dec(x_6); +x_30 = lean_box(x_1); +x_31 = lean_box(x_2); +x_32 = lean_apply_2(x_8, x_30, x_31); +return x_32; } } default: { -lean_object* x_26; +lean_object* x_33; +lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_3); -x_26 = lean_box(x_2); -if (lean_obj_tag(x_26) == 3) +x_33 = lean_box(x_2); +if (lean_obj_tag(x_33) == 4) { -lean_object* x_27; lean_object* x_28; -lean_dec(x_7); -x_27 = lean_box(0); -x_28 = lean_apply_1(x_6, x_27); -return x_28; +lean_object* x_34; lean_object* x_35; +lean_dec(x_8); +x_34 = lean_box(0); +x_35 = lean_apply_1(x_7, x_34); +return x_35; } else { -lean_object* x_29; lean_object* x_30; lean_object* x_31; -lean_dec(x_26); -lean_dec(x_6); -x_29 = lean_box(x_1); -x_30 = lean_box(x_2); -x_31 = lean_apply_2(x_7, x_29, x_30); -return x_31; +lean_object* x_36; lean_object* x_37; lean_object* x_38; +lean_dec(x_33); +lean_dec(x_7); +x_36 = lean_box(x_1); +x_37 = lean_box(x_2); +x_38 = lean_apply_2(x_8, x_36, x_37); +return x_38; } } } @@ -385,20 +413,20 @@ lean_object* l___private_Lean_Meta_Tactic_Simp_SimpLemmas_0__Lean_Meta_beqSimpLe _start: { lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l___private_Lean_Meta_Tactic_Simp_SimpLemmas_0__Lean_Meta_beqSimpLemmaKind____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_11__match__1___rarg___boxed), 7, 0); +x_2 = lean_alloc_closure((void*)(l___private_Lean_Meta_Tactic_Simp_SimpLemmas_0__Lean_Meta_beqSimpLemmaKind____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_11__match__1___rarg___boxed), 8, 0); return x_2; } } -lean_object* l___private_Lean_Meta_Tactic_Simp_SimpLemmas_0__Lean_Meta_beqSimpLemmaKind____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_11__match__1___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { +lean_object* l___private_Lean_Meta_Tactic_Simp_SimpLemmas_0__Lean_Meta_beqSimpLemmaKind____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_11__match__1___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { _start: { -uint8_t x_8; uint8_t x_9; lean_object* x_10; -x_8 = lean_unbox(x_1); +uint8_t x_9; uint8_t x_10; lean_object* x_11; +x_9 = lean_unbox(x_1); lean_dec(x_1); -x_9 = lean_unbox(x_2); +x_10 = lean_unbox(x_2); lean_dec(x_2); -x_10 = l___private_Lean_Meta_Tactic_Simp_SimpLemmas_0__Lean_Meta_beqSimpLemmaKind____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_11__match__1___rarg(x_8, x_9, x_3, x_4, x_5, x_6, x_7); -return x_10; +x_11 = l___private_Lean_Meta_Tactic_Simp_SimpLemmas_0__Lean_Meta_beqSimpLemmaKind____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_11__match__1___rarg(x_9, x_10, x_3, x_4, x_5, x_6, x_7, x_8); +return x_11; } } uint8_t l___private_Lean_Meta_Tactic_Simp_SimpLemmas_0__Lean_Meta_beqSimpLemmaKind____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_11_(uint8_t x_1, uint8_t x_2) { @@ -459,7 +487,7 @@ x_11 = 0; return x_11; } } -default: +case 3: { lean_object* x_12; x_12 = lean_box(x_2); @@ -477,6 +505,24 @@ x_14 = 0; return x_14; } } +default: +{ +lean_object* x_15; +x_15 = lean_box(x_2); +if (lean_obj_tag(x_15) == 4) +{ +uint8_t x_16; +x_16 = 1; +return x_16; +} +else +{ +uint8_t x_17; +lean_dec(x_15); +x_17 = 0; +return x_17; +} +} } } } @@ -765,19 +811,11 @@ x_4 = lean_box(x_3); return x_4; } } -static lean_object* _init_l_Lean_Meta_SimpLemmas_pre___default___closed__1() { -_start: -{ -lean_object* x_1; -x_1 = l_Lean_Meta_DiscrTree_empty(lean_box(0)); -return x_1; -} -} static lean_object* _init_l_Lean_Meta_SimpLemmas_pre___default() { _start: { lean_object* x_1; -x_1 = l_Lean_Meta_SimpLemmas_pre___default___closed__1; +x_1 = l_Lean_Meta_Instances_discrTree___default___closed__1; return x_1; } } @@ -785,7 +823,7 @@ static lean_object* _init_l_Lean_Meta_SimpLemmas_post___default() { _start: { lean_object* x_1; -x_1 = l_Lean_Meta_SimpLemmas_pre___default___closed__1; +x_1 = l_Lean_Meta_Instances_discrTree___default___closed__1; return x_1; } } @@ -2077,7 +2115,7 @@ lean_dec(x_6); return x_7; } } -static lean_object* _init_l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_203____closed__1() { +static lean_object* _init_l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_208____closed__1() { _start: { lean_object* x_1; @@ -2085,28 +2123,28 @@ x_1 = lean_mk_string("simpExt"); return x_1; } } -static lean_object* _init_l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_203____closed__2() { +static lean_object* _init_l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_208____closed__2() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = lean_box(0); -x_2 = l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_203____closed__1; +x_2 = l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_208____closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; } } -static lean_object* _init_l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_203____closed__3() { +static lean_object* _init_l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_208____closed__3() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Meta_SimpLemmas_pre___default___closed__1; +x_1 = l_Lean_Meta_Instances_discrTree___default___closed__1; x_2 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_2, 0, x_1); lean_ctor_set(x_2, 1, x_1); return x_2; } } -static lean_object* _init_l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_203____closed__4() { +static lean_object* _init_l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_208____closed__4() { _start: { lean_object* x_1; @@ -2114,13 +2152,13 @@ x_1 = lean_alloc_closure((void*)(l_Lean_Meta_addSimpLemmaEntry), 2, 0); return x_1; } } -static lean_object* _init_l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_203____closed__5() { +static lean_object* _init_l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_208____closed__5() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; -x_1 = l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_203____closed__2; -x_2 = l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_203____closed__4; -x_3 = l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_203____closed__3; +x_1 = l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_208____closed__2; +x_2 = l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_208____closed__4; +x_3 = l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_208____closed__3; x_4 = l_Applicative_seqRight___default___rarg___closed__1; x_5 = lean_alloc_ctor(0, 4, 0); lean_ctor_set(x_5, 0, x_1); @@ -2130,11 +2168,11 @@ lean_ctor_set(x_5, 3, x_4); return x_5; } } -lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_203_(lean_object* x_1) { +lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_208_(lean_object* x_1) { _start: { lean_object* x_2; lean_object* x_3; -x_2 = l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_203____closed__5; +x_2 = l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_208____closed__5; x_3 = l_Lean_registerSimpleScopedEnvExtension___rarg(x_2, x_1); return x_3; } @@ -3572,6 +3610,47 @@ return x_5; } else { +lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; +lean_dec(x_3); +x_6 = lean_ctor_get(x_1, 0); +lean_inc(x_6); +lean_dec(x_1); +x_7 = lean_ctor_get(x_6, 1); +lean_inc(x_7); +x_8 = lean_ctor_get(x_6, 0); +lean_inc(x_8); +lean_dec(x_6); +x_9 = lean_ctor_get(x_7, 0); +lean_inc(x_9); +x_10 = lean_ctor_get(x_7, 1); +lean_inc(x_10); +lean_dec(x_7); +x_11 = lean_apply_3(x_2, x_8, x_9, x_10); +return x_11; +} +} +} +lean_object* l_Lean_Meta_mkSimpLemmaCore_match__2(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_Lean_Meta_mkSimpLemmaCore_match__2___rarg), 3, 0); +return x_2; +} +} +lean_object* l_Lean_Meta_mkSimpLemmaCore_match__3___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +if (lean_obj_tag(x_1) == 0) +{ +lean_object* x_4; lean_object* x_5; +lean_dec(x_2); +x_4 = lean_box(0); +x_5 = lean_apply_1(x_3, x_4); +return x_5; +} +else +{ lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_dec(x_3); x_6 = lean_ctor_get(x_1, 0); @@ -3587,15 +3666,15 @@ return x_9; } } } -lean_object* l_Lean_Meta_mkSimpLemmaCore_match__2(lean_object* x_1) { +lean_object* l_Lean_Meta_mkSimpLemmaCore_match__3(lean_object* x_1) { _start: { lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l_Lean_Meta_mkSimpLemmaCore_match__2___rarg), 3, 0); +x_2 = lean_alloc_closure((void*)(l_Lean_Meta_mkSimpLemmaCore_match__3___rarg), 3, 0); return x_2; } } -lean_object* l_Lean_Meta_mkSimpLemmaCore_match__3___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +lean_object* l_Lean_Meta_mkSimpLemmaCore_match__4___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3) { _start: { if (lean_obj_tag(x_1) == 0) @@ -3628,37 +3707,11 @@ return x_11; } } } -lean_object* l_Lean_Meta_mkSimpLemmaCore_match__3(lean_object* x_1) { -_start: -{ -lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l_Lean_Meta_mkSimpLemmaCore_match__3___rarg), 3, 0); -return x_2; -} -} -lean_object* l_Lean_Meta_mkSimpLemmaCore_match__4___rarg(lean_object* x_1, lean_object* x_2) { -_start: -{ -lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; -x_3 = lean_ctor_get(x_1, 1); -lean_inc(x_3); -x_4 = lean_ctor_get(x_1, 0); -lean_inc(x_4); -lean_dec(x_1); -x_5 = lean_ctor_get(x_3, 0); -lean_inc(x_5); -x_6 = lean_ctor_get(x_3, 1); -lean_inc(x_6); -lean_dec(x_3); -x_7 = lean_apply_3(x_2, x_4, x_5, x_6); -return x_7; -} -} lean_object* l_Lean_Meta_mkSimpLemmaCore_match__4(lean_object* x_1) { _start: { lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l_Lean_Meta_mkSimpLemmaCore_match__4___rarg), 2, 0); +x_2 = lean_alloc_closure((void*)(l_Lean_Meta_mkSimpLemmaCore_match__4___rarg), 3, 0); return x_2; } } @@ -3688,103 +3741,32 @@ x_2 = lean_alloc_closure((void*)(l_Lean_Meta_mkSimpLemmaCore_match__5___rarg), 2 return x_2; } } -lean_object* l_Lean_Meta_withNewMCtxDepth___at_Lean_Meta_mkSimpLemmaCore___spec__1___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { +lean_object* l_Lean_Meta_mkSimpLemmaCore_match__6___rarg(lean_object* x_1, lean_object* x_2) { _start: { -lean_object* x_7; -x_7 = l___private_Lean_Meta_Basic_0__Lean_Meta_withNewMCtxDepthImp___rarg(x_1, x_2, x_3, x_4, x_5, x_6); -if (lean_obj_tag(x_7) == 0) -{ -uint8_t x_8; -x_8 = !lean_is_exclusive(x_7); -if (x_8 == 0) -{ +lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; +x_3 = lean_ctor_get(x_1, 1); +lean_inc(x_3); +x_4 = lean_ctor_get(x_1, 0); +lean_inc(x_4); +lean_dec(x_1); +x_5 = lean_ctor_get(x_3, 0); +lean_inc(x_5); +x_6 = lean_ctor_get(x_3, 1); +lean_inc(x_6); +lean_dec(x_3); +x_7 = lean_apply_3(x_2, x_4, x_5, x_6); return x_7; } -else -{ -lean_object* x_9; lean_object* x_10; lean_object* x_11; -x_9 = lean_ctor_get(x_7, 0); -x_10 = lean_ctor_get(x_7, 1); -lean_inc(x_10); -lean_inc(x_9); -lean_dec(x_7); -x_11 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_11, 0, x_9); -lean_ctor_set(x_11, 1, x_10); -return x_11; } -} -else -{ -uint8_t x_12; -x_12 = !lean_is_exclusive(x_7); -if (x_12 == 0) -{ -return x_7; -} -else -{ -lean_object* x_13; lean_object* x_14; lean_object* x_15; -x_13 = lean_ctor_get(x_7, 0); -x_14 = lean_ctor_get(x_7, 1); -lean_inc(x_14); -lean_inc(x_13); -lean_dec(x_7); -x_15 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_15, 0, x_13); -lean_ctor_set(x_15, 1, x_14); -return x_15; -} -} -} -} -lean_object* l_Lean_Meta_withNewMCtxDepth___at_Lean_Meta_mkSimpLemmaCore___spec__1(lean_object* x_1) { +lean_object* l_Lean_Meta_mkSimpLemmaCore_match__6(lean_object* x_1) { _start: { lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l_Lean_Meta_withNewMCtxDepth___at_Lean_Meta_mkSimpLemmaCore___spec__1___rarg), 6, 0); +x_2 = lean_alloc_closure((void*)(l_Lean_Meta_mkSimpLemmaCore_match__6___rarg), 2, 0); return x_2; } } -lean_object* l_Lean_throwError___at_Lean_Meta_mkSimpLemmaCore___spec__2(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { -_start: -{ -lean_object* x_7; lean_object* x_8; uint8_t x_9; -x_7 = lean_ctor_get(x_4, 3); -x_8 = l_Lean_addMessageContextFull___at_Lean_Meta_instAddMessageContextMetaM___spec__1(x_1, x_2, x_3, x_4, x_5, x_6); -x_9 = !lean_is_exclusive(x_8); -if (x_9 == 0) -{ -lean_object* x_10; lean_object* x_11; -x_10 = lean_ctor_get(x_8, 0); -lean_inc(x_7); -x_11 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_11, 0, x_7); -lean_ctor_set(x_11, 1, x_10); -lean_ctor_set_tag(x_8, 1); -lean_ctor_set(x_8, 0, x_11); -return x_8; -} -else -{ -lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; -x_12 = lean_ctor_get(x_8, 0); -x_13 = lean_ctor_get(x_8, 1); -lean_inc(x_13); -lean_inc(x_12); -lean_dec(x_8); -lean_inc(x_7); -x_14 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_14, 0, x_7); -lean_ctor_set(x_14, 1, x_12); -x_15 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_15, 0, x_14); -lean_ctor_set(x_15, 1, x_13); -return x_15; -} -} -} lean_object* l_Lean_Meta_mkSimpLemmaCore___lambda__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { _start: { @@ -4052,7 +4034,7 @@ _start: { uint8_t x_1; uint8_t x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; x_1 = 0; -x_2 = 2; +x_2 = 3; x_3 = lean_box(x_1); x_4 = lean_box(x_2); x_5 = lean_alloc_ctor(0, 2, 0); @@ -4066,7 +4048,21 @@ _start: { uint8_t x_1; uint8_t x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; x_1 = 0; -x_2 = 3; +x_2 = 4; +x_3 = lean_box(x_1); +x_4 = lean_box(x_2); +x_5 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_5, 0, x_3); +lean_ctor_set(x_5, 1, x_4); +return x_5; +} +} +static lean_object* _init_l_Lean_Meta_mkSimpLemmaCore___lambda__3___closed__3() { +_start: +{ +uint8_t x_1; uint8_t x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; +x_1 = 0; +x_2 = 2; x_3 = lean_box(x_1); x_4 = lean_box(x_2); x_5 = lean_alloc_ctor(0, 2, 0); @@ -4104,41 +4100,46 @@ x_21 = lean_unsigned_to_nat(2u); x_22 = l_Lean_Expr_isAppOfArity(x_15, x_20, x_21); if (x_22 == 0) { -lean_object* x_23; lean_object* x_24; uint8_t x_25; +lean_object* x_23; uint8_t x_24; lean_free_object(x_5); -x_23 = l_myMacro____x40_Init_Notation___hyg_8971____closed__4; -x_24 = lean_unsigned_to_nat(1u); -x_25 = l_Lean_Expr_isAppOfArity(x_15, x_23, x_24); -if (x_25 == 0) +x_23 = l_myMacro____x40_Init_Core___hyg_1796____closed__4; +x_24 = l_Lean_Expr_isAppOfArity(x_15, x_23, x_18); +if (x_24 == 0) { -lean_object* x_26; +lean_object* x_25; lean_object* x_26; uint8_t x_27; +x_25 = l_myMacro____x40_Init_Notation___hyg_8971____closed__4; +x_26 = lean_unsigned_to_nat(1u); +x_27 = l_Lean_Expr_isAppOfArity(x_15, x_25, x_26); +if (x_27 == 0) +{ +lean_object* x_28; lean_inc(x_9); lean_inc(x_8); lean_inc(x_7); lean_inc(x_6); -x_26 = l_Lean_Meta_DiscrTree_mkPath(x_15, x_6, x_7, x_8, x_9, x_10); -if (lean_obj_tag(x_26) == 0) +x_28 = l_Lean_Meta_DiscrTree_mkPath(x_15, x_6, x_7, x_8, x_9, x_10); +if (lean_obj_tag(x_28) == 0) { -lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; -x_27 = lean_ctor_get(x_26, 0); -lean_inc(x_27); -x_28 = lean_ctor_get(x_26, 1); -lean_inc(x_28); -lean_dec(x_26); -x_29 = l_Lean_Meta_mkSimpLemmaCore___lambda__3___closed__1; -lean_ctor_set(x_12, 1, x_29); -lean_ctor_set(x_12, 0, x_27); -x_30 = l_Lean_Meta_mkSimpLemmaCore___lambda__2(x_1, x_2, x_3, x_4, x_12, x_6, x_7, x_8, x_9, x_28); +lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; +x_29 = lean_ctor_get(x_28, 0); +lean_inc(x_29); +x_30 = lean_ctor_get(x_28, 1); +lean_inc(x_30); +lean_dec(x_28); +x_31 = l_Lean_Meta_mkSimpLemmaCore___lambda__3___closed__1; +lean_ctor_set(x_12, 1, x_31); +lean_ctor_set(x_12, 0, x_29); +x_32 = l_Lean_Meta_mkSimpLemmaCore___lambda__2(x_1, x_2, x_3, x_4, x_12, x_6, x_7, x_8, x_9, x_30); lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); lean_dec(x_12); -return x_30; +return x_32; } else { -uint8_t x_31; +uint8_t x_33; lean_free_object(x_12); lean_dec(x_9); lean_dec(x_8); @@ -4147,372 +4148,249 @@ lean_dec(x_6); lean_dec(x_4); lean_dec(x_2); lean_dec(x_1); -x_31 = !lean_is_exclusive(x_26); -if (x_31 == 0) +x_33 = !lean_is_exclusive(x_28); +if (x_33 == 0) { -return x_26; +return x_28; } else { -lean_object* x_32; lean_object* x_33; lean_object* x_34; -x_32 = lean_ctor_get(x_26, 0); -x_33 = lean_ctor_get(x_26, 1); -lean_inc(x_33); -lean_inc(x_32); -lean_dec(x_26); -x_34 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_34, 0, x_32); -lean_ctor_set(x_34, 1, x_33); -return x_34; -} -} -} -else -{ -lean_object* x_35; lean_object* x_36; -x_35 = l_Lean_Expr_appArg_x21(x_15); -lean_dec(x_15); -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -lean_inc(x_6); -x_36 = l_Lean_Meta_DiscrTree_mkPath(x_35, x_6, x_7, x_8, x_9, x_10); -if (lean_obj_tag(x_36) == 0) -{ -lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; -x_37 = lean_ctor_get(x_36, 0); -lean_inc(x_37); -x_38 = lean_ctor_get(x_36, 1); -lean_inc(x_38); -lean_dec(x_36); -x_39 = l_Lean_Meta_mkSimpLemmaCore___lambda__3___closed__2; -lean_ctor_set(x_12, 1, x_39); -lean_ctor_set(x_12, 0, x_37); -x_40 = l_Lean_Meta_mkSimpLemmaCore___lambda__2(x_1, x_2, x_3, x_4, x_12, x_6, x_7, x_8, x_9, x_38); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_12); -return x_40; -} -else -{ -uint8_t x_41; -lean_free_object(x_12); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_4); -lean_dec(x_2); -lean_dec(x_1); -x_41 = !lean_is_exclusive(x_36); -if (x_41 == 0) -{ +lean_object* x_34; lean_object* x_35; lean_object* x_36; +x_34 = lean_ctor_get(x_28, 0); +x_35 = lean_ctor_get(x_28, 1); +lean_inc(x_35); +lean_inc(x_34); +lean_dec(x_28); +x_36 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_36, 0, x_34); +lean_ctor_set(x_36, 1, x_35); return x_36; } -else -{ -lean_object* x_42; lean_object* x_43; lean_object* x_44; -x_42 = lean_ctor_get(x_36, 0); -x_43 = lean_ctor_get(x_36, 1); -lean_inc(x_43); -lean_inc(x_42); -lean_dec(x_36); -x_44 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_44, 0, x_42); -lean_ctor_set(x_44, 1, x_43); -return x_44; -} -} } } else { -lean_object* x_45; lean_object* x_46; lean_object* x_47; lean_object* x_48; -x_45 = l_Lean_Expr_appFn_x21(x_15); -x_46 = l_Lean_Expr_appArg_x21(x_45); -lean_dec(x_45); -x_47 = l_Lean_Expr_appArg_x21(x_15); +lean_object* x_37; lean_object* x_38; +x_37 = l_Lean_Expr_appArg_x21(x_15); lean_dec(x_15); lean_inc(x_9); lean_inc(x_8); lean_inc(x_7); lean_inc(x_6); -lean_inc(x_46); -x_48 = l_Lean_Meta_DiscrTree_mkPath(x_46, x_6, x_7, x_8, x_9, x_10); -if (lean_obj_tag(x_48) == 0) +x_38 = l_Lean_Meta_DiscrTree_mkPath(x_37, x_6, x_7, x_8, x_9, x_10); +if (lean_obj_tag(x_38) == 0) { -lean_object* x_49; lean_object* x_50; lean_object* x_51; -x_49 = lean_ctor_get(x_48, 0); -lean_inc(x_49); -x_50 = lean_ctor_get(x_48, 1); -lean_inc(x_50); -lean_dec(x_48); -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -lean_inc(x_6); -x_51 = l___private_Lean_Meta_Tactic_Simp_SimpLemmas_0__Lean_Meta_isPerm(x_46, x_47, x_6, x_7, x_8, x_9, x_50); -if (lean_obj_tag(x_51) == 0) -{ -lean_object* x_52; lean_object* x_53; uint8_t x_54; lean_object* x_55; lean_object* x_56; -x_52 = lean_ctor_get(x_51, 0); -lean_inc(x_52); -x_53 = lean_ctor_get(x_51, 1); -lean_inc(x_53); -lean_dec(x_51); -x_54 = 1; -x_55 = lean_box(x_54); -lean_ctor_set(x_12, 1, x_55); -lean_ctor_set(x_12, 0, x_52); -lean_ctor_set(x_5, 0, x_49); -x_56 = l_Lean_Meta_mkSimpLemmaCore___lambda__2(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_53); +lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; +x_39 = lean_ctor_get(x_38, 0); +lean_inc(x_39); +x_40 = lean_ctor_get(x_38, 1); +lean_inc(x_40); +lean_dec(x_38); +x_41 = l_Lean_Meta_mkSimpLemmaCore___lambda__3___closed__2; +lean_ctor_set(x_12, 1, x_41); +lean_ctor_set(x_12, 0, x_39); +x_42 = l_Lean_Meta_mkSimpLemmaCore___lambda__2(x_1, x_2, x_3, x_4, x_12, x_6, x_7, x_8, x_9, x_40); lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); -lean_dec(x_5); -return x_56; -} -else -{ -uint8_t x_57; -lean_dec(x_49); -lean_free_object(x_12); -lean_free_object(x_5); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_4); -lean_dec(x_2); -lean_dec(x_1); -x_57 = !lean_is_exclusive(x_51); -if (x_57 == 0) -{ -return x_51; -} -else -{ -lean_object* x_58; lean_object* x_59; lean_object* x_60; -x_58 = lean_ctor_get(x_51, 0); -x_59 = lean_ctor_get(x_51, 1); -lean_inc(x_59); -lean_inc(x_58); -lean_dec(x_51); -x_60 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_60, 0, x_58); -lean_ctor_set(x_60, 1, x_59); -return x_60; -} -} -} -else -{ -uint8_t x_61; -lean_dec(x_47); -lean_dec(x_46); -lean_free_object(x_12); -lean_free_object(x_5); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_4); -lean_dec(x_2); -lean_dec(x_1); -x_61 = !lean_is_exclusive(x_48); -if (x_61 == 0) -{ -return x_48; -} -else -{ -lean_object* x_62; lean_object* x_63; lean_object* x_64; -x_62 = lean_ctor_get(x_48, 0); -x_63 = lean_ctor_get(x_48, 1); -lean_inc(x_63); -lean_inc(x_62); -lean_dec(x_48); -x_64 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_64, 0, x_62); -lean_ctor_set(x_64, 1, x_63); -return x_64; -} -} -} -} -else -{ -lean_object* x_65; lean_object* x_66; lean_object* x_67; lean_object* x_68; -x_65 = l_Lean_Expr_appFn_x21(x_15); -x_66 = l_Lean_Expr_appArg_x21(x_65); -lean_dec(x_65); -x_67 = l_Lean_Expr_appArg_x21(x_15); -lean_dec(x_15); -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -lean_inc(x_6); -lean_inc(x_66); -x_68 = l_Lean_Meta_DiscrTree_mkPath(x_66, x_6, x_7, x_8, x_9, x_10); -if (lean_obj_tag(x_68) == 0) -{ -lean_object* x_69; lean_object* x_70; lean_object* x_71; -x_69 = lean_ctor_get(x_68, 0); -lean_inc(x_69); -x_70 = lean_ctor_get(x_68, 1); -lean_inc(x_70); -lean_dec(x_68); -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -lean_inc(x_6); -x_71 = l___private_Lean_Meta_Tactic_Simp_SimpLemmas_0__Lean_Meta_isPerm(x_66, x_67, x_6, x_7, x_8, x_9, x_70); -if (lean_obj_tag(x_71) == 0) -{ -lean_object* x_72; lean_object* x_73; uint8_t x_74; lean_object* x_75; lean_object* x_76; -x_72 = lean_ctor_get(x_71, 0); -lean_inc(x_72); -x_73 = lean_ctor_get(x_71, 1); -lean_inc(x_73); -lean_dec(x_71); -x_74 = 0; -x_75 = lean_box(x_74); -lean_ctor_set(x_12, 1, x_75); -lean_ctor_set(x_12, 0, x_72); -lean_ctor_set(x_5, 0, x_69); -x_76 = l_Lean_Meta_mkSimpLemmaCore___lambda__2(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_73); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -return x_76; -} -else -{ -uint8_t x_77; -lean_dec(x_69); -lean_free_object(x_12); -lean_free_object(x_5); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_4); -lean_dec(x_2); -lean_dec(x_1); -x_77 = !lean_is_exclusive(x_71); -if (x_77 == 0) -{ -return x_71; -} -else -{ -lean_object* x_78; lean_object* x_79; lean_object* x_80; -x_78 = lean_ctor_get(x_71, 0); -x_79 = lean_ctor_get(x_71, 1); -lean_inc(x_79); -lean_inc(x_78); -lean_dec(x_71); -x_80 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_80, 0, x_78); -lean_ctor_set(x_80, 1, x_79); -return x_80; -} -} -} -else -{ -uint8_t x_81; -lean_dec(x_67); -lean_dec(x_66); -lean_free_object(x_12); -lean_free_object(x_5); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_4); -lean_dec(x_2); -lean_dec(x_1); -x_81 = !lean_is_exclusive(x_68); -if (x_81 == 0) -{ -return x_68; -} -else -{ -lean_object* x_82; lean_object* x_83; lean_object* x_84; -x_82 = lean_ctor_get(x_68, 0); -x_83 = lean_ctor_get(x_68, 1); -lean_inc(x_83); -lean_inc(x_82); -lean_dec(x_68); -x_84 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_84, 0, x_82); -lean_ctor_set(x_84, 1, x_83); -return x_84; -} -} -} -} -else -{ -lean_object* x_85; lean_object* x_86; lean_object* x_87; uint8_t x_88; -x_85 = lean_ctor_get(x_12, 1); -lean_inc(x_85); lean_dec(x_12); -x_86 = l_myMacro____x40_Init_Notation___hyg_6045____closed__4; -x_87 = lean_unsigned_to_nat(3u); -x_88 = l_Lean_Expr_isAppOfArity(x_85, x_86, x_87); -if (x_88 == 0) +return x_42; +} +else { -lean_object* x_89; lean_object* x_90; uint8_t x_91; -x_89 = l_myMacro____x40_Init_Core___hyg_172____closed__4; -x_90 = lean_unsigned_to_nat(2u); -x_91 = l_Lean_Expr_isAppOfArity(x_85, x_89, x_90); -if (x_91 == 0) +uint8_t x_43; +lean_free_object(x_12); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_4); +lean_dec(x_2); +lean_dec(x_1); +x_43 = !lean_is_exclusive(x_38); +if (x_43 == 0) { -lean_object* x_92; lean_object* x_93; uint8_t x_94; +return x_38; +} +else +{ +lean_object* x_44; lean_object* x_45; lean_object* x_46; +x_44 = lean_ctor_get(x_38, 0); +x_45 = lean_ctor_get(x_38, 1); +lean_inc(x_45); +lean_inc(x_44); +lean_dec(x_38); +x_46 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_46, 0, x_44); +lean_ctor_set(x_46, 1, x_45); +return x_46; +} +} +} +} +else +{ +lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; +x_47 = l_Lean_Expr_appFn_x21(x_15); +x_48 = l_Lean_Expr_appArg_x21(x_47); +lean_dec(x_47); +x_49 = l_Lean_Expr_appArg_x21(x_15); +lean_dec(x_15); +lean_inc(x_9); +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_6); +x_50 = l_Lean_Meta_mkEq(x_48, x_49, x_6, x_7, x_8, x_9, x_10); +if (lean_obj_tag(x_50) == 0) +{ +lean_object* x_51; lean_object* x_52; lean_object* x_53; +x_51 = lean_ctor_get(x_50, 0); +lean_inc(x_51); +x_52 = lean_ctor_get(x_50, 1); +lean_inc(x_52); +lean_dec(x_50); +lean_inc(x_9); +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_6); +x_53 = l_Lean_Meta_DiscrTree_mkPath(x_51, x_6, x_7, x_8, x_9, x_52); +if (lean_obj_tag(x_53) == 0) +{ +lean_object* x_54; lean_object* x_55; lean_object* x_56; lean_object* x_57; +x_54 = lean_ctor_get(x_53, 0); +lean_inc(x_54); +x_55 = lean_ctor_get(x_53, 1); +lean_inc(x_55); +lean_dec(x_53); +x_56 = l_Lean_Meta_mkSimpLemmaCore___lambda__3___closed__3; +lean_ctor_set(x_12, 1, x_56); +lean_ctor_set(x_12, 0, x_54); +x_57 = l_Lean_Meta_mkSimpLemmaCore___lambda__2(x_1, x_2, x_3, x_4, x_12, x_6, x_7, x_8, x_9, x_55); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_12); +return x_57; +} +else +{ +uint8_t x_58; +lean_free_object(x_12); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_4); +lean_dec(x_2); +lean_dec(x_1); +x_58 = !lean_is_exclusive(x_53); +if (x_58 == 0) +{ +return x_53; +} +else +{ +lean_object* x_59; lean_object* x_60; lean_object* x_61; +x_59 = lean_ctor_get(x_53, 0); +x_60 = lean_ctor_get(x_53, 1); +lean_inc(x_60); +lean_inc(x_59); +lean_dec(x_53); +x_61 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_61, 0, x_59); +lean_ctor_set(x_61, 1, x_60); +return x_61; +} +} +} +else +{ +uint8_t x_62; +lean_free_object(x_12); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_4); +lean_dec(x_2); +lean_dec(x_1); +x_62 = !lean_is_exclusive(x_50); +if (x_62 == 0) +{ +return x_50; +} +else +{ +lean_object* x_63; lean_object* x_64; lean_object* x_65; +x_63 = lean_ctor_get(x_50, 0); +x_64 = lean_ctor_get(x_50, 1); +lean_inc(x_64); +lean_inc(x_63); +lean_dec(x_50); +x_65 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_65, 0, x_63); +lean_ctor_set(x_65, 1, x_64); +return x_65; +} +} +} +} +else +{ +lean_object* x_66; lean_object* x_67; lean_object* x_68; lean_object* x_69; +x_66 = l_Lean_Expr_appFn_x21(x_15); +x_67 = l_Lean_Expr_appArg_x21(x_66); +lean_dec(x_66); +x_68 = l_Lean_Expr_appArg_x21(x_15); +lean_dec(x_15); +lean_inc(x_9); +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_6); +lean_inc(x_67); +x_69 = l_Lean_Meta_DiscrTree_mkPath(x_67, x_6, x_7, x_8, x_9, x_10); +if (lean_obj_tag(x_69) == 0) +{ +lean_object* x_70; lean_object* x_71; lean_object* x_72; +x_70 = lean_ctor_get(x_69, 0); +lean_inc(x_70); +x_71 = lean_ctor_get(x_69, 1); +lean_inc(x_71); +lean_dec(x_69); +lean_inc(x_9); +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_6); +x_72 = l___private_Lean_Meta_Tactic_Simp_SimpLemmas_0__Lean_Meta_isPerm(x_67, x_68, x_6, x_7, x_8, x_9, x_71); +if (lean_obj_tag(x_72) == 0) +{ +lean_object* x_73; lean_object* x_74; uint8_t x_75; lean_object* x_76; lean_object* x_77; +x_73 = lean_ctor_get(x_72, 0); +lean_inc(x_73); +x_74 = lean_ctor_get(x_72, 1); +lean_inc(x_74); +lean_dec(x_72); +x_75 = 1; +x_76 = lean_box(x_75); +lean_ctor_set(x_12, 1, x_76); +lean_ctor_set(x_12, 0, x_73); +lean_ctor_set(x_5, 0, x_70); +x_77 = l_Lean_Meta_mkSimpLemmaCore___lambda__2(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_74); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +return x_77; +} +else +{ +uint8_t x_78; +lean_dec(x_70); +lean_free_object(x_12); lean_free_object(x_5); -x_92 = l_myMacro____x40_Init_Notation___hyg_8971____closed__4; -x_93 = lean_unsigned_to_nat(1u); -x_94 = l_Lean_Expr_isAppOfArity(x_85, x_92, x_93); -if (x_94 == 0) -{ -lean_object* x_95; -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -lean_inc(x_6); -x_95 = l_Lean_Meta_DiscrTree_mkPath(x_85, x_6, x_7, x_8, x_9, x_10); -if (lean_obj_tag(x_95) == 0) -{ -lean_object* x_96; lean_object* x_97; lean_object* x_98; lean_object* x_99; lean_object* x_100; -x_96 = lean_ctor_get(x_95, 0); -lean_inc(x_96); -x_97 = lean_ctor_get(x_95, 1); -lean_inc(x_97); -lean_dec(x_95); -x_98 = l_Lean_Meta_mkSimpLemmaCore___lambda__3___closed__1; -x_99 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_99, 0, x_96); -lean_ctor_set(x_99, 1, x_98); -x_100 = l_Lean_Meta_mkSimpLemmaCore___lambda__2(x_1, x_2, x_3, x_4, x_99, x_6, x_7, x_8, x_9, x_97); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_99); -return x_100; -} -else -{ -lean_object* x_101; lean_object* x_102; lean_object* x_103; lean_object* x_104; lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); @@ -4520,61 +4398,33 @@ lean_dec(x_6); lean_dec(x_4); lean_dec(x_2); lean_dec(x_1); -x_101 = lean_ctor_get(x_95, 0); -lean_inc(x_101); -x_102 = lean_ctor_get(x_95, 1); -lean_inc(x_102); -if (lean_is_exclusive(x_95)) { - lean_ctor_release(x_95, 0); - lean_ctor_release(x_95, 1); - x_103 = x_95; -} else { - lean_dec_ref(x_95); - x_103 = lean_box(0); +x_78 = !lean_is_exclusive(x_72); +if (x_78 == 0) +{ +return x_72; } -if (lean_is_scalar(x_103)) { - x_104 = lean_alloc_ctor(1, 2, 0); -} else { - x_104 = x_103; +else +{ +lean_object* x_79; lean_object* x_80; lean_object* x_81; +x_79 = lean_ctor_get(x_72, 0); +x_80 = lean_ctor_get(x_72, 1); +lean_inc(x_80); +lean_inc(x_79); +lean_dec(x_72); +x_81 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_81, 0, x_79); +lean_ctor_set(x_81, 1, x_80); +return x_81; } -lean_ctor_set(x_104, 0, x_101); -lean_ctor_set(x_104, 1, x_102); -return x_104; } } else { -lean_object* x_105; lean_object* x_106; -x_105 = l_Lean_Expr_appArg_x21(x_85); -lean_dec(x_85); -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -lean_inc(x_6); -x_106 = l_Lean_Meta_DiscrTree_mkPath(x_105, x_6, x_7, x_8, x_9, x_10); -if (lean_obj_tag(x_106) == 0) -{ -lean_object* x_107; lean_object* x_108; lean_object* x_109; lean_object* x_110; lean_object* x_111; -x_107 = lean_ctor_get(x_106, 0); -lean_inc(x_107); -x_108 = lean_ctor_get(x_106, 1); -lean_inc(x_108); -lean_dec(x_106); -x_109 = l_Lean_Meta_mkSimpLemmaCore___lambda__3___closed__2; -x_110 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_110, 0, x_107); -lean_ctor_set(x_110, 1, x_109); -x_111 = l_Lean_Meta_mkSimpLemmaCore___lambda__2(x_1, x_2, x_3, x_4, x_110, x_6, x_7, x_8, x_9, x_108); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_110); -return x_111; -} -else -{ -lean_object* x_112; lean_object* x_113; lean_object* x_114; lean_object* x_115; +uint8_t x_82; +lean_dec(x_68); +lean_dec(x_67); +lean_free_object(x_12); +lean_free_object(x_5); lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); @@ -4582,119 +4432,201 @@ lean_dec(x_6); lean_dec(x_4); lean_dec(x_2); lean_dec(x_1); -x_112 = lean_ctor_get(x_106, 0); -lean_inc(x_112); -x_113 = lean_ctor_get(x_106, 1); -lean_inc(x_113); -if (lean_is_exclusive(x_106)) { - lean_ctor_release(x_106, 0); - lean_ctor_release(x_106, 1); - x_114 = x_106; -} else { - lean_dec_ref(x_106); - x_114 = lean_box(0); +x_82 = !lean_is_exclusive(x_69); +if (x_82 == 0) +{ +return x_69; } -if (lean_is_scalar(x_114)) { - x_115 = lean_alloc_ctor(1, 2, 0); -} else { - x_115 = x_114; +else +{ +lean_object* x_83; lean_object* x_84; lean_object* x_85; +x_83 = lean_ctor_get(x_69, 0); +x_84 = lean_ctor_get(x_69, 1); +lean_inc(x_84); +lean_inc(x_83); +lean_dec(x_69); +x_85 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_85, 0, x_83); +lean_ctor_set(x_85, 1, x_84); +return x_85; } -lean_ctor_set(x_115, 0, x_112); -lean_ctor_set(x_115, 1, x_113); -return x_115; } } } else { -lean_object* x_116; lean_object* x_117; lean_object* x_118; lean_object* x_119; -x_116 = l_Lean_Expr_appFn_x21(x_85); -x_117 = l_Lean_Expr_appArg_x21(x_116); -lean_dec(x_116); -x_118 = l_Lean_Expr_appArg_x21(x_85); -lean_dec(x_85); +lean_object* x_86; lean_object* x_87; lean_object* x_88; lean_object* x_89; +x_86 = l_Lean_Expr_appFn_x21(x_15); +x_87 = l_Lean_Expr_appArg_x21(x_86); +lean_dec(x_86); +x_88 = l_Lean_Expr_appArg_x21(x_15); +lean_dec(x_15); lean_inc(x_9); lean_inc(x_8); lean_inc(x_7); lean_inc(x_6); -lean_inc(x_117); -x_119 = l_Lean_Meta_DiscrTree_mkPath(x_117, x_6, x_7, x_8, x_9, x_10); -if (lean_obj_tag(x_119) == 0) +lean_inc(x_87); +x_89 = l_Lean_Meta_DiscrTree_mkPath(x_87, x_6, x_7, x_8, x_9, x_10); +if (lean_obj_tag(x_89) == 0) { -lean_object* x_120; lean_object* x_121; lean_object* x_122; -x_120 = lean_ctor_get(x_119, 0); +lean_object* x_90; lean_object* x_91; lean_object* x_92; +x_90 = lean_ctor_get(x_89, 0); +lean_inc(x_90); +x_91 = lean_ctor_get(x_89, 1); +lean_inc(x_91); +lean_dec(x_89); +lean_inc(x_9); +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_6); +x_92 = l___private_Lean_Meta_Tactic_Simp_SimpLemmas_0__Lean_Meta_isPerm(x_87, x_88, x_6, x_7, x_8, x_9, x_91); +if (lean_obj_tag(x_92) == 0) +{ +lean_object* x_93; lean_object* x_94; uint8_t x_95; lean_object* x_96; lean_object* x_97; +x_93 = lean_ctor_get(x_92, 0); +lean_inc(x_93); +x_94 = lean_ctor_get(x_92, 1); +lean_inc(x_94); +lean_dec(x_92); +x_95 = 0; +x_96 = lean_box(x_95); +lean_ctor_set(x_12, 1, x_96); +lean_ctor_set(x_12, 0, x_93); +lean_ctor_set(x_5, 0, x_90); +x_97 = l_Lean_Meta_mkSimpLemmaCore___lambda__2(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_94); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +return x_97; +} +else +{ +uint8_t x_98; +lean_dec(x_90); +lean_free_object(x_12); +lean_free_object(x_5); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_4); +lean_dec(x_2); +lean_dec(x_1); +x_98 = !lean_is_exclusive(x_92); +if (x_98 == 0) +{ +return x_92; +} +else +{ +lean_object* x_99; lean_object* x_100; lean_object* x_101; +x_99 = lean_ctor_get(x_92, 0); +x_100 = lean_ctor_get(x_92, 1); +lean_inc(x_100); +lean_inc(x_99); +lean_dec(x_92); +x_101 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_101, 0, x_99); +lean_ctor_set(x_101, 1, x_100); +return x_101; +} +} +} +else +{ +uint8_t x_102; +lean_dec(x_88); +lean_dec(x_87); +lean_free_object(x_12); +lean_free_object(x_5); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_4); +lean_dec(x_2); +lean_dec(x_1); +x_102 = !lean_is_exclusive(x_89); +if (x_102 == 0) +{ +return x_89; +} +else +{ +lean_object* x_103; lean_object* x_104; lean_object* x_105; +x_103 = lean_ctor_get(x_89, 0); +x_104 = lean_ctor_get(x_89, 1); +lean_inc(x_104); +lean_inc(x_103); +lean_dec(x_89); +x_105 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_105, 0, x_103); +lean_ctor_set(x_105, 1, x_104); +return x_105; +} +} +} +} +else +{ +lean_object* x_106; lean_object* x_107; lean_object* x_108; uint8_t x_109; +x_106 = lean_ctor_get(x_12, 1); +lean_inc(x_106); +lean_dec(x_12); +x_107 = l_myMacro____x40_Init_Notation___hyg_6045____closed__4; +x_108 = lean_unsigned_to_nat(3u); +x_109 = l_Lean_Expr_isAppOfArity(x_106, x_107, x_108); +if (x_109 == 0) +{ +lean_object* x_110; lean_object* x_111; uint8_t x_112; +x_110 = l_myMacro____x40_Init_Core___hyg_172____closed__4; +x_111 = lean_unsigned_to_nat(2u); +x_112 = l_Lean_Expr_isAppOfArity(x_106, x_110, x_111); +if (x_112 == 0) +{ +lean_object* x_113; uint8_t x_114; +lean_free_object(x_5); +x_113 = l_myMacro____x40_Init_Core___hyg_1796____closed__4; +x_114 = l_Lean_Expr_isAppOfArity(x_106, x_113, x_108); +if (x_114 == 0) +{ +lean_object* x_115; lean_object* x_116; uint8_t x_117; +x_115 = l_myMacro____x40_Init_Notation___hyg_8971____closed__4; +x_116 = lean_unsigned_to_nat(1u); +x_117 = l_Lean_Expr_isAppOfArity(x_106, x_115, x_116); +if (x_117 == 0) +{ +lean_object* x_118; +lean_inc(x_9); +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_6); +x_118 = l_Lean_Meta_DiscrTree_mkPath(x_106, x_6, x_7, x_8, x_9, x_10); +if (lean_obj_tag(x_118) == 0) +{ +lean_object* x_119; lean_object* x_120; lean_object* x_121; lean_object* x_122; lean_object* x_123; +x_119 = lean_ctor_get(x_118, 0); +lean_inc(x_119); +x_120 = lean_ctor_get(x_118, 1); lean_inc(x_120); -x_121 = lean_ctor_get(x_119, 1); -lean_inc(x_121); -lean_dec(x_119); -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -lean_inc(x_6); -x_122 = l___private_Lean_Meta_Tactic_Simp_SimpLemmas_0__Lean_Meta_isPerm(x_117, x_118, x_6, x_7, x_8, x_9, x_121); -if (lean_obj_tag(x_122) == 0) -{ -lean_object* x_123; lean_object* x_124; uint8_t x_125; lean_object* x_126; lean_object* x_127; lean_object* x_128; -x_123 = lean_ctor_get(x_122, 0); -lean_inc(x_123); -x_124 = lean_ctor_get(x_122, 1); -lean_inc(x_124); -lean_dec(x_122); -x_125 = 1; -x_126 = lean_box(x_125); -x_127 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_127, 0, x_123); -lean_ctor_set(x_127, 1, x_126); -lean_ctor_set(x_5, 1, x_127); -lean_ctor_set(x_5, 0, x_120); -x_128 = l_Lean_Meta_mkSimpLemmaCore___lambda__2(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_124); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -return x_128; -} -else -{ -lean_object* x_129; lean_object* x_130; lean_object* x_131; lean_object* x_132; -lean_dec(x_120); -lean_free_object(x_5); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_4); -lean_dec(x_2); -lean_dec(x_1); -x_129 = lean_ctor_get(x_122, 0); -lean_inc(x_129); -x_130 = lean_ctor_get(x_122, 1); -lean_inc(x_130); -if (lean_is_exclusive(x_122)) { - lean_ctor_release(x_122, 0); - lean_ctor_release(x_122, 1); - x_131 = x_122; -} else { - lean_dec_ref(x_122); - x_131 = lean_box(0); -} -if (lean_is_scalar(x_131)) { - x_132 = lean_alloc_ctor(1, 2, 0); -} else { - x_132 = x_131; -} -lean_ctor_set(x_132, 0, x_129); -lean_ctor_set(x_132, 1, x_130); -return x_132; -} -} -else -{ -lean_object* x_133; lean_object* x_134; lean_object* x_135; lean_object* x_136; lean_dec(x_118); -lean_dec(x_117); -lean_free_object(x_5); +x_121 = l_Lean_Meta_mkSimpLemmaCore___lambda__3___closed__1; +x_122 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_122, 0, x_119); +lean_ctor_set(x_122, 1, x_121); +x_123 = l_Lean_Meta_mkSimpLemmaCore___lambda__2(x_1, x_2, x_3, x_4, x_122, x_6, x_7, x_8, x_9, x_120); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_122); +return x_123; +} +else +{ +lean_object* x_124; lean_object* x_125; lean_object* x_126; lean_object* x_127; lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); @@ -4702,84 +4634,61 @@ lean_dec(x_6); lean_dec(x_4); lean_dec(x_2); lean_dec(x_1); -x_133 = lean_ctor_get(x_119, 0); -lean_inc(x_133); -x_134 = lean_ctor_get(x_119, 1); -lean_inc(x_134); -if (lean_is_exclusive(x_119)) { - lean_ctor_release(x_119, 0); - lean_ctor_release(x_119, 1); - x_135 = x_119; +x_124 = lean_ctor_get(x_118, 0); +lean_inc(x_124); +x_125 = lean_ctor_get(x_118, 1); +lean_inc(x_125); +if (lean_is_exclusive(x_118)) { + lean_ctor_release(x_118, 0); + lean_ctor_release(x_118, 1); + x_126 = x_118; } else { - lean_dec_ref(x_119); - x_135 = lean_box(0); + lean_dec_ref(x_118); + x_126 = lean_box(0); } -if (lean_is_scalar(x_135)) { - x_136 = lean_alloc_ctor(1, 2, 0); +if (lean_is_scalar(x_126)) { + x_127 = lean_alloc_ctor(1, 2, 0); } else { - x_136 = x_135; -} -lean_ctor_set(x_136, 0, x_133); -lean_ctor_set(x_136, 1, x_134); -return x_136; + x_127 = x_126; } +lean_ctor_set(x_127, 0, x_124); +lean_ctor_set(x_127, 1, x_125); +return x_127; } } else { -lean_object* x_137; lean_object* x_138; lean_object* x_139; lean_object* x_140; -x_137 = l_Lean_Expr_appFn_x21(x_85); -x_138 = l_Lean_Expr_appArg_x21(x_137); -lean_dec(x_137); -x_139 = l_Lean_Expr_appArg_x21(x_85); -lean_dec(x_85); +lean_object* x_128; lean_object* x_129; +x_128 = l_Lean_Expr_appArg_x21(x_106); +lean_dec(x_106); lean_inc(x_9); lean_inc(x_8); lean_inc(x_7); lean_inc(x_6); -lean_inc(x_138); -x_140 = l_Lean_Meta_DiscrTree_mkPath(x_138, x_6, x_7, x_8, x_9, x_10); -if (lean_obj_tag(x_140) == 0) +x_129 = l_Lean_Meta_DiscrTree_mkPath(x_128, x_6, x_7, x_8, x_9, x_10); +if (lean_obj_tag(x_129) == 0) { -lean_object* x_141; lean_object* x_142; lean_object* x_143; -x_141 = lean_ctor_get(x_140, 0); -lean_inc(x_141); -x_142 = lean_ctor_get(x_140, 1); -lean_inc(x_142); -lean_dec(x_140); -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -lean_inc(x_6); -x_143 = l___private_Lean_Meta_Tactic_Simp_SimpLemmas_0__Lean_Meta_isPerm(x_138, x_139, x_6, x_7, x_8, x_9, x_142); -if (lean_obj_tag(x_143) == 0) -{ -lean_object* x_144; lean_object* x_145; uint8_t x_146; lean_object* x_147; lean_object* x_148; lean_object* x_149; -x_144 = lean_ctor_get(x_143, 0); -lean_inc(x_144); -x_145 = lean_ctor_get(x_143, 1); -lean_inc(x_145); -lean_dec(x_143); -x_146 = 0; -x_147 = lean_box(x_146); -x_148 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_148, 0, x_144); -lean_ctor_set(x_148, 1, x_147); -lean_ctor_set(x_5, 1, x_148); -lean_ctor_set(x_5, 0, x_141); -x_149 = l_Lean_Meta_mkSimpLemmaCore___lambda__2(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_145); +lean_object* x_130; lean_object* x_131; lean_object* x_132; lean_object* x_133; lean_object* x_134; +x_130 = lean_ctor_get(x_129, 0); +lean_inc(x_130); +x_131 = lean_ctor_get(x_129, 1); +lean_inc(x_131); +lean_dec(x_129); +x_132 = l_Lean_Meta_mkSimpLemmaCore___lambda__3___closed__2; +x_133 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_133, 0, x_130); +lean_ctor_set(x_133, 1, x_132); +x_134 = l_Lean_Meta_mkSimpLemmaCore___lambda__2(x_1, x_2, x_3, x_4, x_133, x_6, x_7, x_8, x_9, x_131); lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); -lean_dec(x_5); -return x_149; +lean_dec(x_133); +return x_134; } else { -lean_object* x_150; lean_object* x_151; lean_object* x_152; lean_object* x_153; -lean_dec(x_141); -lean_free_object(x_5); +lean_object* x_135; lean_object* x_136; lean_object* x_137; lean_object* x_138; lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); @@ -4787,33 +4696,194 @@ lean_dec(x_6); lean_dec(x_4); lean_dec(x_2); lean_dec(x_1); -x_150 = lean_ctor_get(x_143, 0); -lean_inc(x_150); -x_151 = lean_ctor_get(x_143, 1); -lean_inc(x_151); -if (lean_is_exclusive(x_143)) { - lean_ctor_release(x_143, 0); - lean_ctor_release(x_143, 1); - x_152 = x_143; +x_135 = lean_ctor_get(x_129, 0); +lean_inc(x_135); +x_136 = lean_ctor_get(x_129, 1); +lean_inc(x_136); +if (lean_is_exclusive(x_129)) { + lean_ctor_release(x_129, 0); + lean_ctor_release(x_129, 1); + x_137 = x_129; } else { - lean_dec_ref(x_143); - x_152 = lean_box(0); + lean_dec_ref(x_129); + x_137 = lean_box(0); } -if (lean_is_scalar(x_152)) { - x_153 = lean_alloc_ctor(1, 2, 0); +if (lean_is_scalar(x_137)) { + x_138 = lean_alloc_ctor(1, 2, 0); } else { - x_153 = x_152; + x_138 = x_137; +} +lean_ctor_set(x_138, 0, x_135); +lean_ctor_set(x_138, 1, x_136); +return x_138; } -lean_ctor_set(x_153, 0, x_150); -lean_ctor_set(x_153, 1, x_151); -return x_153; } } else { -lean_object* x_154; lean_object* x_155; lean_object* x_156; lean_object* x_157; +lean_object* x_139; lean_object* x_140; lean_object* x_141; lean_object* x_142; +x_139 = l_Lean_Expr_appFn_x21(x_106); +x_140 = l_Lean_Expr_appArg_x21(x_139); lean_dec(x_139); -lean_dec(x_138); +x_141 = l_Lean_Expr_appArg_x21(x_106); +lean_dec(x_106); +lean_inc(x_9); +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_6); +x_142 = l_Lean_Meta_mkEq(x_140, x_141, x_6, x_7, x_8, x_9, x_10); +if (lean_obj_tag(x_142) == 0) +{ +lean_object* x_143; lean_object* x_144; lean_object* x_145; +x_143 = lean_ctor_get(x_142, 0); +lean_inc(x_143); +x_144 = lean_ctor_get(x_142, 1); +lean_inc(x_144); +lean_dec(x_142); +lean_inc(x_9); +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_6); +x_145 = l_Lean_Meta_DiscrTree_mkPath(x_143, x_6, x_7, x_8, x_9, x_144); +if (lean_obj_tag(x_145) == 0) +{ +lean_object* x_146; lean_object* x_147; lean_object* x_148; lean_object* x_149; lean_object* x_150; +x_146 = lean_ctor_get(x_145, 0); +lean_inc(x_146); +x_147 = lean_ctor_get(x_145, 1); +lean_inc(x_147); +lean_dec(x_145); +x_148 = l_Lean_Meta_mkSimpLemmaCore___lambda__3___closed__3; +x_149 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_149, 0, x_146); +lean_ctor_set(x_149, 1, x_148); +x_150 = l_Lean_Meta_mkSimpLemmaCore___lambda__2(x_1, x_2, x_3, x_4, x_149, x_6, x_7, x_8, x_9, x_147); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_149); +return x_150; +} +else +{ +lean_object* x_151; lean_object* x_152; lean_object* x_153; lean_object* x_154; +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_4); +lean_dec(x_2); +lean_dec(x_1); +x_151 = lean_ctor_get(x_145, 0); +lean_inc(x_151); +x_152 = lean_ctor_get(x_145, 1); +lean_inc(x_152); +if (lean_is_exclusive(x_145)) { + lean_ctor_release(x_145, 0); + lean_ctor_release(x_145, 1); + x_153 = x_145; +} else { + lean_dec_ref(x_145); + x_153 = lean_box(0); +} +if (lean_is_scalar(x_153)) { + x_154 = lean_alloc_ctor(1, 2, 0); +} else { + x_154 = x_153; +} +lean_ctor_set(x_154, 0, x_151); +lean_ctor_set(x_154, 1, x_152); +return x_154; +} +} +else +{ +lean_object* x_155; lean_object* x_156; lean_object* x_157; lean_object* x_158; +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_4); +lean_dec(x_2); +lean_dec(x_1); +x_155 = lean_ctor_get(x_142, 0); +lean_inc(x_155); +x_156 = lean_ctor_get(x_142, 1); +lean_inc(x_156); +if (lean_is_exclusive(x_142)) { + lean_ctor_release(x_142, 0); + lean_ctor_release(x_142, 1); + x_157 = x_142; +} else { + lean_dec_ref(x_142); + x_157 = lean_box(0); +} +if (lean_is_scalar(x_157)) { + x_158 = lean_alloc_ctor(1, 2, 0); +} else { + x_158 = x_157; +} +lean_ctor_set(x_158, 0, x_155); +lean_ctor_set(x_158, 1, x_156); +return x_158; +} +} +} +else +{ +lean_object* x_159; lean_object* x_160; lean_object* x_161; lean_object* x_162; +x_159 = l_Lean_Expr_appFn_x21(x_106); +x_160 = l_Lean_Expr_appArg_x21(x_159); +lean_dec(x_159); +x_161 = l_Lean_Expr_appArg_x21(x_106); +lean_dec(x_106); +lean_inc(x_9); +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_6); +lean_inc(x_160); +x_162 = l_Lean_Meta_DiscrTree_mkPath(x_160, x_6, x_7, x_8, x_9, x_10); +if (lean_obj_tag(x_162) == 0) +{ +lean_object* x_163; lean_object* x_164; lean_object* x_165; +x_163 = lean_ctor_get(x_162, 0); +lean_inc(x_163); +x_164 = lean_ctor_get(x_162, 1); +lean_inc(x_164); +lean_dec(x_162); +lean_inc(x_9); +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_6); +x_165 = l___private_Lean_Meta_Tactic_Simp_SimpLemmas_0__Lean_Meta_isPerm(x_160, x_161, x_6, x_7, x_8, x_9, x_164); +if (lean_obj_tag(x_165) == 0) +{ +lean_object* x_166; lean_object* x_167; uint8_t x_168; lean_object* x_169; lean_object* x_170; lean_object* x_171; +x_166 = lean_ctor_get(x_165, 0); +lean_inc(x_166); +x_167 = lean_ctor_get(x_165, 1); +lean_inc(x_167); +lean_dec(x_165); +x_168 = 1; +x_169 = lean_box(x_168); +x_170 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_170, 0, x_166); +lean_ctor_set(x_170, 1, x_169); +lean_ctor_set(x_5, 1, x_170); +lean_ctor_set(x_5, 0, x_163); +x_171 = l_Lean_Meta_mkSimpLemmaCore___lambda__2(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_167); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +return x_171; +} +else +{ +lean_object* x_172; lean_object* x_173; lean_object* x_174; lean_object* x_175; +lean_dec(x_163); lean_free_object(x_5); lean_dec(x_9); lean_dec(x_8); @@ -4822,97 +4892,34 @@ lean_dec(x_6); lean_dec(x_4); lean_dec(x_2); lean_dec(x_1); -x_154 = lean_ctor_get(x_140, 0); -lean_inc(x_154); -x_155 = lean_ctor_get(x_140, 1); -lean_inc(x_155); -if (lean_is_exclusive(x_140)) { - lean_ctor_release(x_140, 0); - lean_ctor_release(x_140, 1); - x_156 = x_140; -} else { - lean_dec_ref(x_140); - x_156 = lean_box(0); -} -if (lean_is_scalar(x_156)) { - x_157 = lean_alloc_ctor(1, 2, 0); -} else { - x_157 = x_156; -} -lean_ctor_set(x_157, 0, x_154); -lean_ctor_set(x_157, 1, x_155); -return x_157; -} -} -} -} -else -{ -lean_object* x_158; lean_object* x_159; lean_object* x_160; lean_object* x_161; lean_object* x_162; uint8_t x_163; -x_158 = lean_ctor_get(x_5, 1); -lean_inc(x_158); -lean_dec(x_5); -x_159 = lean_ctor_get(x_158, 1); -lean_inc(x_159); -if (lean_is_exclusive(x_158)) { - lean_ctor_release(x_158, 0); - lean_ctor_release(x_158, 1); - x_160 = x_158; -} else { - lean_dec_ref(x_158); - x_160 = lean_box(0); -} -x_161 = l_myMacro____x40_Init_Notation___hyg_6045____closed__4; -x_162 = lean_unsigned_to_nat(3u); -x_163 = l_Lean_Expr_isAppOfArity(x_159, x_161, x_162); -if (x_163 == 0) -{ -lean_object* x_164; lean_object* x_165; uint8_t x_166; -x_164 = l_myMacro____x40_Init_Core___hyg_172____closed__4; -x_165 = lean_unsigned_to_nat(2u); -x_166 = l_Lean_Expr_isAppOfArity(x_159, x_164, x_165); -if (x_166 == 0) -{ -lean_object* x_167; lean_object* x_168; uint8_t x_169; -x_167 = l_myMacro____x40_Init_Notation___hyg_8971____closed__4; -x_168 = lean_unsigned_to_nat(1u); -x_169 = l_Lean_Expr_isAppOfArity(x_159, x_167, x_168); -if (x_169 == 0) -{ -lean_object* x_170; -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -lean_inc(x_6); -x_170 = l_Lean_Meta_DiscrTree_mkPath(x_159, x_6, x_7, x_8, x_9, x_10); -if (lean_obj_tag(x_170) == 0) -{ -lean_object* x_171; lean_object* x_172; lean_object* x_173; lean_object* x_174; lean_object* x_175; -x_171 = lean_ctor_get(x_170, 0); -lean_inc(x_171); -x_172 = lean_ctor_get(x_170, 1); +x_172 = lean_ctor_get(x_165, 0); lean_inc(x_172); -lean_dec(x_170); -x_173 = l_Lean_Meta_mkSimpLemmaCore___lambda__3___closed__1; -if (lean_is_scalar(x_160)) { - x_174 = lean_alloc_ctor(0, 2, 0); +x_173 = lean_ctor_get(x_165, 1); +lean_inc(x_173); +if (lean_is_exclusive(x_165)) { + lean_ctor_release(x_165, 0); + lean_ctor_release(x_165, 1); + x_174 = x_165; } else { - x_174 = x_160; + lean_dec_ref(x_165); + x_174 = lean_box(0); } -lean_ctor_set(x_174, 0, x_171); -lean_ctor_set(x_174, 1, x_173); -x_175 = l_Lean_Meta_mkSimpLemmaCore___lambda__2(x_1, x_2, x_3, x_4, x_174, x_6, x_7, x_8, x_9, x_172); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_174); +if (lean_is_scalar(x_174)) { + x_175 = lean_alloc_ctor(1, 2, 0); +} else { + x_175 = x_174; +} +lean_ctor_set(x_175, 0, x_172); +lean_ctor_set(x_175, 1, x_173); return x_175; } +} else { lean_object* x_176; lean_object* x_177; lean_object* x_178; lean_object* x_179; +lean_dec(x_161); lean_dec(x_160); +lean_free_object(x_5); lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); @@ -4920,16 +4927,16 @@ lean_dec(x_6); lean_dec(x_4); lean_dec(x_2); lean_dec(x_1); -x_176 = lean_ctor_get(x_170, 0); +x_176 = lean_ctor_get(x_162, 0); lean_inc(x_176); -x_177 = lean_ctor_get(x_170, 1); +x_177 = lean_ctor_get(x_162, 1); lean_inc(x_177); -if (lean_is_exclusive(x_170)) { - lean_ctor_release(x_170, 0); - lean_ctor_release(x_170, 1); - x_178 = x_170; +if (lean_is_exclusive(x_162)) { + lean_ctor_release(x_162, 0); + lean_ctor_release(x_162, 1); + x_178 = x_162; } else { - lean_dec_ref(x_170); + lean_dec_ref(x_162); x_178 = lean_box(0); } if (lean_is_scalar(x_178)) { @@ -4942,259 +4949,200 @@ lean_ctor_set(x_179, 1, x_177); return x_179; } } +} else { -lean_object* x_180; lean_object* x_181; -x_180 = l_Lean_Expr_appArg_x21(x_159); -lean_dec(x_159); +lean_object* x_180; lean_object* x_181; lean_object* x_182; lean_object* x_183; +x_180 = l_Lean_Expr_appFn_x21(x_106); +x_181 = l_Lean_Expr_appArg_x21(x_180); +lean_dec(x_180); +x_182 = l_Lean_Expr_appArg_x21(x_106); +lean_dec(x_106); lean_inc(x_9); lean_inc(x_8); lean_inc(x_7); lean_inc(x_6); -x_181 = l_Lean_Meta_DiscrTree_mkPath(x_180, x_6, x_7, x_8, x_9, x_10); -if (lean_obj_tag(x_181) == 0) +lean_inc(x_181); +x_183 = l_Lean_Meta_DiscrTree_mkPath(x_181, x_6, x_7, x_8, x_9, x_10); +if (lean_obj_tag(x_183) == 0) { -lean_object* x_182; lean_object* x_183; lean_object* x_184; lean_object* x_185; lean_object* x_186; -x_182 = lean_ctor_get(x_181, 0); -lean_inc(x_182); -x_183 = lean_ctor_get(x_181, 1); -lean_inc(x_183); -lean_dec(x_181); -x_184 = l_Lean_Meta_mkSimpLemmaCore___lambda__3___closed__2; -if (lean_is_scalar(x_160)) { - x_185 = lean_alloc_ctor(0, 2, 0); -} else { - x_185 = x_160; -} -lean_ctor_set(x_185, 0, x_182); -lean_ctor_set(x_185, 1, x_184); -x_186 = l_Lean_Meta_mkSimpLemmaCore___lambda__2(x_1, x_2, x_3, x_4, x_185, x_6, x_7, x_8, x_9, x_183); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_185); -return x_186; -} -else +lean_object* x_184; lean_object* x_185; lean_object* x_186; +x_184 = lean_ctor_get(x_183, 0); +lean_inc(x_184); +x_185 = lean_ctor_get(x_183, 1); +lean_inc(x_185); +lean_dec(x_183); +lean_inc(x_9); +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_6); +x_186 = l___private_Lean_Meta_Tactic_Simp_SimpLemmas_0__Lean_Meta_isPerm(x_181, x_182, x_6, x_7, x_8, x_9, x_185); +if (lean_obj_tag(x_186) == 0) { -lean_object* x_187; lean_object* x_188; lean_object* x_189; lean_object* x_190; -lean_dec(x_160); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_4); -lean_dec(x_2); -lean_dec(x_1); -x_187 = lean_ctor_get(x_181, 0); +lean_object* x_187; lean_object* x_188; uint8_t x_189; lean_object* x_190; lean_object* x_191; lean_object* x_192; +x_187 = lean_ctor_get(x_186, 0); lean_inc(x_187); -x_188 = lean_ctor_get(x_181, 1); +x_188 = lean_ctor_get(x_186, 1); lean_inc(x_188); -if (lean_is_exclusive(x_181)) { - lean_ctor_release(x_181, 0); - lean_ctor_release(x_181, 1); - x_189 = x_181; +lean_dec(x_186); +x_189 = 0; +x_190 = lean_box(x_189); +x_191 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_191, 0, x_187); +lean_ctor_set(x_191, 1, x_190); +lean_ctor_set(x_5, 1, x_191); +lean_ctor_set(x_5, 0, x_184); +x_192 = l_Lean_Meta_mkSimpLemmaCore___lambda__2(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_188); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +return x_192; +} +else +{ +lean_object* x_193; lean_object* x_194; lean_object* x_195; lean_object* x_196; +lean_dec(x_184); +lean_free_object(x_5); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_4); +lean_dec(x_2); +lean_dec(x_1); +x_193 = lean_ctor_get(x_186, 0); +lean_inc(x_193); +x_194 = lean_ctor_get(x_186, 1); +lean_inc(x_194); +if (lean_is_exclusive(x_186)) { + lean_ctor_release(x_186, 0); + lean_ctor_release(x_186, 1); + x_195 = x_186; } else { - lean_dec_ref(x_181); - x_189 = lean_box(0); + lean_dec_ref(x_186); + x_195 = lean_box(0); } -if (lean_is_scalar(x_189)) { - x_190 = lean_alloc_ctor(1, 2, 0); +if (lean_is_scalar(x_195)) { + x_196 = lean_alloc_ctor(1, 2, 0); } else { - x_190 = x_189; -} -lean_ctor_set(x_190, 0, x_187); -lean_ctor_set(x_190, 1, x_188); -return x_190; + x_196 = x_195; } +lean_ctor_set(x_196, 0, x_193); +lean_ctor_set(x_196, 1, x_194); +return x_196; } } else { -lean_object* x_191; lean_object* x_192; lean_object* x_193; lean_object* x_194; -x_191 = l_Lean_Expr_appFn_x21(x_159); -x_192 = l_Lean_Expr_appArg_x21(x_191); -lean_dec(x_191); -x_193 = l_Lean_Expr_appArg_x21(x_159); -lean_dec(x_159); -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -lean_inc(x_6); -lean_inc(x_192); -x_194 = l_Lean_Meta_DiscrTree_mkPath(x_192, x_6, x_7, x_8, x_9, x_10); -if (lean_obj_tag(x_194) == 0) -{ -lean_object* x_195; lean_object* x_196; lean_object* x_197; -x_195 = lean_ctor_get(x_194, 0); -lean_inc(x_195); -x_196 = lean_ctor_get(x_194, 1); -lean_inc(x_196); -lean_dec(x_194); -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -lean_inc(x_6); -x_197 = l___private_Lean_Meta_Tactic_Simp_SimpLemmas_0__Lean_Meta_isPerm(x_192, x_193, x_6, x_7, x_8, x_9, x_196); -if (lean_obj_tag(x_197) == 0) -{ -lean_object* x_198; lean_object* x_199; uint8_t x_200; lean_object* x_201; lean_object* x_202; lean_object* x_203; lean_object* x_204; -x_198 = lean_ctor_get(x_197, 0); +lean_object* x_197; lean_object* x_198; lean_object* x_199; lean_object* x_200; +lean_dec(x_182); +lean_dec(x_181); +lean_free_object(x_5); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_4); +lean_dec(x_2); +lean_dec(x_1); +x_197 = lean_ctor_get(x_183, 0); +lean_inc(x_197); +x_198 = lean_ctor_get(x_183, 1); lean_inc(x_198); -x_199 = lean_ctor_get(x_197, 1); -lean_inc(x_199); -lean_dec(x_197); -x_200 = 1; -x_201 = lean_box(x_200); -if (lean_is_scalar(x_160)) { - x_202 = lean_alloc_ctor(0, 2, 0); +if (lean_is_exclusive(x_183)) { + lean_ctor_release(x_183, 0); + lean_ctor_release(x_183, 1); + x_199 = x_183; } else { - x_202 = x_160; + lean_dec_ref(x_183); + x_199 = lean_box(0); } -lean_ctor_set(x_202, 0, x_198); -lean_ctor_set(x_202, 1, x_201); -x_203 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_203, 0, x_195); -lean_ctor_set(x_203, 1, x_202); -x_204 = l_Lean_Meta_mkSimpLemmaCore___lambda__2(x_1, x_2, x_3, x_4, x_203, x_6, x_7, x_8, x_9, x_199); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_203); -return x_204; -} -else -{ -lean_object* x_205; lean_object* x_206; lean_object* x_207; lean_object* x_208; -lean_dec(x_195); -lean_dec(x_160); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_4); -lean_dec(x_2); -lean_dec(x_1); -x_205 = lean_ctor_get(x_197, 0); -lean_inc(x_205); -x_206 = lean_ctor_get(x_197, 1); -lean_inc(x_206); -if (lean_is_exclusive(x_197)) { - lean_ctor_release(x_197, 0); - lean_ctor_release(x_197, 1); - x_207 = x_197; +if (lean_is_scalar(x_199)) { + x_200 = lean_alloc_ctor(1, 2, 0); } else { - lean_dec_ref(x_197); - x_207 = lean_box(0); + x_200 = x_199; } -if (lean_is_scalar(x_207)) { - x_208 = lean_alloc_ctor(1, 2, 0); -} else { - x_208 = x_207; +lean_ctor_set(x_200, 0, x_197); +lean_ctor_set(x_200, 1, x_198); +return x_200; } -lean_ctor_set(x_208, 0, x_205); -lean_ctor_set(x_208, 1, x_206); -return x_208; -} -} -else -{ -lean_object* x_209; lean_object* x_210; lean_object* x_211; lean_object* x_212; -lean_dec(x_193); -lean_dec(x_192); -lean_dec(x_160); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_4); -lean_dec(x_2); -lean_dec(x_1); -x_209 = lean_ctor_get(x_194, 0); -lean_inc(x_209); -x_210 = lean_ctor_get(x_194, 1); -lean_inc(x_210); -if (lean_is_exclusive(x_194)) { - lean_ctor_release(x_194, 0); - lean_ctor_release(x_194, 1); - x_211 = x_194; -} else { - lean_dec_ref(x_194); - x_211 = lean_box(0); -} -if (lean_is_scalar(x_211)) { - x_212 = lean_alloc_ctor(1, 2, 0); -} else { - x_212 = x_211; -} -lean_ctor_set(x_212, 0, x_209); -lean_ctor_set(x_212, 1, x_210); -return x_212; } } } else { -lean_object* x_213; lean_object* x_214; lean_object* x_215; lean_object* x_216; -x_213 = l_Lean_Expr_appFn_x21(x_159); -x_214 = l_Lean_Expr_appArg_x21(x_213); -lean_dec(x_213); -x_215 = l_Lean_Expr_appArg_x21(x_159); -lean_dec(x_159); +lean_object* x_201; lean_object* x_202; lean_object* x_203; lean_object* x_204; lean_object* x_205; uint8_t x_206; +x_201 = lean_ctor_get(x_5, 1); +lean_inc(x_201); +lean_dec(x_5); +x_202 = lean_ctor_get(x_201, 1); +lean_inc(x_202); +if (lean_is_exclusive(x_201)) { + lean_ctor_release(x_201, 0); + lean_ctor_release(x_201, 1); + x_203 = x_201; +} else { + lean_dec_ref(x_201); + x_203 = lean_box(0); +} +x_204 = l_myMacro____x40_Init_Notation___hyg_6045____closed__4; +x_205 = lean_unsigned_to_nat(3u); +x_206 = l_Lean_Expr_isAppOfArity(x_202, x_204, x_205); +if (x_206 == 0) +{ +lean_object* x_207; lean_object* x_208; uint8_t x_209; +x_207 = l_myMacro____x40_Init_Core___hyg_172____closed__4; +x_208 = lean_unsigned_to_nat(2u); +x_209 = l_Lean_Expr_isAppOfArity(x_202, x_207, x_208); +if (x_209 == 0) +{ +lean_object* x_210; uint8_t x_211; +x_210 = l_myMacro____x40_Init_Core___hyg_1796____closed__4; +x_211 = l_Lean_Expr_isAppOfArity(x_202, x_210, x_205); +if (x_211 == 0) +{ +lean_object* x_212; lean_object* x_213; uint8_t x_214; +x_212 = l_myMacro____x40_Init_Notation___hyg_8971____closed__4; +x_213 = lean_unsigned_to_nat(1u); +x_214 = l_Lean_Expr_isAppOfArity(x_202, x_212, x_213); +if (x_214 == 0) +{ +lean_object* x_215; lean_inc(x_9); lean_inc(x_8); lean_inc(x_7); lean_inc(x_6); -lean_inc(x_214); -x_216 = l_Lean_Meta_DiscrTree_mkPath(x_214, x_6, x_7, x_8, x_9, x_10); -if (lean_obj_tag(x_216) == 0) +x_215 = l_Lean_Meta_DiscrTree_mkPath(x_202, x_6, x_7, x_8, x_9, x_10); +if (lean_obj_tag(x_215) == 0) { -lean_object* x_217; lean_object* x_218; lean_object* x_219; -x_217 = lean_ctor_get(x_216, 0); +lean_object* x_216; lean_object* x_217; lean_object* x_218; lean_object* x_219; lean_object* x_220; +x_216 = lean_ctor_get(x_215, 0); +lean_inc(x_216); +x_217 = lean_ctor_get(x_215, 1); lean_inc(x_217); -x_218 = lean_ctor_get(x_216, 1); -lean_inc(x_218); -lean_dec(x_216); -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -lean_inc(x_6); -x_219 = l___private_Lean_Meta_Tactic_Simp_SimpLemmas_0__Lean_Meta_isPerm(x_214, x_215, x_6, x_7, x_8, x_9, x_218); -if (lean_obj_tag(x_219) == 0) -{ -lean_object* x_220; lean_object* x_221; uint8_t x_222; lean_object* x_223; lean_object* x_224; lean_object* x_225; lean_object* x_226; -x_220 = lean_ctor_get(x_219, 0); -lean_inc(x_220); -x_221 = lean_ctor_get(x_219, 1); -lean_inc(x_221); -lean_dec(x_219); -x_222 = 0; -x_223 = lean_box(x_222); -if (lean_is_scalar(x_160)) { - x_224 = lean_alloc_ctor(0, 2, 0); +lean_dec(x_215); +x_218 = l_Lean_Meta_mkSimpLemmaCore___lambda__3___closed__1; +if (lean_is_scalar(x_203)) { + x_219 = lean_alloc_ctor(0, 2, 0); } else { - x_224 = x_160; + x_219 = x_203; } -lean_ctor_set(x_224, 0, x_220); -lean_ctor_set(x_224, 1, x_223); -x_225 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_225, 0, x_217); -lean_ctor_set(x_225, 1, x_224); -x_226 = l_Lean_Meta_mkSimpLemmaCore___lambda__2(x_1, x_2, x_3, x_4, x_225, x_6, x_7, x_8, x_9, x_221); +lean_ctor_set(x_219, 0, x_216); +lean_ctor_set(x_219, 1, x_218); +x_220 = l_Lean_Meta_mkSimpLemmaCore___lambda__2(x_1, x_2, x_3, x_4, x_219, x_6, x_7, x_8, x_9, x_217); lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); -lean_dec(x_225); -return x_226; +lean_dec(x_219); +return x_220; } else { -lean_object* x_227; lean_object* x_228; lean_object* x_229; lean_object* x_230; -lean_dec(x_217); -lean_dec(x_160); +lean_object* x_221; lean_object* x_222; lean_object* x_223; lean_object* x_224; +lean_dec(x_203); lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); @@ -5202,34 +5150,66 @@ lean_dec(x_6); lean_dec(x_4); lean_dec(x_2); lean_dec(x_1); -x_227 = lean_ctor_get(x_219, 0); -lean_inc(x_227); -x_228 = lean_ctor_get(x_219, 1); -lean_inc(x_228); -if (lean_is_exclusive(x_219)) { - lean_ctor_release(x_219, 0); - lean_ctor_release(x_219, 1); - x_229 = x_219; +x_221 = lean_ctor_get(x_215, 0); +lean_inc(x_221); +x_222 = lean_ctor_get(x_215, 1); +lean_inc(x_222); +if (lean_is_exclusive(x_215)) { + lean_ctor_release(x_215, 0); + lean_ctor_release(x_215, 1); + x_223 = x_215; } else { - lean_dec_ref(x_219); - x_229 = lean_box(0); + lean_dec_ref(x_215); + x_223 = lean_box(0); } -if (lean_is_scalar(x_229)) { - x_230 = lean_alloc_ctor(1, 2, 0); +if (lean_is_scalar(x_223)) { + x_224 = lean_alloc_ctor(1, 2, 0); } else { - x_230 = x_229; + x_224 = x_223; +} +lean_ctor_set(x_224, 0, x_221); +lean_ctor_set(x_224, 1, x_222); +return x_224; +} +} +else +{ +lean_object* x_225; lean_object* x_226; +x_225 = l_Lean_Expr_appArg_x21(x_202); +lean_dec(x_202); +lean_inc(x_9); +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_6); +x_226 = l_Lean_Meta_DiscrTree_mkPath(x_225, x_6, x_7, x_8, x_9, x_10); +if (lean_obj_tag(x_226) == 0) +{ +lean_object* x_227; lean_object* x_228; lean_object* x_229; lean_object* x_230; lean_object* x_231; +x_227 = lean_ctor_get(x_226, 0); +lean_inc(x_227); +x_228 = lean_ctor_get(x_226, 1); +lean_inc(x_228); +lean_dec(x_226); +x_229 = l_Lean_Meta_mkSimpLemmaCore___lambda__3___closed__2; +if (lean_is_scalar(x_203)) { + x_230 = lean_alloc_ctor(0, 2, 0); +} else { + x_230 = x_203; } lean_ctor_set(x_230, 0, x_227); -lean_ctor_set(x_230, 1, x_228); -return x_230; -} +lean_ctor_set(x_230, 1, x_229); +x_231 = l_Lean_Meta_mkSimpLemmaCore___lambda__2(x_1, x_2, x_3, x_4, x_230, x_6, x_7, x_8, x_9, x_228); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_230); +return x_231; } else { -lean_object* x_231; lean_object* x_232; lean_object* x_233; lean_object* x_234; -lean_dec(x_215); -lean_dec(x_214); -lean_dec(x_160); +lean_object* x_232; lean_object* x_233; lean_object* x_234; lean_object* x_235; +lean_dec(x_203); lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); @@ -5237,26 +5217,393 @@ lean_dec(x_6); lean_dec(x_4); lean_dec(x_2); lean_dec(x_1); -x_231 = lean_ctor_get(x_216, 0); -lean_inc(x_231); -x_232 = lean_ctor_get(x_216, 1); +x_232 = lean_ctor_get(x_226, 0); lean_inc(x_232); -if (lean_is_exclusive(x_216)) { - lean_ctor_release(x_216, 0); - lean_ctor_release(x_216, 1); - x_233 = x_216; +x_233 = lean_ctor_get(x_226, 1); +lean_inc(x_233); +if (lean_is_exclusive(x_226)) { + lean_ctor_release(x_226, 0); + lean_ctor_release(x_226, 1); + x_234 = x_226; } else { - lean_dec_ref(x_216); - x_233 = lean_box(0); + lean_dec_ref(x_226); + x_234 = lean_box(0); } -if (lean_is_scalar(x_233)) { - x_234 = lean_alloc_ctor(1, 2, 0); +if (lean_is_scalar(x_234)) { + x_235 = lean_alloc_ctor(1, 2, 0); } else { - x_234 = x_233; + x_235 = x_234; } -lean_ctor_set(x_234, 0, x_231); -lean_ctor_set(x_234, 1, x_232); -return x_234; +lean_ctor_set(x_235, 0, x_232); +lean_ctor_set(x_235, 1, x_233); +return x_235; +} +} +} +else +{ +lean_object* x_236; lean_object* x_237; lean_object* x_238; lean_object* x_239; +x_236 = l_Lean_Expr_appFn_x21(x_202); +x_237 = l_Lean_Expr_appArg_x21(x_236); +lean_dec(x_236); +x_238 = l_Lean_Expr_appArg_x21(x_202); +lean_dec(x_202); +lean_inc(x_9); +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_6); +x_239 = l_Lean_Meta_mkEq(x_237, x_238, x_6, x_7, x_8, x_9, x_10); +if (lean_obj_tag(x_239) == 0) +{ +lean_object* x_240; lean_object* x_241; lean_object* x_242; +x_240 = lean_ctor_get(x_239, 0); +lean_inc(x_240); +x_241 = lean_ctor_get(x_239, 1); +lean_inc(x_241); +lean_dec(x_239); +lean_inc(x_9); +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_6); +x_242 = l_Lean_Meta_DiscrTree_mkPath(x_240, x_6, x_7, x_8, x_9, x_241); +if (lean_obj_tag(x_242) == 0) +{ +lean_object* x_243; lean_object* x_244; lean_object* x_245; lean_object* x_246; lean_object* x_247; +x_243 = lean_ctor_get(x_242, 0); +lean_inc(x_243); +x_244 = lean_ctor_get(x_242, 1); +lean_inc(x_244); +lean_dec(x_242); +x_245 = l_Lean_Meta_mkSimpLemmaCore___lambda__3___closed__3; +if (lean_is_scalar(x_203)) { + x_246 = lean_alloc_ctor(0, 2, 0); +} else { + x_246 = x_203; +} +lean_ctor_set(x_246, 0, x_243); +lean_ctor_set(x_246, 1, x_245); +x_247 = l_Lean_Meta_mkSimpLemmaCore___lambda__2(x_1, x_2, x_3, x_4, x_246, x_6, x_7, x_8, x_9, x_244); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_246); +return x_247; +} +else +{ +lean_object* x_248; lean_object* x_249; lean_object* x_250; lean_object* x_251; +lean_dec(x_203); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_4); +lean_dec(x_2); +lean_dec(x_1); +x_248 = lean_ctor_get(x_242, 0); +lean_inc(x_248); +x_249 = lean_ctor_get(x_242, 1); +lean_inc(x_249); +if (lean_is_exclusive(x_242)) { + lean_ctor_release(x_242, 0); + lean_ctor_release(x_242, 1); + x_250 = x_242; +} else { + lean_dec_ref(x_242); + x_250 = lean_box(0); +} +if (lean_is_scalar(x_250)) { + x_251 = lean_alloc_ctor(1, 2, 0); +} else { + x_251 = x_250; +} +lean_ctor_set(x_251, 0, x_248); +lean_ctor_set(x_251, 1, x_249); +return x_251; +} +} +else +{ +lean_object* x_252; lean_object* x_253; lean_object* x_254; lean_object* x_255; +lean_dec(x_203); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_4); +lean_dec(x_2); +lean_dec(x_1); +x_252 = lean_ctor_get(x_239, 0); +lean_inc(x_252); +x_253 = lean_ctor_get(x_239, 1); +lean_inc(x_253); +if (lean_is_exclusive(x_239)) { + lean_ctor_release(x_239, 0); + lean_ctor_release(x_239, 1); + x_254 = x_239; +} else { + lean_dec_ref(x_239); + x_254 = lean_box(0); +} +if (lean_is_scalar(x_254)) { + x_255 = lean_alloc_ctor(1, 2, 0); +} else { + x_255 = x_254; +} +lean_ctor_set(x_255, 0, x_252); +lean_ctor_set(x_255, 1, x_253); +return x_255; +} +} +} +else +{ +lean_object* x_256; lean_object* x_257; lean_object* x_258; lean_object* x_259; +x_256 = l_Lean_Expr_appFn_x21(x_202); +x_257 = l_Lean_Expr_appArg_x21(x_256); +lean_dec(x_256); +x_258 = l_Lean_Expr_appArg_x21(x_202); +lean_dec(x_202); +lean_inc(x_9); +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_6); +lean_inc(x_257); +x_259 = l_Lean_Meta_DiscrTree_mkPath(x_257, x_6, x_7, x_8, x_9, x_10); +if (lean_obj_tag(x_259) == 0) +{ +lean_object* x_260; lean_object* x_261; lean_object* x_262; +x_260 = lean_ctor_get(x_259, 0); +lean_inc(x_260); +x_261 = lean_ctor_get(x_259, 1); +lean_inc(x_261); +lean_dec(x_259); +lean_inc(x_9); +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_6); +x_262 = l___private_Lean_Meta_Tactic_Simp_SimpLemmas_0__Lean_Meta_isPerm(x_257, x_258, x_6, x_7, x_8, x_9, x_261); +if (lean_obj_tag(x_262) == 0) +{ +lean_object* x_263; lean_object* x_264; uint8_t x_265; lean_object* x_266; lean_object* x_267; lean_object* x_268; lean_object* x_269; +x_263 = lean_ctor_get(x_262, 0); +lean_inc(x_263); +x_264 = lean_ctor_get(x_262, 1); +lean_inc(x_264); +lean_dec(x_262); +x_265 = 1; +x_266 = lean_box(x_265); +if (lean_is_scalar(x_203)) { + x_267 = lean_alloc_ctor(0, 2, 0); +} else { + x_267 = x_203; +} +lean_ctor_set(x_267, 0, x_263); +lean_ctor_set(x_267, 1, x_266); +x_268 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_268, 0, x_260); +lean_ctor_set(x_268, 1, x_267); +x_269 = l_Lean_Meta_mkSimpLemmaCore___lambda__2(x_1, x_2, x_3, x_4, x_268, x_6, x_7, x_8, x_9, x_264); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_268); +return x_269; +} +else +{ +lean_object* x_270; lean_object* x_271; lean_object* x_272; lean_object* x_273; +lean_dec(x_260); +lean_dec(x_203); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_4); +lean_dec(x_2); +lean_dec(x_1); +x_270 = lean_ctor_get(x_262, 0); +lean_inc(x_270); +x_271 = lean_ctor_get(x_262, 1); +lean_inc(x_271); +if (lean_is_exclusive(x_262)) { + lean_ctor_release(x_262, 0); + lean_ctor_release(x_262, 1); + x_272 = x_262; +} else { + lean_dec_ref(x_262); + x_272 = lean_box(0); +} +if (lean_is_scalar(x_272)) { + x_273 = lean_alloc_ctor(1, 2, 0); +} else { + x_273 = x_272; +} +lean_ctor_set(x_273, 0, x_270); +lean_ctor_set(x_273, 1, x_271); +return x_273; +} +} +else +{ +lean_object* x_274; lean_object* x_275; lean_object* x_276; lean_object* x_277; +lean_dec(x_258); +lean_dec(x_257); +lean_dec(x_203); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_4); +lean_dec(x_2); +lean_dec(x_1); +x_274 = lean_ctor_get(x_259, 0); +lean_inc(x_274); +x_275 = lean_ctor_get(x_259, 1); +lean_inc(x_275); +if (lean_is_exclusive(x_259)) { + lean_ctor_release(x_259, 0); + lean_ctor_release(x_259, 1); + x_276 = x_259; +} else { + lean_dec_ref(x_259); + x_276 = lean_box(0); +} +if (lean_is_scalar(x_276)) { + x_277 = lean_alloc_ctor(1, 2, 0); +} else { + x_277 = x_276; +} +lean_ctor_set(x_277, 0, x_274); +lean_ctor_set(x_277, 1, x_275); +return x_277; +} +} +} +else +{ +lean_object* x_278; lean_object* x_279; lean_object* x_280; lean_object* x_281; +x_278 = l_Lean_Expr_appFn_x21(x_202); +x_279 = l_Lean_Expr_appArg_x21(x_278); +lean_dec(x_278); +x_280 = l_Lean_Expr_appArg_x21(x_202); +lean_dec(x_202); +lean_inc(x_9); +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_6); +lean_inc(x_279); +x_281 = l_Lean_Meta_DiscrTree_mkPath(x_279, x_6, x_7, x_8, x_9, x_10); +if (lean_obj_tag(x_281) == 0) +{ +lean_object* x_282; lean_object* x_283; lean_object* x_284; +x_282 = lean_ctor_get(x_281, 0); +lean_inc(x_282); +x_283 = lean_ctor_get(x_281, 1); +lean_inc(x_283); +lean_dec(x_281); +lean_inc(x_9); +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_6); +x_284 = l___private_Lean_Meta_Tactic_Simp_SimpLemmas_0__Lean_Meta_isPerm(x_279, x_280, x_6, x_7, x_8, x_9, x_283); +if (lean_obj_tag(x_284) == 0) +{ +lean_object* x_285; lean_object* x_286; uint8_t x_287; lean_object* x_288; lean_object* x_289; lean_object* x_290; lean_object* x_291; +x_285 = lean_ctor_get(x_284, 0); +lean_inc(x_285); +x_286 = lean_ctor_get(x_284, 1); +lean_inc(x_286); +lean_dec(x_284); +x_287 = 0; +x_288 = lean_box(x_287); +if (lean_is_scalar(x_203)) { + x_289 = lean_alloc_ctor(0, 2, 0); +} else { + x_289 = x_203; +} +lean_ctor_set(x_289, 0, x_285); +lean_ctor_set(x_289, 1, x_288); +x_290 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_290, 0, x_282); +lean_ctor_set(x_290, 1, x_289); +x_291 = l_Lean_Meta_mkSimpLemmaCore___lambda__2(x_1, x_2, x_3, x_4, x_290, x_6, x_7, x_8, x_9, x_286); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_290); +return x_291; +} +else +{ +lean_object* x_292; lean_object* x_293; lean_object* x_294; lean_object* x_295; +lean_dec(x_282); +lean_dec(x_203); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_4); +lean_dec(x_2); +lean_dec(x_1); +x_292 = lean_ctor_get(x_284, 0); +lean_inc(x_292); +x_293 = lean_ctor_get(x_284, 1); +lean_inc(x_293); +if (lean_is_exclusive(x_284)) { + lean_ctor_release(x_284, 0); + lean_ctor_release(x_284, 1); + x_294 = x_284; +} else { + lean_dec_ref(x_284); + x_294 = lean_box(0); +} +if (lean_is_scalar(x_294)) { + x_295 = lean_alloc_ctor(1, 2, 0); +} else { + x_295 = x_294; +} +lean_ctor_set(x_295, 0, x_292); +lean_ctor_set(x_295, 1, x_293); +return x_295; +} +} +else +{ +lean_object* x_296; lean_object* x_297; lean_object* x_298; lean_object* x_299; +lean_dec(x_280); +lean_dec(x_279); +lean_dec(x_203); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_4); +lean_dec(x_2); +lean_dec(x_1); +x_296 = lean_ctor_get(x_281, 0); +lean_inc(x_296); +x_297 = lean_ctor_get(x_281, 1); +lean_inc(x_297); +if (lean_is_exclusive(x_281)) { + lean_ctor_release(x_281, 0); + lean_ctor_release(x_281, 1); + x_298 = x_281; +} else { + lean_dec_ref(x_281); + x_298 = lean_box(0); +} +if (lean_is_scalar(x_298)) { + x_299 = lean_alloc_ctor(1, 2, 0); +} else { + x_299 = x_298; +} +lean_ctor_set(x_299, 0, x_296); +lean_ctor_set(x_299, 1, x_297); +return x_299; } } } @@ -5283,7 +5630,7 @@ lean_closure_set(x_17, 3, x_5); x_18 = lean_alloc_closure((void*)(l_ReaderT_bind___at_Lean_Meta_instMonadLCtxMetaM___spec__2___rarg), 7, 2); lean_closure_set(x_18, 0, x_15); lean_closure_set(x_18, 1, x_17); -x_19 = l_Lean_Meta_withNewMCtxDepth___at_Lean_Meta_mkSimpLemmaCore___spec__1___rarg(x_18, x_7, x_8, x_9, x_10, x_11); +x_19 = l_Lean_Meta_withNewMCtxDepth___at_Lean_Meta_synthInstance_x3f___spec__4___rarg(x_18, x_7, x_8, x_9, x_10, x_11); return x_19; } } @@ -5365,7 +5712,7 @@ x_24 = l_Lean_KernelException_toMessageData___closed__15; x_25 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_25, 0, x_23); lean_ctor_set(x_25, 1, x_24); -x_26 = l_Lean_throwError___at_Lean_Meta_mkSimpLemmaCore___spec__2(x_25, x_6, x_7, x_8, x_9, x_20); +x_26 = l_Lean_throwError___at_Lean_Meta_addDefaultInstance___spec__1(x_25, x_6, x_7, x_8, x_9, x_20); lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); @@ -5492,18 +5839,6 @@ return x_45; } } } -lean_object* l_Lean_throwError___at_Lean_Meta_mkSimpLemmaCore___spec__2___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { -_start: -{ -lean_object* x_7; -x_7 = l_Lean_throwError___at_Lean_Meta_mkSimpLemmaCore___spec__2(x_1, x_2, x_3, x_4, x_5, x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -return x_7; -} -} lean_object* l_Lean_Meta_mkSimpLemmaCore___lambda__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { _start: { @@ -5559,49 +5894,7 @@ x_12 = l_Lean_Meta_mkSimpLemmaCore(x_1, x_2, x_11, x_4, x_5, x_6, x_7, x_8, x_9, return x_12; } } -lean_object* l_List_map___at_Lean_Meta_addSimpLemma___spec__1(lean_object* x_1) { -_start: -{ -if (lean_obj_tag(x_1) == 0) -{ -lean_object* x_2; -x_2 = lean_box(0); -return x_2; -} -else -{ -uint8_t x_3; -x_3 = !lean_is_exclusive(x_1); -if (x_3 == 0) -{ -lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; -x_4 = lean_ctor_get(x_1, 0); -x_5 = lean_ctor_get(x_1, 1); -x_6 = l_Lean_mkLevelParam(x_4); -x_7 = l_List_map___at_Lean_Meta_addSimpLemma___spec__1(x_5); -lean_ctor_set(x_1, 1, x_7); -lean_ctor_set(x_1, 0, x_6); -return x_1; -} -else -{ -lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; -x_8 = lean_ctor_get(x_1, 0); -x_9 = lean_ctor_get(x_1, 1); -lean_inc(x_9); -lean_inc(x_8); -lean_dec(x_1); -x_10 = l_Lean_mkLevelParam(x_8); -x_11 = l_List_map___at_Lean_Meta_addSimpLemma___spec__1(x_9); -x_12 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_12, 0, x_10); -lean_ctor_set(x_12, 1, x_11); -return x_12; -} -} -} -} -lean_object* l_Lean_ScopedEnvExtension_add___at_Lean_Meta_addSimpLemma___spec__2(lean_object* x_1, lean_object* x_2, uint8_t x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { +lean_object* l_Lean_ScopedEnvExtension_add___at_Lean_Meta_addSimpLemma___spec__1(lean_object* x_1, lean_object* x_2, uint8_t x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { _start: { switch (x_3) { @@ -5869,7 +6162,7 @@ lean_inc(x_12); lean_dec(x_10); x_13 = l_Lean_ConstantInfo_levelParams(x_11); lean_dec(x_11); -x_14 = l_List_map___at_Lean_Meta_addSimpLemma___spec__1(x_13); +x_14 = l_List_map___at_Lean_Meta_addInstance___spec__1(x_13); lean_inc(x_1); x_15 = l_Lean_mkConst(x_1, x_14); x_16 = lean_box(0); @@ -5891,7 +6184,7 @@ x_21 = lean_ctor_get(x_19, 1); lean_inc(x_21); lean_dec(x_19); x_22 = l_Lean_Meta_simpExtension; -x_23 = l_Lean_ScopedEnvExtension_add___at_Lean_Meta_addSimpLemma___spec__2(x_22, x_20, x_3, x_5, x_6, x_7, x_8, x_21); +x_23 = l_Lean_ScopedEnvExtension_add___at_Lean_Meta_addSimpLemma___spec__1(x_22, x_20, x_3, x_5, x_6, x_7, x_8, x_21); lean_dec(x_8); lean_dec(x_6); lean_dec(x_5); @@ -5954,13 +6247,13 @@ return x_31; } } } -lean_object* l_Lean_ScopedEnvExtension_add___at_Lean_Meta_addSimpLemma___spec__2___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { +lean_object* l_Lean_ScopedEnvExtension_add___at_Lean_Meta_addSimpLemma___spec__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { _start: { uint8_t x_9; lean_object* x_10; x_9 = lean_unbox(x_3); lean_dec(x_3); -x_10 = l_Lean_ScopedEnvExtension_add___at_Lean_Meta_addSimpLemma___spec__2(x_1, x_2, x_9, x_4, x_5, x_6, x_7, x_8); +x_10 = l_Lean_ScopedEnvExtension_add___at_Lean_Meta_addSimpLemma___spec__1(x_1, x_2, x_9, x_4, x_5, x_6, x_7, x_8); lean_dec(x_7); lean_dec(x_5); lean_dec(x_4); @@ -5979,7 +6272,7 @@ x_12 = l_Lean_Meta_addSimpLemma(x_1, x_10, x_11, x_4, x_5, x_6, x_7, x_8, x_9); return x_12; } } -lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_1375____lambda__1(lean_object* x_1, lean_object* x_2, uint8_t x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { +lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_1455____lambda__1(lean_object* x_1, lean_object* x_2, uint8_t x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { _start: { uint8_t x_7; lean_object* x_8; lean_object* x_9; lean_object* x_27; lean_object* x_28; uint8_t x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; @@ -6147,7 +6440,7 @@ return x_25; } } } -static lean_object* _init_l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_1375____closed__1() { +static lean_object* _init_l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_1455____closed__1() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; @@ -6157,7 +6450,7 @@ x_3 = lean_name_mk_string(x_1, x_2); return x_3; } } -static lean_object* _init_l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_1375____closed__2() { +static lean_object* _init_l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_1455____closed__2() { _start: { lean_object* x_1; @@ -6165,12 +6458,12 @@ x_1 = lean_mk_string("simplification lemma"); return x_1; } } -static lean_object* _init_l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_1375____closed__3() { +static lean_object* _init_l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_1455____closed__3() { _start: { lean_object* x_1; lean_object* x_2; uint8_t x_3; lean_object* x_4; -x_1 = l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_1375____closed__1; -x_2 = l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_1375____closed__2; +x_1 = l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_1455____closed__1; +x_2 = l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_1455____closed__2; x_3 = 0; x_4 = lean_alloc_ctor(0, 2, 1); lean_ctor_set(x_4, 0, x_1); @@ -6179,20 +6472,20 @@ lean_ctor_set_uint8(x_4, sizeof(void*)*2, x_3); return x_4; } } -static lean_object* _init_l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_1375____closed__4() { +static lean_object* _init_l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_1455____closed__4() { _start: { lean_object* x_1; -x_1 = lean_alloc_closure((void*)(l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_1375____lambda__1___boxed), 6, 0); +x_1 = lean_alloc_closure((void*)(l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_1455____lambda__1___boxed), 6, 0); return x_1; } } -static lean_object* _init_l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_1375____closed__5() { +static lean_object* _init_l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_1455____closed__5() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; -x_1 = l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_1375____closed__3; -x_2 = l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_1375____closed__4; +x_1 = l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_1455____closed__3; +x_2 = l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_1455____closed__4; x_3 = l_Lean_registerTagAttribute___closed__5; x_4 = lean_alloc_ctor(0, 3, 0); lean_ctor_set(x_4, 0, x_1); @@ -6201,22 +6494,22 @@ lean_ctor_set(x_4, 2, x_3); return x_4; } } -lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_1375_(lean_object* x_1) { +lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_1455_(lean_object* x_1) { _start: { lean_object* x_2; lean_object* x_3; -x_2 = l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_1375____closed__5; +x_2 = l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_1455____closed__5; x_3 = l_Lean_registerBuiltinAttribute(x_2, x_1); return x_3; } } -lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_1375____lambda__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { +lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_1455____lambda__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { _start: { uint8_t x_7; lean_object* x_8; x_7 = lean_unbox(x_3); lean_dec(x_3); -x_8 = l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_1375____lambda__1(x_1, x_2, x_7, x_4, x_5, x_6); +x_8 = l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_1455____lambda__1(x_1, x_2, x_7, x_4, x_5, x_6); lean_dec(x_2); return x_8; } @@ -6432,7 +6725,7 @@ lean_inc(x_12); lean_dec(x_10); x_13 = l_Lean_ConstantInfo_levelParams(x_11); lean_dec(x_11); -x_14 = l_List_map___at_Lean_Meta_addSimpLemma___spec__1(x_13); +x_14 = l_List_map___at_Lean_Meta_addInstance___spec__1(x_13); lean_inc(x_2); x_15 = l_Lean_mkConst(x_2, x_14); x_16 = lean_box(0); @@ -6579,101 +6872,6 @@ x_2 = lean_alloc_closure((void*)(l_Lean_Meta_SimpLemma_getValue_match__1___rarg) return x_2; } } -lean_object* l_List_mapM___at_Lean_Meta_SimpLemma_getValue___spec__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { -_start: -{ -if (lean_obj_tag(x_1) == 0) -{ -lean_object* x_7; lean_object* x_8; -x_7 = lean_box(0); -x_8 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_8, 0, x_7); -lean_ctor_set(x_8, 1, x_6); -return x_8; -} -else -{ -uint8_t x_9; -x_9 = !lean_is_exclusive(x_1); -if (x_9 == 0) -{ -lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; uint8_t x_16; -x_10 = lean_ctor_get(x_1, 1); -x_11 = lean_ctor_get(x_1, 0); -lean_dec(x_11); -x_12 = l_Lean_Meta_mkFreshLevelMVar___rarg(x_3, x_4, x_5, x_6); -x_13 = lean_ctor_get(x_12, 0); -lean_inc(x_13); -x_14 = lean_ctor_get(x_12, 1); -lean_inc(x_14); -lean_dec(x_12); -x_15 = l_List_mapM___at_Lean_Meta_SimpLemma_getValue___spec__1(x_10, x_2, x_3, x_4, x_5, x_14); -x_16 = !lean_is_exclusive(x_15); -if (x_16 == 0) -{ -lean_object* x_17; -x_17 = lean_ctor_get(x_15, 0); -lean_ctor_set(x_1, 1, x_17); -lean_ctor_set(x_1, 0, x_13); -lean_ctor_set(x_15, 0, x_1); -return x_15; -} -else -{ -lean_object* x_18; lean_object* x_19; lean_object* x_20; -x_18 = lean_ctor_get(x_15, 0); -x_19 = lean_ctor_get(x_15, 1); -lean_inc(x_19); -lean_inc(x_18); -lean_dec(x_15); -lean_ctor_set(x_1, 1, x_18); -lean_ctor_set(x_1, 0, x_13); -x_20 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_20, 0, x_1); -lean_ctor_set(x_20, 1, x_19); -return x_20; -} -} -else -{ -lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; -x_21 = lean_ctor_get(x_1, 1); -lean_inc(x_21); -lean_dec(x_1); -x_22 = l_Lean_Meta_mkFreshLevelMVar___rarg(x_3, x_4, x_5, x_6); -x_23 = lean_ctor_get(x_22, 0); -lean_inc(x_23); -x_24 = lean_ctor_get(x_22, 1); -lean_inc(x_24); -lean_dec(x_22); -x_25 = l_List_mapM___at_Lean_Meta_SimpLemma_getValue___spec__1(x_21, x_2, x_3, x_4, x_5, x_24); -x_26 = lean_ctor_get(x_25, 0); -lean_inc(x_26); -x_27 = lean_ctor_get(x_25, 1); -lean_inc(x_27); -if (lean_is_exclusive(x_25)) { - lean_ctor_release(x_25, 0); - lean_ctor_release(x_25, 1); - x_28 = x_25; -} else { - lean_dec_ref(x_25); - x_28 = lean_box(0); -} -x_29 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_29, 0, x_23); -lean_ctor_set(x_29, 1, x_26); -if (lean_is_scalar(x_28)) { - x_30 = lean_alloc_ctor(0, 2, 0); -} else { - x_30 = x_28; -} -lean_ctor_set(x_30, 0, x_29); -lean_ctor_set(x_30, 1, x_27); -return x_30; -} -} -} -} lean_object* l_Lean_Meta_SimpLemma_getValue(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { _start: { @@ -6718,7 +6916,7 @@ x_18 = lean_ctor_get(x_7, 1); lean_dec(x_18); x_19 = lean_ctor_get(x_7, 0); lean_dec(x_19); -x_20 = l_List_mapM___at_Lean_Meta_SimpLemma_getValue___spec__1(x_15, x_2, x_3, x_4, x_5, x_14); +x_20 = l_List_mapM___at___private_Lean_Meta_AppBuilder_0__Lean_Meta_mkFun___spec__1(x_15, x_2, x_3, x_4, x_5, x_14); x_21 = !lean_is_exclusive(x_20); if (x_21 == 0) { @@ -6747,7 +6945,7 @@ else { lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_dec(x_7); -x_28 = l_List_mapM___at_Lean_Meta_SimpLemma_getValue___spec__1(x_15, x_2, x_3, x_4, x_5, x_14); +x_28 = l_List_mapM___at___private_Lean_Meta_AppBuilder_0__Lean_Meta_mkFun___spec__1(x_15, x_2, x_3, x_4, x_5, x_14); x_29 = lean_ctor_get(x_28, 0); lean_inc(x_29); x_30 = lean_ctor_get(x_28, 1); @@ -6805,7 +7003,7 @@ if (lean_is_exclusive(x_7)) { lean_dec_ref(x_7); x_39 = lean_box(0); } -x_40 = l_List_mapM___at_Lean_Meta_SimpLemma_getValue___spec__1(x_37, x_2, x_3, x_4, x_5, x_36); +x_40 = l_List_mapM___at___private_Lean_Meta_AppBuilder_0__Lean_Meta_mkFun___spec__1(x_37, x_2, x_3, x_4, x_5, x_36); x_41 = lean_ctor_get(x_40, 0); lean_inc(x_41); x_42 = lean_ctor_get(x_40, 1); @@ -6893,18 +7091,6 @@ return x_53; } } } -lean_object* l_List_mapM___at_Lean_Meta_SimpLemma_getValue___spec__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { -_start: -{ -lean_object* x_7; -x_7 = l_List_mapM___at_Lean_Meta_SimpLemma_getValue___spec__1(x_1, x_2, x_3, x_4, x_5, x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -return x_7; -} -} lean_object* l_Lean_Meta_SimpLemma_getValue___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { _start: { @@ -6922,6 +7108,7 @@ lean_object* initialize_Lean_ScopedEnvExtension(lean_object*); lean_object* initialize_Lean_Util_Recognizers(lean_object*); lean_object* initialize_Lean_Meta_LevelDefEq(lean_object*); lean_object* initialize_Lean_Meta_DiscrTree(lean_object*); +lean_object* initialize_Lean_Meta_AppBuilder(lean_object*); static bool _G_initialized = false; lean_object* initialize_Lean_Meta_Tactic_Simp_SimpLemmas(lean_object* w) { lean_object * res; @@ -6942,6 +7129,9 @@ lean_dec_ref(res); res = initialize_Lean_Meta_DiscrTree(lean_io_mk_world()); if (lean_io_result_is_error(res)) return res; lean_dec_ref(res); +res = initialize_Lean_Meta_AppBuilder(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); l_Lean_Meta_instInhabitedSimpLemmaKind = _init_l_Lean_Meta_instInhabitedSimpLemmaKind(); l_Lean_Meta_instBEqSimpLemmaKind___closed__1 = _init_l_Lean_Meta_instBEqSimpLemmaKind___closed__1(); lean_mark_persistent(l_Lean_Meta_instBEqSimpLemmaKind___closed__1); @@ -6963,8 +7153,6 @@ l_Lean_Meta_instToFormatSimpLemma___closed__2 = _init_l_Lean_Meta_instToFormatSi lean_mark_persistent(l_Lean_Meta_instToFormatSimpLemma___closed__2); l_Lean_Meta_instToFormatSimpLemma___closed__3 = _init_l_Lean_Meta_instToFormatSimpLemma___closed__3(); lean_mark_persistent(l_Lean_Meta_instToFormatSimpLemma___closed__3); -l_Lean_Meta_SimpLemmas_pre___default___closed__1 = _init_l_Lean_Meta_SimpLemmas_pre___default___closed__1(); -lean_mark_persistent(l_Lean_Meta_SimpLemmas_pre___default___closed__1); l_Lean_Meta_SimpLemmas_pre___default = _init_l_Lean_Meta_SimpLemmas_pre___default(); lean_mark_persistent(l_Lean_Meta_SimpLemmas_pre___default); l_Lean_Meta_SimpLemmas_post___default = _init_l_Lean_Meta_SimpLemmas_post___default(); @@ -6977,23 +7165,23 @@ l_Std_PersistentHashMap_insertAux___at_Lean_Meta_addSimpLemmaEntry___spec__6___b lean_mark_persistent(l_Std_PersistentHashMap_insertAux___at_Lean_Meta_addSimpLemmaEntry___spec__6___boxed__const__1); l_Std_PersistentHashMap_insertAux___at_Lean_Meta_addSimpLemmaEntry___spec__6___boxed__const__2 = _init_l_Std_PersistentHashMap_insertAux___at_Lean_Meta_addSimpLemmaEntry___spec__6___boxed__const__2(); lean_mark_persistent(l_Std_PersistentHashMap_insertAux___at_Lean_Meta_addSimpLemmaEntry___spec__6___boxed__const__2); -l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_203____closed__1 = _init_l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_203____closed__1(); -lean_mark_persistent(l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_203____closed__1); -l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_203____closed__2 = _init_l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_203____closed__2(); -lean_mark_persistent(l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_203____closed__2); -l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_203____closed__3 = _init_l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_203____closed__3(); -lean_mark_persistent(l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_203____closed__3); -l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_203____closed__4 = _init_l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_203____closed__4(); -lean_mark_persistent(l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_203____closed__4); -l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_203____closed__5 = _init_l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_203____closed__5(); -lean_mark_persistent(l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_203____closed__5); +l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_208____closed__1 = _init_l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_208____closed__1(); +lean_mark_persistent(l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_208____closed__1); +l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_208____closed__2 = _init_l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_208____closed__2(); +lean_mark_persistent(l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_208____closed__2); +l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_208____closed__3 = _init_l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_208____closed__3(); +lean_mark_persistent(l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_208____closed__3); +l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_208____closed__4 = _init_l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_208____closed__4(); +lean_mark_persistent(l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_208____closed__4); +l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_208____closed__5 = _init_l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_208____closed__5(); +lean_mark_persistent(l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_208____closed__5); l_Lean_Meta_simpExtension___closed__1 = _init_l_Lean_Meta_simpExtension___closed__1(); lean_mark_persistent(l_Lean_Meta_simpExtension___closed__1); l_Lean_Meta_simpExtension___closed__2 = _init_l_Lean_Meta_simpExtension___closed__2(); lean_mark_persistent(l_Lean_Meta_simpExtension___closed__2); l_Lean_Meta_simpExtension___closed__3 = _init_l_Lean_Meta_simpExtension___closed__3(); lean_mark_persistent(l_Lean_Meta_simpExtension___closed__3); -res = l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_203_(lean_io_mk_world()); +res = l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_208_(lean_io_mk_world()); if (lean_io_result_is_error(res)) return res; l_Lean_Meta_simpExtension = lean_io_result_get_value(res); lean_mark_persistent(l_Lean_Meta_simpExtension); @@ -7002,21 +7190,23 @@ l_Lean_Meta_mkSimpLemmaCore___lambda__3___closed__1 = _init_l_Lean_Meta_mkSimpLe lean_mark_persistent(l_Lean_Meta_mkSimpLemmaCore___lambda__3___closed__1); l_Lean_Meta_mkSimpLemmaCore___lambda__3___closed__2 = _init_l_Lean_Meta_mkSimpLemmaCore___lambda__3___closed__2(); lean_mark_persistent(l_Lean_Meta_mkSimpLemmaCore___lambda__3___closed__2); +l_Lean_Meta_mkSimpLemmaCore___lambda__3___closed__3 = _init_l_Lean_Meta_mkSimpLemmaCore___lambda__3___closed__3(); +lean_mark_persistent(l_Lean_Meta_mkSimpLemmaCore___lambda__3___closed__3); l_Lean_Meta_mkSimpLemmaCore___closed__1 = _init_l_Lean_Meta_mkSimpLemmaCore___closed__1(); lean_mark_persistent(l_Lean_Meta_mkSimpLemmaCore___closed__1); l_Lean_Meta_mkSimpLemmaCore___closed__2 = _init_l_Lean_Meta_mkSimpLemmaCore___closed__2(); lean_mark_persistent(l_Lean_Meta_mkSimpLemmaCore___closed__2); -l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_1375____closed__1 = _init_l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_1375____closed__1(); -lean_mark_persistent(l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_1375____closed__1); -l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_1375____closed__2 = _init_l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_1375____closed__2(); -lean_mark_persistent(l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_1375____closed__2); -l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_1375____closed__3 = _init_l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_1375____closed__3(); -lean_mark_persistent(l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_1375____closed__3); -l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_1375____closed__4 = _init_l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_1375____closed__4(); -lean_mark_persistent(l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_1375____closed__4); -l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_1375____closed__5 = _init_l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_1375____closed__5(); -lean_mark_persistent(l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_1375____closed__5); -res = l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_1375_(lean_io_mk_world()); +l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_1455____closed__1 = _init_l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_1455____closed__1(); +lean_mark_persistent(l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_1455____closed__1); +l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_1455____closed__2 = _init_l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_1455____closed__2(); +lean_mark_persistent(l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_1455____closed__2); +l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_1455____closed__3 = _init_l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_1455____closed__3(); +lean_mark_persistent(l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_1455____closed__3); +l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_1455____closed__4 = _init_l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_1455____closed__4(); +lean_mark_persistent(l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_1455____closed__4); +l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_1455____closed__5 = _init_l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_1455____closed__5(); +lean_mark_persistent(l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_1455____closed__5); +res = l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpLemmas___hyg_1455_(lean_io_mk_world()); if (lean_io_result_is_error(res)) return res; lean_dec_ref(res); return lean_io_result_mk_ok(lean_box(0)); diff --git a/stage0/stdlib/Lean/Meta/Tactic/Simp/Types.c b/stage0/stdlib/Lean/Meta/Tactic/Simp/Types.c index 3e35dddcb2..d19eebcc42 100644 --- a/stage0/stdlib/Lean/Meta/Tactic/Simp/Types.c +++ b/stage0/stdlib/Lean/Meta/Tactic/Simp/Types.c @@ -19,6 +19,7 @@ lean_object* l_Lean_Meta_Simp_State_cache___default; lean_object* l_Lean_Meta_Simp_Methods_pre___default(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_Simp_withSimpLemmas(lean_object*); lean_object* l_Lean_Meta_Simp_Step_result_match__1___rarg(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_Simp_Context_toUnfold___default; lean_object* l_Lean_Meta_Simp_getCongrLemmas___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_st_ref_get(lean_object*, lean_object*); lean_object* l_Lean_Meta_Simp_getCongrLemmas(lean_object*); @@ -51,6 +52,7 @@ lean_object* l_Lean_Meta_Simp_State_cache___default___closed__1; lean_object* l_Lean_Meta_Simp_instInhabitedMethods___closed__1; lean_object* l_Lean_Meta_Simp_instInhabitedResult___closed__1; lean_object* l_Lean_Meta_Simp_getSimpLemmas___boxed(lean_object*); +extern lean_object* l_Lean_NameSet_empty; lean_object* l_Lean_Meta_Simp_getConfig___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_Simp_instInhabitedMethods___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_Simp_Methods_pre___default___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -95,6 +97,14 @@ x_1 = l_Lean_Meta_Simp_instInhabitedResult___closed__1; return x_1; } } +static lean_object* _init_l_Lean_Meta_Simp_Context_toUnfold___default() { +_start: +{ +lean_object* x_1; +x_1 = l_Lean_NameSet_empty; +return x_1; +} +} static lean_object* _init_l_Lean_Meta_Simp_Context_parent_x3f___default() { _start: { @@ -472,33 +482,36 @@ x_11 = !lean_is_exclusive(x_4); if (x_11 == 0) { lean_object* x_12; lean_object* x_13; lean_object* x_14; -x_12 = lean_ctor_get(x_4, 3); +x_12 = lean_ctor_get(x_4, 4); lean_dec(x_12); x_13 = lean_alloc_ctor(1, 1, 0); lean_ctor_set(x_13, 0, x_1); -lean_ctor_set(x_4, 3, x_13); +lean_ctor_set(x_4, 4, x_13); x_14 = lean_apply_8(x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10); return x_14; } else { -lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; +lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; x_15 = lean_ctor_get(x_4, 0); x_16 = lean_ctor_get(x_4, 1); x_17 = lean_ctor_get(x_4, 2); +x_18 = lean_ctor_get(x_4, 3); +lean_inc(x_18); lean_inc(x_17); lean_inc(x_16); lean_inc(x_15); lean_dec(x_4); -x_18 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_18, 0, x_1); -x_19 = lean_alloc_ctor(0, 4, 0); -lean_ctor_set(x_19, 0, x_15); -lean_ctor_set(x_19, 1, x_16); -lean_ctor_set(x_19, 2, x_17); -lean_ctor_set(x_19, 3, x_18); -x_20 = lean_apply_8(x_2, x_3, x_19, x_5, x_6, x_7, x_8, x_9, x_10); -return x_20; +x_19 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_19, 0, x_1); +x_20 = lean_alloc_ctor(0, 5, 0); +lean_ctor_set(x_20, 0, x_15); +lean_ctor_set(x_20, 1, x_16); +lean_ctor_set(x_20, 2, x_17); +lean_ctor_set(x_20, 3, x_18); +lean_ctor_set(x_20, 4, x_19); +x_21 = lean_apply_8(x_2, x_3, x_20, x_5, x_6, x_7, x_8, x_9, x_10); +return x_21; } } } @@ -810,295 +823,302 @@ return x_69; } else { -lean_object* x_70; lean_object* x_71; lean_object* x_72; lean_object* x_73; lean_object* x_74; +lean_object* x_70; lean_object* x_71; lean_object* x_72; lean_object* x_73; lean_object* x_74; lean_object* x_75; x_70 = lean_ctor_get(x_4, 0); x_71 = lean_ctor_get(x_4, 2); x_72 = lean_ctor_get(x_4, 3); +x_73 = lean_ctor_get(x_4, 4); +lean_inc(x_73); lean_inc(x_72); lean_inc(x_71); lean_inc(x_70); lean_dec(x_4); -x_73 = lean_alloc_ctor(0, 4, 0); -lean_ctor_set(x_73, 0, x_70); -lean_ctor_set(x_73, 1, x_1); -lean_ctor_set(x_73, 2, x_71); -lean_ctor_set(x_73, 3, x_72); +x_74 = lean_alloc_ctor(0, 5, 0); +lean_ctor_set(x_74, 0, x_70); +lean_ctor_set(x_74, 1, x_1); +lean_ctor_set(x_74, 2, x_71); +lean_ctor_set(x_74, 3, x_72); +lean_ctor_set(x_74, 4, x_73); lean_inc(x_9); lean_inc(x_5); -x_74 = lean_apply_8(x_2, x_3, x_73, x_5, x_6, x_7, x_8, x_9, x_26); -if (lean_obj_tag(x_74) == 0) +x_75 = lean_apply_8(x_2, x_3, x_74, x_5, x_6, x_7, x_8, x_9, x_26); +if (lean_obj_tag(x_75) == 0) { -lean_object* x_75; lean_object* x_76; lean_object* x_77; lean_object* x_78; lean_object* x_79; lean_object* x_80; lean_object* x_81; lean_object* x_82; lean_object* x_83; lean_object* x_84; lean_object* x_85; lean_object* x_86; lean_object* x_87; lean_object* x_88; -x_75 = lean_ctor_get(x_74, 0); -lean_inc(x_75); -x_76 = lean_ctor_get(x_74, 1); +lean_object* x_76; lean_object* x_77; lean_object* x_78; lean_object* x_79; lean_object* x_80; lean_object* x_81; lean_object* x_82; lean_object* x_83; lean_object* x_84; lean_object* x_85; lean_object* x_86; lean_object* x_87; lean_object* x_88; lean_object* x_89; +x_76 = lean_ctor_get(x_75, 0); lean_inc(x_76); -lean_dec(x_74); -x_77 = lean_st_ref_get(x_9, x_76); +x_77 = lean_ctor_get(x_75, 1); +lean_inc(x_77); +lean_dec(x_75); +x_78 = lean_st_ref_get(x_9, x_77); lean_dec(x_9); -x_78 = lean_ctor_get(x_77, 1); -lean_inc(x_78); -lean_dec(x_77); -x_79 = lean_st_ref_take(x_5, x_78); -x_80 = lean_ctor_get(x_79, 0); -lean_inc(x_80); -x_81 = lean_ctor_get(x_79, 1); +x_79 = lean_ctor_get(x_78, 1); +lean_inc(x_79); +lean_dec(x_78); +x_80 = lean_st_ref_take(x_5, x_79); +x_81 = lean_ctor_get(x_80, 0); lean_inc(x_81); -lean_dec(x_79); x_82 = lean_ctor_get(x_80, 1); lean_inc(x_82); -if (lean_is_exclusive(x_80)) { - lean_ctor_release(x_80, 0); - lean_ctor_release(x_80, 1); - x_83 = x_80; +lean_dec(x_80); +x_83 = lean_ctor_get(x_81, 1); +lean_inc(x_83); +if (lean_is_exclusive(x_81)) { + lean_ctor_release(x_81, 0); + lean_ctor_release(x_81, 1); + x_84 = x_81; } else { - lean_dec_ref(x_80); - x_83 = lean_box(0); + lean_dec_ref(x_81); + x_84 = lean_box(0); } -if (lean_is_scalar(x_83)) { - x_84 = lean_alloc_ctor(0, 2, 0); +if (lean_is_scalar(x_84)) { + x_85 = lean_alloc_ctor(0, 2, 0); } else { - x_84 = x_83; + x_85 = x_84; } -lean_ctor_set(x_84, 0, x_16); -lean_ctor_set(x_84, 1, x_82); -x_85 = lean_st_ref_set(x_5, x_84, x_81); +lean_ctor_set(x_85, 0, x_16); +lean_ctor_set(x_85, 1, x_83); +x_86 = lean_st_ref_set(x_5, x_85, x_82); lean_dec(x_5); -x_86 = lean_ctor_get(x_85, 1); -lean_inc(x_86); -if (lean_is_exclusive(x_85)) { - lean_ctor_release(x_85, 0); - lean_ctor_release(x_85, 1); - x_87 = x_85; +x_87 = lean_ctor_get(x_86, 1); +lean_inc(x_87); +if (lean_is_exclusive(x_86)) { + lean_ctor_release(x_86, 0); + lean_ctor_release(x_86, 1); + x_88 = x_86; } else { - lean_dec_ref(x_85); - x_87 = lean_box(0); + lean_dec_ref(x_86); + x_88 = lean_box(0); } -if (lean_is_scalar(x_87)) { - x_88 = lean_alloc_ctor(0, 2, 0); +if (lean_is_scalar(x_88)) { + x_89 = lean_alloc_ctor(0, 2, 0); } else { - x_88 = x_87; + x_89 = x_88; } -lean_ctor_set(x_88, 0, x_75); -lean_ctor_set(x_88, 1, x_86); -return x_88; +lean_ctor_set(x_89, 0, x_76); +lean_ctor_set(x_89, 1, x_87); +return x_89; } else { -lean_object* x_89; lean_object* x_90; lean_object* x_91; lean_object* x_92; lean_object* x_93; lean_object* x_94; lean_object* x_95; lean_object* x_96; lean_object* x_97; lean_object* x_98; lean_object* x_99; lean_object* x_100; lean_object* x_101; lean_object* x_102; -x_89 = lean_ctor_get(x_74, 0); -lean_inc(x_89); -x_90 = lean_ctor_get(x_74, 1); +lean_object* x_90; lean_object* x_91; lean_object* x_92; lean_object* x_93; lean_object* x_94; lean_object* x_95; lean_object* x_96; lean_object* x_97; lean_object* x_98; lean_object* x_99; lean_object* x_100; lean_object* x_101; lean_object* x_102; lean_object* x_103; +x_90 = lean_ctor_get(x_75, 0); lean_inc(x_90); -lean_dec(x_74); -x_91 = lean_st_ref_get(x_9, x_90); +x_91 = lean_ctor_get(x_75, 1); +lean_inc(x_91); +lean_dec(x_75); +x_92 = lean_st_ref_get(x_9, x_91); lean_dec(x_9); -x_92 = lean_ctor_get(x_91, 1); -lean_inc(x_92); -lean_dec(x_91); -x_93 = lean_st_ref_take(x_5, x_92); -x_94 = lean_ctor_get(x_93, 0); -lean_inc(x_94); -x_95 = lean_ctor_get(x_93, 1); +x_93 = lean_ctor_get(x_92, 1); +lean_inc(x_93); +lean_dec(x_92); +x_94 = lean_st_ref_take(x_5, x_93); +x_95 = lean_ctor_get(x_94, 0); lean_inc(x_95); -lean_dec(x_93); x_96 = lean_ctor_get(x_94, 1); lean_inc(x_96); -if (lean_is_exclusive(x_94)) { - lean_ctor_release(x_94, 0); - lean_ctor_release(x_94, 1); - x_97 = x_94; +lean_dec(x_94); +x_97 = lean_ctor_get(x_95, 1); +lean_inc(x_97); +if (lean_is_exclusive(x_95)) { + lean_ctor_release(x_95, 0); + lean_ctor_release(x_95, 1); + x_98 = x_95; } else { - lean_dec_ref(x_94); - x_97 = lean_box(0); + lean_dec_ref(x_95); + x_98 = lean_box(0); } -if (lean_is_scalar(x_97)) { - x_98 = lean_alloc_ctor(0, 2, 0); +if (lean_is_scalar(x_98)) { + x_99 = lean_alloc_ctor(0, 2, 0); } else { - x_98 = x_97; + x_99 = x_98; } -lean_ctor_set(x_98, 0, x_16); -lean_ctor_set(x_98, 1, x_96); -x_99 = lean_st_ref_set(x_5, x_98, x_95); +lean_ctor_set(x_99, 0, x_16); +lean_ctor_set(x_99, 1, x_97); +x_100 = lean_st_ref_set(x_5, x_99, x_96); lean_dec(x_5); -x_100 = lean_ctor_get(x_99, 1); -lean_inc(x_100); -if (lean_is_exclusive(x_99)) { - lean_ctor_release(x_99, 0); - lean_ctor_release(x_99, 1); - x_101 = x_99; +x_101 = lean_ctor_get(x_100, 1); +lean_inc(x_101); +if (lean_is_exclusive(x_100)) { + lean_ctor_release(x_100, 0); + lean_ctor_release(x_100, 1); + x_102 = x_100; } else { - lean_dec_ref(x_99); - x_101 = lean_box(0); + lean_dec_ref(x_100); + x_102 = lean_box(0); } -if (lean_is_scalar(x_101)) { - x_102 = lean_alloc_ctor(1, 2, 0); +if (lean_is_scalar(x_102)) { + x_103 = lean_alloc_ctor(1, 2, 0); } else { - x_102 = x_101; - lean_ctor_set_tag(x_102, 1); + x_103 = x_102; + lean_ctor_set_tag(x_103, 1); } -lean_ctor_set(x_102, 0, x_89); -lean_ctor_set(x_102, 1, x_100); -return x_102; +lean_ctor_set(x_103, 0, x_90); +lean_ctor_set(x_103, 1, x_101); +return x_103; } } } else { -lean_object* x_103; lean_object* x_104; lean_object* x_105; lean_object* x_106; lean_object* x_107; lean_object* x_108; lean_object* x_109; lean_object* x_110; lean_object* x_111; lean_object* x_112; lean_object* x_113; -x_103 = lean_ctor_get(x_20, 1); -lean_inc(x_103); +lean_object* x_104; lean_object* x_105; lean_object* x_106; lean_object* x_107; lean_object* x_108; lean_object* x_109; lean_object* x_110; lean_object* x_111; lean_object* x_112; lean_object* x_113; lean_object* x_114; lean_object* x_115; +x_104 = lean_ctor_get(x_20, 1); +lean_inc(x_104); lean_dec(x_20); -x_104 = l_Std_HashMap_instInhabitedHashMap___closed__1; -x_105 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_105, 0, x_104); -lean_ctor_set(x_105, 1, x_103); -x_106 = lean_st_ref_set(x_5, x_105, x_21); -x_107 = lean_ctor_get(x_106, 1); -lean_inc(x_107); -lean_dec(x_106); -x_108 = lean_ctor_get(x_4, 0); +x_105 = l_Std_HashMap_instInhabitedHashMap___closed__1; +x_106 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_106, 0, x_105); +lean_ctor_set(x_106, 1, x_104); +x_107 = lean_st_ref_set(x_5, x_106, x_21); +x_108 = lean_ctor_get(x_107, 1); lean_inc(x_108); -x_109 = lean_ctor_get(x_4, 2); +lean_dec(x_107); +x_109 = lean_ctor_get(x_4, 0); lean_inc(x_109); -x_110 = lean_ctor_get(x_4, 3); +x_110 = lean_ctor_get(x_4, 2); lean_inc(x_110); +x_111 = lean_ctor_get(x_4, 3); +lean_inc(x_111); +x_112 = lean_ctor_get(x_4, 4); +lean_inc(x_112); if (lean_is_exclusive(x_4)) { lean_ctor_release(x_4, 0); lean_ctor_release(x_4, 1); lean_ctor_release(x_4, 2); lean_ctor_release(x_4, 3); - x_111 = x_4; + lean_ctor_release(x_4, 4); + x_113 = x_4; } else { lean_dec_ref(x_4); - x_111 = lean_box(0); + x_113 = lean_box(0); } -if (lean_is_scalar(x_111)) { - x_112 = lean_alloc_ctor(0, 4, 0); +if (lean_is_scalar(x_113)) { + x_114 = lean_alloc_ctor(0, 5, 0); } else { - x_112 = x_111; + x_114 = x_113; } -lean_ctor_set(x_112, 0, x_108); -lean_ctor_set(x_112, 1, x_1); -lean_ctor_set(x_112, 2, x_109); -lean_ctor_set(x_112, 3, x_110); +lean_ctor_set(x_114, 0, x_109); +lean_ctor_set(x_114, 1, x_1); +lean_ctor_set(x_114, 2, x_110); +lean_ctor_set(x_114, 3, x_111); +lean_ctor_set(x_114, 4, x_112); lean_inc(x_9); lean_inc(x_5); -x_113 = lean_apply_8(x_2, x_3, x_112, x_5, x_6, x_7, x_8, x_9, x_107); -if (lean_obj_tag(x_113) == 0) +x_115 = lean_apply_8(x_2, x_3, x_114, x_5, x_6, x_7, x_8, x_9, x_108); +if (lean_obj_tag(x_115) == 0) { -lean_object* x_114; lean_object* x_115; lean_object* x_116; lean_object* x_117; lean_object* x_118; lean_object* x_119; lean_object* x_120; lean_object* x_121; lean_object* x_122; lean_object* x_123; lean_object* x_124; lean_object* x_125; lean_object* x_126; lean_object* x_127; -x_114 = lean_ctor_get(x_113, 0); -lean_inc(x_114); -x_115 = lean_ctor_get(x_113, 1); -lean_inc(x_115); -lean_dec(x_113); -x_116 = lean_st_ref_get(x_9, x_115); -lean_dec(x_9); -x_117 = lean_ctor_get(x_116, 1); +lean_object* x_116; lean_object* x_117; lean_object* x_118; lean_object* x_119; lean_object* x_120; lean_object* x_121; lean_object* x_122; lean_object* x_123; lean_object* x_124; lean_object* x_125; lean_object* x_126; lean_object* x_127; lean_object* x_128; lean_object* x_129; +x_116 = lean_ctor_get(x_115, 0); +lean_inc(x_116); +x_117 = lean_ctor_get(x_115, 1); lean_inc(x_117); -lean_dec(x_116); -x_118 = lean_st_ref_take(x_5, x_117); -x_119 = lean_ctor_get(x_118, 0); +lean_dec(x_115); +x_118 = lean_st_ref_get(x_9, x_117); +lean_dec(x_9); +x_119 = lean_ctor_get(x_118, 1); lean_inc(x_119); -x_120 = lean_ctor_get(x_118, 1); -lean_inc(x_120); lean_dec(x_118); -x_121 = lean_ctor_get(x_119, 1); +x_120 = lean_st_ref_take(x_5, x_119); +x_121 = lean_ctor_get(x_120, 0); lean_inc(x_121); -if (lean_is_exclusive(x_119)) { - lean_ctor_release(x_119, 0); - lean_ctor_release(x_119, 1); - x_122 = x_119; +x_122 = lean_ctor_get(x_120, 1); +lean_inc(x_122); +lean_dec(x_120); +x_123 = lean_ctor_get(x_121, 1); +lean_inc(x_123); +if (lean_is_exclusive(x_121)) { + lean_ctor_release(x_121, 0); + lean_ctor_release(x_121, 1); + x_124 = x_121; } else { - lean_dec_ref(x_119); - x_122 = lean_box(0); + lean_dec_ref(x_121); + x_124 = lean_box(0); } -if (lean_is_scalar(x_122)) { - x_123 = lean_alloc_ctor(0, 2, 0); +if (lean_is_scalar(x_124)) { + x_125 = lean_alloc_ctor(0, 2, 0); } else { - x_123 = x_122; + x_125 = x_124; } -lean_ctor_set(x_123, 0, x_16); -lean_ctor_set(x_123, 1, x_121); -x_124 = lean_st_ref_set(x_5, x_123, x_120); +lean_ctor_set(x_125, 0, x_16); +lean_ctor_set(x_125, 1, x_123); +x_126 = lean_st_ref_set(x_5, x_125, x_122); lean_dec(x_5); -x_125 = lean_ctor_get(x_124, 1); -lean_inc(x_125); -if (lean_is_exclusive(x_124)) { - lean_ctor_release(x_124, 0); - lean_ctor_release(x_124, 1); - x_126 = x_124; +x_127 = lean_ctor_get(x_126, 1); +lean_inc(x_127); +if (lean_is_exclusive(x_126)) { + lean_ctor_release(x_126, 0); + lean_ctor_release(x_126, 1); + x_128 = x_126; } else { - lean_dec_ref(x_124); - x_126 = lean_box(0); + lean_dec_ref(x_126); + x_128 = lean_box(0); } -if (lean_is_scalar(x_126)) { - x_127 = lean_alloc_ctor(0, 2, 0); +if (lean_is_scalar(x_128)) { + x_129 = lean_alloc_ctor(0, 2, 0); } else { - x_127 = x_126; + x_129 = x_128; } -lean_ctor_set(x_127, 0, x_114); -lean_ctor_set(x_127, 1, x_125); -return x_127; +lean_ctor_set(x_129, 0, x_116); +lean_ctor_set(x_129, 1, x_127); +return x_129; } else { -lean_object* x_128; lean_object* x_129; lean_object* x_130; lean_object* x_131; lean_object* x_132; lean_object* x_133; lean_object* x_134; lean_object* x_135; lean_object* x_136; lean_object* x_137; lean_object* x_138; lean_object* x_139; lean_object* x_140; lean_object* x_141; -x_128 = lean_ctor_get(x_113, 0); -lean_inc(x_128); -x_129 = lean_ctor_get(x_113, 1); -lean_inc(x_129); -lean_dec(x_113); -x_130 = lean_st_ref_get(x_9, x_129); -lean_dec(x_9); -x_131 = lean_ctor_get(x_130, 1); +lean_object* x_130; lean_object* x_131; lean_object* x_132; lean_object* x_133; lean_object* x_134; lean_object* x_135; lean_object* x_136; lean_object* x_137; lean_object* x_138; lean_object* x_139; lean_object* x_140; lean_object* x_141; lean_object* x_142; lean_object* x_143; +x_130 = lean_ctor_get(x_115, 0); +lean_inc(x_130); +x_131 = lean_ctor_get(x_115, 1); lean_inc(x_131); -lean_dec(x_130); -x_132 = lean_st_ref_take(x_5, x_131); -x_133 = lean_ctor_get(x_132, 0); +lean_dec(x_115); +x_132 = lean_st_ref_get(x_9, x_131); +lean_dec(x_9); +x_133 = lean_ctor_get(x_132, 1); lean_inc(x_133); -x_134 = lean_ctor_get(x_132, 1); -lean_inc(x_134); lean_dec(x_132); -x_135 = lean_ctor_get(x_133, 1); +x_134 = lean_st_ref_take(x_5, x_133); +x_135 = lean_ctor_get(x_134, 0); lean_inc(x_135); -if (lean_is_exclusive(x_133)) { - lean_ctor_release(x_133, 0); - lean_ctor_release(x_133, 1); - x_136 = x_133; +x_136 = lean_ctor_get(x_134, 1); +lean_inc(x_136); +lean_dec(x_134); +x_137 = lean_ctor_get(x_135, 1); +lean_inc(x_137); +if (lean_is_exclusive(x_135)) { + lean_ctor_release(x_135, 0); + lean_ctor_release(x_135, 1); + x_138 = x_135; } else { - lean_dec_ref(x_133); - x_136 = lean_box(0); + lean_dec_ref(x_135); + x_138 = lean_box(0); } -if (lean_is_scalar(x_136)) { - x_137 = lean_alloc_ctor(0, 2, 0); +if (lean_is_scalar(x_138)) { + x_139 = lean_alloc_ctor(0, 2, 0); } else { - x_137 = x_136; + x_139 = x_138; } -lean_ctor_set(x_137, 0, x_16); -lean_ctor_set(x_137, 1, x_135); -x_138 = lean_st_ref_set(x_5, x_137, x_134); +lean_ctor_set(x_139, 0, x_16); +lean_ctor_set(x_139, 1, x_137); +x_140 = lean_st_ref_set(x_5, x_139, x_136); lean_dec(x_5); -x_139 = lean_ctor_get(x_138, 1); -lean_inc(x_139); -if (lean_is_exclusive(x_138)) { - lean_ctor_release(x_138, 0); - lean_ctor_release(x_138, 1); - x_140 = x_138; +x_141 = lean_ctor_get(x_140, 1); +lean_inc(x_141); +if (lean_is_exclusive(x_140)) { + lean_ctor_release(x_140, 0); + lean_ctor_release(x_140, 1); + x_142 = x_140; } else { - lean_dec_ref(x_138); - x_140 = lean_box(0); + lean_dec_ref(x_140); + x_142 = lean_box(0); } -if (lean_is_scalar(x_140)) { - x_141 = lean_alloc_ctor(1, 2, 0); +if (lean_is_scalar(x_142)) { + x_143 = lean_alloc_ctor(1, 2, 0); } else { - x_141 = x_140; - lean_ctor_set_tag(x_141, 1); + x_143 = x_142; + lean_ctor_set_tag(x_143, 1); } -lean_ctor_set(x_141, 0, x_128); -lean_ctor_set(x_141, 1, x_139); -return x_141; +lean_ctor_set(x_143, 0, x_130); +lean_ctor_set(x_143, 1, x_141); +return x_143; } } } @@ -1138,6 +1158,8 @@ l_Lean_Meta_Simp_instInhabitedResult___closed__1 = _init_l_Lean_Meta_Simp_instIn lean_mark_persistent(l_Lean_Meta_Simp_instInhabitedResult___closed__1); l_Lean_Meta_Simp_instInhabitedResult = _init_l_Lean_Meta_Simp_instInhabitedResult(); lean_mark_persistent(l_Lean_Meta_Simp_instInhabitedResult); +l_Lean_Meta_Simp_Context_toUnfold___default = _init_l_Lean_Meta_Simp_Context_toUnfold___default(); +lean_mark_persistent(l_Lean_Meta_Simp_Context_toUnfold___default); l_Lean_Meta_Simp_Context_parent_x3f___default = _init_l_Lean_Meta_Simp_Context_parent_x3f___default(); lean_mark_persistent(l_Lean_Meta_Simp_Context_parent_x3f___default); l_Lean_Meta_Simp_State_cache___default___closed__1 = _init_l_Lean_Meta_Simp_State_cache___default___closed__1(); diff --git a/stage0/stdlib/Lean/Parser/Term.c b/stage0/stdlib/Lean/Parser/Term.c index 05f0564f55..cec1840457 100644 --- a/stage0/stdlib/Lean/Parser/Term.c +++ b/stage0/stdlib/Lean/Parser/Term.c @@ -2128,7 +2128,6 @@ lean_object* l_Lean_Parser_Term_ellipsis___elambda__1___closed__1; lean_object* l_Lean_Parser_Term_dynamicQuot___elambda__1___closed__8; lean_object* l_Lean_Parser_Term_borrowed_formatter___closed__2; lean_object* l_Lean_Parser_Term_arrayRef___elambda__1___closed__1; -extern lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__20; lean_object* l_Lean_Parser_Term_matchAltsWhereDecls_parenthesizer___closed__2; lean_object* l_Lean_Parser_Tactic_tacticSeqBracketed___elambda__1___closed__4; lean_object* l_Lean_Parser_Term_matchAltsWhereDecls___elambda__1___closed__2; @@ -2819,6 +2818,7 @@ lean_object* l_Lean_Parser_Term_fun___closed__5; lean_object* l_Lean_Parser_Command_docComment; lean_object* l_Lean_Parser_Term_matchAltsWhereDecls_formatter___closed__4; lean_object* l_Lean_Parser_orelseFnCore(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*); +extern lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__20; lean_object* l_Lean_Parser_Term_explicitUniv___closed__2; lean_object* l___regBuiltin_Lean_Parser_Term_explicitUniv_parenthesizer___closed__1; lean_object* l_Lean_Parser_Term_attrInstance___elambda__1___closed__4; @@ -35953,7 +35953,7 @@ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = l_myMacro____x40_Init_Notation___hyg_2191____closed__2; -x_2 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__20; +x_2 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__20; x_3 = lean_name_mk_string(x_1, x_2); return x_3; } diff --git a/stage0/stdlib/Lean/PrettyPrinter/Delaborator/Basic.c b/stage0/stdlib/Lean/PrettyPrinter/Delaborator/Basic.c index 4cbfeda9af..68a741b4a4 100644 --- a/stage0/stdlib/Lean/PrettyPrinter/Delaborator/Basic.c +++ b/stage0/stdlib/Lean/PrettyPrinter/Delaborator/Basic.c @@ -210,7 +210,6 @@ lean_object* l_Lean_initFn____x40_Lean_PrettyPrinter_Delaborator_Basic___hyg_210 uint8_t l_Lean_getPPStructureInstances(lean_object*); lean_object* l_Lean_initFn____x40_Lean_PrettyPrinter_Delaborator_Basic___hyg_152____closed__4; lean_object* l_Lean_PrettyPrinter_Delaborator_getExprKind___closed__10; -extern lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__20; lean_object* l_Lean_PrettyPrinter_Delaborator_getUnusedName_bodyUsesSuggestion_match__2___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Delaborator_annotatePos(lean_object*, lean_object*); lean_object* l_Lean_pp_full__names; @@ -276,6 +275,7 @@ lean_object* lean_panic_fn(lean_object*, lean_object*); extern lean_object* l_Lean_getSanitizeNames___closed__1; lean_object* l_Lean_PrettyPrinter_Delaborator_withBindingBody___rarg___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Delaborator_annotatePos_match__2(lean_object*); +extern lean_object* l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__20; lean_object* l_Lean_getPPAll___boxed(lean_object*); lean_object* l_Lean_getPPSafeShadowing___boxed(lean_object*); lean_object* l_Std_PersistentHashMap_findAtAux___at_Lean_PrettyPrinter_Delaborator_delabFor___spec__4___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -2968,7 +2968,7 @@ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = lean_box(0); -x_2 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5923____closed__20; +x_2 = l___private_Init_Meta_0__Lean_Meta_Simp_reprConfig____x40_Init_Meta___hyg_5938____closed__20; x_3 = lean_name_mk_string(x_1, x_2); return x_3; } diff --git a/stage0/stdlib/Lean/PrettyPrinter/Delaborator/Builtins.c b/stage0/stdlib/Lean/PrettyPrinter/Delaborator/Builtins.c index d60c541530..353e8c903b 100644 --- a/stage0/stdlib/Lean/PrettyPrinter/Delaborator/Builtins.c +++ b/stage0/stdlib/Lean/PrettyPrinter/Delaborator/Builtins.c @@ -545,7 +545,6 @@ lean_object* l_Lean_Meta_getMatcherInfo_x3f(lean_object*, lean_object*, lean_obj lean_object* l___private_Lean_PrettyPrinter_Delaborator_Builtins_0__Lean_PrettyPrinter_Delaborator_unresolveQualifiedName___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_foldrMUnsafe_fold___at_Lean_PrettyPrinter_Delaborator_delabForall___spec__3___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Delaborator_delabBVar___closed__1; -lean_object* l_Lean_PrettyPrinter_Delaborator_delabDoElems_delabAndRet(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Delaborator_delabProj___closed__1; lean_object* l_Std_PersistentHashMap_find_x3f___at_Lean_PrettyPrinter_Delaborator_delabAppWithUnexpander___spec__2___boxed(lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Delaborator_delabMVar___closed__1; @@ -23610,91 +23609,6 @@ x_2 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Delaborator_delabDoElems_m return x_2; } } -lean_object* l_Lean_PrettyPrinter_Delaborator_delabDoElems_delabAndRet(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { -_start: -{ -lean_object* x_7; -lean_inc(x_5); -lean_inc(x_4); -x_7 = l_Lean_PrettyPrinter_Delaborator_delab(x_1, x_2, x_3, x_4, x_5, x_6); -if (lean_obj_tag(x_7) == 0) -{ -lean_object* x_8; lean_object* x_9; lean_object* x_10; uint8_t x_11; -x_8 = lean_ctor_get(x_7, 0); -lean_inc(x_8); -x_9 = lean_ctor_get(x_7, 1); -lean_inc(x_9); -lean_dec(x_7); -x_10 = l_Lean_MonadRef_mkInfoFromRefPos___at_Lean_PrettyPrinter_Delaborator_delabConst___spec__1___rarg(x_4, x_5, x_9); -lean_dec(x_5); -lean_dec(x_4); -x_11 = !lean_is_exclusive(x_10); -if (x_11 == 0) -{ -lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; -x_12 = lean_ctor_get(x_10, 0); -lean_dec(x_12); -x_13 = l_Array_empty___closed__1; -x_14 = lean_array_push(x_13, x_8); -x_15 = l_Lean_Option_myMacro____x40_Lean_Data_Options___hyg_826____closed__13; -x_16 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_16, 0, x_15); -lean_ctor_set(x_16, 1, x_14); -x_17 = lean_box(0); -x_18 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_18, 0, x_16); -lean_ctor_set(x_18, 1, x_17); -lean_ctor_set(x_10, 0, x_18); -return x_10; -} -else -{ -lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; -x_19 = lean_ctor_get(x_10, 1); -lean_inc(x_19); -lean_dec(x_10); -x_20 = l_Array_empty___closed__1; -x_21 = lean_array_push(x_20, x_8); -x_22 = l_Lean_Option_myMacro____x40_Lean_Data_Options___hyg_826____closed__13; -x_23 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_23, 0, x_22); -lean_ctor_set(x_23, 1, x_21); -x_24 = lean_box(0); -x_25 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_25, 0, x_23); -lean_ctor_set(x_25, 1, x_24); -x_26 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_26, 0, x_25); -lean_ctor_set(x_26, 1, x_19); -return x_26; -} -} -else -{ -uint8_t x_27; -lean_dec(x_5); -lean_dec(x_4); -x_27 = !lean_is_exclusive(x_7); -if (x_27 == 0) -{ -return x_7; -} -else -{ -lean_object* x_28; lean_object* x_29; lean_object* x_30; -x_28 = lean_ctor_get(x_7, 0); -x_29 = lean_ctor_get(x_7, 1); -lean_inc(x_29); -lean_inc(x_28); -lean_dec(x_7); -x_30 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_30, 0, x_28); -lean_ctor_set(x_30, 1, x_29); -return x_30; -} -} -} -} lean_object* l_Lean_PrettyPrinter_Delaborator_delabDoElems_prependAndRec(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { _start: { @@ -24050,9 +23964,14 @@ return x_11; else { lean_object* x_12; +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); -x_12 = l_Lean_PrettyPrinter_Delaborator_delabDoElems_delabAndRet(x_3, x_4, x_5, x_6, x_7, x_8); +x_12 = l_Lean_PrettyPrinter_Delaborator_failure___rarg(x_8); return x_12; } } @@ -24099,214 +24018,291 @@ lean_dec(x_8); if (x_13 == 0) { lean_object* x_14; -x_14 = l_Lean_PrettyPrinter_Delaborator_delabDoElems_delabAndRet(x_1, x_2, x_3, x_4, x_5, x_9); +lean_inc(x_5); +lean_inc(x_4); +x_14 = l_Lean_PrettyPrinter_Delaborator_delab(x_1, x_2, x_3, x_4, x_5, x_9); +if (lean_obj_tag(x_14) == 0) +{ +lean_object* x_15; lean_object* x_16; lean_object* x_17; uint8_t x_18; +x_15 = lean_ctor_get(x_14, 0); +lean_inc(x_15); +x_16 = lean_ctor_get(x_14, 1); +lean_inc(x_16); +lean_dec(x_14); +x_17 = l_Lean_MonadRef_mkInfoFromRefPos___at_Lean_PrettyPrinter_Delaborator_delabConst___spec__1___rarg(x_4, x_5, x_16); +lean_dec(x_5); +lean_dec(x_4); +x_18 = !lean_is_exclusive(x_17); +if (x_18 == 0) +{ +lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; +x_19 = lean_ctor_get(x_17, 0); +lean_dec(x_19); +x_20 = l_Array_empty___closed__1; +x_21 = lean_array_push(x_20, x_15); +x_22 = l_Lean_Option_myMacro____x40_Lean_Data_Options___hyg_826____closed__13; +x_23 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_23, 0, x_22); +lean_ctor_set(x_23, 1, x_21); +x_24 = lean_box(0); +x_25 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_25, 0, x_23); +lean_ctor_set(x_25, 1, x_24); +lean_ctor_set(x_17, 0, x_25); +return x_17; +} +else +{ +lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; +x_26 = lean_ctor_get(x_17, 1); +lean_inc(x_26); +lean_dec(x_17); +x_27 = l_Array_empty___closed__1; +x_28 = lean_array_push(x_27, x_15); +x_29 = l_Lean_Option_myMacro____x40_Lean_Data_Options___hyg_826____closed__13; +x_30 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_30, 0, x_29); +lean_ctor_set(x_30, 1, x_28); +x_31 = lean_box(0); +x_32 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_32, 0, x_30); +lean_ctor_set(x_32, 1, x_31); +x_33 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_33, 0, x_32); +lean_ctor_set(x_33, 1, x_26); +return x_33; +} +} +else +{ +uint8_t x_34; +lean_dec(x_5); +lean_dec(x_4); +x_34 = !lean_is_exclusive(x_14); +if (x_34 == 0) +{ return x_14; } else { -lean_object* x_15; lean_object* x_16; -x_15 = l_Lean_PrettyPrinter_Delaborator_getExpr(x_1, x_2, x_3, x_4, x_5, x_9); -x_16 = lean_ctor_get(x_15, 0); -lean_inc(x_16); -if (lean_obj_tag(x_16) == 8) -{ -lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; -x_17 = lean_ctor_get(x_15, 1); -lean_inc(x_17); -lean_dec(x_15); -x_18 = lean_ctor_get(x_16, 0); -lean_inc(x_18); -x_19 = lean_ctor_get(x_16, 1); -lean_inc(x_19); -x_20 = lean_ctor_get(x_16, 2); -lean_inc(x_20); -x_21 = lean_ctor_get(x_16, 3); -lean_inc(x_21); -lean_dec(x_16); -lean_inc(x_2); -lean_inc(x_1); -lean_inc(x_21); -x_22 = l_Lean_PrettyPrinter_Delaborator_getUnusedName(x_18, x_21, x_1, x_2, x_3, x_4, x_5, x_17); -x_23 = lean_ctor_get(x_22, 0); -lean_inc(x_23); -x_24 = lean_ctor_get(x_22, 1); -lean_inc(x_24); -lean_dec(x_22); -x_25 = lean_unsigned_to_nat(0u); -x_26 = l_Lean_PrettyPrinter_Delaborator_delabMData___closed__3; -lean_inc(x_5); -lean_inc(x_4); -lean_inc(x_3); -lean_inc(x_2); -lean_inc(x_1); -lean_inc(x_19); -x_27 = l_Lean_PrettyPrinter_Delaborator_descend___rarg(x_19, x_25, x_26, x_1, x_2, x_3, x_4, x_5, x_24); -if (lean_obj_tag(x_27) == 0) -{ -lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; -x_28 = lean_ctor_get(x_27, 0); -lean_inc(x_28); -x_29 = lean_ctor_get(x_27, 1); -lean_inc(x_29); -lean_dec(x_27); -x_30 = lean_unsigned_to_nat(1u); -lean_inc(x_5); -lean_inc(x_4); -lean_inc(x_3); -lean_inc(x_2); -lean_inc(x_1); -lean_inc(x_20); -x_31 = l_Lean_PrettyPrinter_Delaborator_descend___rarg(x_20, x_30, x_26, x_1, x_2, x_3, x_4, x_5, x_29); -if (lean_obj_tag(x_31) == 0) -{ -lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; -x_32 = lean_ctor_get(x_31, 0); -lean_inc(x_32); -x_33 = lean_ctor_get(x_31, 1); -lean_inc(x_33); -lean_dec(x_31); -lean_inc(x_23); -x_34 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Delaborator_delabDoElems___lambda__2___boxed), 11, 4); -lean_closure_set(x_34, 0, x_21); -lean_closure_set(x_34, 1, x_23); -lean_closure_set(x_34, 2, x_28); -lean_closure_set(x_34, 3, x_32); -x_35 = l_Lean_Meta_withLetDecl___at_Lean_PrettyPrinter_Delaborator_delabDoElems___spec__1___rarg(x_23, x_19, x_20, x_34, x_1, x_2, x_3, x_4, x_5, x_33); -return x_35; -} -else -{ -uint8_t x_36; -lean_dec(x_28); -lean_dec(x_23); -lean_dec(x_21); -lean_dec(x_20); -lean_dec(x_19); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_36 = !lean_is_exclusive(x_31); -if (x_36 == 0) -{ -return x_31; -} -else -{ -lean_object* x_37; lean_object* x_38; lean_object* x_39; -x_37 = lean_ctor_get(x_31, 0); -x_38 = lean_ctor_get(x_31, 1); -lean_inc(x_38); -lean_inc(x_37); -lean_dec(x_31); -x_39 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_39, 0, x_37); -lean_ctor_set(x_39, 1, x_38); -return x_39; +lean_object* x_35; lean_object* x_36; lean_object* x_37; +x_35 = lean_ctor_get(x_14, 0); +x_36 = lean_ctor_get(x_14, 1); +lean_inc(x_36); +lean_inc(x_35); +lean_dec(x_14); +x_37 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_37, 0, x_35); +lean_ctor_set(x_37, 1, x_36); +return x_37; } } } else { -uint8_t x_40; -lean_dec(x_23); -lean_dec(x_21); -lean_dec(x_20); -lean_dec(x_19); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_40 = !lean_is_exclusive(x_27); -if (x_40 == 0) +lean_object* x_38; lean_object* x_39; +x_38 = l_Lean_PrettyPrinter_Delaborator_getExpr(x_1, x_2, x_3, x_4, x_5, x_9); +x_39 = lean_ctor_get(x_38, 0); +lean_inc(x_39); +if (lean_obj_tag(x_39) == 8) { -return x_27; -} -else -{ -lean_object* x_41; lean_object* x_42; lean_object* x_43; -x_41 = lean_ctor_get(x_27, 0); -x_42 = lean_ctor_get(x_27, 1); -lean_inc(x_42); +lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; +x_40 = lean_ctor_get(x_38, 1); +lean_inc(x_40); +lean_dec(x_38); +x_41 = lean_ctor_get(x_39, 0); lean_inc(x_41); -lean_dec(x_27); -x_43 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_43, 0, x_41); -lean_ctor_set(x_43, 1, x_42); -return x_43; -} -} -} -else -{ -lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; lean_object* x_48; -lean_dec(x_16); -x_44 = lean_ctor_get(x_15, 1); +x_42 = lean_ctor_get(x_39, 1); +lean_inc(x_42); +x_43 = lean_ctor_get(x_39, 2); +lean_inc(x_43); +x_44 = lean_ctor_get(x_39, 3); lean_inc(x_44); -lean_dec(x_15); -x_45 = l_Lean_PrettyPrinter_Delaborator_withAppFn___rarg___closed__1; -x_46 = l_Lean_PrettyPrinter_Delaborator_delabDoElems___closed__2; -x_47 = lean_panic_fn(x_45, x_46); -x_48 = lean_apply_6(x_47, x_1, x_2, x_3, x_4, x_5, x_44); -return x_48; -} -} -} -else -{ -lean_object* x_49; lean_object* x_50; -lean_dec(x_8); -x_49 = l_Lean_PrettyPrinter_Delaborator_delabTuple___lambda__1___closed__1; +lean_dec(x_39); +lean_inc(x_2); +lean_inc(x_1); +lean_inc(x_44); +x_45 = l_Lean_PrettyPrinter_Delaborator_getUnusedName(x_41, x_44, x_1, x_2, x_3, x_4, x_5, x_40); +x_46 = lean_ctor_get(x_45, 0); +lean_inc(x_46); +x_47 = lean_ctor_get(x_45, 1); +lean_inc(x_47); +lean_dec(x_45); +x_48 = lean_unsigned_to_nat(0u); +x_49 = l_Lean_PrettyPrinter_Delaborator_delabMData___closed__3; lean_inc(x_5); lean_inc(x_4); lean_inc(x_3); lean_inc(x_2); lean_inc(x_1); -x_50 = l_Lean_PrettyPrinter_Delaborator_withAppFn___rarg(x_49, x_1, x_2, x_3, x_4, x_5, x_9); +lean_inc(x_42); +x_50 = l_Lean_PrettyPrinter_Delaborator_descend___rarg(x_42, x_48, x_49, x_1, x_2, x_3, x_4, x_5, x_47); if (lean_obj_tag(x_50) == 0) { -lean_object* x_51; lean_object* x_52; lean_object* x_53; lean_object* x_54; lean_object* x_55; lean_object* x_56; +lean_object* x_51; lean_object* x_52; lean_object* x_53; lean_object* x_54; x_51 = lean_ctor_get(x_50, 0); lean_inc(x_51); x_52 = lean_ctor_get(x_50, 1); lean_inc(x_52); lean_dec(x_50); -x_53 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Delaborator_delabDoElems___lambda__6), 8, 1); -lean_closure_set(x_53, 0, x_51); -x_54 = l_Lean_PrettyPrinter_Delaborator_delabAppExplicit___closed__1; -x_55 = lean_alloc_closure((void*)(l_ReaderT_bind___at_Lean_PrettyPrinter_Delaborator_delabAppExplicit___spec__1___rarg), 8, 2); -lean_closure_set(x_55, 0, x_54); -lean_closure_set(x_55, 1, x_53); -x_56 = l_Lean_PrettyPrinter_Delaborator_withAppArg___rarg(x_55, x_1, x_2, x_3, x_4, x_5, x_52); -return x_56; +x_53 = lean_unsigned_to_nat(1u); +lean_inc(x_5); +lean_inc(x_4); +lean_inc(x_3); +lean_inc(x_2); +lean_inc(x_1); +lean_inc(x_43); +x_54 = l_Lean_PrettyPrinter_Delaborator_descend___rarg(x_43, x_53, x_49, x_1, x_2, x_3, x_4, x_5, x_52); +if (lean_obj_tag(x_54) == 0) +{ +lean_object* x_55; lean_object* x_56; lean_object* x_57; lean_object* x_58; +x_55 = lean_ctor_get(x_54, 0); +lean_inc(x_55); +x_56 = lean_ctor_get(x_54, 1); +lean_inc(x_56); +lean_dec(x_54); +lean_inc(x_46); +x_57 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Delaborator_delabDoElems___lambda__2___boxed), 11, 4); +lean_closure_set(x_57, 0, x_44); +lean_closure_set(x_57, 1, x_46); +lean_closure_set(x_57, 2, x_51); +lean_closure_set(x_57, 3, x_55); +x_58 = l_Lean_Meta_withLetDecl___at_Lean_PrettyPrinter_Delaborator_delabDoElems___spec__1___rarg(x_46, x_42, x_43, x_57, x_1, x_2, x_3, x_4, x_5, x_56); +return x_58; } else { -uint8_t x_57; +uint8_t x_59; +lean_dec(x_51); +lean_dec(x_46); +lean_dec(x_44); +lean_dec(x_43); +lean_dec(x_42); lean_dec(x_5); lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); -x_57 = !lean_is_exclusive(x_50); -if (x_57 == 0) +x_59 = !lean_is_exclusive(x_54); +if (x_59 == 0) +{ +return x_54; +} +else +{ +lean_object* x_60; lean_object* x_61; lean_object* x_62; +x_60 = lean_ctor_get(x_54, 0); +x_61 = lean_ctor_get(x_54, 1); +lean_inc(x_61); +lean_inc(x_60); +lean_dec(x_54); +x_62 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_62, 0, x_60); +lean_ctor_set(x_62, 1, x_61); +return x_62; +} +} +} +else +{ +uint8_t x_63; +lean_dec(x_46); +lean_dec(x_44); +lean_dec(x_43); +lean_dec(x_42); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_63 = !lean_is_exclusive(x_50); +if (x_63 == 0) { return x_50; } else { -lean_object* x_58; lean_object* x_59; lean_object* x_60; -x_58 = lean_ctor_get(x_50, 0); -x_59 = lean_ctor_get(x_50, 1); -lean_inc(x_59); -lean_inc(x_58); +lean_object* x_64; lean_object* x_65; lean_object* x_66; +x_64 = lean_ctor_get(x_50, 0); +x_65 = lean_ctor_get(x_50, 1); +lean_inc(x_65); +lean_inc(x_64); lean_dec(x_50); -x_60 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_60, 0, x_58); -lean_ctor_set(x_60, 1, x_59); -return x_60; +x_66 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_66, 0, x_64); +lean_ctor_set(x_66, 1, x_65); +return x_66; +} +} +} +else +{ +lean_object* x_67; lean_object* x_68; lean_object* x_69; lean_object* x_70; lean_object* x_71; +lean_dec(x_39); +x_67 = lean_ctor_get(x_38, 1); +lean_inc(x_67); +lean_dec(x_38); +x_68 = l_Lean_PrettyPrinter_Delaborator_withAppFn___rarg___closed__1; +x_69 = l_Lean_PrettyPrinter_Delaborator_delabDoElems___closed__2; +x_70 = lean_panic_fn(x_68, x_69); +x_71 = lean_apply_6(x_70, x_1, x_2, x_3, x_4, x_5, x_67); +return x_71; +} +} +} +else +{ +lean_object* x_72; lean_object* x_73; +lean_dec(x_8); +x_72 = l_Lean_PrettyPrinter_Delaborator_delabTuple___lambda__1___closed__1; +lean_inc(x_5); +lean_inc(x_4); +lean_inc(x_3); +lean_inc(x_2); +lean_inc(x_1); +x_73 = l_Lean_PrettyPrinter_Delaborator_withAppFn___rarg(x_72, x_1, x_2, x_3, x_4, x_5, x_9); +if (lean_obj_tag(x_73) == 0) +{ +lean_object* x_74; lean_object* x_75; lean_object* x_76; lean_object* x_77; lean_object* x_78; lean_object* x_79; +x_74 = lean_ctor_get(x_73, 0); +lean_inc(x_74); +x_75 = lean_ctor_get(x_73, 1); +lean_inc(x_75); +lean_dec(x_73); +x_76 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Delaborator_delabDoElems___lambda__6), 8, 1); +lean_closure_set(x_76, 0, x_74); +x_77 = l_Lean_PrettyPrinter_Delaborator_delabAppExplicit___closed__1; +x_78 = lean_alloc_closure((void*)(l_ReaderT_bind___at_Lean_PrettyPrinter_Delaborator_delabAppExplicit___spec__1___rarg), 8, 2); +lean_closure_set(x_78, 0, x_77); +lean_closure_set(x_78, 1, x_76); +x_79 = l_Lean_PrettyPrinter_Delaborator_withAppArg___rarg(x_78, x_1, x_2, x_3, x_4, x_5, x_75); +return x_79; +} +else +{ +uint8_t x_80; +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_80 = !lean_is_exclusive(x_73); +if (x_80 == 0) +{ +return x_73; +} +else +{ +lean_object* x_81; lean_object* x_82; lean_object* x_83; +x_81 = lean_ctor_get(x_73, 0); +x_82 = lean_ctor_get(x_73, 1); +lean_inc(x_82); +lean_inc(x_81); +lean_dec(x_73); +x_83 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_83, 0, x_81); +lean_ctor_set(x_83, 1, x_82); +return x_83; } } } diff --git a/stage0/stdlib/Lean/Util/Recognizers.c b/stage0/stdlib/Lean/Util/Recognizers.c index e1fd6676d6..44ba7ca271 100644 --- a/stage0/stdlib/Lean/Util/Recognizers.c +++ b/stage0/stdlib/Lean/Util/Recognizers.c @@ -16,6 +16,7 @@ extern "C" { lean_object* l_List_reverse___rarg(lean_object*); lean_object* l_Lean_Expr_iff_x3f(lean_object*); lean_object* l_Lean_Expr_eq_x3f___boxed(lean_object*); +extern lean_object* l_myMacro____x40_Init_Core___hyg_1796____closed__4; lean_object* l___private_Lean_Util_Recognizers_0__Lean_Expr_getConstructorVal_x3f_match__1(lean_object*); lean_object* lean_name_mk_string(lean_object*, lean_object*); extern lean_object* l_myMacro____x40_Init_Data_Array_Basic___hyg_3596____closed__5; @@ -39,6 +40,7 @@ lean_object* l___private_Lean_Expr_0__Lean_Expr_getAppArgsAux(lean_object*, lean lean_object* l_Lean_Expr_const_x3f___boxed(lean_object*); lean_object* l_Lean_Expr_isConstructorApp_x3f___closed__4; uint8_t l_Lean_Expr_isHEq(lean_object*); +lean_object* l_Lean_Expr_ne_x3f___boxed(lean_object*); uint8_t lean_nat_dec_eq(lean_object*, lean_object*); lean_object* l_Lean_Expr_natAdd_x3f___closed__1; lean_object* l_Lean_Expr_listLit_x3f(lean_object*); @@ -64,6 +66,7 @@ lean_object* l_Lean_Expr_const_x3f_match__1(lean_object*); lean_object* l_Lean_Expr_constructorApp_x3f_match__1___rarg(lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_myMacro____x40_Init_Notation___hyg_14642____closed__5; lean_object* l___private_Lean_Util_Recognizers_0__Lean_Expr_getConstructorVal_x3f(lean_object*, lean_object*); +lean_object* l_Lean_Expr_ne_x3f(lean_object*); lean_object* l_Lean_Expr_app3_x3f(lean_object*, lean_object*); lean_object* l_Lean_Expr_heq_x3f___boxed(lean_object*); lean_object* l_Lean_Expr_const_x3f(lean_object*); @@ -379,6 +382,50 @@ lean_dec(x_1); return x_2; } } +lean_object* l_Lean_Expr_ne_x3f(lean_object* x_1) { +_start: +{ +lean_object* x_2; lean_object* x_3; uint8_t x_4; +x_2 = l_myMacro____x40_Init_Core___hyg_1796____closed__4; +x_3 = lean_unsigned_to_nat(3u); +x_4 = l_Lean_Expr_isAppOfArity(x_1, x_2, x_3); +if (x_4 == 0) +{ +lean_object* x_5; +x_5 = lean_box(0); +return x_5; +} +else +{ +lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; +x_6 = l_Lean_Expr_appFn_x21(x_1); +x_7 = l_Lean_Expr_appFn_x21(x_6); +x_8 = l_Lean_Expr_appArg_x21(x_7); +lean_dec(x_7); +x_9 = l_Lean_Expr_appArg_x21(x_6); +lean_dec(x_6); +x_10 = l_Lean_Expr_appArg_x21(x_1); +x_11 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_11, 0, x_9); +lean_ctor_set(x_11, 1, x_10); +x_12 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_12, 0, x_8); +lean_ctor_set(x_12, 1, x_11); +x_13 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_13, 0, x_12); +return x_13; +} +} +} +lean_object* l_Lean_Expr_ne_x3f___boxed(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = l_Lean_Expr_ne_x3f(x_1); +lean_dec(x_1); +return x_2; +} +} lean_object* l_Lean_Expr_iff_x3f(lean_object* x_1) { _start: {