diff --git a/stage0/src/Init/Data/AC.lean b/stage0/src/Init/Data/AC.lean index 85c96af679..faab678d29 100644 --- a/stage0/src/Init/Data/AC.lean +++ b/stage0/src/Init/Data/AC.lean @@ -186,7 +186,7 @@ theorem Context.evalList_insert case inr => split case inl => simp [evalList, EvalInformation.evalOp]; rw [h.1, ctx.assoc.1, h.1 (evalList _ _ _)] - case inr => simp_all [ih, evalList, EvalInformation.evalOp]; rw [h.1, ctx.assoc.1, h.1 (evalList _ _ _)] + case inr => simp_all [evalList, EvalInformation.evalOp]; simp [ih]; rw [h.1, ctx.assoc.1, h.1 (evalList _ _ _)] -- TODO: remove `simp [ih]` after `update stage0` theorem Context.evalList_sort_congr (ctx : Context α) diff --git a/stage0/src/Lean/Meta/Tactic/Simp/Main.lean b/stage0/src/Lean/Meta/Tactic/Simp/Main.lean index aa26563a84..b900bff2db 100644 --- a/stage0/src/Lean/Meta/Tactic/Simp/Main.lean +++ b/stage0/src/Lean/Meta/Tactic/Simp/Main.lean @@ -157,7 +157,18 @@ private partial def reduce (e : Expr) : SimpM Expr := withIncRecDepth do | none => return e private partial def dsimp (e : Expr) : M Expr := do - transform e (post := fun e => return TransformStep.done (← reduce e)) + let pre (e : Expr) : M TransformStep := do + if let Step.visit r ← rewritePre e (fun _ => pure none) (rflOnly := true) then + if r.expr != e then + return .visit r.expr + return .visit e + let post (e : Expr) : M TransformStep := do + if let Step.visit r ← rewritePost e (fun _ => pure none) (rflOnly := true) then + if r.expr != e then + return .visit r.expr + let eNew ← reduce e + if eNew != e then return .visit eNew else return .done e + transform e (pre := pre) (post := post) inductive SimpLetCase where | dep -- `let x := v; b` is not equivalent to `(fun x => b) v` @@ -529,10 +540,21 @@ where | none => mkImpCongr e rp rq | some hq => let hq ← mkLambdaFVars #[h] hq + /- + We use the default reducibility setting at `mkImpDepCongrCtx` and `mkImpCongrCtx` because they use the theorems + ```lean + @implies_dep_congr_ctx : ∀ {p₁ p₂ q₁ : Prop}, p₁ = p₂ → ∀ {q₂ : p₂ → Prop}, (∀ (h : p₂), q₁ = q₂ h) → (p₁ → q₁) = ∀ (h : p₂), q₂ h + @implies_congr_ctx : ∀ {p₁ p₂ q₁ q₂ : Prop}, p₁ = p₂ → (p₂ → q₁ = q₂) → (p₁ → q₁) = (p₂ → q₂) + ``` + And the proofs may be from `rfl` theorems which are now omitted. Moreover, we cannot establish that the two + terms are definitionally equal using `withReducible`. + TODO (better solution): provide the problematic implicit arguments explicitly. It is more efficient and avoids this + problem. + -/ if rq.expr.containsFVar h.fvarId! then - return { expr := (← mkForallFVars #[h] rq.expr), proof? := (← mkImpDepCongrCtx (← rp.getProof) hq) } + return { expr := (← mkForallFVars #[h] rq.expr), proof? := (← withDefault <| mkImpDepCongrCtx (← rp.getProof) hq) } else - return { expr := e.updateForallE! rp.expr rq.expr, proof? := (← mkImpCongrCtx (← rp.getProof) hq) } + return { expr := e.updateForallE! rp.expr rq.expr, proof? := (← withDefault <| mkImpCongrCtx (← rp.getProof) hq) } else mkImpCongr e rp (← simp q) diff --git a/stage0/src/Lean/Meta/Tactic/Simp/Rewrite.lean b/stage0/src/Lean/Meta/Tactic/Simp/Rewrite.lean index 5a28a05754..59e4d4dc83 100644 --- a/stage0/src/Lean/Meta/Tactic/Simp/Rewrite.lean +++ b/stage0/src/Lean/Meta/Tactic/Simp/Rewrite.lean @@ -130,7 +130,7 @@ def tryTheorem? (e : Expr) (thm : SimpTheorem) (discharge? : Expr → SimpM (Opt /- Remark: the parameter tag is used for creating trace messages. It is irrelevant otherwise. -/ -def rewrite? (e : Expr) (s : DiscrTree SimpTheorem) (erased : Std.PHashSet Name) (discharge? : Expr → SimpM (Option Expr)) (tag : String) : SimpM (Option Result) := do +def rewrite? (e : Expr) (s : DiscrTree SimpTheorem) (erased : Std.PHashSet Name) (discharge? : Expr → SimpM (Option Expr)) (tag : String) (rflOnly : Bool) : SimpM (Option Result) := do let candidates ← s.getMatchWithExtra e if candidates.isEmpty then trace[Debug.Meta.Tactic.simp] "no theorems found for {tag}-rewriting {e}" @@ -138,7 +138,7 @@ def rewrite? (e : Expr) (s : DiscrTree SimpTheorem) (erased : Std.PHashSet Name) else let candidates := candidates.insertionSort fun e₁ e₂ => e₁.1.priority > e₂.1.priority for (thm, numExtraArgs) in candidates do - unless inErasedSet thm do + unless inErasedSet thm || (rflOnly && !thm.rfl) do if let some result ← tryTheoremWithExtraArgs? e thm numExtraArgs discharge? then trace[Debug.Meta.Tactic.simp] "rewrite result {e} => {result.expr}" return some result @@ -224,15 +224,15 @@ def simpMatch? (discharge? : Expr → SimpM (Option Expr)) (e : Expr) : SimpM (O else return none -def rewritePre (e : Expr) (discharge? : Expr → SimpM (Option Expr)) : SimpM Step := do +def rewritePre (e : Expr) (discharge? : Expr → SimpM (Option Expr)) (rflOnly := false) : SimpM Step := do for thms in (← read).simpTheorems do - if let some r ← rewrite? e thms.pre thms.erased discharge? (tag := "pre") then + if let some r ← rewrite? e thms.pre thms.erased discharge? (tag := "pre") (rflOnly := rflOnly) then return Step.visit r return Step.visit { expr := e } -def rewritePost (e : Expr) (discharge? : Expr → SimpM (Option Expr)) : SimpM Step := do +def rewritePost (e : Expr) (discharge? : Expr → SimpM (Option Expr)) (rflOnly := false) : SimpM Step := do for thms in (← read).simpTheorems do - if let some r ← rewrite? e thms.post thms.erased discharge? (tag := "post") then + if let some r ← rewrite? e thms.post thms.erased discharge? (tag := "post") (rflOnly := rflOnly) then return Step.visit r return Step.visit { expr := e } diff --git a/stage0/src/Lean/Meta/Tactic/Simp/SimpAll.lean b/stage0/src/Lean/Meta/Tactic/Simp/SimpAll.lean index c8d2c31aab..f835817a69 100644 --- a/stage0/src/Lean/Meta/Tactic/Simp/SimpAll.lean +++ b/stage0/src/Lean/Meta/Tactic/Simp/SimpAll.lean @@ -65,8 +65,11 @@ private partial def loop : M Bool := do ``` In the first round, `h : x ≠ 0` is simplified to `h : ¬ x = 0`. If we don't use the same `id`, in the next round the first version would simplify it to `h : True`. + + We must use `mkExpectedTypeHint` because `inferType proofNew` may not be equal to `typeNew` when + we have theorems marked with `rfl`. -/ - let simpThmsNew ← (← getSimpTheorems).addTheorem proofNew (name? := entry.id) + let simpThmsNew ← (← getSimpTheorems).addTheorem (← mkExpectedTypeHint proofNew typeNew) (name? := entry.id) modify fun s => { s with modified := true ctx.simpTheorems := simpThmsNew diff --git a/stage0/src/Lean/Meta/Tactic/Simp/SimpTheorems.lean b/stage0/src/Lean/Meta/Tactic/Simp/SimpTheorems.lean index e198c9ff12..a09735275c 100644 --- a/stage0/src/Lean/Meta/Tactic/Simp/SimpTheorems.lean +++ b/stage0/src/Lean/Meta/Tactic/Simp/SimpTheorems.lean @@ -47,27 +47,40 @@ def SimpTheorem.getName (s : SimpTheorem) : Name := | some n => n | none => "" -def isRflProofCore (type : Expr) (proof : Expr) : Bool := - match type with - | .forallE _ _ type _ => - if let .lam _ _ proof _ := proof then - isRflProofCore type proof - else - false - | _ => - type.isAppOfArity ``Eq 3 - && - (proof.isAppOfArity ``Eq.refl 2 || proof.isAppOfArity ``rfl 2) +mutual + partial def isRflProofCore (type : Expr) (proof : Expr) : CoreM Bool := do + match type with + | .forallE _ _ type _ => + if let .lam _ _ proof _ := proof then + isRflProofCore type proof + else + return false + | _ => + if type.isAppOfArity ``Eq 3 then + if proof.isAppOfArity ``Eq.refl 2 || proof.isAppOfArity ``rfl 2 then + return true + else if proof.isAppOfArity ``Eq.symm 4 then + -- `Eq.symm` of rfl theorem is a rfl theorem + isRflProofCore type proof.appArg! -- small hack: we don't need to set the exact type + else if proof.isApp && proof.getAppFn.isConst then + -- The application of a `rfl` theorem is a `rfl` theorem + isRflTheorem proof.getAppFn.constName! + else + return false + else + return false -def isRflTheorem (declName : Name) : CoreM Bool := do - let .thmInfo info ← getConstInfo declName | return false - return isRflProofCore info.type info.value + partial def isRflTheorem (declName : Name) : CoreM Bool := do + let .thmInfo info ← getConstInfo declName | return false + isRflProofCore info.type info.value +end -def isRflProof (proof : Expr) : CoreM Bool := do +def isRflProof (proof : Expr) : MetaM Bool := do + trace[Meta.debug] "isRflProof: {proof}" if let .const declName .. := proof then isRflTheorem declName else - return false + isRflProofCore (← inferType proof) proof instance : ToFormat SimpTheorem where format s := diff --git a/stage0/stdlib/Lean/Meta/Tactic/Simp/Main.c b/stage0/stdlib/Lean/Meta/Tactic/Simp/Main.c index 02615c8224..1d0564f8b6 100644 --- a/stage0/stdlib/Lean/Meta/Tactic/Simp/Main.c +++ b/stage0/stdlib/Lean/Meta/Tactic/Simp/Main.c @@ -17,12 +17,11 @@ LEAN_EXPORT lean_object* l_Lean_Meta_applySimpResultToLocalDecl(lean_object*, le LEAN_EXPORT lean_object* l_Lean_Meta_applySimpResultToLocalDeclCore(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_Simp_simp_simpLet___closed__1; LEAN_EXPORT lean_object* l_Lean_Meta_applySimpResultToFVarId(lean_object*, lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__3___closed__4; lean_object* l_Lean_Expr_bindingInfo_x21(lean_object*); lean_object* l_Lean_Meta_assert(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_panic___at_Lean_Meta_Simp_simp_simpStep___spec__1___closed__3; static lean_object* l_Lean_Meta_Simp_isOfNatNatLit___closed__3; -LEAN_EXPORT lean_object* l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___lambda__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +LEAN_EXPORT lean_object* l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___lambda__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_unfold_x3f(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_expr_update_forall(lean_object*, uint8_t, lean_object*, lean_object*); lean_object* l_Lean_Meta_replaceTargetDefEq(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -31,11 +30,10 @@ lean_object* lean_array_set(lean_object*, lean_object*, lean_object*); uint8_t l_Lean_Expr_hasAnyFVar_visit___at_Lean_Expr_containsFVar___spec__1(lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Std_PersistentArray_findSomeRevMAux___at_Lean_Meta_Simp_dischargeUsingAssumption___spec__4___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_throwMaxRecDepthAt___at_Lean_Meta_Simp_simp___spec__3(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -LEAN_EXPORT lean_object* l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +LEAN_EXPORT lean_object* l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___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_EXPORT lean_object* l_Lean_Meta_Simp_simp_trySimpCongrTheorem_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_EXPORT lean_object* l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_reduceProjFn_x3f(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_simpTarget(lean_object*, lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__3___closed__2; size_t lean_usize_add(size_t, size_t); static lean_object* l_panic___at_Lean_Meta_Simp_simp_tryAutoCongrTheorem_x3f___spec__4___closed__1; lean_object* l___private_Lean_Meta_Basic_0__Lean_Meta_withNewMCtxDepthImp___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -43,6 +41,7 @@ LEAN_EXPORT lean_object* l_Std_HashMapImp_moveEntries___at_Lean_Meta_Simp_simp_c lean_object* l_Lean_Meta_Simp_getSimpTheorems___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_isMatcher___at_Lean_Meta_Simp_simp_mkCongrSimp_x3f___spec__10___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_Simp_simp_simpForall___lambda__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +LEAN_EXPORT lean_object* l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___lambda__4___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_mkImpCongr(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Array_foldlMUnsafe_fold___at_Lean_Meta_simpGoal___spec__3(lean_object*, lean_object*, size_t, size_t, lean_object*); uint8_t l_Lean_Expr_isNatLit(lean_object*); @@ -108,7 +107,6 @@ LEAN_EXPORT lean_object* l_Std_AssocList_find_x3f___at_Lean_Meta_Simp_simp_mkCon LEAN_EXPORT lean_object* l_Lean_Meta_transform___at___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___spec__1___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_Simp_simp_simpLoop___closed__1; LEAN_EXPORT lean_object* l_Lean_Meta_Simp_Config_updateArith(lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__2___closed__8; LEAN_EXPORT lean_object* l_Lean_Meta_Simp_simp_processCongrHypothesis(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Array_anyMUnsafe_any___at_Lean_Meta_Simp_simp_mkCongrSimp_x3f___spec__9___boxed(lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_Simp_simp_simpLoop___closed__2; @@ -123,7 +121,7 @@ LEAN_EXPORT lean_object* l_Lean_Meta_simpTargetCore___lambda__1(lean_object*, le LEAN_EXPORT lean_object* l_Std_HashMap_insert___at_Lean_Meta_Simp_simp_mkCongrSimp_x3f___spec__3(lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_applySimpResultToTarget___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_mkLetCongr(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -LEAN_EXPORT lean_object* l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___lambda__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +LEAN_EXPORT lean_object* l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___lambda__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); uint8_t l_Lean_checkTraceOption(lean_object*, lean_object*); static lean_object* l_Lean_Meta_Simp_simp_simpForall___closed__1; lean_object* l_Lean_Meta_dependsOn(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -149,6 +147,7 @@ LEAN_EXPORT lean_object* l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Sim LEAN_EXPORT lean_object* l_Lean_Meta_simpTargetStar___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Std_AssocList_find_x3f___at_Lean_Meta_Simp_simp___spec__2(lean_object*, lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_unfold_x3f___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__1___closed__2; lean_object* lean_expr_instantiate1(lean_object*, lean_object*); lean_object* l_Array_toSubarray___rarg(lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_reduce___lambda__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -156,7 +155,6 @@ lean_object* lean_array_push(lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_Simp_simp_simpArrow___lambda__3(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_array_get_size(lean_object*); LEAN_EXPORT uint8_t l_Std_AssocList_contains___at_Lean_Meta_Simp_simp_cacheResult___spec__2(lean_object*, lean_object*); -static lean_object* l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__2___closed__7; LEAN_EXPORT lean_object* l_Std_AssocList_replace___at_Lean_Meta_Simp_simp_cacheResult___spec__6(lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_Simp_simp_mkCongrSimp_x3f___lambda__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT uint8_t l_Std_AssocList_contains___at_Lean_Meta_Simp_simp_mkCongrSimp_x3f___spec__4(lean_object*, lean_object*); @@ -166,6 +164,7 @@ LEAN_EXPORT lean_object* l_Lean_Meta_Simp_SimpLetCase_noConfusion___rarg(uint8_t lean_object* l_Lean_Meta_getFunInfo(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Std_Range_forIn_loop___at_Lean_Meta_Simp_removeUnnecessaryCasts___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_simp___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__1___closed__8; LEAN_EXPORT lean_object* l_Lean_Meta_Simp_simp_congr___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_Simp_simp_simpArrow___lambda__4___closed__6; static lean_object* l_Lean_Meta_Simp_removeUnnecessaryCasts_isDummyEqRec___closed__1; @@ -185,12 +184,15 @@ static lean_object* l_Lean_Meta_Simp_main___closed__1; static lean_object* l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__2___closed__3; LEAN_EXPORT lean_object* l_Lean_Meta_Simp_simp_tryAutoCongrTheorem_x3f___lambda__3___boxed(lean_object**); LEAN_EXPORT lean_object* l_Lean_Meta_withLetDecl___at___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___spec__9(lean_object*, lean_object*); -LEAN_EXPORT lean_object* l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__1___closed__4; +LEAN_EXPORT lean_object* l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___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* l_Lean_Meta_Simp_postDefault(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__1___closed__1; LEAN_EXPORT lean_object* l_Array_findSomeRevM_x3f_find___at_Lean_Meta_Simp_dischargeUsingAssumption___spec__6(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_simpLocalDecl___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_simp_congrArgs___spec__1___closed__4; static lean_object* l_Lean_Meta_Simp_simp_simpForall___closed__9; +LEAN_EXPORT lean_object* l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___lambda__5(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_Simp_isOfNatNatLit___closed__1; extern lean_object* l_Lean_Meta_Simp_instInhabitedResult; static lean_object* l_Lean_Meta_Simp_isOfNatNatLit___closed__2; @@ -230,10 +232,12 @@ LEAN_EXPORT lean_object* l_Std_HashMapImp_expand___at_Lean_Meta_Simp_simp_cacheR LEAN_EXPORT lean_object* l_Lean_Meta_withLocalDecl___at___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___spec__7(lean_object*, lean_object*); static lean_object* l_Lean_Meta_Simp_simp_trySimpCongrTheorem_x3f___lambda__5___closed__2; lean_object* l_StateRefT_x27_lift___rarg___boxed(lean_object*, lean_object*); +LEAN_EXPORT lean_object* l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___lambda__4(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_Expr_0__Lean_Expr_getAppArgsAux(lean_object*, lean_object*, lean_object*); static lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_simp_tryAutoCongrTheorem_x3f___spec__3___closed__8; LEAN_EXPORT lean_object* l_Lean_Meta_simpTarget___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_Simp_removeUnnecessaryCasts_isDummyEqRec___closed__6; +lean_object* l_Lean_Meta_Simp_rewritePre(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_simpTargetStar___spec__1(lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_intro1Core(lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_Simp_simp_simpArrow___lambda__4___closed__10; @@ -247,6 +251,7 @@ LEAN_EXPORT lean_object* l_Lean_Meta_Simp_SimpLetCase_toCtorIdx___boxed(lean_obj LEAN_EXPORT lean_object* l_Lean_Meta_simpGoal___lambda__2___boxed(lean_object**); uint8_t lean_nat_dec_eq(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*); +static lean_object* l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__1___closed__5; lean_object* l_Lean_Meta_mkLetValCongr(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_getMVarType(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_transform_visit___at___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___spec__2___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*); @@ -260,6 +265,7 @@ LEAN_EXPORT uint8_t l_Lean_Meta_Simp_removeUnnecessaryCasts_isDummyEqRec(lean_ob lean_object* lean_st_ref_take(lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_Simp_simp_simpForall___lambda__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_Simp_removeUnnecessaryCasts_isDummyEqRec___closed__5; +static lean_object* l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___lambda__3___closed__1; LEAN_EXPORT lean_object* l_Lean_Meta_Simp_main(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Expr_projExpr_x21(lean_object*); lean_object* lean_nat_sub(lean_object*, lean_object*); @@ -274,6 +280,7 @@ LEAN_EXPORT lean_object* l_Lean_Meta_Simp_simp_simpConst___boxed(lean_object*, l LEAN_EXPORT lean_object* l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_unfold_x3f___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_simpTarget___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_simp_visitFn___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*); +static lean_object* l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__1___closed__3; LEAN_EXPORT lean_object* l_Lean_Meta_Simp_simp_trySimpCongrTheorem_x3f___lambda__4(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*); static lean_object* l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__2___closed__6; lean_object* l___private_Lean_Meta_Basic_0__Lean_Meta_forallTelescopeReducingImp___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -320,8 +327,6 @@ lean_object* l_Lean_ConstantInfo_name(lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_Simp_simp_simpForall(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); uint8_t l_Lean_Name_quickCmp(lean_object*, lean_object*); static lean_object* l_Lean_Meta_Simp_simp_trySimpCongrTheorem_x3f___lambda__4___closed__2; -static lean_object* l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__2___closed__6; -static lean_object* l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__3___closed__1; uint8_t l_Lean_Exception_isMaxRecDepth(lean_object*); static lean_object* l_Lean_Meta_Simp_SimpLetCase_noConfusion___rarg___closed__1; static lean_object* l_Lean_Meta_Simp_simp_simpArrow___lambda__4___closed__7; @@ -339,7 +344,7 @@ static lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_simp_trySimpCon static lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_simp_congrArgs___spec__1___closed__3; uint8_t lean_is_matcher(lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_Simp_SimpLetCase_noConfusion___rarg___boxed(lean_object*, lean_object*, lean_object*); -LEAN_EXPORT lean_object* l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +LEAN_EXPORT lean_object* l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_Simp_removeUnnecessaryCasts_isDummyEqRec___closed__4; uint64_t l_Lean_Expr_hash(lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_reduce(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -372,6 +377,7 @@ LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_simpGoal___spec uint8_t l_Lean_Expr_isAppOfArity(lean_object*, lean_object*, lean_object*); static lean_object* l_panic___at_Lean_Meta_Simp_simp_tryAutoCongrTheorem_x3f___spec__1___closed__2; LEAN_EXPORT lean_object* l_Lean_Meta_Simp_simp_mkCongrSimp_x3f(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__1___closed__7; extern lean_object* l_Lean_instInhabitedExpr; LEAN_EXPORT lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___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*); static lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_simp_congrArgs___spec__1___closed__6; @@ -475,10 +481,10 @@ LEAN_EXPORT lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Meta_Tactic_ lean_object* l_Lean_Meta_mkForallCongr(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_Simp_simp_tryAutoCongrTheorem_x3f(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Std_PersistentArray_push___rarg(lean_object*, lean_object*); +lean_object* l_Lean_Meta_Simp_rewritePost(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_simp___lambda__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Std_HashMap_insert___at_Lean_Meta_Simp_simp_cacheResult___spec__1(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_EXPORT lean_object* l_Lean_Meta_Simp_DefaultMethods_discharge_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* l_Lean_Expr_getAppNumArgsAux(lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Array_anyMUnsafe_any___at_Lean_Meta_Simp_simp_trySimpCongrTheorem_x3f___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_applySimpResultToTarget(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -512,7 +518,6 @@ lean_object* l_Lean_Name_append(lean_object*, lean_object*); static lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_simp_congrArgs___spec__1___lambda__2___closed__1; lean_object* l_instInhabitedReaderT___rarg___boxed(lean_object*, lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_reduceFVar___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__2___closed__9; LEAN_EXPORT lean_object* l_Array_foldlMUnsafe_fold___at_Lean_Meta_simpGoal___spec__3___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_Simp_simp_simpArrow___closed__1; LEAN_EXPORT lean_object* l_List_forIn_loop___at_Lean_Meta_Simp_simp_congr___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*); @@ -574,7 +579,6 @@ static lean_object* l_Lean_Meta_Simp_simp___closed__1; LEAN_EXPORT lean_object* l_Lean_Meta_Simp_simp_simpForall___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_Simp_simp_tryAutoCongrTheorem_x3f___lambda__5(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_mkFalseElim(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -LEAN_EXPORT lean_object* l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__3(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_throwMaxRecDepthAt___at___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___spec__14___boxed(lean_object*, lean_object*); lean_object* lean_panic_fn(lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_Simp_simp_simpConst(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -595,14 +599,13 @@ static lean_object* l_Lean_Meta_Simp_simp_simpForall___closed__8; LEAN_EXPORT lean_object* l_Lean_Meta_Simp_simp_simpLoop(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_simp_tryAutoCongrTheorem_x3f___spec__3___closed__1; static lean_object* l_Lean_Meta_Simp_simp_simpForall___closed__2; -static lean_object* l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__2___closed__5; LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_simp_tryAutoCongrTheorem_x3f___spec__3___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*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_Simp_dischargeUsingAssumption(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_Simp_simp_simpArrow___lambda__4___closed__1; LEAN_EXPORT lean_object* l_Lean_Meta_applySimpResultToProp(lean_object*, lean_object*, lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_Simp_simp_simpArrow___lambda__4___closed__2; LEAN_EXPORT lean_object* l_Lean_Meta_forallTelescopeReducing___at_Lean_Meta_Simp_simp_processCongrHypothesis___spec__2___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -LEAN_EXPORT lean_object* l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___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_EXPORT lean_object* l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_ReaderT_instMonadReaderT___rarg(lean_object*); lean_object* l_Lean_Meta_mkExpectedTypeHint(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Expr_withAppAux___at_Lean_Meta_Simp_simp_processCongrHypothesis___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*, lean_object*); @@ -676,21 +679,22 @@ lean_object* l_Lean_Meta_mkFunExt(lean_object*, lean_object*, lean_object*, lean lean_object* l_Lean_mkConst(lean_object*, lean_object*); static lean_object* l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__2___closed__1; LEAN_EXPORT lean_object* l_Lean_Meta_withLocalDecl___at___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___spec__7___rarg___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__1___closed__6; lean_object* l_Lean_Expr_constName_x21(lean_object*); static lean_object* l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_mkImpCongr___closed__4; -static lean_object* l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__3___closed__3; LEAN_EXPORT lean_object* l_Lean_Meta_Simp_SimpLetCase_noConfusion(lean_object*); LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_simp_tryAutoCongrTheorem_x3f___spec__2___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, uint8_t, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_reduce___lambda__3(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_simp_tryAutoCongrTheorem_x3f___spec__3___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*); LEAN_EXPORT lean_object* l_Lean_Meta_Simp_SimpLetCase_noConfusion___rarg___lambda__1___boxed(lean_object*); -LEAN_EXPORT lean_object* l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +LEAN_EXPORT lean_object* l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_mkOfEqTrue(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__2___closed__3; extern lean_object* l_instInhabitedPUnit; static lean_object* l_Lean_Meta_Simp_simp_simpStep___closed__1; static lean_object* l_Lean_Meta_Simp_simp_simpForall___closed__6; LEAN_EXPORT lean_object* l_Lean_Meta_Simp_simp_visitFn(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +LEAN_EXPORT lean_object* l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___lambda__3(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_simp_tryAutoCongrTheorem_x3f___spec__3___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*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_Simp_simp_simpArrow___lambda__3___closed__2; static lean_object* l_Lean_Meta_Simp_simp_simpStep___closed__2; @@ -8556,72 +8560,437 @@ return x_33; } } } -LEAN_EXPORT lean_object* l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___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_EXPORT lean_object* l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___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) { _start: { -lean_object* x_10; lean_object* x_11; -x_10 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_10, 0, x_1); -x_11 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_11, 0, x_10); -lean_ctor_set(x_11, 1, x_9); +lean_object* x_9; lean_object* x_10; +x_9 = lean_box(0); +x_10 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_10, 0, x_9); +lean_ctor_set(x_10, 1, x_8); +return x_10; +} +} +LEAN_EXPORT lean_object* l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___lambda__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, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10) { +_start: +{ +lean_object* x_11; lean_object* x_12; +x_11 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_11, 0, x_1); +x_12 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_12, 0, x_11); +lean_ctor_set(x_12, 1, x_10); +return x_12; +} +} +static lean_object* _init_l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___lambda__3___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___lambda__1___boxed), 8, 0); +return x_1; +} +} +LEAN_EXPORT lean_object* l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___lambda__3(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; lean_object* x_12; +x_10 = l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___lambda__3___closed__1; +x_11 = 1; +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_6); +lean_inc(x_5); +lean_inc(x_4); +lean_inc(x_3); +lean_inc(x_1); +x_12 = l_Lean_Meta_Simp_rewritePre(x_1, x_10, x_11, x_3, x_4, x_5, x_6, x_7, x_8, x_9); +if (lean_obj_tag(x_12) == 0) +{ +lean_object* x_13; +x_13 = lean_ctor_get(x_12, 0); +lean_inc(x_13); +if (lean_obj_tag(x_13) == 0) +{ +lean_object* x_14; uint8_t x_15; +x_14 = lean_ctor_get(x_13, 0); +lean_inc(x_14); +lean_dec(x_13); +x_15 = !lean_is_exclusive(x_12); +if (x_15 == 0) +{ +lean_object* x_16; lean_object* x_17; lean_object* x_18; uint8_t x_19; +x_16 = lean_ctor_get(x_12, 1); +x_17 = lean_ctor_get(x_12, 0); +lean_dec(x_17); +x_18 = lean_ctor_get(x_14, 0); +lean_inc(x_18); +lean_dec(x_14); +x_19 = lean_expr_eqv(x_18, x_1); +if (x_19 == 0) +{ +lean_object* x_20; +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_20 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_20, 0, x_18); +lean_ctor_set(x_12, 0, x_20); +return x_12; +} +else +{ +lean_object* x_21; lean_object* x_22; +lean_dec(x_18); +lean_free_object(x_12); +x_21 = lean_box(0); +x_22 = l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___lambda__2(x_1, x_21, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_16); +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); +return x_22; +} +} +else +{ +lean_object* x_23; lean_object* x_24; uint8_t x_25; +x_23 = lean_ctor_get(x_12, 1); +lean_inc(x_23); +lean_dec(x_12); +x_24 = lean_ctor_get(x_14, 0); +lean_inc(x_24); +lean_dec(x_14); +x_25 = lean_expr_eqv(x_24, x_1); +if (x_25 == 0) +{ +lean_object* x_26; lean_object* x_27; +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_26 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_26, 0, x_24); +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 +{ +lean_object* x_28; lean_object* x_29; +lean_dec(x_24); +x_28 = lean_box(0); +x_29 = l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___lambda__2(x_1, x_28, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_23); +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); +return x_29; +} +} +} +else +{ +lean_object* x_30; lean_object* x_31; lean_object* x_32; +lean_dec(x_13); +x_30 = lean_ctor_get(x_12, 1); +lean_inc(x_30); +lean_dec(x_12); +x_31 = lean_box(0); +x_32 = l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___lambda__2(x_1, x_31, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_30); +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); +return x_32; +} +} +else +{ +uint8_t x_33; +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_33 = !lean_is_exclusive(x_12); +if (x_33 == 0) +{ +return x_12; +} +else +{ +lean_object* x_34; lean_object* x_35; lean_object* x_36; +x_34 = lean_ctor_get(x_12, 0); +x_35 = lean_ctor_get(x_12, 1); +lean_inc(x_35); +lean_inc(x_34); +lean_dec(x_12); +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; +} +} +} +} +LEAN_EXPORT lean_object* l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___lambda__4(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) { +_start: +{ +lean_object* x_11; +lean_inc(x_1); +x_11 = l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_reduce(x_1, x_4, x_5, x_6, x_7, x_8, x_9, x_10); +if (lean_obj_tag(x_11) == 0) +{ +uint8_t x_12; +x_12 = !lean_is_exclusive(x_11); +if (x_12 == 0) +{ +lean_object* x_13; uint8_t x_14; +x_13 = lean_ctor_get(x_11, 0); +x_14 = lean_expr_eqv(x_13, x_1); +if (x_14 == 0) +{ +lean_object* x_15; +lean_dec(x_1); +x_15 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_15, 0, x_13); +lean_ctor_set(x_11, 0, x_15); +return x_11; +} +else +{ +lean_object* x_16; +lean_dec(x_13); +x_16 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_16, 0, x_1); +lean_ctor_set(x_11, 0, x_16); return x_11; } } -LEAN_EXPORT lean_object* l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___lambda__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, lean_object* x_7, lean_object* x_8, lean_object* x_9) { +else +{ +lean_object* x_17; lean_object* x_18; uint8_t x_19; +x_17 = lean_ctor_get(x_11, 0); +x_18 = lean_ctor_get(x_11, 1); +lean_inc(x_18); +lean_inc(x_17); +lean_dec(x_11); +x_19 = lean_expr_eqv(x_17, x_1); +if (x_19 == 0) +{ +lean_object* x_20; lean_object* x_21; +lean_dec(x_1); +x_20 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_20, 0, x_17); +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 +{ +lean_object* x_22; lean_object* x_23; +lean_dec(x_17); +x_22 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_22, 0, x_1); +x_23 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_23, 0, x_22); +lean_ctor_set(x_23, 1, x_18); +return x_23; +} +} +} +else +{ +uint8_t x_24; +lean_dec(x_1); +x_24 = !lean_is_exclusive(x_11); +if (x_24 == 0) +{ +return x_11; +} +else +{ +lean_object* x_25; lean_object* x_26; lean_object* x_27; +x_25 = lean_ctor_get(x_11, 0); +x_26 = lean_ctor_get(x_11, 1); +lean_inc(x_26); +lean_inc(x_25); +lean_dec(x_11); +x_27 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_27, 0, x_25); +lean_ctor_set(x_27, 1, x_26); +return x_27; +} +} +} +} +LEAN_EXPORT lean_object* l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___lambda__5(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; -x_10 = l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_reduce(x_1, x_3, x_4, x_5, x_6, x_7, x_8, x_9); -if (lean_obj_tag(x_10) == 0) +lean_object* x_10; uint8_t x_11; lean_object* x_12; +x_10 = l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___lambda__3___closed__1; +x_11 = 1; +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_6); +lean_inc(x_5); +lean_inc(x_4); +lean_inc(x_3); +lean_inc(x_1); +x_12 = l_Lean_Meta_Simp_rewritePost(x_1, x_10, x_11, x_3, x_4, x_5, x_6, x_7, x_8, x_9); +if (lean_obj_tag(x_12) == 0) { -uint8_t x_11; -x_11 = !lean_is_exclusive(x_10); -if (x_11 == 0) +lean_object* x_13; +x_13 = lean_ctor_get(x_12, 0); +lean_inc(x_13); +if (lean_obj_tag(x_13) == 0) { -lean_object* x_12; lean_object* x_13; -x_12 = lean_ctor_get(x_10, 0); -x_13 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_13, 0, x_12); -lean_ctor_set(x_10, 0, x_13); -return x_10; -} -else -{ -lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; -x_14 = lean_ctor_get(x_10, 0); -x_15 = lean_ctor_get(x_10, 1); -lean_inc(x_15); +lean_object* x_14; uint8_t x_15; +x_14 = lean_ctor_get(x_13, 0); lean_inc(x_14); -lean_dec(x_10); -x_16 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_16, 0, x_14); -x_17 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_17, 0, x_16); -lean_ctor_set(x_17, 1, x_15); -return x_17; +lean_dec(x_13); +x_15 = !lean_is_exclusive(x_12); +if (x_15 == 0) +{ +lean_object* x_16; lean_object* x_17; lean_object* x_18; uint8_t x_19; +x_16 = lean_ctor_get(x_12, 1); +x_17 = lean_ctor_get(x_12, 0); +lean_dec(x_17); +x_18 = lean_ctor_get(x_14, 0); +lean_inc(x_18); +lean_dec(x_14); +x_19 = lean_expr_eqv(x_18, x_1); +if (x_19 == 0) +{ +lean_object* x_20; +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_20 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_20, 0, x_18); +lean_ctor_set(x_12, 0, x_20); +return x_12; +} +else +{ +lean_object* x_21; lean_object* x_22; +lean_dec(x_18); +lean_free_object(x_12); +x_21 = lean_box(0); +x_22 = l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___lambda__4(x_1, x_21, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_16); +lean_dec(x_2); +return x_22; } } else { -uint8_t x_18; -x_18 = !lean_is_exclusive(x_10); -if (x_18 == 0) +lean_object* x_23; lean_object* x_24; uint8_t x_25; +x_23 = lean_ctor_get(x_12, 1); +lean_inc(x_23); +lean_dec(x_12); +x_24 = lean_ctor_get(x_14, 0); +lean_inc(x_24); +lean_dec(x_14); +x_25 = lean_expr_eqv(x_24, x_1); +if (x_25 == 0) { -return x_10; +lean_object* x_26; lean_object* x_27; +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_26 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_26, 0, x_24); +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 { -lean_object* x_19; lean_object* x_20; lean_object* x_21; -x_19 = lean_ctor_get(x_10, 0); -x_20 = lean_ctor_get(x_10, 1); -lean_inc(x_20); -lean_inc(x_19); -lean_dec(x_10); -x_21 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_21, 0, x_19); -lean_ctor_set(x_21, 1, x_20); -return x_21; +lean_object* x_28; lean_object* x_29; +lean_dec(x_24); +x_28 = lean_box(0); +x_29 = l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___lambda__4(x_1, x_28, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_23); +lean_dec(x_2); +return x_29; +} +} +} +else +{ +lean_object* x_30; lean_object* x_31; lean_object* x_32; +lean_dec(x_13); +x_30 = lean_ctor_get(x_12, 1); +lean_inc(x_30); +lean_dec(x_12); +x_31 = lean_box(0); +x_32 = l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___lambda__4(x_1, x_31, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_30); +lean_dec(x_2); +return x_32; +} +} +else +{ +uint8_t x_33; +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_33 = !lean_is_exclusive(x_12); +if (x_33 == 0) +{ +return x_12; +} +else +{ +lean_object* x_34; lean_object* x_35; lean_object* x_36; +x_34 = lean_ctor_get(x_12, 0); +x_35 = lean_ctor_get(x_12, 1); +lean_inc(x_35); +lean_inc(x_34); +lean_dec(x_12); +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; } } } @@ -8630,7 +8999,7 @@ static lean_object* _init_l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Si _start: { lean_object* x_1; -x_1 = lean_alloc_closure((void*)(l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___lambda__1___boxed), 9, 0); +x_1 = lean_alloc_closure((void*)(l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___lambda__3), 9, 0); return x_1; } } @@ -8638,7 +9007,7 @@ static lean_object* _init_l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Si _start: { lean_object* x_1; -x_1 = lean_alloc_closure((void*)(l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___lambda__2___boxed), 9, 0); +x_1 = lean_alloc_closure((void*)(l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___lambda__5), 9, 0); return x_1; } } @@ -8756,11 +9125,27 @@ lean_dec(x_3); return x_11; } } -LEAN_EXPORT lean_object* l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___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, lean_object* x_8, lean_object* x_9) { +LEAN_EXPORT lean_object* l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___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, lean_object* x_8) { _start: { -lean_object* x_10; -x_10 = l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___lambda__1(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9); +lean_object* x_9; +x_9 = l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___lambda__1(x_1, x_2, x_3, x_4, x_5, x_6, x_7, 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); +return x_9; +} +} +LEAN_EXPORT lean_object* l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___lambda__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* x_9, lean_object* x_10) { +_start: +{ +lean_object* x_11; +x_11 = l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___lambda__2(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10); +lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); @@ -8768,16 +9153,17 @@ lean_dec(x_5); lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); -return x_10; +return x_11; } } -LEAN_EXPORT lean_object* l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___lambda__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* x_9) { +LEAN_EXPORT lean_object* l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___lambda__4___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* x_9, lean_object* x_10) { _start: { -lean_object* x_10; -x_10 = l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___lambda__2(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9); +lean_object* x_11; +x_11 = l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___lambda__4(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10); +lean_dec(x_3); lean_dec(x_2); -return x_10; +return x_11; } } LEAN_EXPORT lean_object* l_Lean_Meta_Simp_SimpLetCase_toCtorIdx(uint8_t x_1) { @@ -13417,7 +13803,7 @@ _start: lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; x_1 = l_Lean_Meta_Simp_simp_simpStep___closed__1; x_2 = l_Lean_Meta_Simp_simp_simpStep___closed__2; -x_3 = lean_unsigned_to_nat(245u); +x_3 = lean_unsigned_to_nat(256u); x_4 = lean_unsigned_to_nat(26u); x_5 = l_Lean_Meta_Simp_simp_simpStep___closed__3; x_6 = l___private_Init_Util_0__mkPanicMessageWithDecl(x_1, x_2, x_3, x_4, x_5); @@ -15640,7 +16026,7 @@ _start: lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; x_1 = l_Lean_Meta_Simp_simp_simpStep___closed__1; x_2 = l_Lean_Meta_Simp_simp_simpLet___closed__1; -x_3 = lean_unsigned_to_nat(555u); +x_3 = lean_unsigned_to_nat(577u); x_4 = lean_unsigned_to_nat(35u); x_5 = l_Lean_Meta_Simp_simp_simpStep___closed__3; x_6 = l___private_Init_Util_0__mkPanicMessageWithDecl(x_1, x_2, x_3, x_4, x_5); @@ -17812,102 +18198,374 @@ lean_inc(x_9); x_106 = l_Lean_Meta_Simp_Result_getProof(x_3, x_9, x_10, x_11, x_12, x_102); 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_object* x_107; lean_object* x_108; lean_object* x_109; uint8_t x_110; +x_107 = lean_ctor_get(x_9, 0); lean_inc(x_107); -x_108 = lean_ctor_get(x_106, 1); +x_108 = lean_ctor_get(x_106, 0); lean_inc(x_108); +x_109 = lean_ctor_get(x_106, 1); +lean_inc(x_109); lean_dec(x_106); -lean_inc(x_12); -x_109 = l_Lean_Meta_mkImpCongrCtx(x_107, x_101, x_9, x_10, x_11, x_12, x_108); -if (lean_obj_tag(x_109) == 0) +x_110 = !lean_is_exclusive(x_9); +if (x_110 == 0) { -lean_object* x_110; lean_object* x_111; -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); -lean_ctor_set(x_85, 0, x_110); -if (lean_obj_tag(x_2) == 7) -{ -uint8_t x_112; -x_112 = !lean_is_exclusive(x_2); +lean_object* x_111; uint8_t x_112; +x_111 = lean_ctor_get(x_9, 0); +lean_dec(x_111); +x_112 = !lean_is_exclusive(x_107); if (x_112 == 0) { -uint64_t x_113; uint8_t x_114; lean_object* x_115; lean_object* x_116; -x_113 = lean_ctor_get_uint64(x_2, sizeof(void*)*3); -x_114 = (uint8_t)((x_113 << 24) >> 61); -x_115 = lean_expr_update_forall(x_2, x_114, x_4, x_103); -x_116 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_116, 0, x_115); -lean_ctor_set(x_116, 1, x_85); -x_27 = x_116; -x_28 = x_111; +uint8_t x_113; lean_object* x_114; +x_113 = 1; +lean_ctor_set_uint8(x_107, 5, x_113); +lean_inc(x_12); +x_114 = l_Lean_Meta_mkImpCongrCtx(x_108, x_101, x_9, x_10, x_11, x_12, x_109); +if (lean_obj_tag(x_114) == 0) +{ +lean_object* x_115; lean_object* x_116; +x_115 = lean_ctor_get(x_114, 0); +lean_inc(x_115); +x_116 = lean_ctor_get(x_114, 1); +lean_inc(x_116); +lean_dec(x_114); +lean_ctor_set(x_85, 0, x_115); +if (lean_obj_tag(x_2) == 7) +{ +uint8_t x_117; +x_117 = !lean_is_exclusive(x_2); +if (x_117 == 0) +{ +uint64_t x_118; uint8_t x_119; lean_object* x_120; lean_object* x_121; +x_118 = lean_ctor_get_uint64(x_2, sizeof(void*)*3); +x_119 = (uint8_t)((x_118 << 24) >> 61); +x_120 = lean_expr_update_forall(x_2, x_119, x_4, x_103); +x_121 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_121, 0, x_120); +lean_ctor_set(x_121, 1, x_85); +x_27 = x_121; +x_28 = x_116; goto block_48; } else { -lean_object* x_117; lean_object* x_118; lean_object* x_119; uint64_t x_120; lean_object* x_121; uint8_t x_122; lean_object* x_123; lean_object* x_124; -x_117 = lean_ctor_get(x_2, 0); -x_118 = lean_ctor_get(x_2, 1); -x_119 = lean_ctor_get(x_2, 2); -x_120 = lean_ctor_get_uint64(x_2, sizeof(void*)*3); -lean_inc(x_119); -lean_inc(x_118); -lean_inc(x_117); +lean_object* x_122; lean_object* x_123; lean_object* x_124; uint64_t x_125; lean_object* x_126; uint8_t x_127; lean_object* x_128; lean_object* x_129; +x_122 = lean_ctor_get(x_2, 0); +x_123 = lean_ctor_get(x_2, 1); +x_124 = lean_ctor_get(x_2, 2); +x_125 = lean_ctor_get_uint64(x_2, sizeof(void*)*3); +lean_inc(x_124); +lean_inc(x_123); +lean_inc(x_122); lean_dec(x_2); -x_121 = lean_alloc_ctor(7, 3, 8); -lean_ctor_set(x_121, 0, x_117); -lean_ctor_set(x_121, 1, x_118); -lean_ctor_set(x_121, 2, x_119); -lean_ctor_set_uint64(x_121, sizeof(void*)*3, x_120); -x_122 = (uint8_t)((x_120 << 24) >> 61); -x_123 = lean_expr_update_forall(x_121, x_122, x_4, x_103); -x_124 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_124, 0, x_123); -lean_ctor_set(x_124, 1, x_85); -x_27 = x_124; -x_28 = x_111; +x_126 = lean_alloc_ctor(7, 3, 8); +lean_ctor_set(x_126, 0, x_122); +lean_ctor_set(x_126, 1, x_123); +lean_ctor_set(x_126, 2, x_124); +lean_ctor_set_uint64(x_126, sizeof(void*)*3, x_125); +x_127 = (uint8_t)((x_125 << 24) >> 61); +x_128 = lean_expr_update_forall(x_126, x_127, x_4, x_103); +x_129 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_129, 0, x_128); +lean_ctor_set(x_129, 1, x_85); +x_27 = x_129; +x_28 = x_116; goto block_48; } } else { -lean_object* x_125; lean_object* x_126; lean_object* x_127; +lean_object* x_130; lean_object* x_131; lean_object* x_132; lean_dec(x_103); lean_dec(x_4); lean_dec(x_2); -x_125 = l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_mkImpCongr___closed__4; -x_126 = l_panic___at_Lean_Expr_getRevArg_x21___spec__1(x_125); -x_127 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_127, 0, x_126); -lean_ctor_set(x_127, 1, x_85); -x_27 = x_127; -x_28 = x_111; +x_130 = l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_mkImpCongr___closed__4; +x_131 = l_panic___at_Lean_Expr_getRevArg_x21___spec__1(x_130); +x_132 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_132, 0, x_131); +lean_ctor_set(x_132, 1, x_85); +x_27 = x_132; +x_28 = x_116; goto block_48; } } else { -lean_object* x_128; lean_object* x_129; +lean_object* x_133; lean_object* x_134; lean_dec(x_103); lean_free_object(x_85); lean_dec(x_4); lean_dec(x_2); -x_128 = lean_ctor_get(x_109, 0); -lean_inc(x_128); -x_129 = lean_ctor_get(x_109, 1); -lean_inc(x_129); -lean_dec(x_109); -x_49 = x_128; -x_50 = x_129; +x_133 = lean_ctor_get(x_114, 0); +lean_inc(x_133); +x_134 = lean_ctor_get(x_114, 1); +lean_inc(x_134); +lean_dec(x_114); +x_49 = x_133; +x_50 = x_134; goto block_70; } } else { -lean_object* x_130; lean_object* x_131; +uint8_t x_135; uint8_t x_136; uint8_t x_137; uint8_t x_138; uint8_t x_139; uint8_t x_140; uint8_t x_141; uint8_t x_142; uint8_t x_143; uint8_t x_144; uint8_t x_145; uint8_t x_146; uint8_t x_147; uint8_t x_148; lean_object* x_149; lean_object* x_150; +x_135 = lean_ctor_get_uint8(x_107, 0); +x_136 = lean_ctor_get_uint8(x_107, 1); +x_137 = lean_ctor_get_uint8(x_107, 2); +x_138 = lean_ctor_get_uint8(x_107, 3); +x_139 = lean_ctor_get_uint8(x_107, 4); +x_140 = lean_ctor_get_uint8(x_107, 6); +x_141 = lean_ctor_get_uint8(x_107, 7); +x_142 = lean_ctor_get_uint8(x_107, 8); +x_143 = lean_ctor_get_uint8(x_107, 9); +x_144 = lean_ctor_get_uint8(x_107, 10); +x_145 = lean_ctor_get_uint8(x_107, 11); +x_146 = lean_ctor_get_uint8(x_107, 12); +x_147 = lean_ctor_get_uint8(x_107, 13); +lean_dec(x_107); +x_148 = 1; +x_149 = lean_alloc_ctor(0, 0, 14); +lean_ctor_set_uint8(x_149, 0, x_135); +lean_ctor_set_uint8(x_149, 1, x_136); +lean_ctor_set_uint8(x_149, 2, x_137); +lean_ctor_set_uint8(x_149, 3, x_138); +lean_ctor_set_uint8(x_149, 4, x_139); +lean_ctor_set_uint8(x_149, 5, x_148); +lean_ctor_set_uint8(x_149, 6, x_140); +lean_ctor_set_uint8(x_149, 7, x_141); +lean_ctor_set_uint8(x_149, 8, x_142); +lean_ctor_set_uint8(x_149, 9, x_143); +lean_ctor_set_uint8(x_149, 10, x_144); +lean_ctor_set_uint8(x_149, 11, x_145); +lean_ctor_set_uint8(x_149, 12, x_146); +lean_ctor_set_uint8(x_149, 13, x_147); +lean_ctor_set(x_9, 0, x_149); +lean_inc(x_12); +x_150 = l_Lean_Meta_mkImpCongrCtx(x_108, x_101, x_9, x_10, x_11, x_12, x_109); +if (lean_obj_tag(x_150) == 0) +{ +lean_object* x_151; lean_object* x_152; +x_151 = lean_ctor_get(x_150, 0); +lean_inc(x_151); +x_152 = lean_ctor_get(x_150, 1); +lean_inc(x_152); +lean_dec(x_150); +lean_ctor_set(x_85, 0, x_151); +if (lean_obj_tag(x_2) == 7) +{ +lean_object* x_153; lean_object* x_154; lean_object* x_155; uint64_t x_156; lean_object* x_157; lean_object* x_158; uint8_t x_159; lean_object* x_160; lean_object* x_161; +x_153 = lean_ctor_get(x_2, 0); +lean_inc(x_153); +x_154 = lean_ctor_get(x_2, 1); +lean_inc(x_154); +x_155 = lean_ctor_get(x_2, 2); +lean_inc(x_155); +x_156 = lean_ctor_get_uint64(x_2, sizeof(void*)*3); +if (lean_is_exclusive(x_2)) { + lean_ctor_release(x_2, 0); + lean_ctor_release(x_2, 1); + lean_ctor_release(x_2, 2); + x_157 = x_2; +} else { + lean_dec_ref(x_2); + x_157 = lean_box(0); +} +if (lean_is_scalar(x_157)) { + x_158 = lean_alloc_ctor(7, 3, 8); +} else { + x_158 = x_157; +} +lean_ctor_set(x_158, 0, x_153); +lean_ctor_set(x_158, 1, x_154); +lean_ctor_set(x_158, 2, x_155); +lean_ctor_set_uint64(x_158, sizeof(void*)*3, x_156); +x_159 = (uint8_t)((x_156 << 24) >> 61); +x_160 = lean_expr_update_forall(x_158, x_159, x_4, x_103); +x_161 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_161, 0, x_160); +lean_ctor_set(x_161, 1, x_85); +x_27 = x_161; +x_28 = x_152; +goto block_48; +} +else +{ +lean_object* x_162; lean_object* x_163; lean_object* x_164; +lean_dec(x_103); +lean_dec(x_4); +lean_dec(x_2); +x_162 = l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_mkImpCongr___closed__4; +x_163 = l_panic___at_Lean_Expr_getRevArg_x21___spec__1(x_162); +x_164 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_164, 0, x_163); +lean_ctor_set(x_164, 1, x_85); +x_27 = x_164; +x_28 = x_152; +goto block_48; +} +} +else +{ +lean_object* x_165; lean_object* x_166; +lean_dec(x_103); +lean_free_object(x_85); +lean_dec(x_4); +lean_dec(x_2); +x_165 = lean_ctor_get(x_150, 0); +lean_inc(x_165); +x_166 = lean_ctor_get(x_150, 1); +lean_inc(x_166); +lean_dec(x_150); +x_49 = x_165; +x_50 = x_166; +goto block_70; +} +} +} +else +{ +lean_object* x_167; lean_object* x_168; lean_object* x_169; lean_object* x_170; lean_object* x_171; uint8_t x_172; uint8_t x_173; uint8_t x_174; uint8_t x_175; uint8_t x_176; uint8_t x_177; uint8_t x_178; uint8_t x_179; uint8_t x_180; uint8_t x_181; uint8_t x_182; uint8_t x_183; uint8_t x_184; lean_object* x_185; uint8_t x_186; lean_object* x_187; lean_object* x_188; lean_object* x_189; +x_167 = lean_ctor_get(x_9, 1); +x_168 = lean_ctor_get(x_9, 2); +x_169 = lean_ctor_get(x_9, 3); +x_170 = lean_ctor_get(x_9, 4); +x_171 = lean_ctor_get(x_9, 5); +lean_inc(x_171); +lean_inc(x_170); +lean_inc(x_169); +lean_inc(x_168); +lean_inc(x_167); +lean_dec(x_9); +x_172 = lean_ctor_get_uint8(x_107, 0); +x_173 = lean_ctor_get_uint8(x_107, 1); +x_174 = lean_ctor_get_uint8(x_107, 2); +x_175 = lean_ctor_get_uint8(x_107, 3); +x_176 = lean_ctor_get_uint8(x_107, 4); +x_177 = lean_ctor_get_uint8(x_107, 6); +x_178 = lean_ctor_get_uint8(x_107, 7); +x_179 = lean_ctor_get_uint8(x_107, 8); +x_180 = lean_ctor_get_uint8(x_107, 9); +x_181 = lean_ctor_get_uint8(x_107, 10); +x_182 = lean_ctor_get_uint8(x_107, 11); +x_183 = lean_ctor_get_uint8(x_107, 12); +x_184 = lean_ctor_get_uint8(x_107, 13); +if (lean_is_exclusive(x_107)) { + x_185 = x_107; +} else { + lean_dec_ref(x_107); + x_185 = lean_box(0); +} +x_186 = 1; +if (lean_is_scalar(x_185)) { + x_187 = lean_alloc_ctor(0, 0, 14); +} else { + x_187 = x_185; +} +lean_ctor_set_uint8(x_187, 0, x_172); +lean_ctor_set_uint8(x_187, 1, x_173); +lean_ctor_set_uint8(x_187, 2, x_174); +lean_ctor_set_uint8(x_187, 3, x_175); +lean_ctor_set_uint8(x_187, 4, x_176); +lean_ctor_set_uint8(x_187, 5, x_186); +lean_ctor_set_uint8(x_187, 6, x_177); +lean_ctor_set_uint8(x_187, 7, x_178); +lean_ctor_set_uint8(x_187, 8, x_179); +lean_ctor_set_uint8(x_187, 9, x_180); +lean_ctor_set_uint8(x_187, 10, x_181); +lean_ctor_set_uint8(x_187, 11, x_182); +lean_ctor_set_uint8(x_187, 12, x_183); +lean_ctor_set_uint8(x_187, 13, x_184); +x_188 = lean_alloc_ctor(0, 6, 0); +lean_ctor_set(x_188, 0, x_187); +lean_ctor_set(x_188, 1, x_167); +lean_ctor_set(x_188, 2, x_168); +lean_ctor_set(x_188, 3, x_169); +lean_ctor_set(x_188, 4, x_170); +lean_ctor_set(x_188, 5, x_171); +lean_inc(x_12); +x_189 = l_Lean_Meta_mkImpCongrCtx(x_108, x_101, x_188, x_10, x_11, x_12, x_109); +if (lean_obj_tag(x_189) == 0) +{ +lean_object* x_190; lean_object* x_191; +x_190 = lean_ctor_get(x_189, 0); +lean_inc(x_190); +x_191 = lean_ctor_get(x_189, 1); +lean_inc(x_191); +lean_dec(x_189); +lean_ctor_set(x_85, 0, x_190); +if (lean_obj_tag(x_2) == 7) +{ +lean_object* x_192; lean_object* x_193; lean_object* x_194; uint64_t x_195; lean_object* x_196; lean_object* x_197; uint8_t x_198; lean_object* x_199; lean_object* x_200; +x_192 = lean_ctor_get(x_2, 0); +lean_inc(x_192); +x_193 = lean_ctor_get(x_2, 1); +lean_inc(x_193); +x_194 = lean_ctor_get(x_2, 2); +lean_inc(x_194); +x_195 = lean_ctor_get_uint64(x_2, sizeof(void*)*3); +if (lean_is_exclusive(x_2)) { + lean_ctor_release(x_2, 0); + lean_ctor_release(x_2, 1); + lean_ctor_release(x_2, 2); + x_196 = x_2; +} else { + lean_dec_ref(x_2); + x_196 = lean_box(0); +} +if (lean_is_scalar(x_196)) { + x_197 = lean_alloc_ctor(7, 3, 8); +} else { + x_197 = x_196; +} +lean_ctor_set(x_197, 0, x_192); +lean_ctor_set(x_197, 1, x_193); +lean_ctor_set(x_197, 2, x_194); +lean_ctor_set_uint64(x_197, sizeof(void*)*3, x_195); +x_198 = (uint8_t)((x_195 << 24) >> 61); +x_199 = lean_expr_update_forall(x_197, x_198, x_4, x_103); +x_200 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_200, 0, x_199); +lean_ctor_set(x_200, 1, x_85); +x_27 = x_200; +x_28 = x_191; +goto block_48; +} +else +{ +lean_object* x_201; lean_object* x_202; lean_object* x_203; +lean_dec(x_103); +lean_dec(x_4); +lean_dec(x_2); +x_201 = l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_mkImpCongr___closed__4; +x_202 = l_panic___at_Lean_Expr_getRevArg_x21___spec__1(x_201); +x_203 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_203, 0, x_202); +lean_ctor_set(x_203, 1, x_85); +x_27 = x_203; +x_28 = x_191; +goto block_48; +} +} +else +{ +lean_object* x_204; lean_object* x_205; +lean_dec(x_103); +lean_free_object(x_85); +lean_dec(x_4); +lean_dec(x_2); +x_204 = lean_ctor_get(x_189, 0); +lean_inc(x_204); +x_205 = lean_ctor_get(x_189, 1); +lean_inc(x_205); +lean_dec(x_189); +x_49 = x_204; +x_50 = x_205; +goto block_70; +} +} +} +else +{ +lean_object* x_206; lean_object* x_207; lean_dec(x_103); lean_dec(x_101); lean_free_object(x_85); @@ -17916,118 +18574,294 @@ lean_dec(x_10); lean_dec(x_9); lean_dec(x_4); lean_dec(x_2); -x_130 = lean_ctor_get(x_106, 0); -lean_inc(x_130); -x_131 = lean_ctor_get(x_106, 1); -lean_inc(x_131); +x_206 = lean_ctor_get(x_106, 0); +lean_inc(x_206); +x_207 = lean_ctor_get(x_106, 1); +lean_inc(x_207); lean_dec(x_106); -x_49 = x_130; -x_50 = x_131; +x_49 = x_206; +x_50 = x_207; goto block_70; } } else { -lean_object* x_132; +lean_object* x_208; lean_dec(x_4); lean_dec(x_2); -x_132 = l_Lean_Meta_mkForallFVars(x_96, x_103, x_97, x_98, x_99, x_9, x_10, x_11, x_12, x_102); -if (lean_obj_tag(x_132) == 0) +x_208 = l_Lean_Meta_mkForallFVars(x_96, x_103, x_97, x_98, x_99, x_9, x_10, x_11, x_12, x_102); +if (lean_obj_tag(x_208) == 0) { -lean_object* x_133; lean_object* x_134; lean_object* x_135; -x_133 = lean_ctor_get(x_132, 0); -lean_inc(x_133); -x_134 = lean_ctor_get(x_132, 1); -lean_inc(x_134); -lean_dec(x_132); +lean_object* x_209; lean_object* x_210; lean_object* x_211; +x_209 = lean_ctor_get(x_208, 0); +lean_inc(x_209); +x_210 = lean_ctor_get(x_208, 1); +lean_inc(x_210); +lean_dec(x_208); lean_inc(x_12); lean_inc(x_11); lean_inc(x_10); lean_inc(x_9); -x_135 = l_Lean_Meta_Simp_Result_getProof(x_3, x_9, x_10, x_11, x_12, x_134); -if (lean_obj_tag(x_135) == 0) +x_211 = l_Lean_Meta_Simp_Result_getProof(x_3, x_9, x_10, x_11, x_12, x_210); +if (lean_obj_tag(x_211) == 0) { -lean_object* x_136; lean_object* x_137; lean_object* x_138; -x_136 = lean_ctor_get(x_135, 0); -lean_inc(x_136); -x_137 = lean_ctor_get(x_135, 1); -lean_inc(x_137); -lean_dec(x_135); +lean_object* x_212; lean_object* x_213; lean_object* x_214; uint8_t x_215; +x_212 = lean_ctor_get(x_9, 0); +lean_inc(x_212); +x_213 = lean_ctor_get(x_211, 0); +lean_inc(x_213); +x_214 = lean_ctor_get(x_211, 1); +lean_inc(x_214); +lean_dec(x_211); +x_215 = !lean_is_exclusive(x_9); +if (x_215 == 0) +{ +lean_object* x_216; uint8_t x_217; +x_216 = lean_ctor_get(x_9, 0); +lean_dec(x_216); +x_217 = !lean_is_exclusive(x_212); +if (x_217 == 0) +{ +uint8_t x_218; lean_object* x_219; +x_218 = 1; +lean_ctor_set_uint8(x_212, 5, x_218); lean_inc(x_12); -x_138 = l_Lean_Meta_mkImpDepCongrCtx(x_136, x_101, x_9, x_10, x_11, x_12, x_137); -if (lean_obj_tag(x_138) == 0) +x_219 = l_Lean_Meta_mkImpDepCongrCtx(x_213, x_101, x_9, x_10, x_11, x_12, x_214); +if (lean_obj_tag(x_219) == 0) { -lean_object* x_139; lean_object* x_140; lean_object* x_141; -x_139 = lean_ctor_get(x_138, 0); -lean_inc(x_139); -x_140 = lean_ctor_get(x_138, 1); -lean_inc(x_140); -lean_dec(x_138); -lean_ctor_set(x_85, 0, x_139); -x_141 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_141, 0, x_133); -lean_ctor_set(x_141, 1, x_85); -x_27 = x_141; -x_28 = x_140; +lean_object* x_220; lean_object* x_221; lean_object* x_222; +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); +lean_ctor_set(x_85, 0, x_220); +x_222 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_222, 0, x_209); +lean_ctor_set(x_222, 1, x_85); +x_27 = x_222; +x_28 = x_221; goto block_48; } else { -lean_object* x_142; lean_object* x_143; -lean_dec(x_133); +lean_object* x_223; lean_object* x_224; +lean_dec(x_209); lean_free_object(x_85); -x_142 = lean_ctor_get(x_138, 0); -lean_inc(x_142); -x_143 = lean_ctor_get(x_138, 1); -lean_inc(x_143); -lean_dec(x_138); -x_49 = x_142; -x_50 = x_143; +x_223 = lean_ctor_get(x_219, 0); +lean_inc(x_223); +x_224 = lean_ctor_get(x_219, 1); +lean_inc(x_224); +lean_dec(x_219); +x_49 = x_223; +x_50 = x_224; goto block_70; } } else { -lean_object* x_144; lean_object* x_145; -lean_dec(x_133); +uint8_t x_225; uint8_t x_226; uint8_t x_227; uint8_t x_228; uint8_t x_229; uint8_t x_230; uint8_t x_231; uint8_t x_232; uint8_t x_233; uint8_t x_234; uint8_t x_235; uint8_t x_236; uint8_t x_237; uint8_t x_238; lean_object* x_239; lean_object* x_240; +x_225 = lean_ctor_get_uint8(x_212, 0); +x_226 = lean_ctor_get_uint8(x_212, 1); +x_227 = lean_ctor_get_uint8(x_212, 2); +x_228 = lean_ctor_get_uint8(x_212, 3); +x_229 = lean_ctor_get_uint8(x_212, 4); +x_230 = lean_ctor_get_uint8(x_212, 6); +x_231 = lean_ctor_get_uint8(x_212, 7); +x_232 = lean_ctor_get_uint8(x_212, 8); +x_233 = lean_ctor_get_uint8(x_212, 9); +x_234 = lean_ctor_get_uint8(x_212, 10); +x_235 = lean_ctor_get_uint8(x_212, 11); +x_236 = lean_ctor_get_uint8(x_212, 12); +x_237 = lean_ctor_get_uint8(x_212, 13); +lean_dec(x_212); +x_238 = 1; +x_239 = lean_alloc_ctor(0, 0, 14); +lean_ctor_set_uint8(x_239, 0, x_225); +lean_ctor_set_uint8(x_239, 1, x_226); +lean_ctor_set_uint8(x_239, 2, x_227); +lean_ctor_set_uint8(x_239, 3, x_228); +lean_ctor_set_uint8(x_239, 4, x_229); +lean_ctor_set_uint8(x_239, 5, x_238); +lean_ctor_set_uint8(x_239, 6, x_230); +lean_ctor_set_uint8(x_239, 7, x_231); +lean_ctor_set_uint8(x_239, 8, x_232); +lean_ctor_set_uint8(x_239, 9, x_233); +lean_ctor_set_uint8(x_239, 10, x_234); +lean_ctor_set_uint8(x_239, 11, x_235); +lean_ctor_set_uint8(x_239, 12, x_236); +lean_ctor_set_uint8(x_239, 13, x_237); +lean_ctor_set(x_9, 0, x_239); +lean_inc(x_12); +x_240 = l_Lean_Meta_mkImpDepCongrCtx(x_213, x_101, x_9, x_10, x_11, x_12, x_214); +if (lean_obj_tag(x_240) == 0) +{ +lean_object* x_241; lean_object* x_242; lean_object* x_243; +x_241 = lean_ctor_get(x_240, 0); +lean_inc(x_241); +x_242 = lean_ctor_get(x_240, 1); +lean_inc(x_242); +lean_dec(x_240); +lean_ctor_set(x_85, 0, x_241); +x_243 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_243, 0, x_209); +lean_ctor_set(x_243, 1, x_85); +x_27 = x_243; +x_28 = x_242; +goto block_48; +} +else +{ +lean_object* x_244; lean_object* x_245; +lean_dec(x_209); +lean_free_object(x_85); +x_244 = lean_ctor_get(x_240, 0); +lean_inc(x_244); +x_245 = lean_ctor_get(x_240, 1); +lean_inc(x_245); +lean_dec(x_240); +x_49 = x_244; +x_50 = x_245; +goto block_70; +} +} +} +else +{ +lean_object* x_246; lean_object* x_247; lean_object* x_248; lean_object* x_249; lean_object* x_250; uint8_t x_251; uint8_t x_252; uint8_t x_253; uint8_t x_254; uint8_t x_255; uint8_t x_256; uint8_t x_257; uint8_t x_258; uint8_t x_259; uint8_t x_260; uint8_t x_261; uint8_t x_262; uint8_t x_263; lean_object* x_264; uint8_t x_265; lean_object* x_266; lean_object* x_267; lean_object* x_268; +x_246 = lean_ctor_get(x_9, 1); +x_247 = lean_ctor_get(x_9, 2); +x_248 = lean_ctor_get(x_9, 3); +x_249 = lean_ctor_get(x_9, 4); +x_250 = lean_ctor_get(x_9, 5); +lean_inc(x_250); +lean_inc(x_249); +lean_inc(x_248); +lean_inc(x_247); +lean_inc(x_246); +lean_dec(x_9); +x_251 = lean_ctor_get_uint8(x_212, 0); +x_252 = lean_ctor_get_uint8(x_212, 1); +x_253 = lean_ctor_get_uint8(x_212, 2); +x_254 = lean_ctor_get_uint8(x_212, 3); +x_255 = lean_ctor_get_uint8(x_212, 4); +x_256 = lean_ctor_get_uint8(x_212, 6); +x_257 = lean_ctor_get_uint8(x_212, 7); +x_258 = lean_ctor_get_uint8(x_212, 8); +x_259 = lean_ctor_get_uint8(x_212, 9); +x_260 = lean_ctor_get_uint8(x_212, 10); +x_261 = lean_ctor_get_uint8(x_212, 11); +x_262 = lean_ctor_get_uint8(x_212, 12); +x_263 = lean_ctor_get_uint8(x_212, 13); +if (lean_is_exclusive(x_212)) { + x_264 = x_212; +} else { + lean_dec_ref(x_212); + x_264 = lean_box(0); +} +x_265 = 1; +if (lean_is_scalar(x_264)) { + x_266 = lean_alloc_ctor(0, 0, 14); +} else { + x_266 = x_264; +} +lean_ctor_set_uint8(x_266, 0, x_251); +lean_ctor_set_uint8(x_266, 1, x_252); +lean_ctor_set_uint8(x_266, 2, x_253); +lean_ctor_set_uint8(x_266, 3, x_254); +lean_ctor_set_uint8(x_266, 4, x_255); +lean_ctor_set_uint8(x_266, 5, x_265); +lean_ctor_set_uint8(x_266, 6, x_256); +lean_ctor_set_uint8(x_266, 7, x_257); +lean_ctor_set_uint8(x_266, 8, x_258); +lean_ctor_set_uint8(x_266, 9, x_259); +lean_ctor_set_uint8(x_266, 10, x_260); +lean_ctor_set_uint8(x_266, 11, x_261); +lean_ctor_set_uint8(x_266, 12, x_262); +lean_ctor_set_uint8(x_266, 13, x_263); +x_267 = lean_alloc_ctor(0, 6, 0); +lean_ctor_set(x_267, 0, x_266); +lean_ctor_set(x_267, 1, x_246); +lean_ctor_set(x_267, 2, x_247); +lean_ctor_set(x_267, 3, x_248); +lean_ctor_set(x_267, 4, x_249); +lean_ctor_set(x_267, 5, x_250); +lean_inc(x_12); +x_268 = l_Lean_Meta_mkImpDepCongrCtx(x_213, x_101, x_267, x_10, x_11, x_12, x_214); +if (lean_obj_tag(x_268) == 0) +{ +lean_object* x_269; lean_object* x_270; lean_object* x_271; +x_269 = lean_ctor_get(x_268, 0); +lean_inc(x_269); +x_270 = lean_ctor_get(x_268, 1); +lean_inc(x_270); +lean_dec(x_268); +lean_ctor_set(x_85, 0, x_269); +x_271 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_271, 0, x_209); +lean_ctor_set(x_271, 1, x_85); +x_27 = x_271; +x_28 = x_270; +goto block_48; +} +else +{ +lean_object* x_272; lean_object* x_273; +lean_dec(x_209); +lean_free_object(x_85); +x_272 = lean_ctor_get(x_268, 0); +lean_inc(x_272); +x_273 = lean_ctor_get(x_268, 1); +lean_inc(x_273); +lean_dec(x_268); +x_49 = x_272; +x_50 = x_273; +goto block_70; +} +} +} +else +{ +lean_object* x_274; lean_object* x_275; +lean_dec(x_209); lean_dec(x_101); lean_free_object(x_85); lean_dec(x_11); lean_dec(x_10); lean_dec(x_9); -x_144 = lean_ctor_get(x_135, 0); -lean_inc(x_144); -x_145 = lean_ctor_get(x_135, 1); -lean_inc(x_145); -lean_dec(x_135); -x_49 = x_144; -x_50 = x_145; +x_274 = lean_ctor_get(x_211, 0); +lean_inc(x_274); +x_275 = lean_ctor_get(x_211, 1); +lean_inc(x_275); +lean_dec(x_211); +x_49 = x_274; +x_50 = x_275; goto block_70; } } else { -lean_object* x_146; lean_object* x_147; +lean_object* x_276; lean_object* x_277; lean_dec(x_101); lean_free_object(x_85); lean_dec(x_11); lean_dec(x_10); lean_dec(x_9); lean_dec(x_3); -x_146 = lean_ctor_get(x_132, 0); -lean_inc(x_146); -x_147 = lean_ctor_get(x_132, 1); -lean_inc(x_147); -lean_dec(x_132); -x_49 = x_146; -x_50 = x_147; +x_276 = lean_ctor_get(x_208, 0); +lean_inc(x_276); +x_277 = lean_ctor_get(x_208, 1); +lean_inc(x_277); +lean_dec(x_208); +x_49 = x_276; +x_50 = x_277; goto block_70; } } } else { -lean_object* x_148; lean_object* x_149; +lean_object* x_278; lean_object* x_279; lean_dec(x_96); lean_free_object(x_85); lean_dec(x_84); @@ -18038,953 +18872,242 @@ lean_dec(x_5); lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); -x_148 = lean_ctor_get(x_100, 0); -lean_inc(x_148); -x_149 = lean_ctor_get(x_100, 1); -lean_inc(x_149); -lean_dec(x_100); -x_49 = x_148; -x_50 = x_149; -goto block_70; -} -} -else -{ -lean_object* x_150; lean_object* x_151; lean_object* x_152; uint8_t x_153; uint8_t x_154; uint8_t x_155; lean_object* x_156; -x_150 = lean_ctor_get(x_85, 0); -lean_inc(x_150); -lean_dec(x_85); -x_151 = l_Lean_Meta_Simp_simp_simpLet___lambda__1___closed__1; -lean_inc(x_5); -x_152 = lean_array_push(x_151, x_5); -x_153 = 0; -x_154 = 1; -x_155 = 1; -lean_inc(x_152); -x_156 = l_Lean_Meta_mkLambdaFVars(x_152, x_150, x_153, x_154, x_155, x_9, x_10, x_11, x_12, x_92); -if (lean_obj_tag(x_156) == 0) -{ -lean_object* x_157; lean_object* x_158; lean_object* x_159; lean_object* x_160; uint8_t x_161; -x_157 = lean_ctor_get(x_156, 0); -lean_inc(x_157); -x_158 = lean_ctor_get(x_156, 1); -lean_inc(x_158); -lean_dec(x_156); -x_159 = lean_ctor_get(x_84, 0); -lean_inc(x_159); -lean_dec(x_84); -x_160 = l_Lean_Expr_fvarId_x21(x_5); -x_161 = l_Lean_Expr_hasAnyFVar_visit___at_Lean_Expr_containsFVar___spec__1(x_160, x_159); -lean_dec(x_160); -if (x_161 == 0) -{ -lean_object* x_162; -lean_dec(x_152); -lean_inc(x_12); -lean_inc(x_11); -lean_inc(x_10); -lean_inc(x_9); -x_162 = l_Lean_Meta_Simp_Result_getProof(x_3, x_9, x_10, x_11, x_12, x_158); -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_12); -x_165 = l_Lean_Meta_mkImpCongrCtx(x_163, x_157, x_9, x_10, x_11, x_12, x_164); -if (lean_obj_tag(x_165) == 0) -{ -lean_object* x_166; lean_object* x_167; lean_object* x_168; -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 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_168, 0, x_166); -if (lean_obj_tag(x_2) == 7) -{ -lean_object* x_169; lean_object* x_170; lean_object* x_171; uint64_t x_172; lean_object* x_173; lean_object* x_174; uint8_t x_175; lean_object* x_176; lean_object* x_177; -x_169 = lean_ctor_get(x_2, 0); -lean_inc(x_169); -x_170 = lean_ctor_get(x_2, 1); -lean_inc(x_170); -x_171 = lean_ctor_get(x_2, 2); -lean_inc(x_171); -x_172 = lean_ctor_get_uint64(x_2, sizeof(void*)*3); -if (lean_is_exclusive(x_2)) { - lean_ctor_release(x_2, 0); - lean_ctor_release(x_2, 1); - lean_ctor_release(x_2, 2); - x_173 = x_2; -} else { - lean_dec_ref(x_2); - x_173 = lean_box(0); -} -if (lean_is_scalar(x_173)) { - x_174 = lean_alloc_ctor(7, 3, 8); -} else { - x_174 = x_173; -} -lean_ctor_set(x_174, 0, x_169); -lean_ctor_set(x_174, 1, x_170); -lean_ctor_set(x_174, 2, x_171); -lean_ctor_set_uint64(x_174, sizeof(void*)*3, x_172); -x_175 = (uint8_t)((x_172 << 24) >> 61); -x_176 = lean_expr_update_forall(x_174, x_175, x_4, x_159); -x_177 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_177, 0, x_176); -lean_ctor_set(x_177, 1, x_168); -x_27 = x_177; -x_28 = x_167; -goto block_48; -} -else -{ -lean_object* x_178; lean_object* x_179; lean_object* x_180; -lean_dec(x_159); -lean_dec(x_4); -lean_dec(x_2); -x_178 = l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_mkImpCongr___closed__4; -x_179 = l_panic___at_Lean_Expr_getRevArg_x21___spec__1(x_178); -x_180 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_180, 0, x_179); -lean_ctor_set(x_180, 1, x_168); -x_27 = x_180; -x_28 = x_167; -goto block_48; -} -} -else -{ -lean_object* x_181; lean_object* x_182; -lean_dec(x_159); -lean_dec(x_4); -lean_dec(x_2); -x_181 = lean_ctor_get(x_165, 0); -lean_inc(x_181); -x_182 = lean_ctor_get(x_165, 1); -lean_inc(x_182); -lean_dec(x_165); -x_49 = x_181; -x_50 = x_182; -goto block_70; -} -} -else -{ -lean_object* x_183; lean_object* x_184; -lean_dec(x_159); -lean_dec(x_157); -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_4); -lean_dec(x_2); -x_183 = lean_ctor_get(x_162, 0); -lean_inc(x_183); -x_184 = lean_ctor_get(x_162, 1); -lean_inc(x_184); -lean_dec(x_162); -x_49 = x_183; -x_50 = x_184; -goto block_70; -} -} -else -{ -lean_object* x_185; -lean_dec(x_4); -lean_dec(x_2); -x_185 = l_Lean_Meta_mkForallFVars(x_152, x_159, x_153, x_154, x_155, x_9, x_10, x_11, x_12, x_158); -if (lean_obj_tag(x_185) == 0) -{ -lean_object* x_186; lean_object* x_187; lean_object* x_188; -x_186 = lean_ctor_get(x_185, 0); -lean_inc(x_186); -x_187 = lean_ctor_get(x_185, 1); -lean_inc(x_187); -lean_dec(x_185); -lean_inc(x_12); -lean_inc(x_11); -lean_inc(x_10); -lean_inc(x_9); -x_188 = l_Lean_Meta_Simp_Result_getProof(x_3, x_9, x_10, x_11, x_12, x_187); -if (lean_obj_tag(x_188) == 0) -{ -lean_object* x_189; lean_object* x_190; lean_object* x_191; -x_189 = lean_ctor_get(x_188, 0); -lean_inc(x_189); -x_190 = lean_ctor_get(x_188, 1); -lean_inc(x_190); -lean_dec(x_188); -lean_inc(x_12); -x_191 = l_Lean_Meta_mkImpDepCongrCtx(x_189, x_157, x_9, x_10, x_11, x_12, x_190); -if (lean_obj_tag(x_191) == 0) -{ -lean_object* x_192; lean_object* x_193; lean_object* x_194; lean_object* x_195; -x_192 = lean_ctor_get(x_191, 0); -lean_inc(x_192); -x_193 = lean_ctor_get(x_191, 1); -lean_inc(x_193); -lean_dec(x_191); -x_194 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_194, 0, x_192); -x_195 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_195, 0, x_186); -lean_ctor_set(x_195, 1, x_194); -x_27 = x_195; -x_28 = x_193; -goto block_48; -} -else -{ -lean_object* x_196; lean_object* x_197; -lean_dec(x_186); -x_196 = lean_ctor_get(x_191, 0); -lean_inc(x_196); -x_197 = lean_ctor_get(x_191, 1); -lean_inc(x_197); -lean_dec(x_191); -x_49 = x_196; -x_50 = x_197; -goto block_70; -} -} -else -{ -lean_object* x_198; lean_object* x_199; -lean_dec(x_186); -lean_dec(x_157); -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -x_198 = lean_ctor_get(x_188, 0); -lean_inc(x_198); -x_199 = lean_ctor_get(x_188, 1); -lean_inc(x_199); -lean_dec(x_188); -x_49 = x_198; -x_50 = x_199; -goto block_70; -} -} -else -{ -lean_object* x_200; lean_object* x_201; -lean_dec(x_157); -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_3); -x_200 = lean_ctor_get(x_185, 0); -lean_inc(x_200); -x_201 = lean_ctor_get(x_185, 1); -lean_inc(x_201); -lean_dec(x_185); -x_49 = x_200; -x_50 = x_201; -goto block_70; -} -} -} -else -{ -lean_object* x_202; lean_object* x_203; -lean_dec(x_152); -lean_dec(x_84); -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -x_202 = lean_ctor_get(x_156, 0); -lean_inc(x_202); -x_203 = lean_ctor_get(x_156, 1); -lean_inc(x_203); -lean_dec(x_156); -x_49 = x_202; -x_50 = x_203; -goto block_70; -} -} -} -} -else -{ -lean_object* x_204; lean_object* x_205; -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -x_204 = lean_ctor_get(x_83, 0); -lean_inc(x_204); -x_205 = lean_ctor_get(x_83, 1); -lean_inc(x_205); -lean_dec(x_83); -x_49 = x_204; -x_50 = x_205; -goto block_70; -} -} -else -{ -lean_object* x_206; lean_object* x_207; lean_object* x_208; lean_object* x_209; lean_object* x_210; lean_object* x_211; -x_206 = lean_ctor_get(x_7, 0); -x_207 = lean_ctor_get(x_7, 2); -x_208 = lean_ctor_get(x_7, 3); -x_209 = lean_ctor_get(x_7, 4); -lean_inc(x_209); -lean_inc(x_208); -lean_inc(x_207); -lean_inc(x_206); -lean_dec(x_7); -x_210 = lean_alloc_ctor(0, 5, 0); -lean_ctor_set(x_210, 0, x_206); -lean_ctor_set(x_210, 1, x_19); -lean_ctor_set(x_210, 2, x_207); -lean_ctor_set(x_210, 3, x_208); -lean_ctor_set(x_210, 4, x_209); -lean_inc(x_12); -lean_inc(x_11); -lean_inc(x_10); -lean_inc(x_9); -lean_inc(x_8); -x_211 = l_Lean_Meta_Simp_simp(x_1, x_6, x_210, x_8, x_9, x_10, x_11, x_12, x_80); -if (lean_obj_tag(x_211) == 0) -{ -lean_object* x_212; lean_object* x_213; -x_212 = lean_ctor_get(x_211, 0); -lean_inc(x_212); -x_213 = lean_ctor_get(x_212, 1); -lean_inc(x_213); -if (lean_obj_tag(x_213) == 0) -{ -lean_object* x_214; lean_object* x_215; -lean_dec(x_5); -lean_dec(x_4); -x_214 = lean_ctor_get(x_211, 1); -lean_inc(x_214); -lean_dec(x_211); -lean_inc(x_12); -x_215 = l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_mkImpCongr(x_2, x_3, x_212, x_9, x_10, x_11, x_12, x_214); -if (lean_obj_tag(x_215) == 0) -{ -lean_object* x_216; lean_object* x_217; -x_216 = lean_ctor_get(x_215, 0); -lean_inc(x_216); -x_217 = lean_ctor_get(x_215, 1); -lean_inc(x_217); -lean_dec(x_215); -x_27 = x_216; -x_28 = x_217; -goto block_48; -} -else -{ -lean_object* x_218; lean_object* x_219; -x_218 = lean_ctor_get(x_215, 0); -lean_inc(x_218); -x_219 = lean_ctor_get(x_215, 1); -lean_inc(x_219); -lean_dec(x_215); -x_49 = x_218; -x_50 = x_219; -goto block_70; -} -} -else -{ -lean_object* x_220; lean_object* x_221; lean_object* x_222; lean_object* x_223; lean_object* x_224; uint8_t x_225; uint8_t x_226; uint8_t x_227; lean_object* x_228; -x_220 = lean_ctor_get(x_211, 1); -lean_inc(x_220); -lean_dec(x_211); -x_221 = lean_ctor_get(x_213, 0); -lean_inc(x_221); -if (lean_is_exclusive(x_213)) { - lean_ctor_release(x_213, 0); - x_222 = x_213; -} else { - lean_dec_ref(x_213); - x_222 = lean_box(0); -} -x_223 = l_Lean_Meta_Simp_simp_simpLet___lambda__1___closed__1; -lean_inc(x_5); -x_224 = lean_array_push(x_223, x_5); -x_225 = 0; -x_226 = 1; -x_227 = 1; -lean_inc(x_224); -x_228 = l_Lean_Meta_mkLambdaFVars(x_224, x_221, x_225, x_226, x_227, x_9, x_10, x_11, x_12, x_220); -if (lean_obj_tag(x_228) == 0) -{ -lean_object* x_229; lean_object* x_230; lean_object* x_231; lean_object* x_232; uint8_t x_233; -x_229 = lean_ctor_get(x_228, 0); -lean_inc(x_229); -x_230 = lean_ctor_get(x_228, 1); -lean_inc(x_230); -lean_dec(x_228); -x_231 = lean_ctor_get(x_212, 0); -lean_inc(x_231); -lean_dec(x_212); -x_232 = l_Lean_Expr_fvarId_x21(x_5); -x_233 = l_Lean_Expr_hasAnyFVar_visit___at_Lean_Expr_containsFVar___spec__1(x_232, x_231); -lean_dec(x_232); -if (x_233 == 0) -{ -lean_object* x_234; -lean_dec(x_224); -lean_inc(x_12); -lean_inc(x_11); -lean_inc(x_10); -lean_inc(x_9); -x_234 = l_Lean_Meta_Simp_Result_getProof(x_3, x_9, x_10, x_11, x_12, x_230); -if (lean_obj_tag(x_234) == 0) -{ -lean_object* x_235; lean_object* x_236; lean_object* x_237; -x_235 = lean_ctor_get(x_234, 0); -lean_inc(x_235); -x_236 = lean_ctor_get(x_234, 1); -lean_inc(x_236); -lean_dec(x_234); -lean_inc(x_12); -x_237 = l_Lean_Meta_mkImpCongrCtx(x_235, x_229, x_9, x_10, x_11, x_12, x_236); -if (lean_obj_tag(x_237) == 0) -{ -lean_object* x_238; lean_object* x_239; lean_object* x_240; -x_238 = lean_ctor_get(x_237, 0); -lean_inc(x_238); -x_239 = lean_ctor_get(x_237, 1); -lean_inc(x_239); -lean_dec(x_237); -if (lean_is_scalar(x_222)) { - x_240 = lean_alloc_ctor(1, 1, 0); -} else { - x_240 = x_222; -} -lean_ctor_set(x_240, 0, x_238); -if (lean_obj_tag(x_2) == 7) -{ -lean_object* x_241; lean_object* x_242; lean_object* x_243; uint64_t x_244; lean_object* x_245; lean_object* x_246; uint8_t x_247; lean_object* x_248; lean_object* x_249; -x_241 = lean_ctor_get(x_2, 0); -lean_inc(x_241); -x_242 = lean_ctor_get(x_2, 1); -lean_inc(x_242); -x_243 = lean_ctor_get(x_2, 2); -lean_inc(x_243); -x_244 = lean_ctor_get_uint64(x_2, sizeof(void*)*3); -if (lean_is_exclusive(x_2)) { - lean_ctor_release(x_2, 0); - lean_ctor_release(x_2, 1); - lean_ctor_release(x_2, 2); - x_245 = x_2; -} else { - lean_dec_ref(x_2); - x_245 = lean_box(0); -} -if (lean_is_scalar(x_245)) { - x_246 = lean_alloc_ctor(7, 3, 8); -} else { - x_246 = x_245; -} -lean_ctor_set(x_246, 0, x_241); -lean_ctor_set(x_246, 1, x_242); -lean_ctor_set(x_246, 2, x_243); -lean_ctor_set_uint64(x_246, sizeof(void*)*3, x_244); -x_247 = (uint8_t)((x_244 << 24) >> 61); -x_248 = lean_expr_update_forall(x_246, x_247, x_4, x_231); -x_249 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_249, 0, x_248); -lean_ctor_set(x_249, 1, x_240); -x_27 = x_249; -x_28 = x_239; -goto block_48; -} -else -{ -lean_object* x_250; lean_object* x_251; lean_object* x_252; -lean_dec(x_231); -lean_dec(x_4); -lean_dec(x_2); -x_250 = l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_mkImpCongr___closed__4; -x_251 = l_panic___at_Lean_Expr_getRevArg_x21___spec__1(x_250); -x_252 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_252, 0, x_251); -lean_ctor_set(x_252, 1, x_240); -x_27 = x_252; -x_28 = x_239; -goto block_48; -} -} -else -{ -lean_object* x_253; lean_object* x_254; -lean_dec(x_231); -lean_dec(x_222); -lean_dec(x_4); -lean_dec(x_2); -x_253 = lean_ctor_get(x_237, 0); -lean_inc(x_253); -x_254 = lean_ctor_get(x_237, 1); -lean_inc(x_254); -lean_dec(x_237); -x_49 = x_253; -x_50 = x_254; -goto block_70; -} -} -else -{ -lean_object* x_255; lean_object* x_256; -lean_dec(x_231); -lean_dec(x_229); -lean_dec(x_222); -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_4); -lean_dec(x_2); -x_255 = lean_ctor_get(x_234, 0); -lean_inc(x_255); -x_256 = lean_ctor_get(x_234, 1); -lean_inc(x_256); -lean_dec(x_234); -x_49 = x_255; -x_50 = x_256; -goto block_70; -} -} -else -{ -lean_object* x_257; -lean_dec(x_4); -lean_dec(x_2); -x_257 = l_Lean_Meta_mkForallFVars(x_224, x_231, x_225, x_226, x_227, x_9, x_10, x_11, x_12, x_230); -if (lean_obj_tag(x_257) == 0) -{ -lean_object* x_258; lean_object* x_259; lean_object* x_260; -x_258 = lean_ctor_get(x_257, 0); -lean_inc(x_258); -x_259 = lean_ctor_get(x_257, 1); -lean_inc(x_259); -lean_dec(x_257); -lean_inc(x_12); -lean_inc(x_11); -lean_inc(x_10); -lean_inc(x_9); -x_260 = l_Lean_Meta_Simp_Result_getProof(x_3, x_9, x_10, x_11, x_12, x_259); -if (lean_obj_tag(x_260) == 0) -{ -lean_object* x_261; lean_object* x_262; lean_object* x_263; -x_261 = lean_ctor_get(x_260, 0); -lean_inc(x_261); -x_262 = lean_ctor_get(x_260, 1); -lean_inc(x_262); -lean_dec(x_260); -lean_inc(x_12); -x_263 = l_Lean_Meta_mkImpDepCongrCtx(x_261, x_229, x_9, x_10, x_11, x_12, x_262); -if (lean_obj_tag(x_263) == 0) -{ -lean_object* x_264; lean_object* x_265; lean_object* x_266; lean_object* x_267; -x_264 = lean_ctor_get(x_263, 0); -lean_inc(x_264); -x_265 = lean_ctor_get(x_263, 1); -lean_inc(x_265); -lean_dec(x_263); -if (lean_is_scalar(x_222)) { - x_266 = lean_alloc_ctor(1, 1, 0); -} else { - x_266 = x_222; -} -lean_ctor_set(x_266, 0, x_264); -x_267 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_267, 0, x_258); -lean_ctor_set(x_267, 1, x_266); -x_27 = x_267; -x_28 = x_265; -goto block_48; -} -else -{ -lean_object* x_268; lean_object* x_269; -lean_dec(x_258); -lean_dec(x_222); -x_268 = lean_ctor_get(x_263, 0); -lean_inc(x_268); -x_269 = lean_ctor_get(x_263, 1); -lean_inc(x_269); -lean_dec(x_263); -x_49 = x_268; -x_50 = x_269; -goto block_70; -} -} -else -{ -lean_object* x_270; lean_object* x_271; -lean_dec(x_258); -lean_dec(x_229); -lean_dec(x_222); -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -x_270 = lean_ctor_get(x_260, 0); -lean_inc(x_270); -x_271 = lean_ctor_get(x_260, 1); -lean_inc(x_271); -lean_dec(x_260); -x_49 = x_270; -x_50 = x_271; -goto block_70; -} -} -else -{ -lean_object* x_272; lean_object* x_273; -lean_dec(x_229); -lean_dec(x_222); -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_3); -x_272 = lean_ctor_get(x_257, 0); -lean_inc(x_272); -x_273 = lean_ctor_get(x_257, 1); -lean_inc(x_273); -lean_dec(x_257); -x_49 = x_272; -x_50 = x_273; -goto block_70; -} -} -} -else -{ -lean_object* x_274; lean_object* x_275; -lean_dec(x_224); -lean_dec(x_222); -lean_dec(x_212); -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -x_274 = lean_ctor_get(x_228, 0); -lean_inc(x_274); -x_275 = lean_ctor_get(x_228, 1); -lean_inc(x_275); -lean_dec(x_228); -x_49 = x_274; -x_50 = x_275; -goto block_70; -} -} -} -else -{ -lean_object* x_276; lean_object* x_277; -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -x_276 = lean_ctor_get(x_211, 0); -lean_inc(x_276); -x_277 = lean_ctor_get(x_211, 1); -lean_inc(x_277); -lean_dec(x_211); -x_49 = x_276; -x_50 = x_277; -goto block_70; -} -} -} -else -{ -lean_object* x_278; lean_object* x_279; lean_object* x_280; lean_object* x_281; lean_object* x_282; lean_object* x_283; lean_object* x_284; lean_object* x_285; lean_object* x_286; lean_object* x_287; lean_object* x_288; lean_object* x_289; lean_object* x_290; -x_278 = lean_ctor_get(x_74, 1); -x_279 = lean_ctor_get(x_74, 2); -lean_inc(x_279); +x_278 = lean_ctor_get(x_100, 0); lean_inc(x_278); -lean_dec(x_74); -x_280 = l_Lean_Meta_transform___at___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___spec__1___closed__1; -x_281 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_281, 0, x_280); -lean_ctor_set(x_281, 1, x_278); -lean_ctor_set(x_281, 2, x_279); -x_282 = lean_st_ref_set(x_8, x_281, x_75); -x_283 = lean_ctor_get(x_282, 1); -lean_inc(x_283); -lean_dec(x_282); -x_284 = lean_ctor_get(x_7, 0); -lean_inc(x_284); -x_285 = lean_ctor_get(x_7, 2); -lean_inc(x_285); -x_286 = lean_ctor_get(x_7, 3); -lean_inc(x_286); -x_287 = lean_ctor_get(x_7, 4); +x_279 = lean_ctor_get(x_100, 1); +lean_inc(x_279); +lean_dec(x_100); +x_49 = x_278; +x_50 = x_279; +goto block_70; +} +} +else +{ +lean_object* x_280; lean_object* x_281; lean_object* x_282; uint8_t x_283; uint8_t x_284; uint8_t x_285; lean_object* x_286; +x_280 = lean_ctor_get(x_85, 0); +lean_inc(x_280); +lean_dec(x_85); +x_281 = l_Lean_Meta_Simp_simp_simpLet___lambda__1___closed__1; +lean_inc(x_5); +x_282 = lean_array_push(x_281, x_5); +x_283 = 0; +x_284 = 1; +x_285 = 1; +lean_inc(x_282); +x_286 = l_Lean_Meta_mkLambdaFVars(x_282, x_280, x_283, x_284, x_285, x_9, x_10, x_11, x_12, x_92); +if (lean_obj_tag(x_286) == 0) +{ +lean_object* x_287; lean_object* x_288; lean_object* x_289; lean_object* x_290; uint8_t x_291; +x_287 = lean_ctor_get(x_286, 0); lean_inc(x_287); -if (lean_is_exclusive(x_7)) { - lean_ctor_release(x_7, 0); - lean_ctor_release(x_7, 1); - lean_ctor_release(x_7, 2); - lean_ctor_release(x_7, 3); - lean_ctor_release(x_7, 4); - x_288 = x_7; -} else { - lean_dec_ref(x_7); - x_288 = lean_box(0); -} -if (lean_is_scalar(x_288)) { - x_289 = lean_alloc_ctor(0, 5, 0); -} else { - x_289 = x_288; -} -lean_ctor_set(x_289, 0, x_284); -lean_ctor_set(x_289, 1, x_19); -lean_ctor_set(x_289, 2, x_285); -lean_ctor_set(x_289, 3, x_286); -lean_ctor_set(x_289, 4, x_287); +x_288 = lean_ctor_get(x_286, 1); +lean_inc(x_288); +lean_dec(x_286); +x_289 = lean_ctor_get(x_84, 0); +lean_inc(x_289); +lean_dec(x_84); +x_290 = l_Lean_Expr_fvarId_x21(x_5); +x_291 = l_Lean_Expr_hasAnyFVar_visit___at_Lean_Expr_containsFVar___spec__1(x_290, x_289); +lean_dec(x_290); +if (x_291 == 0) +{ +lean_object* x_292; +lean_dec(x_282); lean_inc(x_12); lean_inc(x_11); lean_inc(x_10); lean_inc(x_9); -lean_inc(x_8); -x_290 = l_Lean_Meta_Simp_simp(x_1, x_6, x_289, x_8, x_9, x_10, x_11, x_12, x_283); -if (lean_obj_tag(x_290) == 0) -{ -lean_object* x_291; lean_object* x_292; -x_291 = lean_ctor_get(x_290, 0); -lean_inc(x_291); -x_292 = lean_ctor_get(x_291, 1); -lean_inc(x_292); +x_292 = l_Lean_Meta_Simp_Result_getProof(x_3, x_9, x_10, x_11, x_12, x_288); if (lean_obj_tag(x_292) == 0) { -lean_object* x_293; lean_object* x_294; -lean_dec(x_5); -lean_dec(x_4); -x_293 = lean_ctor_get(x_290, 1); +lean_object* x_293; lean_object* x_294; lean_object* x_295; lean_object* x_296; lean_object* x_297; lean_object* x_298; lean_object* x_299; lean_object* x_300; lean_object* x_301; uint8_t x_302; uint8_t x_303; uint8_t x_304; uint8_t x_305; uint8_t x_306; uint8_t x_307; uint8_t x_308; uint8_t x_309; uint8_t x_310; uint8_t x_311; uint8_t x_312; uint8_t x_313; uint8_t x_314; lean_object* x_315; uint8_t x_316; lean_object* x_317; lean_object* x_318; lean_object* x_319; +x_293 = lean_ctor_get(x_9, 0); lean_inc(x_293); -lean_dec(x_290); -lean_inc(x_12); -x_294 = l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_mkImpCongr(x_2, x_3, x_291, x_9, x_10, x_11, x_12, x_293); -if (lean_obj_tag(x_294) == 0) -{ -lean_object* x_295; lean_object* x_296; -x_295 = lean_ctor_get(x_294, 0); +x_294 = lean_ctor_get(x_292, 0); +lean_inc(x_294); +x_295 = lean_ctor_get(x_292, 1); lean_inc(x_295); -x_296 = lean_ctor_get(x_294, 1); +lean_dec(x_292); +x_296 = lean_ctor_get(x_9, 1); lean_inc(x_296); -lean_dec(x_294); -x_27 = x_295; -x_28 = x_296; -goto block_48; -} -else -{ -lean_object* x_297; lean_object* x_298; -x_297 = lean_ctor_get(x_294, 0); +x_297 = lean_ctor_get(x_9, 2); lean_inc(x_297); -x_298 = lean_ctor_get(x_294, 1); +x_298 = lean_ctor_get(x_9, 3); lean_inc(x_298); -lean_dec(x_294); -x_49 = x_297; -x_50 = x_298; -goto block_70; -} -} -else -{ -lean_object* x_299; lean_object* x_300; lean_object* x_301; lean_object* x_302; lean_object* x_303; uint8_t x_304; uint8_t x_305; uint8_t x_306; lean_object* x_307; -x_299 = lean_ctor_get(x_290, 1); +x_299 = lean_ctor_get(x_9, 4); lean_inc(x_299); -lean_dec(x_290); -x_300 = lean_ctor_get(x_292, 0); +x_300 = lean_ctor_get(x_9, 5); lean_inc(x_300); -if (lean_is_exclusive(x_292)) { - lean_ctor_release(x_292, 0); - x_301 = x_292; +if (lean_is_exclusive(x_9)) { + lean_ctor_release(x_9, 0); + lean_ctor_release(x_9, 1); + lean_ctor_release(x_9, 2); + lean_ctor_release(x_9, 3); + lean_ctor_release(x_9, 4); + lean_ctor_release(x_9, 5); + x_301 = x_9; } else { - lean_dec_ref(x_292); + lean_dec_ref(x_9); x_301 = lean_box(0); } -x_302 = l_Lean_Meta_Simp_simp_simpLet___lambda__1___closed__1; -lean_inc(x_5); -x_303 = lean_array_push(x_302, x_5); -x_304 = 0; -x_305 = 1; -x_306 = 1; -lean_inc(x_303); -x_307 = l_Lean_Meta_mkLambdaFVars(x_303, x_300, x_304, x_305, x_306, x_9, x_10, x_11, x_12, x_299); -if (lean_obj_tag(x_307) == 0) -{ -lean_object* x_308; lean_object* x_309; lean_object* x_310; lean_object* x_311; uint8_t x_312; -x_308 = lean_ctor_get(x_307, 0); -lean_inc(x_308); -x_309 = lean_ctor_get(x_307, 1); -lean_inc(x_309); -lean_dec(x_307); -x_310 = lean_ctor_get(x_291, 0); -lean_inc(x_310); -lean_dec(x_291); -x_311 = l_Lean_Expr_fvarId_x21(x_5); -x_312 = l_Lean_Expr_hasAnyFVar_visit___at_Lean_Expr_containsFVar___spec__1(x_311, x_310); -lean_dec(x_311); -if (x_312 == 0) -{ -lean_object* x_313; -lean_dec(x_303); -lean_inc(x_12); -lean_inc(x_11); -lean_inc(x_10); -lean_inc(x_9); -x_313 = l_Lean_Meta_Simp_Result_getProof(x_3, x_9, x_10, x_11, x_12, x_309); -if (lean_obj_tag(x_313) == 0) -{ -lean_object* x_314; lean_object* x_315; lean_object* x_316; -x_314 = lean_ctor_get(x_313, 0); -lean_inc(x_314); -x_315 = lean_ctor_get(x_313, 1); -lean_inc(x_315); -lean_dec(x_313); -lean_inc(x_12); -x_316 = l_Lean_Meta_mkImpCongrCtx(x_314, x_308, x_9, x_10, x_11, x_12, x_315); -if (lean_obj_tag(x_316) == 0) -{ -lean_object* x_317; lean_object* x_318; lean_object* x_319; -x_317 = lean_ctor_get(x_316, 0); -lean_inc(x_317); -x_318 = lean_ctor_get(x_316, 1); -lean_inc(x_318); -lean_dec(x_316); -if (lean_is_scalar(x_301)) { - x_319 = lean_alloc_ctor(1, 1, 0); +x_302 = lean_ctor_get_uint8(x_293, 0); +x_303 = lean_ctor_get_uint8(x_293, 1); +x_304 = lean_ctor_get_uint8(x_293, 2); +x_305 = lean_ctor_get_uint8(x_293, 3); +x_306 = lean_ctor_get_uint8(x_293, 4); +x_307 = lean_ctor_get_uint8(x_293, 6); +x_308 = lean_ctor_get_uint8(x_293, 7); +x_309 = lean_ctor_get_uint8(x_293, 8); +x_310 = lean_ctor_get_uint8(x_293, 9); +x_311 = lean_ctor_get_uint8(x_293, 10); +x_312 = lean_ctor_get_uint8(x_293, 11); +x_313 = lean_ctor_get_uint8(x_293, 12); +x_314 = lean_ctor_get_uint8(x_293, 13); +if (lean_is_exclusive(x_293)) { + x_315 = x_293; } else { - x_319 = x_301; + lean_dec_ref(x_293); + x_315 = lean_box(0); } -lean_ctor_set(x_319, 0, x_317); +x_316 = 1; +if (lean_is_scalar(x_315)) { + x_317 = lean_alloc_ctor(0, 0, 14); +} else { + x_317 = x_315; +} +lean_ctor_set_uint8(x_317, 0, x_302); +lean_ctor_set_uint8(x_317, 1, x_303); +lean_ctor_set_uint8(x_317, 2, x_304); +lean_ctor_set_uint8(x_317, 3, x_305); +lean_ctor_set_uint8(x_317, 4, x_306); +lean_ctor_set_uint8(x_317, 5, x_316); +lean_ctor_set_uint8(x_317, 6, x_307); +lean_ctor_set_uint8(x_317, 7, x_308); +lean_ctor_set_uint8(x_317, 8, x_309); +lean_ctor_set_uint8(x_317, 9, x_310); +lean_ctor_set_uint8(x_317, 10, x_311); +lean_ctor_set_uint8(x_317, 11, x_312); +lean_ctor_set_uint8(x_317, 12, x_313); +lean_ctor_set_uint8(x_317, 13, x_314); +if (lean_is_scalar(x_301)) { + x_318 = lean_alloc_ctor(0, 6, 0); +} else { + x_318 = x_301; +} +lean_ctor_set(x_318, 0, x_317); +lean_ctor_set(x_318, 1, x_296); +lean_ctor_set(x_318, 2, x_297); +lean_ctor_set(x_318, 3, x_298); +lean_ctor_set(x_318, 4, x_299); +lean_ctor_set(x_318, 5, x_300); +lean_inc(x_12); +x_319 = l_Lean_Meta_mkImpCongrCtx(x_294, x_287, x_318, x_10, x_11, x_12, x_295); +if (lean_obj_tag(x_319) == 0) +{ +lean_object* x_320; lean_object* x_321; lean_object* x_322; +x_320 = lean_ctor_get(x_319, 0); +lean_inc(x_320); +x_321 = lean_ctor_get(x_319, 1); +lean_inc(x_321); +lean_dec(x_319); +x_322 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_322, 0, x_320); if (lean_obj_tag(x_2) == 7) { -lean_object* x_320; lean_object* x_321; lean_object* x_322; uint64_t x_323; lean_object* x_324; lean_object* x_325; uint8_t x_326; lean_object* x_327; lean_object* x_328; -x_320 = lean_ctor_get(x_2, 0); -lean_inc(x_320); -x_321 = lean_ctor_get(x_2, 1); -lean_inc(x_321); -x_322 = lean_ctor_get(x_2, 2); -lean_inc(x_322); -x_323 = lean_ctor_get_uint64(x_2, sizeof(void*)*3); +lean_object* x_323; lean_object* x_324; lean_object* x_325; uint64_t x_326; lean_object* x_327; lean_object* x_328; uint8_t x_329; lean_object* x_330; lean_object* x_331; +x_323 = lean_ctor_get(x_2, 0); +lean_inc(x_323); +x_324 = lean_ctor_get(x_2, 1); +lean_inc(x_324); +x_325 = lean_ctor_get(x_2, 2); +lean_inc(x_325); +x_326 = lean_ctor_get_uint64(x_2, sizeof(void*)*3); if (lean_is_exclusive(x_2)) { lean_ctor_release(x_2, 0); lean_ctor_release(x_2, 1); lean_ctor_release(x_2, 2); - x_324 = x_2; + x_327 = x_2; } else { lean_dec_ref(x_2); - x_324 = lean_box(0); + x_327 = lean_box(0); } -if (lean_is_scalar(x_324)) { - x_325 = lean_alloc_ctor(7, 3, 8); +if (lean_is_scalar(x_327)) { + x_328 = lean_alloc_ctor(7, 3, 8); } else { - x_325 = x_324; + x_328 = x_327; } -lean_ctor_set(x_325, 0, x_320); -lean_ctor_set(x_325, 1, x_321); -lean_ctor_set(x_325, 2, x_322); -lean_ctor_set_uint64(x_325, sizeof(void*)*3, x_323); -x_326 = (uint8_t)((x_323 << 24) >> 61); -x_327 = lean_expr_update_forall(x_325, x_326, x_4, x_310); -x_328 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_328, 0, x_327); -lean_ctor_set(x_328, 1, x_319); -x_27 = x_328; -x_28 = x_318; -goto block_48; -} -else -{ -lean_object* x_329; lean_object* x_330; lean_object* x_331; -lean_dec(x_310); -lean_dec(x_4); -lean_dec(x_2); -x_329 = l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_mkImpCongr___closed__4; -x_330 = l_panic___at_Lean_Expr_getRevArg_x21___spec__1(x_329); +lean_ctor_set(x_328, 0, x_323); +lean_ctor_set(x_328, 1, x_324); +lean_ctor_set(x_328, 2, x_325); +lean_ctor_set_uint64(x_328, sizeof(void*)*3, x_326); +x_329 = (uint8_t)((x_326 << 24) >> 61); +x_330 = lean_expr_update_forall(x_328, x_329, x_4, x_289); x_331 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_331, 0, x_330); -lean_ctor_set(x_331, 1, x_319); +lean_ctor_set(x_331, 1, x_322); x_27 = x_331; -x_28 = x_318; +x_28 = x_321; +goto block_48; +} +else +{ +lean_object* x_332; lean_object* x_333; lean_object* x_334; +lean_dec(x_289); +lean_dec(x_4); +lean_dec(x_2); +x_332 = l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_mkImpCongr___closed__4; +x_333 = l_panic___at_Lean_Expr_getRevArg_x21___spec__1(x_332); +x_334 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_334, 0, x_333); +lean_ctor_set(x_334, 1, x_322); +x_27 = x_334; +x_28 = x_321; goto block_48; } } else { -lean_object* x_332; lean_object* x_333; -lean_dec(x_310); -lean_dec(x_301); +lean_object* x_335; lean_object* x_336; +lean_dec(x_289); lean_dec(x_4); lean_dec(x_2); -x_332 = lean_ctor_get(x_316, 0); -lean_inc(x_332); -x_333 = lean_ctor_get(x_316, 1); -lean_inc(x_333); -lean_dec(x_316); -x_49 = x_332; -x_50 = x_333; +x_335 = lean_ctor_get(x_319, 0); +lean_inc(x_335); +x_336 = lean_ctor_get(x_319, 1); +lean_inc(x_336); +lean_dec(x_319); +x_49 = x_335; +x_50 = x_336; goto block_70; } } else { -lean_object* x_334; lean_object* x_335; -lean_dec(x_310); -lean_dec(x_308); -lean_dec(x_301); +lean_object* x_337; lean_object* x_338; +lean_dec(x_289); +lean_dec(x_287); lean_dec(x_11); lean_dec(x_10); lean_dec(x_9); lean_dec(x_4); lean_dec(x_2); -x_334 = lean_ctor_get(x_313, 0); -lean_inc(x_334); -x_335 = lean_ctor_get(x_313, 1); -lean_inc(x_335); -lean_dec(x_313); -x_49 = x_334; -x_50 = x_335; +x_337 = lean_ctor_get(x_292, 0); +lean_inc(x_337); +x_338 = lean_ctor_get(x_292, 1); +lean_inc(x_338); +lean_dec(x_292); +x_49 = x_337; +x_50 = x_338; goto block_70; } } else { -lean_object* x_336; +lean_object* x_339; lean_dec(x_4); lean_dec(x_2); -x_336 = l_Lean_Meta_mkForallFVars(x_303, x_310, x_304, x_305, x_306, x_9, x_10, x_11, x_12, x_309); -if (lean_obj_tag(x_336) == 0) -{ -lean_object* x_337; lean_object* x_338; lean_object* x_339; -x_337 = lean_ctor_get(x_336, 0); -lean_inc(x_337); -x_338 = lean_ctor_get(x_336, 1); -lean_inc(x_338); -lean_dec(x_336); -lean_inc(x_12); -lean_inc(x_11); -lean_inc(x_10); -lean_inc(x_9); -x_339 = l_Lean_Meta_Simp_Result_getProof(x_3, x_9, x_10, x_11, x_12, x_338); +x_339 = l_Lean_Meta_mkForallFVars(x_282, x_289, x_283, x_284, x_285, x_9, x_10, x_11, x_12, x_288); if (lean_obj_tag(x_339) == 0) { lean_object* x_340; lean_object* x_341; lean_object* x_342; @@ -18994,88 +19117,167 @@ x_341 = lean_ctor_get(x_339, 1); lean_inc(x_341); lean_dec(x_339); lean_inc(x_12); -x_342 = l_Lean_Meta_mkImpDepCongrCtx(x_340, x_308, x_9, x_10, x_11, x_12, x_341); +lean_inc(x_11); +lean_inc(x_10); +lean_inc(x_9); +x_342 = l_Lean_Meta_Simp_Result_getProof(x_3, x_9, x_10, x_11, x_12, x_341); if (lean_obj_tag(x_342) == 0) { -lean_object* x_343; lean_object* x_344; lean_object* x_345; lean_object* x_346; -x_343 = lean_ctor_get(x_342, 0); +lean_object* x_343; lean_object* x_344; lean_object* x_345; lean_object* x_346; lean_object* x_347; lean_object* x_348; lean_object* x_349; lean_object* x_350; lean_object* x_351; uint8_t x_352; uint8_t x_353; uint8_t x_354; uint8_t x_355; uint8_t x_356; uint8_t x_357; uint8_t x_358; uint8_t x_359; uint8_t x_360; uint8_t x_361; uint8_t x_362; uint8_t x_363; uint8_t x_364; lean_object* x_365; uint8_t x_366; lean_object* x_367; lean_object* x_368; lean_object* x_369; +x_343 = lean_ctor_get(x_9, 0); lean_inc(x_343); -x_344 = lean_ctor_get(x_342, 1); +x_344 = lean_ctor_get(x_342, 0); lean_inc(x_344); +x_345 = lean_ctor_get(x_342, 1); +lean_inc(x_345); lean_dec(x_342); -if (lean_is_scalar(x_301)) { - x_345 = lean_alloc_ctor(1, 1, 0); +x_346 = lean_ctor_get(x_9, 1); +lean_inc(x_346); +x_347 = lean_ctor_get(x_9, 2); +lean_inc(x_347); +x_348 = lean_ctor_get(x_9, 3); +lean_inc(x_348); +x_349 = lean_ctor_get(x_9, 4); +lean_inc(x_349); +x_350 = lean_ctor_get(x_9, 5); +lean_inc(x_350); +if (lean_is_exclusive(x_9)) { + lean_ctor_release(x_9, 0); + lean_ctor_release(x_9, 1); + lean_ctor_release(x_9, 2); + lean_ctor_release(x_9, 3); + lean_ctor_release(x_9, 4); + lean_ctor_release(x_9, 5); + x_351 = x_9; } else { - x_345 = x_301; + lean_dec_ref(x_9); + x_351 = lean_box(0); } -lean_ctor_set(x_345, 0, x_343); -x_346 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_346, 0, x_337); -lean_ctor_set(x_346, 1, x_345); -x_27 = x_346; -x_28 = x_344; +x_352 = lean_ctor_get_uint8(x_343, 0); +x_353 = lean_ctor_get_uint8(x_343, 1); +x_354 = lean_ctor_get_uint8(x_343, 2); +x_355 = lean_ctor_get_uint8(x_343, 3); +x_356 = lean_ctor_get_uint8(x_343, 4); +x_357 = lean_ctor_get_uint8(x_343, 6); +x_358 = lean_ctor_get_uint8(x_343, 7); +x_359 = lean_ctor_get_uint8(x_343, 8); +x_360 = lean_ctor_get_uint8(x_343, 9); +x_361 = lean_ctor_get_uint8(x_343, 10); +x_362 = lean_ctor_get_uint8(x_343, 11); +x_363 = lean_ctor_get_uint8(x_343, 12); +x_364 = lean_ctor_get_uint8(x_343, 13); +if (lean_is_exclusive(x_343)) { + x_365 = x_343; +} else { + lean_dec_ref(x_343); + x_365 = lean_box(0); +} +x_366 = 1; +if (lean_is_scalar(x_365)) { + x_367 = lean_alloc_ctor(0, 0, 14); +} else { + x_367 = x_365; +} +lean_ctor_set_uint8(x_367, 0, x_352); +lean_ctor_set_uint8(x_367, 1, x_353); +lean_ctor_set_uint8(x_367, 2, x_354); +lean_ctor_set_uint8(x_367, 3, x_355); +lean_ctor_set_uint8(x_367, 4, x_356); +lean_ctor_set_uint8(x_367, 5, x_366); +lean_ctor_set_uint8(x_367, 6, x_357); +lean_ctor_set_uint8(x_367, 7, x_358); +lean_ctor_set_uint8(x_367, 8, x_359); +lean_ctor_set_uint8(x_367, 9, x_360); +lean_ctor_set_uint8(x_367, 10, x_361); +lean_ctor_set_uint8(x_367, 11, x_362); +lean_ctor_set_uint8(x_367, 12, x_363); +lean_ctor_set_uint8(x_367, 13, x_364); +if (lean_is_scalar(x_351)) { + x_368 = lean_alloc_ctor(0, 6, 0); +} else { + x_368 = x_351; +} +lean_ctor_set(x_368, 0, x_367); +lean_ctor_set(x_368, 1, x_346); +lean_ctor_set(x_368, 2, x_347); +lean_ctor_set(x_368, 3, x_348); +lean_ctor_set(x_368, 4, x_349); +lean_ctor_set(x_368, 5, x_350); +lean_inc(x_12); +x_369 = l_Lean_Meta_mkImpDepCongrCtx(x_344, x_287, x_368, x_10, x_11, x_12, x_345); +if (lean_obj_tag(x_369) == 0) +{ +lean_object* x_370; lean_object* x_371; lean_object* x_372; lean_object* x_373; +x_370 = lean_ctor_get(x_369, 0); +lean_inc(x_370); +x_371 = lean_ctor_get(x_369, 1); +lean_inc(x_371); +lean_dec(x_369); +x_372 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_372, 0, x_370); +x_373 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_373, 0, x_340); +lean_ctor_set(x_373, 1, x_372); +x_27 = x_373; +x_28 = x_371; goto block_48; } else { -lean_object* x_347; lean_object* x_348; -lean_dec(x_337); -lean_dec(x_301); -x_347 = lean_ctor_get(x_342, 0); -lean_inc(x_347); -x_348 = lean_ctor_get(x_342, 1); -lean_inc(x_348); +lean_object* x_374; lean_object* x_375; +lean_dec(x_340); +x_374 = lean_ctor_get(x_369, 0); +lean_inc(x_374); +x_375 = lean_ctor_get(x_369, 1); +lean_inc(x_375); +lean_dec(x_369); +x_49 = x_374; +x_50 = x_375; +goto block_70; +} +} +else +{ +lean_object* x_376; lean_object* x_377; +lean_dec(x_340); +lean_dec(x_287); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +x_376 = lean_ctor_get(x_342, 0); +lean_inc(x_376); +x_377 = lean_ctor_get(x_342, 1); +lean_inc(x_377); lean_dec(x_342); -x_49 = x_347; -x_50 = x_348; +x_49 = x_376; +x_50 = x_377; goto block_70; } } else { -lean_object* x_349; lean_object* x_350; -lean_dec(x_337); -lean_dec(x_308); -lean_dec(x_301); +lean_object* x_378; lean_object* x_379; +lean_dec(x_287); lean_dec(x_11); lean_dec(x_10); lean_dec(x_9); -x_349 = lean_ctor_get(x_339, 0); -lean_inc(x_349); -x_350 = lean_ctor_get(x_339, 1); -lean_inc(x_350); +lean_dec(x_3); +x_378 = lean_ctor_get(x_339, 0); +lean_inc(x_378); +x_379 = lean_ctor_get(x_339, 1); +lean_inc(x_379); lean_dec(x_339); -x_49 = x_349; -x_50 = x_350; -goto block_70; -} -} -else -{ -lean_object* x_351; lean_object* x_352; -lean_dec(x_308); -lean_dec(x_301); -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_3); -x_351 = lean_ctor_get(x_336, 0); -lean_inc(x_351); -x_352 = lean_ctor_get(x_336, 1); -lean_inc(x_352); -lean_dec(x_336); -x_49 = x_351; -x_50 = x_352; +x_49 = x_378; +x_50 = x_379; goto block_70; } } } else { -lean_object* x_353; lean_object* x_354; -lean_dec(x_303); -lean_dec(x_301); -lean_dec(x_291); +lean_object* x_380; lean_object* x_381; +lean_dec(x_282); +lean_dec(x_84); lean_dec(x_11); lean_dec(x_10); lean_dec(x_9); @@ -19083,20 +19285,21 @@ lean_dec(x_5); lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); -x_353 = lean_ctor_get(x_307, 0); -lean_inc(x_353); -x_354 = lean_ctor_get(x_307, 1); -lean_inc(x_354); -lean_dec(x_307); -x_49 = x_353; -x_50 = x_354; +x_380 = lean_ctor_get(x_286, 0); +lean_inc(x_380); +x_381 = lean_ctor_get(x_286, 1); +lean_inc(x_381); +lean_dec(x_286); +x_49 = x_380; +x_50 = x_381; goto block_70; } } } +} else { -lean_object* x_355; lean_object* x_356; +lean_object* x_382; lean_object* x_383; lean_dec(x_11); lean_dec(x_10); lean_dec(x_9); @@ -19104,13 +19307,1088 @@ lean_dec(x_5); lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); -x_355 = lean_ctor_get(x_290, 0); -lean_inc(x_355); -x_356 = lean_ctor_get(x_290, 1); -lean_inc(x_356); -lean_dec(x_290); -x_49 = x_355; -x_50 = x_356; +x_382 = lean_ctor_get(x_83, 0); +lean_inc(x_382); +x_383 = lean_ctor_get(x_83, 1); +lean_inc(x_383); +lean_dec(x_83); +x_49 = x_382; +x_50 = x_383; +goto block_70; +} +} +else +{ +lean_object* x_384; lean_object* x_385; lean_object* x_386; lean_object* x_387; lean_object* x_388; lean_object* x_389; +x_384 = lean_ctor_get(x_7, 0); +x_385 = lean_ctor_get(x_7, 2); +x_386 = lean_ctor_get(x_7, 3); +x_387 = lean_ctor_get(x_7, 4); +lean_inc(x_387); +lean_inc(x_386); +lean_inc(x_385); +lean_inc(x_384); +lean_dec(x_7); +x_388 = lean_alloc_ctor(0, 5, 0); +lean_ctor_set(x_388, 0, x_384); +lean_ctor_set(x_388, 1, x_19); +lean_ctor_set(x_388, 2, x_385); +lean_ctor_set(x_388, 3, x_386); +lean_ctor_set(x_388, 4, x_387); +lean_inc(x_12); +lean_inc(x_11); +lean_inc(x_10); +lean_inc(x_9); +lean_inc(x_8); +x_389 = l_Lean_Meta_Simp_simp(x_1, x_6, x_388, x_8, x_9, x_10, x_11, x_12, x_80); +if (lean_obj_tag(x_389) == 0) +{ +lean_object* x_390; lean_object* x_391; +x_390 = lean_ctor_get(x_389, 0); +lean_inc(x_390); +x_391 = lean_ctor_get(x_390, 1); +lean_inc(x_391); +if (lean_obj_tag(x_391) == 0) +{ +lean_object* x_392; lean_object* x_393; +lean_dec(x_5); +lean_dec(x_4); +x_392 = lean_ctor_get(x_389, 1); +lean_inc(x_392); +lean_dec(x_389); +lean_inc(x_12); +x_393 = l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_mkImpCongr(x_2, x_3, x_390, x_9, x_10, x_11, x_12, x_392); +if (lean_obj_tag(x_393) == 0) +{ +lean_object* x_394; lean_object* x_395; +x_394 = lean_ctor_get(x_393, 0); +lean_inc(x_394); +x_395 = lean_ctor_get(x_393, 1); +lean_inc(x_395); +lean_dec(x_393); +x_27 = x_394; +x_28 = x_395; +goto block_48; +} +else +{ +lean_object* x_396; lean_object* x_397; +x_396 = lean_ctor_get(x_393, 0); +lean_inc(x_396); +x_397 = lean_ctor_get(x_393, 1); +lean_inc(x_397); +lean_dec(x_393); +x_49 = x_396; +x_50 = x_397; +goto block_70; +} +} +else +{ +lean_object* x_398; lean_object* x_399; lean_object* x_400; lean_object* x_401; lean_object* x_402; uint8_t x_403; uint8_t x_404; uint8_t x_405; lean_object* x_406; +x_398 = lean_ctor_get(x_389, 1); +lean_inc(x_398); +lean_dec(x_389); +x_399 = lean_ctor_get(x_391, 0); +lean_inc(x_399); +if (lean_is_exclusive(x_391)) { + lean_ctor_release(x_391, 0); + x_400 = x_391; +} else { + lean_dec_ref(x_391); + x_400 = lean_box(0); +} +x_401 = l_Lean_Meta_Simp_simp_simpLet___lambda__1___closed__1; +lean_inc(x_5); +x_402 = lean_array_push(x_401, x_5); +x_403 = 0; +x_404 = 1; +x_405 = 1; +lean_inc(x_402); +x_406 = l_Lean_Meta_mkLambdaFVars(x_402, x_399, x_403, x_404, x_405, x_9, x_10, x_11, x_12, x_398); +if (lean_obj_tag(x_406) == 0) +{ +lean_object* x_407; lean_object* x_408; lean_object* x_409; lean_object* x_410; uint8_t x_411; +x_407 = lean_ctor_get(x_406, 0); +lean_inc(x_407); +x_408 = lean_ctor_get(x_406, 1); +lean_inc(x_408); +lean_dec(x_406); +x_409 = lean_ctor_get(x_390, 0); +lean_inc(x_409); +lean_dec(x_390); +x_410 = l_Lean_Expr_fvarId_x21(x_5); +x_411 = l_Lean_Expr_hasAnyFVar_visit___at_Lean_Expr_containsFVar___spec__1(x_410, x_409); +lean_dec(x_410); +if (x_411 == 0) +{ +lean_object* x_412; +lean_dec(x_402); +lean_inc(x_12); +lean_inc(x_11); +lean_inc(x_10); +lean_inc(x_9); +x_412 = l_Lean_Meta_Simp_Result_getProof(x_3, x_9, x_10, x_11, x_12, x_408); +if (lean_obj_tag(x_412) == 0) +{ +lean_object* x_413; lean_object* x_414; lean_object* x_415; lean_object* x_416; lean_object* x_417; lean_object* x_418; lean_object* x_419; lean_object* x_420; lean_object* x_421; uint8_t x_422; uint8_t x_423; uint8_t x_424; uint8_t x_425; uint8_t x_426; uint8_t x_427; uint8_t x_428; uint8_t x_429; uint8_t x_430; uint8_t x_431; uint8_t x_432; uint8_t x_433; uint8_t x_434; lean_object* x_435; uint8_t x_436; lean_object* x_437; lean_object* x_438; lean_object* x_439; +x_413 = lean_ctor_get(x_9, 0); +lean_inc(x_413); +x_414 = lean_ctor_get(x_412, 0); +lean_inc(x_414); +x_415 = lean_ctor_get(x_412, 1); +lean_inc(x_415); +lean_dec(x_412); +x_416 = lean_ctor_get(x_9, 1); +lean_inc(x_416); +x_417 = lean_ctor_get(x_9, 2); +lean_inc(x_417); +x_418 = lean_ctor_get(x_9, 3); +lean_inc(x_418); +x_419 = lean_ctor_get(x_9, 4); +lean_inc(x_419); +x_420 = lean_ctor_get(x_9, 5); +lean_inc(x_420); +if (lean_is_exclusive(x_9)) { + lean_ctor_release(x_9, 0); + lean_ctor_release(x_9, 1); + lean_ctor_release(x_9, 2); + lean_ctor_release(x_9, 3); + lean_ctor_release(x_9, 4); + lean_ctor_release(x_9, 5); + x_421 = x_9; +} else { + lean_dec_ref(x_9); + x_421 = lean_box(0); +} +x_422 = lean_ctor_get_uint8(x_413, 0); +x_423 = lean_ctor_get_uint8(x_413, 1); +x_424 = lean_ctor_get_uint8(x_413, 2); +x_425 = lean_ctor_get_uint8(x_413, 3); +x_426 = lean_ctor_get_uint8(x_413, 4); +x_427 = lean_ctor_get_uint8(x_413, 6); +x_428 = lean_ctor_get_uint8(x_413, 7); +x_429 = lean_ctor_get_uint8(x_413, 8); +x_430 = lean_ctor_get_uint8(x_413, 9); +x_431 = lean_ctor_get_uint8(x_413, 10); +x_432 = lean_ctor_get_uint8(x_413, 11); +x_433 = lean_ctor_get_uint8(x_413, 12); +x_434 = lean_ctor_get_uint8(x_413, 13); +if (lean_is_exclusive(x_413)) { + x_435 = x_413; +} else { + lean_dec_ref(x_413); + x_435 = lean_box(0); +} +x_436 = 1; +if (lean_is_scalar(x_435)) { + x_437 = lean_alloc_ctor(0, 0, 14); +} else { + x_437 = x_435; +} +lean_ctor_set_uint8(x_437, 0, x_422); +lean_ctor_set_uint8(x_437, 1, x_423); +lean_ctor_set_uint8(x_437, 2, x_424); +lean_ctor_set_uint8(x_437, 3, x_425); +lean_ctor_set_uint8(x_437, 4, x_426); +lean_ctor_set_uint8(x_437, 5, x_436); +lean_ctor_set_uint8(x_437, 6, x_427); +lean_ctor_set_uint8(x_437, 7, x_428); +lean_ctor_set_uint8(x_437, 8, x_429); +lean_ctor_set_uint8(x_437, 9, x_430); +lean_ctor_set_uint8(x_437, 10, x_431); +lean_ctor_set_uint8(x_437, 11, x_432); +lean_ctor_set_uint8(x_437, 12, x_433); +lean_ctor_set_uint8(x_437, 13, x_434); +if (lean_is_scalar(x_421)) { + x_438 = lean_alloc_ctor(0, 6, 0); +} else { + x_438 = x_421; +} +lean_ctor_set(x_438, 0, x_437); +lean_ctor_set(x_438, 1, x_416); +lean_ctor_set(x_438, 2, x_417); +lean_ctor_set(x_438, 3, x_418); +lean_ctor_set(x_438, 4, x_419); +lean_ctor_set(x_438, 5, x_420); +lean_inc(x_12); +x_439 = l_Lean_Meta_mkImpCongrCtx(x_414, x_407, x_438, x_10, x_11, x_12, x_415); +if (lean_obj_tag(x_439) == 0) +{ +lean_object* x_440; lean_object* x_441; lean_object* x_442; +x_440 = lean_ctor_get(x_439, 0); +lean_inc(x_440); +x_441 = lean_ctor_get(x_439, 1); +lean_inc(x_441); +lean_dec(x_439); +if (lean_is_scalar(x_400)) { + x_442 = lean_alloc_ctor(1, 1, 0); +} else { + x_442 = x_400; +} +lean_ctor_set(x_442, 0, x_440); +if (lean_obj_tag(x_2) == 7) +{ +lean_object* x_443; lean_object* x_444; lean_object* x_445; uint64_t x_446; lean_object* x_447; lean_object* x_448; uint8_t x_449; lean_object* x_450; lean_object* x_451; +x_443 = lean_ctor_get(x_2, 0); +lean_inc(x_443); +x_444 = lean_ctor_get(x_2, 1); +lean_inc(x_444); +x_445 = lean_ctor_get(x_2, 2); +lean_inc(x_445); +x_446 = lean_ctor_get_uint64(x_2, sizeof(void*)*3); +if (lean_is_exclusive(x_2)) { + lean_ctor_release(x_2, 0); + lean_ctor_release(x_2, 1); + lean_ctor_release(x_2, 2); + x_447 = x_2; +} else { + lean_dec_ref(x_2); + x_447 = lean_box(0); +} +if (lean_is_scalar(x_447)) { + x_448 = lean_alloc_ctor(7, 3, 8); +} else { + x_448 = x_447; +} +lean_ctor_set(x_448, 0, x_443); +lean_ctor_set(x_448, 1, x_444); +lean_ctor_set(x_448, 2, x_445); +lean_ctor_set_uint64(x_448, sizeof(void*)*3, x_446); +x_449 = (uint8_t)((x_446 << 24) >> 61); +x_450 = lean_expr_update_forall(x_448, x_449, x_4, x_409); +x_451 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_451, 0, x_450); +lean_ctor_set(x_451, 1, x_442); +x_27 = x_451; +x_28 = x_441; +goto block_48; +} +else +{ +lean_object* x_452; lean_object* x_453; lean_object* x_454; +lean_dec(x_409); +lean_dec(x_4); +lean_dec(x_2); +x_452 = l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_mkImpCongr___closed__4; +x_453 = l_panic___at_Lean_Expr_getRevArg_x21___spec__1(x_452); +x_454 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_454, 0, x_453); +lean_ctor_set(x_454, 1, x_442); +x_27 = x_454; +x_28 = x_441; +goto block_48; +} +} +else +{ +lean_object* x_455; lean_object* x_456; +lean_dec(x_409); +lean_dec(x_400); +lean_dec(x_4); +lean_dec(x_2); +x_455 = lean_ctor_get(x_439, 0); +lean_inc(x_455); +x_456 = lean_ctor_get(x_439, 1); +lean_inc(x_456); +lean_dec(x_439); +x_49 = x_455; +x_50 = x_456; +goto block_70; +} +} +else +{ +lean_object* x_457; lean_object* x_458; +lean_dec(x_409); +lean_dec(x_407); +lean_dec(x_400); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_4); +lean_dec(x_2); +x_457 = lean_ctor_get(x_412, 0); +lean_inc(x_457); +x_458 = lean_ctor_get(x_412, 1); +lean_inc(x_458); +lean_dec(x_412); +x_49 = x_457; +x_50 = x_458; +goto block_70; +} +} +else +{ +lean_object* x_459; +lean_dec(x_4); +lean_dec(x_2); +x_459 = l_Lean_Meta_mkForallFVars(x_402, x_409, x_403, x_404, x_405, x_9, x_10, x_11, x_12, x_408); +if (lean_obj_tag(x_459) == 0) +{ +lean_object* x_460; lean_object* x_461; lean_object* x_462; +x_460 = lean_ctor_get(x_459, 0); +lean_inc(x_460); +x_461 = lean_ctor_get(x_459, 1); +lean_inc(x_461); +lean_dec(x_459); +lean_inc(x_12); +lean_inc(x_11); +lean_inc(x_10); +lean_inc(x_9); +x_462 = l_Lean_Meta_Simp_Result_getProof(x_3, x_9, x_10, x_11, x_12, x_461); +if (lean_obj_tag(x_462) == 0) +{ +lean_object* x_463; lean_object* x_464; lean_object* x_465; lean_object* x_466; lean_object* x_467; lean_object* x_468; lean_object* x_469; lean_object* x_470; lean_object* x_471; uint8_t x_472; uint8_t x_473; uint8_t x_474; uint8_t x_475; uint8_t x_476; uint8_t x_477; uint8_t x_478; uint8_t x_479; uint8_t x_480; uint8_t x_481; uint8_t x_482; uint8_t x_483; uint8_t x_484; lean_object* x_485; uint8_t x_486; lean_object* x_487; lean_object* x_488; lean_object* x_489; +x_463 = lean_ctor_get(x_9, 0); +lean_inc(x_463); +x_464 = lean_ctor_get(x_462, 0); +lean_inc(x_464); +x_465 = lean_ctor_get(x_462, 1); +lean_inc(x_465); +lean_dec(x_462); +x_466 = lean_ctor_get(x_9, 1); +lean_inc(x_466); +x_467 = lean_ctor_get(x_9, 2); +lean_inc(x_467); +x_468 = lean_ctor_get(x_9, 3); +lean_inc(x_468); +x_469 = lean_ctor_get(x_9, 4); +lean_inc(x_469); +x_470 = lean_ctor_get(x_9, 5); +lean_inc(x_470); +if (lean_is_exclusive(x_9)) { + lean_ctor_release(x_9, 0); + lean_ctor_release(x_9, 1); + lean_ctor_release(x_9, 2); + lean_ctor_release(x_9, 3); + lean_ctor_release(x_9, 4); + lean_ctor_release(x_9, 5); + x_471 = x_9; +} else { + lean_dec_ref(x_9); + x_471 = lean_box(0); +} +x_472 = lean_ctor_get_uint8(x_463, 0); +x_473 = lean_ctor_get_uint8(x_463, 1); +x_474 = lean_ctor_get_uint8(x_463, 2); +x_475 = lean_ctor_get_uint8(x_463, 3); +x_476 = lean_ctor_get_uint8(x_463, 4); +x_477 = lean_ctor_get_uint8(x_463, 6); +x_478 = lean_ctor_get_uint8(x_463, 7); +x_479 = lean_ctor_get_uint8(x_463, 8); +x_480 = lean_ctor_get_uint8(x_463, 9); +x_481 = lean_ctor_get_uint8(x_463, 10); +x_482 = lean_ctor_get_uint8(x_463, 11); +x_483 = lean_ctor_get_uint8(x_463, 12); +x_484 = lean_ctor_get_uint8(x_463, 13); +if (lean_is_exclusive(x_463)) { + x_485 = x_463; +} else { + lean_dec_ref(x_463); + x_485 = lean_box(0); +} +x_486 = 1; +if (lean_is_scalar(x_485)) { + x_487 = lean_alloc_ctor(0, 0, 14); +} else { + x_487 = x_485; +} +lean_ctor_set_uint8(x_487, 0, x_472); +lean_ctor_set_uint8(x_487, 1, x_473); +lean_ctor_set_uint8(x_487, 2, x_474); +lean_ctor_set_uint8(x_487, 3, x_475); +lean_ctor_set_uint8(x_487, 4, x_476); +lean_ctor_set_uint8(x_487, 5, x_486); +lean_ctor_set_uint8(x_487, 6, x_477); +lean_ctor_set_uint8(x_487, 7, x_478); +lean_ctor_set_uint8(x_487, 8, x_479); +lean_ctor_set_uint8(x_487, 9, x_480); +lean_ctor_set_uint8(x_487, 10, x_481); +lean_ctor_set_uint8(x_487, 11, x_482); +lean_ctor_set_uint8(x_487, 12, x_483); +lean_ctor_set_uint8(x_487, 13, x_484); +if (lean_is_scalar(x_471)) { + x_488 = lean_alloc_ctor(0, 6, 0); +} else { + x_488 = x_471; +} +lean_ctor_set(x_488, 0, x_487); +lean_ctor_set(x_488, 1, x_466); +lean_ctor_set(x_488, 2, x_467); +lean_ctor_set(x_488, 3, x_468); +lean_ctor_set(x_488, 4, x_469); +lean_ctor_set(x_488, 5, x_470); +lean_inc(x_12); +x_489 = l_Lean_Meta_mkImpDepCongrCtx(x_464, x_407, x_488, x_10, x_11, x_12, x_465); +if (lean_obj_tag(x_489) == 0) +{ +lean_object* x_490; lean_object* x_491; lean_object* x_492; lean_object* x_493; +x_490 = lean_ctor_get(x_489, 0); +lean_inc(x_490); +x_491 = lean_ctor_get(x_489, 1); +lean_inc(x_491); +lean_dec(x_489); +if (lean_is_scalar(x_400)) { + x_492 = lean_alloc_ctor(1, 1, 0); +} else { + x_492 = x_400; +} +lean_ctor_set(x_492, 0, x_490); +x_493 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_493, 0, x_460); +lean_ctor_set(x_493, 1, x_492); +x_27 = x_493; +x_28 = x_491; +goto block_48; +} +else +{ +lean_object* x_494; lean_object* x_495; +lean_dec(x_460); +lean_dec(x_400); +x_494 = lean_ctor_get(x_489, 0); +lean_inc(x_494); +x_495 = lean_ctor_get(x_489, 1); +lean_inc(x_495); +lean_dec(x_489); +x_49 = x_494; +x_50 = x_495; +goto block_70; +} +} +else +{ +lean_object* x_496; lean_object* x_497; +lean_dec(x_460); +lean_dec(x_407); +lean_dec(x_400); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +x_496 = lean_ctor_get(x_462, 0); +lean_inc(x_496); +x_497 = lean_ctor_get(x_462, 1); +lean_inc(x_497); +lean_dec(x_462); +x_49 = x_496; +x_50 = x_497; +goto block_70; +} +} +else +{ +lean_object* x_498; lean_object* x_499; +lean_dec(x_407); +lean_dec(x_400); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_3); +x_498 = lean_ctor_get(x_459, 0); +lean_inc(x_498); +x_499 = lean_ctor_get(x_459, 1); +lean_inc(x_499); +lean_dec(x_459); +x_49 = x_498; +x_50 = x_499; +goto block_70; +} +} +} +else +{ +lean_object* x_500; lean_object* x_501; +lean_dec(x_402); +lean_dec(x_400); +lean_dec(x_390); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +x_500 = lean_ctor_get(x_406, 0); +lean_inc(x_500); +x_501 = lean_ctor_get(x_406, 1); +lean_inc(x_501); +lean_dec(x_406); +x_49 = x_500; +x_50 = x_501; +goto block_70; +} +} +} +else +{ +lean_object* x_502; lean_object* x_503; +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +x_502 = lean_ctor_get(x_389, 0); +lean_inc(x_502); +x_503 = lean_ctor_get(x_389, 1); +lean_inc(x_503); +lean_dec(x_389); +x_49 = x_502; +x_50 = x_503; +goto block_70; +} +} +} +else +{ +lean_object* x_504; lean_object* x_505; lean_object* x_506; lean_object* x_507; lean_object* x_508; lean_object* x_509; lean_object* x_510; lean_object* x_511; lean_object* x_512; lean_object* x_513; lean_object* x_514; lean_object* x_515; lean_object* x_516; +x_504 = lean_ctor_get(x_74, 1); +x_505 = lean_ctor_get(x_74, 2); +lean_inc(x_505); +lean_inc(x_504); +lean_dec(x_74); +x_506 = l_Lean_Meta_transform___at___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___spec__1___closed__1; +x_507 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_507, 0, x_506); +lean_ctor_set(x_507, 1, x_504); +lean_ctor_set(x_507, 2, x_505); +x_508 = lean_st_ref_set(x_8, x_507, x_75); +x_509 = lean_ctor_get(x_508, 1); +lean_inc(x_509); +lean_dec(x_508); +x_510 = lean_ctor_get(x_7, 0); +lean_inc(x_510); +x_511 = lean_ctor_get(x_7, 2); +lean_inc(x_511); +x_512 = lean_ctor_get(x_7, 3); +lean_inc(x_512); +x_513 = lean_ctor_get(x_7, 4); +lean_inc(x_513); +if (lean_is_exclusive(x_7)) { + lean_ctor_release(x_7, 0); + lean_ctor_release(x_7, 1); + lean_ctor_release(x_7, 2); + lean_ctor_release(x_7, 3); + lean_ctor_release(x_7, 4); + x_514 = x_7; +} else { + lean_dec_ref(x_7); + x_514 = lean_box(0); +} +if (lean_is_scalar(x_514)) { + x_515 = lean_alloc_ctor(0, 5, 0); +} else { + x_515 = x_514; +} +lean_ctor_set(x_515, 0, x_510); +lean_ctor_set(x_515, 1, x_19); +lean_ctor_set(x_515, 2, x_511); +lean_ctor_set(x_515, 3, x_512); +lean_ctor_set(x_515, 4, x_513); +lean_inc(x_12); +lean_inc(x_11); +lean_inc(x_10); +lean_inc(x_9); +lean_inc(x_8); +x_516 = l_Lean_Meta_Simp_simp(x_1, x_6, x_515, x_8, x_9, x_10, x_11, x_12, x_509); +if (lean_obj_tag(x_516) == 0) +{ +lean_object* x_517; lean_object* x_518; +x_517 = lean_ctor_get(x_516, 0); +lean_inc(x_517); +x_518 = lean_ctor_get(x_517, 1); +lean_inc(x_518); +if (lean_obj_tag(x_518) == 0) +{ +lean_object* x_519; lean_object* x_520; +lean_dec(x_5); +lean_dec(x_4); +x_519 = lean_ctor_get(x_516, 1); +lean_inc(x_519); +lean_dec(x_516); +lean_inc(x_12); +x_520 = l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_mkImpCongr(x_2, x_3, x_517, x_9, x_10, x_11, x_12, x_519); +if (lean_obj_tag(x_520) == 0) +{ +lean_object* x_521; lean_object* x_522; +x_521 = lean_ctor_get(x_520, 0); +lean_inc(x_521); +x_522 = lean_ctor_get(x_520, 1); +lean_inc(x_522); +lean_dec(x_520); +x_27 = x_521; +x_28 = x_522; +goto block_48; +} +else +{ +lean_object* x_523; lean_object* x_524; +x_523 = lean_ctor_get(x_520, 0); +lean_inc(x_523); +x_524 = lean_ctor_get(x_520, 1); +lean_inc(x_524); +lean_dec(x_520); +x_49 = x_523; +x_50 = x_524; +goto block_70; +} +} +else +{ +lean_object* x_525; lean_object* x_526; lean_object* x_527; lean_object* x_528; lean_object* x_529; uint8_t x_530; uint8_t x_531; uint8_t x_532; lean_object* x_533; +x_525 = lean_ctor_get(x_516, 1); +lean_inc(x_525); +lean_dec(x_516); +x_526 = lean_ctor_get(x_518, 0); +lean_inc(x_526); +if (lean_is_exclusive(x_518)) { + lean_ctor_release(x_518, 0); + x_527 = x_518; +} else { + lean_dec_ref(x_518); + x_527 = lean_box(0); +} +x_528 = l_Lean_Meta_Simp_simp_simpLet___lambda__1___closed__1; +lean_inc(x_5); +x_529 = lean_array_push(x_528, x_5); +x_530 = 0; +x_531 = 1; +x_532 = 1; +lean_inc(x_529); +x_533 = l_Lean_Meta_mkLambdaFVars(x_529, x_526, x_530, x_531, x_532, x_9, x_10, x_11, x_12, x_525); +if (lean_obj_tag(x_533) == 0) +{ +lean_object* x_534; lean_object* x_535; lean_object* x_536; lean_object* x_537; uint8_t x_538; +x_534 = lean_ctor_get(x_533, 0); +lean_inc(x_534); +x_535 = lean_ctor_get(x_533, 1); +lean_inc(x_535); +lean_dec(x_533); +x_536 = lean_ctor_get(x_517, 0); +lean_inc(x_536); +lean_dec(x_517); +x_537 = l_Lean_Expr_fvarId_x21(x_5); +x_538 = l_Lean_Expr_hasAnyFVar_visit___at_Lean_Expr_containsFVar___spec__1(x_537, x_536); +lean_dec(x_537); +if (x_538 == 0) +{ +lean_object* x_539; +lean_dec(x_529); +lean_inc(x_12); +lean_inc(x_11); +lean_inc(x_10); +lean_inc(x_9); +x_539 = l_Lean_Meta_Simp_Result_getProof(x_3, x_9, x_10, x_11, x_12, x_535); +if (lean_obj_tag(x_539) == 0) +{ +lean_object* x_540; lean_object* x_541; lean_object* x_542; lean_object* x_543; lean_object* x_544; lean_object* x_545; lean_object* x_546; lean_object* x_547; lean_object* x_548; uint8_t x_549; uint8_t x_550; uint8_t x_551; uint8_t x_552; uint8_t x_553; uint8_t x_554; uint8_t x_555; uint8_t x_556; uint8_t x_557; uint8_t x_558; uint8_t x_559; uint8_t x_560; uint8_t x_561; lean_object* x_562; uint8_t x_563; lean_object* x_564; lean_object* x_565; lean_object* x_566; +x_540 = lean_ctor_get(x_9, 0); +lean_inc(x_540); +x_541 = lean_ctor_get(x_539, 0); +lean_inc(x_541); +x_542 = lean_ctor_get(x_539, 1); +lean_inc(x_542); +lean_dec(x_539); +x_543 = lean_ctor_get(x_9, 1); +lean_inc(x_543); +x_544 = lean_ctor_get(x_9, 2); +lean_inc(x_544); +x_545 = lean_ctor_get(x_9, 3); +lean_inc(x_545); +x_546 = lean_ctor_get(x_9, 4); +lean_inc(x_546); +x_547 = lean_ctor_get(x_9, 5); +lean_inc(x_547); +if (lean_is_exclusive(x_9)) { + lean_ctor_release(x_9, 0); + lean_ctor_release(x_9, 1); + lean_ctor_release(x_9, 2); + lean_ctor_release(x_9, 3); + lean_ctor_release(x_9, 4); + lean_ctor_release(x_9, 5); + x_548 = x_9; +} else { + lean_dec_ref(x_9); + x_548 = lean_box(0); +} +x_549 = lean_ctor_get_uint8(x_540, 0); +x_550 = lean_ctor_get_uint8(x_540, 1); +x_551 = lean_ctor_get_uint8(x_540, 2); +x_552 = lean_ctor_get_uint8(x_540, 3); +x_553 = lean_ctor_get_uint8(x_540, 4); +x_554 = lean_ctor_get_uint8(x_540, 6); +x_555 = lean_ctor_get_uint8(x_540, 7); +x_556 = lean_ctor_get_uint8(x_540, 8); +x_557 = lean_ctor_get_uint8(x_540, 9); +x_558 = lean_ctor_get_uint8(x_540, 10); +x_559 = lean_ctor_get_uint8(x_540, 11); +x_560 = lean_ctor_get_uint8(x_540, 12); +x_561 = lean_ctor_get_uint8(x_540, 13); +if (lean_is_exclusive(x_540)) { + x_562 = x_540; +} else { + lean_dec_ref(x_540); + x_562 = lean_box(0); +} +x_563 = 1; +if (lean_is_scalar(x_562)) { + x_564 = lean_alloc_ctor(0, 0, 14); +} else { + x_564 = x_562; +} +lean_ctor_set_uint8(x_564, 0, x_549); +lean_ctor_set_uint8(x_564, 1, x_550); +lean_ctor_set_uint8(x_564, 2, x_551); +lean_ctor_set_uint8(x_564, 3, x_552); +lean_ctor_set_uint8(x_564, 4, x_553); +lean_ctor_set_uint8(x_564, 5, x_563); +lean_ctor_set_uint8(x_564, 6, x_554); +lean_ctor_set_uint8(x_564, 7, x_555); +lean_ctor_set_uint8(x_564, 8, x_556); +lean_ctor_set_uint8(x_564, 9, x_557); +lean_ctor_set_uint8(x_564, 10, x_558); +lean_ctor_set_uint8(x_564, 11, x_559); +lean_ctor_set_uint8(x_564, 12, x_560); +lean_ctor_set_uint8(x_564, 13, x_561); +if (lean_is_scalar(x_548)) { + x_565 = lean_alloc_ctor(0, 6, 0); +} else { + x_565 = x_548; +} +lean_ctor_set(x_565, 0, x_564); +lean_ctor_set(x_565, 1, x_543); +lean_ctor_set(x_565, 2, x_544); +lean_ctor_set(x_565, 3, x_545); +lean_ctor_set(x_565, 4, x_546); +lean_ctor_set(x_565, 5, x_547); +lean_inc(x_12); +x_566 = l_Lean_Meta_mkImpCongrCtx(x_541, x_534, x_565, x_10, x_11, x_12, x_542); +if (lean_obj_tag(x_566) == 0) +{ +lean_object* x_567; lean_object* x_568; lean_object* x_569; +x_567 = lean_ctor_get(x_566, 0); +lean_inc(x_567); +x_568 = lean_ctor_get(x_566, 1); +lean_inc(x_568); +lean_dec(x_566); +if (lean_is_scalar(x_527)) { + x_569 = lean_alloc_ctor(1, 1, 0); +} else { + x_569 = x_527; +} +lean_ctor_set(x_569, 0, x_567); +if (lean_obj_tag(x_2) == 7) +{ +lean_object* x_570; lean_object* x_571; lean_object* x_572; uint64_t x_573; lean_object* x_574; lean_object* x_575; uint8_t x_576; lean_object* x_577; lean_object* x_578; +x_570 = lean_ctor_get(x_2, 0); +lean_inc(x_570); +x_571 = lean_ctor_get(x_2, 1); +lean_inc(x_571); +x_572 = lean_ctor_get(x_2, 2); +lean_inc(x_572); +x_573 = lean_ctor_get_uint64(x_2, sizeof(void*)*3); +if (lean_is_exclusive(x_2)) { + lean_ctor_release(x_2, 0); + lean_ctor_release(x_2, 1); + lean_ctor_release(x_2, 2); + x_574 = x_2; +} else { + lean_dec_ref(x_2); + x_574 = lean_box(0); +} +if (lean_is_scalar(x_574)) { + x_575 = lean_alloc_ctor(7, 3, 8); +} else { + x_575 = x_574; +} +lean_ctor_set(x_575, 0, x_570); +lean_ctor_set(x_575, 1, x_571); +lean_ctor_set(x_575, 2, x_572); +lean_ctor_set_uint64(x_575, sizeof(void*)*3, x_573); +x_576 = (uint8_t)((x_573 << 24) >> 61); +x_577 = lean_expr_update_forall(x_575, x_576, x_4, x_536); +x_578 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_578, 0, x_577); +lean_ctor_set(x_578, 1, x_569); +x_27 = x_578; +x_28 = x_568; +goto block_48; +} +else +{ +lean_object* x_579; lean_object* x_580; lean_object* x_581; +lean_dec(x_536); +lean_dec(x_4); +lean_dec(x_2); +x_579 = l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_mkImpCongr___closed__4; +x_580 = l_panic___at_Lean_Expr_getRevArg_x21___spec__1(x_579); +x_581 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_581, 0, x_580); +lean_ctor_set(x_581, 1, x_569); +x_27 = x_581; +x_28 = x_568; +goto block_48; +} +} +else +{ +lean_object* x_582; lean_object* x_583; +lean_dec(x_536); +lean_dec(x_527); +lean_dec(x_4); +lean_dec(x_2); +x_582 = lean_ctor_get(x_566, 0); +lean_inc(x_582); +x_583 = lean_ctor_get(x_566, 1); +lean_inc(x_583); +lean_dec(x_566); +x_49 = x_582; +x_50 = x_583; +goto block_70; +} +} +else +{ +lean_object* x_584; lean_object* x_585; +lean_dec(x_536); +lean_dec(x_534); +lean_dec(x_527); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_4); +lean_dec(x_2); +x_584 = lean_ctor_get(x_539, 0); +lean_inc(x_584); +x_585 = lean_ctor_get(x_539, 1); +lean_inc(x_585); +lean_dec(x_539); +x_49 = x_584; +x_50 = x_585; +goto block_70; +} +} +else +{ +lean_object* x_586; +lean_dec(x_4); +lean_dec(x_2); +x_586 = l_Lean_Meta_mkForallFVars(x_529, x_536, x_530, x_531, x_532, x_9, x_10, x_11, x_12, x_535); +if (lean_obj_tag(x_586) == 0) +{ +lean_object* x_587; lean_object* x_588; lean_object* x_589; +x_587 = lean_ctor_get(x_586, 0); +lean_inc(x_587); +x_588 = lean_ctor_get(x_586, 1); +lean_inc(x_588); +lean_dec(x_586); +lean_inc(x_12); +lean_inc(x_11); +lean_inc(x_10); +lean_inc(x_9); +x_589 = l_Lean_Meta_Simp_Result_getProof(x_3, x_9, x_10, x_11, x_12, x_588); +if (lean_obj_tag(x_589) == 0) +{ +lean_object* x_590; lean_object* x_591; lean_object* x_592; lean_object* x_593; lean_object* x_594; lean_object* x_595; lean_object* x_596; lean_object* x_597; lean_object* x_598; uint8_t x_599; uint8_t x_600; uint8_t x_601; uint8_t x_602; uint8_t x_603; uint8_t x_604; uint8_t x_605; uint8_t x_606; uint8_t x_607; uint8_t x_608; uint8_t x_609; uint8_t x_610; uint8_t x_611; lean_object* x_612; uint8_t x_613; lean_object* x_614; lean_object* x_615; lean_object* x_616; +x_590 = lean_ctor_get(x_9, 0); +lean_inc(x_590); +x_591 = lean_ctor_get(x_589, 0); +lean_inc(x_591); +x_592 = lean_ctor_get(x_589, 1); +lean_inc(x_592); +lean_dec(x_589); +x_593 = lean_ctor_get(x_9, 1); +lean_inc(x_593); +x_594 = lean_ctor_get(x_9, 2); +lean_inc(x_594); +x_595 = lean_ctor_get(x_9, 3); +lean_inc(x_595); +x_596 = lean_ctor_get(x_9, 4); +lean_inc(x_596); +x_597 = lean_ctor_get(x_9, 5); +lean_inc(x_597); +if (lean_is_exclusive(x_9)) { + lean_ctor_release(x_9, 0); + lean_ctor_release(x_9, 1); + lean_ctor_release(x_9, 2); + lean_ctor_release(x_9, 3); + lean_ctor_release(x_9, 4); + lean_ctor_release(x_9, 5); + x_598 = x_9; +} else { + lean_dec_ref(x_9); + x_598 = lean_box(0); +} +x_599 = lean_ctor_get_uint8(x_590, 0); +x_600 = lean_ctor_get_uint8(x_590, 1); +x_601 = lean_ctor_get_uint8(x_590, 2); +x_602 = lean_ctor_get_uint8(x_590, 3); +x_603 = lean_ctor_get_uint8(x_590, 4); +x_604 = lean_ctor_get_uint8(x_590, 6); +x_605 = lean_ctor_get_uint8(x_590, 7); +x_606 = lean_ctor_get_uint8(x_590, 8); +x_607 = lean_ctor_get_uint8(x_590, 9); +x_608 = lean_ctor_get_uint8(x_590, 10); +x_609 = lean_ctor_get_uint8(x_590, 11); +x_610 = lean_ctor_get_uint8(x_590, 12); +x_611 = lean_ctor_get_uint8(x_590, 13); +if (lean_is_exclusive(x_590)) { + x_612 = x_590; +} else { + lean_dec_ref(x_590); + x_612 = lean_box(0); +} +x_613 = 1; +if (lean_is_scalar(x_612)) { + x_614 = lean_alloc_ctor(0, 0, 14); +} else { + x_614 = x_612; +} +lean_ctor_set_uint8(x_614, 0, x_599); +lean_ctor_set_uint8(x_614, 1, x_600); +lean_ctor_set_uint8(x_614, 2, x_601); +lean_ctor_set_uint8(x_614, 3, x_602); +lean_ctor_set_uint8(x_614, 4, x_603); +lean_ctor_set_uint8(x_614, 5, x_613); +lean_ctor_set_uint8(x_614, 6, x_604); +lean_ctor_set_uint8(x_614, 7, x_605); +lean_ctor_set_uint8(x_614, 8, x_606); +lean_ctor_set_uint8(x_614, 9, x_607); +lean_ctor_set_uint8(x_614, 10, x_608); +lean_ctor_set_uint8(x_614, 11, x_609); +lean_ctor_set_uint8(x_614, 12, x_610); +lean_ctor_set_uint8(x_614, 13, x_611); +if (lean_is_scalar(x_598)) { + x_615 = lean_alloc_ctor(0, 6, 0); +} else { + x_615 = x_598; +} +lean_ctor_set(x_615, 0, x_614); +lean_ctor_set(x_615, 1, x_593); +lean_ctor_set(x_615, 2, x_594); +lean_ctor_set(x_615, 3, x_595); +lean_ctor_set(x_615, 4, x_596); +lean_ctor_set(x_615, 5, x_597); +lean_inc(x_12); +x_616 = l_Lean_Meta_mkImpDepCongrCtx(x_591, x_534, x_615, x_10, x_11, x_12, x_592); +if (lean_obj_tag(x_616) == 0) +{ +lean_object* x_617; lean_object* x_618; lean_object* x_619; lean_object* x_620; +x_617 = lean_ctor_get(x_616, 0); +lean_inc(x_617); +x_618 = lean_ctor_get(x_616, 1); +lean_inc(x_618); +lean_dec(x_616); +if (lean_is_scalar(x_527)) { + x_619 = lean_alloc_ctor(1, 1, 0); +} else { + x_619 = x_527; +} +lean_ctor_set(x_619, 0, x_617); +x_620 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_620, 0, x_587); +lean_ctor_set(x_620, 1, x_619); +x_27 = x_620; +x_28 = x_618; +goto block_48; +} +else +{ +lean_object* x_621; lean_object* x_622; +lean_dec(x_587); +lean_dec(x_527); +x_621 = lean_ctor_get(x_616, 0); +lean_inc(x_621); +x_622 = lean_ctor_get(x_616, 1); +lean_inc(x_622); +lean_dec(x_616); +x_49 = x_621; +x_50 = x_622; +goto block_70; +} +} +else +{ +lean_object* x_623; lean_object* x_624; +lean_dec(x_587); +lean_dec(x_534); +lean_dec(x_527); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +x_623 = lean_ctor_get(x_589, 0); +lean_inc(x_623); +x_624 = lean_ctor_get(x_589, 1); +lean_inc(x_624); +lean_dec(x_589); +x_49 = x_623; +x_50 = x_624; +goto block_70; +} +} +else +{ +lean_object* x_625; lean_object* x_626; +lean_dec(x_534); +lean_dec(x_527); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_3); +x_625 = lean_ctor_get(x_586, 0); +lean_inc(x_625); +x_626 = lean_ctor_get(x_586, 1); +lean_inc(x_626); +lean_dec(x_586); +x_49 = x_625; +x_50 = x_626; +goto block_70; +} +} +} +else +{ +lean_object* x_627; lean_object* x_628; +lean_dec(x_529); +lean_dec(x_527); +lean_dec(x_517); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +x_627 = lean_ctor_get(x_533, 0); +lean_inc(x_627); +x_628 = lean_ctor_get(x_533, 1); +lean_inc(x_628); +lean_dec(x_533); +x_49 = x_627; +x_50 = x_628; +goto block_70; +} +} +} +else +{ +lean_object* x_629; lean_object* x_630; +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +x_629 = lean_ctor_get(x_516, 0); +lean_inc(x_629); +x_630 = lean_ctor_get(x_516, 1); +lean_inc(x_630); +lean_dec(x_516); +x_49 = x_629; +x_50 = x_630; goto block_70; } } @@ -19275,7 +20553,7 @@ return x_69; } else { -uint8_t x_357; +uint8_t x_631; lean_dec(x_12); lean_dec(x_11); lean_dec(x_10); @@ -19288,23 +20566,23 @@ lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); -x_357 = !lean_is_exclusive(x_18); -if (x_357 == 0) +x_631 = !lean_is_exclusive(x_18); +if (x_631 == 0) { return x_18; } else { -lean_object* x_358; lean_object* x_359; lean_object* x_360; -x_358 = lean_ctor_get(x_18, 0); -x_359 = lean_ctor_get(x_18, 1); -lean_inc(x_359); -lean_inc(x_358); +lean_object* x_632; lean_object* x_633; lean_object* x_634; +x_632 = lean_ctor_get(x_18, 0); +x_633 = lean_ctor_get(x_18, 1); +lean_inc(x_633); +lean_inc(x_632); lean_dec(x_18); -x_360 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_360, 0, x_358); -lean_ctor_set(x_360, 1, x_359); -return x_360; +x_634 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_634, 0, x_632); +lean_ctor_set(x_634, 1, x_633); +return x_634; } } } @@ -23045,7 +24323,7 @@ _start: lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; x_1 = l_Lean_Meta_Simp_simp_simpStep___closed__1; x_2 = l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_simp_tryAutoCongrTheorem_x3f___spec__2___closed__1; -x_3 = lean_unsigned_to_nat(360u); +x_3 = lean_unsigned_to_nat(371u); x_4 = lean_unsigned_to_nat(13u); x_5 = l_Lean_Meta_Simp_simp_simpStep___closed__3; x_6 = l___private_Init_Util_0__mkPanicMessageWithDecl(x_1, x_2, x_3, x_4, x_5); @@ -26065,7 +27343,7 @@ _start: lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; x_1 = l_Lean_Meta_Simp_simp_simpStep___closed__1; x_2 = l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_simp_tryAutoCongrTheorem_x3f___spec__2___closed__1; -x_3 = lean_unsigned_to_nat(395u); +x_3 = lean_unsigned_to_nat(406u); x_4 = lean_unsigned_to_nat(13u); x_5 = l_Lean_Meta_Simp_simp_simpStep___closed__3; x_6 = l___private_Init_Util_0__mkPanicMessageWithDecl(x_1, x_2, x_3, x_4, x_5); @@ -30805,7 +32083,7 @@ _start: lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; x_1 = l_Lean_Meta_Simp_simp_simpStep___closed__1; x_2 = l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_simp_tryAutoCongrTheorem_x3f___spec__2___closed__1; -x_3 = lean_unsigned_to_nat(396u); +x_3 = lean_unsigned_to_nat(407u); x_4 = lean_unsigned_to_nat(63u); x_5 = l_Lean_Meta_Simp_simp_simpStep___closed__3; x_6 = l___private_Init_Util_0__mkPanicMessageWithDecl(x_1, x_2, x_3, x_4, x_5); @@ -37048,18 +38326,7 @@ lean_dec(x_4); return x_10; } } -LEAN_EXPORT lean_object* l_Lean_Meta_Simp_DefaultMethods_discharge_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, lean_object* x_7, lean_object* x_8) { -_start: -{ -lean_object* x_9; lean_object* x_10; -x_9 = lean_box(0); -x_10 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_10, 0, x_9); -lean_ctor_set(x_10, 1, x_8); -return x_10; -} -} -static lean_object* _init_l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__2___closed__1() { +static lean_object* _init_l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__1___closed__1() { _start: { lean_object* x_1; @@ -37067,7 +38334,7 @@ x_1 = lean_alloc_closure((void*)(l_Lean_Meta_Simp_DefaultMethods_pre), 8, 0); return x_1; } } -static lean_object* _init_l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__2___closed__2() { +static lean_object* _init_l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__1___closed__2() { _start: { lean_object* x_1; @@ -37075,7 +38342,7 @@ x_1 = lean_alloc_closure((void*)(l_Lean_Meta_Simp_DefaultMethods_post), 8, 0); return x_1; } } -static lean_object* _init_l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__2___closed__3() { +static lean_object* _init_l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__1___closed__3() { _start: { lean_object* x_1; @@ -37083,13 +38350,13 @@ x_1 = lean_alloc_closure((void*)(l_Lean_Meta_Simp_DefaultMethods_discharge_x3f), return x_1; } } -static lean_object* _init_l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__2___closed__4() { +static lean_object* _init_l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__1___closed__4() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; -x_1 = l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__2___closed__1; -x_2 = l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__2___closed__2; -x_3 = l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__2___closed__3; +x_1 = l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__1___closed__1; +x_2 = l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__1___closed__2; +x_3 = l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__1___closed__3; x_4 = lean_alloc_ctor(0, 3, 0); lean_ctor_set(x_4, 0, x_1); lean_ctor_set(x_4, 1, x_2); @@ -37097,7 +38364,7 @@ lean_ctor_set(x_4, 2, x_3); return x_4; } } -static lean_object* _init_l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__2___closed__5() { +static lean_object* _init_l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__1___closed__5() { _start: { lean_object* x_1; @@ -37105,25 +38372,17 @@ x_1 = lean_mk_string("True"); return x_1; } } -static lean_object* _init_l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__2___closed__6() { +static lean_object* _init_l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__1___closed__6() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = lean_box(0); -x_2 = l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__2___closed__5; +x_2 = l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__1___closed__5; x_3 = lean_name_mk_string(x_1, x_2); return x_3; } } -static lean_object* _init_l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__2___closed__7() { -_start: -{ -lean_object* x_1; -x_1 = lean_alloc_closure((void*)(l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__1___boxed), 8, 0); -return x_1; -} -} -static lean_object* _init_l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__2___closed__8() { +static lean_object* _init_l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__1___closed__7() { _start: { lean_object* x_1; @@ -37131,16 +38390,16 @@ x_1 = lean_mk_string("maximum discharge depth has been reached"); return x_1; } } -static lean_object* _init_l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__2___closed__9() { +static lean_object* _init_l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__1___closed__8() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__2___closed__8; +x_1 = l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__1___closed__7; x_2 = l_Lean_stringToMessageData(x_1); return x_2; } } -LEAN_EXPORT lean_object* l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__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, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11) { +LEAN_EXPORT lean_object* l_Lean_Meta_Simp_DefaultMethods_discharge_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, 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; uint8_t x_15; @@ -37161,7 +38420,7 @@ x_18 = lean_unsigned_to_nat(1u); x_19 = lean_nat_add(x_17, x_18); lean_dec(x_17); lean_ctor_set(x_5, 4, x_19); -x_20 = l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__2___closed__4; +x_20 = l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__1___closed__4; lean_inc(x_10); lean_inc(x_9); lean_inc(x_8); @@ -37178,7 +38437,7 @@ x_23 = lean_ctor_get(x_21, 0); x_24 = lean_ctor_get(x_21, 1); x_25 = lean_ctor_get(x_23, 0); lean_inc(x_25); -x_26 = l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__2___closed__6; +x_26 = l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__1___closed__6; x_27 = l_Lean_Expr_isConstOf(x_25, x_26); lean_dec(x_25); if (x_27 == 0) @@ -37311,7 +38570,7 @@ lean_inc(x_52); lean_dec(x_21); x_54 = lean_ctor_get(x_52, 0); lean_inc(x_54); -x_55 = l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__2___closed__6; +x_55 = l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__1___closed__6; x_56 = l_Lean_Expr_isConstOf(x_54, x_55); lean_dec(x_54); if (x_56 == 0) @@ -37477,7 +38736,7 @@ lean_ctor_set(x_87, 1, x_81); lean_ctor_set(x_87, 2, x_82); lean_ctor_set(x_87, 3, x_83); lean_ctor_set(x_87, 4, x_86); -x_88 = l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__2___closed__4; +x_88 = l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__1___closed__4; lean_inc(x_10); lean_inc(x_9); lean_inc(x_8); @@ -37500,7 +38759,7 @@ if (lean_is_exclusive(x_89)) { } x_93 = lean_ctor_get(x_90, 0); lean_inc(x_93); -x_94 = l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__2___closed__6; +x_94 = l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__1___closed__6; x_95 = l_Lean_Expr_isConstOf(x_93, x_94); lean_dec(x_93); if (x_95 == 0) @@ -37695,7 +38954,7 @@ goto block_129; block_129: { lean_object* x_121; -x_121 = l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__2___closed__7; +x_121 = l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___lambda__3___closed__1; if (x_119 == 0) { lean_object* x_122; lean_object* x_123; @@ -37707,7 +38966,7 @@ return x_123; else { lean_object* x_124; lean_object* x_125; lean_object* x_126; lean_object* x_127; lean_object* x_128; -x_124 = l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__2___closed__9; +x_124 = l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__1___closed__8; x_125 = l_Lean_addTrace___at_Lean_Meta_Simp_synthesizeArgs_synthesizeInstance___spec__1(x_3, x_124, x_5, x_6, x_7, x_8, x_9, x_10, x_120); x_126 = lean_ctor_get(x_125, 0); lean_inc(x_126); @@ -37721,7 +38980,7 @@ return x_128; } } } -static lean_object* _init_l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__3___closed__1() { +static lean_object* _init_l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__2___closed__1() { _start: { lean_object* x_1; @@ -37729,17 +38988,17 @@ x_1 = lean_mk_string("discharge"); return x_1; } } -static lean_object* _init_l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__3___closed__2() { +static lean_object* _init_l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__2___closed__2() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_simp_tryAutoCongrTheorem_x3f___spec__3___closed__4; -x_2 = l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__3___closed__1; +x_2 = l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__2___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; } } -static lean_object* _init_l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__3___closed__3() { +static lean_object* _init_l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__2___closed__3() { _start: { lean_object* x_1; @@ -37747,21 +39006,21 @@ x_1 = lean_mk_string(">> discharge?: "); return x_1; } } -static lean_object* _init_l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__3___closed__4() { +static lean_object* _init_l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__2___closed__4() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__3___closed__3; +x_1 = l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__2___closed__3; x_2 = l_Lean_stringToMessageData(x_1); return x_2; } } -LEAN_EXPORT lean_object* l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__3(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_EXPORT lean_object* l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__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, lean_object* x_7, lean_object* x_8, lean_object* x_9) { _start: { lean_object* x_10; uint8_t x_11; lean_object* x_12; lean_object* x_25; lean_object* x_26; lean_object* x_27; uint8_t x_28; lean_dec(x_2); -x_10 = l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__3___closed__2; +x_10 = l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__2___closed__2; x_25 = lean_st_ref_get(x_8, x_9); x_26 = lean_ctor_get(x_25, 0); lean_inc(x_26); @@ -37806,7 +39065,7 @@ if (x_11 == 0) lean_object* x_13; lean_object* x_14; x_13 = lean_box(0); lean_inc(x_3); -x_14 = l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__2(x_3, x_1, x_10, x_13, x_3, x_4, x_5, x_6, x_7, x_8, x_12); +x_14 = l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__1(x_3, x_1, x_10, x_13, x_3, x_4, x_5, x_6, x_7, x_8, x_12); lean_dec(x_3); return x_14; } @@ -37816,7 +39075,7 @@ lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean lean_inc(x_1); x_15 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_15, 0, x_1); -x_16 = l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__3___closed__4; +x_16 = l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__2___closed__4; x_17 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_17, 0, x_16); lean_ctor_set(x_17, 1, x_15); @@ -37831,7 +39090,7 @@ x_22 = lean_ctor_get(x_20, 1); lean_inc(x_22); lean_dec(x_20); lean_inc(x_3); -x_23 = l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__2(x_3, x_1, x_10, x_21, x_3, x_4, x_5, x_6, x_7, x_8, x_22); +x_23 = l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__1(x_3, x_1, x_10, x_21, x_3, x_4, x_5, x_6, x_7, x_8, x_22); lean_dec(x_21); lean_dec(x_3); return x_23; @@ -37849,7 +39108,7 @@ if (x_9 == 0) { lean_object* x_10; lean_object* x_11; x_10 = lean_box(0); -x_11 = l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__3(x_1, x_10, x_2, x_3, x_4, x_5, x_6, x_7, x_8); +x_11 = l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__2(x_1, x_10, x_2, x_3, x_4, x_5, x_6, x_7, x_8); return x_11; } else @@ -37875,7 +39134,7 @@ x_14 = lean_ctor_get(x_12, 1); lean_inc(x_14); lean_dec(x_12); x_15 = lean_box(0); -x_16 = l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__3(x_1, x_15, x_2, x_3, x_4, x_5, x_6, x_7, x_14); +x_16 = l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__2(x_1, x_15, x_2, x_3, x_4, x_5, x_6, x_7, x_14); return x_16; } else @@ -37945,7 +39204,7 @@ LEAN_EXPORT lean_object* l_Lean_Meta_Simp_DefaultMethods_post(lean_object* x_1, _start: { lean_object* x_9; lean_object* x_10; -x_9 = l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__2___closed__3; +x_9 = l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__1___closed__3; x_10 = l_Lean_Meta_Simp_postDefault(x_1, x_9, x_2, x_3, x_4, x_5, x_6, x_7, x_8); return x_10; } @@ -37954,31 +39213,16 @@ LEAN_EXPORT lean_object* l_Lean_Meta_Simp_DefaultMethods_pre(lean_object* x_1, l _start: { lean_object* x_9; lean_object* x_10; -x_9 = l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__2___closed__3; +x_9 = l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__1___closed__3; x_10 = l_Lean_Meta_Simp_preDefault(x_1, x_9, x_2, x_3, x_4, x_5, x_6, x_7, x_8); return x_10; } } -LEAN_EXPORT lean_object* l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___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, lean_object* x_8) { -_start: -{ -lean_object* x_9; -x_9 = l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__1(x_1, x_2, x_3, x_4, x_5, x_6, x_7, 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); -return x_9; -} -} -LEAN_EXPORT lean_object* l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__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* x_9, lean_object* x_10, lean_object* x_11) { +LEAN_EXPORT lean_object* l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___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, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11) { _start: { lean_object* x_12; -x_12 = l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__2(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11); +x_12 = l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__1(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11); lean_dec(x_4); lean_dec(x_1); return x_12; @@ -37988,7 +39232,7 @@ static lean_object* _init_l_Lean_Meta_Simp_DefaultMethods_methods() { _start: { lean_object* x_1; -x_1 = l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__2___closed__4; +x_1 = l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__1___closed__4; return x_1; } } @@ -38142,7 +39386,7 @@ static lean_object* _init_l_Lean_Meta_simpTargetCore___closed__3() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__2___closed__6; +x_1 = l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__1___closed__6; x_2 = l_Lean_Meta_simpTargetCore___closed__2; x_3 = lean_name_mk_string(x_1, x_2); return x_3; @@ -38259,7 +39503,7 @@ lean_inc(x_32); lean_dec(x_16); x_33 = lean_ctor_get(x_31, 0); lean_inc(x_33); -x_34 = l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__2___closed__6; +x_34 = l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__1___closed__6; x_35 = l_Lean_Expr_isConstOf(x_33, x_34); lean_dec(x_33); if (x_35 == 0) @@ -43174,6 +44418,8 @@ l_Lean_Meta_transform___at___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Sim lean_mark_persistent(l_Lean_Meta_transform___at___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___spec__1___closed__1); l_Lean_Meta_transform___at___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___spec__1___closed__2 = _init_l_Lean_Meta_transform___at___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___spec__1___closed__2(); lean_mark_persistent(l_Lean_Meta_transform___at___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___spec__1___closed__2); +l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___lambda__3___closed__1 = _init_l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___lambda__3___closed__1(); +lean_mark_persistent(l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___lambda__3___closed__1); l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___closed__1 = _init_l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___closed__1(); lean_mark_persistent(l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___closed__1); l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___closed__2 = _init_l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___closed__2(); @@ -43396,6 +44642,22 @@ l_Lean_Meta_Simp_isEqnThmHypothesis_go___closed__1 = _init_l_Lean_Meta_Simp_isEq lean_mark_persistent(l_Lean_Meta_Simp_isEqnThmHypothesis_go___closed__1); l_Lean_Meta_Simp_isEqnThmHypothesis_go___closed__2 = _init_l_Lean_Meta_Simp_isEqnThmHypothesis_go___closed__2(); lean_mark_persistent(l_Lean_Meta_Simp_isEqnThmHypothesis_go___closed__2); +l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__1___closed__1 = _init_l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__1___closed__1(); +lean_mark_persistent(l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__1___closed__1); +l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__1___closed__2 = _init_l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__1___closed__2(); +lean_mark_persistent(l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__1___closed__2); +l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__1___closed__3 = _init_l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__1___closed__3(); +lean_mark_persistent(l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__1___closed__3); +l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__1___closed__4 = _init_l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__1___closed__4(); +lean_mark_persistent(l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__1___closed__4); +l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__1___closed__5 = _init_l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__1___closed__5(); +lean_mark_persistent(l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__1___closed__5); +l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__1___closed__6 = _init_l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__1___closed__6(); +lean_mark_persistent(l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__1___closed__6); +l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__1___closed__7 = _init_l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__1___closed__7(); +lean_mark_persistent(l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__1___closed__7); +l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__1___closed__8 = _init_l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__1___closed__8(); +lean_mark_persistent(l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__1___closed__8); l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__2___closed__1 = _init_l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__2___closed__1(); lean_mark_persistent(l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__2___closed__1); l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__2___closed__2 = _init_l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__2___closed__2(); @@ -43404,24 +44666,6 @@ l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__2___closed__3 = _init_l_ lean_mark_persistent(l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__2___closed__3); l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__2___closed__4 = _init_l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__2___closed__4(); lean_mark_persistent(l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__2___closed__4); -l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__2___closed__5 = _init_l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__2___closed__5(); -lean_mark_persistent(l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__2___closed__5); -l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__2___closed__6 = _init_l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__2___closed__6(); -lean_mark_persistent(l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__2___closed__6); -l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__2___closed__7 = _init_l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__2___closed__7(); -lean_mark_persistent(l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__2___closed__7); -l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__2___closed__8 = _init_l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__2___closed__8(); -lean_mark_persistent(l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__2___closed__8); -l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__2___closed__9 = _init_l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__2___closed__9(); -lean_mark_persistent(l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__2___closed__9); -l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__3___closed__1 = _init_l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__3___closed__1(); -lean_mark_persistent(l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__3___closed__1); -l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__3___closed__2 = _init_l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__3___closed__2(); -lean_mark_persistent(l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__3___closed__2); -l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__3___closed__3 = _init_l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__3___closed__3(); -lean_mark_persistent(l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__3___closed__3); -l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__3___closed__4 = _init_l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__3___closed__4(); -lean_mark_persistent(l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___lambda__3___closed__4); l_Lean_Meta_Simp_DefaultMethods_methods = _init_l_Lean_Meta_Simp_DefaultMethods_methods(); lean_mark_persistent(l_Lean_Meta_Simp_DefaultMethods_methods); l_Lean_Meta_simpTargetCore___closed__1 = _init_l_Lean_Meta_simpTargetCore___closed__1(); diff --git a/stage0/stdlib/Lean/Meta/Tactic/Simp/Rewrite.c b/stage0/stdlib/Lean/Meta/Tactic/Simp/Rewrite.c index 777893e702..ae355c177c 100644 --- a/stage0/stdlib/Lean/Meta/Tactic/Simp/Rewrite.c +++ b/stage0/stdlib/Lean/Meta/Tactic/Simp/Rewrite.c @@ -31,7 +31,7 @@ LEAN_EXPORT lean_object* l_Lean_Meta_Simp_synthesizeArgs___lambda__1(lean_object LEAN_EXPORT lean_object* l_Lean_Meta_Simp_rewriteUsingDecide_x3f(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l___private_Lean_Meta_Tactic_Simp_Rewrite_0__Lean_Meta_Simp_tryTheoremCore_go___lambda__4___closed__1; static lean_object* l___private_Lean_Meta_Tactic_Simp_Rewrite_0__Lean_Meta_Simp_tryTheoremCore_go___closed__5; -LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_rewritePost___spec__1(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_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_rewritePost___spec__1(lean_object*, lean_object*, uint8_t, 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_name_mk_string(lean_object*, lean_object*); lean_object* lean_array_uget(lean_object*, size_t); static lean_object* l_Lean_Meta_Simp_rewrite_x3f___closed__3; @@ -108,7 +108,7 @@ lean_object* l___private_Lean_Expr_0__Lean_Expr_getAppArgsAux(lean_object*, lean static lean_object* l_Lean_Meta_Simp_synthesizeArgs_synthesizeInstance___closed__9; static lean_object* l_Lean_addTrace___at_Lean_Meta_Simp_synthesizeArgs_synthesizeInstance___spec__1___closed__8; LEAN_EXPORT lean_object* l___private_Lean_Meta_Tactic_Simp_Rewrite_0__Lean_Meta_Simp_tryTheoremCore_go___lambda__6___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -LEAN_EXPORT 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_EXPORT lean_object* l_Lean_Meta_Simp_rewritePre(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_Simp_rewriteUsingDecide_x3f___closed__8; static lean_object* l___private_Lean_Meta_Tactic_Simp_Rewrite_0__Lean_Meta_Simp_tryTheoremCore_go___closed__6; static lean_object* l_Lean_Meta_Simp_synthesizeArgs_synthesizeInstance___closed__4; @@ -132,7 +132,7 @@ static lean_object* l_Lean_Meta_Simp_rewriteUsingDecide_x3f___closed__4; LEAN_EXPORT lean_object* l_Lean_Meta_Simp_tryTheoremWithExtraArgs_x3f___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*); static lean_object* l_Lean_Meta_Simp_synthesizeArgs___closed__1; lean_object* l_Lean_Name_toString(lean_object*, uint8_t); -LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_rewritePre___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*, lean_object*); +LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_rewritePre___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*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_Simp_synthesizeArgs_synthesizeInstance___closed__13; lean_object* lean_array_get(lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_Simp_rewriteUsingDecide_x3f___closed__14; @@ -140,7 +140,7 @@ lean_object* l_Lean_Meta_mkLambdaFVars(lean_object*, lean_object*, uint8_t, uint LEAN_EXPORT lean_object* l___private_Lean_Meta_Tactic_Simp_Rewrite_0__Lean_Meta_Simp_tryTheoremCore_go___lambda__7(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*); static lean_object* l___private_Lean_Meta_Tactic_Simp_Rewrite_0__Lean_Meta_Simp_tryTheoremCore_go___lambda__7___closed__1; static lean_object* l_Lean_Meta_Simp_rewriteCtorEq_x3f___closed__4; -LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_rewritePost___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*, lean_object*); +LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_rewritePost___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*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Meta_Tactic_Simp_Rewrite_0__Lean_Meta_Simp_tryTheoremCore_go___lambda__3(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*); static lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_rewritePost___spec__1___closed__1; static lean_object* l___private_Lean_Meta_Tactic_Simp_Rewrite_0__Lean_Meta_Simp_tryTheoremCore_go___lambda__7___closed__2; @@ -154,7 +154,7 @@ static lean_object* l_Lean_Meta_Simp_synthesizeArgs_synthesizeInstance___closed_ LEAN_EXPORT lean_object* l_Lean_Meta_Simp_synthesizeArgs_synthesizeInstance(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_Simp_rewriteUsingDecide_x3f___closed__5; static lean_object* l___private_Lean_Meta_Tactic_Simp_Rewrite_0__Lean_Meta_Simp_tryTheoremCore_go___lambda__3___closed__3; -LEAN_EXPORT lean_object* l_Lean_Meta_Simp_rewrite_x3f(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_EXPORT lean_object* l_Lean_Meta_Simp_rewrite_x3f(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_addTrace___at_Lean_Meta_Simp_synthesizeArgs_synthesizeInstance___spec__1___closed__2; LEAN_EXPORT lean_object* l___private_Lean_Meta_Tactic_Simp_Rewrite_0__Lean_Meta_Simp_tryTheoremCore_go___lambda__6(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_Simp_rewriteCtorEq_x3f___closed__5; @@ -173,13 +173,14 @@ static lean_object* l_Lean_Meta_Simp_rewriteCtorEq_x3f___closed__3; uint8_t l_Lean_Expr_isConstOf(lean_object*, lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Meta_Tactic_Simp_Rewrite_0__Lean_Meta_Simp_tryTheoremCore_go___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_getMatcherInfo_x3f___at_Lean_Meta_Simp_simpMatch_x3f___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -LEAN_EXPORT lean_object* l_Lean_Meta_Simp_rewrite_x3f___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_EXPORT lean_object* l_Lean_Meta_Simp_rewrite_x3f___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*); static lean_object* l_Lean_Meta_Simp_rewrite_x3f___closed__1; uint8_t l_Lean_BinderInfo_isInstImplicit(uint8_t); lean_object* lean_whnf(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_addTrace___at_Lean_Meta_Simp_synthesizeArgs_synthesizeInstance___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_Simp_simpArith_x3f___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_rewrite_x3f___spec__3___closed__2; +LEAN_EXPORT lean_object* l_Lean_Meta_Simp_rewritePre___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_Simp_synthesizeArgs_synthesizeInstance___closed__12; size_t lean_usize_of_nat(lean_object*); lean_object* l___private_Lean_Util_Trace_0__Lean_addTraceOptions(lean_object*); @@ -195,14 +196,14 @@ LEAN_EXPORT lean_object* l_Lean_Meta_matchMatcherApp_x3f___at_Lean_Meta_Simp_sim LEAN_EXPORT lean_object* l_Lean_Meta_Simp_rewriteCtorEq_x3f(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_synthesizeArgs___spec__1(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_SimpTheorem_getValue(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_rewrite_x3f___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*); +LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_rewrite_x3f___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*, lean_object*); static lean_object* l_Lean_Meta_Simp_rewriteUsingDecide_x3f___closed__2; LEAN_EXPORT lean_object* l_Lean_Meta_Simp_rewritePre___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Meta_Tactic_Simp_Rewrite_0__Lean_Meta_Simp_tryTheoremCore_go___lambda__4(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_DiscrTree_getMatchWithExtra___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_List_redLength___rarg(lean_object*); lean_object* l_Std_PersistentArray_push___rarg(lean_object*, lean_object*); -LEAN_EXPORT 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_EXPORT lean_object* l_Lean_Meta_Simp_rewritePost(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_Simp_synthesizeArgs_synthesizeInstance___closed__10; 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*); @@ -234,7 +235,7 @@ LEAN_EXPORT lean_object* l_ReaderT_bind___at_Lean_Meta_Simp_tryTheoremWithExtraA 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_Lean_addMessageContextFull___at_Lean_Meta_instAddMessageContextMetaM___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_rewrite_x3f___spec__3(lean_object*, 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_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_rewrite_x3f___spec__3(lean_object*, lean_object*, lean_object*, uint8_t, 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_EXPORT lean_object* l_Lean_Meta_Simp_tryTheoremWithExtraArgs_x3f(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l___private_Lean_Meta_Tactic_Simp_Rewrite_0__Lean_Meta_Simp_tryTheoremCore_go___lambda__3___closed__8; lean_object* l_List_toArrayAux___rarg(lean_object*, lean_object*); @@ -274,12 +275,13 @@ static lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_synthesizeArgs_ uint8_t l_Std_PersistentHashMap_contains___at_Lean_NameSSet_contains___spec__3(lean_object*, lean_object*); lean_object* l_Lean_mkConst(lean_object*, lean_object*); static lean_object* l_Lean_Meta_Simp_rewriteCtorEq_x3f___lambda__1___closed__3; +LEAN_EXPORT lean_object* l_Lean_Meta_Simp_rewritePost___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_rewrite_x3f___spec__3___closed__4; LEAN_EXPORT lean_object* l_Std_Range_forIn_loop___at___private_Lean_Meta_Tactic_Simp_Rewrite_0__Lean_Meta_Simp_tryTheoremCore___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*); static lean_object* l_Lean_Meta_Simp_synthesizeArgs_synthesizeInstance___closed__16; LEAN_EXPORT lean_object* l_Lean_Meta_Simp_simpArith_x3f(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT uint8_t l_Lean_Meta_Simp_rewrite_x3f_inErasedSet(lean_object*, lean_object*); -LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_rewritePre___spec__1(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_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_rewritePre___spec__1(lean_object*, lean_object*, uint8_t, 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_EXPORT lean_object* l_Lean_Meta_Simp_rewrite_x3f_inErasedSet___boxed(lean_object*, lean_object*); uint8_t lean_nat_dec_lt(lean_object*, lean_object*); static lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_rewrite_x3f___spec__3___closed__9; @@ -7255,262 +7257,297 @@ x_2 = l_Lean_stringToMessageData(x_1); return x_2; } } -LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_rewrite_x3f___spec__3(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, size_t x_6, size_t 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) { +LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_rewrite_x3f___spec__3(lean_object* x_1, lean_object* x_2, lean_object* x_3, uint8_t x_4, lean_object* x_5, lean_object* x_6, size_t x_7, size_t 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, lean_object* x_16) { _start: { -uint8_t x_16; -x_16 = lean_usize_dec_lt(x_7, x_6); -if (x_16 == 0) +uint8_t x_17; +x_17 = lean_usize_dec_lt(x_8, x_7); +if (x_17 == 0) { -lean_object* x_17; +lean_object* x_18; +lean_dec(x_15); lean_dec(x_14); lean_dec(x_13); lean_dec(x_12); lean_dec(x_11); lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_4); +lean_dec(x_5); lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); -x_17 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_17, 0, x_8); -lean_ctor_set(x_17, 1, x_15); -return x_17; +x_18 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_18, 0, x_9); +lean_ctor_set(x_18, 1, x_16); +return x_18; } else { -lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_28; lean_object* x_29; uint8_t x_30; -lean_dec(x_8); -x_18 = lean_array_uget(x_5, x_7); -x_28 = lean_ctor_get(x_18, 0); -lean_inc(x_28); -x_29 = lean_ctor_get(x_18, 1); +lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_29; lean_object* x_30; lean_object* x_31; uint8_t x_78; +lean_dec(x_9); +x_19 = lean_array_uget(x_6, x_8); +x_29 = lean_ctor_get(x_19, 0); +lean_inc(x_29); +x_30 = lean_ctor_get(x_19, 1); +lean_inc(x_30); +lean_dec(x_19); lean_inc(x_29); -lean_dec(x_18); -lean_inc(x_28); lean_inc(x_2); -x_30 = l_Lean_Meta_Simp_rewrite_x3f_inErasedSet(x_2, x_28); -if (x_30 == 0) +x_78 = l_Lean_Meta_Simp_rewrite_x3f_inErasedSet(x_2, x_29); +if (x_78 == 0) { -lean_object* x_31; +if (x_4 == 0) +{ +lean_object* x_79; +x_79 = lean_box(0); +x_31 = x_79; +goto block_77; +} +else +{ +uint8_t x_80; +x_80 = lean_ctor_get_uint8(x_29, sizeof(void*)*5 + 2); +if (x_80 == 0) +{ +lean_object* x_81; +lean_dec(x_30); +lean_dec(x_29); +lean_inc(x_5); +x_81 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_81, 0, x_5); +x_20 = x_81; +x_21 = x_16; +goto block_28; +} +else +{ +lean_object* x_82; +x_82 = lean_box(0); +x_31 = x_82; +goto block_77; +} +} +} +else +{ +lean_object* x_83; +lean_dec(x_30); +lean_dec(x_29); +lean_inc(x_5); +x_83 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_83, 0, x_5); +x_20 = x_83; +x_21 = x_16; +goto block_28; +} +block_28: +{ +if (lean_obj_tag(x_20) == 0) +{ +lean_object* x_22; lean_object* x_23; +lean_dec(x_15); +lean_dec(x_14); +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_5); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_22 = lean_ctor_get(x_20, 0); +lean_inc(x_22); +lean_dec(x_20); +x_23 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_23, 0, x_22); +lean_ctor_set(x_23, 1, x_21); +return x_23; +} +else +{ +lean_object* x_24; size_t x_25; size_t x_26; +x_24 = lean_ctor_get(x_20, 0); +lean_inc(x_24); +lean_dec(x_20); +x_25 = 1; +x_26 = lean_usize_add(x_8, x_25); +x_8 = x_26; +x_9 = x_24; +x_16 = x_21; +goto _start; +} +} +block_77: +{ +lean_object* x_32; +lean_dec(x_31); +lean_inc(x_15); lean_inc(x_14); lean_inc(x_13); lean_inc(x_12); lean_inc(x_11); lean_inc(x_10); -lean_inc(x_9); lean_inc(x_3); lean_inc(x_1); -x_31 = l_Lean_Meta_Simp_tryTheoremWithExtraArgs_x3f(x_1, x_28, x_29, x_3, x_9, x_10, x_11, x_12, x_13, x_14, x_15); -if (lean_obj_tag(x_31) == 0) -{ -lean_object* x_32; -x_32 = lean_ctor_get(x_31, 0); -lean_inc(x_32); +x_32 = l_Lean_Meta_Simp_tryTheoremWithExtraArgs_x3f(x_1, x_29, x_30, x_3, x_10, x_11, x_12, x_13, x_14, x_15, x_16); if (lean_obj_tag(x_32) == 0) { -lean_object* x_33; lean_object* x_34; -x_33 = lean_ctor_get(x_31, 1); +lean_object* x_33; +x_33 = lean_ctor_get(x_32, 0); lean_inc(x_33); -lean_dec(x_31); -lean_inc(x_4); -x_34 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_34, 0, x_4); -x_19 = x_34; -x_20 = x_33; -goto block_27; +if (lean_obj_tag(x_33) == 0) +{ +lean_object* x_34; lean_object* x_35; +x_34 = lean_ctor_get(x_32, 1); +lean_inc(x_34); +lean_dec(x_32); +lean_inc(x_5); +x_35 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_35, 0, x_5); +x_20 = x_35; +x_21 = x_34; +goto block_28; } else { -lean_object* x_35; lean_object* x_36; lean_object* x_37; uint8_t x_38; lean_object* x_39; lean_object* x_61; lean_object* x_62; lean_object* x_63; uint8_t x_64; -x_35 = lean_ctor_get(x_31, 1); -lean_inc(x_35); -lean_dec(x_31); -x_36 = lean_ctor_get(x_32, 0); +lean_object* x_36; lean_object* x_37; lean_object* x_38; uint8_t x_39; lean_object* x_40; lean_object* x_62; lean_object* x_63; lean_object* x_64; uint8_t x_65; +x_36 = lean_ctor_get(x_32, 1); lean_inc(x_36); lean_dec(x_32); -x_37 = l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_rewrite_x3f___spec__3___closed__5; -x_61 = lean_st_ref_get(x_14, x_35); -x_62 = lean_ctor_get(x_61, 0); -lean_inc(x_62); -x_63 = lean_ctor_get(x_62, 3); +x_37 = lean_ctor_get(x_33, 0); +lean_inc(x_37); +lean_dec(x_33); +x_38 = l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_rewrite_x3f___spec__3___closed__5; +x_62 = lean_st_ref_get(x_15, x_36); +x_63 = lean_ctor_get(x_62, 0); lean_inc(x_63); -lean_dec(x_62); -x_64 = lean_ctor_get_uint8(x_63, sizeof(void*)*1); +x_64 = lean_ctor_get(x_63, 3); +lean_inc(x_64); lean_dec(x_63); -if (x_64 == 0) +x_65 = lean_ctor_get_uint8(x_64, sizeof(void*)*1); +lean_dec(x_64); +if (x_65 == 0) { -lean_object* x_65; uint8_t x_66; -x_65 = lean_ctor_get(x_61, 1); -lean_inc(x_65); -lean_dec(x_61); -x_66 = 0; -x_38 = x_66; -x_39 = x_65; -goto block_60; +lean_object* x_66; uint8_t x_67; +x_66 = lean_ctor_get(x_62, 1); +lean_inc(x_66); +lean_dec(x_62); +x_67 = 0; +x_39 = x_67; +x_40 = x_66; +goto block_61; } else { -lean_object* x_67; lean_object* x_68; lean_object* x_69; lean_object* x_70; uint8_t x_71; -x_67 = lean_ctor_get(x_61, 1); -lean_inc(x_67); -lean_dec(x_61); -x_68 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at_Lean_Meta_Simp_synthesizeArgs_synthesizeInstance___spec__2(x_37, x_9, x_10, x_11, x_12, x_13, x_14, x_67); -x_69 = lean_ctor_get(x_68, 0); -lean_inc(x_69); -x_70 = lean_ctor_get(x_68, 1); +lean_object* x_68; lean_object* x_69; lean_object* x_70; lean_object* x_71; uint8_t x_72; +x_68 = lean_ctor_get(x_62, 1); +lean_inc(x_68); +lean_dec(x_62); +x_69 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at_Lean_Meta_Simp_synthesizeArgs_synthesizeInstance___spec__2(x_38, x_10, x_11, x_12, x_13, x_14, x_15, x_68); +x_70 = lean_ctor_get(x_69, 0); lean_inc(x_70); -lean_dec(x_68); -x_71 = lean_unbox(x_69); +x_71 = lean_ctor_get(x_69, 1); +lean_inc(x_71); lean_dec(x_69); -x_38 = x_71; -x_39 = x_70; -goto block_60; +x_72 = lean_unbox(x_70); +lean_dec(x_70); +x_39 = x_72; +x_40 = x_71; +goto block_61; } -block_60: +block_61: { -if (x_38 == 0) +if (x_39 == 0) { -lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; -x_40 = lean_box(0); -x_41 = l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_rewrite_x3f___spec__3___lambda__1(x_36, x_40, x_9, x_10, x_11, x_12, x_13, x_14, x_39); -x_42 = lean_ctor_get(x_41, 0); -lean_inc(x_42); -x_43 = lean_ctor_get(x_41, 1); +lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; +x_41 = lean_box(0); +x_42 = l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_rewrite_x3f___spec__3___lambda__1(x_37, x_41, x_10, x_11, x_12, x_13, x_14, x_15, x_40); +x_43 = lean_ctor_get(x_42, 0); lean_inc(x_43); -lean_dec(x_41); -x_19 = x_42; +x_44 = lean_ctor_get(x_42, 1); +lean_inc(x_44); +lean_dec(x_42); x_20 = x_43; -goto block_27; +x_21 = x_44; +goto block_28; } else { -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; lean_object* x_55; lean_object* x_56; lean_object* x_57; lean_object* x_58; lean_object* x_59; +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; 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_inc(x_1); -x_44 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_44, 0, x_1); -x_45 = l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_rewrite_x3f___spec__3___closed__7; -x_46 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_46, 0, x_45); -lean_ctor_set(x_46, 1, x_44); -x_47 = l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_rewrite_x3f___spec__3___closed__9; -x_48 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_48, 0, x_46); -lean_ctor_set(x_48, 1, x_47); -x_49 = lean_ctor_get(x_36, 0); -lean_inc(x_49); -x_50 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_50, 0, x_49); -x_51 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_51, 0, x_48); -lean_ctor_set(x_51, 1, x_50); -x_52 = l_Lean_addTrace___at_Lean_Meta_Simp_synthesizeArgs_synthesizeInstance___spec__1___closed__8; -x_53 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_53, 0, x_51); -lean_ctor_set(x_53, 1, x_52); -x_54 = l_Lean_addTrace___at_Lean_Meta_Simp_synthesizeArgs_synthesizeInstance___spec__1(x_37, x_53, x_9, x_10, x_11, x_12, x_13, x_14, x_39); -x_55 = lean_ctor_get(x_54, 0); -lean_inc(x_55); -x_56 = lean_ctor_get(x_54, 1); +x_45 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_45, 0, x_1); +x_46 = l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_rewrite_x3f___spec__3___closed__7; +x_47 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_47, 0, x_46); +lean_ctor_set(x_47, 1, x_45); +x_48 = l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_rewrite_x3f___spec__3___closed__9; +x_49 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_49, 0, x_47); +lean_ctor_set(x_49, 1, x_48); +x_50 = lean_ctor_get(x_37, 0); +lean_inc(x_50); +x_51 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_51, 0, x_50); +x_52 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_52, 0, x_49); +lean_ctor_set(x_52, 1, x_51); +x_53 = l_Lean_addTrace___at_Lean_Meta_Simp_synthesizeArgs_synthesizeInstance___spec__1___closed__8; +x_54 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_54, 0, x_52); +lean_ctor_set(x_54, 1, x_53); +x_55 = l_Lean_addTrace___at_Lean_Meta_Simp_synthesizeArgs_synthesizeInstance___spec__1(x_38, x_54, x_10, x_11, x_12, x_13, x_14, x_15, x_40); +x_56 = lean_ctor_get(x_55, 0); lean_inc(x_56); -lean_dec(x_54); -x_57 = l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_rewrite_x3f___spec__3___lambda__1(x_36, x_55, x_9, x_10, x_11, x_12, x_13, x_14, x_56); +x_57 = lean_ctor_get(x_55, 1); +lean_inc(x_57); lean_dec(x_55); -x_58 = lean_ctor_get(x_57, 0); -lean_inc(x_58); -x_59 = lean_ctor_get(x_57, 1); +x_58 = l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_rewrite_x3f___spec__3___lambda__1(x_37, x_56, x_10, x_11, x_12, x_13, x_14, x_15, x_57); +lean_dec(x_56); +x_59 = lean_ctor_get(x_58, 0); lean_inc(x_59); -lean_dec(x_57); -x_19 = x_58; +x_60 = lean_ctor_get(x_58, 1); +lean_inc(x_60); +lean_dec(x_58); x_20 = x_59; -goto block_27; +x_21 = x_60; +goto block_28; } } } } else { -uint8_t x_72; +uint8_t x_73; +lean_dec(x_15); lean_dec(x_14); lean_dec(x_13); lean_dec(x_12); lean_dec(x_11); lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_4); +lean_dec(x_5); lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); -x_72 = !lean_is_exclusive(x_31); -if (x_72 == 0) +x_73 = !lean_is_exclusive(x_32); +if (x_73 == 0) { -return x_31; +return x_32; } else { -lean_object* x_73; lean_object* x_74; lean_object* x_75; -x_73 = lean_ctor_get(x_31, 0); -x_74 = lean_ctor_get(x_31, 1); +lean_object* x_74; lean_object* x_75; lean_object* x_76; +x_74 = lean_ctor_get(x_32, 0); +x_75 = lean_ctor_get(x_32, 1); +lean_inc(x_75); lean_inc(x_74); -lean_inc(x_73); -lean_dec(x_31); -x_75 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_75, 0, x_73); -lean_ctor_set(x_75, 1, x_74); -return x_75; +lean_dec(x_32); +x_76 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_76, 0, x_74); +lean_ctor_set(x_76, 1, x_75); +return x_76; } } } -else -{ -lean_object* x_76; -lean_dec(x_29); -lean_dec(x_28); -lean_inc(x_4); -x_76 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_76, 0, x_4); -x_19 = x_76; -x_20 = x_15; -goto block_27; -} -block_27: -{ -if (lean_obj_tag(x_19) == 0) -{ -lean_object* x_21; lean_object* x_22; -lean_dec(x_14); -lean_dec(x_13); -lean_dec(x_12); -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_21 = lean_ctor_get(x_19, 0); -lean_inc(x_21); -lean_dec(x_19); -x_22 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_22, 0, x_21); -lean_ctor_set(x_22, 1, x_20); -return x_22; -} -else -{ -lean_object* x_23; size_t x_24; size_t x_25; -x_23 = lean_ctor_get(x_19, 0); -lean_inc(x_23); -lean_dec(x_19); -x_24 = 1; -x_25 = lean_usize_add(x_7, x_24); -x_7 = x_25; -x_8 = x_23; -x_15 = x_20; -goto _start; -} -} } } } @@ -7570,243 +7607,243 @@ x_2 = l_Lean_stringToMessageData(x_1); return x_2; } } -LEAN_EXPORT lean_object* l_Lean_Meta_Simp_rewrite_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, 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_EXPORT lean_object* l_Lean_Meta_Simp_rewrite_x3f(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, uint8_t 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: { -lean_object* x_13; +lean_object* x_14; +lean_inc(x_12); lean_inc(x_11); lean_inc(x_10); lean_inc(x_9); -lean_inc(x_8); lean_inc(x_1); -x_13 = l_Lean_Meta_DiscrTree_getMatchWithExtra___rarg(x_2, x_1, x_8, x_9, x_10, x_11, x_12); -if (lean_obj_tag(x_13) == 0) +x_14 = l_Lean_Meta_DiscrTree_getMatchWithExtra___rarg(x_2, x_1, x_9, x_10, x_11, x_12, x_13); +if (lean_obj_tag(x_14) == 0) { -lean_object* x_14; lean_object* x_15; uint8_t x_16; -x_14 = lean_ctor_get(x_13, 0); -lean_inc(x_14); -x_15 = lean_ctor_get(x_13, 1); +lean_object* x_15; lean_object* x_16; uint8_t x_17; +x_15 = lean_ctor_get(x_14, 0); lean_inc(x_15); -lean_dec(x_13); -x_16 = l_Array_isEmpty___rarg(x_14); -if (x_16 == 0) +x_16 = lean_ctor_get(x_14, 1); +lean_inc(x_16); +lean_dec(x_14); +x_17 = l_Array_isEmpty___rarg(x_15); +if (x_17 == 0) { -lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; size_t x_22; size_t x_23; lean_object* x_24; lean_object* x_25; -x_17 = lean_array_get_size(x_14); -x_18 = lean_unsigned_to_nat(0u); -x_19 = l_Array_insertionSort_traverse___at_Lean_Meta_Simp_rewrite_x3f___spec__1(x_14, x_18, x_17); -x_20 = lean_box(0); -x_21 = lean_array_get_size(x_19); -x_22 = lean_usize_of_nat(x_21); -lean_dec(x_21); -x_23 = 0; -x_24 = l_Lean_Meta_Simp_rewrite_x3f___closed__1; -x_25 = l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_rewrite_x3f___spec__3(x_1, x_3, x_4, x_24, x_19, x_22, x_23, x_24, x_6, x_7, x_8, x_9, x_10, x_11, x_15); -lean_dec(x_19); -if (lean_obj_tag(x_25) == 0) +lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; size_t x_23; size_t x_24; lean_object* x_25; lean_object* x_26; +x_18 = lean_array_get_size(x_15); +x_19 = lean_unsigned_to_nat(0u); +x_20 = l_Array_insertionSort_traverse___at_Lean_Meta_Simp_rewrite_x3f___spec__1(x_15, x_19, x_18); +x_21 = lean_box(0); +x_22 = lean_array_get_size(x_20); +x_23 = lean_usize_of_nat(x_22); +lean_dec(x_22); +x_24 = 0; +x_25 = l_Lean_Meta_Simp_rewrite_x3f___closed__1; +x_26 = l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_rewrite_x3f___spec__3(x_1, x_3, x_4, x_6, x_25, x_20, x_23, x_24, x_25, x_7, x_8, x_9, x_10, x_11, x_12, x_16); +lean_dec(x_20); +if (lean_obj_tag(x_26) == 0) { -lean_object* x_26; lean_object* x_27; -x_26 = lean_ctor_get(x_25, 0); -lean_inc(x_26); +lean_object* x_27; lean_object* x_28; x_27 = lean_ctor_get(x_26, 0); lean_inc(x_27); +x_28 = lean_ctor_get(x_27, 0); +lean_inc(x_28); +lean_dec(x_27); +if (lean_obj_tag(x_28) == 0) +{ +uint8_t x_29; +x_29 = !lean_is_exclusive(x_26); +if (x_29 == 0) +{ +lean_object* x_30; +x_30 = lean_ctor_get(x_26, 0); +lean_dec(x_30); +lean_ctor_set(x_26, 0, x_21); +return x_26; +} +else +{ +lean_object* x_31; lean_object* x_32; +x_31 = lean_ctor_get(x_26, 1); +lean_inc(x_31); lean_dec(x_26); -if (lean_obj_tag(x_27) == 0) -{ -uint8_t x_28; -x_28 = !lean_is_exclusive(x_25); -if (x_28 == 0) -{ -lean_object* x_29; -x_29 = lean_ctor_get(x_25, 0); -lean_dec(x_29); -lean_ctor_set(x_25, 0, x_20); -return x_25; -} -else -{ -lean_object* x_30; lean_object* x_31; -x_30 = lean_ctor_get(x_25, 1); -lean_inc(x_30); -lean_dec(x_25); -x_31 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_31, 0, x_20); -lean_ctor_set(x_31, 1, x_30); -return x_31; +x_32 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_32, 0, x_21); +lean_ctor_set(x_32, 1, x_31); +return x_32; } } else { -uint8_t x_32; -x_32 = !lean_is_exclusive(x_25); -if (x_32 == 0) +uint8_t x_33; +x_33 = !lean_is_exclusive(x_26); +if (x_33 == 0) { -lean_object* x_33; lean_object* x_34; -x_33 = lean_ctor_get(x_25, 0); -lean_dec(x_33); -x_34 = lean_ctor_get(x_27, 0); -lean_inc(x_34); -lean_dec(x_27); -lean_ctor_set(x_25, 0, x_34); -return x_25; -} -else -{ -lean_object* x_35; lean_object* x_36; lean_object* x_37; -x_35 = lean_ctor_get(x_25, 1); +lean_object* x_34; lean_object* x_35; +x_34 = lean_ctor_get(x_26, 0); +lean_dec(x_34); +x_35 = lean_ctor_get(x_28, 0); lean_inc(x_35); -lean_dec(x_25); -x_36 = lean_ctor_get(x_27, 0); +lean_dec(x_28); +lean_ctor_set(x_26, 0, x_35); +return x_26; +} +else +{ +lean_object* x_36; lean_object* x_37; lean_object* x_38; +x_36 = lean_ctor_get(x_26, 1); lean_inc(x_36); -lean_dec(x_27); -x_37 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_37, 0, x_36); -lean_ctor_set(x_37, 1, x_35); -return x_37; +lean_dec(x_26); +x_37 = lean_ctor_get(x_28, 0); +lean_inc(x_37); +lean_dec(x_28); +x_38 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_38, 0, x_37); +lean_ctor_set(x_38, 1, x_36); +return x_38; } } } else { -uint8_t x_38; -x_38 = !lean_is_exclusive(x_25); -if (x_38 == 0) +uint8_t x_39; +x_39 = !lean_is_exclusive(x_26); +if (x_39 == 0) { -return x_25; +return x_26; } else { -lean_object* x_39; lean_object* x_40; lean_object* x_41; -x_39 = lean_ctor_get(x_25, 0); -x_40 = lean_ctor_get(x_25, 1); +lean_object* x_40; lean_object* x_41; lean_object* x_42; +x_40 = lean_ctor_get(x_26, 0); +x_41 = lean_ctor_get(x_26, 1); +lean_inc(x_41); lean_inc(x_40); -lean_inc(x_39); -lean_dec(x_25); -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; +lean_dec(x_26); +x_42 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_42, 0, x_40); +lean_ctor_set(x_42, 1, x_41); +return x_42; } } } else { -lean_object* x_42; uint8_t x_43; lean_object* x_44; lean_object* x_62; lean_object* x_63; lean_object* x_64; uint8_t x_65; -lean_dec(x_14); +lean_object* x_43; uint8_t x_44; lean_object* x_45; lean_object* x_63; lean_object* x_64; lean_object* x_65; uint8_t x_66; +lean_dec(x_15); lean_dec(x_4); lean_dec(x_3); -x_42 = l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_rewrite_x3f___spec__3___closed__5; -x_62 = lean_st_ref_get(x_11, x_15); -x_63 = lean_ctor_get(x_62, 0); -lean_inc(x_63); -x_64 = lean_ctor_get(x_63, 3); +x_43 = l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_rewrite_x3f___spec__3___closed__5; +x_63 = lean_st_ref_get(x_12, x_16); +x_64 = lean_ctor_get(x_63, 0); lean_inc(x_64); -lean_dec(x_63); -x_65 = lean_ctor_get_uint8(x_64, sizeof(void*)*1); +x_65 = lean_ctor_get(x_64, 3); +lean_inc(x_65); lean_dec(x_64); -if (x_65 == 0) +x_66 = lean_ctor_get_uint8(x_65, sizeof(void*)*1); +lean_dec(x_65); +if (x_66 == 0) { -lean_object* x_66; uint8_t x_67; -x_66 = lean_ctor_get(x_62, 1); -lean_inc(x_66); -lean_dec(x_62); -x_67 = 0; -x_43 = x_67; -x_44 = x_66; -goto block_61; +lean_object* x_67; uint8_t x_68; +x_67 = lean_ctor_get(x_63, 1); +lean_inc(x_67); +lean_dec(x_63); +x_68 = 0; +x_44 = x_68; +x_45 = x_67; +goto block_62; } else { -lean_object* x_68; lean_object* x_69; lean_object* x_70; lean_object* x_71; uint8_t x_72; -x_68 = lean_ctor_get(x_62, 1); -lean_inc(x_68); -lean_dec(x_62); -x_69 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at_Lean_Meta_Simp_synthesizeArgs_synthesizeInstance___spec__2(x_42, x_6, x_7, x_8, x_9, x_10, x_11, x_68); -x_70 = lean_ctor_get(x_69, 0); -lean_inc(x_70); -x_71 = lean_ctor_get(x_69, 1); +lean_object* x_69; lean_object* x_70; lean_object* x_71; lean_object* x_72; uint8_t x_73; +x_69 = lean_ctor_get(x_63, 1); +lean_inc(x_69); +lean_dec(x_63); +x_70 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at_Lean_Meta_Simp_synthesizeArgs_synthesizeInstance___spec__2(x_43, x_7, x_8, x_9, x_10, x_11, x_12, x_69); +x_71 = lean_ctor_get(x_70, 0); lean_inc(x_71); -lean_dec(x_69); -x_72 = lean_unbox(x_70); +x_72 = lean_ctor_get(x_70, 1); +lean_inc(x_72); lean_dec(x_70); -x_43 = x_72; -x_44 = x_71; -goto block_61; +x_73 = lean_unbox(x_71); +lean_dec(x_71); +x_44 = x_73; +x_45 = x_72; +goto block_62; } -block_61: +block_62: { -lean_object* x_45; -x_45 = l___private_Lean_Meta_Tactic_Simp_Rewrite_0__Lean_Meta_Simp_tryTheoremCore_go___lambda__4___closed__1; -if (x_43 == 0) +lean_object* x_46; +x_46 = l___private_Lean_Meta_Tactic_Simp_Rewrite_0__Lean_Meta_Simp_tryTheoremCore_go___lambda__4___closed__1; +if (x_44 == 0) { -lean_object* x_46; lean_object* x_47; +lean_object* x_47; lean_object* x_48; lean_dec(x_1); -x_46 = lean_box(0); -x_47 = lean_apply_8(x_45, x_46, x_6, x_7, x_8, x_9, x_10, x_11, x_44); -return x_47; +x_47 = lean_box(0); +x_48 = lean_apply_8(x_46, x_47, x_7, x_8, x_9, x_10, x_11, x_12, x_45); +return x_48; } else { -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; 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_48 = l_Lean_stringToMessageData(x_5); -x_49 = l_Lean_Meta_Simp_rewrite_x3f___closed__3; -x_50 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_50, 0, x_49); -lean_ctor_set(x_50, 1, x_48); -x_51 = l_Lean_Meta_Simp_rewrite_x3f___closed__5; -x_52 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_52, 0, x_50); -lean_ctor_set(x_52, 1, x_51); -x_53 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_53, 0, x_1); -x_54 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_54, 0, x_52); -lean_ctor_set(x_54, 1, x_53); -x_55 = l_Lean_addTrace___at_Lean_Meta_Simp_synthesizeArgs_synthesizeInstance___spec__1___closed__8; -x_56 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_56, 0, x_54); -lean_ctor_set(x_56, 1, x_55); -x_57 = l_Lean_addTrace___at_Lean_Meta_Simp_synthesizeArgs_synthesizeInstance___spec__1(x_42, x_56, x_6, x_7, x_8, x_9, x_10, x_11, x_44); -x_58 = lean_ctor_get(x_57, 0); -lean_inc(x_58); -x_59 = lean_ctor_get(x_57, 1); +lean_object* x_49; lean_object* x_50; 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_57; lean_object* x_58; lean_object* x_59; lean_object* x_60; lean_object* x_61; +x_49 = l_Lean_stringToMessageData(x_5); +x_50 = l_Lean_Meta_Simp_rewrite_x3f___closed__3; +x_51 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_51, 0, x_50); +lean_ctor_set(x_51, 1, x_49); +x_52 = l_Lean_Meta_Simp_rewrite_x3f___closed__5; +x_53 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_53, 0, x_51); +lean_ctor_set(x_53, 1, x_52); +x_54 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_54, 0, x_1); +x_55 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_55, 0, x_53); +lean_ctor_set(x_55, 1, x_54); +x_56 = l_Lean_addTrace___at_Lean_Meta_Simp_synthesizeArgs_synthesizeInstance___spec__1___closed__8; +x_57 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_57, 0, x_55); +lean_ctor_set(x_57, 1, x_56); +x_58 = l_Lean_addTrace___at_Lean_Meta_Simp_synthesizeArgs_synthesizeInstance___spec__1(x_43, x_57, x_7, x_8, x_9, x_10, x_11, x_12, x_45); +x_59 = lean_ctor_get(x_58, 0); lean_inc(x_59); -lean_dec(x_57); -x_60 = lean_apply_8(x_45, x_58, x_6, x_7, x_8, x_9, x_10, x_11, x_59); -return x_60; +x_60 = lean_ctor_get(x_58, 1); +lean_inc(x_60); +lean_dec(x_58); +x_61 = lean_apply_8(x_46, x_59, x_7, x_8, x_9, x_10, x_11, x_12, x_60); +return x_61; } } } } else { -uint8_t x_73; +uint8_t x_74; +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_6); lean_dec(x_4); lean_dec(x_3); lean_dec(x_1); -x_73 = !lean_is_exclusive(x_13); -if (x_73 == 0) +x_74 = !lean_is_exclusive(x_14); +if (x_74 == 0) { -return x_13; +return x_14; } else { -lean_object* x_74; lean_object* x_75; lean_object* x_76; -x_74 = lean_ctor_get(x_13, 0); -x_75 = lean_ctor_get(x_13, 1); +lean_object* x_75; lean_object* x_76; lean_object* x_77; +x_75 = lean_ctor_get(x_14, 0); +x_76 = lean_ctor_get(x_14, 1); +lean_inc(x_76); lean_inc(x_75); -lean_inc(x_74); -lean_dec(x_13); -x_76 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_76, 0, x_74); -lean_ctor_set(x_76, 1, x_75); -return x_76; +lean_dec(x_14); +x_77 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_77, 0, x_75); +lean_ctor_set(x_77, 1, x_76); +return x_77; } } } @@ -7826,17 +7863,19 @@ lean_dec(x_2); return x_10; } } -LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_rewrite_x3f___spec__3___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* 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) { +LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_rewrite_x3f___spec__3___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* 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, lean_object* x_16) { _start: { -size_t x_16; size_t x_17; lean_object* x_18; -x_16 = lean_unbox_usize(x_6); -lean_dec(x_6); -x_17 = lean_unbox_usize(x_7); +uint8_t x_17; size_t x_18; size_t x_19; lean_object* x_20; +x_17 = lean_unbox(x_4); +lean_dec(x_4); +x_18 = lean_unbox_usize(x_7); lean_dec(x_7); -x_18 = l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_rewrite_x3f___spec__3(x_1, x_2, x_3, x_4, x_5, x_16, x_17, x_8, x_9, x_10, x_11, x_12, x_13, x_14, x_15); -lean_dec(x_5); -return x_18; +x_19 = lean_unbox_usize(x_8); +lean_dec(x_8); +x_20 = l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_rewrite_x3f___spec__3(x_1, x_2, x_3, x_17, x_5, x_6, x_18, x_19, x_9, x_10, x_11, x_12, x_13, x_14, x_15, x_16); +lean_dec(x_6); +return x_20; } } LEAN_EXPORT lean_object* l_Lean_Meta_Simp_rewrite_x3f___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, lean_object* x_8, lean_object* x_9) { @@ -7854,13 +7893,15 @@ lean_dec(x_2); return x_10; } } -LEAN_EXPORT lean_object* l_Lean_Meta_Simp_rewrite_x3f___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* x_9, lean_object* x_10, lean_object* x_11, lean_object* x_12) { +LEAN_EXPORT lean_object* l_Lean_Meta_Simp_rewrite_x3f___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* x_9, lean_object* x_10, lean_object* x_11, lean_object* x_12, lean_object* x_13) { _start: { -lean_object* x_13; -x_13 = l_Lean_Meta_Simp_rewrite_x3f(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_12); +uint8_t x_14; lean_object* x_15; +x_14 = lean_unbox(x_6); +lean_dec(x_6); +x_15 = l_Lean_Meta_Simp_rewrite_x3f(x_1, x_2, x_3, x_4, x_5, x_14, x_7, x_8, x_9, x_10, x_11, x_12, x_13); lean_dec(x_5); -return x_13; +return x_15; } } LEAN_EXPORT lean_object* l_Lean_Meta_Simp_andThen(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) { @@ -11454,6 +11495,8 @@ else lean_object* x_17; lean_object* x_18; lean_dec(x_7); x_17 = lean_array_uget(x_4, x_6); +lean_inc(x_13); +lean_inc(x_12); lean_inc(x_17); x_18 = l_Lean_Meta_isRflTheorem(x_17, x_12, x_13, x_14); if (lean_obj_tag(x_18) == 0) @@ -12527,186 +12570,186 @@ x_1 = lean_mk_string("pre"); return x_1; } } -LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_rewritePre___spec__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, size_t x_5, size_t 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_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_rewritePre___spec__1(lean_object* x_1, lean_object* x_2, uint8_t x_3, lean_object* x_4, lean_object* x_5, size_t x_6, size_t 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) { _start: { -uint8_t x_15; -x_15 = lean_usize_dec_lt(x_6, x_5); -if (x_15 == 0) +uint8_t x_16; +x_16 = lean_usize_dec_lt(x_7, x_6); +if (x_16 == 0) { -lean_object* x_16; +lean_object* x_17; +lean_dec(x_14); lean_dec(x_13); lean_dec(x_12); lean_dec(x_11); lean_dec(x_10); lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_3); +lean_dec(x_4); lean_dec(x_2); lean_dec(x_1); -x_16 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_16, 0, x_7); -lean_ctor_set(x_16, 1, x_14); -return x_16; +x_17 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_17, 0, x_8); +lean_ctor_set(x_17, 1, x_15); +return x_17; } else { -lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; -lean_dec(x_7); -x_17 = lean_array_uget(x_4, x_6); -x_18 = lean_ctor_get(x_17, 0); -lean_inc(x_18); -x_19 = lean_ctor_get(x_17, 4); +lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; +lean_dec(x_8); +x_18 = lean_array_uget(x_5, x_7); +x_19 = lean_ctor_get(x_18, 0); lean_inc(x_19); -lean_dec(x_17); -x_20 = l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_rewritePre___spec__1___closed__1; +x_20 = lean_ctor_get(x_18, 4); +lean_inc(x_20); +lean_dec(x_18); +x_21 = l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_rewritePre___spec__1___closed__1; +lean_inc(x_14); lean_inc(x_13); lean_inc(x_12); lean_inc(x_11); lean_inc(x_10); lean_inc(x_9); -lean_inc(x_8); lean_inc(x_2); lean_inc(x_1); -x_21 = l_Lean_Meta_Simp_rewrite_x3f(x_1, x_18, x_19, x_2, x_20, x_8, x_9, x_10, x_11, x_12, x_13, x_14); -if (lean_obj_tag(x_21) == 0) -{ -lean_object* x_22; -x_22 = lean_ctor_get(x_21, 0); -lean_inc(x_22); +x_22 = l_Lean_Meta_Simp_rewrite_x3f(x_1, x_19, x_20, x_2, x_21, x_3, x_9, x_10, x_11, x_12, x_13, x_14, x_15); if (lean_obj_tag(x_22) == 0) { -lean_object* x_23; size_t x_24; size_t x_25; -x_23 = lean_ctor_get(x_21, 1); +lean_object* x_23; +x_23 = lean_ctor_get(x_22, 0); lean_inc(x_23); -lean_dec(x_21); -x_24 = 1; -x_25 = lean_usize_add(x_6, x_24); -lean_inc(x_3); +if (lean_obj_tag(x_23) == 0) { -size_t _tmp_5 = x_25; -lean_object* _tmp_6 = x_3; -lean_object* _tmp_13 = x_23; -x_6 = _tmp_5; +lean_object* x_24; size_t x_25; size_t x_26; +x_24 = lean_ctor_get(x_22, 1); +lean_inc(x_24); +lean_dec(x_22); +x_25 = 1; +x_26 = lean_usize_add(x_7, x_25); +lean_inc(x_4); +{ +size_t _tmp_6 = x_26; +lean_object* _tmp_7 = x_4; +lean_object* _tmp_14 = x_24; x_7 = _tmp_6; -x_14 = _tmp_13; +x_8 = _tmp_7; +x_15 = _tmp_14; } goto _start; } else { -uint8_t x_27; +uint8_t x_28; +lean_dec(x_14); lean_dec(x_13); lean_dec(x_12); lean_dec(x_11); lean_dec(x_10); lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_3); +lean_dec(x_4); lean_dec(x_2); lean_dec(x_1); -x_27 = !lean_is_exclusive(x_21); -if (x_27 == 0) +x_28 = !lean_is_exclusive(x_22); +if (x_28 == 0) { -lean_object* x_28; uint8_t x_29; -x_28 = lean_ctor_get(x_21, 0); -lean_dec(x_28); -x_29 = !lean_is_exclusive(x_22); -if (x_29 == 0) +lean_object* x_29; uint8_t x_30; +x_29 = lean_ctor_get(x_22, 0); +lean_dec(x_29); +x_30 = !lean_is_exclusive(x_23); +if (x_30 == 0) { -lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; -x_30 = lean_ctor_get(x_22, 0); -x_31 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_31, 0, x_30); -lean_ctor_set(x_22, 0, x_31); -x_32 = lean_box(0); -x_33 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_33, 0, x_22); -lean_ctor_set(x_33, 1, x_32); -lean_ctor_set(x_21, 0, x_33); -return x_21; +lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; +x_31 = lean_ctor_get(x_23, 0); +x_32 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_32, 0, x_31); +lean_ctor_set(x_23, 0, x_32); +x_33 = lean_box(0); +x_34 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_34, 0, x_23); +lean_ctor_set(x_34, 1, x_33); +lean_ctor_set(x_22, 0, x_34); +return x_22; } else { -lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; -x_34 = lean_ctor_get(x_22, 0); -lean_inc(x_34); -lean_dec(x_22); -x_35 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_35, 0, x_34); -x_36 = lean_alloc_ctor(1, 1, 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_23, 0); +lean_inc(x_35); +lean_dec(x_23); +x_36 = lean_alloc_ctor(0, 1, 0); lean_ctor_set(x_36, 0, x_35); -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); -lean_ctor_set(x_21, 0, x_38); -return x_21; +x_37 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_37, 0, x_36); +x_38 = lean_box(0); +x_39 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_39, 0, x_37); +lean_ctor_set(x_39, 1, x_38); +lean_ctor_set(x_22, 0, x_39); +return x_22; } } else { -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; -x_39 = lean_ctor_get(x_21, 1); -lean_inc(x_39); -lean_dec(x_21); -x_40 = lean_ctor_get(x_22, 0); +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_40 = lean_ctor_get(x_22, 1); lean_inc(x_40); -if (lean_is_exclusive(x_22)) { - lean_ctor_release(x_22, 0); - x_41 = x_22; +lean_dec(x_22); +x_41 = lean_ctor_get(x_23, 0); +lean_inc(x_41); +if (lean_is_exclusive(x_23)) { + lean_ctor_release(x_23, 0); + x_42 = x_23; } else { - lean_dec_ref(x_22); - x_41 = lean_box(0); + lean_dec_ref(x_23); + x_42 = lean_box(0); } -x_42 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_42, 0, x_40); -if (lean_is_scalar(x_41)) { - x_43 = lean_alloc_ctor(1, 1, 0); +x_43 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_43, 0, x_41); +if (lean_is_scalar(x_42)) { + x_44 = lean_alloc_ctor(1, 1, 0); } else { - x_43 = x_41; + x_44 = x_42; } -lean_ctor_set(x_43, 0, x_42); -x_44 = lean_box(0); -x_45 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_45, 0, x_43); -lean_ctor_set(x_45, 1, x_44); +lean_ctor_set(x_44, 0, x_43); +x_45 = lean_box(0); x_46 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_46, 0, x_45); -lean_ctor_set(x_46, 1, x_39); -return x_46; +lean_ctor_set(x_46, 0, x_44); +lean_ctor_set(x_46, 1, x_45); +x_47 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_47, 0, x_46); +lean_ctor_set(x_47, 1, x_40); +return x_47; } } } else { -uint8_t x_47; +uint8_t x_48; +lean_dec(x_14); lean_dec(x_13); lean_dec(x_12); lean_dec(x_11); lean_dec(x_10); lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_3); +lean_dec(x_4); lean_dec(x_2); lean_dec(x_1); -x_47 = !lean_is_exclusive(x_21); -if (x_47 == 0) +x_48 = !lean_is_exclusive(x_22); +if (x_48 == 0) { -return x_21; +return x_22; } else { -lean_object* x_48; lean_object* x_49; lean_object* x_50; -x_48 = lean_ctor_get(x_21, 0); -x_49 = lean_ctor_get(x_21, 1); +lean_object* x_49; lean_object* x_50; lean_object* x_51; +x_49 = lean_ctor_get(x_22, 0); +x_50 = lean_ctor_get(x_22, 1); +lean_inc(x_50); lean_inc(x_49); -lean_inc(x_48); -lean_dec(x_21); -x_50 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_50, 0, x_48); -lean_ctor_set(x_50, 1, x_49); -return x_50; +lean_dec(x_22); +x_51 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_51, 0, x_49); +lean_ctor_set(x_51, 1, x_50); +return x_51; } } } @@ -12727,131 +12770,133 @@ lean_ctor_set(x_13, 1, x_10); return x_13; } } -LEAN_EXPORT 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) { +LEAN_EXPORT lean_object* l_Lean_Meta_Simp_rewritePre(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* x_9, lean_object* x_10) { _start: { -lean_object* x_10; lean_object* x_11; lean_object* x_12; size_t x_13; size_t x_14; lean_object* x_15; lean_object* x_16; -x_10 = lean_ctor_get(x_3, 1); -lean_inc(x_10); -x_11 = lean_box(0); -x_12 = lean_array_get_size(x_10); -x_13 = lean_usize_of_nat(x_12); -lean_dec(x_12); -x_14 = 0; -x_15 = l_Lean_Meta_Simp_rewrite_x3f___closed__1; +lean_object* x_11; lean_object* x_12; lean_object* x_13; size_t x_14; size_t x_15; lean_object* x_16; lean_object* x_17; +x_11 = lean_ctor_get(x_4, 1); +lean_inc(x_11); +x_12 = lean_box(0); +x_13 = lean_array_get_size(x_11); +x_14 = lean_usize_of_nat(x_13); +lean_dec(x_13); +x_15 = 0; +x_16 = l_Lean_Meta_Simp_rewrite_x3f___closed__1; +lean_inc(x_9); lean_inc(x_8); lean_inc(x_7); lean_inc(x_6); lean_inc(x_5); lean_inc(x_4); -lean_inc(x_3); lean_inc(x_1); -x_16 = l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_rewritePre___spec__1(x_1, x_2, x_15, x_10, x_13, x_14, x_15, x_3, x_4, x_5, x_6, x_7, x_8, x_9); -lean_dec(x_10); -if (lean_obj_tag(x_16) == 0) +x_17 = l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_rewritePre___spec__1(x_1, x_2, x_3, x_16, x_11, x_14, x_15, x_16, x_4, x_5, x_6, x_7, x_8, x_9, x_10); +lean_dec(x_11); +if (lean_obj_tag(x_17) == 0) { -lean_object* x_17; lean_object* x_18; -x_17 = lean_ctor_get(x_16, 0); -lean_inc(x_17); +lean_object* x_18; lean_object* x_19; x_18 = lean_ctor_get(x_17, 0); lean_inc(x_18); -lean_dec(x_17); -if (lean_obj_tag(x_18) == 0) -{ -lean_object* x_19; lean_object* x_20; lean_object* x_21; -x_19 = lean_ctor_get(x_16, 1); +x_19 = lean_ctor_get(x_18, 0); lean_inc(x_19); -lean_dec(x_16); -x_20 = lean_box(0); -x_21 = l_Lean_Meta_Simp_rewritePre___lambda__1(x_1, x_11, x_20, x_3, x_4, x_5, x_6, x_7, x_8, x_19); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -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_1); -x_22 = !lean_is_exclusive(x_16); -if (x_22 == 0) -{ -lean_object* x_23; lean_object* x_24; -x_23 = lean_ctor_get(x_16, 0); -lean_dec(x_23); -x_24 = lean_ctor_get(x_18, 0); -lean_inc(x_24); lean_dec(x_18); -lean_ctor_set(x_16, 0, x_24); -return x_16; +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_17, 1); +lean_inc(x_20); +lean_dec(x_17); +x_21 = lean_box(0); +x_22 = l_Lean_Meta_Simp_rewritePre___lambda__1(x_1, x_12, x_21, x_4, x_5, x_6, x_7, x_8, x_9, x_20); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +return x_22; } else { -lean_object* x_25; lean_object* x_26; lean_object* x_27; -x_25 = lean_ctor_get(x_16, 1); +uint8_t x_23; +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_1); +x_23 = !lean_is_exclusive(x_17); +if (x_23 == 0) +{ +lean_object* x_24; lean_object* x_25; +x_24 = lean_ctor_get(x_17, 0); +lean_dec(x_24); +x_25 = lean_ctor_get(x_19, 0); lean_inc(x_25); -lean_dec(x_16); -x_26 = lean_ctor_get(x_18, 0); +lean_dec(x_19); +lean_ctor_set(x_17, 0, x_25); +return x_17; +} +else +{ +lean_object* x_26; lean_object* x_27; lean_object* x_28; +x_26 = lean_ctor_get(x_17, 1); lean_inc(x_26); -lean_dec(x_18); -x_27 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_27, 0, x_26); -lean_ctor_set(x_27, 1, x_25); -return x_27; +lean_dec(x_17); +x_27 = lean_ctor_get(x_19, 0); +lean_inc(x_27); +lean_dec(x_19); +x_28 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_28, 0, x_27); +lean_ctor_set(x_28, 1, x_26); +return x_28; } } } else { -uint8_t x_28; +uint8_t x_29; +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_1); -x_28 = !lean_is_exclusive(x_16); -if (x_28 == 0) +x_29 = !lean_is_exclusive(x_17); +if (x_29 == 0) { -return x_16; +return x_17; } 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_object* x_30; lean_object* x_31; lean_object* x_32; +x_30 = lean_ctor_get(x_17, 0); +x_31 = lean_ctor_get(x_17, 1); +lean_inc(x_31); 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; +lean_dec(x_17); +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; } } } } -LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_rewritePre___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, 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_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_rewritePre___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, 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) { _start: { -size_t x_15; size_t x_16; lean_object* x_17; -x_15 = lean_unbox_usize(x_5); -lean_dec(x_5); -x_16 = lean_unbox_usize(x_6); +uint8_t x_16; size_t x_17; size_t x_18; lean_object* x_19; +x_16 = lean_unbox(x_3); +lean_dec(x_3); +x_17 = lean_unbox_usize(x_6); lean_dec(x_6); -x_17 = l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_rewritePre___spec__1(x_1, x_2, x_3, x_4, x_15, x_16, x_7, x_8, x_9, x_10, x_11, x_12, x_13, x_14); -lean_dec(x_4); -return x_17; +x_18 = lean_unbox_usize(x_7); +lean_dec(x_7); +x_19 = l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_rewritePre___spec__1(x_1, x_2, x_16, x_4, x_5, x_17, x_18, x_8, x_9, x_10, x_11, x_12, x_13, x_14, x_15); +lean_dec(x_5); +return x_19; } } LEAN_EXPORT lean_object* l_Lean_Meta_Simp_rewritePre___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, lean_object* x_8, lean_object* x_9, lean_object* x_10) { @@ -12869,6 +12914,16 @@ lean_dec(x_3); return x_11; } } +LEAN_EXPORT lean_object* l_Lean_Meta_Simp_rewritePre___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* x_9, lean_object* x_10) { +_start: +{ +uint8_t x_11; lean_object* x_12; +x_11 = lean_unbox(x_3); +lean_dec(x_3); +x_12 = l_Lean_Meta_Simp_rewritePre(x_1, x_2, x_11, x_4, x_5, x_6, x_7, x_8, x_9, x_10); +return x_12; +} +} static lean_object* _init_l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_rewritePost___spec__1___closed__1() { _start: { @@ -12877,1011 +12932,48 @@ x_1 = lean_mk_string("post"); return x_1; } } -LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_rewritePost___spec__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, size_t x_5, size_t 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_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_rewritePost___spec__1(lean_object* x_1, lean_object* x_2, uint8_t x_3, lean_object* x_4, lean_object* x_5, size_t x_6, size_t 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) { _start: { -uint8_t x_15; -x_15 = lean_usize_dec_lt(x_6, x_5); -if (x_15 == 0) +uint8_t x_16; +x_16 = lean_usize_dec_lt(x_7, x_6); +if (x_16 == 0) { -lean_object* x_16; +lean_object* x_17; +lean_dec(x_14); lean_dec(x_13); lean_dec(x_12); lean_dec(x_11); lean_dec(x_10); lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_3); +lean_dec(x_4); lean_dec(x_2); lean_dec(x_1); -x_16 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_16, 0, x_7); -lean_ctor_set(x_16, 1, x_14); -return x_16; +x_17 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_17, 0, x_8); +lean_ctor_set(x_17, 1, x_15); +return x_17; } else { -lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; -lean_dec(x_7); -x_17 = lean_array_uget(x_4, x_6); -x_18 = lean_ctor_get(x_17, 1); -lean_inc(x_18); -x_19 = lean_ctor_get(x_17, 4); +lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; +lean_dec(x_8); +x_18 = lean_array_uget(x_5, x_7); +x_19 = lean_ctor_get(x_18, 1); lean_inc(x_19); -lean_dec(x_17); -x_20 = l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_rewritePost___spec__1___closed__1; +x_20 = lean_ctor_get(x_18, 4); +lean_inc(x_20); +lean_dec(x_18); +x_21 = l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_rewritePost___spec__1___closed__1; +lean_inc(x_14); lean_inc(x_13); lean_inc(x_12); lean_inc(x_11); lean_inc(x_10); lean_inc(x_9); -lean_inc(x_8); lean_inc(x_2); lean_inc(x_1); -x_21 = l_Lean_Meta_Simp_rewrite_x3f(x_1, x_18, x_19, x_2, x_20, x_8, x_9, x_10, x_11, x_12, x_13, x_14); -if (lean_obj_tag(x_21) == 0) -{ -lean_object* x_22; -x_22 = lean_ctor_get(x_21, 0); -lean_inc(x_22); -if (lean_obj_tag(x_22) == 0) -{ -lean_object* x_23; size_t x_24; size_t x_25; -x_23 = lean_ctor_get(x_21, 1); -lean_inc(x_23); -lean_dec(x_21); -x_24 = 1; -x_25 = lean_usize_add(x_6, x_24); -lean_inc(x_3); -{ -size_t _tmp_5 = x_25; -lean_object* _tmp_6 = x_3; -lean_object* _tmp_13 = x_23; -x_6 = _tmp_5; -x_7 = _tmp_6; -x_14 = _tmp_13; -} -goto _start; -} -else -{ -uint8_t x_27; -lean_dec(x_13); -lean_dec(x_12); -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_27 = !lean_is_exclusive(x_21); -if (x_27 == 0) -{ -lean_object* x_28; uint8_t x_29; -x_28 = lean_ctor_get(x_21, 0); -lean_dec(x_28); -x_29 = !lean_is_exclusive(x_22); -if (x_29 == 0) -{ -lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; -x_30 = lean_ctor_get(x_22, 0); -x_31 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_31, 0, x_30); -lean_ctor_set(x_22, 0, x_31); -x_32 = lean_box(0); -x_33 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_33, 0, x_22); -lean_ctor_set(x_33, 1, x_32); -lean_ctor_set(x_21, 0, x_33); -return x_21; -} -else -{ -lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; -x_34 = lean_ctor_get(x_22, 0); -lean_inc(x_34); -lean_dec(x_22); -x_35 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_35, 0, x_34); -x_36 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_36, 0, x_35); -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); -lean_ctor_set(x_21, 0, x_38); -return x_21; -} -} -else -{ -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; -x_39 = lean_ctor_get(x_21, 1); -lean_inc(x_39); -lean_dec(x_21); -x_40 = lean_ctor_get(x_22, 0); -lean_inc(x_40); -if (lean_is_exclusive(x_22)) { - lean_ctor_release(x_22, 0); - x_41 = x_22; -} else { - lean_dec_ref(x_22); - x_41 = lean_box(0); -} -x_42 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_42, 0, x_40); -if (lean_is_scalar(x_41)) { - x_43 = lean_alloc_ctor(1, 1, 0); -} else { - x_43 = x_41; -} -lean_ctor_set(x_43, 0, x_42); -x_44 = lean_box(0); -x_45 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_45, 0, x_43); -lean_ctor_set(x_45, 1, x_44); -x_46 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_46, 0, x_45); -lean_ctor_set(x_46, 1, x_39); -return x_46; -} -} -} -else -{ -uint8_t x_47; -lean_dec(x_13); -lean_dec(x_12); -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_47 = !lean_is_exclusive(x_21); -if (x_47 == 0) -{ -return x_21; -} -else -{ -lean_object* x_48; lean_object* x_49; lean_object* x_50; -x_48 = lean_ctor_get(x_21, 0); -x_49 = lean_ctor_get(x_21, 1); -lean_inc(x_49); -lean_inc(x_48); -lean_dec(x_21); -x_50 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_50, 0, x_48); -lean_ctor_set(x_50, 1, x_49); -return x_50; -} -} -} -} -} -LEAN_EXPORT 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; size_t x_13; size_t x_14; lean_object* x_15; lean_object* x_16; -x_10 = lean_ctor_get(x_3, 1); -lean_inc(x_10); -x_11 = lean_box(0); -x_12 = lean_array_get_size(x_10); -x_13 = lean_usize_of_nat(x_12); -lean_dec(x_12); -x_14 = 0; -x_15 = l_Lean_Meta_Simp_rewrite_x3f___closed__1; -lean_inc(x_8); -lean_inc(x_7); -lean_inc(x_6); -lean_inc(x_5); -lean_inc(x_4); -lean_inc(x_3); -lean_inc(x_1); -x_16 = l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_rewritePost___spec__1(x_1, x_2, x_15, x_10, x_13, x_14, x_15, x_3, x_4, x_5, x_6, x_7, x_8, x_9); -lean_dec(x_10); -if (lean_obj_tag(x_16) == 0) -{ -lean_object* x_17; lean_object* x_18; -x_17 = lean_ctor_get(x_16, 0); -lean_inc(x_17); -x_18 = lean_ctor_get(x_17, 0); -lean_inc(x_18); -lean_dec(x_17); -if (lean_obj_tag(x_18) == 0) -{ -lean_object* x_19; lean_object* x_20; lean_object* x_21; -x_19 = lean_ctor_get(x_16, 1); -lean_inc(x_19); -lean_dec(x_16); -x_20 = lean_box(0); -x_21 = l_Lean_Meta_Simp_rewritePre___lambda__1(x_1, x_11, x_20, x_3, x_4, x_5, x_6, x_7, x_8, x_19); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -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_1); -x_22 = !lean_is_exclusive(x_16); -if (x_22 == 0) -{ -lean_object* x_23; lean_object* x_24; -x_23 = lean_ctor_get(x_16, 0); -lean_dec(x_23); -x_24 = lean_ctor_get(x_18, 0); -lean_inc(x_24); -lean_dec(x_18); -lean_ctor_set(x_16, 0, x_24); -return x_16; -} -else -{ -lean_object* x_25; lean_object* x_26; lean_object* x_27; -x_25 = lean_ctor_get(x_16, 1); -lean_inc(x_25); -lean_dec(x_16); -x_26 = lean_ctor_get(x_18, 0); -lean_inc(x_26); -lean_dec(x_18); -x_27 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_27, 0, x_26); -lean_ctor_set(x_27, 1, x_25); -return x_27; -} -} -} -else -{ -uint8_t x_28; -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_1); -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; -} -} -} -} -LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_rewritePost___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, lean_object* x_9, lean_object* x_10, lean_object* x_11, lean_object* x_12, lean_object* x_13, lean_object* x_14) { -_start: -{ -size_t x_15; size_t x_16; lean_object* x_17; -x_15 = lean_unbox_usize(x_5); -lean_dec(x_5); -x_16 = lean_unbox_usize(x_6); -lean_dec(x_6); -x_17 = l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_rewritePost___spec__1(x_1, x_2, x_3, x_4, x_15, x_16, x_7, x_8, x_9, x_10, x_11, x_12, x_13, x_14); -lean_dec(x_4); -return x_17; -} -} -LEAN_EXPORT 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_3); -x_10 = l_Lean_Meta_Simp_rewritePre(x_1, x_2, x_3, x_4, 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; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_33; uint8_t x_34; -x_12 = lean_ctor_get(x_10, 1); -lean_inc(x_12); -if (lean_is_exclusive(x_10)) { - lean_ctor_release(x_10, 0); - lean_ctor_release(x_10, 1); - x_13 = x_10; -} else { - lean_dec_ref(x_10); - x_13 = lean_box(0); -} -x_14 = lean_ctor_get(x_11, 0); -lean_inc(x_14); -x_33 = lean_ctor_get(x_3, 0); -lean_inc(x_33); -lean_dec(x_3); -x_34 = lean_ctor_get_uint8(x_33, sizeof(void*)*2 + 9); -lean_dec(x_33); -if (x_34 == 0) -{ -lean_object* x_35; -x_35 = lean_box(0); -x_15 = x_35; -x_16 = x_12; -goto block_32; -} -else -{ -lean_object* x_36; lean_object* x_37; lean_object* x_38; -x_36 = lean_ctor_get(x_14, 0); -lean_inc(x_36); -lean_inc(x_8); -lean_inc(x_7); -lean_inc(x_6); -lean_inc(x_5); -x_37 = l_Lean_Meta_Simp_rewriteUsingDecide_x3f(x_36, x_5, x_6, x_7, x_8, x_12); -x_38 = lean_ctor_get(x_37, 0); -lean_inc(x_38); -if (lean_obj_tag(x_38) == 0) -{ -lean_object* x_39; lean_object* x_40; -x_39 = lean_ctor_get(x_37, 1); -lean_inc(x_39); -lean_dec(x_37); -x_40 = lean_box(0); -x_15 = x_40; -x_16 = x_39; -goto block_32; -} -else -{ -lean_object* x_41; uint8_t x_42; -x_41 = lean_ctor_get(x_37, 1); -lean_inc(x_41); -lean_dec(x_37); -x_42 = !lean_is_exclusive(x_38); -if (x_42 == 0) -{ -lean_object* x_43; lean_object* x_44; -x_43 = lean_ctor_get(x_38, 0); -x_44 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_44, 0, x_43); -lean_ctor_set(x_38, 0, x_44); -x_15 = x_38; -x_16 = x_41; -goto block_32; -} -else -{ -lean_object* x_45; lean_object* x_46; lean_object* x_47; -x_45 = lean_ctor_get(x_38, 0); -lean_inc(x_45); -lean_dec(x_38); -x_46 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_46, 0, x_45); -x_47 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_47, 0, x_46); -x_15 = x_47; -x_16 = x_41; -goto block_32; -} -} -} -block_32: -{ -if (lean_obj_tag(x_15) == 0) -{ -lean_object* x_17; -lean_dec(x_14); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -if (lean_is_scalar(x_13)) { - x_17 = lean_alloc_ctor(0, 2, 0); -} else { - x_17 = x_13; -} -lean_ctor_set(x_17, 0, x_11); -lean_ctor_set(x_17, 1, x_16); -return x_17; -} -else -{ -lean_object* x_18; lean_object* x_19; lean_object* x_20; -lean_dec(x_13); -lean_dec(x_11); -x_18 = lean_ctor_get(x_15, 0); -lean_inc(x_18); -lean_dec(x_15); -x_19 = l_Lean_Meta_Simp_Step_result(x_18); -x_20 = l_Lean_Meta_Simp_mkEqTrans(x_14, x_19, x_5, x_6, x_7, x_8, x_16); -if (lean_obj_tag(x_20) == 0) -{ -uint8_t x_21; -x_21 = !lean_is_exclusive(x_20); -if (x_21 == 0) -{ -lean_object* x_22; lean_object* x_23; -x_22 = lean_ctor_get(x_20, 0); -x_23 = l_Lean_Meta_Simp_Step_updateResult(x_18, x_22); -lean_ctor_set(x_20, 0, x_23); -return x_20; -} -else -{ -lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; -x_24 = lean_ctor_get(x_20, 0); -x_25 = lean_ctor_get(x_20, 1); -lean_inc(x_25); -lean_inc(x_24); -lean_dec(x_20); -x_26 = l_Lean_Meta_Simp_Step_updateResult(x_18, x_24); -x_27 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_27, 0, x_26); -lean_ctor_set(x_27, 1, x_25); -return x_27; -} -} -else -{ -uint8_t x_28; -lean_dec(x_18); -x_28 = !lean_is_exclusive(x_20); -if (x_28 == 0) -{ -return x_20; -} -else -{ -lean_object* x_29; lean_object* x_30; lean_object* x_31; -x_29 = lean_ctor_get(x_20, 0); -x_30 = lean_ctor_get(x_20, 1); -lean_inc(x_30); -lean_inc(x_29); -lean_dec(x_20); -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_48; -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_3); -x_48 = !lean_is_exclusive(x_10); -if (x_48 == 0) -{ -lean_object* x_49; -x_49 = lean_ctor_get(x_10, 0); -lean_dec(x_49); -return x_10; -} -else -{ -lean_object* x_50; lean_object* x_51; -x_50 = lean_ctor_get(x_10, 1); -lean_inc(x_50); -lean_dec(x_10); -x_51 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_51, 0, x_11); -lean_ctor_set(x_51, 1, x_50); -return x_51; -} -} -} -else -{ -uint8_t x_52; -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_3); -x_52 = !lean_is_exclusive(x_10); -if (x_52 == 0) -{ -return x_10; -} -else -{ -lean_object* x_53; lean_object* x_54; lean_object* x_55; -x_53 = lean_ctor_get(x_10, 0); -x_54 = lean_ctor_get(x_10, 1); -lean_inc(x_54); -lean_inc(x_53); -lean_dec(x_10); -x_55 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_55, 0, x_53); -lean_ctor_set(x_55, 1, x_54); -return x_55; -} -} -} -} -LEAN_EXPORT 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_4); -lean_inc(x_3); -lean_inc(x_2); -x_10 = l_Lean_Meta_Simp_rewritePost(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9); -if (lean_obj_tag(x_10) == 0) -{ -lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; -x_11 = lean_ctor_get(x_10, 0); -lean_inc(x_11); -x_12 = lean_ctor_get(x_10, 1); -lean_inc(x_12); -if (lean_is_exclusive(x_10)) { - lean_ctor_release(x_10, 0); - lean_ctor_release(x_10, 1); - x_13 = x_10; -} else { - lean_dec_ref(x_10); - x_13 = lean_box(0); -} -if (lean_obj_tag(x_11) == 0) -{ -lean_object* x_116; lean_object* x_117; lean_object* x_118; -x_116 = lean_ctor_get(x_11, 0); -lean_inc(x_116); -x_117 = lean_ctor_get(x_116, 0); -lean_inc(x_117); -lean_inc(x_8); -lean_inc(x_7); -lean_inc(x_6); -lean_inc(x_5); -lean_inc(x_4); -lean_inc(x_3); -x_118 = l_Lean_Meta_Simp_simpMatch_x3f(x_2, x_117, x_3, x_4, x_5, x_6, x_7, x_8, x_12); -if (lean_obj_tag(x_118) == 0) -{ -lean_object* x_119; -x_119 = lean_ctor_get(x_118, 0); -lean_inc(x_119); -if (lean_obj_tag(x_119) == 0) -{ -lean_object* x_120; -lean_dec(x_116); -x_120 = lean_ctor_get(x_118, 1); -lean_inc(x_120); -lean_dec(x_118); -x_14 = x_11; -x_15 = x_120; -goto block_115; -} -else -{ -lean_object* x_121; lean_object* x_122; lean_object* x_123; lean_object* x_124; -lean_dec(x_11); -x_121 = lean_ctor_get(x_118, 1); -lean_inc(x_121); -lean_dec(x_118); -x_122 = lean_ctor_get(x_119, 0); -lean_inc(x_122); -lean_dec(x_119); -x_123 = l_Lean_Meta_Simp_Step_result(x_122); -lean_inc(x_8); -lean_inc(x_7); -lean_inc(x_6); -lean_inc(x_5); -x_124 = l_Lean_Meta_Simp_mkEqTrans(x_116, x_123, x_5, x_6, x_7, x_8, x_121); -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, 0); -lean_inc(x_125); -x_126 = lean_ctor_get(x_124, 1); -lean_inc(x_126); -lean_dec(x_124); -x_127 = l_Lean_Meta_Simp_Step_updateResult(x_122, x_125); -x_14 = x_127; -x_15 = x_126; -goto block_115; -} -else -{ -uint8_t x_128; -lean_dec(x_122); -lean_dec(x_13); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -x_128 = !lean_is_exclusive(x_124); -if (x_128 == 0) -{ -return x_124; -} -else -{ -lean_object* x_129; lean_object* x_130; lean_object* x_131; -x_129 = lean_ctor_get(x_124, 0); -x_130 = lean_ctor_get(x_124, 1); -lean_inc(x_130); -lean_inc(x_129); -lean_dec(x_124); -x_131 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_131, 0, x_129); -lean_ctor_set(x_131, 1, x_130); -return x_131; -} -} -} -} -else -{ -uint8_t x_132; -lean_dec(x_116); -lean_dec(x_13); -lean_dec(x_11); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -x_132 = !lean_is_exclusive(x_118); -if (x_132 == 0) -{ -return x_118; -} -else -{ -lean_object* x_133; lean_object* x_134; lean_object* x_135; -x_133 = lean_ctor_get(x_118, 0); -x_134 = lean_ctor_get(x_118, 1); -lean_inc(x_134); -lean_inc(x_133); -lean_dec(x_118); -x_135 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_135, 0, x_133); -lean_ctor_set(x_135, 1, x_134); -return x_135; -} -} -} -else -{ -lean_dec(x_2); -x_14 = x_11; -x_15 = x_12; -goto block_115; -} -block_115: -{ -lean_object* x_16; lean_object* x_17; -if (lean_obj_tag(x_14) == 0) -{ -lean_object* x_95; lean_object* x_96; lean_object* x_97; -x_95 = lean_ctor_get(x_14, 0); -lean_inc(x_95); -x_96 = lean_ctor_get(x_95, 0); -lean_inc(x_96); -lean_inc(x_8); -lean_inc(x_7); -lean_inc(x_6); -lean_inc(x_5); -lean_inc(x_3); -x_97 = l_Lean_Meta_Simp_simpArith_x3f(x_96, x_3, x_4, x_5, x_6, x_7, x_8, x_15); -if (lean_obj_tag(x_97) == 0) -{ -lean_object* x_98; -x_98 = lean_ctor_get(x_97, 0); -lean_inc(x_98); -if (lean_obj_tag(x_98) == 0) -{ -lean_object* x_99; -lean_dec(x_95); -x_99 = lean_ctor_get(x_97, 1); -lean_inc(x_99); -lean_dec(x_97); -x_16 = x_14; -x_17 = x_99; -goto block_94; -} -else -{ -lean_object* x_100; lean_object* x_101; lean_object* x_102; lean_object* x_103; -lean_dec(x_14); -x_100 = lean_ctor_get(x_97, 1); -lean_inc(x_100); -lean_dec(x_97); -x_101 = lean_ctor_get(x_98, 0); -lean_inc(x_101); -lean_dec(x_98); -x_102 = l_Lean_Meta_Simp_Step_result(x_101); -lean_inc(x_8); -lean_inc(x_7); -lean_inc(x_6); -lean_inc(x_5); -x_103 = l_Lean_Meta_Simp_mkEqTrans(x_95, x_102, x_5, x_6, x_7, x_8, x_100); -if (lean_obj_tag(x_103) == 0) -{ -lean_object* x_104; lean_object* x_105; lean_object* x_106; -x_104 = lean_ctor_get(x_103, 0); -lean_inc(x_104); -x_105 = lean_ctor_get(x_103, 1); -lean_inc(x_105); -lean_dec(x_103); -x_106 = l_Lean_Meta_Simp_Step_updateResult(x_101, x_104); -x_16 = x_106; -x_17 = x_105; -goto block_94; -} -else -{ -uint8_t x_107; -lean_dec(x_101); -lean_dec(x_13); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_3); -x_107 = !lean_is_exclusive(x_103); -if (x_107 == 0) -{ -return x_103; -} -else -{ -lean_object* x_108; lean_object* x_109; lean_object* x_110; -x_108 = lean_ctor_get(x_103, 0); -x_109 = lean_ctor_get(x_103, 1); -lean_inc(x_109); -lean_inc(x_108); -lean_dec(x_103); -x_110 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_110, 0, x_108); -lean_ctor_set(x_110, 1, x_109); -return x_110; -} -} -} -} -else -{ -uint8_t x_111; -lean_dec(x_95); -lean_dec(x_14); -lean_dec(x_13); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_3); -x_111 = !lean_is_exclusive(x_97); -if (x_111 == 0) -{ -return x_97; -} -else -{ -lean_object* x_112; lean_object* x_113; lean_object* x_114; -x_112 = lean_ctor_get(x_97, 0); -x_113 = lean_ctor_get(x_97, 1); -lean_inc(x_113); -lean_inc(x_112); -lean_dec(x_97); -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 -{ -lean_dec(x_4); -x_16 = x_14; -x_17 = x_15; -goto block_94; -} -block_94: -{ -lean_object* x_18; lean_object* x_19; -if (lean_obj_tag(x_16) == 0) -{ -lean_object* x_65; lean_object* x_66; lean_object* x_67; lean_object* x_79; uint8_t x_80; -x_65 = lean_ctor_get(x_16, 0); -lean_inc(x_65); -x_79 = lean_ctor_get(x_3, 0); -lean_inc(x_79); -lean_dec(x_3); -x_80 = lean_ctor_get_uint8(x_79, sizeof(void*)*2 + 9); -lean_dec(x_79); -if (x_80 == 0) -{ -lean_object* x_81; -x_81 = lean_box(0); -x_66 = x_81; -x_67 = x_17; -goto block_78; -} -else -{ -lean_object* x_82; lean_object* x_83; lean_object* x_84; -x_82 = lean_ctor_get(x_65, 0); -lean_inc(x_82); -lean_inc(x_8); -lean_inc(x_7); -lean_inc(x_6); -lean_inc(x_5); -x_83 = l_Lean_Meta_Simp_rewriteUsingDecide_x3f(x_82, x_5, x_6, x_7, x_8, x_17); -x_84 = lean_ctor_get(x_83, 0); -lean_inc(x_84); -if (lean_obj_tag(x_84) == 0) -{ -lean_object* x_85; lean_object* x_86; -x_85 = lean_ctor_get(x_83, 1); -lean_inc(x_85); -lean_dec(x_83); -x_86 = lean_box(0); -x_66 = x_86; -x_67 = x_85; -goto block_78; -} -else -{ -lean_object* x_87; uint8_t x_88; -x_87 = lean_ctor_get(x_83, 1); -lean_inc(x_87); -lean_dec(x_83); -x_88 = !lean_is_exclusive(x_84); -if (x_88 == 0) -{ -lean_object* x_89; lean_object* x_90; -x_89 = lean_ctor_get(x_84, 0); -x_90 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_90, 0, x_89); -lean_ctor_set(x_84, 0, x_90); -x_66 = x_84; -x_67 = x_87; -goto block_78; -} -else -{ -lean_object* x_91; lean_object* x_92; lean_object* x_93; -x_91 = lean_ctor_get(x_84, 0); -lean_inc(x_91); -lean_dec(x_84); -x_92 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_92, 0, x_91); -x_93 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_93, 0, x_92); -x_66 = x_93; -x_67 = x_87; -goto block_78; -} -} -} -block_78: -{ -if (lean_obj_tag(x_66) == 0) -{ -lean_dec(x_65); -x_18 = x_16; -x_19 = x_67; -goto block_64; -} -else -{ -lean_object* x_68; lean_object* x_69; lean_object* x_70; -lean_dec(x_16); -x_68 = lean_ctor_get(x_66, 0); -lean_inc(x_68); -lean_dec(x_66); -x_69 = l_Lean_Meta_Simp_Step_result(x_68); -lean_inc(x_8); -lean_inc(x_7); -lean_inc(x_6); -lean_inc(x_5); -x_70 = l_Lean_Meta_Simp_mkEqTrans(x_65, x_69, x_5, x_6, x_7, x_8, x_67); -if (lean_obj_tag(x_70) == 0) -{ -lean_object* x_71; lean_object* x_72; lean_object* x_73; -x_71 = lean_ctor_get(x_70, 0); -lean_inc(x_71); -x_72 = lean_ctor_get(x_70, 1); -lean_inc(x_72); -lean_dec(x_70); -x_73 = l_Lean_Meta_Simp_Step_updateResult(x_68, x_71); -x_18 = x_73; -x_19 = x_72; -goto block_64; -} -else -{ -uint8_t x_74; -lean_dec(x_68); -lean_dec(x_13); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -x_74 = !lean_is_exclusive(x_70); -if (x_74 == 0) -{ -return x_70; -} -else -{ -lean_object* x_75; lean_object* x_76; lean_object* x_77; -x_75 = lean_ctor_get(x_70, 0); -x_76 = lean_ctor_get(x_70, 1); -lean_inc(x_76); -lean_inc(x_75); -lean_dec(x_70); -x_77 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_77, 0, x_75); -lean_ctor_set(x_77, 1, x_76); -return x_77; -} -} -} -} -} -else -{ -lean_dec(x_3); -x_18 = x_16; -x_19 = x_17; -goto block_64; -} -block_64: -{ -if (lean_obj_tag(x_18) == 0) -{ -lean_object* x_20; lean_object* x_21; lean_object* x_22; -lean_dec(x_13); -x_20 = lean_ctor_get(x_18, 0); -lean_inc(x_20); -x_21 = lean_ctor_get(x_20, 0); -lean_inc(x_21); -lean_inc(x_8); -lean_inc(x_7); -lean_inc(x_6); -lean_inc(x_5); -x_22 = l_Lean_Meta_Simp_rewriteCtorEq_x3f(x_21, x_5, x_6, x_7, x_8, x_19); +x_22 = l_Lean_Meta_Simp_rewrite_x3f(x_1, x_19, x_20, x_2, x_21, x_3, x_9, x_10, x_11, x_12, x_13, x_14, x_15); if (lean_obj_tag(x_22) == 0) { lean_object* x_23; @@ -13889,214 +12981,459 @@ x_23 = lean_ctor_get(x_22, 0); lean_inc(x_23); if (lean_obj_tag(x_23) == 0) { -uint8_t x_24; -lean_dec(x_20); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -x_24 = !lean_is_exclusive(x_22); -if (x_24 == 0) -{ -lean_object* x_25; -x_25 = lean_ctor_get(x_22, 0); -lean_dec(x_25); -lean_ctor_set(x_22, 0, x_18); -return x_22; -} -else -{ -lean_object* x_26; lean_object* x_27; -x_26 = lean_ctor_get(x_22, 1); -lean_inc(x_26); +lean_object* x_24; size_t x_25; size_t x_26; +x_24 = lean_ctor_get(x_22, 1); +lean_inc(x_24); lean_dec(x_22); -x_27 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_27, 0, x_18); -lean_ctor_set(x_27, 1, x_26); -return x_27; +x_25 = 1; +x_26 = lean_usize_add(x_7, x_25); +lean_inc(x_4); +{ +size_t _tmp_6 = x_26; +lean_object* _tmp_7 = x_4; +lean_object* _tmp_14 = x_24; +x_7 = _tmp_6; +x_8 = _tmp_7; +x_15 = _tmp_14; } +goto _start; } else { uint8_t x_28; -x_28 = !lean_is_exclusive(x_18); +lean_dec(x_14); +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_4); +lean_dec(x_2); +lean_dec(x_1); +x_28 = !lean_is_exclusive(x_22); if (x_28 == 0) { -lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; -x_29 = lean_ctor_get(x_18, 0); +lean_object* x_29; uint8_t x_30; +x_29 = lean_ctor_get(x_22, 0); lean_dec(x_29); -x_30 = lean_ctor_get(x_22, 1); -lean_inc(x_30); -lean_dec(x_22); +x_30 = !lean_is_exclusive(x_23); +if (x_30 == 0) +{ +lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; x_31 = lean_ctor_get(x_23, 0); -lean_inc(x_31); +x_32 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_32, 0, x_31); +lean_ctor_set(x_23, 0, x_32); +x_33 = lean_box(0); +x_34 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_34, 0, x_23); +lean_ctor_set(x_34, 1, x_33); +lean_ctor_set(x_22, 0, x_34); +return x_22; +} +else +{ +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_23, 0); +lean_inc(x_35); lean_dec(x_23); -lean_ctor_set_tag(x_18, 1); -lean_ctor_set(x_18, 0, x_31); -x_32 = l_Lean_Meta_Simp_Step_result(x_18); -x_33 = l_Lean_Meta_Simp_mkEqTrans(x_20, x_32, x_5, x_6, x_7, x_8, x_30); -if (lean_obj_tag(x_33) == 0) -{ -uint8_t x_34; -x_34 = !lean_is_exclusive(x_33); -if (x_34 == 0) -{ -lean_object* x_35; lean_object* x_36; -x_35 = lean_ctor_get(x_33, 0); -x_36 = l_Lean_Meta_Simp_Step_updateResult(x_18, x_35); -lean_ctor_set(x_33, 0, x_36); -return x_33; -} -else -{ -lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; -x_37 = lean_ctor_get(x_33, 0); -x_38 = lean_ctor_get(x_33, 1); -lean_inc(x_38); -lean_inc(x_37); -lean_dec(x_33); -x_39 = l_Lean_Meta_Simp_Step_updateResult(x_18, x_37); -x_40 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_40, 0, x_39); -lean_ctor_set(x_40, 1, x_38); -return x_40; +x_36 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_36, 0, x_35); +x_37 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_37, 0, x_36); +x_38 = lean_box(0); +x_39 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_39, 0, x_37); +lean_ctor_set(x_39, 1, x_38); +lean_ctor_set(x_22, 0, x_39); +return x_22; } } else { -uint8_t x_41; -lean_dec(x_18); -x_41 = !lean_is_exclusive(x_33); -if (x_41 == 0) -{ -return x_33; -} -else -{ -lean_object* x_42; lean_object* x_43; lean_object* x_44; -x_42 = lean_ctor_get(x_33, 0); -x_43 = lean_ctor_get(x_33, 1); -lean_inc(x_43); -lean_inc(x_42); -lean_dec(x_33); -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; lean_object* x_49; -lean_dec(x_18); -x_45 = lean_ctor_get(x_22, 1); -lean_inc(x_45); +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_40 = lean_ctor_get(x_22, 1); +lean_inc(x_40); lean_dec(x_22); -x_46 = lean_ctor_get(x_23, 0); -lean_inc(x_46); -lean_dec(x_23); -x_47 = lean_alloc_ctor(1, 1, 0); +x_41 = lean_ctor_get(x_23, 0); +lean_inc(x_41); +if (lean_is_exclusive(x_23)) { + lean_ctor_release(x_23, 0); + x_42 = x_23; +} else { + lean_dec_ref(x_23); + x_42 = lean_box(0); +} +x_43 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_43, 0, x_41); +if (lean_is_scalar(x_42)) { + x_44 = lean_alloc_ctor(1, 1, 0); +} else { + x_44 = x_42; +} +lean_ctor_set(x_44, 0, x_43); +x_45 = lean_box(0); +x_46 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_46, 0, x_44); +lean_ctor_set(x_46, 1, x_45); +x_47 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_47, 0, x_46); -x_48 = l_Lean_Meta_Simp_Step_result(x_47); -x_49 = l_Lean_Meta_Simp_mkEqTrans(x_20, x_48, x_5, x_6, x_7, x_8, x_45); -if (lean_obj_tag(x_49) == 0) -{ -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_49, 0); -lean_inc(x_50); -x_51 = lean_ctor_get(x_49, 1); -lean_inc(x_51); -if (lean_is_exclusive(x_49)) { - lean_ctor_release(x_49, 0); - lean_ctor_release(x_49, 1); - x_52 = x_49; -} else { - lean_dec_ref(x_49); - x_52 = lean_box(0); -} -x_53 = l_Lean_Meta_Simp_Step_updateResult(x_47, x_50); -if (lean_is_scalar(x_52)) { - x_54 = lean_alloc_ctor(0, 2, 0); -} else { - x_54 = x_52; -} -lean_ctor_set(x_54, 0, x_53); -lean_ctor_set(x_54, 1, x_51); -return x_54; -} -else -{ -lean_object* x_55; lean_object* x_56; lean_object* x_57; lean_object* x_58; -lean_dec(x_47); -x_55 = lean_ctor_get(x_49, 0); -lean_inc(x_55); -x_56 = lean_ctor_get(x_49, 1); -lean_inc(x_56); -if (lean_is_exclusive(x_49)) { - lean_ctor_release(x_49, 0); - lean_ctor_release(x_49, 1); - x_57 = x_49; -} else { - lean_dec_ref(x_49); - x_57 = lean_box(0); -} -if (lean_is_scalar(x_57)) { - x_58 = lean_alloc_ctor(1, 2, 0); -} else { - x_58 = x_57; -} -lean_ctor_set(x_58, 0, x_55); -lean_ctor_set(x_58, 1, x_56); -return x_58; -} +lean_ctor_set(x_47, 1, x_40); +return x_47; } } } else { -uint8_t x_59; -lean_dec(x_20); -lean_dec(x_18); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -x_59 = !lean_is_exclusive(x_22); -if (x_59 == 0) +uint8_t x_48; +lean_dec(x_14); +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_4); +lean_dec(x_2); +lean_dec(x_1); +x_48 = !lean_is_exclusive(x_22); +if (x_48 == 0) { return x_22; } else { -lean_object* x_60; lean_object* x_61; lean_object* x_62; -x_60 = lean_ctor_get(x_22, 0); -x_61 = lean_ctor_get(x_22, 1); -lean_inc(x_61); -lean_inc(x_60); +lean_object* x_49; lean_object* x_50; lean_object* x_51; +x_49 = lean_ctor_get(x_22, 0); +x_50 = lean_ctor_get(x_22, 1); +lean_inc(x_50); +lean_inc(x_49); lean_dec(x_22); -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; +x_51 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_51, 0, x_49); +lean_ctor_set(x_51, 1, x_50); +return x_51; } } } -else +} +} +LEAN_EXPORT lean_object* l_Lean_Meta_Simp_rewritePost(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* x_9, lean_object* x_10) { +_start: { -lean_object* x_63; +lean_object* x_11; lean_object* x_12; lean_object* x_13; size_t x_14; size_t x_15; lean_object* x_16; lean_object* x_17; +x_11 = lean_ctor_get(x_4, 1); +lean_inc(x_11); +x_12 = lean_box(0); +x_13 = lean_array_get_size(x_11); +x_14 = lean_usize_of_nat(x_13); +lean_dec(x_13); +x_15 = 0; +x_16 = l_Lean_Meta_Simp_rewrite_x3f___closed__1; +lean_inc(x_9); +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_6); +lean_inc(x_5); +lean_inc(x_4); +lean_inc(x_1); +x_17 = l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_rewritePost___spec__1(x_1, x_2, x_3, x_16, x_11, x_14, x_15, x_16, x_4, x_5, x_6, x_7, x_8, x_9, x_10); +lean_dec(x_11); +if (lean_obj_tag(x_17) == 0) +{ +lean_object* x_18; lean_object* x_19; +x_18 = lean_ctor_get(x_17, 0); +lean_inc(x_18); +x_19 = lean_ctor_get(x_18, 0); +lean_inc(x_19); +lean_dec(x_18); +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_17, 1); +lean_inc(x_20); +lean_dec(x_17); +x_21 = lean_box(0); +x_22 = l_Lean_Meta_Simp_rewritePre___lambda__1(x_1, x_12, x_21, x_4, x_5, x_6, x_7, x_8, x_9, x_20); +lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); -if (lean_is_scalar(x_13)) { - x_63 = lean_alloc_ctor(0, 2, 0); -} else { - x_63 = x_13; +lean_dec(x_4); +return x_22; } -lean_ctor_set(x_63, 0, x_18); -lean_ctor_set(x_63, 1, x_19); -return x_63; +else +{ +uint8_t x_23; +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_1); +x_23 = !lean_is_exclusive(x_17); +if (x_23 == 0) +{ +lean_object* x_24; lean_object* x_25; +x_24 = lean_ctor_get(x_17, 0); +lean_dec(x_24); +x_25 = lean_ctor_get(x_19, 0); +lean_inc(x_25); +lean_dec(x_19); +lean_ctor_set(x_17, 0, x_25); +return x_17; +} +else +{ +lean_object* x_26; lean_object* x_27; lean_object* x_28; +x_26 = lean_ctor_get(x_17, 1); +lean_inc(x_26); +lean_dec(x_17); +x_27 = lean_ctor_get(x_19, 0); +lean_inc(x_27); +lean_dec(x_19); +x_28 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_28, 0, x_27); +lean_ctor_set(x_28, 1, x_26); +return x_28; +} +} +} +else +{ +uint8_t x_29; +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_1); +x_29 = !lean_is_exclusive(x_17); +if (x_29 == 0) +{ +return x_17; +} +else +{ +lean_object* x_30; lean_object* x_31; lean_object* x_32; +x_30 = lean_ctor_get(x_17, 0); +x_31 = lean_ctor_get(x_17, 1); +lean_inc(x_31); +lean_inc(x_30); +lean_dec(x_17); +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; +} +} +} +} +LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_rewritePost___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, 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) { +_start: +{ +uint8_t x_16; size_t x_17; size_t x_18; lean_object* x_19; +x_16 = lean_unbox(x_3); +lean_dec(x_3); +x_17 = lean_unbox_usize(x_6); +lean_dec(x_6); +x_18 = lean_unbox_usize(x_7); +lean_dec(x_7); +x_19 = l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_rewritePost___spec__1(x_1, x_2, x_16, x_4, x_5, x_17, x_18, x_8, x_9, x_10, x_11, x_12, x_13, x_14, x_15); +lean_dec(x_5); +return x_19; +} +} +LEAN_EXPORT lean_object* l_Lean_Meta_Simp_rewritePost___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* x_9, lean_object* x_10) { +_start: +{ +uint8_t x_11; lean_object* x_12; +x_11 = lean_unbox(x_3); +lean_dec(x_3); +x_12 = l_Lean_Meta_Simp_rewritePost(x_1, x_2, x_11, x_4, x_5, x_6, x_7, x_8, x_9, x_10); +return x_12; +} +} +LEAN_EXPORT 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: +{ +uint8_t x_10; lean_object* x_11; +x_10 = 0; +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_6); +lean_inc(x_5); +lean_inc(x_3); +x_11 = l_Lean_Meta_Simp_rewritePre(x_1, x_2, x_10, x_3, x_4, x_5, x_6, x_7, x_8, x_9); +if (lean_obj_tag(x_11) == 0) +{ +lean_object* x_12; +x_12 = lean_ctor_get(x_11, 0); +lean_inc(x_12); +if (lean_obj_tag(x_12) == 0) +{ +lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_34; uint8_t x_35; +x_13 = lean_ctor_get(x_11, 1); +lean_inc(x_13); +if (lean_is_exclusive(x_11)) { + lean_ctor_release(x_11, 0); + lean_ctor_release(x_11, 1); + x_14 = x_11; +} else { + lean_dec_ref(x_11); + x_14 = lean_box(0); +} +x_15 = lean_ctor_get(x_12, 0); +lean_inc(x_15); +x_34 = lean_ctor_get(x_3, 0); +lean_inc(x_34); +lean_dec(x_3); +x_35 = lean_ctor_get_uint8(x_34, sizeof(void*)*2 + 9); +lean_dec(x_34); +if (x_35 == 0) +{ +lean_object* x_36; +x_36 = lean_box(0); +x_16 = x_36; +x_17 = x_13; +goto block_33; +} +else +{ +lean_object* x_37; lean_object* x_38; lean_object* x_39; +x_37 = lean_ctor_get(x_15, 0); +lean_inc(x_37); +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_6); +lean_inc(x_5); +x_38 = l_Lean_Meta_Simp_rewriteUsingDecide_x3f(x_37, x_5, x_6, x_7, x_8, x_13); +x_39 = lean_ctor_get(x_38, 0); +lean_inc(x_39); +if (lean_obj_tag(x_39) == 0) +{ +lean_object* x_40; lean_object* x_41; +x_40 = lean_ctor_get(x_38, 1); +lean_inc(x_40); +lean_dec(x_38); +x_41 = lean_box(0); +x_16 = x_41; +x_17 = x_40; +goto block_33; +} +else +{ +lean_object* x_42; uint8_t x_43; +x_42 = lean_ctor_get(x_38, 1); +lean_inc(x_42); +lean_dec(x_38); +x_43 = !lean_is_exclusive(x_39); +if (x_43 == 0) +{ +lean_object* x_44; lean_object* x_45; +x_44 = lean_ctor_get(x_39, 0); +x_45 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_45, 0, x_44); +lean_ctor_set(x_39, 0, x_45); +x_16 = x_39; +x_17 = x_42; +goto block_33; +} +else +{ +lean_object* x_46; lean_object* x_47; lean_object* x_48; +x_46 = lean_ctor_get(x_39, 0); +lean_inc(x_46); +lean_dec(x_39); +x_47 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_47, 0, x_46); +x_48 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_48, 0, x_47); +x_16 = x_48; +x_17 = x_42; +goto block_33; +} +} +} +block_33: +{ +if (lean_obj_tag(x_16) == 0) +{ +lean_object* x_18; +lean_dec(x_15); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +if (lean_is_scalar(x_14)) { + x_18 = lean_alloc_ctor(0, 2, 0); +} else { + x_18 = x_14; +} +lean_ctor_set(x_18, 0, x_12); +lean_ctor_set(x_18, 1, x_17); +return x_18; +} +else +{ +lean_object* x_19; lean_object* x_20; lean_object* x_21; +lean_dec(x_14); +lean_dec(x_12); +x_19 = lean_ctor_get(x_16, 0); +lean_inc(x_19); +lean_dec(x_16); +x_20 = l_Lean_Meta_Simp_Step_result(x_19); +x_21 = l_Lean_Meta_Simp_mkEqTrans(x_15, x_20, x_5, x_6, x_7, x_8, x_17); +if (lean_obj_tag(x_21) == 0) +{ +uint8_t x_22; +x_22 = !lean_is_exclusive(x_21); +if (x_22 == 0) +{ +lean_object* x_23; lean_object* x_24; +x_23 = lean_ctor_get(x_21, 0); +x_24 = l_Lean_Meta_Simp_Step_updateResult(x_19, x_23); +lean_ctor_set(x_21, 0, x_24); +return x_21; +} +else +{ +lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; +x_25 = lean_ctor_get(x_21, 0); +x_26 = lean_ctor_get(x_21, 1); +lean_inc(x_26); +lean_inc(x_25); +lean_dec(x_21); +x_27 = l_Lean_Meta_Simp_Step_updateResult(x_19, x_25); +x_28 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_28, 0, x_27); +lean_ctor_set(x_28, 1, x_26); +return x_28; +} +} +else +{ +uint8_t x_29; +lean_dec(x_19); +x_29 = !lean_is_exclusive(x_21); +if (x_29 == 0) +{ +return x_21; +} +else +{ +lean_object* x_30; lean_object* x_31; lean_object* x_32; +x_30 = lean_ctor_get(x_21, 0); +x_31 = lean_ctor_get(x_21, 1); +lean_inc(x_31); +lean_inc(x_30); +lean_dec(x_21); +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; } } } @@ -14104,7 +13441,739 @@ return x_63; } else { -uint8_t x_136; +uint8_t x_49; +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_3); +x_49 = !lean_is_exclusive(x_11); +if (x_49 == 0) +{ +lean_object* x_50; +x_50 = lean_ctor_get(x_11, 0); +lean_dec(x_50); +return x_11; +} +else +{ +lean_object* x_51; lean_object* x_52; +x_51 = lean_ctor_get(x_11, 1); +lean_inc(x_51); +lean_dec(x_11); +x_52 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_52, 0, x_12); +lean_ctor_set(x_52, 1, x_51); +return x_52; +} +} +} +else +{ +uint8_t x_53; +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_3); +x_53 = !lean_is_exclusive(x_11); +if (x_53 == 0) +{ +return x_11; +} +else +{ +lean_object* x_54; lean_object* x_55; lean_object* x_56; +x_54 = lean_ctor_get(x_11, 0); +x_55 = lean_ctor_get(x_11, 1); +lean_inc(x_55); +lean_inc(x_54); +lean_dec(x_11); +x_56 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_56, 0, x_54); +lean_ctor_set(x_56, 1, x_55); +return x_56; +} +} +} +} +LEAN_EXPORT 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: +{ +uint8_t x_10; lean_object* x_11; +x_10 = 0; +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_6); +lean_inc(x_5); +lean_inc(x_4); +lean_inc(x_3); +lean_inc(x_2); +x_11 = l_Lean_Meta_Simp_rewritePost(x_1, x_2, x_10, x_3, x_4, x_5, x_6, x_7, x_8, x_9); +if (lean_obj_tag(x_11) == 0) +{ +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_11, 0); +lean_inc(x_12); +x_13 = lean_ctor_get(x_11, 1); +lean_inc(x_13); +if (lean_is_exclusive(x_11)) { + lean_ctor_release(x_11, 0); + lean_ctor_release(x_11, 1); + x_14 = x_11; +} else { + lean_dec_ref(x_11); + x_14 = lean_box(0); +} +if (lean_obj_tag(x_12) == 0) +{ +lean_object* x_117; lean_object* x_118; lean_object* x_119; +x_117 = lean_ctor_get(x_12, 0); +lean_inc(x_117); +x_118 = lean_ctor_get(x_117, 0); +lean_inc(x_118); +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_6); +lean_inc(x_5); +lean_inc(x_4); +lean_inc(x_3); +x_119 = l_Lean_Meta_Simp_simpMatch_x3f(x_2, x_118, x_3, x_4, x_5, x_6, x_7, x_8, x_13); +if (lean_obj_tag(x_119) == 0) +{ +lean_object* x_120; +x_120 = lean_ctor_get(x_119, 0); +lean_inc(x_120); +if (lean_obj_tag(x_120) == 0) +{ +lean_object* x_121; +lean_dec(x_117); +x_121 = lean_ctor_get(x_119, 1); +lean_inc(x_121); +lean_dec(x_119); +x_15 = x_12; +x_16 = x_121; +goto block_116; +} +else +{ +lean_object* x_122; lean_object* x_123; lean_object* x_124; lean_object* x_125; +lean_dec(x_12); +x_122 = lean_ctor_get(x_119, 1); +lean_inc(x_122); +lean_dec(x_119); +x_123 = lean_ctor_get(x_120, 0); +lean_inc(x_123); +lean_dec(x_120); +x_124 = l_Lean_Meta_Simp_Step_result(x_123); +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_6); +lean_inc(x_5); +x_125 = l_Lean_Meta_Simp_mkEqTrans(x_117, x_124, x_5, x_6, x_7, x_8, x_122); +if (lean_obj_tag(x_125) == 0) +{ +lean_object* x_126; lean_object* x_127; lean_object* x_128; +x_126 = lean_ctor_get(x_125, 0); +lean_inc(x_126); +x_127 = lean_ctor_get(x_125, 1); +lean_inc(x_127); +lean_dec(x_125); +x_128 = l_Lean_Meta_Simp_Step_updateResult(x_123, x_126); +x_15 = x_128; +x_16 = x_127; +goto block_116; +} +else +{ +uint8_t x_129; +lean_dec(x_123); +lean_dec(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); +x_129 = !lean_is_exclusive(x_125); +if (x_129 == 0) +{ +return x_125; +} +else +{ +lean_object* x_130; lean_object* x_131; lean_object* x_132; +x_130 = lean_ctor_get(x_125, 0); +x_131 = lean_ctor_get(x_125, 1); +lean_inc(x_131); +lean_inc(x_130); +lean_dec(x_125); +x_132 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_132, 0, x_130); +lean_ctor_set(x_132, 1, x_131); +return x_132; +} +} +} +} +else +{ +uint8_t x_133; +lean_dec(x_117); +lean_dec(x_14); +lean_dec(x_12); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +x_133 = !lean_is_exclusive(x_119); +if (x_133 == 0) +{ +return x_119; +} +else +{ +lean_object* x_134; lean_object* x_135; lean_object* x_136; +x_134 = lean_ctor_get(x_119, 0); +x_135 = lean_ctor_get(x_119, 1); +lean_inc(x_135); +lean_inc(x_134); +lean_dec(x_119); +x_136 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_136, 0, x_134); +lean_ctor_set(x_136, 1, x_135); +return x_136; +} +} +} +else +{ +lean_dec(x_2); +x_15 = x_12; +x_16 = x_13; +goto block_116; +} +block_116: +{ +lean_object* x_17; lean_object* x_18; +if (lean_obj_tag(x_15) == 0) +{ +lean_object* x_96; lean_object* x_97; lean_object* x_98; +x_96 = lean_ctor_get(x_15, 0); +lean_inc(x_96); +x_97 = lean_ctor_get(x_96, 0); +lean_inc(x_97); +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_6); +lean_inc(x_5); +lean_inc(x_3); +x_98 = l_Lean_Meta_Simp_simpArith_x3f(x_97, x_3, x_4, x_5, x_6, x_7, x_8, x_16); +if (lean_obj_tag(x_98) == 0) +{ +lean_object* x_99; +x_99 = lean_ctor_get(x_98, 0); +lean_inc(x_99); +if (lean_obj_tag(x_99) == 0) +{ +lean_object* x_100; +lean_dec(x_96); +x_100 = lean_ctor_get(x_98, 1); +lean_inc(x_100); +lean_dec(x_98); +x_17 = x_15; +x_18 = x_100; +goto block_95; +} +else +{ +lean_object* x_101; lean_object* x_102; lean_object* x_103; lean_object* x_104; +lean_dec(x_15); +x_101 = lean_ctor_get(x_98, 1); +lean_inc(x_101); +lean_dec(x_98); +x_102 = lean_ctor_get(x_99, 0); +lean_inc(x_102); +lean_dec(x_99); +x_103 = l_Lean_Meta_Simp_Step_result(x_102); +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_6); +lean_inc(x_5); +x_104 = l_Lean_Meta_Simp_mkEqTrans(x_96, x_103, x_5, x_6, x_7, x_8, x_101); +if (lean_obj_tag(x_104) == 0) +{ +lean_object* x_105; lean_object* x_106; lean_object* x_107; +x_105 = lean_ctor_get(x_104, 0); +lean_inc(x_105); +x_106 = lean_ctor_get(x_104, 1); +lean_inc(x_106); +lean_dec(x_104); +x_107 = l_Lean_Meta_Simp_Step_updateResult(x_102, x_105); +x_17 = x_107; +x_18 = x_106; +goto block_95; +} +else +{ +uint8_t x_108; +lean_dec(x_102); +lean_dec(x_14); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_3); +x_108 = !lean_is_exclusive(x_104); +if (x_108 == 0) +{ +return x_104; +} +else +{ +lean_object* x_109; lean_object* x_110; lean_object* x_111; +x_109 = lean_ctor_get(x_104, 0); +x_110 = lean_ctor_get(x_104, 1); +lean_inc(x_110); +lean_inc(x_109); +lean_dec(x_104); +x_111 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_111, 0, x_109); +lean_ctor_set(x_111, 1, x_110); +return x_111; +} +} +} +} +else +{ +uint8_t x_112; +lean_dec(x_96); +lean_dec(x_15); +lean_dec(x_14); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_3); +x_112 = !lean_is_exclusive(x_98); +if (x_112 == 0) +{ +return x_98; +} +else +{ +lean_object* x_113; lean_object* x_114; lean_object* x_115; +x_113 = lean_ctor_get(x_98, 0); +x_114 = lean_ctor_get(x_98, 1); +lean_inc(x_114); +lean_inc(x_113); +lean_dec(x_98); +x_115 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_115, 0, x_113); +lean_ctor_set(x_115, 1, x_114); +return x_115; +} +} +} +else +{ +lean_dec(x_4); +x_17 = x_15; +x_18 = x_16; +goto block_95; +} +block_95: +{ +lean_object* x_19; lean_object* x_20; +if (lean_obj_tag(x_17) == 0) +{ +lean_object* x_66; lean_object* x_67; lean_object* x_68; lean_object* x_80; uint8_t x_81; +x_66 = lean_ctor_get(x_17, 0); +lean_inc(x_66); +x_80 = lean_ctor_get(x_3, 0); +lean_inc(x_80); +lean_dec(x_3); +x_81 = lean_ctor_get_uint8(x_80, sizeof(void*)*2 + 9); +lean_dec(x_80); +if (x_81 == 0) +{ +lean_object* x_82; +x_82 = lean_box(0); +x_67 = x_82; +x_68 = x_18; +goto block_79; +} +else +{ +lean_object* x_83; lean_object* x_84; lean_object* x_85; +x_83 = lean_ctor_get(x_66, 0); +lean_inc(x_83); +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_6); +lean_inc(x_5); +x_84 = l_Lean_Meta_Simp_rewriteUsingDecide_x3f(x_83, x_5, x_6, x_7, x_8, x_18); +x_85 = lean_ctor_get(x_84, 0); +lean_inc(x_85); +if (lean_obj_tag(x_85) == 0) +{ +lean_object* x_86; lean_object* x_87; +x_86 = lean_ctor_get(x_84, 1); +lean_inc(x_86); +lean_dec(x_84); +x_87 = lean_box(0); +x_67 = x_87; +x_68 = x_86; +goto block_79; +} +else +{ +lean_object* x_88; uint8_t x_89; +x_88 = lean_ctor_get(x_84, 1); +lean_inc(x_88); +lean_dec(x_84); +x_89 = !lean_is_exclusive(x_85); +if (x_89 == 0) +{ +lean_object* x_90; lean_object* x_91; +x_90 = lean_ctor_get(x_85, 0); +x_91 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_91, 0, x_90); +lean_ctor_set(x_85, 0, x_91); +x_67 = x_85; +x_68 = x_88; +goto block_79; +} +else +{ +lean_object* x_92; lean_object* x_93; lean_object* x_94; +x_92 = lean_ctor_get(x_85, 0); +lean_inc(x_92); +lean_dec(x_85); +x_93 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_93, 0, x_92); +x_94 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_94, 0, x_93); +x_67 = x_94; +x_68 = x_88; +goto block_79; +} +} +} +block_79: +{ +if (lean_obj_tag(x_67) == 0) +{ +lean_dec(x_66); +x_19 = x_17; +x_20 = x_68; +goto block_65; +} +else +{ +lean_object* x_69; lean_object* x_70; lean_object* x_71; +lean_dec(x_17); +x_69 = lean_ctor_get(x_67, 0); +lean_inc(x_69); +lean_dec(x_67); +x_70 = l_Lean_Meta_Simp_Step_result(x_69); +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_6); +lean_inc(x_5); +x_71 = l_Lean_Meta_Simp_mkEqTrans(x_66, x_70, x_5, x_6, x_7, x_8, x_68); +if (lean_obj_tag(x_71) == 0) +{ +lean_object* x_72; lean_object* x_73; lean_object* x_74; +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 = l_Lean_Meta_Simp_Step_updateResult(x_69, x_72); +x_19 = x_74; +x_20 = x_73; +goto block_65; +} +else +{ +uint8_t x_75; +lean_dec(x_69); +lean_dec(x_14); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +x_75 = !lean_is_exclusive(x_71); +if (x_75 == 0) +{ +return x_71; +} +else +{ +lean_object* x_76; lean_object* x_77; lean_object* x_78; +x_76 = lean_ctor_get(x_71, 0); +x_77 = lean_ctor_get(x_71, 1); +lean_inc(x_77); +lean_inc(x_76); +lean_dec(x_71); +x_78 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_78, 0, x_76); +lean_ctor_set(x_78, 1, x_77); +return x_78; +} +} +} +} +} +else +{ +lean_dec(x_3); +x_19 = x_17; +x_20 = x_18; +goto block_65; +} +block_65: +{ +if (lean_obj_tag(x_19) == 0) +{ +lean_object* x_21; lean_object* x_22; lean_object* x_23; +lean_dec(x_14); +x_21 = lean_ctor_get(x_19, 0); +lean_inc(x_21); +x_22 = lean_ctor_get(x_21, 0); +lean_inc(x_22); +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_6); +lean_inc(x_5); +x_23 = l_Lean_Meta_Simp_rewriteCtorEq_x3f(x_22, x_5, x_6, x_7, x_8, x_20); +if (lean_obj_tag(x_23) == 0) +{ +lean_object* x_24; +x_24 = lean_ctor_get(x_23, 0); +lean_inc(x_24); +if (lean_obj_tag(x_24) == 0) +{ +uint8_t x_25; +lean_dec(x_21); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +x_25 = !lean_is_exclusive(x_23); +if (x_25 == 0) +{ +lean_object* x_26; +x_26 = lean_ctor_get(x_23, 0); +lean_dec(x_26); +lean_ctor_set(x_23, 0, x_19); +return x_23; +} +else +{ +lean_object* x_27; lean_object* x_28; +x_27 = lean_ctor_get(x_23, 1); +lean_inc(x_27); +lean_dec(x_23); +x_28 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_28, 0, x_19); +lean_ctor_set(x_28, 1, x_27); +return x_28; +} +} +else +{ +uint8_t x_29; +x_29 = !lean_is_exclusive(x_19); +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_19, 0); +lean_dec(x_30); +x_31 = lean_ctor_get(x_23, 1); +lean_inc(x_31); +lean_dec(x_23); +x_32 = lean_ctor_get(x_24, 0); +lean_inc(x_32); +lean_dec(x_24); +lean_ctor_set_tag(x_19, 1); +lean_ctor_set(x_19, 0, x_32); +x_33 = l_Lean_Meta_Simp_Step_result(x_19); +x_34 = l_Lean_Meta_Simp_mkEqTrans(x_21, x_33, x_5, x_6, x_7, x_8, x_31); +if (lean_obj_tag(x_34) == 0) +{ +uint8_t x_35; +x_35 = !lean_is_exclusive(x_34); +if (x_35 == 0) +{ +lean_object* x_36; lean_object* x_37; +x_36 = lean_ctor_get(x_34, 0); +x_37 = l_Lean_Meta_Simp_Step_updateResult(x_19, x_36); +lean_ctor_set(x_34, 0, x_37); +return x_34; +} +else +{ +lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; +x_38 = lean_ctor_get(x_34, 0); +x_39 = lean_ctor_get(x_34, 1); +lean_inc(x_39); +lean_inc(x_38); +lean_dec(x_34); +x_40 = l_Lean_Meta_Simp_Step_updateResult(x_19, x_38); +x_41 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_41, 0, x_40); +lean_ctor_set(x_41, 1, x_39); +return x_41; +} +} +else +{ +uint8_t x_42; +lean_dec(x_19); +x_42 = !lean_is_exclusive(x_34); +if (x_42 == 0) +{ +return x_34; +} +else +{ +lean_object* x_43; lean_object* x_44; lean_object* x_45; +x_43 = lean_ctor_get(x_34, 0); +x_44 = lean_ctor_get(x_34, 1); +lean_inc(x_44); +lean_inc(x_43); +lean_dec(x_34); +x_45 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_45, 0, x_43); +lean_ctor_set(x_45, 1, x_44); +return x_45; +} +} +} +else +{ +lean_object* x_46; lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; +lean_dec(x_19); +x_46 = lean_ctor_get(x_23, 1); +lean_inc(x_46); +lean_dec(x_23); +x_47 = lean_ctor_get(x_24, 0); +lean_inc(x_47); +lean_dec(x_24); +x_48 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_48, 0, x_47); +x_49 = l_Lean_Meta_Simp_Step_result(x_48); +x_50 = l_Lean_Meta_Simp_mkEqTrans(x_21, x_49, x_5, x_6, x_7, x_8, x_46); +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; +x_51 = lean_ctor_get(x_50, 0); +lean_inc(x_51); +x_52 = lean_ctor_get(x_50, 1); +lean_inc(x_52); +if (lean_is_exclusive(x_50)) { + lean_ctor_release(x_50, 0); + lean_ctor_release(x_50, 1); + x_53 = x_50; +} else { + lean_dec_ref(x_50); + x_53 = lean_box(0); +} +x_54 = l_Lean_Meta_Simp_Step_updateResult(x_48, x_51); +if (lean_is_scalar(x_53)) { + x_55 = lean_alloc_ctor(0, 2, 0); +} else { + x_55 = x_53; +} +lean_ctor_set(x_55, 0, x_54); +lean_ctor_set(x_55, 1, x_52); +return x_55; +} +else +{ +lean_object* x_56; lean_object* x_57; lean_object* x_58; lean_object* x_59; +lean_dec(x_48); +x_56 = lean_ctor_get(x_50, 0); +lean_inc(x_56); +x_57 = lean_ctor_get(x_50, 1); +lean_inc(x_57); +if (lean_is_exclusive(x_50)) { + lean_ctor_release(x_50, 0); + lean_ctor_release(x_50, 1); + x_58 = x_50; +} else { + lean_dec_ref(x_50); + x_58 = lean_box(0); +} +if (lean_is_scalar(x_58)) { + x_59 = lean_alloc_ctor(1, 2, 0); +} else { + x_59 = x_58; +} +lean_ctor_set(x_59, 0, x_56); +lean_ctor_set(x_59, 1, x_57); +return x_59; +} +} +} +} +else +{ +uint8_t x_60; +lean_dec(x_21); +lean_dec(x_19); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +x_60 = !lean_is_exclusive(x_23); +if (x_60 == 0) +{ +return x_23; +} +else +{ +lean_object* x_61; lean_object* x_62; lean_object* x_63; +x_61 = lean_ctor_get(x_23, 0); +x_62 = lean_ctor_get(x_23, 1); +lean_inc(x_62); +lean_inc(x_61); +lean_dec(x_23); +x_63 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_63, 0, x_61); +lean_ctor_set(x_63, 1, x_62); +return x_63; +} +} +} +else +{ +lean_object* x_64; +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +if (lean_is_scalar(x_14)) { + x_64 = lean_alloc_ctor(0, 2, 0); +} else { + x_64 = x_14; +} +lean_ctor_set(x_64, 0, x_19); +lean_ctor_set(x_64, 1, x_20); +return x_64; +} +} +} +} +} +else +{ +uint8_t x_137; lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); @@ -14112,23 +14181,23 @@ lean_dec(x_5); lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); -x_136 = !lean_is_exclusive(x_10); -if (x_136 == 0) +x_137 = !lean_is_exclusive(x_11); +if (x_137 == 0) { -return x_10; +return x_11; } else { -lean_object* x_137; lean_object* x_138; lean_object* x_139; -x_137 = lean_ctor_get(x_10, 0); -x_138 = lean_ctor_get(x_10, 1); +lean_object* x_138; lean_object* x_139; lean_object* x_140; +x_138 = lean_ctor_get(x_11, 0); +x_139 = lean_ctor_get(x_11, 1); +lean_inc(x_139); lean_inc(x_138); -lean_inc(x_137); -lean_dec(x_10); -x_139 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_139, 0, x_137); -lean_ctor_set(x_139, 1, x_138); -return x_139; +lean_dec(x_11); +x_140 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_140, 0, x_138); +lean_ctor_set(x_140, 1, x_139); +return x_140; } } } diff --git a/stage0/stdlib/Lean/Meta/Tactic/Simp/SimpAll.c b/stage0/stdlib/Lean/Meta/Tactic/Simp/SimpAll.c index 1934aec82a..453c9e527e 100644 --- a/stage0/stdlib/Lean/Meta/Tactic/Simp/SimpAll.c +++ b/stage0/stdlib/Lean/Meta/Tactic/Simp/SimpAll.c @@ -80,6 +80,7 @@ static lean_object* l_Lean_Meta_SimpAll_instInhabitedEntry___closed__3; lean_object* l_Lean_Meta_instantiateMVars(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_SimpAll_State_entries___default; LEAN_EXPORT lean_object* l_Std_Range_forIn_loop___at___private_Lean_Meta_Tactic_Simp_SimpAll_0__Lean_Meta_SimpAll_loop___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* l_Lean_Meta_mkExpectedTypeHint(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_SimpTheoremsArray_addTheorem(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Array_mapMUnsafe_map___at_Lean_Meta_SimpAll_main___spec__1(size_t, size_t, lean_object*); uint8_t l_Lean_Meta_SimpTheoremsArray_isErased(lean_object*, lean_object*); @@ -887,372 +888,419 @@ lean_dec(x_92); x_95 = lean_ctor_get(x_94, 1); lean_inc(x_95); lean_dec(x_94); +lean_inc(x_11); +lean_inc(x_10); +lean_inc(x_9); +lean_inc(x_8); +lean_inc(x_87); +lean_inc(x_86); +x_96 = l_Lean_Meta_mkExpectedTypeHint(x_86, x_87, x_8, x_9, x_10, x_11, x_93); +if (lean_obj_tag(x_96) == 0) +{ +lean_object* x_97; lean_object* x_98; lean_object* x_99; +x_97 = lean_ctor_get(x_96, 0); +lean_inc(x_97); +x_98 = lean_ctor_get(x_96, 1); +lean_inc(x_98); +lean_dec(x_96); lean_inc(x_59); lean_ctor_set(x_74, 0, x_59); lean_inc(x_11); lean_inc(x_10); lean_inc(x_9); lean_inc(x_8); -lean_inc(x_86); -x_96 = l_Lean_Meta_SimpTheoremsArray_addTheorem(x_95, x_86, x_74, x_8, x_9, x_10, x_11, x_93); -if (lean_obj_tag(x_96) == 0) +x_99 = l_Lean_Meta_SimpTheoremsArray_addTheorem(x_95, x_97, x_74, x_8, x_9, x_10, x_11, x_98); +if (lean_obj_tag(x_99) == 0) { -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; uint8_t x_104; -x_97 = lean_ctor_get(x_96, 0); -lean_inc(x_97); -x_98 = lean_ctor_get(x_96, 1); -lean_inc(x_98); -lean_dec(x_96); -x_99 = lean_st_ref_get(x_11, x_98); -x_100 = lean_ctor_get(x_99, 1); +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; uint8_t x_107; +x_100 = lean_ctor_get(x_99, 0); lean_inc(x_100); +x_101 = lean_ctor_get(x_99, 1); +lean_inc(x_101); lean_dec(x_99); -x_101 = lean_st_ref_take(x_7, x_100); -x_102 = lean_ctor_get(x_101, 0); -lean_inc(x_102); -x_103 = lean_ctor_get(x_101, 1); +x_102 = lean_st_ref_get(x_11, x_101); +x_103 = lean_ctor_get(x_102, 1); lean_inc(x_103); -lean_dec(x_101); -x_104 = !lean_is_exclusive(x_102); -if (x_104 == 0) +lean_dec(x_102); +x_104 = lean_st_ref_take(x_7, x_103); +x_105 = lean_ctor_get(x_104, 0); +lean_inc(x_105); +x_106 = lean_ctor_get(x_104, 1); +lean_inc(x_106); +lean_dec(x_104); +x_107 = !lean_is_exclusive(x_105); +if (x_107 == 0) { -lean_object* x_105; lean_object* x_106; lean_object* x_107; uint8_t x_108; uint8_t x_109; -x_105 = lean_ctor_get(x_102, 1); -x_106 = lean_ctor_get(x_102, 2); -x_107 = lean_array_get_size(x_105); -x_108 = lean_nat_dec_lt(x_3, x_107); -lean_dec(x_107); -x_109 = !lean_is_exclusive(x_106); -if (x_109 == 0) -{ -lean_object* x_110; -x_110 = lean_ctor_get(x_106, 1); +lean_object* x_108; lean_object* x_109; lean_object* x_110; uint8_t x_111; uint8_t x_112; +x_108 = lean_ctor_get(x_105, 1); +x_109 = lean_ctor_get(x_105, 2); +x_110 = lean_array_get_size(x_108); +x_111 = lean_nat_dec_lt(x_3, x_110); lean_dec(x_110); -lean_ctor_set(x_106, 1, x_97); -if (x_108 == 0) -{ -lean_object* x_111; uint8_t x_112; -lean_dec(x_87); -lean_dec(x_86); -lean_free_object(x_42); -lean_dec(x_59); -lean_dec(x_58); -lean_dec(x_57); -lean_ctor_set_uint8(x_102, sizeof(void*)*3, x_72); -x_111 = lean_st_ref_set(x_7, x_102, x_103); -x_112 = !lean_is_exclusive(x_111); +x_112 = !lean_is_exclusive(x_109); if (x_112 == 0) { -lean_object* x_113; lean_object* x_114; -x_113 = lean_ctor_get(x_111, 0); +lean_object* x_113; +x_113 = lean_ctor_get(x_109, 1); lean_dec(x_113); +lean_ctor_set(x_109, 1, x_100); +if (x_111 == 0) +{ +lean_object* x_114; uint8_t x_115; +lean_dec(x_87); +lean_dec(x_86); +lean_free_object(x_42); +lean_dec(x_59); +lean_dec(x_58); +lean_dec(x_57); +lean_ctor_set_uint8(x_105, sizeof(void*)*3, x_72); +x_114 = lean_st_ref_set(x_7, x_105, x_106); +x_115 = !lean_is_exclusive(x_114); +if (x_115 == 0) +{ +lean_object* x_116; lean_object* x_117; +x_116 = lean_ctor_get(x_114, 0); +lean_dec(x_116); lean_inc(x_1); -x_114 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_114, 0, x_1); -lean_ctor_set(x_111, 0, x_114); -x_18 = x_111; +x_117 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_117, 0, x_1); +lean_ctor_set(x_114, 0, x_117); +x_18 = x_114; goto block_34; } else { -lean_object* x_115; lean_object* x_116; lean_object* x_117; -x_115 = lean_ctor_get(x_111, 1); -lean_inc(x_115); -lean_dec(x_111); +lean_object* x_118; lean_object* x_119; lean_object* x_120; +x_118 = lean_ctor_get(x_114, 1); +lean_inc(x_118); +lean_dec(x_114); lean_inc(x_1); -x_116 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_116, 0, x_1); -x_117 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_117, 0, x_116); -lean_ctor_set(x_117, 1, x_115); -x_18 = x_117; +x_119 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_119, 0, x_1); +x_120 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_120, 0, x_119); +lean_ctor_set(x_120, 1, x_118); +x_18 = x_120; goto block_34; } } else { -lean_object* x_118; lean_object* x_119; lean_object* x_120; lean_object* x_121; uint8_t x_122; -x_118 = lean_box(0); -x_119 = lean_array_fset(x_105, x_3, x_118); +lean_object* x_121; lean_object* x_122; lean_object* x_123; lean_object* x_124; uint8_t x_125; +x_121 = lean_box(0); +x_122 = lean_array_fset(x_108, x_3, x_121); lean_ctor_set(x_42, 4, x_86); lean_ctor_set(x_42, 3, x_87); -x_120 = lean_array_fset(x_119, x_3, x_42); -lean_ctor_set(x_102, 1, x_120); -lean_ctor_set_uint8(x_102, sizeof(void*)*3, x_72); -x_121 = lean_st_ref_set(x_7, x_102, x_103); -x_122 = !lean_is_exclusive(x_121); -if (x_122 == 0) +x_123 = lean_array_fset(x_122, x_3, x_42); +lean_ctor_set(x_105, 1, x_123); +lean_ctor_set_uint8(x_105, sizeof(void*)*3, x_72); +x_124 = lean_st_ref_set(x_7, x_105, x_106); +x_125 = !lean_is_exclusive(x_124); +if (x_125 == 0) { -lean_object* x_123; lean_object* x_124; -x_123 = lean_ctor_get(x_121, 0); -lean_dec(x_123); +lean_object* x_126; lean_object* x_127; +x_126 = lean_ctor_get(x_124, 0); +lean_dec(x_126); lean_inc(x_1); -x_124 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_124, 0, x_1); -lean_ctor_set(x_121, 0, x_124); -x_18 = x_121; +x_127 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_127, 0, x_1); +lean_ctor_set(x_124, 0, x_127); +x_18 = x_124; goto block_34; } else { -lean_object* x_125; lean_object* x_126; lean_object* x_127; -x_125 = lean_ctor_get(x_121, 1); -lean_inc(x_125); -lean_dec(x_121); -lean_inc(x_1); -x_126 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_126, 0, x_1); -x_127 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_127, 0, x_126); -lean_ctor_set(x_127, 1, x_125); -x_18 = x_127; -goto block_34; -} -} -} -else -{ -lean_object* x_128; lean_object* x_129; lean_object* x_130; lean_object* x_131; lean_object* x_132; -x_128 = lean_ctor_get(x_106, 0); -x_129 = lean_ctor_get(x_106, 2); -x_130 = lean_ctor_get(x_106, 3); -x_131 = lean_ctor_get(x_106, 4); -lean_inc(x_131); -lean_inc(x_130); -lean_inc(x_129); +lean_object* x_128; lean_object* x_129; lean_object* x_130; +x_128 = lean_ctor_get(x_124, 1); lean_inc(x_128); -lean_dec(x_106); -x_132 = lean_alloc_ctor(0, 5, 0); -lean_ctor_set(x_132, 0, x_128); -lean_ctor_set(x_132, 1, x_97); -lean_ctor_set(x_132, 2, x_129); -lean_ctor_set(x_132, 3, x_130); -lean_ctor_set(x_132, 4, x_131); -if (x_108 == 0) +lean_dec(x_124); +lean_inc(x_1); +x_129 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_129, 0, x_1); +x_130 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_130, 0, x_129); +lean_ctor_set(x_130, 1, x_128); +x_18 = x_130; +goto block_34; +} +} +} +else { -lean_object* x_133; lean_object* x_134; lean_object* x_135; lean_object* x_136; lean_object* x_137; -lean_dec(x_87); -lean_dec(x_86); -lean_free_object(x_42); -lean_dec(x_59); -lean_dec(x_58); -lean_dec(x_57); -lean_ctor_set(x_102, 2, x_132); -lean_ctor_set_uint8(x_102, sizeof(void*)*3, x_72); -x_133 = lean_st_ref_set(x_7, x_102, x_103); -x_134 = lean_ctor_get(x_133, 1); +lean_object* x_131; lean_object* x_132; lean_object* x_133; lean_object* x_134; lean_object* x_135; +x_131 = lean_ctor_get(x_109, 0); +x_132 = lean_ctor_get(x_109, 2); +x_133 = lean_ctor_get(x_109, 3); +x_134 = lean_ctor_get(x_109, 4); lean_inc(x_134); -if (lean_is_exclusive(x_133)) { - lean_ctor_release(x_133, 0); - lean_ctor_release(x_133, 1); - x_135 = x_133; +lean_inc(x_133); +lean_inc(x_132); +lean_inc(x_131); +lean_dec(x_109); +x_135 = lean_alloc_ctor(0, 5, 0); +lean_ctor_set(x_135, 0, x_131); +lean_ctor_set(x_135, 1, x_100); +lean_ctor_set(x_135, 2, x_132); +lean_ctor_set(x_135, 3, x_133); +lean_ctor_set(x_135, 4, x_134); +if (x_111 == 0) +{ +lean_object* x_136; lean_object* x_137; lean_object* x_138; lean_object* x_139; lean_object* x_140; +lean_dec(x_87); +lean_dec(x_86); +lean_free_object(x_42); +lean_dec(x_59); +lean_dec(x_58); +lean_dec(x_57); +lean_ctor_set(x_105, 2, x_135); +lean_ctor_set_uint8(x_105, sizeof(void*)*3, x_72); +x_136 = lean_st_ref_set(x_7, x_105, x_106); +x_137 = lean_ctor_get(x_136, 1); +lean_inc(x_137); +if (lean_is_exclusive(x_136)) { + lean_ctor_release(x_136, 0); + lean_ctor_release(x_136, 1); + x_138 = x_136; } else { - lean_dec_ref(x_133); - x_135 = lean_box(0); + lean_dec_ref(x_136); + x_138 = lean_box(0); } lean_inc(x_1); -x_136 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_136, 0, x_1); -if (lean_is_scalar(x_135)) { - x_137 = lean_alloc_ctor(0, 2, 0); +x_139 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_139, 0, x_1); +if (lean_is_scalar(x_138)) { + x_140 = lean_alloc_ctor(0, 2, 0); } else { - x_137 = x_135; + x_140 = x_138; } -lean_ctor_set(x_137, 0, x_136); -lean_ctor_set(x_137, 1, x_134); -x_18 = x_137; +lean_ctor_set(x_140, 0, x_139); +lean_ctor_set(x_140, 1, x_137); +x_18 = x_140; goto block_34; } else { -lean_object* x_138; lean_object* x_139; lean_object* x_140; lean_object* x_141; lean_object* x_142; lean_object* x_143; lean_object* x_144; lean_object* x_145; -x_138 = lean_box(0); -x_139 = lean_array_fset(x_105, x_3, x_138); +lean_object* x_141; lean_object* x_142; lean_object* x_143; lean_object* x_144; lean_object* x_145; lean_object* x_146; lean_object* x_147; lean_object* x_148; +x_141 = lean_box(0); +x_142 = lean_array_fset(x_108, x_3, x_141); lean_ctor_set(x_42, 4, x_86); lean_ctor_set(x_42, 3, x_87); -x_140 = lean_array_fset(x_139, x_3, x_42); -lean_ctor_set(x_102, 2, x_132); -lean_ctor_set(x_102, 1, x_140); -lean_ctor_set_uint8(x_102, sizeof(void*)*3, x_72); -x_141 = lean_st_ref_set(x_7, x_102, x_103); -x_142 = lean_ctor_get(x_141, 1); -lean_inc(x_142); -if (lean_is_exclusive(x_141)) { - lean_ctor_release(x_141, 0); - lean_ctor_release(x_141, 1); - x_143 = x_141; +x_143 = lean_array_fset(x_142, x_3, x_42); +lean_ctor_set(x_105, 2, x_135); +lean_ctor_set(x_105, 1, x_143); +lean_ctor_set_uint8(x_105, sizeof(void*)*3, x_72); +x_144 = lean_st_ref_set(x_7, x_105, x_106); +x_145 = lean_ctor_get(x_144, 1); +lean_inc(x_145); +if (lean_is_exclusive(x_144)) { + lean_ctor_release(x_144, 0); + lean_ctor_release(x_144, 1); + x_146 = x_144; } else { - lean_dec_ref(x_141); - x_143 = lean_box(0); + lean_dec_ref(x_144); + x_146 = lean_box(0); } lean_inc(x_1); -x_144 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_144, 0, x_1); -if (lean_is_scalar(x_143)) { - x_145 = lean_alloc_ctor(0, 2, 0); +x_147 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_147, 0, x_1); +if (lean_is_scalar(x_146)) { + x_148 = lean_alloc_ctor(0, 2, 0); } else { - x_145 = x_143; + x_148 = x_146; } -lean_ctor_set(x_145, 0, x_144); -lean_ctor_set(x_145, 1, x_142); -x_18 = x_145; +lean_ctor_set(x_148, 0, x_147); +lean_ctor_set(x_148, 1, x_145); +x_18 = x_148; goto block_34; } } } else { -lean_object* x_146; lean_object* x_147; lean_object* x_148; lean_object* x_149; uint8_t x_150; lean_object* x_151; lean_object* x_152; lean_object* x_153; lean_object* x_154; lean_object* x_155; lean_object* x_156; -x_146 = lean_ctor_get(x_102, 0); -x_147 = lean_ctor_get(x_102, 1); -x_148 = lean_ctor_get(x_102, 2); -lean_inc(x_148); -lean_inc(x_147); -lean_inc(x_146); -lean_dec(x_102); -x_149 = lean_array_get_size(x_147); -x_150 = lean_nat_dec_lt(x_3, x_149); -lean_dec(x_149); -x_151 = lean_ctor_get(x_148, 0); +lean_object* x_149; lean_object* x_150; lean_object* x_151; lean_object* x_152; uint8_t 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; +x_149 = lean_ctor_get(x_105, 0); +x_150 = lean_ctor_get(x_105, 1); +x_151 = lean_ctor_get(x_105, 2); lean_inc(x_151); -x_152 = lean_ctor_get(x_148, 2); -lean_inc(x_152); -x_153 = lean_ctor_get(x_148, 3); -lean_inc(x_153); -x_154 = lean_ctor_get(x_148, 4); +lean_inc(x_150); +lean_inc(x_149); +lean_dec(x_105); +x_152 = lean_array_get_size(x_150); +x_153 = lean_nat_dec_lt(x_3, x_152); +lean_dec(x_152); +x_154 = lean_ctor_get(x_151, 0); lean_inc(x_154); -if (lean_is_exclusive(x_148)) { - lean_ctor_release(x_148, 0); - lean_ctor_release(x_148, 1); - lean_ctor_release(x_148, 2); - lean_ctor_release(x_148, 3); - lean_ctor_release(x_148, 4); - x_155 = x_148; +x_155 = lean_ctor_get(x_151, 2); +lean_inc(x_155); +x_156 = lean_ctor_get(x_151, 3); +lean_inc(x_156); +x_157 = lean_ctor_get(x_151, 4); +lean_inc(x_157); +if (lean_is_exclusive(x_151)) { + lean_ctor_release(x_151, 0); + lean_ctor_release(x_151, 1); + lean_ctor_release(x_151, 2); + lean_ctor_release(x_151, 3); + lean_ctor_release(x_151, 4); + x_158 = x_151; } else { - lean_dec_ref(x_148); - x_155 = lean_box(0); + lean_dec_ref(x_151); + x_158 = lean_box(0); } -if (lean_is_scalar(x_155)) { - x_156 = lean_alloc_ctor(0, 5, 0); +if (lean_is_scalar(x_158)) { + x_159 = lean_alloc_ctor(0, 5, 0); } else { - x_156 = x_155; + x_159 = x_158; } -lean_ctor_set(x_156, 0, x_151); -lean_ctor_set(x_156, 1, x_97); -lean_ctor_set(x_156, 2, x_152); -lean_ctor_set(x_156, 3, x_153); -lean_ctor_set(x_156, 4, x_154); -if (x_150 == 0) +lean_ctor_set(x_159, 0, x_154); +lean_ctor_set(x_159, 1, x_100); +lean_ctor_set(x_159, 2, x_155); +lean_ctor_set(x_159, 3, x_156); +lean_ctor_set(x_159, 4, x_157); +if (x_153 == 0) { -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_160; lean_object* x_161; lean_object* x_162; lean_object* x_163; lean_object* x_164; lean_object* x_165; lean_dec(x_87); lean_dec(x_86); lean_free_object(x_42); lean_dec(x_59); lean_dec(x_58); lean_dec(x_57); -x_157 = lean_alloc_ctor(0, 3, 1); -lean_ctor_set(x_157, 0, x_146); -lean_ctor_set(x_157, 1, x_147); -lean_ctor_set(x_157, 2, x_156); -lean_ctor_set_uint8(x_157, sizeof(void*)*3, x_72); -x_158 = lean_st_ref_set(x_7, x_157, x_103); -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; +x_160 = lean_alloc_ctor(0, 3, 1); +lean_ctor_set(x_160, 0, x_149); +lean_ctor_set(x_160, 1, x_150); +lean_ctor_set(x_160, 2, x_159); +lean_ctor_set_uint8(x_160, sizeof(void*)*3, x_72); +x_161 = lean_st_ref_set(x_7, x_160, x_106); +x_162 = lean_ctor_get(x_161, 1); +lean_inc(x_162); +if (lean_is_exclusive(x_161)) { + lean_ctor_release(x_161, 0); + lean_ctor_release(x_161, 1); + x_163 = x_161; } else { - lean_dec_ref(x_158); - x_160 = lean_box(0); + lean_dec_ref(x_161); + x_163 = lean_box(0); } lean_inc(x_1); -x_161 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_161, 0, x_1); -if (lean_is_scalar(x_160)) { - x_162 = lean_alloc_ctor(0, 2, 0); +x_164 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_164, 0, x_1); +if (lean_is_scalar(x_163)) { + x_165 = lean_alloc_ctor(0, 2, 0); } else { - x_162 = x_160; + x_165 = x_163; } -lean_ctor_set(x_162, 0, x_161); -lean_ctor_set(x_162, 1, x_159); -x_18 = x_162; +lean_ctor_set(x_165, 0, x_164); +lean_ctor_set(x_165, 1, x_162); +x_18 = x_165; goto block_34; } else { -lean_object* x_163; lean_object* x_164; lean_object* x_165; lean_object* x_166; lean_object* x_167; lean_object* x_168; lean_object* x_169; lean_object* x_170; lean_object* x_171; -x_163 = lean_box(0); -x_164 = lean_array_fset(x_147, x_3, x_163); +lean_object* x_166; lean_object* x_167; lean_object* x_168; lean_object* x_169; lean_object* x_170; lean_object* x_171; lean_object* x_172; lean_object* x_173; lean_object* x_174; +x_166 = lean_box(0); +x_167 = lean_array_fset(x_150, x_3, x_166); lean_ctor_set(x_42, 4, x_86); lean_ctor_set(x_42, 3, x_87); -x_165 = lean_array_fset(x_164, x_3, x_42); -x_166 = lean_alloc_ctor(0, 3, 1); -lean_ctor_set(x_166, 0, x_146); -lean_ctor_set(x_166, 1, x_165); -lean_ctor_set(x_166, 2, x_156); -lean_ctor_set_uint8(x_166, sizeof(void*)*3, x_72); -x_167 = lean_st_ref_set(x_7, x_166, x_103); -x_168 = lean_ctor_get(x_167, 1); -lean_inc(x_168); -if (lean_is_exclusive(x_167)) { - lean_ctor_release(x_167, 0); - lean_ctor_release(x_167, 1); - x_169 = x_167; +x_168 = lean_array_fset(x_167, x_3, x_42); +x_169 = lean_alloc_ctor(0, 3, 1); +lean_ctor_set(x_169, 0, x_149); +lean_ctor_set(x_169, 1, x_168); +lean_ctor_set(x_169, 2, x_159); +lean_ctor_set_uint8(x_169, sizeof(void*)*3, x_72); +x_170 = lean_st_ref_set(x_7, x_169, x_106); +x_171 = lean_ctor_get(x_170, 1); +lean_inc(x_171); +if (lean_is_exclusive(x_170)) { + lean_ctor_release(x_170, 0); + lean_ctor_release(x_170, 1); + x_172 = x_170; } else { - lean_dec_ref(x_167); - x_169 = lean_box(0); + lean_dec_ref(x_170); + x_172 = lean_box(0); } lean_inc(x_1); -x_170 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_170, 0, x_1); -if (lean_is_scalar(x_169)) { - x_171 = lean_alloc_ctor(0, 2, 0); +x_173 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_173, 0, x_1); +if (lean_is_scalar(x_172)) { + x_174 = lean_alloc_ctor(0, 2, 0); } else { - x_171 = x_169; + x_174 = x_172; } -lean_ctor_set(x_171, 0, x_170); -lean_ctor_set(x_171, 1, x_168); -x_18 = x_171; +lean_ctor_set(x_174, 0, x_173); +lean_ctor_set(x_174, 1, x_171); +x_18 = x_174; goto block_34; } } } else { -uint8_t x_172; +uint8_t x_175; lean_dec(x_87); lean_dec(x_86); lean_free_object(x_42); lean_dec(x_59); lean_dec(x_58); lean_dec(x_57); -x_172 = !lean_is_exclusive(x_96); -if (x_172 == 0) +x_175 = !lean_is_exclusive(x_99); +if (x_175 == 0) +{ +x_18 = x_99; +goto block_34; +} +else +{ +lean_object* x_176; lean_object* x_177; lean_object* x_178; +x_176 = lean_ctor_get(x_99, 0); +x_177 = lean_ctor_get(x_99, 1); +lean_inc(x_177); +lean_inc(x_176); +lean_dec(x_99); +x_178 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_178, 0, x_176); +lean_ctor_set(x_178, 1, x_177); +x_18 = x_178; +goto block_34; +} +} +} +else +{ +uint8_t x_179; +lean_dec(x_95); +lean_dec(x_87); +lean_dec(x_86); +lean_free_object(x_74); +lean_free_object(x_42); +lean_dec(x_59); +lean_dec(x_58); +lean_dec(x_57); +x_179 = !lean_is_exclusive(x_96); +if (x_179 == 0) { x_18 = x_96; goto block_34; } else { -lean_object* x_173; lean_object* x_174; lean_object* x_175; -x_173 = lean_ctor_get(x_96, 0); -x_174 = lean_ctor_get(x_96, 1); -lean_inc(x_174); -lean_inc(x_173); +lean_object* x_180; lean_object* x_181; lean_object* x_182; +x_180 = lean_ctor_get(x_96, 0); +x_181 = lean_ctor_get(x_96, 1); +lean_inc(x_181); +lean_inc(x_180); lean_dec(x_96); -x_175 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_175, 0, x_173); -lean_ctor_set(x_175, 1, x_174); -x_18 = x_175; +x_182 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_182, 0, x_180); +lean_ctor_set(x_182, 1, x_181); +x_18 = x_182; goto block_34; } } } else { -lean_object* x_176; +lean_object* x_183; lean_dec(x_87); lean_dec(x_86); lean_free_object(x_74); @@ -1261,509 +1309,604 @@ lean_dec(x_59); lean_dec(x_58); lean_dec(x_57); lean_inc(x_1); -x_176 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_176, 0, x_1); -lean_ctor_set(x_73, 0, x_176); +x_183 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_183, 0, x_1); +lean_ctor_set(x_73, 0, x_183); x_18 = x_73; goto block_34; } } else { -lean_object* x_177; lean_object* x_178; lean_object* x_179; lean_object* x_180; uint8_t x_181; -x_177 = lean_ctor_get(x_74, 0); -x_178 = lean_ctor_get(x_73, 1); -lean_inc(x_178); -lean_dec(x_73); -x_179 = lean_ctor_get(x_177, 0); -lean_inc(x_179); -x_180 = lean_ctor_get(x_177, 1); -lean_inc(x_180); -lean_dec(x_177); -x_181 = lean_expr_eqv(x_180, x_60); -lean_dec(x_60); -if (x_181 == 0) -{ -lean_object* x_182; lean_object* x_183; lean_object* x_184; lean_object* x_185; lean_object* x_186; lean_object* x_187; lean_object* x_188; lean_object* x_189; -x_182 = lean_st_ref_get(x_11, x_178); -x_183 = lean_ctor_get(x_182, 1); -lean_inc(x_183); -lean_dec(x_182); -x_184 = lean_st_ref_get(x_7, x_183); -x_185 = lean_ctor_get(x_184, 0); +lean_object* x_184; lean_object* x_185; lean_object* x_186; lean_object* x_187; uint8_t x_188; +x_184 = lean_ctor_get(x_74, 0); +x_185 = lean_ctor_get(x_73, 1); lean_inc(x_185); -x_186 = lean_ctor_get(x_184, 1); +lean_dec(x_73); +x_186 = lean_ctor_get(x_184, 0); lean_inc(x_186); -lean_dec(x_184); -x_187 = lean_ctor_get(x_185, 2); +x_187 = lean_ctor_get(x_184, 1); lean_inc(x_187); -lean_dec(x_185); -x_188 = lean_ctor_get(x_187, 1); -lean_inc(x_188); -lean_dec(x_187); +lean_dec(x_184); +x_188 = lean_expr_eqv(x_187, x_60); +lean_dec(x_60); +if (x_188 == 0) +{ +lean_object* x_189; lean_object* x_190; lean_object* x_191; lean_object* x_192; lean_object* x_193; lean_object* x_194; lean_object* x_195; lean_object* x_196; +x_189 = lean_st_ref_get(x_11, x_185); +x_190 = lean_ctor_get(x_189, 1); +lean_inc(x_190); +lean_dec(x_189); +x_191 = lean_st_ref_get(x_7, x_190); +x_192 = lean_ctor_get(x_191, 0); +lean_inc(x_192); +x_193 = lean_ctor_get(x_191, 1); +lean_inc(x_193); +lean_dec(x_191); +x_194 = lean_ctor_get(x_192, 2); +lean_inc(x_194); +lean_dec(x_192); +x_195 = lean_ctor_get(x_194, 1); +lean_inc(x_195); +lean_dec(x_194); +lean_inc(x_11); +lean_inc(x_10); +lean_inc(x_9); +lean_inc(x_8); +lean_inc(x_187); +lean_inc(x_186); +x_196 = l_Lean_Meta_mkExpectedTypeHint(x_186, x_187, x_8, x_9, x_10, x_11, x_193); +if (lean_obj_tag(x_196) == 0) +{ +lean_object* x_197; lean_object* x_198; lean_object* x_199; +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); lean_inc(x_59); lean_ctor_set(x_74, 0, x_59); lean_inc(x_11); lean_inc(x_10); lean_inc(x_9); lean_inc(x_8); -lean_inc(x_179); -x_189 = l_Lean_Meta_SimpTheoremsArray_addTheorem(x_188, x_179, x_74, x_8, x_9, x_10, x_11, x_186); -if (lean_obj_tag(x_189) == 0) +x_199 = l_Lean_Meta_SimpTheoremsArray_addTheorem(x_195, x_197, x_74, x_8, x_9, x_10, x_11, x_198); +if (lean_obj_tag(x_199) == 0) { -lean_object* x_190; lean_object* x_191; lean_object* x_192; lean_object* x_193; lean_object* x_194; lean_object* x_195; lean_object* x_196; lean_object* x_197; lean_object* x_198; lean_object* x_199; lean_object* x_200; lean_object* x_201; uint8_t x_202; lean_object* x_203; lean_object* x_204; lean_object* x_205; lean_object* x_206; lean_object* x_207; lean_object* x_208; -x_190 = lean_ctor_get(x_189, 0); -lean_inc(x_190); -x_191 = lean_ctor_get(x_189, 1); -lean_inc(x_191); -lean_dec(x_189); -x_192 = lean_st_ref_get(x_11, x_191); -x_193 = lean_ctor_get(x_192, 1); -lean_inc(x_193); -lean_dec(x_192); -x_194 = lean_st_ref_take(x_7, x_193); -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); -x_197 = lean_ctor_get(x_195, 0); -lean_inc(x_197); -x_198 = lean_ctor_get(x_195, 1); -lean_inc(x_198); -x_199 = lean_ctor_get(x_195, 2); -lean_inc(x_199); -if (lean_is_exclusive(x_195)) { - lean_ctor_release(x_195, 0); - lean_ctor_release(x_195, 1); - lean_ctor_release(x_195, 2); - x_200 = x_195; -} else { - lean_dec_ref(x_195); - x_200 = lean_box(0); -} -x_201 = lean_array_get_size(x_198); -x_202 = lean_nat_dec_lt(x_3, x_201); -lean_dec(x_201); -x_203 = lean_ctor_get(x_199, 0); +lean_object* x_200; lean_object* x_201; lean_object* x_202; lean_object* x_203; lean_object* x_204; lean_object* x_205; lean_object* x_206; lean_object* x_207; lean_object* x_208; lean_object* x_209; lean_object* x_210; lean_object* x_211; uint8_t x_212; lean_object* x_213; lean_object* x_214; lean_object* x_215; lean_object* x_216; lean_object* x_217; lean_object* x_218; +x_200 = lean_ctor_get(x_199, 0); +lean_inc(x_200); +x_201 = lean_ctor_get(x_199, 1); +lean_inc(x_201); +lean_dec(x_199); +x_202 = lean_st_ref_get(x_11, x_201); +x_203 = lean_ctor_get(x_202, 1); lean_inc(x_203); -x_204 = lean_ctor_get(x_199, 2); -lean_inc(x_204); -x_205 = lean_ctor_get(x_199, 3); +lean_dec(x_202); +x_204 = lean_st_ref_take(x_7, x_203); +x_205 = lean_ctor_get(x_204, 0); lean_inc(x_205); -x_206 = lean_ctor_get(x_199, 4); +x_206 = lean_ctor_get(x_204, 1); lean_inc(x_206); +lean_dec(x_204); +x_207 = lean_ctor_get(x_205, 0); +lean_inc(x_207); +x_208 = lean_ctor_get(x_205, 1); +lean_inc(x_208); +x_209 = lean_ctor_get(x_205, 2); +lean_inc(x_209); +if (lean_is_exclusive(x_205)) { + lean_ctor_release(x_205, 0); + lean_ctor_release(x_205, 1); + lean_ctor_release(x_205, 2); + x_210 = x_205; +} else { + lean_dec_ref(x_205); + x_210 = lean_box(0); +} +x_211 = lean_array_get_size(x_208); +x_212 = lean_nat_dec_lt(x_3, x_211); +lean_dec(x_211); +x_213 = lean_ctor_get(x_209, 0); +lean_inc(x_213); +x_214 = lean_ctor_get(x_209, 2); +lean_inc(x_214); +x_215 = lean_ctor_get(x_209, 3); +lean_inc(x_215); +x_216 = lean_ctor_get(x_209, 4); +lean_inc(x_216); +if (lean_is_exclusive(x_209)) { + lean_ctor_release(x_209, 0); + lean_ctor_release(x_209, 1); + lean_ctor_release(x_209, 2); + lean_ctor_release(x_209, 3); + lean_ctor_release(x_209, 4); + x_217 = x_209; +} else { + lean_dec_ref(x_209); + x_217 = lean_box(0); +} +if (lean_is_scalar(x_217)) { + x_218 = lean_alloc_ctor(0, 5, 0); +} else { + x_218 = x_217; +} +lean_ctor_set(x_218, 0, x_213); +lean_ctor_set(x_218, 1, x_200); +lean_ctor_set(x_218, 2, x_214); +lean_ctor_set(x_218, 3, x_215); +lean_ctor_set(x_218, 4, x_216); +if (x_212 == 0) +{ +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_dec(x_187); +lean_dec(x_186); +lean_free_object(x_42); +lean_dec(x_59); +lean_dec(x_58); +lean_dec(x_57); +if (lean_is_scalar(x_210)) { + x_219 = lean_alloc_ctor(0, 3, 1); +} else { + x_219 = x_210; +} +lean_ctor_set(x_219, 0, x_207); +lean_ctor_set(x_219, 1, x_208); +lean_ctor_set(x_219, 2, x_218); +lean_ctor_set_uint8(x_219, sizeof(void*)*3, x_72); +x_220 = lean_st_ref_set(x_7, x_219, x_206); +x_221 = lean_ctor_get(x_220, 1); +lean_inc(x_221); +if (lean_is_exclusive(x_220)) { + lean_ctor_release(x_220, 0); + lean_ctor_release(x_220, 1); + x_222 = x_220; +} else { + lean_dec_ref(x_220); + x_222 = lean_box(0); +} +lean_inc(x_1); +x_223 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_223, 0, x_1); +if (lean_is_scalar(x_222)) { + x_224 = lean_alloc_ctor(0, 2, 0); +} else { + x_224 = x_222; +} +lean_ctor_set(x_224, 0, x_223); +lean_ctor_set(x_224, 1, x_221); +x_18 = x_224; +goto block_34; +} +else +{ +lean_object* x_225; lean_object* x_226; lean_object* x_227; lean_object* x_228; lean_object* x_229; lean_object* x_230; lean_object* x_231; lean_object* x_232; lean_object* x_233; +x_225 = lean_box(0); +x_226 = lean_array_fset(x_208, x_3, x_225); +lean_ctor_set(x_42, 4, x_186); +lean_ctor_set(x_42, 3, x_187); +x_227 = lean_array_fset(x_226, x_3, x_42); +if (lean_is_scalar(x_210)) { + x_228 = lean_alloc_ctor(0, 3, 1); +} else { + x_228 = x_210; +} +lean_ctor_set(x_228, 0, x_207); +lean_ctor_set(x_228, 1, x_227); +lean_ctor_set(x_228, 2, x_218); +lean_ctor_set_uint8(x_228, sizeof(void*)*3, x_72); +x_229 = lean_st_ref_set(x_7, x_228, x_206); +x_230 = lean_ctor_get(x_229, 1); +lean_inc(x_230); +if (lean_is_exclusive(x_229)) { + lean_ctor_release(x_229, 0); + lean_ctor_release(x_229, 1); + x_231 = x_229; +} else { + lean_dec_ref(x_229); + x_231 = lean_box(0); +} +lean_inc(x_1); +x_232 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_232, 0, x_1); +if (lean_is_scalar(x_231)) { + x_233 = lean_alloc_ctor(0, 2, 0); +} else { + x_233 = x_231; +} +lean_ctor_set(x_233, 0, x_232); +lean_ctor_set(x_233, 1, x_230); +x_18 = x_233; +goto block_34; +} +} +else +{ +lean_object* x_234; lean_object* x_235; lean_object* x_236; lean_object* x_237; +lean_dec(x_187); +lean_dec(x_186); +lean_free_object(x_42); +lean_dec(x_59); +lean_dec(x_58); +lean_dec(x_57); +x_234 = lean_ctor_get(x_199, 0); +lean_inc(x_234); +x_235 = lean_ctor_get(x_199, 1); +lean_inc(x_235); if (lean_is_exclusive(x_199)) { lean_ctor_release(x_199, 0); lean_ctor_release(x_199, 1); - lean_ctor_release(x_199, 2); - lean_ctor_release(x_199, 3); - lean_ctor_release(x_199, 4); - x_207 = x_199; + x_236 = x_199; } else { lean_dec_ref(x_199); - x_207 = lean_box(0); + x_236 = lean_box(0); } -if (lean_is_scalar(x_207)) { - x_208 = lean_alloc_ctor(0, 5, 0); +if (lean_is_scalar(x_236)) { + x_237 = lean_alloc_ctor(1, 2, 0); } else { - x_208 = x_207; + x_237 = x_236; } -lean_ctor_set(x_208, 0, x_203); -lean_ctor_set(x_208, 1, x_190); -lean_ctor_set(x_208, 2, x_204); -lean_ctor_set(x_208, 3, x_205); -lean_ctor_set(x_208, 4, x_206); -if (x_202 == 0) +lean_ctor_set(x_237, 0, x_234); +lean_ctor_set(x_237, 1, x_235); +x_18 = x_237; +goto block_34; +} +} +else { -lean_object* x_209; lean_object* x_210; lean_object* x_211; lean_object* x_212; lean_object* x_213; lean_object* x_214; -lean_dec(x_180); -lean_dec(x_179); +lean_object* x_238; lean_object* x_239; lean_object* x_240; lean_object* x_241; +lean_dec(x_195); +lean_dec(x_187); +lean_dec(x_186); +lean_free_object(x_74); lean_free_object(x_42); lean_dec(x_59); lean_dec(x_58); lean_dec(x_57); -if (lean_is_scalar(x_200)) { - x_209 = lean_alloc_ctor(0, 3, 1); +x_238 = lean_ctor_get(x_196, 0); +lean_inc(x_238); +x_239 = lean_ctor_get(x_196, 1); +lean_inc(x_239); +if (lean_is_exclusive(x_196)) { + lean_ctor_release(x_196, 0); + lean_ctor_release(x_196, 1); + x_240 = x_196; } else { - x_209 = x_200; + lean_dec_ref(x_196); + x_240 = lean_box(0); } -lean_ctor_set(x_209, 0, x_197); -lean_ctor_set(x_209, 1, x_198); -lean_ctor_set(x_209, 2, x_208); -lean_ctor_set_uint8(x_209, sizeof(void*)*3, x_72); -x_210 = lean_st_ref_set(x_7, x_209, x_196); -x_211 = lean_ctor_get(x_210, 1); -lean_inc(x_211); -if (lean_is_exclusive(x_210)) { - lean_ctor_release(x_210, 0); - lean_ctor_release(x_210, 1); - x_212 = x_210; +if (lean_is_scalar(x_240)) { + x_241 = lean_alloc_ctor(1, 2, 0); } else { - lean_dec_ref(x_210); - x_212 = lean_box(0); + x_241 = x_240; } -lean_inc(x_1); -x_213 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_213, 0, x_1); -if (lean_is_scalar(x_212)) { - x_214 = lean_alloc_ctor(0, 2, 0); -} else { - x_214 = x_212; -} -lean_ctor_set(x_214, 0, x_213); -lean_ctor_set(x_214, 1, x_211); -x_18 = x_214; -goto block_34; -} -else -{ -lean_object* x_215; 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; -x_215 = lean_box(0); -x_216 = lean_array_fset(x_198, x_3, x_215); -lean_ctor_set(x_42, 4, x_179); -lean_ctor_set(x_42, 3, x_180); -x_217 = lean_array_fset(x_216, x_3, x_42); -if (lean_is_scalar(x_200)) { - x_218 = lean_alloc_ctor(0, 3, 1); -} else { - x_218 = x_200; -} -lean_ctor_set(x_218, 0, x_197); -lean_ctor_set(x_218, 1, x_217); -lean_ctor_set(x_218, 2, x_208); -lean_ctor_set_uint8(x_218, sizeof(void*)*3, x_72); -x_219 = lean_st_ref_set(x_7, x_218, x_196); -x_220 = lean_ctor_get(x_219, 1); -lean_inc(x_220); -if (lean_is_exclusive(x_219)) { - lean_ctor_release(x_219, 0); - lean_ctor_release(x_219, 1); - x_221 = x_219; -} else { - lean_dec_ref(x_219); - x_221 = lean_box(0); -} -lean_inc(x_1); -x_222 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_222, 0, x_1); -if (lean_is_scalar(x_221)) { - x_223 = lean_alloc_ctor(0, 2, 0); -} else { - x_223 = x_221; -} -lean_ctor_set(x_223, 0, x_222); -lean_ctor_set(x_223, 1, x_220); -x_18 = x_223; +lean_ctor_set(x_241, 0, x_238); +lean_ctor_set(x_241, 1, x_239); +x_18 = x_241; goto block_34; } } else { -lean_object* x_224; lean_object* x_225; lean_object* x_226; lean_object* x_227; -lean_dec(x_180); -lean_dec(x_179); -lean_free_object(x_42); -lean_dec(x_59); -lean_dec(x_58); -lean_dec(x_57); -x_224 = lean_ctor_get(x_189, 0); -lean_inc(x_224); -x_225 = lean_ctor_get(x_189, 1); -lean_inc(x_225); -if (lean_is_exclusive(x_189)) { - lean_ctor_release(x_189, 0); - lean_ctor_release(x_189, 1); - x_226 = x_189; -} else { - lean_dec_ref(x_189); - x_226 = lean_box(0); -} -if (lean_is_scalar(x_226)) { - x_227 = lean_alloc_ctor(1, 2, 0); -} else { - x_227 = x_226; -} -lean_ctor_set(x_227, 0, x_224); -lean_ctor_set(x_227, 1, x_225); -x_18 = x_227; -goto block_34; -} -} -else -{ -lean_object* x_228; lean_object* x_229; -lean_dec(x_180); -lean_dec(x_179); +lean_object* x_242; lean_object* x_243; +lean_dec(x_187); +lean_dec(x_186); lean_free_object(x_74); lean_free_object(x_42); lean_dec(x_59); lean_dec(x_58); lean_dec(x_57); lean_inc(x_1); -x_228 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_228, 0, x_1); -x_229 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_229, 0, x_228); -lean_ctor_set(x_229, 1, x_178); -x_18 = x_229; +x_242 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_242, 0, x_1); +x_243 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_243, 0, x_242); +lean_ctor_set(x_243, 1, x_185); +x_18 = x_243; goto block_34; } } } else { -lean_object* x_230; lean_object* x_231; lean_object* x_232; lean_object* x_233; lean_object* x_234; uint8_t x_235; -x_230 = lean_ctor_get(x_74, 0); -lean_inc(x_230); +lean_object* x_244; lean_object* x_245; lean_object* x_246; lean_object* x_247; lean_object* x_248; uint8_t x_249; +x_244 = lean_ctor_get(x_74, 0); +lean_inc(x_244); lean_dec(x_74); -x_231 = lean_ctor_get(x_73, 1); -lean_inc(x_231); +x_245 = lean_ctor_get(x_73, 1); +lean_inc(x_245); if (lean_is_exclusive(x_73)) { lean_ctor_release(x_73, 0); lean_ctor_release(x_73, 1); - x_232 = x_73; + x_246 = x_73; } else { lean_dec_ref(x_73); - x_232 = lean_box(0); + x_246 = lean_box(0); } -x_233 = lean_ctor_get(x_230, 0); -lean_inc(x_233); -x_234 = lean_ctor_get(x_230, 1); -lean_inc(x_234); -lean_dec(x_230); -x_235 = lean_expr_eqv(x_234, x_60); +x_247 = lean_ctor_get(x_244, 0); +lean_inc(x_247); +x_248 = lean_ctor_get(x_244, 1); +lean_inc(x_248); +lean_dec(x_244); +x_249 = lean_expr_eqv(x_248, x_60); lean_dec(x_60); -if (x_235 == 0) +if (x_249 == 0) { -lean_object* x_236; lean_object* x_237; lean_object* x_238; lean_object* x_239; lean_object* x_240; lean_object* x_241; lean_object* x_242; lean_object* x_243; lean_object* x_244; -lean_dec(x_232); -x_236 = lean_st_ref_get(x_11, x_231); -x_237 = lean_ctor_get(x_236, 1); -lean_inc(x_237); -lean_dec(x_236); -x_238 = lean_st_ref_get(x_7, x_237); -x_239 = lean_ctor_get(x_238, 0); -lean_inc(x_239); -x_240 = lean_ctor_get(x_238, 1); -lean_inc(x_240); -lean_dec(x_238); -x_241 = lean_ctor_get(x_239, 2); -lean_inc(x_241); -lean_dec(x_239); -x_242 = lean_ctor_get(x_241, 1); -lean_inc(x_242); -lean_dec(x_241); -lean_inc(x_59); -x_243 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_243, 0, x_59); +lean_object* x_250; lean_object* x_251; lean_object* x_252; lean_object* x_253; lean_object* x_254; lean_object* x_255; lean_object* x_256; lean_object* x_257; +lean_dec(x_246); +x_250 = lean_st_ref_get(x_11, x_245); +x_251 = lean_ctor_get(x_250, 1); +lean_inc(x_251); +lean_dec(x_250); +x_252 = lean_st_ref_get(x_7, x_251); +x_253 = lean_ctor_get(x_252, 0); +lean_inc(x_253); +x_254 = lean_ctor_get(x_252, 1); +lean_inc(x_254); +lean_dec(x_252); +x_255 = lean_ctor_get(x_253, 2); +lean_inc(x_255); +lean_dec(x_253); +x_256 = lean_ctor_get(x_255, 1); +lean_inc(x_256); +lean_dec(x_255); lean_inc(x_11); lean_inc(x_10); lean_inc(x_9); lean_inc(x_8); -lean_inc(x_233); -x_244 = l_Lean_Meta_SimpTheoremsArray_addTheorem(x_242, x_233, x_243, x_8, x_9, x_10, x_11, x_240); -if (lean_obj_tag(x_244) == 0) -{ -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; lean_object* x_256; uint8_t x_257; lean_object* x_258; lean_object* x_259; lean_object* x_260; lean_object* x_261; lean_object* x_262; lean_object* x_263; -x_245 = lean_ctor_get(x_244, 0); -lean_inc(x_245); -x_246 = lean_ctor_get(x_244, 1); -lean_inc(x_246); -lean_dec(x_244); -x_247 = lean_st_ref_get(x_11, x_246); -x_248 = lean_ctor_get(x_247, 1); lean_inc(x_248); -lean_dec(x_247); -x_249 = lean_st_ref_take(x_7, x_248); -x_250 = lean_ctor_get(x_249, 0); -lean_inc(x_250); -x_251 = lean_ctor_get(x_249, 1); -lean_inc(x_251); -lean_dec(x_249); -x_252 = lean_ctor_get(x_250, 0); -lean_inc(x_252); -x_253 = lean_ctor_get(x_250, 1); -lean_inc(x_253); -x_254 = lean_ctor_get(x_250, 2); -lean_inc(x_254); -if (lean_is_exclusive(x_250)) { - lean_ctor_release(x_250, 0); - lean_ctor_release(x_250, 1); - lean_ctor_release(x_250, 2); - x_255 = x_250; -} else { - lean_dec_ref(x_250); - x_255 = lean_box(0); -} -x_256 = lean_array_get_size(x_253); -x_257 = lean_nat_dec_lt(x_3, x_256); -lean_dec(x_256); -x_258 = lean_ctor_get(x_254, 0); +lean_inc(x_247); +x_257 = l_Lean_Meta_mkExpectedTypeHint(x_247, x_248, x_8, x_9, x_10, x_11, x_254); +if (lean_obj_tag(x_257) == 0) +{ +lean_object* x_258; lean_object* x_259; lean_object* x_260; lean_object* x_261; +x_258 = lean_ctor_get(x_257, 0); lean_inc(x_258); -x_259 = lean_ctor_get(x_254, 2); +x_259 = lean_ctor_get(x_257, 1); lean_inc(x_259); -x_260 = lean_ctor_get(x_254, 3); -lean_inc(x_260); -x_261 = lean_ctor_get(x_254, 4); -lean_inc(x_261); -if (lean_is_exclusive(x_254)) { - lean_ctor_release(x_254, 0); - lean_ctor_release(x_254, 1); - lean_ctor_release(x_254, 2); - lean_ctor_release(x_254, 3); - lean_ctor_release(x_254, 4); - x_262 = x_254; -} else { - lean_dec_ref(x_254); - x_262 = lean_box(0); -} -if (lean_is_scalar(x_262)) { - x_263 = lean_alloc_ctor(0, 5, 0); -} else { - x_263 = x_262; -} -lean_ctor_set(x_263, 0, x_258); -lean_ctor_set(x_263, 1, x_245); -lean_ctor_set(x_263, 2, x_259); -lean_ctor_set(x_263, 3, x_260); -lean_ctor_set(x_263, 4, x_261); -if (x_257 == 0) +lean_dec(x_257); +lean_inc(x_59); +x_260 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_260, 0, x_59); +lean_inc(x_11); +lean_inc(x_10); +lean_inc(x_9); +lean_inc(x_8); +x_261 = l_Lean_Meta_SimpTheoremsArray_addTheorem(x_256, x_258, x_260, x_8, x_9, x_10, x_11, x_259); +if (lean_obj_tag(x_261) == 0) { -lean_object* x_264; lean_object* x_265; lean_object* x_266; lean_object* x_267; lean_object* x_268; lean_object* x_269; -lean_dec(x_234); -lean_dec(x_233); -lean_free_object(x_42); -lean_dec(x_59); -lean_dec(x_58); -lean_dec(x_57); -if (lean_is_scalar(x_255)) { - x_264 = lean_alloc_ctor(0, 3, 1); +lean_object* x_262; lean_object* x_263; lean_object* x_264; lean_object* x_265; lean_object* x_266; lean_object* x_267; lean_object* x_268; lean_object* x_269; lean_object* x_270; lean_object* x_271; lean_object* x_272; lean_object* x_273; uint8_t x_274; lean_object* x_275; lean_object* x_276; lean_object* x_277; lean_object* x_278; lean_object* x_279; lean_object* x_280; +x_262 = lean_ctor_get(x_261, 0); +lean_inc(x_262); +x_263 = lean_ctor_get(x_261, 1); +lean_inc(x_263); +lean_dec(x_261); +x_264 = lean_st_ref_get(x_11, x_263); +x_265 = lean_ctor_get(x_264, 1); +lean_inc(x_265); +lean_dec(x_264); +x_266 = lean_st_ref_take(x_7, x_265); +x_267 = lean_ctor_get(x_266, 0); +lean_inc(x_267); +x_268 = lean_ctor_get(x_266, 1); +lean_inc(x_268); +lean_dec(x_266); +x_269 = lean_ctor_get(x_267, 0); +lean_inc(x_269); +x_270 = lean_ctor_get(x_267, 1); +lean_inc(x_270); +x_271 = lean_ctor_get(x_267, 2); +lean_inc(x_271); +if (lean_is_exclusive(x_267)) { + lean_ctor_release(x_267, 0); + lean_ctor_release(x_267, 1); + lean_ctor_release(x_267, 2); + x_272 = x_267; } else { - x_264 = x_255; + lean_dec_ref(x_267); + x_272 = lean_box(0); } -lean_ctor_set(x_264, 0, x_252); -lean_ctor_set(x_264, 1, x_253); -lean_ctor_set(x_264, 2, x_263); -lean_ctor_set_uint8(x_264, sizeof(void*)*3, x_72); -x_265 = lean_st_ref_set(x_7, x_264, x_251); -x_266 = lean_ctor_get(x_265, 1); -lean_inc(x_266); -if (lean_is_exclusive(x_265)) { - lean_ctor_release(x_265, 0); - lean_ctor_release(x_265, 1); - x_267 = x_265; -} else { - lean_dec_ref(x_265); - x_267 = lean_box(0); -} -lean_inc(x_1); -x_268 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_268, 0, x_1); -if (lean_is_scalar(x_267)) { - x_269 = lean_alloc_ctor(0, 2, 0); -} else { - x_269 = x_267; -} -lean_ctor_set(x_269, 0, x_268); -lean_ctor_set(x_269, 1, x_266); -x_18 = x_269; -goto block_34; -} -else -{ -lean_object* x_270; lean_object* x_271; lean_object* x_272; lean_object* x_273; lean_object* x_274; lean_object* x_275; lean_object* x_276; lean_object* x_277; lean_object* x_278; -x_270 = lean_box(0); -x_271 = lean_array_fset(x_253, x_3, x_270); -lean_ctor_set(x_42, 4, x_233); -lean_ctor_set(x_42, 3, x_234); -x_272 = lean_array_fset(x_271, x_3, x_42); -if (lean_is_scalar(x_255)) { - x_273 = lean_alloc_ctor(0, 3, 1); -} else { - x_273 = x_255; -} -lean_ctor_set(x_273, 0, x_252); -lean_ctor_set(x_273, 1, x_272); -lean_ctor_set(x_273, 2, x_263); -lean_ctor_set_uint8(x_273, sizeof(void*)*3, x_72); -x_274 = lean_st_ref_set(x_7, x_273, x_251); -x_275 = lean_ctor_get(x_274, 1); +x_273 = lean_array_get_size(x_270); +x_274 = lean_nat_dec_lt(x_3, x_273); +lean_dec(x_273); +x_275 = lean_ctor_get(x_271, 0); lean_inc(x_275); -if (lean_is_exclusive(x_274)) { - lean_ctor_release(x_274, 0); - lean_ctor_release(x_274, 1); - x_276 = x_274; +x_276 = lean_ctor_get(x_271, 2); +lean_inc(x_276); +x_277 = lean_ctor_get(x_271, 3); +lean_inc(x_277); +x_278 = lean_ctor_get(x_271, 4); +lean_inc(x_278); +if (lean_is_exclusive(x_271)) { + lean_ctor_release(x_271, 0); + lean_ctor_release(x_271, 1); + lean_ctor_release(x_271, 2); + lean_ctor_release(x_271, 3); + lean_ctor_release(x_271, 4); + x_279 = x_271; } else { - lean_dec_ref(x_274); - x_276 = lean_box(0); + lean_dec_ref(x_271); + x_279 = lean_box(0); } -lean_inc(x_1); -x_277 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_277, 0, x_1); -if (lean_is_scalar(x_276)) { - x_278 = lean_alloc_ctor(0, 2, 0); +if (lean_is_scalar(x_279)) { + x_280 = lean_alloc_ctor(0, 5, 0); } else { - x_278 = x_276; + x_280 = x_279; } -lean_ctor_set(x_278, 0, x_277); -lean_ctor_set(x_278, 1, x_275); -x_18 = x_278; -goto block_34; -} -} -else +lean_ctor_set(x_280, 0, x_275); +lean_ctor_set(x_280, 1, x_262); +lean_ctor_set(x_280, 2, x_276); +lean_ctor_set(x_280, 3, x_277); +lean_ctor_set(x_280, 4, x_278); +if (x_274 == 0) { -lean_object* x_279; lean_object* x_280; lean_object* x_281; lean_object* x_282; -lean_dec(x_234); -lean_dec(x_233); +lean_object* x_281; lean_object* x_282; lean_object* x_283; lean_object* x_284; lean_object* x_285; lean_object* x_286; +lean_dec(x_248); +lean_dec(x_247); lean_free_object(x_42); lean_dec(x_59); lean_dec(x_58); lean_dec(x_57); -x_279 = lean_ctor_get(x_244, 0); -lean_inc(x_279); -x_280 = lean_ctor_get(x_244, 1); -lean_inc(x_280); -if (lean_is_exclusive(x_244)) { - lean_ctor_release(x_244, 0); - lean_ctor_release(x_244, 1); - x_281 = x_244; +if (lean_is_scalar(x_272)) { + x_281 = lean_alloc_ctor(0, 3, 1); } else { - lean_dec_ref(x_244); - x_281 = lean_box(0); + x_281 = x_272; } -if (lean_is_scalar(x_281)) { - x_282 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_281, 0, x_269); +lean_ctor_set(x_281, 1, x_270); +lean_ctor_set(x_281, 2, x_280); +lean_ctor_set_uint8(x_281, sizeof(void*)*3, x_72); +x_282 = lean_st_ref_set(x_7, x_281, x_268); +x_283 = lean_ctor_get(x_282, 1); +lean_inc(x_283); +if (lean_is_exclusive(x_282)) { + lean_ctor_release(x_282, 0); + lean_ctor_release(x_282, 1); + x_284 = x_282; } else { - x_282 = x_281; + lean_dec_ref(x_282); + x_284 = lean_box(0); } -lean_ctor_set(x_282, 0, x_279); -lean_ctor_set(x_282, 1, x_280); -x_18 = x_282; +lean_inc(x_1); +x_285 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_285, 0, x_1); +if (lean_is_scalar(x_284)) { + x_286 = lean_alloc_ctor(0, 2, 0); +} else { + x_286 = x_284; +} +lean_ctor_set(x_286, 0, x_285); +lean_ctor_set(x_286, 1, x_283); +x_18 = x_286; +goto block_34; +} +else +{ +lean_object* x_287; lean_object* x_288; lean_object* x_289; lean_object* x_290; lean_object* x_291; lean_object* x_292; lean_object* x_293; lean_object* x_294; lean_object* x_295; +x_287 = lean_box(0); +x_288 = lean_array_fset(x_270, x_3, x_287); +lean_ctor_set(x_42, 4, x_247); +lean_ctor_set(x_42, 3, x_248); +x_289 = lean_array_fset(x_288, x_3, x_42); +if (lean_is_scalar(x_272)) { + x_290 = lean_alloc_ctor(0, 3, 1); +} else { + x_290 = x_272; +} +lean_ctor_set(x_290, 0, x_269); +lean_ctor_set(x_290, 1, x_289); +lean_ctor_set(x_290, 2, x_280); +lean_ctor_set_uint8(x_290, sizeof(void*)*3, x_72); +x_291 = lean_st_ref_set(x_7, x_290, x_268); +x_292 = lean_ctor_get(x_291, 1); +lean_inc(x_292); +if (lean_is_exclusive(x_291)) { + lean_ctor_release(x_291, 0); + lean_ctor_release(x_291, 1); + x_293 = x_291; +} else { + lean_dec_ref(x_291); + x_293 = lean_box(0); +} +lean_inc(x_1); +x_294 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_294, 0, x_1); +if (lean_is_scalar(x_293)) { + x_295 = lean_alloc_ctor(0, 2, 0); +} else { + x_295 = x_293; +} +lean_ctor_set(x_295, 0, x_294); +lean_ctor_set(x_295, 1, x_292); +x_18 = x_295; goto block_34; } } else { -lean_object* x_283; lean_object* x_284; -lean_dec(x_234); -lean_dec(x_233); +lean_object* x_296; lean_object* x_297; lean_object* x_298; lean_object* x_299; +lean_dec(x_248); +lean_dec(x_247); +lean_free_object(x_42); +lean_dec(x_59); +lean_dec(x_58); +lean_dec(x_57); +x_296 = lean_ctor_get(x_261, 0); +lean_inc(x_296); +x_297 = lean_ctor_get(x_261, 1); +lean_inc(x_297); +if (lean_is_exclusive(x_261)) { + lean_ctor_release(x_261, 0); + lean_ctor_release(x_261, 1); + x_298 = x_261; +} else { + lean_dec_ref(x_261); + 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); +x_18 = x_299; +goto block_34; +} +} +else +{ +lean_object* x_300; lean_object* x_301; lean_object* x_302; lean_object* x_303; +lean_dec(x_256); +lean_dec(x_248); +lean_dec(x_247); +lean_free_object(x_42); +lean_dec(x_59); +lean_dec(x_58); +lean_dec(x_57); +x_300 = lean_ctor_get(x_257, 0); +lean_inc(x_300); +x_301 = lean_ctor_get(x_257, 1); +lean_inc(x_301); +if (lean_is_exclusive(x_257)) { + lean_ctor_release(x_257, 0); + lean_ctor_release(x_257, 1); + x_302 = x_257; +} else { + lean_dec_ref(x_257); + x_302 = lean_box(0); +} +if (lean_is_scalar(x_302)) { + x_303 = lean_alloc_ctor(1, 2, 0); +} else { + x_303 = x_302; +} +lean_ctor_set(x_303, 0, x_300); +lean_ctor_set(x_303, 1, x_301); +x_18 = x_303; +goto block_34; +} +} +else +{ +lean_object* x_304; lean_object* x_305; +lean_dec(x_248); +lean_dec(x_247); lean_free_object(x_42); lean_dec(x_59); lean_dec(x_58); lean_dec(x_57); lean_inc(x_1); -x_283 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_283, 0, x_1); -if (lean_is_scalar(x_232)) { - x_284 = lean_alloc_ctor(0, 2, 0); +x_304 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_304, 0, x_1); +if (lean_is_scalar(x_246)) { + x_305 = lean_alloc_ctor(0, 2, 0); } else { - x_284 = x_232; + x_305 = x_246; } -lean_ctor_set(x_284, 0, x_283); -lean_ctor_set(x_284, 1, x_231); -x_18 = x_284; +lean_ctor_set(x_305, 0, x_304); +lean_ctor_set(x_305, 1, x_245); +x_18 = x_305; goto block_34; } } @@ -1771,141 +1914,53 @@ goto block_34; } else { -uint8_t x_285; +uint8_t x_306; lean_free_object(x_42); lean_dec(x_60); lean_dec(x_59); lean_dec(x_58); lean_dec(x_57); -x_285 = !lean_is_exclusive(x_73); -if (x_285 == 0) +x_306 = !lean_is_exclusive(x_73); +if (x_306 == 0) { x_18 = x_73; goto block_34; } else { -lean_object* x_286; lean_object* x_287; lean_object* x_288; -x_286 = lean_ctor_get(x_73, 0); -x_287 = lean_ctor_get(x_73, 1); -lean_inc(x_287); -lean_inc(x_286); -lean_dec(x_73); -x_288 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_288, 0, x_286); -lean_ctor_set(x_288, 1, x_287); -x_18 = x_288; -goto block_34; -} -} -} -else -{ -lean_object* x_289; lean_object* x_290; lean_object* x_291; lean_object* x_292; lean_object* x_293; lean_object* x_294; lean_object* x_295; lean_object* x_296; lean_object* x_297; lean_object* x_298; lean_object* x_299; lean_object* x_300; uint8_t x_301; lean_object* x_302; -x_289 = lean_ctor_get(x_48, 0); -x_290 = lean_ctor_get(x_48, 2); -x_291 = lean_ctor_get(x_48, 3); -x_292 = lean_ctor_get(x_48, 4); -lean_inc(x_292); -lean_inc(x_291); -lean_inc(x_290); -lean_inc(x_289); -lean_dec(x_48); -x_293 = lean_alloc_ctor(0, 5, 0); -lean_ctor_set(x_293, 0, x_289); -lean_ctor_set(x_293, 1, x_62); -lean_ctor_set(x_293, 2, x_290); -lean_ctor_set(x_293, 3, x_291); -lean_ctor_set(x_293, 4, x_292); -x_294 = lean_st_ref_get(x_11, x_53); -x_295 = lean_ctor_get(x_294, 1); -lean_inc(x_295); -lean_dec(x_294); -x_296 = lean_st_ref_get(x_7, x_295); -x_297 = lean_ctor_get(x_296, 0); -lean_inc(x_297); -x_298 = lean_ctor_get(x_296, 1); -lean_inc(x_298); -lean_dec(x_296); -x_299 = lean_ctor_get(x_297, 0); -lean_inc(x_299); -lean_dec(x_297); -x_300 = lean_box(0); -x_301 = 1; -lean_inc(x_11); -lean_inc(x_10); -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_60); -x_302 = l_Lean_Meta_simpStep(x_299, x_61, x_60, x_293, x_300, x_301, x_8, x_9, x_10, x_11, x_298); -if (lean_obj_tag(x_302) == 0) -{ -lean_object* x_303; -x_303 = lean_ctor_get(x_302, 0); -lean_inc(x_303); -if (lean_obj_tag(x_303) == 0) -{ -lean_object* x_304; lean_object* x_305; lean_object* x_306; lean_object* x_307; -lean_free_object(x_42); -lean_dec(x_60); -lean_dec(x_59); -lean_dec(x_58); -lean_dec(x_57); -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_Std_Range_forIn_loop___at___private_Lean_Meta_Tactic_Simp_SimpAll_0__Lean_Meta_SimpAll_loop___spec__1___closed__3; -if (lean_is_scalar(x_305)) { - x_307 = lean_alloc_ctor(0, 2, 0); -} else { - x_307 = x_305; -} -lean_ctor_set(x_307, 0, x_306); -lean_ctor_set(x_307, 1, x_304); -x_18 = x_307; -goto block_34; -} -else -{ -lean_object* x_308; lean_object* x_309; lean_object* x_310; lean_object* x_311; lean_object* x_312; lean_object* x_313; uint8_t x_314; -x_308 = lean_ctor_get(x_303, 0); +lean_object* x_307; lean_object* x_308; lean_object* x_309; +x_307 = lean_ctor_get(x_73, 0); +x_308 = lean_ctor_get(x_73, 1); lean_inc(x_308); -if (lean_is_exclusive(x_303)) { - lean_ctor_release(x_303, 0); - x_309 = x_303; -} else { - lean_dec_ref(x_303); - x_309 = lean_box(0); +lean_inc(x_307); +lean_dec(x_73); +x_309 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_309, 0, x_307); +lean_ctor_set(x_309, 1, x_308); +x_18 = x_309; +goto block_34; } -x_310 = lean_ctor_get(x_302, 1); -lean_inc(x_310); -if (lean_is_exclusive(x_302)) { - lean_ctor_release(x_302, 0); - lean_ctor_release(x_302, 1); - x_311 = x_302; -} else { - lean_dec_ref(x_302); - x_311 = lean_box(0); } -x_312 = lean_ctor_get(x_308, 0); -lean_inc(x_312); -x_313 = lean_ctor_get(x_308, 1); -lean_inc(x_313); -lean_dec(x_308); -x_314 = lean_expr_eqv(x_313, x_60); -lean_dec(x_60); -if (x_314 == 0) +} +else { -lean_object* x_315; lean_object* x_316; lean_object* x_317; lean_object* x_318; lean_object* x_319; lean_object* x_320; lean_object* x_321; lean_object* x_322; lean_object* x_323; -lean_dec(x_311); -x_315 = lean_st_ref_get(x_11, x_310); +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; lean_object* x_318; lean_object* x_319; lean_object* x_320; lean_object* x_321; uint8_t x_322; lean_object* x_323; +x_310 = lean_ctor_get(x_48, 0); +x_311 = lean_ctor_get(x_48, 2); +x_312 = lean_ctor_get(x_48, 3); +x_313 = lean_ctor_get(x_48, 4); +lean_inc(x_313); +lean_inc(x_312); +lean_inc(x_311); +lean_inc(x_310); +lean_dec(x_48); +x_314 = lean_alloc_ctor(0, 5, 0); +lean_ctor_set(x_314, 0, x_310); +lean_ctor_set(x_314, 1, x_62); +lean_ctor_set(x_314, 2, x_311); +lean_ctor_set(x_314, 3, x_312); +lean_ctor_set(x_314, 4, x_313); +x_315 = lean_st_ref_get(x_11, x_53); x_316 = lean_ctor_get(x_315, 1); lean_inc(x_316); lean_dec(x_315); @@ -1915,658 +1970,841 @@ lean_inc(x_318); x_319 = lean_ctor_get(x_317, 1); lean_inc(x_319); lean_dec(x_317); -x_320 = lean_ctor_get(x_318, 2); +x_320 = lean_ctor_get(x_318, 0); lean_inc(x_320); lean_dec(x_318); -x_321 = lean_ctor_get(x_320, 1); -lean_inc(x_321); -lean_dec(x_320); -lean_inc(x_59); -if (lean_is_scalar(x_309)) { - x_322 = lean_alloc_ctor(1, 1, 0); -} else { - x_322 = x_309; -} -lean_ctor_set(x_322, 0, x_59); +x_321 = lean_box(0); +x_322 = 1; lean_inc(x_11); lean_inc(x_10); lean_inc(x_9); lean_inc(x_8); -lean_inc(x_312); -x_323 = l_Lean_Meta_SimpTheoremsArray_addTheorem(x_321, x_312, x_322, x_8, x_9, x_10, x_11, x_319); +lean_inc(x_60); +x_323 = l_Lean_Meta_simpStep(x_320, x_61, x_60, x_314, x_321, x_322, x_8, x_9, x_10, x_11, x_319); if (lean_obj_tag(x_323) == 0) { -lean_object* x_324; lean_object* x_325; lean_object* x_326; lean_object* x_327; 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; uint8_t 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; +lean_object* x_324; x_324 = lean_ctor_get(x_323, 0); lean_inc(x_324); -x_325 = lean_ctor_get(x_323, 1); -lean_inc(x_325); -lean_dec(x_323); -x_326 = lean_st_ref_get(x_11, x_325); -x_327 = lean_ctor_get(x_326, 1); -lean_inc(x_327); -lean_dec(x_326); -x_328 = lean_st_ref_take(x_7, x_327); -x_329 = lean_ctor_get(x_328, 0); -lean_inc(x_329); -x_330 = lean_ctor_get(x_328, 1); -lean_inc(x_330); -lean_dec(x_328); -x_331 = lean_ctor_get(x_329, 0); -lean_inc(x_331); -x_332 = lean_ctor_get(x_329, 1); -lean_inc(x_332); -x_333 = lean_ctor_get(x_329, 2); -lean_inc(x_333); -if (lean_is_exclusive(x_329)) { - lean_ctor_release(x_329, 0); - lean_ctor_release(x_329, 1); - lean_ctor_release(x_329, 2); - x_334 = x_329; -} else { - lean_dec_ref(x_329); - x_334 = lean_box(0); -} -x_335 = lean_array_get_size(x_332); -x_336 = lean_nat_dec_lt(x_3, x_335); -lean_dec(x_335); -x_337 = lean_ctor_get(x_333, 0); -lean_inc(x_337); -x_338 = lean_ctor_get(x_333, 2); -lean_inc(x_338); -x_339 = lean_ctor_get(x_333, 3); -lean_inc(x_339); -x_340 = lean_ctor_get(x_333, 4); -lean_inc(x_340); -if (lean_is_exclusive(x_333)) { - lean_ctor_release(x_333, 0); - lean_ctor_release(x_333, 1); - lean_ctor_release(x_333, 2); - lean_ctor_release(x_333, 3); - lean_ctor_release(x_333, 4); - x_341 = x_333; -} else { - lean_dec_ref(x_333); - x_341 = lean_box(0); -} -if (lean_is_scalar(x_341)) { - x_342 = lean_alloc_ctor(0, 5, 0); -} else { - x_342 = x_341; -} -lean_ctor_set(x_342, 0, x_337); -lean_ctor_set(x_342, 1, x_324); -lean_ctor_set(x_342, 2, x_338); -lean_ctor_set(x_342, 3, x_339); -lean_ctor_set(x_342, 4, x_340); -if (x_336 == 0) +if (lean_obj_tag(x_324) == 0) { -lean_object* x_343; lean_object* x_344; lean_object* x_345; lean_object* x_346; lean_object* x_347; lean_object* x_348; -lean_dec(x_313); -lean_dec(x_312); -lean_free_object(x_42); -lean_dec(x_59); -lean_dec(x_58); -lean_dec(x_57); -if (lean_is_scalar(x_334)) { - x_343 = lean_alloc_ctor(0, 3, 1); -} else { - x_343 = x_334; -} -lean_ctor_set(x_343, 0, x_331); -lean_ctor_set(x_343, 1, x_332); -lean_ctor_set(x_343, 2, x_342); -lean_ctor_set_uint8(x_343, sizeof(void*)*3, x_301); -x_344 = lean_st_ref_set(x_7, x_343, x_330); -x_345 = lean_ctor_get(x_344, 1); -lean_inc(x_345); -if (lean_is_exclusive(x_344)) { - lean_ctor_release(x_344, 0); - lean_ctor_release(x_344, 1); - x_346 = x_344; -} else { - lean_dec_ref(x_344); - x_346 = lean_box(0); -} -lean_inc(x_1); -x_347 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_347, 0, x_1); -if (lean_is_scalar(x_346)) { - x_348 = lean_alloc_ctor(0, 2, 0); -} else { - x_348 = x_346; -} -lean_ctor_set(x_348, 0, x_347); -lean_ctor_set(x_348, 1, x_345); -x_18 = x_348; -goto block_34; -} -else -{ -lean_object* x_349; lean_object* x_350; lean_object* x_351; lean_object* x_352; lean_object* x_353; lean_object* x_354; lean_object* x_355; lean_object* x_356; lean_object* x_357; -x_349 = lean_box(0); -x_350 = lean_array_fset(x_332, x_3, x_349); -lean_ctor_set(x_42, 4, x_312); -lean_ctor_set(x_42, 3, x_313); -x_351 = lean_array_fset(x_350, x_3, x_42); -if (lean_is_scalar(x_334)) { - x_352 = lean_alloc_ctor(0, 3, 1); -} else { - x_352 = x_334; -} -lean_ctor_set(x_352, 0, x_331); -lean_ctor_set(x_352, 1, x_351); -lean_ctor_set(x_352, 2, x_342); -lean_ctor_set_uint8(x_352, sizeof(void*)*3, x_301); -x_353 = lean_st_ref_set(x_7, x_352, x_330); -x_354 = lean_ctor_get(x_353, 1); -lean_inc(x_354); -if (lean_is_exclusive(x_353)) { - lean_ctor_release(x_353, 0); - lean_ctor_release(x_353, 1); - x_355 = x_353; -} else { - lean_dec_ref(x_353); - x_355 = lean_box(0); -} -lean_inc(x_1); -x_356 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_356, 0, x_1); -if (lean_is_scalar(x_355)) { - x_357 = lean_alloc_ctor(0, 2, 0); -} else { - x_357 = x_355; -} -lean_ctor_set(x_357, 0, x_356); -lean_ctor_set(x_357, 1, x_354); -x_18 = x_357; -goto block_34; -} -} -else -{ -lean_object* x_358; lean_object* x_359; lean_object* x_360; lean_object* x_361; -lean_dec(x_313); -lean_dec(x_312); -lean_free_object(x_42); -lean_dec(x_59); -lean_dec(x_58); -lean_dec(x_57); -x_358 = lean_ctor_get(x_323, 0); -lean_inc(x_358); -x_359 = lean_ctor_get(x_323, 1); -lean_inc(x_359); -if (lean_is_exclusive(x_323)) { - lean_ctor_release(x_323, 0); - lean_ctor_release(x_323, 1); - x_360 = x_323; -} else { - lean_dec_ref(x_323); - x_360 = lean_box(0); -} -if (lean_is_scalar(x_360)) { - x_361 = lean_alloc_ctor(1, 2, 0); -} else { - x_361 = x_360; -} -lean_ctor_set(x_361, 0, x_358); -lean_ctor_set(x_361, 1, x_359); -x_18 = x_361; -goto block_34; -} -} -else -{ -lean_object* x_362; lean_object* x_363; -lean_dec(x_313); -lean_dec(x_312); -lean_dec(x_309); -lean_free_object(x_42); -lean_dec(x_59); -lean_dec(x_58); -lean_dec(x_57); -lean_inc(x_1); -x_362 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_362, 0, x_1); -if (lean_is_scalar(x_311)) { - x_363 = lean_alloc_ctor(0, 2, 0); -} else { - x_363 = x_311; -} -lean_ctor_set(x_363, 0, x_362); -lean_ctor_set(x_363, 1, x_310); -x_18 = x_363; -goto block_34; -} -} -} -else -{ -lean_object* x_364; lean_object* x_365; lean_object* x_366; lean_object* x_367; +lean_object* x_325; lean_object* x_326; lean_object* x_327; lean_object* x_328; lean_free_object(x_42); lean_dec(x_60); lean_dec(x_59); lean_dec(x_58); lean_dec(x_57); -x_364 = lean_ctor_get(x_302, 0); +x_325 = lean_ctor_get(x_323, 1); +lean_inc(x_325); +if (lean_is_exclusive(x_323)) { + lean_ctor_release(x_323, 0); + lean_ctor_release(x_323, 1); + x_326 = x_323; +} else { + lean_dec_ref(x_323); + x_326 = lean_box(0); +} +x_327 = l_Std_Range_forIn_loop___at___private_Lean_Meta_Tactic_Simp_SimpAll_0__Lean_Meta_SimpAll_loop___spec__1___closed__3; +if (lean_is_scalar(x_326)) { + x_328 = lean_alloc_ctor(0, 2, 0); +} else { + x_328 = x_326; +} +lean_ctor_set(x_328, 0, x_327); +lean_ctor_set(x_328, 1, x_325); +x_18 = x_328; +goto block_34; +} +else +{ +lean_object* x_329; lean_object* x_330; lean_object* x_331; lean_object* x_332; lean_object* x_333; lean_object* x_334; uint8_t x_335; +x_329 = lean_ctor_get(x_324, 0); +lean_inc(x_329); +if (lean_is_exclusive(x_324)) { + lean_ctor_release(x_324, 0); + x_330 = x_324; +} else { + lean_dec_ref(x_324); + x_330 = lean_box(0); +} +x_331 = lean_ctor_get(x_323, 1); +lean_inc(x_331); +if (lean_is_exclusive(x_323)) { + lean_ctor_release(x_323, 0); + lean_ctor_release(x_323, 1); + x_332 = x_323; +} else { + lean_dec_ref(x_323); + x_332 = lean_box(0); +} +x_333 = lean_ctor_get(x_329, 0); +lean_inc(x_333); +x_334 = lean_ctor_get(x_329, 1); +lean_inc(x_334); +lean_dec(x_329); +x_335 = lean_expr_eqv(x_334, x_60); +lean_dec(x_60); +if (x_335 == 0) +{ +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; lean_object* x_343; +lean_dec(x_332); +x_336 = lean_st_ref_get(x_11, x_331); +x_337 = lean_ctor_get(x_336, 1); +lean_inc(x_337); +lean_dec(x_336); +x_338 = lean_st_ref_get(x_7, x_337); +x_339 = lean_ctor_get(x_338, 0); +lean_inc(x_339); +x_340 = lean_ctor_get(x_338, 1); +lean_inc(x_340); +lean_dec(x_338); +x_341 = lean_ctor_get(x_339, 2); +lean_inc(x_341); +lean_dec(x_339); +x_342 = lean_ctor_get(x_341, 1); +lean_inc(x_342); +lean_dec(x_341); +lean_inc(x_11); +lean_inc(x_10); +lean_inc(x_9); +lean_inc(x_8); +lean_inc(x_334); +lean_inc(x_333); +x_343 = l_Lean_Meta_mkExpectedTypeHint(x_333, x_334, x_8, x_9, x_10, x_11, x_340); +if (lean_obj_tag(x_343) == 0) +{ +lean_object* x_344; lean_object* x_345; lean_object* x_346; lean_object* x_347; +x_344 = lean_ctor_get(x_343, 0); +lean_inc(x_344); +x_345 = lean_ctor_get(x_343, 1); +lean_inc(x_345); +lean_dec(x_343); +lean_inc(x_59); +if (lean_is_scalar(x_330)) { + x_346 = lean_alloc_ctor(1, 1, 0); +} else { + x_346 = x_330; +} +lean_ctor_set(x_346, 0, x_59); +lean_inc(x_11); +lean_inc(x_10); +lean_inc(x_9); +lean_inc(x_8); +x_347 = l_Lean_Meta_SimpTheoremsArray_addTheorem(x_342, x_344, x_346, x_8, x_9, x_10, x_11, x_345); +if (lean_obj_tag(x_347) == 0) +{ +lean_object* x_348; lean_object* x_349; lean_object* x_350; lean_object* x_351; lean_object* x_352; lean_object* x_353; lean_object* x_354; lean_object* x_355; lean_object* x_356; lean_object* x_357; lean_object* x_358; lean_object* x_359; uint8_t x_360; lean_object* x_361; lean_object* x_362; lean_object* x_363; lean_object* x_364; lean_object* x_365; lean_object* x_366; +x_348 = lean_ctor_get(x_347, 0); +lean_inc(x_348); +x_349 = lean_ctor_get(x_347, 1); +lean_inc(x_349); +lean_dec(x_347); +x_350 = lean_st_ref_get(x_11, x_349); +x_351 = lean_ctor_get(x_350, 1); +lean_inc(x_351); +lean_dec(x_350); +x_352 = lean_st_ref_take(x_7, x_351); +x_353 = lean_ctor_get(x_352, 0); +lean_inc(x_353); +x_354 = lean_ctor_get(x_352, 1); +lean_inc(x_354); +lean_dec(x_352); +x_355 = lean_ctor_get(x_353, 0); +lean_inc(x_355); +x_356 = lean_ctor_get(x_353, 1); +lean_inc(x_356); +x_357 = lean_ctor_get(x_353, 2); +lean_inc(x_357); +if (lean_is_exclusive(x_353)) { + lean_ctor_release(x_353, 0); + lean_ctor_release(x_353, 1); + lean_ctor_release(x_353, 2); + x_358 = x_353; +} else { + lean_dec_ref(x_353); + x_358 = lean_box(0); +} +x_359 = lean_array_get_size(x_356); +x_360 = lean_nat_dec_lt(x_3, x_359); +lean_dec(x_359); +x_361 = lean_ctor_get(x_357, 0); +lean_inc(x_361); +x_362 = lean_ctor_get(x_357, 2); +lean_inc(x_362); +x_363 = lean_ctor_get(x_357, 3); +lean_inc(x_363); +x_364 = lean_ctor_get(x_357, 4); lean_inc(x_364); -x_365 = lean_ctor_get(x_302, 1); -lean_inc(x_365); -if (lean_is_exclusive(x_302)) { - lean_ctor_release(x_302, 0); - lean_ctor_release(x_302, 1); - x_366 = x_302; +if (lean_is_exclusive(x_357)) { + lean_ctor_release(x_357, 0); + lean_ctor_release(x_357, 1); + lean_ctor_release(x_357, 2); + lean_ctor_release(x_357, 3); + lean_ctor_release(x_357, 4); + x_365 = x_357; } else { - lean_dec_ref(x_302); - x_366 = lean_box(0); + lean_dec_ref(x_357); + x_365 = lean_box(0); } -if (lean_is_scalar(x_366)) { - x_367 = lean_alloc_ctor(1, 2, 0); +if (lean_is_scalar(x_365)) { + x_366 = lean_alloc_ctor(0, 5, 0); } else { - x_367 = x_366; + x_366 = x_365; } -lean_ctor_set(x_367, 0, x_364); -lean_ctor_set(x_367, 1, x_365); -x_18 = x_367; +lean_ctor_set(x_366, 0, x_361); +lean_ctor_set(x_366, 1, x_348); +lean_ctor_set(x_366, 2, x_362); +lean_ctor_set(x_366, 3, x_363); +lean_ctor_set(x_366, 4, x_364); +if (x_360 == 0) +{ +lean_object* x_367; lean_object* x_368; lean_object* x_369; lean_object* x_370; lean_object* x_371; lean_object* x_372; +lean_dec(x_334); +lean_dec(x_333); +lean_free_object(x_42); +lean_dec(x_59); +lean_dec(x_58); +lean_dec(x_57); +if (lean_is_scalar(x_358)) { + x_367 = lean_alloc_ctor(0, 3, 1); +} else { + x_367 = x_358; +} +lean_ctor_set(x_367, 0, x_355); +lean_ctor_set(x_367, 1, x_356); +lean_ctor_set(x_367, 2, x_366); +lean_ctor_set_uint8(x_367, sizeof(void*)*3, x_322); +x_368 = lean_st_ref_set(x_7, x_367, x_354); +x_369 = lean_ctor_get(x_368, 1); +lean_inc(x_369); +if (lean_is_exclusive(x_368)) { + lean_ctor_release(x_368, 0); + lean_ctor_release(x_368, 1); + x_370 = x_368; +} else { + lean_dec_ref(x_368); + x_370 = lean_box(0); +} +lean_inc(x_1); +x_371 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_371, 0, x_1); +if (lean_is_scalar(x_370)) { + x_372 = lean_alloc_ctor(0, 2, 0); +} else { + x_372 = x_370; +} +lean_ctor_set(x_372, 0, x_371); +lean_ctor_set(x_372, 1, x_369); +x_18 = x_372; +goto block_34; +} +else +{ +lean_object* x_373; lean_object* x_374; lean_object* x_375; lean_object* x_376; lean_object* x_377; lean_object* x_378; lean_object* x_379; lean_object* x_380; lean_object* x_381; +x_373 = lean_box(0); +x_374 = lean_array_fset(x_356, x_3, x_373); +lean_ctor_set(x_42, 4, x_333); +lean_ctor_set(x_42, 3, x_334); +x_375 = lean_array_fset(x_374, x_3, x_42); +if (lean_is_scalar(x_358)) { + x_376 = lean_alloc_ctor(0, 3, 1); +} else { + x_376 = x_358; +} +lean_ctor_set(x_376, 0, x_355); +lean_ctor_set(x_376, 1, x_375); +lean_ctor_set(x_376, 2, x_366); +lean_ctor_set_uint8(x_376, sizeof(void*)*3, x_322); +x_377 = lean_st_ref_set(x_7, x_376, x_354); +x_378 = lean_ctor_get(x_377, 1); +lean_inc(x_378); +if (lean_is_exclusive(x_377)) { + lean_ctor_release(x_377, 0); + lean_ctor_release(x_377, 1); + x_379 = x_377; +} else { + lean_dec_ref(x_377); + x_379 = lean_box(0); +} +lean_inc(x_1); +x_380 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_380, 0, x_1); +if (lean_is_scalar(x_379)) { + x_381 = lean_alloc_ctor(0, 2, 0); +} else { + x_381 = x_379; +} +lean_ctor_set(x_381, 0, x_380); +lean_ctor_set(x_381, 1, x_378); +x_18 = x_381; +goto block_34; +} +} +else +{ +lean_object* x_382; lean_object* x_383; lean_object* x_384; lean_object* x_385; +lean_dec(x_334); +lean_dec(x_333); +lean_free_object(x_42); +lean_dec(x_59); +lean_dec(x_58); +lean_dec(x_57); +x_382 = lean_ctor_get(x_347, 0); +lean_inc(x_382); +x_383 = lean_ctor_get(x_347, 1); +lean_inc(x_383); +if (lean_is_exclusive(x_347)) { + lean_ctor_release(x_347, 0); + lean_ctor_release(x_347, 1); + x_384 = x_347; +} else { + lean_dec_ref(x_347); + x_384 = lean_box(0); +} +if (lean_is_scalar(x_384)) { + x_385 = lean_alloc_ctor(1, 2, 0); +} else { + x_385 = x_384; +} +lean_ctor_set(x_385, 0, x_382); +lean_ctor_set(x_385, 1, x_383); +x_18 = x_385; +goto block_34; +} +} +else +{ +lean_object* x_386; lean_object* x_387; lean_object* x_388; lean_object* x_389; +lean_dec(x_342); +lean_dec(x_334); +lean_dec(x_333); +lean_dec(x_330); +lean_free_object(x_42); +lean_dec(x_59); +lean_dec(x_58); +lean_dec(x_57); +x_386 = lean_ctor_get(x_343, 0); +lean_inc(x_386); +x_387 = lean_ctor_get(x_343, 1); +lean_inc(x_387); +if (lean_is_exclusive(x_343)) { + lean_ctor_release(x_343, 0); + lean_ctor_release(x_343, 1); + x_388 = x_343; +} else { + lean_dec_ref(x_343); + x_388 = lean_box(0); +} +if (lean_is_scalar(x_388)) { + x_389 = lean_alloc_ctor(1, 2, 0); +} else { + x_389 = x_388; +} +lean_ctor_set(x_389, 0, x_386); +lean_ctor_set(x_389, 1, x_387); +x_18 = x_389; +goto block_34; +} +} +else +{ +lean_object* x_390; lean_object* x_391; +lean_dec(x_334); +lean_dec(x_333); +lean_dec(x_330); +lean_free_object(x_42); +lean_dec(x_59); +lean_dec(x_58); +lean_dec(x_57); +lean_inc(x_1); +x_390 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_390, 0, x_1); +if (lean_is_scalar(x_332)) { + x_391 = lean_alloc_ctor(0, 2, 0); +} else { + x_391 = x_332; +} +lean_ctor_set(x_391, 0, x_390); +lean_ctor_set(x_391, 1, x_331); +x_18 = x_391; goto block_34; } } } else { -lean_object* x_368; lean_object* x_369; lean_object* x_370; lean_object* x_371; lean_object* x_372; lean_object* x_373; lean_object* x_374; lean_object* x_375; lean_object* x_376; lean_object* x_377; lean_object* x_378; lean_object* x_379; lean_object* x_380; lean_object* x_381; lean_object* x_382; lean_object* x_383; lean_object* x_384; lean_object* x_385; lean_object* x_386; uint8_t x_387; lean_object* x_388; -x_368 = lean_ctor_get(x_42, 0); -x_369 = lean_ctor_get(x_42, 1); -x_370 = lean_ctor_get(x_42, 2); -x_371 = lean_ctor_get(x_42, 3); -x_372 = lean_ctor_get(x_42, 4); -lean_inc(x_372); -lean_inc(x_371); -lean_inc(x_370); -lean_inc(x_369); -lean_inc(x_368); +lean_object* x_392; lean_object* x_393; lean_object* x_394; lean_object* x_395; +lean_free_object(x_42); +lean_dec(x_60); +lean_dec(x_59); +lean_dec(x_58); +lean_dec(x_57); +x_392 = lean_ctor_get(x_323, 0); +lean_inc(x_392); +x_393 = lean_ctor_get(x_323, 1); +lean_inc(x_393); +if (lean_is_exclusive(x_323)) { + lean_ctor_release(x_323, 0); + lean_ctor_release(x_323, 1); + x_394 = x_323; +} else { + lean_dec_ref(x_323); + x_394 = lean_box(0); +} +if (lean_is_scalar(x_394)) { + x_395 = lean_alloc_ctor(1, 2, 0); +} else { + x_395 = x_394; +} +lean_ctor_set(x_395, 0, x_392); +lean_ctor_set(x_395, 1, x_393); +x_18 = x_395; +goto block_34; +} +} +} +else +{ +lean_object* x_396; lean_object* x_397; lean_object* x_398; lean_object* x_399; lean_object* x_400; lean_object* x_401; lean_object* x_402; lean_object* x_403; lean_object* x_404; lean_object* x_405; lean_object* x_406; lean_object* x_407; lean_object* x_408; lean_object* x_409; lean_object* x_410; lean_object* x_411; lean_object* x_412; lean_object* x_413; lean_object* x_414; uint8_t x_415; lean_object* x_416; +x_396 = lean_ctor_get(x_42, 0); +x_397 = lean_ctor_get(x_42, 1); +x_398 = lean_ctor_get(x_42, 2); +x_399 = lean_ctor_get(x_42, 3); +x_400 = lean_ctor_get(x_42, 4); +lean_inc(x_400); +lean_inc(x_399); +lean_inc(x_398); +lean_inc(x_397); +lean_inc(x_396); lean_dec(x_42); -lean_inc(x_370); -x_373 = l_Lean_Meta_SimpTheoremsArray_eraseTheorem(x_55, x_370); -x_374 = lean_ctor_get(x_48, 0); -lean_inc(x_374); -x_375 = lean_ctor_get(x_48, 2); -lean_inc(x_375); -x_376 = lean_ctor_get(x_48, 3); -lean_inc(x_376); -x_377 = lean_ctor_get(x_48, 4); -lean_inc(x_377); +lean_inc(x_398); +x_401 = l_Lean_Meta_SimpTheoremsArray_eraseTheorem(x_55, x_398); +x_402 = lean_ctor_get(x_48, 0); +lean_inc(x_402); +x_403 = lean_ctor_get(x_48, 2); +lean_inc(x_403); +x_404 = lean_ctor_get(x_48, 3); +lean_inc(x_404); +x_405 = lean_ctor_get(x_48, 4); +lean_inc(x_405); if (lean_is_exclusive(x_48)) { lean_ctor_release(x_48, 0); lean_ctor_release(x_48, 1); lean_ctor_release(x_48, 2); lean_ctor_release(x_48, 3); lean_ctor_release(x_48, 4); - x_378 = x_48; + x_406 = x_48; } else { lean_dec_ref(x_48); - x_378 = lean_box(0); + x_406 = lean_box(0); } -if (lean_is_scalar(x_378)) { - x_379 = lean_alloc_ctor(0, 5, 0); +if (lean_is_scalar(x_406)) { + x_407 = lean_alloc_ctor(0, 5, 0); } else { - x_379 = x_378; + x_407 = x_406; } -lean_ctor_set(x_379, 0, x_374); -lean_ctor_set(x_379, 1, x_373); -lean_ctor_set(x_379, 2, x_375); -lean_ctor_set(x_379, 3, x_376); -lean_ctor_set(x_379, 4, x_377); -x_380 = lean_st_ref_get(x_11, x_53); -x_381 = lean_ctor_get(x_380, 1); -lean_inc(x_381); -lean_dec(x_380); -x_382 = lean_st_ref_get(x_7, x_381); -x_383 = lean_ctor_get(x_382, 0); -lean_inc(x_383); -x_384 = lean_ctor_get(x_382, 1); -lean_inc(x_384); -lean_dec(x_382); -x_385 = lean_ctor_get(x_383, 0); -lean_inc(x_385); -lean_dec(x_383); -x_386 = lean_box(0); -x_387 = 1; -lean_inc(x_11); -lean_inc(x_10); -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_371); -x_388 = l_Lean_Meta_simpStep(x_385, x_372, x_371, x_379, x_386, x_387, x_8, x_9, x_10, x_11, x_384); -if (lean_obj_tag(x_388) == 0) -{ -lean_object* x_389; -x_389 = lean_ctor_get(x_388, 0); -lean_inc(x_389); -if (lean_obj_tag(x_389) == 0) -{ -lean_object* x_390; lean_object* x_391; lean_object* x_392; lean_object* x_393; -lean_dec(x_371); -lean_dec(x_370); -lean_dec(x_369); -lean_dec(x_368); -x_390 = lean_ctor_get(x_388, 1); -lean_inc(x_390); -if (lean_is_exclusive(x_388)) { - lean_ctor_release(x_388, 0); - lean_ctor_release(x_388, 1); - x_391 = x_388; -} else { - lean_dec_ref(x_388); - x_391 = lean_box(0); -} -x_392 = l_Std_Range_forIn_loop___at___private_Lean_Meta_Tactic_Simp_SimpAll_0__Lean_Meta_SimpAll_loop___spec__1___closed__3; -if (lean_is_scalar(x_391)) { - x_393 = lean_alloc_ctor(0, 2, 0); -} else { - x_393 = x_391; -} -lean_ctor_set(x_393, 0, x_392); -lean_ctor_set(x_393, 1, x_390); -x_18 = x_393; -goto block_34; -} -else -{ -lean_object* x_394; lean_object* x_395; lean_object* x_396; lean_object* x_397; lean_object* x_398; lean_object* x_399; uint8_t x_400; -x_394 = lean_ctor_get(x_389, 0); -lean_inc(x_394); -if (lean_is_exclusive(x_389)) { - lean_ctor_release(x_389, 0); - x_395 = x_389; -} else { - lean_dec_ref(x_389); - x_395 = lean_box(0); -} -x_396 = lean_ctor_get(x_388, 1); -lean_inc(x_396); -if (lean_is_exclusive(x_388)) { - lean_ctor_release(x_388, 0); - lean_ctor_release(x_388, 1); - x_397 = x_388; -} else { - lean_dec_ref(x_388); - x_397 = lean_box(0); -} -x_398 = lean_ctor_get(x_394, 0); -lean_inc(x_398); -x_399 = lean_ctor_get(x_394, 1); -lean_inc(x_399); -lean_dec(x_394); -x_400 = lean_expr_eqv(x_399, x_371); -lean_dec(x_371); -if (x_400 == 0) -{ -lean_object* x_401; lean_object* x_402; lean_object* x_403; lean_object* x_404; lean_object* x_405; lean_object* x_406; lean_object* x_407; lean_object* x_408; lean_object* x_409; -lean_dec(x_397); -x_401 = lean_st_ref_get(x_11, x_396); -x_402 = lean_ctor_get(x_401, 1); -lean_inc(x_402); -lean_dec(x_401); -x_403 = lean_st_ref_get(x_7, x_402); -x_404 = lean_ctor_get(x_403, 0); -lean_inc(x_404); -x_405 = lean_ctor_get(x_403, 1); -lean_inc(x_405); -lean_dec(x_403); -x_406 = lean_ctor_get(x_404, 2); -lean_inc(x_406); -lean_dec(x_404); -x_407 = lean_ctor_get(x_406, 1); -lean_inc(x_407); -lean_dec(x_406); -lean_inc(x_370); -if (lean_is_scalar(x_395)) { - x_408 = lean_alloc_ctor(1, 1, 0); -} else { - x_408 = x_395; -} -lean_ctor_set(x_408, 0, x_370); -lean_inc(x_11); -lean_inc(x_10); -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_398); -x_409 = l_Lean_Meta_SimpTheoremsArray_addTheorem(x_407, x_398, x_408, x_8, x_9, x_10, x_11, x_405); -if (lean_obj_tag(x_409) == 0) -{ -lean_object* x_410; lean_object* x_411; lean_object* x_412; lean_object* x_413; lean_object* x_414; lean_object* x_415; lean_object* x_416; lean_object* x_417; lean_object* x_418; lean_object* x_419; lean_object* x_420; lean_object* x_421; uint8_t x_422; lean_object* x_423; lean_object* x_424; lean_object* x_425; lean_object* x_426; lean_object* x_427; lean_object* x_428; -x_410 = lean_ctor_get(x_409, 0); -lean_inc(x_410); -x_411 = lean_ctor_get(x_409, 1); +lean_ctor_set(x_407, 0, x_402); +lean_ctor_set(x_407, 1, x_401); +lean_ctor_set(x_407, 2, x_403); +lean_ctor_set(x_407, 3, x_404); +lean_ctor_set(x_407, 4, x_405); +x_408 = lean_st_ref_get(x_11, x_53); +x_409 = lean_ctor_get(x_408, 1); +lean_inc(x_409); +lean_dec(x_408); +x_410 = lean_st_ref_get(x_7, x_409); +x_411 = lean_ctor_get(x_410, 0); lean_inc(x_411); -lean_dec(x_409); -x_412 = lean_st_ref_get(x_11, x_411); -x_413 = lean_ctor_get(x_412, 1); +x_412 = lean_ctor_get(x_410, 1); +lean_inc(x_412); +lean_dec(x_410); +x_413 = lean_ctor_get(x_411, 0); lean_inc(x_413); -lean_dec(x_412); -x_414 = lean_st_ref_take(x_7, x_413); -x_415 = lean_ctor_get(x_414, 0); -lean_inc(x_415); -x_416 = lean_ctor_get(x_414, 1); -lean_inc(x_416); -lean_dec(x_414); -x_417 = lean_ctor_get(x_415, 0); -lean_inc(x_417); -x_418 = lean_ctor_get(x_415, 1); -lean_inc(x_418); -x_419 = lean_ctor_get(x_415, 2); -lean_inc(x_419); -if (lean_is_exclusive(x_415)) { - lean_ctor_release(x_415, 0); - lean_ctor_release(x_415, 1); - lean_ctor_release(x_415, 2); - x_420 = x_415; -} else { - lean_dec_ref(x_415); - x_420 = lean_box(0); -} -x_421 = lean_array_get_size(x_418); -x_422 = lean_nat_dec_lt(x_3, x_421); -lean_dec(x_421); -x_423 = lean_ctor_get(x_419, 0); -lean_inc(x_423); -x_424 = lean_ctor_get(x_419, 2); -lean_inc(x_424); -x_425 = lean_ctor_get(x_419, 3); -lean_inc(x_425); -x_426 = lean_ctor_get(x_419, 4); -lean_inc(x_426); -if (lean_is_exclusive(x_419)) { - lean_ctor_release(x_419, 0); - lean_ctor_release(x_419, 1); - lean_ctor_release(x_419, 2); - lean_ctor_release(x_419, 3); - lean_ctor_release(x_419, 4); - x_427 = x_419; -} else { - lean_dec_ref(x_419); - x_427 = lean_box(0); -} -if (lean_is_scalar(x_427)) { - x_428 = lean_alloc_ctor(0, 5, 0); -} else { - x_428 = x_427; -} -lean_ctor_set(x_428, 0, x_423); -lean_ctor_set(x_428, 1, x_410); -lean_ctor_set(x_428, 2, x_424); -lean_ctor_set(x_428, 3, x_425); -lean_ctor_set(x_428, 4, x_426); -if (x_422 == 0) +lean_dec(x_411); +x_414 = lean_box(0); +x_415 = 1; +lean_inc(x_11); +lean_inc(x_10); +lean_inc(x_9); +lean_inc(x_8); +lean_inc(x_399); +x_416 = l_Lean_Meta_simpStep(x_413, x_400, x_399, x_407, x_414, x_415, x_8, x_9, x_10, x_11, x_412); +if (lean_obj_tag(x_416) == 0) { -lean_object* x_429; lean_object* x_430; lean_object* x_431; lean_object* x_432; lean_object* x_433; lean_object* x_434; +lean_object* x_417; +x_417 = lean_ctor_get(x_416, 0); +lean_inc(x_417); +if (lean_obj_tag(x_417) == 0) +{ +lean_object* x_418; lean_object* x_419; lean_object* x_420; lean_object* x_421; lean_dec(x_399); lean_dec(x_398); -lean_dec(x_370); -lean_dec(x_369); -lean_dec(x_368); -if (lean_is_scalar(x_420)) { - x_429 = lean_alloc_ctor(0, 3, 1); +lean_dec(x_397); +lean_dec(x_396); +x_418 = lean_ctor_get(x_416, 1); +lean_inc(x_418); +if (lean_is_exclusive(x_416)) { + lean_ctor_release(x_416, 0); + lean_ctor_release(x_416, 1); + x_419 = x_416; } else { - x_429 = x_420; + lean_dec_ref(x_416); + x_419 = lean_box(0); } -lean_ctor_set(x_429, 0, x_417); -lean_ctor_set(x_429, 1, x_418); -lean_ctor_set(x_429, 2, x_428); -lean_ctor_set_uint8(x_429, sizeof(void*)*3, x_387); -x_430 = lean_st_ref_set(x_7, x_429, x_416); -x_431 = lean_ctor_get(x_430, 1); -lean_inc(x_431); -if (lean_is_exclusive(x_430)) { - lean_ctor_release(x_430, 0); - lean_ctor_release(x_430, 1); - x_432 = x_430; +x_420 = l_Std_Range_forIn_loop___at___private_Lean_Meta_Tactic_Simp_SimpAll_0__Lean_Meta_SimpAll_loop___spec__1___closed__3; +if (lean_is_scalar(x_419)) { + x_421 = lean_alloc_ctor(0, 2, 0); } else { - lean_dec_ref(x_430); - x_432 = lean_box(0); + x_421 = x_419; } -lean_inc(x_1); -x_433 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_433, 0, x_1); -if (lean_is_scalar(x_432)) { - x_434 = lean_alloc_ctor(0, 2, 0); -} else { - x_434 = x_432; -} -lean_ctor_set(x_434, 0, x_433); -lean_ctor_set(x_434, 1, x_431); -x_18 = x_434; +lean_ctor_set(x_421, 0, x_420); +lean_ctor_set(x_421, 1, x_418); +x_18 = x_421; goto block_34; } else { -lean_object* x_435; lean_object* x_436; lean_object* x_437; lean_object* x_438; lean_object* x_439; lean_object* x_440; lean_object* x_441; lean_object* x_442; lean_object* x_443; lean_object* x_444; -x_435 = lean_box(0); -x_436 = lean_array_fset(x_418, x_3, x_435); -x_437 = lean_alloc_ctor(0, 5, 0); -lean_ctor_set(x_437, 0, x_368); -lean_ctor_set(x_437, 1, x_369); -lean_ctor_set(x_437, 2, x_370); -lean_ctor_set(x_437, 3, x_399); -lean_ctor_set(x_437, 4, x_398); -x_438 = lean_array_fset(x_436, x_3, x_437); -if (lean_is_scalar(x_420)) { - x_439 = lean_alloc_ctor(0, 3, 1); +lean_object* x_422; lean_object* x_423; lean_object* x_424; lean_object* x_425; lean_object* x_426; lean_object* x_427; uint8_t x_428; +x_422 = lean_ctor_get(x_417, 0); +lean_inc(x_422); +if (lean_is_exclusive(x_417)) { + lean_ctor_release(x_417, 0); + x_423 = x_417; } else { - x_439 = x_420; + lean_dec_ref(x_417); + x_423 = lean_box(0); } -lean_ctor_set(x_439, 0, x_417); -lean_ctor_set(x_439, 1, x_438); -lean_ctor_set(x_439, 2, x_428); -lean_ctor_set_uint8(x_439, sizeof(void*)*3, x_387); -x_440 = lean_st_ref_set(x_7, x_439, x_416); -x_441 = lean_ctor_get(x_440, 1); +x_424 = lean_ctor_get(x_416, 1); +lean_inc(x_424); +if (lean_is_exclusive(x_416)) { + lean_ctor_release(x_416, 0); + lean_ctor_release(x_416, 1); + x_425 = x_416; +} else { + lean_dec_ref(x_416); + x_425 = lean_box(0); +} +x_426 = lean_ctor_get(x_422, 0); +lean_inc(x_426); +x_427 = lean_ctor_get(x_422, 1); +lean_inc(x_427); +lean_dec(x_422); +x_428 = lean_expr_eqv(x_427, x_399); +lean_dec(x_399); +if (x_428 == 0) +{ +lean_object* x_429; lean_object* x_430; lean_object* x_431; lean_object* x_432; lean_object* x_433; lean_object* x_434; lean_object* x_435; lean_object* x_436; +lean_dec(x_425); +x_429 = lean_st_ref_get(x_11, x_424); +x_430 = lean_ctor_get(x_429, 1); +lean_inc(x_430); +lean_dec(x_429); +x_431 = lean_st_ref_get(x_7, x_430); +x_432 = lean_ctor_get(x_431, 0); +lean_inc(x_432); +x_433 = lean_ctor_get(x_431, 1); +lean_inc(x_433); +lean_dec(x_431); +x_434 = lean_ctor_get(x_432, 2); +lean_inc(x_434); +lean_dec(x_432); +x_435 = lean_ctor_get(x_434, 1); +lean_inc(x_435); +lean_dec(x_434); +lean_inc(x_11); +lean_inc(x_10); +lean_inc(x_9); +lean_inc(x_8); +lean_inc(x_427); +lean_inc(x_426); +x_436 = l_Lean_Meta_mkExpectedTypeHint(x_426, x_427, x_8, x_9, x_10, x_11, x_433); +if (lean_obj_tag(x_436) == 0) +{ +lean_object* x_437; lean_object* x_438; lean_object* x_439; lean_object* x_440; +x_437 = lean_ctor_get(x_436, 0); +lean_inc(x_437); +x_438 = lean_ctor_get(x_436, 1); +lean_inc(x_438); +lean_dec(x_436); +lean_inc(x_398); +if (lean_is_scalar(x_423)) { + x_439 = lean_alloc_ctor(1, 1, 0); +} else { + x_439 = x_423; +} +lean_ctor_set(x_439, 0, x_398); +lean_inc(x_11); +lean_inc(x_10); +lean_inc(x_9); +lean_inc(x_8); +x_440 = l_Lean_Meta_SimpTheoremsArray_addTheorem(x_435, x_437, x_439, x_8, x_9, x_10, x_11, x_438); +if (lean_obj_tag(x_440) == 0) +{ +lean_object* x_441; lean_object* x_442; lean_object* x_443; lean_object* x_444; lean_object* x_445; lean_object* x_446; lean_object* x_447; lean_object* x_448; lean_object* x_449; lean_object* x_450; lean_object* x_451; lean_object* x_452; uint8_t x_453; lean_object* x_454; lean_object* x_455; lean_object* x_456; lean_object* x_457; lean_object* x_458; lean_object* x_459; +x_441 = lean_ctor_get(x_440, 0); lean_inc(x_441); +x_442 = lean_ctor_get(x_440, 1); +lean_inc(x_442); +lean_dec(x_440); +x_443 = lean_st_ref_get(x_11, x_442); +x_444 = lean_ctor_get(x_443, 1); +lean_inc(x_444); +lean_dec(x_443); +x_445 = lean_st_ref_take(x_7, x_444); +x_446 = lean_ctor_get(x_445, 0); +lean_inc(x_446); +x_447 = lean_ctor_get(x_445, 1); +lean_inc(x_447); +lean_dec(x_445); +x_448 = lean_ctor_get(x_446, 0); +lean_inc(x_448); +x_449 = lean_ctor_get(x_446, 1); +lean_inc(x_449); +x_450 = lean_ctor_get(x_446, 2); +lean_inc(x_450); +if (lean_is_exclusive(x_446)) { + lean_ctor_release(x_446, 0); + lean_ctor_release(x_446, 1); + lean_ctor_release(x_446, 2); + x_451 = x_446; +} else { + lean_dec_ref(x_446); + x_451 = lean_box(0); +} +x_452 = lean_array_get_size(x_449); +x_453 = lean_nat_dec_lt(x_3, x_452); +lean_dec(x_452); +x_454 = lean_ctor_get(x_450, 0); +lean_inc(x_454); +x_455 = lean_ctor_get(x_450, 2); +lean_inc(x_455); +x_456 = lean_ctor_get(x_450, 3); +lean_inc(x_456); +x_457 = lean_ctor_get(x_450, 4); +lean_inc(x_457); +if (lean_is_exclusive(x_450)) { + lean_ctor_release(x_450, 0); + lean_ctor_release(x_450, 1); + lean_ctor_release(x_450, 2); + lean_ctor_release(x_450, 3); + lean_ctor_release(x_450, 4); + x_458 = x_450; +} else { + lean_dec_ref(x_450); + x_458 = lean_box(0); +} +if (lean_is_scalar(x_458)) { + x_459 = lean_alloc_ctor(0, 5, 0); +} else { + x_459 = x_458; +} +lean_ctor_set(x_459, 0, x_454); +lean_ctor_set(x_459, 1, x_441); +lean_ctor_set(x_459, 2, x_455); +lean_ctor_set(x_459, 3, x_456); +lean_ctor_set(x_459, 4, x_457); +if (x_453 == 0) +{ +lean_object* x_460; lean_object* x_461; lean_object* x_462; lean_object* x_463; lean_object* x_464; lean_object* x_465; +lean_dec(x_427); +lean_dec(x_426); +lean_dec(x_398); +lean_dec(x_397); +lean_dec(x_396); +if (lean_is_scalar(x_451)) { + x_460 = lean_alloc_ctor(0, 3, 1); +} else { + x_460 = x_451; +} +lean_ctor_set(x_460, 0, x_448); +lean_ctor_set(x_460, 1, x_449); +lean_ctor_set(x_460, 2, x_459); +lean_ctor_set_uint8(x_460, sizeof(void*)*3, x_415); +x_461 = lean_st_ref_set(x_7, x_460, x_447); +x_462 = lean_ctor_get(x_461, 1); +lean_inc(x_462); +if (lean_is_exclusive(x_461)) { + lean_ctor_release(x_461, 0); + lean_ctor_release(x_461, 1); + x_463 = x_461; +} else { + lean_dec_ref(x_461); + x_463 = lean_box(0); +} +lean_inc(x_1); +x_464 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_464, 0, x_1); +if (lean_is_scalar(x_463)) { + x_465 = lean_alloc_ctor(0, 2, 0); +} else { + x_465 = x_463; +} +lean_ctor_set(x_465, 0, x_464); +lean_ctor_set(x_465, 1, x_462); +x_18 = x_465; +goto block_34; +} +else +{ +lean_object* x_466; lean_object* x_467; lean_object* x_468; lean_object* x_469; lean_object* x_470; lean_object* x_471; lean_object* x_472; lean_object* x_473; lean_object* x_474; lean_object* x_475; +x_466 = lean_box(0); +x_467 = lean_array_fset(x_449, x_3, x_466); +x_468 = lean_alloc_ctor(0, 5, 0); +lean_ctor_set(x_468, 0, x_396); +lean_ctor_set(x_468, 1, x_397); +lean_ctor_set(x_468, 2, x_398); +lean_ctor_set(x_468, 3, x_427); +lean_ctor_set(x_468, 4, x_426); +x_469 = lean_array_fset(x_467, x_3, x_468); +if (lean_is_scalar(x_451)) { + x_470 = lean_alloc_ctor(0, 3, 1); +} else { + x_470 = x_451; +} +lean_ctor_set(x_470, 0, x_448); +lean_ctor_set(x_470, 1, x_469); +lean_ctor_set(x_470, 2, x_459); +lean_ctor_set_uint8(x_470, sizeof(void*)*3, x_415); +x_471 = lean_st_ref_set(x_7, x_470, x_447); +x_472 = lean_ctor_get(x_471, 1); +lean_inc(x_472); +if (lean_is_exclusive(x_471)) { + lean_ctor_release(x_471, 0); + lean_ctor_release(x_471, 1); + x_473 = x_471; +} else { + lean_dec_ref(x_471); + x_473 = lean_box(0); +} +lean_inc(x_1); +x_474 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_474, 0, x_1); +if (lean_is_scalar(x_473)) { + x_475 = lean_alloc_ctor(0, 2, 0); +} else { + x_475 = x_473; +} +lean_ctor_set(x_475, 0, x_474); +lean_ctor_set(x_475, 1, x_472); +x_18 = x_475; +goto block_34; +} +} +else +{ +lean_object* x_476; lean_object* x_477; lean_object* x_478; lean_object* x_479; +lean_dec(x_427); +lean_dec(x_426); +lean_dec(x_398); +lean_dec(x_397); +lean_dec(x_396); +x_476 = lean_ctor_get(x_440, 0); +lean_inc(x_476); +x_477 = lean_ctor_get(x_440, 1); +lean_inc(x_477); if (lean_is_exclusive(x_440)) { lean_ctor_release(x_440, 0); lean_ctor_release(x_440, 1); - x_442 = x_440; + x_478 = x_440; } else { lean_dec_ref(x_440); - x_442 = lean_box(0); + x_478 = lean_box(0); } -lean_inc(x_1); -x_443 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_443, 0, x_1); -if (lean_is_scalar(x_442)) { - x_444 = lean_alloc_ctor(0, 2, 0); +if (lean_is_scalar(x_478)) { + x_479 = lean_alloc_ctor(1, 2, 0); } else { - x_444 = x_442; + x_479 = x_478; } -lean_ctor_set(x_444, 0, x_443); -lean_ctor_set(x_444, 1, x_441); -x_18 = x_444; +lean_ctor_set(x_479, 0, x_476); +lean_ctor_set(x_479, 1, x_477); +x_18 = x_479; goto block_34; } } else { -lean_object* x_445; lean_object* x_446; lean_object* x_447; lean_object* x_448; +lean_object* x_480; lean_object* x_481; lean_object* x_482; lean_object* x_483; +lean_dec(x_435); +lean_dec(x_427); +lean_dec(x_426); +lean_dec(x_423); +lean_dec(x_398); +lean_dec(x_397); +lean_dec(x_396); +x_480 = lean_ctor_get(x_436, 0); +lean_inc(x_480); +x_481 = lean_ctor_get(x_436, 1); +lean_inc(x_481); +if (lean_is_exclusive(x_436)) { + lean_ctor_release(x_436, 0); + lean_ctor_release(x_436, 1); + x_482 = x_436; +} else { + lean_dec_ref(x_436); + x_482 = lean_box(0); +} +if (lean_is_scalar(x_482)) { + x_483 = lean_alloc_ctor(1, 2, 0); +} else { + x_483 = x_482; +} +lean_ctor_set(x_483, 0, x_480); +lean_ctor_set(x_483, 1, x_481); +x_18 = x_483; +goto block_34; +} +} +else +{ +lean_object* x_484; lean_object* x_485; +lean_dec(x_427); +lean_dec(x_426); +lean_dec(x_423); +lean_dec(x_398); +lean_dec(x_397); +lean_dec(x_396); +lean_inc(x_1); +x_484 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_484, 0, x_1); +if (lean_is_scalar(x_425)) { + x_485 = lean_alloc_ctor(0, 2, 0); +} else { + x_485 = x_425; +} +lean_ctor_set(x_485, 0, x_484); +lean_ctor_set(x_485, 1, x_424); +x_18 = x_485; +goto block_34; +} +} +} +else +{ +lean_object* x_486; lean_object* x_487; lean_object* x_488; lean_object* x_489; lean_dec(x_399); lean_dec(x_398); -lean_dec(x_370); -lean_dec(x_369); -lean_dec(x_368); -x_445 = lean_ctor_get(x_409, 0); -lean_inc(x_445); -x_446 = lean_ctor_get(x_409, 1); -lean_inc(x_446); -if (lean_is_exclusive(x_409)) { - lean_ctor_release(x_409, 0); - lean_ctor_release(x_409, 1); - x_447 = x_409; +lean_dec(x_397); +lean_dec(x_396); +x_486 = lean_ctor_get(x_416, 0); +lean_inc(x_486); +x_487 = lean_ctor_get(x_416, 1); +lean_inc(x_487); +if (lean_is_exclusive(x_416)) { + lean_ctor_release(x_416, 0); + lean_ctor_release(x_416, 1); + x_488 = x_416; } else { - lean_dec_ref(x_409); - x_447 = lean_box(0); + lean_dec_ref(x_416); + x_488 = lean_box(0); } -if (lean_is_scalar(x_447)) { - x_448 = lean_alloc_ctor(1, 2, 0); +if (lean_is_scalar(x_488)) { + x_489 = lean_alloc_ctor(1, 2, 0); } else { - x_448 = x_447; + x_489 = x_488; } -lean_ctor_set(x_448, 0, x_445); -lean_ctor_set(x_448, 1, x_446); -x_18 = x_448; -goto block_34; -} -} -else -{ -lean_object* x_449; lean_object* x_450; -lean_dec(x_399); -lean_dec(x_398); -lean_dec(x_395); -lean_dec(x_370); -lean_dec(x_369); -lean_dec(x_368); -lean_inc(x_1); -x_449 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_449, 0, x_1); -if (lean_is_scalar(x_397)) { - x_450 = lean_alloc_ctor(0, 2, 0); -} else { - x_450 = x_397; -} -lean_ctor_set(x_450, 0, x_449); -lean_ctor_set(x_450, 1, x_396); -x_18 = x_450; -goto block_34; -} -} -} -else -{ -lean_object* x_451; lean_object* x_452; lean_object* x_453; lean_object* x_454; -lean_dec(x_371); -lean_dec(x_370); -lean_dec(x_369); -lean_dec(x_368); -x_451 = lean_ctor_get(x_388, 0); -lean_inc(x_451); -x_452 = lean_ctor_get(x_388, 1); -lean_inc(x_452); -if (lean_is_exclusive(x_388)) { - lean_ctor_release(x_388, 0); - lean_ctor_release(x_388, 1); - x_453 = x_388; -} else { - lean_dec_ref(x_388); - x_453 = lean_box(0); -} -if (lean_is_scalar(x_453)) { - x_454 = lean_alloc_ctor(1, 2, 0); -} else { - x_454 = x_453; -} -lean_ctor_set(x_454, 0, x_451); -lean_ctor_set(x_454, 1, x_452); -x_18 = x_454; +lean_ctor_set(x_489, 0, x_486); +lean_ctor_set(x_489, 1, x_487); +x_18 = x_489; goto block_34; } } @@ -2665,7 +2903,7 @@ return x_33; } else { -lean_object* x_455; +lean_object* x_490; lean_dec(x_11); lean_dec(x_10); lean_dec(x_9); @@ -2673,15 +2911,15 @@ lean_dec(x_8); lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); -x_455 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_455, 0, x_6); -lean_ctor_set(x_455, 1, x_12); -return x_455; +x_490 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_490, 0, x_6); +lean_ctor_set(x_490, 1, x_12); +return x_490; } } else { -lean_object* x_456; +lean_object* x_491; lean_dec(x_11); lean_dec(x_10); lean_dec(x_9); @@ -2689,10 +2927,10 @@ lean_dec(x_8); lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); -x_456 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_456, 0, x_6); -lean_ctor_set(x_456, 1, x_12); -return x_456; +x_491 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_491, 0, x_6); +lean_ctor_set(x_491, 1, x_12); +return x_491; } } } diff --git a/stage0/stdlib/Lean/Meta/Tactic/Simp/SimpTheorems.c b/stage0/stdlib/Lean/Meta/Tactic/Simp/SimpTheorems.c index 78eb2b531d..531351288b 100644 --- a/stage0/stdlib/Lean/Meta/Tactic/Simp/SimpTheorems.c +++ b/stage0/stdlib/Lean/Meta/Tactic/Simp/SimpTheorems.c @@ -52,7 +52,6 @@ lean_object* lean_array_uget(lean_object*, size_t); LEAN_EXPORT lean_object* l_Lean_throwError___at___private_Lean_Meta_Tactic_Simp_SimpTheorems_0__Lean_Meta_mkSimpTheoremCore___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_mkSimpAttr___lambda__1___closed__13; LEAN_EXPORT lean_object* l_Lean_Meta_SimpExtension_getTheorems(lean_object*, lean_object*, lean_object*, lean_object*); -LEAN_EXPORT lean_object* l_Lean_Meta_isRflTheorem___boxed(lean_object*, lean_object*, lean_object*, lean_object*); uint64_t lean_uint64_of_nat(lean_object*); LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_mkSimpAttr___spec__1(lean_object*, uint8_t, uint8_t, lean_object*, lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l___private_Lean_Meta_Tactic_Simp_SimpTheorems_0__Lean_Meta_preprocess_go___closed__6; @@ -77,6 +76,7 @@ lean_object* lean_environment_find(lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_addSimpTheorem(lean_object*, lean_object*, uint8_t, uint8_t, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_getConstInfo___at_Lean_Meta_mkConstWithFreshMVarLevels___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_SimpTheorem_keys___default___closed__1; +static lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpTheorems___hyg_4612____closed__1; LEAN_EXPORT uint8_t l_Lean_Meta_instBEqSimpTheorem(lean_object*, lean_object*); LEAN_EXPORT uint8_t l_Lean_Meta_SimpTheoremsArray_isDeclToUnfold(lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_throwError___at___private_Lean_Meta_Tactic_Simp_SimpTheorems_0__Lean_Meta_mkSimpTheoremCore___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -95,7 +95,10 @@ LEAN_EXPORT lean_object* l___private_Lean_Meta_Tactic_Simp_SimpTheorems_0__Lean_ static lean_object* l_Lean_Meta___aux__Lean__Meta__Tactic__Simp__SimpTheorems______macroRules__Lean__Meta__commandRegister__simp__attr________1___closed__31; uint8_t lean_name_eq(lean_object*, lean_object*); static lean_object* l_Lean_Meta___aux__Lean__Meta__Tactic__Simp__SimpTheorems______macroRules__Lean__Meta__commandRegister__simp__attr________1___closed__36; +uint8_t l_Lean_Expr_isApp(lean_object*); LEAN_EXPORT uint8_t l_Array_anyMUnsafe_any___at_Lean_Meta_addSimpTheoremEntry___spec__12(lean_object*, lean_object*, size_t, size_t); +static lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpTheorems___hyg_4612____closed__2; +static lean_object* l_Lean_Meta_isRflProof___closed__4; static lean_object* l___private_Lean_Meta_Tactic_Simp_SimpTheorems_0__Lean_Meta_preprocess_go___closed__2; lean_object* l_Lean_Expr_appFn_x21(lean_object*); static lean_object* l_Lean_Meta___aux__Lean__Meta__Tactic__Simp__SimpTheorems______macroRules__Lean__Meta__commandRegister__simp__attr________1___closed__26; @@ -128,8 +131,9 @@ lean_object* l_Lean_ScopedEnvExtension_addScopedEntry___rarg(lean_object*, lean_ LEAN_EXPORT lean_object* l___private_Lean_Meta_Tactic_Simp_SimpTheorems_0__Lean_Meta_preprocess_go___lambda__4___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Expr_appArg_x21(lean_object*); static lean_object* l___private_Lean_Meta_Tactic_Simp_SimpTheorems_0__Lean_Meta_preprocess_go___closed__8; +static lean_object* l_Lean_Meta_isRflProofCore___closed__8; lean_object* lean_string_utf8_byte_size(lean_object*); -LEAN_EXPORT lean_object* l_Lean_Meta_isRflProof(lean_object*, lean_object*, lean_object*, lean_object*); +LEAN_EXPORT lean_object* l_Lean_Meta_isRflProof(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l___private_Lean_Meta_Tactic_Simp_SimpTheorems_0__Lean_Meta_shouldPreprocess___closed__1; LEAN_EXPORT lean_object* l_Std_AssocList_contains___at_Lean_Meta_registerSimpAttr___spec__2___boxed(lean_object*, lean_object*); static lean_object* l_Lean_Meta_instInhabitedSimpTheorems___closed__2; @@ -159,7 +163,7 @@ LEAN_EXPORT uint8_t l_Std_PersistentHashMap_contains___at_Lean_Meta_SimpTheorems static lean_object* l_Lean_Meta___aux__Lean__Meta__Tactic__Simp__SimpTheorems______macroRules__Lean__Meta__commandRegister__simp__attr________1___closed__37; LEAN_EXPORT lean_object* l_Std_HashMap_insert___at_Lean_Meta_registerSimpAttr___spec__1(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_getAttrParamOptPrio(lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpTheorems___hyg_4450____closed__4; +LEAN_EXPORT lean_object* l_Lean_Meta_isRflProof___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l___private_Lean_Meta_Tactic_Simp_SimpTheorems_0__Lean_Meta_preprocess_go___lambda__3___closed__12; LEAN_EXPORT lean_object* l_Lean_Meta_SimpTheorem_keys___default; lean_object* l_Lean_ConstantInfo_levelParams(lean_object*); @@ -185,13 +189,13 @@ lean_object* lean_st_ref_take(lean_object*, lean_object*); lean_object* l_Lean_ScopedEnvExtension_addLocalEntry___rarg(lean_object*, lean_object*, lean_object*); lean_object* lean_nat_sub(lean_object*, lean_object*); lean_object* l_Std_PersistentHashMap_insert___at_Lean_NameSSet_insert___spec__2(lean_object*, lean_object*, lean_object*); -LEAN_EXPORT lean_object* l_Lean_Meta_isRflProof___boxed(lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Meta_Tactic_Simp_SimpTheorems_0__Lean_Meta_preprocessProof(lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Std_HashMapImp_moveEntries___at_Lean_Meta_registerSimpAttr___spec__4(lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta___aux__Lean__Meta__Tactic__Simp__SimpTheorems______macroRules__Lean__Meta__commandRegister__simp__attr________1___closed__16; LEAN_EXPORT lean_object* l_Lean_Meta_SimpTheorems_addDeclToUnfold___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Meta_DiscrTree_0__Lean_Meta_DiscrTree_createNodes___rarg(lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Std_PersistentHashMap_insertAtCollisionNodeAux___at_Lean_Meta_addSimpTheoremEntry___spec__8(lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_Meta_isRflProof___closed__1; LEAN_EXPORT lean_object* l_Lean_Meta_SimpTheorems_add_getName_x3f(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l___private_Lean_Meta_Tactic_Simp_SimpTheorems_0__Lean_Meta_preprocess_go___closed__3; LEAN_EXPORT uint8_t l_Lean_Meta_SimpTheorems_isLemma(lean_object*, lean_object*); @@ -204,9 +208,9 @@ LEAN_EXPORT lean_object* l_Std_PersistentHashMap_find_x3f___at_Lean_Meta_addSimp LEAN_EXPORT lean_object* l_Lean_Meta_simpExtension; static lean_object* l___private_Lean_Meta_Tactic_Simp_SimpTheorems_0__Lean_Meta_mkSimpTheoremCore___lambda__2___closed__1; static size_t l_Std_PersistentHashMap_findAux___at_Lean_Meta_addSimpTheoremEntry___spec__3___closed__1; -static lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpTheorems___hyg_4450____closed__1; +LEAN_EXPORT lean_object* l_Std_mkHashMap___at_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpTheorems___hyg_4517____spec__1___boxed(lean_object*); static lean_object* l_Lean_Meta___aux__Lean__Meta__Tactic__Simp__SimpTheorems______macroRules__Lean__Meta__commandRegister__simp__attr________1___closed__20; -static lean_object* l_Lean_Meta_instToFormatSimpTheorem___closed__6; +lean_object* l_Lean_addTrace___at_Lean_Meta_processPostponed_loop___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_withLCtx___at___private_Lean_Meta_Basic_0__Lean_Meta_mkLeveErrorMessageCore___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l___private_Lean_Meta_Tactic_Simp_SimpTheorems_0__Lean_Meta_mkSimpTheoremCore___lambda__2___closed__2; lean_object* l_Lean_Name_toString(lean_object*, uint8_t); @@ -234,6 +238,7 @@ static lean_object* l_Lean_Meta_SimpTheorem_getName___closed__2; lean_object* lean_st_mk_ref(lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_getConstInfo___at_Lean_Meta_isRflTheorem___spec__1(lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_mkSimpExt___lambda__1(lean_object*, lean_object*); +LEAN_EXPORT lean_object* l_Std_mkHashMap___at_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpTheorems___hyg_4517____spec__1(lean_object*); lean_object* l_Lean_Syntax_getId(lean_object*); lean_object* l___private_Init_Meta_0__Lean_quoteNameMk(lean_object*); extern lean_object* l_Lean_Expr_instHashableExpr; @@ -242,7 +247,6 @@ static lean_object* l_Lean_Meta_commandRegister__simp__attr_________closed__1; lean_object* l_Std_PersistentHashMap_mkEmptyEntriesArray(lean_object*, lean_object*); static lean_object* l___private_Lean_Meta_Tactic_Simp_SimpTheorems_0__Lean_Meta_preprocess_go___lambda__2___closed__2; static lean_object* l___private_Lean_Meta_Tactic_Simp_SimpTheorems_0__Lean_Meta_preprocess_go___closed__5; -static lean_object* l_Lean_Meta_commandRegister__simp__attr_________closed__17; lean_object* l_Array_back___rarg(lean_object*, lean_object*); static lean_object* l_Lean_Meta_SimpTheorems_toUnfoldThms___default___closed__1; uint8_t l_Lean_ConstantInfo_hasValue(lean_object*); @@ -255,7 +259,6 @@ static lean_object* l_Lean_Meta___aux__Lean__Meta__Tactic__Simp__SimpTheorems___ LEAN_EXPORT lean_object* l_Lean_Meta_SimpTheorems_erase___at_Lean_Meta_mkSimpAttr___spec__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_mkSimpAttr___lambda__1___closed__20; uint8_t l_Lean_Expr_isAppOfArity(lean_object*, lean_object*, lean_object*); -static lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpTheorems___hyg_4450____closed__2; static lean_object* l_Lean_Meta_SimpTheorems_addDeclToUnfold___lambda__2___closed__1; static lean_object* l_Lean_Meta_isRflProofCore___closed__1; LEAN_EXPORT lean_object* l___private_Lean_Meta_Tactic_Simp_SimpTheorems_0__Lean_Meta_isPerm___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -269,23 +272,23 @@ lean_object* l___private_Init_Util_0__mkPanicMessageWithDecl(lean_object*, lean_ uint8_t l_Lean_Expr_isConst(lean_object*); uint8_t l_Array_isEmpty___rarg(lean_object*); static lean_object* l_Lean_Meta_instToFormatSimpTheorem___closed__5; -LEAN_EXPORT lean_object* l_Lean_Meta_isRflProofCore___boxed(lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_SimpTheorems_isDeclToUnfold___boxed(lean_object*, lean_object*); uint8_t l_Lean_Expr_isConstOf(lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_SimpExtension_getTheorems___boxed(lean_object*, lean_object*, lean_object*, lean_object*); -LEAN_EXPORT lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpTheorems___hyg_4450_(lean_object*); -LEAN_EXPORT lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpTheorems___hyg_4355_(lean_object*); +LEAN_EXPORT lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpTheorems___hyg_4612_(lean_object*); +LEAN_EXPORT lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpTheorems___hyg_4517_(lean_object*); size_t lean_usize_mul(size_t, size_t); static lean_object* l_Lean_Meta___aux__Lean__Meta__Tactic__Simp__SimpTheorems______macroRules__Lean__Meta__commandRegister__simp__attr________1___closed__23; static lean_object* l___private_Lean_Meta_Tactic_Simp_SimpTheorems_0__Lean_Meta_preprocess_go___lambda__3___closed__9; LEAN_EXPORT lean_object* l_Lean_Meta_SimpTheorems_eraseCore(lean_object*, lean_object*); uint8_t l_Lean_Expr_isForall(lean_object*); +static lean_object* l_Lean_Meta_isRflProof___closed__5; LEAN_EXPORT lean_object* l_Array_contains___at_Lean_Meta_addSimpTheoremEntry___spec__11___boxed(lean_object*, lean_object*); lean_object* lean_whnf(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Std_PersistentHashMap_containsAtAux___at_Lean_Meta_SimpTheorems_erase___spec__3___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_instInhabitedSimpTheorems; static lean_object* l_Lean_Meta_SimpTheorem_getValue___closed__1; -LEAN_EXPORT uint8_t l_Lean_Meta_isRflProofCore(lean_object*, lean_object*); +LEAN_EXPORT lean_object* l_Lean_Meta_isRflProofCore(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); size_t lean_usize_of_nat(lean_object*); LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_SimpTheorems_addDeclToUnfold___spec__1(lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_DiscrTree_insertCore___at_Lean_Meta_addSimpTheoremEntry___spec__1(lean_object*, lean_object*, lean_object*); @@ -319,11 +322,13 @@ LEAN_EXPORT lean_object* l_List_mapM___at___private_Lean_Meta_Tactic_Simp_SimpTh LEAN_EXPORT lean_object* l_Lean_Meta_mkSimpAttr___lambda__2(lean_object*, lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Meta_Tactic_Simp_SimpTheorems_0__Lean_Meta_mkSimpTheoremCore___lambda__1(lean_object*, lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_SimpTheorems_erased___default; +lean_object* l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at___private_Lean_Meta_Basic_0__Lean_Meta_processPostponedStep___spec__14(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l___private_Lean_Meta_Tactic_Simp_SimpTheorems_0__Lean_Meta_checkTypeIsProp___closed__2; LEAN_EXPORT lean_object* l___private_Lean_Meta_Tactic_Simp_SimpTheorems_0__Lean_Meta_preprocess_go___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l___private_Lean_Meta_Tactic_Simp_SimpTheorems_0__Lean_Meta_preprocess_go___lambda__3___closed__4; static lean_object* l_Lean_Meta___aux__Lean__Meta__Tactic__Simp__SimpTheorems______macroRules__Lean__Meta__commandRegister__simp__attr________1___closed__30; LEAN_EXPORT lean_object* l_Lean_Meta_SimpTheorem_getValue(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_Meta_isRflProof___closed__7; lean_object* l_String_intercalate(lean_object*, lean_object*); lean_object* l_List_redLength___rarg(lean_object*); static lean_object* l_Lean_Meta_commandRegister__simp__attr_________closed__16; @@ -349,21 +354,23 @@ LEAN_EXPORT lean_object* l___private_Lean_Meta_Tactic_Simp_SimpTheorems_0__Lean_ LEAN_EXPORT lean_object* l___private_Lean_Meta_Tactic_Simp_SimpTheorems_0__Lean_Meta_preprocess___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); uint8_t lean_nat_dec_le(lean_object*, lean_object*); uint8_t lean_usize_dec_le(size_t, size_t); -static lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpTheorems___hyg_4450____closed__3; +static lean_object* l_Lean_Meta_isRflProofCore___closed__7; static lean_object* l_Lean_Meta_mkSimpAttr___lambda__1___closed__10; LEAN_EXPORT lean_object* l_Lean_Meta_registerSimpAttr(lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l___private_Lean_Meta_Tactic_Simp_SimpTheorems_0__Lean_Meta_preprocess_go___closed__10; LEAN_EXPORT lean_object* l_Lean_Meta_withLetDecl___at___private_Lean_Meta_Tactic_Simp_SimpTheorems_0__Lean_Meta_isPerm___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_SimpTheorem_name_x3f___default; +static lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpTheorems___hyg_4612____closed__5; lean_object* l_Lean_Syntax_getKind(lean_object*); static lean_object* l___private_Lean_Meta_Tactic_Simp_SimpTheorems_0__Lean_Meta_preprocess_go___lambda__2___closed__3; static lean_object* l___private_Lean_Meta_DiscrTree_0__Lean_Meta_DiscrTree_insertAux___at_Lean_Meta_addSimpTheoremEntry___spec__9___closed__1; +static lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpTheorems___hyg_4612____closed__3; static lean_object* l_Lean_Meta_SimpTheorems_pre___default___closed__1; static lean_object* l_Lean_Meta_mkSimpExt___closed__3; LEAN_EXPORT lean_object* l_Lean_Meta_SimpTheorems_erase___rarg___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l___private_Lean_Meta_Tactic_Simp_SimpTheorems_0__Lean_Meta_checkBadRewrite___closed__1; LEAN_EXPORT lean_object* l_Std_PersistentHashMap_findAux___at_Lean_Meta_addSimpTheoremEntry___spec__3(lean_object*, size_t, lean_object*); -LEAN_EXPORT lean_object* l_Std_mkHashMap___at_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpTheorems___hyg_4355____spec__1___boxed(lean_object*); +static lean_object* l_Lean_Meta_isRflProof___closed__3; static lean_object* l_Lean_Meta___aux__Lean__Meta__Tactic__Simp__SimpTheorems______macroRules__Lean__Meta__commandRegister__simp__attr________1___closed__29; static lean_object* l___private_Lean_Meta_Tactic_Simp_SimpTheorems_0__Lean_Meta_checkBadRewrite___closed__2; lean_object* l_Lean_Meta_withLocalDecl___at___private_Lean_Meta_SynthInstance_0__Lean_Meta_SynthInstance_removeUnusedArguments_x3f___spec__2___rarg(lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -398,7 +405,6 @@ static lean_object* l_Lean_Meta_mkSimpAttr___lambda__1___closed__15; static lean_object* l_Lean_Meta___aux__Lean__Meta__Tactic__Simp__SimpTheorems______macroRules__Lean__Meta__commandRegister__simp__attr________1___closed__45; LEAN_EXPORT lean_object* l___private_Lean_Meta_Tactic_Simp_SimpTheorems_0__Lean_Meta_preprocess_go___lambda__4(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_throwError___at_Lean_Meta_isRflTheorem___spec__2(lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l___private_Lean_Meta_Tactic_Simp_SimpTheorems_0__Lean_Meta_checkBadRewrite___closed__3; lean_object* l_List_toArrayAux___rarg(lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Array_anyMUnsafe_any___at_Lean_Meta_SimpTheoremsArray_isDeclToUnfold___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*); uint8_t l_Lean_Syntax_isNone(lean_object*); @@ -406,6 +412,7 @@ static lean_object* l___private_Lean_Meta_Tactic_Simp_SimpTheorems_0__Lean_Meta_ lean_object* lean_infer_type(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_mkSimpAttr___lambda__1___closed__5; LEAN_EXPORT lean_object* l___private_Lean_Meta_Tactic_Simp_SimpTheorems_0__Lean_Meta_preprocess_go(uint8_t, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +LEAN_EXPORT lean_object* l_Lean_Meta_isRflProof___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_isExprDefEq(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_addSimpTheorem___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_DiscrTree_insertCore___at_Lean_Meta_addSimpTheoremEntry___spec__1___closed__2; @@ -431,7 +438,6 @@ LEAN_EXPORT lean_object* l_Lean_Meta_mkSimpAttr___lambda__1(lean_object*, lean_o LEAN_EXPORT lean_object* l_Array_foldlMUnsafe_fold___at_Lean_Meta_SimpTheorems_addConst___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_instInhabitedSimpTheorem; lean_object* lean_mk_array(lean_object*, lean_object*); -LEAN_EXPORT lean_object* l_Std_mkHashMap___at_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpTheorems___hyg_4355____spec__1(lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Meta_Tactic_Simp_SimpTheorems_0__Lean_Meta_preprocessProof___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_instToFormatSimpTheorem___closed__2; static lean_object* l_Lean_Meta___aux__Lean__Meta__Tactic__Simp__SimpTheorems______macroRules__Lean__Meta__commandRegister__simp__attr________1___closed__39; @@ -447,6 +453,7 @@ static lean_object* l_Lean_ScopedEnvExtension_add___at_Lean_Meta_addSimpTheorem_ lean_object* l_Array_mapMUnsafe_map___at_Lean_Meta_openAbstractMVarsResult___spec__1(size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta___aux__Lean__Meta__Tactic__Simp__SimpTheorems______macroRules__Lean__Meta__commandRegister__simp__attr________1___closed__19; LEAN_EXPORT uint8_t l_Std_AssocList_contains___at_Lean_Meta_registerSimpAttr___spec__2(lean_object*, lean_object*); +static lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpTheorems___hyg_4612____closed__4; LEAN_EXPORT lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Meta_Tactic_Simp_SimpTheorems_0__Lean_Meta_preprocessProof___spec__1(size_t, size_t, lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Meta_Tactic_Simp_SimpTheorems_0__Lean_Meta_mkSimpTheoremsFromConst(lean_object*, uint8_t, uint8_t, 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*); @@ -479,6 +486,7 @@ static lean_object* l_Lean_Meta_registerSimpAttr___closed__1; LEAN_EXPORT lean_object* l_Std_PersistentHashMap_insertAux___at_Lean_Meta_addSimpTheoremEntry___spec__6___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_SimpTheorem_getValue___closed__3; static lean_object* l_Std_PersistentHashMap_insertAux___at_Lean_Meta_addSimpTheoremEntry___spec__6___closed__1; +static lean_object* l_Lean_Meta_isRflProof___closed__6; static lean_object* l_Lean_Meta_mkSimpAttr___lambda__1___closed__12; LEAN_EXPORT lean_object* l_Std_AssocList_foldlM___at_Lean_Meta_registerSimpAttr___spec__5(lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Array_mapMUnsafe_map___at_Lean_Meta_mkSimpTheorems___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*); @@ -488,6 +496,7 @@ uint8_t l_List_isEmpty___rarg(lean_object*); static lean_object* l_Lean_Meta___aux__Lean__Meta__Tactic__Simp__SimpTheorems______macroRules__Lean__Meta__commandRegister__simp__attr________1___closed__2; static lean_object* l_Lean_Meta_commandRegister__simp__attr_________closed__6; LEAN_EXPORT lean_object* l___private_Lean_Meta_Tactic_Simp_SimpTheorems_0__Lean_Meta_preprocess_go___lambda__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_Meta_isRflProof___closed__2; static lean_object* l_Lean_Meta_instInhabitedSimpTheorem___closed__3; LEAN_EXPORT lean_object* l_Lean_getConstInfo___at_Lean_Meta_isRflTheorem___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_Meta_addSimpTheorem___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -527,12 +536,12 @@ lean_object* l_Std_PersistentHashMap_erase___at_Lean_Meta_Instances_eraseCore___ uint64_t l_Lean_Meta_DiscrTree_Key_hash(lean_object*); LEAN_EXPORT lean_object* l_Std_PersistentHashMap_containsAux___at_Lean_Meta_SimpTheorems_erase___spec__2___boxed(lean_object*, lean_object*, lean_object*); lean_object* lean_expr_update_const(lean_object*, lean_object*); -static lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpTheorems___hyg_4450____closed__5; static lean_object* l_Lean_Meta_mkSimpAttr___lambda__1___closed__14; static lean_object* l___private_Lean_Meta_DiscrTree_0__Lean_Meta_DiscrTree_insertAux___at_Lean_Meta_addSimpTheoremEntry___spec__9___closed__2; LEAN_EXPORT lean_object* l_Lean_Meta_instInhabitedSimpEntry; static lean_object* l_Lean_Meta_instInhabitedSimpEntry___closed__1; static lean_object* l_Lean_getConstInfo___at_Lean_Meta_isRflTheorem___spec__1___closed__4; +static lean_object* l_Lean_Meta_isRflProof___closed__8; LEAN_EXPORT lean_object* l_Lean_Meta_mkSimpAttr___lambda__2___boxed(lean_object*, lean_object*); lean_object* l_Lean_Meta_DiscrTree_instInhabitedTrie(lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Meta_Tactic_Simp_SimpTheorems_0__Lean_Meta_shouldPreprocess___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -763,71 +772,181 @@ x_3 = lean_name_mk_string(x_1, x_2); return x_3; } } -LEAN_EXPORT uint8_t l_Lean_Meta_isRflProofCore(lean_object* x_1, lean_object* x_2) { +static lean_object* _init_l_Lean_Meta_isRflProofCore___closed__7() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("symm"); +return x_1; +} +} +static lean_object* _init_l_Lean_Meta_isRflProofCore___closed__8() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Meta_isRflProofCore___closed__2; +x_2 = l_Lean_Meta_isRflProofCore___closed__7; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +LEAN_EXPORT lean_object* l_Lean_Meta_isRflProofCore(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { _start: { if (lean_obj_tag(x_1) == 7) { if (lean_obj_tag(x_2) == 6) { -lean_object* x_3; lean_object* x_4; -x_3 = lean_ctor_get(x_1, 2); -x_4 = lean_ctor_get(x_2, 2); -x_1 = x_3; -x_2 = x_4; +lean_object* x_6; lean_object* x_7; +x_6 = lean_ctor_get(x_1, 2); +lean_inc(x_6); +lean_dec(x_1); +x_7 = lean_ctor_get(x_2, 2); +lean_inc(x_7); +lean_dec(x_2); +x_1 = x_6; +x_2 = x_7; goto _start; } else { -uint8_t x_6; -x_6 = 0; -return x_6; -} -} -else -{ -lean_object* x_7; lean_object* x_8; uint8_t x_9; -x_7 = l_Lean_Meta_isRflProofCore___closed__2; -x_8 = lean_unsigned_to_nat(3u); -x_9 = l_Lean_Expr_isAppOfArity(x_1, x_7, x_8); -if (x_9 == 0) -{ -uint8_t x_10; -x_10 = 0; -return x_10; -} -else -{ -lean_object* x_11; lean_object* x_12; uint8_t x_13; -x_11 = l_Lean_Meta_isRflProofCore___closed__4; -x_12 = lean_unsigned_to_nat(2u); -x_13 = l_Lean_Expr_isAppOfArity(x_2, x_11, x_12); -if (x_13 == 0) -{ -lean_object* x_14; uint8_t x_15; -x_14 = l_Lean_Meta_isRflProofCore___closed__6; -x_15 = l_Lean_Expr_isAppOfArity(x_2, x_14, x_12); -return x_15; -} -else -{ -uint8_t x_16; -x_16 = 1; -return x_16; -} -} -} -} -} -LEAN_EXPORT lean_object* l_Lean_Meta_isRflProofCore___boxed(lean_object* x_1, lean_object* x_2) { -_start: -{ -uint8_t x_3; lean_object* x_4; -x_3 = l_Lean_Meta_isRflProofCore(x_1, x_2); +uint8_t x_9; lean_object* x_10; lean_object* x_11; +lean_dec(x_4); +lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); -x_4 = lean_box(x_3); -return x_4; +x_9 = 0; +x_10 = lean_box(x_9); +x_11 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_11, 0, x_10); +lean_ctor_set(x_11, 1, x_5); +return x_11; +} +} +else +{ +lean_object* x_12; lean_object* x_13; uint8_t x_14; +x_12 = l_Lean_Meta_isRflProofCore___closed__2; +x_13 = lean_unsigned_to_nat(3u); +x_14 = l_Lean_Expr_isAppOfArity(x_1, x_12, x_13); +if (x_14 == 0) +{ +uint8_t x_15; lean_object* x_16; lean_object* x_17; +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_15 = 0; +x_16 = lean_box(x_15); +x_17 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_17, 0, x_16); +lean_ctor_set(x_17, 1, x_5); +return x_17; +} +else +{ +lean_object* x_18; lean_object* x_19; uint8_t x_20; +x_18 = l_Lean_Meta_isRflProofCore___closed__4; +x_19 = lean_unsigned_to_nat(2u); +x_20 = l_Lean_Expr_isAppOfArity(x_2, x_18, x_19); +if (x_20 == 0) +{ +lean_object* x_21; uint8_t x_22; +x_21 = l_Lean_Meta_isRflProofCore___closed__6; +x_22 = l_Lean_Expr_isAppOfArity(x_2, x_21, x_19); +if (x_22 == 0) +{ +lean_object* x_23; lean_object* x_24; uint8_t x_25; +x_23 = l_Lean_Meta_isRflProofCore___closed__8; +x_24 = lean_unsigned_to_nat(4u); +x_25 = l_Lean_Expr_isAppOfArity(x_2, x_23, x_24); +if (x_25 == 0) +{ +uint8_t x_26; +lean_dec(x_1); +x_26 = l_Lean_Expr_isApp(x_2); +if (x_26 == 0) +{ +uint8_t x_27; lean_object* x_28; lean_object* x_29; +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +x_27 = 0; +x_28 = lean_box(x_27); +x_29 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_29, 0, x_28); +lean_ctor_set(x_29, 1, x_5); +return x_29; +} +else +{ +lean_object* x_30; uint8_t x_31; +x_30 = l_Lean_Expr_getAppFn(x_2); +lean_dec(x_2); +x_31 = l_Lean_Expr_isConst(x_30); +if (x_31 == 0) +{ +uint8_t x_32; lean_object* x_33; lean_object* x_34; +lean_dec(x_30); +lean_dec(x_4); +lean_dec(x_3); +x_32 = 0; +x_33 = lean_box(x_32); +x_34 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_34, 0, x_33); +lean_ctor_set(x_34, 1, x_5); +return x_34; +} +else +{ +lean_object* x_35; lean_object* x_36; +x_35 = l_Lean_Expr_constName_x21(x_30); +lean_dec(x_30); +x_36 = l_Lean_Meta_isRflTheorem(x_35, x_3, x_4, x_5); +return x_36; +} +} +} +else +{ +lean_object* x_37; +x_37 = l_Lean_Expr_appArg_x21(x_2); +lean_dec(x_2); +x_2 = x_37; +goto _start; +} +} +else +{ +uint8_t x_39; lean_object* x_40; lean_object* x_41; +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_39 = 1; +x_40 = lean_box(x_39); +x_41 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_41, 0, x_40); +lean_ctor_set(x_41, 1, x_5); +return x_41; +} +} +else +{ +uint8_t x_42; lean_object* x_43; lean_object* x_44; +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_42 = 1; +x_43 = lean_box(x_42); +x_44 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_44, 0, x_43); +lean_ctor_set(x_44, 1, x_5); +return x_44; +} +} +} } } LEAN_EXPORT lean_object* l_Lean_throwError___at_Lean_Meta_isRflTheorem___spec__2(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { @@ -1006,108 +1125,78 @@ x_6 = lean_ctor_get(x_5, 0); lean_inc(x_6); if (lean_obj_tag(x_6) == 2) { -uint8_t x_7; -x_7 = !lean_is_exclusive(x_5); -if (x_7 == 0) -{ -lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; uint8_t x_13; lean_object* x_14; -x_8 = lean_ctor_get(x_5, 0); -lean_dec(x_8); -x_9 = lean_ctor_get(x_6, 0); +lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; +x_7 = lean_ctor_get(x_5, 1); +lean_inc(x_7); +lean_dec(x_5); +x_8 = lean_ctor_get(x_6, 0); +lean_inc(x_8); +lean_dec(x_6); +x_9 = lean_ctor_get(x_8, 0); lean_inc(x_9); -lean_dec(x_6); -x_10 = lean_ctor_get(x_9, 0); +x_10 = lean_ctor_get(x_9, 2); lean_inc(x_10); -x_11 = lean_ctor_get(x_10, 2); -lean_inc(x_11); -lean_dec(x_10); -x_12 = lean_ctor_get(x_9, 1); -lean_inc(x_12); lean_dec(x_9); -x_13 = l_Lean_Meta_isRflProofCore(x_11, x_12); -lean_dec(x_12); -lean_dec(x_11); -x_14 = lean_box(x_13); -lean_ctor_set(x_5, 0, x_14); +x_11 = lean_ctor_get(x_8, 1); +lean_inc(x_11); +lean_dec(x_8); +x_12 = l_Lean_Meta_isRflProofCore(x_10, x_11, x_2, x_3, x_7); +return x_12; +} +else +{ +uint8_t x_13; +lean_dec(x_6); +lean_dec(x_3); +lean_dec(x_2); +x_13 = !lean_is_exclusive(x_5); +if (x_13 == 0) +{ +lean_object* x_14; uint8_t x_15; lean_object* x_16; +x_14 = lean_ctor_get(x_5, 0); +lean_dec(x_14); +x_15 = 0; +x_16 = lean_box(x_15); +lean_ctor_set(x_5, 0, x_16); return x_5; } else { -lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; uint8_t x_20; lean_object* x_21; lean_object* x_22; -x_15 = lean_ctor_get(x_5, 1); -lean_inc(x_15); -lean_dec(x_5); -x_16 = lean_ctor_get(x_6, 0); -lean_inc(x_16); -lean_dec(x_6); -x_17 = lean_ctor_get(x_16, 0); +lean_object* x_17; uint8_t x_18; lean_object* x_19; lean_object* x_20; +x_17 = lean_ctor_get(x_5, 1); lean_inc(x_17); -x_18 = lean_ctor_get(x_17, 2); -lean_inc(x_18); -lean_dec(x_17); -x_19 = lean_ctor_get(x_16, 1); -lean_inc(x_19); -lean_dec(x_16); -x_20 = l_Lean_Meta_isRflProofCore(x_18, x_19); -lean_dec(x_19); -lean_dec(x_18); -x_21 = lean_box(x_20); -x_22 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_22, 0, x_21); -lean_ctor_set(x_22, 1, x_15); -return x_22; -} -} -else -{ -uint8_t x_23; -lean_dec(x_6); -x_23 = !lean_is_exclusive(x_5); -if (x_23 == 0) -{ -lean_object* x_24; uint8_t x_25; lean_object* x_26; -x_24 = lean_ctor_get(x_5, 0); -lean_dec(x_24); -x_25 = 0; -x_26 = lean_box(x_25); -lean_ctor_set(x_5, 0, x_26); -return x_5; -} -else -{ -lean_object* x_27; uint8_t x_28; lean_object* x_29; lean_object* x_30; -x_27 = lean_ctor_get(x_5, 1); -lean_inc(x_27); lean_dec(x_5); -x_28 = 0; -x_29 = lean_box(x_28); -x_30 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_30, 0, x_29); -lean_ctor_set(x_30, 1, x_27); -return x_30; +x_18 = 0; +x_19 = lean_box(x_18); +x_20 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_20, 0, x_19); +lean_ctor_set(x_20, 1, x_17); +return x_20; } } } else { -uint8_t x_31; -x_31 = !lean_is_exclusive(x_5); -if (x_31 == 0) +uint8_t x_21; +lean_dec(x_3); +lean_dec(x_2); +x_21 = !lean_is_exclusive(x_5); +if (x_21 == 0) { return x_5; } else { -lean_object* x_32; lean_object* x_33; lean_object* x_34; -x_32 = lean_ctor_get(x_5, 0); -x_33 = lean_ctor_get(x_5, 1); -lean_inc(x_33); -lean_inc(x_32); +lean_object* x_22; lean_object* x_23; lean_object* x_24; +x_22 = lean_ctor_get(x_5, 0); +x_23 = lean_ctor_get(x_5, 1); +lean_inc(x_23); +lean_inc(x_22); lean_dec(x_5); -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; +x_24 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_24, 0, x_22); +lean_ctor_set(x_24, 1, x_23); +return x_24; } } } @@ -1132,49 +1221,221 @@ lean_dec(x_2); return x_5; } } -LEAN_EXPORT lean_object* l_Lean_Meta_isRflTheorem___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_Lean_Meta_isRflTheorem(x_1, x_2, x_3, x_4); -lean_dec(x_3); -lean_dec(x_2); -return x_5; -} -} -LEAN_EXPORT lean_object* l_Lean_Meta_isRflProof(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +LEAN_EXPORT lean_object* l_Lean_Meta_isRflProof___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: { if (lean_obj_tag(x_1) == 4) { -lean_object* x_5; lean_object* x_6; -x_5 = lean_ctor_get(x_1, 0); -lean_inc(x_5); +lean_object* x_8; lean_object* x_9; +lean_dec(x_4); +lean_dec(x_3); +x_8 = lean_ctor_get(x_1, 0); +lean_inc(x_8); lean_dec(x_1); -x_6 = l_Lean_Meta_isRflTheorem(x_5, x_2, x_3, x_4); -return x_6; +x_9 = l_Lean_Meta_isRflTheorem(x_8, x_5, x_6, x_7); +return x_9; } else { -uint8_t x_7; lean_object* x_8; lean_object* x_9; +lean_object* x_10; +lean_inc(x_6); +lean_inc(x_5); +lean_inc(x_1); +x_10 = lean_infer_type(x_1, x_3, x_4, x_5, x_6, x_7); +if (lean_obj_tag(x_10) == 0) +{ +lean_object* x_11; lean_object* x_12; lean_object* x_13; +x_11 = lean_ctor_get(x_10, 0); +lean_inc(x_11); +x_12 = lean_ctor_get(x_10, 1); +lean_inc(x_12); +lean_dec(x_10); +x_13 = l_Lean_Meta_isRflProofCore(x_11, x_1, x_5, x_6, x_12); +return x_13; +} +else +{ +uint8_t x_14; +lean_dec(x_6); +lean_dec(x_5); lean_dec(x_1); -x_7 = 0; -x_8 = lean_box(x_7); -x_9 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_9, 0, x_8); -lean_ctor_set(x_9, 1, x_4); -return x_9; +x_14 = !lean_is_exclusive(x_10); +if (x_14 == 0) +{ +return x_10; +} +else +{ +lean_object* x_15; lean_object* x_16; lean_object* x_17; +x_15 = lean_ctor_get(x_10, 0); +x_16 = lean_ctor_get(x_10, 1); +lean_inc(x_16); +lean_inc(x_15); +lean_dec(x_10); +x_17 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_17, 0, x_15); +lean_ctor_set(x_17, 1, x_16); +return x_17; } } } -LEAN_EXPORT lean_object* l_Lean_Meta_isRflProof___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +} +} +static lean_object* _init_l_Lean_Meta_isRflProof___closed__1() { _start: { -lean_object* x_5; -x_5 = l_Lean_Meta_isRflProof(x_1, x_2, x_3, x_4); -lean_dec(x_3); +lean_object* x_1; +x_1 = lean_mk_string("Meta"); +return x_1; +} +} +static lean_object* _init_l_Lean_Meta_isRflProof___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_isRflProof___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +static lean_object* _init_l_Lean_Meta_isRflProof___closed__3() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("debug"); +return x_1; +} +} +static lean_object* _init_l_Lean_Meta_isRflProof___closed__4() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Meta_isRflProof___closed__2; +x_2 = l_Lean_Meta_isRflProof___closed__3; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +static lean_object* _init_l_Lean_Meta_isRflProof___closed__5() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("isRflProof: "); +return x_1; +} +} +static lean_object* _init_l_Lean_Meta_isRflProof___closed__6() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Meta_isRflProof___closed__5; +x_2 = l_Lean_stringToMessageData(x_1); +return x_2; +} +} +static lean_object* _init_l_Lean_Meta_isRflProof___closed__7() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string(""); +return x_1; +} +} +static lean_object* _init_l_Lean_Meta_isRflProof___closed__8() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Meta_isRflProof___closed__7; +x_2 = l_Lean_stringToMessageData(x_1); +return x_2; +} +} +LEAN_EXPORT lean_object* l_Lean_Meta_isRflProof(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; uint8_t x_8; lean_object* x_9; lean_object* x_22; lean_object* x_23; lean_object* x_24; uint8_t x_25; +x_7 = l_Lean_Meta_isRflProof___closed__4; +x_22 = lean_st_ref_get(x_5, x_6); +x_23 = lean_ctor_get(x_22, 0); +lean_inc(x_23); +x_24 = lean_ctor_get(x_23, 3); +lean_inc(x_24); +lean_dec(x_23); +x_25 = lean_ctor_get_uint8(x_24, sizeof(void*)*1); +lean_dec(x_24); +if (x_25 == 0) +{ +lean_object* x_26; uint8_t x_27; +x_26 = lean_ctor_get(x_22, 1); +lean_inc(x_26); +lean_dec(x_22); +x_27 = 0; +x_8 = x_27; +x_9 = x_26; +goto block_21; +} +else +{ +lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; uint8_t x_32; +x_28 = lean_ctor_get(x_22, 1); +lean_inc(x_28); +lean_dec(x_22); +x_29 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at___private_Lean_Meta_Basic_0__Lean_Meta_processPostponedStep___spec__14(x_7, x_2, x_3, x_4, x_5, x_28); +x_30 = lean_ctor_get(x_29, 0); +lean_inc(x_30); +x_31 = lean_ctor_get(x_29, 1); +lean_inc(x_31); +lean_dec(x_29); +x_32 = lean_unbox(x_30); +lean_dec(x_30); +x_8 = x_32; +x_9 = x_31; +goto block_21; +} +block_21: +{ +if (x_8 == 0) +{ +lean_object* x_10; lean_object* x_11; +x_10 = lean_box(0); +x_11 = l_Lean_Meta_isRflProof___lambda__1(x_1, x_10, x_2, x_3, x_4, x_5, x_9); +return x_11; +} +else +{ +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; lean_object* x_19; lean_object* x_20; +lean_inc(x_1); +x_12 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_12, 0, x_1); +x_13 = l_Lean_Meta_isRflProof___closed__6; +x_14 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_14, 0, x_13); +lean_ctor_set(x_14, 1, x_12); +x_15 = l_Lean_Meta_isRflProof___closed__8; +x_16 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_16, 0, x_14); +lean_ctor_set(x_16, 1, x_15); +x_17 = l_Lean_addTrace___at_Lean_Meta_processPostponed_loop___spec__1(x_7, x_16, x_2, x_3, x_4, x_5, x_9); +x_18 = lean_ctor_get(x_17, 0); +lean_inc(x_18); +x_19 = lean_ctor_get(x_17, 1); +lean_inc(x_19); +lean_dec(x_17); +x_20 = l_Lean_Meta_isRflProof___lambda__1(x_1, x_18, x_2, x_3, x_4, x_5, x_19); +lean_dec(x_18); +return x_20; +} +} +} +} +LEAN_EXPORT lean_object* l_Lean_Meta_isRflProof___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: +{ +lean_object* x_8; +x_8 = l_Lean_Meta_isRflProof___lambda__1(x_1, x_2, x_3, x_4, x_5, x_6, x_7); lean_dec(x_2); -return x_5; +return x_8; } } static lean_object* _init_l_Lean_Meta_instToFormatSimpTheorem___closed__1() { @@ -1198,22 +1459,14 @@ return x_2; static lean_object* _init_l_Lean_Meta_instToFormatSimpTheorem___closed__3() { _start: { -lean_object* x_1; -x_1 = lean_mk_string(""); -return x_1; -} -} -static lean_object* _init_l_Lean_Meta_instToFormatSimpTheorem___closed__4() { -_start: -{ lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Meta_instToFormatSimpTheorem___closed__3; +x_1 = l_Lean_Meta_isRflProof___closed__7; x_2 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -static lean_object* _init_l_Lean_Meta_instToFormatSimpTheorem___closed__5() { +static lean_object* _init_l_Lean_Meta_instToFormatSimpTheorem___closed__4() { _start: { lean_object* x_1; @@ -1221,11 +1474,11 @@ x_1 = lean_mk_string(":perm"); return x_1; } } -static lean_object* _init_l_Lean_Meta_instToFormatSimpTheorem___closed__6() { +static lean_object* _init_l_Lean_Meta_instToFormatSimpTheorem___closed__5() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Meta_instToFormatSimpTheorem___closed__5; +x_1 = l_Lean_Meta_instToFormatSimpTheorem___closed__4; x_2 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; @@ -1251,7 +1504,7 @@ x_10 = l_Lean_Meta_instToFormatSimpTheorem___closed__2; x_11 = lean_alloc_ctor(4, 2, 0); lean_ctor_set(x_11, 0, x_10); lean_ctor_set(x_11, 1, x_9); -x_12 = l_Lean_Meta_instToFormatSimpTheorem___closed__4; +x_12 = l_Lean_Meta_instToFormatSimpTheorem___closed__3; x_13 = lean_alloc_ctor(4, 2, 0); lean_ctor_set(x_13, 0, x_11); lean_ctor_set(x_13, 1, x_12); @@ -1269,7 +1522,7 @@ return x_15; else { lean_object* x_16; lean_object* x_17; -x_16 = l_Lean_Meta_instToFormatSimpTheorem___closed__6; +x_16 = l_Lean_Meta_instToFormatSimpTheorem___closed__5; x_17 = lean_alloc_ctor(4, 2, 0); lean_ctor_set(x_17, 0, x_14); lean_ctor_set(x_17, 1, x_16); @@ -1297,7 +1550,7 @@ x_10 = l_Lean_Meta_instToFormatSimpTheorem___closed__2; x_11 = lean_alloc_ctor(4, 2, 0); lean_ctor_set(x_11, 0, x_10); lean_ctor_set(x_11, 1, x_9); -x_12 = l_Lean_Meta_instToFormatSimpTheorem___closed__4; +x_12 = l_Lean_Meta_instToFormatSimpTheorem___closed__3; x_13 = lean_alloc_ctor(4, 2, 0); lean_ctor_set(x_13, 0, x_11); lean_ctor_set(x_13, 1, x_12); @@ -1317,7 +1570,7 @@ return x_16; else { lean_object* x_17; lean_object* x_18; lean_object* x_19; -x_17 = l_Lean_Meta_instToFormatSimpTheorem___closed__6; +x_17 = l_Lean_Meta_instToFormatSimpTheorem___closed__5; x_18 = lean_alloc_ctor(4, 2, 0); lean_ctor_set(x_18, 0, x_14); lean_ctor_set(x_18, 1, x_17); @@ -4480,15 +4733,6 @@ x_2 = l_Lean_stringToMessageData(x_1); return x_2; } } -static lean_object* _init_l___private_Lean_Meta_Tactic_Simp_SimpTheorems_0__Lean_Meta_checkBadRewrite___closed__3() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Meta_instToFormatSimpTheorem___closed__3; -x_2 = l_Lean_stringToMessageData(x_1); -return x_2; -} -} LEAN_EXPORT lean_object* l___private_Lean_Meta_Tactic_Simp_SimpTheorems_0__Lean_Meta_checkBadRewrite(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: { @@ -4561,7 +4805,7 @@ x_21 = l___private_Lean_Meta_Tactic_Simp_SimpTheorems_0__Lean_Meta_checkBadRewri x_22 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_22, 0, x_21); lean_ctor_set(x_22, 1, x_20); -x_23 = l___private_Lean_Meta_Tactic_Simp_SimpTheorems_0__Lean_Meta_checkBadRewrite___closed__3; +x_23 = l_Lean_Meta_isRflProof___closed__8; x_24 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_24, 0, x_22); lean_ctor_set(x_24, 1, x_23); @@ -4665,7 +4909,7 @@ x_42 = l___private_Lean_Meta_Tactic_Simp_SimpTheorems_0__Lean_Meta_checkBadRewri x_43 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_43, 0, x_42); lean_ctor_set(x_43, 1, x_41); -x_44 = l___private_Lean_Meta_Tactic_Simp_SimpTheorems_0__Lean_Meta_checkBadRewrite___closed__3; +x_44 = l_Lean_Meta_isRflProof___closed__8; x_45 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_45, 0, x_43); lean_ctor_set(x_45, 1, x_44); @@ -7553,7 +7797,7 @@ x_12 = l___private_Lean_Meta_Tactic_Simp_SimpTheorems_0__Lean_Meta_checkTypeIsPr x_13 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_13, 0, x_12); lean_ctor_set(x_13, 1, x_11); -x_14 = l___private_Lean_Meta_Tactic_Simp_SimpTheorems_0__Lean_Meta_checkBadRewrite___closed__3; +x_14 = l_Lean_Meta_isRflProof___closed__8; x_15 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_15, 0, x_13); lean_ctor_set(x_15, 1, x_14); @@ -7670,7 +7914,7 @@ lean_object* x_12; lean_object* x_13; lean_object* x_14; x_12 = lean_ctor_get(x_6, 0); x_13 = lean_ctor_get(x_6, 1); lean_inc(x_1); -x_14 = l_Lean_Meta_isRflProof(x_1, x_9, x_10, x_11); +x_14 = l_Lean_Meta_isRflProof(x_1, x_7, x_8, x_9, x_10, x_11); if (lean_obj_tag(x_14) == 0) { uint8_t x_15; @@ -7850,7 +8094,7 @@ x_38 = l___private_Lean_Meta_Tactic_Simp_SimpTheorems_0__Lean_Meta_mkSimpTheorem x_39 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_39, 0, x_38); lean_ctor_set(x_39, 1, x_37); -x_40 = l___private_Lean_Meta_Tactic_Simp_SimpTheorems_0__Lean_Meta_checkBadRewrite___closed__3; +x_40 = l_Lean_Meta_isRflProof___closed__8; x_41 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_41, 0, x_39); lean_ctor_set(x_41, 1, x_40); @@ -7916,10 +8160,6 @@ lean_dec(x_53); lean_ctor_set(x_26, 1, x_54); lean_ctor_set(x_26, 0, x_51); x_56 = l___private_Lean_Meta_Tactic_Simp_SimpTheorems_0__Lean_Meta_mkSimpTheoremCore___lambda__1(x_3, x_4, x_5, x_6, x_7, x_26, x_8, x_9, x_10, x_11, x_55); -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); lean_dec(x_26); return x_56; } @@ -8057,7 +8297,7 @@ x_77 = l___private_Lean_Meta_Tactic_Simp_SimpTheorems_0__Lean_Meta_mkSimpTheorem x_78 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_78, 0, x_77); lean_ctor_set(x_78, 1, x_76); -x_79 = l___private_Lean_Meta_Tactic_Simp_SimpTheorems_0__Lean_Meta_checkBadRewrite___closed__3; +x_79 = l_Lean_Meta_isRflProof___closed__8; x_80 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_80, 0, x_78); lean_ctor_set(x_80, 1, x_79); @@ -8126,10 +8366,6 @@ x_95 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_95, 0, x_90); lean_ctor_set(x_95, 1, x_93); x_96 = l___private_Lean_Meta_Tactic_Simp_SimpTheorems_0__Lean_Meta_mkSimpTheoremCore___lambda__1(x_3, x_4, x_5, x_6, x_7, x_95, x_8, x_9, x_10, x_11, x_94); -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); lean_dec(x_95); return x_96; } @@ -8365,7 +8601,7 @@ x_144 = l___private_Lean_Meta_Tactic_Simp_SimpTheorems_0__Lean_Meta_mkSimpTheore x_145 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_145, 0, x_144); lean_ctor_set(x_145, 1, x_143); -x_146 = l___private_Lean_Meta_Tactic_Simp_SimpTheorems_0__Lean_Meta_checkBadRewrite___closed__3; +x_146 = l_Lean_Meta_isRflProof___closed__8; x_147 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_147, 0, x_145); lean_ctor_set(x_147, 1, x_146); @@ -8438,10 +8674,6 @@ if (lean_is_scalar(x_136)) { lean_ctor_set(x_162, 0, x_157); lean_ctor_set(x_162, 1, x_160); x_163 = l___private_Lean_Meta_Tactic_Simp_SimpTheorems_0__Lean_Meta_mkSimpTheoremCore___lambda__1(x_3, x_4, x_5, x_6, x_7, x_162, x_8, x_9, x_10, x_11, x_161); -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); lean_dec(x_162); return x_163; } @@ -8674,10 +8906,6 @@ uint8_t x_12; lean_object* x_13; x_12 = lean_unbox(x_4); lean_dec(x_4); x_13 = l___private_Lean_Meta_Tactic_Simp_SimpTheorems_0__Lean_Meta_mkSimpTheoremCore___lambda__1(x_1, x_2, x_3, x_12, x_5, x_6, x_7, x_8, x_9, x_10, x_11); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); lean_dec(x_6); return x_13; } @@ -12139,7 +12367,7 @@ x_7 = l_Lean_registerSimpleScopedEnvExtension___rarg(x_6, x_2); return x_7; } } -LEAN_EXPORT lean_object* l_Std_mkHashMap___at_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpTheorems___hyg_4355____spec__1(lean_object* x_1) { +LEAN_EXPORT lean_object* l_Std_mkHashMap___at_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpTheorems___hyg_4517____spec__1(lean_object* x_1) { _start: { lean_object* x_2; @@ -12147,7 +12375,7 @@ x_2 = l_Std_mkHashMapImp___rarg(x_1); return x_2; } } -LEAN_EXPORT lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpTheorems___hyg_4355_(lean_object* x_1) { +LEAN_EXPORT lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpTheorems___hyg_4517_(lean_object* x_1) { _start: { lean_object* x_2; lean_object* x_3; lean_object* x_4; uint8_t x_5; @@ -12174,11 +12402,11 @@ return x_8; } } } -LEAN_EXPORT lean_object* l_Std_mkHashMap___at_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpTheorems___hyg_4355____spec__1___boxed(lean_object* x_1) { +LEAN_EXPORT lean_object* l_Std_mkHashMap___at_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpTheorems___hyg_4517____spec__1___boxed(lean_object* x_1) { _start: { lean_object* x_2; -x_2 = l_Std_mkHashMap___at_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpTheorems___hyg_4355____spec__1(x_1); +x_2 = l_Std_mkHashMap___at_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpTheorems___hyg_4517____spec__1(x_1); lean_dec(x_1); return x_2; } @@ -12626,7 +12854,7 @@ x_4 = lean_box(x_3); return x_4; } } -static lean_object* _init_l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpTheorems___hyg_4450____closed__1() { +static lean_object* _init_l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpTheorems___hyg_4612____closed__1() { _start: { lean_object* x_1; @@ -12634,17 +12862,17 @@ x_1 = lean_mk_string("simp"); return x_1; } } -static lean_object* _init_l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpTheorems___hyg_4450____closed__2() { +static lean_object* _init_l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpTheorems___hyg_4612____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_SimpTheorems___hyg_4450____closed__1; +x_2 = l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpTheorems___hyg_4612____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_SimpTheorems___hyg_4450____closed__3() { +static lean_object* _init_l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpTheorems___hyg_4612____closed__3() { _start: { lean_object* x_1; @@ -12652,17 +12880,17 @@ x_1 = lean_mk_string("Ext"); return x_1; } } -static lean_object* _init_l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpTheorems___hyg_4450____closed__4() { +static lean_object* _init_l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpTheorems___hyg_4612____closed__4() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpTheorems___hyg_4450____closed__2; -x_2 = l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpTheorems___hyg_4450____closed__3; +x_1 = l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpTheorems___hyg_4612____closed__2; +x_2 = l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpTheorems___hyg_4612____closed__3; x_3 = lean_name_append_after(x_1, x_2); return x_3; } } -static lean_object* _init_l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpTheorems___hyg_4450____closed__5() { +static lean_object* _init_l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpTheorems___hyg_4612____closed__5() { _start: { lean_object* x_1; @@ -12670,13 +12898,13 @@ x_1 = lean_mk_string("simplification theorem"); return x_1; } } -LEAN_EXPORT lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpTheorems___hyg_4450_(lean_object* x_1) { +LEAN_EXPORT lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpTheorems___hyg_4612_(lean_object* x_1) { _start: { lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; -x_2 = l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpTheorems___hyg_4450____closed__2; -x_3 = l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpTheorems___hyg_4450____closed__5; -x_4 = l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpTheorems___hyg_4450____closed__4; +x_2 = l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpTheorems___hyg_4612____closed__2; +x_3 = l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpTheorems___hyg_4612____closed__5; +x_4 = l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpTheorems___hyg_4612____closed__4; x_5 = l_Lean_Meta_registerSimpAttr(x_2, x_3, x_4, x_1); return x_5; } @@ -15230,22 +15458,14 @@ return x_4; static lean_object* _init_l_Lean_Meta_commandRegister__simp__attr_________closed__1() { _start: { -lean_object* x_1; -x_1 = lean_mk_string("Meta"); -return x_1; -} -} -static lean_object* _init_l_Lean_Meta_commandRegister__simp__attr_________closed__2() { -_start: -{ lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = l_Lean_Meta_mkSimpAttr___lambda__1___closed__14; -x_2 = l_Lean_Meta_commandRegister__simp__attr_________closed__1; +x_2 = l_Lean_Meta_isRflProof___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; } } -static lean_object* _init_l_Lean_Meta_commandRegister__simp__attr_________closed__3() { +static lean_object* _init_l_Lean_Meta_commandRegister__simp__attr_________closed__2() { _start: { lean_object* x_1; @@ -15253,17 +15473,17 @@ x_1 = lean_mk_string("commandRegister_simp_attr___"); return x_1; } } -static lean_object* _init_l_Lean_Meta_commandRegister__simp__attr_________closed__4() { +static lean_object* _init_l_Lean_Meta_commandRegister__simp__attr_________closed__3() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Meta_commandRegister__simp__attr_________closed__2; -x_2 = l_Lean_Meta_commandRegister__simp__attr_________closed__3; +x_1 = l_Lean_Meta_commandRegister__simp__attr_________closed__1; +x_2 = l_Lean_Meta_commandRegister__simp__attr_________closed__2; x_3 = lean_name_mk_string(x_1, x_2); return x_3; } } -static lean_object* _init_l_Lean_Meta_commandRegister__simp__attr_________closed__5() { +static lean_object* _init_l_Lean_Meta_commandRegister__simp__attr_________closed__4() { _start: { lean_object* x_1; @@ -15271,17 +15491,17 @@ x_1 = lean_mk_string("andthen"); return x_1; } } -static lean_object* _init_l_Lean_Meta_commandRegister__simp__attr_________closed__6() { +static lean_object* _init_l_Lean_Meta_commandRegister__simp__attr_________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_commandRegister__simp__attr_________closed__5; +x_2 = l_Lean_Meta_commandRegister__simp__attr_________closed__4; x_3 = lean_name_mk_string(x_1, x_2); return x_3; } } -static lean_object* _init_l_Lean_Meta_commandRegister__simp__attr_________closed__7() { +static lean_object* _init_l_Lean_Meta_commandRegister__simp__attr_________closed__6() { _start: { lean_object* x_1; @@ -15289,17 +15509,17 @@ x_1 = lean_mk_string("register_simp_attr"); return x_1; } } -static lean_object* _init_l_Lean_Meta_commandRegister__simp__attr_________closed__8() { +static lean_object* _init_l_Lean_Meta_commandRegister__simp__attr_________closed__7() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Meta_commandRegister__simp__attr_________closed__7; +x_1 = l_Lean_Meta_commandRegister__simp__attr_________closed__6; x_2 = lean_alloc_ctor(5, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -static lean_object* _init_l_Lean_Meta_commandRegister__simp__attr_________closed__9() { +static lean_object* _init_l_Lean_Meta_commandRegister__simp__attr_________closed__8() { _start: { lean_object* x_1; @@ -15307,33 +15527,33 @@ x_1 = lean_mk_string("ident"); return x_1; } } -static lean_object* _init_l_Lean_Meta_commandRegister__simp__attr_________closed__10() { +static lean_object* _init_l_Lean_Meta_commandRegister__simp__attr_________closed__9() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = lean_box(0); -x_2 = l_Lean_Meta_commandRegister__simp__attr_________closed__9; +x_2 = l_Lean_Meta_commandRegister__simp__attr_________closed__8; x_3 = lean_name_mk_string(x_1, x_2); return x_3; } } -static lean_object* _init_l_Lean_Meta_commandRegister__simp__attr_________closed__11() { +static lean_object* _init_l_Lean_Meta_commandRegister__simp__attr_________closed__10() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Meta_commandRegister__simp__attr_________closed__10; +x_1 = l_Lean_Meta_commandRegister__simp__attr_________closed__9; x_2 = lean_alloc_ctor(0, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -static lean_object* _init_l_Lean_Meta_commandRegister__simp__attr_________closed__12() { +static lean_object* _init_l_Lean_Meta_commandRegister__simp__attr_________closed__11() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; -x_1 = l_Lean_Meta_commandRegister__simp__attr_________closed__6; -x_2 = l_Lean_Meta_commandRegister__simp__attr_________closed__8; -x_3 = l_Lean_Meta_commandRegister__simp__attr_________closed__11; +x_1 = l_Lean_Meta_commandRegister__simp__attr_________closed__5; +x_2 = l_Lean_Meta_commandRegister__simp__attr_________closed__7; +x_3 = l_Lean_Meta_commandRegister__simp__attr_________closed__10; x_4 = lean_alloc_ctor(2, 3, 0); lean_ctor_set(x_4, 0, x_1); lean_ctor_set(x_4, 1, x_2); @@ -15341,7 +15561,7 @@ lean_ctor_set(x_4, 2, x_3); return x_4; } } -static lean_object* _init_l_Lean_Meta_commandRegister__simp__attr_________closed__13() { +static lean_object* _init_l_Lean_Meta_commandRegister__simp__attr_________closed__12() { _start: { lean_object* x_1; @@ -15349,33 +15569,33 @@ x_1 = lean_mk_string("str"); return x_1; } } -static lean_object* _init_l_Lean_Meta_commandRegister__simp__attr_________closed__14() { +static lean_object* _init_l_Lean_Meta_commandRegister__simp__attr_________closed__13() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = lean_box(0); -x_2 = l_Lean_Meta_commandRegister__simp__attr_________closed__13; +x_2 = l_Lean_Meta_commandRegister__simp__attr_________closed__12; x_3 = lean_name_mk_string(x_1, x_2); return x_3; } } -static lean_object* _init_l_Lean_Meta_commandRegister__simp__attr_________closed__15() { +static lean_object* _init_l_Lean_Meta_commandRegister__simp__attr_________closed__14() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Meta_commandRegister__simp__attr_________closed__14; +x_1 = l_Lean_Meta_commandRegister__simp__attr_________closed__13; x_2 = lean_alloc_ctor(0, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -static lean_object* _init_l_Lean_Meta_commandRegister__simp__attr_________closed__16() { +static lean_object* _init_l_Lean_Meta_commandRegister__simp__attr_________closed__15() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; -x_1 = l_Lean_Meta_commandRegister__simp__attr_________closed__6; -x_2 = l_Lean_Meta_commandRegister__simp__attr_________closed__12; -x_3 = l_Lean_Meta_commandRegister__simp__attr_________closed__15; +x_1 = l_Lean_Meta_commandRegister__simp__attr_________closed__5; +x_2 = l_Lean_Meta_commandRegister__simp__attr_________closed__11; +x_3 = l_Lean_Meta_commandRegister__simp__attr_________closed__14; x_4 = lean_alloc_ctor(2, 3, 0); lean_ctor_set(x_4, 0, x_1); lean_ctor_set(x_4, 1, x_2); @@ -15383,13 +15603,13 @@ lean_ctor_set(x_4, 2, x_3); return x_4; } } -static lean_object* _init_l_Lean_Meta_commandRegister__simp__attr_________closed__17() { +static lean_object* _init_l_Lean_Meta_commandRegister__simp__attr_________closed__16() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; -x_1 = l_Lean_Meta_commandRegister__simp__attr_________closed__4; +x_1 = l_Lean_Meta_commandRegister__simp__attr_________closed__3; x_2 = lean_unsigned_to_nat(1022u); -x_3 = l_Lean_Meta_commandRegister__simp__attr_________closed__16; +x_3 = l_Lean_Meta_commandRegister__simp__attr_________closed__15; x_4 = lean_alloc_ctor(3, 3, 0); lean_ctor_set(x_4, 0, x_1); lean_ctor_set(x_4, 1, x_2); @@ -15401,7 +15621,7 @@ static lean_object* _init_l_Lean_Meta_commandRegister__simp__attr______() { _start: { lean_object* x_1; -x_1 = l_Lean_Meta_commandRegister__simp__attr_________closed__17; +x_1 = l_Lean_Meta_commandRegister__simp__attr_________closed__16; return x_1; } } @@ -15595,7 +15815,7 @@ static lean_object* _init_l_Lean_Meta___aux__Lean__Meta__Tactic__Simp__SimpTheor _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Meta_commandRegister__simp__attr_________closed__2; +x_1 = l_Lean_Meta_commandRegister__simp__attr_________closed__1; x_2 = l_Lean_Meta___aux__Lean__Meta__Tactic__Simp__SimpTheorems______macroRules__Lean__Meta__commandRegister__simp__attr________1___closed__16; x_3 = lean_name_mk_string(x_1, x_2); return x_3; @@ -15768,7 +15988,7 @@ static lean_object* _init_l_Lean_Meta___aux__Lean__Meta__Tactic__Simp__SimpTheor _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Meta_commandRegister__simp__attr_________closed__2; +x_1 = l_Lean_Meta_commandRegister__simp__attr_________closed__1; x_2 = l_Lean_Meta___aux__Lean__Meta__Tactic__Simp__SimpTheorems______macroRules__Lean__Meta__commandRegister__simp__attr________1___closed__34; x_3 = lean_name_mk_string(x_1, x_2); return x_3; @@ -15855,7 +16075,7 @@ LEAN_EXPORT lean_object* l_Lean_Meta___aux__Lean__Meta__Tactic__Simp__SimpTheore _start: { lean_object* x_4; uint8_t x_5; -x_4 = l_Lean_Meta_commandRegister__simp__attr_________closed__4; +x_4 = l_Lean_Meta_commandRegister__simp__attr_________closed__3; lean_inc(x_1); x_5 = l_Lean_Syntax_isOfKind(x_1, x_4); if (x_5 == 0) @@ -16363,6 +16583,10 @@ l_Lean_Meta_isRflProofCore___closed__5 = _init_l_Lean_Meta_isRflProofCore___clos lean_mark_persistent(l_Lean_Meta_isRflProofCore___closed__5); l_Lean_Meta_isRflProofCore___closed__6 = _init_l_Lean_Meta_isRflProofCore___closed__6(); lean_mark_persistent(l_Lean_Meta_isRflProofCore___closed__6); +l_Lean_Meta_isRflProofCore___closed__7 = _init_l_Lean_Meta_isRflProofCore___closed__7(); +lean_mark_persistent(l_Lean_Meta_isRflProofCore___closed__7); +l_Lean_Meta_isRflProofCore___closed__8 = _init_l_Lean_Meta_isRflProofCore___closed__8(); +lean_mark_persistent(l_Lean_Meta_isRflProofCore___closed__8); l_Lean_getConstInfo___at_Lean_Meta_isRflTheorem___spec__1___closed__1 = _init_l_Lean_getConstInfo___at_Lean_Meta_isRflTheorem___spec__1___closed__1(); lean_mark_persistent(l_Lean_getConstInfo___at_Lean_Meta_isRflTheorem___spec__1___closed__1); l_Lean_getConstInfo___at_Lean_Meta_isRflTheorem___spec__1___closed__2 = _init_l_Lean_getConstInfo___at_Lean_Meta_isRflTheorem___spec__1___closed__2(); @@ -16371,6 +16595,22 @@ l_Lean_getConstInfo___at_Lean_Meta_isRflTheorem___spec__1___closed__3 = _init_l_ lean_mark_persistent(l_Lean_getConstInfo___at_Lean_Meta_isRflTheorem___spec__1___closed__3); l_Lean_getConstInfo___at_Lean_Meta_isRflTheorem___spec__1___closed__4 = _init_l_Lean_getConstInfo___at_Lean_Meta_isRflTheorem___spec__1___closed__4(); lean_mark_persistent(l_Lean_getConstInfo___at_Lean_Meta_isRflTheorem___spec__1___closed__4); +l_Lean_Meta_isRflProof___closed__1 = _init_l_Lean_Meta_isRflProof___closed__1(); +lean_mark_persistent(l_Lean_Meta_isRflProof___closed__1); +l_Lean_Meta_isRflProof___closed__2 = _init_l_Lean_Meta_isRflProof___closed__2(); +lean_mark_persistent(l_Lean_Meta_isRflProof___closed__2); +l_Lean_Meta_isRflProof___closed__3 = _init_l_Lean_Meta_isRflProof___closed__3(); +lean_mark_persistent(l_Lean_Meta_isRflProof___closed__3); +l_Lean_Meta_isRflProof___closed__4 = _init_l_Lean_Meta_isRflProof___closed__4(); +lean_mark_persistent(l_Lean_Meta_isRflProof___closed__4); +l_Lean_Meta_isRflProof___closed__5 = _init_l_Lean_Meta_isRflProof___closed__5(); +lean_mark_persistent(l_Lean_Meta_isRflProof___closed__5); +l_Lean_Meta_isRflProof___closed__6 = _init_l_Lean_Meta_isRflProof___closed__6(); +lean_mark_persistent(l_Lean_Meta_isRflProof___closed__6); +l_Lean_Meta_isRflProof___closed__7 = _init_l_Lean_Meta_isRflProof___closed__7(); +lean_mark_persistent(l_Lean_Meta_isRflProof___closed__7); +l_Lean_Meta_isRflProof___closed__8 = _init_l_Lean_Meta_isRflProof___closed__8(); +lean_mark_persistent(l_Lean_Meta_isRflProof___closed__8); l_Lean_Meta_instToFormatSimpTheorem___closed__1 = _init_l_Lean_Meta_instToFormatSimpTheorem___closed__1(); lean_mark_persistent(l_Lean_Meta_instToFormatSimpTheorem___closed__1); l_Lean_Meta_instToFormatSimpTheorem___closed__2 = _init_l_Lean_Meta_instToFormatSimpTheorem___closed__2(); @@ -16381,8 +16621,6 @@ l_Lean_Meta_instToFormatSimpTheorem___closed__4 = _init_l_Lean_Meta_instToFormat lean_mark_persistent(l_Lean_Meta_instToFormatSimpTheorem___closed__4); l_Lean_Meta_instToFormatSimpTheorem___closed__5 = _init_l_Lean_Meta_instToFormatSimpTheorem___closed__5(); lean_mark_persistent(l_Lean_Meta_instToFormatSimpTheorem___closed__5); -l_Lean_Meta_instToFormatSimpTheorem___closed__6 = _init_l_Lean_Meta_instToFormatSimpTheorem___closed__6(); -lean_mark_persistent(l_Lean_Meta_instToFormatSimpTheorem___closed__6); l_Lean_Meta_SimpTheorems_pre___default___closed__1 = _init_l_Lean_Meta_SimpTheorems_pre___default___closed__1(); lean_mark_persistent(l_Lean_Meta_SimpTheorems_pre___default___closed__1); l_Lean_Meta_SimpTheorems_pre___default = _init_l_Lean_Meta_SimpTheorems_pre___default(); @@ -16437,8 +16675,6 @@ l___private_Lean_Meta_Tactic_Simp_SimpTheorems_0__Lean_Meta_checkBadRewrite___cl lean_mark_persistent(l___private_Lean_Meta_Tactic_Simp_SimpTheorems_0__Lean_Meta_checkBadRewrite___closed__1); l___private_Lean_Meta_Tactic_Simp_SimpTheorems_0__Lean_Meta_checkBadRewrite___closed__2 = _init_l___private_Lean_Meta_Tactic_Simp_SimpTheorems_0__Lean_Meta_checkBadRewrite___closed__2(); lean_mark_persistent(l___private_Lean_Meta_Tactic_Simp_SimpTheorems_0__Lean_Meta_checkBadRewrite___closed__2); -l___private_Lean_Meta_Tactic_Simp_SimpTheorems_0__Lean_Meta_checkBadRewrite___closed__3 = _init_l___private_Lean_Meta_Tactic_Simp_SimpTheorems_0__Lean_Meta_checkBadRewrite___closed__3(); -lean_mark_persistent(l___private_Lean_Meta_Tactic_Simp_SimpTheorems_0__Lean_Meta_checkBadRewrite___closed__3); l___private_Lean_Meta_Tactic_Simp_SimpTheorems_0__Lean_Meta_shouldPreprocess___closed__1 = _init_l___private_Lean_Meta_Tactic_Simp_SimpTheorems_0__Lean_Meta_shouldPreprocess___closed__1(); lean_mark_persistent(l___private_Lean_Meta_Tactic_Simp_SimpTheorems_0__Lean_Meta_shouldPreprocess___closed__1); l___private_Lean_Meta_Tactic_Simp_SimpTheorems_0__Lean_Meta_preprocess_go___lambda__1___closed__1 = _init_l___private_Lean_Meta_Tactic_Simp_SimpTheorems_0__Lean_Meta_preprocess_go___lambda__1___closed__1(); @@ -16579,24 +16815,24 @@ l_Lean_Meta_mkSimpExt___closed__2 = _init_l_Lean_Meta_mkSimpExt___closed__2(); lean_mark_persistent(l_Lean_Meta_mkSimpExt___closed__2); l_Lean_Meta_mkSimpExt___closed__3 = _init_l_Lean_Meta_mkSimpExt___closed__3(); lean_mark_persistent(l_Lean_Meta_mkSimpExt___closed__3); -if (builtin) {res = l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpTheorems___hyg_4355_(lean_io_mk_world()); +if (builtin) {res = l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpTheorems___hyg_4517_(lean_io_mk_world()); if (lean_io_result_is_error(res)) return res; l_Lean_Meta_simpExtensionMapRef = lean_io_result_get_value(res); lean_mark_persistent(l_Lean_Meta_simpExtensionMapRef); lean_dec_ref(res); }l_Lean_Meta_registerSimpAttr___closed__1 = _init_l_Lean_Meta_registerSimpAttr___closed__1(); lean_mark_persistent(l_Lean_Meta_registerSimpAttr___closed__1); -l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpTheorems___hyg_4450____closed__1 = _init_l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpTheorems___hyg_4450____closed__1(); -lean_mark_persistent(l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpTheorems___hyg_4450____closed__1); -l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpTheorems___hyg_4450____closed__2 = _init_l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpTheorems___hyg_4450____closed__2(); -lean_mark_persistent(l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpTheorems___hyg_4450____closed__2); -l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpTheorems___hyg_4450____closed__3 = _init_l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpTheorems___hyg_4450____closed__3(); -lean_mark_persistent(l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpTheorems___hyg_4450____closed__3); -l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpTheorems___hyg_4450____closed__4 = _init_l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpTheorems___hyg_4450____closed__4(); -lean_mark_persistent(l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpTheorems___hyg_4450____closed__4); -l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpTheorems___hyg_4450____closed__5 = _init_l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpTheorems___hyg_4450____closed__5(); -lean_mark_persistent(l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpTheorems___hyg_4450____closed__5); -if (builtin) {res = l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpTheorems___hyg_4450_(lean_io_mk_world()); +l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpTheorems___hyg_4612____closed__1 = _init_l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpTheorems___hyg_4612____closed__1(); +lean_mark_persistent(l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpTheorems___hyg_4612____closed__1); +l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpTheorems___hyg_4612____closed__2 = _init_l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpTheorems___hyg_4612____closed__2(); +lean_mark_persistent(l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpTheorems___hyg_4612____closed__2); +l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpTheorems___hyg_4612____closed__3 = _init_l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpTheorems___hyg_4612____closed__3(); +lean_mark_persistent(l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpTheorems___hyg_4612____closed__3); +l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpTheorems___hyg_4612____closed__4 = _init_l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpTheorems___hyg_4612____closed__4(); +lean_mark_persistent(l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpTheorems___hyg_4612____closed__4); +l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpTheorems___hyg_4612____closed__5 = _init_l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpTheorems___hyg_4612____closed__5(); +lean_mark_persistent(l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpTheorems___hyg_4612____closed__5); +if (builtin) {res = l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Simp_SimpTheorems___hyg_4612_(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); @@ -16645,8 +16881,6 @@ l_Lean_Meta_commandRegister__simp__attr_________closed__15 = _init_l_Lean_Meta_c lean_mark_persistent(l_Lean_Meta_commandRegister__simp__attr_________closed__15); l_Lean_Meta_commandRegister__simp__attr_________closed__16 = _init_l_Lean_Meta_commandRegister__simp__attr_________closed__16(); lean_mark_persistent(l_Lean_Meta_commandRegister__simp__attr_________closed__16); -l_Lean_Meta_commandRegister__simp__attr_________closed__17 = _init_l_Lean_Meta_commandRegister__simp__attr_________closed__17(); -lean_mark_persistent(l_Lean_Meta_commandRegister__simp__attr_________closed__17); l_Lean_Meta_commandRegister__simp__attr______ = _init_l_Lean_Meta_commandRegister__simp__attr______(); lean_mark_persistent(l_Lean_Meta_commandRegister__simp__attr______); l_Lean_Meta___aux__Lean__Meta__Tactic__Simp__SimpTheorems______macroRules__Lean__Meta__commandRegister__simp__attr________1___closed__1 = _init_l_Lean_Meta___aux__Lean__Meta__Tactic__Simp__SimpTheorems______macroRules__Lean__Meta__commandRegister__simp__attr________1___closed__1(); diff --git a/stage0/stdlib/Lean/Meta/Tactic/Split.c b/stage0/stdlib/Lean/Meta/Tactic/Split.c index 3e5ba242da..0b8ee4bab3 100644 --- a/stage0/stdlib/Lean/Meta/Tactic/Split.c +++ b/stage0/stdlib/Lean/Meta/Tactic/Split.c @@ -869,6 +869,8 @@ lean_object* x_18; lean_object* x_19; x_18 = lean_ctor_get(x_16, 1); lean_inc(x_18); lean_dec(x_16); +lean_inc(x_9); +lean_inc(x_8); lean_inc(x_2); x_19 = l_Lean_Meta_isRflTheorem(x_2, x_8, x_9, x_18); if (lean_obj_tag(x_19) == 0) diff --git a/stage0/stdlib/Lean/Meta/Tactic/Unfold.c b/stage0/stdlib/Lean/Meta/Tactic/Unfold.c index fafe5fac30..1c652f5912 100644 --- a/stage0/stdlib/Lean/Meta/Tactic/Unfold.c +++ b/stage0/stdlib/Lean/Meta/Tactic/Unfold.c @@ -184,6 +184,8 @@ LEAN_EXPORT lean_object* l_Lean_Meta_unfold_pre(lean_object* x_1, lean_object* x _start: { lean_object* x_10; +lean_inc(x_8); +lean_inc(x_7); lean_inc(x_1); x_10 = l_Lean_Meta_isRflTheorem(x_1, x_7, x_8, x_9); if (lean_obj_tag(x_10) == 0)