From ae5eb9f793865685b7ce9abb5909fe1ae73a5add Mon Sep 17 00:00:00 2001 From: Leonardo de Moura Date: Sat, 11 Sep 2021 14:07:23 -0700 Subject: [PATCH] chore: update stage0 --- stage0/src/CMakeLists.txt | 1 + stage0/src/Init/Classical.lean | 2 +- stage0/src/Init/SimpLemmas.lean | 18 + stage0/src/Lean/Elab/Binders.lean | 2 +- stage0/src/Lean/Elab/Command.lean | 10 + .../Lean/Elab/PreDefinition/Structural.lean | 597 +- .../Elab/PreDefinition/Structural/BRecOn.lean | 197 + .../Elab/PreDefinition/Structural/Basic.lean | 78 + .../Elab/PreDefinition/Structural/Eqns.lean | 18 + .../PreDefinition/Structural/FindRecArg.lean | 106 + .../PreDefinition/Structural/IndPred.lean | 100 + .../Elab/PreDefinition/Structural/Main.lean | 95 + .../PreDefinition/Structural/Preprocess.lean | 35 + .../Structural/SmartUnfolding.lean | 61 + stage0/src/Lean/Expr.lean | 11 + stage0/src/Lean/Meta/AppBuilder.lean | 12 + stage0/src/Lean/Meta/Match/Match.lean | 4 +- stage0/src/Lean/Meta/Match/MatcherInfo.lean | 16 +- stage0/src/Lean/Meta/Tactic/Simp/Main.lean | 50 +- stage0/src/Lean/Meta/Tactic/Split.lean | 17 +- stage0/src/Lean/Meta/Tactic/SplitIf.lean | 2 +- .../PrettyPrinter/Delaborator/Builtins.lean | 17 + stage0/src/library/compiler/compiler.cpp | 13 + stage0/src/library/compiler/csimp.cpp | 7 +- stage0/src/library/compiler/util.h | 6 + stage0/stdlib/Init/Classical.c | 624 +- stage0/stdlib/Lean/Elab/Binders.c | 92 +- stage0/stdlib/Lean/Elab/Command.c | 758 + stage0/stdlib/Lean/Elab/Inductive.c | 4 +- .../Lean/Elab/PreDefinition/Structural.c | 20827 +--------------- .../Elab/PreDefinition/Structural/BRecOn.c | 8299 ++++++ .../Elab/PreDefinition/Structural/Basic.c | 623 + .../Lean/Elab/PreDefinition/Structural/Eqns.c | 328 + .../PreDefinition/Structural/FindRecArg.c | 3763 +++ .../Elab/PreDefinition/Structural/IndPred.c | 5438 ++++ .../Lean/Elab/PreDefinition/Structural/Main.c | 2801 +++ .../PreDefinition/Structural/Preprocess.c | 200 + .../PreDefinition/Structural/SmartUnfolding.c | 2868 +++ stage0/stdlib/Lean/Expr.c | 169 +- stage0/stdlib/Lean/Meta/AppBuilder.c | 117 +- stage0/stdlib/Lean/Meta/Match/Match.c | 400 +- stage0/stdlib/Lean/Meta/Match/MatcherInfo.c | 412 +- stage0/stdlib/Lean/Meta/Tactic/Simp/Main.c | 4958 ++-- stage0/stdlib/Lean/Meta/Tactic/Split.c | 1360 +- stage0/stdlib/Lean/Meta/Tactic/SplitIf.c | 132 +- .../Lean/PrettyPrinter/Delaborator/Builtins.c | 1442 +- stage0/stdlib/Lean/Server/Completion.c | 6 +- 47 files changed, 32634 insertions(+), 24462 deletions(-) create mode 100644 stage0/src/Lean/Elab/PreDefinition/Structural/BRecOn.lean create mode 100644 stage0/src/Lean/Elab/PreDefinition/Structural/Basic.lean create mode 100644 stage0/src/Lean/Elab/PreDefinition/Structural/Eqns.lean create mode 100644 stage0/src/Lean/Elab/PreDefinition/Structural/FindRecArg.lean create mode 100644 stage0/src/Lean/Elab/PreDefinition/Structural/IndPred.lean create mode 100644 stage0/src/Lean/Elab/PreDefinition/Structural/Main.lean create mode 100644 stage0/src/Lean/Elab/PreDefinition/Structural/Preprocess.lean create mode 100644 stage0/src/Lean/Elab/PreDefinition/Structural/SmartUnfolding.lean create mode 100644 stage0/stdlib/Lean/Elab/PreDefinition/Structural/BRecOn.c create mode 100644 stage0/stdlib/Lean/Elab/PreDefinition/Structural/Basic.c create mode 100644 stage0/stdlib/Lean/Elab/PreDefinition/Structural/Eqns.c create mode 100644 stage0/stdlib/Lean/Elab/PreDefinition/Structural/FindRecArg.c create mode 100644 stage0/stdlib/Lean/Elab/PreDefinition/Structural/IndPred.c create mode 100644 stage0/stdlib/Lean/Elab/PreDefinition/Structural/Main.c create mode 100644 stage0/stdlib/Lean/Elab/PreDefinition/Structural/Preprocess.c create mode 100644 stage0/stdlib/Lean/Elab/PreDefinition/Structural/SmartUnfolding.c diff --git a/stage0/src/CMakeLists.txt b/stage0/src/CMakeLists.txt index 4e83cbabe4..e160af14f1 100644 --- a/stage0/src/CMakeLists.txt +++ b/stage0/src/CMakeLists.txt @@ -305,6 +305,7 @@ if(${CMAKE_SYSTEM_NAME} MATCHES "Linux") elseif(${CMAKE_SYSTEM_NAME} MATCHES "Darwin") set(CMAKE_CXX_FLAGS "${CMAKE_CXX_FLAGS} -ftls-model=initial-exec") set(CMAKE_EXE_LINKER_FLAGS "${CMAKE_EXE_LINKER_FLAGS} -Wl,-rpath,@executable_path/../lib -Wl,-rpath,@executable_path/../lib/lean") + set(LEANSHARED_LINKER_FLAGS "${LEANSHARED_LINKER_FLAGS} -install_name @rpath/libleanshared.dylib") endif() # export all symbols for the interpreter diff --git a/stage0/src/Init/Classical.lean b/stage0/src/Init/Classical.lean index 19412ab164..71a4feb8d4 100644 --- a/stage0/src/Init/Classical.lean +++ b/stage0/src/Init/Classical.lean @@ -39,7 +39,7 @@ theorem em (p : Prop) : p ∨ ¬p := | Or.inr h, _ => Or.inr h | _, Or.inr h => Or.inr h | Or.inl hut, Or.inl hvf => - have hne : u ≠ v := by simp (config := { zeta := false }) [hvf, hut, true_ne_false] + have hne : u ≠ v := by simp [hvf, hut, true_ne_false] Or.inl hne have p_implies_uv : p → u = v := fun hp => diff --git a/stage0/src/Init/SimpLemmas.lean b/stage0/src/Init/SimpLemmas.lean index b5ce6742cf..8e4183f33f 100644 --- a/stage0/src/Init/SimpLemmas.lean +++ b/stage0/src/Init/SimpLemmas.lean @@ -47,6 +47,24 @@ theorem forall_congr {α : Sort u} {p q : α → Prop} (h : ∀ a, (p a = q a)) have : p = q := funext h this ▸ rfl +theorem let_congr {α : Sort u} {β : Sort v} {a a' : α} {b b' : α → β} (h₁ : a = a') (h₂ : ∀ x, b x = b' x) : + (let x := a; b x) = (let x := a'; b' x) := by + subst h₁ + have : b = b' := funext h₂ + subst this + rfl + +theorem let_val_congr {α : Sort u} {β : Sort v} {a a' : α} (b : α → β) (h : a = a') : + (let x := a; b x) = (let x := a'; b x) := by + subst h + rfl + +theorem let_body_congr {α : Sort u} {β : α → Sort v} {b b' : (a : α) → β a} (a : α) (h : ∀ x, b x = b' x) : + (let x := a; b x) = (let x := a; b' x) := by + have : b = b' := funext h + subst this + rfl + @[congr] theorem ite_congr {x y u v : α} {s : Decidable b} [Decidable c] (h₁ : b = c) (h₂ : c → x = u) (h₃ : ¬ c → y = v) : ite b x y = ite c u v := by cases Decidable.em c with diff --git a/stage0/src/Lean/Elab/Binders.lean b/stage0/src/Lean/Elab/Binders.lean index 7cbcca7433..ffbbd82003 100644 --- a/stage0/src/Lean/Elab/Binders.lean +++ b/stage0/src/Lean/Elab/Binders.lean @@ -565,7 +565,7 @@ def elabLetDeclAux (id : Syntax) (binders : Array Syntax) (typeStx : Syntax) (va let body ← elabTermEnsuringType body expectedType? let body ← instantiateMVars body mkLambdaFVars #[x] body (usedLetOnly := false) - pure <| mkApp f val + pure <| mkLetFunAnnotation (mkApp f val) if elabBodyFirst then forallBoundedTelescope type arity fun xs type => do let valResult ← elabTermEnsuringType valStx type diff --git a/stage0/src/Lean/Elab/Command.lean b/stage0/src/Lean/Elab/Command.lean index 9d4de6b6ba..df6e42f5b9 100644 --- a/stage0/src/Lean/Elab/Command.lean +++ b/stage0/src/Lean/Elab/Command.lean @@ -405,6 +405,16 @@ def modifyScope (f : Scope → Scope) : CommandElabM Unit := | [] => unreachable! } +def withScope (f : Scope → Scope) (x : CommandElabM α) : CommandElabM α := do + match (← get).scopes with + | [] => x + | h :: t => + try + modify fun s => { s with scopes := f h :: t } + x + finally + modify fun s => { s with scopes := h :: t } + def getLevelNames : CommandElabM (List Name) := return (← getScope).levelNames diff --git a/stage0/src/Lean/Elab/PreDefinition/Structural.lean b/stage0/src/Lean/Elab/PreDefinition/Structural.lean index 2e8c4420a9..5dde930eaf 100644 --- a/stage0/src/Lean/Elab/PreDefinition/Structural.lean +++ b/stage0/src/Lean/Elab/PreDefinition/Structural.lean @@ -3,599 +3,4 @@ Copyright (c) 2020 Microsoft Corporation. All rights reserved. Released under Apache 2.0 license as described in the file LICENSE. Authors: Leonardo de Moura -/ -import Lean.Util.ForEachExpr -import Lean.Meta.ForEachExpr -import Lean.Meta.RecursorInfo -import Lean.Meta.Match.Match -import Lean.Meta.Transform -import Lean.Meta.IndPredBelow -import Lean.Elab.PreDefinition.Basic -namespace Lean.Elab -namespace Structural -open Meta - -private def getFixedPrefix (declName : Name) (xs : Array Expr) (value : Expr) : MetaM Nat := do - let numFixedRef ← IO.mkRef xs.size - forEachExpr' value fun e => do - if e.isAppOf declName then - let args := e.getAppArgs - numFixedRef.modify fun numFixed => if args.size < numFixed then args.size else numFixed - for arg in args, x in xs do - /- We should not use structural equality here. For example, given the definition - ``` - def V.map {α β} f x x_1 := - @V.map.match_1.{1} α (fun x x_2 => V β x) x x_1 - (fun x x_2 => @V.mk₁ β x (f Bool.true x_2)) - (fun e => @V.mk₂ β (V.map (fun b => α b) (fun b => β b) f Bool.false e)) - ``` - The first three arguments at `V.map (fun b => α b) (fun b => β b) f Bool.false e` are "fixed" - modulo definitional equality. - - We disable to proof irrelevance to be able to use structural recursion on inductive predicates. - For example, consider the example - ``` - inductive PList (α : Type) : Prop - | nil - | cons : α → PList α → PList α - - infixr:67 " ::: " => PList.cons - - set_option trace.Elab.definition.structural true in - def pmap {α β} (f : α → β) : PList α → PList β - | PList.nil => PList.nil - | a:::as => f a ::: pmap f as - ``` - The "Fixed" prefix would be 4 since all elements of type `PList α` are definitionally equal. - -/ - if !(← withoutProofIrrelevance <| withReducible <| isDefEq arg x) then - -- We continue searching if e's arguments are not a prefix of `xs` - return true - return false - else - return true - numFixedRef.get - -structure RecArgInfo where - /- `fixedParams ++ ys` are the arguments of the function we are trying to justify termination using structural recursion. -/ - fixedParams : Array Expr - ys : Array Expr -- recursion arguments - pos : Nat -- position in `ys` of the argument we are recursing on - indicesPos : Array Nat -- position in `ys` of the inductive datatype indices we are recursing on - indName : Name -- inductive datatype name of the argument we are recursing on - indLevels : List Level -- inductice datatype universe levels of the argument we are recursing on - indParams : Array Expr -- inductive datatype parameters of the argument we are recursing on - indIndices : Array Expr -- inductive datatype indices of the argument we are recursing on, it is equal to `indicesPos.map fun i => ys.get! i` - reflexive : Bool -- true if we are recursing over a reflexive inductive datatype - indPred : Bool -- true if the type is an inductive predicate - -private def getIndexMinPos (xs : Array Expr) (indices : Array Expr) : Nat := do - let mut minPos := xs.size - for index in indices do - match xs.indexOf? index with - | some pos => if pos.val < minPos then minPos := pos.val - | _ => pure () - return minPos - --- Indices can only depend on other indices -private def hasBadIndexDep? (ys : Array Expr) (indices : Array Expr) : MetaM (Option (Expr × Expr)) := do - for index in indices do - let indexType ← inferType index - for y in ys do - if !indices.contains y && (← dependsOn indexType y.fvarId!) then - return some (index, y) - return none - --- Inductive datatype parameters cannot depend on ys -private def hasBadParamDep? (ys : Array Expr) (indParams : Array Expr) : MetaM (Option (Expr × Expr)) := do - for p in indParams do - let pType ← inferType p - for y in ys do - if ← dependsOn pType y.fvarId! then - return some (p, y) - return none - -private def throwStructuralFailed {α} : MetaM α := - throwError "structural recursion cannot be used" - -structure State where - /- When compiling structural recursion we use the `brecOn` recursor automatically built by - the `inductive` command. For an inductive datatype `C`, it has the form - `C.brecOn As motive is c F` - where `As` are the inductive datatype parameters, `is` are the inductive datatype indices, - `c : C As is`, and `F : (js) → (d : C As js) → C.below d → motive d` - The `C.below d` is used to eliminate recursive applications. We refine its type when we process - a nested dependent pattern matcher using `MatcherApp.addArg`. See `replaceRecApps` for additional details. - We store the names of the matcher where we used `MatcherApp.addArg` at `matcherBelowDep`. - We use this information to generate the auxiliary `_sunfold` definition needed by the smart unfolding - technique used at WHNF. -/ - matcherBelowDep : NameSet := {} - /- As part of the inductive predicates case, we keep adding more and more discriminants from the - local context and build up a bigger matcher application until we reach a fixed point. - As a side-effect, this creates matchers. Here we capture all these side-effects, because - the construction rolls back any changes done to the environment and the side-effects - need to be replayed. -/ - addMatchers : Array $ MetaM Unit := #[] - -abbrev M := StateRefT State MetaM - -instance {α} : Inhabited (M α) where - default := throwError "failed" - -private def run {α} (x : M α) (s : State := {}) : MetaM (α × State) := - StateRefT'.run x s - -private def orelse' {α} (x y : M α) : M α := do - let saveState ← get - orelseMergeErrors x (do set saveState; y) - -private partial def findRecArg {α} (numFixed : Nat) (xs : Array Expr) (k : RecArgInfo → M α) : M α := - let rec loop (i : Nat) : M α := do - if h : i < xs.size then - let x := xs.get ⟨i, h⟩ - let localDecl ← getFVarLocalDecl x - if localDecl.isLet then - throwStructuralFailed - else - let xType ← whnfD localDecl.type - matchConstInduct xType.getAppFn (fun _ => loop (i+1)) fun indInfo us => do - if !(← hasConst (mkBRecOnName indInfo.name)) then - loop (i+1) - else if indInfo.isReflexive && !(← hasConst (mkBInductionOnName indInfo.name)) then - loop (i+1) - else - let indArgs := xType.getAppArgs - let indParams := indArgs.extract 0 indInfo.numParams - let indIndices := indArgs.extract indInfo.numParams indArgs.size - if !indIndices.all Expr.isFVar then - orelse' - (throwError "argument #{i+1} was not used because its type is an inductive family and indices are not variables{indentExpr xType}") - (loop (i+1)) - else if !indIndices.allDiff then - orelse' - (throwError "argument #{i+1} was not used because its type is an inductive family and indices are not pairwise distinct{indentExpr xType}") - (loop (i+1)) - else - let indexMinPos := getIndexMinPos xs indIndices - let numFixed := if indexMinPos < numFixed then indexMinPos else numFixed - let fixedParams := xs.extract 0 numFixed - let ys := xs.extract numFixed xs.size - match (← hasBadIndexDep? ys indIndices) with - | some (index, y) => - orelse' - (throwError "argument #{i+1} was not used because its type is an inductive family{indentExpr xType}\nand index{indentExpr index}\ndepends on the non index{indentExpr y}") - (loop (i+1)) - | none => - match (← hasBadParamDep? ys indParams) with - | some (indParam, y) => - orelse' - (throwError "argument #{i+1} was not used because its type is an inductive datatype{indentExpr xType}\nand parameter{indentExpr indParam}\ndepends on{indentExpr y}") - (loop (i+1)) - | none => - let indicesPos := indIndices.map fun index => match ys.indexOf? index with | some i => i.val | none => unreachable! - orelse' - (mapError - (k { fixedParams := fixedParams - ys := ys - pos := i - fixedParams.size - indicesPos := indicesPos - indName := indInfo.name - indLevels := us - indParams := indParams - indIndices := indIndices - reflexive := indInfo.isReflexive - indPred := ←isInductivePredicate indInfo.name }) - (fun msg => m!"argument #{i+1} was not used for structural recursion{indentD msg}")) - (loop (i+1)) - else - throwStructuralFailed - loop numFixed - -private def containsRecFn (recFnName : Name) (e : Expr) : Bool := - (e.find? fun e => e.isConstOf recFnName).isSome - -private def ensureNoRecFn (recFnName : Name) (e : Expr) : MetaM Expr := do - if containsRecFn recFnName e then - Meta.forEachExpr e fun e => do - if e.isAppOf recFnName then - throwError "unexpected occurrence of recursive application{indentExpr e}" - pure e - else - pure e - -private def throwToBelowFailed {α} : MetaM α := - throwError "toBelow failed" - -/- See toBelow -/ -private partial def toBelowAux (C : Expr) : Expr → Expr → Expr → MetaM Expr - | belowDict, arg, F => do - let belowDict ← whnf belowDict - trace[Elab.definition.structural] "belowDict: {belowDict}, arg: {arg}" - match belowDict with - | Expr.app (Expr.app (Expr.const `PProd _ _) d1 _) d2 _ => - (do toBelowAux C d1 arg (← mkAppM `PProd.fst #[F])) - <|> - (do toBelowAux C d2 arg (← mkAppM `PProd.snd #[F])) - | Expr.app (Expr.app (Expr.const `And _ _) d1 _) d2 _ => - (do toBelowAux C d1 arg (← mkAppM `And.left #[F])) - <|> - (do toBelowAux C d2 arg (← mkAppM `And.right #[F])) - | _ => forallTelescopeReducing belowDict fun xs belowDict => do - let argArgs := arg.getAppArgs - unless argArgs.size >= xs.size do throwToBelowFailed - let n := argArgs.size - let argTailArgs := argArgs.extract (n - xs.size) n - let belowDict := belowDict.replaceFVars xs argTailArgs - match belowDict with - | Expr.app belowDictFun belowDictArg _ => - unless belowDictFun.getAppFn == C do throwToBelowFailed - unless ← isDefEq belowDictArg arg do throwToBelowFailed - pure (mkAppN F argTailArgs) - | _ => throwToBelowFailed - -/- See toBelow -/ -private def withBelowDict {α} (below : Expr) (numIndParams : Nat) (k : Expr → Expr → MetaM α) : MetaM α := do - let belowType ← inferType below - trace[Elab.definition.structural] "belowType: {belowType}" - belowType.withApp fun f args => do - let motivePos := numIndParams + 1 - unless motivePos < args.size do throwError "unexpected 'below' type{indentExpr belowType}" - let pre := mkAppN f (args.extract 0 numIndParams) - let preType ← inferType pre - forallBoundedTelescope preType (some 1) fun x _ => do - let motiveType ← inferType x[0] - let C ← mkFreshUserName `C - withLocalDeclD C motiveType fun C => - let belowDict := mkApp pre C - let belowDict := mkAppN belowDict (args.extract (numIndParams + 1) args.size) - k C belowDict - -/- - `below` is a free variable with type of the form `I.below indParams motive indices major`, - where `I` is the name of an inductive datatype. - - For example, when trying to show that the following function terminates using structural recursion - ```lean - def addAdjacent : List Nat → List Nat - | [] => [] - | [a] => [a] - | a::b::as => (a+b) :: addAdjacent as - ``` - when we are visiting `addAdjacent as` at `replaceRecApps`, `below` has type - `@List.below Nat (fun (x : List Nat) => List Nat) (a::b::as)` - The motive `fun (x : List Nat) => List Nat` depends on the actual function we are trying to compute. - So, we first replace it with a fresh variable `C` at `withBelowDict`. - Recall that `brecOn` implements course-of-values recursion, and `below` can be viewed as a dictionary - of the "previous values". - We search this dictionary using the auxiliary function `toBelowAux`. - The dictionary is built using the `PProd` (`And` for inductive predicates). - We keep searching it until we find `C recArg`, where `C` is the auxiliary fresh variable created at `withBelowDict`. -/ -private partial def toBelow (below : Expr) (numIndParams : Nat) (recArg : Expr) : MetaM Expr := do - withBelowDict below numIndParams fun C belowDict => - toBelowAux C belowDict recArg below - -/-- - Return true iff `e` contains an application `recFnName .. t ..` where the term `t` is - the argument we are trying to recurse on, and it contains loose bound variables. - - We use this test to decide whether we should process a matcher-application as a regular - applicaton or not. That is, whether we should push the `below` argument should be affected by the matcher or not. - If `e` does not contain an application of the form `recFnName .. t ..`, then we know - the recursion doesn't depend on any pattern variable in this matcher. --/ -private def recArgHasLooseBVarsAt (recFnName : Name) (recArgInfo : RecArgInfo) (e : Expr) : Bool := - let recArgPos := recArgInfo.fixedParams.size + recArgInfo.pos - let app? := e.find? fun e => - e.isAppOf recFnName && e.getAppNumArgs > recArgPos && (e.getArg! recArgPos).hasLooseBVars - app?.isSome - -private partial def replaceRecApps (recFnName : Name) (recArgInfo : RecArgInfo) (below : Expr) (e : Expr) : M Expr := - let rec loop (below : Expr) (e : Expr) : M Expr := do - match e with - | Expr.lam n d b c => - withLocalDecl n c.binderInfo (← loop below d) fun x => do - mkLambdaFVars #[x] (← loop below (b.instantiate1 x)) - | Expr.forallE n d b c => - withLocalDecl n c.binderInfo (← loop below d) fun x => do - mkForallFVars #[x] (← loop below (b.instantiate1 x)) - | Expr.letE n type val body _ => - withLetDecl n (← loop below type) (← loop below val) fun x => do - mkLetFVars #[x] (← loop below (body.instantiate1 x)) - | Expr.mdata d e _ => return mkMData d (← loop below e) - | Expr.proj n i e _ => return mkProj n i (← loop below e) - | Expr.app _ _ _ => - let processApp (e : Expr) : M Expr := - e.withApp fun f args => do - if f.isConstOf recFnName then - let numFixed := recArgInfo.fixedParams.size - let recArgPos := recArgInfo.fixedParams.size + recArgInfo.pos - if recArgPos >= args.size then - throwError "insufficient number of parameters at recursive application {indentExpr e}" - let recArg := args[recArgPos] - -- For reflexive type, we may have nested recursive applications in recArg - let recArg ← loop below recArg - let f ← try toBelow below recArgInfo.indParams.size recArg catch _ => throwError "failed to eliminate recursive application{indentExpr e}" - -- Recall that the fixed parameters are not in the scope of the `brecOn`. So, we skip them. - let argsNonFixed := args.extract numFixed args.size - -- The function `f` does not explicitly take `recArg` and its indices as arguments. So, we skip them too. - let mut fArgs := #[] - for i in [:argsNonFixed.size] do - if recArgInfo.pos != i && !recArgInfo.indicesPos.contains i then - let arg := argsNonFixed[i] - let arg ← replaceRecApps recFnName recArgInfo below arg - fArgs := fArgs.push arg - return mkAppN f fArgs - else - return mkAppN (← loop below f) (← args.mapM (loop below)) - let matcherApp? ← matchMatcherApp? e - match matcherApp? with - | some matcherApp => - if !recArgHasLooseBVarsAt recFnName recArgInfo e then - processApp e - else - /- Here is an example we currently not handle - ``` - def g (xs : List Nat) : Nat := - match xs with - | [] => 0 - | y::ys => - match ys with - | [] => 1 - | _::_::zs => g zs + 1 - | zs => g ys + 2 - ``` - We are matching on `ys`, but still using `ys` in the third alternative. - If we push the `below` argument over the dependent match it will be able to eliminate recursive call using `zs`. - To make it work, users have to write the third alternative as `| zs => g zs + 2` - If this is too annoying in practice, we may replace `ys` with the matching term, but - this may generate weird error messages, when it doesn't work. -/ - trace[Elab.definition.structural] "below before matcherApp.addArg: {below} : {← inferType below}" - let matcherApp ← mapError (matcherApp.addArg below) (fun msg => "failed to add `below` argument to 'matcher' application" ++ indentD msg) - modify fun s => { s with matcherBelowDep := s.matcherBelowDep.insert matcherApp.matcherName } - let altsNew ← (Array.zip matcherApp.alts matcherApp.altNumParams).mapM fun (alt, numParams) => - lambdaTelescope alt fun xs altBody => do - trace[Elab.definition.structural] "altNumParams: {numParams}, xs: {xs}" - unless xs.size >= numParams do - throwError "unexpected matcher application alternative{indentExpr alt}\nat application{indentExpr e}" - let belowForAlt := xs[numParams - 1] - mkLambdaFVars xs (← loop belowForAlt altBody) - pure { matcherApp with alts := altsNew }.toExpr - | none => processApp e - | e => ensureNoRecFn recFnName e - loop below e - -private partial def replaceIndPredRecApps (recFnName : Name) (recArgInfo : RecArgInfo) (motive : Expr) (e : Expr) : M Expr := do - let maxDepth := IndPredBelow.maxBackwardChainingDepth.get $ ←getOptions - let rec loop (e : Expr) : M Expr := do - match e with - | Expr.lam n d b c => - withLocalDecl n c.binderInfo (← loop d) fun x => do - mkLambdaFVars #[x] (← loop (b.instantiate1 x)) - | Expr.forallE n d b c => - withLocalDecl n c.binderInfo (← loop d) fun x => do - mkForallFVars #[x] (← loop (b.instantiate1 x)) - | Expr.letE n type val body _ => - withLetDecl n (← loop type) (← loop val) fun x => do - mkLetFVars #[x] (← loop (body.instantiate1 x)) - | Expr.mdata d e _ => return mkMData d (← loop e) - | Expr.proj n i e _ => return mkProj n i (← loop e) - | Expr.app _ _ _ => - let processApp (e : Expr) : M Expr := do - e.withApp fun f args => do - if f.isConstOf recFnName then - let ty ← inferType e - let main ← mkFreshExprSyntheticOpaqueMVar ty - if ←IndPredBelow.backwardsChaining main.mvarId! maxDepth then - main - else - throwError "could not solve using backwards chaining {MessageData.ofGoal main.mvarId!}" - else - return mkAppN (← loop f) (← args.mapM loop) - match (←matchMatcherApp? e) with - | some matcherApp => - if !recArgHasLooseBVarsAt recFnName recArgInfo e then - processApp e - else - trace[Elab.definition.structural] "matcherApp before adding below transformation:\n{matcherApp.toExpr}" - let rec addBelow (matcherApp : MatcherApp) : M Expr := do - if let some (t, idx) ← IndPredBelow.findBelowIdx matcherApp.discrs motive then - let (newApp, addMatcher) ← IndPredBelow.mkBelowMatcher matcherApp motive t idx - modify fun s => { s with addMatchers := s.addMatchers.push addMatcher } - let some newApp ← matchMatcherApp? newApp | throwError "not a matcherApp: {newApp}" - addBelow newApp - else matcherApp.toExpr - - let newApp ← addBelow matcherApp - if newApp == matcherApp.toExpr then - throwError "could not add below discriminant" - else - trace[Elab.definition.structural] "modified matcher:\n{newApp}" - processApp newApp - | none => processApp e - | e => ensureNoRecFn recFnName e - loop e - -private def mkBRecOn (recFnName : Name) (recArgInfo : RecArgInfo) (value : Expr) : M Expr := do - let type := (← inferType value).headBeta - let major := recArgInfo.ys[recArgInfo.pos] - let otherArgs := recArgInfo.ys.filter fun y => y != major && !recArgInfo.indIndices.contains y - trace[Elab.definition.structural] "fixedParams: {recArgInfo.fixedParams}, otherArgs: {otherArgs}" - let motive ← mkForallFVars otherArgs type - let mut brecOnUniv ← getLevel motive - trace[Elab.definition.structural] "brecOn univ: {brecOnUniv}" - let useBInductionOn := recArgInfo.reflexive && brecOnUniv == levelZero - if recArgInfo.reflexive && brecOnUniv != levelZero then - brecOnUniv ← decLevel brecOnUniv - let motive ← mkLambdaFVars (recArgInfo.indIndices.push major) motive - trace[Elab.definition.structural] "brecOn motive: {motive}" - let brecOn := - if useBInductionOn then - Lean.mkConst (mkBInductionOnName recArgInfo.indName) recArgInfo.indLevels - else - Lean.mkConst (mkBRecOnName recArgInfo.indName) (brecOnUniv :: recArgInfo.indLevels) - let brecOn := mkAppN brecOn recArgInfo.indParams - let brecOn := mkApp brecOn motive - let brecOn := mkAppN brecOn recArgInfo.indIndices - let brecOn := mkApp brecOn major - check brecOn - let brecOnType ← inferType brecOn - trace[Elab.definition.structural] "brecOn {brecOn}" - trace[Elab.definition.structural] "brecOnType {brecOnType}" - forallBoundedTelescope brecOnType (some 1) fun F _ => do - let F := F[0] - let FType ← inferType F - trace[Elab.definition.structural] "FType: {FType}" - let FType ← instantiateForall FType recArgInfo.indIndices - let FType ← instantiateForall FType #[major] - forallBoundedTelescope FType (some 1) fun below _ => do - let below := below[0] - let valueNew ← replaceRecApps recFnName recArgInfo below value - let Farg ← mkLambdaFVars (recArgInfo.indIndices ++ #[major, below] ++ otherArgs) valueNew - let brecOn := mkApp brecOn Farg - pure $ mkAppN brecOn otherArgs - -private def mkIndPredBRecOn (recFnName : Name) (recArgInfo : RecArgInfo) (value : Expr) : M Expr := do - let type := (← inferType value).headBeta - let major := recArgInfo.ys[recArgInfo.pos] - let otherArgs := recArgInfo.ys.filter fun y => y != major && !recArgInfo.indIndices.contains y - trace[Elab.definition.structural] "fixedParams: {recArgInfo.fixedParams}, otherArgs: {otherArgs}" - let motive ← mkForallFVars otherArgs type - let motive ← mkLambdaFVars (recArgInfo.indIndices.push major) motive - trace[Elab.definition.structural] "brecOn motive: {motive}" - let brecOn := - Lean.mkConst (mkBRecOnName recArgInfo.indName) recArgInfo.indLevels - let brecOn := mkAppN brecOn recArgInfo.indParams - let brecOn := mkApp brecOn motive - let brecOn := mkAppN brecOn recArgInfo.indIndices - let brecOn := mkApp brecOn major - check brecOn - let brecOnType ← inferType brecOn - trace[Elab.definition.structural] "brecOn {brecOn}" - trace[Elab.definition.structural] "brecOnType {brecOnType}" - -- we need to close the telescope here, because the local context is used: - -- The root cause was, that this copied code puts an ih : FType into the - -- local context and later, when we use the local context to build the recursive - -- call, it uses this ih. But that ih doesn't exist in the actual brecOn call. - -- That's why it must go. - let FType ← forallBoundedTelescope brecOnType (some 1) fun F _ => do - let F := F[0] - let FType ← inferType F - trace[Elab.definition.structural] "FType: {FType}" - let FType ← instantiateForall FType recArgInfo.indIndices - instantiateForall FType #[major] - forallBoundedTelescope FType (some 1) fun below _ => do - let main ← mkFreshExprSyntheticOpaqueMVar FType - let below := below[0] - let valueNew ← replaceIndPredRecApps recFnName recArgInfo motive value - let Farg ← mkLambdaFVars (recArgInfo.indIndices ++ #[major, below] ++ otherArgs) valueNew - let brecOn := mkApp brecOn Farg - pure $ mkAppN brecOn otherArgs - -private def shouldBetaReduce (e : Expr) (recFnName : Name) : Bool := - if e.isHeadBetaTarget then - e.getAppFn.find? (·.isConstOf recFnName) |>.isSome - else - false - -/-- - Beta reduce terms where the recursive function occurs in the lambda term. - This is useful to improve the effectiveness of `elimRecursion`. - Example: - ``` - def f : Nat → Nat - | 0 => 1 - | i+1 => (fun x => f x) i - ``` --/ -private def preprocess (e : Expr) (recFnName : Name) : CoreM Expr := - Core.transform e - fun e => return TransformStep.visit <| - if shouldBetaReduce e recFnName then - e.headBeta - else - e - -private def elimRecursion (preDef : PreDefinition) : M PreDefinition := - withoutModifyingEnv do lambdaTelescope preDef.value fun xs value => do - addAsAxiom preDef - let value ← preprocess value preDef.declName - trace[Elab.definition.structural] "{preDef.declName} {xs} :=\n{value}" - let numFixed ← getFixedPrefix preDef.declName xs value - trace[Elab.definition.structural] "numFixed: {numFixed}" - findRecArg numFixed xs fun recArgInfo => do - -- when (recArgInfo.indName == `Nat) throwStructuralFailed -- HACK to skip Nat argument - let valueNew ← - if recArgInfo.indPred then mkIndPredBRecOn preDef.declName recArgInfo value - else mkBRecOn preDef.declName recArgInfo value - let valueNew ← mkLambdaFVars xs valueNew - trace[Elab.definition.structural] "result: {valueNew}" - -- Recursive applications may still occur in expressions that were not visited by replaceRecApps (e.g., in types) - let valueNew ← ensureNoRecFn preDef.declName valueNew - pure { preDef with value := valueNew } - -partial def addSmartUnfoldingDefAux (preDef : PreDefinition) (matcherBelowDep : NameSet) : MetaM PreDefinition := do - let recFnName := preDef.declName - let isMarkedMatcherName (n : Name) : Bool := matcherBelowDep.contains n - let isMarkedMatcherConst (e : Expr) : Bool := e.isConst && isMarkedMatcherName e.constName! - let isMarkedMatcherApp (e : Expr) : Bool := isMarkedMatcherConst e.getAppFn - let containsMarkedMatcher (e : Expr) : Bool := e.find? isMarkedMatcherConst |>.isSome - let rec visit (e : Expr) : MetaM Expr := do - match e with - | Expr.lam .. => lambdaTelescope e fun xs b => do mkLambdaFVars xs (← visit b) - | Expr.forallE .. => forallTelescope e fun xs b => do mkForallFVars xs (← visit b) - | Expr.letE n type val body _ => - withLetDecl n type (← visit val) fun x => do - mkLetFVars #[x] (← visit (body.instantiate1 x)) - | Expr.mdata d b _ => return mkMData d (← visit b) - | Expr.proj n i s _ => return mkProj n i (← visit s) - | Expr.app .. => - let processApp (e : Expr) : MetaM Expr := - e.withApp fun f args => do - return mkAppN (← visit f) (← args.mapM visit) - match isMarkedMatcherApp e, (← matchMatcherApp? e) with - | true, some matcherApp => - let altsNew ← (Array.zip matcherApp.alts matcherApp.altNumParams).mapM fun (alt, numParams) => - lambdaTelescope alt fun xs altBody => do - unless xs.size >= numParams do - throwError "unexpected matcher application alternative{indentExpr alt}\nat application{indentExpr e}" - if containsMarkedMatcher altBody then - -- continue - mkLambdaFVars xs (← visit altBody) - else - -- add idRhs marker - let altBody ← mkLambdaFVars xs[numParams:xs.size] altBody - let altBody ← mkIdRhs altBody - mkLambdaFVars xs[0:numParams] altBody - pure { matcherApp with alts := altsNew }.toExpr - | _, _ => processApp e - | _ => pure e - return { preDef with - declName := mkSmartUnfoldingNameFor preDef.declName, - value := (← visit preDef.value), - modifiers := {} - } - -partial def addSmartUnfoldingDef (preDef : PreDefinition) (state : State) : TermElabM Unit := do - if (← isProp preDef.type) then - return () - else - let preDefSUnfold ← addSmartUnfoldingDefAux preDef state.matcherBelowDep - addNonRec preDefSUnfold - -def structuralRecursion (preDefs : Array PreDefinition) : TermElabM Unit := - if preDefs.size != 1 then - throwError "structural recursion does not handle mutually recursive functions" - else do - let (preDefNonRec, state) ← run $ elimRecursion preDefs[0] - state.addMatchers.forM liftM - mapError (addNonRec preDefNonRec) (fun msg => m!"structural recursion failed, produced type incorrect term{indentD msg}") - addAndCompilePartialRec preDefs - addSmartUnfoldingDef preDefs[0] state - -builtin_initialize - registerTraceClass `Elab.definition.structural - -end Structural - -export Structural (structuralRecursion) - -end Lean.Elab +import Lean.Elab.PreDefinition.Structural.Main diff --git a/stage0/src/Lean/Elab/PreDefinition/Structural/BRecOn.lean b/stage0/src/Lean/Elab/PreDefinition/Structural/BRecOn.lean new file mode 100644 index 0000000000..0ea59159cb --- /dev/null +++ b/stage0/src/Lean/Elab/PreDefinition/Structural/BRecOn.lean @@ -0,0 +1,197 @@ +/- +Copyright (c) 2021 Microsoft Corporation. All rights reserved. +Released under Apache 2.0 license as described in the file LICENSE. +Authors: Leonardo de Moura +-/ +import Lean.Meta.Match.Match +import Lean.Elab.PreDefinition.Structural.Basic + +namespace Lean.Elab.Structural +open Meta + +private def throwToBelowFailed : MetaM α := + throwError "toBelow failed" + +/- See toBelow -/ +private partial def toBelowAux (C : Expr) : Expr → Expr → Expr → MetaM Expr + | belowDict, arg, F => do + let belowDict ← whnf belowDict + trace[Elab.definition.structural] "belowDict: {belowDict}, arg: {arg}" + match belowDict with + | Expr.app (Expr.app (Expr.const `PProd _ _) d1 _) d2 _ => + (do toBelowAux C d1 arg (← mkAppM `PProd.fst #[F])) + <|> + (do toBelowAux C d2 arg (← mkAppM `PProd.snd #[F])) + | Expr.app (Expr.app (Expr.const `And _ _) d1 _) d2 _ => + (do toBelowAux C d1 arg (← mkAppM `And.left #[F])) + <|> + (do toBelowAux C d2 arg (← mkAppM `And.right #[F])) + | _ => forallTelescopeReducing belowDict fun xs belowDict => do + let argArgs := arg.getAppArgs + unless argArgs.size >= xs.size do throwToBelowFailed + let n := argArgs.size + let argTailArgs := argArgs.extract (n - xs.size) n + let belowDict := belowDict.replaceFVars xs argTailArgs + match belowDict with + | Expr.app belowDictFun belowDictArg _ => + unless belowDictFun.getAppFn == C do throwToBelowFailed + unless ← isDefEq belowDictArg arg do throwToBelowFailed + pure (mkAppN F argTailArgs) + | _ => throwToBelowFailed + +/- See toBelow -/ +private def withBelowDict (below : Expr) (numIndParams : Nat) (k : Expr → Expr → MetaM α) : MetaM α := do + let belowType ← inferType below + trace[Elab.definition.structural] "belowType: {belowType}" + belowType.withApp fun f args => do + let motivePos := numIndParams + 1 + unless motivePos < args.size do throwError "unexpected 'below' type{indentExpr belowType}" + let pre := mkAppN f (args.extract 0 numIndParams) + let preType ← inferType pre + forallBoundedTelescope preType (some 1) fun x _ => do + let motiveType ← inferType x[0] + let C ← mkFreshUserName `C + withLocalDeclD C motiveType fun C => + let belowDict := mkApp pre C + let belowDict := mkAppN belowDict (args.extract (numIndParams + 1) args.size) + k C belowDict + +/- + `below` is a free variable with type of the form `I.below indParams motive indices major`, + where `I` is the name of an inductive datatype. + + For example, when trying to show that the following function terminates using structural recursion + ```lean + def addAdjacent : List Nat → List Nat + | [] => [] + | [a] => [a] + | a::b::as => (a+b) :: addAdjacent as + ``` + when we are visiting `addAdjacent as` at `replaceRecApps`, `below` has type + `@List.below Nat (fun (x : List Nat) => List Nat) (a::b::as)` + The motive `fun (x : List Nat) => List Nat` depends on the actual function we are trying to compute. + So, we first replace it with a fresh variable `C` at `withBelowDict`. + Recall that `brecOn` implements course-of-values recursion, and `below` can be viewed as a dictionary + of the "previous values". + We search this dictionary using the auxiliary function `toBelowAux`. + The dictionary is built using the `PProd` (`And` for inductive predicates). + We keep searching it until we find `C recArg`, where `C` is the auxiliary fresh variable created at `withBelowDict`. -/ +private partial def toBelow (below : Expr) (numIndParams : Nat) (recArg : Expr) : MetaM Expr := do + withBelowDict below numIndParams fun C belowDict => + toBelowAux C belowDict recArg below + +private partial def replaceRecApps (recFnName : Name) (recArgInfo : RecArgInfo) (below : Expr) (e : Expr) : M Expr := + let rec loop (below : Expr) (e : Expr) : M Expr := do + match e with + | Expr.lam n d b c => + withLocalDecl n c.binderInfo (← loop below d) fun x => do + mkLambdaFVars #[x] (← loop below (b.instantiate1 x)) + | Expr.forallE n d b c => + withLocalDecl n c.binderInfo (← loop below d) fun x => do + mkForallFVars #[x] (← loop below (b.instantiate1 x)) + | Expr.letE n type val body _ => + withLetDecl n (← loop below type) (← loop below val) fun x => do + mkLetFVars #[x] (← loop below (body.instantiate1 x)) + | Expr.mdata d e _ => return mkMData d (← loop below e) + | Expr.proj n i e _ => return mkProj n i (← loop below e) + | Expr.app _ _ _ => + let processApp (e : Expr) : M Expr := + e.withApp fun f args => do + if f.isConstOf recFnName then + let numFixed := recArgInfo.fixedParams.size + let recArgPos := recArgInfo.fixedParams.size + recArgInfo.pos + if recArgPos >= args.size then + throwError "insufficient number of parameters at recursive application {indentExpr e}" + let recArg := args[recArgPos] + -- For reflexive type, we may have nested recursive applications in recArg + let recArg ← loop below recArg + let f ← try toBelow below recArgInfo.indParams.size recArg catch _ => throwError "failed to eliminate recursive application{indentExpr e}" + -- Recall that the fixed parameters are not in the scope of the `brecOn`. So, we skip them. + let argsNonFixed := args.extract numFixed args.size + -- The function `f` does not explicitly take `recArg` and its indices as arguments. So, we skip them too. + let mut fArgs := #[] + for i in [:argsNonFixed.size] do + if recArgInfo.pos != i && !recArgInfo.indicesPos.contains i then + let arg := argsNonFixed[i] + let arg ← replaceRecApps recFnName recArgInfo below arg + fArgs := fArgs.push arg + return mkAppN f fArgs + else + return mkAppN (← loop below f) (← args.mapM (loop below)) + let matcherApp? ← matchMatcherApp? e + match matcherApp? with + | some matcherApp => + if !recArgHasLooseBVarsAt recFnName recArgInfo e then + processApp e + else + /- Here is an example we currently not handle + ``` + def g (xs : List Nat) : Nat := + match xs with + | [] => 0 + | y::ys => + match ys with + | [] => 1 + | _::_::zs => g zs + 1 + | zs => g ys + 2 + ``` + We are matching on `ys`, but still using `ys` in the third alternative. + If we push the `below` argument over the dependent match it will be able to eliminate recursive call using `zs`. + To make it work, users have to write the third alternative as `| zs => g zs + 2` + If this is too annoying in practice, we may replace `ys` with the matching term, but + this may generate weird error messages, when it doesn't work. -/ + trace[Elab.definition.structural] "below before matcherApp.addArg: {below} : {← inferType below}" + let matcherApp ← mapError (matcherApp.addArg below) (fun msg => "failed to add `below` argument to 'matcher' application" ++ indentD msg) + modify fun s => { s with matcherBelowDep := s.matcherBelowDep.insert matcherApp.matcherName } + let altsNew ← (Array.zip matcherApp.alts matcherApp.altNumParams).mapM fun (alt, numParams) => + lambdaTelescope alt fun xs altBody => do + trace[Elab.definition.structural] "altNumParams: {numParams}, xs: {xs}" + unless xs.size >= numParams do + throwError "unexpected matcher application alternative{indentExpr alt}\nat application{indentExpr e}" + let belowForAlt := xs[numParams - 1] + mkLambdaFVars xs (← loop belowForAlt altBody) + pure { matcherApp with alts := altsNew }.toExpr + | none => processApp e + | e => ensureNoRecFn recFnName e + loop below e + +def mkBRecOn (recFnName : Name) (recArgInfo : RecArgInfo) (value : Expr) : M Expr := do + let type := (← inferType value).headBeta + let major := recArgInfo.ys[recArgInfo.pos] + let otherArgs := recArgInfo.ys.filter fun y => y != major && !recArgInfo.indIndices.contains y + trace[Elab.definition.structural] "fixedParams: {recArgInfo.fixedParams}, otherArgs: {otherArgs}" + let motive ← mkForallFVars otherArgs type + let mut brecOnUniv ← getLevel motive + trace[Elab.definition.structural] "brecOn univ: {brecOnUniv}" + let useBInductionOn := recArgInfo.reflexive && brecOnUniv == levelZero + if recArgInfo.reflexive && brecOnUniv != levelZero then + brecOnUniv ← decLevel brecOnUniv + let motive ← mkLambdaFVars (recArgInfo.indIndices.push major) motive + trace[Elab.definition.structural] "brecOn motive: {motive}" + let brecOn := + if useBInductionOn then + Lean.mkConst (mkBInductionOnName recArgInfo.indName) recArgInfo.indLevels + else + Lean.mkConst (mkBRecOnName recArgInfo.indName) (brecOnUniv :: recArgInfo.indLevels) + let brecOn := mkAppN brecOn recArgInfo.indParams + let brecOn := mkApp brecOn motive + let brecOn := mkAppN brecOn recArgInfo.indIndices + let brecOn := mkApp brecOn major + check brecOn + let brecOnType ← inferType brecOn + trace[Elab.definition.structural] "brecOn {brecOn}" + trace[Elab.definition.structural] "brecOnType {brecOnType}" + forallBoundedTelescope brecOnType (some 1) fun F _ => do + let F := F[0] + let FType ← inferType F + trace[Elab.definition.structural] "FType: {FType}" + let FType ← instantiateForall FType recArgInfo.indIndices + let FType ← instantiateForall FType #[major] + forallBoundedTelescope FType (some 1) fun below _ => do + let below := below[0] + let valueNew ← replaceRecApps recFnName recArgInfo below value + let Farg ← mkLambdaFVars (recArgInfo.indIndices ++ #[major, below] ++ otherArgs) valueNew + let brecOn := mkApp brecOn Farg + return mkAppN brecOn otherArgs + +end Lean.Elab.Structural diff --git a/stage0/src/Lean/Elab/PreDefinition/Structural/Basic.lean b/stage0/src/Lean/Elab/PreDefinition/Structural/Basic.lean new file mode 100644 index 0000000000..ec9fb68548 --- /dev/null +++ b/stage0/src/Lean/Elab/PreDefinition/Structural/Basic.lean @@ -0,0 +1,78 @@ +/- +Copyright (c) 2021 Microsoft Corporation. All rights reserved. +Released under Apache 2.0 license as described in the file LICENSE. +Authors: Leonardo de Moura +-/ +import Lean.Meta.Basic +import Lean.Meta.ForEachExpr + +namespace Lean.Elab.Structural + +structure RecArgInfo where + /- `fixedParams ++ ys` are the arguments of the function we are trying to justify termination using structural recursion. -/ + fixedParams : Array Expr + ys : Array Expr -- recursion arguments + pos : Nat -- position in `ys` of the argument we are recursing on + indicesPos : Array Nat -- position in `ys` of the inductive datatype indices we are recursing on + indName : Name -- inductive datatype name of the argument we are recursing on + indLevels : List Level -- inductice datatype universe levels of the argument we are recursing on + indParams : Array Expr -- inductive datatype parameters of the argument we are recursing on + indIndices : Array Expr -- inductive datatype indices of the argument we are recursing on, it is equal to `indicesPos.map fun i => ys.get! i` + reflexive : Bool -- true if we are recursing over a reflexive inductive datatype + indPred : Bool -- true if the type is an inductive predicate + +structure State where + /- When compiling structural recursion we use the `brecOn` recursor automatically built by + the `inductive` command. For an inductive datatype `C`, it has the form + `C.brecOn As motive is c F` + where `As` are the inductive datatype parameters, `is` are the inductive datatype indices, + `c : C As is`, and `F : (js) → (d : C As js) → C.below d → motive d` + The `C.below d` is used to eliminate recursive applications. We refine its type when we process + a nested dependent pattern matcher using `MatcherApp.addArg`. See `replaceRecApps` for additional details. + We store the names of the matcher where we used `MatcherApp.addArg` at `matcherBelowDep`. + We use this information to generate the auxiliary `_sunfold` definition needed by the smart unfolding + technique used at WHNF. -/ + matcherBelowDep : NameSet := {} + /- As part of the inductive predicates case, we keep adding more and more discriminants from the + local context and build up a bigger matcher application until we reach a fixed point. + As a side-effect, this creates matchers. Here we capture all these side-effects, because + the construction rolls back any changes done to the environment and the side-effects + need to be replayed. -/ + addMatchers : Array $ MetaM Unit := #[] + +abbrev M := StateRefT State MetaM + +instance : Inhabited (M α) where + default := throwError "failed" + +def run (x : M α) (s : State := {}) : MetaM (α × State) := + StateRefT'.run x s + +/-- + Return true iff `e` contains an application `recFnName .. t ..` where the term `t` is + the argument we are trying to recurse on, and it contains loose bound variables. + + We use this test to decide whether we should process a matcher-application as a regular + applicaton or not. That is, whether we should push the `below` argument should be affected by the matcher or not. + If `e` does not contain an application of the form `recFnName .. t ..`, then we know + the recursion doesn't depend on any pattern variable in this matcher. +-/ +def recArgHasLooseBVarsAt (recFnName : Name) (recArgInfo : RecArgInfo) (e : Expr) : Bool := + let recArgPos := recArgInfo.fixedParams.size + recArgInfo.pos + let app? := e.find? fun e => + e.isAppOf recFnName && e.getAppNumArgs > recArgPos && (e.getArg! recArgPos).hasLooseBVars + app?.isSome + +private def containsRecFn (recFnName : Name) (e : Expr) : Bool := + (e.find? fun e => e.isConstOf recFnName).isSome + +def ensureNoRecFn (recFnName : Name) (e : Expr) : MetaM Expr := do + if containsRecFn recFnName e then + Meta.forEachExpr e fun e => do + if e.isAppOf recFnName then + throwError "unexpected occurrence of recursive application{indentExpr e}" + pure e + else + pure e + +end Lean.Elab.Structural diff --git a/stage0/src/Lean/Elab/PreDefinition/Structural/Eqns.lean b/stage0/src/Lean/Elab/PreDefinition/Structural/Eqns.lean new file mode 100644 index 0000000000..1c8d256e5c --- /dev/null +++ b/stage0/src/Lean/Elab/PreDefinition/Structural/Eqns.lean @@ -0,0 +1,18 @@ +/- +Copyright (c) 2021 Microsoft Corporation. All rights reserved. +Released under Apache 2.0 license as described in the file LICENSE. +Authors: Leonardo de Moura +-/ +import Lean.Elab.PreDefinition.Basic +import Lean.Elab.PreDefinition.Structural.Basic + +namespace Lean.Elab.Structural + +def mkEqns (preDef : PreDefinition) : TermElabM Unit := do + trace[Elab.definition.structural.eqns] "mkEqns:\n{preDef.value}" + return () + +builtin_initialize + registerTraceClass `Elab.definition.structural.eqns + +end Lean.Elab.Structural diff --git a/stage0/src/Lean/Elab/PreDefinition/Structural/FindRecArg.lean b/stage0/src/Lean/Elab/PreDefinition/Structural/FindRecArg.lean new file mode 100644 index 0000000000..57702914c7 --- /dev/null +++ b/stage0/src/Lean/Elab/PreDefinition/Structural/FindRecArg.lean @@ -0,0 +1,106 @@ +/- +Copyright (c) 2021 Microsoft Corporation. All rights reserved. +Released under Apache 2.0 license as described in the file LICENSE. +Authors: Leonardo de Moura +-/ +import Lean.Elab.PreDefinition.Structural.Basic + +namespace Lean.Elab.Structural +open Meta + +private def getIndexMinPos (xs : Array Expr) (indices : Array Expr) : Nat := do + let mut minPos := xs.size + for index in indices do + match xs.indexOf? index with + | some pos => if pos.val < minPos then minPos := pos.val + | _ => pure () + return minPos + +-- Indices can only depend on other indices +private def hasBadIndexDep? (ys : Array Expr) (indices : Array Expr) : MetaM (Option (Expr × Expr)) := do + for index in indices do + let indexType ← inferType index + for y in ys do + if !indices.contains y && (← dependsOn indexType y.fvarId!) then + return some (index, y) + return none + +-- Inductive datatype parameters cannot depend on ys +private def hasBadParamDep? (ys : Array Expr) (indParams : Array Expr) : MetaM (Option (Expr × Expr)) := do + for p in indParams do + let pType ← inferType p + for y in ys do + if ← dependsOn pType y.fvarId! then + return some (p, y) + return none + +private def throwStructuralFailed : MetaM α := + throwError "structural recursion cannot be used" + +private def orelse' (x y : M α) : M α := do + let saveState ← get + orelseMergeErrors x (do set saveState; y) + +partial def findRecArg (numFixed : Nat) (xs : Array Expr) (k : RecArgInfo → M α) : M α := + let rec loop (i : Nat) : M α := do + if h : i < xs.size then + let x := xs.get ⟨i, h⟩ + let localDecl ← getFVarLocalDecl x + if localDecl.isLet then + throwStructuralFailed + else + let xType ← whnfD localDecl.type + matchConstInduct xType.getAppFn (fun _ => loop (i+1)) fun indInfo us => do + if !(← hasConst (mkBRecOnName indInfo.name)) then + loop (i+1) + else if indInfo.isReflexive && !(← hasConst (mkBInductionOnName indInfo.name)) then + loop (i+1) + else + let indArgs := xType.getAppArgs + let indParams := indArgs.extract 0 indInfo.numParams + let indIndices := indArgs.extract indInfo.numParams indArgs.size + if !indIndices.all Expr.isFVar then + orelse' + (throwError "argument #{i+1} was not used because its type is an inductive family and indices are not variables{indentExpr xType}") + (loop (i+1)) + else if !indIndices.allDiff then + orelse' + (throwError "argument #{i+1} was not used because its type is an inductive family and indices are not pairwise distinct{indentExpr xType}") + (loop (i+1)) + else + let indexMinPos := getIndexMinPos xs indIndices + let numFixed := if indexMinPos < numFixed then indexMinPos else numFixed + let fixedParams := xs.extract 0 numFixed + let ys := xs.extract numFixed xs.size + match (← hasBadIndexDep? ys indIndices) with + | some (index, y) => + orelse' + (throwError "argument #{i+1} was not used because its type is an inductive family{indentExpr xType}\nand index{indentExpr index}\ndepends on the non index{indentExpr y}") + (loop (i+1)) + | none => + match (← hasBadParamDep? ys indParams) with + | some (indParam, y) => + orelse' + (throwError "argument #{i+1} was not used because its type is an inductive datatype{indentExpr xType}\nand parameter{indentExpr indParam}\ndepends on{indentExpr y}") + (loop (i+1)) + | none => + let indicesPos := indIndices.map fun index => match ys.indexOf? index with | some i => i.val | none => unreachable! + orelse' + (mapError + (k { fixedParams := fixedParams + ys := ys + pos := i - fixedParams.size + indicesPos := indicesPos + indName := indInfo.name + indLevels := us + indParams := indParams + indIndices := indIndices + reflexive := indInfo.isReflexive + indPred := ←isInductivePredicate indInfo.name }) + (fun msg => m!"argument #{i+1} was not used for structural recursion{indentD msg}")) + (loop (i+1)) + else + throwStructuralFailed + loop numFixed + +end Lean.Elab.Structural diff --git a/stage0/src/Lean/Elab/PreDefinition/Structural/IndPred.lean b/stage0/src/Lean/Elab/PreDefinition/Structural/IndPred.lean new file mode 100644 index 0000000000..1c81357fb5 --- /dev/null +++ b/stage0/src/Lean/Elab/PreDefinition/Structural/IndPred.lean @@ -0,0 +1,100 @@ +/- +Copyright (c) 2021 Microsoft Corporation. All rights reserved. +Released under Apache 2.0 license as described in the file LICENSE. +Authors: Dany Fabian +-/ +import Lean.Meta.IndPredBelow +import Lean.Elab.PreDefinition.Basic +import Lean.Elab.PreDefinition.Structural.Basic + +namespace Lean.Elab.Structural +open Meta + +private partial def replaceIndPredRecApps (recFnName : Name) (recArgInfo : RecArgInfo) (motive : Expr) (e : Expr) : M Expr := do + let maxDepth := IndPredBelow.maxBackwardChainingDepth.get (← getOptions) + let rec loop (e : Expr) : M Expr := do + match e with + | Expr.lam n d b c => + withLocalDecl n c.binderInfo (← loop d) fun x => do + mkLambdaFVars #[x] (← loop (b.instantiate1 x)) + | Expr.forallE n d b c => + withLocalDecl n c.binderInfo (← loop d) fun x => do + mkForallFVars #[x] (← loop (b.instantiate1 x)) + | Expr.letE n type val body _ => + withLetDecl n (← loop type) (← loop val) fun x => do + mkLetFVars #[x] (← loop (body.instantiate1 x)) + | Expr.mdata d e _ => return mkMData d (← loop e) + | Expr.proj n i e _ => return mkProj n i (← loop e) + | Expr.app _ _ _ => + let processApp (e : Expr) : M Expr := do + e.withApp fun f args => do + if f.isConstOf recFnName then + let ty ← inferType e + let main ← mkFreshExprSyntheticOpaqueMVar ty + if ←IndPredBelow.backwardsChaining main.mvarId! maxDepth then + main + else + throwError "could not solve using backwards chaining {MessageData.ofGoal main.mvarId!}" + else + return mkAppN (← loop f) (← args.mapM loop) + match (←matchMatcherApp? e) with + | some matcherApp => + if !recArgHasLooseBVarsAt recFnName recArgInfo e then + processApp e + else + trace[Elab.definition.structural] "matcherApp before adding below transformation:\n{matcherApp.toExpr}" + let rec addBelow (matcherApp : MatcherApp) : M Expr := do + if let some (t, idx) ← IndPredBelow.findBelowIdx matcherApp.discrs motive then + let (newApp, addMatcher) ← IndPredBelow.mkBelowMatcher matcherApp motive t idx + modify fun s => { s with addMatchers := s.addMatchers.push addMatcher } + let some newApp ← matchMatcherApp? newApp | throwError "not a matcherApp: {newApp}" + addBelow newApp + else matcherApp.toExpr + + let newApp ← addBelow matcherApp + if newApp == matcherApp.toExpr then + throwError "could not add below discriminant" + else + trace[Elab.definition.structural] "modified matcher:\n{newApp}" + processApp newApp + | none => processApp e + | e => ensureNoRecFn recFnName e + loop e + +def mkIndPredBRecOn (recFnName : Name) (recArgInfo : RecArgInfo) (value : Expr) : M Expr := do + let type := (← inferType value).headBeta + let major := recArgInfo.ys[recArgInfo.pos] + let otherArgs := recArgInfo.ys.filter fun y => y != major && !recArgInfo.indIndices.contains y + trace[Elab.definition.structural] "fixedParams: {recArgInfo.fixedParams}, otherArgs: {otherArgs}" + let motive ← mkForallFVars otherArgs type + let motive ← mkLambdaFVars (recArgInfo.indIndices.push major) motive + trace[Elab.definition.structural] "brecOn motive: {motive}" + let brecOn := Lean.mkConst (mkBRecOnName recArgInfo.indName) recArgInfo.indLevels + let brecOn := mkAppN brecOn recArgInfo.indParams + let brecOn := mkApp brecOn motive + let brecOn := mkAppN brecOn recArgInfo.indIndices + let brecOn := mkApp brecOn major + check brecOn + let brecOnType ← inferType brecOn + trace[Elab.definition.structural] "brecOn {brecOn}" + trace[Elab.definition.structural] "brecOnType {brecOnType}" + -- we need to close the telescope here, because the local context is used: + -- The root cause was, that this copied code puts an ih : FType into the + -- local context and later, when we use the local context to build the recursive + -- call, it uses this ih. But that ih doesn't exist in the actual brecOn call. + -- That's why it must go. + let FType ← forallBoundedTelescope brecOnType (some 1) fun F _ => do + let F := F[0] + let FType ← inferType F + trace[Elab.definition.structural] "FType: {FType}" + let FType ← instantiateForall FType recArgInfo.indIndices + instantiateForall FType #[major] + forallBoundedTelescope FType (some 1) fun below _ => do + let main ← mkFreshExprSyntheticOpaqueMVar FType + let below := below[0] + let valueNew ← replaceIndPredRecApps recFnName recArgInfo motive value + let Farg ← mkLambdaFVars (recArgInfo.indIndices ++ #[major, below] ++ otherArgs) valueNew + let brecOn := mkApp brecOn Farg + return mkAppN brecOn otherArgs + +end Lean.Elab.Structural diff --git a/stage0/src/Lean/Elab/PreDefinition/Structural/Main.lean b/stage0/src/Lean/Elab/PreDefinition/Structural/Main.lean new file mode 100644 index 0000000000..1f719a3a43 --- /dev/null +++ b/stage0/src/Lean/Elab/PreDefinition/Structural/Main.lean @@ -0,0 +1,95 @@ +/- +Copyright (c) 2021 Microsoft Corporation. All rights reserved. +Released under Apache 2.0 license as described in the file LICENSE. +Authors: Leonardo de Moura +-/ +import Lean.Elab.PreDefinition.Structural.Basic +import Lean.Elab.PreDefinition.Structural.FindRecArg +import Lean.Elab.PreDefinition.Structural.Preprocess +import Lean.Elab.PreDefinition.Structural.BRecOn +import Lean.Elab.PreDefinition.Structural.IndPred +import Lean.Elab.PreDefinition.Structural.Eqns +import Lean.Elab.PreDefinition.Structural.SmartUnfolding + +namespace Lean.Elab +namespace Structural +open Meta + +private def getFixedPrefix (declName : Name) (xs : Array Expr) (value : Expr) : MetaM Nat := do + let numFixedRef ← IO.mkRef xs.size + forEachExpr' value fun e => do + if e.isAppOf declName then + let args := e.getAppArgs + numFixedRef.modify fun numFixed => if args.size < numFixed then args.size else numFixed + for arg in args, x in xs do + /- We should not use structural equality here. For example, given the definition + ``` + def V.map {α β} f x x_1 := + @V.map.match_1.{1} α (fun x x_2 => V β x) x x_1 + (fun x x_2 => @V.mk₁ β x (f Bool.true x_2)) + (fun e => @V.mk₂ β (V.map (fun b => α b) (fun b => β b) f Bool.false e)) + ``` + The first three arguments at `V.map (fun b => α b) (fun b => β b) f Bool.false e` are "fixed" + modulo definitional equality. + + We disable to proof irrelevance to be able to use structural recursion on inductive predicates. + For example, consider the example + ``` + inductive PList (α : Type) : Prop + | nil + | cons : α → PList α → PList α + + infixr:67 " ::: " => PList.cons + + set_option trace.Elab.definition.structural true in + def pmap {α β} (f : α → β) : PList α → PList β + | PList.nil => PList.nil + | a:::as => f a ::: pmap f as + ``` + The "Fixed" prefix would be 4 since all elements of type `PList α` are definitionally equal. + -/ + if !(← withoutProofIrrelevance <| withReducible <| isDefEq arg x) then + -- We continue searching if e's arguments are not a prefix of `xs` + return true + return false + else + return true + numFixedRef.get + +private def elimRecursion (preDef : PreDefinition) : M PreDefinition := + withoutModifyingEnv do lambdaTelescope preDef.value fun xs value => do + addAsAxiom preDef + let value ← preprocess value preDef.declName + trace[Elab.definition.structural] "{preDef.declName} {xs} :=\n{value}" + let numFixed ← getFixedPrefix preDef.declName xs value + trace[Elab.definition.structural] "numFixed: {numFixed}" + findRecArg numFixed xs fun recArgInfo => do + -- when (recArgInfo.indName == `Nat) throwStructuralFailed -- HACK to skip Nat argument + let valueNew ← + if recArgInfo.indPred then mkIndPredBRecOn preDef.declName recArgInfo value + else mkBRecOn preDef.declName recArgInfo value + let valueNew ← mkLambdaFVars xs valueNew + trace[Elab.definition.structural] "result: {valueNew}" + -- Recursive applications may still occur in expressions that were not visited by replaceRecApps (e.g., in types) + let valueNew ← ensureNoRecFn preDef.declName valueNew + pure { preDef with value := valueNew } + +def structuralRecursion (preDefs : Array PreDefinition) : TermElabM Unit := + if preDefs.size != 1 then + throwError "structural recursion does not handle mutually recursive functions" + else do + let (preDefNonRec, state) ← run <| elimRecursion preDefs[0] + state.addMatchers.forM liftM + mapError (addNonRec preDefNonRec) (fun msg => m!"structural recursion failed, produced type incorrect term{indentD msg}") + addAndCompilePartialRec preDefs + addSmartUnfoldingDef preDefs[0] state + mkEqns preDefs[0] + +builtin_initialize + registerTraceClass `Elab.definition.structural + +end Structural + +export Structural (structuralRecursion) + +end Lean.Elab diff --git a/stage0/src/Lean/Elab/PreDefinition/Structural/Preprocess.lean b/stage0/src/Lean/Elab/PreDefinition/Structural/Preprocess.lean new file mode 100644 index 0000000000..eca66fd091 --- /dev/null +++ b/stage0/src/Lean/Elab/PreDefinition/Structural/Preprocess.lean @@ -0,0 +1,35 @@ +/- +Copyright (c) 2021 Microsoft Corporation. All rights reserved. +Released under Apache 2.0 license as described in the file LICENSE. +Authors: Leonardo de Moura +-/ +import Lean.Meta.Transform + +namespace Lean.Elab.Structural +open Meta + +private def shouldBetaReduce (e : Expr) (recFnName : Name) : Bool := + if e.isHeadBetaTarget then + e.getAppFn.find? (·.isConstOf recFnName) |>.isSome + else + false + +/-- + Beta reduce terms where the recursive function occurs in the lambda term. + This is useful to improve the effectiveness of `elimRecursion`. + Example: + ``` + def f : Nat → Nat + | 0 => 1 + | i+1 => (fun x => f x) i + ``` +-/ +def preprocess (e : Expr) (recFnName : Name) : CoreM Expr := + Core.transform e + fun e => return TransformStep.visit <| + if shouldBetaReduce e recFnName then + e.headBeta + else + e + +end Lean.Elab.Structural diff --git a/stage0/src/Lean/Elab/PreDefinition/Structural/SmartUnfolding.lean b/stage0/src/Lean/Elab/PreDefinition/Structural/SmartUnfolding.lean new file mode 100644 index 0000000000..f57832f4b4 --- /dev/null +++ b/stage0/src/Lean/Elab/PreDefinition/Structural/SmartUnfolding.lean @@ -0,0 +1,61 @@ +/- +Copyright (c) 2021 Microsoft Corporation. All rights reserved. +Released under Apache 2.0 license as described in the file LICENSE. +Authors: Leonardo de Moura +-/ +import Lean.Elab.PreDefinition.Basic +import Lean.Elab.PreDefinition.Structural.Basic + +namespace Lean.Elab.Structural +open Meta + +partial def addSmartUnfoldingDefAux (preDef : PreDefinition) (matcherBelowDep : NameSet) : MetaM PreDefinition := do + let recFnName := preDef.declName + let isMarkedMatcherName (n : Name) : Bool := matcherBelowDep.contains n + let isMarkedMatcherConst (e : Expr) : Bool := e.isConst && isMarkedMatcherName e.constName! + let isMarkedMatcherApp (e : Expr) : Bool := isMarkedMatcherConst e.getAppFn + let containsMarkedMatcher (e : Expr) : Bool := e.find? isMarkedMatcherConst |>.isSome + let rec visit (e : Expr) : MetaM Expr := do + match e with + | Expr.lam .. => lambdaTelescope e fun xs b => do mkLambdaFVars xs (← visit b) + | Expr.forallE .. => forallTelescope e fun xs b => do mkForallFVars xs (← visit b) + | Expr.letE n type val body _ => + withLetDecl n type (← visit val) fun x => do + mkLetFVars #[x] (← visit (body.instantiate1 x)) + | Expr.mdata d b _ => return mkMData d (← visit b) + | Expr.proj n i s _ => return mkProj n i (← visit s) + | Expr.app .. => + let processApp (e : Expr) : MetaM Expr := + e.withApp fun f args => do + return mkAppN (← visit f) (← args.mapM visit) + match isMarkedMatcherApp e, (← matchMatcherApp? e) with + | true, some matcherApp => + let altsNew ← (Array.zip matcherApp.alts matcherApp.altNumParams).mapM fun (alt, numParams) => + lambdaTelescope alt fun xs altBody => do + unless xs.size >= numParams do + throwError "unexpected matcher application alternative{indentExpr alt}\nat application{indentExpr e}" + if containsMarkedMatcher altBody then + -- continue + mkLambdaFVars xs (← visit altBody) + else + -- add idRhs marker + let altBody ← mkLambdaFVars xs[numParams:xs.size] altBody + let altBody ← mkIdRhs altBody + mkLambdaFVars xs[0:numParams] altBody + pure { matcherApp with alts := altsNew }.toExpr + | _, _ => processApp e + | _ => pure e + return { preDef with + declName := mkSmartUnfoldingNameFor preDef.declName, + value := (← visit preDef.value), + modifiers := {} + } + +partial def addSmartUnfoldingDef (preDef : PreDefinition) (state : State) : TermElabM Unit := do + if (← isProp preDef.type) then + return () + else + let preDefSUnfold ← addSmartUnfoldingDefAux preDef state.matcherBelowDep + addNonRec preDefSUnfold + +end Lean.Elab.Structural diff --git a/stage0/src/Lean/Expr.lean b/stage0/src/Lean/Expr.lean index 1239b26418..bb64135c77 100644 --- a/stage0/src/Lean/Expr.lean +++ b/stage0/src/Lean/Expr.lean @@ -1079,6 +1079,17 @@ def annotation? (kind : Name) (e : Expr) : Option Expr := | Expr.mdata d b _ => if d.size == 1 && d.getBool kind false then some b else none | _ => none +def mkLetFunAnnotation (e : Expr) : Expr := + mkAnnotation `let_fun e + +def letFunAnnotation? (e : Expr) : Option Expr := + annotation? `let_fun e + +def isLetFun (e : Expr) : Bool := + match letFunAnnotation? e with + | none => false + | some e => e.isApp && e.appFn!.isLambda + /-- Annotate `e` with the LHS annotation. The delaborator displays expressions of the form `lhs = rhs` as `lhs` when they have this annotation. diff --git a/stage0/src/Lean/Meta/AppBuilder.lean b/stage0/src/Lean/Meta/AppBuilder.lean index b6ad609875..b08017a056 100644 --- a/stage0/src/Lean/Meta/AppBuilder.lean +++ b/stage0/src/Lean/Meta/AppBuilder.lean @@ -440,6 +440,18 @@ def mkFunExt (h : Expr) : MetaM Expr := def mkPropExt (h : Expr) : MetaM Expr := mkAppM ``propext #[h] +/-- Return `let_congr h₁ h₂` -/ +def mkLetCongr (h₁ h₂ : Expr) : MetaM Expr := + mkAppM ``let_congr #[h₁, h₂] + +/-- Return `let_val_congr b h` -/ +def mkLetValCongr (b h : Expr) : MetaM Expr := + mkAppM ``let_val_congr #[b, h] + +/-- Return `let_body_congr a h` -/ +def mkLetBodyCongr (a h : Expr) : MetaM Expr := + mkAppM ``let_body_congr #[a, h] + /-- Return `of_eq_true h` -/ def mkOfEqTrue (h : Expr) : MetaM Expr := mkAppM ``of_eq_true #[h] diff --git a/stage0/src/Lean/Meta/Match/Match.lean b/stage0/src/Lean/Meta/Match/Match.lean index d02354efee..77af4a18c0 100644 --- a/stage0/src/Lean/Meta/Match/Match.lean +++ b/stage0/src/Lean/Meta/Match/Match.lean @@ -725,11 +725,11 @@ def mkMatcherAuxDefinition (name : Name) (type : Expr) (value : Expr) : MetaM (E trace[Meta.debug] "{name} : {result.type} := {result.value}" let addMatcher : MatcherInfo → MetaM Unit := fun mi => do addDecl decl - if compile then - compileDecl decl modifyEnv fun env => matcherExt.modifyState env fun s => s.insert (result.value, compile) name addMatcherInfo name mi setInlineAttribute name + if compile then + compileDecl decl (mkMatcherConst name, some addMatcher) diff --git a/stage0/src/Lean/Meta/Match/MatcherInfo.lean b/stage0/src/Lean/Meta/Match/MatcherInfo.lean index 6d9545447c..0e5ef2f1f9 100644 --- a/stage0/src/Lean/Meta/Match/MatcherInfo.lean +++ b/stage0/src/Lean/Meta/Match/MatcherInfo.lean @@ -29,8 +29,12 @@ def MatcherInfo.numAlts (info : MatcherInfo) : Nat := def MatcherInfo.arity (info : MatcherInfo) : Nat := info.numParams + 1 + info.numDiscrs + info.numAlts +def MatcherInfo.getFirstDiscrPos (info : MatcherInfo) : Nat := + info.numParams + 1 + def MatcherInfo.getMotivePos (info : MatcherInfo) : Nat := info.numParams + namespace Extension structure Entry where @@ -73,21 +77,25 @@ def getMatcherInfoCore? (env : Environment) (declName : Name) : Option MatcherIn def getMatcherInfo? [Monad m] [MonadEnv m] (declName : Name) : m (Option MatcherInfo) := return getMatcherInfoCore? (← getEnv) declName +@[export lean_is_matcher] def isMatcherCore (env : Environment) (declName : Name) : Bool := getMatcherInfoCore? env declName |>.isSome def isMatcher [Monad m] [MonadEnv m] (declName : Name) : m Bool := return isMatcherCore (← getEnv) declName -def isMatcherAppCore (env : Environment) (e : Expr) : Bool := +def isMatcherAppCore? (env : Environment) (e : Expr) : Option MatcherInfo := let fn := e.getAppFn if fn.isConst then if let some matcherInfo := getMatcherInfoCore? env fn.constName! then - e.getAppNumArgs ≥ matcherInfo.arity + if e.getAppNumArgs ≥ matcherInfo.arity then some matcherInfo else none else - false + none else - false + none + +def isMatcherAppCore (env : Environment) (e : Expr) : Bool := + isMatcherAppCore? env e |>.isSome def isMatcherApp [Monad m] [MonadEnv m] (e : Expr) : m Bool := return isMatcherAppCore (← getEnv) e diff --git a/stage0/src/Lean/Meta/Tactic/Simp/Main.lean b/stage0/src/Lean/Meta/Tactic/Simp/Main.lean index 8ffdc1092c..34b5398b4c 100644 --- a/stage0/src/Lean/Meta/Tactic/Simp/Main.lean +++ b/stage0/src/Lean/Meta/Tactic/Simp/Main.lean @@ -155,18 +155,18 @@ where simpStep (e : Expr) : M Result := do match e with - | Expr.mdata _ e _ => simp e - | Expr.proj .. => pure { expr := (← reduceProj e) } + | Expr.mdata m e _ => let r ← simp e; return { r with expr := mkMData m r.expr } + | Expr.proj .. => return { expr := (← reduceProj e) } | Expr.app .. => simpApp e | Expr.lam .. => simpLambda e | Expr.forallE .. => simpForall e | Expr.letE .. => simpLet e | Expr.const .. => simpConst e | Expr.bvar .. => unreachable! - | Expr.sort .. => pure { expr := e } + | Expr.sort .. => return { expr := e } | Expr.lit .. => simpLit e - | Expr.mvar .. => pure { expr := (← instantiateMVars e) } - | Expr.fvar .. => pure { expr := (← reduceFVar (← getConfig) e) } + | Expr.mvar .. => return { expr := (← instantiateMVars e) } + | Expr.fvar .. => return { expr := (← reduceFVar (← getConfig) e) } congrDefault (e : Expr) : M Result := withParent e <| e.withApp fun f args => do @@ -323,13 +323,39 @@ where return { expr := (← dsimp e) } simpLet (e : Expr) : M Result := do - if (← getConfig).zeta then - match e with - | Expr.letE _ _ v b _ => return { expr := b.instantiate1 v } - | _ => unreachable! - else - -- TODO: simplify nondependent let-decls - return { expr := (← dsimp e) } + match e with + | Expr.letE n t v b _ => + if (← getConfig).zeta then + return { expr := b.instantiate1 v } + else + withLocalDeclD n t fun x => do + let bx := b.instantiate1 x + /- The following step is potentially very expensive when we have many nested let-decls. + TODO: handle a block of nested let decls in a single pass if this becomes a performance problem. -/ + if (← isTypeCorrect bx) then + let bxType ← whnf (← inferType bx) + let rbx ← simp bx + let hb? ← match rbx.proof? with + | none => pure none + | some h => pure (some (← mkLambdaFVars #[x] h)) + if (← dependsOn bxType x.fvarId!) then + /- The type of the body depends on `x`. So, we use `let_body_congr` -/ + let v' ← dsimp v + let e' := mkLet n t v' (← abstract rbx.expr #[x]) + match hb? with + | none => return { expr := e' } + | some h => return { expr := e', proof? := some (← mkLetBodyCongr v' h) } + else + /- The type of the body does not depend on `x`. So, we use `let_congr` -/ + let rv ← simp v + let e' := mkLet n t rv.expr (← abstract rbx.expr #[x]) + match rv.proof?, hb? with + | none, none => return { expr := e' } + | some h, none => return { expr := e', proof? := some (← mkLetValCongr (← mkLambdaFVars #[x] rbx.expr) h) } + | _, some h => return { expr := e', proof? := some (← mkLetCongr (← rv.getProof) h) } + else + return { expr := (← dsimp e) } + | _ => unreachable! cacheResult (cfg : Config) (r : Result) : M Result := do if cfg.memoize then diff --git a/stage0/src/Lean/Meta/Tactic/Split.lean b/stage0/src/Lean/Meta/Tactic/Split.lean index 034fb7eee6..357c36dacf 100644 --- a/stage0/src/Lean/Meta/Tactic/Split.lean +++ b/stage0/src/Lean/Meta/Tactic/Split.lean @@ -100,7 +100,7 @@ def splitMatch (mvarId : MVarId) (e : Expr) : MetaM (List MVarId) := do /-- Return an `if-then-else` or `match-expr` to split. -/ partial def findSplit? (env : Environment) (e : Expr) : Option Expr := - if let some target := e.find? fun e => !e.hasLooseBVars && (e.isIte || e.isDIte || isMatcherAppCore env e) then + if let some target := e.find? isCandidate then if e.isIte || e.isDIte then let cond := target.getArg! 1 5 -- Try to find a nested `if` in `cond` @@ -109,6 +109,18 @@ partial def findSplit? (env : Environment) (e : Expr) : Option Expr := some target else none +where + isCandidate (e : Expr) : Bool := do + if e.isIte || e.isDIte then + !(e.getArg! 1 5).hasLooseBVars + else if let some info := isMatcherAppCore? env e then + let args := e.getAppArgs + for i in [info.getFirstDiscrPos : info.getFirstDiscrPos + info.numDiscrs] do + if args[i].hasLooseBVars then + return false + return true + else + false end Split @@ -121,6 +133,7 @@ def splitTarget? (mvarId : MVarId) : MetaM (Option (List MVarId)) := commitWhenS else splitMatch mvarId e else + trace[Meta.Tactic.split] "did not find term to split\n{MessageData.ofGoal mvarId}" return none def splitLocalDecl? (mvarId : MVarId) (fvarId : FVarId) : MetaM (Option (List MVarId)) := commitWhenSome? do @@ -137,4 +150,6 @@ def splitLocalDecl? (mvarId : MVarId) (fvarId : FVarId) : MetaM (Option (List MV else return none +builtin_initialize registerTraceClass `Meta.Tactic.split + end Lean.Meta diff --git a/stage0/src/Lean/Meta/Tactic/SplitIf.lean b/stage0/src/Lean/Meta/Tactic/SplitIf.lean index 1f8d13dee2..c0bd689707 100644 --- a/stage0/src/Lean/Meta/Tactic/SplitIf.lean +++ b/stage0/src/Lean/Meta/Tactic/SplitIf.lean @@ -63,7 +63,7 @@ def discharge? (useDecide := false) : Simp.Discharge := fun prop => do /-- Return the condition of an `if` expression to case split. -/ partial def findIfToSplit? (e : Expr) : Option Expr := - if let some iteApp := e.find? fun e => !e.hasLooseBVars && (e.isIte || e.isDIte) then + if let some iteApp := e.find? fun e => (e.isIte || e.isDIte) && !(e.getArg! 1 5).hasLooseBVars then let cond := iteApp.getArg! 1 5 -- Try to find a nested `if` in `cond` findIfToSplit? cond |>.getD cond diff --git a/stage0/src/Lean/PrettyPrinter/Delaborator/Builtins.lean b/stage0/src/Lean/PrettyPrinter/Delaborator/Builtins.lean index e36cd2a4f8..cea86e5371 100644 --- a/stage0/src/Lean/PrettyPrinter/Delaborator/Builtins.lean +++ b/stage0/src/Lean/PrettyPrinter/Delaborator/Builtins.lean @@ -407,6 +407,21 @@ def delabAppMatch : Delab := whenPPOption getPPNotation <| whenPPOption getPPMat `(match $[$st.discrs:term],* with $[| $pats,* => $st.rhss]*) Syntax.mkApp stx st.moreArgs +/-- + Delaborate applications of the form `(fun x => b) v` as `let_fun x := v; b` +-/ +def delabLetFun : Delab := do + let stxV ← withAppArg delab + withAppFn do + let Expr.lam n t b _ ← getExpr | unreachable! + let n ← getUnusedName n b + let stxB ← withBindingBody n delab + if ← getPPOption getPPLetVarTypes <||> getPPOption getPPAnalysisLetVarType then + let stxT ← withBindingDomain delab + `(let_fun $(mkIdent n) : $stxT := $stxV; $stxB) + else + `(let_fun $(mkIdent n) := $stxV; $stxB) + @[builtinDelab mdata] def delabMData : Delab := do if let some _ := Lean.Meta.Match.inaccessible? (← getExpr) then @@ -415,6 +430,8 @@ def delabMData : Delab := do `(.($s)) -- We only include the inaccessible annotation when we are delaborating patterns else return s + else if isLetFun (← getExpr) then + withMDataExpr <| delabLetFun else if let some _ := isLHSGoal? (← getExpr) then withMDataExpr <| withAppFn <| withAppArg <| delab else diff --git a/stage0/src/library/compiler/compiler.cpp b/stage0/src/library/compiler/compiler.cpp index 050a6be395..048a2c5843 100644 --- a/stage0/src/library/compiler/compiler.cpp +++ b/stage0/src/library/compiler/compiler.cpp @@ -165,6 +165,10 @@ expr csimp_replace_constants(environment const & env, expr const & e) { return expr(lean_csimp_replace_constants(env.to_obj_arg(), e.to_obj_arg())); } +bool is_matcher(environment const & env, comp_decls const & ds) { + return length(ds) == 1 && is_matcher(env, head(ds).fst()); +} + environment compile(environment const & env, options const & opts, names cs) { if (!is_codegen_enabled(opts)) return env; @@ -222,6 +226,15 @@ environment compile(environment const & env, options const & opts, names cs) { ds = apply(max_sharing, ds); trace_compiler(name({"compiler", "stage1"}), ds); new_env = cache_stage1(new_env, ds); + if (is_matcher(new_env, ds)) { + /* Auxiliary matcher applications are marked as inlined, and are always fully applied + (if users don't use them manually). So, we skip code generation for them. + By caching stage1, we make sure we have all information we need to inline them. + + TODO: we should have a "[strong_inline]" annotation that will inline a definition even + when it is partially applied. Then, we can mark all `match` auxiliary functions as `[strong_inline]` */ + return new_env; + } std::tie(new_env, ds) = specialize(new_env, ds, cfg); lean_assert(lcnf_check_let_decls(new_env, ds)); trace_compiler(name({"compiler", "specialize"}), ds); diff --git a/stage0/src/library/compiler/csimp.cpp b/stage0/src/library/compiler/csimp.cpp index 81fed326a9..d0c017b56e 100644 --- a/stage0/src/library/compiler/csimp.cpp +++ b/stage0/src/library/compiler/csimp.cpp @@ -1729,7 +1729,12 @@ class csimp_fn { return none_expr(); } if (!inline_if_reduce_attr && is_recursive(const_name(fn))) return none_expr(); - if (uses_unsafe_inductive(c)) return none_expr(); + if (!is_matcher(env(), const_name(fn))) { + // Hack for test `inliner_loop`. We don't generate code for auxiliary matcher applications. + // However, they are safe to be inline even when they use unsafe inductive types. + // REMARK: the to be implemented `[strong_inline]` attribute should not be used in unsafe code. + if (uses_unsafe_inductive(c)) return none_expr(); + } lean_trace(name({"compiler", "inline"}), tout() << const_name(fn) << "\n";); expr new_fn = instantiate_value_lparams(*info, const_levels(fn)); if (inline_if_reduce_attr && !inline_attr) { diff --git a/stage0/src/library/compiler/util.h b/stage0/src/library/compiler/util.h index eab67d115a..f3fc259c6f 100644 --- a/stage0/src/library/compiler/util.h +++ b/stage0/src/library/compiler/util.h @@ -198,6 +198,12 @@ optional is_enum_type(environment const & env, expr const & type); // ======================================= +extern "C" uint8 lean_is_matcher(object* env, object* n); + +inline bool is_matcher(environment const & env, name const & n) { + return lean_is_matcher(env.to_obj_arg(), n.to_obj_arg()); +} + void initialize_compiler_util(); void finalize_compiler_util(); } diff --git a/stage0/stdlib/Init/Classical.c b/stage0/stdlib/Init/Classical.c index b7e2f20657..6debbc61e7 100644 --- a/stage0/stdlib/Init/Classical.c +++ b/stage0/stdlib/Init/Classical.c @@ -14,91 +14,91 @@ extern "C" { #endif lean_object* l_Lean_MonadRef_mkInfoFromRefPos___at_myMacro____x40_Init_Notation___hyg_72____spec__1(lean_object*, lean_object*); -static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__53; -static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__42; +static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__45; +static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__27; +static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__9; lean_object* lean_mk_empty_array_with_capacity(lean_object*); -static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__15; +static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__17; +static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__4; static lean_object* l_Classical_tacticByCases_____x3a_____closed__13; -static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__37; lean_object* lean_name_mk_string(lean_object*, lean_object*); +static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__37; static lean_object* l_Classical_tacticByCases_____x3a_____closed__11; -static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__27; -static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__17; -static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__40; -static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__45; +static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__3; +static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__53; +static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__42; +static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__15; static lean_object* l_Classical_tacticByCases_____x3a_____closed__2; -static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__1; -lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_973_(lean_object*, lean_object*, lean_object*); -static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__2; -static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__44; -static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__4; -static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__8; +static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__47; +lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_970_(lean_object*, lean_object*, lean_object*); +static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__41; lean_object* lean_array_push(lean_object*, lean_object*); +static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__38; +static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__21; static lean_object* l_Classical_tacticByCases_____x3a_____closed__7; -static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__38; -static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__21; +static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__8; static lean_object* l_Classical_tacticByCases_____x3a_____closed__16; -static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__13; +static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__44; lean_object* l_Classical_typeDecidable_match__1___rarg___boxed(lean_object*, lean_object*, lean_object*); +static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__1; lean_object* lean_string_utf8_byte_size(lean_object*); -static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__47; -static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__25; -static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__6; -static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__46; -static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__22; -static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__52; +static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__2; +static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__25; +static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__6; static lean_object* l_Classical_tacticByCases_____x3a_____closed__20; +static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__5; +static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__22; +static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__28; +static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__14; static lean_object* l_Classical_tacticByCases_____x3a_____closed__10; -static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__29; -static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__3; +static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__33; +static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__30; +static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__18; +static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__29; static lean_object* l_Classical_tacticByCases_____x3a_____closed__12; lean_object* l_Classical_tacticByCases_____x3a__; -static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__18; -static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__5; -static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__30; -static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__28; -static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__14; -static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__33; +static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__52; lean_object* l_Classical_typeDecidable_match__1(lean_object*, lean_object*); -static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__39; +static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__40; +static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__24; +static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__7; +static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__36; +static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__49; static lean_object* l_Classical_tacticByCases_____x3a_____closed__3; static lean_object* l_Classical_tacticByCases_____x3a_____closed__15; -static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__35; -static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__51; -static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__7; -static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__16; +static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__16; +static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__35; +static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__51; static lean_object* l_Classical_tacticByCases_____x3a_____closed__14; static lean_object* l_Classical_tacticByCases_____x3a_____closed__18; -static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__49; lean_object* l_Lean_addMacroScope(lean_object*, lean_object*, lean_object*); -static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__24; -static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__36; +static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__39; static lean_object* l_Classical_tacticByCases_____x3a_____closed__5; -static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__9; -static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__10; -static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__32; -static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__20; static lean_object* l_Classical_tacticByCases_____x3a_____closed__4; -static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__43; +static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__43; static lean_object* l_Classical_tacticByCases_____x3a_____closed__9; -static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__50; -static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__48; -static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__34; +static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__20; +static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__10; +static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__32; +static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__46; +static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__12; static lean_object* l_Classical_tacticByCases_____x3a_____closed__19; -static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__41; -static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__23; +static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__26; uint8_t l_Lean_Syntax_isOfKind(lean_object*, lean_object*); -static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__12; +static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__13; +static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__23; +static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__34; +static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__48; lean_object* l_Lean_Syntax_getArg(lean_object*, lean_object*); lean_object* l_Classical_typeDecidable_match__1___rarg(uint8_t, lean_object*, lean_object*); -static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__31; +static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__50; +static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__31; +static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__11; static lean_object* l_Classical_tacticByCases_____x3a_____closed__1; static lean_object* l_Classical_tacticByCases_____x3a_____closed__8; +static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__19; static lean_object* l_Classical_tacticByCases_____x3a_____closed__17; -static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__26; static lean_object* l_Classical_tacticByCases_____x3a_____closed__6; -static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__19; -static lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__11; lean_object* l_Classical_typeDecidable_match__1___rarg(uint8_t x_1, lean_object* x_2, lean_object* x_3) { _start: { @@ -350,7 +350,7 @@ x_1 = l_Classical_tacticByCases_____x3a_____closed__20; return x_1; } } -static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__1() { +static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__1() { _start: { lean_object* x_1; @@ -358,17 +358,17 @@ x_1 = lean_mk_string("Lean"); return x_1; } } -static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__2() { +static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__2() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = lean_box(0); -x_2 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__1; +x_2 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; } } -static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__3() { +static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__3() { _start: { lean_object* x_1; @@ -376,17 +376,17 @@ x_1 = lean_mk_string("Parser"); return x_1; } } -static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__4() { +static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__4() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__2; -x_2 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__3; +x_1 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__2; +x_2 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__3; x_3 = lean_name_mk_string(x_1, x_2); return x_3; } } -static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__5() { +static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__5() { _start: { lean_object* x_1; @@ -394,17 +394,17 @@ x_1 = lean_mk_string("Tactic"); return x_1; } } -static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__6() { +static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__6() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__4; -x_2 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__5; +x_1 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__4; +x_2 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__5; x_3 = lean_name_mk_string(x_1, x_2); return x_3; } } -static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__7() { +static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__7() { _start: { lean_object* x_1; @@ -412,17 +412,17 @@ x_1 = lean_mk_string("seq1"); return x_1; } } -static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__8() { +static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__8() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__6; -x_2 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__7; +x_1 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__6; +x_2 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__7; x_3 = lean_name_mk_string(x_1, x_2); return x_3; } } -static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__9() { +static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__9() { _start: { lean_object* x_1; @@ -430,17 +430,17 @@ x_1 = lean_mk_string("null"); return x_1; } } -static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__10() { +static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__10() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = lean_box(0); -x_2 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__9; +x_2 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__9; x_3 = lean_name_mk_string(x_1, x_2); return x_3; } } -static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__11() { +static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__11() { _start: { lean_object* x_1; @@ -448,17 +448,17 @@ x_1 = lean_mk_string("cases"); return x_1; } } -static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__12() { +static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__12() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__6; -x_2 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__11; +x_1 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__6; +x_2 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__11; x_3 = lean_name_mk_string(x_1, x_2); return x_3; } } -static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__13() { +static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__13() { _start: { lean_object* x_1; @@ -466,17 +466,17 @@ x_1 = lean_mk_string("casesTarget"); return x_1; } } -static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__14() { +static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__14() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__6; -x_2 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__13; +x_1 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__6; +x_2 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__13; x_3 = lean_name_mk_string(x_1, x_2); return x_3; } } -static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__15() { +static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__15() { _start: { lean_object* x_1; lean_object* x_2; @@ -485,19 +485,19 @@ x_2 = lean_mk_empty_array_with_capacity(x_1); return x_2; } } -static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__16() { +static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__16() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__10; -x_2 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__15; +x_1 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__10; +x_2 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__15; x_3 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_3, 0, x_1); lean_ctor_set(x_3, 1, x_2); return x_3; } } -static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__17() { +static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__17() { _start: { lean_object* x_1; @@ -505,17 +505,17 @@ x_1 = lean_mk_string("Term"); return x_1; } } -static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__18() { +static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__18() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__4; -x_2 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__17; +x_1 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__4; +x_2 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__17; x_3 = lean_name_mk_string(x_1, x_2); return x_3; } } -static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__19() { +static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__19() { _start: { lean_object* x_1; @@ -523,17 +523,17 @@ x_1 = lean_mk_string("app"); return x_1; } } -static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__20() { +static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__20() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__18; -x_2 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__19; +x_1 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__18; +x_2 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__19; x_3 = lean_name_mk_string(x_1, x_2); return x_3; } } -static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__21() { +static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__21() { _start: { lean_object* x_1; @@ -541,22 +541,22 @@ x_1 = lean_mk_string("em"); return x_1; } } -static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__22() { +static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__22() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__21; +x_1 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__21; x_2 = lean_string_utf8_byte_size(x_1); return x_2; } } -static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__23() { +static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__23() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; -x_1 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__21; +x_1 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__21; x_2 = lean_unsigned_to_nat(0u); -x_3 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__22; +x_3 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__22; x_4 = lean_alloc_ctor(0, 3, 0); lean_ctor_set(x_4, 0, x_1); lean_ctor_set(x_4, 1, x_2); @@ -564,51 +564,51 @@ lean_ctor_set(x_4, 2, x_3); return x_4; } } -static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__24() { +static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__24() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = lean_box(0); -x_2 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__21; +x_2 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__21; x_3 = lean_name_mk_string(x_1, x_2); return x_3; } } -static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__25() { +static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__25() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = l_Classical_tacticByCases_____x3a_____closed__2; -x_2 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__21; +x_2 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__21; x_3 = lean_name_mk_string(x_1, x_2); return x_3; } } -static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__26() { +static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__26() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = lean_box(0); -x_2 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__25; +x_2 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__25; x_3 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_3, 0, x_2); lean_ctor_set(x_3, 1, x_1); return x_3; } } -static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__27() { +static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__27() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = lean_box(0); -x_2 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__26; +x_2 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__26; x_3 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_3, 0, x_2); lean_ctor_set(x_3, 1, x_1); return x_3; } } -static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__28() { +static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__28() { _start: { lean_object* x_1; lean_object* x_2; @@ -617,7 +617,7 @@ x_2 = lean_mk_empty_array_with_capacity(x_1); return x_2; } } -static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__29() { +static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__29() { _start: { lean_object* x_1; lean_object* x_2; @@ -626,17 +626,17 @@ x_2 = lean_mk_empty_array_with_capacity(x_1); return x_2; } } -static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__30() { +static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__30() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__29; -x_2 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__16; +x_1 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__29; +x_2 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__16; x_3 = lean_array_push(x_1, x_2); return x_3; } } -static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__31() { +static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__31() { _start: { lean_object* x_1; @@ -644,17 +644,17 @@ x_1 = lean_mk_string("inductionAlts"); return x_1; } } -static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__32() { +static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__32() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__6; -x_2 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__31; +x_1 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__6; +x_2 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__31; x_3 = lean_name_mk_string(x_1, x_2); return x_3; } } -static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__33() { +static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__33() { _start: { lean_object* x_1; @@ -662,7 +662,7 @@ x_1 = lean_mk_string("with"); return x_1; } } -static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__34() { +static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__34() { _start: { lean_object* x_1; @@ -670,17 +670,17 @@ x_1 = lean_mk_string("inductionAlt"); return x_1; } } -static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__35() { +static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__35() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__6; -x_2 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__34; +x_1 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__6; +x_2 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__34; x_3 = lean_name_mk_string(x_1, x_2); return x_3; } } -static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__36() { +static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__36() { _start: { lean_object* x_1; @@ -688,7 +688,7 @@ x_1 = lean_mk_string("|"); return x_1; } } -static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__37() { +static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__37() { _start: { lean_object* x_1; @@ -696,17 +696,17 @@ x_1 = lean_mk_string("group"); return x_1; } } -static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__38() { +static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__38() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = lean_box(0); -x_2 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__37; +x_2 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__37; x_3 = lean_name_mk_string(x_1, x_2); return x_3; } } -static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__39() { +static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__39() { _start: { lean_object* x_1; @@ -714,22 +714,22 @@ x_1 = lean_mk_string("inl"); return x_1; } } -static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__40() { +static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__40() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__39; +x_1 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__39; x_2 = lean_string_utf8_byte_size(x_1); return x_2; } } -static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__41() { +static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__41() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; -x_1 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__39; +x_1 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__39; x_2 = lean_unsigned_to_nat(0u); -x_3 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__40; +x_3 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__40; x_4 = lean_alloc_ctor(0, 3, 0); lean_ctor_set(x_4, 0, x_1); lean_ctor_set(x_4, 1, x_2); @@ -737,17 +737,17 @@ lean_ctor_set(x_4, 2, x_3); return x_4; } } -static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__42() { +static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__42() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = lean_box(0); -x_2 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__39; +x_2 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__39; x_3 = lean_name_mk_string(x_1, x_2); return x_3; } } -static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__43() { +static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__43() { _start: { lean_object* x_1; @@ -755,7 +755,7 @@ x_1 = lean_mk_string("=>"); return x_1; } } -static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__44() { +static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__44() { _start: { lean_object* x_1; @@ -763,17 +763,17 @@ x_1 = lean_mk_string("hole"); return x_1; } } -static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__45() { +static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__45() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__18; -x_2 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__44; +x_1 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__18; +x_2 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__44; x_3 = lean_name_mk_string(x_1, x_2); return x_3; } } -static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__46() { +static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__46() { _start: { lean_object* x_1; @@ -781,7 +781,7 @@ x_1 = lean_mk_string("_"); return x_1; } } -static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__47() { +static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__47() { _start: { lean_object* x_1; lean_object* x_2; @@ -790,7 +790,7 @@ x_2 = lean_mk_empty_array_with_capacity(x_1); return x_2; } } -static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__48() { +static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__48() { _start: { lean_object* x_1; @@ -798,22 +798,22 @@ x_1 = lean_mk_string("inr"); return x_1; } } -static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__49() { +static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__49() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__48; +x_1 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__48; x_2 = lean_string_utf8_byte_size(x_1); return x_2; } } -static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__50() { +static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__50() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; -x_1 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__48; +x_1 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__48; x_2 = lean_unsigned_to_nat(0u); -x_3 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__49; +x_3 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__49; x_4 = lean_alloc_ctor(0, 3, 0); lean_ctor_set(x_4, 0, x_1); lean_ctor_set(x_4, 1, x_2); @@ -821,17 +821,17 @@ lean_ctor_set(x_4, 2, x_3); return x_4; } } -static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__51() { +static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__51() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = lean_box(0); -x_2 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__48; +x_2 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__48; x_3 = lean_name_mk_string(x_1, x_2); return x_3; } } -static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__52() { +static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__52() { _start: { lean_object* x_1; lean_object* x_2; @@ -840,7 +840,7 @@ x_2 = lean_mk_empty_array_with_capacity(x_1); return x_2; } } -static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__53() { +static lean_object* _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__53() { _start: { lean_object* x_1; lean_object* x_2; @@ -849,7 +849,7 @@ x_2 = lean_mk_empty_array_with_capacity(x_1); return x_2; } } -lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_973_(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +lean_object* l_Classical_myMacro____x40_Init_Classical___hyg_970_(lean_object* x_1, lean_object* x_2, lean_object* x_3) { _start: { lean_object* x_4; uint8_t x_5; @@ -887,40 +887,40 @@ lean_inc(x_15); x_16 = lean_ctor_get(x_2, 1); lean_inc(x_16); lean_dec(x_2); -x_17 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__11; +x_17 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__11; lean_inc(x_14); x_18 = lean_alloc_ctor(2, 2, 0); lean_ctor_set(x_18, 0, x_14); lean_ctor_set(x_18, 1, x_17); -x_19 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__24; +x_19 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__24; lean_inc(x_15); lean_inc(x_16); x_20 = l_Lean_addMacroScope(x_16, x_19, x_15); x_21 = lean_box(0); -x_22 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__23; -x_23 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__27; +x_22 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__23; +x_23 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__27; lean_inc(x_14); x_24 = lean_alloc_ctor(3, 4, 0); lean_ctor_set(x_24, 0, x_14); lean_ctor_set(x_24, 1, x_22); lean_ctor_set(x_24, 2, x_20); lean_ctor_set(x_24, 3, x_23); -x_25 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__28; +x_25 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__28; x_26 = lean_array_push(x_25, x_11); -x_27 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__10; +x_27 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__10; x_28 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_28, 0, x_27); lean_ctor_set(x_28, 1, x_26); -x_29 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__29; +x_29 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__29; x_30 = lean_array_push(x_29, x_24); x_31 = lean_array_push(x_30, x_28); -x_32 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__20; +x_32 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__20; x_33 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_33, 0, x_32); lean_ctor_set(x_33, 1, x_31); -x_34 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__30; +x_34 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__30; x_35 = lean_array_push(x_34, x_33); -x_36 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__14; +x_36 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__14; x_37 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_37, 0, x_36); lean_ctor_set(x_37, 1, x_35); @@ -928,21 +928,21 @@ x_38 = lean_array_push(x_25, x_37); x_39 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_39, 0, x_27); lean_ctor_set(x_39, 1, x_38); -x_40 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__33; +x_40 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__33; lean_inc(x_14); x_41 = lean_alloc_ctor(2, 2, 0); lean_ctor_set(x_41, 0, x_14); lean_ctor_set(x_41, 1, x_40); -x_42 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__36; +x_42 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__36; lean_inc(x_14); x_43 = lean_alloc_ctor(2, 2, 0); lean_ctor_set(x_43, 0, x_14); lean_ctor_set(x_43, 1, x_42); -x_44 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__42; +x_44 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__42; lean_inc(x_15); lean_inc(x_16); x_45 = l_Lean_addMacroScope(x_16, x_44, x_15); -x_46 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__41; +x_46 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__41; lean_inc(x_14); x_47 = lean_alloc_ctor(3, 4, 0); lean_ctor_set(x_47, 0, x_14); @@ -950,7 +950,7 @@ lean_ctor_set(x_47, 1, x_46); lean_ctor_set(x_47, 2, x_45); lean_ctor_set(x_47, 3, x_21); x_48 = lean_array_push(x_34, x_47); -x_49 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__38; +x_49 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__38; x_50 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_50, 0, x_49); lean_ctor_set(x_50, 1, x_48); @@ -958,22 +958,22 @@ x_51 = lean_array_push(x_25, x_9); x_52 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_52, 0, x_27); lean_ctor_set(x_52, 1, x_51); -x_53 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__43; +x_53 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__43; lean_inc(x_14); x_54 = lean_alloc_ctor(2, 2, 0); lean_ctor_set(x_54, 0, x_14); lean_ctor_set(x_54, 1, x_53); -x_55 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__46; +x_55 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__46; lean_inc(x_14); x_56 = lean_alloc_ctor(2, 2, 0); lean_ctor_set(x_56, 0, x_14); lean_ctor_set(x_56, 1, x_55); x_57 = lean_array_push(x_25, x_56); -x_58 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__45; +x_58 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__45; x_59 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_59, 0, x_58); lean_ctor_set(x_59, 1, x_57); -x_60 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__47; +x_60 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__47; x_61 = lean_array_push(x_60, x_43); lean_inc(x_61); x_62 = lean_array_push(x_61, x_50); @@ -983,13 +983,13 @@ lean_inc(x_54); x_64 = lean_array_push(x_63, x_54); lean_inc(x_59); x_65 = lean_array_push(x_64, x_59); -x_66 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__35; +x_66 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__35; x_67 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_67, 0, x_66); lean_ctor_set(x_67, 1, x_65); -x_68 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__51; +x_68 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__51; x_69 = l_Lean_addMacroScope(x_16, x_68, x_15); -x_70 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__50; +x_70 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__50; x_71 = lean_alloc_ctor(3, 4, 0); lean_ctor_set(x_71, 0, x_14); lean_ctor_set(x_71, 1, x_70); @@ -1011,12 +1011,12 @@ x_80 = lean_array_push(x_79, x_78); x_81 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_81, 0, x_27); lean_ctor_set(x_81, 1, x_80); -x_82 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__52; +x_82 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__52; x_83 = lean_array_push(x_82, x_41); -x_84 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__16; +x_84 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__16; x_85 = lean_array_push(x_83, x_84); x_86 = lean_array_push(x_85, x_81); -x_87 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__32; +x_87 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__32; x_88 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_88, 0, x_87); lean_ctor_set(x_88, 1, x_86); @@ -1024,12 +1024,12 @@ x_89 = lean_array_push(x_25, x_88); x_90 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_90, 0, x_27); lean_ctor_set(x_90, 1, x_89); -x_91 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__53; +x_91 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__53; x_92 = lean_array_push(x_91, x_18); x_93 = lean_array_push(x_92, x_39); x_94 = lean_array_push(x_93, x_84); x_95 = lean_array_push(x_94, x_90); -x_96 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__12; +x_96 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__12; x_97 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_97, 0, x_96); lean_ctor_set(x_97, 1, x_95); @@ -1038,7 +1038,7 @@ x_99 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_99, 0, x_27); lean_ctor_set(x_99, 1, x_98); x_100 = lean_array_push(x_25, x_99); -x_101 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__8; +x_101 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__8; x_102 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_102, 0, x_101); lean_ctor_set(x_102, 1, x_100); @@ -1058,40 +1058,40 @@ lean_inc(x_105); x_106 = lean_ctor_get(x_2, 1); lean_inc(x_106); lean_dec(x_2); -x_107 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__11; +x_107 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__11; lean_inc(x_103); x_108 = lean_alloc_ctor(2, 2, 0); lean_ctor_set(x_108, 0, x_103); lean_ctor_set(x_108, 1, x_107); -x_109 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__24; +x_109 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__24; lean_inc(x_105); lean_inc(x_106); x_110 = l_Lean_addMacroScope(x_106, x_109, x_105); x_111 = lean_box(0); -x_112 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__23; -x_113 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__27; +x_112 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__23; +x_113 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__27; lean_inc(x_103); x_114 = lean_alloc_ctor(3, 4, 0); lean_ctor_set(x_114, 0, x_103); lean_ctor_set(x_114, 1, x_112); lean_ctor_set(x_114, 2, x_110); lean_ctor_set(x_114, 3, x_113); -x_115 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__28; +x_115 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__28; x_116 = lean_array_push(x_115, x_11); -x_117 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__10; +x_117 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__10; x_118 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_118, 0, x_117); lean_ctor_set(x_118, 1, x_116); -x_119 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__29; +x_119 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__29; x_120 = lean_array_push(x_119, x_114); x_121 = lean_array_push(x_120, x_118); -x_122 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__20; +x_122 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__20; x_123 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_123, 0, x_122); lean_ctor_set(x_123, 1, x_121); -x_124 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__30; +x_124 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__30; x_125 = lean_array_push(x_124, x_123); -x_126 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__14; +x_126 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__14; x_127 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_127, 0, x_126); lean_ctor_set(x_127, 1, x_125); @@ -1099,21 +1099,21 @@ x_128 = lean_array_push(x_115, x_127); x_129 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_129, 0, x_117); lean_ctor_set(x_129, 1, x_128); -x_130 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__33; +x_130 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__33; lean_inc(x_103); x_131 = lean_alloc_ctor(2, 2, 0); lean_ctor_set(x_131, 0, x_103); lean_ctor_set(x_131, 1, x_130); -x_132 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__36; +x_132 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__36; lean_inc(x_103); x_133 = lean_alloc_ctor(2, 2, 0); lean_ctor_set(x_133, 0, x_103); lean_ctor_set(x_133, 1, x_132); -x_134 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__42; +x_134 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__42; lean_inc(x_105); lean_inc(x_106); x_135 = l_Lean_addMacroScope(x_106, x_134, x_105); -x_136 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__41; +x_136 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__41; lean_inc(x_103); x_137 = lean_alloc_ctor(3, 4, 0); lean_ctor_set(x_137, 0, x_103); @@ -1121,7 +1121,7 @@ lean_ctor_set(x_137, 1, x_136); lean_ctor_set(x_137, 2, x_135); lean_ctor_set(x_137, 3, x_111); x_138 = lean_array_push(x_124, x_137); -x_139 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__38; +x_139 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__38; x_140 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_140, 0, x_139); lean_ctor_set(x_140, 1, x_138); @@ -1129,22 +1129,22 @@ x_141 = lean_array_push(x_115, x_9); x_142 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_142, 0, x_117); lean_ctor_set(x_142, 1, x_141); -x_143 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__43; +x_143 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__43; lean_inc(x_103); x_144 = lean_alloc_ctor(2, 2, 0); lean_ctor_set(x_144, 0, x_103); lean_ctor_set(x_144, 1, x_143); -x_145 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__46; +x_145 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__46; lean_inc(x_103); x_146 = lean_alloc_ctor(2, 2, 0); lean_ctor_set(x_146, 0, x_103); lean_ctor_set(x_146, 1, x_145); x_147 = lean_array_push(x_115, x_146); -x_148 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__45; +x_148 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__45; x_149 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_149, 0, x_148); lean_ctor_set(x_149, 1, x_147); -x_150 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__47; +x_150 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__47; x_151 = lean_array_push(x_150, x_133); lean_inc(x_151); x_152 = lean_array_push(x_151, x_140); @@ -1154,13 +1154,13 @@ lean_inc(x_144); x_154 = lean_array_push(x_153, x_144); lean_inc(x_149); x_155 = lean_array_push(x_154, x_149); -x_156 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__35; +x_156 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__35; x_157 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_157, 0, x_156); lean_ctor_set(x_157, 1, x_155); -x_158 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__51; +x_158 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__51; x_159 = l_Lean_addMacroScope(x_106, x_158, x_105); -x_160 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__50; +x_160 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__50; x_161 = lean_alloc_ctor(3, 4, 0); lean_ctor_set(x_161, 0, x_103); lean_ctor_set(x_161, 1, x_160); @@ -1182,12 +1182,12 @@ x_170 = lean_array_push(x_169, x_168); x_171 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_171, 0, x_117); lean_ctor_set(x_171, 1, x_170); -x_172 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__52; +x_172 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__52; x_173 = lean_array_push(x_172, x_131); -x_174 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__16; +x_174 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__16; x_175 = lean_array_push(x_173, x_174); x_176 = lean_array_push(x_175, x_171); -x_177 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__32; +x_177 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__32; x_178 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_178, 0, x_177); lean_ctor_set(x_178, 1, x_176); @@ -1195,12 +1195,12 @@ x_179 = lean_array_push(x_115, x_178); x_180 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_180, 0, x_117); lean_ctor_set(x_180, 1, x_179); -x_181 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__53; +x_181 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__53; x_182 = lean_array_push(x_181, x_108); x_183 = lean_array_push(x_182, x_129); x_184 = lean_array_push(x_183, x_174); x_185 = lean_array_push(x_184, x_180); -x_186 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__12; +x_186 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__12; x_187 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_187, 0, x_186); lean_ctor_set(x_187, 1, x_185); @@ -1209,7 +1209,7 @@ x_189 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_189, 0, x_117); lean_ctor_set(x_189, 1, x_188); x_190 = lean_array_push(x_115, x_189); -x_191 = l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__8; +x_191 = l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__8; x_192 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_192, 0, x_191); lean_ctor_set(x_192, 1, x_190); @@ -1276,112 +1276,112 @@ l_Classical_tacticByCases_____x3a_____closed__20 = _init_l_Classical_tacticByCas lean_mark_persistent(l_Classical_tacticByCases_____x3a_____closed__20); l_Classical_tacticByCases_____x3a__ = _init_l_Classical_tacticByCases_____x3a__(); lean_mark_persistent(l_Classical_tacticByCases_____x3a__); -l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__1 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__1(); -lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__1); -l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__2 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__2(); -lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__2); -l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__3 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__3(); -lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__3); -l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__4 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__4(); -lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__4); -l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__5 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__5(); -lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__5); -l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__6 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__6(); -lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__6); -l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__7 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__7(); -lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__7); -l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__8 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__8(); -lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__8); -l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__9 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__9(); -lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__9); -l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__10 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__10(); -lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__10); -l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__11 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__11(); -lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__11); -l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__12 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__12(); -lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__12); -l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__13 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__13(); -lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__13); -l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__14 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__14(); -lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__14); -l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__15 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__15(); -lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__15); -l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__16 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__16(); -lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__16); -l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__17 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__17(); -lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__17); -l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__18 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__18(); -lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__18); -l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__19 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__19(); -lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__19); -l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__20 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__20(); -lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__20); -l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__21 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__21(); -lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__21); -l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__22 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__22(); -lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__22); -l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__23 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__23(); -lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__23); -l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__24 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__24(); -lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__24); -l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__25 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__25(); -lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__25); -l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__26 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__26(); -lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__26); -l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__27 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__27(); -lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__27); -l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__28 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__28(); -lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__28); -l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__29 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__29(); -lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__29); -l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__30 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__30(); -lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__30); -l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__31 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__31(); -lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__31); -l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__32 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__32(); -lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__32); -l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__33 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__33(); -lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__33); -l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__34 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__34(); -lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__34); -l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__35 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__35(); -lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__35); -l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__36 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__36(); -lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__36); -l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__37 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__37(); -lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__37); -l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__38 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__38(); -lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__38); -l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__39 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__39(); -lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__39); -l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__40 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__40(); -lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__40); -l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__41 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__41(); -lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__41); -l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__42 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__42(); -lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__42); -l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__43 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__43(); -lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__43); -l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__44 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__44(); -lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__44); -l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__45 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__45(); -lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__45); -l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__46 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__46(); -lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__46); -l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__47 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__47(); -lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__47); -l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__48 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__48(); -lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__48); -l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__49 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__49(); -lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__49); -l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__50 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__50(); -lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__50); -l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__51 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__51(); -lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__51); -l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__52 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__52(); -lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__52); -l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__53 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__53(); -lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_973____closed__53); +l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__1 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__1(); +lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__1); +l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__2 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__2(); +lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__2); +l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__3 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__3(); +lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__3); +l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__4 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__4(); +lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__4); +l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__5 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__5(); +lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__5); +l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__6 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__6(); +lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__6); +l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__7 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__7(); +lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__7); +l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__8 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__8(); +lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__8); +l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__9 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__9(); +lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__9); +l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__10 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__10(); +lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__10); +l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__11 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__11(); +lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__11); +l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__12 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__12(); +lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__12); +l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__13 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__13(); +lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__13); +l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__14 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__14(); +lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__14); +l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__15 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__15(); +lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__15); +l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__16 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__16(); +lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__16); +l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__17 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__17(); +lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__17); +l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__18 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__18(); +lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__18); +l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__19 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__19(); +lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__19); +l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__20 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__20(); +lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__20); +l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__21 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__21(); +lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__21); +l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__22 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__22(); +lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__22); +l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__23 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__23(); +lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__23); +l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__24 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__24(); +lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__24); +l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__25 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__25(); +lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__25); +l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__26 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__26(); +lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__26); +l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__27 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__27(); +lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__27); +l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__28 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__28(); +lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__28); +l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__29 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__29(); +lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__29); +l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__30 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__30(); +lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__30); +l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__31 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__31(); +lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__31); +l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__32 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__32(); +lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__32); +l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__33 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__33(); +lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__33); +l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__34 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__34(); +lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__34); +l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__35 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__35(); +lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__35); +l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__36 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__36(); +lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__36); +l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__37 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__37(); +lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__37); +l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__38 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__38(); +lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__38); +l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__39 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__39(); +lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__39); +l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__40 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__40(); +lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__40); +l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__41 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__41(); +lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__41); +l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__42 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__42(); +lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__42); +l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__43 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__43(); +lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__43); +l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__44 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__44(); +lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__44); +l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__45 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__45(); +lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__45); +l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__46 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__46(); +lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__46); +l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__47 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__47(); +lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__47); +l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__48 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__48(); +lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__48); +l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__49 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__49(); +lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__49); +l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__50 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__50(); +lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__50); +l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__51 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__51(); +lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__51); +l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__52 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__52(); +lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__52); +l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__53 = _init_l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__53(); +lean_mark_persistent(l_Classical_myMacro____x40_Init_Classical___hyg_970____closed__53); return lean_io_result_mk_ok(lean_box(0)); } #ifdef __cplusplus diff --git a/stage0/stdlib/Lean/Elab/Binders.c b/stage0/stdlib/Lean/Elab/Binders.c index 326d91ff9b..43dd2b78f8 100644 --- a/stage0/stdlib/Lean/Elab/Binders.c +++ b/stage0/stdlib/Lean/Elab/Binders.c @@ -147,6 +147,7 @@ lean_object* lean_array_get_size(lean_object*); lean_object* l_Lean_Elab_Term_expandLetEqnsDecl(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_elabLetDelayedDecl(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Elab_Binders_0__Lean_Elab_Term_elabBinderViews_loop___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_mkLetFunAnnotation(lean_object*); lean_object* lean_string_append(lean_object*, lean_object*); lean_object* l_Array_forInUnsafe_loop___at_Lean_Elab_Term_quoteAutoTactic___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*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_isClass_x3f(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -270,7 +271,7 @@ lean_object* l_Lean_replaceRef(lean_object*, lean_object*); lean_object* lean_array_get(lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Elab_Binders_0__Lean_Elab_Term_addLocalVarInfo(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_mkLambdaFVars(lean_object*, lean_object*, uint8_t, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Elab_Term_initFn____x40_Lean_Elab_Binders___hyg_5652_(lean_object*); +lean_object* l_Lean_Elab_Term_initFn____x40_Lean_Elab_Binders___hyg_5654_(lean_object*); lean_object* l_Lean_Elab_Term_initFn____x40_Lean_Elab_Binders___hyg_1125_(lean_object*); static lean_object* l___regBuiltin_Lean_Elab_Term_elabDepArrow___closed__4; lean_object* l_Lean_Elab_Term_elabLetDeclAux___lambda__6(uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -24517,7 +24518,7 @@ lean_inc(x_5); x_21 = l_Lean_Meta_withLocalDecl___at___private_Lean_Elab_Term_0__Lean_Elab_Term_elabImplicitLambda_loop___spec__1___rarg(x_18, x_20, x_5, x_19, x_11, x_12, x_13, x_14, x_15, x_16, x_17); if (lean_obj_tag(x_21) == 0) { -lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; +lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; x_22 = lean_ctor_get(x_21, 0); lean_inc(x_22); x_23 = lean_ctor_get(x_21, 1); @@ -24525,12 +24526,13 @@ lean_inc(x_23); lean_dec(x_21); lean_inc(x_4); x_24 = l_Lean_mkApp(x_22, x_4); -x_25 = l_Lean_Elab_Term_elabLetDeclAux___lambda__4(x_1, x_2, x_3, x_4, x_5, x_24, x_11, x_12, x_13, x_14, x_15, x_16, x_23); -return x_25; +x_25 = l_Lean_mkLetFunAnnotation(x_24); +x_26 = l_Lean_Elab_Term_elabLetDeclAux___lambda__4(x_1, x_2, x_3, x_4, x_5, x_25, x_11, x_12, x_13, x_14, x_15, x_16, x_23); +return x_26; } else { -uint8_t x_26; +uint8_t x_27; lean_dec(x_16); lean_dec(x_15); lean_dec(x_14); @@ -24541,34 +24543,34 @@ lean_dec(x_5); lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); -x_26 = !lean_is_exclusive(x_21); -if (x_26 == 0) +x_27 = !lean_is_exclusive(x_21); +if (x_27 == 0) { return x_21; } else { -lean_object* x_27; lean_object* x_28; lean_object* x_29; -x_27 = lean_ctor_get(x_21, 0); -x_28 = lean_ctor_get(x_21, 1); +lean_object* x_28; lean_object* x_29; lean_object* x_30; +x_28 = lean_ctor_get(x_21, 0); +x_29 = lean_ctor_get(x_21, 1); +lean_inc(x_29); lean_inc(x_28); -lean_inc(x_27); lean_dec(x_21); -x_29 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_29, 0, x_27); -lean_ctor_set(x_29, 1, x_28); -return x_29; +x_30 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_30, 0, x_28); +lean_ctor_set(x_30, 1, x_29); +return x_30; } } } else { -lean_object* x_30; lean_object* x_31; lean_object* x_32; -x_30 = l_Lean_Syntax_getId(x_7); -x_31 = lean_alloc_closure((void*)(l_Lean_Elab_Term_elabLetDeclAux___lambda__5), 11, 3); -lean_closure_set(x_31, 0, x_7); -lean_closure_set(x_31, 1, x_8); -lean_closure_set(x_31, 2, x_9); +lean_object* x_31; lean_object* x_32; lean_object* x_33; +x_31 = l_Lean_Syntax_getId(x_7); +x_32 = lean_alloc_closure((void*)(l_Lean_Elab_Term_elabLetDeclAux___lambda__5), 11, 3); +lean_closure_set(x_32, 0, x_7); +lean_closure_set(x_32, 1, x_8); +lean_closure_set(x_32, 2, x_9); lean_inc(x_16); lean_inc(x_15); lean_inc(x_14); @@ -24577,21 +24579,21 @@ lean_inc(x_12); lean_inc(x_11); lean_inc(x_4); lean_inc(x_5); -x_32 = l_Lean_Meta_withLetDecl___at_Lean_Elab_Term_elabLetDeclAux___spec__2___rarg(x_30, x_5, x_4, x_31, x_11, x_12, x_13, x_14, x_15, x_16, x_17); -if (lean_obj_tag(x_32) == 0) +x_33 = l_Lean_Meta_withLetDecl___at_Lean_Elab_Term_elabLetDeclAux___spec__2___rarg(x_31, x_5, x_4, x_32, x_11, x_12, x_13, x_14, x_15, x_16, x_17); +if (lean_obj_tag(x_33) == 0) { -lean_object* x_33; lean_object* x_34; lean_object* x_35; -x_33 = lean_ctor_get(x_32, 0); -lean_inc(x_33); -x_34 = lean_ctor_get(x_32, 1); +lean_object* x_34; lean_object* x_35; lean_object* x_36; +x_34 = lean_ctor_get(x_33, 0); lean_inc(x_34); -lean_dec(x_32); -x_35 = l_Lean_Elab_Term_elabLetDeclAux___lambda__4(x_1, x_2, x_3, x_4, x_5, x_33, x_11, x_12, x_13, x_14, x_15, x_16, x_34); -return x_35; +x_35 = lean_ctor_get(x_33, 1); +lean_inc(x_35); +lean_dec(x_33); +x_36 = l_Lean_Elab_Term_elabLetDeclAux___lambda__4(x_1, x_2, x_3, x_4, x_5, x_34, x_11, x_12, x_13, x_14, x_15, x_16, x_35); +return x_36; } else { -uint8_t x_36; +uint8_t x_37; lean_dec(x_16); lean_dec(x_15); lean_dec(x_14); @@ -24602,23 +24604,23 @@ lean_dec(x_5); lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); -x_36 = !lean_is_exclusive(x_32); -if (x_36 == 0) +x_37 = !lean_is_exclusive(x_33); +if (x_37 == 0) { -return x_32; +return x_33; } else { -lean_object* x_37; lean_object* x_38; lean_object* x_39; -x_37 = lean_ctor_get(x_32, 0); -x_38 = lean_ctor_get(x_32, 1); +lean_object* x_38; lean_object* x_39; lean_object* x_40; +x_38 = lean_ctor_get(x_33, 0); +x_39 = lean_ctor_get(x_33, 1); +lean_inc(x_39); lean_inc(x_38); -lean_inc(x_37); -lean_dec(x_32); -x_39 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_39, 0, x_37); -lean_ctor_set(x_39, 1, x_38); -return x_39; +lean_dec(x_33); +x_40 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_40, 0, x_38); +lean_ctor_set(x_40, 1, x_39); +return x_40; } } } @@ -26058,7 +26060,7 @@ x_6 = l_Lean_KeyedDeclsAttribute_addBuiltin___rarg(x_2, x_3, x_4, x_5, x_1); return x_6; } } -lean_object* l_Lean_Elab_Term_initFn____x40_Lean_Elab_Binders___hyg_5652_(lean_object* x_1) { +lean_object* l_Lean_Elab_Term_initFn____x40_Lean_Elab_Binders___hyg_5654_(lean_object* x_1) { _start: { lean_object* x_2; lean_object* x_3; @@ -26612,7 +26614,7 @@ lean_mark_persistent(l___regBuiltin_Lean_Elab_Term_elabLetDelayedDecl___closed__ res = l___regBuiltin_Lean_Elab_Term_elabLetDelayedDecl(lean_io_mk_world()); if (lean_io_result_is_error(res)) return res; lean_dec_ref(res); -res = l_Lean_Elab_Term_initFn____x40_Lean_Elab_Binders___hyg_5652_(lean_io_mk_world()); +res = l_Lean_Elab_Term_initFn____x40_Lean_Elab_Binders___hyg_5654_(lean_io_mk_world()); if (lean_io_result_is_error(res)) return res; lean_dec_ref(res); return lean_io_result_mk_ok(lean_box(0)); diff --git a/stage0/stdlib/Lean/Elab/Command.c b/stage0/stdlib/Lean/Elab/Command.c index cd4baac65a..692b915180 100644 --- a/stage0/stdlib/Lean/Elab/Command.c +++ b/stage0/stdlib/Lean/Elab/Command.c @@ -137,6 +137,7 @@ lean_object* l_Lean_Elab_Command_runTermElabM___rarg___lambda__1(lean_object*, l lean_object* l_Array_foldlMUnsafe_fold___at___private_Lean_Elab_Command_0__Lean_Elab_Command_addTraceAsMessagesCore___spec__12(lean_object*, lean_object*, size_t, size_t, lean_object*); lean_object* l_Lean_Elab_Command_liftEIO(lean_object*); lean_object* l_Lean_Elab_Command_addLinter(lean_object*, lean_object*); +lean_object* l_Lean_Elab_Command_withScope_match__1___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_liftMacroM___at_Lean_Elab_Command_elabCommand___spec__2___lambda__2(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_checkIfShadowingStructureField___at_Lean_Elab_Command_expandDeclId___spec__3(lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Elab_throwAlreadyDeclaredUniverseLevel___at_Lean_Elab_Command_addUnivLevel___spec__1___closed__4; @@ -203,6 +204,7 @@ lean_object* l_Lean_Syntax_hasMissing(lean_object*); lean_object* lean_nat_add(lean_object*, lean_object*); lean_object* l_Array_mapMUnsafe_map___at_Lean_Elab_Command_liftTermElabM___spec__6(lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Elab_Command_liftTermElabM___rarg___closed__5; +lean_object* l_Lean_Elab_Command_withScope_match__1(lean_object*); lean_object* l___private_Lean_Elab_Command_0__Lean_Elab_Command_getVarDecls(lean_object*); lean_object* l_Lean_Elab_Command_getLevelNames___rarg___boxed(lean_object*, lean_object*); static lean_object* l_Lean_Elab_Command_commandElabAttribute___closed__13; @@ -466,6 +468,7 @@ lean_object* l_Lean_Elab_Command_Context_ref___default; lean_object* l_Lean_Elab_Command_instMonadLogCommandElabM___lambda__2(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Command_getMainModule___rarg___boxed(lean_object*, lean_object*); static lean_object* l_Lean_Elab_Command_getBracketedBinderIds___closed__6; +lean_object* l_Lean_Elab_Command_withScope___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Elab_Command_commandElabAttribute___closed__9; lean_object* l_Lean_Elab_Command_addUnivLevel(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_forInUnsafe_loop___at_Lean_Elab_Command_elabCommandTopLevel___spec__5(lean_object*, lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*); @@ -537,6 +540,7 @@ static lean_object* l_Lean_Elab_Command_Scope_varDecls___default___closed__1; static lean_object* l_Lean_Elab_Command_State_infoState___default___closed__3; lean_object* l_Lean_Elab_Command_runTermElabM_match__1(lean_object*); lean_object* l___private_Lean_Elab_Command_0__Lean_Elab_Command_mkTermContext___boxed(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Command_withScope(lean_object*); extern lean_object* l_Lean_Elab_pp_macroStack; lean_object* l_Lean_Elab_Command_getMainModule___rarg(lean_object*, lean_object*); lean_object* l_Lean_Elab_Command_instMonadLiftTIOCommandElabM(lean_object*); @@ -18923,6 +18927,760 @@ lean_dec(x_2); return x_5; } } +lean_object* l_Lean_Elab_Command_withScope_match__1___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +if (lean_obj_tag(x_1) == 0) +{ +lean_object* x_4; lean_object* x_5; +lean_dec(x_3); +x_4 = lean_box(0); +x_5 = lean_apply_1(x_2, x_4); +return x_5; +} +else +{ +lean_object* x_6; lean_object* x_7; lean_object* x_8; +lean_dec(x_2); +x_6 = lean_ctor_get(x_1, 0); +lean_inc(x_6); +x_7 = lean_ctor_get(x_1, 1); +lean_inc(x_7); +lean_dec(x_1); +x_8 = lean_apply_2(x_3, x_6, x_7); +return x_8; +} +} +} +lean_object* l_Lean_Elab_Command_withScope_match__1(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_Lean_Elab_Command_withScope_match__1___rarg), 3, 0); +return x_2; +} +} +lean_object* l_Lean_Elab_Command_withScope___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { +_start: +{ +lean_object* x_6; lean_object* x_7; lean_object* x_8; +x_6 = lean_st_ref_get(x_4, x_5); +x_7 = lean_ctor_get(x_6, 0); +lean_inc(x_7); +x_8 = lean_ctor_get(x_7, 2); +lean_inc(x_8); +lean_dec(x_7); +if (lean_obj_tag(x_8) == 0) +{ +lean_object* x_9; lean_object* x_10; +lean_dec(x_1); +x_9 = lean_ctor_get(x_6, 1); +lean_inc(x_9); +lean_dec(x_6); +x_10 = lean_apply_3(x_2, x_3, x_4, x_9); +return x_10; +} +else +{ +lean_object* x_11; uint8_t x_12; +x_11 = lean_ctor_get(x_6, 1); +lean_inc(x_11); +lean_dec(x_6); +x_12 = !lean_is_exclusive(x_8); +if (x_12 == 0) +{ +lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; uint8_t x_18; +x_13 = lean_ctor_get(x_8, 0); +x_14 = lean_ctor_get(x_8, 1); +x_15 = lean_st_ref_take(x_4, x_11); +x_16 = lean_ctor_get(x_15, 0); +lean_inc(x_16); +x_17 = lean_ctor_get(x_15, 1); +lean_inc(x_17); +lean_dec(x_15); +x_18 = !lean_is_exclusive(x_16); +if (x_18 == 0) +{ +lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; +x_19 = lean_ctor_get(x_16, 2); +lean_dec(x_19); +lean_inc(x_13); +x_20 = lean_apply_1(x_1, x_13); +lean_inc(x_14); +lean_ctor_set(x_8, 0, x_20); +lean_ctor_set(x_16, 2, x_8); +x_21 = lean_st_ref_set(x_4, x_16, x_17); +x_22 = lean_ctor_get(x_21, 1); +lean_inc(x_22); +lean_dec(x_21); +lean_inc(x_4); +x_23 = lean_apply_3(x_2, x_3, x_4, x_22); +if (lean_obj_tag(x_23) == 0) +{ +lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; uint8_t x_29; +x_24 = lean_ctor_get(x_23, 0); +lean_inc(x_24); +x_25 = lean_ctor_get(x_23, 1); +lean_inc(x_25); +lean_dec(x_23); +x_26 = lean_st_ref_take(x_4, x_25); +x_27 = lean_ctor_get(x_26, 0); +lean_inc(x_27); +x_28 = lean_ctor_get(x_26, 1); +lean_inc(x_28); +lean_dec(x_26); +x_29 = !lean_is_exclusive(x_27); +if (x_29 == 0) +{ +lean_object* x_30; lean_object* x_31; lean_object* x_32; uint8_t x_33; +x_30 = lean_ctor_get(x_27, 2); +lean_dec(x_30); +x_31 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_31, 0, x_13); +lean_ctor_set(x_31, 1, x_14); +lean_ctor_set(x_27, 2, x_31); +x_32 = lean_st_ref_set(x_4, x_27, x_28); +lean_dec(x_4); +x_33 = !lean_is_exclusive(x_32); +if (x_33 == 0) +{ +lean_object* x_34; +x_34 = lean_ctor_get(x_32, 0); +lean_dec(x_34); +lean_ctor_set(x_32, 0, x_24); +return x_32; +} +else +{ +lean_object* x_35; lean_object* x_36; +x_35 = lean_ctor_get(x_32, 1); +lean_inc(x_35); +lean_dec(x_32); +x_36 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_36, 0, x_24); +lean_ctor_set(x_36, 1, x_35); +return x_36; +} +} +else +{ +lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; +x_37 = lean_ctor_get(x_27, 0); +x_38 = lean_ctor_get(x_27, 1); +x_39 = lean_ctor_get(x_27, 3); +x_40 = lean_ctor_get(x_27, 4); +x_41 = lean_ctor_get(x_27, 5); +x_42 = lean_ctor_get(x_27, 6); +x_43 = lean_ctor_get(x_27, 7); +x_44 = lean_ctor_get(x_27, 8); +lean_inc(x_44); +lean_inc(x_43); +lean_inc(x_42); +lean_inc(x_41); +lean_inc(x_40); +lean_inc(x_39); +lean_inc(x_38); +lean_inc(x_37); +lean_dec(x_27); +x_45 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_45, 0, x_13); +lean_ctor_set(x_45, 1, x_14); +x_46 = lean_alloc_ctor(0, 9, 0); +lean_ctor_set(x_46, 0, x_37); +lean_ctor_set(x_46, 1, x_38); +lean_ctor_set(x_46, 2, x_45); +lean_ctor_set(x_46, 3, x_39); +lean_ctor_set(x_46, 4, x_40); +lean_ctor_set(x_46, 5, x_41); +lean_ctor_set(x_46, 6, x_42); +lean_ctor_set(x_46, 7, x_43); +lean_ctor_set(x_46, 8, x_44); +x_47 = lean_st_ref_set(x_4, x_46, x_28); +lean_dec(x_4); +x_48 = lean_ctor_get(x_47, 1); +lean_inc(x_48); +if (lean_is_exclusive(x_47)) { + lean_ctor_release(x_47, 0); + lean_ctor_release(x_47, 1); + x_49 = x_47; +} else { + lean_dec_ref(x_47); + x_49 = lean_box(0); +} +if (lean_is_scalar(x_49)) { + x_50 = lean_alloc_ctor(0, 2, 0); +} else { + x_50 = x_49; +} +lean_ctor_set(x_50, 0, x_24); +lean_ctor_set(x_50, 1, x_48); +return x_50; +} +} +else +{ +lean_object* x_51; lean_object* x_52; lean_object* x_53; lean_object* x_54; lean_object* x_55; uint8_t x_56; +x_51 = lean_ctor_get(x_23, 0); +lean_inc(x_51); +x_52 = lean_ctor_get(x_23, 1); +lean_inc(x_52); +lean_dec(x_23); +x_53 = lean_st_ref_take(x_4, x_52); +x_54 = lean_ctor_get(x_53, 0); +lean_inc(x_54); +x_55 = lean_ctor_get(x_53, 1); +lean_inc(x_55); +lean_dec(x_53); +x_56 = !lean_is_exclusive(x_54); +if (x_56 == 0) +{ +lean_object* x_57; lean_object* x_58; lean_object* x_59; uint8_t x_60; +x_57 = lean_ctor_get(x_54, 2); +lean_dec(x_57); +x_58 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_58, 0, x_13); +lean_ctor_set(x_58, 1, x_14); +lean_ctor_set(x_54, 2, x_58); +x_59 = lean_st_ref_set(x_4, x_54, x_55); +lean_dec(x_4); +x_60 = !lean_is_exclusive(x_59); +if (x_60 == 0) +{ +lean_object* x_61; +x_61 = lean_ctor_get(x_59, 0); +lean_dec(x_61); +lean_ctor_set_tag(x_59, 1); +lean_ctor_set(x_59, 0, x_51); +return x_59; +} +else +{ +lean_object* x_62; lean_object* x_63; +x_62 = lean_ctor_get(x_59, 1); +lean_inc(x_62); +lean_dec(x_59); +x_63 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_63, 0, x_51); +lean_ctor_set(x_63, 1, x_62); +return x_63; +} +} +else +{ +lean_object* x_64; lean_object* x_65; lean_object* x_66; lean_object* x_67; lean_object* x_68; lean_object* x_69; lean_object* x_70; lean_object* x_71; lean_object* x_72; lean_object* x_73; lean_object* x_74; lean_object* x_75; lean_object* x_76; lean_object* x_77; +x_64 = lean_ctor_get(x_54, 0); +x_65 = lean_ctor_get(x_54, 1); +x_66 = lean_ctor_get(x_54, 3); +x_67 = lean_ctor_get(x_54, 4); +x_68 = lean_ctor_get(x_54, 5); +x_69 = lean_ctor_get(x_54, 6); +x_70 = lean_ctor_get(x_54, 7); +x_71 = lean_ctor_get(x_54, 8); +lean_inc(x_71); +lean_inc(x_70); +lean_inc(x_69); +lean_inc(x_68); +lean_inc(x_67); +lean_inc(x_66); +lean_inc(x_65); +lean_inc(x_64); +lean_dec(x_54); +x_72 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_72, 0, x_13); +lean_ctor_set(x_72, 1, x_14); +x_73 = lean_alloc_ctor(0, 9, 0); +lean_ctor_set(x_73, 0, x_64); +lean_ctor_set(x_73, 1, x_65); +lean_ctor_set(x_73, 2, x_72); +lean_ctor_set(x_73, 3, x_66); +lean_ctor_set(x_73, 4, x_67); +lean_ctor_set(x_73, 5, x_68); +lean_ctor_set(x_73, 6, x_69); +lean_ctor_set(x_73, 7, x_70); +lean_ctor_set(x_73, 8, x_71); +x_74 = lean_st_ref_set(x_4, x_73, x_55); +lean_dec(x_4); +x_75 = lean_ctor_get(x_74, 1); +lean_inc(x_75); +if (lean_is_exclusive(x_74)) { + lean_ctor_release(x_74, 0); + lean_ctor_release(x_74, 1); + x_76 = x_74; +} else { + lean_dec_ref(x_74); + x_76 = lean_box(0); +} +if (lean_is_scalar(x_76)) { + x_77 = lean_alloc_ctor(1, 2, 0); +} else { + x_77 = x_76; + lean_ctor_set_tag(x_77, 1); +} +lean_ctor_set(x_77, 0, x_51); +lean_ctor_set(x_77, 1, x_75); +return x_77; +} +} +} +else +{ +lean_object* x_78; lean_object* x_79; lean_object* x_80; lean_object* x_81; lean_object* x_82; lean_object* x_83; lean_object* x_84; lean_object* x_85; lean_object* x_86; lean_object* x_87; lean_object* x_88; lean_object* x_89; lean_object* x_90; +x_78 = lean_ctor_get(x_16, 0); +x_79 = lean_ctor_get(x_16, 1); +x_80 = lean_ctor_get(x_16, 3); +x_81 = lean_ctor_get(x_16, 4); +x_82 = lean_ctor_get(x_16, 5); +x_83 = lean_ctor_get(x_16, 6); +x_84 = lean_ctor_get(x_16, 7); +x_85 = lean_ctor_get(x_16, 8); +lean_inc(x_85); +lean_inc(x_84); +lean_inc(x_83); +lean_inc(x_82); +lean_inc(x_81); +lean_inc(x_80); +lean_inc(x_79); +lean_inc(x_78); +lean_dec(x_16); +lean_inc(x_13); +x_86 = lean_apply_1(x_1, x_13); +lean_inc(x_14); +lean_ctor_set(x_8, 0, x_86); +x_87 = lean_alloc_ctor(0, 9, 0); +lean_ctor_set(x_87, 0, x_78); +lean_ctor_set(x_87, 1, x_79); +lean_ctor_set(x_87, 2, x_8); +lean_ctor_set(x_87, 3, x_80); +lean_ctor_set(x_87, 4, x_81); +lean_ctor_set(x_87, 5, x_82); +lean_ctor_set(x_87, 6, x_83); +lean_ctor_set(x_87, 7, x_84); +lean_ctor_set(x_87, 8, x_85); +x_88 = lean_st_ref_set(x_4, x_87, x_17); +x_89 = lean_ctor_get(x_88, 1); +lean_inc(x_89); +lean_dec(x_88); +lean_inc(x_4); +x_90 = lean_apply_3(x_2, x_3, x_4, x_89); +if (lean_obj_tag(x_90) == 0) +{ +lean_object* x_91; lean_object* x_92; lean_object* x_93; lean_object* x_94; lean_object* x_95; lean_object* x_96; lean_object* x_97; lean_object* x_98; lean_object* x_99; lean_object* x_100; lean_object* x_101; lean_object* x_102; lean_object* x_103; lean_object* x_104; lean_object* x_105; lean_object* x_106; lean_object* x_107; lean_object* x_108; lean_object* x_109; lean_object* x_110; +x_91 = lean_ctor_get(x_90, 0); +lean_inc(x_91); +x_92 = lean_ctor_get(x_90, 1); +lean_inc(x_92); +lean_dec(x_90); +x_93 = lean_st_ref_take(x_4, x_92); +x_94 = lean_ctor_get(x_93, 0); +lean_inc(x_94); +x_95 = lean_ctor_get(x_93, 1); +lean_inc(x_95); +lean_dec(x_93); +x_96 = lean_ctor_get(x_94, 0); +lean_inc(x_96); +x_97 = lean_ctor_get(x_94, 1); +lean_inc(x_97); +x_98 = lean_ctor_get(x_94, 3); +lean_inc(x_98); +x_99 = lean_ctor_get(x_94, 4); +lean_inc(x_99); +x_100 = lean_ctor_get(x_94, 5); +lean_inc(x_100); +x_101 = lean_ctor_get(x_94, 6); +lean_inc(x_101); +x_102 = lean_ctor_get(x_94, 7); +lean_inc(x_102); +x_103 = lean_ctor_get(x_94, 8); +lean_inc(x_103); +if (lean_is_exclusive(x_94)) { + lean_ctor_release(x_94, 0); + lean_ctor_release(x_94, 1); + lean_ctor_release(x_94, 2); + lean_ctor_release(x_94, 3); + lean_ctor_release(x_94, 4); + lean_ctor_release(x_94, 5); + lean_ctor_release(x_94, 6); + lean_ctor_release(x_94, 7); + lean_ctor_release(x_94, 8); + x_104 = x_94; +} else { + lean_dec_ref(x_94); + x_104 = lean_box(0); +} +x_105 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_105, 0, x_13); +lean_ctor_set(x_105, 1, x_14); +if (lean_is_scalar(x_104)) { + x_106 = lean_alloc_ctor(0, 9, 0); +} else { + x_106 = x_104; +} +lean_ctor_set(x_106, 0, x_96); +lean_ctor_set(x_106, 1, x_97); +lean_ctor_set(x_106, 2, x_105); +lean_ctor_set(x_106, 3, x_98); +lean_ctor_set(x_106, 4, x_99); +lean_ctor_set(x_106, 5, x_100); +lean_ctor_set(x_106, 6, x_101); +lean_ctor_set(x_106, 7, x_102); +lean_ctor_set(x_106, 8, x_103); +x_107 = lean_st_ref_set(x_4, x_106, x_95); +lean_dec(x_4); +x_108 = lean_ctor_get(x_107, 1); +lean_inc(x_108); +if (lean_is_exclusive(x_107)) { + lean_ctor_release(x_107, 0); + lean_ctor_release(x_107, 1); + x_109 = x_107; +} else { + lean_dec_ref(x_107); + x_109 = lean_box(0); +} +if (lean_is_scalar(x_109)) { + x_110 = lean_alloc_ctor(0, 2, 0); +} else { + x_110 = x_109; +} +lean_ctor_set(x_110, 0, x_91); +lean_ctor_set(x_110, 1, x_108); +return x_110; +} +else +{ +lean_object* x_111; lean_object* x_112; lean_object* x_113; lean_object* x_114; lean_object* x_115; lean_object* x_116; lean_object* x_117; lean_object* x_118; lean_object* x_119; lean_object* x_120; lean_object* x_121; lean_object* x_122; lean_object* x_123; lean_object* x_124; lean_object* x_125; lean_object* x_126; lean_object* x_127; lean_object* x_128; lean_object* x_129; lean_object* x_130; +x_111 = lean_ctor_get(x_90, 0); +lean_inc(x_111); +x_112 = lean_ctor_get(x_90, 1); +lean_inc(x_112); +lean_dec(x_90); +x_113 = lean_st_ref_take(x_4, x_112); +x_114 = lean_ctor_get(x_113, 0); +lean_inc(x_114); +x_115 = lean_ctor_get(x_113, 1); +lean_inc(x_115); +lean_dec(x_113); +x_116 = lean_ctor_get(x_114, 0); +lean_inc(x_116); +x_117 = lean_ctor_get(x_114, 1); +lean_inc(x_117); +x_118 = lean_ctor_get(x_114, 3); +lean_inc(x_118); +x_119 = lean_ctor_get(x_114, 4); +lean_inc(x_119); +x_120 = lean_ctor_get(x_114, 5); +lean_inc(x_120); +x_121 = lean_ctor_get(x_114, 6); +lean_inc(x_121); +x_122 = lean_ctor_get(x_114, 7); +lean_inc(x_122); +x_123 = lean_ctor_get(x_114, 8); +lean_inc(x_123); +if (lean_is_exclusive(x_114)) { + lean_ctor_release(x_114, 0); + lean_ctor_release(x_114, 1); + lean_ctor_release(x_114, 2); + lean_ctor_release(x_114, 3); + lean_ctor_release(x_114, 4); + lean_ctor_release(x_114, 5); + lean_ctor_release(x_114, 6); + lean_ctor_release(x_114, 7); + lean_ctor_release(x_114, 8); + x_124 = x_114; +} else { + lean_dec_ref(x_114); + x_124 = lean_box(0); +} +x_125 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_125, 0, x_13); +lean_ctor_set(x_125, 1, x_14); +if (lean_is_scalar(x_124)) { + x_126 = lean_alloc_ctor(0, 9, 0); +} else { + x_126 = x_124; +} +lean_ctor_set(x_126, 0, x_116); +lean_ctor_set(x_126, 1, x_117); +lean_ctor_set(x_126, 2, x_125); +lean_ctor_set(x_126, 3, x_118); +lean_ctor_set(x_126, 4, x_119); +lean_ctor_set(x_126, 5, x_120); +lean_ctor_set(x_126, 6, x_121); +lean_ctor_set(x_126, 7, x_122); +lean_ctor_set(x_126, 8, x_123); +x_127 = lean_st_ref_set(x_4, x_126, x_115); +lean_dec(x_4); +x_128 = lean_ctor_get(x_127, 1); +lean_inc(x_128); +if (lean_is_exclusive(x_127)) { + lean_ctor_release(x_127, 0); + lean_ctor_release(x_127, 1); + x_129 = x_127; +} else { + lean_dec_ref(x_127); + x_129 = lean_box(0); +} +if (lean_is_scalar(x_129)) { + x_130 = lean_alloc_ctor(1, 2, 0); +} else { + x_130 = x_129; + lean_ctor_set_tag(x_130, 1); +} +lean_ctor_set(x_130, 0, x_111); +lean_ctor_set(x_130, 1, x_128); +return x_130; +} +} +} +else +{ +lean_object* x_131; lean_object* x_132; lean_object* x_133; lean_object* x_134; lean_object* x_135; lean_object* x_136; lean_object* x_137; lean_object* x_138; lean_object* x_139; lean_object* x_140; lean_object* x_141; lean_object* x_142; lean_object* x_143; lean_object* x_144; lean_object* x_145; lean_object* x_146; lean_object* x_147; lean_object* x_148; lean_object* x_149; lean_object* x_150; +x_131 = lean_ctor_get(x_8, 0); +x_132 = lean_ctor_get(x_8, 1); +lean_inc(x_132); +lean_inc(x_131); +lean_dec(x_8); +x_133 = lean_st_ref_take(x_4, x_11); +x_134 = lean_ctor_get(x_133, 0); +lean_inc(x_134); +x_135 = lean_ctor_get(x_133, 1); +lean_inc(x_135); +lean_dec(x_133); +x_136 = lean_ctor_get(x_134, 0); +lean_inc(x_136); +x_137 = lean_ctor_get(x_134, 1); +lean_inc(x_137); +x_138 = lean_ctor_get(x_134, 3); +lean_inc(x_138); +x_139 = lean_ctor_get(x_134, 4); +lean_inc(x_139); +x_140 = lean_ctor_get(x_134, 5); +lean_inc(x_140); +x_141 = lean_ctor_get(x_134, 6); +lean_inc(x_141); +x_142 = lean_ctor_get(x_134, 7); +lean_inc(x_142); +x_143 = lean_ctor_get(x_134, 8); +lean_inc(x_143); +if (lean_is_exclusive(x_134)) { + lean_ctor_release(x_134, 0); + lean_ctor_release(x_134, 1); + lean_ctor_release(x_134, 2); + lean_ctor_release(x_134, 3); + lean_ctor_release(x_134, 4); + lean_ctor_release(x_134, 5); + lean_ctor_release(x_134, 6); + lean_ctor_release(x_134, 7); + lean_ctor_release(x_134, 8); + x_144 = x_134; +} else { + lean_dec_ref(x_134); + x_144 = lean_box(0); +} +lean_inc(x_131); +x_145 = lean_apply_1(x_1, x_131); +lean_inc(x_132); +x_146 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_146, 0, x_145); +lean_ctor_set(x_146, 1, x_132); +if (lean_is_scalar(x_144)) { + x_147 = lean_alloc_ctor(0, 9, 0); +} else { + x_147 = x_144; +} +lean_ctor_set(x_147, 0, x_136); +lean_ctor_set(x_147, 1, x_137); +lean_ctor_set(x_147, 2, x_146); +lean_ctor_set(x_147, 3, x_138); +lean_ctor_set(x_147, 4, x_139); +lean_ctor_set(x_147, 5, x_140); +lean_ctor_set(x_147, 6, x_141); +lean_ctor_set(x_147, 7, x_142); +lean_ctor_set(x_147, 8, x_143); +x_148 = lean_st_ref_set(x_4, x_147, x_135); +x_149 = lean_ctor_get(x_148, 1); +lean_inc(x_149); +lean_dec(x_148); +lean_inc(x_4); +x_150 = lean_apply_3(x_2, x_3, x_4, x_149); +if (lean_obj_tag(x_150) == 0) +{ +lean_object* x_151; lean_object* x_152; lean_object* x_153; lean_object* x_154; lean_object* x_155; lean_object* x_156; lean_object* x_157; lean_object* x_158; lean_object* x_159; lean_object* x_160; lean_object* x_161; lean_object* x_162; lean_object* x_163; lean_object* x_164; lean_object* x_165; lean_object* x_166; lean_object* x_167; lean_object* x_168; lean_object* x_169; lean_object* x_170; +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); +x_153 = lean_st_ref_take(x_4, x_152); +x_154 = lean_ctor_get(x_153, 0); +lean_inc(x_154); +x_155 = lean_ctor_get(x_153, 1); +lean_inc(x_155); +lean_dec(x_153); +x_156 = lean_ctor_get(x_154, 0); +lean_inc(x_156); +x_157 = lean_ctor_get(x_154, 1); +lean_inc(x_157); +x_158 = lean_ctor_get(x_154, 3); +lean_inc(x_158); +x_159 = lean_ctor_get(x_154, 4); +lean_inc(x_159); +x_160 = lean_ctor_get(x_154, 5); +lean_inc(x_160); +x_161 = lean_ctor_get(x_154, 6); +lean_inc(x_161); +x_162 = lean_ctor_get(x_154, 7); +lean_inc(x_162); +x_163 = lean_ctor_get(x_154, 8); +lean_inc(x_163); +if (lean_is_exclusive(x_154)) { + lean_ctor_release(x_154, 0); + lean_ctor_release(x_154, 1); + lean_ctor_release(x_154, 2); + lean_ctor_release(x_154, 3); + lean_ctor_release(x_154, 4); + lean_ctor_release(x_154, 5); + lean_ctor_release(x_154, 6); + lean_ctor_release(x_154, 7); + lean_ctor_release(x_154, 8); + x_164 = x_154; +} else { + lean_dec_ref(x_154); + x_164 = lean_box(0); +} +x_165 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_165, 0, x_131); +lean_ctor_set(x_165, 1, x_132); +if (lean_is_scalar(x_164)) { + x_166 = lean_alloc_ctor(0, 9, 0); +} else { + x_166 = x_164; +} +lean_ctor_set(x_166, 0, x_156); +lean_ctor_set(x_166, 1, x_157); +lean_ctor_set(x_166, 2, x_165); +lean_ctor_set(x_166, 3, x_158); +lean_ctor_set(x_166, 4, x_159); +lean_ctor_set(x_166, 5, x_160); +lean_ctor_set(x_166, 6, x_161); +lean_ctor_set(x_166, 7, x_162); +lean_ctor_set(x_166, 8, x_163); +x_167 = lean_st_ref_set(x_4, x_166, x_155); +lean_dec(x_4); +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; +} else { + lean_dec_ref(x_167); + x_169 = lean_box(0); +} +if (lean_is_scalar(x_169)) { + x_170 = lean_alloc_ctor(0, 2, 0); +} else { + x_170 = x_169; +} +lean_ctor_set(x_170, 0, x_151); +lean_ctor_set(x_170, 1, x_168); +return x_170; +} +else +{ +lean_object* x_171; lean_object* x_172; lean_object* x_173; lean_object* x_174; lean_object* x_175; lean_object* x_176; lean_object* x_177; lean_object* x_178; lean_object* x_179; lean_object* x_180; lean_object* x_181; 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; lean_object* x_190; +x_171 = lean_ctor_get(x_150, 0); +lean_inc(x_171); +x_172 = lean_ctor_get(x_150, 1); +lean_inc(x_172); +lean_dec(x_150); +x_173 = lean_st_ref_take(x_4, x_172); +x_174 = lean_ctor_get(x_173, 0); +lean_inc(x_174); +x_175 = lean_ctor_get(x_173, 1); +lean_inc(x_175); +lean_dec(x_173); +x_176 = lean_ctor_get(x_174, 0); +lean_inc(x_176); +x_177 = lean_ctor_get(x_174, 1); +lean_inc(x_177); +x_178 = lean_ctor_get(x_174, 3); +lean_inc(x_178); +x_179 = lean_ctor_get(x_174, 4); +lean_inc(x_179); +x_180 = lean_ctor_get(x_174, 5); +lean_inc(x_180); +x_181 = lean_ctor_get(x_174, 6); +lean_inc(x_181); +x_182 = lean_ctor_get(x_174, 7); +lean_inc(x_182); +x_183 = lean_ctor_get(x_174, 8); +lean_inc(x_183); +if (lean_is_exclusive(x_174)) { + lean_ctor_release(x_174, 0); + lean_ctor_release(x_174, 1); + lean_ctor_release(x_174, 2); + lean_ctor_release(x_174, 3); + lean_ctor_release(x_174, 4); + lean_ctor_release(x_174, 5); + lean_ctor_release(x_174, 6); + lean_ctor_release(x_174, 7); + lean_ctor_release(x_174, 8); + x_184 = x_174; +} else { + lean_dec_ref(x_174); + x_184 = lean_box(0); +} +x_185 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_185, 0, x_131); +lean_ctor_set(x_185, 1, x_132); +if (lean_is_scalar(x_184)) { + x_186 = lean_alloc_ctor(0, 9, 0); +} else { + x_186 = x_184; +} +lean_ctor_set(x_186, 0, x_176); +lean_ctor_set(x_186, 1, x_177); +lean_ctor_set(x_186, 2, x_185); +lean_ctor_set(x_186, 3, x_178); +lean_ctor_set(x_186, 4, x_179); +lean_ctor_set(x_186, 5, x_180); +lean_ctor_set(x_186, 6, x_181); +lean_ctor_set(x_186, 7, x_182); +lean_ctor_set(x_186, 8, x_183); +x_187 = lean_st_ref_set(x_4, x_186, x_175); +lean_dec(x_4); +x_188 = lean_ctor_get(x_187, 1); +lean_inc(x_188); +if (lean_is_exclusive(x_187)) { + lean_ctor_release(x_187, 0); + lean_ctor_release(x_187, 1); + x_189 = x_187; +} else { + lean_dec_ref(x_187); + x_189 = lean_box(0); +} +if (lean_is_scalar(x_189)) { + x_190 = lean_alloc_ctor(1, 2, 0); +} else { + x_190 = x_189; + lean_ctor_set_tag(x_190, 1); +} +lean_ctor_set(x_190, 0, x_171); +lean_ctor_set(x_190, 1, x_188); +return x_190; +} +} +} +} +} +lean_object* l_Lean_Elab_Command_withScope(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_Lean_Elab_Command_withScope___rarg), 5, 0); +return x_2; +} +} lean_object* l_Lean_Elab_Command_getLevelNames___rarg(lean_object* x_1, lean_object* x_2) { _start: { diff --git a/stage0/stdlib/Lean/Elab/Inductive.c b/stage0/stdlib/Lean/Elab/Inductive.c index 5d8f40938d..13214ee8e2 100644 --- a/stage0/stdlib/Lean/Elab/Inductive.c +++ b/stage0/stdlib/Lean/Elab/Inductive.c @@ -370,6 +370,7 @@ static lean_object* l_Array_forInUnsafe_loop___at___private_Lean_Elab_Inductive_ lean_object* l_Lean_Expr_ReplaceImpl_replaceUnsafeM_visit___at___private_Lean_Elab_Inductive_0__Lean_Elab_Command_replaceIndFVarsWithConsts___spec__1(lean_object*, lean_object*, lean_object*, size_t, lean_object*, lean_object*); lean_object* l_Lean_throwError___at_Lean_Elab_Command_accLevelAtCtor___spec__3(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*); +uint8_t l_Array_contains___at___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_hasBadIndexDep_x3f___spec__1(lean_object*, lean_object*); lean_object* l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at___private_Lean_Elab_Term_0__Lean_Elab_Term_postponeElabTerm___spec__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern uint8_t l_instInhabitedBool; lean_object* l_Array_forInUnsafe_loop___at___private_Lean_Elab_Inductive_0__Lean_Elab_Command_mkAuxConstructions___spec__8___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*); @@ -461,7 +462,6 @@ lean_object* l___private_Lean_Elab_Inductive_0__Lean_Elab_Command_checkUnsafe___ uint8_t l_Array_anyMUnsafe_any___at___private_Lean_Elab_Inductive_0__Lean_Elab_Command_applyDerivingHandlers___spec__1(lean_object*, lean_object*, size_t, size_t); lean_object* l_Lean_Meta_forallTelescopeCompatibleAux___rarg(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_Elab_Command_checkValidCtorModifier___rarg___lambda__2___closed__2; -uint8_t l_Array_contains___at_Lean_Meta_getElimInfo___spec__4(lean_object*, lean_object*); lean_object* l___private_Lean_Elab_Inductive_0__Lean_Elab_Command_elabHeaderAux_match__1(lean_object*); lean_object* l_Array_forInUnsafe_loop___at___private_Lean_Elab_Inductive_0__Lean_Elab_Command_mkAuxConstructions___spec__5___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Elab_Inductive_0__Lean_Elab_Command_collectUniversesFromCtorType___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*); @@ -4802,7 +4802,7 @@ _start: { lean_object* x_9; uint8_t x_10; x_9 = l_Lean_Expr_getAppFn(x_3); -x_10 = l_Array_contains___at_Lean_Meta_getElimInfo___spec__4(x_1, x_9); +x_10 = l_Array_contains___at___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_hasBadIndexDep_x3f___spec__1(x_1, x_9); lean_dec(x_1); if (x_10 == 0) { diff --git a/stage0/stdlib/Lean/Elab/PreDefinition/Structural.c b/stage0/stdlib/Lean/Elab/PreDefinition/Structural.c index 3edb82618c..8d6789e5dd 100644 --- a/stage0/stdlib/Lean/Elab/PreDefinition/Structural.c +++ b/stage0/stdlib/Lean/Elab/PreDefinition/Structural.c @@ -1,6 +1,6 @@ // Lean compiler output // Module: Lean.Elab.PreDefinition.Structural -// Imports: Init Lean.Util.ForEachExpr Lean.Meta.ForEachExpr Lean.Meta.RecursorInfo Lean.Meta.Match.Match Lean.Meta.Transform Lean.Meta.IndPredBelow Lean.Elab.PreDefinition.Basic +// Imports: Init Lean.Elab.PreDefinition.Structural.Main #include #if defined(__clang__) #pragma clang diagnostic ignored "-Wunused-parameter" @@ -13,20508 +13,8 @@ #ifdef __cplusplus extern "C" { #endif -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__5___closed__1; -lean_object* l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___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* l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__10(lean_object*); -lean_object* l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__6(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__3___closed__2; -lean_object* lean_array_set(lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__6___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_shouldBetaReduce___boxed(lean_object*, lean_object*); -lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___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* l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__6(lean_object*); -size_t l_USize_add(size_t, size_t); -lean_object* l_Lean_Meta_withLocalDecl___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__15___rarg(lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Expr_mvarId_x21(lean_object*); -lean_object* l_Lean_Elab_Structural_addSmartUnfoldingDefAux(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop_match__2(lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_registerTraceClass(lean_object*, lean_object*); -lean_object* l___private_Init_Data_Array_Basic_0__Array_allDiffAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__7___boxed(lean_object*, lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___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_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__6(lean_object*, lean_object*, lean_object*, 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*, lean_object*); -lean_object* l_Lean_hasConst___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___closed__1; -lean_object* l_Lean_stringToMessageData(lean_object*); -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__5; -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_preprocess___closed__1; -lean_object* l_Lean_Elab_addAsAxiom(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__1___closed__1; -lean_object* lean_mk_empty_array_with_capacity(lean_object*); -lean_object* l_Lean_mkSort(lean_object*); -lean_object* l_Std_RBNode_insert___at_Lean_NameSet_insert___spec__1(lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Meta_mkForallFVars(lean_object*, lean_object*, uint8_t, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__3(lean_object*, lean_object*, lean_object*, lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop_match__2___rarg(lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___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*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__2___boxed__const__1; -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___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_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelow(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__2___closed__2; -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop_match__1___rarg(lean_object*, lean_object*); -lean_object* l_Lean_throwError___at_Lean_Meta_setInlineAttribute___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* lean_name_mk_string(lean_object*, lean_object*); -uint8_t l_USize_decEq(size_t, size_t); -lean_object* lean_array_uget(lean_object*, size_t); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___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* l_Array_foldlMUnsafe_fold___at_Lean_Elab_Structural_structuralRecursion___spec__1(lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow_match__3___rarg(lean_object*, lean_object*, lean_object*); -static lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__2___closed__4; -lean_object* l_Lean_Meta_withLetDecl___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__16(lean_object*); -lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__10___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_object* l_Array_append___rarg(lean_object*, lean_object*); -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___lambda__2___closed__3; -uint8_t l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_containsRecFn___lambda__1(lean_object*, lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_withBelowDict___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Expr_withAppAux___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__4(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_IndPredBelow_mkBelowMatcher(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at_Lean_Meta_mkCongrLemma___spec__10(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__7; -lean_object* l_Lean_Meta_MatcherApp_addArg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps(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_mkAppM(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkIndPredBRecOn___lambda__5___boxed(lean_object**); -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___lambda__6___closed__3; -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__2___closed__3; -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___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_object*, lean_object*); -lean_object* l_Lean_Elab_Structural_structuralRecursion(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___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*, lean_object*, lean_object*, lean_object*); -lean_object* lean_array_uset(lean_object*, size_t, lean_object*); -lean_object* l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_throwToBelowFailed___spec__1___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_isInductivePredicate___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__3(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Meta_forallTelescopeReducing___at_Lean_Meta_getParamNames___spec__2___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_preprocess___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_ensureNoRecFn(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux_match__2(lean_object*); -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__3___closed__2; -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__16; -lean_object* l_Array_extract___rarg(lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkIndPredBRecOn___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___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux_match__2___rarg___closed__2; -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_recArgHasLooseBVarsAt___lambda__1___boxed(lean_object*, lean_object*, lean_object*); -static lean_object* l_Lean_Elab_Structural_structuralRecursion___lambda__1___closed__1; -lean_object* l_Lean_Meta_saveState___rarg(lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Meta_Basic_0__Lean_Meta_withLocalDeclImp___rarg(lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___closed__2; -lean_object* lean_environment_find(lean_object*, lean_object*); -static lean_object* l_Lean_Elab_Structural_instInhabitedM___closed__3; -lean_object* l_Lean_addTrace_addTraceOptions(lean_object*); -uint8_t l_Lean_checkTraceOption(lean_object*, lean_object*); -lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_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*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkIndPredBRecOn___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_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___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* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_getFixedPrefix___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Meta_dependsOn(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* lean_st_ref_get(lean_object*, lean_object*); -lean_object* l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___lambda__3___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Std_Range_forIn_loop___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__4___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___closed__1; -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__5___closed__2; -lean_object* l_Lean_Meta_withLocalDecl___at_Lean_Meta_forallTelescopeCompatibleAux___spec__15___rarg(lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop_match__1(lean_object*); -lean_object* l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__5(lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_hasBadIndexDep_x3f_match__1___rarg(lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___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*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_containsRecFn___boxed(lean_object*, lean_object*); -extern lean_object* l_instInhabitedNat; -uint8_t l_Lean_Expr_isAppOf(lean_object*, lean_object*); -uint8_t l___private_Init_Data_Array_Basic_0__Array_allDiffAuxAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__8(lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__5___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__10___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* lean_expr_instantiate1(lean_object*, lean_object*); -lean_object* l_Array_toSubarray___rarg(lean_object*, lean_object*, lean_object*); -lean_object* lean_array_push(lean_object*, lean_object*); -lean_object* lean_array_get_size(lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux_match__3(lean_object*); -lean_object* l_Lean_MessageData_ofList(lean_object*); -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__15; -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_withBelowDict___rarg___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_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___lambda__2___closed__1; -lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___lambda__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -uint8_t l_Lean_Elab_Structural_addSmartUnfoldingDefAux___lambda__1(lean_object*, lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___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_throwError___at_Lean_Elab_Structural_instInhabitedM___spec__1(lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_containsRecFn___lambda__1___boxed(lean_object*, lean_object*); -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__14; -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop(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_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__5; -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop_match__1(lean_object*, lean_object*); -static lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___lambda__2___closed__2; -lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__5(lean_object*, lean_object*, lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_hasBadParamDep_x3f___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*); -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__11; -lean_object* l_Lean_Expr_getRevArg_x21(lean_object*, lean_object*); -lean_object* l_Lean_Elab_Structural_structuralRecursion_match__1___rarg(lean_object*, lean_object*); -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___closed__6; -lean_object* l_Lean_Expr_replaceFVars(lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Meta_getMatcherInfo_x3f___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Array_foldlMUnsafe_fold___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkIndPredBRecOn___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Meta_matchMatcherApp_x3f___at_Lean_Meta_Match_withMkMatcherInput___spec__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit_match__1___rarg(uint8_t, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_orelse_x27(lean_object*); -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__9___closed__2; -lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___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*); -uint8_t l_USize_decLt(size_t, size_t); -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_withBelowDict___rarg___closed__2; -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__3; -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__3; -extern lean_object* l_Lean_binductionOnSuffix; -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_getIndexMinPos___boxed(lean_object*, lean_object*); -lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__10(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___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___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___closed__2; -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__10; -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___lambda__6(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -extern lean_object* l_Lean_levelZero; -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__1___closed__1; -lean_object* lean_nat_add(lean_object*, lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___boxed(lean_object*, lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_hasBadIndexDep_x3f___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_throwStructuralFailed___spec__1(lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_hasBadParamDep_x3f___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___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*); -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_withBelowDict___rarg___closed__1; -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__2; -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkIndPredBRecOn(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_hasBadParamDep_x3f___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*); -uint8_t l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_recArgHasLooseBVarsAt(lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_throwError___at_Lean_Elab_Term_throwErrorIfErrors___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Array_zip___rarg(lean_object*, lean_object*); -static lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___closed__2; -lean_object* l_Lean_mkAppN(lean_object*, lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_getFixedPrefix_match__2(lean_object*); -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_orelse_x27___rarg___closed__1; -lean_object* l_Lean_mkMData(lean_object*, lean_object*); -lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__5___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___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* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_withBelowDict(lean_object*); -extern lean_object* l_Lean_Meta_smartUnfoldingSuffix; -lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___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* l_Lean_Meta_matchMatcherApp_x3f___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux_match__1___rarg(lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow_match__2___rarg(lean_object*, lean_object*); -static lean_object* l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___closed__4; -lean_object* l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__12(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*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg(lean_object*); -lean_object* l_List_mapTRAux___at_Lean_MessageData_instCoeListExprMessageData___spec__1(lean_object*, lean_object*); -lean_object* l_Lean_Meta_lambdaTelescope___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__13(lean_object*); -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___closed__1; -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_preprocess___lambda__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Std_Range_forIn_loop___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__9(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___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___lambda__2___closed__2; -lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___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_array_fget(lean_object*, lean_object*); -lean_object* l___private_Lean_CoreM_0__Lean_Core_mkFreshNameImp(lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__12; -lean_object* l_Lean_Meta_IndPredBelow_backwardsChaining(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelow___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_mkProj(lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Option_get___at_Lean_initFn____x40_Lean_Util_PPExt___hyg_218____spec__1(lean_object*, lean_object*); -lean_object* l_Lean_throwError___at_Lean_Elab_Structural_instInhabitedM___spec__1___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___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*); -uint8_t lean_nat_dec_eq(lean_object*, lean_object*); -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_ensureNoRecFn___lambda__1___closed__2; -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___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*); -static lean_object* l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___closed__6; -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_ensureNoRecFn___lambda__1___closed__1; -lean_object* lean_st_ref_take(lean_object*, lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_ensureNoRecFn___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Meta_forEachExpr(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___closed__2; -lean_object* lean_nat_sub(lean_object*, lean_object*); -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__1; -static lean_object* l_Lean_Elab_Structural_instInhabitedM___closed__2; -static lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___lambda__2___closed__2; -static lean_object* l_Lean_Elab_Structural_instInhabitedM___closed__1; -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___closed__5; -static lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___closed__1; -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop_match__3___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_addTrace___at_Lean_Meta_mkCongrLemma___spec__9(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_ReaderT_bind___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__4(lean_object*, lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___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*); -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__4; -lean_object* l_Array_foldlMUnsafe_fold___at_Lean_Elab_Structural_structuralRecursion___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* l_Lean_Elab_Structural_structuralRecursion___lambda__1(lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_run(lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___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* l_Lean_Expr_withAppAux___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__2(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_headBeta(lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__7(lean_object*, lean_object*, 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*, lean_object*); -lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__8___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_getFixedPrefix(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__4___boxed__const__1; -lean_object* l_Lean_Elab_addNonRec(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* lean_array_get(lean_object*, lean_object*, lean_object*); -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__1___closed__3; -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__7; -lean_object* l_Lean_Meta_mkLambdaFVars(lean_object*, lean_object*, uint8_t, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__6; -lean_object* l_Lean_Expr_fvarId_x21(lean_object*); -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__1___closed__2; -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop_match__2___rarg(lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkIndPredBRecOn___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*, lean_object*); -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___closed__4; -lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___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_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___lambda__2___closed__1; -uint8_t l_Lean_Expr_isHeadBetaTarget(lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__2(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___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___closed__3; -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_ensureNoRecFn___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__6___closed__2; -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__10; -lean_object* l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_throwStructuralFailed___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___closed__2; -lean_object* l_Lean_Meta_decLevel(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_setEnv___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_getFixedPrefix___lambda__2___closed__1; -lean_object* l_Nat_repr(lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___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___private_Lean_Meta_Basic_0__Lean_Meta_forallTelescopeReducingAux___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Elab_Structural_State_matcherBelowDep___default; -lean_object* l_Lean_Meta_forallBoundedTelescope___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___spec__1(lean_object*); -lean_object* l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__10___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* lean_st_mk_ref(lean_object*, lean_object*); -uint8_t l_Lean_Elab_Structural_addSmartUnfoldingDefAux___lambda__2(lean_object*, lean_object*); -static lean_object* l_Lean_Elab_Structural_structuralRecursion___closed__3; -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___closed__1; -lean_object* l_Lean_Meta_withLetDecl___at___private_Lean_Meta_Tactic_Simp_SimpLemmas_0__Lean_Meta_isPerm___spec__2___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Array_foldlMUnsafe_fold___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__10___boxed__const__1; -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___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* l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_getIndexMinPos___spec__1(lean_object*, lean_object*, size_t, size_t, lean_object*); -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___closed__1; -static lean_object* l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___closed__2; -lean_object* l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_hasBadParamDep_x3f___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*); -extern lean_object* l_Lean_Elab_instInhabitedPreDefinition; -lean_object* l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_preprocess___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* lean_array_to_list(lean_object*, lean_object*); -lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__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*); -uint8_t l_Lean_Environment_contains(lean_object*, lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Basic_0__Lean_Elab_addNonRecAux(lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__10___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___closed__1; -uint8_t l___private_Init_Data_Array_Basic_0__Array_allDiffAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__7(lean_object*, lean_object*); -lean_object* l_Array_indexOfAux___at_Lean_Meta_getElimInfo___spec__1(lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_throwError___at_Lean_Elab_Structural_instInhabitedM___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___closed__2; -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -extern lean_object* l_Lean_instInhabitedExpr; -uint8_t l_Array_anyMUnsafe_any___at_Lean_Meta_getElimInfo___spec__7(lean_object*, size_t, size_t); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_getIndexMinPos_match__1___boxed(lean_object*, lean_object*); -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___closed__3; -uint8_t l_Lean_isInductivePredicate_visit(lean_object*); -lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l_Lean_Elab_Structural_structuralRecursion___lambda__1___closed__2; -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_getIndexMinPos(lean_object*, lean_object*); -lean_object* l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___lambda__2___closed__4; -lean_object* l___private_Init_Util_0__mkPanicMessageWithDecl(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -uint8_t l_Lean_Expr_isConst(lean_object*); -static lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__2___closed__1; -uint8_t l_Lean_Expr_isConstOf(lean_object*, lean_object*); -uint8_t l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_recArgHasLooseBVarsAt___lambda__1(lean_object*, lean_object*, lean_object*); -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___lambda__2___closed__1; -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop_match__3(lean_object*); -lean_object* l_Std_Range_forIn_loop___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__9___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__1(lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___lambda__4___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux_match__2___rarg___closed__1; -lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___closed__1; -lean_object* l_Lean_Meta_mapErrorImp___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Core_transform___at_Lean_Core_betaReduce___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux_match__3___rarg(lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* lean_whnf(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_throwToBelowFailed(lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_throwStructuralFailed___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -uint8_t l_Lean_Expr_Data_binderInfo(uint64_t); -lean_object* l_Lean_Meta_SavedState_restore(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__8(lean_object*, lean_object*, lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -size_t lean_usize_of_nat(lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_hasBadIndexDep_x3f(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___closed__4; -lean_object* l_Array_foldlMUnsafe_fold___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkIndPredBRecOn___spec__1(lean_object*, lean_object*, lean_object*, size_t, size_t, lean_object*); -lean_object* l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__6___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_getIndexMinPos_match__1___rarg(lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Elab_addAndCompilePartialRec(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -extern lean_object* l_Lean_NameSet_empty; -lean_object* l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___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* l_Lean_setEnv___at_Lean_Meta_setInlineAttribute___spec__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__9; -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_run___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___closed__9; -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__3___boxed(lean_object**); -lean_object* l_Lean_setEnv___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Elab_Structural_addSmartUnfoldingDefAux___lambda__3___boxed(lean_object*, lean_object*); -lean_object* l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_getFixedPrefix___spec__1(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_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__17; -lean_object* l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_hasBadIndexDep_x3f___spec__2(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* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow_match__1(lean_object*); -static lean_object* l_Lean_Elab_Structural_addSmartUnfoldingDefAux___closed__1; -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_recArgHasLooseBVarsAt___boxed(lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Meta_lambdaTelescope___at_Lean_Meta_MatcherApp_addArg___spec__2___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Meta_forallBoundedTelescope___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit_match__1___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__4___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__8; -lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___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* l_Lean_Meta_forallTelescope___at___private_Lean_Meta_InferType_0__Lean_Meta_inferForallType___spec__2___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__3___closed__1; -lean_object* l_Lean_LocalDecl_type(lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop(lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___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_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___closed__2; -lean_object* l_Lean_Elab_Structural_structuralRecursion_match__1(lean_object*); -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__4; -lean_object* l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__5___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___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___closed__8; -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__5(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__5___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -extern lean_object* l_Lean_Expr_FindImpl_initCache; -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_getFixedPrefix_match__1(lean_object*); -uint8_t l_Array_contains___at_Lean_Meta_addImplicitTargets_collect___spec__1(lean_object*, lean_object*); -lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___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*); -uint8_t l_Lean_Elab_Structural_addSmartUnfoldingDefAux___lambda__3(lean_object*, lean_object*); -lean_object* l_Std_Range_forIn_loop___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__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* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__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* l_List_redLength___rarg(lean_object*); -lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__2(lean_object*, size_t, size_t, lean_object*); -lean_object* l_Std_PersistentArray_push___rarg(lean_object*, lean_object*); -lean_object* l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_throwToBelowFailed___spec__1(lean_object*); -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___closed__4; -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___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*); -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___lambda__2___closed__1; -lean_object* l_Lean_Expr_getAppNumArgsAux(lean_object*, lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkIndPredBRecOn___lambda__4___boxed(lean_object**); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux_match__1(lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux_match__2___rarg(lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_orelse_x27___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__6; -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_preprocess___lambda__2(lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___lambda__2___closed__2; -uint8_t lean_expr_eqv(lean_object*, lean_object*); -lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_withBelowDict___spec__1(lean_object*); -lean_object* l_Lean_Elab_Structural_State_addMatchers___default; -extern lean_object* l_Lean_Meta_IndPredBelow_maxBackwardChainingDepth; -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_throwStructuralFailed(lean_object*); -lean_object* l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_getIndexMinPos___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___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* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___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*); -uint8_t lean_nat_dec_le(lean_object*, lean_object*); -lean_object* l_Lean_mkApp(lean_object*, lean_object*); -lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14(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* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___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*); -static lean_object* l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___closed__5; -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkIndPredBRecOn___lambda__3___boxed(lean_object**); -lean_object* l_Lean_Name_append(lean_object*, lean_object*); -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__3; -lean_object* l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit_match__1(lean_object*); -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___lambda__5___closed__1; -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__9___closed__1; -lean_object* l_Lean_Meta_mkIdRhs(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___boxed__const__1; -lean_object* l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__3(lean_object*, lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Meta_Basic_0__Lean_Meta_instantiateForallAux(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_getFixedPrefix___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* lean_panic_fn(lean_object*, lean_object*); -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__11; -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkIndPredBRecOn___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*, lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___lambda__5___closed__2; -lean_object* l_Lean_Meta_MatcherApp_toExpr(lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow_match__2(lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkIndPredBRecOn___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*); -lean_object* l_Lean_Meta_forallBoundedTelescope___at_Lean_Meta_addPPExplicitToExposeDiff_visit___spec__2___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__5; -lean_object* l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__5___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_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__2___closed__4; -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_getFixedPrefix___lambda__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkIndPredBRecOn___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_object*, lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_hasBadIndexDep_x3f_match__1(lean_object*); -lean_object* l_Lean_Elab_Structural_initFn____x40_Lean_Elab_PreDefinition_Structural___hyg_7041_(lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__4___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_hasBadParamDep_x3f___spec__2(lean_object*, lean_object*, lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__2___closed__2; -lean_object* l_Array_ofSubarray___rarg(lean_object*); -lean_object* l_Lean_hasConst___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l_Lean_Elab_Structural_structuralRecursion___closed__4; -lean_object* l_Lean_Meta_getLevel(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop_match__1___rarg(lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_hasBadIndexDep_x3f___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__5___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Expr_withAppAux___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__4___boxed__const__1; -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___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_st_ref_set(lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkIndPredBRecOn___lambda__6(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___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_getFixedPrefix___spec__1___closed__1; -static lean_object* l_Lean_Elab_Structural_structuralRecursion___closed__2; -lean_object* l_Lean_addMessageContextFull___at_Lean_Meta_instAddMessageContextMetaM___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow_match__3(lean_object*); -static lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__3___closed__4; -lean_object* l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_hasBadIndexDep_x3f___spec__1(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* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__6___boxed__const__1; -lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___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* l_List_toArrayAux___rarg(lean_object*, lean_object*); -lean_object* l_Array_foldlMUnsafe_fold___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___spec__2(lean_object*, lean_object*, lean_object*, size_t, size_t, lean_object*); -lean_object* lean_infer_type(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__2___closed__3; -uint8_t l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_shouldBetaReduce(lean_object*, lean_object*); -lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__10___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Meta_isExprDefEq(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___lambda__3(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Expr_withAppAux___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__2___boxed__const__1; -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_throwToBelowFailed___rarg___closed__1; -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__2; -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___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*); -uint8_t l_Lean_Expr_hasLooseBVars(lean_object*); -lean_object* l_Lean_Meta_forEachExpr_x27(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__12___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___lambda__3___closed__1; -lean_object* l_Lean_Meta_Match_MatcherInfo_arity(lean_object*); -uint8_t l_Array_contains___at_Lean_Meta_getElimInfo___spec__4(lean_object*, lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__9(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_Elab_Structural_structuralRecursion___closed__1; -lean_object* lean_mk_array(lean_object*, lean_object*); -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_hasBadIndexDep_x3f___closed__1; -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop_match__2(lean_object*); -lean_object* l_Lean_isInductivePredicate___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__3___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___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_object* l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_throwToBelowFailed___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_throwToBelowFailed___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__7___closed__1; -lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___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*); -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_throwStructuralFailed___rarg___closed__1; -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_getFixedPrefix___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___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__1; -lean_object* l___private_Init_Data_Array_Basic_0__Array_allDiffAuxAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__8___boxed(lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_hasBadIndexDep_x3f___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_throwError___at_Lean_Meta_withIncRecDepth___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Meta_matchMatcherApp_x3f___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_indentD(lean_object*); -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__6; -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkIndPredBRecOn___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* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkIndPredBRecOn___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Meta_IndPredBelow_findBelowIdx(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_getFixedPrefix___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* l_Lean_Expr_FindImpl_findM_x3f_visit(lean_object*, size_t, lean_object*, lean_object*); -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_throwStructuralFailed___rarg___closed__2; -lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__5(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* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__6___boxed(lean_object**); -uint8_t l_Lean_NameSet_contains(lean_object*, lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__8(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Meta_whnfD(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Elab_Structural_addSmartUnfoldingDef(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___closed__3; -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__6___closed__1; -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__8; -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_getFixedPrefix_match__2___rarg(lean_object*, lean_object*, lean_object*); -uint8_t l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_containsRecFn(lean_object*, lean_object*); -static lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__3___closed__1; -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_preprocess(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -extern lean_object* l_Lean_brecOnSuffix; -lean_object* l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__9___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_ReaderT_bind___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__4___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__1(lean_object*, lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_throwStructuralFailed___spec__1___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__4; -lean_object* l_Lean_Expr_getAppFn(lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___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*); -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__1; -lean_object* l_Lean_Meta_withLocalDecl___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__15___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_IO_mkRef___rarg(lean_object*, lean_object*); -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___closed__10; -lean_object* l_Lean_Meta_Match_MatcherInfo_numAlts(lean_object*); -lean_object* l_Lean_Meta_mkFreshExprSyntheticOpaqueMVar(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_hasBadParamDep_x3f(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_getFixedPrefix_match__1___rarg(lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___lambda__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_unsafeCast(lean_object*, lean_object*, lean_object*); -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__9; -lean_object* l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___boxed__const__1; -lean_object* l___private_Lean_Meta_Basic_0__Lean_Meta_lambdaTelescopeImp___rarg(lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__2___closed__1; -lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___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* l___private_Lean_Meta_Basic_0__Lean_Meta_withLetDeclImp___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Meta_lambdaTelescope___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__13___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___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*); -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___lambda__6___closed__2; -uint8_t lean_level_eq(lean_object*, lean_object*); -lean_object* l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_hasBadIndexDep_x3f___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*, lean_object*); -lean_object* l_Lean_Meta_getMatcherInfo_x3f___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Meta_isProp(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Meta_Match_Extension_getMatcherInfo_x3f(lean_object*, lean_object*); -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__2; -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop_match__1___boxed(lean_object*, lean_object*); -lean_object* l_Lean_Meta_setMCtx(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_getFixedPrefix___lambda__2___closed__2; -lean_object* l_Lean_indentExpr(lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_getIndexMinPos_match__1(lean_object*, lean_object*); -lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__3(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* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow_match__1___rarg(lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Elab_Structural_addSmartUnfoldingDefAux___lambda__1___boxed(lean_object*, lean_object*); -lean_object* l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__5___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___lambda__6___closed__1; -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__7___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*); -lean_object* l_Lean_mkConst(lean_object*, lean_object*); -static lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__2___closed__1; -static lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__3___closed__3; -lean_object* l_Lean_Expr_constName_x21(lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___lambda__4___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__2___closed__2; -lean_object* l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__6___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___lambda__6___closed__4; -lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__2___boxed__const__1; -lean_object* l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__9___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__7___closed__2; -lean_object* l_Lean_Meta_lambdaTelescope___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__13___rarg___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Meta_withLocalDecl___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__15___rarg___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___closed__7; -lean_object* l_Lean_Elab_Structural_instInhabitedM(lean_object*); -static lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__2___closed__1; -static lean_object* l_Lean_Elab_Structural_State_addMatchers___default___closed__1; -lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___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_object*, lean_object*, lean_object*); -lean_object* l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__5___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*); -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__13; -lean_object* l_Lean_Meta_check(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__9(lean_object*); -lean_object* l_Lean_Elab_Structural_addSmartUnfoldingDefAux___lambda__2___boxed(lean_object*, lean_object*); -lean_object* l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__5(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_hasBadIndexDep_x3f___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* l_Lean_Meta_withLetDecl___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__16___rarg(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_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_throwToBelowFailed___rarg___closed__2; -static lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___closed__3; -uint8_t lean_string_dec_eq(lean_object*, lean_object*); -uint8_t l_Lean_LocalDecl_isLet(lean_object*); -uint8_t lean_nat_dec_lt(lean_object*, lean_object*); -lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1(lean_object*, lean_object*); -lean_object* l_Lean_Meta_withLocalDecl___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__15(lean_object*); -lean_object* l_Lean_Meta_getFVarLocalDecl(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_getFixedPrefix_match__1___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3) { -_start: -{ -if (lean_obj_tag(x_1) == 0) -{ -lean_object* x_4; lean_object* x_5; -lean_dec(x_3); -x_4 = lean_box(0); -x_5 = lean_apply_1(x_2, x_4); -return x_5; -} -else -{ -lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; -lean_dec(x_2); -x_6 = lean_ctor_get(x_1, 0); -lean_inc(x_6); -lean_dec(x_1); -x_7 = lean_ctor_get(x_6, 0); -lean_inc(x_7); -x_8 = lean_ctor_get(x_6, 1); -lean_inc(x_8); -lean_dec(x_6); -x_9 = lean_apply_2(x_3, x_7, x_8); -return x_9; -} -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_getFixedPrefix_match__1(lean_object* x_1) { -_start: -{ -lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_getFixedPrefix_match__1___rarg), 3, 0); -return x_2; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_getFixedPrefix_match__2___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3) { -_start: -{ -if (lean_obj_tag(x_1) == 0) -{ -lean_object* x_4; lean_object* x_5; -lean_dec(x_3); -x_4 = lean_box(0); -x_5 = lean_apply_1(x_2, x_4); -return x_5; -} -else -{ -lean_object* x_6; lean_object* x_7; -lean_dec(x_2); -x_6 = lean_ctor_get(x_1, 0); -lean_inc(x_6); -lean_dec(x_1); -x_7 = lean_apply_1(x_3, x_6); -return x_7; -} -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_getFixedPrefix_match__2(lean_object* x_1) { -_start: -{ -lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_getFixedPrefix_match__2___rarg), 3, 0); -return x_2; -} -} -static lean_object* _init_l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_getFixedPrefix___spec__1___closed__1() { -_start: -{ -uint8_t x_1; lean_object* x_2; lean_object* x_3; -x_1 = 1; -x_2 = lean_box(x_1); -x_3 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_3, 0, x_2); -return x_3; -} -} -lean_object* l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_getFixedPrefix___spec__1(lean_object* x_1, lean_object* x_2, size_t x_3, size_t 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; -x_11 = x_4 < x_3; -if (x_11 == 0) -{ -lean_object* x_12; -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_1); -x_12 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_12, 0, x_5); -lean_ctor_set(x_12, 1, x_10); -return x_12; -} -else -{ -lean_object* x_13; uint8_t x_14; -x_13 = lean_array_uget(x_2, x_4); -x_14 = !lean_is_exclusive(x_5); -if (x_14 == 0) -{ -lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; uint8_t x_20; -x_15 = lean_ctor_get(x_5, 1); -x_16 = lean_ctor_get(x_5, 0); -lean_dec(x_16); -x_17 = lean_ctor_get(x_15, 0); -lean_inc(x_17); -x_18 = lean_ctor_get(x_15, 1); -lean_inc(x_18); -x_19 = lean_ctor_get(x_15, 2); -lean_inc(x_19); -x_20 = lean_nat_dec_lt(x_18, x_19); -if (x_20 == 0) -{ -lean_object* x_21; -lean_dec(x_19); -lean_dec(x_18); -lean_dec(x_17); -lean_dec(x_13); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_ctor_set(x_5, 0, x_1); -x_21 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_21, 0, x_5); -lean_ctor_set(x_21, 1, x_10); -return x_21; -} -else -{ -uint8_t x_22; -x_22 = !lean_is_exclusive(x_15); -if (x_22 == 0) -{ -lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; uint8_t x_34; -x_23 = lean_ctor_get(x_15, 2); -lean_dec(x_23); -x_24 = lean_ctor_get(x_15, 1); -lean_dec(x_24); -x_25 = lean_ctor_get(x_15, 0); -lean_dec(x_25); -x_26 = lean_array_fget(x_17, x_18); -x_27 = lean_unsigned_to_nat(1u); -x_28 = lean_nat_add(x_18, x_27); -lean_dec(x_18); -lean_ctor_set(x_15, 1, x_28); -x_29 = lean_ctor_get(x_6, 0); -lean_inc(x_29); -x_30 = lean_ctor_get(x_6, 1); -lean_inc(x_30); -x_31 = lean_ctor_get(x_6, 2); -lean_inc(x_31); -x_32 = lean_ctor_get(x_6, 3); -lean_inc(x_32); -x_33 = lean_ctor_get(x_6, 4); -lean_inc(x_33); -x_34 = !lean_is_exclusive(x_29); -if (x_34 == 0) -{ -uint8_t x_35; uint8_t x_36; lean_object* x_37; lean_object* x_38; -x_35 = 2; -x_36 = 0; -lean_ctor_set_uint8(x_29, 5, x_35); -lean_ctor_set_uint8(x_29, 9, x_36); -x_37 = lean_alloc_ctor(0, 5, 0); -lean_ctor_set(x_37, 0, x_29); -lean_ctor_set(x_37, 1, x_30); -lean_ctor_set(x_37, 2, x_31); -lean_ctor_set(x_37, 3, x_32); -lean_ctor_set(x_37, 4, x_33); -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -x_38 = l_Lean_Meta_isExprDefEq(x_13, x_26, x_37, x_7, x_8, x_9, x_10); -if (lean_obj_tag(x_38) == 0) -{ -lean_object* x_39; uint8_t x_40; -x_39 = lean_ctor_get(x_38, 0); -lean_inc(x_39); -x_40 = lean_unbox(x_39); -lean_dec(x_39); -if (x_40 == 0) -{ -uint8_t x_41; -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_1); -x_41 = !lean_is_exclusive(x_38); -if (x_41 == 0) -{ -lean_object* x_42; lean_object* x_43; -x_42 = lean_ctor_get(x_38, 0); -lean_dec(x_42); -x_43 = l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_getFixedPrefix___spec__1___closed__1; -lean_ctor_set(x_5, 0, x_43); -lean_ctor_set(x_38, 0, x_5); -return x_38; -} -else -{ -lean_object* x_44; lean_object* x_45; lean_object* x_46; -x_44 = lean_ctor_get(x_38, 1); -lean_inc(x_44); -lean_dec(x_38); -x_45 = l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_getFixedPrefix___spec__1___closed__1; -lean_ctor_set(x_5, 0, x_45); -x_46 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_46, 0, x_5); -lean_ctor_set(x_46, 1, x_44); -return x_46; -} -} -else -{ -lean_object* x_47; size_t x_48; size_t x_49; -x_47 = lean_ctor_get(x_38, 1); -lean_inc(x_47); -lean_dec(x_38); -lean_inc(x_1); -lean_ctor_set(x_5, 0, x_1); -x_48 = 1; -x_49 = x_4 + x_48; -x_4 = x_49; -x_10 = x_47; -goto _start; -} -} -else -{ -uint8_t x_51; -lean_dec(x_15); -lean_free_object(x_5); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_1); -x_51 = !lean_is_exclusive(x_38); -if (x_51 == 0) -{ -return x_38; -} -else -{ -lean_object* x_52; lean_object* x_53; lean_object* x_54; -x_52 = lean_ctor_get(x_38, 0); -x_53 = lean_ctor_get(x_38, 1); -lean_inc(x_53); -lean_inc(x_52); -lean_dec(x_38); -x_54 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_54, 0, x_52); -lean_ctor_set(x_54, 1, x_53); -return x_54; -} -} -} -else -{ -uint8_t x_55; uint8_t x_56; uint8_t x_57; uint8_t x_58; uint8_t x_59; uint8_t x_60; uint8_t x_61; uint8_t x_62; uint8_t x_63; uint8_t x_64; uint8_t x_65; uint8_t x_66; lean_object* x_67; lean_object* x_68; lean_object* x_69; -x_55 = lean_ctor_get_uint8(x_29, 0); -x_56 = lean_ctor_get_uint8(x_29, 1); -x_57 = lean_ctor_get_uint8(x_29, 2); -x_58 = lean_ctor_get_uint8(x_29, 3); -x_59 = lean_ctor_get_uint8(x_29, 4); -x_60 = lean_ctor_get_uint8(x_29, 6); -x_61 = lean_ctor_get_uint8(x_29, 7); -x_62 = lean_ctor_get_uint8(x_29, 8); -x_63 = lean_ctor_get_uint8(x_29, 10); -x_64 = lean_ctor_get_uint8(x_29, 11); -lean_dec(x_29); -x_65 = 2; -x_66 = 0; -x_67 = lean_alloc_ctor(0, 0, 12); -lean_ctor_set_uint8(x_67, 0, x_55); -lean_ctor_set_uint8(x_67, 1, x_56); -lean_ctor_set_uint8(x_67, 2, x_57); -lean_ctor_set_uint8(x_67, 3, x_58); -lean_ctor_set_uint8(x_67, 4, x_59); -lean_ctor_set_uint8(x_67, 5, x_65); -lean_ctor_set_uint8(x_67, 6, x_60); -lean_ctor_set_uint8(x_67, 7, x_61); -lean_ctor_set_uint8(x_67, 8, x_62); -lean_ctor_set_uint8(x_67, 9, x_66); -lean_ctor_set_uint8(x_67, 10, x_63); -lean_ctor_set_uint8(x_67, 11, x_64); -x_68 = lean_alloc_ctor(0, 5, 0); -lean_ctor_set(x_68, 0, x_67); -lean_ctor_set(x_68, 1, x_30); -lean_ctor_set(x_68, 2, x_31); -lean_ctor_set(x_68, 3, x_32); -lean_ctor_set(x_68, 4, x_33); -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -x_69 = l_Lean_Meta_isExprDefEq(x_13, x_26, x_68, x_7, x_8, x_9, x_10); -if (lean_obj_tag(x_69) == 0) -{ -lean_object* x_70; uint8_t x_71; -x_70 = lean_ctor_get(x_69, 0); -lean_inc(x_70); -x_71 = lean_unbox(x_70); -lean_dec(x_70); -if (x_71 == 0) -{ -lean_object* x_72; lean_object* x_73; lean_object* x_74; lean_object* x_75; -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_1); -x_72 = lean_ctor_get(x_69, 1); -lean_inc(x_72); -if (lean_is_exclusive(x_69)) { - lean_ctor_release(x_69, 0); - lean_ctor_release(x_69, 1); - x_73 = x_69; -} else { - lean_dec_ref(x_69); - x_73 = lean_box(0); -} -x_74 = l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_getFixedPrefix___spec__1___closed__1; -lean_ctor_set(x_5, 0, x_74); -if (lean_is_scalar(x_73)) { - x_75 = lean_alloc_ctor(0, 2, 0); -} else { - x_75 = x_73; -} -lean_ctor_set(x_75, 0, x_5); -lean_ctor_set(x_75, 1, x_72); -return x_75; -} -else -{ -lean_object* x_76; size_t x_77; size_t x_78; -x_76 = lean_ctor_get(x_69, 1); -lean_inc(x_76); -lean_dec(x_69); -lean_inc(x_1); -lean_ctor_set(x_5, 0, x_1); -x_77 = 1; -x_78 = x_4 + x_77; -x_4 = x_78; -x_10 = x_76; -goto _start; -} -} -else -{ -lean_object* x_80; lean_object* x_81; lean_object* x_82; lean_object* x_83; -lean_dec(x_15); -lean_free_object(x_5); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_1); -x_80 = lean_ctor_get(x_69, 0); -lean_inc(x_80); -x_81 = lean_ctor_get(x_69, 1); -lean_inc(x_81); -if (lean_is_exclusive(x_69)) { - lean_ctor_release(x_69, 0); - lean_ctor_release(x_69, 1); - x_82 = x_69; -} else { - lean_dec_ref(x_69); - x_82 = lean_box(0); -} -if (lean_is_scalar(x_82)) { - x_83 = lean_alloc_ctor(1, 2, 0); -} else { - x_83 = x_82; -} -lean_ctor_set(x_83, 0, x_80); -lean_ctor_set(x_83, 1, x_81); -return x_83; -} -} -} -else -{ -lean_object* x_84; lean_object* x_85; lean_object* x_86; lean_object* x_87; lean_object* x_88; lean_object* x_89; lean_object* x_90; lean_object* x_91; lean_object* x_92; uint8_t x_93; uint8_t x_94; uint8_t x_95; uint8_t x_96; uint8_t x_97; uint8_t x_98; uint8_t x_99; uint8_t x_100; uint8_t x_101; uint8_t x_102; lean_object* x_103; uint8_t x_104; uint8_t x_105; lean_object* x_106; lean_object* x_107; lean_object* x_108; -lean_dec(x_15); -x_84 = lean_array_fget(x_17, x_18); -x_85 = lean_unsigned_to_nat(1u); -x_86 = lean_nat_add(x_18, x_85); -lean_dec(x_18); -x_87 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_87, 0, x_17); -lean_ctor_set(x_87, 1, x_86); -lean_ctor_set(x_87, 2, x_19); -x_88 = lean_ctor_get(x_6, 0); -lean_inc(x_88); -x_89 = lean_ctor_get(x_6, 1); -lean_inc(x_89); -x_90 = lean_ctor_get(x_6, 2); -lean_inc(x_90); -x_91 = lean_ctor_get(x_6, 3); -lean_inc(x_91); -x_92 = lean_ctor_get(x_6, 4); -lean_inc(x_92); -x_93 = lean_ctor_get_uint8(x_88, 0); -x_94 = lean_ctor_get_uint8(x_88, 1); -x_95 = lean_ctor_get_uint8(x_88, 2); -x_96 = lean_ctor_get_uint8(x_88, 3); -x_97 = lean_ctor_get_uint8(x_88, 4); -x_98 = lean_ctor_get_uint8(x_88, 6); -x_99 = lean_ctor_get_uint8(x_88, 7); -x_100 = lean_ctor_get_uint8(x_88, 8); -x_101 = lean_ctor_get_uint8(x_88, 10); -x_102 = lean_ctor_get_uint8(x_88, 11); -if (lean_is_exclusive(x_88)) { - x_103 = x_88; -} else { - lean_dec_ref(x_88); - x_103 = lean_box(0); -} -x_104 = 2; -x_105 = 0; -if (lean_is_scalar(x_103)) { - x_106 = lean_alloc_ctor(0, 0, 12); -} else { - x_106 = x_103; -} -lean_ctor_set_uint8(x_106, 0, x_93); -lean_ctor_set_uint8(x_106, 1, x_94); -lean_ctor_set_uint8(x_106, 2, x_95); -lean_ctor_set_uint8(x_106, 3, x_96); -lean_ctor_set_uint8(x_106, 4, x_97); -lean_ctor_set_uint8(x_106, 5, x_104); -lean_ctor_set_uint8(x_106, 6, x_98); -lean_ctor_set_uint8(x_106, 7, x_99); -lean_ctor_set_uint8(x_106, 8, x_100); -lean_ctor_set_uint8(x_106, 9, x_105); -lean_ctor_set_uint8(x_106, 10, x_101); -lean_ctor_set_uint8(x_106, 11, x_102); -x_107 = lean_alloc_ctor(0, 5, 0); -lean_ctor_set(x_107, 0, x_106); -lean_ctor_set(x_107, 1, x_89); -lean_ctor_set(x_107, 2, x_90); -lean_ctor_set(x_107, 3, x_91); -lean_ctor_set(x_107, 4, x_92); -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -x_108 = l_Lean_Meta_isExprDefEq(x_13, x_84, x_107, x_7, x_8, x_9, x_10); -if (lean_obj_tag(x_108) == 0) -{ -lean_object* x_109; uint8_t x_110; -x_109 = lean_ctor_get(x_108, 0); -lean_inc(x_109); -x_110 = lean_unbox(x_109); -lean_dec(x_109); -if (x_110 == 0) -{ -lean_object* x_111; lean_object* x_112; lean_object* x_113; lean_object* x_114; -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_1); -x_111 = lean_ctor_get(x_108, 1); -lean_inc(x_111); -if (lean_is_exclusive(x_108)) { - lean_ctor_release(x_108, 0); - lean_ctor_release(x_108, 1); - x_112 = x_108; -} else { - lean_dec_ref(x_108); - x_112 = lean_box(0); -} -x_113 = l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_getFixedPrefix___spec__1___closed__1; -lean_ctor_set(x_5, 1, x_87); -lean_ctor_set(x_5, 0, x_113); -if (lean_is_scalar(x_112)) { - x_114 = lean_alloc_ctor(0, 2, 0); -} else { - x_114 = x_112; -} -lean_ctor_set(x_114, 0, x_5); -lean_ctor_set(x_114, 1, x_111); -return x_114; -} -else -{ -lean_object* x_115; size_t x_116; size_t x_117; -x_115 = lean_ctor_get(x_108, 1); -lean_inc(x_115); -lean_dec(x_108); -lean_inc(x_1); -lean_ctor_set(x_5, 1, x_87); -lean_ctor_set(x_5, 0, x_1); -x_116 = 1; -x_117 = x_4 + x_116; -x_4 = x_117; -x_10 = x_115; -goto _start; -} -} -else -{ -lean_object* x_119; lean_object* x_120; lean_object* x_121; lean_object* x_122; -lean_dec(x_87); -lean_free_object(x_5); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_1); -x_119 = lean_ctor_get(x_108, 0); -lean_inc(x_119); -x_120 = lean_ctor_get(x_108, 1); -lean_inc(x_120); -if (lean_is_exclusive(x_108)) { - lean_ctor_release(x_108, 0); - lean_ctor_release(x_108, 1); - x_121 = x_108; -} else { - lean_dec_ref(x_108); - x_121 = lean_box(0); -} -if (lean_is_scalar(x_121)) { - x_122 = lean_alloc_ctor(1, 2, 0); -} else { - x_122 = x_121; -} -lean_ctor_set(x_122, 0, x_119); -lean_ctor_set(x_122, 1, x_120); -return x_122; -} -} -} -} -else -{ -lean_object* x_123; lean_object* x_124; lean_object* x_125; lean_object* x_126; uint8_t x_127; -x_123 = lean_ctor_get(x_5, 1); -lean_inc(x_123); -lean_dec(x_5); -x_124 = lean_ctor_get(x_123, 0); -lean_inc(x_124); -x_125 = lean_ctor_get(x_123, 1); -lean_inc(x_125); -x_126 = lean_ctor_get(x_123, 2); -lean_inc(x_126); -x_127 = lean_nat_dec_lt(x_125, x_126); -if (x_127 == 0) -{ -lean_object* x_128; lean_object* x_129; -lean_dec(x_126); -lean_dec(x_125); -lean_dec(x_124); -lean_dec(x_13); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -x_128 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_128, 0, x_1); -lean_ctor_set(x_128, 1, x_123); -x_129 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_129, 0, x_128); -lean_ctor_set(x_129, 1, x_10); -return x_129; -} -else -{ -lean_object* x_130; lean_object* x_131; lean_object* x_132; lean_object* x_133; lean_object* x_134; lean_object* x_135; lean_object* x_136; lean_object* x_137; lean_object* x_138; lean_object* 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; uint8_t x_149; lean_object* x_150; uint8_t x_151; uint8_t x_152; lean_object* x_153; lean_object* x_154; lean_object* x_155; -if (lean_is_exclusive(x_123)) { - lean_ctor_release(x_123, 0); - lean_ctor_release(x_123, 1); - lean_ctor_release(x_123, 2); - x_130 = x_123; -} else { - lean_dec_ref(x_123); - x_130 = lean_box(0); -} -x_131 = lean_array_fget(x_124, x_125); -x_132 = lean_unsigned_to_nat(1u); -x_133 = lean_nat_add(x_125, x_132); -lean_dec(x_125); -if (lean_is_scalar(x_130)) { - x_134 = lean_alloc_ctor(0, 3, 0); -} else { - x_134 = x_130; -} -lean_ctor_set(x_134, 0, x_124); -lean_ctor_set(x_134, 1, x_133); -lean_ctor_set(x_134, 2, x_126); -x_135 = lean_ctor_get(x_6, 0); -lean_inc(x_135); -x_136 = lean_ctor_get(x_6, 1); -lean_inc(x_136); -x_137 = lean_ctor_get(x_6, 2); -lean_inc(x_137); -x_138 = lean_ctor_get(x_6, 3); -lean_inc(x_138); -x_139 = lean_ctor_get(x_6, 4); -lean_inc(x_139); -x_140 = lean_ctor_get_uint8(x_135, 0); -x_141 = lean_ctor_get_uint8(x_135, 1); -x_142 = lean_ctor_get_uint8(x_135, 2); -x_143 = lean_ctor_get_uint8(x_135, 3); -x_144 = lean_ctor_get_uint8(x_135, 4); -x_145 = lean_ctor_get_uint8(x_135, 6); -x_146 = lean_ctor_get_uint8(x_135, 7); -x_147 = lean_ctor_get_uint8(x_135, 8); -x_148 = lean_ctor_get_uint8(x_135, 10); -x_149 = lean_ctor_get_uint8(x_135, 11); -if (lean_is_exclusive(x_135)) { - x_150 = x_135; -} else { - lean_dec_ref(x_135); - x_150 = lean_box(0); -} -x_151 = 2; -x_152 = 0; -if (lean_is_scalar(x_150)) { - x_153 = lean_alloc_ctor(0, 0, 12); -} else { - x_153 = x_150; -} -lean_ctor_set_uint8(x_153, 0, x_140); -lean_ctor_set_uint8(x_153, 1, x_141); -lean_ctor_set_uint8(x_153, 2, x_142); -lean_ctor_set_uint8(x_153, 3, x_143); -lean_ctor_set_uint8(x_153, 4, x_144); -lean_ctor_set_uint8(x_153, 5, x_151); -lean_ctor_set_uint8(x_153, 6, x_145); -lean_ctor_set_uint8(x_153, 7, x_146); -lean_ctor_set_uint8(x_153, 8, x_147); -lean_ctor_set_uint8(x_153, 9, x_152); -lean_ctor_set_uint8(x_153, 10, x_148); -lean_ctor_set_uint8(x_153, 11, x_149); -x_154 = lean_alloc_ctor(0, 5, 0); -lean_ctor_set(x_154, 0, x_153); -lean_ctor_set(x_154, 1, x_136); -lean_ctor_set(x_154, 2, x_137); -lean_ctor_set(x_154, 3, x_138); -lean_ctor_set(x_154, 4, x_139); -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -x_155 = l_Lean_Meta_isExprDefEq(x_13, x_131, x_154, x_7, x_8, x_9, x_10); -if (lean_obj_tag(x_155) == 0) -{ -lean_object* x_156; uint8_t x_157; -x_156 = lean_ctor_get(x_155, 0); -lean_inc(x_156); -x_157 = lean_unbox(x_156); -lean_dec(x_156); -if (x_157 == 0) -{ -lean_object* x_158; lean_object* x_159; lean_object* x_160; lean_object* x_161; lean_object* x_162; -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_1); -x_158 = lean_ctor_get(x_155, 1); -lean_inc(x_158); -if (lean_is_exclusive(x_155)) { - lean_ctor_release(x_155, 0); - lean_ctor_release(x_155, 1); - x_159 = x_155; -} else { - lean_dec_ref(x_155); - x_159 = lean_box(0); -} -x_160 = l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_getFixedPrefix___spec__1___closed__1; -x_161 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_161, 0, x_160); -lean_ctor_set(x_161, 1, x_134); -if (lean_is_scalar(x_159)) { - x_162 = lean_alloc_ctor(0, 2, 0); -} else { - x_162 = x_159; -} -lean_ctor_set(x_162, 0, x_161); -lean_ctor_set(x_162, 1, x_158); -return x_162; -} -else -{ -lean_object* x_163; lean_object* x_164; size_t x_165; size_t x_166; -x_163 = lean_ctor_get(x_155, 1); -lean_inc(x_163); -lean_dec(x_155); -lean_inc(x_1); -x_164 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_164, 0, x_1); -lean_ctor_set(x_164, 1, x_134); -x_165 = 1; -x_166 = x_4 + x_165; -x_4 = x_166; -x_5 = x_164; -x_10 = x_163; -goto _start; -} -} -else -{ -lean_object* x_168; lean_object* x_169; lean_object* x_170; lean_object* x_171; -lean_dec(x_134); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_1); -x_168 = lean_ctor_get(x_155, 0); -lean_inc(x_168); -x_169 = lean_ctor_get(x_155, 1); -lean_inc(x_169); -if (lean_is_exclusive(x_155)) { - lean_ctor_release(x_155, 0); - lean_ctor_release(x_155, 1); - x_170 = x_155; -} else { - lean_dec_ref(x_155); - x_170 = lean_box(0); -} -if (lean_is_scalar(x_170)) { - x_171 = lean_alloc_ctor(1, 2, 0); -} else { - x_171 = x_170; -} -lean_ctor_set(x_171, 0, x_168); -lean_ctor_set(x_171, 1, x_169); -return x_171; -} -} -} -} -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_getFixedPrefix___lambda__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { -_start: -{ -uint8_t x_7; lean_object* x_8; lean_object* x_9; -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_6); -return x_9; -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_getFixedPrefix___lambda__2___closed__1() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_levelZero; -x_2 = l_Lean_mkSort(x_1); -return x_2; -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_getFixedPrefix___lambda__2___closed__2() { -_start: -{ -lean_object* x_1; -x_1 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_getFixedPrefix___lambda__1___boxed), 6, 0); -return x_1; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_getFixedPrefix___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: -{ -uint8_t x_11; -x_11 = l_Lean_Expr_isAppOf(x_5, x_1); -if (x_11 == 0) -{ -uint8_t x_12; lean_object* x_13; lean_object* x_14; -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_3); -lean_dec(x_2); -x_12 = 1; -x_13 = lean_box(x_12); -x_14 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_14, 0, x_13); -lean_ctor_set(x_14, 1, x_10); -return x_14; -} -else -{ -lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_object* x_51; lean_object* x_52; uint8_t x_53; -x_15 = lean_unsigned_to_nat(0u); -x_16 = l_Lean_Expr_getAppNumArgsAux(x_5, x_15); -x_17 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_getFixedPrefix___lambda__2___closed__1; -lean_inc(x_16); -x_18 = lean_mk_array(x_16, x_17); -x_19 = lean_unsigned_to_nat(1u); -x_20 = lean_nat_sub(x_16, x_19); -lean_dec(x_16); -x_21 = l___private_Lean_Expr_0__Lean_Expr_getAppArgsAux(x_5, x_18, x_20); -x_47 = lean_st_ref_get(x_9, x_10); -x_48 = lean_ctor_get(x_47, 1); -lean_inc(x_48); -lean_dec(x_47); -x_49 = lean_st_ref_take(x_4, x_48); -x_50 = lean_ctor_get(x_49, 0); -lean_inc(x_50); -x_51 = lean_ctor_get(x_49, 1); -lean_inc(x_51); -lean_dec(x_49); -x_52 = lean_array_get_size(x_21); -x_53 = lean_nat_dec_lt(x_52, x_50); -if (x_53 == 0) -{ -lean_object* x_54; lean_object* x_55; -lean_dec(x_52); -x_54 = lean_st_ref_set(x_4, x_50, x_51); -x_55 = lean_ctor_get(x_54, 1); -lean_inc(x_55); -lean_dec(x_54); -x_22 = x_55; -goto block_46; -} -else -{ -lean_object* x_56; lean_object* x_57; -lean_dec(x_50); -x_56 = lean_st_ref_set(x_4, x_52, x_51); -x_57 = lean_ctor_get(x_56, 1); -lean_inc(x_57); -lean_dec(x_56); -x_22 = x_57; -goto block_46; -} -block_46: -{ -lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; size_t x_27; size_t x_28; lean_object* x_29; -x_23 = l_Array_toSubarray___rarg(x_2, x_15, x_3); -x_24 = lean_box(0); -x_25 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_25, 0, x_24); -lean_ctor_set(x_25, 1, x_23); -x_26 = lean_array_get_size(x_21); -x_27 = lean_usize_of_nat(x_26); -lean_dec(x_26); -x_28 = 0; -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -lean_inc(x_6); -x_29 = l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_getFixedPrefix___spec__1(x_24, x_21, x_27, x_28, x_25, x_6, x_7, x_8, x_9, x_22); -lean_dec(x_21); -if (lean_obj_tag(x_29) == 0) -{ -lean_object* x_30; lean_object* x_31; -x_30 = lean_ctor_get(x_29, 0); -lean_inc(x_30); -x_31 = lean_ctor_get(x_30, 0); -lean_inc(x_31); -lean_dec(x_30); -if (lean_obj_tag(x_31) == 0) -{ -lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; -x_32 = lean_ctor_get(x_29, 1); -lean_inc(x_32); -lean_dec(x_29); -x_33 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_getFixedPrefix___lambda__2___closed__2; -x_34 = lean_box(0); -x_35 = lean_apply_6(x_33, x_34, x_6, x_7, x_8, x_9, x_32); -return x_35; -} -else -{ -uint8_t x_36; -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -x_36 = !lean_is_exclusive(x_29); -if (x_36 == 0) -{ -lean_object* x_37; lean_object* x_38; -x_37 = lean_ctor_get(x_29, 0); -lean_dec(x_37); -x_38 = lean_ctor_get(x_31, 0); -lean_inc(x_38); -lean_dec(x_31); -lean_ctor_set(x_29, 0, x_38); -return x_29; -} -else -{ -lean_object* x_39; lean_object* x_40; lean_object* x_41; -x_39 = lean_ctor_get(x_29, 1); -lean_inc(x_39); -lean_dec(x_29); -x_40 = lean_ctor_get(x_31, 0); -lean_inc(x_40); -lean_dec(x_31); -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_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -x_42 = !lean_is_exclusive(x_29); -if (x_42 == 0) -{ -return x_29; -} -else -{ -lean_object* x_43; lean_object* x_44; lean_object* x_45; -x_43 = lean_ctor_get(x_29, 0); -x_44 = lean_ctor_get(x_29, 1); -lean_inc(x_44); -lean_inc(x_43); -lean_dec(x_29); -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; -} -} -} -} -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_getFixedPrefix(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; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; -x_9 = lean_array_get_size(x_2); -x_10 = lean_st_ref_get(x_7, x_8); -x_11 = lean_ctor_get(x_10, 1); -lean_inc(x_11); -lean_dec(x_10); -lean_inc(x_9); -x_12 = l_IO_mkRef___rarg(x_9, x_11); -x_13 = lean_ctor_get(x_12, 0); -lean_inc(x_13); -x_14 = lean_ctor_get(x_12, 1); -lean_inc(x_14); -lean_dec(x_12); -lean_inc(x_13); -x_15 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_getFixedPrefix___lambda__2___boxed), 10, 4); -lean_closure_set(x_15, 0, x_1); -lean_closure_set(x_15, 1, x_2); -lean_closure_set(x_15, 2, x_9); -lean_closure_set(x_15, 3, x_13); -lean_inc(x_7); -x_16 = l_Lean_Meta_forEachExpr_x27(x_3, x_15, x_4, x_5, x_6, x_7, x_14); -if (lean_obj_tag(x_16) == 0) -{ -lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; uint8_t x_21; -x_17 = lean_ctor_get(x_16, 1); -lean_inc(x_17); -lean_dec(x_16); -x_18 = lean_st_ref_get(x_7, x_17); -lean_dec(x_7); -x_19 = lean_ctor_get(x_18, 1); -lean_inc(x_19); -lean_dec(x_18); -x_20 = lean_st_ref_get(x_13, x_19); -lean_dec(x_13); -x_21 = !lean_is_exclusive(x_20); -if (x_21 == 0) -{ -return x_20; -} -else -{ -lean_object* x_22; lean_object* x_23; lean_object* x_24; -x_22 = lean_ctor_get(x_20, 0); -x_23 = lean_ctor_get(x_20, 1); -lean_inc(x_23); -lean_inc(x_22); -lean_dec(x_20); -x_24 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_24, 0, x_22); -lean_ctor_set(x_24, 1, x_23); -return x_24; -} -} -else -{ -uint8_t x_25; -lean_dec(x_13); -lean_dec(x_7); -x_25 = !lean_is_exclusive(x_16); -if (x_25 == 0) -{ -return x_16; -} -else -{ -lean_object* x_26; lean_object* x_27; lean_object* x_28; -x_26 = lean_ctor_get(x_16, 0); -x_27 = lean_ctor_get(x_16, 1); -lean_inc(x_27); -lean_inc(x_26); -lean_dec(x_16); -x_28 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_28, 0, x_26); -lean_ctor_set(x_28, 1, x_27); -return x_28; -} -} -} -} -lean_object* l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_getFixedPrefix___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) { -_start: -{ -size_t x_11; size_t x_12; lean_object* x_13; -x_11 = lean_unbox_usize(x_3); -lean_dec(x_3); -x_12 = lean_unbox_usize(x_4); -lean_dec(x_4); -x_13 = l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_getFixedPrefix___spec__1(x_1, x_2, x_11, x_12, x_5, x_6, x_7, x_8, x_9, x_10); -lean_dec(x_2); -return x_13; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_getFixedPrefix___lambda__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { -_start: -{ -lean_object* x_7; -x_7 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_getFixedPrefix___lambda__1(x_1, x_2, x_3, x_4, x_5, x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -return x_7; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_getFixedPrefix___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_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_getFixedPrefix___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_4); -lean_dec(x_1); -return x_11; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_getIndexMinPos_match__1___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3) { -_start: -{ -if (lean_obj_tag(x_1) == 0) -{ -lean_object* x_4; -lean_dec(x_2); -x_4 = lean_apply_1(x_3, x_1); -return x_4; -} -else -{ -lean_object* x_5; lean_object* x_6; -lean_dec(x_3); -x_5 = lean_ctor_get(x_1, 0); -lean_inc(x_5); -lean_dec(x_1); -x_6 = lean_apply_1(x_2, x_5); -return x_6; -} -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_getIndexMinPos_match__1(lean_object* x_1, lean_object* x_2) { -_start: -{ -lean_object* x_3; -x_3 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_getIndexMinPos_match__1___rarg), 3, 0); -return x_3; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_getIndexMinPos_match__1___boxed(lean_object* x_1, lean_object* x_2) { -_start: -{ -lean_object* x_3; -x_3 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_getIndexMinPos_match__1(x_1, x_2); -lean_dec(x_1); -return x_3; -} -} -lean_object* l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_getIndexMinPos___spec__1(lean_object* x_1, lean_object* x_2, size_t x_3, size_t x_4, lean_object* x_5) { -_start: -{ -uint8_t x_6; -x_6 = x_4 < x_3; -if (x_6 == 0) -{ -return x_5; -} -else -{ -lean_object* x_7; lean_object* x_8; lean_object* x_9; -x_7 = lean_array_uget(x_2, x_4); -x_8 = lean_unsigned_to_nat(0u); -x_9 = l_Array_indexOfAux___at_Lean_Meta_getElimInfo___spec__1(x_1, x_7, x_8); -lean_dec(x_7); -if (lean_obj_tag(x_9) == 0) -{ -size_t x_10; size_t x_11; -x_10 = 1; -x_11 = x_4 + x_10; -x_4 = x_11; -goto _start; -} -else -{ -lean_object* x_13; uint8_t x_14; -x_13 = lean_ctor_get(x_9, 0); -lean_inc(x_13); -lean_dec(x_9); -x_14 = lean_nat_dec_lt(x_13, x_5); -if (x_14 == 0) -{ -size_t x_15; size_t x_16; -lean_dec(x_13); -x_15 = 1; -x_16 = x_4 + x_15; -x_4 = x_16; -goto _start; -} -else -{ -size_t x_18; size_t x_19; -lean_dec(x_5); -x_18 = 1; -x_19 = x_4 + x_18; -x_4 = x_19; -x_5 = x_13; -goto _start; -} -} -} -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_getIndexMinPos(lean_object* x_1, lean_object* x_2) { -_start: -{ -lean_object* x_3; lean_object* x_4; size_t x_5; size_t x_6; lean_object* x_7; -x_3 = lean_array_get_size(x_1); -x_4 = lean_array_get_size(x_2); -x_5 = lean_usize_of_nat(x_4); -lean_dec(x_4); -x_6 = 0; -x_7 = l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_getIndexMinPos___spec__1(x_1, x_2, x_5, x_6, x_3); -return x_7; -} -} -lean_object* l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_getIndexMinPos___spec__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { -_start: -{ -size_t x_6; size_t x_7; lean_object* x_8; -x_6 = lean_unbox_usize(x_3); -lean_dec(x_3); -x_7 = lean_unbox_usize(x_4); -lean_dec(x_4); -x_8 = l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_getIndexMinPos___spec__1(x_1, x_2, x_6, x_7, x_5); -lean_dec(x_2); -lean_dec(x_1); -return x_8; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_getIndexMinPos___boxed(lean_object* x_1, lean_object* x_2) { -_start: -{ -lean_object* x_3; -x_3 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_getIndexMinPos(x_1, x_2); -lean_dec(x_2); -lean_dec(x_1); -return x_3; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_hasBadIndexDep_x3f_match__1___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3) { -_start: -{ -if (lean_obj_tag(x_1) == 0) -{ -lean_object* x_4; lean_object* x_5; -lean_dec(x_3); -x_4 = lean_box(0); -x_5 = lean_apply_1(x_2, x_4); -return x_5; -} -else -{ -lean_object* x_6; lean_object* x_7; -lean_dec(x_2); -x_6 = lean_ctor_get(x_1, 0); -lean_inc(x_6); -lean_dec(x_1); -x_7 = lean_apply_1(x_3, x_6); -return x_7; -} -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_hasBadIndexDep_x3f_match__1(lean_object* x_1) { -_start: -{ -lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_hasBadIndexDep_x3f_match__1___rarg), 3, 0); -return x_2; -} -} -lean_object* l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_hasBadIndexDep_x3f___spec__1(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) { -_start: -{ -uint8_t x_14; -x_14 = x_7 < x_6; -if (x_14 == 0) -{ -lean_object* x_15; -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -x_15 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_15, 0, x_8); -lean_ctor_set(x_15, 1, x_13); -return x_15; -} -else -{ -lean_object* x_16; lean_object* x_17; lean_object* x_18; uint8_t x_19; -lean_dec(x_8); -x_16 = lean_array_uget(x_5, x_7); -x_17 = l_Lean_Expr_fvarId_x21(x_16); -lean_inc(x_4); -x_18 = l_Lean_Meta_dependsOn(x_4, x_17, x_9, x_10, x_11, x_12, x_13); -lean_dec(x_17); -x_19 = !lean_is_exclusive(x_18); -if (x_19 == 0) -{ -lean_object* x_20; lean_object* x_21; uint8_t x_22; -x_20 = lean_ctor_get(x_18, 0); -x_21 = lean_ctor_get(x_18, 1); -x_22 = l_Array_contains___at_Lean_Meta_getElimInfo___spec__4(x_1, x_16); -if (x_22 == 0) -{ -uint8_t x_23; -x_23 = lean_unbox(x_20); -lean_dec(x_20); -if (x_23 == 0) -{ -size_t x_24; size_t x_25; -lean_free_object(x_18); -lean_dec(x_16); -x_24 = 1; -x_25 = x_7 + x_24; -lean_inc(x_2); -{ -size_t _tmp_6 = x_25; -lean_object* _tmp_7 = x_2; -lean_object* _tmp_12 = x_21; -x_7 = _tmp_6; -x_8 = _tmp_7; -x_13 = _tmp_12; -} -goto _start; -} -else -{ -lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; -lean_dec(x_4); -lean_dec(x_2); -x_27 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_27, 0, x_3); -lean_ctor_set(x_27, 1, x_16); -x_28 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_28, 0, x_27); -x_29 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_29, 0, x_28); -x_30 = lean_box(0); -x_31 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_31, 0, x_29); -lean_ctor_set(x_31, 1, x_30); -lean_ctor_set(x_18, 0, x_31); -return x_18; -} -} -else -{ -size_t x_32; size_t x_33; -lean_free_object(x_18); -lean_dec(x_20); -lean_dec(x_16); -x_32 = 1; -x_33 = x_7 + x_32; -lean_inc(x_2); -{ -size_t _tmp_6 = x_33; -lean_object* _tmp_7 = x_2; -lean_object* _tmp_12 = x_21; -x_7 = _tmp_6; -x_8 = _tmp_7; -x_13 = _tmp_12; -} -goto _start; -} -} -else -{ -lean_object* x_35; lean_object* x_36; uint8_t x_37; -x_35 = lean_ctor_get(x_18, 0); -x_36 = lean_ctor_get(x_18, 1); -lean_inc(x_36); -lean_inc(x_35); -lean_dec(x_18); -x_37 = l_Array_contains___at_Lean_Meta_getElimInfo___spec__4(x_1, x_16); -if (x_37 == 0) -{ -uint8_t x_38; -x_38 = lean_unbox(x_35); -lean_dec(x_35); -if (x_38 == 0) -{ -size_t x_39; size_t x_40; -lean_dec(x_16); -x_39 = 1; -x_40 = x_7 + x_39; -lean_inc(x_2); -{ -size_t _tmp_6 = x_40; -lean_object* _tmp_7 = x_2; -lean_object* _tmp_12 = x_36; -x_7 = _tmp_6; -x_8 = _tmp_7; -x_13 = _tmp_12; -} -goto _start; -} -else -{ -lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; -lean_dec(x_4); -lean_dec(x_2); -x_42 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_42, 0, x_3); -lean_ctor_set(x_42, 1, x_16); -x_43 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_43, 0, x_42); -x_44 = lean_alloc_ctor(1, 1, 0); -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); -lean_ctor_set(x_47, 1, x_36); -return x_47; -} -} -else -{ -size_t x_48; size_t x_49; -lean_dec(x_35); -lean_dec(x_16); -x_48 = 1; -x_49 = x_7 + x_48; -lean_inc(x_2); -{ -size_t _tmp_6 = x_49; -lean_object* _tmp_7 = x_2; -lean_object* _tmp_12 = x_36; -x_7 = _tmp_6; -x_8 = _tmp_7; -x_13 = _tmp_12; -} -goto _start; -} -} -} -} -} -lean_object* l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_hasBadIndexDep_x3f___spec__2(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) { -_start: -{ -uint8_t x_13; -x_13 = x_6 < x_5; -if (x_13 == 0) -{ -lean_object* x_14; -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_3); -x_14 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_14, 0, x_7); -lean_ctor_set(x_14, 1, x_12); -return x_14; -} -else -{ -lean_object* x_15; lean_object* x_16; -lean_dec(x_7); -x_15 = lean_array_uget(x_4, x_6); -lean_inc(x_11); -lean_inc(x_10); -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_15); -x_16 = lean_infer_type(x_15, x_8, x_9, x_10, x_11, x_12); -if (lean_obj_tag(x_16) == 0) -{ -lean_object* x_17; lean_object* x_18; lean_object* x_19; size_t x_20; size_t x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; -x_17 = lean_ctor_get(x_16, 0); -lean_inc(x_17); -x_18 = lean_ctor_get(x_16, 1); -lean_inc(x_18); -lean_dec(x_16); -x_19 = lean_array_get_size(x_1); -x_20 = lean_usize_of_nat(x_19); -lean_dec(x_19); -x_21 = 0; -lean_inc_n(x_3, 2); -x_22 = l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_hasBadIndexDep_x3f___spec__1(x_2, x_3, x_15, x_17, x_1, x_20, x_21, x_3, x_8, x_9, x_10, x_11, x_18); -x_23 = lean_ctor_get(x_22, 0); -lean_inc(x_23); -x_24 = lean_ctor_get(x_23, 0); -lean_inc(x_24); -lean_dec(x_23); -if (lean_obj_tag(x_24) == 0) -{ -lean_object* x_25; size_t x_26; size_t x_27; -x_25 = lean_ctor_get(x_22, 1); -lean_inc(x_25); -lean_dec(x_22); -x_26 = 1; -x_27 = x_6 + x_26; -lean_inc(x_3); -{ -size_t _tmp_5 = x_27; -lean_object* _tmp_6 = x_3; -lean_object* _tmp_11 = x_25; -x_6 = _tmp_5; -x_7 = _tmp_6; -x_12 = _tmp_11; -} -goto _start; -} -else -{ -uint8_t x_29; -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_3); -x_29 = !lean_is_exclusive(x_22); -if (x_29 == 0) -{ -lean_object* x_30; uint8_t x_31; -x_30 = lean_ctor_get(x_22, 0); -lean_dec(x_30); -x_31 = !lean_is_exclusive(x_24); -if (x_31 == 0) -{ -lean_object* x_32; lean_object* x_33; -x_32 = lean_box(0); -x_33 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_33, 0, x_24); -lean_ctor_set(x_33, 1, x_32); -lean_ctor_set(x_22, 0, x_33); -return x_22; -} -else -{ -lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; -x_34 = lean_ctor_get(x_24, 0); -lean_inc(x_34); -lean_dec(x_24); -x_35 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_35, 0, x_34); -x_36 = lean_box(0); -x_37 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_37, 0, x_35); -lean_ctor_set(x_37, 1, x_36); -lean_ctor_set(x_22, 0, x_37); -return x_22; -} -} -else -{ -lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; -x_38 = lean_ctor_get(x_22, 1); -lean_inc(x_38); -lean_dec(x_22); -x_39 = lean_ctor_get(x_24, 0); -lean_inc(x_39); -if (lean_is_exclusive(x_24)) { - lean_ctor_release(x_24, 0); - x_40 = x_24; -} else { - lean_dec_ref(x_24); - x_40 = lean_box(0); -} -if (lean_is_scalar(x_40)) { - x_41 = lean_alloc_ctor(1, 1, 0); -} else { - x_41 = x_40; -} -lean_ctor_set(x_41, 0, x_39); -x_42 = lean_box(0); -x_43 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_43, 0, x_41); -lean_ctor_set(x_43, 1, x_42); -x_44 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_44, 0, x_43); -lean_ctor_set(x_44, 1, x_38); -return x_44; -} -} -} -else -{ -uint8_t x_45; -lean_dec(x_15); -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_3); -x_45 = !lean_is_exclusive(x_16); -if (x_45 == 0) -{ -return x_16; -} -else -{ -lean_object* x_46; lean_object* x_47; lean_object* x_48; -x_46 = lean_ctor_get(x_16, 0); -x_47 = lean_ctor_get(x_16, 1); -lean_inc(x_47); -lean_inc(x_46); -lean_dec(x_16); -x_48 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_48, 0, x_46); -lean_ctor_set(x_48, 1, x_47); -return x_48; -} -} -} -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_hasBadIndexDep_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) { -_start: -{ -lean_object* x_8; -x_8 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_8, 0, x_1); -lean_ctor_set(x_8, 1, x_7); -return x_8; -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_hasBadIndexDep_x3f___closed__1() { -_start: -{ -lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = lean_box(0); -x_2 = lean_box(0); -x_3 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_3, 0, x_1); -lean_ctor_set(x_3, 1, x_2); -return x_3; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_hasBadIndexDep_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) { -_start: -{ -lean_object* x_8; lean_object* x_9; size_t x_10; size_t x_11; lean_object* x_12; lean_object* x_13; -x_8 = lean_box(0); -x_9 = lean_array_get_size(x_2); -x_10 = lean_usize_of_nat(x_9); -lean_dec(x_9); -x_11 = 0; -x_12 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_hasBadIndexDep_x3f___closed__1; -x_13 = l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_hasBadIndexDep_x3f___spec__2(x_1, x_2, x_12, x_2, x_10, x_11, x_12, x_3, x_4, x_5, x_6, x_7); -if (lean_obj_tag(x_13) == 0) -{ -lean_object* x_14; lean_object* x_15; -x_14 = lean_ctor_get(x_13, 0); -lean_inc(x_14); -x_15 = lean_ctor_get(x_14, 0); -lean_inc(x_15); -lean_dec(x_14); -if (lean_obj_tag(x_15) == 0) -{ -uint8_t x_16; -x_16 = !lean_is_exclusive(x_13); -if (x_16 == 0) -{ -lean_object* x_17; -x_17 = lean_ctor_get(x_13, 0); -lean_dec(x_17); -lean_ctor_set(x_13, 0, x_8); -return x_13; -} -else -{ -lean_object* x_18; lean_object* x_19; -x_18 = lean_ctor_get(x_13, 1); -lean_inc(x_18); -lean_dec(x_13); -x_19 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_19, 0, x_8); -lean_ctor_set(x_19, 1, x_18); -return x_19; -} -} -else -{ -uint8_t x_20; -x_20 = !lean_is_exclusive(x_13); -if (x_20 == 0) -{ -lean_object* x_21; lean_object* x_22; -x_21 = lean_ctor_get(x_13, 0); -lean_dec(x_21); -x_22 = lean_ctor_get(x_15, 0); -lean_inc(x_22); -lean_dec(x_15); -lean_ctor_set(x_13, 0, x_22); -return x_13; -} -else -{ -lean_object* x_23; lean_object* x_24; lean_object* x_25; -x_23 = lean_ctor_get(x_13, 1); -lean_inc(x_23); -lean_dec(x_13); -x_24 = lean_ctor_get(x_15, 0); -lean_inc(x_24); -lean_dec(x_15); -x_25 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_25, 0, x_24); -lean_ctor_set(x_25, 1, x_23); -return x_25; -} -} -} -else -{ -uint8_t x_26; -x_26 = !lean_is_exclusive(x_13); -if (x_26 == 0) -{ -return x_13; -} -else -{ -lean_object* x_27; lean_object* x_28; lean_object* x_29; -x_27 = lean_ctor_get(x_13, 0); -x_28 = lean_ctor_get(x_13, 1); -lean_inc(x_28); -lean_inc(x_27); -lean_dec(x_13); -x_29 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_29, 0, x_27); -lean_ctor_set(x_29, 1, x_28); -return x_29; -} -} -} -} -lean_object* l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_hasBadIndexDep_x3f___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) { -_start: -{ -size_t x_14; size_t x_15; lean_object* x_16; -x_14 = lean_unbox_usize(x_6); -lean_dec(x_6); -x_15 = lean_unbox_usize(x_7); -lean_dec(x_7); -x_16 = l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_hasBadIndexDep_x3f___spec__1(x_1, x_2, x_3, x_4, x_5, x_14, x_15, x_8, x_9, x_10, x_11, x_12, x_13); -lean_dec(x_12); -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_5); -lean_dec(x_1); -return x_16; -} -} -lean_object* l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_hasBadIndexDep_x3f___spec__2___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11, lean_object* x_12) { -_start: -{ -size_t x_13; size_t x_14; lean_object* x_15; -x_13 = lean_unbox_usize(x_5); -lean_dec(x_5); -x_14 = lean_unbox_usize(x_6); -lean_dec(x_6); -x_15 = l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_hasBadIndexDep_x3f___spec__2(x_1, x_2, x_3, x_4, x_13, x_14, x_7, x_8, x_9, x_10, x_11, x_12); -lean_dec(x_4); -lean_dec(x_2); -lean_dec(x_1); -return x_15; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_hasBadIndexDep_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) { -_start: -{ -lean_object* x_8; -x_8 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_hasBadIndexDep_x3f___lambda__1(x_1, x_2, x_3, x_4, x_5, x_6, x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -return x_8; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_hasBadIndexDep_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) { -_start: -{ -lean_object* x_8; -x_8 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_hasBadIndexDep_x3f(x_1, x_2, x_3, x_4, x_5, x_6, x_7); -lean_dec(x_2); -lean_dec(x_1); -return x_8; -} -} -lean_object* l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_hasBadParamDep_x3f___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) { -_start: -{ -uint8_t x_13; -x_13 = x_6 < x_5; -if (x_13 == 0) -{ -lean_object* x_14; -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_14 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_14, 0, x_7); -lean_ctor_set(x_14, 1, x_12); -return x_14; -} -else -{ -lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; uint8_t x_19; -lean_dec(x_7); -x_15 = lean_array_uget(x_4, x_6); -x_16 = l_Lean_Expr_fvarId_x21(x_15); -lean_inc(x_3); -x_17 = l_Lean_Meta_dependsOn(x_3, x_16, x_8, x_9, x_10, x_11, x_12); -lean_dec(x_16); -x_18 = lean_ctor_get(x_17, 0); -lean_inc(x_18); -x_19 = lean_unbox(x_18); -lean_dec(x_18); -if (x_19 == 0) -{ -lean_object* x_20; size_t x_21; size_t x_22; -lean_dec(x_15); -x_20 = lean_ctor_get(x_17, 1); -lean_inc(x_20); -lean_dec(x_17); -x_21 = 1; -x_22 = x_6 + x_21; -lean_inc(x_1); -{ -size_t _tmp_5 = x_22; -lean_object* _tmp_6 = x_1; -lean_object* _tmp_11 = x_20; -x_6 = _tmp_5; -x_7 = _tmp_6; -x_12 = _tmp_11; -} -goto _start; -} -else -{ -uint8_t x_24; -lean_dec(x_3); -lean_dec(x_1); -x_24 = !lean_is_exclusive(x_17); -if (x_24 == 0) -{ -lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; -x_25 = lean_ctor_get(x_17, 0); -lean_dec(x_25); -x_26 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_26, 0, x_2); -lean_ctor_set(x_26, 1, x_15); -x_27 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_27, 0, x_26); -x_28 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_28, 0, x_27); -x_29 = lean_box(0); -x_30 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_30, 0, x_28); -lean_ctor_set(x_30, 1, x_29); -lean_ctor_set(x_17, 0, x_30); -return x_17; -} -else -{ -lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; -x_31 = lean_ctor_get(x_17, 1); -lean_inc(x_31); -lean_dec(x_17); -x_32 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_32, 0, x_2); -lean_ctor_set(x_32, 1, x_15); -x_33 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_33, 0, x_32); -x_34 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_34, 0, x_33); -x_35 = lean_box(0); -x_36 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_36, 0, x_34); -lean_ctor_set(x_36, 1, x_35); -x_37 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_37, 0, x_36); -lean_ctor_set(x_37, 1, x_31); -return x_37; -} -} -} -} -} -lean_object* l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_hasBadParamDep_x3f___spec__2(lean_object* x_1, lean_object* x_2, lean_object* x_3, size_t x_4, size_t 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: -{ -uint8_t x_12; -x_12 = x_5 < x_4; -if (x_12 == 0) -{ -lean_object* x_13; -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_2); -x_13 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_13, 0, x_6); -lean_ctor_set(x_13, 1, x_11); -return x_13; -} -else -{ -lean_object* x_14; lean_object* x_15; -lean_dec(x_6); -x_14 = lean_array_uget(x_3, x_5); -lean_inc(x_10); -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -lean_inc(x_14); -x_15 = lean_infer_type(x_14, x_7, x_8, x_9, x_10, x_11); -if (lean_obj_tag(x_15) == 0) -{ -lean_object* x_16; lean_object* x_17; lean_object* x_18; size_t x_19; size_t x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; -x_16 = lean_ctor_get(x_15, 0); -lean_inc(x_16); -x_17 = lean_ctor_get(x_15, 1); -lean_inc(x_17); -lean_dec(x_15); -x_18 = lean_array_get_size(x_1); -x_19 = lean_usize_of_nat(x_18); -lean_dec(x_18); -x_20 = 0; -lean_inc_n(x_2, 2); -x_21 = l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_hasBadParamDep_x3f___spec__1(x_2, x_14, x_16, x_1, x_19, x_20, x_2, x_7, x_8, x_9, x_10, x_17); -x_22 = lean_ctor_get(x_21, 0); -lean_inc(x_22); -x_23 = lean_ctor_get(x_22, 0); -lean_inc(x_23); -lean_dec(x_22); -if (lean_obj_tag(x_23) == 0) -{ -lean_object* x_24; size_t x_25; size_t x_26; -x_24 = lean_ctor_get(x_21, 1); -lean_inc(x_24); -lean_dec(x_21); -x_25 = 1; -x_26 = x_5 + x_25; -lean_inc(x_2); -{ -size_t _tmp_4 = x_26; -lean_object* _tmp_5 = x_2; -lean_object* _tmp_10 = x_24; -x_5 = _tmp_4; -x_6 = _tmp_5; -x_11 = _tmp_10; -} -goto _start; -} -else -{ -uint8_t x_28; -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_2); -x_28 = !lean_is_exclusive(x_21); -if (x_28 == 0) -{ -lean_object* x_29; uint8_t x_30; -x_29 = lean_ctor_get(x_21, 0); -lean_dec(x_29); -x_30 = !lean_is_exclusive(x_23); -if (x_30 == 0) -{ -lean_object* x_31; lean_object* x_32; -x_31 = lean_box(0); -x_32 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_32, 0, x_23); -lean_ctor_set(x_32, 1, x_31); -lean_ctor_set(x_21, 0, x_32); -return x_21; -} -else -{ -lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; -x_33 = lean_ctor_get(x_23, 0); -lean_inc(x_33); -lean_dec(x_23); -x_34 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_34, 0, x_33); -x_35 = lean_box(0); -x_36 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_36, 0, x_34); -lean_ctor_set(x_36, 1, x_35); -lean_ctor_set(x_21, 0, x_36); -return x_21; -} -} -else -{ -lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; -x_37 = lean_ctor_get(x_21, 1); -lean_inc(x_37); -lean_dec(x_21); -x_38 = lean_ctor_get(x_23, 0); -lean_inc(x_38); -if (lean_is_exclusive(x_23)) { - lean_ctor_release(x_23, 0); - x_39 = x_23; -} else { - lean_dec_ref(x_23); - x_39 = lean_box(0); -} -if (lean_is_scalar(x_39)) { - x_40 = lean_alloc_ctor(1, 1, 0); -} else { - x_40 = x_39; -} -lean_ctor_set(x_40, 0, x_38); -x_41 = lean_box(0); -x_42 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_42, 0, x_40); -lean_ctor_set(x_42, 1, x_41); -x_43 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_43, 0, x_42); -lean_ctor_set(x_43, 1, x_37); -return x_43; -} -} -} -else -{ -uint8_t x_44; -lean_dec(x_14); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_2); -x_44 = !lean_is_exclusive(x_15); -if (x_44 == 0) -{ -return x_15; -} -else -{ -lean_object* x_45; lean_object* x_46; lean_object* x_47; -x_45 = lean_ctor_get(x_15, 0); -x_46 = lean_ctor_get(x_15, 1); -lean_inc(x_46); -lean_inc(x_45); -lean_dec(x_15); -x_47 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_47, 0, x_45); -lean_ctor_set(x_47, 1, x_46); -return x_47; -} -} -} -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_hasBadParamDep_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) { -_start: -{ -lean_object* x_8; lean_object* x_9; size_t x_10; size_t x_11; lean_object* x_12; lean_object* x_13; -x_8 = lean_box(0); -x_9 = lean_array_get_size(x_2); -x_10 = lean_usize_of_nat(x_9); -lean_dec(x_9); -x_11 = 0; -x_12 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_hasBadIndexDep_x3f___closed__1; -x_13 = l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_hasBadParamDep_x3f___spec__2(x_1, x_12, x_2, x_10, x_11, x_12, x_3, x_4, x_5, x_6, x_7); -if (lean_obj_tag(x_13) == 0) -{ -lean_object* x_14; lean_object* x_15; -x_14 = lean_ctor_get(x_13, 0); -lean_inc(x_14); -x_15 = lean_ctor_get(x_14, 0); -lean_inc(x_15); -lean_dec(x_14); -if (lean_obj_tag(x_15) == 0) -{ -uint8_t x_16; -x_16 = !lean_is_exclusive(x_13); -if (x_16 == 0) -{ -lean_object* x_17; -x_17 = lean_ctor_get(x_13, 0); -lean_dec(x_17); -lean_ctor_set(x_13, 0, x_8); -return x_13; -} -else -{ -lean_object* x_18; lean_object* x_19; -x_18 = lean_ctor_get(x_13, 1); -lean_inc(x_18); -lean_dec(x_13); -x_19 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_19, 0, x_8); -lean_ctor_set(x_19, 1, x_18); -return x_19; -} -} -else -{ -uint8_t x_20; -x_20 = !lean_is_exclusive(x_13); -if (x_20 == 0) -{ -lean_object* x_21; lean_object* x_22; -x_21 = lean_ctor_get(x_13, 0); -lean_dec(x_21); -x_22 = lean_ctor_get(x_15, 0); -lean_inc(x_22); -lean_dec(x_15); -lean_ctor_set(x_13, 0, x_22); -return x_13; -} -else -{ -lean_object* x_23; lean_object* x_24; lean_object* x_25; -x_23 = lean_ctor_get(x_13, 1); -lean_inc(x_23); -lean_dec(x_13); -x_24 = lean_ctor_get(x_15, 0); -lean_inc(x_24); -lean_dec(x_15); -x_25 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_25, 0, x_24); -lean_ctor_set(x_25, 1, x_23); -return x_25; -} -} -} -else -{ -uint8_t x_26; -x_26 = !lean_is_exclusive(x_13); -if (x_26 == 0) -{ -return x_13; -} -else -{ -lean_object* x_27; lean_object* x_28; lean_object* x_29; -x_27 = lean_ctor_get(x_13, 0); -x_28 = lean_ctor_get(x_13, 1); -lean_inc(x_28); -lean_inc(x_27); -lean_dec(x_13); -x_29 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_29, 0, x_27); -lean_ctor_set(x_29, 1, x_28); -return x_29; -} -} -} -} -lean_object* l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_hasBadParamDep_x3f___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) { -_start: -{ -size_t x_13; size_t x_14; lean_object* x_15; -x_13 = lean_unbox_usize(x_5); -lean_dec(x_5); -x_14 = lean_unbox_usize(x_6); -lean_dec(x_6); -x_15 = l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_hasBadParamDep_x3f___spec__1(x_1, x_2, x_3, x_4, x_13, x_14, x_7, x_8, x_9, x_10, x_11, x_12); -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_4); -return x_15; -} -} -lean_object* l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_hasBadParamDep_x3f___spec__2___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11) { -_start: -{ -size_t x_12; size_t x_13; lean_object* x_14; -x_12 = lean_unbox_usize(x_4); -lean_dec(x_4); -x_13 = lean_unbox_usize(x_5); -lean_dec(x_5); -x_14 = l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_hasBadParamDep_x3f___spec__2(x_1, x_2, x_3, x_12, x_13, x_6, x_7, x_8, x_9, x_10, x_11); -lean_dec(x_3); -lean_dec(x_1); -return x_14; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_hasBadParamDep_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) { -_start: -{ -lean_object* x_8; -x_8 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_hasBadParamDep_x3f(x_1, x_2, x_3, x_4, x_5, x_6, x_7); -lean_dec(x_2); -lean_dec(x_1); -return x_8; -} -} -lean_object* l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_throwStructuralFailed___spec__1___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { -_start: -{ -lean_object* x_7; lean_object* x_8; uint8_t x_9; -x_7 = lean_ctor_get(x_4, 3); -x_8 = l_Lean_addMessageContextFull___at_Lean_Meta_instAddMessageContextMetaM___spec__1(x_1, x_2, x_3, x_4, x_5, x_6); -x_9 = !lean_is_exclusive(x_8); -if (x_9 == 0) -{ -lean_object* x_10; lean_object* x_11; -x_10 = lean_ctor_get(x_8, 0); -lean_inc(x_7); -x_11 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_11, 0, x_7); -lean_ctor_set(x_11, 1, x_10); -lean_ctor_set_tag(x_8, 1); -lean_ctor_set(x_8, 0, x_11); -return x_8; -} -else -{ -lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; -x_12 = lean_ctor_get(x_8, 0); -x_13 = lean_ctor_get(x_8, 1); -lean_inc(x_13); -lean_inc(x_12); -lean_dec(x_8); -lean_inc(x_7); -x_14 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_14, 0, x_7); -lean_ctor_set(x_14, 1, x_12); -x_15 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_15, 0, x_14); -lean_ctor_set(x_15, 1, x_13); -return x_15; -} -} -} -lean_object* l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_throwStructuralFailed___spec__1(lean_object* x_1) { -_start: -{ -lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_throwStructuralFailed___spec__1___rarg___boxed), 6, 0); -return x_2; -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_throwStructuralFailed___rarg___closed__1() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string("structural recursion cannot be used"); -return x_1; -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_throwStructuralFailed___rarg___closed__2() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_throwStructuralFailed___rarg___closed__1; -x_2 = l_Lean_stringToMessageData(x_1); -return x_2; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_throwStructuralFailed___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { -_start: -{ -lean_object* x_6; lean_object* x_7; -x_6 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_throwStructuralFailed___rarg___closed__2; -x_7 = l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_throwStructuralFailed___spec__1___rarg(x_6, x_1, x_2, x_3, x_4, x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -return x_7; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_throwStructuralFailed(lean_object* x_1) { -_start: -{ -lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_throwStructuralFailed___rarg), 5, 0); -return x_2; -} -} -lean_object* l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_throwStructuralFailed___spec__1___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { -_start: -{ -lean_object* x_7; -x_7 = l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_throwStructuralFailed___spec__1___rarg(x_1, x_2, x_3, x_4, x_5, x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -return x_7; -} -} -static lean_object* _init_l_Lean_Elab_Structural_State_matcherBelowDep___default() { -_start: -{ -lean_object* x_1; -x_1 = l_Lean_NameSet_empty; -return x_1; -} -} -static lean_object* _init_l_Lean_Elab_Structural_State_addMatchers___default___closed__1() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = lean_unsigned_to_nat(0u); -x_2 = lean_mk_empty_array_with_capacity(x_1); -return x_2; -} -} -static lean_object* _init_l_Lean_Elab_Structural_State_addMatchers___default() { -_start: -{ -lean_object* x_1; -x_1 = l_Lean_Elab_Structural_State_addMatchers___default___closed__1; -return x_1; -} -} -lean_object* l_Lean_throwError___at_Lean_Elab_Structural_instInhabitedM___spec__1___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { -_start: -{ -lean_object* x_8; lean_object* x_9; uint8_t x_10; -x_8 = lean_ctor_get(x_5, 3); -x_9 = l_Lean_addMessageContextFull___at_Lean_Meta_instAddMessageContextMetaM___spec__1(x_1, x_3, x_4, x_5, x_6, x_7); -x_10 = !lean_is_exclusive(x_9); -if (x_10 == 0) -{ -lean_object* x_11; lean_object* x_12; -x_11 = lean_ctor_get(x_9, 0); -lean_inc(x_8); -x_12 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_12, 0, x_8); -lean_ctor_set(x_12, 1, x_11); -lean_ctor_set_tag(x_9, 1); -lean_ctor_set(x_9, 0, x_12); -return x_9; -} -else -{ -lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; -x_13 = lean_ctor_get(x_9, 0); -x_14 = lean_ctor_get(x_9, 1); -lean_inc(x_14); -lean_inc(x_13); -lean_dec(x_9); -lean_inc(x_8); -x_15 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_15, 0, x_8); -lean_ctor_set(x_15, 1, x_13); -x_16 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_16, 0, x_15); -lean_ctor_set(x_16, 1, x_14); -return x_16; -} -} -} -lean_object* l_Lean_throwError___at_Lean_Elab_Structural_instInhabitedM___spec__1(lean_object* x_1) { -_start: -{ -lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l_Lean_throwError___at_Lean_Elab_Structural_instInhabitedM___spec__1___rarg___boxed), 7, 0); -return x_2; -} -} -static lean_object* _init_l_Lean_Elab_Structural_instInhabitedM___closed__1() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string("failed"); -return x_1; -} -} -static lean_object* _init_l_Lean_Elab_Structural_instInhabitedM___closed__2() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Elab_Structural_instInhabitedM___closed__1; -x_2 = l_Lean_stringToMessageData(x_1); -return x_2; -} -} -static lean_object* _init_l_Lean_Elab_Structural_instInhabitedM___closed__3() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Elab_Structural_instInhabitedM___closed__2; -x_2 = lean_alloc_closure((void*)(l_Lean_throwError___at_Lean_Elab_Structural_instInhabitedM___spec__1___rarg___boxed), 7, 1); -lean_closure_set(x_2, 0, x_1); -return x_2; -} -} -lean_object* l_Lean_Elab_Structural_instInhabitedM(lean_object* x_1) { -_start: -{ -lean_object* x_2; -x_2 = l_Lean_Elab_Structural_instInhabitedM___closed__3; -return x_2; -} -} -lean_object* l_Lean_throwError___at_Lean_Elab_Structural_instInhabitedM___spec__1___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { -_start: -{ -lean_object* x_8; -x_8 = l_Lean_throwError___at_Lean_Elab_Structural_instInhabitedM___spec__1___rarg(x_1, x_2, x_3, x_4, x_5, x_6, x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -return x_8; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_run___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { -_start: -{ -lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; -x_8 = lean_st_ref_get(x_6, x_7); -x_9 = lean_ctor_get(x_8, 1); -lean_inc(x_9); -lean_dec(x_8); -x_10 = lean_st_mk_ref(x_2, x_9); -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); -lean_inc(x_6); -lean_inc(x_11); -x_13 = lean_apply_6(x_1, x_11, x_3, x_4, x_5, x_6, x_12); -if (lean_obj_tag(x_13) == 0) -{ -lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; uint8_t x_19; -x_14 = lean_ctor_get(x_13, 0); -lean_inc(x_14); -x_15 = lean_ctor_get(x_13, 1); -lean_inc(x_15); -lean_dec(x_13); -x_16 = lean_st_ref_get(x_6, x_15); -lean_dec(x_6); -x_17 = lean_ctor_get(x_16, 1); -lean_inc(x_17); -lean_dec(x_16); -x_18 = lean_st_ref_get(x_11, x_17); -lean_dec(x_11); -x_19 = !lean_is_exclusive(x_18); -if (x_19 == 0) -{ -lean_object* x_20; lean_object* x_21; -x_20 = lean_ctor_get(x_18, 0); -x_21 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_21, 0, x_14); -lean_ctor_set(x_21, 1, x_20); -lean_ctor_set(x_18, 0, x_21); -return x_18; -} -else -{ -lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; -x_22 = lean_ctor_get(x_18, 0); -x_23 = lean_ctor_get(x_18, 1); -lean_inc(x_23); -lean_inc(x_22); -lean_dec(x_18); -x_24 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_24, 0, x_14); -lean_ctor_set(x_24, 1, x_22); -x_25 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_25, 0, x_24); -lean_ctor_set(x_25, 1, x_23); -return x_25; -} -} -else -{ -uint8_t x_26; -lean_dec(x_11); -lean_dec(x_6); -x_26 = !lean_is_exclusive(x_13); -if (x_26 == 0) -{ -return x_13; -} -else -{ -lean_object* x_27; lean_object* x_28; lean_object* x_29; -x_27 = lean_ctor_get(x_13, 0); -x_28 = lean_ctor_get(x_13, 1); -lean_inc(x_28); -lean_inc(x_27); -lean_dec(x_13); -x_29 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_29, 0, x_27); -lean_ctor_set(x_29, 1, x_28); -return x_29; -} -} -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_run(lean_object* x_1) { -_start: -{ -lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_run___rarg), 7, 0); -return x_2; -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_orelse_x27___rarg___closed__1() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = lean_box(1); -x_2 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_2, 0, x_1); -return x_2; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_orelse_x27___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { -_start: -{ -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_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; -x_9 = lean_st_ref_get(x_7, x_8); -x_10 = lean_ctor_get(x_9, 1); -lean_inc(x_10); -lean_dec(x_9); -x_11 = lean_st_ref_get(x_3, x_10); -x_12 = lean_ctor_get(x_11, 0); -lean_inc(x_12); -x_13 = lean_ctor_get(x_11, 1); -lean_inc(x_13); -lean_dec(x_11); -x_24 = lean_st_ref_get(x_7, x_13); -x_25 = lean_ctor_get(x_24, 0); -lean_inc(x_25); -x_26 = lean_ctor_get(x_24, 1); -lean_inc(x_26); -lean_dec(x_24); -x_27 = lean_ctor_get(x_25, 0); -lean_inc(x_27); -lean_dec(x_25); -x_28 = lean_st_ref_get(x_7, x_26); -x_29 = lean_ctor_get(x_28, 1); -lean_inc(x_29); -lean_dec(x_28); -x_30 = lean_st_ref_get(x_5, x_29); -x_31 = lean_ctor_get(x_30, 0); -lean_inc(x_31); -x_32 = lean_ctor_get(x_30, 1); -lean_inc(x_32); -lean_dec(x_30); -x_33 = lean_ctor_get(x_31, 0); -lean_inc(x_33); -lean_dec(x_31); -lean_inc(x_7); -lean_inc(x_6); -lean_inc(x_5); -lean_inc(x_4); -lean_inc(x_3); -x_34 = lean_apply_6(x_1, x_3, x_4, x_5, x_6, x_7, x_32); -if (lean_obj_tag(x_34) == 0) -{ -lean_dec(x_33); -lean_dec(x_27); -lean_dec(x_12); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -x_14 = x_34; -goto block_23; -} -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_34, 0); -lean_inc(x_35); -x_36 = lean_ctor_get(x_34, 1); -lean_inc(x_36); -lean_dec(x_34); -x_37 = l_Lean_setEnv___at_Lean_Meta_setInlineAttribute___spec__2(x_27, x_4, x_5, x_6, x_7, x_36); -x_38 = lean_ctor_get(x_37, 1); -lean_inc(x_38); -lean_dec(x_37); -x_39 = l_Lean_Meta_setMCtx(x_33, x_4, x_5, x_6, x_7, x_38); -if (lean_obj_tag(x_35) == 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_39, 1); -lean_inc(x_40); -lean_dec(x_39); -x_41 = lean_ctor_get(x_35, 0); -lean_inc(x_41); -x_42 = lean_ctor_get(x_35, 1); -lean_inc(x_42); -lean_dec(x_35); -x_43 = lean_st_ref_get(x_7, x_40); -x_44 = lean_ctor_get(x_43, 1); -lean_inc(x_44); -lean_dec(x_43); -x_45 = lean_st_ref_set(x_3, x_12, x_44); -x_46 = lean_ctor_get(x_45, 1); -lean_inc(x_46); -lean_dec(x_45); -x_47 = lean_apply_6(x_2, x_3, x_4, x_5, x_6, x_7, x_46); -if (lean_obj_tag(x_47) == 0) -{ -lean_dec(x_42); -lean_dec(x_41); -x_14 = x_47; -goto block_23; -} -else -{ -lean_object* x_48; -x_48 = lean_ctor_get(x_47, 0); -lean_inc(x_48); -if (lean_obj_tag(x_48) == 0) -{ -uint8_t x_49; -x_49 = !lean_is_exclusive(x_47); -if (x_49 == 0) -{ -lean_object* x_50; uint8_t x_51; -x_50 = lean_ctor_get(x_47, 0); -lean_dec(x_50); -x_51 = !lean_is_exclusive(x_48); -if (x_51 == 0) -{ -lean_object* x_52; lean_object* x_53; lean_object* x_54; lean_object* x_55; lean_object* x_56; lean_object* x_57; -x_52 = lean_ctor_get(x_48, 1); -x_53 = lean_ctor_get(x_48, 0); -lean_dec(x_53); -x_54 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_orelse_x27___rarg___closed__1; -x_55 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_55, 0, x_42); -lean_ctor_set(x_55, 1, x_54); -x_56 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_56, 0, x_55); -lean_ctor_set(x_56, 1, x_54); -x_57 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_57, 0, x_56); -lean_ctor_set(x_57, 1, x_52); -lean_ctor_set(x_48, 1, x_57); -lean_ctor_set(x_48, 0, x_41); -x_14 = x_47; -goto block_23; -} -else -{ -lean_object* x_58; lean_object* x_59; lean_object* x_60; lean_object* x_61; lean_object* x_62; lean_object* x_63; -x_58 = lean_ctor_get(x_48, 1); -lean_inc(x_58); -lean_dec(x_48); -x_59 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_orelse_x27___rarg___closed__1; -x_60 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_60, 0, x_42); -lean_ctor_set(x_60, 1, x_59); -x_61 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_61, 0, x_60); -lean_ctor_set(x_61, 1, x_59); -x_62 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_62, 0, x_61); -lean_ctor_set(x_62, 1, x_58); -x_63 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_63, 0, x_41); -lean_ctor_set(x_63, 1, x_62); -lean_ctor_set(x_47, 0, x_63); -x_14 = x_47; -goto block_23; -} -} -else -{ -lean_object* x_64; lean_object* x_65; lean_object* x_66; lean_object* x_67; lean_object* x_68; lean_object* x_69; lean_object* x_70; lean_object* x_71; lean_object* x_72; -x_64 = lean_ctor_get(x_47, 1); -lean_inc(x_64); -lean_dec(x_47); -x_65 = lean_ctor_get(x_48, 1); -lean_inc(x_65); -if (lean_is_exclusive(x_48)) { - lean_ctor_release(x_48, 0); - lean_ctor_release(x_48, 1); - x_66 = x_48; -} else { - lean_dec_ref(x_48); - x_66 = lean_box(0); -} -x_67 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_orelse_x27___rarg___closed__1; -x_68 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_68, 0, x_42); -lean_ctor_set(x_68, 1, x_67); -x_69 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_69, 0, x_68); -lean_ctor_set(x_69, 1, x_67); -x_70 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_70, 0, x_69); -lean_ctor_set(x_70, 1, x_65); -if (lean_is_scalar(x_66)) { - x_71 = lean_alloc_ctor(0, 2, 0); -} else { - x_71 = x_66; -} -lean_ctor_set(x_71, 0, x_41); -lean_ctor_set(x_71, 1, x_70); -x_72 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_72, 0, x_71); -lean_ctor_set(x_72, 1, x_64); -x_14 = x_72; -goto block_23; -} -} -else -{ -uint8_t x_73; -lean_dec(x_42); -lean_dec(x_41); -x_73 = !lean_is_exclusive(x_47); -if (x_73 == 0) -{ -lean_object* x_74; -x_74 = lean_ctor_get(x_47, 0); -lean_dec(x_74); -x_14 = x_47; -goto block_23; -} -else -{ -lean_object* x_75; lean_object* x_76; -x_75 = lean_ctor_get(x_47, 1); -lean_inc(x_75); -lean_dec(x_47); -x_76 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_76, 0, x_48); -lean_ctor_set(x_76, 1, x_75); -x_14 = x_76; -goto block_23; -} -} -} -} -else -{ -uint8_t x_77; -lean_dec(x_12); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -x_77 = !lean_is_exclusive(x_39); -if (x_77 == 0) -{ -lean_object* x_78; -x_78 = lean_ctor_get(x_39, 0); -lean_dec(x_78); -lean_ctor_set_tag(x_39, 1); -lean_ctor_set(x_39, 0, x_35); -x_14 = x_39; -goto block_23; -} -else -{ -lean_object* x_79; lean_object* x_80; -x_79 = lean_ctor_get(x_39, 1); -lean_inc(x_79); -lean_dec(x_39); -x_80 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_80, 0, x_35); -lean_ctor_set(x_80, 1, x_79); -x_14 = x_80; -goto block_23; -} -} -} -block_23: -{ -if (lean_obj_tag(x_14) == 0) -{ -uint8_t x_15; -x_15 = !lean_is_exclusive(x_14); -if (x_15 == 0) -{ -return x_14; -} -else -{ -lean_object* x_16; lean_object* x_17; lean_object* x_18; -x_16 = lean_ctor_get(x_14, 0); -x_17 = lean_ctor_get(x_14, 1); -lean_inc(x_17); -lean_inc(x_16); -lean_dec(x_14); -x_18 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_18, 0, x_16); -lean_ctor_set(x_18, 1, x_17); -return x_18; -} -} -else -{ -uint8_t x_19; -x_19 = !lean_is_exclusive(x_14); -if (x_19 == 0) -{ -return x_14; -} -else -{ -lean_object* x_20; lean_object* x_21; lean_object* x_22; -x_20 = lean_ctor_get(x_14, 0); -x_21 = lean_ctor_get(x_14, 1); -lean_inc(x_21); -lean_inc(x_20); -lean_dec(x_14); -x_22 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_22, 0, x_20); -lean_ctor_set(x_22, 1, x_21); -return x_22; -} -} -} -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_orelse_x27(lean_object* x_1) { -_start: -{ -lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_orelse_x27___rarg), 8, 0); -return x_2; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop_match__1___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3) { -_start: -{ -if (lean_obj_tag(x_1) == 0) -{ -lean_object* x_4; lean_object* x_5; -lean_dec(x_2); -x_4 = lean_box(0); -x_5 = lean_apply_1(x_3, x_4); -return x_5; -} -else -{ -lean_object* x_6; lean_object* x_7; -lean_dec(x_3); -x_6 = lean_ctor_get(x_1, 0); -lean_inc(x_6); -lean_dec(x_1); -x_7 = lean_apply_1(x_2, x_6); -return x_7; -} -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop_match__1(lean_object* x_1, lean_object* x_2) { -_start: -{ -lean_object* x_3; -x_3 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop_match__1___rarg), 3, 0); -return x_3; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop_match__1___boxed(lean_object* x_1, lean_object* x_2) { -_start: -{ -lean_object* x_3; -x_3 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop_match__1(x_1, x_2); -lean_dec(x_1); -return x_3; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop_match__2___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3) { -_start: -{ -if (lean_obj_tag(x_1) == 0) -{ -lean_object* x_4; lean_object* x_5; -lean_dec(x_2); -x_4 = lean_box(0); -x_5 = lean_apply_1(x_3, x_4); -return x_5; -} -else -{ -lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; -lean_dec(x_3); -x_6 = lean_ctor_get(x_1, 0); -lean_inc(x_6); -lean_dec(x_1); -x_7 = lean_ctor_get(x_6, 0); -lean_inc(x_7); -x_8 = lean_ctor_get(x_6, 1); -lean_inc(x_8); -lean_dec(x_6); -x_9 = lean_apply_2(x_2, x_7, x_8); -return x_9; -} -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop_match__2(lean_object* x_1) { -_start: -{ -lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop_match__2___rarg), 3, 0); -return x_2; -} -} -lean_object* l_Lean_hasConst___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { -_start: -{ -lean_object* x_8; uint8_t x_9; -x_8 = lean_st_ref_get(x_6, x_7); -x_9 = !lean_is_exclusive(x_8); -if (x_9 == 0) -{ -lean_object* x_10; lean_object* x_11; uint8_t x_12; lean_object* x_13; -x_10 = lean_ctor_get(x_8, 0); -x_11 = lean_ctor_get(x_10, 0); -lean_inc(x_11); -lean_dec(x_10); -x_12 = l_Lean_Environment_contains(x_11, x_1); -x_13 = lean_box(x_12); -lean_ctor_set(x_8, 0, x_13); -return x_8; -} -else -{ -lean_object* x_14; lean_object* x_15; lean_object* x_16; uint8_t x_17; lean_object* x_18; lean_object* x_19; -x_14 = lean_ctor_get(x_8, 0); -x_15 = lean_ctor_get(x_8, 1); -lean_inc(x_15); -lean_inc(x_14); -lean_dec(x_8); -x_16 = lean_ctor_get(x_14, 0); -lean_inc(x_16); -lean_dec(x_14); -x_17 = l_Lean_Environment_contains(x_16, x_1); -x_18 = lean_box(x_17); -x_19 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_19, 0, x_18); -lean_ctor_set(x_19, 1, x_15); -return x_19; -} -} -} -static lean_object* _init_l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__2___closed__1() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string("Lean.Elab.PreDefinition.Structural"); -return x_1; -} -} -static lean_object* _init_l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__2___closed__2() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string("_private.Lean.Elab.PreDefinition.Structural.0.Lean.Elab.Structural.findRecArg.loop"); -return x_1; -} -} -static lean_object* _init_l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__2___closed__3() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string("unreachable code has been reached"); -return x_1; -} -} -static lean_object* _init_l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__2___closed__4() { -_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_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__2___closed__1; -x_2 = l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__2___closed__2; -x_3 = lean_unsigned_to_nat(174u); -x_4 = lean_unsigned_to_nat(119u); -x_5 = l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__2___closed__3; -x_6 = l___private_Init_Util_0__mkPanicMessageWithDecl(x_1, x_2, x_3, x_4, x_5); -return x_6; -} -} -lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__2(lean_object* x_1, size_t x_2, size_t x_3, lean_object* x_4) { -_start: -{ -uint8_t x_5; -x_5 = x_3 < x_2; -if (x_5 == 0) -{ -lean_object* x_6; -x_6 = x_4; -return x_6; -} -else -{ -lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; size_t x_12; size_t x_13; -x_7 = lean_array_uget(x_4, x_3); -x_8 = lean_unsigned_to_nat(0u); -x_9 = lean_array_uset(x_4, x_3, x_8); -x_10 = x_7; -x_11 = l_Array_indexOfAux___at_Lean_Meta_getElimInfo___spec__1(x_1, x_10, x_8); -lean_dec(x_10); -x_12 = 1; -x_13 = x_3 + x_12; -if (lean_obj_tag(x_11) == 0) -{ -lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; -x_14 = l_instInhabitedNat; -x_15 = l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__2___closed__4; -x_16 = lean_panic_fn(x_14, x_15); -x_17 = x_16; -x_18 = lean_array_uset(x_9, x_3, x_17); -x_3 = x_13; -x_4 = x_18; -goto _start; -} -else -{ -lean_object* x_20; lean_object* x_21; lean_object* x_22; -x_20 = lean_ctor_get(x_11, 0); -lean_inc(x_20); -lean_dec(x_11); -x_21 = x_20; -x_22 = lean_array_uset(x_9, x_3, x_21); -x_3 = x_13; -x_4 = x_22; -goto _start; -} -} -} -} -lean_object* l_Lean_isInductivePredicate___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__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) { -_start: -{ -lean_object* x_8; uint8_t x_9; -x_8 = lean_st_ref_get(x_6, x_7); -x_9 = !lean_is_exclusive(x_8); -if (x_9 == 0) -{ -lean_object* x_10; lean_object* x_11; lean_object* x_12; -x_10 = lean_ctor_get(x_8, 0); -x_11 = lean_ctor_get(x_10, 0); -lean_inc(x_11); -lean_dec(x_10); -x_12 = lean_environment_find(x_11, x_1); -if (lean_obj_tag(x_12) == 0) -{ -uint8_t x_13; lean_object* x_14; -x_13 = 0; -x_14 = lean_box(x_13); -lean_ctor_set(x_8, 0, x_14); -return x_8; -} -else -{ -lean_object* x_15; -x_15 = lean_ctor_get(x_12, 0); -lean_inc(x_15); -lean_dec(x_12); -if (lean_obj_tag(x_15) == 5) -{ -lean_object* x_16; lean_object* x_17; lean_object* x_18; uint8_t x_19; lean_object* x_20; -x_16 = lean_ctor_get(x_15, 0); -lean_inc(x_16); -lean_dec(x_15); -x_17 = lean_ctor_get(x_16, 0); -lean_inc(x_17); -lean_dec(x_16); -x_18 = lean_ctor_get(x_17, 2); -lean_inc(x_18); -lean_dec(x_17); -x_19 = l_Lean_isInductivePredicate_visit(x_18); -lean_dec(x_18); -x_20 = lean_box(x_19); -lean_ctor_set(x_8, 0, x_20); -return x_8; -} -else -{ -uint8_t x_21; lean_object* x_22; -lean_dec(x_15); -x_21 = 0; -x_22 = lean_box(x_21); -lean_ctor_set(x_8, 0, x_22); -return x_8; -} -} -} -else -{ -lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; -x_23 = lean_ctor_get(x_8, 0); -x_24 = lean_ctor_get(x_8, 1); -lean_inc(x_24); -lean_inc(x_23); -lean_dec(x_8); -x_25 = lean_ctor_get(x_23, 0); -lean_inc(x_25); -lean_dec(x_23); -x_26 = lean_environment_find(x_25, x_1); -if (lean_obj_tag(x_26) == 0) -{ -uint8_t x_27; lean_object* x_28; lean_object* x_29; -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_24); -return x_29; -} -else -{ -lean_object* x_30; -x_30 = lean_ctor_get(x_26, 0); -lean_inc(x_30); -lean_dec(x_26); -if (lean_obj_tag(x_30) == 5) -{ -lean_object* x_31; lean_object* x_32; lean_object* x_33; uint8_t x_34; lean_object* x_35; lean_object* x_36; -x_31 = lean_ctor_get(x_30, 0); -lean_inc(x_31); -lean_dec(x_30); -x_32 = lean_ctor_get(x_31, 0); -lean_inc(x_32); -lean_dec(x_31); -x_33 = lean_ctor_get(x_32, 2); -lean_inc(x_33); -lean_dec(x_32); -x_34 = l_Lean_isInductivePredicate_visit(x_33); -lean_dec(x_33); -x_35 = lean_box(x_34); -x_36 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_36, 0, x_35); -lean_ctor_set(x_36, 1, x_24); -return x_36; -} -else -{ -uint8_t x_37; lean_object* x_38; lean_object* x_39; -lean_dec(x_30); -x_37 = 0; -x_38 = lean_box(x_37); -x_39 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_39, 0, x_38); -lean_ctor_set(x_39, 1, x_24); -return x_39; -} -} -} -} -} -lean_object* l_ReaderT_bind___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__4___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { -_start: -{ -lean_object* x_9; -lean_inc(x_7); -lean_inc(x_6); -lean_inc(x_5); -lean_inc(x_4); -lean_inc(x_3); -x_9 = lean_apply_6(x_1, x_3, x_4, x_5, x_6, x_7, x_8); -if (lean_obj_tag(x_9) == 0) -{ -lean_object* x_10; lean_object* x_11; lean_object* x_12; -x_10 = lean_ctor_get(x_9, 0); -lean_inc(x_10); -x_11 = lean_ctor_get(x_9, 1); -lean_inc(x_11); -lean_dec(x_9); -x_12 = lean_apply_7(x_2, x_10, x_3, x_4, x_5, x_6, x_7, x_11); -return x_12; -} -else -{ -uint8_t x_13; -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -x_13 = !lean_is_exclusive(x_9); -if (x_13 == 0) -{ -return x_9; -} -else -{ -lean_object* x_14; lean_object* x_15; lean_object* x_16; -x_14 = lean_ctor_get(x_9, 0); -x_15 = lean_ctor_get(x_9, 1); -lean_inc(x_15); -lean_inc(x_14); -lean_dec(x_9); -x_16 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_16, 0, x_14); -lean_ctor_set(x_16, 1, x_15); -return x_16; -} -} -} -} -lean_object* l_ReaderT_bind___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__4(lean_object* x_1, lean_object* x_2) { -_start: -{ -lean_object* x_3; -x_3 = lean_alloc_closure((void*)(l_ReaderT_bind___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__4___rarg), 8, 0); -return x_3; -} -} -lean_object* l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__5___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { -_start: -{ -lean_object* x_8; lean_object* x_9; uint8_t x_10; -x_8 = lean_ctor_get(x_5, 3); -x_9 = l_Lean_addMessageContextFull___at_Lean_Meta_instAddMessageContextMetaM___spec__1(x_1, x_3, x_4, x_5, x_6, x_7); -x_10 = !lean_is_exclusive(x_9); -if (x_10 == 0) -{ -lean_object* x_11; lean_object* x_12; -x_11 = lean_ctor_get(x_9, 0); -lean_inc(x_8); -x_12 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_12, 0, x_8); -lean_ctor_set(x_12, 1, x_11); -lean_ctor_set_tag(x_9, 1); -lean_ctor_set(x_9, 0, x_12); -return x_9; -} -else -{ -lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; -x_13 = lean_ctor_get(x_9, 0); -x_14 = lean_ctor_get(x_9, 1); -lean_inc(x_14); -lean_inc(x_13); -lean_dec(x_9); -lean_inc(x_8); -x_15 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_15, 0, x_8); -lean_ctor_set(x_15, 1, x_13); -x_16 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_16, 0, x_15); -lean_ctor_set(x_16, 1, x_14); -return x_16; -} -} -} -lean_object* l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__5(lean_object* x_1) { -_start: -{ -lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__5___rarg___boxed), 7, 0); -return x_2; -} -} -lean_object* l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__6___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { -_start: -{ -lean_object* x_8; lean_object* x_9; uint8_t x_10; -x_8 = lean_ctor_get(x_5, 3); -x_9 = l_Lean_addMessageContextFull___at_Lean_Meta_instAddMessageContextMetaM___spec__1(x_1, x_3, x_4, x_5, x_6, x_7); -x_10 = !lean_is_exclusive(x_9); -if (x_10 == 0) -{ -lean_object* x_11; lean_object* x_12; -x_11 = lean_ctor_get(x_9, 0); -lean_inc(x_8); -x_12 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_12, 0, x_8); -lean_ctor_set(x_12, 1, x_11); -lean_ctor_set_tag(x_9, 1); -lean_ctor_set(x_9, 0, x_12); -return x_9; -} -else -{ -lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; -x_13 = lean_ctor_get(x_9, 0); -x_14 = lean_ctor_get(x_9, 1); -lean_inc(x_14); -lean_inc(x_13); -lean_dec(x_9); -lean_inc(x_8); -x_15 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_15, 0, x_8); -lean_ctor_set(x_15, 1, x_13); -x_16 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_16, 0, x_15); -lean_ctor_set(x_16, 1, x_14); -return x_16; -} -} -} -lean_object* l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__6(lean_object* x_1) { -_start: -{ -lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__6___rarg___boxed), 7, 0); -return x_2; -} -} -uint8_t l___private_Init_Data_Array_Basic_0__Array_allDiffAuxAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__8(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { -_start: -{ -lean_object* x_5; uint8_t x_6; -x_5 = lean_unsigned_to_nat(0u); -x_6 = lean_nat_dec_eq(x_3, x_5); -if (x_6 == 0) -{ -lean_object* x_7; lean_object* x_8; lean_object* x_9; uint8_t x_10; -x_7 = lean_unsigned_to_nat(1u); -x_8 = lean_nat_sub(x_3, x_7); -lean_dec(x_3); -x_9 = lean_array_fget(x_1, x_8); -x_10 = lean_expr_eqv(x_2, x_9); -lean_dec(x_9); -if (x_10 == 0) -{ -x_3 = x_8; -x_4 = lean_box(0); -goto _start; -} -else -{ -uint8_t x_12; -lean_dec(x_8); -x_12 = 0; -return x_12; -} -} -else -{ -uint8_t x_13; -lean_dec(x_3); -x_13 = 1; -return x_13; -} -} -} -uint8_t l___private_Init_Data_Array_Basic_0__Array_allDiffAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__7(lean_object* x_1, lean_object* x_2) { -_start: -{ -lean_object* x_3; uint8_t x_4; -x_3 = lean_array_get_size(x_1); -x_4 = lean_nat_dec_lt(x_2, x_3); -lean_dec(x_3); -if (x_4 == 0) -{ -uint8_t x_5; -lean_dec(x_2); -x_5 = 1; -return x_5; -} -else -{ -lean_object* x_6; uint8_t x_7; -x_6 = lean_array_fget(x_1, x_2); -lean_inc(x_2); -x_7 = l___private_Init_Data_Array_Basic_0__Array_allDiffAuxAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__8(x_1, x_6, x_2, lean_box(0)); -lean_dec(x_6); -if (x_7 == 0) -{ -uint8_t x_8; -lean_dec(x_2); -x_8 = 0; -return x_8; -} -else -{ -lean_object* x_9; lean_object* x_10; -x_9 = lean_unsigned_to_nat(1u); -x_10 = lean_nat_add(x_2, x_9); -lean_dec(x_2); -x_2 = x_10; -goto _start; -} -} -} -} -lean_object* l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__9___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { -_start: -{ -lean_object* x_8; lean_object* x_9; uint8_t x_10; -x_8 = lean_ctor_get(x_5, 3); -x_9 = l_Lean_addMessageContextFull___at_Lean_Meta_instAddMessageContextMetaM___spec__1(x_1, x_3, x_4, x_5, x_6, x_7); -x_10 = !lean_is_exclusive(x_9); -if (x_10 == 0) -{ -lean_object* x_11; lean_object* x_12; -x_11 = lean_ctor_get(x_9, 0); -lean_inc(x_8); -x_12 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_12, 0, x_8); -lean_ctor_set(x_12, 1, x_11); -lean_ctor_set_tag(x_9, 1); -lean_ctor_set(x_9, 0, x_12); -return x_9; -} -else -{ -lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; -x_13 = lean_ctor_get(x_9, 0); -x_14 = lean_ctor_get(x_9, 1); -lean_inc(x_14); -lean_inc(x_13); -lean_dec(x_9); -lean_inc(x_8); -x_15 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_15, 0, x_8); -lean_ctor_set(x_15, 1, x_13); -x_16 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_16, 0, x_15); -lean_ctor_set(x_16, 1, x_14); -return x_16; -} -} -} -lean_object* l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__9(lean_object* x_1) { -_start: -{ -lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__9___rarg___boxed), 7, 0); -return x_2; -} -} -lean_object* l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__10___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { -_start: -{ -lean_object* x_8; lean_object* x_9; uint8_t x_10; -x_8 = lean_ctor_get(x_5, 3); -x_9 = l_Lean_addMessageContextFull___at_Lean_Meta_instAddMessageContextMetaM___spec__1(x_1, x_3, x_4, x_5, x_6, x_7); -x_10 = !lean_is_exclusive(x_9); -if (x_10 == 0) -{ -lean_object* x_11; lean_object* x_12; -x_11 = lean_ctor_get(x_9, 0); -lean_inc(x_8); -x_12 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_12, 0, x_8); -lean_ctor_set(x_12, 1, x_11); -lean_ctor_set_tag(x_9, 1); -lean_ctor_set(x_9, 0, x_12); -return x_9; -} -else -{ -lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; -x_13 = lean_ctor_get(x_9, 0); -x_14 = lean_ctor_get(x_9, 1); -lean_inc(x_14); -lean_inc(x_13); -lean_dec(x_9); -lean_inc(x_8); -x_15 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_15, 0, x_8); -lean_ctor_set(x_15, 1, x_13); -x_16 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_16, 0, x_15); -lean_ctor_set(x_16, 1, x_14); -return x_16; -} -} -} -lean_object* l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__10(lean_object* x_1) { -_start: -{ -lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__10___rarg___boxed), 7, 0); -return x_2; -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__1() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string("argument #"); -return x_1; -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__2() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__1; -x_2 = l_Lean_stringToMessageData(x_1); -return x_2; -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__3() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string(" was not used for structural recursion"); -return x_1; -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__4() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__3; -x_2 = l_Lean_stringToMessageData(x_1); -return x_2; -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__5() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string(""); -return x_1; -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__6() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__5; -x_2 = l_Lean_stringToMessageData(x_1); -return x_2; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1(lean_object* x_1, lean_object* x_2) { -_start: -{ -lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; -x_3 = lean_unsigned_to_nat(1u); -x_4 = lean_nat_add(x_1, x_3); -x_5 = l_Nat_repr(x_4); -x_6 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_6, 0, x_5); -x_7 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_7, 0, x_6); -x_8 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__2; -x_9 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_9, 0, x_8); -lean_ctor_set(x_9, 1, x_7); -x_10 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__4; -x_11 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_11, 0, x_9); -lean_ctor_set(x_11, 1, x_10); -x_12 = l_Lean_indentD(x_2); -x_13 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_13, 0, x_11); -lean_ctor_set(x_13, 1, x_12); -x_14 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__6; -x_15 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_15, 0, x_13); -lean_ctor_set(x_15, 1, x_14); -return x_15; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___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; lean_object* x_11; -x_10 = lean_apply_2(x_1, x_2, x_4); -x_11 = l_Lean_Meta_mapErrorImp___rarg(x_10, x_3, x_5, x_6, x_7, x_8, x_9); -return x_11; -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__1() { -_start: -{ -lean_object* x_1; -x_1 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_hasBadIndexDep_x3f___lambda__1___boxed), 7, 0); -return x_1; -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__2() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string(" was not used because its type is an inductive datatype"); -return x_1; -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__3() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__2; -x_2 = l_Lean_stringToMessageData(x_1); -return x_2; -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__4() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string("\nand parameter"); -return x_1; -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__5() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__4; -x_2 = l_Lean_stringToMessageData(x_1); -return x_2; -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__6() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string("\ndepends on"); -return x_1; -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__7() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__6; -x_2 = l_Lean_stringToMessageData(x_1); -return x_2; -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__8() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string(" was not used because its type is an inductive family"); -return x_1; -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__9() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__8; -x_2 = l_Lean_stringToMessageData(x_1); -return x_2; -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__10() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string("\nand index"); -return x_1; -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__11() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__10; -x_2 = l_Lean_stringToMessageData(x_1); -return x_2; -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__12() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string("\ndepends on the non index"); -return x_1; -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__13() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__12; -x_2 = l_Lean_stringToMessageData(x_1); -return x_2; -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__14() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string(" was not used because its type is an inductive family and indices are not pairwise distinct"); -return x_1; -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__15() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__14; -x_2 = l_Lean_stringToMessageData(x_1); -return x_2; -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__16() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string(" was not used because its type is an inductive family and indices are not variables"); -return x_1; -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__17() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__16; -x_2 = l_Lean_stringToMessageData(x_1); -return x_2; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10) { -_start: -{ -lean_object* x_11; uint8_t x_12; -x_11 = lean_array_get_size(x_2); -x_12 = lean_nat_dec_lt(x_4, x_11); -if (x_12 == 0) -{ -lean_object* x_13; -lean_dec(x_11); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_13 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_throwStructuralFailed___rarg(x_6, x_7, x_8, x_9, x_10); -return x_13; -} -else -{ -lean_object* x_14; lean_object* x_15; -x_14 = lean_array_fget(x_2, x_4); -lean_inc(x_6); -x_15 = l_Lean_Meta_getFVarLocalDecl(x_14, x_6, x_7, x_8, x_9, x_10); -lean_dec(x_14); -if (lean_obj_tag(x_15) == 0) -{ -lean_object* x_16; lean_object* x_17; uint8_t x_18; -x_16 = lean_ctor_get(x_15, 0); -lean_inc(x_16); -x_17 = lean_ctor_get(x_15, 1); -lean_inc(x_17); -lean_dec(x_15); -x_18 = l_Lean_LocalDecl_isLet(x_16); -if (x_18 == 0) -{ -lean_object* x_19; lean_object* x_20; -x_19 = l_Lean_LocalDecl_type(x_16); -lean_dec(x_16); -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -lean_inc(x_6); -x_20 = l_Lean_Meta_whnfD(x_19, x_6, x_7, x_8, x_9, x_17); -if (lean_obj_tag(x_20) == 0) -{ -lean_object* x_21; lean_object* x_22; lean_object* x_23; -x_21 = lean_ctor_get(x_20, 0); -lean_inc(x_21); -x_22 = lean_ctor_get(x_20, 1); -lean_inc(x_22); -lean_dec(x_20); -x_23 = l_Lean_Expr_getAppFn(x_21); -if (lean_obj_tag(x_23) == 4) -{ -lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; -x_24 = lean_ctor_get(x_23, 0); -lean_inc(x_24); -x_25 = lean_ctor_get(x_23, 1); -lean_inc(x_25); -lean_dec(x_23); -x_26 = lean_st_ref_get(x_9, x_22); -x_27 = lean_ctor_get(x_26, 0); -lean_inc(x_27); -x_28 = lean_ctor_get(x_26, 1); -lean_inc(x_28); -lean_dec(x_26); -x_29 = lean_ctor_get(x_27, 0); -lean_inc(x_29); -lean_dec(x_27); -x_30 = lean_environment_find(x_29, x_24); -if (lean_obj_tag(x_30) == 0) -{ -lean_object* x_31; lean_object* x_32; -lean_dec(x_25); -lean_dec(x_21); -lean_dec(x_11); -x_31 = lean_unsigned_to_nat(1u); -x_32 = lean_nat_add(x_4, x_31); -lean_dec(x_4); -x_4 = x_32; -x_10 = x_28; -goto _start; -} -else -{ -lean_object* x_34; -x_34 = lean_ctor_get(x_30, 0); -lean_inc(x_34); -lean_dec(x_30); -if (lean_obj_tag(x_34) == 5) -{ -lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; uint8_t x_42; -x_35 = lean_ctor_get(x_34, 0); -lean_inc(x_35); -lean_dec(x_34); -x_36 = lean_ctor_get(x_35, 0); -lean_inc(x_36); -x_37 = lean_ctor_get(x_36, 0); -lean_inc(x_37); -lean_dec(x_36); -x_38 = l_Lean_brecOnSuffix; -lean_inc(x_37); -x_39 = lean_name_mk_string(x_37, x_38); -x_40 = l_Lean_hasConst___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__1(x_39, x_5, x_6, x_7, x_8, x_9, x_28); -x_41 = lean_ctor_get(x_40, 0); -lean_inc(x_41); -x_42 = lean_unbox(x_41); -lean_dec(x_41); -if (x_42 == 0) -{ -lean_object* x_43; lean_object* x_44; lean_object* x_45; -lean_dec(x_37); -lean_dec(x_35); -lean_dec(x_25); -lean_dec(x_21); -lean_dec(x_11); -x_43 = lean_ctor_get(x_40, 1); -lean_inc(x_43); -lean_dec(x_40); -x_44 = lean_unsigned_to_nat(1u); -x_45 = lean_nat_add(x_4, x_44); -lean_dec(x_4); -x_4 = x_45; -x_10 = x_43; -goto _start; -} -else -{ -lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_object* x_51; lean_object* x_52; uint8_t x_53; lean_object* x_54; -x_47 = lean_ctor_get(x_40, 1); -lean_inc(x_47); -lean_dec(x_40); -x_48 = l_Lean_binductionOnSuffix; -lean_inc(x_37); -x_49 = lean_name_mk_string(x_37, x_48); -x_50 = l_Lean_hasConst___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__1(x_49, x_5, x_6, x_7, x_8, x_9, x_47); -x_51 = lean_ctor_get(x_50, 0); -lean_inc(x_51); -x_52 = lean_ctor_get(x_50, 1); -lean_inc(x_52); -lean_dec(x_50); -x_53 = lean_ctor_get_uint8(x_35, sizeof(void*)*5 + 2); -if (x_53 == 0) -{ -lean_object* x_203; -lean_dec(x_51); -x_203 = lean_box(0); -x_54 = x_203; -goto block_202; -} -else -{ -uint8_t x_204; -x_204 = lean_unbox(x_51); -lean_dec(x_51); -if (x_204 == 0) -{ -lean_object* x_205; lean_object* x_206; -lean_dec(x_37); -lean_dec(x_35); -lean_dec(x_25); -lean_dec(x_21); -lean_dec(x_11); -x_205 = lean_unsigned_to_nat(1u); -x_206 = lean_nat_add(x_4, x_205); -lean_dec(x_4); -x_4 = x_206; -x_10 = x_52; -goto _start; -} -else -{ -lean_object* x_208; -x_208 = lean_box(0); -x_54 = x_208; -goto block_202; -} -} -block_202: -{ -lean_object* x_55; lean_object* x_56; lean_object* x_57; lean_object* x_58; lean_object* x_59; lean_object* x_60; lean_object* x_61; lean_object* x_62; lean_object* x_63; lean_object* x_64; lean_object* x_65; lean_object* x_66; lean_object* x_158; lean_object* x_178; uint8_t x_179; -lean_dec(x_54); -x_55 = lean_unsigned_to_nat(0u); -x_56 = l_Lean_Expr_getAppNumArgsAux(x_21, x_55); -x_57 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_getFixedPrefix___lambda__2___closed__1; -lean_inc(x_56); -x_58 = lean_mk_array(x_56, x_57); -x_59 = lean_unsigned_to_nat(1u); -x_60 = lean_nat_sub(x_56, x_59); -lean_dec(x_56); -lean_inc(x_21); -x_61 = l___private_Lean_Expr_0__Lean_Expr_getAppArgsAux(x_21, x_58, x_60); -x_62 = lean_ctor_get(x_35, 1); -lean_inc(x_62); -lean_dec(x_35); -lean_inc(x_62); -lean_inc(x_61); -x_63 = l_Array_extract___rarg(x_61, x_55, x_62); -x_64 = lean_array_get_size(x_61); -x_65 = l_Array_extract___rarg(x_61, x_62, x_64); -x_178 = lean_array_get_size(x_65); -x_179 = lean_nat_dec_lt(x_55, x_178); -if (x_179 == 0) -{ -lean_object* x_180; -lean_dec(x_178); -x_180 = lean_box(0); -x_158 = x_180; -goto block_177; -} -else -{ -uint8_t x_181; -x_181 = lean_nat_dec_le(x_178, x_178); -if (x_181 == 0) -{ -lean_object* x_182; -lean_dec(x_178); -x_182 = lean_box(0); -x_158 = x_182; -goto block_177; -} -else -{ -size_t x_183; size_t x_184; uint8_t x_185; -x_183 = 0; -x_184 = lean_usize_of_nat(x_178); -lean_dec(x_178); -x_185 = l_Array_anyMUnsafe_any___at_Lean_Meta_getElimInfo___spec__7(x_65, x_183, x_184); -if (x_185 == 0) -{ -lean_object* x_186; -x_186 = lean_box(0); -x_158 = x_186; -goto block_177; -} -else -{ -lean_object* x_187; lean_object* x_188; lean_object* x_189; lean_object* x_190; lean_object* x_191; lean_object* x_192; lean_object* x_193; 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; -lean_dec(x_65); -lean_dec(x_63); -lean_dec(x_37); -lean_dec(x_25); -lean_dec(x_11); -x_187 = lean_nat_add(x_4, x_59); -lean_dec(x_4); -lean_inc(x_187); -x_188 = l_Nat_repr(x_187); -x_189 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_189, 0, x_188); -x_190 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_190, 0, x_189); -x_191 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__2; -x_192 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_192, 0, x_191); -lean_ctor_set(x_192, 1, x_190); -x_193 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__17; -x_194 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_194, 0, x_192); -lean_ctor_set(x_194, 1, x_193); -x_195 = l_Lean_indentExpr(x_21); -x_196 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_196, 0, x_194); -lean_ctor_set(x_196, 1, x_195); -x_197 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__6; -x_198 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_198, 0, x_196); -lean_ctor_set(x_198, 1, x_197); -x_199 = lean_alloc_closure((void*)(l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__10___rarg___boxed), 7, 1); -lean_closure_set(x_199, 0, x_198); -x_200 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg), 10, 4); -lean_closure_set(x_200, 0, x_1); -lean_closure_set(x_200, 1, x_2); -lean_closure_set(x_200, 2, x_3); -lean_closure_set(x_200, 3, x_187); -x_201 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_orelse_x27___rarg(x_199, x_200, x_5, x_6, x_7, x_8, x_9, x_52); -return x_201; -} -} -} -block_157: -{ -lean_object* x_67; lean_object* x_68; lean_object* x_69; -lean_inc(x_66); -lean_inc(x_2); -x_67 = l_Array_extract___rarg(x_2, x_55, x_66); -lean_inc(x_2); -x_68 = l_Array_extract___rarg(x_2, x_66, x_11); -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -lean_inc(x_6); -x_69 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_hasBadIndexDep_x3f(x_68, x_65, x_6, x_7, x_8, x_9, x_52); -if (lean_obj_tag(x_69) == 0) -{ -lean_object* x_70; -x_70 = lean_ctor_get(x_69, 0); -lean_inc(x_70); -if (lean_obj_tag(x_70) == 0) -{ -lean_object* x_71; lean_object* x_72; -x_71 = lean_ctor_get(x_69, 1); -lean_inc(x_71); -lean_dec(x_69); -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -lean_inc(x_6); -x_72 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_hasBadParamDep_x3f(x_68, x_63, x_6, x_7, x_8, x_9, x_71); -if (lean_obj_tag(x_72) == 0) -{ -lean_object* x_73; -x_73 = lean_ctor_get(x_72, 0); -lean_inc(x_73); -if (lean_obj_tag(x_73) == 0) -{ -lean_object* x_74; lean_object* x_75; size_t x_76; size_t x_77; lean_object* x_78; lean_object* x_79; lean_object* x_80; lean_object* x_81; lean_object* x_82; lean_object* x_83; lean_object* x_84; lean_object* x_85; lean_object* x_86; uint8_t x_87; lean_object* x_88; lean_object* x_89; lean_object* x_90; lean_object* x_91; lean_object* x_92; lean_object* x_93; lean_object* x_94; -lean_dec(x_21); -x_74 = lean_ctor_get(x_72, 1); -lean_inc(x_74); -lean_dec(x_72); -x_75 = lean_array_get_size(x_65); -x_76 = lean_usize_of_nat(x_75); -lean_dec(x_75); -x_77 = 0; -lean_inc(x_65); -x_78 = x_65; -x_79 = l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__2(x_68, x_76, x_77, x_78); -x_80 = x_79; -lean_inc(x_37); -x_81 = l_Lean_isInductivePredicate___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__3(x_37, x_5, x_6, x_7, x_8, x_9, x_74); -x_82 = lean_ctor_get(x_81, 0); -lean_inc(x_82); -x_83 = lean_ctor_get(x_81, 1); -lean_inc(x_83); -lean_dec(x_81); -x_84 = lean_array_get_size(x_67); -x_85 = lean_nat_sub(x_4, x_84); -lean_dec(x_84); -x_86 = lean_alloc_ctor(0, 8, 2); -lean_ctor_set(x_86, 0, x_67); -lean_ctor_set(x_86, 1, x_68); -lean_ctor_set(x_86, 2, x_85); -lean_ctor_set(x_86, 3, x_80); -lean_ctor_set(x_86, 4, x_37); -lean_ctor_set(x_86, 5, x_25); -lean_ctor_set(x_86, 6, x_63); -lean_ctor_set(x_86, 7, x_65); -lean_ctor_set_uint8(x_86, sizeof(void*)*8, x_53); -x_87 = lean_unbox(x_82); -lean_dec(x_82); -lean_ctor_set_uint8(x_86, sizeof(void*)*8 + 1, x_87); -lean_inc(x_4); -x_88 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___boxed), 2, 1); -lean_closure_set(x_88, 0, x_4); -lean_inc(x_3); -x_89 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__2), 9, 3); -lean_closure_set(x_89, 0, x_3); -lean_closure_set(x_89, 1, x_86); -lean_closure_set(x_89, 2, x_88); -x_90 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__1; -x_91 = lean_alloc_closure((void*)(l_ReaderT_bind___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__4___rarg), 8, 2); -lean_closure_set(x_91, 0, x_89); -lean_closure_set(x_91, 1, x_90); -x_92 = lean_nat_add(x_4, x_59); -lean_dec(x_4); -x_93 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg), 10, 4); -lean_closure_set(x_93, 0, x_1); -lean_closure_set(x_93, 1, x_2); -lean_closure_set(x_93, 2, x_3); -lean_closure_set(x_93, 3, x_92); -x_94 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_orelse_x27___rarg(x_91, x_93, x_5, x_6, x_7, x_8, x_9, x_83); -return x_94; -} -else -{ -lean_object* x_95; lean_object* x_96; lean_object* x_97; lean_object* x_98; lean_object* x_99; lean_object* x_100; lean_object* x_101; lean_object* x_102; lean_object* x_103; lean_object* x_104; lean_object* x_105; lean_object* x_106; lean_object* x_107; lean_object* x_108; lean_object* x_109; lean_object* x_110; lean_object* x_111; lean_object* x_112; lean_object* x_113; lean_object* x_114; lean_object* x_115; lean_object* x_116; lean_object* x_117; lean_object* x_118; lean_object* x_119; lean_object* x_120; lean_object* x_121; -lean_dec(x_68); -lean_dec(x_67); -lean_dec(x_65); -lean_dec(x_63); -lean_dec(x_37); -lean_dec(x_25); -x_95 = lean_ctor_get(x_73, 0); -lean_inc(x_95); -lean_dec(x_73); -x_96 = lean_ctor_get(x_72, 1); -lean_inc(x_96); -lean_dec(x_72); -x_97 = lean_ctor_get(x_95, 0); -lean_inc(x_97); -x_98 = lean_ctor_get(x_95, 1); -lean_inc(x_98); -lean_dec(x_95); -x_99 = lean_nat_add(x_4, x_59); -lean_dec(x_4); -lean_inc(x_99); -x_100 = l_Nat_repr(x_99); -x_101 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_101, 0, x_100); -x_102 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_102, 0, x_101); -x_103 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__2; -x_104 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_104, 0, x_103); -lean_ctor_set(x_104, 1, x_102); -x_105 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__3; -x_106 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_106, 0, x_104); -lean_ctor_set(x_106, 1, x_105); -x_107 = l_Lean_indentExpr(x_21); -x_108 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_108, 0, x_106); -lean_ctor_set(x_108, 1, x_107); -x_109 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__5; -x_110 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_110, 0, x_108); -lean_ctor_set(x_110, 1, x_109); -x_111 = l_Lean_indentExpr(x_97); -x_112 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_112, 0, x_110); -lean_ctor_set(x_112, 1, x_111); -x_113 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__7; -x_114 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_114, 0, x_112); -lean_ctor_set(x_114, 1, x_113); -x_115 = l_Lean_indentExpr(x_98); -x_116 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_116, 0, x_114); -lean_ctor_set(x_116, 1, x_115); -x_117 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__6; -x_118 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_118, 0, x_116); -lean_ctor_set(x_118, 1, x_117); -x_119 = lean_alloc_closure((void*)(l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__5___rarg___boxed), 7, 1); -lean_closure_set(x_119, 0, x_118); -x_120 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg), 10, 4); -lean_closure_set(x_120, 0, x_1); -lean_closure_set(x_120, 1, x_2); -lean_closure_set(x_120, 2, x_3); -lean_closure_set(x_120, 3, x_99); -x_121 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_orelse_x27___rarg(x_119, x_120, x_5, x_6, x_7, x_8, x_9, x_96); -return x_121; -} -} -else -{ -uint8_t x_122; -lean_dec(x_68); -lean_dec(x_67); -lean_dec(x_65); -lean_dec(x_63); -lean_dec(x_37); -lean_dec(x_25); -lean_dec(x_21); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_122 = !lean_is_exclusive(x_72); -if (x_122 == 0) -{ -return x_72; -} -else -{ -lean_object* x_123; lean_object* x_124; lean_object* x_125; -x_123 = lean_ctor_get(x_72, 0); -x_124 = lean_ctor_get(x_72, 1); -lean_inc(x_124); -lean_inc(x_123); -lean_dec(x_72); -x_125 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_125, 0, x_123); -lean_ctor_set(x_125, 1, x_124); -return x_125; -} -} -} -else -{ -lean_object* x_126; lean_object* x_127; lean_object* x_128; lean_object* x_129; lean_object* x_130; lean_object* x_131; lean_object* x_132; lean_object* x_133; lean_object* x_134; lean_object* x_135; lean_object* x_136; lean_object* x_137; lean_object* x_138; lean_object* x_139; lean_object* x_140; lean_object* x_141; lean_object* x_142; lean_object* x_143; lean_object* x_144; lean_object* x_145; lean_object* x_146; lean_object* x_147; lean_object* x_148; lean_object* x_149; lean_object* x_150; lean_object* x_151; lean_object* x_152; -lean_dec(x_68); -lean_dec(x_67); -lean_dec(x_65); -lean_dec(x_63); -lean_dec(x_37); -lean_dec(x_25); -x_126 = lean_ctor_get(x_70, 0); -lean_inc(x_126); -lean_dec(x_70); -x_127 = lean_ctor_get(x_69, 1); -lean_inc(x_127); -lean_dec(x_69); -x_128 = lean_ctor_get(x_126, 0); -lean_inc(x_128); -x_129 = lean_ctor_get(x_126, 1); -lean_inc(x_129); -lean_dec(x_126); -x_130 = lean_nat_add(x_4, x_59); -lean_dec(x_4); -lean_inc(x_130); -x_131 = l_Nat_repr(x_130); -x_132 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_132, 0, x_131); -x_133 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_133, 0, x_132); -x_134 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__2; -x_135 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_135, 0, x_134); -lean_ctor_set(x_135, 1, x_133); -x_136 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__9; -x_137 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_137, 0, x_135); -lean_ctor_set(x_137, 1, x_136); -x_138 = l_Lean_indentExpr(x_21); -x_139 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_139, 0, x_137); -lean_ctor_set(x_139, 1, x_138); -x_140 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__11; -x_141 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_141, 0, x_139); -lean_ctor_set(x_141, 1, x_140); -x_142 = l_Lean_indentExpr(x_128); -x_143 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_143, 0, x_141); -lean_ctor_set(x_143, 1, x_142); -x_144 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__13; -x_145 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_145, 0, x_143); -lean_ctor_set(x_145, 1, x_144); -x_146 = l_Lean_indentExpr(x_129); -x_147 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_147, 0, x_145); -lean_ctor_set(x_147, 1, x_146); -x_148 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__6; -x_149 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_149, 0, x_147); -lean_ctor_set(x_149, 1, x_148); -x_150 = lean_alloc_closure((void*)(l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__6___rarg___boxed), 7, 1); -lean_closure_set(x_150, 0, x_149); -x_151 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg), 10, 4); -lean_closure_set(x_151, 0, x_1); -lean_closure_set(x_151, 1, x_2); -lean_closure_set(x_151, 2, x_3); -lean_closure_set(x_151, 3, x_130); -x_152 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_orelse_x27___rarg(x_150, x_151, x_5, x_6, x_7, x_8, x_9, x_127); -return x_152; -} -} -else -{ -uint8_t x_153; -lean_dec(x_68); -lean_dec(x_67); -lean_dec(x_65); -lean_dec(x_63); -lean_dec(x_37); -lean_dec(x_25); -lean_dec(x_21); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_153 = !lean_is_exclusive(x_69); -if (x_153 == 0) -{ -return x_69; -} -else -{ -lean_object* x_154; lean_object* x_155; lean_object* x_156; -x_154 = lean_ctor_get(x_69, 0); -x_155 = lean_ctor_get(x_69, 1); -lean_inc(x_155); -lean_inc(x_154); -lean_dec(x_69); -x_156 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_156, 0, x_154); -lean_ctor_set(x_156, 1, x_155); -return x_156; -} -} -} -block_177: -{ -uint8_t x_159; -lean_dec(x_158); -x_159 = l___private_Init_Data_Array_Basic_0__Array_allDiffAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__7(x_65, x_55); -if (x_159 == 0) -{ -lean_object* x_160; lean_object* x_161; lean_object* x_162; lean_object* x_163; lean_object* x_164; lean_object* x_165; lean_object* x_166; lean_object* x_167; 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; -lean_dec(x_65); -lean_dec(x_63); -lean_dec(x_37); -lean_dec(x_25); -lean_dec(x_11); -x_160 = lean_nat_add(x_4, x_59); -lean_dec(x_4); -lean_inc(x_160); -x_161 = l_Nat_repr(x_160); -x_162 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_162, 0, x_161); -x_163 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_163, 0, x_162); -x_164 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__2; -x_165 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_165, 0, x_164); -lean_ctor_set(x_165, 1, x_163); -x_166 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__15; -x_167 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_167, 0, x_165); -lean_ctor_set(x_167, 1, x_166); -x_168 = l_Lean_indentExpr(x_21); -x_169 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_169, 0, x_167); -lean_ctor_set(x_169, 1, x_168); -x_170 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__6; -x_171 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_171, 0, x_169); -lean_ctor_set(x_171, 1, x_170); -x_172 = lean_alloc_closure((void*)(l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__9___rarg___boxed), 7, 1); -lean_closure_set(x_172, 0, x_171); -x_173 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg), 10, 4); -lean_closure_set(x_173, 0, x_1); -lean_closure_set(x_173, 1, x_2); -lean_closure_set(x_173, 2, x_3); -lean_closure_set(x_173, 3, x_160); -x_174 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_orelse_x27___rarg(x_172, x_173, x_5, x_6, x_7, x_8, x_9, x_52); -return x_174; -} -else -{ -lean_object* x_175; uint8_t x_176; -x_175 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_getIndexMinPos(x_2, x_65); -x_176 = lean_nat_dec_lt(x_175, x_1); -if (x_176 == 0) -{ -lean_dec(x_175); -lean_inc(x_1); -x_66 = x_1; -goto block_157; -} -else -{ -x_66 = x_175; -goto block_157; -} -} -} -} -} -} -else -{ -lean_object* x_209; lean_object* x_210; -lean_dec(x_34); -lean_dec(x_25); -lean_dec(x_21); -lean_dec(x_11); -x_209 = lean_unsigned_to_nat(1u); -x_210 = lean_nat_add(x_4, x_209); -lean_dec(x_4); -x_4 = x_210; -x_10 = x_28; -goto _start; -} -} -} -else -{ -lean_object* x_212; lean_object* x_213; -lean_dec(x_23); -lean_dec(x_21); -lean_dec(x_11); -x_212 = lean_unsigned_to_nat(1u); -x_213 = lean_nat_add(x_4, x_212); -lean_dec(x_4); -x_4 = x_213; -x_10 = x_22; -goto _start; -} -} -else -{ -uint8_t x_215; -lean_dec(x_11); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_215 = !lean_is_exclusive(x_20); -if (x_215 == 0) -{ -return x_20; -} -else -{ -lean_object* x_216; lean_object* x_217; lean_object* x_218; -x_216 = lean_ctor_get(x_20, 0); -x_217 = lean_ctor_get(x_20, 1); -lean_inc(x_217); -lean_inc(x_216); -lean_dec(x_20); -x_218 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_218, 0, x_216); -lean_ctor_set(x_218, 1, x_217); -return x_218; -} -} -} -else -{ -lean_object* x_219; -lean_dec(x_16); -lean_dec(x_11); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_219 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_throwStructuralFailed___rarg(x_6, x_7, x_8, x_9, x_17); -return x_219; -} -} -else -{ -uint8_t x_220; -lean_dec(x_11); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_220 = !lean_is_exclusive(x_15); -if (x_220 == 0) -{ -return x_15; -} -else -{ -lean_object* x_221; lean_object* x_222; lean_object* x_223; -x_221 = lean_ctor_get(x_15, 0); -x_222 = lean_ctor_get(x_15, 1); -lean_inc(x_222); -lean_inc(x_221); -lean_dec(x_15); -x_223 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_223, 0, x_221); -lean_ctor_set(x_223, 1, x_222); -return x_223; -} -} -} -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop(lean_object* x_1) { -_start: -{ -lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg), 10, 0); -return x_2; -} -} -lean_object* l_Lean_hasConst___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___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) { -_start: -{ -lean_object* x_8; -x_8 = l_Lean_hasConst___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__1(x_1, x_2, x_3, x_4, x_5, x_6, x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -return x_8; -} -} -lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__2___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { -_start: -{ -size_t x_5; size_t x_6; lean_object* x_7; -x_5 = lean_unbox_usize(x_2); -lean_dec(x_2); -x_6 = lean_unbox_usize(x_3); -lean_dec(x_3); -x_7 = l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__2(x_1, x_5, x_6, x_4); -lean_dec(x_1); -return x_7; -} -} -lean_object* l_Lean_isInductivePredicate___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___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) { -_start: -{ -lean_object* x_8; -x_8 = l_Lean_isInductivePredicate___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__3(x_1, x_2, x_3, x_4, x_5, x_6, x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -return x_8; -} -} -lean_object* l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__5___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { -_start: -{ -lean_object* x_8; -x_8 = l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__5___rarg(x_1, x_2, x_3, x_4, x_5, x_6, x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -return x_8; -} -} -lean_object* l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__6___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { -_start: -{ -lean_object* x_8; -x_8 = l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__6___rarg(x_1, x_2, x_3, x_4, x_5, x_6, x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -return x_8; -} -} -lean_object* l___private_Init_Data_Array_Basic_0__Array_allDiffAuxAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__8___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { -_start: -{ -uint8_t x_5; lean_object* x_6; -x_5 = l___private_Init_Data_Array_Basic_0__Array_allDiffAuxAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__8(x_1, x_2, x_3, x_4); -lean_dec(x_2); -lean_dec(x_1); -x_6 = lean_box(x_5); -return x_6; -} -} -lean_object* l___private_Init_Data_Array_Basic_0__Array_allDiffAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__7___boxed(lean_object* x_1, lean_object* x_2) { -_start: -{ -uint8_t x_3; lean_object* x_4; -x_3 = l___private_Init_Data_Array_Basic_0__Array_allDiffAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__7(x_1, x_2); -lean_dec(x_1); -x_4 = lean_box(x_3); -return x_4; -} -} -lean_object* l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__9___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { -_start: -{ -lean_object* x_8; -x_8 = l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__9___rarg(x_1, x_2, x_3, x_4, x_5, x_6, x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -return x_8; -} -} -lean_object* l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__10___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { -_start: -{ -lean_object* x_8; -x_8 = l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__10___rarg(x_1, x_2, x_3, x_4, x_5, x_6, x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -return x_8; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___boxed(lean_object* x_1, lean_object* x_2) { -_start: -{ -lean_object* x_3; -x_3 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1(x_1, x_2); -lean_dec(x_1); -return x_3; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9) { -_start: -{ -lean_object* x_10; -lean_inc(x_1); -x_10 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg(x_1, x_2, x_3, x_1, x_4, x_5, x_6, x_7, x_8, x_9); -return x_10; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg(lean_object* x_1) { -_start: -{ -lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg___rarg), 9, 0); -return x_2; -} -} -uint8_t l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_containsRecFn___lambda__1(lean_object* x_1, lean_object* x_2) { -_start: -{ -uint8_t x_3; -x_3 = l_Lean_Expr_isConstOf(x_2, x_1); -return x_3; -} -} -uint8_t l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_containsRecFn(lean_object* x_1, lean_object* x_2) { -_start: -{ -lean_object* x_3; size_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; -x_3 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_containsRecFn___lambda__1___boxed), 2, 1); -lean_closure_set(x_3, 0, x_1); -x_4 = 8192; -x_5 = l_Lean_Expr_FindImpl_initCache; -x_6 = l_Lean_Expr_FindImpl_findM_x3f_visit(x_3, x_4, x_2, x_5); -x_7 = lean_ctor_get(x_6, 0); -lean_inc(x_7); -lean_dec(x_6); -if (lean_obj_tag(x_7) == 0) -{ -uint8_t x_8; -x_8 = 0; -return x_8; -} -else -{ -uint8_t x_9; -lean_dec(x_7); -x_9 = 1; -return x_9; -} -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_containsRecFn___lambda__1___boxed(lean_object* x_1, lean_object* x_2) { -_start: -{ -uint8_t x_3; lean_object* x_4; -x_3 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_containsRecFn___lambda__1(x_1, x_2); -lean_dec(x_2); -lean_dec(x_1); -x_4 = lean_box(x_3); -return x_4; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_containsRecFn___boxed(lean_object* x_1, lean_object* x_2) { -_start: -{ -uint8_t x_3; lean_object* x_4; -x_3 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_containsRecFn(x_1, x_2); -x_4 = lean_box(x_3); -return x_4; -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_ensureNoRecFn___lambda__1___closed__1() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string("unexpected occurrence of recursive application"); -return x_1; -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_ensureNoRecFn___lambda__1___closed__2() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_ensureNoRecFn___lambda__1___closed__1; -x_2 = l_Lean_stringToMessageData(x_1); -return x_2; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_ensureNoRecFn___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: -{ -uint8_t x_8; -x_8 = l_Lean_Expr_isAppOf(x_2, x_1); -if (x_8 == 0) -{ -lean_object* x_9; lean_object* x_10; -lean_dec(x_2); -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_7); -return x_10; -} -else -{ -lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; -x_11 = l_Lean_indentExpr(x_2); -x_12 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_ensureNoRecFn___lambda__1___closed__2; -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_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__6; -x_15 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_15, 0, x_13); -lean_ctor_set(x_15, 1, x_14); -x_16 = l_Lean_throwError___at_Lean_Meta_setInlineAttribute___spec__1(x_15, x_3, x_4, x_5, x_6, x_7); -return x_16; -} -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_ensureNoRecFn(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: -{ -uint8_t x_8; -lean_inc(x_2); -lean_inc(x_1); -x_8 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_containsRecFn(x_1, x_2); -if (x_8 == 0) -{ -lean_object* x_9; -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_1); -x_9 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_9, 0, x_2); -lean_ctor_set(x_9, 1, x_7); -return x_9; -} -else -{ -lean_object* x_10; lean_object* x_11; -x_10 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_ensureNoRecFn___lambda__1___boxed), 7, 1); -lean_closure_set(x_10, 0, x_1); -lean_inc(x_2); -x_11 = l_Lean_Meta_forEachExpr(x_2, x_10, x_3, x_4, x_5, x_6, x_7); -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; -x_13 = lean_ctor_get(x_11, 0); -lean_dec(x_13); -lean_ctor_set(x_11, 0, x_2); -return x_11; -} -else -{ -lean_object* x_14; lean_object* x_15; -x_14 = lean_ctor_get(x_11, 1); -lean_inc(x_14); -lean_dec(x_11); -x_15 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_15, 0, x_2); -lean_ctor_set(x_15, 1, x_14); -return x_15; -} -} -else -{ -uint8_t x_16; -lean_dec(x_2); -x_16 = !lean_is_exclusive(x_11); -if (x_16 == 0) -{ -return x_11; -} -else -{ -lean_object* x_17; lean_object* x_18; lean_object* 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_alloc_ctor(1, 2, 0); -lean_ctor_set(x_19, 0, x_17); -lean_ctor_set(x_19, 1, x_18); -return x_19; -} -} -} -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_ensureNoRecFn___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___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_ensureNoRecFn___lambda__1(x_1, x_2, x_3, x_4, x_5, x_6, x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_1); -return x_8; -} -} -lean_object* l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_throwToBelowFailed___spec__1___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { -_start: -{ -lean_object* x_7; lean_object* x_8; uint8_t x_9; -x_7 = lean_ctor_get(x_4, 3); -x_8 = l_Lean_addMessageContextFull___at_Lean_Meta_instAddMessageContextMetaM___spec__1(x_1, x_2, x_3, x_4, x_5, x_6); -x_9 = !lean_is_exclusive(x_8); -if (x_9 == 0) -{ -lean_object* x_10; lean_object* x_11; -x_10 = lean_ctor_get(x_8, 0); -lean_inc(x_7); -x_11 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_11, 0, x_7); -lean_ctor_set(x_11, 1, x_10); -lean_ctor_set_tag(x_8, 1); -lean_ctor_set(x_8, 0, x_11); -return x_8; -} -else -{ -lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; -x_12 = lean_ctor_get(x_8, 0); -x_13 = lean_ctor_get(x_8, 1); -lean_inc(x_13); -lean_inc(x_12); -lean_dec(x_8); -lean_inc(x_7); -x_14 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_14, 0, x_7); -lean_ctor_set(x_14, 1, x_12); -x_15 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_15, 0, x_14); -lean_ctor_set(x_15, 1, x_13); -return x_15; -} -} -} -lean_object* l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_throwToBelowFailed___spec__1(lean_object* x_1) { -_start: -{ -lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_throwToBelowFailed___spec__1___rarg___boxed), 6, 0); -return x_2; -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_throwToBelowFailed___rarg___closed__1() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string("toBelow failed"); -return x_1; -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_throwToBelowFailed___rarg___closed__2() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_throwToBelowFailed___rarg___closed__1; -x_2 = l_Lean_stringToMessageData(x_1); -return x_2; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_throwToBelowFailed___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { -_start: -{ -lean_object* x_6; lean_object* x_7; -x_6 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_throwToBelowFailed___rarg___closed__2; -x_7 = l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_throwToBelowFailed___spec__1___rarg(x_6, x_1, x_2, x_3, x_4, x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -return x_7; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_throwToBelowFailed(lean_object* x_1) { -_start: -{ -lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_throwToBelowFailed___rarg), 5, 0); -return x_2; -} -} -lean_object* l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_throwToBelowFailed___spec__1___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { -_start: -{ -lean_object* x_7; -x_7 = l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_throwToBelowFailed___spec__1___rarg(x_1, x_2, x_3, x_4, x_5, x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -return x_7; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux_match__1___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3) { -_start: -{ -if (lean_obj_tag(x_1) == 5) -{ -lean_object* x_4; lean_object* x_5; uint64_t x_6; lean_object* x_7; lean_object* x_8; -lean_dec(x_3); -x_4 = lean_ctor_get(x_1, 0); -lean_inc(x_4); -x_5 = lean_ctor_get(x_1, 1); -lean_inc(x_5); -x_6 = lean_ctor_get_uint64(x_1, sizeof(void*)*2); -lean_dec(x_1); -x_7 = lean_box_uint64(x_6); -x_8 = lean_apply_3(x_2, x_4, x_5, x_7); -return x_8; -} -else -{ -lean_object* x_9; -lean_dec(x_2); -x_9 = lean_apply_1(x_3, x_1); -return x_9; -} -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux_match__1(lean_object* x_1) { -_start: -{ -lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux_match__1___rarg), 3, 0); -return x_2; -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux_match__2___rarg___closed__1() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string("PProd"); -return x_1; -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux_match__2___rarg___closed__2() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string("And"); -return x_1; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux_match__2___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { -_start: -{ -if (lean_obj_tag(x_1) == 5) -{ -lean_object* x_5; -x_5 = lean_ctor_get(x_1, 0); -lean_inc(x_5); -if (lean_obj_tag(x_5) == 5) -{ -lean_object* x_6; -x_6 = lean_ctor_get(x_5, 0); -lean_inc(x_6); -if (lean_obj_tag(x_6) == 4) -{ -lean_object* x_7; -x_7 = lean_ctor_get(x_6, 0); -lean_inc(x_7); -if (lean_obj_tag(x_7) == 1) -{ -lean_object* x_8; -x_8 = lean_ctor_get(x_7, 0); -lean_inc(x_8); -if (lean_obj_tag(x_8) == 0) -{ -lean_object* x_9; uint64_t x_10; lean_object* x_11; uint64_t x_12; lean_object* x_13; uint64_t x_14; lean_object* x_15; uint64_t x_16; lean_object* x_17; uint8_t x_18; -x_9 = lean_ctor_get(x_1, 1); -lean_inc(x_9); -x_10 = lean_ctor_get_uint64(x_1, sizeof(void*)*2); -x_11 = lean_ctor_get(x_5, 1); -lean_inc(x_11); -x_12 = lean_ctor_get_uint64(x_5, sizeof(void*)*2); -lean_dec(x_5); -x_13 = lean_ctor_get(x_6, 1); -lean_inc(x_13); -x_14 = lean_ctor_get_uint64(x_6, sizeof(void*)*2); -lean_dec(x_6); -x_15 = lean_ctor_get(x_7, 1); -lean_inc(x_15); -x_16 = lean_ctor_get_uint64(x_7, sizeof(void*)*2); -lean_dec(x_7); -x_17 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux_match__2___rarg___closed__1; -x_18 = lean_string_dec_eq(x_15, x_17); -if (x_18 == 0) -{ -lean_object* x_19; uint8_t x_20; -lean_dec(x_2); -x_19 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux_match__2___rarg___closed__2; -x_20 = lean_string_dec_eq(x_15, x_19); -lean_dec(x_15); -if (x_20 == 0) -{ -lean_object* x_21; -lean_dec(x_13); -lean_dec(x_11); -lean_dec(x_9); -lean_dec(x_3); -x_21 = lean_apply_1(x_4, x_1); -return x_21; -} -else -{ -lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; -lean_dec(x_4); -lean_dec(x_1); -x_22 = lean_box_uint64(x_14); -x_23 = lean_box_uint64(x_12); -x_24 = lean_box_uint64(x_10); -x_25 = lean_box_uint64(x_16); -x_26 = lean_apply_7(x_3, x_13, x_22, x_11, x_23, x_9, x_24, x_25); -return x_26; -} -} -else -{ -lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; -lean_dec(x_15); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_1); -x_27 = lean_box_uint64(x_14); -x_28 = lean_box_uint64(x_12); -x_29 = lean_box_uint64(x_10); -x_30 = lean_box_uint64(x_16); -x_31 = lean_apply_7(x_2, x_13, x_27, x_11, x_28, x_9, x_29, x_30); -return x_31; -} -} -else -{ -lean_object* x_32; -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_3); -lean_dec(x_2); -x_32 = lean_apply_1(x_4, x_1); -return x_32; -} -} -else -{ -lean_object* x_33; -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_3); -lean_dec(x_2); -x_33 = lean_apply_1(x_4, x_1); -return x_33; -} -} -else -{ -lean_object* x_34; -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_3); -lean_dec(x_2); -x_34 = lean_apply_1(x_4, x_1); -return x_34; -} -} -else -{ -lean_object* x_35; -lean_dec(x_5); -lean_dec(x_3); -lean_dec(x_2); -x_35 = lean_apply_1(x_4, x_1); -return x_35; -} -} -else -{ -lean_object* x_36; -lean_dec(x_3); -lean_dec(x_2); -x_36 = lean_apply_1(x_4, x_1); -return x_36; -} -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux_match__2(lean_object* x_1) { -_start: -{ -lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux_match__2___rarg), 4, 0); -return x_2; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux_match__3___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { -_start: -{ -lean_object* x_5; -x_5 = lean_apply_3(x_4, x_1, x_2, x_3); -return x_5; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux_match__3(lean_object* x_1) { -_start: -{ -lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux_match__3___rarg), 4, 0); -return x_2; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___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 = l_Lean_mkAppN(x_1, x_2); -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_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___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_dec(x_5); -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -lean_inc(x_6); -x_11 = l_Lean_Meta_isExprDefEq(x_1, x_2, x_6, x_7, x_8, x_9, x_10); -if (lean_obj_tag(x_11) == 0) -{ -lean_object* x_12; uint8_t x_13; -x_12 = lean_ctor_get(x_11, 0); -lean_inc(x_12); -x_13 = lean_unbox(x_12); -lean_dec(x_12); -if (x_13 == 0) -{ -lean_object* x_14; lean_object* x_15; uint8_t x_16; -lean_dec(x_4); -lean_dec(x_3); -x_14 = lean_ctor_get(x_11, 1); -lean_inc(x_14); -lean_dec(x_11); -x_15 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_throwToBelowFailed___rarg(x_6, x_7, x_8, x_9, x_14); -x_16 = !lean_is_exclusive(x_15); -if (x_16 == 0) -{ -return x_15; -} -else -{ -lean_object* x_17; lean_object* x_18; lean_object* x_19; -x_17 = lean_ctor_get(x_15, 0); -x_18 = lean_ctor_get(x_15, 1); -lean_inc(x_18); -lean_inc(x_17); -lean_dec(x_15); -x_19 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_19, 0, x_17); -lean_ctor_set(x_19, 1, x_18); -return x_19; -} -} -else -{ -lean_object* x_20; lean_object* x_21; lean_object* x_22; -x_20 = lean_ctor_get(x_11, 1); -lean_inc(x_20); -lean_dec(x_11); -x_21 = lean_box(0); -x_22 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__1(x_3, x_4, x_21, 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); -return x_22; -} -} -else -{ -uint8_t x_23; -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_4); -lean_dec(x_3); -x_23 = !lean_is_exclusive(x_11); -if (x_23 == 0) -{ -return x_11; -} -else -{ -lean_object* x_24; lean_object* x_25; lean_object* x_26; -x_24 = lean_ctor_get(x_11, 0); -x_25 = lean_ctor_get(x_11, 1); -lean_inc(x_25); -lean_inc(x_24); -lean_dec(x_11); -x_26 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_26, 0, x_24); -lean_ctor_set(x_26, 1, x_25); -return x_26; -} -} -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___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_object* x_10, lean_object* x_11, lean_object* x_12) { -_start: -{ -lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; -lean_dec(x_7); -x_13 = lean_array_get_size(x_1); -x_14 = lean_array_get_size(x_2); -x_15 = lean_nat_sub(x_13, x_14); -lean_dec(x_14); -x_16 = l_Array_extract___rarg(x_1, x_15, x_13); -x_17 = l_Lean_Expr_replaceFVars(x_3, x_2, x_16); -lean_dec(x_2); -lean_dec(x_3); -if (lean_obj_tag(x_17) == 5) -{ -lean_object* x_18; lean_object* x_19; lean_object* x_20; uint8_t x_21; -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_Expr_getAppFn(x_18); -lean_dec(x_18); -x_21 = lean_expr_eqv(x_20, x_6); -lean_dec(x_6); -lean_dec(x_20); -if (x_21 == 0) -{ -lean_object* x_22; uint8_t x_23; -lean_dec(x_19); -lean_dec(x_16); -lean_dec(x_5); -lean_dec(x_4); -x_22 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_throwToBelowFailed___rarg(x_8, x_9, x_10, x_11, x_12); -x_23 = !lean_is_exclusive(x_22); -if (x_23 == 0) -{ -return x_22; -} -else -{ -lean_object* x_24; lean_object* x_25; lean_object* x_26; -x_24 = lean_ctor_get(x_22, 0); -x_25 = lean_ctor_get(x_22, 1); -lean_inc(x_25); -lean_inc(x_24); -lean_dec(x_22); -x_26 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_26, 0, x_24); -lean_ctor_set(x_26, 1, x_25); -return x_26; -} -} -else -{ -lean_object* x_27; lean_object* x_28; -x_27 = lean_box(0); -x_28 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__2(x_19, x_4, x_5, x_16, x_27, x_8, x_9, x_10, x_11, x_12); -return x_28; -} -} -else -{ -lean_object* x_29; -lean_dec(x_17); -lean_dec(x_16); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -x_29 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_throwToBelowFailed___rarg(x_8, x_9, x_10, x_11, x_12); -return x_29; -} -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___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_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; uint8_t x_20; -x_11 = lean_unsigned_to_nat(0u); -x_12 = l_Lean_Expr_getAppNumArgsAux(x_1, x_11); -x_13 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_getFixedPrefix___lambda__2___closed__1; -lean_inc(x_12); -x_14 = lean_mk_array(x_12, x_13); -x_15 = lean_unsigned_to_nat(1u); -x_16 = lean_nat_sub(x_12, x_15); -lean_dec(x_12); -lean_inc(x_1); -x_17 = l___private_Lean_Expr_0__Lean_Expr_getAppArgsAux(x_1, x_14, x_16); -x_18 = lean_array_get_size(x_4); -x_19 = lean_array_get_size(x_17); -x_20 = lean_nat_dec_le(x_18, x_19); -lean_dec(x_19); -lean_dec(x_18); -if (x_20 == 0) -{ -lean_object* x_21; uint8_t x_22; -lean_dec(x_17); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_21 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_throwToBelowFailed___rarg(x_6, x_7, x_8, x_9, x_10); -x_22 = !lean_is_exclusive(x_21); -if (x_22 == 0) -{ -return x_21; -} -else -{ -lean_object* x_23; lean_object* x_24; lean_object* x_25; -x_23 = lean_ctor_get(x_21, 0); -x_24 = lean_ctor_get(x_21, 1); -lean_inc(x_24); -lean_inc(x_23); -lean_dec(x_21); -x_25 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_25, 0, x_23); -lean_ctor_set(x_25, 1, x_24); -return x_25; -} -} -else -{ -lean_object* x_26; lean_object* x_27; -x_26 = lean_box(0); -x_27 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__3(x_17, x_4, x_5, x_1, x_2, x_3, x_26, x_6, x_7, x_8, x_9, x_10); -return x_27; -} -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__1() { -_start: -{ -lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = lean_box(0); -x_2 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux_match__2___rarg___closed__2; -x_3 = lean_name_mk_string(x_1, x_2); -return x_3; -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__2() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string("left"); -return x_1; -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__3() { -_start: -{ -lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__1; -x_2 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__2; -x_3 = lean_name_mk_string(x_1, x_2); -return x_3; -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__4() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = lean_unsigned_to_nat(1u); -x_2 = lean_mk_empty_array_with_capacity(x_1); -return x_2; -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__5() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string("right"); -return x_1; -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__6() { -_start: -{ -lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__1; -x_2 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__5; -x_3 = lean_name_mk_string(x_1, x_2); -return x_3; -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__7() { -_start: -{ -lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = lean_box(0); -x_2 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux_match__2___rarg___closed__1; -x_3 = lean_name_mk_string(x_1, x_2); -return x_3; -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__8() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string("fst"); -return x_1; -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__9() { -_start: -{ -lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__7; -x_2 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__8; -x_3 = lean_name_mk_string(x_1, x_2); -return x_3; -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__10() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string("snd"); -return x_1; -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__11() { -_start: -{ -lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__7; -x_2 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__10; -x_3 = lean_name_mk_string(x_1, x_2); -return x_3; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___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, lean_object* x_10) { -_start: -{ -lean_dec(x_5); -if (lean_obj_tag(x_1) == 5) -{ -lean_object* x_11; -x_11 = lean_ctor_get(x_1, 0); -lean_inc(x_11); -if (lean_obj_tag(x_11) == 5) -{ -lean_object* x_12; -x_12 = lean_ctor_get(x_11, 0); -lean_inc(x_12); -if (lean_obj_tag(x_12) == 4) -{ -lean_object* x_13; -x_13 = lean_ctor_get(x_12, 0); -lean_inc(x_13); -lean_dec(x_12); -if (lean_obj_tag(x_13) == 1) -{ -lean_object* x_14; -x_14 = lean_ctor_get(x_13, 0); -lean_inc(x_14); -if (lean_obj_tag(x_14) == 0) -{ -lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; uint8_t x_19; -x_15 = lean_ctor_get(x_1, 1); -lean_inc(x_15); -x_16 = lean_ctor_get(x_11, 1); -lean_inc(x_16); -lean_dec(x_11); -x_17 = lean_ctor_get(x_13, 1); -lean_inc(x_17); -lean_dec(x_13); -x_18 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux_match__2___rarg___closed__1; -x_19 = lean_string_dec_eq(x_17, x_18); -if (x_19 == 0) -{ -lean_object* x_20; uint8_t x_21; -x_20 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux_match__2___rarg___closed__2; -x_21 = lean_string_dec_eq(x_17, x_20); -lean_dec(x_17); -if (x_21 == 0) -{ -lean_object* x_22; lean_object* x_23; -lean_dec(x_16); -lean_dec(x_15); -x_22 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__4), 10, 3); -lean_closure_set(x_22, 0, x_2); -lean_closure_set(x_22, 1, x_3); -lean_closure_set(x_22, 2, x_4); -x_23 = l_Lean_Meta_forallTelescopeReducing___at_Lean_Meta_getParamNames___spec__2___rarg(x_1, x_22, x_6, x_7, x_8, x_9, x_10); -return x_23; -} -else -{ -lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; -lean_dec(x_1); -x_24 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__4; -x_25 = lean_array_push(x_24, x_3); -x_26 = l_Lean_Meta_saveState___rarg(x_7, x_8, x_9, x_10); -x_27 = lean_ctor_get(x_26, 0); -lean_inc(x_27); -x_28 = lean_ctor_get(x_26, 1); -lean_inc(x_28); -lean_dec(x_26); -x_29 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__3; -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -lean_inc(x_6); -lean_inc(x_25); -x_30 = l_Lean_Meta_mkAppM(x_29, x_25, x_6, x_7, x_8, x_9, x_28); -if (lean_obj_tag(x_30) == 0) -{ -lean_object* x_31; lean_object* x_32; lean_object* x_33; -x_31 = lean_ctor_get(x_30, 0); -lean_inc(x_31); -x_32 = lean_ctor_get(x_30, 1); -lean_inc(x_32); -lean_dec(x_30); -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -lean_inc(x_6); -lean_inc(x_2); -lean_inc(x_4); -x_33 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux(x_4, x_16, x_2, x_31, x_6, x_7, x_8, x_9, x_32); -if (lean_obj_tag(x_33) == 0) -{ -lean_dec(x_27); -lean_dec(x_25); -lean_dec(x_15); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_4); -lean_dec(x_2); -return x_33; -} -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_33, 1); -lean_inc(x_34); -lean_dec(x_33); -x_35 = l_Lean_Meta_SavedState_restore(x_27, x_6, x_7, x_8, x_9, x_34); -lean_dec(x_27); -x_36 = lean_ctor_get(x_35, 1); -lean_inc(x_36); -lean_dec(x_35); -x_37 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__6; -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -lean_inc(x_6); -x_38 = l_Lean_Meta_mkAppM(x_37, x_25, x_6, x_7, x_8, x_9, x_36); -if (lean_obj_tag(x_38) == 0) -{ -lean_object* x_39; lean_object* x_40; lean_object* x_41; -x_39 = lean_ctor_get(x_38, 0); -lean_inc(x_39); -x_40 = lean_ctor_get(x_38, 1); -lean_inc(x_40); -lean_dec(x_38); -x_41 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux(x_4, x_15, x_2, x_39, x_6, x_7, x_8, x_9, x_40); -return x_41; -} -else -{ -uint8_t x_42; -lean_dec(x_15); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_4); -lean_dec(x_2); -x_42 = !lean_is_exclusive(x_38); -if (x_42 == 0) -{ -return x_38; -} -else -{ -lean_object* x_43; lean_object* x_44; lean_object* x_45; -x_43 = lean_ctor_get(x_38, 0); -x_44 = lean_ctor_get(x_38, 1); -lean_inc(x_44); -lean_inc(x_43); -lean_dec(x_38); -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_16); -x_46 = lean_ctor_get(x_30, 1); -lean_inc(x_46); -lean_dec(x_30); -x_47 = l_Lean_Meta_SavedState_restore(x_27, x_6, x_7, x_8, x_9, x_46); -lean_dec(x_27); -x_48 = lean_ctor_get(x_47, 1); -lean_inc(x_48); -lean_dec(x_47); -x_49 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__6; -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -lean_inc(x_6); -x_50 = l_Lean_Meta_mkAppM(x_49, x_25, x_6, x_7, x_8, x_9, x_48); -if (lean_obj_tag(x_50) == 0) -{ -lean_object* x_51; lean_object* x_52; lean_object* x_53; -x_51 = lean_ctor_get(x_50, 0); -lean_inc(x_51); -x_52 = lean_ctor_get(x_50, 1); -lean_inc(x_52); -lean_dec(x_50); -x_53 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux(x_4, x_15, x_2, x_51, x_6, x_7, x_8, x_9, x_52); -return x_53; -} -else -{ -uint8_t x_54; -lean_dec(x_15); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_4); -lean_dec(x_2); -x_54 = !lean_is_exclusive(x_50); -if (x_54 == 0) -{ -return x_50; -} -else -{ -lean_object* x_55; lean_object* x_56; lean_object* x_57; -x_55 = lean_ctor_get(x_50, 0); -x_56 = lean_ctor_get(x_50, 1); -lean_inc(x_56); -lean_inc(x_55); -lean_dec(x_50); -x_57 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_57, 0, x_55); -lean_ctor_set(x_57, 1, x_56); -return x_57; -} -} -} -} -} -else -{ -lean_object* x_58; lean_object* x_59; lean_object* x_60; lean_object* x_61; lean_object* x_62; lean_object* x_63; lean_object* x_64; -lean_dec(x_17); -lean_dec(x_1); -x_58 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__4; -x_59 = lean_array_push(x_58, x_3); -x_60 = l_Lean_Meta_saveState___rarg(x_7, x_8, x_9, x_10); -x_61 = lean_ctor_get(x_60, 0); -lean_inc(x_61); -x_62 = lean_ctor_get(x_60, 1); -lean_inc(x_62); -lean_dec(x_60); -x_63 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__9; -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -lean_inc(x_6); -lean_inc(x_59); -x_64 = l_Lean_Meta_mkAppM(x_63, x_59, x_6, x_7, x_8, x_9, x_62); -if (lean_obj_tag(x_64) == 0) -{ -lean_object* x_65; lean_object* x_66; lean_object* x_67; -x_65 = lean_ctor_get(x_64, 0); -lean_inc(x_65); -x_66 = lean_ctor_get(x_64, 1); -lean_inc(x_66); -lean_dec(x_64); -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -lean_inc(x_6); -lean_inc(x_2); -lean_inc(x_4); -x_67 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux(x_4, x_16, x_2, x_65, x_6, x_7, x_8, x_9, x_66); -if (lean_obj_tag(x_67) == 0) -{ -lean_dec(x_61); -lean_dec(x_59); -lean_dec(x_15); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_4); -lean_dec(x_2); -return x_67; -} -else -{ -lean_object* x_68; lean_object* x_69; lean_object* x_70; lean_object* x_71; lean_object* x_72; -x_68 = lean_ctor_get(x_67, 1); -lean_inc(x_68); -lean_dec(x_67); -x_69 = l_Lean_Meta_SavedState_restore(x_61, x_6, x_7, x_8, x_9, x_68); -lean_dec(x_61); -x_70 = lean_ctor_get(x_69, 1); -lean_inc(x_70); -lean_dec(x_69); -x_71 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__11; -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -lean_inc(x_6); -x_72 = l_Lean_Meta_mkAppM(x_71, x_59, x_6, x_7, x_8, x_9, x_70); -if (lean_obj_tag(x_72) == 0) -{ -lean_object* x_73; lean_object* x_74; lean_object* x_75; -x_73 = lean_ctor_get(x_72, 0); -lean_inc(x_73); -x_74 = lean_ctor_get(x_72, 1); -lean_inc(x_74); -lean_dec(x_72); -x_75 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux(x_4, x_15, x_2, x_73, x_6, x_7, x_8, x_9, x_74); -return x_75; -} -else -{ -uint8_t x_76; -lean_dec(x_15); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_4); -lean_dec(x_2); -x_76 = !lean_is_exclusive(x_72); -if (x_76 == 0) -{ -return x_72; -} -else -{ -lean_object* x_77; lean_object* x_78; lean_object* x_79; -x_77 = lean_ctor_get(x_72, 0); -x_78 = lean_ctor_get(x_72, 1); -lean_inc(x_78); -lean_inc(x_77); -lean_dec(x_72); -x_79 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_79, 0, x_77); -lean_ctor_set(x_79, 1, x_78); -return x_79; -} -} -} -} -else -{ -lean_object* x_80; lean_object* x_81; lean_object* x_82; lean_object* x_83; lean_object* x_84; -lean_dec(x_16); -x_80 = lean_ctor_get(x_64, 1); -lean_inc(x_80); -lean_dec(x_64); -x_81 = l_Lean_Meta_SavedState_restore(x_61, x_6, x_7, x_8, x_9, x_80); -lean_dec(x_61); -x_82 = lean_ctor_get(x_81, 1); -lean_inc(x_82); -lean_dec(x_81); -x_83 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__11; -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -lean_inc(x_6); -x_84 = l_Lean_Meta_mkAppM(x_83, x_59, x_6, x_7, x_8, x_9, x_82); -if (lean_obj_tag(x_84) == 0) -{ -lean_object* x_85; lean_object* x_86; lean_object* x_87; -x_85 = lean_ctor_get(x_84, 0); -lean_inc(x_85); -x_86 = lean_ctor_get(x_84, 1); -lean_inc(x_86); -lean_dec(x_84); -x_87 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux(x_4, x_15, x_2, x_85, x_6, x_7, x_8, x_9, x_86); -return x_87; -} -else -{ -uint8_t x_88; -lean_dec(x_15); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_4); -lean_dec(x_2); -x_88 = !lean_is_exclusive(x_84); -if (x_88 == 0) -{ -return x_84; -} -else -{ -lean_object* x_89; lean_object* x_90; lean_object* x_91; -x_89 = lean_ctor_get(x_84, 0); -x_90 = lean_ctor_get(x_84, 1); -lean_inc(x_90); -lean_inc(x_89); -lean_dec(x_84); -x_91 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_91, 0, x_89); -lean_ctor_set(x_91, 1, x_90); -return x_91; -} -} -} -} -} -else -{ -lean_object* x_92; lean_object* x_93; -lean_dec(x_14); -lean_dec(x_13); -lean_dec(x_11); -x_92 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__4), 10, 3); -lean_closure_set(x_92, 0, x_2); -lean_closure_set(x_92, 1, x_3); -lean_closure_set(x_92, 2, x_4); -x_93 = l_Lean_Meta_forallTelescopeReducing___at_Lean_Meta_getParamNames___spec__2___rarg(x_1, x_92, x_6, x_7, x_8, x_9, x_10); -return x_93; -} -} -else -{ -lean_object* x_94; lean_object* x_95; -lean_dec(x_13); -lean_dec(x_11); -x_94 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__4), 10, 3); -lean_closure_set(x_94, 0, x_2); -lean_closure_set(x_94, 1, x_3); -lean_closure_set(x_94, 2, x_4); -x_95 = l_Lean_Meta_forallTelescopeReducing___at_Lean_Meta_getParamNames___spec__2___rarg(x_1, x_94, x_6, x_7, x_8, x_9, x_10); -return x_95; -} -} -else -{ -lean_object* x_96; lean_object* x_97; -lean_dec(x_12); -lean_dec(x_11); -x_96 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__4), 10, 3); -lean_closure_set(x_96, 0, x_2); -lean_closure_set(x_96, 1, x_3); -lean_closure_set(x_96, 2, x_4); -x_97 = l_Lean_Meta_forallTelescopeReducing___at_Lean_Meta_getParamNames___spec__2___rarg(x_1, x_96, x_6, x_7, x_8, x_9, x_10); -return x_97; -} -} -else -{ -lean_object* x_98; lean_object* x_99; -lean_dec(x_11); -x_98 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__4), 10, 3); -lean_closure_set(x_98, 0, x_2); -lean_closure_set(x_98, 1, x_3); -lean_closure_set(x_98, 2, x_4); -x_99 = l_Lean_Meta_forallTelescopeReducing___at_Lean_Meta_getParamNames___spec__2___rarg(x_1, x_98, x_6, x_7, x_8, x_9, x_10); -return x_99; -} -} -else -{ -lean_object* x_100; lean_object* x_101; -x_100 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__4), 10, 3); -lean_closure_set(x_100, 0, x_2); -lean_closure_set(x_100, 1, x_3); -lean_closure_set(x_100, 2, x_4); -x_101 = l_Lean_Meta_forallTelescopeReducing___at_Lean_Meta_getParamNames___spec__2___rarg(x_1, x_100, x_6, x_7, x_8, x_9, x_10); -return x_101; -} -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___closed__1() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string("Elab"); -return x_1; -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___closed__2() { -_start: -{ -lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = lean_box(0); -x_2 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___closed__1; -x_3 = lean_name_mk_string(x_1, x_2); -return x_3; -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___closed__3() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string("definition"); -return x_1; -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___closed__4() { -_start: -{ -lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___closed__2; -x_2 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___closed__3; -x_3 = lean_name_mk_string(x_1, x_2); -return x_3; -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___closed__5() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string("structural"); -return x_1; -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___closed__6() { -_start: -{ -lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___closed__4; -x_2 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___closed__5; -x_3 = lean_name_mk_string(x_1, x_2); -return x_3; -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___closed__7() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string("belowDict: "); -return x_1; -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___closed__8() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___closed__7; -x_2 = l_Lean_stringToMessageData(x_1); -return x_2; -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___closed__9() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string(", arg: "); -return x_1; -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___closed__10() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___closed__9; -x_2 = l_Lean_stringToMessageData(x_1); -return x_2; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9) { -_start: -{ -lean_object* x_10; -lean_inc(x_8); -lean_inc(x_7); -lean_inc(x_6); -lean_inc(x_5); -x_10 = lean_whnf(x_2, 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; uint8_t x_14; lean_object* x_15; lean_object* x_32; lean_object* x_33; lean_object* x_34; uint8_t x_35; -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___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___closed__6; -x_32 = lean_st_ref_get(x_8, x_12); -x_33 = lean_ctor_get(x_32, 0); -lean_inc(x_33); -x_34 = lean_ctor_get(x_33, 3); -lean_inc(x_34); -lean_dec(x_33); -x_35 = lean_ctor_get_uint8(x_34, sizeof(void*)*1); -lean_dec(x_34); -if (x_35 == 0) -{ -lean_object* x_36; uint8_t x_37; -x_36 = lean_ctor_get(x_32, 1); -lean_inc(x_36); -lean_dec(x_32); -x_37 = 0; -x_14 = x_37; -x_15 = x_36; -goto block_31; -} -else -{ -lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; uint8_t x_42; -x_38 = lean_ctor_get(x_32, 1); -lean_inc(x_38); -lean_dec(x_32); -x_39 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at_Lean_Meta_mkCongrLemma___spec__10(x_13, x_5, x_6, x_7, x_8, x_38); -x_40 = lean_ctor_get(x_39, 0); -lean_inc(x_40); -x_41 = lean_ctor_get(x_39, 1); -lean_inc(x_41); -lean_dec(x_39); -x_42 = lean_unbox(x_40); -lean_dec(x_40); -x_14 = x_42; -x_15 = x_41; -goto block_31; -} -block_31: -{ -if (x_14 == 0) -{ -lean_object* x_16; lean_object* x_17; -x_16 = lean_box(0); -x_17 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__5(x_11, x_3, x_4, x_1, x_16, x_5, x_6, x_7, x_8, x_15); -return x_17; -} -else -{ -lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; -lean_inc(x_11); -x_18 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_18, 0, x_11); -x_19 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___closed__8; -x_20 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_20, 0, x_19); -lean_ctor_set(x_20, 1, x_18); -x_21 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___closed__10; -x_22 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_22, 0, x_20); -lean_ctor_set(x_22, 1, x_21); -lean_inc(x_3); -x_23 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_23, 0, x_3); -x_24 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_24, 0, x_22); -lean_ctor_set(x_24, 1, x_23); -x_25 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__6; -x_26 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_26, 0, x_24); -lean_ctor_set(x_26, 1, x_25); -x_27 = l_Lean_addTrace___at_Lean_Meta_mkCongrLemma___spec__9(x_13, x_26, x_5, x_6, x_7, x_8, x_15); -x_28 = lean_ctor_get(x_27, 0); -lean_inc(x_28); -x_29 = lean_ctor_get(x_27, 1); -lean_inc(x_29); -lean_dec(x_27); -x_30 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__5(x_11, x_3, x_4, x_1, x_28, x_5, x_6, x_7, x_8, x_29); -return x_30; -} -} -} -else -{ -uint8_t x_43; -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_43 = !lean_is_exclusive(x_10); -if (x_43 == 0) -{ -return x_10; -} -else -{ -lean_object* x_44; lean_object* x_45; lean_object* x_46; -x_44 = lean_ctor_get(x_10, 0); -x_45 = lean_ctor_get(x_10, 1); -lean_inc(x_45); -lean_inc(x_44); -lean_dec(x_10); -x_46 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_46, 0, x_44); -lean_ctor_set(x_46, 1, x_45); -return x_46; -} -} -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___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___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___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); -return x_9; -} -} -lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___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) { -_start: -{ -lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; -lean_inc(x_5); -x_11 = l_Lean_mkApp(x_1, x_5); -x_12 = lean_array_get_size(x_2); -x_13 = l_Array_extract___rarg(x_2, x_3, x_12); -x_14 = l_Lean_mkAppN(x_11, x_13); -x_15 = lean_apply_7(x_4, x_5, x_14, x_6, x_7, x_8, x_9, x_10); -return x_15; -} -} -static lean_object* _init_l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___lambda__2___closed__1() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string("C"); -return x_1; -} -} -static lean_object* _init_l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___lambda__2___closed__2() { -_start: -{ -lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = lean_box(0); -x_2 = l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___lambda__2___closed__1; -x_3 = lean_name_mk_string(x_1, x_2); -return x_3; -} -} -lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___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) { -_start: -{ -lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; -x_12 = l_Lean_instInhabitedExpr; -x_13 = lean_unsigned_to_nat(0u); -x_14 = lean_array_get(x_12, x_5, x_13); -lean_inc(x_10); -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -x_15 = lean_infer_type(x_14, x_7, x_8, x_9, x_10, x_11); -if (lean_obj_tag(x_15) == 0) -{ -lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; uint8_t x_23; lean_object* x_24; -x_16 = lean_ctor_get(x_15, 0); -lean_inc(x_16); -x_17 = lean_ctor_get(x_15, 1); -lean_inc(x_17); -lean_dec(x_15); -x_18 = l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___lambda__2___closed__2; -x_19 = l___private_Lean_CoreM_0__Lean_Core_mkFreshNameImp(x_18, x_9, x_10, x_17); -x_20 = lean_ctor_get(x_19, 0); -lean_inc(x_20); -x_21 = lean_ctor_get(x_19, 1); -lean_inc(x_21); -lean_dec(x_19); -x_22 = lean_alloc_closure((void*)(l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___lambda__1), 10, 4); -lean_closure_set(x_22, 0, x_1); -lean_closure_set(x_22, 1, x_2); -lean_closure_set(x_22, 2, x_3); -lean_closure_set(x_22, 3, x_4); -x_23 = 0; -x_24 = l_Lean_Meta_withLocalDecl___at_Lean_Meta_forallTelescopeCompatibleAux___spec__15___rarg(x_20, x_23, x_16, x_22, x_7, x_8, x_9, x_10, x_21); -return x_24; -} -else -{ -uint8_t x_25; -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_25 = !lean_is_exclusive(x_15); -if (x_25 == 0) -{ -return x_15; -} -else -{ -lean_object* x_26; lean_object* x_27; lean_object* x_28; -x_26 = lean_ctor_get(x_15, 0); -x_27 = lean_ctor_get(x_15, 1); -lean_inc(x_27); -lean_inc(x_26); -lean_dec(x_15); -x_28 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_28, 0, x_26); -lean_ctor_set(x_28, 1, x_27); -return x_28; -} -} -} -} -static lean_object* _init_l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___lambda__3___closed__1() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = lean_unsigned_to_nat(1u); -x_2 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_2, 0, x_1); -return x_2; -} -} -lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___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_object* x_10, lean_object* x_11) { -_start: -{ -lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; -x_12 = lean_unsigned_to_nat(0u); -lean_inc(x_1); -x_13 = l_Array_extract___rarg(x_1, x_12, x_2); -x_14 = l_Lean_mkAppN(x_3, x_13); -lean_inc(x_10); -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -lean_inc(x_14); -x_15 = lean_infer_type(x_14, x_7, x_8, x_9, x_10, x_11); -if (lean_obj_tag(x_15) == 0) -{ -lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; -x_16 = lean_ctor_get(x_15, 0); -lean_inc(x_16); -x_17 = lean_ctor_get(x_15, 1); -lean_inc(x_17); -lean_dec(x_15); -x_18 = lean_alloc_closure((void*)(l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___lambda__2___boxed), 11, 4); -lean_closure_set(x_18, 0, x_14); -lean_closure_set(x_18, 1, x_1); -lean_closure_set(x_18, 2, x_4); -lean_closure_set(x_18, 3, x_5); -x_19 = l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___lambda__3___closed__1; -x_20 = l_Lean_Meta_forallBoundedTelescope___at_Lean_Meta_addPPExplicitToExposeDiff_visit___spec__2___rarg(x_16, x_19, x_18, x_7, x_8, x_9, x_10, x_17); -return x_20; -} -else -{ -uint8_t x_21; -lean_dec(x_14); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_1); -x_21 = !lean_is_exclusive(x_15); -if (x_21 == 0) -{ -return x_15; -} -else -{ -lean_object* x_22; lean_object* x_23; lean_object* x_24; -x_22 = lean_ctor_get(x_15, 0); -x_23 = lean_ctor_get(x_15, 1); -lean_inc(x_23); -lean_inc(x_22); -lean_dec(x_15); -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; -} -} -} -} -static lean_object* _init_l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___closed__1() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string("unexpected 'below' type"); -return x_1; -} -} -static lean_object* _init_l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___closed__2() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___closed__1; -x_2 = l_Lean_stringToMessageData(x_1); -return x_2; -} -} -lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11) { -_start: -{ -if (lean_obj_tag(x_4) == 5) -{ -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_4, 0); -lean_inc(x_12); -x_13 = lean_ctor_get(x_4, 1); -lean_inc(x_13); -lean_dec(x_4); -x_14 = lean_array_set(x_5, x_6, x_13); -x_15 = lean_unsigned_to_nat(1u); -x_16 = lean_nat_sub(x_6, x_15); -lean_dec(x_6); -x_4 = x_12; -x_5 = x_14; -x_6 = x_16; -goto _start; -} -else -{ -lean_object* x_18; lean_object* x_19; lean_object* x_20; uint8_t x_21; -lean_dec(x_6); -x_18 = lean_unsigned_to_nat(1u); -x_19 = lean_nat_add(x_1, x_18); -x_20 = lean_array_get_size(x_5); -x_21 = lean_nat_dec_lt(x_19, x_20); -lean_dec(x_20); -if (x_21 == 0) -{ -lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; uint8_t x_28; -lean_dec(x_19); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_2); -lean_dec(x_1); -x_22 = l_Lean_indentExpr(x_3); -x_23 = l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___closed__2; -x_24 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_24, 0, x_23); -lean_ctor_set(x_24, 1, x_22); -x_25 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__6; -x_26 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_26, 0, x_24); -lean_ctor_set(x_26, 1, x_25); -x_27 = l_Lean_throwError___at_Lean_Meta_withIncRecDepth___spec__1(x_26, 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); -x_28 = !lean_is_exclusive(x_27); -if (x_28 == 0) -{ -return x_27; -} -else -{ -lean_object* x_29; lean_object* x_30; lean_object* x_31; -x_29 = lean_ctor_get(x_27, 0); -x_30 = lean_ctor_get(x_27, 1); -lean_inc(x_30); -lean_inc(x_29); -lean_dec(x_27); -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 -{ -lean_object* x_32; lean_object* x_33; -lean_dec(x_3); -x_32 = lean_box(0); -x_33 = l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___lambda__3(x_5, x_1, x_4, x_19, x_2, x_32, x_7, x_8, x_9, x_10, x_11); -return x_33; -} -} -} -} -lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_withBelowDict___spec__1(lean_object* x_1) { -_start: -{ -lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg), 11, 0); -return x_2; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_withBelowDict___rarg___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) { -_start: -{ -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; -lean_dec(x_4); -x_10 = lean_unsigned_to_nat(0u); -x_11 = l_Lean_Expr_getAppNumArgsAux(x_1, x_10); -x_12 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_getFixedPrefix___lambda__2___closed__1; -lean_inc(x_11); -x_13 = lean_mk_array(x_11, x_12); -x_14 = lean_unsigned_to_nat(1u); -x_15 = lean_nat_sub(x_11, x_14); -lean_dec(x_11); -lean_inc(x_1); -x_16 = l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg(x_2, x_3, x_1, x_1, x_13, x_15, x_5, x_6, x_7, x_8, x_9); -return x_16; -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_withBelowDict___rarg___closed__1() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string("belowType: "); -return x_1; -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_withBelowDict___rarg___closed__2() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_withBelowDict___rarg___closed__1; -x_2 = l_Lean_stringToMessageData(x_1); -return x_2; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_withBelowDict___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { -_start: -{ -lean_object* x_9; -lean_inc(x_7); -lean_inc(x_6); -lean_inc(x_5); -lean_inc(x_4); -x_9 = lean_infer_type(x_1, x_4, x_5, x_6, x_7, x_8); -if (lean_obj_tag(x_9) == 0) -{ -lean_object* x_10; lean_object* x_11; lean_object* x_12; uint8_t x_13; lean_object* x_14; lean_object* x_27; lean_object* x_28; lean_object* x_29; uint8_t x_30; -x_10 = lean_ctor_get(x_9, 0); -lean_inc(x_10); -x_11 = lean_ctor_get(x_9, 1); -lean_inc(x_11); -lean_dec(x_9); -x_12 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___closed__6; -x_27 = lean_st_ref_get(x_7, x_11); -x_28 = lean_ctor_get(x_27, 0); -lean_inc(x_28); -x_29 = lean_ctor_get(x_28, 3); -lean_inc(x_29); -lean_dec(x_28); -x_30 = lean_ctor_get_uint8(x_29, sizeof(void*)*1); -lean_dec(x_29); -if (x_30 == 0) -{ -lean_object* x_31; uint8_t x_32; -x_31 = lean_ctor_get(x_27, 1); -lean_inc(x_31); -lean_dec(x_27); -x_32 = 0; -x_13 = x_32; -x_14 = x_31; -goto block_26; -} -else -{ -lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; uint8_t x_37; -x_33 = lean_ctor_get(x_27, 1); -lean_inc(x_33); -lean_dec(x_27); -x_34 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at_Lean_Meta_mkCongrLemma___spec__10(x_12, x_4, x_5, x_6, x_7, x_33); -x_35 = lean_ctor_get(x_34, 0); -lean_inc(x_35); -x_36 = lean_ctor_get(x_34, 1); -lean_inc(x_36); -lean_dec(x_34); -x_37 = lean_unbox(x_35); -lean_dec(x_35); -x_13 = x_37; -x_14 = x_36; -goto block_26; -} -block_26: -{ -if (x_13 == 0) -{ -lean_object* x_15; lean_object* x_16; -x_15 = lean_box(0); -x_16 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_withBelowDict___rarg___lambda__1(x_10, x_2, x_3, x_15, x_4, x_5, x_6, x_7, x_14); -return x_16; -} -else -{ -lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; -lean_inc(x_10); -x_17 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_17, 0, x_10); -x_18 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_withBelowDict___rarg___closed__2; -x_19 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_19, 0, x_18); -lean_ctor_set(x_19, 1, x_17); -x_20 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__6; -x_21 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_21, 0, x_19); -lean_ctor_set(x_21, 1, x_20); -x_22 = l_Lean_addTrace___at_Lean_Meta_mkCongrLemma___spec__9(x_12, x_21, x_4, x_5, x_6, x_7, x_14); -x_23 = lean_ctor_get(x_22, 0); -lean_inc(x_23); -x_24 = lean_ctor_get(x_22, 1); -lean_inc(x_24); -lean_dec(x_22); -x_25 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_withBelowDict___rarg___lambda__1(x_10, x_2, x_3, x_23, x_4, x_5, x_6, x_7, x_24); -return x_25; -} -} -} -else -{ -uint8_t x_38; -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -x_38 = !lean_is_exclusive(x_9); -if (x_38 == 0) -{ -return x_9; -} -else -{ -lean_object* x_39; lean_object* x_40; lean_object* x_41; -x_39 = lean_ctor_get(x_9, 0); -x_40 = lean_ctor_get(x_9, 1); -lean_inc(x_40); -lean_inc(x_39); -lean_dec(x_9); -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_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_withBelowDict(lean_object* x_1) { -_start: -{ -lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_withBelowDict___rarg), 8, 0); -return x_2; -} -} -lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___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) { -_start: -{ -lean_object* x_12; -x_12 = l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___lambda__2(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_6); -lean_dec(x_5); -return x_12; -} -} -lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___lambda__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) { -_start: -{ -lean_object* x_12; -x_12 = l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___lambda__3(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_6); -return x_12; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelow___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) { -_start: -{ -lean_object* x_10; -x_10 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux(x_3, x_4, x_1, x_2, x_5, x_6, x_7, x_8, x_9); -return x_10; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelow(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; -lean_inc(x_1); -x_9 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelow___lambda__1), 9, 2); -lean_closure_set(x_9, 0, x_3); -lean_closure_set(x_9, 1, x_1); -x_10 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_withBelowDict___rarg(x_1, x_2, x_9, x_4, x_5, x_6, x_7, x_8); -return x_10; -} -} -uint8_t l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_recArgHasLooseBVarsAt___lambda__1(lean_object* x_1, lean_object* x_2, lean_object* x_3) { -_start: -{ -uint8_t x_4; -x_4 = l_Lean_Expr_isAppOf(x_3, x_1); -if (x_4 == 0) -{ -uint8_t x_5; -x_5 = 0; -return x_5; -} -else -{ -lean_object* x_6; lean_object* x_7; uint8_t x_8; -x_6 = lean_unsigned_to_nat(0u); -x_7 = l_Lean_Expr_getAppNumArgsAux(x_3, x_6); -x_8 = lean_nat_dec_lt(x_2, x_7); -if (x_8 == 0) -{ -uint8_t x_9; -lean_dec(x_7); -x_9 = 0; -return x_9; -} -else -{ -lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; uint8_t x_14; -x_10 = lean_nat_sub(x_7, x_2); -lean_dec(x_7); -x_11 = lean_unsigned_to_nat(1u); -x_12 = lean_nat_sub(x_10, x_11); -lean_dec(x_10); -x_13 = l_Lean_Expr_getRevArg_x21(x_3, x_12); -x_14 = l_Lean_Expr_hasLooseBVars(x_13); -lean_dec(x_13); -return x_14; -} -} -} -} -uint8_t l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_recArgHasLooseBVarsAt(lean_object* x_1, lean_object* x_2, lean_object* x_3) { -_start: -{ -lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; size_t x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; -x_4 = lean_ctor_get(x_2, 0); -x_5 = lean_array_get_size(x_4); -x_6 = lean_ctor_get(x_2, 2); -x_7 = lean_nat_add(x_5, x_6); -lean_dec(x_5); -x_8 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_recArgHasLooseBVarsAt___lambda__1___boxed), 3, 2); -lean_closure_set(x_8, 0, x_1); -lean_closure_set(x_8, 1, x_7); -x_9 = 8192; -x_10 = l_Lean_Expr_FindImpl_initCache; -x_11 = l_Lean_Expr_FindImpl_findM_x3f_visit(x_8, x_9, x_3, x_10); -x_12 = lean_ctor_get(x_11, 0); -lean_inc(x_12); -lean_dec(x_11); -if (lean_obj_tag(x_12) == 0) -{ -uint8_t x_13; -x_13 = 0; -return x_13; -} -else -{ -uint8_t x_14; -lean_dec(x_12); -x_14 = 1; -return x_14; -} -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_recArgHasLooseBVarsAt___lambda__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { -_start: -{ -uint8_t x_4; lean_object* x_5; -x_4 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_recArgHasLooseBVarsAt___lambda__1(x_1, x_2, x_3); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_5 = lean_box(x_4); -return x_5; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_recArgHasLooseBVarsAt___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { -_start: -{ -uint8_t x_4; lean_object* x_5; -x_4 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_recArgHasLooseBVarsAt(x_1, x_2, x_3); -lean_dec(x_2); -x_5 = lean_box(x_4); -return x_5; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop_match__1___rarg(lean_object* x_1, lean_object* x_2) { -_start: -{ -lean_object* x_3; lean_object* x_4; lean_object* x_5; -x_3 = lean_ctor_get(x_1, 0); -lean_inc(x_3); -x_4 = lean_ctor_get(x_1, 1); -lean_inc(x_4); -lean_dec(x_1); -x_5 = lean_apply_2(x_2, x_3, x_4); -return x_5; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop_match__1(lean_object* x_1) { -_start: -{ -lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop_match__1___rarg), 2, 0); -return x_2; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop_match__2___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3) { -_start: -{ -if (lean_obj_tag(x_1) == 0) -{ -lean_object* x_4; lean_object* x_5; -lean_dec(x_2); -x_4 = lean_box(0); -x_5 = lean_apply_1(x_3, x_4); -return x_5; -} -else -{ -lean_object* x_6; lean_object* x_7; -lean_dec(x_3); -x_6 = lean_ctor_get(x_1, 0); -lean_inc(x_6); -lean_dec(x_1); -x_7 = lean_apply_1(x_2, x_6); -return x_7; -} -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop_match__2(lean_object* x_1) { -_start: -{ -lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop_match__2___rarg), 3, 0); -return x_2; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop_match__3___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { -_start: -{ -switch (lean_obj_tag(x_1)) { -case 5: -{ -lean_object* x_9; lean_object* x_10; uint64_t x_11; lean_object* x_12; lean_object* x_13; -lean_dec(x_8); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -x_9 = lean_ctor_get(x_1, 0); -lean_inc(x_9); -x_10 = lean_ctor_get(x_1, 1); -lean_inc(x_10); -x_11 = lean_ctor_get_uint64(x_1, sizeof(void*)*2); -lean_dec(x_1); -x_12 = lean_box_uint64(x_11); -x_13 = lean_apply_3(x_7, x_9, x_10, x_12); -return x_13; -} -case 6: -{ -lean_object* x_14; lean_object* x_15; lean_object* x_16; uint64_t x_17; lean_object* x_18; lean_object* 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); -x_14 = lean_ctor_get(x_1, 0); -lean_inc(x_14); -x_15 = lean_ctor_get(x_1, 1); -lean_inc(x_15); -x_16 = lean_ctor_get(x_1, 2); -lean_inc(x_16); -x_17 = lean_ctor_get_uint64(x_1, sizeof(void*)*3); -lean_dec(x_1); -x_18 = lean_box_uint64(x_17); -x_19 = lean_apply_4(x_2, x_14, x_15, x_16, x_18); -return x_19; -} -case 7: -{ -lean_object* x_20; lean_object* x_21; lean_object* x_22; uint64_t x_23; lean_object* x_24; lean_object* x_25; -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_2); -x_20 = lean_ctor_get(x_1, 0); -lean_inc(x_20); -x_21 = lean_ctor_get(x_1, 1); -lean_inc(x_21); -x_22 = lean_ctor_get(x_1, 2); -lean_inc(x_22); -x_23 = lean_ctor_get_uint64(x_1, sizeof(void*)*3); -lean_dec(x_1); -x_24 = lean_box_uint64(x_23); -x_25 = lean_apply_4(x_3, x_20, x_21, x_22, x_24); -return x_25; -} -case 8: -{ -lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; uint64_t x_30; lean_object* x_31; lean_object* x_32; -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_3); -lean_dec(x_2); -x_26 = lean_ctor_get(x_1, 0); -lean_inc(x_26); -x_27 = lean_ctor_get(x_1, 1); -lean_inc(x_27); -x_28 = lean_ctor_get(x_1, 2); -lean_inc(x_28); -x_29 = lean_ctor_get(x_1, 3); -lean_inc(x_29); -x_30 = lean_ctor_get_uint64(x_1, sizeof(void*)*4); -lean_dec(x_1); -x_31 = lean_box_uint64(x_30); -x_32 = lean_apply_5(x_4, x_26, x_27, x_28, x_29, x_31); -return x_32; -} -case 10: -{ -lean_object* x_33; lean_object* x_34; uint64_t x_35; lean_object* x_36; lean_object* x_37; -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -x_33 = lean_ctor_get(x_1, 0); -lean_inc(x_33); -x_34 = lean_ctor_get(x_1, 1); -lean_inc(x_34); -x_35 = lean_ctor_get_uint64(x_1, sizeof(void*)*2); -lean_dec(x_1); -x_36 = lean_box_uint64(x_35); -x_37 = lean_apply_3(x_5, x_33, x_34, x_36); -return x_37; -} -case 11: -{ -lean_object* x_38; lean_object* x_39; lean_object* x_40; uint64_t x_41; lean_object* x_42; lean_object* x_43; -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -x_38 = lean_ctor_get(x_1, 0); -lean_inc(x_38); -x_39 = lean_ctor_get(x_1, 1); -lean_inc(x_39); -x_40 = lean_ctor_get(x_1, 2); -lean_inc(x_40); -x_41 = lean_ctor_get_uint64(x_1, sizeof(void*)*3); -lean_dec(x_1); -x_42 = lean_box_uint64(x_41); -x_43 = lean_apply_4(x_6, x_38, x_39, x_40, x_42); -return x_43; -} -default: -{ -lean_object* x_44; -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -x_44 = lean_apply_1(x_8, x_1); -return x_44; -} -} -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop_match__3(lean_object* x_1) { -_start: -{ -lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop_match__3___rarg), 8, 0); -return x_2; -} -} -lean_object* l_Lean_Meta_getMatcherInfo_x3f___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__2(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { -_start: -{ -lean_object* x_8; uint8_t x_9; -x_8 = lean_st_ref_get(x_6, x_7); -x_9 = !lean_is_exclusive(x_8); -if (x_9 == 0) -{ -lean_object* x_10; lean_object* x_11; lean_object* x_12; -x_10 = lean_ctor_get(x_8, 0); -x_11 = lean_ctor_get(x_10, 0); -lean_inc(x_11); -lean_dec(x_10); -x_12 = l_Lean_Meta_Match_Extension_getMatcherInfo_x3f(x_11, x_1); -lean_ctor_set(x_8, 0, x_12); -return x_8; -} -else -{ -lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; -x_13 = lean_ctor_get(x_8, 0); -x_14 = lean_ctor_get(x_8, 1); -lean_inc(x_14); -lean_inc(x_13); -lean_dec(x_8); -x_15 = lean_ctor_get(x_13, 0); -lean_inc(x_15); -lean_dec(x_13); -x_16 = l_Lean_Meta_Match_Extension_getMatcherInfo_x3f(x_15, x_1); -x_17 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_17, 0, x_16); -lean_ctor_set(x_17, 1, x_14); -return x_17; -} -} -} -lean_object* l_Lean_Meta_matchMatcherApp_x3f___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { -_start: -{ -lean_object* x_8; -x_8 = l_Lean_Expr_getAppFn(x_1); -if (lean_obj_tag(x_8) == 4) -{ -lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; -x_9 = lean_ctor_get(x_8, 0); -lean_inc(x_9); -x_10 = lean_ctor_get(x_8, 1); -lean_inc(x_10); -lean_dec(x_8); -lean_inc(x_9); -x_11 = l_Lean_Meta_getMatcherInfo_x3f___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__2(x_9, x_2, x_3, x_4, x_5, x_6, x_7); -x_12 = lean_ctor_get(x_11, 0); -lean_inc(x_12); -if (lean_obj_tag(x_12) == 0) -{ -uint8_t x_13; -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_1); -x_13 = !lean_is_exclusive(x_11); -if (x_13 == 0) -{ -lean_object* x_14; lean_object* x_15; -x_14 = lean_ctor_get(x_11, 0); -lean_dec(x_14); -x_15 = lean_box(0); -lean_ctor_set(x_11, 0, x_15); -return x_11; -} -else -{ -lean_object* x_16; lean_object* x_17; lean_object* x_18; -x_16 = lean_ctor_get(x_11, 1); -lean_inc(x_16); -lean_dec(x_11); -x_17 = lean_box(0); -x_18 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_18, 0, x_17); -lean_ctor_set(x_18, 1, x_16); -return x_18; -} -} -else -{ -uint8_t x_19; -x_19 = !lean_is_exclusive(x_11); -if (x_19 == 0) -{ -lean_object* x_20; uint8_t x_21; -x_20 = lean_ctor_get(x_11, 0); -lean_dec(x_20); -x_21 = !lean_is_exclusive(x_12); -if (x_21 == 0) -{ -lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; uint8_t x_32; -x_22 = lean_ctor_get(x_12, 0); -x_23 = lean_unsigned_to_nat(0u); -x_24 = l_Lean_Expr_getAppNumArgsAux(x_1, x_23); -x_25 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_getFixedPrefix___lambda__2___closed__1; -lean_inc(x_24); -x_26 = lean_mk_array(x_24, x_25); -x_27 = lean_unsigned_to_nat(1u); -x_28 = lean_nat_sub(x_24, x_27); -lean_dec(x_24); -x_29 = l___private_Lean_Expr_0__Lean_Expr_getAppArgsAux(x_1, x_26, x_28); -x_30 = lean_array_get_size(x_29); -x_31 = l_Lean_Meta_Match_MatcherInfo_arity(x_22); -x_32 = lean_nat_dec_lt(x_30, x_31); -lean_dec(x_31); -if (x_32 == 0) -{ -lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_object* x_51; lean_object* x_52; lean_object* x_53; -x_33 = l_List_redLength___rarg(x_10); -x_34 = lean_mk_empty_array_with_capacity(x_33); -lean_dec(x_33); -x_35 = l_List_toArrayAux___rarg(x_10, x_34); -x_36 = lean_ctor_get(x_22, 3); -lean_inc(x_36); -x_37 = lean_ctor_get(x_22, 0); -lean_inc(x_37); -lean_inc(x_37); -lean_inc(x_29); -x_38 = l_Array_extract___rarg(x_29, x_23, x_37); -x_39 = l_Lean_instInhabitedExpr; -x_40 = lean_array_get(x_39, x_29, x_37); -x_41 = lean_nat_add(x_37, x_27); -lean_dec(x_37); -x_42 = lean_ctor_get(x_22, 1); -lean_inc(x_42); -x_43 = lean_nat_add(x_41, x_42); -lean_dec(x_42); -lean_inc(x_43); -lean_inc(x_29); -x_44 = l_Array_toSubarray___rarg(x_29, x_41, x_43); -x_45 = l_Array_ofSubarray___rarg(x_44); -x_46 = lean_ctor_get(x_22, 2); -lean_inc(x_46); -x_47 = l_Lean_Meta_Match_MatcherInfo_numAlts(x_22); -lean_dec(x_22); -x_48 = lean_nat_add(x_43, x_47); -lean_dec(x_47); -lean_inc(x_48); -lean_inc(x_29); -x_49 = l_Array_toSubarray___rarg(x_29, x_43, x_48); -x_50 = l_Array_ofSubarray___rarg(x_49); -x_51 = l_Array_toSubarray___rarg(x_29, x_48, x_30); -x_52 = l_Array_ofSubarray___rarg(x_51); -x_53 = lean_alloc_ctor(0, 9, 0); -lean_ctor_set(x_53, 0, x_9); -lean_ctor_set(x_53, 1, x_35); -lean_ctor_set(x_53, 2, x_36); -lean_ctor_set(x_53, 3, x_38); -lean_ctor_set(x_53, 4, x_40); -lean_ctor_set(x_53, 5, x_45); -lean_ctor_set(x_53, 6, x_46); -lean_ctor_set(x_53, 7, x_50); -lean_ctor_set(x_53, 8, x_52); -lean_ctor_set(x_12, 0, x_53); -return x_11; -} -else -{ -lean_object* x_54; -lean_dec(x_30); -lean_dec(x_29); -lean_free_object(x_12); -lean_dec(x_22); -lean_dec(x_10); -lean_dec(x_9); -x_54 = lean_box(0); -lean_ctor_set(x_11, 0, x_54); -return x_11; -} -} -else -{ -lean_object* x_55; lean_object* x_56; lean_object* x_57; lean_object* x_58; lean_object* x_59; lean_object* x_60; lean_object* x_61; lean_object* x_62; lean_object* x_63; lean_object* x_64; uint8_t x_65; -x_55 = lean_ctor_get(x_12, 0); -lean_inc(x_55); -lean_dec(x_12); -x_56 = lean_unsigned_to_nat(0u); -x_57 = l_Lean_Expr_getAppNumArgsAux(x_1, x_56); -x_58 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_getFixedPrefix___lambda__2___closed__1; -lean_inc(x_57); -x_59 = lean_mk_array(x_57, x_58); -x_60 = lean_unsigned_to_nat(1u); -x_61 = lean_nat_sub(x_57, x_60); -lean_dec(x_57); -x_62 = l___private_Lean_Expr_0__Lean_Expr_getAppArgsAux(x_1, x_59, x_61); -x_63 = lean_array_get_size(x_62); -x_64 = l_Lean_Meta_Match_MatcherInfo_arity(x_55); -x_65 = lean_nat_dec_lt(x_63, x_64); -lean_dec(x_64); -if (x_65 == 0) -{ -lean_object* x_66; lean_object* x_67; lean_object* x_68; lean_object* x_69; lean_object* x_70; lean_object* x_71; lean_object* x_72; lean_object* x_73; lean_object* x_74; lean_object* x_75; lean_object* x_76; lean_object* x_77; lean_object* x_78; lean_object* x_79; lean_object* x_80; lean_object* x_81; lean_object* x_82; lean_object* x_83; lean_object* x_84; lean_object* x_85; lean_object* x_86; lean_object* x_87; -x_66 = l_List_redLength___rarg(x_10); -x_67 = lean_mk_empty_array_with_capacity(x_66); -lean_dec(x_66); -x_68 = l_List_toArrayAux___rarg(x_10, x_67); -x_69 = lean_ctor_get(x_55, 3); -lean_inc(x_69); -x_70 = lean_ctor_get(x_55, 0); -lean_inc(x_70); -lean_inc(x_70); -lean_inc(x_62); -x_71 = l_Array_extract___rarg(x_62, x_56, x_70); -x_72 = l_Lean_instInhabitedExpr; -x_73 = lean_array_get(x_72, x_62, x_70); -x_74 = lean_nat_add(x_70, x_60); -lean_dec(x_70); -x_75 = lean_ctor_get(x_55, 1); -lean_inc(x_75); -x_76 = lean_nat_add(x_74, x_75); -lean_dec(x_75); -lean_inc(x_76); -lean_inc(x_62); -x_77 = l_Array_toSubarray___rarg(x_62, x_74, x_76); -x_78 = l_Array_ofSubarray___rarg(x_77); -x_79 = lean_ctor_get(x_55, 2); -lean_inc(x_79); -x_80 = l_Lean_Meta_Match_MatcherInfo_numAlts(x_55); -lean_dec(x_55); -x_81 = lean_nat_add(x_76, x_80); -lean_dec(x_80); -lean_inc(x_81); -lean_inc(x_62); -x_82 = l_Array_toSubarray___rarg(x_62, x_76, x_81); -x_83 = l_Array_ofSubarray___rarg(x_82); -x_84 = l_Array_toSubarray___rarg(x_62, x_81, x_63); -x_85 = l_Array_ofSubarray___rarg(x_84); -x_86 = lean_alloc_ctor(0, 9, 0); -lean_ctor_set(x_86, 0, x_9); -lean_ctor_set(x_86, 1, x_68); -lean_ctor_set(x_86, 2, x_69); -lean_ctor_set(x_86, 3, x_71); -lean_ctor_set(x_86, 4, x_73); -lean_ctor_set(x_86, 5, x_78); -lean_ctor_set(x_86, 6, x_79); -lean_ctor_set(x_86, 7, x_83); -lean_ctor_set(x_86, 8, x_85); -x_87 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_87, 0, x_86); -lean_ctor_set(x_11, 0, x_87); -return x_11; -} -else -{ -lean_object* x_88; -lean_dec(x_63); -lean_dec(x_62); -lean_dec(x_55); -lean_dec(x_10); -lean_dec(x_9); -x_88 = lean_box(0); -lean_ctor_set(x_11, 0, x_88); -return x_11; -} -} -} -else -{ -lean_object* x_89; lean_object* x_90; lean_object* x_91; lean_object* x_92; lean_object* x_93; lean_object* x_94; lean_object* x_95; lean_object* x_96; lean_object* x_97; lean_object* x_98; lean_object* x_99; lean_object* x_100; uint8_t x_101; -x_89 = lean_ctor_get(x_11, 1); -lean_inc(x_89); -lean_dec(x_11); -x_90 = lean_ctor_get(x_12, 0); -lean_inc(x_90); -if (lean_is_exclusive(x_12)) { - lean_ctor_release(x_12, 0); - x_91 = x_12; -} else { - lean_dec_ref(x_12); - x_91 = lean_box(0); -} -x_92 = lean_unsigned_to_nat(0u); -x_93 = l_Lean_Expr_getAppNumArgsAux(x_1, x_92); -x_94 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_getFixedPrefix___lambda__2___closed__1; -lean_inc(x_93); -x_95 = lean_mk_array(x_93, x_94); -x_96 = lean_unsigned_to_nat(1u); -x_97 = lean_nat_sub(x_93, x_96); -lean_dec(x_93); -x_98 = l___private_Lean_Expr_0__Lean_Expr_getAppArgsAux(x_1, x_95, x_97); -x_99 = lean_array_get_size(x_98); -x_100 = l_Lean_Meta_Match_MatcherInfo_arity(x_90); -x_101 = lean_nat_dec_lt(x_99, x_100); -lean_dec(x_100); -if (x_101 == 0) -{ -lean_object* x_102; lean_object* x_103; lean_object* x_104; lean_object* x_105; lean_object* x_106; lean_object* x_107; lean_object* x_108; lean_object* x_109; lean_object* x_110; lean_object* x_111; lean_object* x_112; lean_object* x_113; lean_object* x_114; lean_object* x_115; lean_object* x_116; lean_object* x_117; lean_object* x_118; lean_object* x_119; lean_object* x_120; lean_object* x_121; lean_object* x_122; lean_object* x_123; lean_object* x_124; -x_102 = l_List_redLength___rarg(x_10); -x_103 = lean_mk_empty_array_with_capacity(x_102); -lean_dec(x_102); -x_104 = l_List_toArrayAux___rarg(x_10, x_103); -x_105 = lean_ctor_get(x_90, 3); -lean_inc(x_105); -x_106 = lean_ctor_get(x_90, 0); -lean_inc(x_106); -lean_inc(x_106); -lean_inc(x_98); -x_107 = l_Array_extract___rarg(x_98, x_92, x_106); -x_108 = l_Lean_instInhabitedExpr; -x_109 = lean_array_get(x_108, x_98, x_106); -x_110 = lean_nat_add(x_106, x_96); -lean_dec(x_106); -x_111 = lean_ctor_get(x_90, 1); -lean_inc(x_111); -x_112 = lean_nat_add(x_110, x_111); -lean_dec(x_111); -lean_inc(x_112); -lean_inc(x_98); -x_113 = l_Array_toSubarray___rarg(x_98, x_110, x_112); -x_114 = l_Array_ofSubarray___rarg(x_113); -x_115 = lean_ctor_get(x_90, 2); -lean_inc(x_115); -x_116 = l_Lean_Meta_Match_MatcherInfo_numAlts(x_90); -lean_dec(x_90); -x_117 = lean_nat_add(x_112, x_116); -lean_dec(x_116); -lean_inc(x_117); -lean_inc(x_98); -x_118 = l_Array_toSubarray___rarg(x_98, x_112, x_117); -x_119 = l_Array_ofSubarray___rarg(x_118); -x_120 = l_Array_toSubarray___rarg(x_98, x_117, x_99); -x_121 = l_Array_ofSubarray___rarg(x_120); -x_122 = lean_alloc_ctor(0, 9, 0); -lean_ctor_set(x_122, 0, x_9); -lean_ctor_set(x_122, 1, x_104); -lean_ctor_set(x_122, 2, x_105); -lean_ctor_set(x_122, 3, x_107); -lean_ctor_set(x_122, 4, x_109); -lean_ctor_set(x_122, 5, x_114); -lean_ctor_set(x_122, 6, x_115); -lean_ctor_set(x_122, 7, x_119); -lean_ctor_set(x_122, 8, x_121); -if (lean_is_scalar(x_91)) { - x_123 = lean_alloc_ctor(1, 1, 0); -} else { - x_123 = x_91; -} -lean_ctor_set(x_123, 0, x_122); -x_124 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_124, 0, x_123); -lean_ctor_set(x_124, 1, x_89); -return x_124; -} -else -{ -lean_object* x_125; lean_object* x_126; -lean_dec(x_99); -lean_dec(x_98); -lean_dec(x_91); -lean_dec(x_90); -lean_dec(x_10); -lean_dec(x_9); -x_125 = lean_box(0); -x_126 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_126, 0, x_125); -lean_ctor_set(x_126, 1, x_89); -return x_126; -} -} -} -} -else -{ -lean_object* x_127; lean_object* x_128; -lean_dec(x_8); -lean_dec(x_1); -x_127 = lean_box(0); -x_128 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_128, 0, x_127); -lean_ctor_set(x_128, 1, x_7); -return x_128; -} -} -} -lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__3(lean_object* x_1, lean_object* x_2, lean_object* x_3, size_t x_4, size_t 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) { -_start: -{ -uint8_t x_13; -x_13 = x_5 < x_4; -if (x_13 == 0) -{ -lean_object* x_14; lean_object* x_15; -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_14 = x_6; -x_15 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_15, 0, x_14); -lean_ctor_set(x_15, 1, x_12); -return x_15; -} -else -{ -lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; -x_16 = lean_array_uget(x_6, x_5); -x_17 = lean_unsigned_to_nat(0u); -x_18 = lean_array_uset(x_6, x_5, x_17); -x_19 = x_16; -lean_inc(x_11); -lean_inc(x_10); -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -lean_inc(x_3); -lean_inc(x_2); -lean_inc(x_1); -x_20 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop(x_1, x_2, x_3, x_19, x_7, x_8, x_9, x_10, x_11, x_12); -if (lean_obj_tag(x_20) == 0) -{ -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_21 = lean_ctor_get(x_20, 0); -lean_inc(x_21); -x_22 = lean_ctor_get(x_20, 1); -lean_inc(x_22); -lean_dec(x_20); -x_23 = 1; -x_24 = x_5 + x_23; -x_25 = x_21; -x_26 = lean_array_uset(x_18, x_5, x_25); -x_5 = x_24; -x_6 = x_26; -x_12 = x_22; -goto _start; -} -else -{ -uint8_t x_28; -lean_dec(x_18); -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -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; -} -} -} -} -} -lean_object* l_Std_Range_forIn_loop___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__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, lean_object* x_11, lean_object* x_12, lean_object* x_13, lean_object* x_14, lean_object* x_15) { -_start: -{ -lean_object* x_16; uint8_t x_17; -x_16 = lean_ctor_get(x_6, 1); -x_17 = lean_nat_dec_le(x_16, x_8); -if (x_17 == 0) -{ -lean_object* x_18; uint8_t x_19; -x_18 = lean_unsigned_to_nat(0u); -x_19 = lean_nat_dec_eq(x_7, x_18); -if (x_19 == 0) -{ -lean_object* x_20; lean_object* x_21; uint8_t x_22; -x_20 = lean_unsigned_to_nat(1u); -x_21 = lean_nat_sub(x_7, x_20); -lean_dec(x_7); -x_22 = lean_nat_dec_eq(x_4, x_8); -if (x_22 == 0) -{ -lean_object* x_23; uint8_t x_24; -x_23 = lean_ctor_get(x_2, 3); -lean_inc(x_23); -x_24 = l_Array_contains___at_Lean_Meta_addImplicitTargets_collect___spec__1(x_23, x_8); -lean_dec(x_23); -if (x_24 == 0) -{ -lean_object* x_25; lean_object* x_26; lean_object* x_27; -x_25 = l_Lean_instInhabitedExpr; -x_26 = lean_array_get(x_25, x_5, x_8); -lean_inc(x_14); -lean_inc(x_13); -lean_inc(x_12); -lean_inc(x_11); -lean_inc(x_10); -lean_inc(x_3); -lean_inc(x_2); -lean_inc(x_1); -x_27 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop(x_1, x_2, x_3, x_26, x_10, x_11, x_12, x_13, x_14, x_15); -if (lean_obj_tag(x_27) == 0) -{ -lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; -x_28 = lean_ctor_get(x_27, 0); -lean_inc(x_28); -x_29 = lean_ctor_get(x_27, 1); -lean_inc(x_29); -lean_dec(x_27); -x_30 = lean_array_push(x_9, x_28); -x_31 = lean_ctor_get(x_6, 2); -x_32 = lean_nat_add(x_8, x_31); -lean_dec(x_8); -x_7 = x_21; -x_8 = x_32; -x_9 = x_30; -x_15 = x_29; -goto _start; -} -else -{ -uint8_t x_34; -lean_dec(x_21); -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_2); -lean_dec(x_1); -x_34 = !lean_is_exclusive(x_27); -if (x_34 == 0) -{ -return x_27; -} -else -{ -lean_object* x_35; lean_object* x_36; lean_object* x_37; -x_35 = lean_ctor_get(x_27, 0); -x_36 = lean_ctor_get(x_27, 1); -lean_inc(x_36); -lean_inc(x_35); -lean_dec(x_27); -x_37 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_37, 0, x_35); -lean_ctor_set(x_37, 1, x_36); -return x_37; -} -} -} -else -{ -lean_object* x_38; lean_object* x_39; -x_38 = lean_ctor_get(x_6, 2); -x_39 = lean_nat_add(x_8, x_38); -lean_dec(x_8); -x_7 = x_21; -x_8 = x_39; -goto _start; -} -} -else -{ -lean_object* x_41; lean_object* x_42; -x_41 = lean_ctor_get(x_6, 2); -x_42 = lean_nat_add(x_8, x_41); -lean_dec(x_8); -x_7 = x_21; -x_8 = x_42; -goto _start; -} -} -else -{ -lean_object* x_44; -lean_dec(x_14); -lean_dec(x_13); -lean_dec(x_12); -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_44 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_44, 0, x_9); -lean_ctor_set(x_44, 1, x_15); -return x_44; -} -} -else -{ -lean_object* x_45; -lean_dec(x_14); -lean_dec(x_13); -lean_dec(x_12); -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_45 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_45, 0, x_9); -lean_ctor_set(x_45, 1, x_15); -return x_45; -} -} -} -lean_object* l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__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) { -_start: -{ -lean_object* x_8; lean_object* x_9; uint8_t x_10; -x_8 = lean_ctor_get(x_5, 3); -x_9 = l_Lean_addMessageContextFull___at_Lean_Meta_instAddMessageContextMetaM___spec__1(x_1, x_3, x_4, x_5, x_6, x_7); -x_10 = !lean_is_exclusive(x_9); -if (x_10 == 0) -{ -lean_object* x_11; lean_object* x_12; -x_11 = lean_ctor_get(x_9, 0); -lean_inc(x_8); -x_12 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_12, 0, x_8); -lean_ctor_set(x_12, 1, x_11); -lean_ctor_set_tag(x_9, 1); -lean_ctor_set(x_9, 0, x_12); -return x_9; -} -else -{ -lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; -x_13 = lean_ctor_get(x_9, 0); -x_14 = lean_ctor_get(x_9, 1); -lean_inc(x_14); -lean_inc(x_13); -lean_dec(x_9); -lean_inc(x_8); -x_15 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_15, 0, x_8); -lean_ctor_set(x_15, 1, x_13); -x_16 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_16, 0, x_15); -lean_ctor_set(x_16, 1, x_14); -return x_16; -} -} -} -lean_object* l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__6(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; lean_object* x_9; uint8_t x_10; -x_8 = lean_ctor_get(x_5, 3); -x_9 = l_Lean_addMessageContextFull___at_Lean_Meta_instAddMessageContextMetaM___spec__1(x_1, x_3, x_4, x_5, x_6, x_7); -x_10 = !lean_is_exclusive(x_9); -if (x_10 == 0) -{ -lean_object* x_11; lean_object* x_12; -x_11 = lean_ctor_get(x_9, 0); -lean_inc(x_8); -x_12 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_12, 0, x_8); -lean_ctor_set(x_12, 1, x_11); -lean_ctor_set_tag(x_9, 1); -lean_ctor_set(x_9, 0, x_12); -return x_9; -} -else -{ -lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; -x_13 = lean_ctor_get(x_9, 0); -x_14 = lean_ctor_get(x_9, 1); -lean_inc(x_14); -lean_inc(x_13); -lean_dec(x_9); -lean_inc(x_8); -x_15 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_15, 0, x_8); -lean_ctor_set(x_15, 1, x_13); -x_16 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_16, 0, x_15); -lean_ctor_set(x_16, 1, x_14); -return x_16; -} -} -} -lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___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, lean_object* x_12, lean_object* x_13) { -_start: -{ -lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; -x_14 = lean_array_get_size(x_1); -x_15 = l_Array_extract___rarg(x_1, x_2, x_14); -x_16 = lean_array_get_size(x_15); -x_17 = lean_unsigned_to_nat(0u); -x_18 = lean_unsigned_to_nat(1u); -lean_inc(x_16); -x_19 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_19, 0, x_17); -lean_ctor_set(x_19, 1, x_16); -lean_ctor_set(x_19, 2, x_18); -x_20 = l_Lean_Elab_Structural_State_addMatchers___default___closed__1; -x_21 = l_Std_Range_forIn_loop___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__4(x_3, x_4, x_5, x_6, x_15, x_19, x_16, x_17, x_20, x_8, x_9, x_10, x_11, x_12, x_13); -lean_dec(x_19); -lean_dec(x_15); -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_mkAppN(x_7, 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_mkAppN(x_7, 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_7); -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; -} -} -} -} -static lean_object* _init_l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___lambda__2___closed__1() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string("failed to eliminate recursive application"); -return x_1; -} -} -static lean_object* _init_l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___lambda__2___closed__2() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___lambda__2___closed__1; -x_2 = l_Lean_stringToMessageData(x_1); -return x_2; -} -} -lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___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_object* x_12, lean_object* x_13, lean_object* x_14, lean_object* x_15) { -_start: -{ -lean_object* x_16; lean_object* x_17; lean_object* x_18; -lean_dec(x_9); -x_16 = l_Lean_instInhabitedExpr; -x_17 = lean_array_get(x_16, x_1, x_2); -lean_dec(x_2); -lean_inc(x_14); -lean_inc(x_13); -lean_inc(x_12); -lean_inc(x_11); -lean_inc(x_10); -lean_inc(x_5); -lean_inc(x_4); -lean_inc(x_3); -x_18 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop(x_3, x_4, x_5, x_17, x_10, x_11, x_12, x_13, x_14, x_15); -if (lean_obj_tag(x_18) == 0) -{ -lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; -x_19 = lean_ctor_get(x_18, 0); -lean_inc(x_19); -x_20 = lean_ctor_get(x_18, 1); -lean_inc(x_20); -lean_dec(x_18); -x_21 = lean_ctor_get(x_4, 6); -lean_inc(x_21); -x_22 = lean_array_get_size(x_21); -lean_dec(x_21); -lean_inc(x_14); -lean_inc(x_13); -lean_inc(x_12); -lean_inc(x_11); -lean_inc(x_5); -x_23 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelow(x_5, x_22, x_19, x_11, x_12, x_13, x_14, x_20); -if (lean_obj_tag(x_23) == 0) -{ -lean_object* x_24; lean_object* x_25; lean_object* x_26; -lean_dec(x_8); -x_24 = lean_ctor_get(x_23, 0); -lean_inc(x_24); -x_25 = lean_ctor_get(x_23, 1); -lean_inc(x_25); -lean_dec(x_23); -x_26 = l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___lambda__1(x_1, x_6, x_3, x_4, x_5, x_7, x_24, x_10, x_11, x_12, x_13, x_14, x_25); -lean_dec(x_7); -return x_26; -} -else -{ -lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; uint8_t x_34; -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_27 = lean_ctor_get(x_23, 1); -lean_inc(x_27); -lean_dec(x_23); -x_28 = l_Lean_indentExpr(x_8); -x_29 = l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___lambda__2___closed__2; -x_30 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_30, 0, x_29); -lean_ctor_set(x_30, 1, x_28); -x_31 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__6; -x_32 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_32, 0, x_30); -lean_ctor_set(x_32, 1, x_31); -x_33 = l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__5(x_32, x_10, x_11, x_12, x_13, x_14, x_27); -lean_dec(x_14); -lean_dec(x_13); -lean_dec(x_12); -lean_dec(x_11); -lean_dec(x_10); -x_34 = !lean_is_exclusive(x_33); -if (x_34 == 0) -{ -return x_33; -} -else -{ -lean_object* x_35; lean_object* x_36; lean_object* x_37; -x_35 = lean_ctor_get(x_33, 0); -x_36 = lean_ctor_get(x_33, 1); -lean_inc(x_36); -lean_inc(x_35); -lean_dec(x_33); -x_37 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_37, 0, x_35); -lean_ctor_set(x_37, 1, x_36); -return x_37; -} -} -} -else -{ -uint8_t x_38; -lean_dec(x_14); -lean_dec(x_13); -lean_dec(x_12); -lean_dec(x_11); -lean_dec(x_10); -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_38 = !lean_is_exclusive(x_18); -if (x_38 == 0) -{ -return x_18; -} -else -{ -lean_object* x_39; lean_object* x_40; lean_object* x_41; -x_39 = lean_ctor_get(x_18, 0); -x_40 = lean_ctor_get(x_18, 1); -lean_inc(x_40); -lean_inc(x_39); -lean_dec(x_18); -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; -} -} -} -} -static lean_object* _init_l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___closed__1() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string("insufficient number of parameters at recursive application "); -return x_1; -} -} -static lean_object* _init_l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___closed__2() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___closed__1; -x_2 = l_Lean_stringToMessageData(x_1); -return x_2; -} -} -static lean_object* _init_l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___boxed__const__1() { -_start: -{ -size_t x_1; lean_object* x_2; -x_1 = 0; -x_2 = lean_box_usize(x_1); -return x_2; -} -} -lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7(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: -{ -if (lean_obj_tag(x_5) == 5) -{ -lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; -x_14 = lean_ctor_get(x_5, 0); -lean_inc(x_14); -x_15 = lean_ctor_get(x_5, 1); -lean_inc(x_15); -lean_dec(x_5); -x_16 = lean_array_set(x_6, x_7, x_15); -x_17 = lean_unsigned_to_nat(1u); -x_18 = lean_nat_sub(x_7, x_17); -lean_dec(x_7); -x_5 = x_14; -x_6 = x_16; -x_7 = x_18; -goto _start; -} -else -{ -uint8_t x_20; -lean_dec(x_7); -x_20 = l_Lean_Expr_isConstOf(x_5, x_1); -if (x_20 == 0) -{ -lean_object* x_21; -lean_dec(x_4); -lean_inc(x_12); -lean_inc(x_11); -lean_inc(x_10); -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_3); -lean_inc(x_2); -lean_inc(x_1); -x_21 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop(x_1, x_2, x_3, x_5, x_8, x_9, x_10, x_11, x_12, x_13); -if (lean_obj_tag(x_21) == 0) -{ -lean_object* x_22; lean_object* x_23; lean_object* x_24; size_t x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; -x_22 = lean_ctor_get(x_21, 0); -lean_inc(x_22); -x_23 = lean_ctor_get(x_21, 1); -lean_inc(x_23); -lean_dec(x_21); -x_24 = lean_array_get_size(x_6); -x_25 = lean_usize_of_nat(x_24); -lean_dec(x_24); -x_26 = x_6; -x_27 = lean_box_usize(x_25); -x_28 = l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___boxed__const__1; -x_29 = lean_alloc_closure((void*)(l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__3___boxed), 12, 6); -lean_closure_set(x_29, 0, x_1); -lean_closure_set(x_29, 1, x_2); -lean_closure_set(x_29, 2, x_3); -lean_closure_set(x_29, 3, x_27); -lean_closure_set(x_29, 4, x_28); -lean_closure_set(x_29, 5, x_26); -x_30 = x_29; -x_31 = lean_apply_6(x_30, x_8, x_9, x_10, x_11, x_12, x_23); -if (lean_obj_tag(x_31) == 0) -{ -uint8_t x_32; -x_32 = !lean_is_exclusive(x_31); -if (x_32 == 0) -{ -lean_object* x_33; lean_object* x_34; -x_33 = lean_ctor_get(x_31, 0); -x_34 = l_Lean_mkAppN(x_22, x_33); -lean_ctor_set(x_31, 0, x_34); -return x_31; -} -else -{ -lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; -x_35 = lean_ctor_get(x_31, 0); -x_36 = lean_ctor_get(x_31, 1); -lean_inc(x_36); -lean_inc(x_35); -lean_dec(x_31); -x_37 = l_Lean_mkAppN(x_22, x_35); -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_39; -lean_dec(x_22); -x_39 = !lean_is_exclusive(x_31); -if (x_39 == 0) -{ -return x_31; -} -else -{ -lean_object* x_40; lean_object* x_41; lean_object* x_42; -x_40 = lean_ctor_get(x_31, 0); -x_41 = lean_ctor_get(x_31, 1); -lean_inc(x_41); -lean_inc(x_40); -lean_dec(x_31); -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 -{ -uint8_t x_43; -lean_dec(x_12); -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_6); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_43 = !lean_is_exclusive(x_21); -if (x_43 == 0) -{ -return x_21; -} -else -{ -lean_object* x_44; lean_object* x_45; lean_object* x_46; -x_44 = lean_ctor_get(x_21, 0); -x_45 = lean_ctor_get(x_21, 1); -lean_inc(x_45); -lean_inc(x_44); -lean_dec(x_21); -x_46 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_46, 0, x_44); -lean_ctor_set(x_46, 1, x_45); -return x_46; -} -} -} -else -{ -lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_object* x_51; uint8_t x_52; -lean_dec(x_5); -x_47 = lean_ctor_get(x_2, 0); -lean_inc(x_47); -x_48 = lean_array_get_size(x_47); -lean_dec(x_47); -x_49 = lean_ctor_get(x_2, 2); -lean_inc(x_49); -x_50 = lean_nat_add(x_48, x_49); -x_51 = lean_array_get_size(x_6); -x_52 = lean_nat_dec_le(x_51, x_50); -lean_dec(x_51); -if (x_52 == 0) -{ -lean_object* x_53; lean_object* x_54; -x_53 = lean_box(0); -x_54 = l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___lambda__2(x_6, x_50, x_1, x_2, x_3, x_48, x_49, x_4, x_53, x_8, x_9, x_10, x_11, x_12, x_13); -return x_54; -} -else -{ -lean_object* x_55; lean_object* x_56; lean_object* x_57; lean_object* x_58; lean_object* x_59; lean_object* x_60; uint8_t x_61; -lean_dec(x_50); -lean_dec(x_49); -lean_dec(x_48); -lean_dec(x_6); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_55 = l_Lean_indentExpr(x_4); -x_56 = l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___closed__2; -x_57 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_57, 0, x_56); -lean_ctor_set(x_57, 1, x_55); -x_58 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__6; -x_59 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_59, 0, x_57); -lean_ctor_set(x_59, 1, x_58); -x_60 = l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__6(x_59, x_8, x_9, x_10, x_11, x_12, x_13); -lean_dec(x_12); -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -x_61 = !lean_is_exclusive(x_60); -if (x_61 == 0) -{ -return x_60; -} -else -{ -lean_object* x_62; lean_object* x_63; lean_object* x_64; -x_62 = lean_ctor_get(x_60, 0); -x_63 = lean_ctor_get(x_60, 1); -lean_inc(x_63); -lean_inc(x_62); -lean_dec(x_60); -x_64 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_64, 0, x_62); -lean_ctor_set(x_64, 1, x_63); -return x_64; -} -} -} -} -} -} -lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__8(lean_object* x_1, lean_object* x_2, lean_object* x_3, size_t x_4, size_t 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) { -_start: -{ -uint8_t x_13; -x_13 = x_5 < x_4; -if (x_13 == 0) -{ -lean_object* x_14; lean_object* x_15; -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_14 = x_6; -x_15 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_15, 0, x_14); -lean_ctor_set(x_15, 1, x_12); -return x_15; -} -else -{ -lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; -x_16 = lean_array_uget(x_6, x_5); -x_17 = lean_unsigned_to_nat(0u); -x_18 = lean_array_uset(x_6, x_5, x_17); -x_19 = x_16; -lean_inc(x_11); -lean_inc(x_10); -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -lean_inc(x_3); -lean_inc(x_2); -lean_inc(x_1); -x_20 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop(x_1, x_2, x_3, x_19, x_7, x_8, x_9, x_10, x_11, x_12); -if (lean_obj_tag(x_20) == 0) -{ -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_21 = lean_ctor_get(x_20, 0); -lean_inc(x_21); -x_22 = lean_ctor_get(x_20, 1); -lean_inc(x_22); -lean_dec(x_20); -x_23 = 1; -x_24 = x_5 + x_23; -x_25 = x_21; -x_26 = lean_array_uset(x_18, x_5, x_25); -x_5 = x_24; -x_6 = x_26; -x_12 = x_22; -goto _start; -} -else -{ -uint8_t x_28; -lean_dec(x_18); -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -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; -} -} -} -} -} -lean_object* l_Std_Range_forIn_loop___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__9(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: -{ -lean_object* x_16; uint8_t x_17; -x_16 = lean_ctor_get(x_6, 1); -x_17 = lean_nat_dec_le(x_16, x_8); -if (x_17 == 0) -{ -lean_object* x_18; uint8_t x_19; -x_18 = lean_unsigned_to_nat(0u); -x_19 = lean_nat_dec_eq(x_7, x_18); -if (x_19 == 0) -{ -lean_object* x_20; lean_object* x_21; uint8_t x_22; -x_20 = lean_unsigned_to_nat(1u); -x_21 = lean_nat_sub(x_7, x_20); -lean_dec(x_7); -x_22 = lean_nat_dec_eq(x_4, x_8); -if (x_22 == 0) -{ -lean_object* x_23; uint8_t x_24; -x_23 = lean_ctor_get(x_2, 3); -lean_inc(x_23); -x_24 = l_Array_contains___at_Lean_Meta_addImplicitTargets_collect___spec__1(x_23, x_8); -lean_dec(x_23); -if (x_24 == 0) -{ -lean_object* x_25; lean_object* x_26; lean_object* x_27; -x_25 = l_Lean_instInhabitedExpr; -x_26 = lean_array_get(x_25, x_5, x_8); -lean_inc(x_14); -lean_inc(x_13); -lean_inc(x_12); -lean_inc(x_11); -lean_inc(x_10); -lean_inc(x_3); -lean_inc(x_2); -lean_inc(x_1); -x_27 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop(x_1, x_2, x_3, x_26, x_10, x_11, x_12, x_13, x_14, x_15); -if (lean_obj_tag(x_27) == 0) -{ -lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; -x_28 = lean_ctor_get(x_27, 0); -lean_inc(x_28); -x_29 = lean_ctor_get(x_27, 1); -lean_inc(x_29); -lean_dec(x_27); -x_30 = lean_array_push(x_9, x_28); -x_31 = lean_ctor_get(x_6, 2); -x_32 = lean_nat_add(x_8, x_31); -lean_dec(x_8); -x_7 = x_21; -x_8 = x_32; -x_9 = x_30; -x_15 = x_29; -goto _start; -} -else -{ -uint8_t x_34; -lean_dec(x_21); -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_2); -lean_dec(x_1); -x_34 = !lean_is_exclusive(x_27); -if (x_34 == 0) -{ -return x_27; -} -else -{ -lean_object* x_35; lean_object* x_36; lean_object* x_37; -x_35 = lean_ctor_get(x_27, 0); -x_36 = lean_ctor_get(x_27, 1); -lean_inc(x_36); -lean_inc(x_35); -lean_dec(x_27); -x_37 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_37, 0, x_35); -lean_ctor_set(x_37, 1, x_36); -return x_37; -} -} -} -else -{ -lean_object* x_38; lean_object* x_39; -x_38 = lean_ctor_get(x_6, 2); -x_39 = lean_nat_add(x_8, x_38); -lean_dec(x_8); -x_7 = x_21; -x_8 = x_39; -goto _start; -} -} -else -{ -lean_object* x_41; lean_object* x_42; -x_41 = lean_ctor_get(x_6, 2); -x_42 = lean_nat_add(x_8, x_41); -lean_dec(x_8); -x_7 = x_21; -x_8 = x_42; -goto _start; -} -} -else -{ -lean_object* x_44; -lean_dec(x_14); -lean_dec(x_13); -lean_dec(x_12); -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_44 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_44, 0, x_9); -lean_ctor_set(x_44, 1, x_15); -return x_44; -} -} -else -{ -lean_object* x_45; -lean_dec(x_14); -lean_dec(x_13); -lean_dec(x_12); -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_45 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_45, 0, x_9); -lean_ctor_set(x_45, 1, x_15); -return x_45; -} -} -} -lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__10___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, lean_object* x_12, lean_object* x_13) { -_start: -{ -lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; -x_14 = lean_array_get_size(x_1); -x_15 = l_Array_extract___rarg(x_1, x_2, x_14); -x_16 = lean_array_get_size(x_15); -x_17 = lean_unsigned_to_nat(0u); -x_18 = lean_unsigned_to_nat(1u); -lean_inc(x_16); -x_19 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_19, 0, x_17); -lean_ctor_set(x_19, 1, x_16); -lean_ctor_set(x_19, 2, x_18); -x_20 = l_Lean_Elab_Structural_State_addMatchers___default___closed__1; -x_21 = l_Std_Range_forIn_loop___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__9(x_3, x_4, x_5, x_6, x_15, x_19, x_16, x_17, x_20, x_8, x_9, x_10, x_11, x_12, x_13); -lean_dec(x_19); -lean_dec(x_15); -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_mkAppN(x_7, 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_mkAppN(x_7, 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_7); -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; -} -} -} -} -lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__10___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_object* x_12, lean_object* x_13, lean_object* x_14, lean_object* x_15) { -_start: -{ -lean_object* x_16; lean_object* x_17; lean_object* x_18; -lean_dec(x_9); -x_16 = l_Lean_instInhabitedExpr; -x_17 = lean_array_get(x_16, x_1, x_2); -lean_dec(x_2); -lean_inc(x_14); -lean_inc(x_13); -lean_inc(x_12); -lean_inc(x_11); -lean_inc(x_10); -lean_inc(x_5); -lean_inc(x_4); -lean_inc(x_3); -x_18 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop(x_3, x_4, x_5, x_17, x_10, x_11, x_12, x_13, x_14, x_15); -if (lean_obj_tag(x_18) == 0) -{ -lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; -x_19 = lean_ctor_get(x_18, 0); -lean_inc(x_19); -x_20 = lean_ctor_get(x_18, 1); -lean_inc(x_20); -lean_dec(x_18); -x_21 = lean_ctor_get(x_4, 6); -lean_inc(x_21); -x_22 = lean_array_get_size(x_21); -lean_dec(x_21); -lean_inc(x_14); -lean_inc(x_13); -lean_inc(x_12); -lean_inc(x_11); -lean_inc(x_5); -x_23 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelow(x_5, x_22, x_19, x_11, x_12, x_13, x_14, x_20); -if (lean_obj_tag(x_23) == 0) -{ -lean_object* x_24; lean_object* x_25; lean_object* x_26; -lean_dec(x_8); -x_24 = lean_ctor_get(x_23, 0); -lean_inc(x_24); -x_25 = lean_ctor_get(x_23, 1); -lean_inc(x_25); -lean_dec(x_23); -x_26 = l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__10___lambda__1(x_1, x_6, x_3, x_4, x_5, x_7, x_24, x_10, x_11, x_12, x_13, x_14, x_25); -lean_dec(x_7); -return x_26; -} -else -{ -lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; uint8_t x_34; -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_27 = lean_ctor_get(x_23, 1); -lean_inc(x_27); -lean_dec(x_23); -x_28 = l_Lean_indentExpr(x_8); -x_29 = l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___lambda__2___closed__2; -x_30 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_30, 0, x_29); -lean_ctor_set(x_30, 1, x_28); -x_31 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__6; -x_32 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_32, 0, x_30); -lean_ctor_set(x_32, 1, x_31); -x_33 = l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__5(x_32, x_10, x_11, x_12, x_13, x_14, x_27); -lean_dec(x_14); -lean_dec(x_13); -lean_dec(x_12); -lean_dec(x_11); -lean_dec(x_10); -x_34 = !lean_is_exclusive(x_33); -if (x_34 == 0) -{ -return x_33; -} -else -{ -lean_object* x_35; lean_object* x_36; lean_object* x_37; -x_35 = lean_ctor_get(x_33, 0); -x_36 = lean_ctor_get(x_33, 1); -lean_inc(x_36); -lean_inc(x_35); -lean_dec(x_33); -x_37 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_37, 0, x_35); -lean_ctor_set(x_37, 1, x_36); -return x_37; -} -} -} -else -{ -uint8_t x_38; -lean_dec(x_14); -lean_dec(x_13); -lean_dec(x_12); -lean_dec(x_11); -lean_dec(x_10); -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_38 = !lean_is_exclusive(x_18); -if (x_38 == 0) -{ -return x_18; -} -else -{ -lean_object* x_39; lean_object* x_40; lean_object* x_41; -x_39 = lean_ctor_get(x_18, 0); -x_40 = lean_ctor_get(x_18, 1); -lean_inc(x_40); -lean_inc(x_39); -lean_dec(x_18); -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; -} -} -} -} -static lean_object* _init_l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__10___boxed__const__1() { -_start: -{ -size_t x_1; lean_object* x_2; -x_1 = 0; -x_2 = lean_box_usize(x_1); -return x_2; -} -} -lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__10(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: -{ -if (lean_obj_tag(x_5) == 5) -{ -lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; -x_14 = lean_ctor_get(x_5, 0); -lean_inc(x_14); -x_15 = lean_ctor_get(x_5, 1); -lean_inc(x_15); -lean_dec(x_5); -x_16 = lean_array_set(x_6, x_7, x_15); -x_17 = lean_unsigned_to_nat(1u); -x_18 = lean_nat_sub(x_7, x_17); -lean_dec(x_7); -x_5 = x_14; -x_6 = x_16; -x_7 = x_18; -goto _start; -} -else -{ -uint8_t x_20; -lean_dec(x_7); -x_20 = l_Lean_Expr_isConstOf(x_5, x_1); -if (x_20 == 0) -{ -lean_object* x_21; -lean_dec(x_4); -lean_inc(x_12); -lean_inc(x_11); -lean_inc(x_10); -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_3); -lean_inc(x_2); -lean_inc(x_1); -x_21 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop(x_1, x_2, x_3, x_5, x_8, x_9, x_10, x_11, x_12, x_13); -if (lean_obj_tag(x_21) == 0) -{ -lean_object* x_22; lean_object* x_23; lean_object* x_24; size_t x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; -x_22 = lean_ctor_get(x_21, 0); -lean_inc(x_22); -x_23 = lean_ctor_get(x_21, 1); -lean_inc(x_23); -lean_dec(x_21); -x_24 = lean_array_get_size(x_6); -x_25 = lean_usize_of_nat(x_24); -lean_dec(x_24); -x_26 = x_6; -x_27 = lean_box_usize(x_25); -x_28 = l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__10___boxed__const__1; -x_29 = lean_alloc_closure((void*)(l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__8___boxed), 12, 6); -lean_closure_set(x_29, 0, x_1); -lean_closure_set(x_29, 1, x_2); -lean_closure_set(x_29, 2, x_3); -lean_closure_set(x_29, 3, x_27); -lean_closure_set(x_29, 4, x_28); -lean_closure_set(x_29, 5, x_26); -x_30 = x_29; -x_31 = lean_apply_6(x_30, x_8, x_9, x_10, x_11, x_12, x_23); -if (lean_obj_tag(x_31) == 0) -{ -uint8_t x_32; -x_32 = !lean_is_exclusive(x_31); -if (x_32 == 0) -{ -lean_object* x_33; lean_object* x_34; -x_33 = lean_ctor_get(x_31, 0); -x_34 = l_Lean_mkAppN(x_22, x_33); -lean_ctor_set(x_31, 0, x_34); -return x_31; -} -else -{ -lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; -x_35 = lean_ctor_get(x_31, 0); -x_36 = lean_ctor_get(x_31, 1); -lean_inc(x_36); -lean_inc(x_35); -lean_dec(x_31); -x_37 = l_Lean_mkAppN(x_22, x_35); -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_39; -lean_dec(x_22); -x_39 = !lean_is_exclusive(x_31); -if (x_39 == 0) -{ -return x_31; -} -else -{ -lean_object* x_40; lean_object* x_41; lean_object* x_42; -x_40 = lean_ctor_get(x_31, 0); -x_41 = lean_ctor_get(x_31, 1); -lean_inc(x_41); -lean_inc(x_40); -lean_dec(x_31); -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 -{ -uint8_t x_43; -lean_dec(x_12); -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_6); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_43 = !lean_is_exclusive(x_21); -if (x_43 == 0) -{ -return x_21; -} -else -{ -lean_object* x_44; lean_object* x_45; lean_object* x_46; -x_44 = lean_ctor_get(x_21, 0); -x_45 = lean_ctor_get(x_21, 1); -lean_inc(x_45); -lean_inc(x_44); -lean_dec(x_21); -x_46 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_46, 0, x_44); -lean_ctor_set(x_46, 1, x_45); -return x_46; -} -} -} -else -{ -lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_object* x_51; uint8_t x_52; -lean_dec(x_5); -x_47 = lean_ctor_get(x_2, 0); -lean_inc(x_47); -x_48 = lean_array_get_size(x_47); -lean_dec(x_47); -x_49 = lean_ctor_get(x_2, 2); -lean_inc(x_49); -x_50 = lean_nat_add(x_48, x_49); -x_51 = lean_array_get_size(x_6); -x_52 = lean_nat_dec_le(x_51, x_50); -lean_dec(x_51); -if (x_52 == 0) -{ -lean_object* x_53; lean_object* x_54; -x_53 = lean_box(0); -x_54 = l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__10___lambda__2(x_6, x_50, x_1, x_2, x_3, x_48, x_49, x_4, x_53, x_8, x_9, x_10, x_11, x_12, x_13); -return x_54; -} -else -{ -lean_object* x_55; lean_object* x_56; lean_object* x_57; lean_object* x_58; lean_object* x_59; lean_object* x_60; uint8_t x_61; -lean_dec(x_50); -lean_dec(x_49); -lean_dec(x_48); -lean_dec(x_6); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_55 = l_Lean_indentExpr(x_4); -x_56 = l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___closed__2; -x_57 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_57, 0, x_56); -lean_ctor_set(x_57, 1, x_55); -x_58 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__6; -x_59 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_59, 0, x_57); -lean_ctor_set(x_59, 1, x_58); -x_60 = l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__6(x_59, x_8, x_9, x_10, x_11, x_12, x_13); -lean_dec(x_12); -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -x_61 = !lean_is_exclusive(x_60); -if (x_61 == 0) -{ -return x_60; -} -else -{ -lean_object* x_62; lean_object* x_63; lean_object* x_64; -x_62 = lean_ctor_get(x_60, 0); -x_63 = lean_ctor_get(x_60, 1); -lean_inc(x_63); -lean_inc(x_62); -lean_dec(x_60); -x_64 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_64, 0, x_62); -lean_ctor_set(x_64, 1, x_63); -return x_64; -} -} -} -} -} -} -static lean_object* _init_l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___closed__1() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string("_traceMsg"); -return x_1; -} -} -static lean_object* _init_l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___closed__2() { -_start: -{ -lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = lean_box(0); -x_2 = l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___closed__1; -x_3 = lean_name_mk_string(x_1, x_2); -return x_3; -} -} -static lean_object* _init_l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___closed__3() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string("["); -return x_1; -} -} -static lean_object* _init_l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___closed__4() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___closed__3; -x_2 = l_Lean_stringToMessageData(x_1); -return x_2; -} -} -static lean_object* _init_l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___closed__5() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string("] "); -return x_1; -} -} -static lean_object* _init_l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___closed__6() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___closed__5; -x_2 = l_Lean_stringToMessageData(x_1); -return x_2; -} -} -lean_object* l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11(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; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; uint8_t x_18; -x_9 = lean_ctor_get(x_6, 3); -x_10 = l_Lean_addMessageContextFull___at_Lean_Meta_instAddMessageContextMetaM___spec__1(x_2, x_4, x_5, x_6, x_7, x_8); -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_addTrace_addTraceOptions(x_11); -x_14 = lean_st_ref_take(x_7, x_12); -x_15 = lean_ctor_get(x_14, 0); -lean_inc(x_15); -x_16 = lean_ctor_get(x_15, 3); -lean_inc(x_16); -x_17 = lean_ctor_get(x_14, 1); -lean_inc(x_17); -lean_dec(x_14); -x_18 = !lean_is_exclusive(x_15); -if (x_18 == 0) -{ -lean_object* x_19; uint8_t x_20; -x_19 = lean_ctor_get(x_15, 3); -lean_dec(x_19); -x_20 = !lean_is_exclusive(x_16); -if (x_20 == 0) -{ -lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; uint8_t x_36; -x_21 = lean_ctor_get(x_16, 0); -x_22 = l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___closed__2; -x_23 = l_Lean_Name_append(x_1, x_22); -x_24 = lean_alloc_ctor(4, 1, 0); -lean_ctor_set(x_24, 0, x_1); -x_25 = l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___closed__4; -x_26 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_26, 0, x_25); -lean_ctor_set(x_26, 1, x_24); -x_27 = l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___closed__6; -x_28 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_28, 0, x_26); -lean_ctor_set(x_28, 1, x_27); -x_29 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_29, 0, x_28); -lean_ctor_set(x_29, 1, x_13); -x_30 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__6; -x_31 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_31, 0, x_29); -lean_ctor_set(x_31, 1, x_30); -x_32 = lean_alloc_ctor(11, 2, 0); -lean_ctor_set(x_32, 0, x_23); -lean_ctor_set(x_32, 1, x_31); -lean_inc(x_9); -x_33 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_33, 0, x_9); -lean_ctor_set(x_33, 1, x_32); -x_34 = l_Std_PersistentArray_push___rarg(x_21, x_33); -lean_ctor_set(x_16, 0, x_34); -x_35 = lean_st_ref_set(x_7, x_15, x_17); -x_36 = !lean_is_exclusive(x_35); -if (x_36 == 0) -{ -lean_object* x_37; lean_object* x_38; -x_37 = lean_ctor_get(x_35, 0); -lean_dec(x_37); -x_38 = lean_box(0); -lean_ctor_set(x_35, 0, x_38); -return x_35; -} -else -{ -lean_object* x_39; lean_object* x_40; lean_object* x_41; -x_39 = lean_ctor_get(x_35, 1); -lean_inc(x_39); -lean_dec(x_35); -x_40 = lean_box(0); -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_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_object* x_51; lean_object* x_52; lean_object* x_53; lean_object* x_54; lean_object* x_55; lean_object* x_56; lean_object* x_57; lean_object* x_58; lean_object* x_59; lean_object* x_60; lean_object* x_61; lean_object* x_62; -x_42 = lean_ctor_get_uint8(x_16, sizeof(void*)*1); -x_43 = lean_ctor_get(x_16, 0); -lean_inc(x_43); -lean_dec(x_16); -x_44 = l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___closed__2; -x_45 = l_Lean_Name_append(x_1, x_44); -x_46 = lean_alloc_ctor(4, 1, 0); -lean_ctor_set(x_46, 0, x_1); -x_47 = l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___closed__4; -x_48 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_48, 0, x_47); -lean_ctor_set(x_48, 1, x_46); -x_49 = l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___closed__6; -x_50 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_50, 0, x_48); -lean_ctor_set(x_50, 1, x_49); -x_51 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_51, 0, x_50); -lean_ctor_set(x_51, 1, x_13); -x_52 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__6; -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(11, 2, 0); -lean_ctor_set(x_54, 0, x_45); -lean_ctor_set(x_54, 1, x_53); -lean_inc(x_9); -x_55 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_55, 0, x_9); -lean_ctor_set(x_55, 1, x_54); -x_56 = l_Std_PersistentArray_push___rarg(x_43, x_55); -x_57 = lean_alloc_ctor(0, 1, 1); -lean_ctor_set(x_57, 0, x_56); -lean_ctor_set_uint8(x_57, sizeof(void*)*1, x_42); -lean_ctor_set(x_15, 3, x_57); -x_58 = lean_st_ref_set(x_7, x_15, x_17); -x_59 = lean_ctor_get(x_58, 1); -lean_inc(x_59); -if (lean_is_exclusive(x_58)) { - lean_ctor_release(x_58, 0); - lean_ctor_release(x_58, 1); - x_60 = x_58; -} else { - lean_dec_ref(x_58); - x_60 = lean_box(0); -} -x_61 = lean_box(0); -if (lean_is_scalar(x_60)) { - x_62 = lean_alloc_ctor(0, 2, 0); -} else { - x_62 = x_60; -} -lean_ctor_set(x_62, 0, x_61); -lean_ctor_set(x_62, 1, x_59); -return x_62; -} -} -else -{ -lean_object* x_63; lean_object* x_64; lean_object* x_65; uint8_t x_66; lean_object* x_67; lean_object* x_68; lean_object* x_69; lean_object* x_70; lean_object* x_71; lean_object* x_72; lean_object* x_73; lean_object* x_74; lean_object* x_75; lean_object* x_76; lean_object* x_77; lean_object* x_78; lean_object* x_79; lean_object* x_80; lean_object* x_81; lean_object* x_82; lean_object* x_83; lean_object* x_84; lean_object* x_85; lean_object* x_86; lean_object* x_87; lean_object* x_88; -x_63 = lean_ctor_get(x_15, 0); -x_64 = lean_ctor_get(x_15, 1); -x_65 = lean_ctor_get(x_15, 2); -lean_inc(x_65); -lean_inc(x_64); -lean_inc(x_63); -lean_dec(x_15); -x_66 = lean_ctor_get_uint8(x_16, sizeof(void*)*1); -x_67 = lean_ctor_get(x_16, 0); -lean_inc(x_67); -if (lean_is_exclusive(x_16)) { - lean_ctor_release(x_16, 0); - x_68 = x_16; -} else { - lean_dec_ref(x_16); - x_68 = lean_box(0); -} -x_69 = l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___closed__2; -x_70 = l_Lean_Name_append(x_1, x_69); -x_71 = lean_alloc_ctor(4, 1, 0); -lean_ctor_set(x_71, 0, x_1); -x_72 = l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___closed__4; -x_73 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_73, 0, x_72); -lean_ctor_set(x_73, 1, x_71); -x_74 = l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___closed__6; -x_75 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_75, 0, x_73); -lean_ctor_set(x_75, 1, x_74); -x_76 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_76, 0, x_75); -lean_ctor_set(x_76, 1, x_13); -x_77 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__6; -x_78 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_78, 0, x_76); -lean_ctor_set(x_78, 1, x_77); -x_79 = lean_alloc_ctor(11, 2, 0); -lean_ctor_set(x_79, 0, x_70); -lean_ctor_set(x_79, 1, x_78); -lean_inc(x_9); -x_80 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_80, 0, x_9); -lean_ctor_set(x_80, 1, x_79); -x_81 = l_Std_PersistentArray_push___rarg(x_67, x_80); -if (lean_is_scalar(x_68)) { - x_82 = lean_alloc_ctor(0, 1, 1); -} else { - x_82 = x_68; -} -lean_ctor_set(x_82, 0, x_81); -lean_ctor_set_uint8(x_82, sizeof(void*)*1, x_66); -x_83 = lean_alloc_ctor(0, 4, 0); -lean_ctor_set(x_83, 0, x_63); -lean_ctor_set(x_83, 1, x_64); -lean_ctor_set(x_83, 2, x_65); -lean_ctor_set(x_83, 3, x_82); -x_84 = lean_st_ref_set(x_7, x_83, x_17); -x_85 = lean_ctor_get(x_84, 1); -lean_inc(x_85); -if (lean_is_exclusive(x_84)) { - lean_ctor_release(x_84, 0); - lean_ctor_release(x_84, 1); - x_86 = x_84; -} else { - lean_dec_ref(x_84); - x_86 = lean_box(0); -} -x_87 = lean_box(0); -if (lean_is_scalar(x_86)) { - x_88 = lean_alloc_ctor(0, 2, 0); -} else { - x_88 = x_86; -} -lean_ctor_set(x_88, 0, x_87); -lean_ctor_set(x_88, 1, x_85); -return x_88; -} -} -} -lean_object* l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__12(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; uint8_t x_9; lean_object* x_10; lean_object* x_11; -x_8 = lean_ctor_get(x_5, 0); -x_9 = l_Lean_checkTraceOption(x_8, x_1); -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_7); -return x_11; -} -} -lean_object* l_Lean_Meta_lambdaTelescope___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__13___rarg___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) { -_start: -{ -lean_object* x_10; -x_10 = lean_apply_8(x_1, x_3, x_4, x_2, x_5, x_6, x_7, x_8, x_9); -return x_10; -} -} -lean_object* l_Lean_Meta_lambdaTelescope___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__13___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { -_start: -{ -lean_object* x_9; uint8_t x_10; lean_object* x_11; -x_9 = lean_alloc_closure((void*)(l_Lean_Meta_lambdaTelescope___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__13___rarg___lambda__1), 9, 2); -lean_closure_set(x_9, 0, x_2); -lean_closure_set(x_9, 1, x_3); -x_10 = 0; -x_11 = l___private_Lean_Meta_Basic_0__Lean_Meta_lambdaTelescopeImp___rarg(x_1, x_10, x_9, x_4, x_5, x_6, x_7, x_8); -if (lean_obj_tag(x_11) == 0) -{ -uint8_t x_12; -x_12 = !lean_is_exclusive(x_11); -if (x_12 == 0) -{ -return x_11; -} -else -{ -lean_object* x_13; lean_object* x_14; lean_object* x_15; -x_13 = lean_ctor_get(x_11, 0); -x_14 = lean_ctor_get(x_11, 1); -lean_inc(x_14); -lean_inc(x_13); -lean_dec(x_11); -x_15 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_15, 0, x_13); -lean_ctor_set(x_15, 1, x_14); -return x_15; -} -} -else -{ -uint8_t x_16; -x_16 = !lean_is_exclusive(x_11); -if (x_16 == 0) -{ -return x_11; -} -else -{ -lean_object* x_17; lean_object* x_18; lean_object* 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_alloc_ctor(1, 2, 0); -lean_ctor_set(x_19, 0, x_17); -lean_ctor_set(x_19, 1, x_18); -return x_19; -} -} -} -} -lean_object* l_Lean_Meta_lambdaTelescope___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__13(lean_object* x_1) { -_start: -{ -lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l_Lean_Meta_lambdaTelescope___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__13___rarg), 8, 0); -return x_2; -} -} -lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___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, lean_object* x_12) { -_start: -{ -lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; -x_13 = lean_unsigned_to_nat(1u); -x_14 = lean_nat_sub(x_1, x_13); -x_15 = l_Lean_instInhabitedExpr; -x_16 = lean_array_get(x_15, x_2, x_14); -lean_dec(x_14); -lean_inc(x_11); -lean_inc(x_10); -lean_inc(x_9); -lean_inc(x_8); -x_17 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop(x_3, x_4, x_16, x_5, x_7, x_8, x_9, x_10, x_11, x_12); -if (lean_obj_tag(x_17) == 0) -{ -lean_object* x_18; lean_object* x_19; uint8_t x_20; uint8_t x_21; lean_object* x_22; -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 = 0; -x_21 = 1; -x_22 = l_Lean_Meta_mkLambdaFVars(x_2, x_18, x_20, x_21, x_8, x_9, x_10, x_11, x_19); -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -return x_22; -} -else -{ -uint8_t x_23; -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_2); -x_23 = !lean_is_exclusive(x_17); -if (x_23 == 0) -{ -return x_17; -} -else -{ -lean_object* x_24; lean_object* x_25; lean_object* x_26; -x_24 = lean_ctor_get(x_17, 0); -x_25 = lean_ctor_get(x_17, 1); -lean_inc(x_25); -lean_inc(x_24); -lean_dec(x_17); -x_26 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_26, 0, x_24); -lean_ctor_set(x_26, 1, x_25); -return x_26; -} -} -} -} -static lean_object* _init_l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__2___closed__1() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string("unexpected matcher application alternative"); -return x_1; -} -} -static lean_object* _init_l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__2___closed__2() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__2___closed__1; -x_2 = l_Lean_stringToMessageData(x_1); -return x_2; -} -} -static lean_object* _init_l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__2___closed__3() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string("\nat application"); -return x_1; -} -} -static lean_object* _init_l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__2___closed__4() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__2___closed__3; -x_2 = l_Lean_stringToMessageData(x_1); -return x_2; -} -} -lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___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_object* x_12, lean_object* x_13, lean_object* x_14) { -_start: -{ -lean_object* x_15; uint8_t x_16; -lean_dec(x_8); -x_15 = lean_array_get_size(x_2); -x_16 = lean_nat_dec_le(x_1, x_15); -lean_dec(x_15); -if (x_16 == 0) -{ -lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; uint8_t x_27; -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -x_17 = l_Lean_indentExpr(x_6); -x_18 = l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__2___closed__2; -x_19 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_19, 0, x_18); -lean_ctor_set(x_19, 1, x_17); -x_20 = l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__2___closed__4; -x_21 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_21, 0, x_19); -lean_ctor_set(x_21, 1, x_20); -x_22 = l_Lean_indentExpr(x_7); -x_23 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_23, 0, x_21); -lean_ctor_set(x_23, 1, x_22); -x_24 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__6; -x_25 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_25, 0, x_23); -lean_ctor_set(x_25, 1, x_24); -x_26 = l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__6(x_25, x_9, x_10, x_11, x_12, x_13, x_14); -lean_dec(x_13); -lean_dec(x_12); -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -x_27 = !lean_is_exclusive(x_26); -if (x_27 == 0) -{ -return x_26; -} -else -{ -lean_object* x_28; lean_object* x_29; lean_object* x_30; -x_28 = lean_ctor_get(x_26, 0); -x_29 = lean_ctor_get(x_26, 1); -lean_inc(x_29); -lean_inc(x_28); -lean_dec(x_26); -x_30 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_30, 0, x_28); -lean_ctor_set(x_30, 1, x_29); -return x_30; -} -} -else -{ -lean_object* x_31; lean_object* x_32; -lean_dec(x_7); -lean_dec(x_6); -x_31 = lean_box(0); -x_32 = l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__1(x_1, x_2, x_3, x_4, x_5, x_31, x_9, x_10, x_11, x_12, x_13, x_14); -return x_32; -} -} -} -static lean_object* _init_l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__3___closed__1() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string("altNumParams: "); -return x_1; -} -} -static lean_object* _init_l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__3___closed__2() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__3___closed__1; -x_2 = l_Lean_stringToMessageData(x_1); -return x_2; -} -} -static lean_object* _init_l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__3___closed__3() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string(", xs: "); -return x_1; -} -} -static lean_object* _init_l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__3___closed__4() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__3___closed__3; -x_2 = l_Lean_stringToMessageData(x_1); -return x_2; -} -} -lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___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_object* x_10, lean_object* x_11, lean_object* x_12, lean_object* x_13, lean_object* x_14) { -_start: -{ -uint8_t x_15; lean_object* x_16; lean_object* x_38; lean_object* x_39; lean_object* x_40; uint8_t x_41; -x_38 = lean_st_ref_get(x_13, x_14); -x_39 = lean_ctor_get(x_38, 0); -lean_inc(x_39); -x_40 = lean_ctor_get(x_39, 3); -lean_inc(x_40); -lean_dec(x_39); -x_41 = lean_ctor_get_uint8(x_40, sizeof(void*)*1); -lean_dec(x_40); -if (x_41 == 0) -{ -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 = 0; -x_15 = x_43; -x_16 = x_42; -goto block_37; -} -else -{ -lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; uint8_t x_48; -x_44 = lean_ctor_get(x_38, 1); -lean_inc(x_44); -lean_dec(x_38); -lean_inc(x_6); -x_45 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__12(x_6, x_9, x_10, x_11, x_12, x_13, x_44); -x_46 = lean_ctor_get(x_45, 0); -lean_inc(x_46); -x_47 = lean_ctor_get(x_45, 1); -lean_inc(x_47); -lean_dec(x_45); -x_48 = lean_unbox(x_46); -lean_dec(x_46); -x_15 = x_48; -x_16 = x_47; -goto block_37; -} -block_37: -{ -if (x_15 == 0) -{ -lean_object* x_17; lean_object* x_18; -lean_dec(x_6); -x_17 = lean_box(0); -x_18 = l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__2(x_1, x_7, x_2, x_3, x_8, x_4, x_5, x_17, x_9, x_10, x_11, x_12, x_13, x_16); -lean_dec(x_1); -return x_18; -} -else -{ -lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; -lean_inc(x_1); -x_19 = l_Nat_repr(x_1); -x_20 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_20, 0, x_19); -x_21 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_21, 0, x_20); -x_22 = l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__3___closed__2; -x_23 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_23, 0, x_22); -lean_ctor_set(x_23, 1, x_21); -x_24 = l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__3___closed__4; -x_25 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_25, 0, x_23); -lean_ctor_set(x_25, 1, x_24); -lean_inc(x_7); -x_26 = lean_array_to_list(lean_box(0), x_7); -x_27 = lean_box(0); -x_28 = l_List_mapTRAux___at_Lean_MessageData_instCoeListExprMessageData___spec__1(x_26, x_27); -x_29 = l_Lean_MessageData_ofList(x_28); -lean_dec(x_28); -x_30 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_30, 0, x_25); -lean_ctor_set(x_30, 1, x_29); -x_31 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__6; -x_32 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_32, 0, x_30); -lean_ctor_set(x_32, 1, x_31); -x_33 = l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11(x_6, x_32, x_9, x_10, x_11, x_12, x_13, x_16); -x_34 = lean_ctor_get(x_33, 0); -lean_inc(x_34); -x_35 = lean_ctor_get(x_33, 1); -lean_inc(x_35); -lean_dec(x_33); -x_36 = l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__2(x_1, x_7, x_2, x_3, x_8, x_4, x_5, x_34, x_9, x_10, x_11, x_12, x_13, x_35); -lean_dec(x_1); -return x_36; -} -} -} -} -lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14(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) { -_start: -{ -uint8_t x_14; -x_14 = x_6 < x_5; -if (x_14 == 0) -{ -lean_object* x_15; lean_object* x_16; -lean_dec(x_12); -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_15 = x_7; -x_16 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_16, 0, x_15); -lean_ctor_set(x_16, 1, x_13); -return x_16; -} -else -{ -lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; -x_17 = lean_array_uget(x_7, x_6); -x_18 = lean_unsigned_to_nat(0u); -x_19 = lean_array_uset(x_7, x_6, x_18); -x_20 = x_17; -x_21 = lean_ctor_get(x_20, 0); -lean_inc(x_21); -x_22 = lean_ctor_get(x_20, 1); -lean_inc(x_22); -lean_dec(x_20); -lean_inc(x_4); -lean_inc(x_3); -lean_inc(x_21); -lean_inc(x_2); -lean_inc(x_1); -x_23 = lean_alloc_closure((void*)(l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__3), 14, 6); -lean_closure_set(x_23, 0, x_22); -lean_closure_set(x_23, 1, x_1); -lean_closure_set(x_23, 2, x_2); -lean_closure_set(x_23, 3, x_21); -lean_closure_set(x_23, 4, x_3); -lean_closure_set(x_23, 5, x_4); -lean_inc(x_12); -lean_inc(x_11); -lean_inc(x_10); -lean_inc(x_9); -lean_inc(x_8); -x_24 = l_Lean_Meta_lambdaTelescope___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__13___rarg(x_21, x_23, x_8, x_9, x_10, x_11, x_12, x_13); -if (lean_obj_tag(x_24) == 0) -{ -lean_object* x_25; lean_object* x_26; size_t x_27; size_t x_28; lean_object* x_29; lean_object* x_30; -x_25 = lean_ctor_get(x_24, 0); -lean_inc(x_25); -x_26 = lean_ctor_get(x_24, 1); -lean_inc(x_26); -lean_dec(x_24); -x_27 = 1; -x_28 = x_6 + x_27; -x_29 = x_25; -x_30 = lean_array_uset(x_19, x_6, x_29); -x_6 = x_28; -x_7 = x_30; -x_13 = x_26; -goto _start; -} -else -{ -uint8_t x_32; -lean_dec(x_19); -lean_dec(x_12); -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_32 = !lean_is_exclusive(x_24); -if (x_32 == 0) -{ -return x_24; -} -else -{ -lean_object* x_33; lean_object* x_34; lean_object* x_35; -x_33 = lean_ctor_get(x_24, 0); -x_34 = lean_ctor_get(x_24, 1); -lean_inc(x_34); -lean_inc(x_33); -lean_dec(x_24); -x_35 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_35, 0, x_33); -lean_ctor_set(x_35, 1, x_34); -return x_35; -} -} -} -} -} -lean_object* l_Lean_Meta_withLocalDecl___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__15___rarg___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; -x_9 = lean_apply_7(x_1, x_3, x_2, x_4, x_5, x_6, x_7, x_8); -return x_9; -} -} -lean_object* l_Lean_Meta_withLocalDecl___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__15___rarg(lean_object* x_1, uint8_t x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10) { -_start: -{ -lean_object* x_11; lean_object* x_12; -x_11 = lean_alloc_closure((void*)(l_Lean_Meta_withLocalDecl___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__15___rarg___lambda__1), 8, 2); -lean_closure_set(x_11, 0, x_4); -lean_closure_set(x_11, 1, x_5); -x_12 = l___private_Lean_Meta_Basic_0__Lean_Meta_withLocalDeclImp___rarg(x_1, x_2, x_3, x_11, x_6, x_7, x_8, x_9, x_10); -if (lean_obj_tag(x_12) == 0) -{ -uint8_t x_13; -x_13 = !lean_is_exclusive(x_12); -if (x_13 == 0) -{ -return x_12; -} -else -{ -lean_object* x_14; lean_object* x_15; lean_object* x_16; -x_14 = lean_ctor_get(x_12, 0); -x_15 = lean_ctor_get(x_12, 1); -lean_inc(x_15); -lean_inc(x_14); -lean_dec(x_12); -x_16 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_16, 0, x_14); -lean_ctor_set(x_16, 1, x_15); -return x_16; -} -} -else -{ -uint8_t x_17; -x_17 = !lean_is_exclusive(x_12); -if (x_17 == 0) -{ -return x_12; -} -else -{ -lean_object* x_18; lean_object* x_19; lean_object* x_20; -x_18 = lean_ctor_get(x_12, 0); -x_19 = lean_ctor_get(x_12, 1); -lean_inc(x_19); -lean_inc(x_18); -lean_dec(x_12); -x_20 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_20, 0, x_18); -lean_ctor_set(x_20, 1, x_19); -return x_20; -} -} -} -} -lean_object* l_Lean_Meta_withLocalDecl___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__15(lean_object* x_1) { -_start: -{ -lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l_Lean_Meta_withLocalDecl___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__15___rarg___boxed), 10, 0); -return x_2; -} -} -lean_object* l_Lean_Meta_withLetDecl___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__16___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* 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_closure((void*)(l_Lean_Meta_withLocalDecl___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__15___rarg___lambda__1), 8, 2); -lean_closure_set(x_11, 0, x_4); -lean_closure_set(x_11, 1, x_5); -x_12 = l___private_Lean_Meta_Basic_0__Lean_Meta_withLetDeclImp___rarg(x_1, x_2, x_3, x_11, x_6, x_7, x_8, x_9, x_10); -if (lean_obj_tag(x_12) == 0) -{ -uint8_t x_13; -x_13 = !lean_is_exclusive(x_12); -if (x_13 == 0) -{ -return x_12; -} -else -{ -lean_object* x_14; lean_object* x_15; lean_object* x_16; -x_14 = lean_ctor_get(x_12, 0); -x_15 = lean_ctor_get(x_12, 1); -lean_inc(x_15); -lean_inc(x_14); -lean_dec(x_12); -x_16 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_16, 0, x_14); -lean_ctor_set(x_16, 1, x_15); -return x_16; -} -} -else -{ -uint8_t x_17; -x_17 = !lean_is_exclusive(x_12); -if (x_17 == 0) -{ -return x_12; -} -else -{ -lean_object* x_18; lean_object* x_19; lean_object* x_20; -x_18 = lean_ctor_get(x_12, 0); -x_19 = lean_ctor_get(x_12, 1); -lean_inc(x_19); -lean_inc(x_18); -lean_dec(x_12); -x_20 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_20, 0, x_18); -lean_ctor_set(x_20, 1, x_19); -return x_20; -} -} -} -} -lean_object* l_Lean_Meta_withLetDecl___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__16(lean_object* x_1) { -_start: -{ -lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l_Lean_Meta_withLetDecl___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__16___rarg), 10, 0); -return x_2; -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__1___closed__1() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string("failed to add `below` argument to 'matcher' application"); -return x_1; -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__1___closed__2() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__1___closed__1; -x_2 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_2, 0, x_1); -return x_2; -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__1___closed__3() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__1___closed__2; -x_2 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_2, 0, x_1); -return x_2; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__1(lean_object* x_1) { -_start: -{ -lean_object* x_2; lean_object* x_3; lean_object* x_4; -x_2 = l_Lean_indentD(x_1); -x_3 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__1___closed__3; -x_4 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_4, 0, x_3); -lean_ctor_set(x_4, 1, x_2); -return x_4; -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__2___closed__1() { -_start: -{ -lean_object* x_1; -x_1 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__1), 1, 0); -return x_1; -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__2___boxed__const__1() { -_start: -{ -size_t x_1; lean_object* x_2; -x_1 = 0; -x_2 = lean_box_usize(x_1); -return x_2; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___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_object* x_12, lean_object* x_13) { -_start: -{ -lean_object* x_14; lean_object* x_15; lean_object* x_16; -x_14 = lean_alloc_closure((void*)(l_Lean_Meta_MatcherApp_addArg), 7, 2); -lean_closure_set(x_14, 0, x_1); -lean_closure_set(x_14, 1, x_2); -x_15 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__2___closed__1; -lean_inc(x_12); -lean_inc(x_11); -lean_inc(x_10); -lean_inc(x_9); -x_16 = l_Lean_Meta_mapErrorImp___rarg(x_14, x_15, x_9, x_10, x_11, x_12, x_13); -if (lean_obj_tag(x_16) == 0) -{ -lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; uint8_t x_24; -x_17 = lean_ctor_get(x_16, 0); -lean_inc(x_17); -x_18 = lean_ctor_get(x_16, 1); -lean_inc(x_18); -lean_dec(x_16); -x_19 = lean_st_ref_get(x_12, x_18); -x_20 = lean_ctor_get(x_19, 1); -lean_inc(x_20); -lean_dec(x_19); -x_21 = lean_st_ref_take(x_8, x_20); -x_22 = lean_ctor_get(x_21, 0); -lean_inc(x_22); -x_23 = lean_ctor_get(x_21, 1); -lean_inc(x_23); -lean_dec(x_21); -x_24 = !lean_is_exclusive(x_22); -if (x_24 == 0) -{ -uint8_t x_25; -x_25 = !lean_is_exclusive(x_17); -if (x_25 == 0) -{ -lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; size_t x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; lean_object* x_48; -x_26 = lean_ctor_get(x_22, 0); -x_27 = lean_ctor_get(x_17, 0); -x_28 = lean_ctor_get(x_17, 1); -x_29 = lean_ctor_get(x_17, 2); -x_30 = lean_ctor_get(x_17, 3); -x_31 = lean_ctor_get(x_17, 4); -x_32 = lean_ctor_get(x_17, 5); -x_33 = lean_ctor_get(x_17, 6); -x_34 = lean_ctor_get(x_17, 7); -x_35 = lean_ctor_get(x_17, 8); -x_36 = lean_box(0); -lean_inc(x_27); -x_37 = l_Std_RBNode_insert___at_Lean_NameSet_insert___spec__1(x_26, x_27, x_36); -lean_ctor_set(x_22, 0, x_37); -x_38 = lean_st_ref_set(x_8, x_22, x_23); -x_39 = lean_ctor_get(x_38, 1); -lean_inc(x_39); -lean_dec(x_38); -x_40 = l_Array_zip___rarg(x_34, x_33); -lean_dec(x_34); -x_41 = lean_array_get_size(x_40); -x_42 = lean_usize_of_nat(x_41); -lean_dec(x_41); -x_43 = x_40; -x_44 = lean_box_usize(x_42); -x_45 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__2___boxed__const__1; -x_46 = lean_alloc_closure((void*)(l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___boxed), 13, 7); -lean_closure_set(x_46, 0, x_3); -lean_closure_set(x_46, 1, x_4); -lean_closure_set(x_46, 2, x_5); -lean_closure_set(x_46, 3, x_6); -lean_closure_set(x_46, 4, x_44); -lean_closure_set(x_46, 5, x_45); -lean_closure_set(x_46, 6, x_43); -x_47 = x_46; -x_48 = lean_apply_6(x_47, x_8, x_9, x_10, x_11, x_12, x_39); -if (lean_obj_tag(x_48) == 0) -{ -uint8_t x_49; -x_49 = !lean_is_exclusive(x_48); -if (x_49 == 0) -{ -lean_object* x_50; lean_object* x_51; -x_50 = lean_ctor_get(x_48, 0); -lean_ctor_set(x_17, 7, x_50); -x_51 = l_Lean_Meta_MatcherApp_toExpr(x_17); -lean_ctor_set(x_48, 0, x_51); -return x_48; -} -else -{ -lean_object* x_52; lean_object* x_53; lean_object* x_54; lean_object* x_55; -x_52 = lean_ctor_get(x_48, 0); -x_53 = lean_ctor_get(x_48, 1); -lean_inc(x_53); -lean_inc(x_52); -lean_dec(x_48); -lean_ctor_set(x_17, 7, x_52); -x_54 = l_Lean_Meta_MatcherApp_toExpr(x_17); -x_55 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_55, 0, x_54); -lean_ctor_set(x_55, 1, x_53); -return x_55; -} -} -else -{ -uint8_t x_56; -lean_free_object(x_17); -lean_dec(x_35); -lean_dec(x_33); -lean_dec(x_32); -lean_dec(x_31); -lean_dec(x_30); -lean_dec(x_29); -lean_dec(x_28); -lean_dec(x_27); -x_56 = !lean_is_exclusive(x_48); -if (x_56 == 0) -{ -return x_48; -} -else -{ -lean_object* x_57; lean_object* x_58; lean_object* x_59; -x_57 = lean_ctor_get(x_48, 0); -x_58 = lean_ctor_get(x_48, 1); -lean_inc(x_58); -lean_inc(x_57); -lean_dec(x_48); -x_59 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_59, 0, x_57); -lean_ctor_set(x_59, 1, x_58); -return x_59; -} -} -} -else -{ -lean_object* x_60; lean_object* x_61; lean_object* x_62; lean_object* x_63; lean_object* x_64; lean_object* x_65; lean_object* x_66; lean_object* x_67; lean_object* x_68; lean_object* x_69; lean_object* x_70; lean_object* x_71; lean_object* x_72; lean_object* x_73; lean_object* x_74; lean_object* x_75; size_t x_76; lean_object* x_77; lean_object* x_78; lean_object* x_79; lean_object* x_80; lean_object* x_81; lean_object* x_82; -x_60 = lean_ctor_get(x_22, 0); -x_61 = lean_ctor_get(x_17, 0); -x_62 = lean_ctor_get(x_17, 1); -x_63 = lean_ctor_get(x_17, 2); -x_64 = lean_ctor_get(x_17, 3); -x_65 = lean_ctor_get(x_17, 4); -x_66 = lean_ctor_get(x_17, 5); -x_67 = lean_ctor_get(x_17, 6); -x_68 = lean_ctor_get(x_17, 7); -x_69 = lean_ctor_get(x_17, 8); -lean_inc(x_69); -lean_inc(x_68); -lean_inc(x_67); -lean_inc(x_66); -lean_inc(x_65); -lean_inc(x_64); -lean_inc(x_63); -lean_inc(x_62); -lean_inc(x_61); -lean_dec(x_17); -x_70 = lean_box(0); -lean_inc(x_61); -x_71 = l_Std_RBNode_insert___at_Lean_NameSet_insert___spec__1(x_60, x_61, x_70); -lean_ctor_set(x_22, 0, x_71); -x_72 = lean_st_ref_set(x_8, x_22, x_23); -x_73 = lean_ctor_get(x_72, 1); -lean_inc(x_73); -lean_dec(x_72); -x_74 = l_Array_zip___rarg(x_68, x_67); -lean_dec(x_68); -x_75 = lean_array_get_size(x_74); -x_76 = lean_usize_of_nat(x_75); -lean_dec(x_75); -x_77 = x_74; -x_78 = lean_box_usize(x_76); -x_79 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__2___boxed__const__1; -x_80 = lean_alloc_closure((void*)(l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___boxed), 13, 7); -lean_closure_set(x_80, 0, x_3); -lean_closure_set(x_80, 1, x_4); -lean_closure_set(x_80, 2, x_5); -lean_closure_set(x_80, 3, x_6); -lean_closure_set(x_80, 4, x_78); -lean_closure_set(x_80, 5, x_79); -lean_closure_set(x_80, 6, x_77); -x_81 = x_80; -x_82 = lean_apply_6(x_81, x_8, x_9, x_10, x_11, x_12, x_73); -if (lean_obj_tag(x_82) == 0) -{ -lean_object* x_83; lean_object* x_84; lean_object* x_85; lean_object* x_86; lean_object* x_87; lean_object* x_88; -x_83 = lean_ctor_get(x_82, 0); -lean_inc(x_83); -x_84 = lean_ctor_get(x_82, 1); -lean_inc(x_84); -if (lean_is_exclusive(x_82)) { - lean_ctor_release(x_82, 0); - lean_ctor_release(x_82, 1); - x_85 = x_82; -} else { - lean_dec_ref(x_82); - x_85 = lean_box(0); -} -x_86 = lean_alloc_ctor(0, 9, 0); -lean_ctor_set(x_86, 0, x_61); -lean_ctor_set(x_86, 1, x_62); -lean_ctor_set(x_86, 2, x_63); -lean_ctor_set(x_86, 3, x_64); -lean_ctor_set(x_86, 4, x_65); -lean_ctor_set(x_86, 5, x_66); -lean_ctor_set(x_86, 6, x_67); -lean_ctor_set(x_86, 7, x_83); -lean_ctor_set(x_86, 8, x_69); -x_87 = l_Lean_Meta_MatcherApp_toExpr(x_86); -if (lean_is_scalar(x_85)) { - x_88 = lean_alloc_ctor(0, 2, 0); -} else { - x_88 = x_85; -} -lean_ctor_set(x_88, 0, x_87); -lean_ctor_set(x_88, 1, x_84); -return x_88; -} -else -{ -lean_object* x_89; lean_object* x_90; lean_object* x_91; lean_object* x_92; -lean_dec(x_69); -lean_dec(x_67); -lean_dec(x_66); -lean_dec(x_65); -lean_dec(x_64); -lean_dec(x_63); -lean_dec(x_62); -lean_dec(x_61); -x_89 = lean_ctor_get(x_82, 0); -lean_inc(x_89); -x_90 = lean_ctor_get(x_82, 1); -lean_inc(x_90); -if (lean_is_exclusive(x_82)) { - lean_ctor_release(x_82, 0); - lean_ctor_release(x_82, 1); - x_91 = x_82; -} else { - lean_dec_ref(x_82); - x_91 = lean_box(0); -} -if (lean_is_scalar(x_91)) { - x_92 = lean_alloc_ctor(1, 2, 0); -} else { - x_92 = x_91; -} -lean_ctor_set(x_92, 0, x_89); -lean_ctor_set(x_92, 1, x_90); -return x_92; -} -} -} -else -{ -lean_object* x_93; lean_object* x_94; lean_object* x_95; lean_object* x_96; lean_object* x_97; lean_object* x_98; lean_object* x_99; lean_object* x_100; lean_object* x_101; lean_object* x_102; lean_object* x_103; lean_object* x_104; lean_object* x_105; lean_object* x_106; lean_object* x_107; lean_object* x_108; lean_object* x_109; lean_object* x_110; lean_object* x_111; size_t x_112; lean_object* x_113; lean_object* x_114; lean_object* x_115; lean_object* x_116; lean_object* x_117; lean_object* x_118; -x_93 = lean_ctor_get(x_22, 0); -x_94 = lean_ctor_get(x_22, 1); -lean_inc(x_94); -lean_inc(x_93); -lean_dec(x_22); -x_95 = lean_ctor_get(x_17, 0); -lean_inc(x_95); -x_96 = lean_ctor_get(x_17, 1); -lean_inc(x_96); -x_97 = lean_ctor_get(x_17, 2); -lean_inc(x_97); -x_98 = lean_ctor_get(x_17, 3); -lean_inc(x_98); -x_99 = lean_ctor_get(x_17, 4); -lean_inc(x_99); -x_100 = lean_ctor_get(x_17, 5); -lean_inc(x_100); -x_101 = lean_ctor_get(x_17, 6); -lean_inc(x_101); -x_102 = lean_ctor_get(x_17, 7); -lean_inc(x_102); -x_103 = lean_ctor_get(x_17, 8); -lean_inc(x_103); -if (lean_is_exclusive(x_17)) { - lean_ctor_release(x_17, 0); - lean_ctor_release(x_17, 1); - lean_ctor_release(x_17, 2); - lean_ctor_release(x_17, 3); - lean_ctor_release(x_17, 4); - lean_ctor_release(x_17, 5); - lean_ctor_release(x_17, 6); - lean_ctor_release(x_17, 7); - lean_ctor_release(x_17, 8); - x_104 = x_17; -} else { - lean_dec_ref(x_17); - x_104 = lean_box(0); -} -x_105 = lean_box(0); -lean_inc(x_95); -x_106 = l_Std_RBNode_insert___at_Lean_NameSet_insert___spec__1(x_93, x_95, x_105); -x_107 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_107, 0, x_106); -lean_ctor_set(x_107, 1, x_94); -x_108 = lean_st_ref_set(x_8, x_107, x_23); -x_109 = lean_ctor_get(x_108, 1); -lean_inc(x_109); -lean_dec(x_108); -x_110 = l_Array_zip___rarg(x_102, x_101); -lean_dec(x_102); -x_111 = lean_array_get_size(x_110); -x_112 = lean_usize_of_nat(x_111); -lean_dec(x_111); -x_113 = x_110; -x_114 = lean_box_usize(x_112); -x_115 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__2___boxed__const__1; -x_116 = lean_alloc_closure((void*)(l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___boxed), 13, 7); -lean_closure_set(x_116, 0, x_3); -lean_closure_set(x_116, 1, x_4); -lean_closure_set(x_116, 2, x_5); -lean_closure_set(x_116, 3, x_6); -lean_closure_set(x_116, 4, x_114); -lean_closure_set(x_116, 5, x_115); -lean_closure_set(x_116, 6, x_113); -x_117 = x_116; -x_118 = lean_apply_6(x_117, x_8, x_9, x_10, x_11, x_12, x_109); -if (lean_obj_tag(x_118) == 0) -{ -lean_object* x_119; lean_object* x_120; lean_object* x_121; lean_object* x_122; lean_object* x_123; lean_object* x_124; -x_119 = lean_ctor_get(x_118, 0); -lean_inc(x_119); -x_120 = lean_ctor_get(x_118, 1); -lean_inc(x_120); -if (lean_is_exclusive(x_118)) { - lean_ctor_release(x_118, 0); - lean_ctor_release(x_118, 1); - x_121 = x_118; -} else { - lean_dec_ref(x_118); - x_121 = lean_box(0); -} -if (lean_is_scalar(x_104)) { - x_122 = lean_alloc_ctor(0, 9, 0); -} else { - x_122 = x_104; -} -lean_ctor_set(x_122, 0, x_95); -lean_ctor_set(x_122, 1, x_96); -lean_ctor_set(x_122, 2, x_97); -lean_ctor_set(x_122, 3, x_98); -lean_ctor_set(x_122, 4, x_99); -lean_ctor_set(x_122, 5, x_100); -lean_ctor_set(x_122, 6, x_101); -lean_ctor_set(x_122, 7, x_119); -lean_ctor_set(x_122, 8, x_103); -x_123 = l_Lean_Meta_MatcherApp_toExpr(x_122); -if (lean_is_scalar(x_121)) { - x_124 = lean_alloc_ctor(0, 2, 0); -} else { - x_124 = x_121; -} -lean_ctor_set(x_124, 0, x_123); -lean_ctor_set(x_124, 1, x_120); -return x_124; -} -else -{ -lean_object* x_125; lean_object* x_126; lean_object* x_127; lean_object* x_128; -lean_dec(x_104); -lean_dec(x_103); -lean_dec(x_101); -lean_dec(x_100); -lean_dec(x_99); -lean_dec(x_98); -lean_dec(x_97); -lean_dec(x_96); -lean_dec(x_95); -x_125 = lean_ctor_get(x_118, 0); -lean_inc(x_125); -x_126 = lean_ctor_get(x_118, 1); -lean_inc(x_126); -if (lean_is_exclusive(x_118)) { - lean_ctor_release(x_118, 0); - lean_ctor_release(x_118, 1); - x_127 = x_118; -} else { - lean_dec_ref(x_118); - x_127 = lean_box(0); -} -if (lean_is_scalar(x_127)) { - x_128 = lean_alloc_ctor(1, 2, 0); -} else { - x_128 = x_127; -} -lean_ctor_set(x_128, 0, x_125); -lean_ctor_set(x_128, 1, x_126); -return x_128; -} -} -} -else -{ -uint8_t x_129; -lean_dec(x_12); -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -x_129 = !lean_is_exclusive(x_16); -if (x_129 == 0) -{ -return x_16; -} -else -{ -lean_object* x_130; lean_object* x_131; lean_object* x_132; -x_130 = lean_ctor_get(x_16, 0); -x_131 = lean_ctor_get(x_16, 1); -lean_inc(x_131); -lean_inc(x_130); -lean_dec(x_16); -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; -} -} -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___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_object* x_10, lean_object* x_11) { -_start: -{ -lean_object* x_12; lean_object* x_13; -x_12 = lean_expr_instantiate1(x_1, x_5); -lean_inc(x_10); -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -x_13 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop(x_2, x_3, x_4, x_12, x_6, x_7, x_8, x_9, x_10, x_11); -if (lean_obj_tag(x_13) == 0) -{ -lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; uint8_t x_18; uint8_t x_19; lean_object* x_20; -x_14 = lean_ctor_get(x_13, 0); -lean_inc(x_14); -x_15 = lean_ctor_get(x_13, 1); -lean_inc(x_15); -lean_dec(x_13); -x_16 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__4; -x_17 = lean_array_push(x_16, x_5); -x_18 = 0; -x_19 = 1; -x_20 = l_Lean_Meta_mkLambdaFVars(x_17, x_14, x_18, x_19, x_7, x_8, x_9, x_10, x_15); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -return x_20; -} -else -{ -uint8_t x_21; -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_5); -x_21 = !lean_is_exclusive(x_13); -if (x_21 == 0) -{ -return x_13; -} -else -{ -lean_object* x_22; lean_object* x_23; lean_object* x_24; -x_22 = lean_ctor_get(x_13, 0); -x_23 = lean_ctor_get(x_13, 1); -lean_inc(x_23); -lean_inc(x_22); -lean_dec(x_13); -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; -} -} -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___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, lean_object* x_11) { -_start: -{ -lean_object* x_12; lean_object* x_13; -x_12 = lean_expr_instantiate1(x_1, x_5); -lean_inc(x_10); -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -x_13 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop(x_2, x_3, x_4, x_12, x_6, x_7, x_8, x_9, x_10, x_11); -if (lean_obj_tag(x_13) == 0) -{ -lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; uint8_t x_18; uint8_t x_19; lean_object* x_20; -x_14 = lean_ctor_get(x_13, 0); -lean_inc(x_14); -x_15 = lean_ctor_get(x_13, 1); -lean_inc(x_15); -lean_dec(x_13); -x_16 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__4; -x_17 = lean_array_push(x_16, x_5); -x_18 = 0; -x_19 = 1; -x_20 = l_Lean_Meta_mkForallFVars(x_17, x_14, x_18, x_19, x_7, x_8, x_9, x_10, x_15); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -return x_20; -} -else -{ -uint8_t x_21; -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_5); -x_21 = !lean_is_exclusive(x_13); -if (x_21 == 0) -{ -return x_13; -} -else -{ -lean_object* x_22; lean_object* x_23; lean_object* x_24; -x_22 = lean_ctor_get(x_13, 0); -x_23 = lean_ctor_get(x_13, 1); -lean_inc(x_23); -lean_inc(x_22); -lean_dec(x_13); -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; -} -} -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___closed__1() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string("below before matcherApp.addArg: "); -return x_1; -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___closed__2() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___closed__1; -x_2 = l_Lean_stringToMessageData(x_1); -return x_2; -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___closed__3() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string(" : "); -return x_1; -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___closed__4() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___closed__3; -x_2 = l_Lean_stringToMessageData(x_1); -return x_2; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop(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: -{ -switch (lean_obj_tag(x_4)) { -case 5: -{ -lean_object* x_11; lean_object* x_12; -lean_inc(x_4); -x_11 = l_Lean_Meta_matchMatcherApp_x3f___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__1(x_4, x_5, x_6, x_7, x_8, x_9, x_10); -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_18; lean_object* x_19; lean_object* x_20; -x_13 = lean_ctor_get(x_11, 1); -lean_inc(x_13); -lean_dec(x_11); -x_14 = lean_unsigned_to_nat(0u); -x_15 = l_Lean_Expr_getAppNumArgsAux(x_4, x_14); -x_16 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_getFixedPrefix___lambda__2___closed__1; -lean_inc(x_15); -x_17 = lean_mk_array(x_15, x_16); -x_18 = lean_unsigned_to_nat(1u); -x_19 = lean_nat_sub(x_15, x_18); -lean_dec(x_15); -lean_inc(x_4); -x_20 = l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7(x_1, x_2, x_3, x_4, x_4, x_17, x_19, x_5, x_6, x_7, x_8, x_9, x_13); -return x_20; -} -else -{ -lean_object* x_21; lean_object* x_22; uint8_t x_23; -x_21 = lean_ctor_get(x_11, 1); -lean_inc(x_21); -lean_dec(x_11); -x_22 = lean_ctor_get(x_12, 0); -lean_inc(x_22); -lean_dec(x_12); -lean_inc(x_4); -lean_inc(x_1); -x_23 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_recArgHasLooseBVarsAt(x_1, x_2, x_4); -if (x_23 == 0) -{ -lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; -lean_dec(x_22); -x_24 = lean_unsigned_to_nat(0u); -x_25 = l_Lean_Expr_getAppNumArgsAux(x_4, x_24); -x_26 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_getFixedPrefix___lambda__2___closed__1; -lean_inc(x_25); -x_27 = lean_mk_array(x_25, x_26); -x_28 = lean_unsigned_to_nat(1u); -x_29 = lean_nat_sub(x_25, x_28); -lean_dec(x_25); -lean_inc(x_4); -x_30 = l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__10(x_1, x_2, x_3, x_4, x_4, x_27, x_29, x_5, x_6, x_7, x_8, x_9, x_21); -return x_30; -} -else -{ -lean_object* x_31; uint8_t x_32; lean_object* x_33; lean_object* x_57; lean_object* x_58; lean_object* x_59; uint8_t x_60; -x_31 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___closed__6; -x_57 = lean_st_ref_get(x_9, x_21); -x_58 = lean_ctor_get(x_57, 0); -lean_inc(x_58); -x_59 = lean_ctor_get(x_58, 3); -lean_inc(x_59); -lean_dec(x_58); -x_60 = lean_ctor_get_uint8(x_59, sizeof(void*)*1); -lean_dec(x_59); -if (x_60 == 0) -{ -lean_object* x_61; uint8_t x_62; -x_61 = lean_ctor_get(x_57, 1); -lean_inc(x_61); -lean_dec(x_57); -x_62 = 0; -x_32 = x_62; -x_33 = x_61; -goto block_56; -} -else -{ -lean_object* x_63; lean_object* x_64; lean_object* x_65; lean_object* x_66; uint8_t x_67; -x_63 = lean_ctor_get(x_57, 1); -lean_inc(x_63); -lean_dec(x_57); -x_64 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__12(x_31, x_5, x_6, x_7, x_8, x_9, x_63); -x_65 = lean_ctor_get(x_64, 0); -lean_inc(x_65); -x_66 = lean_ctor_get(x_64, 1); -lean_inc(x_66); -lean_dec(x_64); -x_67 = lean_unbox(x_65); -lean_dec(x_65); -x_32 = x_67; -x_33 = x_66; -goto block_56; -} -block_56: -{ -if (x_32 == 0) -{ -lean_object* x_34; lean_object* x_35; -x_34 = lean_box(0); -x_35 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__2(x_22, x_3, x_1, x_2, x_4, x_31, x_34, x_5, x_6, x_7, x_8, x_9, x_33); -return x_35; -} -else -{ -lean_object* x_36; -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -lean_inc(x_6); -lean_inc(x_3); -x_36 = lean_infer_type(x_3, x_6, x_7, x_8, x_9, x_33); -if (lean_obj_tag(x_36) == 0) -{ -lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_object* x_51; -x_37 = lean_ctor_get(x_36, 0); -lean_inc(x_37); -x_38 = lean_ctor_get(x_36, 1); -lean_inc(x_38); -lean_dec(x_36); -lean_inc(x_3); -x_39 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_39, 0, x_3); -x_40 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___closed__2; -x_41 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_41, 0, x_40); -lean_ctor_set(x_41, 1, x_39); -x_42 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___closed__4; -x_43 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_43, 0, x_41); -lean_ctor_set(x_43, 1, x_42); -x_44 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_44, 0, x_37); -x_45 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_45, 0, x_43); -lean_ctor_set(x_45, 1, x_44); -x_46 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__6; -x_47 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_47, 0, x_45); -lean_ctor_set(x_47, 1, x_46); -x_48 = l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11(x_31, x_47, x_5, x_6, x_7, x_8, x_9, x_38); -x_49 = lean_ctor_get(x_48, 0); -lean_inc(x_49); -x_50 = lean_ctor_get(x_48, 1); -lean_inc(x_50); -lean_dec(x_48); -x_51 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__2(x_22, x_3, x_1, x_2, x_4, x_31, x_49, x_5, x_6, x_7, x_8, x_9, x_50); -lean_dec(x_49); -return x_51; -} -else -{ -uint8_t x_52; -lean_dec(x_22); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_52 = !lean_is_exclusive(x_36); -if (x_52 == 0) -{ -return x_36; -} -else -{ -lean_object* x_53; lean_object* x_54; lean_object* x_55; -x_53 = lean_ctor_get(x_36, 0); -x_54 = lean_ctor_get(x_36, 1); -lean_inc(x_54); -lean_inc(x_53); -lean_dec(x_36); -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; -} -} -} -} -} -} -} -case 6: -{ -lean_object* x_68; lean_object* x_69; lean_object* x_70; uint64_t x_71; lean_object* x_72; -x_68 = lean_ctor_get(x_4, 0); -lean_inc(x_68); -x_69 = lean_ctor_get(x_4, 1); -lean_inc(x_69); -x_70 = lean_ctor_get(x_4, 2); -lean_inc(x_70); -x_71 = lean_ctor_get_uint64(x_4, sizeof(void*)*3); -lean_dec(x_4); -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -lean_inc(x_6); -lean_inc(x_5); -lean_inc(x_3); -lean_inc(x_2); -lean_inc(x_1); -x_72 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop(x_1, x_2, x_3, x_69, x_5, x_6, x_7, x_8, x_9, x_10); -if (lean_obj_tag(x_72) == 0) -{ -lean_object* x_73; lean_object* x_74; uint8_t x_75; lean_object* x_76; lean_object* x_77; -x_73 = lean_ctor_get(x_72, 0); -lean_inc(x_73); -x_74 = lean_ctor_get(x_72, 1); -lean_inc(x_74); -lean_dec(x_72); -x_75 = (uint8_t)((x_71 << 24) >> 61); -x_76 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__3___boxed), 11, 4); -lean_closure_set(x_76, 0, x_70); -lean_closure_set(x_76, 1, x_1); -lean_closure_set(x_76, 2, x_2); -lean_closure_set(x_76, 3, x_3); -x_77 = l_Lean_Meta_withLocalDecl___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__15___rarg(x_68, x_75, x_73, x_76, x_5, x_6, x_7, x_8, x_9, x_74); -return x_77; -} -else -{ -uint8_t x_78; -lean_dec(x_70); -lean_dec(x_68); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_78 = !lean_is_exclusive(x_72); -if (x_78 == 0) -{ -return x_72; -} -else -{ -lean_object* x_79; lean_object* x_80; lean_object* x_81; -x_79 = lean_ctor_get(x_72, 0); -x_80 = lean_ctor_get(x_72, 1); -lean_inc(x_80); -lean_inc(x_79); -lean_dec(x_72); -x_81 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_81, 0, x_79); -lean_ctor_set(x_81, 1, x_80); -return x_81; -} -} -} -case 7: -{ -lean_object* x_82; lean_object* x_83; lean_object* x_84; uint64_t x_85; lean_object* x_86; -x_82 = lean_ctor_get(x_4, 0); -lean_inc(x_82); -x_83 = lean_ctor_get(x_4, 1); -lean_inc(x_83); -x_84 = lean_ctor_get(x_4, 2); -lean_inc(x_84); -x_85 = lean_ctor_get_uint64(x_4, sizeof(void*)*3); -lean_dec(x_4); -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -lean_inc(x_6); -lean_inc(x_5); -lean_inc(x_3); -lean_inc(x_2); -lean_inc(x_1); -x_86 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop(x_1, x_2, x_3, x_83, x_5, x_6, x_7, x_8, x_9, x_10); -if (lean_obj_tag(x_86) == 0) -{ -lean_object* x_87; lean_object* x_88; uint8_t x_89; lean_object* x_90; lean_object* x_91; -x_87 = lean_ctor_get(x_86, 0); -lean_inc(x_87); -x_88 = lean_ctor_get(x_86, 1); -lean_inc(x_88); -lean_dec(x_86); -x_89 = (uint8_t)((x_85 << 24) >> 61); -x_90 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__4___boxed), 11, 4); -lean_closure_set(x_90, 0, x_84); -lean_closure_set(x_90, 1, x_1); -lean_closure_set(x_90, 2, x_2); -lean_closure_set(x_90, 3, x_3); -x_91 = l_Lean_Meta_withLocalDecl___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__15___rarg(x_82, x_89, x_87, x_90, x_5, x_6, x_7, x_8, x_9, x_88); -return x_91; -} -else -{ -uint8_t x_92; -lean_dec(x_84); -lean_dec(x_82); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_92 = !lean_is_exclusive(x_86); -if (x_92 == 0) -{ -return x_86; -} -else -{ -lean_object* x_93; lean_object* x_94; lean_object* x_95; -x_93 = lean_ctor_get(x_86, 0); -x_94 = lean_ctor_get(x_86, 1); -lean_inc(x_94); -lean_inc(x_93); -lean_dec(x_86); -x_95 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_95, 0, x_93); -lean_ctor_set(x_95, 1, x_94); -return x_95; -} -} -} -case 8: -{ -lean_object* x_96; lean_object* x_97; lean_object* x_98; lean_object* x_99; lean_object* x_100; -x_96 = lean_ctor_get(x_4, 0); -lean_inc(x_96); -x_97 = lean_ctor_get(x_4, 1); -lean_inc(x_97); -x_98 = lean_ctor_get(x_4, 2); -lean_inc(x_98); -x_99 = lean_ctor_get(x_4, 3); -lean_inc(x_99); -lean_dec(x_4); -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -lean_inc(x_6); -lean_inc(x_5); -lean_inc(x_3); -lean_inc(x_2); -lean_inc(x_1); -x_100 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop(x_1, x_2, x_3, x_97, x_5, x_6, x_7, x_8, x_9, x_10); -if (lean_obj_tag(x_100) == 0) -{ -lean_object* x_101; lean_object* x_102; lean_object* x_103; -x_101 = lean_ctor_get(x_100, 0); -lean_inc(x_101); -x_102 = lean_ctor_get(x_100, 1); -lean_inc(x_102); -lean_dec(x_100); -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -lean_inc(x_6); -lean_inc(x_5); -lean_inc(x_3); -lean_inc(x_2); -lean_inc(x_1); -x_103 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop(x_1, x_2, x_3, x_98, x_5, x_6, x_7, x_8, x_9, x_102); -if (lean_obj_tag(x_103) == 0) -{ -lean_object* x_104; lean_object* x_105; lean_object* x_106; lean_object* x_107; -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 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__3___boxed), 11, 4); -lean_closure_set(x_106, 0, x_99); -lean_closure_set(x_106, 1, x_1); -lean_closure_set(x_106, 2, x_2); -lean_closure_set(x_106, 3, x_3); -x_107 = l_Lean_Meta_withLetDecl___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__16___rarg(x_96, x_101, x_104, x_106, x_5, x_6, x_7, x_8, x_9, x_105); -return x_107; -} -else -{ -uint8_t x_108; -lean_dec(x_101); -lean_dec(x_99); -lean_dec(x_96); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_108 = !lean_is_exclusive(x_103); -if (x_108 == 0) -{ -return x_103; -} -else -{ -lean_object* x_109; lean_object* x_110; lean_object* x_111; -x_109 = lean_ctor_get(x_103, 0); -x_110 = lean_ctor_get(x_103, 1); -lean_inc(x_110); -lean_inc(x_109); -lean_dec(x_103); -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_99); -lean_dec(x_98); -lean_dec(x_96); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_112 = !lean_is_exclusive(x_100); -if (x_112 == 0) -{ -return x_100; -} -else -{ -lean_object* x_113; lean_object* x_114; lean_object* x_115; -x_113 = lean_ctor_get(x_100, 0); -x_114 = lean_ctor_get(x_100, 1); -lean_inc(x_114); -lean_inc(x_113); -lean_dec(x_100); -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; -} -} -} -case 10: -{ -lean_object* x_116; lean_object* x_117; lean_object* x_118; -x_116 = lean_ctor_get(x_4, 0); -lean_inc(x_116); -x_117 = lean_ctor_get(x_4, 1); -lean_inc(x_117); -lean_dec(x_4); -x_118 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop(x_1, x_2, x_3, x_117, x_5, x_6, x_7, x_8, x_9, x_10); -if (lean_obj_tag(x_118) == 0) -{ -uint8_t x_119; -x_119 = !lean_is_exclusive(x_118); -if (x_119 == 0) -{ -lean_object* x_120; lean_object* x_121; -x_120 = lean_ctor_get(x_118, 0); -x_121 = l_Lean_mkMData(x_116, x_120); -lean_ctor_set(x_118, 0, x_121); -return x_118; -} -else -{ -lean_object* x_122; lean_object* x_123; lean_object* x_124; lean_object* x_125; -x_122 = lean_ctor_get(x_118, 0); -x_123 = lean_ctor_get(x_118, 1); -lean_inc(x_123); -lean_inc(x_122); -lean_dec(x_118); -x_124 = l_Lean_mkMData(x_116, x_122); -x_125 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_125, 0, x_124); -lean_ctor_set(x_125, 1, x_123); -return x_125; -} -} -else -{ -uint8_t x_126; -lean_dec(x_116); -x_126 = !lean_is_exclusive(x_118); -if (x_126 == 0) -{ -return x_118; -} -else -{ -lean_object* x_127; lean_object* x_128; lean_object* x_129; -x_127 = lean_ctor_get(x_118, 0); -x_128 = lean_ctor_get(x_118, 1); -lean_inc(x_128); -lean_inc(x_127); -lean_dec(x_118); -x_129 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_129, 0, x_127); -lean_ctor_set(x_129, 1, x_128); -return x_129; -} -} -} -case 11: -{ -lean_object* x_130; lean_object* x_131; lean_object* x_132; lean_object* x_133; -x_130 = lean_ctor_get(x_4, 0); -lean_inc(x_130); -x_131 = lean_ctor_get(x_4, 1); -lean_inc(x_131); -x_132 = lean_ctor_get(x_4, 2); -lean_inc(x_132); -lean_dec(x_4); -x_133 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop(x_1, x_2, x_3, x_132, x_5, x_6, x_7, x_8, x_9, x_10); -if (lean_obj_tag(x_133) == 0) -{ -uint8_t x_134; -x_134 = !lean_is_exclusive(x_133); -if (x_134 == 0) -{ -lean_object* x_135; lean_object* x_136; -x_135 = lean_ctor_get(x_133, 0); -x_136 = l_Lean_mkProj(x_130, x_131, x_135); -lean_ctor_set(x_133, 0, x_136); -return x_133; -} -else -{ -lean_object* x_137; lean_object* x_138; lean_object* x_139; lean_object* x_140; -x_137 = lean_ctor_get(x_133, 0); -x_138 = lean_ctor_get(x_133, 1); -lean_inc(x_138); -lean_inc(x_137); -lean_dec(x_133); -x_139 = l_Lean_mkProj(x_130, x_131, x_137); -x_140 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_140, 0, x_139); -lean_ctor_set(x_140, 1, x_138); -return x_140; -} -} -else -{ -uint8_t x_141; -lean_dec(x_131); -lean_dec(x_130); -x_141 = !lean_is_exclusive(x_133); -if (x_141 == 0) -{ -return x_133; -} -else -{ -lean_object* x_142; lean_object* x_143; lean_object* x_144; -x_142 = lean_ctor_get(x_133, 0); -x_143 = lean_ctor_get(x_133, 1); -lean_inc(x_143); -lean_inc(x_142); -lean_dec(x_133); -x_144 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_144, 0, x_142); -lean_ctor_set(x_144, 1, x_143); -return x_144; -} -} -} -default: -{ -lean_object* x_145; -lean_dec(x_5); -lean_dec(x_3); -lean_dec(x_2); -x_145 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_ensureNoRecFn(x_1, x_4, x_6, x_7, x_8, x_9, x_10); -return x_145; -} -} -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps(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_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10); -return x_11; -} -} -lean_object* l_Lean_Meta_getMatcherInfo_x3f___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__2___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { -_start: -{ -lean_object* x_8; -x_8 = l_Lean_Meta_getMatcherInfo_x3f___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__2(x_1, x_2, x_3, x_4, x_5, x_6, x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -return x_8; -} -} -lean_object* l_Lean_Meta_matchMatcherApp_x3f___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___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) { -_start: -{ -lean_object* x_8; -x_8 = l_Lean_Meta_matchMatcherApp_x3f___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__1(x_1, x_2, x_3, x_4, x_5, x_6, x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -return x_8; -} -} -lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___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) { -_start: -{ -size_t x_13; size_t x_14; lean_object* x_15; -x_13 = lean_unbox_usize(x_4); -lean_dec(x_4); -x_14 = lean_unbox_usize(x_5); -lean_dec(x_5); -x_15 = l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__3(x_1, x_2, x_3, x_13, x_14, x_6, x_7, x_8, x_9, x_10, x_11, x_12); -return x_15; -} -} -lean_object* l_Std_Range_forIn_loop___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__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, lean_object* x_11, lean_object* x_12, lean_object* x_13, lean_object* x_14, lean_object* x_15) { -_start: -{ -lean_object* x_16; -x_16 = l_Std_Range_forIn_loop___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__4(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_12, x_13, x_14, x_15); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -return x_16; -} -} -lean_object* l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__5___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_throwError___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__5(x_1, x_2, x_3, x_4, x_5, x_6, x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -return x_8; -} -} -lean_object* l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__6___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_throwError___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__6(x_1, x_2, x_3, x_4, x_5, x_6, x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -return x_8; -} -} -lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___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, lean_object* x_12, lean_object* x_13) { -_start: -{ -lean_object* x_14; -x_14 = l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___lambda__1(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_12, x_13); -lean_dec(x_6); -return x_14; -} -} -lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__8___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) { -_start: -{ -size_t x_13; size_t x_14; lean_object* x_15; -x_13 = lean_unbox_usize(x_4); -lean_dec(x_4); -x_14 = lean_unbox_usize(x_5); -lean_dec(x_5); -x_15 = l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__8(x_1, x_2, x_3, x_13, x_14, x_6, x_7, x_8, x_9, x_10, x_11, x_12); -return x_15; -} -} -lean_object* l_Std_Range_forIn_loop___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__9___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: -{ -lean_object* x_16; -x_16 = l_Std_Range_forIn_loop___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__9(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_12, x_13, x_14, x_15); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -return x_16; -} -} -lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__10___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, lean_object* x_12, lean_object* x_13) { -_start: -{ -lean_object* x_14; -x_14 = l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__10___lambda__1(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_12, x_13); -lean_dec(x_6); -return x_14; -} -} -lean_object* l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___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_addTrace___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11(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); -return x_9; -} -} -lean_object* l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__12___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___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__12(x_1, x_2, x_3, x_4, x_5, x_6, x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -return x_8; -} -} -lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___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, lean_object* x_12) { -_start: -{ -lean_object* x_13; -x_13 = l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__1(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_12); -lean_dec(x_6); -lean_dec(x_1); -return x_13; -} -} -lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___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_object* x_12, lean_object* x_13, lean_object* x_14) { -_start: -{ -lean_object* x_15; -x_15 = l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___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, x_13, x_14); -lean_dec(x_1); -return x_15; -} -} -lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___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: -{ -size_t x_14; size_t x_15; lean_object* x_16; -x_14 = lean_unbox_usize(x_5); -lean_dec(x_5); -x_15 = lean_unbox_usize(x_6); -lean_dec(x_6); -x_16 = l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14(x_1, x_2, x_3, x_4, x_14, x_15, x_7, x_8, x_9, x_10, x_11, x_12, x_13); -return x_16; -} -} -lean_object* l_Lean_Meta_withLocalDecl___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__15___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10) { -_start: -{ -uint8_t x_11; lean_object* x_12; -x_11 = lean_unbox(x_2); -lean_dec(x_2); -x_12 = l_Lean_Meta_withLocalDecl___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__15___rarg(x_1, x_11, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10); -return x_12; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___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_object* x_12, lean_object* x_13) { -_start: -{ -lean_object* x_14; -x_14 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___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, x_13); -lean_dec(x_7); -return x_14; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__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) { -_start: -{ -lean_object* x_12; -x_12 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__3(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_1); -return x_12; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___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, lean_object* x_11) { -_start: -{ -lean_object* x_12; -x_12 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__4(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_1); -return x_12; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow_match__1___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3) { -_start: -{ -if (lean_obj_tag(x_1) == 0) -{ -lean_object* x_4; -lean_dec(x_2); -x_4 = lean_apply_1(x_3, x_1); -return x_4; -} -else -{ -lean_object* x_5; lean_object* x_6; -lean_dec(x_3); -x_5 = lean_ctor_get(x_1, 0); -lean_inc(x_5); -lean_dec(x_1); -x_6 = lean_apply_1(x_2, x_5); -return x_6; -} -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow_match__1(lean_object* x_1) { -_start: -{ -lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow_match__1___rarg), 3, 0); -return x_2; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow_match__2___rarg(lean_object* x_1, lean_object* x_2) { -_start: -{ -lean_object* x_3; lean_object* x_4; lean_object* x_5; -x_3 = lean_ctor_get(x_1, 0); -lean_inc(x_3); -x_4 = lean_ctor_get(x_1, 1); -lean_inc(x_4); -lean_dec(x_1); -x_5 = lean_apply_2(x_2, x_3, x_4); -return x_5; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow_match__2(lean_object* x_1) { -_start: -{ -lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow_match__2___rarg), 2, 0); -return x_2; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow_match__3___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3) { -_start: -{ -if (lean_obj_tag(x_1) == 0) -{ -lean_object* x_4; -lean_dec(x_2); -x_4 = lean_apply_1(x_3, x_1); -return x_4; -} -else -{ -lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; -lean_dec(x_3); -x_5 = lean_ctor_get(x_1, 0); -lean_inc(x_5); -lean_dec(x_1); -x_6 = lean_ctor_get(x_5, 0); -lean_inc(x_6); -x_7 = lean_ctor_get(x_5, 1); -lean_inc(x_7); -lean_dec(x_5); -x_8 = lean_apply_2(x_2, x_6, x_7); -return x_8; -} -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow_match__3(lean_object* x_1) { -_start: -{ -lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow_match__3___rarg), 3, 0); -return x_2; -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___closed__1() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string("not a matcherApp: "); -return x_1; -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___closed__2() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___closed__1; -x_2 = l_Lean_stringToMessageData(x_1); -return x_2; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow(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_ctor_get(x_2, 5); -lean_inc(x_9); -lean_inc(x_7); -lean_inc(x_6); -lean_inc(x_5); -lean_inc(x_4); -lean_inc(x_1); -x_10 = l_Lean_Meta_IndPredBelow_findBelowIdx(x_9, x_1, x_4, x_5, x_6, x_7, x_8); -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) -{ -uint8_t x_12; -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_1); -x_12 = !lean_is_exclusive(x_10); -if (x_12 == 0) -{ -lean_object* x_13; lean_object* x_14; -x_13 = lean_ctor_get(x_10, 0); -lean_dec(x_13); -x_14 = l_Lean_Meta_MatcherApp_toExpr(x_2); -lean_ctor_set(x_10, 0, x_14); -return x_10; -} -else -{ -lean_object* x_15; lean_object* x_16; lean_object* x_17; -x_15 = lean_ctor_get(x_10, 1); -lean_inc(x_15); -lean_dec(x_10); -x_16 = l_Lean_Meta_MatcherApp_toExpr(x_2); -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; -} -} -else -{ -lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; -x_18 = lean_ctor_get(x_11, 0); -lean_inc(x_18); -lean_dec(x_11); -x_19 = lean_ctor_get(x_10, 1); -lean_inc(x_19); -lean_dec(x_10); -x_20 = lean_ctor_get(x_18, 0); -lean_inc(x_20); -x_21 = lean_ctor_get(x_18, 1); -lean_inc(x_21); -lean_dec(x_18); -lean_inc(x_7); -lean_inc(x_6); -lean_inc(x_5); -lean_inc(x_4); -lean_inc(x_1); -x_22 = l_Lean_Meta_IndPredBelow_mkBelowMatcher(x_2, x_1, x_20, x_21, x_4, x_5, x_6, x_7, x_19); -if (lean_obj_tag(x_22) == 0) -{ -lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; uint8_t x_32; -x_23 = lean_ctor_get(x_22, 0); -lean_inc(x_23); -x_24 = lean_ctor_get(x_22, 1); -lean_inc(x_24); -lean_dec(x_22); -x_25 = lean_ctor_get(x_23, 0); -lean_inc(x_25); -x_26 = lean_ctor_get(x_23, 1); -lean_inc(x_26); -lean_dec(x_23); -x_27 = lean_st_ref_get(x_7, x_24); -x_28 = lean_ctor_get(x_27, 1); -lean_inc(x_28); -lean_dec(x_27); -x_29 = lean_st_ref_take(x_3, 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_is_exclusive(x_30); -if (x_32 == 0) -{ -lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; -x_33 = lean_ctor_get(x_30, 1); -x_34 = lean_array_push(x_33, x_26); -lean_ctor_set(x_30, 1, x_34); -x_35 = lean_st_ref_set(x_3, x_30, x_31); -x_36 = lean_ctor_get(x_35, 1); -lean_inc(x_36); -lean_dec(x_35); -lean_inc(x_25); -x_37 = l_Lean_Meta_matchMatcherApp_x3f___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__1(x_25, x_3, x_4, x_5, x_6, x_7, x_36); -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; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; -lean_dec(x_1); -x_39 = lean_ctor_get(x_37, 1); -lean_inc(x_39); -lean_dec(x_37); -x_40 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_40, 0, x_25); -x_41 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___closed__2; -x_42 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_42, 0, x_41); -lean_ctor_set(x_42, 1, x_40); -x_43 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__6; -x_44 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_44, 0, x_42); -lean_ctor_set(x_44, 1, x_43); -x_45 = l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__5(x_44, x_3, x_4, x_5, x_6, x_7, x_39); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -return x_45; -} -else -{ -lean_object* x_46; lean_object* x_47; -lean_dec(x_25); -x_46 = lean_ctor_get(x_37, 1); -lean_inc(x_46); -lean_dec(x_37); -x_47 = lean_ctor_get(x_38, 0); -lean_inc(x_47); -lean_dec(x_38); -x_2 = x_47; -x_8 = x_46; -goto _start; -} -} -else -{ -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; -x_49 = lean_ctor_get(x_30, 0); -x_50 = lean_ctor_get(x_30, 1); -lean_inc(x_50); -lean_inc(x_49); -lean_dec(x_30); -x_51 = lean_array_push(x_50, x_26); -x_52 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_52, 0, x_49); -lean_ctor_set(x_52, 1, x_51); -x_53 = lean_st_ref_set(x_3, x_52, x_31); -x_54 = lean_ctor_get(x_53, 1); -lean_inc(x_54); -lean_dec(x_53); -lean_inc(x_25); -x_55 = l_Lean_Meta_matchMatcherApp_x3f___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__1(x_25, x_3, x_4, x_5, x_6, x_7, x_54); -x_56 = lean_ctor_get(x_55, 0); -lean_inc(x_56); -if (lean_obj_tag(x_56) == 0) -{ -lean_object* x_57; lean_object* x_58; lean_object* x_59; lean_object* x_60; lean_object* x_61; lean_object* x_62; lean_object* x_63; -lean_dec(x_1); -x_57 = lean_ctor_get(x_55, 1); -lean_inc(x_57); -lean_dec(x_55); -x_58 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_58, 0, x_25); -x_59 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___closed__2; -x_60 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_60, 0, x_59); -lean_ctor_set(x_60, 1, x_58); -x_61 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__6; -x_62 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_62, 0, x_60); -lean_ctor_set(x_62, 1, x_61); -x_63 = l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__5(x_62, x_3, x_4, x_5, x_6, x_7, x_57); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -return x_63; -} -else -{ -lean_object* x_64; lean_object* x_65; -lean_dec(x_25); -x_64 = lean_ctor_get(x_55, 1); -lean_inc(x_64); -lean_dec(x_55); -x_65 = lean_ctor_get(x_56, 0); -lean_inc(x_65); -lean_dec(x_56); -x_2 = x_65; -x_8 = x_64; -goto _start; -} -} -} -else -{ -uint8_t x_67; -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_1); -x_67 = !lean_is_exclusive(x_22); -if (x_67 == 0) -{ -return x_22; -} -else -{ -lean_object* x_68; lean_object* x_69; lean_object* x_70; -x_68 = lean_ctor_get(x_22, 0); -x_69 = lean_ctor_get(x_22, 1); -lean_inc(x_69); -lean_inc(x_68); -lean_dec(x_22); -x_70 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_70, 0, x_68); -lean_ctor_set(x_70, 1, x_69); -return x_70; -} -} -} -} -else -{ -uint8_t x_71; -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_2); -lean_dec(x_1); -x_71 = !lean_is_exclusive(x_10); -if (x_71 == 0) -{ -return x_10; -} -else -{ -lean_object* x_72; lean_object* x_73; lean_object* x_74; -x_72 = lean_ctor_get(x_10, 0); -x_73 = lean_ctor_get(x_10, 1); -lean_inc(x_73); -lean_inc(x_72); -lean_dec(x_10); -x_74 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_74, 0, x_72); -lean_ctor_set(x_74, 1, x_73); -return x_74; -} -} -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___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___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8); -lean_dec(x_3); -return x_9; -} -} -lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___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) { -_start: -{ -uint8_t x_14; -x_14 = x_6 < x_5; -if (x_14 == 0) -{ -lean_object* x_15; lean_object* x_16; -lean_dec(x_12); -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_15 = x_7; -x_16 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_16, 0, x_15); -lean_ctor_set(x_16, 1, x_13); -return x_16; -} -else -{ -lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; -x_17 = lean_array_uget(x_7, x_6); -x_18 = lean_unsigned_to_nat(0u); -x_19 = lean_array_uset(x_7, x_6, x_18); -x_20 = x_17; -lean_inc(x_12); -lean_inc(x_11); -lean_inc(x_10); -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_4); -lean_inc(x_3); -lean_inc(x_2); -lean_inc(x_1); -x_21 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop(x_1, x_2, x_3, x_4, x_20, x_8, x_9, x_10, x_11, x_12, x_13); -if (lean_obj_tag(x_21) == 0) -{ -lean_object* x_22; lean_object* x_23; size_t x_24; size_t x_25; lean_object* x_26; lean_object* x_27; -x_22 = lean_ctor_get(x_21, 0); -lean_inc(x_22); -x_23 = lean_ctor_get(x_21, 1); -lean_inc(x_23); -lean_dec(x_21); -x_24 = 1; -x_25 = x_6 + x_24; -x_26 = x_22; -x_27 = lean_array_uset(x_19, x_6, x_26); -x_6 = x_25; -x_7 = x_27; -x_13 = x_23; -goto _start; -} -else -{ -uint8_t x_29; -lean_dec(x_19); -lean_dec(x_12); -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -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; -} -} -} -} -} -static lean_object* _init_l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__2___closed__1() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string("could not solve using backwards chaining "); -return x_1; -} -} -static lean_object* _init_l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__2___closed__2() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__2___closed__1; -x_2 = l_Lean_stringToMessageData(x_1); -return x_2; -} -} -static lean_object* _init_l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__2___boxed__const__1() { -_start: -{ -size_t x_1; lean_object* x_2; -x_1 = 0; -x_2 = lean_box_usize(x_1); -return x_2; -} -} -lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__2(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, 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: -{ -if (lean_obj_tag(x_6) == 5) -{ -lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; -x_15 = lean_ctor_get(x_6, 0); -lean_inc(x_15); -x_16 = lean_ctor_get(x_6, 1); -lean_inc(x_16); -lean_dec(x_6); -x_17 = lean_array_set(x_7, x_8, x_16); -x_18 = lean_unsigned_to_nat(1u); -x_19 = lean_nat_sub(x_8, x_18); -lean_dec(x_8); -x_6 = x_15; -x_7 = x_17; -x_8 = x_19; -goto _start; -} -else -{ -uint8_t x_21; -lean_dec(x_8); -x_21 = l_Lean_Expr_isConstOf(x_6, x_1); -if (x_21 == 0) -{ -lean_object* x_22; -lean_dec(x_5); -lean_inc(x_13); -lean_inc(x_12); -lean_inc(x_11); -lean_inc(x_10); -lean_inc(x_9); -lean_inc(x_4); -lean_inc(x_3); -lean_inc(x_2); -lean_inc(x_1); -x_22 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop(x_1, x_2, x_3, x_4, x_6, x_9, x_10, x_11, x_12, x_13, x_14); -if (lean_obj_tag(x_22) == 0) -{ -lean_object* x_23; lean_object* x_24; lean_object* x_25; size_t x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; -x_23 = lean_ctor_get(x_22, 0); -lean_inc(x_23); -x_24 = lean_ctor_get(x_22, 1); -lean_inc(x_24); -lean_dec(x_22); -x_25 = lean_array_get_size(x_7); -x_26 = lean_usize_of_nat(x_25); -lean_dec(x_25); -x_27 = x_7; -x_28 = lean_box_usize(x_26); -x_29 = l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__2___boxed__const__1; -x_30 = lean_alloc_closure((void*)(l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__1___boxed), 13, 7); -lean_closure_set(x_30, 0, x_1); -lean_closure_set(x_30, 1, x_2); -lean_closure_set(x_30, 2, x_3); -lean_closure_set(x_30, 3, x_4); -lean_closure_set(x_30, 4, x_28); -lean_closure_set(x_30, 5, x_29); -lean_closure_set(x_30, 6, x_27); -x_31 = x_30; -x_32 = lean_apply_6(x_31, x_9, x_10, x_11, x_12, x_13, x_24); -if (lean_obj_tag(x_32) == 0) -{ -uint8_t x_33; -x_33 = !lean_is_exclusive(x_32); -if (x_33 == 0) -{ -lean_object* x_34; lean_object* x_35; -x_34 = lean_ctor_get(x_32, 0); -x_35 = l_Lean_mkAppN(x_23, x_34); -lean_ctor_set(x_32, 0, x_35); -return x_32; -} -else -{ -lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; -x_36 = lean_ctor_get(x_32, 0); -x_37 = lean_ctor_get(x_32, 1); -lean_inc(x_37); -lean_inc(x_36); -lean_dec(x_32); -x_38 = l_Lean_mkAppN(x_23, x_36); -x_39 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_39, 0, x_38); -lean_ctor_set(x_39, 1, x_37); -return x_39; -} -} -else -{ -uint8_t x_40; -lean_dec(x_23); -x_40 = !lean_is_exclusive(x_32); -if (x_40 == 0) -{ -return x_32; -} -else -{ -lean_object* x_41; lean_object* x_42; lean_object* x_43; -x_41 = lean_ctor_get(x_32, 0); -x_42 = lean_ctor_get(x_32, 1); -lean_inc(x_42); -lean_inc(x_41); -lean_dec(x_32); -x_43 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_43, 0, x_41); -lean_ctor_set(x_43, 1, x_42); -return x_43; -} -} -} -else -{ -uint8_t x_44; -lean_dec(x_13); -lean_dec(x_12); -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_7); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_44 = !lean_is_exclusive(x_22); -if (x_44 == 0) -{ -return x_22; -} -else -{ -lean_object* x_45; lean_object* x_46; lean_object* x_47; -x_45 = lean_ctor_get(x_22, 0); -x_46 = lean_ctor_get(x_22, 1); -lean_inc(x_46); -lean_inc(x_45); -lean_dec(x_22); -x_47 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_47, 0, x_45); -lean_ctor_set(x_47, 1, x_46); -return x_47; -} -} -} -else -{ -lean_object* x_48; -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -lean_inc(x_13); -lean_inc(x_12); -lean_inc(x_11); -lean_inc(x_10); -x_48 = lean_infer_type(x_5, x_10, x_11, x_12, x_13, x_14); -if (lean_obj_tag(x_48) == 0) -{ -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; -x_49 = lean_ctor_get(x_48, 0); -lean_inc(x_49); -x_50 = lean_ctor_get(x_48, 1); -lean_inc(x_50); -lean_dec(x_48); -x_51 = lean_box(0); -lean_inc(x_10); -x_52 = l_Lean_Meta_mkFreshExprSyntheticOpaqueMVar(x_49, x_51, x_10, x_11, x_12, x_13, x_50); -x_53 = lean_ctor_get(x_52, 0); -lean_inc(x_53); -x_54 = lean_ctor_get(x_52, 1); -lean_inc(x_54); -lean_dec(x_52); -x_55 = l_Lean_Expr_mvarId_x21(x_53); -lean_inc(x_13); -lean_inc(x_12); -lean_inc(x_11); -lean_inc(x_10); -lean_inc(x_55); -x_56 = l_Lean_Meta_IndPredBelow_backwardsChaining(x_55, x_4, x_10, x_11, x_12, x_13, x_54); -if (lean_obj_tag(x_56) == 0) -{ -lean_object* x_57; uint8_t x_58; -x_57 = lean_ctor_get(x_56, 0); -lean_inc(x_57); -x_58 = lean_unbox(x_57); -lean_dec(x_57); -if (x_58 == 0) -{ -lean_object* x_59; lean_object* x_60; lean_object* x_61; lean_object* x_62; lean_object* x_63; lean_object* x_64; lean_object* x_65; -lean_dec(x_53); -x_59 = lean_ctor_get(x_56, 1); -lean_inc(x_59); -lean_dec(x_56); -x_60 = lean_alloc_ctor(5, 1, 0); -lean_ctor_set(x_60, 0, x_55); -x_61 = l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__2___closed__2; -x_62 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_62, 0, x_61); -lean_ctor_set(x_62, 1, x_60); -x_63 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__6; -x_64 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_64, 0, x_62); -lean_ctor_set(x_64, 1, x_63); -x_65 = l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__5(x_64, x_9, x_10, x_11, x_12, x_13, x_59); -lean_dec(x_13); -lean_dec(x_12); -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -return x_65; -} -else -{ -uint8_t x_66; -lean_dec(x_55); -lean_dec(x_13); -lean_dec(x_12); -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -x_66 = !lean_is_exclusive(x_56); -if (x_66 == 0) -{ -lean_object* x_67; -x_67 = lean_ctor_get(x_56, 0); -lean_dec(x_67); -lean_ctor_set(x_56, 0, x_53); -return x_56; -} -else -{ -lean_object* x_68; lean_object* x_69; -x_68 = lean_ctor_get(x_56, 1); -lean_inc(x_68); -lean_dec(x_56); -x_69 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_69, 0, x_53); -lean_ctor_set(x_69, 1, x_68); -return x_69; -} -} -} -else -{ -uint8_t x_70; -lean_dec(x_55); -lean_dec(x_53); -lean_dec(x_13); -lean_dec(x_12); -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -x_70 = !lean_is_exclusive(x_56); -if (x_70 == 0) -{ -return x_56; -} -else -{ -lean_object* x_71; lean_object* x_72; lean_object* x_73; -x_71 = lean_ctor_get(x_56, 0); -x_72 = lean_ctor_get(x_56, 1); -lean_inc(x_72); -lean_inc(x_71); -lean_dec(x_56); -x_73 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_73, 0, x_71); -lean_ctor_set(x_73, 1, x_72); -return x_73; -} -} -} -else -{ -uint8_t x_74; -lean_dec(x_13); -lean_dec(x_12); -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_4); -x_74 = !lean_is_exclusive(x_48); -if (x_74 == 0) -{ -return x_48; -} -else -{ -lean_object* x_75; lean_object* x_76; lean_object* x_77; -x_75 = lean_ctor_get(x_48, 0); -x_76 = lean_ctor_get(x_48, 1); -lean_inc(x_76); -lean_inc(x_75); -lean_dec(x_48); -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; -} -} -} -} -} -} -lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__3(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) { -_start: -{ -uint8_t x_14; -x_14 = x_6 < x_5; -if (x_14 == 0) -{ -lean_object* x_15; lean_object* x_16; -lean_dec(x_12); -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_15 = x_7; -x_16 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_16, 0, x_15); -lean_ctor_set(x_16, 1, x_13); -return x_16; -} -else -{ -lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; -x_17 = lean_array_uget(x_7, x_6); -x_18 = lean_unsigned_to_nat(0u); -x_19 = lean_array_uset(x_7, x_6, x_18); -x_20 = x_17; -lean_inc(x_12); -lean_inc(x_11); -lean_inc(x_10); -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_4); -lean_inc(x_3); -lean_inc(x_2); -lean_inc(x_1); -x_21 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop(x_1, x_2, x_3, x_4, x_20, x_8, x_9, x_10, x_11, x_12, x_13); -if (lean_obj_tag(x_21) == 0) -{ -lean_object* x_22; lean_object* x_23; size_t x_24; size_t x_25; lean_object* x_26; lean_object* x_27; -x_22 = lean_ctor_get(x_21, 0); -lean_inc(x_22); -x_23 = lean_ctor_get(x_21, 1); -lean_inc(x_23); -lean_dec(x_21); -x_24 = 1; -x_25 = x_6 + x_24; -x_26 = x_22; -x_27 = lean_array_uset(x_19, x_6, x_26); -x_6 = x_25; -x_7 = x_27; -x_13 = x_23; -goto _start; -} -else -{ -uint8_t x_29; -lean_dec(x_19); -lean_dec(x_12); -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -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; -} -} -} -} -} -static lean_object* _init_l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__4___boxed__const__1() { -_start: -{ -size_t x_1; lean_object* x_2; -x_1 = 0; -x_2 = lean_box_usize(x_1); -return x_2; -} -} -lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__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, lean_object* x_11, lean_object* x_12, lean_object* x_13, lean_object* x_14) { -_start: -{ -if (lean_obj_tag(x_6) == 5) -{ -lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; -x_15 = lean_ctor_get(x_6, 0); -lean_inc(x_15); -x_16 = lean_ctor_get(x_6, 1); -lean_inc(x_16); -lean_dec(x_6); -x_17 = lean_array_set(x_7, x_8, x_16); -x_18 = lean_unsigned_to_nat(1u); -x_19 = lean_nat_sub(x_8, x_18); -lean_dec(x_8); -x_6 = x_15; -x_7 = x_17; -x_8 = x_19; -goto _start; -} -else -{ -uint8_t x_21; -lean_dec(x_8); -x_21 = l_Lean_Expr_isConstOf(x_6, x_1); -if (x_21 == 0) -{ -lean_object* x_22; -lean_dec(x_5); -lean_inc(x_13); -lean_inc(x_12); -lean_inc(x_11); -lean_inc(x_10); -lean_inc(x_9); -lean_inc(x_4); -lean_inc(x_3); -lean_inc(x_2); -lean_inc(x_1); -x_22 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop(x_1, x_2, x_3, x_4, x_6, x_9, x_10, x_11, x_12, x_13, x_14); -if (lean_obj_tag(x_22) == 0) -{ -lean_object* x_23; lean_object* x_24; lean_object* x_25; size_t x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; -x_23 = lean_ctor_get(x_22, 0); -lean_inc(x_23); -x_24 = lean_ctor_get(x_22, 1); -lean_inc(x_24); -lean_dec(x_22); -x_25 = lean_array_get_size(x_7); -x_26 = lean_usize_of_nat(x_25); -lean_dec(x_25); -x_27 = x_7; -x_28 = lean_box_usize(x_26); -x_29 = l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__4___boxed__const__1; -x_30 = lean_alloc_closure((void*)(l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__3___boxed), 13, 7); -lean_closure_set(x_30, 0, x_1); -lean_closure_set(x_30, 1, x_2); -lean_closure_set(x_30, 2, x_3); -lean_closure_set(x_30, 3, x_4); -lean_closure_set(x_30, 4, x_28); -lean_closure_set(x_30, 5, x_29); -lean_closure_set(x_30, 6, x_27); -x_31 = x_30; -x_32 = lean_apply_6(x_31, x_9, x_10, x_11, x_12, x_13, x_24); -if (lean_obj_tag(x_32) == 0) -{ -uint8_t x_33; -x_33 = !lean_is_exclusive(x_32); -if (x_33 == 0) -{ -lean_object* x_34; lean_object* x_35; -x_34 = lean_ctor_get(x_32, 0); -x_35 = l_Lean_mkAppN(x_23, x_34); -lean_ctor_set(x_32, 0, x_35); -return x_32; -} -else -{ -lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; -x_36 = lean_ctor_get(x_32, 0); -x_37 = lean_ctor_get(x_32, 1); -lean_inc(x_37); -lean_inc(x_36); -lean_dec(x_32); -x_38 = l_Lean_mkAppN(x_23, x_36); -x_39 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_39, 0, x_38); -lean_ctor_set(x_39, 1, x_37); -return x_39; -} -} -else -{ -uint8_t x_40; -lean_dec(x_23); -x_40 = !lean_is_exclusive(x_32); -if (x_40 == 0) -{ -return x_32; -} -else -{ -lean_object* x_41; lean_object* x_42; lean_object* x_43; -x_41 = lean_ctor_get(x_32, 0); -x_42 = lean_ctor_get(x_32, 1); -lean_inc(x_42); -lean_inc(x_41); -lean_dec(x_32); -x_43 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_43, 0, x_41); -lean_ctor_set(x_43, 1, x_42); -return x_43; -} -} -} -else -{ -uint8_t x_44; -lean_dec(x_13); -lean_dec(x_12); -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_7); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_44 = !lean_is_exclusive(x_22); -if (x_44 == 0) -{ -return x_22; -} -else -{ -lean_object* x_45; lean_object* x_46; lean_object* x_47; -x_45 = lean_ctor_get(x_22, 0); -x_46 = lean_ctor_get(x_22, 1); -lean_inc(x_46); -lean_inc(x_45); -lean_dec(x_22); -x_47 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_47, 0, x_45); -lean_ctor_set(x_47, 1, x_46); -return x_47; -} -} -} -else -{ -lean_object* x_48; -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -lean_inc(x_13); -lean_inc(x_12); -lean_inc(x_11); -lean_inc(x_10); -x_48 = lean_infer_type(x_5, x_10, x_11, x_12, x_13, x_14); -if (lean_obj_tag(x_48) == 0) -{ -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; -x_49 = lean_ctor_get(x_48, 0); -lean_inc(x_49); -x_50 = lean_ctor_get(x_48, 1); -lean_inc(x_50); -lean_dec(x_48); -x_51 = lean_box(0); -lean_inc(x_10); -x_52 = l_Lean_Meta_mkFreshExprSyntheticOpaqueMVar(x_49, x_51, x_10, x_11, x_12, x_13, x_50); -x_53 = lean_ctor_get(x_52, 0); -lean_inc(x_53); -x_54 = lean_ctor_get(x_52, 1); -lean_inc(x_54); -lean_dec(x_52); -x_55 = l_Lean_Expr_mvarId_x21(x_53); -lean_inc(x_13); -lean_inc(x_12); -lean_inc(x_11); -lean_inc(x_10); -lean_inc(x_55); -x_56 = l_Lean_Meta_IndPredBelow_backwardsChaining(x_55, x_4, x_10, x_11, x_12, x_13, x_54); -if (lean_obj_tag(x_56) == 0) -{ -lean_object* x_57; uint8_t x_58; -x_57 = lean_ctor_get(x_56, 0); -lean_inc(x_57); -x_58 = lean_unbox(x_57); -lean_dec(x_57); -if (x_58 == 0) -{ -lean_object* x_59; lean_object* x_60; lean_object* x_61; lean_object* x_62; lean_object* x_63; lean_object* x_64; lean_object* x_65; -lean_dec(x_53); -x_59 = lean_ctor_get(x_56, 1); -lean_inc(x_59); -lean_dec(x_56); -x_60 = lean_alloc_ctor(5, 1, 0); -lean_ctor_set(x_60, 0, x_55); -x_61 = l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__2___closed__2; -x_62 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_62, 0, x_61); -lean_ctor_set(x_62, 1, x_60); -x_63 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__6; -x_64 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_64, 0, x_62); -lean_ctor_set(x_64, 1, x_63); -x_65 = l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__5(x_64, x_9, x_10, x_11, x_12, x_13, x_59); -lean_dec(x_13); -lean_dec(x_12); -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -return x_65; -} -else -{ -uint8_t x_66; -lean_dec(x_55); -lean_dec(x_13); -lean_dec(x_12); -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -x_66 = !lean_is_exclusive(x_56); -if (x_66 == 0) -{ -lean_object* x_67; -x_67 = lean_ctor_get(x_56, 0); -lean_dec(x_67); -lean_ctor_set(x_56, 0, x_53); -return x_56; -} -else -{ -lean_object* x_68; lean_object* x_69; -x_68 = lean_ctor_get(x_56, 1); -lean_inc(x_68); -lean_dec(x_56); -x_69 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_69, 0, x_53); -lean_ctor_set(x_69, 1, x_68); -return x_69; -} -} -} -else -{ -uint8_t x_70; -lean_dec(x_55); -lean_dec(x_53); -lean_dec(x_13); -lean_dec(x_12); -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -x_70 = !lean_is_exclusive(x_56); -if (x_70 == 0) -{ -return x_56; -} -else -{ -lean_object* x_71; lean_object* x_72; lean_object* x_73; -x_71 = lean_ctor_get(x_56, 0); -x_72 = lean_ctor_get(x_56, 1); -lean_inc(x_72); -lean_inc(x_71); -lean_dec(x_56); -x_73 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_73, 0, x_71); -lean_ctor_set(x_73, 1, x_72); -return x_73; -} -} -} -else -{ -uint8_t x_74; -lean_dec(x_13); -lean_dec(x_12); -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_4); -x_74 = !lean_is_exclusive(x_48); -if (x_74 == 0) -{ -return x_48; -} -else -{ -lean_object* x_75; lean_object* x_76; lean_object* x_77; -x_75 = lean_ctor_get(x_48, 0); -x_76 = lean_ctor_get(x_48, 1); -lean_inc(x_76); -lean_inc(x_75); -lean_dec(x_48); -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; -} -} -} -} -} -} -lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__5(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) { -_start: -{ -uint8_t x_14; -x_14 = x_6 < x_5; -if (x_14 == 0) -{ -lean_object* x_15; lean_object* x_16; -lean_dec(x_12); -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_15 = x_7; -x_16 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_16, 0, x_15); -lean_ctor_set(x_16, 1, x_13); -return x_16; -} -else -{ -lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; -x_17 = lean_array_uget(x_7, x_6); -x_18 = lean_unsigned_to_nat(0u); -x_19 = lean_array_uset(x_7, x_6, x_18); -x_20 = x_17; -lean_inc(x_12); -lean_inc(x_11); -lean_inc(x_10); -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_4); -lean_inc(x_3); -lean_inc(x_2); -lean_inc(x_1); -x_21 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop(x_1, x_2, x_3, x_4, x_20, x_8, x_9, x_10, x_11, x_12, x_13); -if (lean_obj_tag(x_21) == 0) -{ -lean_object* x_22; lean_object* x_23; size_t x_24; size_t x_25; lean_object* x_26; lean_object* x_27; -x_22 = lean_ctor_get(x_21, 0); -lean_inc(x_22); -x_23 = lean_ctor_get(x_21, 1); -lean_inc(x_23); -lean_dec(x_21); -x_24 = 1; -x_25 = x_6 + x_24; -x_26 = x_22; -x_27 = lean_array_uset(x_19, x_6, x_26); -x_6 = x_25; -x_7 = x_27; -x_13 = x_23; -goto _start; -} -else -{ -uint8_t x_29; -lean_dec(x_19); -lean_dec(x_12); -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -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; -} -} -} -} -} -static lean_object* _init_l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__6___boxed__const__1() { -_start: -{ -size_t x_1; lean_object* x_2; -x_1 = 0; -x_2 = lean_box_usize(x_1); -return x_2; -} -} -lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__6(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: -{ -if (lean_obj_tag(x_6) == 5) -{ -lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; -x_15 = lean_ctor_get(x_6, 0); -lean_inc(x_15); -x_16 = lean_ctor_get(x_6, 1); -lean_inc(x_16); -lean_dec(x_6); -x_17 = lean_array_set(x_7, x_8, x_16); -x_18 = lean_unsigned_to_nat(1u); -x_19 = lean_nat_sub(x_8, x_18); -lean_dec(x_8); -x_6 = x_15; -x_7 = x_17; -x_8 = x_19; -goto _start; -} -else -{ -uint8_t x_21; -lean_dec(x_8); -x_21 = l_Lean_Expr_isConstOf(x_6, x_1); -if (x_21 == 0) -{ -lean_object* x_22; -lean_dec(x_5); -lean_inc(x_13); -lean_inc(x_12); -lean_inc(x_11); -lean_inc(x_10); -lean_inc(x_9); -lean_inc(x_4); -lean_inc(x_3); -lean_inc(x_2); -lean_inc(x_1); -x_22 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop(x_1, x_2, x_3, x_4, x_6, x_9, x_10, x_11, x_12, x_13, x_14); -if (lean_obj_tag(x_22) == 0) -{ -lean_object* x_23; lean_object* x_24; lean_object* x_25; size_t x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; -x_23 = lean_ctor_get(x_22, 0); -lean_inc(x_23); -x_24 = lean_ctor_get(x_22, 1); -lean_inc(x_24); -lean_dec(x_22); -x_25 = lean_array_get_size(x_7); -x_26 = lean_usize_of_nat(x_25); -lean_dec(x_25); -x_27 = x_7; -x_28 = lean_box_usize(x_26); -x_29 = l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__6___boxed__const__1; -x_30 = lean_alloc_closure((void*)(l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__5___boxed), 13, 7); -lean_closure_set(x_30, 0, x_1); -lean_closure_set(x_30, 1, x_2); -lean_closure_set(x_30, 2, x_3); -lean_closure_set(x_30, 3, x_4); -lean_closure_set(x_30, 4, x_28); -lean_closure_set(x_30, 5, x_29); -lean_closure_set(x_30, 6, x_27); -x_31 = x_30; -x_32 = lean_apply_6(x_31, x_9, x_10, x_11, x_12, x_13, x_24); -if (lean_obj_tag(x_32) == 0) -{ -uint8_t x_33; -x_33 = !lean_is_exclusive(x_32); -if (x_33 == 0) -{ -lean_object* x_34; lean_object* x_35; -x_34 = lean_ctor_get(x_32, 0); -x_35 = l_Lean_mkAppN(x_23, x_34); -lean_ctor_set(x_32, 0, x_35); -return x_32; -} -else -{ -lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; -x_36 = lean_ctor_get(x_32, 0); -x_37 = lean_ctor_get(x_32, 1); -lean_inc(x_37); -lean_inc(x_36); -lean_dec(x_32); -x_38 = l_Lean_mkAppN(x_23, x_36); -x_39 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_39, 0, x_38); -lean_ctor_set(x_39, 1, x_37); -return x_39; -} -} -else -{ -uint8_t x_40; -lean_dec(x_23); -x_40 = !lean_is_exclusive(x_32); -if (x_40 == 0) -{ -return x_32; -} -else -{ -lean_object* x_41; lean_object* x_42; lean_object* x_43; -x_41 = lean_ctor_get(x_32, 0); -x_42 = lean_ctor_get(x_32, 1); -lean_inc(x_42); -lean_inc(x_41); -lean_dec(x_32); -x_43 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_43, 0, x_41); -lean_ctor_set(x_43, 1, x_42); -return x_43; -} -} -} -else -{ -uint8_t x_44; -lean_dec(x_13); -lean_dec(x_12); -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_7); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_44 = !lean_is_exclusive(x_22); -if (x_44 == 0) -{ -return x_22; -} -else -{ -lean_object* x_45; lean_object* x_46; lean_object* x_47; -x_45 = lean_ctor_get(x_22, 0); -x_46 = lean_ctor_get(x_22, 1); -lean_inc(x_46); -lean_inc(x_45); -lean_dec(x_22); -x_47 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_47, 0, x_45); -lean_ctor_set(x_47, 1, x_46); -return x_47; -} -} -} -else -{ -lean_object* x_48; -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -lean_inc(x_13); -lean_inc(x_12); -lean_inc(x_11); -lean_inc(x_10); -x_48 = lean_infer_type(x_5, x_10, x_11, x_12, x_13, x_14); -if (lean_obj_tag(x_48) == 0) -{ -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; -x_49 = lean_ctor_get(x_48, 0); -lean_inc(x_49); -x_50 = lean_ctor_get(x_48, 1); -lean_inc(x_50); -lean_dec(x_48); -x_51 = lean_box(0); -lean_inc(x_10); -x_52 = l_Lean_Meta_mkFreshExprSyntheticOpaqueMVar(x_49, x_51, x_10, x_11, x_12, x_13, x_50); -x_53 = lean_ctor_get(x_52, 0); -lean_inc(x_53); -x_54 = lean_ctor_get(x_52, 1); -lean_inc(x_54); -lean_dec(x_52); -x_55 = l_Lean_Expr_mvarId_x21(x_53); -lean_inc(x_13); -lean_inc(x_12); -lean_inc(x_11); -lean_inc(x_10); -lean_inc(x_55); -x_56 = l_Lean_Meta_IndPredBelow_backwardsChaining(x_55, x_4, x_10, x_11, x_12, x_13, x_54); -if (lean_obj_tag(x_56) == 0) -{ -lean_object* x_57; uint8_t x_58; -x_57 = lean_ctor_get(x_56, 0); -lean_inc(x_57); -x_58 = lean_unbox(x_57); -lean_dec(x_57); -if (x_58 == 0) -{ -lean_object* x_59; lean_object* x_60; lean_object* x_61; lean_object* x_62; lean_object* x_63; lean_object* x_64; lean_object* x_65; -lean_dec(x_53); -x_59 = lean_ctor_get(x_56, 1); -lean_inc(x_59); -lean_dec(x_56); -x_60 = lean_alloc_ctor(5, 1, 0); -lean_ctor_set(x_60, 0, x_55); -x_61 = l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__2___closed__2; -x_62 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_62, 0, x_61); -lean_ctor_set(x_62, 1, x_60); -x_63 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__6; -x_64 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_64, 0, x_62); -lean_ctor_set(x_64, 1, x_63); -x_65 = l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__5(x_64, x_9, x_10, x_11, x_12, x_13, x_59); -lean_dec(x_13); -lean_dec(x_12); -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -return x_65; -} -else -{ -uint8_t x_66; -lean_dec(x_55); -lean_dec(x_13); -lean_dec(x_12); -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -x_66 = !lean_is_exclusive(x_56); -if (x_66 == 0) -{ -lean_object* x_67; -x_67 = lean_ctor_get(x_56, 0); -lean_dec(x_67); -lean_ctor_set(x_56, 0, x_53); -return x_56; -} -else -{ -lean_object* x_68; lean_object* x_69; -x_68 = lean_ctor_get(x_56, 1); -lean_inc(x_68); -lean_dec(x_56); -x_69 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_69, 0, x_53); -lean_ctor_set(x_69, 1, x_68); -return x_69; -} -} -} -else -{ -uint8_t x_70; -lean_dec(x_55); -lean_dec(x_53); -lean_dec(x_13); -lean_dec(x_12); -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -x_70 = !lean_is_exclusive(x_56); -if (x_70 == 0) -{ -return x_56; -} -else -{ -lean_object* x_71; lean_object* x_72; lean_object* x_73; -x_71 = lean_ctor_get(x_56, 0); -x_72 = lean_ctor_get(x_56, 1); -lean_inc(x_72); -lean_inc(x_71); -lean_dec(x_56); -x_73 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_73, 0, x_71); -lean_ctor_set(x_73, 1, x_72); -return x_73; -} -} -} -else -{ -uint8_t x_74; -lean_dec(x_13); -lean_dec(x_12); -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_4); -x_74 = !lean_is_exclusive(x_48); -if (x_74 == 0) -{ -return x_48; -} -else -{ -lean_object* x_75; lean_object* x_76; lean_object* x_77; -x_75 = lean_ctor_get(x_48, 0); -x_76 = lean_ctor_get(x_48, 1); -lean_inc(x_76); -lean_inc(x_75); -lean_dec(x_48); -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; -} -} -} -} -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___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, lean_object* x_12) { -_start: -{ -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_dec(x_6); -x_13 = lean_unsigned_to_nat(0u); -x_14 = l_Lean_Expr_getAppNumArgsAux(x_1, x_13); -x_15 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_getFixedPrefix___lambda__2___closed__1; -lean_inc(x_14); -x_16 = lean_mk_array(x_14, x_15); -x_17 = lean_unsigned_to_nat(1u); -x_18 = lean_nat_sub(x_14, x_17); -lean_dec(x_14); -lean_inc(x_1); -x_19 = l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__6(x_2, x_3, x_4, x_5, x_1, x_1, x_16, x_18, x_7, x_8, x_9, x_10, x_11, x_12); -return x_19; -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___lambda__2___closed__1() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string("modified matcher:\n"); -return x_1; -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___lambda__2___closed__2() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___lambda__2___closed__1; -x_2 = l_Lean_stringToMessageData(x_1); -return x_2; -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___lambda__2___closed__3() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string("could not add below discriminant"); -return x_1; -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___lambda__2___closed__4() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___lambda__2___closed__3; -x_2 = l_Lean_stringToMessageData(x_1); -return x_2; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___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_object* x_12, lean_object* x_13) { -_start: -{ -lean_object* x_14; -lean_dec(x_7); -lean_inc(x_12); -lean_inc(x_11); -lean_inc(x_10); -lean_inc(x_9); -lean_inc(x_2); -lean_inc(x_1); -x_14 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow(x_1, x_2, x_8, x_9, x_10, x_11, x_12, x_13); -if (lean_obj_tag(x_14) == 0) -{ -lean_object* x_15; lean_object* x_16; lean_object* x_17; uint8_t x_18; -x_15 = lean_ctor_get(x_14, 0); -lean_inc(x_15); -x_16 = lean_ctor_get(x_14, 1); -lean_inc(x_16); -lean_dec(x_14); -x_17 = l_Lean_Meta_MatcherApp_toExpr(x_2); -x_18 = lean_expr_eqv(x_15, x_17); -lean_dec(x_17); -if (x_18 == 0) -{ -uint8_t x_19; lean_object* x_20; lean_object* x_33; lean_object* x_34; lean_object* x_35; uint8_t x_36; -x_33 = lean_st_ref_get(x_12, x_16); -x_34 = lean_ctor_get(x_33, 0); -lean_inc(x_34); -x_35 = lean_ctor_get(x_34, 3); -lean_inc(x_35); -lean_dec(x_34); -x_36 = lean_ctor_get_uint8(x_35, sizeof(void*)*1); -lean_dec(x_35); -if (x_36 == 0) -{ -lean_object* x_37; uint8_t x_38; -x_37 = lean_ctor_get(x_33, 1); -lean_inc(x_37); -lean_dec(x_33); -x_38 = 0; -x_19 = x_38; -x_20 = x_37; -goto block_32; -} -else -{ -lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; uint8_t x_43; -x_39 = lean_ctor_get(x_33, 1); -lean_inc(x_39); -lean_dec(x_33); -lean_inc(x_6); -x_40 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__12(x_6, x_8, x_9, x_10, x_11, x_12, x_39); -x_41 = lean_ctor_get(x_40, 0); -lean_inc(x_41); -x_42 = lean_ctor_get(x_40, 1); -lean_inc(x_42); -lean_dec(x_40); -x_43 = lean_unbox(x_41); -lean_dec(x_41); -x_19 = x_43; -x_20 = x_42; -goto block_32; -} -block_32: -{ -if (x_19 == 0) -{ -lean_object* x_21; lean_object* x_22; -lean_dec(x_6); -x_21 = lean_box(0); -x_22 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___lambda__1(x_15, x_3, x_4, x_1, x_5, x_21, x_8, x_9, x_10, x_11, x_12, x_20); -return x_22; -} -else -{ -lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; -lean_inc(x_15); -x_23 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_23, 0, x_15); -x_24 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___lambda__2___closed__2; -x_25 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_25, 0, x_24); -lean_ctor_set(x_25, 1, x_23); -x_26 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__6; -x_27 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_27, 0, x_25); -lean_ctor_set(x_27, 1, x_26); -x_28 = l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11(x_6, x_27, x_8, x_9, x_10, x_11, x_12, x_20); -x_29 = lean_ctor_get(x_28, 0); -lean_inc(x_29); -x_30 = lean_ctor_get(x_28, 1); -lean_inc(x_30); -lean_dec(x_28); -x_31 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___lambda__1(x_15, x_3, x_4, x_1, x_5, x_29, x_8, x_9, x_10, x_11, x_12, x_30); -return x_31; -} -} -} -else -{ -lean_object* x_44; lean_object* x_45; -lean_dec(x_15); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_1); -x_44 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___lambda__2___closed__4; -x_45 = l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__5(x_44, x_8, x_9, x_10, x_11, x_12, x_16); -lean_dec(x_12); -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -return x_45; -} -} -else -{ -uint8_t x_46; -lean_dec(x_12); -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_46 = !lean_is_exclusive(x_14); -if (x_46 == 0) -{ -return x_14; -} -else -{ -lean_object* x_47; lean_object* x_48; lean_object* x_49; -x_47 = lean_ctor_get(x_14, 0); -x_48 = lean_ctor_get(x_14, 1); -lean_inc(x_48); -lean_inc(x_47); -lean_dec(x_14); -x_49 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_49, 0, x_47); -lean_ctor_set(x_49, 1, x_48); -return x_49; -} -} -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___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_object* x_10, lean_object* x_11, lean_object* x_12) { -_start: -{ -lean_object* x_13; lean_object* x_14; -x_13 = lean_expr_instantiate1(x_1, x_6); -lean_inc(x_11); -lean_inc(x_10); -lean_inc(x_9); -lean_inc(x_8); -x_14 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop(x_2, x_3, x_4, x_5, x_13, x_7, x_8, x_9, x_10, x_11, x_12); -if (lean_obj_tag(x_14) == 0) -{ -lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; uint8_t x_19; uint8_t x_20; lean_object* x_21; -x_15 = lean_ctor_get(x_14, 0); -lean_inc(x_15); -x_16 = lean_ctor_get(x_14, 1); -lean_inc(x_16); -lean_dec(x_14); -x_17 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__4; -x_18 = lean_array_push(x_17, x_6); -x_19 = 0; -x_20 = 1; -x_21 = l_Lean_Meta_mkLambdaFVars(x_18, x_15, x_19, x_20, x_8, x_9, x_10, x_11, x_16); -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -return x_21; -} -else -{ -uint8_t x_22; -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_6); -x_22 = !lean_is_exclusive(x_14); -if (x_22 == 0) -{ -return x_14; -} -else -{ -lean_object* x_23; lean_object* x_24; lean_object* x_25; -x_23 = lean_ctor_get(x_14, 0); -x_24 = lean_ctor_get(x_14, 1); -lean_inc(x_24); -lean_inc(x_23); -lean_dec(x_14); -x_25 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_25, 0, x_23); -lean_ctor_set(x_25, 1, x_24); -return x_25; -} -} -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___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, lean_object* x_11, lean_object* x_12) { -_start: -{ -lean_object* x_13; lean_object* x_14; -x_13 = lean_expr_instantiate1(x_1, x_6); -lean_inc(x_11); -lean_inc(x_10); -lean_inc(x_9); -lean_inc(x_8); -x_14 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop(x_2, x_3, x_4, x_5, x_13, x_7, x_8, x_9, x_10, x_11, x_12); -if (lean_obj_tag(x_14) == 0) -{ -lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; uint8_t x_19; uint8_t x_20; lean_object* x_21; -x_15 = lean_ctor_get(x_14, 0); -lean_inc(x_15); -x_16 = lean_ctor_get(x_14, 1); -lean_inc(x_16); -lean_dec(x_14); -x_17 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__4; -x_18 = lean_array_push(x_17, x_6); -x_19 = 0; -x_20 = 1; -x_21 = l_Lean_Meta_mkForallFVars(x_18, x_15, x_19, x_20, x_8, x_9, x_10, x_11, x_16); -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -return x_21; -} -else -{ -uint8_t x_22; -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_6); -x_22 = !lean_is_exclusive(x_14); -if (x_22 == 0) -{ -return x_14; -} -else -{ -lean_object* x_23; lean_object* x_24; lean_object* x_25; -x_23 = lean_ctor_get(x_14, 0); -x_24 = lean_ctor_get(x_14, 1); -lean_inc(x_24); -lean_inc(x_23); -lean_dec(x_14); -x_25 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_25, 0, x_23); -lean_ctor_set(x_25, 1, x_24); -return x_25; -} -} -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___closed__1() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string("matcherApp before adding below transformation:\n"); -return x_1; -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___closed__2() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___closed__1; -x_2 = l_Lean_stringToMessageData(x_1); -return x_2; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop(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: -{ -switch (lean_obj_tag(x_5)) { -case 5: -{ -lean_object* x_12; lean_object* x_13; -lean_inc(x_5); -x_12 = l_Lean_Meta_matchMatcherApp_x3f___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__1(x_5, x_6, x_7, x_8, x_9, x_10, x_11); -x_13 = lean_ctor_get(x_12, 0); -lean_inc(x_13); -if (lean_obj_tag(x_13) == 0) -{ -lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; -x_14 = lean_ctor_get(x_12, 1); -lean_inc(x_14); -lean_dec(x_12); -x_15 = lean_unsigned_to_nat(0u); -x_16 = l_Lean_Expr_getAppNumArgsAux(x_5, x_15); -x_17 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_getFixedPrefix___lambda__2___closed__1; -lean_inc(x_16); -x_18 = lean_mk_array(x_16, x_17); -x_19 = lean_unsigned_to_nat(1u); -x_20 = lean_nat_sub(x_16, x_19); -lean_dec(x_16); -lean_inc(x_5); -x_21 = l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__2(x_1, x_2, x_3, x_4, x_5, x_5, x_18, x_20, x_6, x_7, x_8, x_9, x_10, x_14); -return x_21; -} -else -{ -lean_object* x_22; lean_object* x_23; uint8_t x_24; -x_22 = lean_ctor_get(x_12, 1); -lean_inc(x_22); -lean_dec(x_12); -x_23 = lean_ctor_get(x_13, 0); -lean_inc(x_23); -lean_dec(x_13); -lean_inc(x_5); -lean_inc(x_1); -x_24 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_recArgHasLooseBVarsAt(x_1, x_2, x_5); -if (x_24 == 0) -{ -lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; -lean_dec(x_23); -x_25 = lean_unsigned_to_nat(0u); -x_26 = l_Lean_Expr_getAppNumArgsAux(x_5, x_25); -x_27 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_getFixedPrefix___lambda__2___closed__1; -lean_inc(x_26); -x_28 = lean_mk_array(x_26, x_27); -x_29 = lean_unsigned_to_nat(1u); -x_30 = lean_nat_sub(x_26, x_29); -lean_dec(x_26); -lean_inc(x_5); -x_31 = l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__4(x_1, x_2, x_3, x_4, x_5, x_5, x_28, x_30, x_6, x_7, x_8, x_9, x_10, x_22); -return x_31; -} -else -{ -lean_object* x_32; uint8_t x_33; lean_object* x_34; lean_object* x_48; lean_object* x_49; lean_object* x_50; uint8_t x_51; -lean_dec(x_5); -x_32 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___closed__6; -x_48 = lean_st_ref_get(x_10, x_22); -x_49 = lean_ctor_get(x_48, 0); -lean_inc(x_49); -x_50 = lean_ctor_get(x_49, 3); -lean_inc(x_50); -lean_dec(x_49); -x_51 = lean_ctor_get_uint8(x_50, sizeof(void*)*1); -lean_dec(x_50); -if (x_51 == 0) -{ -lean_object* x_52; uint8_t x_53; -x_52 = lean_ctor_get(x_48, 1); -lean_inc(x_52); -lean_dec(x_48); -x_53 = 0; -x_33 = x_53; -x_34 = x_52; -goto block_47; -} -else -{ -lean_object* x_54; lean_object* x_55; lean_object* x_56; lean_object* x_57; uint8_t x_58; -x_54 = lean_ctor_get(x_48, 1); -lean_inc(x_54); -lean_dec(x_48); -x_55 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__12(x_32, x_6, x_7, x_8, x_9, x_10, x_54); -x_56 = lean_ctor_get(x_55, 0); -lean_inc(x_56); -x_57 = lean_ctor_get(x_55, 1); -lean_inc(x_57); -lean_dec(x_55); -x_58 = lean_unbox(x_56); -lean_dec(x_56); -x_33 = x_58; -x_34 = x_57; -goto block_47; -} -block_47: -{ -if (x_33 == 0) -{ -lean_object* x_35; lean_object* x_36; -x_35 = lean_box(0); -x_36 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___lambda__2(x_3, x_23, x_1, x_2, x_4, x_32, x_35, x_6, x_7, x_8, x_9, x_10, x_34); -return x_36; -} -else -{ -lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; -lean_inc(x_23); -x_37 = l_Lean_Meta_MatcherApp_toExpr(x_23); -x_38 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_38, 0, x_37); -x_39 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___closed__2; -x_40 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_40, 0, x_39); -lean_ctor_set(x_40, 1, x_38); -x_41 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__6; -x_42 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_42, 0, x_40); -lean_ctor_set(x_42, 1, x_41); -x_43 = l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11(x_32, x_42, x_6, x_7, x_8, x_9, x_10, x_34); -x_44 = lean_ctor_get(x_43, 0); -lean_inc(x_44); -x_45 = lean_ctor_get(x_43, 1); -lean_inc(x_45); -lean_dec(x_43); -x_46 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___lambda__2(x_3, x_23, x_1, x_2, x_4, x_32, x_44, x_6, x_7, x_8, x_9, x_10, x_45); -return x_46; -} -} -} -} -} -case 6: -{ -lean_object* x_59; lean_object* x_60; lean_object* x_61; uint64_t x_62; lean_object* x_63; -x_59 = lean_ctor_get(x_5, 0); -lean_inc(x_59); -x_60 = lean_ctor_get(x_5, 1); -lean_inc(x_60); -x_61 = lean_ctor_get(x_5, 2); -lean_inc(x_61); -x_62 = lean_ctor_get_uint64(x_5, sizeof(void*)*3); -lean_dec(x_5); -lean_inc(x_10); -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -lean_inc(x_6); -lean_inc(x_4); -lean_inc(x_3); -lean_inc(x_2); -lean_inc(x_1); -x_63 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop(x_1, x_2, x_3, x_4, x_60, x_6, x_7, x_8, x_9, x_10, x_11); -if (lean_obj_tag(x_63) == 0) -{ -lean_object* x_64; lean_object* x_65; uint8_t x_66; lean_object* x_67; lean_object* x_68; -x_64 = lean_ctor_get(x_63, 0); -lean_inc(x_64); -x_65 = lean_ctor_get(x_63, 1); -lean_inc(x_65); -lean_dec(x_63); -x_66 = (uint8_t)((x_62 << 24) >> 61); -x_67 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___lambda__3___boxed), 12, 5); -lean_closure_set(x_67, 0, x_61); -lean_closure_set(x_67, 1, x_1); -lean_closure_set(x_67, 2, x_2); -lean_closure_set(x_67, 3, x_3); -lean_closure_set(x_67, 4, x_4); -x_68 = l_Lean_Meta_withLocalDecl___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__15___rarg(x_59, x_66, x_64, x_67, x_6, x_7, x_8, x_9, x_10, x_65); -return x_68; -} -else -{ -uint8_t x_69; -lean_dec(x_61); -lean_dec(x_59); -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_2); -lean_dec(x_1); -x_69 = !lean_is_exclusive(x_63); -if (x_69 == 0) -{ -return x_63; -} -else -{ -lean_object* x_70; lean_object* x_71; lean_object* x_72; -x_70 = lean_ctor_get(x_63, 0); -x_71 = lean_ctor_get(x_63, 1); -lean_inc(x_71); -lean_inc(x_70); -lean_dec(x_63); -x_72 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_72, 0, x_70); -lean_ctor_set(x_72, 1, x_71); -return x_72; -} -} -} -case 7: -{ -lean_object* x_73; lean_object* x_74; lean_object* x_75; uint64_t x_76; lean_object* x_77; -x_73 = lean_ctor_get(x_5, 0); -lean_inc(x_73); -x_74 = lean_ctor_get(x_5, 1); -lean_inc(x_74); -x_75 = lean_ctor_get(x_5, 2); -lean_inc(x_75); -x_76 = lean_ctor_get_uint64(x_5, sizeof(void*)*3); -lean_dec(x_5); -lean_inc(x_10); -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -lean_inc(x_6); -lean_inc(x_4); -lean_inc(x_3); -lean_inc(x_2); -lean_inc(x_1); -x_77 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop(x_1, x_2, x_3, x_4, x_74, x_6, x_7, x_8, x_9, x_10, x_11); -if (lean_obj_tag(x_77) == 0) -{ -lean_object* x_78; lean_object* x_79; uint8_t x_80; lean_object* x_81; lean_object* x_82; -x_78 = lean_ctor_get(x_77, 0); -lean_inc(x_78); -x_79 = lean_ctor_get(x_77, 1); -lean_inc(x_79); -lean_dec(x_77); -x_80 = (uint8_t)((x_76 << 24) >> 61); -x_81 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___lambda__4___boxed), 12, 5); -lean_closure_set(x_81, 0, x_75); -lean_closure_set(x_81, 1, x_1); -lean_closure_set(x_81, 2, x_2); -lean_closure_set(x_81, 3, x_3); -lean_closure_set(x_81, 4, x_4); -x_82 = l_Lean_Meta_withLocalDecl___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__15___rarg(x_73, x_80, x_78, x_81, x_6, x_7, x_8, x_9, x_10, x_79); -return x_82; -} -else -{ -uint8_t x_83; -lean_dec(x_75); -lean_dec(x_73); -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_2); -lean_dec(x_1); -x_83 = !lean_is_exclusive(x_77); -if (x_83 == 0) -{ -return x_77; -} -else -{ -lean_object* x_84; lean_object* x_85; lean_object* x_86; -x_84 = lean_ctor_get(x_77, 0); -x_85 = lean_ctor_get(x_77, 1); -lean_inc(x_85); -lean_inc(x_84); -lean_dec(x_77); -x_86 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_86, 0, x_84); -lean_ctor_set(x_86, 1, x_85); -return x_86; -} -} -} -case 8: -{ -lean_object* x_87; lean_object* x_88; lean_object* x_89; lean_object* x_90; lean_object* x_91; -x_87 = lean_ctor_get(x_5, 0); -lean_inc(x_87); -x_88 = lean_ctor_get(x_5, 1); -lean_inc(x_88); -x_89 = lean_ctor_get(x_5, 2); -lean_inc(x_89); -x_90 = lean_ctor_get(x_5, 3); -lean_inc(x_90); -lean_dec(x_5); -lean_inc(x_10); -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -lean_inc(x_6); -lean_inc(x_4); -lean_inc(x_3); -lean_inc(x_2); -lean_inc(x_1); -x_91 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop(x_1, x_2, x_3, x_4, x_88, x_6, x_7, x_8, x_9, x_10, x_11); -if (lean_obj_tag(x_91) == 0) -{ -lean_object* x_92; lean_object* x_93; lean_object* x_94; -x_92 = lean_ctor_get(x_91, 0); -lean_inc(x_92); -x_93 = lean_ctor_get(x_91, 1); -lean_inc(x_93); -lean_dec(x_91); -lean_inc(x_10); -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -lean_inc(x_6); -lean_inc(x_4); -lean_inc(x_3); -lean_inc(x_2); -lean_inc(x_1); -x_94 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop(x_1, x_2, x_3, x_4, x_89, x_6, x_7, x_8, x_9, x_10, x_93); -if (lean_obj_tag(x_94) == 0) -{ -lean_object* x_95; lean_object* x_96; lean_object* x_97; lean_object* x_98; -x_95 = lean_ctor_get(x_94, 0); -lean_inc(x_95); -x_96 = lean_ctor_get(x_94, 1); -lean_inc(x_96); -lean_dec(x_94); -x_97 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___lambda__3___boxed), 12, 5); -lean_closure_set(x_97, 0, x_90); -lean_closure_set(x_97, 1, x_1); -lean_closure_set(x_97, 2, x_2); -lean_closure_set(x_97, 3, x_3); -lean_closure_set(x_97, 4, x_4); -x_98 = l_Lean_Meta_withLetDecl___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__16___rarg(x_87, x_92, x_95, x_97, x_6, x_7, x_8, x_9, x_10, x_96); -return x_98; -} -else -{ -uint8_t x_99; -lean_dec(x_92); -lean_dec(x_90); -lean_dec(x_87); -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_2); -lean_dec(x_1); -x_99 = !lean_is_exclusive(x_94); -if (x_99 == 0) -{ -return x_94; -} -else -{ -lean_object* x_100; lean_object* x_101; lean_object* x_102; -x_100 = lean_ctor_get(x_94, 0); -x_101 = lean_ctor_get(x_94, 1); -lean_inc(x_101); -lean_inc(x_100); -lean_dec(x_94); -x_102 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_102, 0, x_100); -lean_ctor_set(x_102, 1, x_101); -return x_102; -} -} -} -else -{ -uint8_t x_103; -lean_dec(x_90); -lean_dec(x_89); -lean_dec(x_87); -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_2); -lean_dec(x_1); -x_103 = !lean_is_exclusive(x_91); -if (x_103 == 0) -{ -return x_91; -} -else -{ -lean_object* x_104; lean_object* x_105; lean_object* x_106; -x_104 = lean_ctor_get(x_91, 0); -x_105 = lean_ctor_get(x_91, 1); -lean_inc(x_105); -lean_inc(x_104); -lean_dec(x_91); -x_106 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_106, 0, x_104); -lean_ctor_set(x_106, 1, x_105); -return x_106; -} -} -} -case 10: -{ -lean_object* x_107; lean_object* x_108; lean_object* x_109; -x_107 = lean_ctor_get(x_5, 0); -lean_inc(x_107); -x_108 = lean_ctor_get(x_5, 1); -lean_inc(x_108); -lean_dec(x_5); -x_109 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop(x_1, x_2, x_3, x_4, x_108, x_6, x_7, x_8, x_9, x_10, x_11); -if (lean_obj_tag(x_109) == 0) -{ -uint8_t x_110; -x_110 = !lean_is_exclusive(x_109); -if (x_110 == 0) -{ -lean_object* x_111; lean_object* x_112; -x_111 = lean_ctor_get(x_109, 0); -x_112 = l_Lean_mkMData(x_107, x_111); -lean_ctor_set(x_109, 0, x_112); -return x_109; -} -else -{ -lean_object* x_113; lean_object* x_114; lean_object* x_115; lean_object* x_116; -x_113 = lean_ctor_get(x_109, 0); -x_114 = lean_ctor_get(x_109, 1); -lean_inc(x_114); -lean_inc(x_113); -lean_dec(x_109); -x_115 = l_Lean_mkMData(x_107, x_113); -x_116 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_116, 0, x_115); -lean_ctor_set(x_116, 1, x_114); -return x_116; -} -} -else -{ -uint8_t x_117; -lean_dec(x_107); -x_117 = !lean_is_exclusive(x_109); -if (x_117 == 0) -{ -return x_109; -} -else -{ -lean_object* x_118; lean_object* x_119; lean_object* x_120; -x_118 = lean_ctor_get(x_109, 0); -x_119 = lean_ctor_get(x_109, 1); -lean_inc(x_119); -lean_inc(x_118); -lean_dec(x_109); -x_120 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_120, 0, x_118); -lean_ctor_set(x_120, 1, x_119); -return x_120; -} -} -} -case 11: -{ -lean_object* x_121; lean_object* x_122; lean_object* x_123; lean_object* x_124; -x_121 = lean_ctor_get(x_5, 0); -lean_inc(x_121); -x_122 = lean_ctor_get(x_5, 1); -lean_inc(x_122); -x_123 = lean_ctor_get(x_5, 2); -lean_inc(x_123); -lean_dec(x_5); -x_124 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop(x_1, x_2, x_3, x_4, x_123, x_6, x_7, x_8, x_9, x_10, x_11); -if (lean_obj_tag(x_124) == 0) -{ -uint8_t x_125; -x_125 = !lean_is_exclusive(x_124); -if (x_125 == 0) -{ -lean_object* x_126; lean_object* x_127; -x_126 = lean_ctor_get(x_124, 0); -x_127 = l_Lean_mkProj(x_121, x_122, x_126); -lean_ctor_set(x_124, 0, x_127); -return x_124; -} -else -{ -lean_object* x_128; lean_object* x_129; lean_object* x_130; lean_object* x_131; -x_128 = lean_ctor_get(x_124, 0); -x_129 = lean_ctor_get(x_124, 1); -lean_inc(x_129); -lean_inc(x_128); -lean_dec(x_124); -x_130 = l_Lean_mkProj(x_121, x_122, x_128); -x_131 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_131, 0, x_130); -lean_ctor_set(x_131, 1, x_129); -return x_131; -} -} -else -{ -uint8_t x_132; -lean_dec(x_122); -lean_dec(x_121); -x_132 = !lean_is_exclusive(x_124); -if (x_132 == 0) -{ -return x_124; -} -else -{ -lean_object* x_133; lean_object* x_134; lean_object* x_135; -x_133 = lean_ctor_get(x_124, 0); -x_134 = lean_ctor_get(x_124, 1); -lean_inc(x_134); -lean_inc(x_133); -lean_dec(x_124); -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; -} -} -} -default: -{ -lean_object* x_136; -lean_dec(x_6); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -x_136 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_ensureNoRecFn(x_1, x_5, x_7, x_8, x_9, x_10, x_11); -return x_136; -} -} -} -} -lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___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) { -_start: -{ -size_t x_14; size_t x_15; lean_object* x_16; -x_14 = lean_unbox_usize(x_5); -lean_dec(x_5); -x_15 = lean_unbox_usize(x_6); -lean_dec(x_6); -x_16 = l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__1(x_1, x_2, x_3, x_4, x_14, x_15, x_7, x_8, x_9, x_10, x_11, x_12, x_13); -return x_16; -} -} -lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___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) { -_start: -{ -size_t x_14; size_t x_15; lean_object* x_16; -x_14 = lean_unbox_usize(x_5); -lean_dec(x_5); -x_15 = lean_unbox_usize(x_6); -lean_dec(x_6); -x_16 = l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__3(x_1, x_2, x_3, x_4, x_14, x_15, x_7, x_8, x_9, x_10, x_11, x_12, x_13); -return x_16; -} -} -lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__5___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: -{ -size_t x_14; size_t x_15; lean_object* x_16; -x_14 = lean_unbox_usize(x_5); -lean_dec(x_5); -x_15 = lean_unbox_usize(x_6); -lean_dec(x_6); -x_16 = l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__5(x_1, x_2, x_3, x_4, x_14, x_15, x_7, x_8, x_9, x_10, x_11, x_12, x_13); -return x_16; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___lambda__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) { -_start: -{ -lean_object* x_13; -x_13 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___lambda__3(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_12); -lean_dec(x_1); -return x_13; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___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, lean_object* x_11, lean_object* x_12) { -_start: -{ -lean_object* x_13; -x_13 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___lambda__4(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_12); -lean_dec(x_1); -return x_13; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps(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; lean_object* x_13; lean_object* x_14; -x_11 = lean_ctor_get(x_8, 0); -lean_inc(x_11); -x_12 = l_Lean_Meta_IndPredBelow_maxBackwardChainingDepth; -x_13 = l_Lean_Option_get___at_Lean_initFn____x40_Lean_Util_PPExt___hyg_218____spec__1(x_11, x_12); -lean_dec(x_11); -x_14 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop(x_1, x_2, x_3, x_13, x_4, x_5, x_6, x_7, x_8, x_9, x_10); -return x_14; -} -} -lean_object* l_Lean_Meta_forallBoundedTelescope___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___spec__1___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9) { -_start: -{ -lean_object* x_10; lean_object* x_11; -x_10 = lean_alloc_closure((void*)(l_Lean_Meta_lambdaTelescope___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__13___rarg___lambda__1), 9, 2); -lean_closure_set(x_10, 0, x_3); -lean_closure_set(x_10, 1, x_4); -x_11 = l___private_Lean_Meta_Basic_0__Lean_Meta_forallTelescopeReducingAux___rarg(x_1, x_2, x_10, x_5, x_6, x_7, x_8, x_9); -if (lean_obj_tag(x_11) == 0) -{ -uint8_t x_12; -x_12 = !lean_is_exclusive(x_11); -if (x_12 == 0) -{ -return x_11; -} -else -{ -lean_object* x_13; lean_object* x_14; lean_object* x_15; -x_13 = lean_ctor_get(x_11, 0); -x_14 = lean_ctor_get(x_11, 1); -lean_inc(x_14); -lean_inc(x_13); -lean_dec(x_11); -x_15 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_15, 0, x_13); -lean_ctor_set(x_15, 1, x_14); -return x_15; -} -} -else -{ -uint8_t x_16; -x_16 = !lean_is_exclusive(x_11); -if (x_16 == 0) -{ -return x_11; -} -else -{ -lean_object* x_17; lean_object* x_18; lean_object* 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_alloc_ctor(1, 2, 0); -lean_ctor_set(x_19, 0, x_17); -lean_ctor_set(x_19, 1, x_18); -return x_19; -} -} -} -} -lean_object* l_Lean_Meta_forallBoundedTelescope___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___spec__1(lean_object* x_1) { -_start: -{ -lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l_Lean_Meta_forallBoundedTelescope___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___spec__1___rarg), 9, 0); -return x_2; -} -} -lean_object* l_Array_foldlMUnsafe_fold___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___spec__2(lean_object* x_1, lean_object* x_2, lean_object* x_3, size_t x_4, size_t x_5, lean_object* x_6) { -_start: -{ -uint8_t x_7; -x_7 = x_4 == x_5; -if (x_7 == 0) -{ -lean_object* x_8; uint8_t x_9; size_t x_10; size_t x_11; -x_8 = lean_array_uget(x_3, x_4); -x_9 = lean_expr_eqv(x_8, x_2); -x_10 = 1; -x_11 = x_4 + x_10; -if (x_9 == 0) -{ -lean_object* x_12; uint8_t x_13; -x_12 = lean_ctor_get(x_1, 7); -x_13 = l_Array_contains___at_Lean_Meta_getElimInfo___spec__4(x_12, x_8); -if (x_13 == 0) -{ -lean_object* x_14; -x_14 = lean_array_push(x_6, x_8); -x_4 = x_11; -x_6 = x_14; -goto _start; -} -else -{ -lean_dec(x_8); -x_4 = x_11; -goto _start; -} -} -else -{ -lean_dec(x_8); -x_4 = x_11; -goto _start; -} -} -else -{ -return x_6; -} -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__1___closed__1() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = lean_unsigned_to_nat(2u); -x_2 = lean_mk_empty_array_with_capacity(x_1); -return x_2; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___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, lean_object* x_12, lean_object* x_13, lean_object* x_14, lean_object* x_15) { -_start: -{ -lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; -x_16 = l_Lean_instInhabitedExpr; -x_17 = lean_unsigned_to_nat(0u); -x_18 = lean_array_get(x_16, x_8, x_17); -lean_inc(x_14); -lean_inc(x_13); -lean_inc(x_12); -lean_inc(x_11); -lean_inc(x_18); -x_19 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop(x_1, x_2, x_18, x_3, x_10, x_11, x_12, x_13, x_14, x_15); -if (lean_obj_tag(x_19) == 0) -{ -lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; uint8_t x_27; uint8_t x_28; lean_object* x_29; -x_20 = lean_ctor_get(x_19, 0); -lean_inc(x_20); -x_21 = lean_ctor_get(x_19, 1); -lean_inc(x_21); -lean_dec(x_19); -x_22 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__1___closed__1; -x_23 = lean_array_push(x_22, x_4); -x_24 = lean_array_push(x_23, x_18); -x_25 = l_Array_append___rarg(x_5, x_24); -lean_inc(x_6); -x_26 = l_Array_append___rarg(x_25, x_6); -x_27 = 0; -x_28 = 1; -x_29 = l_Lean_Meta_mkLambdaFVars(x_26, x_20, x_27, x_28, x_11, x_12, x_13, x_14, x_21); -lean_dec(x_14); -lean_dec(x_13); -lean_dec(x_12); -if (lean_obj_tag(x_29) == 0) -{ -uint8_t x_30; -x_30 = !lean_is_exclusive(x_29); -if (x_30 == 0) -{ -lean_object* x_31; lean_object* x_32; lean_object* x_33; -x_31 = lean_ctor_get(x_29, 0); -x_32 = l_Lean_mkApp(x_7, x_31); -x_33 = l_Lean_mkAppN(x_32, x_6); -lean_ctor_set(x_29, 0, x_33); -return x_29; -} -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_29, 0); -x_35 = lean_ctor_get(x_29, 1); -lean_inc(x_35); -lean_inc(x_34); -lean_dec(x_29); -x_36 = l_Lean_mkApp(x_7, x_34); -x_37 = l_Lean_mkAppN(x_36, x_6); -x_38 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_38, 0, x_37); -lean_ctor_set(x_38, 1, x_35); -return x_38; -} -} -else -{ -uint8_t x_39; -lean_dec(x_7); -lean_dec(x_6); -x_39 = !lean_is_exclusive(x_29); -if (x_39 == 0) -{ -return x_29; -} -else -{ -lean_object* x_40; lean_object* x_41; lean_object* x_42; -x_40 = lean_ctor_get(x_29, 0); -x_41 = lean_ctor_get(x_29, 1); -lean_inc(x_41); -lean_inc(x_40); -lean_dec(x_29); -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 -{ -uint8_t x_43; -lean_dec(x_18); -lean_dec(x_14); -lean_dec(x_13); -lean_dec(x_12); -lean_dec(x_11); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -x_43 = !lean_is_exclusive(x_19); -if (x_43 == 0) -{ -return x_19; -} -else -{ -lean_object* x_44; lean_object* x_45; lean_object* x_46; -x_44 = lean_ctor_get(x_19, 0); -x_45 = lean_ctor_get(x_19, 1); -lean_inc(x_45); -lean_inc(x_44); -lean_dec(x_19); -x_46 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_46, 0, x_44); -lean_ctor_set(x_46, 1, x_45); -return x_46; -} -} -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___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_object* x_12, lean_object* x_13, lean_object* x_14, lean_object* x_15, lean_object* x_16) { -_start: -{ -lean_object* x_17; lean_object* x_18; -x_17 = lean_unsigned_to_nat(0u); -lean_inc(x_15); -lean_inc(x_14); -lean_inc(x_13); -lean_inc(x_12); -x_18 = l___private_Lean_Meta_Basic_0__Lean_Meta_instantiateForallAux(x_1, x_17, x_2, x_12, x_13, x_14, x_15, x_16); -if (lean_obj_tag(x_18) == 0) -{ -lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; -x_19 = lean_ctor_get(x_18, 0); -lean_inc(x_19); -x_20 = lean_ctor_get(x_18, 1); -lean_inc(x_20); -lean_dec(x_18); -x_21 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__4; -lean_inc(x_3); -x_22 = lean_array_push(x_21, x_3); -lean_inc(x_15); -lean_inc(x_14); -lean_inc(x_13); -lean_inc(x_12); -x_23 = l___private_Lean_Meta_Basic_0__Lean_Meta_instantiateForallAux(x_22, x_17, x_19, x_12, x_13, x_14, x_15, x_20); -lean_dec(x_22); -if (lean_obj_tag(x_23) == 0) -{ -lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; -x_24 = lean_ctor_get(x_23, 0); -lean_inc(x_24); -x_25 = lean_ctor_get(x_23, 1); -lean_inc(x_25); -lean_dec(x_23); -x_26 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__1___boxed), 15, 7); -lean_closure_set(x_26, 0, x_4); -lean_closure_set(x_26, 1, x_5); -lean_closure_set(x_26, 2, x_6); -lean_closure_set(x_26, 3, x_3); -lean_closure_set(x_26, 4, x_1); -lean_closure_set(x_26, 5, x_7); -lean_closure_set(x_26, 6, x_8); -x_27 = l_Lean_Meta_forallBoundedTelescope___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___spec__1___rarg(x_24, x_9, x_26, x_11, x_12, x_13, x_14, x_15, x_25); -return x_27; -} -else -{ -uint8_t x_28; -lean_dec(x_15); -lean_dec(x_14); -lean_dec(x_13); -lean_dec(x_12); -lean_dec(x_11); -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_23); -if (x_28 == 0) -{ -return x_23; -} -else -{ -lean_object* x_29; lean_object* x_30; lean_object* x_31; -x_29 = lean_ctor_get(x_23, 0); -x_30 = lean_ctor_get(x_23, 1); -lean_inc(x_30); -lean_inc(x_29); -lean_dec(x_23); -x_31 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_31, 0, x_29); -lean_ctor_set(x_31, 1, x_30); -return x_31; -} -} -} -else -{ -uint8_t x_32; -lean_dec(x_15); -lean_dec(x_14); -lean_dec(x_13); -lean_dec(x_12); -lean_dec(x_11); -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_32 = !lean_is_exclusive(x_18); -if (x_32 == 0) -{ -return x_18; -} -else -{ -lean_object* x_33; lean_object* x_34; lean_object* x_35; -x_33 = lean_ctor_get(x_18, 0); -x_34 = lean_ctor_get(x_18, 1); -lean_inc(x_34); -lean_inc(x_33); -lean_dec(x_18); -x_35 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_35, 0, x_33); -lean_ctor_set(x_35, 1, x_34); -return x_35; -} -} -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__3___closed__1() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string("FType: "); -return x_1; -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__3___closed__2() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__3___closed__1; -x_2 = l_Lean_stringToMessageData(x_1); -return x_2; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___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_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, lean_object* x_17) { -_start: -{ -lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; -lean_dec(x_11); -x_18 = l_Lean_instInhabitedExpr; -x_19 = lean_unsigned_to_nat(0u); -x_20 = lean_array_get(x_18, x_10, x_19); -lean_dec(x_10); -lean_inc(x_16); -lean_inc(x_15); -lean_inc(x_14); -lean_inc(x_13); -x_21 = lean_infer_type(x_20, x_13, x_14, x_15, x_16, x_17); -if (lean_obj_tag(x_21) == 0) -{ -lean_object* x_22; lean_object* x_23; uint8_t x_24; lean_object* x_25; lean_object* x_38; lean_object* x_39; lean_object* x_40; uint8_t x_41; -x_22 = lean_ctor_get(x_21, 0); -lean_inc(x_22); -x_23 = lean_ctor_get(x_21, 1); -lean_inc(x_23); -lean_dec(x_21); -x_38 = lean_st_ref_get(x_16, x_23); -x_39 = lean_ctor_get(x_38, 0); -lean_inc(x_39); -x_40 = lean_ctor_get(x_39, 3); -lean_inc(x_40); -lean_dec(x_39); -x_41 = lean_ctor_get_uint8(x_40, sizeof(void*)*1); -lean_dec(x_40); -if (x_41 == 0) -{ -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 = 0; -x_24 = x_43; -x_25 = x_42; -goto block_37; -} -else -{ -lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; uint8_t x_48; -x_44 = lean_ctor_get(x_38, 1); -lean_inc(x_44); -lean_dec(x_38); -lean_inc(x_9); -x_45 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__12(x_9, x_12, x_13, x_14, x_15, x_16, x_44); -x_46 = lean_ctor_get(x_45, 0); -lean_inc(x_46); -x_47 = lean_ctor_get(x_45, 1); -lean_inc(x_47); -lean_dec(x_45); -x_48 = lean_unbox(x_46); -lean_dec(x_46); -x_24 = x_48; -x_25 = x_47; -goto block_37; -} -block_37: -{ -if (x_24 == 0) -{ -lean_object* x_26; lean_object* x_27; -lean_dec(x_9); -x_26 = lean_box(0); -x_27 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__2(x_1, x_22, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_26, x_12, x_13, x_14, x_15, x_16, x_25); -return x_27; -} -else -{ -lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; -lean_inc(x_22); -x_28 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_28, 0, x_22); -x_29 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__3___closed__2; -x_30 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_30, 0, x_29); -lean_ctor_set(x_30, 1, x_28); -x_31 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__6; -x_32 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_32, 0, x_30); -lean_ctor_set(x_32, 1, x_31); -x_33 = l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11(x_9, x_32, x_12, x_13, x_14, x_15, x_16, x_25); -x_34 = lean_ctor_get(x_33, 0); -lean_inc(x_34); -x_35 = lean_ctor_get(x_33, 1); -lean_inc(x_35); -lean_dec(x_33); -x_36 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__2(x_1, x_22, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_34, x_12, x_13, x_14, x_15, x_16, x_35); -lean_dec(x_34); -return x_36; -} -} -} -else -{ -uint8_t x_49; -lean_dec(x_16); -lean_dec(x_15); -lean_dec(x_14); -lean_dec(x_13); -lean_dec(x_12); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_49 = !lean_is_exclusive(x_21); -if (x_49 == 0) -{ -return x_21; -} -else -{ -lean_object* x_50; lean_object* x_51; lean_object* x_52; -x_50 = lean_ctor_get(x_21, 0); -x_51 = lean_ctor_get(x_21, 1); -lean_inc(x_51); -lean_inc(x_50); -lean_dec(x_21); -x_52 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_52, 0, x_50); -lean_ctor_set(x_52, 1, x_51); -return x_52; -} -} -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___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, 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: -{ -lean_object* x_17; lean_object* x_18; lean_object* x_19; -x_17 = l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___lambda__3___closed__1; -x_18 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__3___boxed), 17, 9); -lean_closure_set(x_18, 0, x_1); -lean_closure_set(x_18, 1, x_2); -lean_closure_set(x_18, 2, x_3); -lean_closure_set(x_18, 3, x_4); -lean_closure_set(x_18, 4, x_5); -lean_closure_set(x_18, 5, x_6); -lean_closure_set(x_18, 6, x_7); -lean_closure_set(x_18, 7, x_17); -lean_closure_set(x_18, 8, x_8); -x_19 = l_Lean_Meta_forallBoundedTelescope___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___spec__1___rarg(x_9, x_17, x_18, x_11, x_12, x_13, x_14, x_15, x_16); -return x_19; -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__5___closed__1() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string("brecOnType "); -return x_1; -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__5___closed__2() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__5___closed__1; -x_2 = l_Lean_stringToMessageData(x_1); -return x_2; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___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, 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_17; lean_object* x_18; lean_object* x_31; lean_object* x_32; lean_object* x_33; uint8_t x_34; -lean_dec(x_10); -x_31 = lean_st_ref_get(x_15, x_16); -x_32 = lean_ctor_get(x_31, 0); -lean_inc(x_32); -x_33 = lean_ctor_get(x_32, 3); -lean_inc(x_33); -lean_dec(x_32); -x_34 = lean_ctor_get_uint8(x_33, sizeof(void*)*1); -lean_dec(x_33); -if (x_34 == 0) -{ -lean_object* x_35; uint8_t x_36; -x_35 = lean_ctor_get(x_31, 1); -lean_inc(x_35); -lean_dec(x_31); -x_36 = 0; -x_17 = x_36; -x_18 = x_35; -goto block_30; -} -else -{ -lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; uint8_t x_41; -x_37 = lean_ctor_get(x_31, 1); -lean_inc(x_37); -lean_dec(x_31); -lean_inc(x_8); -x_38 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__12(x_8, x_11, x_12, x_13, x_14, x_15, x_37); -x_39 = lean_ctor_get(x_38, 0); -lean_inc(x_39); -x_40 = lean_ctor_get(x_38, 1); -lean_inc(x_40); -lean_dec(x_38); -x_41 = lean_unbox(x_39); -lean_dec(x_39); -x_17 = x_41; -x_18 = x_40; -goto block_30; -} -block_30: -{ -if (x_17 == 0) -{ -lean_object* x_19; lean_object* x_20; -x_19 = lean_box(0); -x_20 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__4(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_19, x_11, x_12, x_13, x_14, x_15, x_18); -return x_20; -} -else -{ -lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; -lean_inc(x_9); -x_21 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_21, 0, x_9); -x_22 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__5___closed__2; -x_23 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_23, 0, x_22); -lean_ctor_set(x_23, 1, x_21); -x_24 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__6; -x_25 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_25, 0, x_23); -lean_ctor_set(x_25, 1, x_24); -lean_inc(x_8); -x_26 = l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11(x_8, x_25, x_11, x_12, x_13, x_14, x_15, x_18); -x_27 = lean_ctor_get(x_26, 0); -lean_inc(x_27); -x_28 = lean_ctor_get(x_26, 1); -lean_inc(x_28); -lean_dec(x_26); -x_29 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__4(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_27, x_11, x_12, x_13, x_14, x_15, x_28); -lean_dec(x_27); -return x_29; -} -} -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__6___closed__1() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string("brecOn "); -return x_1; -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__6___closed__2() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__6___closed__1; -x_2 = l_Lean_stringToMessageData(x_1); -return x_2; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__6(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, uint8_t 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, lean_object* x_17) { -_start: -{ -lean_object* x_18; lean_object* x_19; -lean_dec(x_11); -x_18 = lean_ctor_get(x_1, 6); -lean_inc(x_18); -if (x_9 == 0) -{ -lean_object* x_63; lean_object* x_64; lean_object* x_65; lean_object* x_66; lean_object* x_67; lean_object* x_68; -x_63 = lean_ctor_get(x_1, 4); -lean_inc(x_63); -x_64 = l_Lean_brecOnSuffix; -x_65 = lean_name_mk_string(x_63, x_64); -x_66 = lean_ctor_get(x_1, 5); -lean_inc(x_66); -x_67 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_67, 0, x_10); -lean_ctor_set(x_67, 1, x_66); -x_68 = l_Lean_mkConst(x_65, x_67); -x_19 = x_68; -goto block_62; -} -else -{ -lean_object* x_69; lean_object* x_70; lean_object* x_71; lean_object* x_72; lean_object* x_73; -lean_dec(x_10); -x_69 = lean_ctor_get(x_1, 4); -lean_inc(x_69); -x_70 = l_Lean_binductionOnSuffix; -x_71 = lean_name_mk_string(x_69, x_70); -x_72 = lean_ctor_get(x_1, 5); -lean_inc(x_72); -x_73 = l_Lean_mkConst(x_71, x_72); -x_19 = x_73; -goto block_62; -} -block_62: -{ -lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; -x_20 = l_Lean_mkAppN(x_19, x_18); -x_21 = l_Lean_mkApp(x_20, x_2); -lean_inc(x_3); -x_22 = l_Lean_mkAppN(x_21, x_3); -lean_inc(x_4); -x_23 = l_Lean_mkApp(x_22, x_4); -lean_inc(x_16); -lean_inc(x_15); -lean_inc(x_14); -lean_inc(x_13); -lean_inc(x_23); -x_24 = l_Lean_Meta_check(x_23, x_13, x_14, x_15, x_16, x_17); -if (lean_obj_tag(x_24) == 0) -{ -lean_object* x_25; lean_object* x_26; -x_25 = lean_ctor_get(x_24, 1); -lean_inc(x_25); -lean_dec(x_24); -lean_inc(x_16); -lean_inc(x_15); -lean_inc(x_14); -lean_inc(x_13); -lean_inc(x_23); -x_26 = lean_infer_type(x_23, x_13, x_14, x_15, x_16, x_25); -if (lean_obj_tag(x_26) == 0) -{ -lean_object* x_27; lean_object* x_28; uint8_t x_29; lean_object* x_30; lean_object* x_43; lean_object* x_44; lean_object* x_45; uint8_t x_46; -x_27 = lean_ctor_get(x_26, 0); -lean_inc(x_27); -x_28 = lean_ctor_get(x_26, 1); -lean_inc(x_28); -lean_dec(x_26); -x_43 = lean_st_ref_get(x_16, x_28); -x_44 = lean_ctor_get(x_43, 0); -lean_inc(x_44); -x_45 = lean_ctor_get(x_44, 3); -lean_inc(x_45); -lean_dec(x_44); -x_46 = lean_ctor_get_uint8(x_45, sizeof(void*)*1); -lean_dec(x_45); -if (x_46 == 0) -{ -lean_object* x_47; uint8_t x_48; -x_47 = lean_ctor_get(x_43, 1); -lean_inc(x_47); -lean_dec(x_43); -x_48 = 0; -x_29 = x_48; -x_30 = x_47; -goto block_42; -} -else -{ -lean_object* x_49; lean_object* x_50; lean_object* x_51; lean_object* x_52; uint8_t x_53; -x_49 = lean_ctor_get(x_43, 1); -lean_inc(x_49); -lean_dec(x_43); -lean_inc(x_8); -x_50 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__12(x_8, x_12, x_13, x_14, x_15, x_16, x_49); -x_51 = lean_ctor_get(x_50, 0); -lean_inc(x_51); -x_52 = lean_ctor_get(x_50, 1); -lean_inc(x_52); -lean_dec(x_50); -x_53 = lean_unbox(x_51); -lean_dec(x_51); -x_29 = x_53; -x_30 = x_52; -goto block_42; -} -block_42: -{ -if (x_29 == 0) -{ -lean_object* x_31; lean_object* x_32; -x_31 = lean_box(0); -x_32 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__5(x_3, x_4, x_5, x_1, x_6, x_7, x_23, x_8, x_27, x_31, x_12, x_13, x_14, x_15, x_16, x_30); -return x_32; -} -else -{ -lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; -lean_inc(x_23); -x_33 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_33, 0, x_23); -x_34 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__6___closed__2; -x_35 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_35, 0, x_34); -lean_ctor_set(x_35, 1, x_33); -x_36 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__6; -x_37 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_37, 0, x_35); -lean_ctor_set(x_37, 1, x_36); -lean_inc(x_8); -x_38 = l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11(x_8, x_37, x_12, x_13, x_14, x_15, x_16, x_30); -x_39 = lean_ctor_get(x_38, 0); -lean_inc(x_39); -x_40 = lean_ctor_get(x_38, 1); -lean_inc(x_40); -lean_dec(x_38); -x_41 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__5(x_3, x_4, x_5, x_1, x_6, x_7, x_23, x_8, x_27, x_39, x_12, x_13, x_14, x_15, x_16, x_40); -return x_41; -} -} -} -else -{ -uint8_t x_54; -lean_dec(x_23); -lean_dec(x_16); -lean_dec(x_15); -lean_dec(x_14); -lean_dec(x_13); -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); -lean_dec(x_1); -x_54 = !lean_is_exclusive(x_26); -if (x_54 == 0) -{ -return x_26; -} -else -{ -lean_object* x_55; lean_object* x_56; lean_object* x_57; -x_55 = lean_ctor_get(x_26, 0); -x_56 = lean_ctor_get(x_26, 1); -lean_inc(x_56); -lean_inc(x_55); -lean_dec(x_26); -x_57 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_57, 0, x_55); -lean_ctor_set(x_57, 1, x_56); -return x_57; -} -} -} -else -{ -uint8_t x_58; -lean_dec(x_23); -lean_dec(x_16); -lean_dec(x_15); -lean_dec(x_14); -lean_dec(x_13); -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); -lean_dec(x_1); -x_58 = !lean_is_exclusive(x_24); -if (x_58 == 0) -{ -return x_24; -} -else -{ -lean_object* x_59; lean_object* x_60; lean_object* x_61; -x_59 = lean_ctor_get(x_24, 0); -x_60 = lean_ctor_get(x_24, 1); -lean_inc(x_60); -lean_inc(x_59); -lean_dec(x_24); -x_61 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_61, 0, x_59); -lean_ctor_set(x_61, 1, x_60); -return x_61; -} -} -} -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__7___closed__1() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string("brecOn motive: "); -return x_1; -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__7___closed__2() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__7___closed__1; -x_2 = l_Lean_stringToMessageData(x_1); -return x_2; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__7(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, uint8_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: -{ -lean_object* x_17; lean_object* x_18; uint8_t x_19; uint8_t x_20; lean_object* x_21; -lean_dec(x_10); -x_17 = lean_ctor_get(x_1, 7); -lean_inc(x_17); -lean_inc(x_2); -lean_inc(x_17); -x_18 = lean_array_push(x_17, x_2); -x_19 = 0; -x_20 = 1; -lean_inc(x_12); -x_21 = l_Lean_Meta_mkLambdaFVars(x_18, x_3, x_19, x_20, x_12, x_13, x_14, x_15, x_16); -if (lean_obj_tag(x_21) == 0) -{ -lean_object* x_22; lean_object* x_23; uint8_t x_24; lean_object* x_25; lean_object* x_38; lean_object* x_39; lean_object* x_40; uint8_t x_41; -x_22 = lean_ctor_get(x_21, 0); -lean_inc(x_22); -x_23 = lean_ctor_get(x_21, 1); -lean_inc(x_23); -lean_dec(x_21); -x_38 = lean_st_ref_get(x_15, x_23); -x_39 = lean_ctor_get(x_38, 0); -lean_inc(x_39); -x_40 = lean_ctor_get(x_39, 3); -lean_inc(x_40); -lean_dec(x_39); -x_41 = lean_ctor_get_uint8(x_40, sizeof(void*)*1); -lean_dec(x_40); -if (x_41 == 0) -{ -lean_object* x_42; -x_42 = lean_ctor_get(x_38, 1); -lean_inc(x_42); -lean_dec(x_38); -x_24 = x_19; -x_25 = x_42; -goto block_37; -} -else -{ -lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; uint8_t x_47; -x_43 = lean_ctor_get(x_38, 1); -lean_inc(x_43); -lean_dec(x_38); -lean_inc(x_7); -x_44 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__12(x_7, x_11, x_12, x_13, x_14, x_15, x_43); -x_45 = lean_ctor_get(x_44, 0); -lean_inc(x_45); -x_46 = lean_ctor_get(x_44, 1); -lean_inc(x_46); -lean_dec(x_44); -x_47 = lean_unbox(x_45); -lean_dec(x_45); -x_24 = x_47; -x_25 = x_46; -goto block_37; -} -block_37: -{ -if (x_24 == 0) -{ -lean_object* x_26; lean_object* x_27; -x_26 = lean_box(0); -x_27 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__6(x_1, x_22, x_17, x_2, x_4, x_5, x_6, x_7, x_8, x_9, x_26, x_11, x_12, x_13, x_14, x_15, x_25); -return x_27; -} -else -{ -lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; -lean_inc(x_22); -x_28 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_28, 0, x_22); -x_29 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__7___closed__2; -x_30 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_30, 0, x_29); -lean_ctor_set(x_30, 1, x_28); -x_31 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__6; -x_32 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_32, 0, x_30); -lean_ctor_set(x_32, 1, x_31); -lean_inc(x_7); -x_33 = l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11(x_7, x_32, x_11, x_12, x_13, x_14, x_15, x_25); -x_34 = lean_ctor_get(x_33, 0); -lean_inc(x_34); -x_35 = lean_ctor_get(x_33, 1); -lean_inc(x_35); -lean_dec(x_33); -x_36 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__6(x_1, x_22, x_17, x_2, x_4, x_5, x_6, x_7, x_8, x_9, x_34, x_11, x_12, x_13, x_14, x_15, x_35); -return x_36; -} -} -} -else -{ -uint8_t x_48; -lean_dec(x_17); -lean_dec(x_15); -lean_dec(x_14); -lean_dec(x_13); -lean_dec(x_12); -lean_dec(x_11); -lean_dec(x_9); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_2); -lean_dec(x_1); -x_48 = !lean_is_exclusive(x_21); -if (x_48 == 0) -{ -return x_21; -} -else -{ -lean_object* x_49; lean_object* x_50; lean_object* x_51; -x_49 = lean_ctor_get(x_21, 0); -x_50 = lean_ctor_get(x_21, 1); -lean_inc(x_50); -lean_inc(x_49); -lean_dec(x_21); -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; -} -} -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__8(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; uint8_t x_17; -lean_dec(x_9); -x_16 = lean_ctor_get_uint8(x_1, sizeof(void*)*8); -if (x_16 == 0) -{ -uint8_t x_34; -x_34 = 0; -x_17 = x_34; -goto block_33; -} -else -{ -lean_object* x_35; uint8_t x_36; -x_35 = l_Lean_levelZero; -x_36 = lean_level_eq(x_8, x_35); -x_17 = x_36; -goto block_33; -} -block_33: -{ -if (x_16 == 0) -{ -lean_object* x_18; lean_object* x_19; -x_18 = lean_box(0); -x_19 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__7(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_17, x_8, x_18, x_10, x_11, x_12, x_13, x_14, x_15); -return x_19; -} -else -{ -lean_object* x_20; uint8_t x_21; -x_20 = l_Lean_levelZero; -x_21 = lean_level_eq(x_8, x_20); -if (x_21 == 0) -{ -lean_object* x_22; -x_22 = l_Lean_Meta_decLevel(x_8, x_11, x_12, x_13, x_14, x_15); -if (lean_obj_tag(x_22) == 0) -{ -lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; -x_23 = lean_ctor_get(x_22, 0); -lean_inc(x_23); -x_24 = lean_ctor_get(x_22, 1); -lean_inc(x_24); -lean_dec(x_22); -x_25 = lean_box(0); -x_26 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__7(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_17, x_23, x_25, x_10, x_11, x_12, x_13, x_14, x_24); -return x_26; -} -else -{ -uint8_t x_27; -lean_dec(x_14); -lean_dec(x_13); -lean_dec(x_12); -lean_dec(x_11); -lean_dec(x_10); -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_27 = !lean_is_exclusive(x_22); -if (x_27 == 0) -{ -return x_22; -} -else -{ -lean_object* x_28; lean_object* x_29; lean_object* x_30; -x_28 = lean_ctor_get(x_22, 0); -x_29 = lean_ctor_get(x_22, 1); -lean_inc(x_29); -lean_inc(x_28); -lean_dec(x_22); -x_30 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_30, 0, x_28); -lean_ctor_set(x_30, 1, x_29); -return x_30; -} -} -} -else -{ -lean_object* x_31; lean_object* x_32; -x_31 = lean_box(0); -x_32 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__7(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_17, x_8, x_31, x_10, x_11, x_12, x_13, x_14, x_15); -return x_32; -} -} -} -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__9___closed__1() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string("brecOn univ: "); -return x_1; -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__9___closed__2() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__9___closed__1; -x_2 = l_Lean_stringToMessageData(x_1); -return x_2; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__9(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: -{ -uint8_t x_15; uint8_t x_16; lean_object* x_17; -lean_dec(x_8); -x_15 = 0; -x_16 = 1; -lean_inc(x_10); -lean_inc(x_1); -x_17 = l_Lean_Meta_mkForallFVars(x_1, x_2, x_15, x_16, x_10, x_11, x_12, x_13, x_14); -if (lean_obj_tag(x_17) == 0) -{ -lean_object* x_18; lean_object* x_19; lean_object* x_20; -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); -lean_inc(x_13); -lean_inc(x_12); -lean_inc(x_11); -lean_inc(x_10); -lean_inc(x_18); -x_20 = l_Lean_Meta_getLevel(x_18, x_10, x_11, x_12, x_13, x_19); -if (lean_obj_tag(x_20) == 0) -{ -lean_object* x_21; lean_object* x_22; uint8_t x_23; lean_object* x_24; lean_object* x_37; lean_object* x_38; lean_object* x_39; uint8_t x_40; -x_21 = lean_ctor_get(x_20, 0); -lean_inc(x_21); -x_22 = lean_ctor_get(x_20, 1); -lean_inc(x_22); -lean_dec(x_20); -x_37 = lean_st_ref_get(x_13, x_22); -x_38 = lean_ctor_get(x_37, 0); -lean_inc(x_38); -x_39 = lean_ctor_get(x_38, 3); -lean_inc(x_39); -lean_dec(x_38); -x_40 = lean_ctor_get_uint8(x_39, sizeof(void*)*1); -lean_dec(x_39); -if (x_40 == 0) -{ -lean_object* x_41; -x_41 = lean_ctor_get(x_37, 1); -lean_inc(x_41); -lean_dec(x_37); -x_23 = x_15; -x_24 = x_41; -goto block_36; -} -else -{ -lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; uint8_t x_46; -x_42 = lean_ctor_get(x_37, 1); -lean_inc(x_42); -lean_dec(x_37); -lean_inc(x_7); -x_43 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__12(x_7, x_9, x_10, x_11, x_12, x_13, x_42); -x_44 = lean_ctor_get(x_43, 0); -lean_inc(x_44); -x_45 = lean_ctor_get(x_43, 1); -lean_inc(x_45); -lean_dec(x_43); -x_46 = lean_unbox(x_44); -lean_dec(x_44); -x_23 = x_46; -x_24 = x_45; -goto block_36; -} -block_36: -{ -if (x_23 == 0) -{ -lean_object* x_25; lean_object* x_26; -x_25 = lean_box(0); -x_26 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__8(x_3, x_4, x_18, x_5, x_6, x_1, x_7, x_21, x_25, x_9, x_10, x_11, x_12, x_13, x_24); -return x_26; -} -else -{ -lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; -lean_inc(x_21); -x_27 = lean_alloc_ctor(3, 1, 0); -lean_ctor_set(x_27, 0, x_21); -x_28 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__9___closed__2; -x_29 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_29, 0, x_28); -lean_ctor_set(x_29, 1, x_27); -x_30 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__6; -x_31 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_31, 0, x_29); -lean_ctor_set(x_31, 1, x_30); -lean_inc(x_7); -x_32 = l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11(x_7, x_31, x_9, x_10, x_11, x_12, x_13, x_24); -x_33 = lean_ctor_get(x_32, 0); -lean_inc(x_33); -x_34 = lean_ctor_get(x_32, 1); -lean_inc(x_34); -lean_dec(x_32); -x_35 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__8(x_3, x_4, x_18, x_5, x_6, x_1, x_7, x_21, x_33, x_9, x_10, x_11, x_12, x_13, x_34); -return x_35; -} -} -} -else -{ -uint8_t x_47; -lean_dec(x_18); -lean_dec(x_13); -lean_dec(x_12); -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -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_47 = !lean_is_exclusive(x_20); -if (x_47 == 0) -{ -return x_20; -} -else -{ -lean_object* x_48; lean_object* x_49; lean_object* x_50; -x_48 = lean_ctor_get(x_20, 0); -x_49 = lean_ctor_get(x_20, 1); -lean_inc(x_49); -lean_inc(x_48); -lean_dec(x_20); -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; -} -} -} -else -{ -uint8_t x_51; -lean_dec(x_13); -lean_dec(x_12); -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -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_51 = !lean_is_exclusive(x_17); -if (x_51 == 0) -{ -return x_17; -} -else -{ -lean_object* x_52; lean_object* x_53; lean_object* x_54; -x_52 = lean_ctor_get(x_17, 0); -x_53 = lean_ctor_get(x_17, 1); -lean_inc(x_53); -lean_inc(x_52); -lean_dec(x_17); -x_54 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_54, 0, x_52); -lean_ctor_set(x_54, 1, x_53); -return x_54; -} -} -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___closed__1() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string("fixedParams: "); -return x_1; -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___closed__2() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___closed__1; -x_2 = l_Lean_stringToMessageData(x_1); -return x_2; -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___closed__3() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string(", otherArgs: "); -return x_1; -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___closed__4() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___closed__3; -x_2 = l_Lean_stringToMessageData(x_1); -return x_2; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn(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 = lean_infer_type(x_3, 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; 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; lean_object* x_23; -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_Expr_headBeta(x_11); -x_14 = lean_ctor_get(x_2, 1); -lean_inc(x_14); -x_15 = lean_ctor_get(x_2, 2); -lean_inc(x_15); -x_16 = l_Lean_instInhabitedExpr; -x_17 = lean_array_get(x_16, x_14, x_15); -lean_dec(x_15); -x_18 = lean_array_get_size(x_14); -x_19 = lean_unsigned_to_nat(0u); -x_20 = lean_nat_dec_lt(x_19, x_18); -x_21 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___closed__6; -x_22 = lean_st_ref_get(x_8, x_12); -if (x_20 == 0) -{ -lean_object* x_59; -lean_dec(x_18); -lean_dec(x_14); -x_59 = l_Lean_Elab_Structural_State_addMatchers___default___closed__1; -x_23 = x_59; -goto block_58; -} -else -{ -uint8_t x_60; -x_60 = lean_nat_dec_le(x_18, x_18); -if (x_60 == 0) -{ -lean_object* x_61; -lean_dec(x_18); -lean_dec(x_14); -x_61 = l_Lean_Elab_Structural_State_addMatchers___default___closed__1; -x_23 = x_61; -goto block_58; -} -else -{ -size_t x_62; size_t x_63; lean_object* x_64; lean_object* x_65; -x_62 = 0; -x_63 = lean_usize_of_nat(x_18); -lean_dec(x_18); -x_64 = l_Lean_Elab_Structural_State_addMatchers___default___closed__1; -x_65 = l_Array_foldlMUnsafe_fold___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___spec__2(x_2, x_17, x_14, x_62, x_63, x_64); -lean_dec(x_14); -x_23 = x_65; -goto block_58; -} -} -block_58: -{ -uint8_t x_24; lean_object* x_25; lean_object* x_48; lean_object* x_49; uint8_t x_50; -x_48 = lean_ctor_get(x_22, 0); -lean_inc(x_48); -x_49 = lean_ctor_get(x_48, 3); -lean_inc(x_49); -lean_dec(x_48); -x_50 = lean_ctor_get_uint8(x_49, sizeof(void*)*1); -lean_dec(x_49); -if (x_50 == 0) -{ -lean_object* x_51; uint8_t x_52; -x_51 = lean_ctor_get(x_22, 1); -lean_inc(x_51); -lean_dec(x_22); -x_52 = 0; -x_24 = x_52; -x_25 = x_51; -goto block_47; -} -else -{ -lean_object* x_53; lean_object* x_54; lean_object* x_55; lean_object* x_56; uint8_t x_57; -x_53 = lean_ctor_get(x_22, 1); -lean_inc(x_53); -lean_dec(x_22); -x_54 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__12(x_21, x_4, x_5, x_6, x_7, x_8, x_53); -x_55 = lean_ctor_get(x_54, 0); -lean_inc(x_55); -x_56 = lean_ctor_get(x_54, 1); -lean_inc(x_56); -lean_dec(x_54); -x_57 = lean_unbox(x_55); -lean_dec(x_55); -x_24 = x_57; -x_25 = x_56; -goto block_47; -} -block_47: -{ -if (x_24 == 0) -{ -lean_object* x_26; lean_object* x_27; -x_26 = lean_box(0); -x_27 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__9(x_23, x_13, x_2, x_17, x_1, x_3, x_21, x_26, x_4, x_5, x_6, x_7, x_8, x_25); -return x_27; -} -else -{ -lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; -x_28 = lean_ctor_get(x_2, 0); -lean_inc(x_28); -x_29 = lean_array_to_list(lean_box(0), x_28); -x_30 = lean_box(0); -x_31 = l_List_mapTRAux___at_Lean_MessageData_instCoeListExprMessageData___spec__1(x_29, x_30); -x_32 = l_Lean_MessageData_ofList(x_31); -lean_dec(x_31); -x_33 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___closed__2; -x_34 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_34, 0, x_33); -lean_ctor_set(x_34, 1, x_32); -x_35 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___closed__4; -x_36 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_36, 0, x_34); -lean_ctor_set(x_36, 1, x_35); -lean_inc(x_23); -x_37 = lean_array_to_list(lean_box(0), x_23); -x_38 = l_List_mapTRAux___at_Lean_MessageData_instCoeListExprMessageData___spec__1(x_37, x_30); -x_39 = l_Lean_MessageData_ofList(x_38); -lean_dec(x_38); -x_40 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_40, 0, x_36); -lean_ctor_set(x_40, 1, x_39); -x_41 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__6; -x_42 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_42, 0, x_40); -lean_ctor_set(x_42, 1, x_41); -x_43 = l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11(x_21, x_42, x_4, x_5, x_6, x_7, x_8, x_25); -x_44 = lean_ctor_get(x_43, 0); -lean_inc(x_44); -x_45 = lean_ctor_get(x_43, 1); -lean_inc(x_45); -lean_dec(x_43); -x_46 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__9(x_23, x_13, x_2, x_17, x_1, x_3, x_21, x_44, x_4, x_5, x_6, x_7, x_8, x_45); -return x_46; -} -} -} -} -else -{ -uint8_t x_66; -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_66 = !lean_is_exclusive(x_10); -if (x_66 == 0) -{ -return x_10; -} -else -{ -lean_object* x_67; lean_object* x_68; lean_object* x_69; -x_67 = lean_ctor_get(x_10, 0); -x_68 = lean_ctor_get(x_10, 1); -lean_inc(x_68); -lean_inc(x_67); -lean_dec(x_10); -x_69 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_69, 0, x_67); -lean_ctor_set(x_69, 1, x_68); -return x_69; -} -} -} -} -lean_object* l_Array_foldlMUnsafe_fold___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___spec__2___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { -_start: -{ -size_t x_7; size_t x_8; lean_object* x_9; -x_7 = lean_unbox_usize(x_4); -lean_dec(x_4); -x_8 = lean_unbox_usize(x_5); -lean_dec(x_5); -x_9 = l_Array_foldlMUnsafe_fold___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___spec__2(x_1, x_2, x_3, x_7, x_8, x_6); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -return x_9; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___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, lean_object* x_12, lean_object* x_13, lean_object* x_14, lean_object* x_15) { -_start: -{ -lean_object* x_16; -x_16 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__1(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_12, x_13, x_14, x_15); -lean_dec(x_9); -lean_dec(x_8); -return x_16; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___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_object* x_12, lean_object* x_13, lean_object* x_14, lean_object* x_15, lean_object* x_16) { -_start: -{ -lean_object* x_17; -x_17 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___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, x_13, x_14, x_15, x_16); -lean_dec(x_10); -return x_17; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__3___boxed(lean_object** _args) { -lean_object* x_1 = _args[0]; -lean_object* x_2 = _args[1]; -lean_object* x_3 = _args[2]; -lean_object* x_4 = _args[3]; -lean_object* x_5 = _args[4]; -lean_object* x_6 = _args[5]; -lean_object* x_7 = _args[6]; -lean_object* x_8 = _args[7]; -lean_object* x_9 = _args[8]; -lean_object* x_10 = _args[9]; -lean_object* x_11 = _args[10]; -lean_object* x_12 = _args[11]; -lean_object* x_13 = _args[12]; -lean_object* x_14 = _args[13]; -lean_object* x_15 = _args[14]; -lean_object* x_16 = _args[15]; -lean_object* x_17 = _args[16]; -_start: -{ -lean_object* x_18; -x_18 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__3(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_12, x_13, x_14, x_15, x_16, x_17); -return x_18; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___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, 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: -{ -lean_object* x_17; -x_17 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__4(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_12, x_13, x_14, x_15, x_16); -lean_dec(x_10); -return x_17; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__6___boxed(lean_object** _args) { -lean_object* x_1 = _args[0]; -lean_object* x_2 = _args[1]; -lean_object* x_3 = _args[2]; -lean_object* x_4 = _args[3]; -lean_object* x_5 = _args[4]; -lean_object* x_6 = _args[5]; -lean_object* x_7 = _args[6]; -lean_object* x_8 = _args[7]; -lean_object* x_9 = _args[8]; -lean_object* x_10 = _args[9]; -lean_object* x_11 = _args[10]; -lean_object* x_12 = _args[11]; -lean_object* x_13 = _args[12]; -lean_object* x_14 = _args[13]; -lean_object* x_15 = _args[14]; -lean_object* x_16 = _args[15]; -lean_object* x_17 = _args[16]; -_start: -{ -uint8_t x_18; lean_object* x_19; -x_18 = lean_unbox(x_9); -lean_dec(x_9); -x_19 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__6(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_18, x_10, x_11, x_12, x_13, x_14, x_15, x_16, x_17); -return x_19; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__7___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: -{ -uint8_t x_17; lean_object* x_18; -x_17 = lean_unbox(x_8); -lean_dec(x_8); -x_18 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__7(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_17, x_9, x_10, x_11, x_12, x_13, x_14, x_15, x_16); -return x_18; -} -} -lean_object* l_Array_foldlMUnsafe_fold___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkIndPredBRecOn___spec__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, size_t x_4, size_t x_5, lean_object* x_6) { -_start: -{ -uint8_t x_7; -x_7 = x_4 == x_5; -if (x_7 == 0) -{ -lean_object* x_8; uint8_t x_9; size_t x_10; size_t x_11; -x_8 = lean_array_uget(x_3, x_4); -x_9 = lean_expr_eqv(x_8, x_2); -x_10 = 1; -x_11 = x_4 + x_10; -if (x_9 == 0) -{ -lean_object* x_12; uint8_t x_13; -x_12 = lean_ctor_get(x_1, 7); -x_13 = l_Array_contains___at_Lean_Meta_getElimInfo___spec__4(x_12, x_8); -if (x_13 == 0) -{ -lean_object* x_14; -x_14 = lean_array_push(x_6, x_8); -x_4 = x_11; -x_6 = x_14; -goto _start; -} -else -{ -lean_dec(x_8); -x_4 = x_11; -goto _start; -} -} -else -{ -lean_dec(x_8); -x_4 = x_11; -goto _start; -} -} -else -{ -return x_6; -} -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkIndPredBRecOn___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) { -_start: -{ -lean_object* x_11; lean_object* x_12; -x_11 = lean_unsigned_to_nat(0u); -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -lean_inc(x_6); -x_12 = l___private_Lean_Meta_Basic_0__Lean_Meta_instantiateForallAux(x_1, x_11, x_2, x_6, x_7, x_8, x_9, x_10); -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; -x_13 = lean_ctor_get(x_12, 0); -lean_inc(x_13); -x_14 = lean_ctor_get(x_12, 1); -lean_inc(x_14); -lean_dec(x_12); -x_15 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__4; -x_16 = lean_array_push(x_15, x_3); -x_17 = l___private_Lean_Meta_Basic_0__Lean_Meta_instantiateForallAux(x_16, x_11, x_13, x_6, x_7, x_8, x_9, x_14); -lean_dec(x_16); -return x_17; -} -else -{ -uint8_t x_18; -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_3); -x_18 = !lean_is_exclusive(x_12); -if (x_18 == 0) -{ -return x_12; -} -else -{ -lean_object* x_19; lean_object* x_20; lean_object* x_21; -x_19 = lean_ctor_get(x_12, 0); -x_20 = lean_ctor_get(x_12, 1); -lean_inc(x_20); -lean_inc(x_19); -lean_dec(x_12); -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* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkIndPredBRecOn___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) { -_start: -{ -lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; -lean_dec(x_5); -x_12 = l_Lean_instInhabitedExpr; -x_13 = lean_unsigned_to_nat(0u); -x_14 = lean_array_get(x_12, x_4, x_13); -lean_dec(x_4); -lean_inc(x_10); -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -x_15 = lean_infer_type(x_14, x_7, x_8, x_9, x_10, x_11); -if (lean_obj_tag(x_15) == 0) -{ -lean_object* x_16; lean_object* x_17; uint8_t x_18; lean_object* x_19; lean_object* x_32; lean_object* x_33; lean_object* x_34; uint8_t x_35; -x_16 = lean_ctor_get(x_15, 0); -lean_inc(x_16); -x_17 = lean_ctor_get(x_15, 1); -lean_inc(x_17); -lean_dec(x_15); -x_32 = lean_st_ref_get(x_10, x_17); -x_33 = lean_ctor_get(x_32, 0); -lean_inc(x_33); -x_34 = lean_ctor_get(x_33, 3); -lean_inc(x_34); -lean_dec(x_33); -x_35 = lean_ctor_get_uint8(x_34, sizeof(void*)*1); -lean_dec(x_34); -if (x_35 == 0) -{ -lean_object* x_36; uint8_t x_37; -x_36 = lean_ctor_get(x_32, 1); -lean_inc(x_36); -lean_dec(x_32); -x_37 = 0; -x_18 = x_37; -x_19 = x_36; -goto block_31; -} -else -{ -lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; uint8_t x_42; -x_38 = lean_ctor_get(x_32, 1); -lean_inc(x_38); -lean_dec(x_32); -lean_inc(x_3); -x_39 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__12(x_3, x_6, x_7, x_8, x_9, x_10, x_38); -x_40 = lean_ctor_get(x_39, 0); -lean_inc(x_40); -x_41 = lean_ctor_get(x_39, 1); -lean_inc(x_41); -lean_dec(x_39); -x_42 = lean_unbox(x_40); -lean_dec(x_40); -x_18 = x_42; -x_19 = x_41; -goto block_31; -} -block_31: -{ -if (x_18 == 0) -{ -lean_object* x_20; lean_object* x_21; -lean_dec(x_3); -x_20 = lean_box(0); -x_21 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkIndPredBRecOn___lambda__1(x_1, x_16, x_2, x_20, x_6, x_7, x_8, x_9, x_10, x_19); -lean_dec(x_6); -return x_21; -} -else -{ -lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; -lean_inc(x_16); -x_22 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_22, 0, x_16); -x_23 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__3___closed__2; -x_24 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_24, 0, x_23); -lean_ctor_set(x_24, 1, x_22); -x_25 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__6; -x_26 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_26, 0, x_24); -lean_ctor_set(x_26, 1, x_25); -x_27 = l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11(x_3, x_26, x_6, x_7, x_8, x_9, x_10, x_19); -x_28 = lean_ctor_get(x_27, 0); -lean_inc(x_28); -x_29 = lean_ctor_get(x_27, 1); -lean_inc(x_29); -lean_dec(x_27); -x_30 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkIndPredBRecOn___lambda__1(x_1, x_16, x_2, x_28, x_6, x_7, x_8, x_9, x_10, x_29); -lean_dec(x_6); -lean_dec(x_28); -return x_30; -} -} -} -else -{ -uint8_t x_43; -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_3); -lean_dec(x_2); -x_43 = !lean_is_exclusive(x_15); -if (x_43 == 0) -{ -return x_15; -} -else -{ -lean_object* x_44; lean_object* x_45; lean_object* x_46; -x_44 = lean_ctor_get(x_15, 0); -x_45 = lean_ctor_get(x_15, 1); -lean_inc(x_45); -lean_inc(x_44); -lean_dec(x_15); -x_46 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_46, 0, x_44); -lean_ctor_set(x_46, 1, x_45); -return x_46; -} -} -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkIndPredBRecOn___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_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, lean_object* x_17) { -_start: -{ -lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; -x_18 = lean_box(0); -lean_inc(x_13); -x_19 = l_Lean_Meta_mkFreshExprSyntheticOpaqueMVar(x_1, x_18, x_13, x_14, x_15, x_16, x_17); -x_20 = lean_ctor_get(x_19, 1); -lean_inc(x_20); -lean_dec(x_19); -x_21 = l_Lean_instInhabitedExpr; -x_22 = lean_unsigned_to_nat(0u); -x_23 = lean_array_get(x_21, x_10, x_22); -lean_inc(x_16); -lean_inc(x_15); -lean_inc(x_14); -lean_inc(x_13); -x_24 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps(x_2, x_3, x_4, x_5, x_12, x_13, x_14, x_15, x_16, x_20); -if (lean_obj_tag(x_24) == 0) -{ -lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; uint8_t x_32; uint8_t x_33; lean_object* x_34; -x_25 = lean_ctor_get(x_24, 0); -lean_inc(x_25); -x_26 = lean_ctor_get(x_24, 1); -lean_inc(x_26); -lean_dec(x_24); -x_27 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__1___closed__1; -x_28 = lean_array_push(x_27, x_6); -x_29 = lean_array_push(x_28, x_23); -x_30 = l_Array_append___rarg(x_7, x_29); -lean_inc(x_8); -x_31 = l_Array_append___rarg(x_30, x_8); -x_32 = 0; -x_33 = 1; -x_34 = l_Lean_Meta_mkLambdaFVars(x_31, x_25, x_32, x_33, x_13, x_14, x_15, x_16, x_26); -lean_dec(x_16); -lean_dec(x_15); -lean_dec(x_14); -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; lean_object* x_38; -x_36 = lean_ctor_get(x_34, 0); -x_37 = l_Lean_mkApp(x_9, x_36); -x_38 = l_Lean_mkAppN(x_37, x_8); -lean_ctor_set(x_34, 0, x_38); -return x_34; -} -else -{ -lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; -x_39 = lean_ctor_get(x_34, 0); -x_40 = lean_ctor_get(x_34, 1); -lean_inc(x_40); -lean_inc(x_39); -lean_dec(x_34); -x_41 = l_Lean_mkApp(x_9, x_39); -x_42 = l_Lean_mkAppN(x_41, x_8); -x_43 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_43, 0, x_42); -lean_ctor_set(x_43, 1, x_40); -return x_43; -} -} -else -{ -uint8_t x_44; -lean_dec(x_9); -lean_dec(x_8); -x_44 = !lean_is_exclusive(x_34); -if (x_44 == 0) -{ -return x_34; -} -else -{ -lean_object* x_45; lean_object* x_46; lean_object* x_47; -x_45 = lean_ctor_get(x_34, 0); -x_46 = lean_ctor_get(x_34, 1); -lean_inc(x_46); -lean_inc(x_45); -lean_dec(x_34); -x_47 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_47, 0, x_45); -lean_ctor_set(x_47, 1, x_46); -return x_47; -} -} -} -else -{ -uint8_t x_48; -lean_dec(x_23); -lean_dec(x_16); -lean_dec(x_15); -lean_dec(x_14); -lean_dec(x_13); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -x_48 = !lean_is_exclusive(x_24); -if (x_48 == 0) -{ -return x_24; -} -else -{ -lean_object* x_49; lean_object* x_50; lean_object* x_51; -x_49 = lean_ctor_get(x_24, 0); -x_50 = lean_ctor_get(x_24, 1); -lean_inc(x_50); -lean_inc(x_49); -lean_dec(x_24); -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; -} -} -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkIndPredBRecOn___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, lean_object* x_11, lean_object* x_12, lean_object* x_13, lean_object* x_14, lean_object* x_15, lean_object* x_16, lean_object* x_17) { -_start: -{ -lean_object* x_18; lean_object* x_19; lean_object* x_20; -lean_inc(x_2); -lean_inc(x_1); -x_18 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkIndPredBRecOn___lambda__2___boxed), 11, 3); -lean_closure_set(x_18, 0, x_1); -lean_closure_set(x_18, 1, x_2); -lean_closure_set(x_18, 2, x_3); -x_19 = l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___lambda__3___closed__1; -lean_inc(x_16); -lean_inc(x_15); -lean_inc(x_14); -lean_inc(x_13); -lean_inc(x_12); -x_20 = l_Lean_Meta_forallBoundedTelescope___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___spec__1___rarg(x_4, x_19, x_18, x_12, x_13, x_14, x_15, x_16, x_17); -if (lean_obj_tag(x_20) == 0) -{ -lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; -x_21 = lean_ctor_get(x_20, 0); -lean_inc(x_21); -x_22 = lean_ctor_get(x_20, 1); -lean_inc(x_22); -lean_dec(x_20); -lean_inc(x_21); -x_23 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkIndPredBRecOn___lambda__3___boxed), 17, 9); -lean_closure_set(x_23, 0, x_21); -lean_closure_set(x_23, 1, x_5); -lean_closure_set(x_23, 2, x_6); -lean_closure_set(x_23, 3, x_7); -lean_closure_set(x_23, 4, x_8); -lean_closure_set(x_23, 5, x_2); -lean_closure_set(x_23, 6, x_1); -lean_closure_set(x_23, 7, x_9); -lean_closure_set(x_23, 8, x_10); -x_24 = l_Lean_Meta_forallBoundedTelescope___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___spec__1___rarg(x_21, x_19, x_23, x_12, x_13, x_14, x_15, x_16, x_22); -return x_24; -} -else -{ -uint8_t x_25; -lean_dec(x_16); -lean_dec(x_15); -lean_dec(x_14); -lean_dec(x_13); -lean_dec(x_12); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_2); -lean_dec(x_1); -x_25 = !lean_is_exclusive(x_20); -if (x_25 == 0) -{ -return x_20; -} -else -{ -lean_object* x_26; lean_object* x_27; lean_object* x_28; -x_26 = lean_ctor_get(x_20, 0); -x_27 = lean_ctor_get(x_20, 1); -lean_inc(x_27); -lean_inc(x_26); -lean_dec(x_20); -x_28 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_28, 0, x_26); -lean_ctor_set(x_28, 1, x_27); -return x_28; -} -} -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkIndPredBRecOn___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, 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, lean_object* x_17) { -_start: -{ -uint8_t x_18; lean_object* x_19; lean_object* x_32; lean_object* x_33; lean_object* x_34; uint8_t x_35; -lean_dec(x_11); -x_32 = lean_st_ref_get(x_16, x_17); -x_33 = lean_ctor_get(x_32, 0); -lean_inc(x_33); -x_34 = lean_ctor_get(x_33, 3); -lean_inc(x_34); -lean_dec(x_33); -x_35 = lean_ctor_get_uint8(x_34, sizeof(void*)*1); -lean_dec(x_34); -if (x_35 == 0) -{ -lean_object* x_36; uint8_t x_37; -x_36 = lean_ctor_get(x_32, 1); -lean_inc(x_36); -lean_dec(x_32); -x_37 = 0; -x_18 = x_37; -x_19 = x_36; -goto block_31; -} -else -{ -lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; uint8_t x_42; -x_38 = lean_ctor_get(x_32, 1); -lean_inc(x_38); -lean_dec(x_32); -lean_inc(x_3); -x_39 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__12(x_3, x_12, x_13, x_14, x_15, x_16, x_38); -x_40 = lean_ctor_get(x_39, 0); -lean_inc(x_40); -x_41 = lean_ctor_get(x_39, 1); -lean_inc(x_41); -lean_dec(x_39); -x_42 = lean_unbox(x_40); -lean_dec(x_40); -x_18 = x_42; -x_19 = x_41; -goto block_31; -} -block_31: -{ -if (x_18 == 0) -{ -lean_object* x_20; lean_object* x_21; -x_20 = lean_box(0); -x_21 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkIndPredBRecOn___lambda__4(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_20, x_12, x_13, x_14, x_15, x_16, x_19); -return x_21; -} -else -{ -lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; -lean_inc(x_4); -x_22 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_22, 0, x_4); -x_23 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__5___closed__2; -x_24 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_24, 0, x_23); -lean_ctor_set(x_24, 1, x_22); -x_25 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__6; -x_26 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_26, 0, x_24); -lean_ctor_set(x_26, 1, x_25); -lean_inc(x_3); -x_27 = l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11(x_3, x_26, x_12, x_13, x_14, x_15, x_16, x_19); -x_28 = lean_ctor_get(x_27, 0); -lean_inc(x_28); -x_29 = lean_ctor_get(x_27, 1); -lean_inc(x_29); -lean_dec(x_27); -x_30 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkIndPredBRecOn___lambda__4(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_28, x_12, x_13, x_14, x_15, x_16, x_29); -lean_dec(x_28); -return x_30; -} -} -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkIndPredBRecOn___lambda__6(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: -{ -lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; -lean_dec(x_9); -x_16 = lean_ctor_get(x_1, 4); -lean_inc(x_16); -x_17 = l_Lean_brecOnSuffix; -x_18 = lean_name_mk_string(x_16, x_17); -x_19 = lean_ctor_get(x_1, 5); -lean_inc(x_19); -x_20 = l_Lean_mkConst(x_18, x_19); -x_21 = lean_ctor_get(x_1, 6); -lean_inc(x_21); -x_22 = l_Lean_mkAppN(x_20, x_21); -lean_inc(x_2); -x_23 = l_Lean_mkApp(x_22, x_2); -lean_inc(x_3); -x_24 = l_Lean_mkAppN(x_23, x_3); -lean_inc(x_4); -x_25 = l_Lean_mkApp(x_24, x_4); -lean_inc(x_14); -lean_inc(x_13); -lean_inc(x_12); -lean_inc(x_11); -lean_inc(x_25); -x_26 = l_Lean_Meta_check(x_25, x_11, x_12, x_13, x_14, x_15); -if (lean_obj_tag(x_26) == 0) -{ -lean_object* x_27; lean_object* x_28; -x_27 = lean_ctor_get(x_26, 1); -lean_inc(x_27); -lean_dec(x_26); -lean_inc(x_14); -lean_inc(x_13); -lean_inc(x_12); -lean_inc(x_11); -lean_inc(x_25); -x_28 = lean_infer_type(x_25, x_11, x_12, x_13, x_14, x_27); -if (lean_obj_tag(x_28) == 0) -{ -lean_object* x_29; lean_object* x_30; uint8_t x_31; lean_object* x_32; lean_object* x_45; lean_object* x_46; lean_object* x_47; uint8_t x_48; -x_29 = lean_ctor_get(x_28, 0); -lean_inc(x_29); -x_30 = lean_ctor_get(x_28, 1); -lean_inc(x_30); -lean_dec(x_28); -x_45 = lean_st_ref_get(x_14, x_30); -x_46 = lean_ctor_get(x_45, 0); -lean_inc(x_46); -x_47 = lean_ctor_get(x_46, 3); -lean_inc(x_47); -lean_dec(x_46); -x_48 = lean_ctor_get_uint8(x_47, sizeof(void*)*1); -lean_dec(x_47); -if (x_48 == 0) -{ -lean_object* x_49; uint8_t x_50; -x_49 = lean_ctor_get(x_45, 1); -lean_inc(x_49); -lean_dec(x_45); -x_50 = 0; -x_31 = x_50; -x_32 = x_49; -goto block_44; -} -else -{ -lean_object* x_51; lean_object* x_52; lean_object* x_53; lean_object* x_54; uint8_t x_55; -x_51 = lean_ctor_get(x_45, 1); -lean_inc(x_51); -lean_dec(x_45); -lean_inc(x_5); -x_52 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__12(x_5, x_10, x_11, x_12, x_13, x_14, x_51); -x_53 = lean_ctor_get(x_52, 0); -lean_inc(x_53); -x_54 = lean_ctor_get(x_52, 1); -lean_inc(x_54); -lean_dec(x_52); -x_55 = lean_unbox(x_53); -lean_dec(x_53); -x_31 = x_55; -x_32 = x_54; -goto block_44; -} -block_44: -{ -if (x_31 == 0) -{ -lean_object* x_33; lean_object* x_34; -x_33 = lean_box(0); -x_34 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkIndPredBRecOn___lambda__5(x_3, x_4, x_5, x_29, x_6, x_1, x_2, x_7, x_8, x_25, x_33, x_10, x_11, x_12, x_13, x_14, x_32); -return x_34; -} -else -{ -lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; -lean_inc(x_25); -x_35 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_35, 0, x_25); -x_36 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__6___closed__2; -x_37 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_37, 0, x_36); -lean_ctor_set(x_37, 1, x_35); -x_38 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__6; -x_39 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_39, 0, x_37); -lean_ctor_set(x_39, 1, x_38); -lean_inc(x_5); -x_40 = l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11(x_5, x_39, x_10, x_11, x_12, x_13, x_14, x_32); -x_41 = lean_ctor_get(x_40, 0); -lean_inc(x_41); -x_42 = lean_ctor_get(x_40, 1); -lean_inc(x_42); -lean_dec(x_40); -x_43 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkIndPredBRecOn___lambda__5(x_3, x_4, x_5, x_29, x_6, x_1, x_2, x_7, x_8, x_25, x_41, x_10, x_11, x_12, x_13, x_14, x_42); -return x_43; -} -} -} -else -{ -uint8_t x_56; -lean_dec(x_25); -lean_dec(x_14); -lean_dec(x_13); -lean_dec(x_12); -lean_dec(x_11); -lean_dec(x_10); -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_56 = !lean_is_exclusive(x_28); -if (x_56 == 0) -{ -return x_28; -} -else -{ -lean_object* x_57; lean_object* x_58; lean_object* x_59; -x_57 = lean_ctor_get(x_28, 0); -x_58 = lean_ctor_get(x_28, 1); -lean_inc(x_58); -lean_inc(x_57); -lean_dec(x_28); -x_59 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_59, 0, x_57); -lean_ctor_set(x_59, 1, x_58); -return x_59; -} -} -} -else -{ -uint8_t x_60; -lean_dec(x_25); -lean_dec(x_14); -lean_dec(x_13); -lean_dec(x_12); -lean_dec(x_11); -lean_dec(x_10); -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_60 = !lean_is_exclusive(x_26); -if (x_60 == 0) -{ -return x_26; -} -else -{ -lean_object* x_61; lean_object* x_62; lean_object* x_63; -x_61 = lean_ctor_get(x_26, 0); -x_62 = lean_ctor_get(x_26, 1); -lean_inc(x_62); -lean_inc(x_61); -lean_dec(x_26); -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; -} -} -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkIndPredBRecOn___lambda__7(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: -{ -uint8_t x_15; uint8_t x_16; lean_object* x_17; -lean_dec(x_8); -x_15 = 0; -x_16 = 1; -lean_inc(x_10); -lean_inc(x_1); -x_17 = l_Lean_Meta_mkForallFVars(x_1, x_2, x_15, x_16, x_10, x_11, x_12, x_13, x_14); -if (lean_obj_tag(x_17) == 0) -{ -lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; -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 = lean_ctor_get(x_3, 7); -lean_inc(x_20); -lean_inc(x_4); -lean_inc(x_20); -x_21 = lean_array_push(x_20, x_4); -lean_inc(x_10); -x_22 = l_Lean_Meta_mkLambdaFVars(x_21, x_18, x_15, x_16, x_10, x_11, x_12, x_13, x_19); -if (lean_obj_tag(x_22) == 0) -{ -lean_object* x_23; lean_object* x_24; uint8_t x_25; lean_object* x_26; lean_object* x_39; lean_object* x_40; lean_object* x_41; uint8_t x_42; -x_23 = lean_ctor_get(x_22, 0); -lean_inc(x_23); -x_24 = lean_ctor_get(x_22, 1); -lean_inc(x_24); -lean_dec(x_22); -x_39 = lean_st_ref_get(x_13, x_24); -x_40 = lean_ctor_get(x_39, 0); -lean_inc(x_40); -x_41 = lean_ctor_get(x_40, 3); -lean_inc(x_41); -lean_dec(x_40); -x_42 = lean_ctor_get_uint8(x_41, sizeof(void*)*1); -lean_dec(x_41); -if (x_42 == 0) -{ -lean_object* x_43; -x_43 = lean_ctor_get(x_39, 1); -lean_inc(x_43); -lean_dec(x_39); -x_25 = x_15; -x_26 = x_43; -goto block_38; -} -else -{ -lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; uint8_t x_48; -x_44 = lean_ctor_get(x_39, 1); -lean_inc(x_44); -lean_dec(x_39); -lean_inc(x_5); -x_45 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__12(x_5, x_9, x_10, x_11, x_12, x_13, x_44); -x_46 = lean_ctor_get(x_45, 0); -lean_inc(x_46); -x_47 = lean_ctor_get(x_45, 1); -lean_inc(x_47); -lean_dec(x_45); -x_48 = lean_unbox(x_46); -lean_dec(x_46); -x_25 = x_48; -x_26 = x_47; -goto block_38; -} -block_38: -{ -if (x_25 == 0) -{ -lean_object* x_27; lean_object* x_28; -x_27 = lean_box(0); -x_28 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkIndPredBRecOn___lambda__6(x_3, x_23, x_20, x_4, x_5, x_6, x_7, x_1, x_27, x_9, x_10, x_11, x_12, x_13, x_26); -return x_28; -} -else -{ -lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; -lean_inc(x_23); -x_29 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_29, 0, x_23); -x_30 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__7___closed__2; -x_31 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_31, 0, x_30); -lean_ctor_set(x_31, 1, x_29); -x_32 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__6; -x_33 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_33, 0, x_31); -lean_ctor_set(x_33, 1, x_32); -lean_inc(x_5); -x_34 = l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11(x_5, x_33, x_9, x_10, x_11, x_12, x_13, x_26); -x_35 = lean_ctor_get(x_34, 0); -lean_inc(x_35); -x_36 = lean_ctor_get(x_34, 1); -lean_inc(x_36); -lean_dec(x_34); -x_37 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkIndPredBRecOn___lambda__6(x_3, x_23, x_20, x_4, x_5, x_6, x_7, x_1, x_35, x_9, x_10, x_11, x_12, x_13, x_36); -return x_37; -} -} -} -else -{ -uint8_t x_49; -lean_dec(x_20); -lean_dec(x_13); -lean_dec(x_12); -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -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_49 = !lean_is_exclusive(x_22); -if (x_49 == 0) -{ -return x_22; -} -else -{ -lean_object* x_50; lean_object* x_51; lean_object* x_52; -x_50 = lean_ctor_get(x_22, 0); -x_51 = lean_ctor_get(x_22, 1); -lean_inc(x_51); -lean_inc(x_50); -lean_dec(x_22); -x_52 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_52, 0, x_50); -lean_ctor_set(x_52, 1, x_51); -return x_52; -} -} -} -else -{ -uint8_t x_53; -lean_dec(x_13); -lean_dec(x_12); -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -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_53 = !lean_is_exclusive(x_17); -if (x_53 == 0) -{ -return x_17; -} -else -{ -lean_object* x_54; lean_object* x_55; lean_object* x_56; -x_54 = lean_ctor_get(x_17, 0); -x_55 = lean_ctor_get(x_17, 1); -lean_inc(x_55); -lean_inc(x_54); -lean_dec(x_17); -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_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkIndPredBRecOn(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 = lean_infer_type(x_3, 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; 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; lean_object* x_23; -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_Expr_headBeta(x_11); -x_14 = lean_ctor_get(x_2, 1); -lean_inc(x_14); -x_15 = lean_ctor_get(x_2, 2); -lean_inc(x_15); -x_16 = l_Lean_instInhabitedExpr; -x_17 = lean_array_get(x_16, x_14, x_15); -lean_dec(x_15); -x_18 = lean_array_get_size(x_14); -x_19 = lean_unsigned_to_nat(0u); -x_20 = lean_nat_dec_lt(x_19, x_18); -x_21 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___closed__6; -x_22 = lean_st_ref_get(x_8, x_12); -if (x_20 == 0) -{ -lean_object* x_59; -lean_dec(x_18); -lean_dec(x_14); -x_59 = l_Lean_Elab_Structural_State_addMatchers___default___closed__1; -x_23 = x_59; -goto block_58; -} -else -{ -uint8_t x_60; -x_60 = lean_nat_dec_le(x_18, x_18); -if (x_60 == 0) -{ -lean_object* x_61; -lean_dec(x_18); -lean_dec(x_14); -x_61 = l_Lean_Elab_Structural_State_addMatchers___default___closed__1; -x_23 = x_61; -goto block_58; -} -else -{ -size_t x_62; size_t x_63; lean_object* x_64; lean_object* x_65; -x_62 = 0; -x_63 = lean_usize_of_nat(x_18); -lean_dec(x_18); -x_64 = l_Lean_Elab_Structural_State_addMatchers___default___closed__1; -x_65 = l_Array_foldlMUnsafe_fold___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkIndPredBRecOn___spec__1(x_2, x_17, x_14, x_62, x_63, x_64); -lean_dec(x_14); -x_23 = x_65; -goto block_58; -} -} -block_58: -{ -uint8_t x_24; lean_object* x_25; lean_object* x_48; lean_object* x_49; uint8_t x_50; -x_48 = lean_ctor_get(x_22, 0); -lean_inc(x_48); -x_49 = lean_ctor_get(x_48, 3); -lean_inc(x_49); -lean_dec(x_48); -x_50 = lean_ctor_get_uint8(x_49, sizeof(void*)*1); -lean_dec(x_49); -if (x_50 == 0) -{ -lean_object* x_51; uint8_t x_52; -x_51 = lean_ctor_get(x_22, 1); -lean_inc(x_51); -lean_dec(x_22); -x_52 = 0; -x_24 = x_52; -x_25 = x_51; -goto block_47; -} -else -{ -lean_object* x_53; lean_object* x_54; lean_object* x_55; lean_object* x_56; uint8_t x_57; -x_53 = lean_ctor_get(x_22, 1); -lean_inc(x_53); -lean_dec(x_22); -x_54 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__12(x_21, x_4, x_5, x_6, x_7, x_8, x_53); -x_55 = lean_ctor_get(x_54, 0); -lean_inc(x_55); -x_56 = lean_ctor_get(x_54, 1); -lean_inc(x_56); -lean_dec(x_54); -x_57 = lean_unbox(x_55); -lean_dec(x_55); -x_24 = x_57; -x_25 = x_56; -goto block_47; -} -block_47: -{ -if (x_24 == 0) -{ -lean_object* x_26; lean_object* x_27; -x_26 = lean_box(0); -x_27 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkIndPredBRecOn___lambda__7(x_23, x_13, x_2, x_17, x_21, x_1, x_3, x_26, x_4, x_5, x_6, x_7, x_8, x_25); -return x_27; -} -else -{ -lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; -x_28 = lean_ctor_get(x_2, 0); -lean_inc(x_28); -x_29 = lean_array_to_list(lean_box(0), x_28); -x_30 = lean_box(0); -x_31 = l_List_mapTRAux___at_Lean_MessageData_instCoeListExprMessageData___spec__1(x_29, x_30); -x_32 = l_Lean_MessageData_ofList(x_31); -lean_dec(x_31); -x_33 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___closed__2; -x_34 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_34, 0, x_33); -lean_ctor_set(x_34, 1, x_32); -x_35 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___closed__4; -x_36 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_36, 0, x_34); -lean_ctor_set(x_36, 1, x_35); -lean_inc(x_23); -x_37 = lean_array_to_list(lean_box(0), x_23); -x_38 = l_List_mapTRAux___at_Lean_MessageData_instCoeListExprMessageData___spec__1(x_37, x_30); -x_39 = l_Lean_MessageData_ofList(x_38); -lean_dec(x_38); -x_40 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_40, 0, x_36); -lean_ctor_set(x_40, 1, x_39); -x_41 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__6; -x_42 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_42, 0, x_40); -lean_ctor_set(x_42, 1, x_41); -x_43 = l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11(x_21, x_42, x_4, x_5, x_6, x_7, x_8, x_25); -x_44 = lean_ctor_get(x_43, 0); -lean_inc(x_44); -x_45 = lean_ctor_get(x_43, 1); -lean_inc(x_45); -lean_dec(x_43); -x_46 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkIndPredBRecOn___lambda__7(x_23, x_13, x_2, x_17, x_21, x_1, x_3, x_44, x_4, x_5, x_6, x_7, x_8, x_45); -return x_46; -} -} -} -} -else -{ -uint8_t x_66; -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_66 = !lean_is_exclusive(x_10); -if (x_66 == 0) -{ -return x_10; -} -else -{ -lean_object* x_67; lean_object* x_68; lean_object* x_69; -x_67 = lean_ctor_get(x_10, 0); -x_68 = lean_ctor_get(x_10, 1); -lean_inc(x_68); -lean_inc(x_67); -lean_dec(x_10); -x_69 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_69, 0, x_67); -lean_ctor_set(x_69, 1, x_68); -return x_69; -} -} -} -} -lean_object* l_Array_foldlMUnsafe_fold___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkIndPredBRecOn___spec__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { -_start: -{ -size_t x_7; size_t x_8; lean_object* x_9; -x_7 = lean_unbox_usize(x_4); -lean_dec(x_4); -x_8 = lean_unbox_usize(x_5); -lean_dec(x_5); -x_9 = l_Array_foldlMUnsafe_fold___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkIndPredBRecOn___spec__1(x_1, x_2, x_3, x_7, x_8, x_6); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -return x_9; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkIndPredBRecOn___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) { -_start: -{ -lean_object* x_11; -x_11 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkIndPredBRecOn___lambda__1(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_1); -return x_11; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkIndPredBRecOn___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) { -_start: -{ -lean_object* x_12; -x_12 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkIndPredBRecOn___lambda__2(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_1); -return x_12; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkIndPredBRecOn___lambda__3___boxed(lean_object** _args) { -lean_object* x_1 = _args[0]; -lean_object* x_2 = _args[1]; -lean_object* x_3 = _args[2]; -lean_object* x_4 = _args[3]; -lean_object* x_5 = _args[4]; -lean_object* x_6 = _args[5]; -lean_object* x_7 = _args[6]; -lean_object* x_8 = _args[7]; -lean_object* x_9 = _args[8]; -lean_object* x_10 = _args[9]; -lean_object* x_11 = _args[10]; -lean_object* x_12 = _args[11]; -lean_object* x_13 = _args[12]; -lean_object* x_14 = _args[13]; -lean_object* x_15 = _args[14]; -lean_object* x_16 = _args[15]; -lean_object* x_17 = _args[16]; -_start: -{ -lean_object* x_18; -x_18 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkIndPredBRecOn___lambda__3(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_12, x_13, x_14, x_15, x_16, x_17); -lean_dec(x_11); -lean_dec(x_10); -return x_18; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkIndPredBRecOn___lambda__4___boxed(lean_object** _args) { -lean_object* x_1 = _args[0]; -lean_object* x_2 = _args[1]; -lean_object* x_3 = _args[2]; -lean_object* x_4 = _args[3]; -lean_object* x_5 = _args[4]; -lean_object* x_6 = _args[5]; -lean_object* x_7 = _args[6]; -lean_object* x_8 = _args[7]; -lean_object* x_9 = _args[8]; -lean_object* x_10 = _args[9]; -lean_object* x_11 = _args[10]; -lean_object* x_12 = _args[11]; -lean_object* x_13 = _args[12]; -lean_object* x_14 = _args[13]; -lean_object* x_15 = _args[14]; -lean_object* x_16 = _args[15]; -lean_object* x_17 = _args[16]; -_start: -{ -lean_object* x_18; -x_18 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkIndPredBRecOn___lambda__4(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_12, x_13, x_14, x_15, x_16, x_17); -lean_dec(x_11); -return x_18; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkIndPredBRecOn___lambda__5___boxed(lean_object** _args) { -lean_object* x_1 = _args[0]; -lean_object* x_2 = _args[1]; -lean_object* x_3 = _args[2]; -lean_object* x_4 = _args[3]; -lean_object* x_5 = _args[4]; -lean_object* x_6 = _args[5]; -lean_object* x_7 = _args[6]; -lean_object* x_8 = _args[7]; -lean_object* x_9 = _args[8]; -lean_object* x_10 = _args[9]; -lean_object* x_11 = _args[10]; -lean_object* x_12 = _args[11]; -lean_object* x_13 = _args[12]; -lean_object* x_14 = _args[13]; -lean_object* x_15 = _args[14]; -lean_object* x_16 = _args[15]; -lean_object* x_17 = _args[16]; -_start: -{ -lean_object* x_18; -x_18 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkIndPredBRecOn___lambda__5(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_12, x_13, x_14, x_15, x_16, x_17); -return x_18; -} -} -uint8_t l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_shouldBetaReduce(lean_object* x_1, lean_object* x_2) { -_start: -{ -uint8_t x_3; -x_3 = l_Lean_Expr_isHeadBetaTarget(x_1); -if (x_3 == 0) -{ -uint8_t x_4; -lean_dec(x_2); -x_4 = 0; -return x_4; -} -else -{ -lean_object* x_5; lean_object* x_6; size_t x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; -x_5 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_containsRecFn___lambda__1___boxed), 2, 1); -lean_closure_set(x_5, 0, x_2); -x_6 = l_Lean_Expr_getAppFn(x_1); -x_7 = 8192; -x_8 = l_Lean_Expr_FindImpl_initCache; -x_9 = l_Lean_Expr_FindImpl_findM_x3f_visit(x_5, x_7, x_6, x_8); -x_10 = lean_ctor_get(x_9, 0); -lean_inc(x_10); -lean_dec(x_9); -if (lean_obj_tag(x_10) == 0) -{ -uint8_t x_11; -x_11 = 0; -return x_11; -} -else -{ -uint8_t x_12; -lean_dec(x_10); -x_12 = 1; -return x_12; -} -} -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_shouldBetaReduce___boxed(lean_object* x_1, lean_object* x_2) { -_start: -{ -uint8_t x_3; lean_object* x_4; -x_3 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_shouldBetaReduce(x_1, x_2); -lean_dec(x_1); -x_4 = lean_box(x_3); -return x_4; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_preprocess___lambda__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { -_start: -{ -uint8_t x_6; -x_6 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_shouldBetaReduce(x_2, x_1); -if (x_6 == 0) -{ -lean_object* x_7; lean_object* x_8; -x_7 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_7, 0, x_2); -x_8 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_8, 0, x_7); -lean_ctor_set(x_8, 1, x_5); -return x_8; -} -else -{ -lean_object* x_9; lean_object* x_10; lean_object* x_11; -x_9 = l_Lean_Expr_headBeta(x_2); -x_10 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_10, 0, 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; -} -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_preprocess___lambda__2(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { -_start: -{ -lean_object* x_5; lean_object* x_6; -x_5 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_5, 0, x_1); -x_6 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_6, 0, x_5); -lean_ctor_set(x_6, 1, x_4); -return x_6; -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_preprocess___closed__1() { -_start: -{ -lean_object* x_1; -x_1 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_preprocess___lambda__2___boxed), 4, 0); -return x_1; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_preprocess(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { -_start: -{ -lean_object* x_6; lean_object* x_7; lean_object* x_8; -x_6 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_preprocess___lambda__1___boxed), 5, 1); -lean_closure_set(x_6, 0, x_2); -x_7 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_preprocess___closed__1; -x_8 = l_Lean_Core_transform___at_Lean_Core_betaReduce___spec__1(x_1, x_6, x_7, x_3, x_4, x_5); -return x_8; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_preprocess___lambda__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { -_start: -{ -lean_object* x_6; -x_6 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_preprocess___lambda__1(x_1, x_2, x_3, x_4, x_5); -lean_dec(x_4); -lean_dec(x_3); -return x_6; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_preprocess___lambda__2___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { -_start: -{ -lean_object* x_5; -x_5 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_preprocess___lambda__2(x_1, x_2, x_3, x_4); -lean_dec(x_3); -lean_dec(x_2); -return x_5; -} -} -lean_object* l_Lean_setEnv___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___spec__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { -_start: -{ -lean_object* x_8; lean_object* x_9; lean_object* x_10; uint8_t x_11; -x_8 = lean_st_ref_take(x_6, x_7); -x_9 = lean_ctor_get(x_8, 0); -lean_inc(x_9); -x_10 = lean_ctor_get(x_8, 1); -lean_inc(x_10); -lean_dec(x_8); -x_11 = !lean_is_exclusive(x_9); -if (x_11 == 0) -{ -lean_object* x_12; lean_object* x_13; uint8_t x_14; -x_12 = lean_ctor_get(x_9, 0); -lean_dec(x_12); -lean_ctor_set(x_9, 0, x_1); -x_13 = lean_st_ref_set(x_6, x_9, x_10); -x_14 = !lean_is_exclusive(x_13); -if (x_14 == 0) -{ -lean_object* x_15; lean_object* x_16; -x_15 = lean_ctor_get(x_13, 0); -lean_dec(x_15); -x_16 = lean_box(0); -lean_ctor_set(x_13, 0, x_16); -return x_13; -} -else -{ -lean_object* x_17; lean_object* x_18; lean_object* x_19; -x_17 = lean_ctor_get(x_13, 1); -lean_inc(x_17); -lean_dec(x_13); -x_18 = lean_box(0); -x_19 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_19, 0, x_18); -lean_ctor_set(x_19, 1, x_17); -return x_19; -} -} -else -{ -lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; -x_20 = lean_ctor_get(x_9, 1); -x_21 = lean_ctor_get(x_9, 2); -x_22 = lean_ctor_get(x_9, 3); -lean_inc(x_22); -lean_inc(x_21); -lean_inc(x_20); -lean_dec(x_9); -x_23 = lean_alloc_ctor(0, 4, 0); -lean_ctor_set(x_23, 0, x_1); -lean_ctor_set(x_23, 1, x_20); -lean_ctor_set(x_23, 2, x_21); -lean_ctor_set(x_23, 3, x_22); -x_24 = lean_st_ref_set(x_6, x_23, x_10); -x_25 = lean_ctor_get(x_24, 1); -lean_inc(x_25); -if (lean_is_exclusive(x_24)) { - lean_ctor_release(x_24, 0); - lean_ctor_release(x_24, 1); - x_26 = x_24; -} else { - lean_dec_ref(x_24); - x_26 = lean_box(0); -} -x_27 = lean_box(0); -if (lean_is_scalar(x_26)) { - x_28 = lean_alloc_ctor(0, 2, 0); -} else { - x_28 = x_26; -} -lean_ctor_set(x_28, 0, x_27); -lean_ctor_set(x_28, 1, x_25); -return x_28; -} -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___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) { -_start: -{ -lean_object* x_11; -lean_inc(x_1); -x_11 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_ensureNoRecFn(x_1, x_2, 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; lean_object* x_14; uint8_t x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; -x_13 = lean_ctor_get(x_11, 0); -x_14 = lean_ctor_get(x_3, 0); -x_15 = lean_ctor_get_uint8(x_3, sizeof(void*)*6); -x_16 = lean_ctor_get(x_3, 1); -x_17 = lean_ctor_get(x_3, 2); -x_18 = lean_ctor_get(x_3, 4); -lean_inc(x_18); -lean_inc(x_17); -lean_inc(x_16); -lean_inc(x_14); -x_19 = lean_alloc_ctor(0, 6, 1); -lean_ctor_set(x_19, 0, x_14); -lean_ctor_set(x_19, 1, x_16); -lean_ctor_set(x_19, 2, x_17); -lean_ctor_set(x_19, 3, x_1); -lean_ctor_set(x_19, 4, x_18); -lean_ctor_set(x_19, 5, x_13); -lean_ctor_set_uint8(x_19, sizeof(void*)*6, x_15); -lean_ctor_set(x_11, 0, x_19); -return x_11; -} -else -{ -lean_object* x_20; lean_object* x_21; lean_object* x_22; uint8_t x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; -x_20 = lean_ctor_get(x_11, 0); -x_21 = lean_ctor_get(x_11, 1); -lean_inc(x_21); -lean_inc(x_20); -lean_dec(x_11); -x_22 = lean_ctor_get(x_3, 0); -x_23 = lean_ctor_get_uint8(x_3, sizeof(void*)*6); -x_24 = lean_ctor_get(x_3, 1); -x_25 = lean_ctor_get(x_3, 2); -x_26 = lean_ctor_get(x_3, 4); -lean_inc(x_26); -lean_inc(x_25); -lean_inc(x_24); -lean_inc(x_22); -x_27 = lean_alloc_ctor(0, 6, 1); -lean_ctor_set(x_27, 0, x_22); -lean_ctor_set(x_27, 1, x_24); -lean_ctor_set(x_27, 2, x_25); -lean_ctor_set(x_27, 3, x_1); -lean_ctor_set(x_27, 4, x_26); -lean_ctor_set(x_27, 5, x_20); -lean_ctor_set_uint8(x_27, sizeof(void*)*6, x_23); -x_28 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_28, 0, x_27); -lean_ctor_set(x_28, 1, x_21); -return x_28; -} -} -else -{ -uint8_t x_29; -lean_dec(x_1); -x_29 = !lean_is_exclusive(x_11); -if (x_29 == 0) -{ -return x_11; -} -else -{ -lean_object* x_30; lean_object* x_31; lean_object* x_32; -x_30 = lean_ctor_get(x_11, 0); -x_31 = lean_ctor_get(x_11, 1); -lean_inc(x_31); -lean_inc(x_30); -lean_dec(x_11); -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; -} -} -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___lambda__2___closed__1() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string("result: "); -return x_1; -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___lambda__2___closed__2() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___lambda__2___closed__1; -x_2 = l_Lean_stringToMessageData(x_1); -return x_2; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___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) { -_start: -{ -uint8_t x_12; uint8_t x_13; lean_object* x_14; -x_12 = 0; -x_13 = 1; -lean_inc(x_7); -x_14 = l_Lean_Meta_mkLambdaFVars(x_1, x_5, x_12, x_13, x_7, x_8, x_9, x_10, x_11); -if (lean_obj_tag(x_14) == 0) -{ -lean_object* x_15; lean_object* x_16; uint8_t x_17; lean_object* x_18; lean_object* x_31; lean_object* x_32; lean_object* x_33; uint8_t x_34; -x_15 = lean_ctor_get(x_14, 0); -lean_inc(x_15); -x_16 = lean_ctor_get(x_14, 1); -lean_inc(x_16); -lean_dec(x_14); -x_31 = lean_st_ref_get(x_10, x_16); -x_32 = lean_ctor_get(x_31, 0); -lean_inc(x_32); -x_33 = lean_ctor_get(x_32, 3); -lean_inc(x_33); -lean_dec(x_32); -x_34 = lean_ctor_get_uint8(x_33, sizeof(void*)*1); -lean_dec(x_33); -if (x_34 == 0) -{ -lean_object* x_35; -x_35 = lean_ctor_get(x_31, 1); -lean_inc(x_35); -lean_dec(x_31); -x_17 = x_12; -x_18 = x_35; -goto block_30; -} -else -{ -lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; uint8_t x_40; -x_36 = lean_ctor_get(x_31, 1); -lean_inc(x_36); -lean_dec(x_31); -lean_inc(x_4); -x_37 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__12(x_4, x_6, x_7, x_8, x_9, x_10, x_36); -x_38 = lean_ctor_get(x_37, 0); -lean_inc(x_38); -x_39 = lean_ctor_get(x_37, 1); -lean_inc(x_39); -lean_dec(x_37); -x_40 = lean_unbox(x_38); -lean_dec(x_38); -x_17 = x_40; -x_18 = x_39; -goto block_30; -} -block_30: -{ -if (x_17 == 0) -{ -lean_object* x_19; lean_object* x_20; -lean_dec(x_4); -x_19 = lean_box(0); -x_20 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___lambda__1(x_2, x_15, x_3, x_19, x_6, x_7, x_8, x_9, x_10, x_18); -lean_dec(x_6); -return x_20; -} -else -{ -lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; -lean_inc(x_15); -x_21 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_21, 0, x_15); -x_22 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___lambda__2___closed__2; -x_23 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_23, 0, x_22); -lean_ctor_set(x_23, 1, x_21); -x_24 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__6; -x_25 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_25, 0, x_23); -lean_ctor_set(x_25, 1, x_24); -x_26 = l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11(x_4, x_25, x_6, x_7, x_8, x_9, x_10, x_18); -x_27 = lean_ctor_get(x_26, 0); -lean_inc(x_27); -x_28 = lean_ctor_get(x_26, 1); -lean_inc(x_28); -lean_dec(x_26); -x_29 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___lambda__1(x_2, x_15, x_3, x_27, x_6, x_7, x_8, x_9, x_10, x_28); -lean_dec(x_6); -lean_dec(x_27); -return x_29; -} -} -} -else -{ -uint8_t x_41; -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_2); -x_41 = !lean_is_exclusive(x_14); -if (x_41 == 0) -{ -return x_14; -} -else -{ -lean_object* x_42; lean_object* x_43; lean_object* x_44; -x_42 = lean_ctor_get(x_14, 0); -x_43 = lean_ctor_get(x_14, 1); -lean_inc(x_43); -lean_inc(x_42); -lean_dec(x_14); -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; -} -} -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___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_object* x_10, lean_object* x_11, lean_object* x_12) { -_start: -{ -uint8_t x_13; -x_13 = lean_ctor_get_uint8(x_6, sizeof(void*)*8 + 1); -if (x_13 == 0) -{ -lean_object* x_14; -lean_inc(x_11); -lean_inc(x_10); -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -lean_inc(x_2); -x_14 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn(x_2, x_6, x_5, x_7, x_8, x_9, x_10, x_11, x_12); -if (lean_obj_tag(x_14) == 0) -{ -lean_object* x_15; lean_object* x_16; lean_object* x_17; -x_15 = lean_ctor_get(x_14, 0); -lean_inc(x_15); -x_16 = lean_ctor_get(x_14, 1); -lean_inc(x_16); -lean_dec(x_14); -x_17 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___lambda__2(x_1, x_2, x_3, x_4, x_15, x_7, x_8, x_9, x_10, x_11, x_16); -return x_17; -} -else -{ -uint8_t x_18; -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_4); -lean_dec(x_2); -lean_dec(x_1); -x_18 = !lean_is_exclusive(x_14); -if (x_18 == 0) -{ -return x_14; -} -else -{ -lean_object* x_19; lean_object* x_20; lean_object* x_21; -x_19 = lean_ctor_get(x_14, 0); -x_20 = lean_ctor_get(x_14, 1); -lean_inc(x_20); -lean_inc(x_19); -lean_dec(x_14); -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; -} -} -} -else -{ -lean_object* x_22; -lean_inc(x_11); -lean_inc(x_10); -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -lean_inc(x_2); -x_22 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkIndPredBRecOn(x_2, x_6, x_5, x_7, x_8, x_9, x_10, x_11, x_12); -if (lean_obj_tag(x_22) == 0) -{ -lean_object* x_23; lean_object* x_24; lean_object* x_25; -x_23 = lean_ctor_get(x_22, 0); -lean_inc(x_23); -x_24 = lean_ctor_get(x_22, 1); -lean_inc(x_24); -lean_dec(x_22); -x_25 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___lambda__2(x_1, x_2, x_3, x_4, x_23, x_7, x_8, x_9, x_10, x_11, x_24); -return x_25; -} -else -{ -uint8_t x_26; -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_4); -lean_dec(x_2); -lean_dec(x_1); -x_26 = !lean_is_exclusive(x_22); -if (x_26 == 0) -{ -return x_22; -} -else -{ -lean_object* x_27; lean_object* x_28; lean_object* x_29; -x_27 = lean_ctor_get(x_22, 0); -x_28 = lean_ctor_get(x_22, 1); -lean_inc(x_28); -lean_inc(x_27); -lean_dec(x_22); -x_29 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_29, 0, x_27); -lean_ctor_set(x_29, 1, x_28); -return x_29; -} -} -} -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___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, lean_object* x_11, lean_object* x_12, lean_object* x_13) { -_start: -{ -lean_object* x_14; lean_object* x_15; -lean_inc(x_1); -x_14 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___lambda__3___boxed), 12, 5); -lean_closure_set(x_14, 0, x_1); -lean_closure_set(x_14, 1, x_2); -lean_closure_set(x_14, 2, x_3); -lean_closure_set(x_14, 3, x_4); -lean_closure_set(x_14, 4, x_5); -lean_inc(x_6); -x_15 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg(x_6, x_1, x_14, x_6, x_8, x_9, x_10, x_11, x_12, x_13); -return x_15; -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___lambda__5___closed__1() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string("numFixed: "); -return x_1; -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___lambda__5___closed__2() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___lambda__5___closed__1; -x_2 = l_Lean_stringToMessageData(x_1); -return x_2; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___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, lean_object* x_10, lean_object* x_11, lean_object* x_12) { -_start: -{ -lean_object* x_13; -lean_dec(x_6); -lean_inc(x_11); -lean_inc(x_10); -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_3); -lean_inc(x_2); -lean_inc(x_1); -x_13 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_getFixedPrefix(x_1, x_2, x_3, x_8, x_9, x_10, x_11, x_12); -if (lean_obj_tag(x_13) == 0) -{ -lean_object* x_14; lean_object* x_15; uint8_t x_16; lean_object* x_17; lean_object* x_32; lean_object* x_33; lean_object* x_34; uint8_t x_35; -x_14 = lean_ctor_get(x_13, 0); -lean_inc(x_14); -x_15 = lean_ctor_get(x_13, 1); -lean_inc(x_15); -lean_dec(x_13); -x_32 = lean_st_ref_get(x_11, x_15); -x_33 = lean_ctor_get(x_32, 0); -lean_inc(x_33); -x_34 = lean_ctor_get(x_33, 3); -lean_inc(x_34); -lean_dec(x_33); -x_35 = lean_ctor_get_uint8(x_34, sizeof(void*)*1); -lean_dec(x_34); -if (x_35 == 0) -{ -lean_object* x_36; uint8_t x_37; -x_36 = lean_ctor_get(x_32, 1); -lean_inc(x_36); -lean_dec(x_32); -x_37 = 0; -x_16 = x_37; -x_17 = x_36; -goto block_31; -} -else -{ -lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; uint8_t x_42; -x_38 = lean_ctor_get(x_32, 1); -lean_inc(x_38); -lean_dec(x_32); -lean_inc(x_5); -x_39 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__12(x_5, x_7, x_8, x_9, x_10, x_11, x_38); -x_40 = lean_ctor_get(x_39, 0); -lean_inc(x_40); -x_41 = lean_ctor_get(x_39, 1); -lean_inc(x_41); -lean_dec(x_39); -x_42 = lean_unbox(x_40); -lean_dec(x_40); -x_16 = x_42; -x_17 = x_41; -goto block_31; -} -block_31: -{ -if (x_16 == 0) -{ -lean_object* x_18; lean_object* x_19; -x_18 = lean_box(0); -x_19 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___lambda__4(x_2, x_1, x_4, x_5, x_3, x_14, x_18, x_7, x_8, x_9, x_10, x_11, x_17); -return x_19; -} -else -{ -lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; -lean_inc(x_14); -x_20 = l_Nat_repr(x_14); -x_21 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_21, 0, x_20); -x_22 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_22, 0, x_21); -x_23 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___lambda__5___closed__2; -x_24 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_24, 0, x_23); -lean_ctor_set(x_24, 1, x_22); -x_25 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__6; -x_26 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_26, 0, x_24); -lean_ctor_set(x_26, 1, x_25); -lean_inc(x_5); -x_27 = l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11(x_5, x_26, x_7, x_8, x_9, x_10, x_11, x_17); -x_28 = lean_ctor_get(x_27, 0); -lean_inc(x_28); -x_29 = lean_ctor_get(x_27, 1); -lean_inc(x_29); -lean_dec(x_27); -x_30 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___lambda__4(x_2, x_1, x_4, x_5, x_3, x_14, x_28, x_7, x_8, x_9, x_10, x_11, x_29); -lean_dec(x_28); -return x_30; -} -} -} -else -{ -uint8_t x_43; -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_43 = !lean_is_exclusive(x_13); -if (x_43 == 0) -{ -return x_13; -} -else -{ -lean_object* x_44; lean_object* x_45; lean_object* x_46; -x_44 = lean_ctor_get(x_13, 0); -x_45 = lean_ctor_get(x_13, 1); -lean_inc(x_45); -lean_inc(x_44); -lean_dec(x_13); -x_46 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_46, 0, x_44); -lean_ctor_set(x_46, 1, x_45); -return x_46; -} -} -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___lambda__6___closed__1() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string(" "); -return x_1; -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___lambda__6___closed__2() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___lambda__6___closed__1; -x_2 = l_Lean_stringToMessageData(x_1); -return x_2; -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___lambda__6___closed__3() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string(" :=\n"); -return x_1; -} -} -static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___lambda__6___closed__4() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___lambda__6___closed__3; -x_2 = l_Lean_stringToMessageData(x_1); -return x_2; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___lambda__6(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_7); -x_10 = l_Lean_Elab_addAsAxiom(x_1, 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; -x_11 = lean_ctor_get(x_10, 1); -lean_inc(x_11); -lean_dec(x_10); -x_12 = lean_ctor_get(x_1, 3); -lean_inc(x_12); -lean_inc(x_8); -lean_inc(x_7); -lean_inc(x_12); -x_13 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_preprocess(x_3, x_12, x_7, x_8, x_11); -if (lean_obj_tag(x_13) == 0) -{ -lean_object* x_14; lean_object* x_15; lean_object* x_16; uint8_t x_17; lean_object* x_18; lean_object* x_41; lean_object* x_42; lean_object* x_43; uint8_t x_44; -x_14 = lean_ctor_get(x_13, 0); -lean_inc(x_14); -x_15 = lean_ctor_get(x_13, 1); -lean_inc(x_15); -lean_dec(x_13); -x_16 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___closed__6; -x_41 = lean_st_ref_get(x_8, x_15); -x_42 = lean_ctor_get(x_41, 0); -lean_inc(x_42); -x_43 = lean_ctor_get(x_42, 3); -lean_inc(x_43); -lean_dec(x_42); -x_44 = lean_ctor_get_uint8(x_43, sizeof(void*)*1); -lean_dec(x_43); -if (x_44 == 0) -{ -lean_object* x_45; uint8_t x_46; -x_45 = lean_ctor_get(x_41, 1); -lean_inc(x_45); -lean_dec(x_41); -x_46 = 0; -x_17 = x_46; -x_18 = x_45; -goto block_40; -} -else -{ -lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; uint8_t x_51; -x_47 = lean_ctor_get(x_41, 1); -lean_inc(x_47); -lean_dec(x_41); -x_48 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__12(x_16, x_4, x_5, x_6, x_7, x_8, x_47); -x_49 = lean_ctor_get(x_48, 0); -lean_inc(x_49); -x_50 = lean_ctor_get(x_48, 1); -lean_inc(x_50); -lean_dec(x_48); -x_51 = lean_unbox(x_49); -lean_dec(x_49); -x_17 = x_51; -x_18 = x_50; -goto block_40; -} -block_40: -{ -if (x_17 == 0) -{ -lean_object* x_19; lean_object* x_20; -x_19 = lean_box(0); -x_20 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___lambda__5(x_12, x_2, x_14, x_1, x_16, x_19, x_4, x_5, x_6, x_7, x_8, x_18); -return x_20; -} -else -{ -lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; -lean_inc(x_12); -x_21 = lean_alloc_ctor(4, 1, 0); -lean_ctor_set(x_21, 0, x_12); -x_22 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__6; -x_23 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_23, 0, x_22); -lean_ctor_set(x_23, 1, x_21); -x_24 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___lambda__6___closed__2; -x_25 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_25, 0, x_23); -lean_ctor_set(x_25, 1, x_24); -lean_inc(x_2); -x_26 = lean_array_to_list(lean_box(0), x_2); -x_27 = lean_box(0); -x_28 = l_List_mapTRAux___at_Lean_MessageData_instCoeListExprMessageData___spec__1(x_26, x_27); -x_29 = l_Lean_MessageData_ofList(x_28); -lean_dec(x_28); -x_30 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_30, 0, x_25); -lean_ctor_set(x_30, 1, x_29); -x_31 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___lambda__6___closed__4; -x_32 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_32, 0, x_30); -lean_ctor_set(x_32, 1, x_31); -lean_inc(x_14); -x_33 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_33, 0, x_14); -x_34 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_34, 0, x_32); -lean_ctor_set(x_34, 1, x_33); -x_35 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_35, 0, x_34); -lean_ctor_set(x_35, 1, x_22); -x_36 = l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11(x_16, x_35, x_4, x_5, x_6, x_7, x_8, x_18); -x_37 = lean_ctor_get(x_36, 0); -lean_inc(x_37); -x_38 = lean_ctor_get(x_36, 1); -lean_inc(x_38); -lean_dec(x_36); -x_39 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___lambda__5(x_12, x_2, x_14, x_1, x_16, x_37, x_4, x_5, x_6, x_7, x_8, x_38); -return x_39; -} -} -} -else -{ -uint8_t x_52; -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_2); -lean_dec(x_1); -x_52 = !lean_is_exclusive(x_13); -if (x_52 == 0) -{ -return x_13; -} -else -{ -lean_object* x_53; lean_object* x_54; lean_object* x_55; -x_53 = lean_ctor_get(x_13, 0); -x_54 = lean_ctor_get(x_13, 1); -lean_inc(x_54); -lean_inc(x_53); -lean_dec(x_13); -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; -} -} -} -else -{ -uint8_t x_56; -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_56 = !lean_is_exclusive(x_10); -if (x_56 == 0) -{ -return x_10; -} -else -{ -lean_object* x_57; lean_object* x_58; lean_object* x_59; -x_57 = lean_ctor_get(x_10, 0); -x_58 = lean_ctor_get(x_10, 1); -lean_inc(x_58); -lean_inc(x_57); -lean_dec(x_10); -x_59 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_59, 0, x_57); -lean_ctor_set(x_59, 1, x_58); -return x_59; -} -} -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion(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; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; -x_8 = lean_ctor_get(x_1, 5); -lean_inc(x_8); -x_9 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___lambda__6), 9, 1); -lean_closure_set(x_9, 0, x_1); -x_10 = lean_st_ref_get(x_6, x_7); -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 = lean_ctor_get(x_11, 0); -lean_inc(x_13); -lean_dec(x_11); -lean_inc(x_6); -lean_inc(x_5); -lean_inc(x_4); -lean_inc(x_3); -lean_inc(x_2); -x_14 = l_Lean_Meta_lambdaTelescope___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__13___rarg(x_8, x_9, x_2, x_3, x_4, x_5, x_6, x_12); -if (lean_obj_tag(x_14) == 0) -{ -lean_object* x_15; lean_object* x_16; lean_object* x_17; uint8_t x_18; -x_15 = lean_ctor_get(x_14, 0); -lean_inc(x_15); -x_16 = lean_ctor_get(x_14, 1); -lean_inc(x_16); -lean_dec(x_14); -x_17 = l_Lean_setEnv___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___spec__1(x_13, x_2, x_3, x_4, x_5, x_6, x_16); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -x_18 = !lean_is_exclusive(x_17); -if (x_18 == 0) -{ -lean_object* x_19; -x_19 = lean_ctor_get(x_17, 0); -lean_dec(x_19); -lean_ctor_set(x_17, 0, x_15); -return x_17; -} -else -{ -lean_object* x_20; lean_object* x_21; -x_20 = lean_ctor_get(x_17, 1); -lean_inc(x_20); -lean_dec(x_17); -x_21 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_21, 0, x_15); -lean_ctor_set(x_21, 1, x_20); -return x_21; -} -} -else -{ -lean_object* x_22; lean_object* x_23; lean_object* x_24; uint8_t x_25; -x_22 = lean_ctor_get(x_14, 0); -lean_inc(x_22); -x_23 = lean_ctor_get(x_14, 1); -lean_inc(x_23); -lean_dec(x_14); -x_24 = l_Lean_setEnv___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___spec__1(x_13, x_2, x_3, x_4, x_5, x_6, x_23); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -x_25 = !lean_is_exclusive(x_24); -if (x_25 == 0) -{ -lean_object* x_26; -x_26 = lean_ctor_get(x_24, 0); -lean_dec(x_26); -lean_ctor_set_tag(x_24, 1); -lean_ctor_set(x_24, 0, x_22); -return x_24; -} -else -{ -lean_object* x_27; lean_object* x_28; -x_27 = lean_ctor_get(x_24, 1); -lean_inc(x_27); -lean_dec(x_24); -x_28 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_28, 0, x_22); -lean_ctor_set(x_28, 1, x_27); -return x_28; -} -} -} -} -lean_object* l_Lean_setEnv___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___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) { -_start: -{ -lean_object* x_8; -x_8 = l_Lean_setEnv___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___spec__1(x_1, x_2, x_3, x_4, x_5, x_6, x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -return x_8; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___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) { -_start: -{ -lean_object* x_11; -x_11 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___lambda__1(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -return x_11; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___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) { -_start: -{ -lean_object* x_12; -x_12 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___lambda__2(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_3); -return x_12; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___lambda__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) { -_start: -{ -lean_object* x_13; -x_13 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___lambda__3(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_12); -lean_dec(x_3); -return x_13; -} -} -lean_object* l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___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, lean_object* x_11, lean_object* x_12, lean_object* x_13) { -_start: -{ -lean_object* x_14; -x_14 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___lambda__4(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_12, x_13); -lean_dec(x_7); -return x_14; -} -} -lean_object* l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit_match__1___rarg(uint8_t x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { -_start: -{ -if (x_1 == 0) -{ -lean_object* x_5; lean_object* x_6; -lean_dec(x_3); -x_5 = lean_box(x_1); -x_6 = lean_apply_2(x_4, x_5, x_2); -return x_6; -} -else -{ -if (lean_obj_tag(x_2) == 0) -{ -lean_object* x_7; lean_object* x_8; -lean_dec(x_3); -x_7 = lean_box(x_1); -x_8 = lean_apply_2(x_4, x_7, x_2); -return x_8; -} -else -{ -lean_object* x_9; lean_object* x_10; -lean_dec(x_4); -x_9 = lean_ctor_get(x_2, 0); -lean_inc(x_9); -lean_dec(x_2); -x_10 = lean_apply_1(x_3, x_9); -return x_10; -} -} -} -} -lean_object* l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit_match__1(lean_object* x_1) { -_start: -{ -lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit_match__1___rarg___boxed), 4, 0); -return x_2; -} -} -lean_object* l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit_match__1___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { -_start: -{ -uint8_t x_5; lean_object* x_6; -x_5 = lean_unbox(x_1); -lean_dec(x_1); -x_6 = l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit_match__1___rarg(x_5, x_2, x_3, x_4); -return x_6; -} -} -lean_object* l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__1(lean_object* x_1, lean_object* x_2, size_t x_3, size_t 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; -x_11 = x_4 < x_3; -if (x_11 == 0) -{ -lean_object* x_12; lean_object* x_13; -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_2); -lean_dec(x_1); -x_12 = x_5; -x_13 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_13, 0, x_12); -lean_ctor_set(x_13, 1, x_10); -return x_13; -} -else -{ -lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; -x_14 = lean_array_uget(x_5, x_4); -x_15 = lean_unsigned_to_nat(0u); -x_16 = lean_array_uset(x_5, x_4, x_15); -x_17 = x_14; -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -lean_inc(x_6); -lean_inc(x_2); -lean_inc(x_1); -x_18 = l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit(x_1, x_2, x_17, x_6, x_7, x_8, x_9, x_10); -if (lean_obj_tag(x_18) == 0) -{ -lean_object* x_19; lean_object* x_20; size_t x_21; size_t x_22; lean_object* x_23; lean_object* x_24; -x_19 = lean_ctor_get(x_18, 0); -lean_inc(x_19); -x_20 = lean_ctor_get(x_18, 1); -lean_inc(x_20); -lean_dec(x_18); -x_21 = 1; -x_22 = x_4 + x_21; -x_23 = x_19; -x_24 = lean_array_uset(x_16, x_4, x_23); -x_4 = x_22; -x_5 = x_24; -x_10 = x_20; -goto _start; -} -else -{ -uint8_t x_26; -lean_dec(x_16); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_2); -lean_dec(x_1); -x_26 = !lean_is_exclusive(x_18); -if (x_26 == 0) -{ -return x_18; -} -else -{ -lean_object* x_27; lean_object* x_28; lean_object* x_29; -x_27 = lean_ctor_get(x_18, 0); -x_28 = lean_ctor_get(x_18, 1); -lean_inc(x_28); -lean_inc(x_27); -lean_dec(x_18); -x_29 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_29, 0, x_27); -lean_ctor_set(x_29, 1, x_28); -return x_29; -} -} -} -} -} -static lean_object* _init_l_Lean_Expr_withAppAux___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__2___boxed__const__1() { -_start: -{ -size_t x_1; lean_object* x_2; -x_1 = 0; -x_2 = lean_box_usize(x_1); -return x_2; -} -} -lean_object* l_Lean_Expr_withAppAux___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__2(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10) { -_start: -{ -if (lean_obj_tag(x_3) == 5) -{ -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_3, 0); -lean_inc(x_11); -x_12 = lean_ctor_get(x_3, 1); -lean_inc(x_12); -lean_dec(x_3); -x_13 = lean_array_set(x_4, x_5, x_12); -x_14 = lean_unsigned_to_nat(1u); -x_15 = lean_nat_sub(x_5, x_14); -lean_dec(x_5); -x_3 = x_11; -x_4 = x_13; -x_5 = x_15; -goto _start; -} -else -{ -lean_object* x_17; -lean_dec(x_5); -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -lean_inc(x_6); -lean_inc(x_2); -lean_inc(x_1); -x_17 = l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit(x_1, x_2, x_3, x_6, x_7, x_8, x_9, x_10); -if (lean_obj_tag(x_17) == 0) -{ -lean_object* x_18; lean_object* x_19; lean_object* x_20; size_t x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; -x_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 = lean_array_get_size(x_4); -x_21 = lean_usize_of_nat(x_20); -lean_dec(x_20); -x_22 = x_4; -x_23 = lean_box_usize(x_21); -x_24 = l_Lean_Expr_withAppAux___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__2___boxed__const__1; -x_25 = lean_alloc_closure((void*)(l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__1___boxed), 10, 5); -lean_closure_set(x_25, 0, x_1); -lean_closure_set(x_25, 1, x_2); -lean_closure_set(x_25, 2, x_23); -lean_closure_set(x_25, 3, x_24); -lean_closure_set(x_25, 4, x_22); -x_26 = x_25; -x_27 = lean_apply_5(x_26, x_6, x_7, x_8, x_9, x_19); -if (lean_obj_tag(x_27) == 0) -{ -uint8_t x_28; -x_28 = !lean_is_exclusive(x_27); -if (x_28 == 0) -{ -lean_object* x_29; lean_object* x_30; -x_29 = lean_ctor_get(x_27, 0); -x_30 = l_Lean_mkAppN(x_18, x_29); -lean_ctor_set(x_27, 0, x_30); -return x_27; -} -else -{ -lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; -x_31 = lean_ctor_get(x_27, 0); -x_32 = lean_ctor_get(x_27, 1); -lean_inc(x_32); -lean_inc(x_31); -lean_dec(x_27); -x_33 = l_Lean_mkAppN(x_18, x_31); -x_34 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_34, 0, x_33); -lean_ctor_set(x_34, 1, x_32); -return x_34; -} -} -else -{ -uint8_t x_35; -lean_dec(x_18); -x_35 = !lean_is_exclusive(x_27); -if (x_35 == 0) -{ -return x_27; -} -else -{ -lean_object* x_36; lean_object* x_37; lean_object* x_38; -x_36 = lean_ctor_get(x_27, 0); -x_37 = lean_ctor_get(x_27, 1); -lean_inc(x_37); -lean_inc(x_36); -lean_dec(x_27); -x_38 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_38, 0, x_36); -lean_ctor_set(x_38, 1, x_37); -return x_38; -} -} -} -else -{ -uint8_t x_39; -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_4); -lean_dec(x_2); -lean_dec(x_1); -x_39 = !lean_is_exclusive(x_17); -if (x_39 == 0) -{ -return x_17; -} -else -{ -lean_object* x_40; lean_object* x_41; lean_object* x_42; -x_40 = lean_ctor_get(x_17, 0); -x_41 = lean_ctor_get(x_17, 1); -lean_inc(x_41); -lean_inc(x_40); -lean_dec(x_17); -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; -} -} -} -} -} -lean_object* l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__3(lean_object* x_1, lean_object* x_2, size_t x_3, size_t 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; -x_11 = x_4 < x_3; -if (x_11 == 0) -{ -lean_object* x_12; lean_object* x_13; -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_2); -lean_dec(x_1); -x_12 = x_5; -x_13 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_13, 0, x_12); -lean_ctor_set(x_13, 1, x_10); -return x_13; -} -else -{ -lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; -x_14 = lean_array_uget(x_5, x_4); -x_15 = lean_unsigned_to_nat(0u); -x_16 = lean_array_uset(x_5, x_4, x_15); -x_17 = x_14; -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -lean_inc(x_6); -lean_inc(x_2); -lean_inc(x_1); -x_18 = l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit(x_1, x_2, x_17, x_6, x_7, x_8, x_9, x_10); -if (lean_obj_tag(x_18) == 0) -{ -lean_object* x_19; lean_object* x_20; size_t x_21; size_t x_22; lean_object* x_23; lean_object* x_24; -x_19 = lean_ctor_get(x_18, 0); -lean_inc(x_19); -x_20 = lean_ctor_get(x_18, 1); -lean_inc(x_20); -lean_dec(x_18); -x_21 = 1; -x_22 = x_4 + x_21; -x_23 = x_19; -x_24 = lean_array_uset(x_16, x_4, x_23); -x_4 = x_22; -x_5 = x_24; -x_10 = x_20; -goto _start; -} -else -{ -uint8_t x_26; -lean_dec(x_16); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_2); -lean_dec(x_1); -x_26 = !lean_is_exclusive(x_18); -if (x_26 == 0) -{ -return x_18; -} -else -{ -lean_object* x_27; lean_object* x_28; lean_object* x_29; -x_27 = lean_ctor_get(x_18, 0); -x_28 = lean_ctor_get(x_18, 1); -lean_inc(x_28); -lean_inc(x_27); -lean_dec(x_18); -x_29 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_29, 0, x_27); -lean_ctor_set(x_29, 1, x_28); -return x_29; -} -} -} -} -} -static lean_object* _init_l_Lean_Expr_withAppAux___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__4___boxed__const__1() { -_start: -{ -size_t x_1; lean_object* x_2; -x_1 = 0; -x_2 = lean_box_usize(x_1); -return x_2; -} -} -lean_object* l_Lean_Expr_withAppAux___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__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: -{ -if (lean_obj_tag(x_3) == 5) -{ -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_3, 0); -lean_inc(x_11); -x_12 = lean_ctor_get(x_3, 1); -lean_inc(x_12); -lean_dec(x_3); -x_13 = lean_array_set(x_4, x_5, x_12); -x_14 = lean_unsigned_to_nat(1u); -x_15 = lean_nat_sub(x_5, x_14); -lean_dec(x_5); -x_3 = x_11; -x_4 = x_13; -x_5 = x_15; -goto _start; -} -else -{ -lean_object* x_17; -lean_dec(x_5); -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -lean_inc(x_6); -lean_inc(x_2); -lean_inc(x_1); -x_17 = l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit(x_1, x_2, x_3, x_6, x_7, x_8, x_9, x_10); -if (lean_obj_tag(x_17) == 0) -{ -lean_object* x_18; lean_object* x_19; lean_object* x_20; size_t x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; -x_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 = lean_array_get_size(x_4); -x_21 = lean_usize_of_nat(x_20); -lean_dec(x_20); -x_22 = x_4; -x_23 = lean_box_usize(x_21); -x_24 = l_Lean_Expr_withAppAux___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__4___boxed__const__1; -x_25 = lean_alloc_closure((void*)(l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__3___boxed), 10, 5); -lean_closure_set(x_25, 0, x_1); -lean_closure_set(x_25, 1, x_2); -lean_closure_set(x_25, 2, x_23); -lean_closure_set(x_25, 3, x_24); -lean_closure_set(x_25, 4, x_22); -x_26 = x_25; -x_27 = lean_apply_5(x_26, x_6, x_7, x_8, x_9, x_19); -if (lean_obj_tag(x_27) == 0) -{ -uint8_t x_28; -x_28 = !lean_is_exclusive(x_27); -if (x_28 == 0) -{ -lean_object* x_29; lean_object* x_30; -x_29 = lean_ctor_get(x_27, 0); -x_30 = l_Lean_mkAppN(x_18, x_29); -lean_ctor_set(x_27, 0, x_30); -return x_27; -} -else -{ -lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; -x_31 = lean_ctor_get(x_27, 0); -x_32 = lean_ctor_get(x_27, 1); -lean_inc(x_32); -lean_inc(x_31); -lean_dec(x_27); -x_33 = l_Lean_mkAppN(x_18, x_31); -x_34 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_34, 0, x_33); -lean_ctor_set(x_34, 1, x_32); -return x_34; -} -} -else -{ -uint8_t x_35; -lean_dec(x_18); -x_35 = !lean_is_exclusive(x_27); -if (x_35 == 0) -{ -return x_27; -} -else -{ -lean_object* x_36; lean_object* x_37; lean_object* x_38; -x_36 = lean_ctor_get(x_27, 0); -x_37 = lean_ctor_get(x_27, 1); -lean_inc(x_37); -lean_inc(x_36); -lean_dec(x_27); -x_38 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_38, 0, x_36); -lean_ctor_set(x_38, 1, x_37); -return x_38; -} -} -} -else -{ -uint8_t x_39; -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_4); -lean_dec(x_2); -lean_dec(x_1); -x_39 = !lean_is_exclusive(x_17); -if (x_39 == 0) -{ -return x_17; -} -else -{ -lean_object* x_40; lean_object* x_41; lean_object* x_42; -x_40 = lean_ctor_get(x_17, 0); -x_41 = lean_ctor_get(x_17, 1); -lean_inc(x_41); -lean_inc(x_40); -lean_dec(x_17); -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; -} -} -} -} -} -lean_object* l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__5___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; uint8_t x_13; -lean_inc(x_1); -lean_inc(x_2); -x_12 = lean_apply_1(x_1, x_2); -x_13 = lean_unbox(x_12); -lean_dec(x_12); -if (x_13 == 0) -{ -lean_object* x_14; lean_object* x_15; lean_object* x_16; uint8_t x_17; uint8_t x_18; lean_object* x_19; -lean_dec(x_5); -lean_dec(x_1); -x_14 = lean_array_get_size(x_3); -lean_inc(x_4); -lean_inc(x_3); -x_15 = l_Array_toSubarray___rarg(x_3, x_4, x_14); -x_16 = l_Array_ofSubarray___rarg(x_15); -x_17 = 0; -x_18 = 1; -lean_inc(x_7); -x_19 = l_Lean_Meta_mkLambdaFVars(x_16, x_2, x_17, x_18, x_7, x_8, x_9, x_10, x_11); -if (lean_obj_tag(x_19) == 0) -{ -lean_object* x_20; lean_object* x_21; lean_object* x_22; -x_20 = lean_ctor_get(x_19, 0); -lean_inc(x_20); -x_21 = lean_ctor_get(x_19, 1); -lean_inc(x_21); -lean_dec(x_19); -lean_inc(x_10); -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -x_22 = l_Lean_Meta_mkIdRhs(x_20, x_7, x_8, x_9, x_10, x_21); -if (lean_obj_tag(x_22) == 0) -{ -lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; -x_23 = lean_ctor_get(x_22, 0); -lean_inc(x_23); -x_24 = lean_ctor_get(x_22, 1); -lean_inc(x_24); -lean_dec(x_22); -x_25 = lean_unsigned_to_nat(0u); -x_26 = l_Array_toSubarray___rarg(x_3, x_25, x_4); -x_27 = l_Array_ofSubarray___rarg(x_26); -x_28 = l_Lean_Meta_mkLambdaFVars(x_27, x_23, x_17, x_18, x_7, x_8, x_9, x_10, x_24); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -return x_28; -} -else -{ -uint8_t x_29; -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_4); -lean_dec(x_3); -x_29 = !lean_is_exclusive(x_22); -if (x_29 == 0) -{ -return x_22; -} -else -{ -lean_object* x_30; lean_object* x_31; lean_object* x_32; -x_30 = lean_ctor_get(x_22, 0); -x_31 = lean_ctor_get(x_22, 1); -lean_inc(x_31); -lean_inc(x_30); -lean_dec(x_22); -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; -} -} -} -else -{ -uint8_t x_33; -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_4); -lean_dec(x_3); -x_33 = !lean_is_exclusive(x_19); -if (x_33 == 0) -{ -return x_19; -} -else -{ -lean_object* x_34; lean_object* x_35; lean_object* x_36; -x_34 = lean_ctor_get(x_19, 0); -x_35 = lean_ctor_get(x_19, 1); -lean_inc(x_35); -lean_inc(x_34); -lean_dec(x_19); -x_36 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_36, 0, x_34); -lean_ctor_set(x_36, 1, x_35); -return x_36; -} -} -} -else -{ -lean_object* x_37; -lean_dec(x_4); -lean_inc(x_10); -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -x_37 = l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit(x_5, x_1, x_2, x_7, x_8, x_9, x_10, x_11); -if (lean_obj_tag(x_37) == 0) -{ -lean_object* x_38; lean_object* x_39; uint8_t x_40; uint8_t x_41; lean_object* x_42; -x_38 = lean_ctor_get(x_37, 0); -lean_inc(x_38); -x_39 = lean_ctor_get(x_37, 1); -lean_inc(x_39); -lean_dec(x_37); -x_40 = 0; -x_41 = 1; -x_42 = l_Lean_Meta_mkLambdaFVars(x_3, x_38, x_40, x_41, x_7, x_8, x_9, x_10, x_39); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -return x_42; -} -else -{ -uint8_t x_43; -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_3); -x_43 = !lean_is_exclusive(x_37); -if (x_43 == 0) -{ -return x_37; -} -else -{ -lean_object* x_44; lean_object* x_45; lean_object* x_46; -x_44 = lean_ctor_get(x_37, 0); -x_45 = lean_ctor_get(x_37, 1); -lean_inc(x_45); -lean_inc(x_44); -lean_dec(x_37); -x_46 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_46, 0, x_44); -lean_ctor_set(x_46, 1, x_45); -return x_46; -} -} -} -} -} -lean_object* l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__5___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_object* x_12) { -_start: -{ -lean_object* x_13; uint8_t x_14; -x_13 = lean_array_get_size(x_6); -x_14 = lean_nat_dec_le(x_2, x_13); -lean_dec(x_13); -if (x_14 == 0) -{ -lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; uint8_t x_25; -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_15 = l_Lean_indentExpr(x_4); -x_16 = l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__2___closed__2; -x_17 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_17, 0, x_16); -lean_ctor_set(x_17, 1, x_15); -x_18 = l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__2___closed__4; -x_19 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_19, 0, x_17); -lean_ctor_set(x_19, 1, x_18); -x_20 = l_Lean_indentExpr(x_5); -x_21 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_21, 0, x_19); -lean_ctor_set(x_21, 1, x_20); -x_22 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__6; -x_23 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_23, 0, x_21); -lean_ctor_set(x_23, 1, x_22); -x_24 = l_Lean_throwError___at_Lean_Meta_withIncRecDepth___spec__1(x_23, x_8, x_9, x_10, x_11, x_12); -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -x_25 = !lean_is_exclusive(x_24); -if (x_25 == 0) -{ -return x_24; -} -else -{ -lean_object* x_26; lean_object* x_27; lean_object* x_28; -x_26 = lean_ctor_get(x_24, 0); -x_27 = lean_ctor_get(x_24, 1); -lean_inc(x_27); -lean_inc(x_26); -lean_dec(x_24); -x_28 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_28, 0, x_26); -lean_ctor_set(x_28, 1, x_27); -return x_28; -} -} -else -{ -lean_object* x_29; lean_object* x_30; -lean_dec(x_5); -lean_dec(x_4); -x_29 = lean_box(0); -x_30 = l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__5___lambda__1(x_1, x_7, x_6, x_2, x_3, x_29, x_8, x_9, x_10, x_11, x_12); -return x_30; -} -} -} -lean_object* l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__5(lean_object* x_1, lean_object* x_2, lean_object* x_3, size_t x_4, size_t 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: -{ -uint8_t x_12; -x_12 = x_5 < x_4; -if (x_12 == 0) -{ -lean_object* x_13; lean_object* x_14; -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_13 = x_6; -x_14 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_14, 0, x_13); -lean_ctor_set(x_14, 1, x_11); -return x_14; -} -else -{ -lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; -x_15 = lean_array_uget(x_6, x_5); -x_16 = lean_unsigned_to_nat(0u); -x_17 = lean_array_uset(x_6, x_5, x_16); -x_18 = x_15; -x_19 = lean_ctor_get(x_18, 0); -lean_inc(x_19); -x_20 = lean_ctor_get(x_18, 1); -lean_inc(x_20); -lean_dec(x_18); -lean_inc(x_3); -lean_inc(x_19); -lean_inc(x_1); -lean_inc(x_2); -x_21 = lean_alloc_closure((void*)(l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__5___lambda__2), 12, 5); -lean_closure_set(x_21, 0, x_2); -lean_closure_set(x_21, 1, x_20); -lean_closure_set(x_21, 2, x_1); -lean_closure_set(x_21, 3, x_19); -lean_closure_set(x_21, 4, x_3); -lean_inc(x_10); -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -x_22 = l_Lean_Meta_lambdaTelescope___at_Lean_Meta_MatcherApp_addArg___spec__2___rarg(x_19, x_21, x_7, x_8, x_9, x_10, x_11); -if (lean_obj_tag(x_22) == 0) -{ -lean_object* x_23; lean_object* x_24; size_t x_25; size_t x_26; lean_object* x_27; lean_object* x_28; -x_23 = lean_ctor_get(x_22, 0); -lean_inc(x_23); -x_24 = lean_ctor_get(x_22, 1); -lean_inc(x_24); -lean_dec(x_22); -x_25 = 1; -x_26 = x_5 + x_25; -x_27 = x_23; -x_28 = lean_array_uset(x_17, x_5, x_27); -x_5 = x_26; -x_6 = x_28; -x_11 = x_24; -goto _start; -} -else -{ -uint8_t x_30; -lean_dec(x_17); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_30 = !lean_is_exclusive(x_22); -if (x_30 == 0) -{ -return x_22; -} -else -{ -lean_object* x_31; lean_object* x_32; lean_object* x_33; -x_31 = lean_ctor_get(x_22, 0); -x_32 = lean_ctor_get(x_22, 1); -lean_inc(x_32); -lean_inc(x_31); -lean_dec(x_22); -x_33 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_33, 0, x_31); -lean_ctor_set(x_33, 1, x_32); -return x_33; -} -} -} -} -} -lean_object* l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___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) { -_start: -{ -lean_object* x_10; -lean_inc(x_8); -lean_inc(x_7); -lean_inc(x_6); -lean_inc(x_5); -x_10 = l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit(x_1, x_2, 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; uint8_t x_13; uint8_t 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); -lean_dec(x_10); -x_13 = 0; -x_14 = 1; -x_15 = l_Lean_Meta_mkLambdaFVars(x_3, x_11, x_13, x_14, x_5, x_6, x_7, x_8, x_12); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -return x_15; -} -else -{ -uint8_t x_16; -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_3); -x_16 = !lean_is_exclusive(x_10); -if (x_16 == 0) -{ -return x_10; -} -else -{ -lean_object* x_17; lean_object* x_18; lean_object* x_19; -x_17 = lean_ctor_get(x_10, 0); -x_18 = lean_ctor_get(x_10, 1); -lean_inc(x_18); -lean_inc(x_17); -lean_dec(x_10); -x_19 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_19, 0, x_17); -lean_ctor_set(x_19, 1, x_18); -return x_19; -} -} -} -} -lean_object* l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___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; -lean_inc(x_8); -lean_inc(x_7); -lean_inc(x_6); -lean_inc(x_5); -x_10 = l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit(x_1, x_2, 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; uint8_t x_13; uint8_t 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); -lean_dec(x_10); -x_13 = 0; -x_14 = 1; -x_15 = l_Lean_Meta_mkForallFVars(x_3, x_11, x_13, x_14, x_5, x_6, x_7, x_8, x_12); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -return x_15; -} -else -{ -uint8_t x_16; -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_3); -x_16 = !lean_is_exclusive(x_10); -if (x_16 == 0) -{ -return x_10; -} -else -{ -lean_object* x_17; lean_object* x_18; lean_object* x_19; -x_17 = lean_ctor_get(x_10, 0); -x_18 = lean_ctor_get(x_10, 1); -lean_inc(x_18); -lean_inc(x_17); -lean_dec(x_10); -x_19 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_19, 0, x_17); -lean_ctor_set(x_19, 1, x_18); -return x_19; -} -} -} -} -lean_object* l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___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; lean_object* x_11; -x_10 = lean_expr_instantiate1(x_1, x_4); -lean_inc(x_8); -lean_inc(x_7); -lean_inc(x_6); -lean_inc(x_5); -x_11 = l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit(x_2, x_3, x_10, 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; uint8_t x_16; uint8_t x_17; lean_object* x_18; -x_12 = lean_ctor_get(x_11, 0); -lean_inc(x_12); -x_13 = lean_ctor_get(x_11, 1); -lean_inc(x_13); -lean_dec(x_11); -x_14 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__4; -x_15 = lean_array_push(x_14, x_4); -x_16 = 0; -x_17 = 1; -x_18 = l_Lean_Meta_mkLambdaFVars(x_15, x_12, x_16, x_17, x_5, x_6, x_7, x_8, x_13); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -return x_18; -} -else -{ -uint8_t x_19; -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -x_19 = !lean_is_exclusive(x_11); -if (x_19 == 0) -{ -return x_11; -} -else -{ -lean_object* x_20; lean_object* x_21; lean_object* x_22; -x_20 = lean_ctor_get(x_11, 0); -x_21 = lean_ctor_get(x_11, 1); -lean_inc(x_21); -lean_inc(x_20); -lean_dec(x_11); -x_22 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_22, 0, x_20); -lean_ctor_set(x_22, 1, x_21); -return x_22; -} -} -} -} -static lean_object* _init_l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___boxed__const__1() { -_start: -{ -size_t x_1; lean_object* x_2; -x_1 = 0; -x_2 = lean_box_usize(x_1); -return x_2; -} -} -lean_object* l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit(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: -{ -switch (lean_obj_tag(x_3)) { -case 5: -{ -lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; uint8_t x_13; -lean_inc(x_3); -x_9 = l_Lean_Meta_matchMatcherApp_x3f___at_Lean_Meta_Match_withMkMatcherInput___spec__2(x_3, x_4, x_5, x_6, x_7, x_8); -x_10 = lean_ctor_get(x_9, 0); -lean_inc(x_10); -x_11 = lean_ctor_get(x_9, 1); -lean_inc(x_11); -lean_dec(x_9); -lean_inc(x_1); -lean_inc(x_3); -x_12 = lean_apply_1(x_1, x_3); -x_13 = lean_unbox(x_12); -lean_dec(x_12); -if (x_13 == 0) -{ -lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; -lean_dec(x_10); -x_14 = lean_unsigned_to_nat(0u); -x_15 = l_Lean_Expr_getAppNumArgsAux(x_3, x_14); -x_16 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_getFixedPrefix___lambda__2___closed__1; -lean_inc(x_15); -x_17 = lean_mk_array(x_15, x_16); -x_18 = lean_unsigned_to_nat(1u); -x_19 = lean_nat_sub(x_15, x_18); -lean_dec(x_15); -x_20 = l_Lean_Expr_withAppAux___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__2(x_1, x_2, x_3, x_17, x_19, x_4, x_5, x_6, x_7, x_11); -return x_20; -} -else -{ -if (lean_obj_tag(x_10) == 0) -{ -lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; -x_21 = lean_unsigned_to_nat(0u); -x_22 = l_Lean_Expr_getAppNumArgsAux(x_3, x_21); -x_23 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_getFixedPrefix___lambda__2___closed__1; -lean_inc(x_22); -x_24 = lean_mk_array(x_22, x_23); -x_25 = lean_unsigned_to_nat(1u); -x_26 = lean_nat_sub(x_22, x_25); -lean_dec(x_22); -x_27 = l_Lean_Expr_withAppAux___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__4(x_1, x_2, x_3, x_24, x_26, x_4, x_5, x_6, x_7, x_11); -return x_27; -} -else -{ -lean_object* x_28; uint8_t x_29; -x_28 = lean_ctor_get(x_10, 0); -lean_inc(x_28); -lean_dec(x_10); -x_29 = !lean_is_exclusive(x_28); -if (x_29 == 0) -{ -lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; size_t 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_30 = lean_ctor_get(x_28, 0); -x_31 = lean_ctor_get(x_28, 1); -x_32 = lean_ctor_get(x_28, 2); -x_33 = lean_ctor_get(x_28, 3); -x_34 = lean_ctor_get(x_28, 4); -x_35 = lean_ctor_get(x_28, 5); -x_36 = lean_ctor_get(x_28, 6); -x_37 = lean_ctor_get(x_28, 7); -x_38 = lean_ctor_get(x_28, 8); -x_39 = l_Array_zip___rarg(x_37, x_36); -lean_dec(x_37); -x_40 = lean_array_get_size(x_39); -x_41 = lean_usize_of_nat(x_40); -lean_dec(x_40); -x_42 = x_39; -x_43 = lean_box_usize(x_41); -x_44 = l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___boxed__const__1; -x_45 = lean_alloc_closure((void*)(l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__5___boxed), 11, 6); -lean_closure_set(x_45, 0, x_1); -lean_closure_set(x_45, 1, x_2); -lean_closure_set(x_45, 2, x_3); -lean_closure_set(x_45, 3, x_43); -lean_closure_set(x_45, 4, x_44); -lean_closure_set(x_45, 5, x_42); -x_46 = x_45; -x_47 = lean_apply_5(x_46, x_4, x_5, x_6, x_7, x_11); -if (lean_obj_tag(x_47) == 0) -{ -uint8_t x_48; -x_48 = !lean_is_exclusive(x_47); -if (x_48 == 0) -{ -lean_object* x_49; lean_object* x_50; -x_49 = lean_ctor_get(x_47, 0); -lean_ctor_set(x_28, 7, x_49); -x_50 = l_Lean_Meta_MatcherApp_toExpr(x_28); -lean_ctor_set(x_47, 0, x_50); -return x_47; -} -else -{ -lean_object* x_51; lean_object* x_52; lean_object* x_53; lean_object* x_54; -x_51 = lean_ctor_get(x_47, 0); -x_52 = lean_ctor_get(x_47, 1); -lean_inc(x_52); -lean_inc(x_51); -lean_dec(x_47); -lean_ctor_set(x_28, 7, x_51); -x_53 = l_Lean_Meta_MatcherApp_toExpr(x_28); -x_54 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_54, 0, x_53); -lean_ctor_set(x_54, 1, x_52); -return x_54; -} -} -else -{ -uint8_t x_55; -lean_free_object(x_28); -lean_dec(x_38); -lean_dec(x_36); -lean_dec(x_35); -lean_dec(x_34); -lean_dec(x_33); -lean_dec(x_32); -lean_dec(x_31); -lean_dec(x_30); -x_55 = !lean_is_exclusive(x_47); -if (x_55 == 0) -{ -return x_47; -} -else -{ -lean_object* x_56; lean_object* x_57; lean_object* x_58; -x_56 = lean_ctor_get(x_47, 0); -x_57 = lean_ctor_get(x_47, 1); -lean_inc(x_57); -lean_inc(x_56); -lean_dec(x_47); -x_58 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_58, 0, x_56); -lean_ctor_set(x_58, 1, x_57); -return x_58; -} -} -} -else -{ -lean_object* x_59; lean_object* x_60; lean_object* x_61; lean_object* x_62; lean_object* x_63; lean_object* x_64; lean_object* x_65; lean_object* x_66; lean_object* x_67; lean_object* x_68; lean_object* x_69; size_t x_70; lean_object* x_71; lean_object* x_72; lean_object* x_73; lean_object* x_74; lean_object* x_75; lean_object* x_76; -x_59 = lean_ctor_get(x_28, 0); -x_60 = lean_ctor_get(x_28, 1); -x_61 = lean_ctor_get(x_28, 2); -x_62 = lean_ctor_get(x_28, 3); -x_63 = lean_ctor_get(x_28, 4); -x_64 = lean_ctor_get(x_28, 5); -x_65 = lean_ctor_get(x_28, 6); -x_66 = lean_ctor_get(x_28, 7); -x_67 = lean_ctor_get(x_28, 8); -lean_inc(x_67); -lean_inc(x_66); -lean_inc(x_65); -lean_inc(x_64); -lean_inc(x_63); -lean_inc(x_62); -lean_inc(x_61); -lean_inc(x_60); -lean_inc(x_59); -lean_dec(x_28); -x_68 = l_Array_zip___rarg(x_66, x_65); -lean_dec(x_66); -x_69 = lean_array_get_size(x_68); -x_70 = lean_usize_of_nat(x_69); -lean_dec(x_69); -x_71 = x_68; -x_72 = lean_box_usize(x_70); -x_73 = l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___boxed__const__1; -x_74 = lean_alloc_closure((void*)(l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__5___boxed), 11, 6); -lean_closure_set(x_74, 0, x_1); -lean_closure_set(x_74, 1, x_2); -lean_closure_set(x_74, 2, x_3); -lean_closure_set(x_74, 3, x_72); -lean_closure_set(x_74, 4, x_73); -lean_closure_set(x_74, 5, x_71); -x_75 = x_74; -x_76 = lean_apply_5(x_75, x_4, x_5, x_6, x_7, x_11); -if (lean_obj_tag(x_76) == 0) -{ -lean_object* x_77; lean_object* x_78; lean_object* x_79; lean_object* x_80; lean_object* x_81; lean_object* x_82; -x_77 = lean_ctor_get(x_76, 0); -lean_inc(x_77); -x_78 = lean_ctor_get(x_76, 1); -lean_inc(x_78); -if (lean_is_exclusive(x_76)) { - lean_ctor_release(x_76, 0); - lean_ctor_release(x_76, 1); - x_79 = x_76; -} else { - lean_dec_ref(x_76); - x_79 = lean_box(0); -} -x_80 = lean_alloc_ctor(0, 9, 0); -lean_ctor_set(x_80, 0, x_59); -lean_ctor_set(x_80, 1, x_60); -lean_ctor_set(x_80, 2, x_61); -lean_ctor_set(x_80, 3, x_62); -lean_ctor_set(x_80, 4, x_63); -lean_ctor_set(x_80, 5, x_64); -lean_ctor_set(x_80, 6, x_65); -lean_ctor_set(x_80, 7, x_77); -lean_ctor_set(x_80, 8, x_67); -x_81 = l_Lean_Meta_MatcherApp_toExpr(x_80); -if (lean_is_scalar(x_79)) { - x_82 = lean_alloc_ctor(0, 2, 0); -} else { - x_82 = x_79; -} -lean_ctor_set(x_82, 0, x_81); -lean_ctor_set(x_82, 1, x_78); -return x_82; -} -else -{ -lean_object* x_83; lean_object* x_84; lean_object* x_85; lean_object* x_86; -lean_dec(x_67); -lean_dec(x_65); -lean_dec(x_64); -lean_dec(x_63); -lean_dec(x_62); -lean_dec(x_61); -lean_dec(x_60); -lean_dec(x_59); -x_83 = lean_ctor_get(x_76, 0); -lean_inc(x_83); -x_84 = lean_ctor_get(x_76, 1); -lean_inc(x_84); -if (lean_is_exclusive(x_76)) { - lean_ctor_release(x_76, 0); - lean_ctor_release(x_76, 1); - x_85 = x_76; -} else { - lean_dec_ref(x_76); - x_85 = lean_box(0); -} -if (lean_is_scalar(x_85)) { - x_86 = lean_alloc_ctor(1, 2, 0); -} else { - x_86 = x_85; -} -lean_ctor_set(x_86, 0, x_83); -lean_ctor_set(x_86, 1, x_84); -return x_86; -} -} -} -} -} -case 6: -{ -lean_object* x_87; lean_object* x_88; -x_87 = lean_alloc_closure((void*)(l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___lambda__1), 9, 2); -lean_closure_set(x_87, 0, x_1); -lean_closure_set(x_87, 1, x_2); -x_88 = l_Lean_Meta_lambdaTelescope___at_Lean_Meta_MatcherApp_addArg___spec__2___rarg(x_3, x_87, x_4, x_5, x_6, x_7, x_8); -return x_88; -} -case 7: -{ -lean_object* x_89; lean_object* x_90; -x_89 = lean_alloc_closure((void*)(l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___lambda__2), 9, 2); -lean_closure_set(x_89, 0, x_1); -lean_closure_set(x_89, 1, x_2); -x_90 = l_Lean_Meta_forallTelescope___at___private_Lean_Meta_InferType_0__Lean_Meta_inferForallType___spec__2___rarg(x_3, x_89, x_4, x_5, x_6, x_7, x_8); -return x_90; -} -case 8: -{ -lean_object* x_91; lean_object* x_92; lean_object* x_93; lean_object* x_94; lean_object* x_95; -x_91 = lean_ctor_get(x_3, 0); -lean_inc(x_91); -x_92 = lean_ctor_get(x_3, 1); -lean_inc(x_92); -x_93 = lean_ctor_get(x_3, 2); -lean_inc(x_93); -x_94 = lean_ctor_get(x_3, 3); -lean_inc(x_94); -lean_dec(x_3); -lean_inc(x_7); -lean_inc(x_6); -lean_inc(x_5); -lean_inc(x_4); -lean_inc(x_2); -lean_inc(x_1); -x_95 = l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit(x_1, x_2, x_93, x_4, x_5, x_6, x_7, x_8); -if (lean_obj_tag(x_95) == 0) -{ -lean_object* x_96; lean_object* x_97; lean_object* x_98; lean_object* x_99; -x_96 = lean_ctor_get(x_95, 0); -lean_inc(x_96); -x_97 = lean_ctor_get(x_95, 1); -lean_inc(x_97); -lean_dec(x_95); -x_98 = lean_alloc_closure((void*)(l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___lambda__3___boxed), 9, 3); -lean_closure_set(x_98, 0, x_94); -lean_closure_set(x_98, 1, x_1); -lean_closure_set(x_98, 2, x_2); -x_99 = l_Lean_Meta_withLetDecl___at___private_Lean_Meta_Tactic_Simp_SimpLemmas_0__Lean_Meta_isPerm___spec__2___rarg(x_91, x_92, x_96, x_98, x_4, x_5, x_6, x_7, x_97); -return x_99; -} -else -{ -uint8_t x_100; -lean_dec(x_94); -lean_dec(x_92); -lean_dec(x_91); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_2); -lean_dec(x_1); -x_100 = !lean_is_exclusive(x_95); -if (x_100 == 0) -{ -return x_95; -} -else -{ -lean_object* x_101; lean_object* x_102; lean_object* x_103; -x_101 = lean_ctor_get(x_95, 0); -x_102 = lean_ctor_get(x_95, 1); -lean_inc(x_102); -lean_inc(x_101); -lean_dec(x_95); -x_103 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_103, 0, x_101); -lean_ctor_set(x_103, 1, x_102); -return x_103; -} -} -} -case 10: -{ -lean_object* x_104; lean_object* x_105; lean_object* x_106; -x_104 = lean_ctor_get(x_3, 0); -lean_inc(x_104); -x_105 = lean_ctor_get(x_3, 1); -lean_inc(x_105); -lean_dec(x_3); -x_106 = l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit(x_1, x_2, x_105, x_4, x_5, x_6, x_7, x_8); -if (lean_obj_tag(x_106) == 0) -{ -uint8_t x_107; -x_107 = !lean_is_exclusive(x_106); -if (x_107 == 0) -{ -lean_object* x_108; lean_object* x_109; -x_108 = lean_ctor_get(x_106, 0); -x_109 = l_Lean_mkMData(x_104, x_108); -lean_ctor_set(x_106, 0, x_109); -return x_106; -} -else -{ -lean_object* x_110; lean_object* x_111; lean_object* x_112; lean_object* x_113; -x_110 = lean_ctor_get(x_106, 0); -x_111 = lean_ctor_get(x_106, 1); -lean_inc(x_111); -lean_inc(x_110); -lean_dec(x_106); -x_112 = l_Lean_mkMData(x_104, x_110); -x_113 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_113, 0, x_112); -lean_ctor_set(x_113, 1, x_111); -return x_113; -} -} -else -{ -uint8_t x_114; -lean_dec(x_104); -x_114 = !lean_is_exclusive(x_106); -if (x_114 == 0) -{ -return x_106; -} -else -{ -lean_object* x_115; lean_object* x_116; lean_object* x_117; -x_115 = lean_ctor_get(x_106, 0); -x_116 = lean_ctor_get(x_106, 1); -lean_inc(x_116); -lean_inc(x_115); -lean_dec(x_106); -x_117 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_117, 0, x_115); -lean_ctor_set(x_117, 1, x_116); -return x_117; -} -} -} -case 11: -{ -lean_object* x_118; lean_object* x_119; lean_object* x_120; lean_object* x_121; -x_118 = lean_ctor_get(x_3, 0); -lean_inc(x_118); -x_119 = lean_ctor_get(x_3, 1); -lean_inc(x_119); -x_120 = lean_ctor_get(x_3, 2); -lean_inc(x_120); -lean_dec(x_3); -x_121 = l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit(x_1, x_2, x_120, x_4, x_5, x_6, x_7, x_8); -if (lean_obj_tag(x_121) == 0) -{ -uint8_t x_122; -x_122 = !lean_is_exclusive(x_121); -if (x_122 == 0) -{ -lean_object* x_123; lean_object* x_124; -x_123 = lean_ctor_get(x_121, 0); -x_124 = l_Lean_mkProj(x_118, x_119, x_123); -lean_ctor_set(x_121, 0, x_124); -return x_121; -} -else -{ -lean_object* x_125; lean_object* x_126; lean_object* x_127; lean_object* x_128; -x_125 = lean_ctor_get(x_121, 0); -x_126 = lean_ctor_get(x_121, 1); -lean_inc(x_126); -lean_inc(x_125); -lean_dec(x_121); -x_127 = l_Lean_mkProj(x_118, x_119, x_125); -x_128 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_128, 0, x_127); -lean_ctor_set(x_128, 1, x_126); -return x_128; -} -} -else -{ -uint8_t x_129; -lean_dec(x_119); -lean_dec(x_118); -x_129 = !lean_is_exclusive(x_121); -if (x_129 == 0) -{ -return x_121; -} -else -{ -lean_object* x_130; lean_object* x_131; lean_object* x_132; -x_130 = lean_ctor_get(x_121, 0); -x_131 = lean_ctor_get(x_121, 1); -lean_inc(x_131); -lean_inc(x_130); -lean_dec(x_121); -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; -} -} -} -default: -{ -lean_object* x_133; -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_2); -lean_dec(x_1); -x_133 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_133, 0, x_3); -lean_ctor_set(x_133, 1, x_8); -return x_133; -} -} -} -} -lean_object* l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___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) { -_start: -{ -size_t x_11; size_t x_12; lean_object* x_13; -x_11 = lean_unbox_usize(x_3); -lean_dec(x_3); -x_12 = lean_unbox_usize(x_4); -lean_dec(x_4); -x_13 = l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__1(x_1, x_2, x_11, x_12, x_5, x_6, x_7, x_8, x_9, x_10); -return x_13; -} -} -lean_object* l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___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) { -_start: -{ -size_t x_11; size_t x_12; lean_object* x_13; -x_11 = lean_unbox_usize(x_3); -lean_dec(x_3); -x_12 = lean_unbox_usize(x_4); -lean_dec(x_4); -x_13 = l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__3(x_1, x_2, x_11, x_12, x_5, x_6, x_7, x_8, x_9, x_10); -return x_13; -} -} -lean_object* l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__5___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_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__5___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_6); -return x_12; -} -} -lean_object* l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__5___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: -{ -size_t x_12; size_t x_13; lean_object* x_14; -x_12 = lean_unbox_usize(x_4); -lean_dec(x_4); -x_13 = lean_unbox_usize(x_5); -lean_dec(x_5); -x_14 = l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__5(x_1, x_2, x_3, x_12, x_13, x_6, x_7, x_8, x_9, x_10, x_11); -return x_14; -} -} -lean_object* l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___lambda__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) { -_start: -{ -lean_object* x_10; -x_10 = l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___lambda__3(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9); -lean_dec(x_1); -return x_10; -} -} -uint8_t l_Lean_Elab_Structural_addSmartUnfoldingDefAux___lambda__1(lean_object* x_1, lean_object* x_2) { -_start: -{ -uint8_t x_3; -x_3 = l_Lean_Expr_isConst(x_2); -if (x_3 == 0) -{ -uint8_t x_4; -x_4 = 0; -return x_4; -} -else -{ -lean_object* x_5; uint8_t x_6; -x_5 = l_Lean_Expr_constName_x21(x_2); -x_6 = l_Lean_NameSet_contains(x_1, x_5); -lean_dec(x_5); -return x_6; -} -} -} -uint8_t l_Lean_Elab_Structural_addSmartUnfoldingDefAux___lambda__2(lean_object* x_1, lean_object* x_2) { -_start: -{ -lean_object* x_3; uint8_t x_4; -x_3 = l_Lean_Expr_getAppFn(x_2); -x_4 = l_Lean_Expr_isConst(x_3); -if (x_4 == 0) -{ -uint8_t x_5; -lean_dec(x_3); -x_5 = 0; -return x_5; -} -else -{ -lean_object* x_6; uint8_t x_7; -x_6 = l_Lean_Expr_constName_x21(x_3); -lean_dec(x_3); -x_7 = l_Lean_NameSet_contains(x_1, x_6); -lean_dec(x_6); -return x_7; -} -} -} -uint8_t l_Lean_Elab_Structural_addSmartUnfoldingDefAux___lambda__3(lean_object* x_1, lean_object* x_2) { -_start: -{ -size_t x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; -x_3 = 8192; -x_4 = l_Lean_Expr_FindImpl_initCache; -x_5 = l_Lean_Expr_FindImpl_findM_x3f_visit(x_1, x_3, x_2, x_4); -x_6 = lean_ctor_get(x_5, 0); -lean_inc(x_6); -lean_dec(x_5); -if (lean_obj_tag(x_6) == 0) -{ -uint8_t x_7; -x_7 = 0; -return x_7; -} -else -{ -uint8_t x_8; -lean_dec(x_6); -x_8 = 1; -return x_8; -} -} -} -static lean_object* _init_l_Lean_Elab_Structural_addSmartUnfoldingDefAux___closed__1() { -_start: -{ -lean_object* x_1; uint8_t x_2; uint8_t x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; -x_1 = lean_box(0); -x_2 = 0; -x_3 = 0; -x_4 = 2; -x_5 = l_Lean_Elab_Structural_State_addMatchers___default___closed__1; -x_6 = lean_alloc_ctor(0, 2, 4); -lean_ctor_set(x_6, 0, x_1); -lean_ctor_set(x_6, 1, x_5); -lean_ctor_set_uint8(x_6, sizeof(void*)*2, x_2); -lean_ctor_set_uint8(x_6, sizeof(void*)*2 + 1, x_3); -lean_ctor_set_uint8(x_6, sizeof(void*)*2 + 2, x_4); -lean_ctor_set_uint8(x_6, sizeof(void*)*2 + 3, x_3); -return x_6; -} -} -lean_object* l_Lean_Elab_Structural_addSmartUnfoldingDefAux(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; lean_object* x_9; lean_object* x_10; uint8_t x_11; -lean_inc(x_2); -x_8 = lean_alloc_closure((void*)(l_Lean_Elab_Structural_addSmartUnfoldingDefAux___lambda__1___boxed), 2, 1); -lean_closure_set(x_8, 0, x_2); -x_9 = lean_alloc_closure((void*)(l_Lean_Elab_Structural_addSmartUnfoldingDefAux___lambda__2___boxed), 2, 1); -lean_closure_set(x_9, 0, x_2); -x_10 = lean_alloc_closure((void*)(l_Lean_Elab_Structural_addSmartUnfoldingDefAux___lambda__3___boxed), 2, 1); -lean_closure_set(x_10, 0, x_8); -x_11 = !lean_is_exclusive(x_1); -if (x_11 == 0) -{ -lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; -x_12 = lean_ctor_get(x_1, 0); -x_13 = lean_ctor_get(x_1, 1); -x_14 = lean_ctor_get(x_1, 3); -x_15 = lean_ctor_get(x_1, 4); -x_16 = lean_ctor_get(x_1, 5); -x_17 = lean_ctor_get(x_1, 2); -lean_dec(x_17); -x_18 = l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit(x_9, x_10, x_16, x_3, x_4, x_5, x_6, x_7); -if (lean_obj_tag(x_18) == 0) -{ -uint8_t x_19; -x_19 = !lean_is_exclusive(x_18); -if (x_19 == 0) -{ -lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; -x_20 = lean_ctor_get(x_18, 0); -x_21 = l_Lean_Meta_smartUnfoldingSuffix; -x_22 = lean_name_mk_string(x_14, x_21); -x_23 = l_Lean_Elab_Structural_addSmartUnfoldingDefAux___closed__1; -lean_ctor_set(x_1, 5, x_20); -lean_ctor_set(x_1, 3, x_22); -lean_ctor_set(x_1, 2, x_23); -lean_ctor_set(x_18, 0, x_1); -return x_18; -} -else -{ -lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; -x_24 = lean_ctor_get(x_18, 0); -x_25 = lean_ctor_get(x_18, 1); -lean_inc(x_25); -lean_inc(x_24); -lean_dec(x_18); -x_26 = l_Lean_Meta_smartUnfoldingSuffix; -x_27 = lean_name_mk_string(x_14, x_26); -x_28 = l_Lean_Elab_Structural_addSmartUnfoldingDefAux___closed__1; -lean_ctor_set(x_1, 5, x_24); -lean_ctor_set(x_1, 3, x_27); -lean_ctor_set(x_1, 2, x_28); -x_29 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_29, 0, x_1); -lean_ctor_set(x_29, 1, x_25); -return x_29; -} -} -else -{ -uint8_t x_30; -lean_free_object(x_1); -lean_dec(x_15); -lean_dec(x_14); -lean_dec(x_13); -lean_dec(x_12); -x_30 = !lean_is_exclusive(x_18); -if (x_30 == 0) -{ -return x_18; -} -else -{ -lean_object* x_31; lean_object* x_32; lean_object* x_33; -x_31 = lean_ctor_get(x_18, 0); -x_32 = lean_ctor_get(x_18, 1); -lean_inc(x_32); -lean_inc(x_31); -lean_dec(x_18); -x_33 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_33, 0, x_31); -lean_ctor_set(x_33, 1, x_32); -return x_33; -} -} -} -else -{ -lean_object* x_34; uint8_t x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; -x_34 = lean_ctor_get(x_1, 0); -x_35 = lean_ctor_get_uint8(x_1, sizeof(void*)*6); -x_36 = lean_ctor_get(x_1, 1); -x_37 = lean_ctor_get(x_1, 3); -x_38 = lean_ctor_get(x_1, 4); -x_39 = lean_ctor_get(x_1, 5); -lean_inc(x_39); -lean_inc(x_38); -lean_inc(x_37); -lean_inc(x_36); -lean_inc(x_34); -lean_dec(x_1); -x_40 = l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit(x_9, x_10, x_39, x_3, x_4, x_5, x_6, x_7); -if (lean_obj_tag(x_40) == 0) -{ -lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; lean_object* x_48; -x_41 = lean_ctor_get(x_40, 0); -lean_inc(x_41); -x_42 = lean_ctor_get(x_40, 1); -lean_inc(x_42); -if (lean_is_exclusive(x_40)) { - lean_ctor_release(x_40, 0); - lean_ctor_release(x_40, 1); - x_43 = x_40; -} else { - lean_dec_ref(x_40); - x_43 = lean_box(0); -} -x_44 = l_Lean_Meta_smartUnfoldingSuffix; -x_45 = lean_name_mk_string(x_37, x_44); -x_46 = l_Lean_Elab_Structural_addSmartUnfoldingDefAux___closed__1; -x_47 = lean_alloc_ctor(0, 6, 1); -lean_ctor_set(x_47, 0, x_34); -lean_ctor_set(x_47, 1, x_36); -lean_ctor_set(x_47, 2, x_46); -lean_ctor_set(x_47, 3, x_45); -lean_ctor_set(x_47, 4, x_38); -lean_ctor_set(x_47, 5, x_41); -lean_ctor_set_uint8(x_47, sizeof(void*)*6, x_35); -if (lean_is_scalar(x_43)) { - x_48 = lean_alloc_ctor(0, 2, 0); -} else { - x_48 = x_43; -} -lean_ctor_set(x_48, 0, x_47); -lean_ctor_set(x_48, 1, x_42); -return x_48; -} -else -{ -lean_object* x_49; lean_object* x_50; lean_object* x_51; lean_object* x_52; -lean_dec(x_38); -lean_dec(x_37); -lean_dec(x_36); -lean_dec(x_34); -x_49 = lean_ctor_get(x_40, 0); -lean_inc(x_49); -x_50 = lean_ctor_get(x_40, 1); -lean_inc(x_50); -if (lean_is_exclusive(x_40)) { - lean_ctor_release(x_40, 0); - lean_ctor_release(x_40, 1); - x_51 = x_40; -} else { - lean_dec_ref(x_40); - x_51 = lean_box(0); -} -if (lean_is_scalar(x_51)) { - x_52 = lean_alloc_ctor(1, 2, 0); -} else { - x_52 = x_51; -} -lean_ctor_set(x_52, 0, x_49); -lean_ctor_set(x_52, 1, x_50); -return x_52; -} -} -} -} -lean_object* l_Lean_Elab_Structural_addSmartUnfoldingDefAux___lambda__1___boxed(lean_object* x_1, lean_object* x_2) { -_start: -{ -uint8_t x_3; lean_object* x_4; -x_3 = l_Lean_Elab_Structural_addSmartUnfoldingDefAux___lambda__1(x_1, x_2); -lean_dec(x_2); -lean_dec(x_1); -x_4 = lean_box(x_3); -return x_4; -} -} -lean_object* l_Lean_Elab_Structural_addSmartUnfoldingDefAux___lambda__2___boxed(lean_object* x_1, lean_object* x_2) { -_start: -{ -uint8_t x_3; lean_object* x_4; -x_3 = l_Lean_Elab_Structural_addSmartUnfoldingDefAux___lambda__2(x_1, x_2); -lean_dec(x_2); -lean_dec(x_1); -x_4 = lean_box(x_3); -return x_4; -} -} -lean_object* l_Lean_Elab_Structural_addSmartUnfoldingDefAux___lambda__3___boxed(lean_object* x_1, lean_object* x_2) { -_start: -{ -uint8_t x_3; lean_object* x_4; -x_3 = l_Lean_Elab_Structural_addSmartUnfoldingDefAux___lambda__3(x_1, x_2); -x_4 = lean_box(x_3); -return x_4; -} -} -lean_object* l_Lean_Elab_Structural_addSmartUnfoldingDef(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; -x_10 = lean_ctor_get(x_1, 4); -lean_inc(x_10); -lean_inc(x_8); -lean_inc(x_7); -lean_inc(x_6); -lean_inc(x_5); -x_11 = l_Lean_Meta_isProp(x_10, x_5, x_6, x_7, x_8, x_9); -if (lean_obj_tag(x_11) == 0) -{ -lean_object* x_12; uint8_t x_13; -x_12 = lean_ctor_get(x_11, 0); -lean_inc(x_12); -x_13 = lean_unbox(x_12); -lean_dec(x_12); -if (x_13 == 0) -{ -lean_object* x_14; lean_object* x_15; lean_object* x_16; -x_14 = lean_ctor_get(x_11, 1); -lean_inc(x_14); -lean_dec(x_11); -x_15 = lean_ctor_get(x_2, 0); -lean_inc(x_15); -lean_dec(x_2); -lean_inc(x_8); -lean_inc(x_7); -lean_inc(x_6); -lean_inc(x_5); -x_16 = l_Lean_Elab_Structural_addSmartUnfoldingDefAux(x_1, x_15, x_5, x_6, x_7, x_8, x_14); -if (lean_obj_tag(x_16) == 0) -{ -lean_object* x_17; lean_object* x_18; uint8_t x_19; lean_object* x_20; -x_17 = lean_ctor_get(x_16, 0); -lean_inc(x_17); -x_18 = lean_ctor_get(x_16, 1); -lean_inc(x_18); -lean_dec(x_16); -x_19 = 0; -x_20 = l___private_Lean_Elab_PreDefinition_Basic_0__Lean_Elab_addNonRecAux(x_17, x_19, x_3, x_4, x_5, x_6, x_7, x_8, x_18); -return x_20; -} -else -{ -uint8_t x_21; -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_21 = !lean_is_exclusive(x_16); -if (x_21 == 0) -{ -return x_16; -} -else -{ -lean_object* x_22; lean_object* x_23; lean_object* x_24; -x_22 = lean_ctor_get(x_16, 0); -x_23 = lean_ctor_get(x_16, 1); -lean_inc(x_23); -lean_inc(x_22); -lean_dec(x_16); -x_24 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_24, 0, x_22); -lean_ctor_set(x_24, 1, x_23); -return x_24; -} -} -} -else -{ -uint8_t x_25; -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_25 = !lean_is_exclusive(x_11); -if (x_25 == 0) -{ -lean_object* x_26; lean_object* x_27; -x_26 = lean_ctor_get(x_11, 0); -lean_dec(x_26); -x_27 = lean_box(0); -lean_ctor_set(x_11, 0, x_27); -return x_11; -} -else -{ -lean_object* x_28; lean_object* x_29; lean_object* x_30; -x_28 = lean_ctor_get(x_11, 1); -lean_inc(x_28); -lean_dec(x_11); -x_29 = lean_box(0); -x_30 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_30, 0, x_29); -lean_ctor_set(x_30, 1, x_28); -return x_30; -} -} -} -else -{ -uint8_t x_31; -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_31 = !lean_is_exclusive(x_11); -if (x_31 == 0) -{ -return x_11; -} -else -{ -lean_object* x_32; lean_object* x_33; lean_object* x_34; -x_32 = lean_ctor_get(x_11, 0); -x_33 = lean_ctor_get(x_11, 1); -lean_inc(x_33); -lean_inc(x_32); -lean_dec(x_11); -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; -} -} -} -} -lean_object* l_Lean_Elab_Structural_structuralRecursion_match__1___rarg(lean_object* x_1, lean_object* x_2) { -_start: -{ -lean_object* x_3; lean_object* x_4; lean_object* x_5; -x_3 = lean_ctor_get(x_1, 0); -lean_inc(x_3); -x_4 = lean_ctor_get(x_1, 1); -lean_inc(x_4); -lean_dec(x_1); -x_5 = lean_apply_2(x_2, x_3, x_4); -return x_5; -} -} -lean_object* l_Lean_Elab_Structural_structuralRecursion_match__1(lean_object* x_1) { -_start: -{ -lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l_Lean_Elab_Structural_structuralRecursion_match__1___rarg), 2, 0); -return x_2; -} -} -lean_object* l_Array_foldlMUnsafe_fold___at_Lean_Elab_Structural_structuralRecursion___spec__1(lean_object* x_1, size_t x_2, size_t x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11) { -_start: -{ -uint8_t x_12; -x_12 = x_2 == x_3; -if (x_12 == 0) -{ -lean_object* x_13; lean_object* x_14; -lean_dec(x_4); -x_13 = lean_array_uget(x_1, x_2); -lean_inc(x_10); -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -x_14 = lean_apply_5(x_13, x_7, x_8, x_9, x_10, x_11); -if (lean_obj_tag(x_14) == 0) -{ -lean_object* x_15; lean_object* x_16; size_t x_17; size_t x_18; -x_15 = lean_ctor_get(x_14, 0); -lean_inc(x_15); -x_16 = lean_ctor_get(x_14, 1); -lean_inc(x_16); -lean_dec(x_14); -x_17 = 1; -x_18 = x_2 + x_17; -x_2 = x_18; -x_4 = x_15; -x_11 = x_16; -goto _start; -} -else -{ -uint8_t x_20; -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -x_20 = !lean_is_exclusive(x_14); -if (x_20 == 0) -{ -return x_14; -} -else -{ -lean_object* x_21; lean_object* x_22; lean_object* x_23; -x_21 = lean_ctor_get(x_14, 0); -x_22 = lean_ctor_get(x_14, 1); -lean_inc(x_22); -lean_inc(x_21); -lean_dec(x_14); -x_23 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_23, 0, x_21); -lean_ctor_set(x_23, 1, x_22); -return x_23; -} -} -} -else -{ -lean_object* x_24; -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -x_24 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_24, 0, x_4); -lean_ctor_set(x_24, 1, x_11); -return x_24; -} -} -} -static lean_object* _init_l_Lean_Elab_Structural_structuralRecursion___lambda__1___closed__1() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string("structural recursion failed, produced type incorrect term"); -return x_1; -} -} -static lean_object* _init_l_Lean_Elab_Structural_structuralRecursion___lambda__1___closed__2() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Elab_Structural_structuralRecursion___lambda__1___closed__1; -x_2 = l_Lean_stringToMessageData(x_1); -return x_2; -} -} -lean_object* l_Lean_Elab_Structural_structuralRecursion___lambda__1(lean_object* x_1) { -_start: -{ -lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; -x_2 = l_Lean_indentD(x_1); -x_3 = l_Lean_Elab_Structural_structuralRecursion___lambda__1___closed__2; -x_4 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_4, 0, x_3); -lean_ctor_set(x_4, 1, x_2); -x_5 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__6; -x_6 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_6, 0, x_4); -lean_ctor_set(x_6, 1, x_5); -return x_6; -} -} -static lean_object* _init_l_Lean_Elab_Structural_structuralRecursion___closed__1() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string("structural recursion does not handle mutually recursive functions"); -return x_1; -} -} -static lean_object* _init_l_Lean_Elab_Structural_structuralRecursion___closed__2() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Elab_Structural_structuralRecursion___closed__1; -x_2 = l_Lean_stringToMessageData(x_1); -return x_2; -} -} -static lean_object* _init_l_Lean_Elab_Structural_structuralRecursion___closed__3() { -_start: -{ -lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_NameSet_empty; -x_2 = l_Lean_Elab_Structural_State_addMatchers___default___closed__1; -x_3 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_3, 0, x_1); -lean_ctor_set(x_3, 1, x_2); -return x_3; -} -} -static lean_object* _init_l_Lean_Elab_Structural_structuralRecursion___closed__4() { -_start: -{ -lean_object* x_1; -x_1 = lean_alloc_closure((void*)(l_Lean_Elab_Structural_structuralRecursion___lambda__1), 1, 0); -return x_1; -} -} -lean_object* l_Lean_Elab_Structural_structuralRecursion(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; uint8_t x_11; -x_9 = lean_array_get_size(x_1); -x_10 = lean_unsigned_to_nat(1u); -x_11 = lean_nat_dec_eq(x_9, x_10); -lean_dec(x_9); -if (x_11 == 0) -{ -lean_object* x_12; lean_object* x_13; -lean_dec(x_1); -x_12 = l_Lean_Elab_Structural_structuralRecursion___closed__2; -x_13 = l_Lean_throwError___at_Lean_Elab_Term_throwErrorIfErrors___spec__1(x_12, 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); -return x_13; -} -else -{ -lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; -x_14 = l_Lean_Elab_instInhabitedPreDefinition; -x_15 = lean_unsigned_to_nat(0u); -x_16 = lean_array_get(x_14, x_1, x_15); -lean_inc(x_16); -x_17 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion), 7, 1); -lean_closure_set(x_17, 0, x_16); -x_18 = l_Lean_Elab_Structural_structuralRecursion___closed__3; -lean_inc(x_7); -lean_inc(x_6); -lean_inc(x_5); -lean_inc(x_4); -x_19 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_run___rarg(x_17, x_18, x_4, x_5, x_6, x_7, x_8); -if (lean_obj_tag(x_19) == 0) -{ -lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; uint8_t x_26; lean_object* x_27; -x_20 = lean_ctor_get(x_19, 0); -lean_inc(x_20); -x_21 = lean_ctor_get(x_19, 1); -lean_inc(x_21); -lean_dec(x_19); -x_22 = lean_ctor_get(x_20, 0); -lean_inc(x_22); -x_23 = lean_ctor_get(x_20, 1); -lean_inc(x_23); -lean_dec(x_20); -x_24 = lean_ctor_get(x_23, 1); -lean_inc(x_24); -x_25 = lean_array_get_size(x_24); -x_26 = lean_nat_dec_lt(x_15, x_25); -if (x_26 == 0) -{ -lean_dec(x_25); -lean_dec(x_24); -x_27 = x_21; -goto block_43; -} -else -{ -uint8_t x_44; -x_44 = lean_nat_dec_le(x_25, x_25); -if (x_44 == 0) -{ -lean_dec(x_25); -lean_dec(x_24); -x_27 = x_21; -goto block_43; -} -else -{ -size_t x_45; size_t x_46; lean_object* x_47; lean_object* x_48; -x_45 = 0; -x_46 = lean_usize_of_nat(x_25); -lean_dec(x_25); -x_47 = lean_box(0); -lean_inc(x_7); -lean_inc(x_6); -lean_inc(x_5); -lean_inc(x_4); -x_48 = l_Array_foldlMUnsafe_fold___at_Lean_Elab_Structural_structuralRecursion___spec__1(x_24, x_45, x_46, x_47, x_2, x_3, x_4, x_5, x_6, x_7, x_21); -lean_dec(x_24); -if (lean_obj_tag(x_48) == 0) -{ -lean_object* x_49; -x_49 = lean_ctor_get(x_48, 1); -lean_inc(x_49); -lean_dec(x_48); -x_27 = x_49; -goto block_43; -} -else -{ -uint8_t x_50; -lean_dec(x_23); -lean_dec(x_22); -lean_dec(x_16); -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_50 = !lean_is_exclusive(x_48); -if (x_50 == 0) -{ -return x_48; -} -else -{ -lean_object* x_51; lean_object* x_52; lean_object* x_53; -x_51 = lean_ctor_get(x_48, 0); -x_52 = lean_ctor_get(x_48, 1); -lean_inc(x_52); -lean_inc(x_51); -lean_dec(x_48); -x_53 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_53, 0, x_51); -lean_ctor_set(x_53, 1, x_52); -return x_53; -} -} -} -} -block_43: -{ -lean_object* x_28; lean_object* x_29; lean_object* x_30; -lean_inc(x_3); -lean_inc(x_2); -x_28 = lean_alloc_closure((void*)(l_Lean_Elab_addNonRec), 8, 3); -lean_closure_set(x_28, 0, x_22); -lean_closure_set(x_28, 1, x_2); -lean_closure_set(x_28, 2, x_3); -x_29 = l_Lean_Elab_Structural_structuralRecursion___closed__4; -lean_inc(x_7); -lean_inc(x_6); -lean_inc(x_5); -lean_inc(x_4); -x_30 = l_Lean_Meta_mapErrorImp___rarg(x_28, x_29, x_4, x_5, x_6, x_7, x_27); -if (lean_obj_tag(x_30) == 0) -{ -lean_object* x_31; lean_object* x_32; -x_31 = lean_ctor_get(x_30, 1); -lean_inc(x_31); -lean_dec(x_30); -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_32 = l_Lean_Elab_addAndCompilePartialRec(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_31); -if (lean_obj_tag(x_32) == 0) -{ -lean_object* x_33; lean_object* x_34; -x_33 = lean_ctor_get(x_32, 1); -lean_inc(x_33); -lean_dec(x_32); -x_34 = l_Lean_Elab_Structural_addSmartUnfoldingDef(x_16, x_23, x_2, x_3, x_4, x_5, x_6, x_7, x_33); -return x_34; -} -else -{ -uint8_t x_35; -lean_dec(x_23); -lean_dec(x_16); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -x_35 = !lean_is_exclusive(x_32); -if (x_35 == 0) -{ -return x_32; -} -else -{ -lean_object* x_36; lean_object* x_37; lean_object* x_38; -x_36 = lean_ctor_get(x_32, 0); -x_37 = lean_ctor_get(x_32, 1); -lean_inc(x_37); -lean_inc(x_36); -lean_dec(x_32); -x_38 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_38, 0, x_36); -lean_ctor_set(x_38, 1, x_37); -return x_38; -} -} -} -else -{ -uint8_t x_39; -lean_dec(x_23); -lean_dec(x_16); -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_39 = !lean_is_exclusive(x_30); -if (x_39 == 0) -{ -return x_30; -} -else -{ -lean_object* x_40; lean_object* x_41; lean_object* x_42; -x_40 = lean_ctor_get(x_30, 0); -x_41 = lean_ctor_get(x_30, 1); -lean_inc(x_41); -lean_inc(x_40); -lean_dec(x_30); -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 -{ -uint8_t x_54; -lean_dec(x_16); -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_54 = !lean_is_exclusive(x_19); -if (x_54 == 0) -{ -return x_19; -} -else -{ -lean_object* x_55; lean_object* x_56; lean_object* x_57; -x_55 = lean_ctor_get(x_19, 0); -x_56 = lean_ctor_get(x_19, 1); -lean_inc(x_56); -lean_inc(x_55); -lean_dec(x_19); -x_57 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_57, 0, x_55); -lean_ctor_set(x_57, 1, x_56); -return x_57; -} -} -} -} -} -lean_object* l_Array_foldlMUnsafe_fold___at_Lean_Elab_Structural_structuralRecursion___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) { -_start: -{ -size_t x_12; size_t x_13; lean_object* x_14; -x_12 = lean_unbox_usize(x_2); -lean_dec(x_2); -x_13 = lean_unbox_usize(x_3); -lean_dec(x_3); -x_14 = l_Array_foldlMUnsafe_fold___at_Lean_Elab_Structural_structuralRecursion___spec__1(x_1, x_12, x_13, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_1); -return x_14; -} -} -lean_object* l_Lean_Elab_Structural_initFn____x40_Lean_Elab_PreDefinition_Structural___hyg_7041_(lean_object* x_1) { -_start: -{ -lean_object* x_2; lean_object* x_3; -x_2 = l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___closed__6; -x_3 = l_Lean_registerTraceClass(x_2, x_1); -return x_3; -} -} lean_object* initialize_Init(lean_object*); -lean_object* initialize_Lean_Util_ForEachExpr(lean_object*); -lean_object* initialize_Lean_Meta_ForEachExpr(lean_object*); -lean_object* initialize_Lean_Meta_RecursorInfo(lean_object*); -lean_object* initialize_Lean_Meta_Match_Match(lean_object*); -lean_object* initialize_Lean_Meta_Transform(lean_object*); -lean_object* initialize_Lean_Meta_IndPredBelow(lean_object*); -lean_object* initialize_Lean_Elab_PreDefinition_Basic(lean_object*); +lean_object* initialize_Lean_Elab_PreDefinition_Structural_Main(lean_object*); static bool _G_initialized = false; lean_object* initialize_Lean_Elab_PreDefinition_Structural(lean_object* w) { lean_object * res; @@ -20523,328 +23,7 @@ _G_initialized = true; res = initialize_Init(lean_io_mk_world()); if (lean_io_result_is_error(res)) return res; lean_dec_ref(res); -res = initialize_Lean_Util_ForEachExpr(lean_io_mk_world()); -if (lean_io_result_is_error(res)) return res; -lean_dec_ref(res); -res = initialize_Lean_Meta_ForEachExpr(lean_io_mk_world()); -if (lean_io_result_is_error(res)) return res; -lean_dec_ref(res); -res = initialize_Lean_Meta_RecursorInfo(lean_io_mk_world()); -if (lean_io_result_is_error(res)) return res; -lean_dec_ref(res); -res = initialize_Lean_Meta_Match_Match(lean_io_mk_world()); -if (lean_io_result_is_error(res)) return res; -lean_dec_ref(res); -res = initialize_Lean_Meta_Transform(lean_io_mk_world()); -if (lean_io_result_is_error(res)) return res; -lean_dec_ref(res); -res = initialize_Lean_Meta_IndPredBelow(lean_io_mk_world()); -if (lean_io_result_is_error(res)) return res; -lean_dec_ref(res); -res = initialize_Lean_Elab_PreDefinition_Basic(lean_io_mk_world()); -if (lean_io_result_is_error(res)) return res; -lean_dec_ref(res); -l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_getFixedPrefix___spec__1___closed__1 = _init_l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_getFixedPrefix___spec__1___closed__1(); -lean_mark_persistent(l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_getFixedPrefix___spec__1___closed__1); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_getFixedPrefix___lambda__2___closed__1 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_getFixedPrefix___lambda__2___closed__1(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_getFixedPrefix___lambda__2___closed__1); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_getFixedPrefix___lambda__2___closed__2 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_getFixedPrefix___lambda__2___closed__2(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_getFixedPrefix___lambda__2___closed__2); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_hasBadIndexDep_x3f___closed__1 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_hasBadIndexDep_x3f___closed__1(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_hasBadIndexDep_x3f___closed__1); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_throwStructuralFailed___rarg___closed__1 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_throwStructuralFailed___rarg___closed__1(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_throwStructuralFailed___rarg___closed__1); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_throwStructuralFailed___rarg___closed__2 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_throwStructuralFailed___rarg___closed__2(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_throwStructuralFailed___rarg___closed__2); -l_Lean_Elab_Structural_State_matcherBelowDep___default = _init_l_Lean_Elab_Structural_State_matcherBelowDep___default(); -lean_mark_persistent(l_Lean_Elab_Structural_State_matcherBelowDep___default); -l_Lean_Elab_Structural_State_addMatchers___default___closed__1 = _init_l_Lean_Elab_Structural_State_addMatchers___default___closed__1(); -lean_mark_persistent(l_Lean_Elab_Structural_State_addMatchers___default___closed__1); -l_Lean_Elab_Structural_State_addMatchers___default = _init_l_Lean_Elab_Structural_State_addMatchers___default(); -lean_mark_persistent(l_Lean_Elab_Structural_State_addMatchers___default); -l_Lean_Elab_Structural_instInhabitedM___closed__1 = _init_l_Lean_Elab_Structural_instInhabitedM___closed__1(); -lean_mark_persistent(l_Lean_Elab_Structural_instInhabitedM___closed__1); -l_Lean_Elab_Structural_instInhabitedM___closed__2 = _init_l_Lean_Elab_Structural_instInhabitedM___closed__2(); -lean_mark_persistent(l_Lean_Elab_Structural_instInhabitedM___closed__2); -l_Lean_Elab_Structural_instInhabitedM___closed__3 = _init_l_Lean_Elab_Structural_instInhabitedM___closed__3(); -lean_mark_persistent(l_Lean_Elab_Structural_instInhabitedM___closed__3); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_orelse_x27___rarg___closed__1 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_orelse_x27___rarg___closed__1(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_orelse_x27___rarg___closed__1); -l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__2___closed__1 = _init_l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__2___closed__1(); -lean_mark_persistent(l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__2___closed__1); -l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__2___closed__2 = _init_l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__2___closed__2(); -lean_mark_persistent(l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__2___closed__2); -l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__2___closed__3 = _init_l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__2___closed__3(); -lean_mark_persistent(l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__2___closed__3); -l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__2___closed__4 = _init_l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__2___closed__4(); -lean_mark_persistent(l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___spec__2___closed__4); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__1 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__1(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__1); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__2 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__2(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__2); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__3 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__3(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__3); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__4 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__4(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__4); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__5 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__5(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__5); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__6 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__6(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__6); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__1 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__1(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__1); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__2 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__2(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__2); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__3 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__3(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__3); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__4 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__4(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__4); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__5 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__5(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__5); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__6 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__6(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__6); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__7 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__7(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__7); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__8 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__8(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__8); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__9 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__9(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__9); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__10 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__10(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__10); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__11 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__11(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__11); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__12 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__12(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__12); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__13 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__13(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__13); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__14 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__14(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__14); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__15 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__15(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__15); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__16 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__16(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__16); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__17 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__17(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_findRecArg_loop___rarg___closed__17); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_ensureNoRecFn___lambda__1___closed__1 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_ensureNoRecFn___lambda__1___closed__1(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_ensureNoRecFn___lambda__1___closed__1); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_ensureNoRecFn___lambda__1___closed__2 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_ensureNoRecFn___lambda__1___closed__2(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_ensureNoRecFn___lambda__1___closed__2); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_throwToBelowFailed___rarg___closed__1 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_throwToBelowFailed___rarg___closed__1(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_throwToBelowFailed___rarg___closed__1); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_throwToBelowFailed___rarg___closed__2 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_throwToBelowFailed___rarg___closed__2(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_throwToBelowFailed___rarg___closed__2); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux_match__2___rarg___closed__1 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux_match__2___rarg___closed__1(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux_match__2___rarg___closed__1); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux_match__2___rarg___closed__2 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux_match__2___rarg___closed__2(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux_match__2___rarg___closed__2); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__1 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__1(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__1); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__2 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__2(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__2); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__3 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__3(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__3); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__4 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__4(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__4); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__5 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__5(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__5); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__6 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__6(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__6); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__7 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__7(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__7); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__8 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__8(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__8); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__9 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__9(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__9); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__10 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__10(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__10); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__11 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__11(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__11); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___closed__1 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___closed__1(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___closed__1); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___closed__2 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___closed__2(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___closed__2); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___closed__3 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___closed__3(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___closed__3); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___closed__4 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___closed__4(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___closed__4); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___closed__5 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___closed__5(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___closed__5); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___closed__6 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___closed__6(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___closed__6); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___closed__7 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___closed__7(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___closed__7); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___closed__8 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___closed__8(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___closed__8); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___closed__9 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___closed__9(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___closed__9); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___closed__10 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___closed__10(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_toBelowAux___closed__10); -l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___lambda__2___closed__1 = _init_l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___lambda__2___closed__1(); -lean_mark_persistent(l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___lambda__2___closed__1); -l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___lambda__2___closed__2 = _init_l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___lambda__2___closed__2(); -lean_mark_persistent(l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___lambda__2___closed__2); -l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___lambda__3___closed__1 = _init_l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___lambda__3___closed__1(); -lean_mark_persistent(l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___lambda__3___closed__1); -l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___closed__1 = _init_l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___closed__1(); -lean_mark_persistent(l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___closed__1); -l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___closed__2 = _init_l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___closed__2(); -lean_mark_persistent(l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___closed__2); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_withBelowDict___rarg___closed__1 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_withBelowDict___rarg___closed__1(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_withBelowDict___rarg___closed__1); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_withBelowDict___rarg___closed__2 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_withBelowDict___rarg___closed__2(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_withBelowDict___rarg___closed__2); -l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___lambda__2___closed__1 = _init_l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___lambda__2___closed__1(); -lean_mark_persistent(l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___lambda__2___closed__1); -l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___lambda__2___closed__2 = _init_l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___lambda__2___closed__2(); -lean_mark_persistent(l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___lambda__2___closed__2); -l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___closed__1 = _init_l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___closed__1(); -lean_mark_persistent(l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___closed__1); -l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___closed__2 = _init_l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___closed__2(); -lean_mark_persistent(l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___closed__2); -l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___boxed__const__1 = _init_l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___boxed__const__1(); -lean_mark_persistent(l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___boxed__const__1); -l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__10___boxed__const__1 = _init_l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__10___boxed__const__1(); -lean_mark_persistent(l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__10___boxed__const__1); -l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___closed__1 = _init_l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___closed__1(); -lean_mark_persistent(l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___closed__1); -l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___closed__2 = _init_l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___closed__2(); -lean_mark_persistent(l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___closed__2); -l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___closed__3 = _init_l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___closed__3(); -lean_mark_persistent(l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___closed__3); -l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___closed__4 = _init_l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___closed__4(); -lean_mark_persistent(l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___closed__4); -l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___closed__5 = _init_l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___closed__5(); -lean_mark_persistent(l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___closed__5); -l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___closed__6 = _init_l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___closed__6(); -lean_mark_persistent(l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___closed__6); -l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__2___closed__1 = _init_l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__2___closed__1(); -lean_mark_persistent(l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__2___closed__1); -l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__2___closed__2 = _init_l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__2___closed__2(); -lean_mark_persistent(l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__2___closed__2); -l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__2___closed__3 = _init_l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__2___closed__3(); -lean_mark_persistent(l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__2___closed__3); -l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__2___closed__4 = _init_l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__2___closed__4(); -lean_mark_persistent(l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__2___closed__4); -l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__3___closed__1 = _init_l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__3___closed__1(); -lean_mark_persistent(l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__3___closed__1); -l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__3___closed__2 = _init_l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__3___closed__2(); -lean_mark_persistent(l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__3___closed__2); -l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__3___closed__3 = _init_l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__3___closed__3(); -lean_mark_persistent(l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__3___closed__3); -l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__3___closed__4 = _init_l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__3___closed__4(); -lean_mark_persistent(l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__3___closed__4); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__1___closed__1 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__1___closed__1(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__1___closed__1); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__1___closed__2 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__1___closed__2(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__1___closed__2); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__1___closed__3 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__1___closed__3(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__1___closed__3); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__2___closed__1 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__2___closed__1(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__2___closed__1); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__2___boxed__const__1 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__2___boxed__const__1(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__2___boxed__const__1); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___closed__1 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___closed__1(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___closed__1); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___closed__2 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___closed__2(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___closed__2); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___closed__3 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___closed__3(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___closed__3); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___closed__4 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___closed__4(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceRecApps_loop___closed__4); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___closed__1 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___closed__1(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___closed__1); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___closed__2 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___closed__2(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___closed__2); -l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__2___closed__1 = _init_l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__2___closed__1(); -lean_mark_persistent(l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__2___closed__1); -l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__2___closed__2 = _init_l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__2___closed__2(); -lean_mark_persistent(l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__2___closed__2); -l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__2___boxed__const__1 = _init_l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__2___boxed__const__1(); -lean_mark_persistent(l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__2___boxed__const__1); -l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__4___boxed__const__1 = _init_l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__4___boxed__const__1(); -lean_mark_persistent(l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__4___boxed__const__1); -l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__6___boxed__const__1 = _init_l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__6___boxed__const__1(); -lean_mark_persistent(l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__6___boxed__const__1); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___lambda__2___closed__1 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___lambda__2___closed__1(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___lambda__2___closed__1); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___lambda__2___closed__2 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___lambda__2___closed__2(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___lambda__2___closed__2); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___lambda__2___closed__3 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___lambda__2___closed__3(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___lambda__2___closed__3); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___lambda__2___closed__4 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___lambda__2___closed__4(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___lambda__2___closed__4); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___closed__1 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___closed__1(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___closed__1); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___closed__2 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___closed__2(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___closed__2); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__1___closed__1 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__1___closed__1(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__1___closed__1); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__3___closed__1 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__3___closed__1(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__3___closed__1); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__3___closed__2 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__3___closed__2(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__3___closed__2); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__5___closed__1 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__5___closed__1(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__5___closed__1); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__5___closed__2 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__5___closed__2(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__5___closed__2); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__6___closed__1 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__6___closed__1(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__6___closed__1); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__6___closed__2 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__6___closed__2(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__6___closed__2); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__7___closed__1 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__7___closed__1(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__7___closed__1); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__7___closed__2 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__7___closed__2(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__7___closed__2); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__9___closed__1 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__9___closed__1(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__9___closed__1); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__9___closed__2 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__9___closed__2(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___lambda__9___closed__2); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___closed__1 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___closed__1(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___closed__1); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___closed__2 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___closed__2(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___closed__2); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___closed__3 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___closed__3(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___closed__3); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___closed__4 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___closed__4(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_mkBRecOn___closed__4); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_preprocess___closed__1 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_preprocess___closed__1(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_preprocess___closed__1); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___lambda__2___closed__1 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___lambda__2___closed__1(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___lambda__2___closed__1); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___lambda__2___closed__2 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___lambda__2___closed__2(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___lambda__2___closed__2); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___lambda__5___closed__1 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___lambda__5___closed__1(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___lambda__5___closed__1); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___lambda__5___closed__2 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___lambda__5___closed__2(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___lambda__5___closed__2); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___lambda__6___closed__1 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___lambda__6___closed__1(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___lambda__6___closed__1); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___lambda__6___closed__2 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___lambda__6___closed__2(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___lambda__6___closed__2); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___lambda__6___closed__3 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___lambda__6___closed__3(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___lambda__6___closed__3); -l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___lambda__6___closed__4 = _init_l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___lambda__6___closed__4(); -lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_0__Lean_Elab_Structural_elimRecursion___lambda__6___closed__4); -l_Lean_Expr_withAppAux___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__2___boxed__const__1 = _init_l_Lean_Expr_withAppAux___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__2___boxed__const__1(); -lean_mark_persistent(l_Lean_Expr_withAppAux___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__2___boxed__const__1); -l_Lean_Expr_withAppAux___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__4___boxed__const__1 = _init_l_Lean_Expr_withAppAux___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__4___boxed__const__1(); -lean_mark_persistent(l_Lean_Expr_withAppAux___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__4___boxed__const__1); -l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___boxed__const__1 = _init_l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___boxed__const__1(); -lean_mark_persistent(l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___boxed__const__1); -l_Lean_Elab_Structural_addSmartUnfoldingDefAux___closed__1 = _init_l_Lean_Elab_Structural_addSmartUnfoldingDefAux___closed__1(); -lean_mark_persistent(l_Lean_Elab_Structural_addSmartUnfoldingDefAux___closed__1); -l_Lean_Elab_Structural_structuralRecursion___lambda__1___closed__1 = _init_l_Lean_Elab_Structural_structuralRecursion___lambda__1___closed__1(); -lean_mark_persistent(l_Lean_Elab_Structural_structuralRecursion___lambda__1___closed__1); -l_Lean_Elab_Structural_structuralRecursion___lambda__1___closed__2 = _init_l_Lean_Elab_Structural_structuralRecursion___lambda__1___closed__2(); -lean_mark_persistent(l_Lean_Elab_Structural_structuralRecursion___lambda__1___closed__2); -l_Lean_Elab_Structural_structuralRecursion___closed__1 = _init_l_Lean_Elab_Structural_structuralRecursion___closed__1(); -lean_mark_persistent(l_Lean_Elab_Structural_structuralRecursion___closed__1); -l_Lean_Elab_Structural_structuralRecursion___closed__2 = _init_l_Lean_Elab_Structural_structuralRecursion___closed__2(); -lean_mark_persistent(l_Lean_Elab_Structural_structuralRecursion___closed__2); -l_Lean_Elab_Structural_structuralRecursion___closed__3 = _init_l_Lean_Elab_Structural_structuralRecursion___closed__3(); -lean_mark_persistent(l_Lean_Elab_Structural_structuralRecursion___closed__3); -l_Lean_Elab_Structural_structuralRecursion___closed__4 = _init_l_Lean_Elab_Structural_structuralRecursion___closed__4(); -lean_mark_persistent(l_Lean_Elab_Structural_structuralRecursion___closed__4); -res = l_Lean_Elab_Structural_initFn____x40_Lean_Elab_PreDefinition_Structural___hyg_7041_(lean_io_mk_world()); +res = initialize_Lean_Elab_PreDefinition_Structural_Main(lean_io_mk_world()); if (lean_io_result_is_error(res)) return res; lean_dec_ref(res); return lean_io_result_mk_ok(lean_box(0)); diff --git a/stage0/stdlib/Lean/Elab/PreDefinition/Structural/BRecOn.c b/stage0/stdlib/Lean/Elab/PreDefinition/Structural/BRecOn.c new file mode 100644 index 0000000000..6c175335e5 --- /dev/null +++ b/stage0/stdlib/Lean/Elab/PreDefinition/Structural/BRecOn.c @@ -0,0 +1,8299 @@ +// Lean compiler output +// Module: Lean.Elab.PreDefinition.Structural.BRecOn +// Imports: Init Lean.Meta.Match.Match Lean.Elab.PreDefinition.Structural.Basic +#include +#if defined(__clang__) +#pragma clang diagnostic ignored "-Wunused-parameter" +#pragma clang diagnostic ignored "-Wunused-label" +#elif defined(__GNUC__) && !defined(__CLANG__) +#pragma GCC diagnostic ignored "-Wunused-parameter" +#pragma GCC diagnostic ignored "-Wunused-label" +#pragma GCC diagnostic ignored "-Wunused-but-set-variable" +#endif +#ifdef __cplusplus +extern "C" { +#endif +static lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__3___closed__4; +lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelow___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__3(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_array_set(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Structural_mkBRecOn___lambda__9(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__10___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +size_t l_USize_add(size_t, size_t); +lean_object* l_Lean_Elab_Structural_mkBRecOn___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_Elab_Structural_mkBRecOn___lambda__1___closed__1; +static lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__1; +lean_object* l_Lean_stringToMessageData(lean_object*); +lean_object* lean_mk_empty_array_with_capacity(lean_object*); +uint8_t l_Array_contains___at___private_Lean_Meta_FunInfo_0__Lean_Meta_collectDeps_visit___spec__2(lean_object*, lean_object*); +lean_object* l_Lean_mkSort(lean_object*); +lean_object* l_Std_RBNode_insert___at_Lean_NameSet_insert___spec__1(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_mkForallFVars(lean_object*, lean_object*, uint8_t, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__3___closed__1; +lean_object* l_Std_Range_forIn_loop___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__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*); +static lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__1___closed__3; +static lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__7; +lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__4___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__8; +lean_object* lean_name_mk_string(lean_object*, lean_object*); +uint8_t l_USize_decEq(size_t, size_t); +lean_object* lean_array_uget(lean_object*, size_t); +lean_object* l_Array_append___rarg(lean_object*, lean_object*); +lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux_match__2(lean_object*); +static lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__7; +lean_object* l_Lean_Meta_MatcherApp_addArg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_mkAppM(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* lean_array_uset(lean_object*, size_t, lean_object*); +static lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__2___closed__3; +lean_object* l_Lean_Meta_forallTelescopeReducing___at_Lean_Meta_getParamNames___spec__2___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_extract___rarg(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__10___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_object* l_Lean_Meta_saveState___rarg(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_Basic_0__Lean_Meta_withLocalDeclImp___rarg(lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_addTrace_addTraceOptions(lean_object*); +lean_object* l_Lean_Meta_matchMatcherApp_x3f___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +uint8_t l_Lean_checkTraceOption(lean_object*, lean_object*); +lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__2(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_Elab_Structural_mkBRecOn___lambda__3___closed__1; +lean_object* lean_st_ref_get(lean_object*, lean_object*); +uint8_t l_Lean_Elab_Structural_recArgHasLooseBVarsAt(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Structural_mkBRecOn___lambda__4___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__4(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___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___closed__3; +static lean_object* l_Lean_Elab_Structural_mkBRecOn___lambda__3___closed__2; +static lean_object* l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___closed__6; +lean_object* l_Lean_Meta_forallBoundedTelescope___at_Lean_Elab_Structural_mkBRecOn___spec__1(lean_object*); +lean_object* l_Lean_Elab_Structural_mkBRecOn___lambda__3___boxed(lean_object**); +lean_object* lean_expr_instantiate1(lean_object*, lean_object*); +lean_object* l_Array_toSubarray___rarg(lean_object*, lean_object*, lean_object*); +lean_object* lean_array_push(lean_object*, lean_object*); +lean_object* lean_array_get_size(lean_object*); +lean_object* l_Lean_MessageData_ofList(lean_object*); +static lean_object* l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___closed__5; +static lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__3; +lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__8___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__2___boxed__const__1; +static lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__4___closed__1; +static lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___lambda__3___closed__1; +static lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__3___closed__2; +lean_object* l_Lean_Meta_withLetDecl___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__16___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Expr_replaceFVars(lean_object*, lean_object*, lean_object*); +static lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux_match__2___rarg___closed__1; +lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___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*); +uint8_t l_USize_decLt(size_t, size_t); +lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_throwToBelowFailed___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___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*); +extern lean_object* l_Lean_binductionOnSuffix; +static lean_object* l_Lean_Elab_Structural_mkBRecOn___lambda__6___closed__1; +lean_object* l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +extern lean_object* l_Lean_levelZero; +lean_object* lean_nat_add(lean_object*, lean_object*); +lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___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* l_Lean_Meta_withLocalDecl___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__15(lean_object*); +lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux_match__1___rarg(lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___closed__4; +lean_object* l_Array_zip___rarg(lean_object*, lean_object*); +static lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__5; +lean_object* l_Lean_Elab_Structural_mkBRecOn___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_object*); +static lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___closed__1; +lean_object* l_Lean_mkAppN(lean_object*, lean_object*); +lean_object* l_Lean_mkMData(lean_object*, lean_object*); +lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop_match__2___rarg(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Structural_mkBRecOn___lambda__8(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___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__2___closed__1; +lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux_match__3___rarg(lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___lambda__2___closed__1; +lean_object* l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_throwToBelowFailed___spec__1___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_addTrace___at___private_Lean_Meta_LevelDefEq_0__Lean_Meta_postponeIsLevelDefEq___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Structural_mkBRecOn___lambda__7___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*); +lean_object* l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__3; +lean_object* l___private_Lean_Expr_0__Lean_Expr_getAppArgsAux(lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___lambda__2___closed__2; +lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_Elab_Structural_mkBRecOn___lambda__7___closed__2; +lean_object* l_List_mapTRAux___at_Lean_MessageData_instCoeListExprMessageData___spec__1(lean_object*, lean_object*); +lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___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*); +static lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___closed__1; +static lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___closed__4; +lean_object* l_Lean_Meta_lambdaTelescope___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__13(lean_object*); +lean_object* l___private_Lean_CoreM_0__Lean_Core_mkFreshNameImp(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_mkProj(lean_object*, lean_object*, lean_object*); +static lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__5; +lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___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*); +static lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___closed__2; +uint8_t lean_nat_dec_eq(lean_object*, lean_object*); +lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___boxed__const__1; +lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___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___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__1___closed__2; +static lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__6; +lean_object* l_Lean_Elab_Structural_mkBRecOn___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*); +lean_object* lean_st_ref_take(lean_object*, lean_object*); +lean_object* lean_nat_sub(lean_object*, lean_object*); +lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___lambda__3(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_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__2___closed__2; +lean_object* l_Lean_Expr_headBeta(lean_object*); +static lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___closed__2; +lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___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* l_Lean_Meta_lambdaTelescope___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__13___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___closed__1; +lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_withBelowDict(lean_object*); +static lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___lambda__2___closed__2; +lean_object* lean_array_get(lean_object*, lean_object*, lean_object*); +static lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_throwToBelowFailed___rarg___closed__2; +lean_object* l_Lean_Meta_mkLambdaFVars(lean_object*, lean_object*, uint8_t, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_throwToBelowFailed___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_withBelowDict___spec__1(lean_object*); +static lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_throwToBelowFailed___rarg___closed__1; +lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__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* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_throwToBelowFailed(lean_object*); +lean_object* l_Lean_Meta_decLevel(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Nat_repr(lean_object*); +lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop_match__2(lean_object*); +lean_object* l___private_Lean_Meta_Basic_0__Lean_Meta_forallTelescopeReducingAux___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__10; +lean_object* l_Lean_Elab_Structural_ensureNoRecFn(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__1___closed__1; +static lean_object* l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___closed__2; +lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___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*); +static lean_object* l_Lean_Elab_Structural_mkBRecOn___lambda__7___closed__1; +static lean_object* l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___closed__1; +static lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__2; +lean_object* lean_array_to_list(lean_object*, lean_object*); +lean_object* l_Std_Range_forIn_loop___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__9(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___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__1; +lean_object* l_Lean_Elab_Structural_mkBRecOn___lambda__6___boxed(lean_object**); +extern lean_object* l_Lean_instInhabitedExpr; +static lean_object* l_Lean_Elab_Structural_mkBRecOn___closed__1; +lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___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* l_Lean_Elab_Structural_mkBRecOn___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*, lean_object*, lean_object*, lean_object*); +uint8_t l_Lean_Expr_isConstOf(lean_object*, lean_object*); +lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux_match__2___rarg(lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_Elab_Structural_mkBRecOn___lambda__6___closed__2; +lean_object* l_Lean_Elab_Structural_mkBRecOn___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_object*, lean_object*); +lean_object* l_Lean_Meta_mapErrorImp___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* lean_whnf(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux_match__3(lean_object*); +lean_object* l_Lean_Meta_matchMatcherApp_x3f___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___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*); +uint8_t l_Lean_Expr_Data_binderInfo(uint64_t); +lean_object* l_Lean_Meta_SavedState_restore(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +size_t lean_usize_of_nat(lean_object*); +lean_object* l_Lean_Elab_Structural_mkBRecOn___lambda__7(lean_object*, lean_object*, 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*, lean_object*); +lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop_match__1(lean_object*); +lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_withBelowDict___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_withBelowDict___rarg___closed__1; +lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_withBelowDict___spec__1___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* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__3(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_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___lambda__2___closed__1; +lean_object* l_Lean_Elab_Structural_mkBRecOn(lean_object*, lean_object*, 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_object* l_Lean_Expr_getAppNumArgsAux(lean_object*, lean_object*); +lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelow(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__10(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_Elab_Structural_mkBRecOn___lambda__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__4; +static lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__2___closed__1; +static lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__8; +uint8_t lean_expr_eqv(lean_object*, lean_object*); +static lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___closed__3; +static lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__11; +lean_object* l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__5(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_getMatcherInfo_x3f___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +uint8_t lean_nat_dec_le(lean_object*, lean_object*); +lean_object* l_Lean_mkApp(lean_object*, lean_object*); +lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_withBelowDict___rarg___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__4; +lean_object* l_Lean_Name_append(lean_object*, lean_object*); +lean_object* l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__6___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_withBelowDict___rarg___closed__2; +static lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__9; +lean_object* l___private_Lean_Meta_Basic_0__Lean_Meta_instantiateForallAux(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__5(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__8(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* l_Lean_Meta_MatcherApp_toExpr(lean_object*); +lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___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* l_Lean_Meta_withLocalDecl___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__15___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__10___boxed__const__1; +lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop(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_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__9; +lean_object* l_Lean_Elab_Structural_mkBRecOn___lambda__6(lean_object*, lean_object*, lean_object*, 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*, lean_object*); +lean_object* l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__5___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at___private_Lean_Meta_LevelDefEq_0__Lean_Meta_postponeIsLevelDefEq___spec__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___closed__2; +lean_object* l_Array_ofSubarray___rarg(lean_object*); +lean_object* l_Lean_Meta_getLevel(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop_match__1___rarg(lean_object*, lean_object*); +static lean_object* l_Lean_Elab_Structural_mkBRecOn___lambda__5___closed__1; +static lean_object* l_Lean_Elab_Structural_mkBRecOn___closed__3; +static lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux_match__2___rarg___closed__2; +lean_object* l_Array_foldlMUnsafe_fold___at_Lean_Elab_Structural_mkBRecOn___spec__2(lean_object*, lean_object*, lean_object*, size_t, size_t, lean_object*); +lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14(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* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop_match__3___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* lean_st_ref_set(lean_object*, lean_object*, lean_object*); +lean_object* l_Std_Range_forIn_loop___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__9___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_addMessageContextFull___at_Lean_Meta_instAddMessageContextMetaM___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_List_toArrayAux___rarg(lean_object*, lean_object*); +lean_object* l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__12(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* lean_infer_type(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___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* l_Lean_Meta_isExprDefEq(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_forallBoundedTelescope___at_Lean_Elab_Structural_mkBRecOn___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_Elab_Structural_mkBRecOn___lambda__9___closed__2; +lean_object* l_Lean_Meta_forallBoundedTelescope___at_Lean_Meta_reduceMatcher_x3f___spec__3___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_Elab_Structural_mkBRecOn___closed__2; +static lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__2___closed__4; +lean_object* l_Lean_Meta_Match_MatcherInfo_arity(lean_object*); +lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___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*); +static lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__6; +lean_object* lean_mk_array(lean_object*, lean_object*); +static lean_object* l_Lean_Elab_Structural_mkBRecOn___lambda__5___closed__2; +static lean_object* l_Lean_Elab_Structural_mkBRecOn___closed__4; +lean_object* l_Lean_Meta_withLocalDecl___at_Lean_Meta_GeneralizeTelescope_generalizeTelescopeAux___spec__1___rarg(lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__11; +static lean_object* l_Lean_Elab_Structural_mkBRecOn___lambda__9___closed__1; +lean_object* l_Lean_throwError___at_Lean_Meta_withIncRecDepth___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_indentD(lean_object*); +lean_object* l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_throwToBelowFailed___spec__1(lean_object*); +uint8_t l_Array_contains___at_Lean_Meta_CheckAssignment_checkFVar___spec__1(lean_object*, lean_object*); +lean_object* l_Lean_Meta_withLetDecl___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__16(lean_object*); +extern lean_object* l_Lean_brecOnSuffix; +lean_object* l_Lean_Expr_getAppFn(lean_object*); +lean_object* l_Array_foldlMUnsafe_fold___at_Lean_Elab_Structural_mkBRecOn___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_Match_MatcherInfo_numAlts(lean_object*); +lean_object* l_Lean_Meta_withLocalDecl___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__15___rarg(lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Std_Range_forIn_loop___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__4___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___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*); +static lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__2; +lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___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* l_unsafeCast(lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___lambda__1___closed__1; +lean_object* l___private_Lean_Meta_Basic_0__Lean_Meta_lambdaTelescopeImp___rarg(lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_Basic_0__Lean_Meta_withLetDeclImp___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__6(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_getMatcherInfo_x3f___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +uint8_t lean_level_eq(lean_object*, lean_object*); +lean_object* l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__12___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_withLocalDecl___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__15___rarg___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__3___closed__3; +lean_object* l_Lean_Meta_Match_Extension_getMatcherInfo_x3f(lean_object*, lean_object*); +lean_object* l_Lean_indentExpr(lean_object*); +lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux_match__1(lean_object*); +static lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__12; +lean_object* l_Lean_mkConst(lean_object*, lean_object*); +lean_object* l_Lean_Elab_Structural_mkBRecOn___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_object* l_Lean_Meta_lambdaTelescope___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__13___rarg___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__1(lean_object*); +lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop_match__3(lean_object*); +lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___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*); +static lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__10; +lean_object* l_Lean_Meta_check(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +uint8_t lean_string_dec_eq(lean_object*, lean_object*); +lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__10___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +uint8_t lean_nat_dec_lt(lean_object*, lean_object*); +lean_object* l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_throwToBelowFailed___spec__1___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { +_start: +{ +lean_object* x_7; lean_object* x_8; uint8_t x_9; +x_7 = lean_ctor_get(x_4, 3); +x_8 = l_Lean_addMessageContextFull___at_Lean_Meta_instAddMessageContextMetaM___spec__1(x_1, x_2, x_3, x_4, x_5, x_6); +x_9 = !lean_is_exclusive(x_8); +if (x_9 == 0) +{ +lean_object* x_10; lean_object* x_11; +x_10 = lean_ctor_get(x_8, 0); +lean_inc(x_7); +x_11 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_11, 0, x_7); +lean_ctor_set(x_11, 1, x_10); +lean_ctor_set_tag(x_8, 1); +lean_ctor_set(x_8, 0, x_11); +return x_8; +} +else +{ +lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; +x_12 = lean_ctor_get(x_8, 0); +x_13 = lean_ctor_get(x_8, 1); +lean_inc(x_13); +lean_inc(x_12); +lean_dec(x_8); +lean_inc(x_7); +x_14 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_14, 0, x_7); +lean_ctor_set(x_14, 1, x_12); +x_15 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_15, 0, x_14); +lean_ctor_set(x_15, 1, x_13); +return x_15; +} +} +} +lean_object* l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_throwToBelowFailed___spec__1(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_throwToBelowFailed___spec__1___rarg___boxed), 6, 0); +return x_2; +} +} +static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_throwToBelowFailed___rarg___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("toBelow failed"); +return x_1; +} +} +static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_throwToBelowFailed___rarg___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_throwToBelowFailed___rarg___closed__1; +x_2 = l_Lean_stringToMessageData(x_1); +return x_2; +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_throwToBelowFailed___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { +_start: +{ +lean_object* x_6; lean_object* x_7; +x_6 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_throwToBelowFailed___rarg___closed__2; +x_7 = l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_throwToBelowFailed___spec__1___rarg(x_6, x_1, x_2, x_3, x_4, x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +return x_7; +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_throwToBelowFailed(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_throwToBelowFailed___rarg), 5, 0); +return x_2; +} +} +lean_object* l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_throwToBelowFailed___spec__1___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { +_start: +{ +lean_object* x_7; +x_7 = l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_throwToBelowFailed___spec__1___rarg(x_1, x_2, x_3, x_4, x_5, x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +return x_7; +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux_match__1___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +if (lean_obj_tag(x_1) == 5) +{ +lean_object* x_4; lean_object* x_5; uint64_t x_6; lean_object* x_7; lean_object* x_8; +lean_dec(x_3); +x_4 = lean_ctor_get(x_1, 0); +lean_inc(x_4); +x_5 = lean_ctor_get(x_1, 1); +lean_inc(x_5); +x_6 = lean_ctor_get_uint64(x_1, sizeof(void*)*2); +lean_dec(x_1); +x_7 = lean_box_uint64(x_6); +x_8 = lean_apply_3(x_2, x_4, x_5, x_7); +return x_8; +} +else +{ +lean_object* x_9; +lean_dec(x_2); +x_9 = lean_apply_1(x_3, x_1); +return x_9; +} +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux_match__1(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux_match__1___rarg), 3, 0); +return x_2; +} +} +static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux_match__2___rarg___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("PProd"); +return x_1; +} +} +static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux_match__2___rarg___closed__2() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("And"); +return x_1; +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux_match__2___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +if (lean_obj_tag(x_1) == 5) +{ +lean_object* x_5; +x_5 = lean_ctor_get(x_1, 0); +lean_inc(x_5); +if (lean_obj_tag(x_5) == 5) +{ +lean_object* x_6; +x_6 = lean_ctor_get(x_5, 0); +lean_inc(x_6); +if (lean_obj_tag(x_6) == 4) +{ +lean_object* x_7; +x_7 = lean_ctor_get(x_6, 0); +lean_inc(x_7); +if (lean_obj_tag(x_7) == 1) +{ +lean_object* x_8; +x_8 = lean_ctor_get(x_7, 0); +lean_inc(x_8); +if (lean_obj_tag(x_8) == 0) +{ +lean_object* x_9; uint64_t x_10; lean_object* x_11; uint64_t x_12; lean_object* x_13; uint64_t x_14; lean_object* x_15; uint64_t x_16; lean_object* x_17; uint8_t x_18; +x_9 = lean_ctor_get(x_1, 1); +lean_inc(x_9); +x_10 = lean_ctor_get_uint64(x_1, sizeof(void*)*2); +x_11 = lean_ctor_get(x_5, 1); +lean_inc(x_11); +x_12 = lean_ctor_get_uint64(x_5, sizeof(void*)*2); +lean_dec(x_5); +x_13 = lean_ctor_get(x_6, 1); +lean_inc(x_13); +x_14 = lean_ctor_get_uint64(x_6, sizeof(void*)*2); +lean_dec(x_6); +x_15 = lean_ctor_get(x_7, 1); +lean_inc(x_15); +x_16 = lean_ctor_get_uint64(x_7, sizeof(void*)*2); +lean_dec(x_7); +x_17 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux_match__2___rarg___closed__1; +x_18 = lean_string_dec_eq(x_15, x_17); +if (x_18 == 0) +{ +lean_object* x_19; uint8_t x_20; +lean_dec(x_2); +x_19 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux_match__2___rarg___closed__2; +x_20 = lean_string_dec_eq(x_15, x_19); +lean_dec(x_15); +if (x_20 == 0) +{ +lean_object* x_21; +lean_dec(x_13); +lean_dec(x_11); +lean_dec(x_9); +lean_dec(x_3); +x_21 = lean_apply_1(x_4, x_1); +return x_21; +} +else +{ +lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; +lean_dec(x_4); +lean_dec(x_1); +x_22 = lean_box_uint64(x_14); +x_23 = lean_box_uint64(x_12); +x_24 = lean_box_uint64(x_10); +x_25 = lean_box_uint64(x_16); +x_26 = lean_apply_7(x_3, x_13, x_22, x_11, x_23, x_9, x_24, x_25); +return x_26; +} +} +else +{ +lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; +lean_dec(x_15); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_1); +x_27 = lean_box_uint64(x_14); +x_28 = lean_box_uint64(x_12); +x_29 = lean_box_uint64(x_10); +x_30 = lean_box_uint64(x_16); +x_31 = lean_apply_7(x_2, x_13, x_27, x_11, x_28, x_9, x_29, x_30); +return x_31; +} +} +else +{ +lean_object* x_32; +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_3); +lean_dec(x_2); +x_32 = lean_apply_1(x_4, x_1); +return x_32; +} +} +else +{ +lean_object* x_33; +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_3); +lean_dec(x_2); +x_33 = lean_apply_1(x_4, x_1); +return x_33; +} +} +else +{ +lean_object* x_34; +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_3); +lean_dec(x_2); +x_34 = lean_apply_1(x_4, x_1); +return x_34; +} +} +else +{ +lean_object* x_35; +lean_dec(x_5); +lean_dec(x_3); +lean_dec(x_2); +x_35 = lean_apply_1(x_4, x_1); +return x_35; +} +} +else +{ +lean_object* x_36; +lean_dec(x_3); +lean_dec(x_2); +x_36 = lean_apply_1(x_4, x_1); +return x_36; +} +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux_match__2(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux_match__2___rarg), 4, 0); +return x_2; +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux_match__3___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; +x_5 = lean_apply_3(x_4, x_1, x_2, x_3); +return x_5; +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux_match__3(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux_match__3___rarg), 4, 0); +return x_2; +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___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 = l_Lean_mkAppN(x_1, x_2); +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_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___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_dec(x_5); +lean_inc(x_9); +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_6); +x_11 = l_Lean_Meta_isExprDefEq(x_1, x_2, x_6, x_7, x_8, x_9, x_10); +if (lean_obj_tag(x_11) == 0) +{ +lean_object* x_12; uint8_t x_13; +x_12 = lean_ctor_get(x_11, 0); +lean_inc(x_12); +x_13 = lean_unbox(x_12); +lean_dec(x_12); +if (x_13 == 0) +{ +lean_object* x_14; lean_object* x_15; uint8_t x_16; +lean_dec(x_4); +lean_dec(x_3); +x_14 = lean_ctor_get(x_11, 1); +lean_inc(x_14); +lean_dec(x_11); +x_15 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_throwToBelowFailed___rarg(x_6, x_7, x_8, x_9, x_14); +x_16 = !lean_is_exclusive(x_15); +if (x_16 == 0) +{ +return x_15; +} +else +{ +lean_object* x_17; lean_object* x_18; lean_object* x_19; +x_17 = lean_ctor_get(x_15, 0); +x_18 = lean_ctor_get(x_15, 1); +lean_inc(x_18); +lean_inc(x_17); +lean_dec(x_15); +x_19 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_19, 0, x_17); +lean_ctor_set(x_19, 1, x_18); +return x_19; +} +} +else +{ +lean_object* x_20; lean_object* x_21; lean_object* x_22; +x_20 = lean_ctor_get(x_11, 1); +lean_inc(x_20); +lean_dec(x_11); +x_21 = lean_box(0); +x_22 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__1(x_3, x_4, x_21, 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); +return x_22; +} +} +else +{ +uint8_t x_23; +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_4); +lean_dec(x_3); +x_23 = !lean_is_exclusive(x_11); +if (x_23 == 0) +{ +return x_11; +} +else +{ +lean_object* x_24; lean_object* x_25; lean_object* x_26; +x_24 = lean_ctor_get(x_11, 0); +x_25 = lean_ctor_get(x_11, 1); +lean_inc(x_25); +lean_inc(x_24); +lean_dec(x_11); +x_26 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_26, 0, x_24); +lean_ctor_set(x_26, 1, x_25); +return x_26; +} +} +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___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_object* x_10, lean_object* x_11, lean_object* x_12) { +_start: +{ +lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; +lean_dec(x_7); +x_13 = lean_array_get_size(x_1); +x_14 = lean_array_get_size(x_2); +x_15 = lean_nat_sub(x_13, x_14); +lean_dec(x_14); +x_16 = l_Array_extract___rarg(x_1, x_15, x_13); +x_17 = l_Lean_Expr_replaceFVars(x_3, x_2, x_16); +lean_dec(x_2); +lean_dec(x_3); +if (lean_obj_tag(x_17) == 5) +{ +lean_object* x_18; lean_object* x_19; lean_object* x_20; uint8_t x_21; +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_Expr_getAppFn(x_18); +lean_dec(x_18); +x_21 = lean_expr_eqv(x_20, x_6); +lean_dec(x_6); +lean_dec(x_20); +if (x_21 == 0) +{ +lean_object* x_22; uint8_t x_23; +lean_dec(x_19); +lean_dec(x_16); +lean_dec(x_5); +lean_dec(x_4); +x_22 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_throwToBelowFailed___rarg(x_8, x_9, x_10, x_11, x_12); +x_23 = !lean_is_exclusive(x_22); +if (x_23 == 0) +{ +return x_22; +} +else +{ +lean_object* x_24; lean_object* x_25; lean_object* x_26; +x_24 = lean_ctor_get(x_22, 0); +x_25 = lean_ctor_get(x_22, 1); +lean_inc(x_25); +lean_inc(x_24); +lean_dec(x_22); +x_26 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_26, 0, x_24); +lean_ctor_set(x_26, 1, x_25); +return x_26; +} +} +else +{ +lean_object* x_27; lean_object* x_28; +x_27 = lean_box(0); +x_28 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__2(x_19, x_4, x_5, x_16, x_27, x_8, x_9, x_10, x_11, x_12); +return x_28; +} +} +else +{ +lean_object* x_29; +lean_dec(x_17); +lean_dec(x_16); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +x_29 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_throwToBelowFailed___rarg(x_8, x_9, x_10, x_11, x_12); +return x_29; +} +} +} +static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__4___closed__1() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_levelZero; +x_2 = l_Lean_mkSort(x_1); +return x_2; +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___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_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; uint8_t x_20; +x_11 = lean_unsigned_to_nat(0u); +x_12 = l_Lean_Expr_getAppNumArgsAux(x_1, x_11); +x_13 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__4___closed__1; +lean_inc(x_12); +x_14 = lean_mk_array(x_12, x_13); +x_15 = lean_unsigned_to_nat(1u); +x_16 = lean_nat_sub(x_12, x_15); +lean_dec(x_12); +lean_inc(x_1); +x_17 = l___private_Lean_Expr_0__Lean_Expr_getAppArgsAux(x_1, x_14, x_16); +x_18 = lean_array_get_size(x_4); +x_19 = lean_array_get_size(x_17); +x_20 = lean_nat_dec_le(x_18, x_19); +lean_dec(x_19); +lean_dec(x_18); +if (x_20 == 0) +{ +lean_object* x_21; uint8_t x_22; +lean_dec(x_17); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_21 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_throwToBelowFailed___rarg(x_6, x_7, x_8, x_9, x_10); +x_22 = !lean_is_exclusive(x_21); +if (x_22 == 0) +{ +return x_21; +} +else +{ +lean_object* x_23; lean_object* x_24; lean_object* x_25; +x_23 = lean_ctor_get(x_21, 0); +x_24 = lean_ctor_get(x_21, 1); +lean_inc(x_24); +lean_inc(x_23); +lean_dec(x_21); +x_25 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_25, 0, x_23); +lean_ctor_set(x_25, 1, x_24); +return x_25; +} +} +else +{ +lean_object* x_26; lean_object* x_27; +x_26 = lean_box(0); +x_27 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__3(x_17, x_4, x_5, x_1, x_2, x_3, x_26, x_6, x_7, x_8, x_9, x_10); +return x_27; +} +} +} +static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__1() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux_match__2___rarg___closed__2; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__2() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("left"); +return x_1; +} +} +static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__3() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__1; +x_2 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__2; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__4() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = lean_unsigned_to_nat(1u); +x_2 = lean_mk_empty_array_with_capacity(x_1); +return x_2; +} +} +static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__5() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("right"); +return x_1; +} +} +static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__6() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__1; +x_2 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__5; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__7() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux_match__2___rarg___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__8() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("fst"); +return x_1; +} +} +static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__9() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__7; +x_2 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__8; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__10() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("snd"); +return x_1; +} +} +static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__11() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__7; +x_2 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__10; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___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, lean_object* x_10) { +_start: +{ +lean_dec(x_5); +if (lean_obj_tag(x_1) == 5) +{ +lean_object* x_11; +x_11 = lean_ctor_get(x_1, 0); +lean_inc(x_11); +if (lean_obj_tag(x_11) == 5) +{ +lean_object* x_12; +x_12 = lean_ctor_get(x_11, 0); +lean_inc(x_12); +if (lean_obj_tag(x_12) == 4) +{ +lean_object* x_13; +x_13 = lean_ctor_get(x_12, 0); +lean_inc(x_13); +lean_dec(x_12); +if (lean_obj_tag(x_13) == 1) +{ +lean_object* x_14; +x_14 = lean_ctor_get(x_13, 0); +lean_inc(x_14); +if (lean_obj_tag(x_14) == 0) +{ +lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; uint8_t x_19; +x_15 = lean_ctor_get(x_1, 1); +lean_inc(x_15); +x_16 = lean_ctor_get(x_11, 1); +lean_inc(x_16); +lean_dec(x_11); +x_17 = lean_ctor_get(x_13, 1); +lean_inc(x_17); +lean_dec(x_13); +x_18 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux_match__2___rarg___closed__1; +x_19 = lean_string_dec_eq(x_17, x_18); +if (x_19 == 0) +{ +lean_object* x_20; uint8_t x_21; +x_20 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux_match__2___rarg___closed__2; +x_21 = lean_string_dec_eq(x_17, x_20); +lean_dec(x_17); +if (x_21 == 0) +{ +lean_object* x_22; lean_object* x_23; +lean_dec(x_16); +lean_dec(x_15); +x_22 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__4), 10, 3); +lean_closure_set(x_22, 0, x_2); +lean_closure_set(x_22, 1, x_3); +lean_closure_set(x_22, 2, x_4); +x_23 = l_Lean_Meta_forallTelescopeReducing___at_Lean_Meta_getParamNames___spec__2___rarg(x_1, x_22, x_6, x_7, x_8, x_9, x_10); +return x_23; +} +else +{ +lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; +lean_dec(x_1); +x_24 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__4; +x_25 = lean_array_push(x_24, x_3); +x_26 = l_Lean_Meta_saveState___rarg(x_7, x_8, x_9, x_10); +x_27 = lean_ctor_get(x_26, 0); +lean_inc(x_27); +x_28 = lean_ctor_get(x_26, 1); +lean_inc(x_28); +lean_dec(x_26); +x_29 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__3; +lean_inc(x_9); +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_6); +lean_inc(x_25); +x_30 = l_Lean_Meta_mkAppM(x_29, x_25, x_6, x_7, x_8, x_9, x_28); +if (lean_obj_tag(x_30) == 0) +{ +lean_object* x_31; lean_object* x_32; lean_object* x_33; +x_31 = lean_ctor_get(x_30, 0); +lean_inc(x_31); +x_32 = lean_ctor_get(x_30, 1); +lean_inc(x_32); +lean_dec(x_30); +lean_inc(x_9); +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_6); +lean_inc(x_2); +lean_inc(x_4); +x_33 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux(x_4, x_16, x_2, x_31, x_6, x_7, x_8, x_9, x_32); +if (lean_obj_tag(x_33) == 0) +{ +lean_dec(x_27); +lean_dec(x_25); +lean_dec(x_15); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_4); +lean_dec(x_2); +return x_33; +} +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_33, 1); +lean_inc(x_34); +lean_dec(x_33); +x_35 = l_Lean_Meta_SavedState_restore(x_27, x_6, x_7, x_8, x_9, x_34); +lean_dec(x_27); +x_36 = lean_ctor_get(x_35, 1); +lean_inc(x_36); +lean_dec(x_35); +x_37 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__6; +lean_inc(x_9); +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_6); +x_38 = l_Lean_Meta_mkAppM(x_37, x_25, x_6, x_7, x_8, x_9, x_36); +if (lean_obj_tag(x_38) == 0) +{ +lean_object* x_39; lean_object* x_40; lean_object* x_41; +x_39 = lean_ctor_get(x_38, 0); +lean_inc(x_39); +x_40 = lean_ctor_get(x_38, 1); +lean_inc(x_40); +lean_dec(x_38); +x_41 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux(x_4, x_15, x_2, x_39, x_6, x_7, x_8, x_9, x_40); +return x_41; +} +else +{ +uint8_t x_42; +lean_dec(x_15); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_4); +lean_dec(x_2); +x_42 = !lean_is_exclusive(x_38); +if (x_42 == 0) +{ +return x_38; +} +else +{ +lean_object* x_43; lean_object* x_44; lean_object* x_45; +x_43 = lean_ctor_get(x_38, 0); +x_44 = lean_ctor_get(x_38, 1); +lean_inc(x_44); +lean_inc(x_43); +lean_dec(x_38); +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_16); +x_46 = lean_ctor_get(x_30, 1); +lean_inc(x_46); +lean_dec(x_30); +x_47 = l_Lean_Meta_SavedState_restore(x_27, x_6, x_7, x_8, x_9, x_46); +lean_dec(x_27); +x_48 = lean_ctor_get(x_47, 1); +lean_inc(x_48); +lean_dec(x_47); +x_49 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__6; +lean_inc(x_9); +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_6); +x_50 = l_Lean_Meta_mkAppM(x_49, x_25, x_6, x_7, x_8, x_9, x_48); +if (lean_obj_tag(x_50) == 0) +{ +lean_object* x_51; lean_object* x_52; lean_object* x_53; +x_51 = lean_ctor_get(x_50, 0); +lean_inc(x_51); +x_52 = lean_ctor_get(x_50, 1); +lean_inc(x_52); +lean_dec(x_50); +x_53 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux(x_4, x_15, x_2, x_51, x_6, x_7, x_8, x_9, x_52); +return x_53; +} +else +{ +uint8_t x_54; +lean_dec(x_15); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_4); +lean_dec(x_2); +x_54 = !lean_is_exclusive(x_50); +if (x_54 == 0) +{ +return x_50; +} +else +{ +lean_object* x_55; lean_object* x_56; lean_object* x_57; +x_55 = lean_ctor_get(x_50, 0); +x_56 = lean_ctor_get(x_50, 1); +lean_inc(x_56); +lean_inc(x_55); +lean_dec(x_50); +x_57 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_57, 0, x_55); +lean_ctor_set(x_57, 1, x_56); +return x_57; +} +} +} +} +} +else +{ +lean_object* x_58; lean_object* x_59; lean_object* x_60; lean_object* x_61; lean_object* x_62; lean_object* x_63; lean_object* x_64; +lean_dec(x_17); +lean_dec(x_1); +x_58 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__4; +x_59 = lean_array_push(x_58, x_3); +x_60 = l_Lean_Meta_saveState___rarg(x_7, x_8, x_9, x_10); +x_61 = lean_ctor_get(x_60, 0); +lean_inc(x_61); +x_62 = lean_ctor_get(x_60, 1); +lean_inc(x_62); +lean_dec(x_60); +x_63 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__9; +lean_inc(x_9); +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_6); +lean_inc(x_59); +x_64 = l_Lean_Meta_mkAppM(x_63, x_59, x_6, x_7, x_8, x_9, x_62); +if (lean_obj_tag(x_64) == 0) +{ +lean_object* x_65; lean_object* x_66; lean_object* x_67; +x_65 = lean_ctor_get(x_64, 0); +lean_inc(x_65); +x_66 = lean_ctor_get(x_64, 1); +lean_inc(x_66); +lean_dec(x_64); +lean_inc(x_9); +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_6); +lean_inc(x_2); +lean_inc(x_4); +x_67 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux(x_4, x_16, x_2, x_65, x_6, x_7, x_8, x_9, x_66); +if (lean_obj_tag(x_67) == 0) +{ +lean_dec(x_61); +lean_dec(x_59); +lean_dec(x_15); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_4); +lean_dec(x_2); +return x_67; +} +else +{ +lean_object* x_68; lean_object* x_69; lean_object* x_70; lean_object* x_71; lean_object* x_72; +x_68 = lean_ctor_get(x_67, 1); +lean_inc(x_68); +lean_dec(x_67); +x_69 = l_Lean_Meta_SavedState_restore(x_61, x_6, x_7, x_8, x_9, x_68); +lean_dec(x_61); +x_70 = lean_ctor_get(x_69, 1); +lean_inc(x_70); +lean_dec(x_69); +x_71 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__11; +lean_inc(x_9); +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_6); +x_72 = l_Lean_Meta_mkAppM(x_71, x_59, x_6, x_7, x_8, x_9, x_70); +if (lean_obj_tag(x_72) == 0) +{ +lean_object* x_73; lean_object* x_74; lean_object* x_75; +x_73 = lean_ctor_get(x_72, 0); +lean_inc(x_73); +x_74 = lean_ctor_get(x_72, 1); +lean_inc(x_74); +lean_dec(x_72); +x_75 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux(x_4, x_15, x_2, x_73, x_6, x_7, x_8, x_9, x_74); +return x_75; +} +else +{ +uint8_t x_76; +lean_dec(x_15); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_4); +lean_dec(x_2); +x_76 = !lean_is_exclusive(x_72); +if (x_76 == 0) +{ +return x_72; +} +else +{ +lean_object* x_77; lean_object* x_78; lean_object* x_79; +x_77 = lean_ctor_get(x_72, 0); +x_78 = lean_ctor_get(x_72, 1); +lean_inc(x_78); +lean_inc(x_77); +lean_dec(x_72); +x_79 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_79, 0, x_77); +lean_ctor_set(x_79, 1, x_78); +return x_79; +} +} +} +} +else +{ +lean_object* x_80; lean_object* x_81; lean_object* x_82; lean_object* x_83; lean_object* x_84; +lean_dec(x_16); +x_80 = lean_ctor_get(x_64, 1); +lean_inc(x_80); +lean_dec(x_64); +x_81 = l_Lean_Meta_SavedState_restore(x_61, x_6, x_7, x_8, x_9, x_80); +lean_dec(x_61); +x_82 = lean_ctor_get(x_81, 1); +lean_inc(x_82); +lean_dec(x_81); +x_83 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__11; +lean_inc(x_9); +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_6); +x_84 = l_Lean_Meta_mkAppM(x_83, x_59, x_6, x_7, x_8, x_9, x_82); +if (lean_obj_tag(x_84) == 0) +{ +lean_object* x_85; lean_object* x_86; lean_object* x_87; +x_85 = lean_ctor_get(x_84, 0); +lean_inc(x_85); +x_86 = lean_ctor_get(x_84, 1); +lean_inc(x_86); +lean_dec(x_84); +x_87 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux(x_4, x_15, x_2, x_85, x_6, x_7, x_8, x_9, x_86); +return x_87; +} +else +{ +uint8_t x_88; +lean_dec(x_15); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_4); +lean_dec(x_2); +x_88 = !lean_is_exclusive(x_84); +if (x_88 == 0) +{ +return x_84; +} +else +{ +lean_object* x_89; lean_object* x_90; lean_object* x_91; +x_89 = lean_ctor_get(x_84, 0); +x_90 = lean_ctor_get(x_84, 1); +lean_inc(x_90); +lean_inc(x_89); +lean_dec(x_84); +x_91 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_91, 0, x_89); +lean_ctor_set(x_91, 1, x_90); +return x_91; +} +} +} +} +} +else +{ +lean_object* x_92; lean_object* x_93; +lean_dec(x_14); +lean_dec(x_13); +lean_dec(x_11); +x_92 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__4), 10, 3); +lean_closure_set(x_92, 0, x_2); +lean_closure_set(x_92, 1, x_3); +lean_closure_set(x_92, 2, x_4); +x_93 = l_Lean_Meta_forallTelescopeReducing___at_Lean_Meta_getParamNames___spec__2___rarg(x_1, x_92, x_6, x_7, x_8, x_9, x_10); +return x_93; +} +} +else +{ +lean_object* x_94; lean_object* x_95; +lean_dec(x_13); +lean_dec(x_11); +x_94 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__4), 10, 3); +lean_closure_set(x_94, 0, x_2); +lean_closure_set(x_94, 1, x_3); +lean_closure_set(x_94, 2, x_4); +x_95 = l_Lean_Meta_forallTelescopeReducing___at_Lean_Meta_getParamNames___spec__2___rarg(x_1, x_94, x_6, x_7, x_8, x_9, x_10); +return x_95; +} +} +else +{ +lean_object* x_96; lean_object* x_97; +lean_dec(x_12); +lean_dec(x_11); +x_96 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__4), 10, 3); +lean_closure_set(x_96, 0, x_2); +lean_closure_set(x_96, 1, x_3); +lean_closure_set(x_96, 2, x_4); +x_97 = l_Lean_Meta_forallTelescopeReducing___at_Lean_Meta_getParamNames___spec__2___rarg(x_1, x_96, x_6, x_7, x_8, x_9, x_10); +return x_97; +} +} +else +{ +lean_object* x_98; lean_object* x_99; +lean_dec(x_11); +x_98 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__4), 10, 3); +lean_closure_set(x_98, 0, x_2); +lean_closure_set(x_98, 1, x_3); +lean_closure_set(x_98, 2, x_4); +x_99 = l_Lean_Meta_forallTelescopeReducing___at_Lean_Meta_getParamNames___spec__2___rarg(x_1, x_98, x_6, x_7, x_8, x_9, x_10); +return x_99; +} +} +else +{ +lean_object* x_100; lean_object* x_101; +x_100 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__4), 10, 3); +lean_closure_set(x_100, 0, x_2); +lean_closure_set(x_100, 1, x_3); +lean_closure_set(x_100, 2, x_4); +x_101 = l_Lean_Meta_forallTelescopeReducing___at_Lean_Meta_getParamNames___spec__2___rarg(x_1, x_100, x_6, x_7, x_8, x_9, x_10); +return x_101; +} +} +} +static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("Elab"); +return x_1; +} +} +static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__3() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("definition"); +return x_1; +} +} +static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__4() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__2; +x_2 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__3; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__5() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("structural"); +return x_1; +} +} +static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__6() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__4; +x_2 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__5; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__7() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("belowDict: "); +return x_1; +} +} +static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__8() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__7; +x_2 = l_Lean_stringToMessageData(x_1); +return x_2; +} +} +static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__9() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string(", arg: "); +return x_1; +} +} +static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__10() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__9; +x_2 = l_Lean_stringToMessageData(x_1); +return x_2; +} +} +static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__11() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string(""); +return x_1; +} +} +static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__12() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__11; +x_2 = l_Lean_stringToMessageData(x_1); +return x_2; +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9) { +_start: +{ +lean_object* x_10; +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_6); +lean_inc(x_5); +x_10 = lean_whnf(x_2, 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; uint8_t x_14; lean_object* x_15; lean_object* x_32; lean_object* x_33; lean_object* x_34; uint8_t x_35; +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___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__6; +x_32 = lean_st_ref_get(x_8, x_12); +x_33 = lean_ctor_get(x_32, 0); +lean_inc(x_33); +x_34 = lean_ctor_get(x_33, 3); +lean_inc(x_34); +lean_dec(x_33); +x_35 = lean_ctor_get_uint8(x_34, sizeof(void*)*1); +lean_dec(x_34); +if (x_35 == 0) +{ +lean_object* x_36; uint8_t x_37; +x_36 = lean_ctor_get(x_32, 1); +lean_inc(x_36); +lean_dec(x_32); +x_37 = 0; +x_14 = x_37; +x_15 = x_36; +goto block_31; +} +else +{ +lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; uint8_t x_42; +x_38 = lean_ctor_get(x_32, 1); +lean_inc(x_38); +lean_dec(x_32); +x_39 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at___private_Lean_Meta_LevelDefEq_0__Lean_Meta_postponeIsLevelDefEq___spec__2(x_13, x_5, x_6, x_7, x_8, x_38); +x_40 = lean_ctor_get(x_39, 0); +lean_inc(x_40); +x_41 = lean_ctor_get(x_39, 1); +lean_inc(x_41); +lean_dec(x_39); +x_42 = lean_unbox(x_40); +lean_dec(x_40); +x_14 = x_42; +x_15 = x_41; +goto block_31; +} +block_31: +{ +if (x_14 == 0) +{ +lean_object* x_16; lean_object* x_17; +x_16 = lean_box(0); +x_17 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__5(x_11, x_3, x_4, x_1, x_16, x_5, x_6, x_7, x_8, x_15); +return x_17; +} +else +{ +lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; +lean_inc(x_11); +x_18 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_18, 0, x_11); +x_19 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__8; +x_20 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_20, 0, x_19); +lean_ctor_set(x_20, 1, x_18); +x_21 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__10; +x_22 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_22, 0, x_20); +lean_ctor_set(x_22, 1, x_21); +lean_inc(x_3); +x_23 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_23, 0, x_3); +x_24 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_24, 0, x_22); +lean_ctor_set(x_24, 1, x_23); +x_25 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__12; +x_26 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_26, 0, x_24); +lean_ctor_set(x_26, 1, x_25); +x_27 = l_Lean_addTrace___at___private_Lean_Meta_LevelDefEq_0__Lean_Meta_postponeIsLevelDefEq___spec__1(x_13, x_26, x_5, x_6, x_7, x_8, x_15); +x_28 = lean_ctor_get(x_27, 0); +lean_inc(x_28); +x_29 = lean_ctor_get(x_27, 1); +lean_inc(x_29); +lean_dec(x_27); +x_30 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__5(x_11, x_3, x_4, x_1, x_28, x_5, x_6, x_7, x_8, x_29); +return x_30; +} +} +} +else +{ +uint8_t x_43; +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_43 = !lean_is_exclusive(x_10); +if (x_43 == 0) +{ +return x_10; +} +else +{ +lean_object* x_44; lean_object* x_45; lean_object* x_46; +x_44 = lean_ctor_get(x_10, 0); +x_45 = lean_ctor_get(x_10, 1); +lean_inc(x_45); +lean_inc(x_44); +lean_dec(x_10); +x_46 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_46, 0, x_44); +lean_ctor_set(x_46, 1, x_45); +return x_46; +} +} +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___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___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___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); +return x_9; +} +} +lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___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) { +_start: +{ +lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; +lean_inc(x_5); +x_11 = l_Lean_mkApp(x_1, x_5); +x_12 = lean_array_get_size(x_2); +x_13 = l_Array_extract___rarg(x_2, x_3, x_12); +x_14 = l_Lean_mkAppN(x_11, x_13); +x_15 = lean_apply_7(x_4, x_5, x_14, x_6, x_7, x_8, x_9, x_10); +return x_15; +} +} +static lean_object* _init_l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___lambda__2___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("C"); +return x_1; +} +} +static lean_object* _init_l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___lambda__2___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___lambda__2___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___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) { +_start: +{ +lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; +x_12 = l_Lean_instInhabitedExpr; +x_13 = lean_unsigned_to_nat(0u); +x_14 = lean_array_get(x_12, x_5, x_13); +lean_inc(x_10); +lean_inc(x_9); +lean_inc(x_8); +lean_inc(x_7); +x_15 = lean_infer_type(x_14, x_7, x_8, x_9, x_10, x_11); +if (lean_obj_tag(x_15) == 0) +{ +lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; uint8_t x_23; lean_object* x_24; +x_16 = lean_ctor_get(x_15, 0); +lean_inc(x_16); +x_17 = lean_ctor_get(x_15, 1); +lean_inc(x_17); +lean_dec(x_15); +x_18 = l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___lambda__2___closed__2; +x_19 = l___private_Lean_CoreM_0__Lean_Core_mkFreshNameImp(x_18, x_9, x_10, x_17); +x_20 = lean_ctor_get(x_19, 0); +lean_inc(x_20); +x_21 = lean_ctor_get(x_19, 1); +lean_inc(x_21); +lean_dec(x_19); +x_22 = lean_alloc_closure((void*)(l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___lambda__1), 10, 4); +lean_closure_set(x_22, 0, x_1); +lean_closure_set(x_22, 1, x_2); +lean_closure_set(x_22, 2, x_3); +lean_closure_set(x_22, 3, x_4); +x_23 = 0; +x_24 = l_Lean_Meta_withLocalDecl___at_Lean_Meta_GeneralizeTelescope_generalizeTelescopeAux___spec__1___rarg(x_20, x_23, x_16, x_22, x_7, x_8, x_9, x_10, x_21); +return x_24; +} +else +{ +uint8_t x_25; +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_25 = !lean_is_exclusive(x_15); +if (x_25 == 0) +{ +return x_15; +} +else +{ +lean_object* x_26; lean_object* x_27; lean_object* x_28; +x_26 = lean_ctor_get(x_15, 0); +x_27 = lean_ctor_get(x_15, 1); +lean_inc(x_27); +lean_inc(x_26); +lean_dec(x_15); +x_28 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_28, 0, x_26); +lean_ctor_set(x_28, 1, x_27); +return x_28; +} +} +} +} +static lean_object* _init_l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___lambda__3___closed__1() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = lean_unsigned_to_nat(1u); +x_2 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___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_object* x_10, lean_object* x_11) { +_start: +{ +lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; +x_12 = lean_unsigned_to_nat(0u); +lean_inc(x_1); +x_13 = l_Array_extract___rarg(x_1, x_12, x_2); +x_14 = l_Lean_mkAppN(x_3, x_13); +lean_inc(x_10); +lean_inc(x_9); +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_14); +x_15 = lean_infer_type(x_14, x_7, x_8, x_9, x_10, x_11); +if (lean_obj_tag(x_15) == 0) +{ +lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; +x_16 = lean_ctor_get(x_15, 0); +lean_inc(x_16); +x_17 = lean_ctor_get(x_15, 1); +lean_inc(x_17); +lean_dec(x_15); +x_18 = lean_alloc_closure((void*)(l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___lambda__2___boxed), 11, 4); +lean_closure_set(x_18, 0, x_14); +lean_closure_set(x_18, 1, x_1); +lean_closure_set(x_18, 2, x_4); +lean_closure_set(x_18, 3, x_5); +x_19 = l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___lambda__3___closed__1; +x_20 = l_Lean_Meta_forallBoundedTelescope___at_Lean_Meta_reduceMatcher_x3f___spec__3___rarg(x_16, x_19, x_18, x_7, x_8, x_9, x_10, x_17); +return x_20; +} +else +{ +uint8_t x_21; +lean_dec(x_14); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_1); +x_21 = !lean_is_exclusive(x_15); +if (x_21 == 0) +{ +return x_15; +} +else +{ +lean_object* x_22; lean_object* x_23; lean_object* x_24; +x_22 = lean_ctor_get(x_15, 0); +x_23 = lean_ctor_get(x_15, 1); +lean_inc(x_23); +lean_inc(x_22); +lean_dec(x_15); +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; +} +} +} +} +static lean_object* _init_l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("unexpected 'below' type"); +return x_1; +} +} +static lean_object* _init_l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___closed__1; +x_2 = l_Lean_stringToMessageData(x_1); +return x_2; +} +} +lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11) { +_start: +{ +if (lean_obj_tag(x_4) == 5) +{ +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_4, 0); +lean_inc(x_12); +x_13 = lean_ctor_get(x_4, 1); +lean_inc(x_13); +lean_dec(x_4); +x_14 = lean_array_set(x_5, x_6, x_13); +x_15 = lean_unsigned_to_nat(1u); +x_16 = lean_nat_sub(x_6, x_15); +lean_dec(x_6); +x_4 = x_12; +x_5 = x_14; +x_6 = x_16; +goto _start; +} +else +{ +lean_object* x_18; lean_object* x_19; lean_object* x_20; uint8_t x_21; +lean_dec(x_6); +x_18 = lean_unsigned_to_nat(1u); +x_19 = lean_nat_add(x_1, x_18); +x_20 = lean_array_get_size(x_5); +x_21 = lean_nat_dec_lt(x_19, x_20); +lean_dec(x_20); +if (x_21 == 0) +{ +lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; uint8_t x_28; +lean_dec(x_19); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_2); +lean_dec(x_1); +x_22 = l_Lean_indentExpr(x_3); +x_23 = l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___closed__2; +x_24 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_24, 0, x_23); +lean_ctor_set(x_24, 1, x_22); +x_25 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__12; +x_26 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_26, 0, x_24); +lean_ctor_set(x_26, 1, x_25); +x_27 = l_Lean_throwError___at_Lean_Meta_withIncRecDepth___spec__1(x_26, 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); +x_28 = !lean_is_exclusive(x_27); +if (x_28 == 0) +{ +return x_27; +} +else +{ +lean_object* x_29; lean_object* x_30; lean_object* x_31; +x_29 = lean_ctor_get(x_27, 0); +x_30 = lean_ctor_get(x_27, 1); +lean_inc(x_30); +lean_inc(x_29); +lean_dec(x_27); +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 +{ +lean_object* x_32; lean_object* x_33; +lean_dec(x_3); +x_32 = lean_box(0); +x_33 = l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___lambda__3(x_5, x_1, x_4, x_19, x_2, x_32, x_7, x_8, x_9, x_10, x_11); +return x_33; +} +} +} +} +lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_withBelowDict___spec__1(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg), 11, 0); +return x_2; +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_withBelowDict___rarg___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) { +_start: +{ +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; +lean_dec(x_4); +x_10 = lean_unsigned_to_nat(0u); +x_11 = l_Lean_Expr_getAppNumArgsAux(x_1, x_10); +x_12 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__4___closed__1; +lean_inc(x_11); +x_13 = lean_mk_array(x_11, x_12); +x_14 = lean_unsigned_to_nat(1u); +x_15 = lean_nat_sub(x_11, x_14); +lean_dec(x_11); +lean_inc(x_1); +x_16 = l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg(x_2, x_3, x_1, x_1, x_13, x_15, x_5, x_6, x_7, x_8, x_9); +return x_16; +} +} +static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_withBelowDict___rarg___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("belowType: "); +return x_1; +} +} +static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_withBelowDict___rarg___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_withBelowDict___rarg___closed__1; +x_2 = l_Lean_stringToMessageData(x_1); +return x_2; +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_withBelowDict___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { +_start: +{ +lean_object* x_9; +lean_inc(x_7); +lean_inc(x_6); +lean_inc(x_5); +lean_inc(x_4); +x_9 = lean_infer_type(x_1, x_4, x_5, x_6, x_7, x_8); +if (lean_obj_tag(x_9) == 0) +{ +lean_object* x_10; lean_object* x_11; lean_object* x_12; uint8_t x_13; lean_object* x_14; lean_object* x_27; lean_object* x_28; lean_object* x_29; uint8_t x_30; +x_10 = lean_ctor_get(x_9, 0); +lean_inc(x_10); +x_11 = lean_ctor_get(x_9, 1); +lean_inc(x_11); +lean_dec(x_9); +x_12 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__6; +x_27 = lean_st_ref_get(x_7, x_11); +x_28 = lean_ctor_get(x_27, 0); +lean_inc(x_28); +x_29 = lean_ctor_get(x_28, 3); +lean_inc(x_29); +lean_dec(x_28); +x_30 = lean_ctor_get_uint8(x_29, sizeof(void*)*1); +lean_dec(x_29); +if (x_30 == 0) +{ +lean_object* x_31; uint8_t x_32; +x_31 = lean_ctor_get(x_27, 1); +lean_inc(x_31); +lean_dec(x_27); +x_32 = 0; +x_13 = x_32; +x_14 = x_31; +goto block_26; +} +else +{ +lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; uint8_t x_37; +x_33 = lean_ctor_get(x_27, 1); +lean_inc(x_33); +lean_dec(x_27); +x_34 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at___private_Lean_Meta_LevelDefEq_0__Lean_Meta_postponeIsLevelDefEq___spec__2(x_12, x_4, x_5, x_6, x_7, x_33); +x_35 = lean_ctor_get(x_34, 0); +lean_inc(x_35); +x_36 = lean_ctor_get(x_34, 1); +lean_inc(x_36); +lean_dec(x_34); +x_37 = lean_unbox(x_35); +lean_dec(x_35); +x_13 = x_37; +x_14 = x_36; +goto block_26; +} +block_26: +{ +if (x_13 == 0) +{ +lean_object* x_15; lean_object* x_16; +x_15 = lean_box(0); +x_16 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_withBelowDict___rarg___lambda__1(x_10, x_2, x_3, x_15, x_4, x_5, x_6, x_7, x_14); +return x_16; +} +else +{ +lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; +lean_inc(x_10); +x_17 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_17, 0, x_10); +x_18 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_withBelowDict___rarg___closed__2; +x_19 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_19, 0, x_18); +lean_ctor_set(x_19, 1, x_17); +x_20 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__12; +x_21 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_21, 0, x_19); +lean_ctor_set(x_21, 1, x_20); +x_22 = l_Lean_addTrace___at___private_Lean_Meta_LevelDefEq_0__Lean_Meta_postponeIsLevelDefEq___spec__1(x_12, x_21, x_4, x_5, x_6, x_7, x_14); +x_23 = lean_ctor_get(x_22, 0); +lean_inc(x_23); +x_24 = lean_ctor_get(x_22, 1); +lean_inc(x_24); +lean_dec(x_22); +x_25 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_withBelowDict___rarg___lambda__1(x_10, x_2, x_3, x_23, x_4, x_5, x_6, x_7, x_24); +return x_25; +} +} +} +else +{ +uint8_t x_38; +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +x_38 = !lean_is_exclusive(x_9); +if (x_38 == 0) +{ +return x_9; +} +else +{ +lean_object* x_39; lean_object* x_40; lean_object* x_41; +x_39 = lean_ctor_get(x_9, 0); +x_40 = lean_ctor_get(x_9, 1); +lean_inc(x_40); +lean_inc(x_39); +lean_dec(x_9); +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_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_withBelowDict(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_withBelowDict___rarg), 8, 0); +return x_2; +} +} +lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___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) { +_start: +{ +lean_object* x_12; +x_12 = l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___lambda__2(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_6); +lean_dec(x_5); +return x_12; +} +} +lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___lambda__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) { +_start: +{ +lean_object* x_12; +x_12 = l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___lambda__3(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_6); +return x_12; +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelow___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) { +_start: +{ +lean_object* x_10; +x_10 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux(x_3, x_4, x_1, x_2, x_5, x_6, x_7, x_8, x_9); +return x_10; +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelow(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; +lean_inc(x_1); +x_9 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelow___lambda__1), 9, 2); +lean_closure_set(x_9, 0, x_3); +lean_closure_set(x_9, 1, x_1); +x_10 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_withBelowDict___rarg(x_1, x_2, x_9, x_4, x_5, x_6, x_7, x_8); +return x_10; +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop_match__1___rarg(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; lean_object* x_4; lean_object* x_5; +x_3 = lean_ctor_get(x_1, 0); +lean_inc(x_3); +x_4 = lean_ctor_get(x_1, 1); +lean_inc(x_4); +lean_dec(x_1); +x_5 = lean_apply_2(x_2, x_3, x_4); +return x_5; +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop_match__1(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop_match__1___rarg), 2, 0); +return x_2; +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop_match__2___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +if (lean_obj_tag(x_1) == 0) +{ +lean_object* x_4; lean_object* x_5; +lean_dec(x_2); +x_4 = lean_box(0); +x_5 = lean_apply_1(x_3, x_4); +return x_5; +} +else +{ +lean_object* x_6; lean_object* x_7; +lean_dec(x_3); +x_6 = lean_ctor_get(x_1, 0); +lean_inc(x_6); +lean_dec(x_1); +x_7 = lean_apply_1(x_2, x_6); +return x_7; +} +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop_match__2(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop_match__2___rarg), 3, 0); +return x_2; +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop_match__3___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { +_start: +{ +switch (lean_obj_tag(x_1)) { +case 5: +{ +lean_object* x_9; lean_object* x_10; uint64_t x_11; lean_object* x_12; lean_object* x_13; +lean_dec(x_8); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +x_9 = lean_ctor_get(x_1, 0); +lean_inc(x_9); +x_10 = lean_ctor_get(x_1, 1); +lean_inc(x_10); +x_11 = lean_ctor_get_uint64(x_1, sizeof(void*)*2); +lean_dec(x_1); +x_12 = lean_box_uint64(x_11); +x_13 = lean_apply_3(x_7, x_9, x_10, x_12); +return x_13; +} +case 6: +{ +lean_object* x_14; lean_object* x_15; lean_object* x_16; uint64_t x_17; lean_object* x_18; lean_object* 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); +x_14 = lean_ctor_get(x_1, 0); +lean_inc(x_14); +x_15 = lean_ctor_get(x_1, 1); +lean_inc(x_15); +x_16 = lean_ctor_get(x_1, 2); +lean_inc(x_16); +x_17 = lean_ctor_get_uint64(x_1, sizeof(void*)*3); +lean_dec(x_1); +x_18 = lean_box_uint64(x_17); +x_19 = lean_apply_4(x_2, x_14, x_15, x_16, x_18); +return x_19; +} +case 7: +{ +lean_object* x_20; lean_object* x_21; lean_object* x_22; uint64_t x_23; lean_object* x_24; lean_object* x_25; +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_2); +x_20 = lean_ctor_get(x_1, 0); +lean_inc(x_20); +x_21 = lean_ctor_get(x_1, 1); +lean_inc(x_21); +x_22 = lean_ctor_get(x_1, 2); +lean_inc(x_22); +x_23 = lean_ctor_get_uint64(x_1, sizeof(void*)*3); +lean_dec(x_1); +x_24 = lean_box_uint64(x_23); +x_25 = lean_apply_4(x_3, x_20, x_21, x_22, x_24); +return x_25; +} +case 8: +{ +lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; uint64_t x_30; lean_object* x_31; lean_object* x_32; +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_3); +lean_dec(x_2); +x_26 = lean_ctor_get(x_1, 0); +lean_inc(x_26); +x_27 = lean_ctor_get(x_1, 1); +lean_inc(x_27); +x_28 = lean_ctor_get(x_1, 2); +lean_inc(x_28); +x_29 = lean_ctor_get(x_1, 3); +lean_inc(x_29); +x_30 = lean_ctor_get_uint64(x_1, sizeof(void*)*4); +lean_dec(x_1); +x_31 = lean_box_uint64(x_30); +x_32 = lean_apply_5(x_4, x_26, x_27, x_28, x_29, x_31); +return x_32; +} +case 10: +{ +lean_object* x_33; lean_object* x_34; uint64_t x_35; lean_object* x_36; lean_object* x_37; +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +x_33 = lean_ctor_get(x_1, 0); +lean_inc(x_33); +x_34 = lean_ctor_get(x_1, 1); +lean_inc(x_34); +x_35 = lean_ctor_get_uint64(x_1, sizeof(void*)*2); +lean_dec(x_1); +x_36 = lean_box_uint64(x_35); +x_37 = lean_apply_3(x_5, x_33, x_34, x_36); +return x_37; +} +case 11: +{ +lean_object* x_38; lean_object* x_39; lean_object* x_40; uint64_t x_41; lean_object* x_42; lean_object* x_43; +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +x_38 = lean_ctor_get(x_1, 0); +lean_inc(x_38); +x_39 = lean_ctor_get(x_1, 1); +lean_inc(x_39); +x_40 = lean_ctor_get(x_1, 2); +lean_inc(x_40); +x_41 = lean_ctor_get_uint64(x_1, sizeof(void*)*3); +lean_dec(x_1); +x_42 = lean_box_uint64(x_41); +x_43 = lean_apply_4(x_6, x_38, x_39, x_40, x_42); +return x_43; +} +default: +{ +lean_object* x_44; +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +x_44 = lean_apply_1(x_8, x_1); +return x_44; +} +} +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop_match__3(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop_match__3___rarg), 8, 0); +return x_2; +} +} +lean_object* l_Lean_Meta_getMatcherInfo_x3f___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__2(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { +_start: +{ +lean_object* x_8; uint8_t x_9; +x_8 = lean_st_ref_get(x_6, x_7); +x_9 = !lean_is_exclusive(x_8); +if (x_9 == 0) +{ +lean_object* x_10; lean_object* x_11; lean_object* x_12; +x_10 = lean_ctor_get(x_8, 0); +x_11 = lean_ctor_get(x_10, 0); +lean_inc(x_11); +lean_dec(x_10); +x_12 = l_Lean_Meta_Match_Extension_getMatcherInfo_x3f(x_11, x_1); +lean_ctor_set(x_8, 0, x_12); +return x_8; +} +else +{ +lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; +x_13 = lean_ctor_get(x_8, 0); +x_14 = lean_ctor_get(x_8, 1); +lean_inc(x_14); +lean_inc(x_13); +lean_dec(x_8); +x_15 = lean_ctor_get(x_13, 0); +lean_inc(x_15); +lean_dec(x_13); +x_16 = l_Lean_Meta_Match_Extension_getMatcherInfo_x3f(x_15, x_1); +x_17 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_17, 0, x_16); +lean_ctor_set(x_17, 1, x_14); +return x_17; +} +} +} +lean_object* l_Lean_Meta_matchMatcherApp_x3f___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { +_start: +{ +lean_object* x_8; +x_8 = l_Lean_Expr_getAppFn(x_1); +if (lean_obj_tag(x_8) == 4) +{ +lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; +x_9 = lean_ctor_get(x_8, 0); +lean_inc(x_9); +x_10 = lean_ctor_get(x_8, 1); +lean_inc(x_10); +lean_dec(x_8); +lean_inc(x_9); +x_11 = l_Lean_Meta_getMatcherInfo_x3f___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__2(x_9, x_2, x_3, x_4, x_5, x_6, x_7); +x_12 = lean_ctor_get(x_11, 0); +lean_inc(x_12); +if (lean_obj_tag(x_12) == 0) +{ +uint8_t x_13; +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_1); +x_13 = !lean_is_exclusive(x_11); +if (x_13 == 0) +{ +lean_object* x_14; lean_object* x_15; +x_14 = lean_ctor_get(x_11, 0); +lean_dec(x_14); +x_15 = lean_box(0); +lean_ctor_set(x_11, 0, x_15); +return x_11; +} +else +{ +lean_object* x_16; lean_object* x_17; lean_object* x_18; +x_16 = lean_ctor_get(x_11, 1); +lean_inc(x_16); +lean_dec(x_11); +x_17 = lean_box(0); +x_18 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_18, 0, x_17); +lean_ctor_set(x_18, 1, x_16); +return x_18; +} +} +else +{ +uint8_t x_19; +x_19 = !lean_is_exclusive(x_11); +if (x_19 == 0) +{ +lean_object* x_20; uint8_t x_21; +x_20 = lean_ctor_get(x_11, 0); +lean_dec(x_20); +x_21 = !lean_is_exclusive(x_12); +if (x_21 == 0) +{ +lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; uint8_t x_32; +x_22 = lean_ctor_get(x_12, 0); +x_23 = lean_unsigned_to_nat(0u); +x_24 = l_Lean_Expr_getAppNumArgsAux(x_1, x_23); +x_25 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__4___closed__1; +lean_inc(x_24); +x_26 = lean_mk_array(x_24, x_25); +x_27 = lean_unsigned_to_nat(1u); +x_28 = lean_nat_sub(x_24, x_27); +lean_dec(x_24); +x_29 = l___private_Lean_Expr_0__Lean_Expr_getAppArgsAux(x_1, x_26, x_28); +x_30 = lean_array_get_size(x_29); +x_31 = l_Lean_Meta_Match_MatcherInfo_arity(x_22); +x_32 = lean_nat_dec_lt(x_30, x_31); +lean_dec(x_31); +if (x_32 == 0) +{ +lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_object* x_51; lean_object* x_52; lean_object* x_53; +x_33 = l_List_redLength___rarg(x_10); +x_34 = lean_mk_empty_array_with_capacity(x_33); +lean_dec(x_33); +x_35 = l_List_toArrayAux___rarg(x_10, x_34); +x_36 = lean_ctor_get(x_22, 3); +lean_inc(x_36); +x_37 = lean_ctor_get(x_22, 0); +lean_inc(x_37); +lean_inc(x_37); +lean_inc(x_29); +x_38 = l_Array_extract___rarg(x_29, x_23, x_37); +x_39 = l_Lean_instInhabitedExpr; +x_40 = lean_array_get(x_39, x_29, x_37); +x_41 = lean_nat_add(x_37, x_27); +lean_dec(x_37); +x_42 = lean_ctor_get(x_22, 1); +lean_inc(x_42); +x_43 = lean_nat_add(x_41, x_42); +lean_dec(x_42); +lean_inc(x_43); +lean_inc(x_29); +x_44 = l_Array_toSubarray___rarg(x_29, x_41, x_43); +x_45 = l_Array_ofSubarray___rarg(x_44); +x_46 = lean_ctor_get(x_22, 2); +lean_inc(x_46); +x_47 = l_Lean_Meta_Match_MatcherInfo_numAlts(x_22); +lean_dec(x_22); +x_48 = lean_nat_add(x_43, x_47); +lean_dec(x_47); +lean_inc(x_48); +lean_inc(x_29); +x_49 = l_Array_toSubarray___rarg(x_29, x_43, x_48); +x_50 = l_Array_ofSubarray___rarg(x_49); +x_51 = l_Array_toSubarray___rarg(x_29, x_48, x_30); +x_52 = l_Array_ofSubarray___rarg(x_51); +x_53 = lean_alloc_ctor(0, 9, 0); +lean_ctor_set(x_53, 0, x_9); +lean_ctor_set(x_53, 1, x_35); +lean_ctor_set(x_53, 2, x_36); +lean_ctor_set(x_53, 3, x_38); +lean_ctor_set(x_53, 4, x_40); +lean_ctor_set(x_53, 5, x_45); +lean_ctor_set(x_53, 6, x_46); +lean_ctor_set(x_53, 7, x_50); +lean_ctor_set(x_53, 8, x_52); +lean_ctor_set(x_12, 0, x_53); +return x_11; +} +else +{ +lean_object* x_54; +lean_dec(x_30); +lean_dec(x_29); +lean_free_object(x_12); +lean_dec(x_22); +lean_dec(x_10); +lean_dec(x_9); +x_54 = lean_box(0); +lean_ctor_set(x_11, 0, x_54); +return x_11; +} +} +else +{ +lean_object* x_55; lean_object* x_56; lean_object* x_57; lean_object* x_58; lean_object* x_59; lean_object* x_60; lean_object* x_61; lean_object* x_62; lean_object* x_63; lean_object* x_64; uint8_t x_65; +x_55 = lean_ctor_get(x_12, 0); +lean_inc(x_55); +lean_dec(x_12); +x_56 = lean_unsigned_to_nat(0u); +x_57 = l_Lean_Expr_getAppNumArgsAux(x_1, x_56); +x_58 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__4___closed__1; +lean_inc(x_57); +x_59 = lean_mk_array(x_57, x_58); +x_60 = lean_unsigned_to_nat(1u); +x_61 = lean_nat_sub(x_57, x_60); +lean_dec(x_57); +x_62 = l___private_Lean_Expr_0__Lean_Expr_getAppArgsAux(x_1, x_59, x_61); +x_63 = lean_array_get_size(x_62); +x_64 = l_Lean_Meta_Match_MatcherInfo_arity(x_55); +x_65 = lean_nat_dec_lt(x_63, x_64); +lean_dec(x_64); +if (x_65 == 0) +{ +lean_object* x_66; lean_object* x_67; lean_object* x_68; lean_object* x_69; lean_object* x_70; lean_object* x_71; lean_object* x_72; lean_object* x_73; lean_object* x_74; lean_object* x_75; lean_object* x_76; lean_object* x_77; lean_object* x_78; lean_object* x_79; lean_object* x_80; lean_object* x_81; lean_object* x_82; lean_object* x_83; lean_object* x_84; lean_object* x_85; lean_object* x_86; lean_object* x_87; +x_66 = l_List_redLength___rarg(x_10); +x_67 = lean_mk_empty_array_with_capacity(x_66); +lean_dec(x_66); +x_68 = l_List_toArrayAux___rarg(x_10, x_67); +x_69 = lean_ctor_get(x_55, 3); +lean_inc(x_69); +x_70 = lean_ctor_get(x_55, 0); +lean_inc(x_70); +lean_inc(x_70); +lean_inc(x_62); +x_71 = l_Array_extract___rarg(x_62, x_56, x_70); +x_72 = l_Lean_instInhabitedExpr; +x_73 = lean_array_get(x_72, x_62, x_70); +x_74 = lean_nat_add(x_70, x_60); +lean_dec(x_70); +x_75 = lean_ctor_get(x_55, 1); +lean_inc(x_75); +x_76 = lean_nat_add(x_74, x_75); +lean_dec(x_75); +lean_inc(x_76); +lean_inc(x_62); +x_77 = l_Array_toSubarray___rarg(x_62, x_74, x_76); +x_78 = l_Array_ofSubarray___rarg(x_77); +x_79 = lean_ctor_get(x_55, 2); +lean_inc(x_79); +x_80 = l_Lean_Meta_Match_MatcherInfo_numAlts(x_55); +lean_dec(x_55); +x_81 = lean_nat_add(x_76, x_80); +lean_dec(x_80); +lean_inc(x_81); +lean_inc(x_62); +x_82 = l_Array_toSubarray___rarg(x_62, x_76, x_81); +x_83 = l_Array_ofSubarray___rarg(x_82); +x_84 = l_Array_toSubarray___rarg(x_62, x_81, x_63); +x_85 = l_Array_ofSubarray___rarg(x_84); +x_86 = lean_alloc_ctor(0, 9, 0); +lean_ctor_set(x_86, 0, x_9); +lean_ctor_set(x_86, 1, x_68); +lean_ctor_set(x_86, 2, x_69); +lean_ctor_set(x_86, 3, x_71); +lean_ctor_set(x_86, 4, x_73); +lean_ctor_set(x_86, 5, x_78); +lean_ctor_set(x_86, 6, x_79); +lean_ctor_set(x_86, 7, x_83); +lean_ctor_set(x_86, 8, x_85); +x_87 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_87, 0, x_86); +lean_ctor_set(x_11, 0, x_87); +return x_11; +} +else +{ +lean_object* x_88; +lean_dec(x_63); +lean_dec(x_62); +lean_dec(x_55); +lean_dec(x_10); +lean_dec(x_9); +x_88 = lean_box(0); +lean_ctor_set(x_11, 0, x_88); +return x_11; +} +} +} +else +{ +lean_object* x_89; lean_object* x_90; lean_object* x_91; lean_object* x_92; lean_object* x_93; lean_object* x_94; lean_object* x_95; lean_object* x_96; lean_object* x_97; lean_object* x_98; lean_object* x_99; lean_object* x_100; uint8_t x_101; +x_89 = lean_ctor_get(x_11, 1); +lean_inc(x_89); +lean_dec(x_11); +x_90 = lean_ctor_get(x_12, 0); +lean_inc(x_90); +if (lean_is_exclusive(x_12)) { + lean_ctor_release(x_12, 0); + x_91 = x_12; +} else { + lean_dec_ref(x_12); + x_91 = lean_box(0); +} +x_92 = lean_unsigned_to_nat(0u); +x_93 = l_Lean_Expr_getAppNumArgsAux(x_1, x_92); +x_94 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__4___closed__1; +lean_inc(x_93); +x_95 = lean_mk_array(x_93, x_94); +x_96 = lean_unsigned_to_nat(1u); +x_97 = lean_nat_sub(x_93, x_96); +lean_dec(x_93); +x_98 = l___private_Lean_Expr_0__Lean_Expr_getAppArgsAux(x_1, x_95, x_97); +x_99 = lean_array_get_size(x_98); +x_100 = l_Lean_Meta_Match_MatcherInfo_arity(x_90); +x_101 = lean_nat_dec_lt(x_99, x_100); +lean_dec(x_100); +if (x_101 == 0) +{ +lean_object* x_102; lean_object* x_103; lean_object* x_104; lean_object* x_105; lean_object* x_106; lean_object* x_107; lean_object* x_108; lean_object* x_109; lean_object* x_110; lean_object* x_111; lean_object* x_112; lean_object* x_113; lean_object* x_114; lean_object* x_115; lean_object* x_116; lean_object* x_117; lean_object* x_118; lean_object* x_119; lean_object* x_120; lean_object* x_121; lean_object* x_122; lean_object* x_123; lean_object* x_124; +x_102 = l_List_redLength___rarg(x_10); +x_103 = lean_mk_empty_array_with_capacity(x_102); +lean_dec(x_102); +x_104 = l_List_toArrayAux___rarg(x_10, x_103); +x_105 = lean_ctor_get(x_90, 3); +lean_inc(x_105); +x_106 = lean_ctor_get(x_90, 0); +lean_inc(x_106); +lean_inc(x_106); +lean_inc(x_98); +x_107 = l_Array_extract___rarg(x_98, x_92, x_106); +x_108 = l_Lean_instInhabitedExpr; +x_109 = lean_array_get(x_108, x_98, x_106); +x_110 = lean_nat_add(x_106, x_96); +lean_dec(x_106); +x_111 = lean_ctor_get(x_90, 1); +lean_inc(x_111); +x_112 = lean_nat_add(x_110, x_111); +lean_dec(x_111); +lean_inc(x_112); +lean_inc(x_98); +x_113 = l_Array_toSubarray___rarg(x_98, x_110, x_112); +x_114 = l_Array_ofSubarray___rarg(x_113); +x_115 = lean_ctor_get(x_90, 2); +lean_inc(x_115); +x_116 = l_Lean_Meta_Match_MatcherInfo_numAlts(x_90); +lean_dec(x_90); +x_117 = lean_nat_add(x_112, x_116); +lean_dec(x_116); +lean_inc(x_117); +lean_inc(x_98); +x_118 = l_Array_toSubarray___rarg(x_98, x_112, x_117); +x_119 = l_Array_ofSubarray___rarg(x_118); +x_120 = l_Array_toSubarray___rarg(x_98, x_117, x_99); +x_121 = l_Array_ofSubarray___rarg(x_120); +x_122 = lean_alloc_ctor(0, 9, 0); +lean_ctor_set(x_122, 0, x_9); +lean_ctor_set(x_122, 1, x_104); +lean_ctor_set(x_122, 2, x_105); +lean_ctor_set(x_122, 3, x_107); +lean_ctor_set(x_122, 4, x_109); +lean_ctor_set(x_122, 5, x_114); +lean_ctor_set(x_122, 6, x_115); +lean_ctor_set(x_122, 7, x_119); +lean_ctor_set(x_122, 8, x_121); +if (lean_is_scalar(x_91)) { + x_123 = lean_alloc_ctor(1, 1, 0); +} else { + x_123 = x_91; +} +lean_ctor_set(x_123, 0, x_122); +x_124 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_124, 0, x_123); +lean_ctor_set(x_124, 1, x_89); +return x_124; +} +else +{ +lean_object* x_125; lean_object* x_126; +lean_dec(x_99); +lean_dec(x_98); +lean_dec(x_91); +lean_dec(x_90); +lean_dec(x_10); +lean_dec(x_9); +x_125 = lean_box(0); +x_126 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_126, 0, x_125); +lean_ctor_set(x_126, 1, x_89); +return x_126; +} +} +} +} +else +{ +lean_object* x_127; lean_object* x_128; +lean_dec(x_8); +lean_dec(x_1); +x_127 = lean_box(0); +x_128 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_128, 0, x_127); +lean_ctor_set(x_128, 1, x_7); +return x_128; +} +} +} +lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__3(lean_object* x_1, lean_object* x_2, lean_object* x_3, size_t x_4, size_t 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) { +_start: +{ +uint8_t x_13; +x_13 = x_5 < x_4; +if (x_13 == 0) +{ +lean_object* x_14; lean_object* x_15; +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_14 = x_6; +x_15 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_15, 0, x_14); +lean_ctor_set(x_15, 1, x_12); +return x_15; +} +else +{ +lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; +x_16 = lean_array_uget(x_6, x_5); +x_17 = lean_unsigned_to_nat(0u); +x_18 = lean_array_uset(x_6, x_5, x_17); +x_19 = x_16; +lean_inc(x_11); +lean_inc(x_10); +lean_inc(x_9); +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_3); +lean_inc(x_2); +lean_inc(x_1); +x_20 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop(x_1, x_2, x_3, x_19, x_7, x_8, x_9, x_10, x_11, x_12); +if (lean_obj_tag(x_20) == 0) +{ +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_21 = lean_ctor_get(x_20, 0); +lean_inc(x_21); +x_22 = lean_ctor_get(x_20, 1); +lean_inc(x_22); +lean_dec(x_20); +x_23 = 1; +x_24 = x_5 + x_23; +x_25 = x_21; +x_26 = lean_array_uset(x_18, x_5, x_25); +x_5 = x_24; +x_6 = x_26; +x_12 = x_22; +goto _start; +} +else +{ +uint8_t x_28; +lean_dec(x_18); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +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; +} +} +} +} +} +lean_object* l_Std_Range_forIn_loop___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__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, lean_object* x_11, lean_object* x_12, lean_object* x_13, lean_object* x_14, lean_object* x_15) { +_start: +{ +lean_object* x_16; uint8_t x_17; +x_16 = lean_ctor_get(x_6, 1); +x_17 = lean_nat_dec_le(x_16, x_8); +if (x_17 == 0) +{ +lean_object* x_18; uint8_t x_19; +x_18 = lean_unsigned_to_nat(0u); +x_19 = lean_nat_dec_eq(x_7, x_18); +if (x_19 == 0) +{ +lean_object* x_20; lean_object* x_21; uint8_t x_22; +x_20 = lean_unsigned_to_nat(1u); +x_21 = lean_nat_sub(x_7, x_20); +lean_dec(x_7); +x_22 = lean_nat_dec_eq(x_4, x_8); +if (x_22 == 0) +{ +lean_object* x_23; uint8_t x_24; +x_23 = lean_ctor_get(x_2, 3); +lean_inc(x_23); +x_24 = l_Array_contains___at___private_Lean_Meta_FunInfo_0__Lean_Meta_collectDeps_visit___spec__2(x_23, x_8); +lean_dec(x_23); +if (x_24 == 0) +{ +lean_object* x_25; lean_object* x_26; lean_object* x_27; +x_25 = l_Lean_instInhabitedExpr; +x_26 = lean_array_get(x_25, x_5, x_8); +lean_inc(x_14); +lean_inc(x_13); +lean_inc(x_12); +lean_inc(x_11); +lean_inc(x_10); +lean_inc(x_3); +lean_inc(x_2); +lean_inc(x_1); +x_27 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop(x_1, x_2, x_3, x_26, x_10, x_11, x_12, x_13, x_14, x_15); +if (lean_obj_tag(x_27) == 0) +{ +lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; +x_28 = lean_ctor_get(x_27, 0); +lean_inc(x_28); +x_29 = lean_ctor_get(x_27, 1); +lean_inc(x_29); +lean_dec(x_27); +x_30 = lean_array_push(x_9, x_28); +x_31 = lean_ctor_get(x_6, 2); +x_32 = lean_nat_add(x_8, x_31); +lean_dec(x_8); +x_7 = x_21; +x_8 = x_32; +x_9 = x_30; +x_15 = x_29; +goto _start; +} +else +{ +uint8_t x_34; +lean_dec(x_21); +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_2); +lean_dec(x_1); +x_34 = !lean_is_exclusive(x_27); +if (x_34 == 0) +{ +return x_27; +} +else +{ +lean_object* x_35; lean_object* x_36; lean_object* x_37; +x_35 = lean_ctor_get(x_27, 0); +x_36 = lean_ctor_get(x_27, 1); +lean_inc(x_36); +lean_inc(x_35); +lean_dec(x_27); +x_37 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_37, 0, x_35); +lean_ctor_set(x_37, 1, x_36); +return x_37; +} +} +} +else +{ +lean_object* x_38; lean_object* x_39; +x_38 = lean_ctor_get(x_6, 2); +x_39 = lean_nat_add(x_8, x_38); +lean_dec(x_8); +x_7 = x_21; +x_8 = x_39; +goto _start; +} +} +else +{ +lean_object* x_41; lean_object* x_42; +x_41 = lean_ctor_get(x_6, 2); +x_42 = lean_nat_add(x_8, x_41); +lean_dec(x_8); +x_7 = x_21; +x_8 = x_42; +goto _start; +} +} +else +{ +lean_object* x_44; +lean_dec(x_14); +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_44 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_44, 0, x_9); +lean_ctor_set(x_44, 1, x_15); +return x_44; +} +} +else +{ +lean_object* x_45; +lean_dec(x_14); +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_45 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_45, 0, x_9); +lean_ctor_set(x_45, 1, x_15); +return x_45; +} +} +} +lean_object* l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__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) { +_start: +{ +lean_object* x_8; lean_object* x_9; uint8_t x_10; +x_8 = lean_ctor_get(x_5, 3); +x_9 = l_Lean_addMessageContextFull___at_Lean_Meta_instAddMessageContextMetaM___spec__1(x_1, x_3, x_4, x_5, x_6, x_7); +x_10 = !lean_is_exclusive(x_9); +if (x_10 == 0) +{ +lean_object* x_11; lean_object* x_12; +x_11 = lean_ctor_get(x_9, 0); +lean_inc(x_8); +x_12 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_12, 0, x_8); +lean_ctor_set(x_12, 1, x_11); +lean_ctor_set_tag(x_9, 1); +lean_ctor_set(x_9, 0, x_12); +return x_9; +} +else +{ +lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; +x_13 = lean_ctor_get(x_9, 0); +x_14 = lean_ctor_get(x_9, 1); +lean_inc(x_14); +lean_inc(x_13); +lean_dec(x_9); +lean_inc(x_8); +x_15 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_15, 0, x_8); +lean_ctor_set(x_15, 1, x_13); +x_16 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_16, 0, x_15); +lean_ctor_set(x_16, 1, x_14); +return x_16; +} +} +} +lean_object* l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__6(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; lean_object* x_9; uint8_t x_10; +x_8 = lean_ctor_get(x_5, 3); +x_9 = l_Lean_addMessageContextFull___at_Lean_Meta_instAddMessageContextMetaM___spec__1(x_1, x_3, x_4, x_5, x_6, x_7); +x_10 = !lean_is_exclusive(x_9); +if (x_10 == 0) +{ +lean_object* x_11; lean_object* x_12; +x_11 = lean_ctor_get(x_9, 0); +lean_inc(x_8); +x_12 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_12, 0, x_8); +lean_ctor_set(x_12, 1, x_11); +lean_ctor_set_tag(x_9, 1); +lean_ctor_set(x_9, 0, x_12); +return x_9; +} +else +{ +lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; +x_13 = lean_ctor_get(x_9, 0); +x_14 = lean_ctor_get(x_9, 1); +lean_inc(x_14); +lean_inc(x_13); +lean_dec(x_9); +lean_inc(x_8); +x_15 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_15, 0, x_8); +lean_ctor_set(x_15, 1, x_13); +x_16 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_16, 0, x_15); +lean_ctor_set(x_16, 1, x_14); +return x_16; +} +} +} +static lean_object* _init_l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___lambda__1___closed__1() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = lean_unsigned_to_nat(0u); +x_2 = lean_mk_empty_array_with_capacity(x_1); +return x_2; +} +} +lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___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, lean_object* x_12, lean_object* x_13) { +_start: +{ +lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; +x_14 = lean_array_get_size(x_1); +x_15 = l_Array_extract___rarg(x_1, x_2, x_14); +x_16 = lean_array_get_size(x_15); +x_17 = lean_unsigned_to_nat(0u); +x_18 = lean_unsigned_to_nat(1u); +lean_inc(x_16); +x_19 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_19, 0, x_17); +lean_ctor_set(x_19, 1, x_16); +lean_ctor_set(x_19, 2, x_18); +x_20 = l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___lambda__1___closed__1; +x_21 = l_Std_Range_forIn_loop___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__4(x_3, x_4, x_5, x_6, x_15, x_19, x_16, x_17, x_20, x_8, x_9, x_10, x_11, x_12, x_13); +lean_dec(x_19); +lean_dec(x_15); +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_mkAppN(x_7, 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_mkAppN(x_7, 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_7); +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; +} +} +} +} +static lean_object* _init_l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___lambda__2___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("failed to eliminate recursive application"); +return x_1; +} +} +static lean_object* _init_l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___lambda__2___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___lambda__2___closed__1; +x_2 = l_Lean_stringToMessageData(x_1); +return x_2; +} +} +lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___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_object* x_12, lean_object* x_13, lean_object* x_14, lean_object* x_15) { +_start: +{ +lean_object* x_16; lean_object* x_17; lean_object* x_18; +lean_dec(x_9); +x_16 = l_Lean_instInhabitedExpr; +x_17 = lean_array_get(x_16, x_1, x_2); +lean_dec(x_2); +lean_inc(x_14); +lean_inc(x_13); +lean_inc(x_12); +lean_inc(x_11); +lean_inc(x_10); +lean_inc(x_5); +lean_inc(x_4); +lean_inc(x_3); +x_18 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop(x_3, x_4, x_5, x_17, x_10, x_11, x_12, x_13, x_14, x_15); +if (lean_obj_tag(x_18) == 0) +{ +lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; +x_19 = lean_ctor_get(x_18, 0); +lean_inc(x_19); +x_20 = lean_ctor_get(x_18, 1); +lean_inc(x_20); +lean_dec(x_18); +x_21 = lean_ctor_get(x_4, 6); +lean_inc(x_21); +x_22 = lean_array_get_size(x_21); +lean_dec(x_21); +lean_inc(x_14); +lean_inc(x_13); +lean_inc(x_12); +lean_inc(x_11); +lean_inc(x_5); +x_23 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelow(x_5, x_22, x_19, x_11, x_12, x_13, x_14, x_20); +if (lean_obj_tag(x_23) == 0) +{ +lean_object* x_24; lean_object* x_25; lean_object* x_26; +lean_dec(x_8); +x_24 = lean_ctor_get(x_23, 0); +lean_inc(x_24); +x_25 = lean_ctor_get(x_23, 1); +lean_inc(x_25); +lean_dec(x_23); +x_26 = l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___lambda__1(x_1, x_6, x_3, x_4, x_5, x_7, x_24, x_10, x_11, x_12, x_13, x_14, x_25); +lean_dec(x_7); +return x_26; +} +else +{ +lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; uint8_t x_34; +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_27 = lean_ctor_get(x_23, 1); +lean_inc(x_27); +lean_dec(x_23); +x_28 = l_Lean_indentExpr(x_8); +x_29 = l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___lambda__2___closed__2; +x_30 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_30, 0, x_29); +lean_ctor_set(x_30, 1, x_28); +x_31 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__12; +x_32 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_32, 0, x_30); +lean_ctor_set(x_32, 1, x_31); +x_33 = l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__5(x_32, x_10, x_11, x_12, x_13, x_14, x_27); +lean_dec(x_14); +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_10); +x_34 = !lean_is_exclusive(x_33); +if (x_34 == 0) +{ +return x_33; +} +else +{ +lean_object* x_35; lean_object* x_36; lean_object* x_37; +x_35 = lean_ctor_get(x_33, 0); +x_36 = lean_ctor_get(x_33, 1); +lean_inc(x_36); +lean_inc(x_35); +lean_dec(x_33); +x_37 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_37, 0, x_35); +lean_ctor_set(x_37, 1, x_36); +return x_37; +} +} +} +else +{ +uint8_t x_38; +lean_dec(x_14); +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_10); +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_38 = !lean_is_exclusive(x_18); +if (x_38 == 0) +{ +return x_18; +} +else +{ +lean_object* x_39; lean_object* x_40; lean_object* x_41; +x_39 = lean_ctor_get(x_18, 0); +x_40 = lean_ctor_get(x_18, 1); +lean_inc(x_40); +lean_inc(x_39); +lean_dec(x_18); +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; +} +} +} +} +static lean_object* _init_l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("insufficient number of parameters at recursive application "); +return x_1; +} +} +static lean_object* _init_l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___closed__1; +x_2 = l_Lean_stringToMessageData(x_1); +return x_2; +} +} +static lean_object* _init_l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___boxed__const__1() { +_start: +{ +size_t x_1; lean_object* x_2; +x_1 = 0; +x_2 = lean_box_usize(x_1); +return x_2; +} +} +lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7(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: +{ +if (lean_obj_tag(x_5) == 5) +{ +lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; +x_14 = lean_ctor_get(x_5, 0); +lean_inc(x_14); +x_15 = lean_ctor_get(x_5, 1); +lean_inc(x_15); +lean_dec(x_5); +x_16 = lean_array_set(x_6, x_7, x_15); +x_17 = lean_unsigned_to_nat(1u); +x_18 = lean_nat_sub(x_7, x_17); +lean_dec(x_7); +x_5 = x_14; +x_6 = x_16; +x_7 = x_18; +goto _start; +} +else +{ +uint8_t x_20; +lean_dec(x_7); +x_20 = l_Lean_Expr_isConstOf(x_5, x_1); +if (x_20 == 0) +{ +lean_object* x_21; +lean_dec(x_4); +lean_inc(x_12); +lean_inc(x_11); +lean_inc(x_10); +lean_inc(x_9); +lean_inc(x_8); +lean_inc(x_3); +lean_inc(x_2); +lean_inc(x_1); +x_21 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop(x_1, x_2, x_3, x_5, x_8, x_9, x_10, x_11, x_12, x_13); +if (lean_obj_tag(x_21) == 0) +{ +lean_object* x_22; lean_object* x_23; lean_object* x_24; size_t x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; +x_22 = lean_ctor_get(x_21, 0); +lean_inc(x_22); +x_23 = lean_ctor_get(x_21, 1); +lean_inc(x_23); +lean_dec(x_21); +x_24 = lean_array_get_size(x_6); +x_25 = lean_usize_of_nat(x_24); +lean_dec(x_24); +x_26 = x_6; +x_27 = lean_box_usize(x_25); +x_28 = l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___boxed__const__1; +x_29 = lean_alloc_closure((void*)(l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__3___boxed), 12, 6); +lean_closure_set(x_29, 0, x_1); +lean_closure_set(x_29, 1, x_2); +lean_closure_set(x_29, 2, x_3); +lean_closure_set(x_29, 3, x_27); +lean_closure_set(x_29, 4, x_28); +lean_closure_set(x_29, 5, x_26); +x_30 = x_29; +x_31 = lean_apply_6(x_30, x_8, x_9, x_10, x_11, x_12, x_23); +if (lean_obj_tag(x_31) == 0) +{ +uint8_t x_32; +x_32 = !lean_is_exclusive(x_31); +if (x_32 == 0) +{ +lean_object* x_33; lean_object* x_34; +x_33 = lean_ctor_get(x_31, 0); +x_34 = l_Lean_mkAppN(x_22, x_33); +lean_ctor_set(x_31, 0, x_34); +return x_31; +} +else +{ +lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; +x_35 = lean_ctor_get(x_31, 0); +x_36 = lean_ctor_get(x_31, 1); +lean_inc(x_36); +lean_inc(x_35); +lean_dec(x_31); +x_37 = l_Lean_mkAppN(x_22, x_35); +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_39; +lean_dec(x_22); +x_39 = !lean_is_exclusive(x_31); +if (x_39 == 0) +{ +return x_31; +} +else +{ +lean_object* x_40; lean_object* x_41; lean_object* x_42; +x_40 = lean_ctor_get(x_31, 0); +x_41 = lean_ctor_get(x_31, 1); +lean_inc(x_41); +lean_inc(x_40); +lean_dec(x_31); +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 +{ +uint8_t x_43; +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_6); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_43 = !lean_is_exclusive(x_21); +if (x_43 == 0) +{ +return x_21; +} +else +{ +lean_object* x_44; lean_object* x_45; lean_object* x_46; +x_44 = lean_ctor_get(x_21, 0); +x_45 = lean_ctor_get(x_21, 1); +lean_inc(x_45); +lean_inc(x_44); +lean_dec(x_21); +x_46 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_46, 0, x_44); +lean_ctor_set(x_46, 1, x_45); +return x_46; +} +} +} +else +{ +lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_object* x_51; uint8_t x_52; +lean_dec(x_5); +x_47 = lean_ctor_get(x_2, 0); +lean_inc(x_47); +x_48 = lean_array_get_size(x_47); +lean_dec(x_47); +x_49 = lean_ctor_get(x_2, 2); +lean_inc(x_49); +x_50 = lean_nat_add(x_48, x_49); +x_51 = lean_array_get_size(x_6); +x_52 = lean_nat_dec_le(x_51, x_50); +lean_dec(x_51); +if (x_52 == 0) +{ +lean_object* x_53; lean_object* x_54; +x_53 = lean_box(0); +x_54 = l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___lambda__2(x_6, x_50, x_1, x_2, x_3, x_48, x_49, x_4, x_53, x_8, x_9, x_10, x_11, x_12, x_13); +return x_54; +} +else +{ +lean_object* x_55; lean_object* x_56; lean_object* x_57; lean_object* x_58; lean_object* x_59; lean_object* x_60; uint8_t x_61; +lean_dec(x_50); +lean_dec(x_49); +lean_dec(x_48); +lean_dec(x_6); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_55 = l_Lean_indentExpr(x_4); +x_56 = l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___closed__2; +x_57 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_57, 0, x_56); +lean_ctor_set(x_57, 1, x_55); +x_58 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__12; +x_59 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_59, 0, x_57); +lean_ctor_set(x_59, 1, x_58); +x_60 = l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__6(x_59, x_8, x_9, x_10, x_11, x_12, x_13); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +x_61 = !lean_is_exclusive(x_60); +if (x_61 == 0) +{ +return x_60; +} +else +{ +lean_object* x_62; lean_object* x_63; lean_object* x_64; +x_62 = lean_ctor_get(x_60, 0); +x_63 = lean_ctor_get(x_60, 1); +lean_inc(x_63); +lean_inc(x_62); +lean_dec(x_60); +x_64 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_64, 0, x_62); +lean_ctor_set(x_64, 1, x_63); +return x_64; +} +} +} +} +} +} +lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__8(lean_object* x_1, lean_object* x_2, lean_object* x_3, size_t x_4, size_t 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) { +_start: +{ +uint8_t x_13; +x_13 = x_5 < x_4; +if (x_13 == 0) +{ +lean_object* x_14; lean_object* x_15; +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_14 = x_6; +x_15 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_15, 0, x_14); +lean_ctor_set(x_15, 1, x_12); +return x_15; +} +else +{ +lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; +x_16 = lean_array_uget(x_6, x_5); +x_17 = lean_unsigned_to_nat(0u); +x_18 = lean_array_uset(x_6, x_5, x_17); +x_19 = x_16; +lean_inc(x_11); +lean_inc(x_10); +lean_inc(x_9); +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_3); +lean_inc(x_2); +lean_inc(x_1); +x_20 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop(x_1, x_2, x_3, x_19, x_7, x_8, x_9, x_10, x_11, x_12); +if (lean_obj_tag(x_20) == 0) +{ +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_21 = lean_ctor_get(x_20, 0); +lean_inc(x_21); +x_22 = lean_ctor_get(x_20, 1); +lean_inc(x_22); +lean_dec(x_20); +x_23 = 1; +x_24 = x_5 + x_23; +x_25 = x_21; +x_26 = lean_array_uset(x_18, x_5, x_25); +x_5 = x_24; +x_6 = x_26; +x_12 = x_22; +goto _start; +} +else +{ +uint8_t x_28; +lean_dec(x_18); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +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; +} +} +} +} +} +lean_object* l_Std_Range_forIn_loop___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__9(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: +{ +lean_object* x_16; uint8_t x_17; +x_16 = lean_ctor_get(x_6, 1); +x_17 = lean_nat_dec_le(x_16, x_8); +if (x_17 == 0) +{ +lean_object* x_18; uint8_t x_19; +x_18 = lean_unsigned_to_nat(0u); +x_19 = lean_nat_dec_eq(x_7, x_18); +if (x_19 == 0) +{ +lean_object* x_20; lean_object* x_21; uint8_t x_22; +x_20 = lean_unsigned_to_nat(1u); +x_21 = lean_nat_sub(x_7, x_20); +lean_dec(x_7); +x_22 = lean_nat_dec_eq(x_4, x_8); +if (x_22 == 0) +{ +lean_object* x_23; uint8_t x_24; +x_23 = lean_ctor_get(x_2, 3); +lean_inc(x_23); +x_24 = l_Array_contains___at___private_Lean_Meta_FunInfo_0__Lean_Meta_collectDeps_visit___spec__2(x_23, x_8); +lean_dec(x_23); +if (x_24 == 0) +{ +lean_object* x_25; lean_object* x_26; lean_object* x_27; +x_25 = l_Lean_instInhabitedExpr; +x_26 = lean_array_get(x_25, x_5, x_8); +lean_inc(x_14); +lean_inc(x_13); +lean_inc(x_12); +lean_inc(x_11); +lean_inc(x_10); +lean_inc(x_3); +lean_inc(x_2); +lean_inc(x_1); +x_27 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop(x_1, x_2, x_3, x_26, x_10, x_11, x_12, x_13, x_14, x_15); +if (lean_obj_tag(x_27) == 0) +{ +lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; +x_28 = lean_ctor_get(x_27, 0); +lean_inc(x_28); +x_29 = lean_ctor_get(x_27, 1); +lean_inc(x_29); +lean_dec(x_27); +x_30 = lean_array_push(x_9, x_28); +x_31 = lean_ctor_get(x_6, 2); +x_32 = lean_nat_add(x_8, x_31); +lean_dec(x_8); +x_7 = x_21; +x_8 = x_32; +x_9 = x_30; +x_15 = x_29; +goto _start; +} +else +{ +uint8_t x_34; +lean_dec(x_21); +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_2); +lean_dec(x_1); +x_34 = !lean_is_exclusive(x_27); +if (x_34 == 0) +{ +return x_27; +} +else +{ +lean_object* x_35; lean_object* x_36; lean_object* x_37; +x_35 = lean_ctor_get(x_27, 0); +x_36 = lean_ctor_get(x_27, 1); +lean_inc(x_36); +lean_inc(x_35); +lean_dec(x_27); +x_37 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_37, 0, x_35); +lean_ctor_set(x_37, 1, x_36); +return x_37; +} +} +} +else +{ +lean_object* x_38; lean_object* x_39; +x_38 = lean_ctor_get(x_6, 2); +x_39 = lean_nat_add(x_8, x_38); +lean_dec(x_8); +x_7 = x_21; +x_8 = x_39; +goto _start; +} +} +else +{ +lean_object* x_41; lean_object* x_42; +x_41 = lean_ctor_get(x_6, 2); +x_42 = lean_nat_add(x_8, x_41); +lean_dec(x_8); +x_7 = x_21; +x_8 = x_42; +goto _start; +} +} +else +{ +lean_object* x_44; +lean_dec(x_14); +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_44 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_44, 0, x_9); +lean_ctor_set(x_44, 1, x_15); +return x_44; +} +} +else +{ +lean_object* x_45; +lean_dec(x_14); +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_45 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_45, 0, x_9); +lean_ctor_set(x_45, 1, x_15); +return x_45; +} +} +} +lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__10___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, lean_object* x_12, lean_object* x_13) { +_start: +{ +lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; +x_14 = lean_array_get_size(x_1); +x_15 = l_Array_extract___rarg(x_1, x_2, x_14); +x_16 = lean_array_get_size(x_15); +x_17 = lean_unsigned_to_nat(0u); +x_18 = lean_unsigned_to_nat(1u); +lean_inc(x_16); +x_19 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_19, 0, x_17); +lean_ctor_set(x_19, 1, x_16); +lean_ctor_set(x_19, 2, x_18); +x_20 = l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___lambda__1___closed__1; +x_21 = l_Std_Range_forIn_loop___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__9(x_3, x_4, x_5, x_6, x_15, x_19, x_16, x_17, x_20, x_8, x_9, x_10, x_11, x_12, x_13); +lean_dec(x_19); +lean_dec(x_15); +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_mkAppN(x_7, 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_mkAppN(x_7, 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_7); +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; +} +} +} +} +lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__10___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_object* x_12, lean_object* x_13, lean_object* x_14, lean_object* x_15) { +_start: +{ +lean_object* x_16; lean_object* x_17; lean_object* x_18; +lean_dec(x_9); +x_16 = l_Lean_instInhabitedExpr; +x_17 = lean_array_get(x_16, x_1, x_2); +lean_dec(x_2); +lean_inc(x_14); +lean_inc(x_13); +lean_inc(x_12); +lean_inc(x_11); +lean_inc(x_10); +lean_inc(x_5); +lean_inc(x_4); +lean_inc(x_3); +x_18 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop(x_3, x_4, x_5, x_17, x_10, x_11, x_12, x_13, x_14, x_15); +if (lean_obj_tag(x_18) == 0) +{ +lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; +x_19 = lean_ctor_get(x_18, 0); +lean_inc(x_19); +x_20 = lean_ctor_get(x_18, 1); +lean_inc(x_20); +lean_dec(x_18); +x_21 = lean_ctor_get(x_4, 6); +lean_inc(x_21); +x_22 = lean_array_get_size(x_21); +lean_dec(x_21); +lean_inc(x_14); +lean_inc(x_13); +lean_inc(x_12); +lean_inc(x_11); +lean_inc(x_5); +x_23 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelow(x_5, x_22, x_19, x_11, x_12, x_13, x_14, x_20); +if (lean_obj_tag(x_23) == 0) +{ +lean_object* x_24; lean_object* x_25; lean_object* x_26; +lean_dec(x_8); +x_24 = lean_ctor_get(x_23, 0); +lean_inc(x_24); +x_25 = lean_ctor_get(x_23, 1); +lean_inc(x_25); +lean_dec(x_23); +x_26 = l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__10___lambda__1(x_1, x_6, x_3, x_4, x_5, x_7, x_24, x_10, x_11, x_12, x_13, x_14, x_25); +lean_dec(x_7); +return x_26; +} +else +{ +lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; uint8_t x_34; +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_27 = lean_ctor_get(x_23, 1); +lean_inc(x_27); +lean_dec(x_23); +x_28 = l_Lean_indentExpr(x_8); +x_29 = l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___lambda__2___closed__2; +x_30 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_30, 0, x_29); +lean_ctor_set(x_30, 1, x_28); +x_31 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__12; +x_32 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_32, 0, x_30); +lean_ctor_set(x_32, 1, x_31); +x_33 = l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__5(x_32, x_10, x_11, x_12, x_13, x_14, x_27); +lean_dec(x_14); +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_10); +x_34 = !lean_is_exclusive(x_33); +if (x_34 == 0) +{ +return x_33; +} +else +{ +lean_object* x_35; lean_object* x_36; lean_object* x_37; +x_35 = lean_ctor_get(x_33, 0); +x_36 = lean_ctor_get(x_33, 1); +lean_inc(x_36); +lean_inc(x_35); +lean_dec(x_33); +x_37 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_37, 0, x_35); +lean_ctor_set(x_37, 1, x_36); +return x_37; +} +} +} +else +{ +uint8_t x_38; +lean_dec(x_14); +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_10); +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_38 = !lean_is_exclusive(x_18); +if (x_38 == 0) +{ +return x_18; +} +else +{ +lean_object* x_39; lean_object* x_40; lean_object* x_41; +x_39 = lean_ctor_get(x_18, 0); +x_40 = lean_ctor_get(x_18, 1); +lean_inc(x_40); +lean_inc(x_39); +lean_dec(x_18); +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; +} +} +} +} +static lean_object* _init_l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__10___boxed__const__1() { +_start: +{ +size_t x_1; lean_object* x_2; +x_1 = 0; +x_2 = lean_box_usize(x_1); +return x_2; +} +} +lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__10(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: +{ +if (lean_obj_tag(x_5) == 5) +{ +lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; +x_14 = lean_ctor_get(x_5, 0); +lean_inc(x_14); +x_15 = lean_ctor_get(x_5, 1); +lean_inc(x_15); +lean_dec(x_5); +x_16 = lean_array_set(x_6, x_7, x_15); +x_17 = lean_unsigned_to_nat(1u); +x_18 = lean_nat_sub(x_7, x_17); +lean_dec(x_7); +x_5 = x_14; +x_6 = x_16; +x_7 = x_18; +goto _start; +} +else +{ +uint8_t x_20; +lean_dec(x_7); +x_20 = l_Lean_Expr_isConstOf(x_5, x_1); +if (x_20 == 0) +{ +lean_object* x_21; +lean_dec(x_4); +lean_inc(x_12); +lean_inc(x_11); +lean_inc(x_10); +lean_inc(x_9); +lean_inc(x_8); +lean_inc(x_3); +lean_inc(x_2); +lean_inc(x_1); +x_21 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop(x_1, x_2, x_3, x_5, x_8, x_9, x_10, x_11, x_12, x_13); +if (lean_obj_tag(x_21) == 0) +{ +lean_object* x_22; lean_object* x_23; lean_object* x_24; size_t x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; +x_22 = lean_ctor_get(x_21, 0); +lean_inc(x_22); +x_23 = lean_ctor_get(x_21, 1); +lean_inc(x_23); +lean_dec(x_21); +x_24 = lean_array_get_size(x_6); +x_25 = lean_usize_of_nat(x_24); +lean_dec(x_24); +x_26 = x_6; +x_27 = lean_box_usize(x_25); +x_28 = l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__10___boxed__const__1; +x_29 = lean_alloc_closure((void*)(l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__8___boxed), 12, 6); +lean_closure_set(x_29, 0, x_1); +lean_closure_set(x_29, 1, x_2); +lean_closure_set(x_29, 2, x_3); +lean_closure_set(x_29, 3, x_27); +lean_closure_set(x_29, 4, x_28); +lean_closure_set(x_29, 5, x_26); +x_30 = x_29; +x_31 = lean_apply_6(x_30, x_8, x_9, x_10, x_11, x_12, x_23); +if (lean_obj_tag(x_31) == 0) +{ +uint8_t x_32; +x_32 = !lean_is_exclusive(x_31); +if (x_32 == 0) +{ +lean_object* x_33; lean_object* x_34; +x_33 = lean_ctor_get(x_31, 0); +x_34 = l_Lean_mkAppN(x_22, x_33); +lean_ctor_set(x_31, 0, x_34); +return x_31; +} +else +{ +lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; +x_35 = lean_ctor_get(x_31, 0); +x_36 = lean_ctor_get(x_31, 1); +lean_inc(x_36); +lean_inc(x_35); +lean_dec(x_31); +x_37 = l_Lean_mkAppN(x_22, x_35); +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_39; +lean_dec(x_22); +x_39 = !lean_is_exclusive(x_31); +if (x_39 == 0) +{ +return x_31; +} +else +{ +lean_object* x_40; lean_object* x_41; lean_object* x_42; +x_40 = lean_ctor_get(x_31, 0); +x_41 = lean_ctor_get(x_31, 1); +lean_inc(x_41); +lean_inc(x_40); +lean_dec(x_31); +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 +{ +uint8_t x_43; +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_6); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_43 = !lean_is_exclusive(x_21); +if (x_43 == 0) +{ +return x_21; +} +else +{ +lean_object* x_44; lean_object* x_45; lean_object* x_46; +x_44 = lean_ctor_get(x_21, 0); +x_45 = lean_ctor_get(x_21, 1); +lean_inc(x_45); +lean_inc(x_44); +lean_dec(x_21); +x_46 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_46, 0, x_44); +lean_ctor_set(x_46, 1, x_45); +return x_46; +} +} +} +else +{ +lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_object* x_51; uint8_t x_52; +lean_dec(x_5); +x_47 = lean_ctor_get(x_2, 0); +lean_inc(x_47); +x_48 = lean_array_get_size(x_47); +lean_dec(x_47); +x_49 = lean_ctor_get(x_2, 2); +lean_inc(x_49); +x_50 = lean_nat_add(x_48, x_49); +x_51 = lean_array_get_size(x_6); +x_52 = lean_nat_dec_le(x_51, x_50); +lean_dec(x_51); +if (x_52 == 0) +{ +lean_object* x_53; lean_object* x_54; +x_53 = lean_box(0); +x_54 = l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__10___lambda__2(x_6, x_50, x_1, x_2, x_3, x_48, x_49, x_4, x_53, x_8, x_9, x_10, x_11, x_12, x_13); +return x_54; +} +else +{ +lean_object* x_55; lean_object* x_56; lean_object* x_57; lean_object* x_58; lean_object* x_59; lean_object* x_60; uint8_t x_61; +lean_dec(x_50); +lean_dec(x_49); +lean_dec(x_48); +lean_dec(x_6); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_55 = l_Lean_indentExpr(x_4); +x_56 = l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___closed__2; +x_57 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_57, 0, x_56); +lean_ctor_set(x_57, 1, x_55); +x_58 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__12; +x_59 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_59, 0, x_57); +lean_ctor_set(x_59, 1, x_58); +x_60 = l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__6(x_59, x_8, x_9, x_10, x_11, x_12, x_13); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +x_61 = !lean_is_exclusive(x_60); +if (x_61 == 0) +{ +return x_60; +} +else +{ +lean_object* x_62; lean_object* x_63; lean_object* x_64; +x_62 = lean_ctor_get(x_60, 0); +x_63 = lean_ctor_get(x_60, 1); +lean_inc(x_63); +lean_inc(x_62); +lean_dec(x_60); +x_64 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_64, 0, x_62); +lean_ctor_set(x_64, 1, x_63); +return x_64; +} +} +} +} +} +} +static lean_object* _init_l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("_traceMsg"); +return x_1; +} +} +static lean_object* _init_l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +static lean_object* _init_l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___closed__3() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("["); +return x_1; +} +} +static lean_object* _init_l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___closed__4() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___closed__3; +x_2 = l_Lean_stringToMessageData(x_1); +return x_2; +} +} +static lean_object* _init_l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___closed__5() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("] "); +return x_1; +} +} +static lean_object* _init_l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___closed__6() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___closed__5; +x_2 = l_Lean_stringToMessageData(x_1); +return x_2; +} +} +lean_object* l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11(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; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; uint8_t x_18; +x_9 = lean_ctor_get(x_6, 3); +x_10 = l_Lean_addMessageContextFull___at_Lean_Meta_instAddMessageContextMetaM___spec__1(x_2, x_4, x_5, x_6, x_7, x_8); +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_addTrace_addTraceOptions(x_11); +x_14 = lean_st_ref_take(x_7, x_12); +x_15 = lean_ctor_get(x_14, 0); +lean_inc(x_15); +x_16 = lean_ctor_get(x_15, 3); +lean_inc(x_16); +x_17 = lean_ctor_get(x_14, 1); +lean_inc(x_17); +lean_dec(x_14); +x_18 = !lean_is_exclusive(x_15); +if (x_18 == 0) +{ +lean_object* x_19; uint8_t x_20; +x_19 = lean_ctor_get(x_15, 3); +lean_dec(x_19); +x_20 = !lean_is_exclusive(x_16); +if (x_20 == 0) +{ +lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; uint8_t x_36; +x_21 = lean_ctor_get(x_16, 0); +x_22 = l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___closed__2; +x_23 = l_Lean_Name_append(x_1, x_22); +x_24 = lean_alloc_ctor(4, 1, 0); +lean_ctor_set(x_24, 0, x_1); +x_25 = l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___closed__4; +x_26 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_26, 0, x_25); +lean_ctor_set(x_26, 1, x_24); +x_27 = l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___closed__6; +x_28 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_28, 0, x_26); +lean_ctor_set(x_28, 1, x_27); +x_29 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_29, 0, x_28); +lean_ctor_set(x_29, 1, x_13); +x_30 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__12; +x_31 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_31, 0, x_29); +lean_ctor_set(x_31, 1, x_30); +x_32 = lean_alloc_ctor(11, 2, 0); +lean_ctor_set(x_32, 0, x_23); +lean_ctor_set(x_32, 1, x_31); +lean_inc(x_9); +x_33 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_33, 0, x_9); +lean_ctor_set(x_33, 1, x_32); +x_34 = l_Std_PersistentArray_push___rarg(x_21, x_33); +lean_ctor_set(x_16, 0, x_34); +x_35 = lean_st_ref_set(x_7, x_15, x_17); +x_36 = !lean_is_exclusive(x_35); +if (x_36 == 0) +{ +lean_object* x_37; lean_object* x_38; +x_37 = lean_ctor_get(x_35, 0); +lean_dec(x_37); +x_38 = lean_box(0); +lean_ctor_set(x_35, 0, x_38); +return x_35; +} +else +{ +lean_object* x_39; lean_object* x_40; lean_object* x_41; +x_39 = lean_ctor_get(x_35, 1); +lean_inc(x_39); +lean_dec(x_35); +x_40 = lean_box(0); +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_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_object* x_51; lean_object* x_52; lean_object* x_53; lean_object* x_54; lean_object* x_55; lean_object* x_56; lean_object* x_57; lean_object* x_58; lean_object* x_59; lean_object* x_60; lean_object* x_61; lean_object* x_62; +x_42 = lean_ctor_get_uint8(x_16, sizeof(void*)*1); +x_43 = lean_ctor_get(x_16, 0); +lean_inc(x_43); +lean_dec(x_16); +x_44 = l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___closed__2; +x_45 = l_Lean_Name_append(x_1, x_44); +x_46 = lean_alloc_ctor(4, 1, 0); +lean_ctor_set(x_46, 0, x_1); +x_47 = l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___closed__4; +x_48 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_48, 0, x_47); +lean_ctor_set(x_48, 1, x_46); +x_49 = l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___closed__6; +x_50 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_50, 0, x_48); +lean_ctor_set(x_50, 1, x_49); +x_51 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_51, 0, x_50); +lean_ctor_set(x_51, 1, x_13); +x_52 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__12; +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(11, 2, 0); +lean_ctor_set(x_54, 0, x_45); +lean_ctor_set(x_54, 1, x_53); +lean_inc(x_9); +x_55 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_55, 0, x_9); +lean_ctor_set(x_55, 1, x_54); +x_56 = l_Std_PersistentArray_push___rarg(x_43, x_55); +x_57 = lean_alloc_ctor(0, 1, 1); +lean_ctor_set(x_57, 0, x_56); +lean_ctor_set_uint8(x_57, sizeof(void*)*1, x_42); +lean_ctor_set(x_15, 3, x_57); +x_58 = lean_st_ref_set(x_7, x_15, x_17); +x_59 = lean_ctor_get(x_58, 1); +lean_inc(x_59); +if (lean_is_exclusive(x_58)) { + lean_ctor_release(x_58, 0); + lean_ctor_release(x_58, 1); + x_60 = x_58; +} else { + lean_dec_ref(x_58); + x_60 = lean_box(0); +} +x_61 = lean_box(0); +if (lean_is_scalar(x_60)) { + x_62 = lean_alloc_ctor(0, 2, 0); +} else { + x_62 = x_60; +} +lean_ctor_set(x_62, 0, x_61); +lean_ctor_set(x_62, 1, x_59); +return x_62; +} +} +else +{ +lean_object* x_63; lean_object* x_64; lean_object* x_65; uint8_t x_66; lean_object* x_67; lean_object* x_68; lean_object* x_69; lean_object* x_70; lean_object* x_71; lean_object* x_72; lean_object* x_73; lean_object* x_74; lean_object* x_75; lean_object* x_76; lean_object* x_77; lean_object* x_78; lean_object* x_79; lean_object* x_80; lean_object* x_81; lean_object* x_82; lean_object* x_83; lean_object* x_84; lean_object* x_85; lean_object* x_86; lean_object* x_87; lean_object* x_88; +x_63 = lean_ctor_get(x_15, 0); +x_64 = lean_ctor_get(x_15, 1); +x_65 = lean_ctor_get(x_15, 2); +lean_inc(x_65); +lean_inc(x_64); +lean_inc(x_63); +lean_dec(x_15); +x_66 = lean_ctor_get_uint8(x_16, sizeof(void*)*1); +x_67 = lean_ctor_get(x_16, 0); +lean_inc(x_67); +if (lean_is_exclusive(x_16)) { + lean_ctor_release(x_16, 0); + x_68 = x_16; +} else { + lean_dec_ref(x_16); + x_68 = lean_box(0); +} +x_69 = l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___closed__2; +x_70 = l_Lean_Name_append(x_1, x_69); +x_71 = lean_alloc_ctor(4, 1, 0); +lean_ctor_set(x_71, 0, x_1); +x_72 = l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___closed__4; +x_73 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_73, 0, x_72); +lean_ctor_set(x_73, 1, x_71); +x_74 = l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___closed__6; +x_75 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_75, 0, x_73); +lean_ctor_set(x_75, 1, x_74); +x_76 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_76, 0, x_75); +lean_ctor_set(x_76, 1, x_13); +x_77 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__12; +x_78 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_78, 0, x_76); +lean_ctor_set(x_78, 1, x_77); +x_79 = lean_alloc_ctor(11, 2, 0); +lean_ctor_set(x_79, 0, x_70); +lean_ctor_set(x_79, 1, x_78); +lean_inc(x_9); +x_80 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_80, 0, x_9); +lean_ctor_set(x_80, 1, x_79); +x_81 = l_Std_PersistentArray_push___rarg(x_67, x_80); +if (lean_is_scalar(x_68)) { + x_82 = lean_alloc_ctor(0, 1, 1); +} else { + x_82 = x_68; +} +lean_ctor_set(x_82, 0, x_81); +lean_ctor_set_uint8(x_82, sizeof(void*)*1, x_66); +x_83 = lean_alloc_ctor(0, 4, 0); +lean_ctor_set(x_83, 0, x_63); +lean_ctor_set(x_83, 1, x_64); +lean_ctor_set(x_83, 2, x_65); +lean_ctor_set(x_83, 3, x_82); +x_84 = lean_st_ref_set(x_7, x_83, x_17); +x_85 = lean_ctor_get(x_84, 1); +lean_inc(x_85); +if (lean_is_exclusive(x_84)) { + lean_ctor_release(x_84, 0); + lean_ctor_release(x_84, 1); + x_86 = x_84; +} else { + lean_dec_ref(x_84); + x_86 = lean_box(0); +} +x_87 = lean_box(0); +if (lean_is_scalar(x_86)) { + x_88 = lean_alloc_ctor(0, 2, 0); +} else { + x_88 = x_86; +} +lean_ctor_set(x_88, 0, x_87); +lean_ctor_set(x_88, 1, x_85); +return x_88; +} +} +} +lean_object* l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__12(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; uint8_t x_9; lean_object* x_10; lean_object* x_11; +x_8 = lean_ctor_get(x_5, 0); +x_9 = l_Lean_checkTraceOption(x_8, x_1); +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_7); +return x_11; +} +} +lean_object* l_Lean_Meta_lambdaTelescope___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__13___rarg___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) { +_start: +{ +lean_object* x_10; +x_10 = lean_apply_8(x_1, x_3, x_4, x_2, x_5, x_6, x_7, x_8, x_9); +return x_10; +} +} +lean_object* l_Lean_Meta_lambdaTelescope___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__13___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { +_start: +{ +lean_object* x_9; uint8_t x_10; lean_object* x_11; +x_9 = lean_alloc_closure((void*)(l_Lean_Meta_lambdaTelescope___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__13___rarg___lambda__1), 9, 2); +lean_closure_set(x_9, 0, x_2); +lean_closure_set(x_9, 1, x_3); +x_10 = 0; +x_11 = l___private_Lean_Meta_Basic_0__Lean_Meta_lambdaTelescopeImp___rarg(x_1, x_10, x_9, x_4, x_5, x_6, x_7, x_8); +if (lean_obj_tag(x_11) == 0) +{ +uint8_t x_12; +x_12 = !lean_is_exclusive(x_11); +if (x_12 == 0) +{ +return x_11; +} +else +{ +lean_object* x_13; lean_object* x_14; lean_object* x_15; +x_13 = lean_ctor_get(x_11, 0); +x_14 = lean_ctor_get(x_11, 1); +lean_inc(x_14); +lean_inc(x_13); +lean_dec(x_11); +x_15 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_15, 0, x_13); +lean_ctor_set(x_15, 1, x_14); +return x_15; +} +} +else +{ +uint8_t x_16; +x_16 = !lean_is_exclusive(x_11); +if (x_16 == 0) +{ +return x_11; +} +else +{ +lean_object* x_17; lean_object* x_18; lean_object* 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_alloc_ctor(1, 2, 0); +lean_ctor_set(x_19, 0, x_17); +lean_ctor_set(x_19, 1, x_18); +return x_19; +} +} +} +} +lean_object* l_Lean_Meta_lambdaTelescope___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__13(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_Lean_Meta_lambdaTelescope___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__13___rarg), 8, 0); +return x_2; +} +} +lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___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, lean_object* x_12) { +_start: +{ +lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; +x_13 = lean_unsigned_to_nat(1u); +x_14 = lean_nat_sub(x_1, x_13); +x_15 = l_Lean_instInhabitedExpr; +x_16 = lean_array_get(x_15, x_2, x_14); +lean_dec(x_14); +lean_inc(x_11); +lean_inc(x_10); +lean_inc(x_9); +lean_inc(x_8); +x_17 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop(x_3, x_4, x_16, x_5, x_7, x_8, x_9, x_10, x_11, x_12); +if (lean_obj_tag(x_17) == 0) +{ +lean_object* x_18; lean_object* x_19; uint8_t x_20; uint8_t x_21; lean_object* x_22; +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 = 0; +x_21 = 1; +x_22 = l_Lean_Meta_mkLambdaFVars(x_2, x_18, x_20, x_21, x_8, x_9, x_10, x_11, x_19); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +return x_22; +} +else +{ +uint8_t x_23; +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_2); +x_23 = !lean_is_exclusive(x_17); +if (x_23 == 0) +{ +return x_17; +} +else +{ +lean_object* x_24; lean_object* x_25; lean_object* x_26; +x_24 = lean_ctor_get(x_17, 0); +x_25 = lean_ctor_get(x_17, 1); +lean_inc(x_25); +lean_inc(x_24); +lean_dec(x_17); +x_26 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_26, 0, x_24); +lean_ctor_set(x_26, 1, x_25); +return x_26; +} +} +} +} +static lean_object* _init_l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__2___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("unexpected matcher application alternative"); +return x_1; +} +} +static lean_object* _init_l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__2___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__2___closed__1; +x_2 = l_Lean_stringToMessageData(x_1); +return x_2; +} +} +static lean_object* _init_l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__2___closed__3() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("\nat application"); +return x_1; +} +} +static lean_object* _init_l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__2___closed__4() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__2___closed__3; +x_2 = l_Lean_stringToMessageData(x_1); +return x_2; +} +} +lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___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_object* x_12, lean_object* x_13, lean_object* x_14) { +_start: +{ +lean_object* x_15; uint8_t x_16; +lean_dec(x_8); +x_15 = lean_array_get_size(x_2); +x_16 = lean_nat_dec_le(x_1, x_15); +lean_dec(x_15); +if (x_16 == 0) +{ +lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; uint8_t x_27; +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +x_17 = l_Lean_indentExpr(x_6); +x_18 = l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__2___closed__2; +x_19 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_19, 0, x_18); +lean_ctor_set(x_19, 1, x_17); +x_20 = l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__2___closed__4; +x_21 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_21, 0, x_19); +lean_ctor_set(x_21, 1, x_20); +x_22 = l_Lean_indentExpr(x_7); +x_23 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_23, 0, x_21); +lean_ctor_set(x_23, 1, x_22); +x_24 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__12; +x_25 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_25, 0, x_23); +lean_ctor_set(x_25, 1, x_24); +x_26 = l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__6(x_25, x_9, x_10, x_11, x_12, x_13, x_14); +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +x_27 = !lean_is_exclusive(x_26); +if (x_27 == 0) +{ +return x_26; +} +else +{ +lean_object* x_28; lean_object* x_29; lean_object* x_30; +x_28 = lean_ctor_get(x_26, 0); +x_29 = lean_ctor_get(x_26, 1); +lean_inc(x_29); +lean_inc(x_28); +lean_dec(x_26); +x_30 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_30, 0, x_28); +lean_ctor_set(x_30, 1, x_29); +return x_30; +} +} +else +{ +lean_object* x_31; lean_object* x_32; +lean_dec(x_7); +lean_dec(x_6); +x_31 = lean_box(0); +x_32 = l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__1(x_1, x_2, x_3, x_4, x_5, x_31, x_9, x_10, x_11, x_12, x_13, x_14); +return x_32; +} +} +} +static lean_object* _init_l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__3___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("altNumParams: "); +return x_1; +} +} +static lean_object* _init_l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__3___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__3___closed__1; +x_2 = l_Lean_stringToMessageData(x_1); +return x_2; +} +} +static lean_object* _init_l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__3___closed__3() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string(", xs: "); +return x_1; +} +} +static lean_object* _init_l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__3___closed__4() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__3___closed__3; +x_2 = l_Lean_stringToMessageData(x_1); +return x_2; +} +} +lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___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_object* x_10, lean_object* x_11, lean_object* x_12, lean_object* x_13, lean_object* x_14) { +_start: +{ +uint8_t x_15; lean_object* x_16; lean_object* x_38; lean_object* x_39; lean_object* x_40; uint8_t x_41; +x_38 = lean_st_ref_get(x_13, x_14); +x_39 = lean_ctor_get(x_38, 0); +lean_inc(x_39); +x_40 = lean_ctor_get(x_39, 3); +lean_inc(x_40); +lean_dec(x_39); +x_41 = lean_ctor_get_uint8(x_40, sizeof(void*)*1); +lean_dec(x_40); +if (x_41 == 0) +{ +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 = 0; +x_15 = x_43; +x_16 = x_42; +goto block_37; +} +else +{ +lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; uint8_t x_48; +x_44 = lean_ctor_get(x_38, 1); +lean_inc(x_44); +lean_dec(x_38); +lean_inc(x_6); +x_45 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__12(x_6, x_9, x_10, x_11, x_12, x_13, x_44); +x_46 = lean_ctor_get(x_45, 0); +lean_inc(x_46); +x_47 = lean_ctor_get(x_45, 1); +lean_inc(x_47); +lean_dec(x_45); +x_48 = lean_unbox(x_46); +lean_dec(x_46); +x_15 = x_48; +x_16 = x_47; +goto block_37; +} +block_37: +{ +if (x_15 == 0) +{ +lean_object* x_17; lean_object* x_18; +lean_dec(x_6); +x_17 = lean_box(0); +x_18 = l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__2(x_1, x_7, x_2, x_3, x_8, x_4, x_5, x_17, x_9, x_10, x_11, x_12, x_13, x_16); +lean_dec(x_1); +return x_18; +} +else +{ +lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; +lean_inc(x_1); +x_19 = l_Nat_repr(x_1); +x_20 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_20, 0, x_19); +x_21 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_21, 0, x_20); +x_22 = l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__3___closed__2; +x_23 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_23, 0, x_22); +lean_ctor_set(x_23, 1, x_21); +x_24 = l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__3___closed__4; +x_25 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_25, 0, x_23); +lean_ctor_set(x_25, 1, x_24); +lean_inc(x_7); +x_26 = lean_array_to_list(lean_box(0), x_7); +x_27 = lean_box(0); +x_28 = l_List_mapTRAux___at_Lean_MessageData_instCoeListExprMessageData___spec__1(x_26, x_27); +x_29 = l_Lean_MessageData_ofList(x_28); +lean_dec(x_28); +x_30 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_30, 0, x_25); +lean_ctor_set(x_30, 1, x_29); +x_31 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__12; +x_32 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_32, 0, x_30); +lean_ctor_set(x_32, 1, x_31); +x_33 = l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11(x_6, x_32, x_9, x_10, x_11, x_12, x_13, x_16); +x_34 = lean_ctor_get(x_33, 0); +lean_inc(x_34); +x_35 = lean_ctor_get(x_33, 1); +lean_inc(x_35); +lean_dec(x_33); +x_36 = l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__2(x_1, x_7, x_2, x_3, x_8, x_4, x_5, x_34, x_9, x_10, x_11, x_12, x_13, x_35); +lean_dec(x_1); +return x_36; +} +} +} +} +lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14(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) { +_start: +{ +uint8_t x_14; +x_14 = x_6 < x_5; +if (x_14 == 0) +{ +lean_object* x_15; lean_object* x_16; +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_15 = x_7; +x_16 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_16, 0, x_15); +lean_ctor_set(x_16, 1, x_13); +return x_16; +} +else +{ +lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; +x_17 = lean_array_uget(x_7, x_6); +x_18 = lean_unsigned_to_nat(0u); +x_19 = lean_array_uset(x_7, x_6, x_18); +x_20 = x_17; +x_21 = lean_ctor_get(x_20, 0); +lean_inc(x_21); +x_22 = lean_ctor_get(x_20, 1); +lean_inc(x_22); +lean_dec(x_20); +lean_inc(x_4); +lean_inc(x_3); +lean_inc(x_21); +lean_inc(x_2); +lean_inc(x_1); +x_23 = lean_alloc_closure((void*)(l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__3), 14, 6); +lean_closure_set(x_23, 0, x_22); +lean_closure_set(x_23, 1, x_1); +lean_closure_set(x_23, 2, x_2); +lean_closure_set(x_23, 3, x_21); +lean_closure_set(x_23, 4, x_3); +lean_closure_set(x_23, 5, x_4); +lean_inc(x_12); +lean_inc(x_11); +lean_inc(x_10); +lean_inc(x_9); +lean_inc(x_8); +x_24 = l_Lean_Meta_lambdaTelescope___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__13___rarg(x_21, x_23, x_8, x_9, x_10, x_11, x_12, x_13); +if (lean_obj_tag(x_24) == 0) +{ +lean_object* x_25; lean_object* x_26; size_t x_27; size_t x_28; lean_object* x_29; lean_object* x_30; +x_25 = lean_ctor_get(x_24, 0); +lean_inc(x_25); +x_26 = lean_ctor_get(x_24, 1); +lean_inc(x_26); +lean_dec(x_24); +x_27 = 1; +x_28 = x_6 + x_27; +x_29 = x_25; +x_30 = lean_array_uset(x_19, x_6, x_29); +x_6 = x_28; +x_7 = x_30; +x_13 = x_26; +goto _start; +} +else +{ +uint8_t x_32; +lean_dec(x_19); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_32 = !lean_is_exclusive(x_24); +if (x_32 == 0) +{ +return x_24; +} +else +{ +lean_object* x_33; lean_object* x_34; lean_object* x_35; +x_33 = lean_ctor_get(x_24, 0); +x_34 = lean_ctor_get(x_24, 1); +lean_inc(x_34); +lean_inc(x_33); +lean_dec(x_24); +x_35 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_35, 0, x_33); +lean_ctor_set(x_35, 1, x_34); +return x_35; +} +} +} +} +} +lean_object* l_Lean_Meta_withLocalDecl___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__15___rarg___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; +x_9 = lean_apply_7(x_1, x_3, x_2, x_4, x_5, x_6, x_7, x_8); +return x_9; +} +} +lean_object* l_Lean_Meta_withLocalDecl___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__15___rarg(lean_object* x_1, uint8_t x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10) { +_start: +{ +lean_object* x_11; lean_object* x_12; +x_11 = lean_alloc_closure((void*)(l_Lean_Meta_withLocalDecl___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__15___rarg___lambda__1), 8, 2); +lean_closure_set(x_11, 0, x_4); +lean_closure_set(x_11, 1, x_5); +x_12 = l___private_Lean_Meta_Basic_0__Lean_Meta_withLocalDeclImp___rarg(x_1, x_2, x_3, x_11, x_6, x_7, x_8, x_9, x_10); +if (lean_obj_tag(x_12) == 0) +{ +uint8_t x_13; +x_13 = !lean_is_exclusive(x_12); +if (x_13 == 0) +{ +return x_12; +} +else +{ +lean_object* x_14; lean_object* x_15; lean_object* x_16; +x_14 = lean_ctor_get(x_12, 0); +x_15 = lean_ctor_get(x_12, 1); +lean_inc(x_15); +lean_inc(x_14); +lean_dec(x_12); +x_16 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_16, 0, x_14); +lean_ctor_set(x_16, 1, x_15); +return x_16; +} +} +else +{ +uint8_t x_17; +x_17 = !lean_is_exclusive(x_12); +if (x_17 == 0) +{ +return x_12; +} +else +{ +lean_object* x_18; lean_object* x_19; lean_object* x_20; +x_18 = lean_ctor_get(x_12, 0); +x_19 = lean_ctor_get(x_12, 1); +lean_inc(x_19); +lean_inc(x_18); +lean_dec(x_12); +x_20 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_20, 0, x_18); +lean_ctor_set(x_20, 1, x_19); +return x_20; +} +} +} +} +lean_object* l_Lean_Meta_withLocalDecl___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__15(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_Lean_Meta_withLocalDecl___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__15___rarg___boxed), 10, 0); +return x_2; +} +} +lean_object* l_Lean_Meta_withLetDecl___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__16___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* 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_closure((void*)(l_Lean_Meta_withLocalDecl___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__15___rarg___lambda__1), 8, 2); +lean_closure_set(x_11, 0, x_4); +lean_closure_set(x_11, 1, x_5); +x_12 = l___private_Lean_Meta_Basic_0__Lean_Meta_withLetDeclImp___rarg(x_1, x_2, x_3, x_11, x_6, x_7, x_8, x_9, x_10); +if (lean_obj_tag(x_12) == 0) +{ +uint8_t x_13; +x_13 = !lean_is_exclusive(x_12); +if (x_13 == 0) +{ +return x_12; +} +else +{ +lean_object* x_14; lean_object* x_15; lean_object* x_16; +x_14 = lean_ctor_get(x_12, 0); +x_15 = lean_ctor_get(x_12, 1); +lean_inc(x_15); +lean_inc(x_14); +lean_dec(x_12); +x_16 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_16, 0, x_14); +lean_ctor_set(x_16, 1, x_15); +return x_16; +} +} +else +{ +uint8_t x_17; +x_17 = !lean_is_exclusive(x_12); +if (x_17 == 0) +{ +return x_12; +} +else +{ +lean_object* x_18; lean_object* x_19; lean_object* x_20; +x_18 = lean_ctor_get(x_12, 0); +x_19 = lean_ctor_get(x_12, 1); +lean_inc(x_19); +lean_inc(x_18); +lean_dec(x_12); +x_20 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_20, 0, x_18); +lean_ctor_set(x_20, 1, x_19); +return x_20; +} +} +} +} +lean_object* l_Lean_Meta_withLetDecl___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__16(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_Lean_Meta_withLetDecl___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__16___rarg), 10, 0); +return x_2; +} +} +static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__1___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("failed to add `below` argument to 'matcher' application"); +return x_1; +} +} +static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__1___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__1___closed__1; +x_2 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__1___closed__3() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__1___closed__2; +x_2 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__1(lean_object* x_1) { +_start: +{ +lean_object* x_2; lean_object* x_3; lean_object* x_4; +x_2 = l_Lean_indentD(x_1); +x_3 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__1___closed__3; +x_4 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_4, 0, x_3); +lean_ctor_set(x_4, 1, x_2); +return x_4; +} +} +static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__2___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__1), 1, 0); +return x_1; +} +} +static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__2___boxed__const__1() { +_start: +{ +size_t x_1; lean_object* x_2; +x_1 = 0; +x_2 = lean_box_usize(x_1); +return x_2; +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___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_object* x_12, lean_object* x_13) { +_start: +{ +lean_object* x_14; lean_object* x_15; lean_object* x_16; +x_14 = lean_alloc_closure((void*)(l_Lean_Meta_MatcherApp_addArg), 7, 2); +lean_closure_set(x_14, 0, x_1); +lean_closure_set(x_14, 1, x_2); +x_15 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__2___closed__1; +lean_inc(x_12); +lean_inc(x_11); +lean_inc(x_10); +lean_inc(x_9); +x_16 = l_Lean_Meta_mapErrorImp___rarg(x_14, x_15, x_9, x_10, x_11, x_12, x_13); +if (lean_obj_tag(x_16) == 0) +{ +lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; uint8_t x_24; +x_17 = lean_ctor_get(x_16, 0); +lean_inc(x_17); +x_18 = lean_ctor_get(x_16, 1); +lean_inc(x_18); +lean_dec(x_16); +x_19 = lean_st_ref_get(x_12, x_18); +x_20 = lean_ctor_get(x_19, 1); +lean_inc(x_20); +lean_dec(x_19); +x_21 = lean_st_ref_take(x_8, x_20); +x_22 = lean_ctor_get(x_21, 0); +lean_inc(x_22); +x_23 = lean_ctor_get(x_21, 1); +lean_inc(x_23); +lean_dec(x_21); +x_24 = !lean_is_exclusive(x_22); +if (x_24 == 0) +{ +uint8_t x_25; +x_25 = !lean_is_exclusive(x_17); +if (x_25 == 0) +{ +lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; size_t x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; lean_object* x_48; +x_26 = lean_ctor_get(x_22, 0); +x_27 = lean_ctor_get(x_17, 0); +x_28 = lean_ctor_get(x_17, 1); +x_29 = lean_ctor_get(x_17, 2); +x_30 = lean_ctor_get(x_17, 3); +x_31 = lean_ctor_get(x_17, 4); +x_32 = lean_ctor_get(x_17, 5); +x_33 = lean_ctor_get(x_17, 6); +x_34 = lean_ctor_get(x_17, 7); +x_35 = lean_ctor_get(x_17, 8); +x_36 = lean_box(0); +lean_inc(x_27); +x_37 = l_Std_RBNode_insert___at_Lean_NameSet_insert___spec__1(x_26, x_27, x_36); +lean_ctor_set(x_22, 0, x_37); +x_38 = lean_st_ref_set(x_8, x_22, x_23); +x_39 = lean_ctor_get(x_38, 1); +lean_inc(x_39); +lean_dec(x_38); +x_40 = l_Array_zip___rarg(x_34, x_33); +lean_dec(x_34); +x_41 = lean_array_get_size(x_40); +x_42 = lean_usize_of_nat(x_41); +lean_dec(x_41); +x_43 = x_40; +x_44 = lean_box_usize(x_42); +x_45 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__2___boxed__const__1; +x_46 = lean_alloc_closure((void*)(l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___boxed), 13, 7); +lean_closure_set(x_46, 0, x_3); +lean_closure_set(x_46, 1, x_4); +lean_closure_set(x_46, 2, x_5); +lean_closure_set(x_46, 3, x_6); +lean_closure_set(x_46, 4, x_44); +lean_closure_set(x_46, 5, x_45); +lean_closure_set(x_46, 6, x_43); +x_47 = x_46; +x_48 = lean_apply_6(x_47, x_8, x_9, x_10, x_11, x_12, x_39); +if (lean_obj_tag(x_48) == 0) +{ +uint8_t x_49; +x_49 = !lean_is_exclusive(x_48); +if (x_49 == 0) +{ +lean_object* x_50; lean_object* x_51; +x_50 = lean_ctor_get(x_48, 0); +lean_ctor_set(x_17, 7, x_50); +x_51 = l_Lean_Meta_MatcherApp_toExpr(x_17); +lean_ctor_set(x_48, 0, x_51); +return x_48; +} +else +{ +lean_object* x_52; lean_object* x_53; lean_object* x_54; lean_object* x_55; +x_52 = lean_ctor_get(x_48, 0); +x_53 = lean_ctor_get(x_48, 1); +lean_inc(x_53); +lean_inc(x_52); +lean_dec(x_48); +lean_ctor_set(x_17, 7, x_52); +x_54 = l_Lean_Meta_MatcherApp_toExpr(x_17); +x_55 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_55, 0, x_54); +lean_ctor_set(x_55, 1, x_53); +return x_55; +} +} +else +{ +uint8_t x_56; +lean_free_object(x_17); +lean_dec(x_35); +lean_dec(x_33); +lean_dec(x_32); +lean_dec(x_31); +lean_dec(x_30); +lean_dec(x_29); +lean_dec(x_28); +lean_dec(x_27); +x_56 = !lean_is_exclusive(x_48); +if (x_56 == 0) +{ +return x_48; +} +else +{ +lean_object* x_57; lean_object* x_58; lean_object* x_59; +x_57 = lean_ctor_get(x_48, 0); +x_58 = lean_ctor_get(x_48, 1); +lean_inc(x_58); +lean_inc(x_57); +lean_dec(x_48); +x_59 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_59, 0, x_57); +lean_ctor_set(x_59, 1, x_58); +return x_59; +} +} +} +else +{ +lean_object* x_60; lean_object* x_61; lean_object* x_62; lean_object* x_63; lean_object* x_64; lean_object* x_65; lean_object* x_66; lean_object* x_67; lean_object* x_68; lean_object* x_69; lean_object* x_70; lean_object* x_71; lean_object* x_72; lean_object* x_73; lean_object* x_74; lean_object* x_75; size_t x_76; lean_object* x_77; lean_object* x_78; lean_object* x_79; lean_object* x_80; lean_object* x_81; lean_object* x_82; +x_60 = lean_ctor_get(x_22, 0); +x_61 = lean_ctor_get(x_17, 0); +x_62 = lean_ctor_get(x_17, 1); +x_63 = lean_ctor_get(x_17, 2); +x_64 = lean_ctor_get(x_17, 3); +x_65 = lean_ctor_get(x_17, 4); +x_66 = lean_ctor_get(x_17, 5); +x_67 = lean_ctor_get(x_17, 6); +x_68 = lean_ctor_get(x_17, 7); +x_69 = lean_ctor_get(x_17, 8); +lean_inc(x_69); +lean_inc(x_68); +lean_inc(x_67); +lean_inc(x_66); +lean_inc(x_65); +lean_inc(x_64); +lean_inc(x_63); +lean_inc(x_62); +lean_inc(x_61); +lean_dec(x_17); +x_70 = lean_box(0); +lean_inc(x_61); +x_71 = l_Std_RBNode_insert___at_Lean_NameSet_insert___spec__1(x_60, x_61, x_70); +lean_ctor_set(x_22, 0, x_71); +x_72 = lean_st_ref_set(x_8, x_22, x_23); +x_73 = lean_ctor_get(x_72, 1); +lean_inc(x_73); +lean_dec(x_72); +x_74 = l_Array_zip___rarg(x_68, x_67); +lean_dec(x_68); +x_75 = lean_array_get_size(x_74); +x_76 = lean_usize_of_nat(x_75); +lean_dec(x_75); +x_77 = x_74; +x_78 = lean_box_usize(x_76); +x_79 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__2___boxed__const__1; +x_80 = lean_alloc_closure((void*)(l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___boxed), 13, 7); +lean_closure_set(x_80, 0, x_3); +lean_closure_set(x_80, 1, x_4); +lean_closure_set(x_80, 2, x_5); +lean_closure_set(x_80, 3, x_6); +lean_closure_set(x_80, 4, x_78); +lean_closure_set(x_80, 5, x_79); +lean_closure_set(x_80, 6, x_77); +x_81 = x_80; +x_82 = lean_apply_6(x_81, x_8, x_9, x_10, x_11, x_12, x_73); +if (lean_obj_tag(x_82) == 0) +{ +lean_object* x_83; lean_object* x_84; lean_object* x_85; lean_object* x_86; lean_object* x_87; lean_object* x_88; +x_83 = lean_ctor_get(x_82, 0); +lean_inc(x_83); +x_84 = lean_ctor_get(x_82, 1); +lean_inc(x_84); +if (lean_is_exclusive(x_82)) { + lean_ctor_release(x_82, 0); + lean_ctor_release(x_82, 1); + x_85 = x_82; +} else { + lean_dec_ref(x_82); + x_85 = lean_box(0); +} +x_86 = lean_alloc_ctor(0, 9, 0); +lean_ctor_set(x_86, 0, x_61); +lean_ctor_set(x_86, 1, x_62); +lean_ctor_set(x_86, 2, x_63); +lean_ctor_set(x_86, 3, x_64); +lean_ctor_set(x_86, 4, x_65); +lean_ctor_set(x_86, 5, x_66); +lean_ctor_set(x_86, 6, x_67); +lean_ctor_set(x_86, 7, x_83); +lean_ctor_set(x_86, 8, x_69); +x_87 = l_Lean_Meta_MatcherApp_toExpr(x_86); +if (lean_is_scalar(x_85)) { + x_88 = lean_alloc_ctor(0, 2, 0); +} else { + x_88 = x_85; +} +lean_ctor_set(x_88, 0, x_87); +lean_ctor_set(x_88, 1, x_84); +return x_88; +} +else +{ +lean_object* x_89; lean_object* x_90; lean_object* x_91; lean_object* x_92; +lean_dec(x_69); +lean_dec(x_67); +lean_dec(x_66); +lean_dec(x_65); +lean_dec(x_64); +lean_dec(x_63); +lean_dec(x_62); +lean_dec(x_61); +x_89 = lean_ctor_get(x_82, 0); +lean_inc(x_89); +x_90 = lean_ctor_get(x_82, 1); +lean_inc(x_90); +if (lean_is_exclusive(x_82)) { + lean_ctor_release(x_82, 0); + lean_ctor_release(x_82, 1); + x_91 = x_82; +} else { + lean_dec_ref(x_82); + x_91 = lean_box(0); +} +if (lean_is_scalar(x_91)) { + x_92 = lean_alloc_ctor(1, 2, 0); +} else { + x_92 = x_91; +} +lean_ctor_set(x_92, 0, x_89); +lean_ctor_set(x_92, 1, x_90); +return x_92; +} +} +} +else +{ +lean_object* x_93; lean_object* x_94; lean_object* x_95; lean_object* x_96; lean_object* x_97; lean_object* x_98; lean_object* x_99; lean_object* x_100; lean_object* x_101; lean_object* x_102; lean_object* x_103; lean_object* x_104; lean_object* x_105; lean_object* x_106; lean_object* x_107; lean_object* x_108; lean_object* x_109; lean_object* x_110; lean_object* x_111; size_t x_112; lean_object* x_113; lean_object* x_114; lean_object* x_115; lean_object* x_116; lean_object* x_117; lean_object* x_118; +x_93 = lean_ctor_get(x_22, 0); +x_94 = lean_ctor_get(x_22, 1); +lean_inc(x_94); +lean_inc(x_93); +lean_dec(x_22); +x_95 = lean_ctor_get(x_17, 0); +lean_inc(x_95); +x_96 = lean_ctor_get(x_17, 1); +lean_inc(x_96); +x_97 = lean_ctor_get(x_17, 2); +lean_inc(x_97); +x_98 = lean_ctor_get(x_17, 3); +lean_inc(x_98); +x_99 = lean_ctor_get(x_17, 4); +lean_inc(x_99); +x_100 = lean_ctor_get(x_17, 5); +lean_inc(x_100); +x_101 = lean_ctor_get(x_17, 6); +lean_inc(x_101); +x_102 = lean_ctor_get(x_17, 7); +lean_inc(x_102); +x_103 = lean_ctor_get(x_17, 8); +lean_inc(x_103); +if (lean_is_exclusive(x_17)) { + lean_ctor_release(x_17, 0); + lean_ctor_release(x_17, 1); + lean_ctor_release(x_17, 2); + lean_ctor_release(x_17, 3); + lean_ctor_release(x_17, 4); + lean_ctor_release(x_17, 5); + lean_ctor_release(x_17, 6); + lean_ctor_release(x_17, 7); + lean_ctor_release(x_17, 8); + x_104 = x_17; +} else { + lean_dec_ref(x_17); + x_104 = lean_box(0); +} +x_105 = lean_box(0); +lean_inc(x_95); +x_106 = l_Std_RBNode_insert___at_Lean_NameSet_insert___spec__1(x_93, x_95, x_105); +x_107 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_107, 0, x_106); +lean_ctor_set(x_107, 1, x_94); +x_108 = lean_st_ref_set(x_8, x_107, x_23); +x_109 = lean_ctor_get(x_108, 1); +lean_inc(x_109); +lean_dec(x_108); +x_110 = l_Array_zip___rarg(x_102, x_101); +lean_dec(x_102); +x_111 = lean_array_get_size(x_110); +x_112 = lean_usize_of_nat(x_111); +lean_dec(x_111); +x_113 = x_110; +x_114 = lean_box_usize(x_112); +x_115 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__2___boxed__const__1; +x_116 = lean_alloc_closure((void*)(l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___boxed), 13, 7); +lean_closure_set(x_116, 0, x_3); +lean_closure_set(x_116, 1, x_4); +lean_closure_set(x_116, 2, x_5); +lean_closure_set(x_116, 3, x_6); +lean_closure_set(x_116, 4, x_114); +lean_closure_set(x_116, 5, x_115); +lean_closure_set(x_116, 6, x_113); +x_117 = x_116; +x_118 = lean_apply_6(x_117, x_8, x_9, x_10, x_11, x_12, x_109); +if (lean_obj_tag(x_118) == 0) +{ +lean_object* x_119; lean_object* x_120; lean_object* x_121; lean_object* x_122; lean_object* x_123; lean_object* x_124; +x_119 = lean_ctor_get(x_118, 0); +lean_inc(x_119); +x_120 = lean_ctor_get(x_118, 1); +lean_inc(x_120); +if (lean_is_exclusive(x_118)) { + lean_ctor_release(x_118, 0); + lean_ctor_release(x_118, 1); + x_121 = x_118; +} else { + lean_dec_ref(x_118); + x_121 = lean_box(0); +} +if (lean_is_scalar(x_104)) { + x_122 = lean_alloc_ctor(0, 9, 0); +} else { + x_122 = x_104; +} +lean_ctor_set(x_122, 0, x_95); +lean_ctor_set(x_122, 1, x_96); +lean_ctor_set(x_122, 2, x_97); +lean_ctor_set(x_122, 3, x_98); +lean_ctor_set(x_122, 4, x_99); +lean_ctor_set(x_122, 5, x_100); +lean_ctor_set(x_122, 6, x_101); +lean_ctor_set(x_122, 7, x_119); +lean_ctor_set(x_122, 8, x_103); +x_123 = l_Lean_Meta_MatcherApp_toExpr(x_122); +if (lean_is_scalar(x_121)) { + x_124 = lean_alloc_ctor(0, 2, 0); +} else { + x_124 = x_121; +} +lean_ctor_set(x_124, 0, x_123); +lean_ctor_set(x_124, 1, x_120); +return x_124; +} +else +{ +lean_object* x_125; lean_object* x_126; lean_object* x_127; lean_object* x_128; +lean_dec(x_104); +lean_dec(x_103); +lean_dec(x_101); +lean_dec(x_100); +lean_dec(x_99); +lean_dec(x_98); +lean_dec(x_97); +lean_dec(x_96); +lean_dec(x_95); +x_125 = lean_ctor_get(x_118, 0); +lean_inc(x_125); +x_126 = lean_ctor_get(x_118, 1); +lean_inc(x_126); +if (lean_is_exclusive(x_118)) { + lean_ctor_release(x_118, 0); + lean_ctor_release(x_118, 1); + x_127 = x_118; +} else { + lean_dec_ref(x_118); + x_127 = lean_box(0); +} +if (lean_is_scalar(x_127)) { + x_128 = lean_alloc_ctor(1, 2, 0); +} else { + x_128 = x_127; +} +lean_ctor_set(x_128, 0, x_125); +lean_ctor_set(x_128, 1, x_126); +return x_128; +} +} +} +else +{ +uint8_t x_129; +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +x_129 = !lean_is_exclusive(x_16); +if (x_129 == 0) +{ +return x_16; +} +else +{ +lean_object* x_130; lean_object* x_131; lean_object* x_132; +x_130 = lean_ctor_get(x_16, 0); +x_131 = lean_ctor_get(x_16, 1); +lean_inc(x_131); +lean_inc(x_130); +lean_dec(x_16); +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; +} +} +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___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_object* x_10, lean_object* x_11) { +_start: +{ +lean_object* x_12; lean_object* x_13; +x_12 = lean_expr_instantiate1(x_1, x_5); +lean_inc(x_10); +lean_inc(x_9); +lean_inc(x_8); +lean_inc(x_7); +x_13 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop(x_2, x_3, x_4, x_12, x_6, x_7, x_8, x_9, x_10, x_11); +if (lean_obj_tag(x_13) == 0) +{ +lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; uint8_t x_18; uint8_t x_19; lean_object* x_20; +x_14 = lean_ctor_get(x_13, 0); +lean_inc(x_14); +x_15 = lean_ctor_get(x_13, 1); +lean_inc(x_15); +lean_dec(x_13); +x_16 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__4; +x_17 = lean_array_push(x_16, x_5); +x_18 = 0; +x_19 = 1; +x_20 = l_Lean_Meta_mkLambdaFVars(x_17, x_14, x_18, x_19, x_7, x_8, x_9, x_10, x_15); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +return x_20; +} +else +{ +uint8_t x_21; +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_5); +x_21 = !lean_is_exclusive(x_13); +if (x_21 == 0) +{ +return x_13; +} +else +{ +lean_object* x_22; lean_object* x_23; lean_object* x_24; +x_22 = lean_ctor_get(x_13, 0); +x_23 = lean_ctor_get(x_13, 1); +lean_inc(x_23); +lean_inc(x_22); +lean_dec(x_13); +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; +} +} +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___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, lean_object* x_11) { +_start: +{ +lean_object* x_12; lean_object* x_13; +x_12 = lean_expr_instantiate1(x_1, x_5); +lean_inc(x_10); +lean_inc(x_9); +lean_inc(x_8); +lean_inc(x_7); +x_13 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop(x_2, x_3, x_4, x_12, x_6, x_7, x_8, x_9, x_10, x_11); +if (lean_obj_tag(x_13) == 0) +{ +lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; uint8_t x_18; uint8_t x_19; lean_object* x_20; +x_14 = lean_ctor_get(x_13, 0); +lean_inc(x_14); +x_15 = lean_ctor_get(x_13, 1); +lean_inc(x_15); +lean_dec(x_13); +x_16 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__4; +x_17 = lean_array_push(x_16, x_5); +x_18 = 0; +x_19 = 1; +x_20 = l_Lean_Meta_mkForallFVars(x_17, x_14, x_18, x_19, x_7, x_8, x_9, x_10, x_15); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +return x_20; +} +else +{ +uint8_t x_21; +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_5); +x_21 = !lean_is_exclusive(x_13); +if (x_21 == 0) +{ +return x_13; +} +else +{ +lean_object* x_22; lean_object* x_23; lean_object* x_24; +x_22 = lean_ctor_get(x_13, 0); +x_23 = lean_ctor_get(x_13, 1); +lean_inc(x_23); +lean_inc(x_22); +lean_dec(x_13); +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; +} +} +} +} +static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("below before matcherApp.addArg: "); +return x_1; +} +} +static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___closed__1; +x_2 = l_Lean_stringToMessageData(x_1); +return x_2; +} +} +static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___closed__3() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string(" : "); +return x_1; +} +} +static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___closed__4() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___closed__3; +x_2 = l_Lean_stringToMessageData(x_1); +return x_2; +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop(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: +{ +switch (lean_obj_tag(x_4)) { +case 5: +{ +lean_object* x_11; lean_object* x_12; +lean_inc(x_4); +x_11 = l_Lean_Meta_matchMatcherApp_x3f___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__1(x_4, x_5, x_6, x_7, x_8, x_9, x_10); +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_18; lean_object* x_19; lean_object* x_20; +x_13 = lean_ctor_get(x_11, 1); +lean_inc(x_13); +lean_dec(x_11); +x_14 = lean_unsigned_to_nat(0u); +x_15 = l_Lean_Expr_getAppNumArgsAux(x_4, x_14); +x_16 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__4___closed__1; +lean_inc(x_15); +x_17 = lean_mk_array(x_15, x_16); +x_18 = lean_unsigned_to_nat(1u); +x_19 = lean_nat_sub(x_15, x_18); +lean_dec(x_15); +lean_inc(x_4); +x_20 = l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7(x_1, x_2, x_3, x_4, x_4, x_17, x_19, x_5, x_6, x_7, x_8, x_9, x_13); +return x_20; +} +else +{ +lean_object* x_21; lean_object* x_22; uint8_t x_23; +x_21 = lean_ctor_get(x_11, 1); +lean_inc(x_21); +lean_dec(x_11); +x_22 = lean_ctor_get(x_12, 0); +lean_inc(x_22); +lean_dec(x_12); +lean_inc(x_4); +lean_inc(x_1); +x_23 = l_Lean_Elab_Structural_recArgHasLooseBVarsAt(x_1, x_2, x_4); +if (x_23 == 0) +{ +lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; +lean_dec(x_22); +x_24 = lean_unsigned_to_nat(0u); +x_25 = l_Lean_Expr_getAppNumArgsAux(x_4, x_24); +x_26 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__4___closed__1; +lean_inc(x_25); +x_27 = lean_mk_array(x_25, x_26); +x_28 = lean_unsigned_to_nat(1u); +x_29 = lean_nat_sub(x_25, x_28); +lean_dec(x_25); +lean_inc(x_4); +x_30 = l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__10(x_1, x_2, x_3, x_4, x_4, x_27, x_29, x_5, x_6, x_7, x_8, x_9, x_21); +return x_30; +} +else +{ +lean_object* x_31; uint8_t x_32; lean_object* x_33; lean_object* x_57; lean_object* x_58; lean_object* x_59; uint8_t x_60; +x_31 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__6; +x_57 = lean_st_ref_get(x_9, x_21); +x_58 = lean_ctor_get(x_57, 0); +lean_inc(x_58); +x_59 = lean_ctor_get(x_58, 3); +lean_inc(x_59); +lean_dec(x_58); +x_60 = lean_ctor_get_uint8(x_59, sizeof(void*)*1); +lean_dec(x_59); +if (x_60 == 0) +{ +lean_object* x_61; uint8_t x_62; +x_61 = lean_ctor_get(x_57, 1); +lean_inc(x_61); +lean_dec(x_57); +x_62 = 0; +x_32 = x_62; +x_33 = x_61; +goto block_56; +} +else +{ +lean_object* x_63; lean_object* x_64; lean_object* x_65; lean_object* x_66; uint8_t x_67; +x_63 = lean_ctor_get(x_57, 1); +lean_inc(x_63); +lean_dec(x_57); +x_64 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__12(x_31, x_5, x_6, x_7, x_8, x_9, x_63); +x_65 = lean_ctor_get(x_64, 0); +lean_inc(x_65); +x_66 = lean_ctor_get(x_64, 1); +lean_inc(x_66); +lean_dec(x_64); +x_67 = lean_unbox(x_65); +lean_dec(x_65); +x_32 = x_67; +x_33 = x_66; +goto block_56; +} +block_56: +{ +if (x_32 == 0) +{ +lean_object* x_34; lean_object* x_35; +x_34 = lean_box(0); +x_35 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__2(x_22, x_3, x_1, x_2, x_4, x_31, x_34, x_5, x_6, x_7, x_8, x_9, x_33); +return x_35; +} +else +{ +lean_object* x_36; +lean_inc(x_9); +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_6); +lean_inc(x_3); +x_36 = lean_infer_type(x_3, x_6, x_7, x_8, x_9, x_33); +if (lean_obj_tag(x_36) == 0) +{ +lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_object* x_51; +x_37 = lean_ctor_get(x_36, 0); +lean_inc(x_37); +x_38 = lean_ctor_get(x_36, 1); +lean_inc(x_38); +lean_dec(x_36); +lean_inc(x_3); +x_39 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_39, 0, x_3); +x_40 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___closed__2; +x_41 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_41, 0, x_40); +lean_ctor_set(x_41, 1, x_39); +x_42 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___closed__4; +x_43 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_43, 0, x_41); +lean_ctor_set(x_43, 1, x_42); +x_44 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_44, 0, x_37); +x_45 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_45, 0, x_43); +lean_ctor_set(x_45, 1, x_44); +x_46 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__12; +x_47 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_47, 0, x_45); +lean_ctor_set(x_47, 1, x_46); +x_48 = l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11(x_31, x_47, x_5, x_6, x_7, x_8, x_9, x_38); +x_49 = lean_ctor_get(x_48, 0); +lean_inc(x_49); +x_50 = lean_ctor_get(x_48, 1); +lean_inc(x_50); +lean_dec(x_48); +x_51 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__2(x_22, x_3, x_1, x_2, x_4, x_31, x_49, x_5, x_6, x_7, x_8, x_9, x_50); +lean_dec(x_49); +return x_51; +} +else +{ +uint8_t x_52; +lean_dec(x_22); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_52 = !lean_is_exclusive(x_36); +if (x_52 == 0) +{ +return x_36; +} +else +{ +lean_object* x_53; lean_object* x_54; lean_object* x_55; +x_53 = lean_ctor_get(x_36, 0); +x_54 = lean_ctor_get(x_36, 1); +lean_inc(x_54); +lean_inc(x_53); +lean_dec(x_36); +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; +} +} +} +} +} +} +} +case 6: +{ +lean_object* x_68; lean_object* x_69; lean_object* x_70; uint64_t x_71; lean_object* x_72; +x_68 = lean_ctor_get(x_4, 0); +lean_inc(x_68); +x_69 = lean_ctor_get(x_4, 1); +lean_inc(x_69); +x_70 = lean_ctor_get(x_4, 2); +lean_inc(x_70); +x_71 = lean_ctor_get_uint64(x_4, sizeof(void*)*3); +lean_dec(x_4); +lean_inc(x_9); +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_6); +lean_inc(x_5); +lean_inc(x_3); +lean_inc(x_2); +lean_inc(x_1); +x_72 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop(x_1, x_2, x_3, x_69, x_5, x_6, x_7, x_8, x_9, x_10); +if (lean_obj_tag(x_72) == 0) +{ +lean_object* x_73; lean_object* x_74; uint8_t x_75; lean_object* x_76; lean_object* x_77; +x_73 = lean_ctor_get(x_72, 0); +lean_inc(x_73); +x_74 = lean_ctor_get(x_72, 1); +lean_inc(x_74); +lean_dec(x_72); +x_75 = (uint8_t)((x_71 << 24) >> 61); +x_76 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__3___boxed), 11, 4); +lean_closure_set(x_76, 0, x_70); +lean_closure_set(x_76, 1, x_1); +lean_closure_set(x_76, 2, x_2); +lean_closure_set(x_76, 3, x_3); +x_77 = l_Lean_Meta_withLocalDecl___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__15___rarg(x_68, x_75, x_73, x_76, x_5, x_6, x_7, x_8, x_9, x_74); +return x_77; +} +else +{ +uint8_t x_78; +lean_dec(x_70); +lean_dec(x_68); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_78 = !lean_is_exclusive(x_72); +if (x_78 == 0) +{ +return x_72; +} +else +{ +lean_object* x_79; lean_object* x_80; lean_object* x_81; +x_79 = lean_ctor_get(x_72, 0); +x_80 = lean_ctor_get(x_72, 1); +lean_inc(x_80); +lean_inc(x_79); +lean_dec(x_72); +x_81 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_81, 0, x_79); +lean_ctor_set(x_81, 1, x_80); +return x_81; +} +} +} +case 7: +{ +lean_object* x_82; lean_object* x_83; lean_object* x_84; uint64_t x_85; lean_object* x_86; +x_82 = lean_ctor_get(x_4, 0); +lean_inc(x_82); +x_83 = lean_ctor_get(x_4, 1); +lean_inc(x_83); +x_84 = lean_ctor_get(x_4, 2); +lean_inc(x_84); +x_85 = lean_ctor_get_uint64(x_4, sizeof(void*)*3); +lean_dec(x_4); +lean_inc(x_9); +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_6); +lean_inc(x_5); +lean_inc(x_3); +lean_inc(x_2); +lean_inc(x_1); +x_86 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop(x_1, x_2, x_3, x_83, x_5, x_6, x_7, x_8, x_9, x_10); +if (lean_obj_tag(x_86) == 0) +{ +lean_object* x_87; lean_object* x_88; uint8_t x_89; lean_object* x_90; lean_object* x_91; +x_87 = lean_ctor_get(x_86, 0); +lean_inc(x_87); +x_88 = lean_ctor_get(x_86, 1); +lean_inc(x_88); +lean_dec(x_86); +x_89 = (uint8_t)((x_85 << 24) >> 61); +x_90 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__4___boxed), 11, 4); +lean_closure_set(x_90, 0, x_84); +lean_closure_set(x_90, 1, x_1); +lean_closure_set(x_90, 2, x_2); +lean_closure_set(x_90, 3, x_3); +x_91 = l_Lean_Meta_withLocalDecl___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__15___rarg(x_82, x_89, x_87, x_90, x_5, x_6, x_7, x_8, x_9, x_88); +return x_91; +} +else +{ +uint8_t x_92; +lean_dec(x_84); +lean_dec(x_82); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_92 = !lean_is_exclusive(x_86); +if (x_92 == 0) +{ +return x_86; +} +else +{ +lean_object* x_93; lean_object* x_94; lean_object* x_95; +x_93 = lean_ctor_get(x_86, 0); +x_94 = lean_ctor_get(x_86, 1); +lean_inc(x_94); +lean_inc(x_93); +lean_dec(x_86); +x_95 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_95, 0, x_93); +lean_ctor_set(x_95, 1, x_94); +return x_95; +} +} +} +case 8: +{ +lean_object* x_96; lean_object* x_97; lean_object* x_98; lean_object* x_99; lean_object* x_100; +x_96 = lean_ctor_get(x_4, 0); +lean_inc(x_96); +x_97 = lean_ctor_get(x_4, 1); +lean_inc(x_97); +x_98 = lean_ctor_get(x_4, 2); +lean_inc(x_98); +x_99 = lean_ctor_get(x_4, 3); +lean_inc(x_99); +lean_dec(x_4); +lean_inc(x_9); +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_6); +lean_inc(x_5); +lean_inc(x_3); +lean_inc(x_2); +lean_inc(x_1); +x_100 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop(x_1, x_2, x_3, x_97, x_5, x_6, x_7, x_8, x_9, x_10); +if (lean_obj_tag(x_100) == 0) +{ +lean_object* x_101; lean_object* x_102; lean_object* x_103; +x_101 = lean_ctor_get(x_100, 0); +lean_inc(x_101); +x_102 = lean_ctor_get(x_100, 1); +lean_inc(x_102); +lean_dec(x_100); +lean_inc(x_9); +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_6); +lean_inc(x_5); +lean_inc(x_3); +lean_inc(x_2); +lean_inc(x_1); +x_103 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop(x_1, x_2, x_3, x_98, x_5, x_6, x_7, x_8, x_9, x_102); +if (lean_obj_tag(x_103) == 0) +{ +lean_object* x_104; lean_object* x_105; lean_object* x_106; lean_object* x_107; +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 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__3___boxed), 11, 4); +lean_closure_set(x_106, 0, x_99); +lean_closure_set(x_106, 1, x_1); +lean_closure_set(x_106, 2, x_2); +lean_closure_set(x_106, 3, x_3); +x_107 = l_Lean_Meta_withLetDecl___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__16___rarg(x_96, x_101, x_104, x_106, x_5, x_6, x_7, x_8, x_9, x_105); +return x_107; +} +else +{ +uint8_t x_108; +lean_dec(x_101); +lean_dec(x_99); +lean_dec(x_96); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_108 = !lean_is_exclusive(x_103); +if (x_108 == 0) +{ +return x_103; +} +else +{ +lean_object* x_109; lean_object* x_110; lean_object* x_111; +x_109 = lean_ctor_get(x_103, 0); +x_110 = lean_ctor_get(x_103, 1); +lean_inc(x_110); +lean_inc(x_109); +lean_dec(x_103); +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_99); +lean_dec(x_98); +lean_dec(x_96); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_112 = !lean_is_exclusive(x_100); +if (x_112 == 0) +{ +return x_100; +} +else +{ +lean_object* x_113; lean_object* x_114; lean_object* x_115; +x_113 = lean_ctor_get(x_100, 0); +x_114 = lean_ctor_get(x_100, 1); +lean_inc(x_114); +lean_inc(x_113); +lean_dec(x_100); +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; +} +} +} +case 10: +{ +lean_object* x_116; lean_object* x_117; lean_object* x_118; +x_116 = lean_ctor_get(x_4, 0); +lean_inc(x_116); +x_117 = lean_ctor_get(x_4, 1); +lean_inc(x_117); +lean_dec(x_4); +x_118 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop(x_1, x_2, x_3, x_117, x_5, x_6, x_7, x_8, x_9, x_10); +if (lean_obj_tag(x_118) == 0) +{ +uint8_t x_119; +x_119 = !lean_is_exclusive(x_118); +if (x_119 == 0) +{ +lean_object* x_120; lean_object* x_121; +x_120 = lean_ctor_get(x_118, 0); +x_121 = l_Lean_mkMData(x_116, x_120); +lean_ctor_set(x_118, 0, x_121); +return x_118; +} +else +{ +lean_object* x_122; lean_object* x_123; lean_object* x_124; lean_object* x_125; +x_122 = lean_ctor_get(x_118, 0); +x_123 = lean_ctor_get(x_118, 1); +lean_inc(x_123); +lean_inc(x_122); +lean_dec(x_118); +x_124 = l_Lean_mkMData(x_116, x_122); +x_125 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_125, 0, x_124); +lean_ctor_set(x_125, 1, x_123); +return x_125; +} +} +else +{ +uint8_t x_126; +lean_dec(x_116); +x_126 = !lean_is_exclusive(x_118); +if (x_126 == 0) +{ +return x_118; +} +else +{ +lean_object* x_127; lean_object* x_128; lean_object* x_129; +x_127 = lean_ctor_get(x_118, 0); +x_128 = lean_ctor_get(x_118, 1); +lean_inc(x_128); +lean_inc(x_127); +lean_dec(x_118); +x_129 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_129, 0, x_127); +lean_ctor_set(x_129, 1, x_128); +return x_129; +} +} +} +case 11: +{ +lean_object* x_130; lean_object* x_131; lean_object* x_132; lean_object* x_133; +x_130 = lean_ctor_get(x_4, 0); +lean_inc(x_130); +x_131 = lean_ctor_get(x_4, 1); +lean_inc(x_131); +x_132 = lean_ctor_get(x_4, 2); +lean_inc(x_132); +lean_dec(x_4); +x_133 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop(x_1, x_2, x_3, x_132, x_5, x_6, x_7, x_8, x_9, x_10); +if (lean_obj_tag(x_133) == 0) +{ +uint8_t x_134; +x_134 = !lean_is_exclusive(x_133); +if (x_134 == 0) +{ +lean_object* x_135; lean_object* x_136; +x_135 = lean_ctor_get(x_133, 0); +x_136 = l_Lean_mkProj(x_130, x_131, x_135); +lean_ctor_set(x_133, 0, x_136); +return x_133; +} +else +{ +lean_object* x_137; lean_object* x_138; lean_object* x_139; lean_object* x_140; +x_137 = lean_ctor_get(x_133, 0); +x_138 = lean_ctor_get(x_133, 1); +lean_inc(x_138); +lean_inc(x_137); +lean_dec(x_133); +x_139 = l_Lean_mkProj(x_130, x_131, x_137); +x_140 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_140, 0, x_139); +lean_ctor_set(x_140, 1, x_138); +return x_140; +} +} +else +{ +uint8_t x_141; +lean_dec(x_131); +lean_dec(x_130); +x_141 = !lean_is_exclusive(x_133); +if (x_141 == 0) +{ +return x_133; +} +else +{ +lean_object* x_142; lean_object* x_143; lean_object* x_144; +x_142 = lean_ctor_get(x_133, 0); +x_143 = lean_ctor_get(x_133, 1); +lean_inc(x_143); +lean_inc(x_142); +lean_dec(x_133); +x_144 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_144, 0, x_142); +lean_ctor_set(x_144, 1, x_143); +return x_144; +} +} +} +default: +{ +lean_object* x_145; +lean_dec(x_5); +lean_dec(x_3); +lean_dec(x_2); +x_145 = l_Lean_Elab_Structural_ensureNoRecFn(x_1, x_4, x_6, x_7, x_8, x_9, x_10); +return x_145; +} +} +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps(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_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10); +return x_11; +} +} +lean_object* l_Lean_Meta_getMatcherInfo_x3f___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__2___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { +_start: +{ +lean_object* x_8; +x_8 = l_Lean_Meta_getMatcherInfo_x3f___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__2(x_1, x_2, x_3, x_4, x_5, x_6, x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +return x_8; +} +} +lean_object* l_Lean_Meta_matchMatcherApp_x3f___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___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) { +_start: +{ +lean_object* x_8; +x_8 = l_Lean_Meta_matchMatcherApp_x3f___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__1(x_1, x_2, x_3, x_4, x_5, x_6, x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +return x_8; +} +} +lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___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) { +_start: +{ +size_t x_13; size_t x_14; lean_object* x_15; +x_13 = lean_unbox_usize(x_4); +lean_dec(x_4); +x_14 = lean_unbox_usize(x_5); +lean_dec(x_5); +x_15 = l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__3(x_1, x_2, x_3, x_13, x_14, x_6, x_7, x_8, x_9, x_10, x_11, x_12); +return x_15; +} +} +lean_object* l_Std_Range_forIn_loop___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__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, lean_object* x_11, lean_object* x_12, lean_object* x_13, lean_object* x_14, lean_object* x_15) { +_start: +{ +lean_object* x_16; +x_16 = l_Std_Range_forIn_loop___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__4(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_12, x_13, x_14, x_15); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +return x_16; +} +} +lean_object* l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__5___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_throwError___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__5(x_1, x_2, x_3, x_4, x_5, x_6, x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +return x_8; +} +} +lean_object* l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__6___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_throwError___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__6(x_1, x_2, x_3, x_4, x_5, x_6, x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +return x_8; +} +} +lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___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, lean_object* x_12, lean_object* x_13) { +_start: +{ +lean_object* x_14; +x_14 = l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___lambda__1(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_12, x_13); +lean_dec(x_6); +return x_14; +} +} +lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__8___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) { +_start: +{ +size_t x_13; size_t x_14; lean_object* x_15; +x_13 = lean_unbox_usize(x_4); +lean_dec(x_4); +x_14 = lean_unbox_usize(x_5); +lean_dec(x_5); +x_15 = l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__8(x_1, x_2, x_3, x_13, x_14, x_6, x_7, x_8, x_9, x_10, x_11, x_12); +return x_15; +} +} +lean_object* l_Std_Range_forIn_loop___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__9___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: +{ +lean_object* x_16; +x_16 = l_Std_Range_forIn_loop___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__9(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_12, x_13, x_14, x_15); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +return x_16; +} +} +lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__10___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, lean_object* x_12, lean_object* x_13) { +_start: +{ +lean_object* x_14; +x_14 = l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__10___lambda__1(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_12, x_13); +lean_dec(x_6); +return x_14; +} +} +lean_object* l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___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_addTrace___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11(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); +return x_9; +} +} +lean_object* l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__12___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___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__12(x_1, x_2, x_3, x_4, x_5, x_6, x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +return x_8; +} +} +lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___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, lean_object* x_12) { +_start: +{ +lean_object* x_13; +x_13 = l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__1(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_12); +lean_dec(x_6); +lean_dec(x_1); +return x_13; +} +} +lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___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_object* x_12, lean_object* x_13, lean_object* x_14) { +_start: +{ +lean_object* x_15; +x_15 = l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___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, x_13, x_14); +lean_dec(x_1); +return x_15; +} +} +lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___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: +{ +size_t x_14; size_t x_15; lean_object* x_16; +x_14 = lean_unbox_usize(x_5); +lean_dec(x_5); +x_15 = lean_unbox_usize(x_6); +lean_dec(x_6); +x_16 = l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14(x_1, x_2, x_3, x_4, x_14, x_15, x_7, x_8, x_9, x_10, x_11, x_12, x_13); +return x_16; +} +} +lean_object* l_Lean_Meta_withLocalDecl___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__15___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10) { +_start: +{ +uint8_t x_11; lean_object* x_12; +x_11 = lean_unbox(x_2); +lean_dec(x_2); +x_12 = l_Lean_Meta_withLocalDecl___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__15___rarg(x_1, x_11, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10); +return x_12; +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___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_object* x_12, lean_object* x_13) { +_start: +{ +lean_object* x_14; +x_14 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___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, x_13); +lean_dec(x_7); +return x_14; +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__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) { +_start: +{ +lean_object* x_12; +x_12 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__3(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_1); +return x_12; +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___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, lean_object* x_11) { +_start: +{ +lean_object* x_12; +x_12 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__4(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_1); +return x_12; +} +} +lean_object* l_Lean_Meta_forallBoundedTelescope___at_Lean_Elab_Structural_mkBRecOn___spec__1___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9) { +_start: +{ +lean_object* x_10; lean_object* x_11; +x_10 = lean_alloc_closure((void*)(l_Lean_Meta_lambdaTelescope___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__13___rarg___lambda__1), 9, 2); +lean_closure_set(x_10, 0, x_3); +lean_closure_set(x_10, 1, x_4); +x_11 = l___private_Lean_Meta_Basic_0__Lean_Meta_forallTelescopeReducingAux___rarg(x_1, x_2, x_10, x_5, x_6, x_7, x_8, x_9); +if (lean_obj_tag(x_11) == 0) +{ +uint8_t x_12; +x_12 = !lean_is_exclusive(x_11); +if (x_12 == 0) +{ +return x_11; +} +else +{ +lean_object* x_13; lean_object* x_14; lean_object* x_15; +x_13 = lean_ctor_get(x_11, 0); +x_14 = lean_ctor_get(x_11, 1); +lean_inc(x_14); +lean_inc(x_13); +lean_dec(x_11); +x_15 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_15, 0, x_13); +lean_ctor_set(x_15, 1, x_14); +return x_15; +} +} +else +{ +uint8_t x_16; +x_16 = !lean_is_exclusive(x_11); +if (x_16 == 0) +{ +return x_11; +} +else +{ +lean_object* x_17; lean_object* x_18; lean_object* 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_alloc_ctor(1, 2, 0); +lean_ctor_set(x_19, 0, x_17); +lean_ctor_set(x_19, 1, x_18); +return x_19; +} +} +} +} +lean_object* l_Lean_Meta_forallBoundedTelescope___at_Lean_Elab_Structural_mkBRecOn___spec__1(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_Lean_Meta_forallBoundedTelescope___at_Lean_Elab_Structural_mkBRecOn___spec__1___rarg), 9, 0); +return x_2; +} +} +lean_object* l_Array_foldlMUnsafe_fold___at_Lean_Elab_Structural_mkBRecOn___spec__2(lean_object* x_1, lean_object* x_2, lean_object* x_3, size_t x_4, size_t x_5, lean_object* x_6) { +_start: +{ +uint8_t x_7; +x_7 = x_4 == x_5; +if (x_7 == 0) +{ +lean_object* x_8; uint8_t x_9; size_t x_10; size_t x_11; +x_8 = lean_array_uget(x_3, x_4); +x_9 = lean_expr_eqv(x_8, x_2); +x_10 = 1; +x_11 = x_4 + x_10; +if (x_9 == 0) +{ +lean_object* x_12; uint8_t x_13; +x_12 = lean_ctor_get(x_1, 7); +x_13 = l_Array_contains___at_Lean_Meta_CheckAssignment_checkFVar___spec__1(x_12, x_8); +if (x_13 == 0) +{ +lean_object* x_14; +x_14 = lean_array_push(x_6, x_8); +x_4 = x_11; +x_6 = x_14; +goto _start; +} +else +{ +lean_dec(x_8); +x_4 = x_11; +goto _start; +} +} +else +{ +lean_dec(x_8); +x_4 = x_11; +goto _start; +} +} +else +{ +return x_6; +} +} +} +static lean_object* _init_l_Lean_Elab_Structural_mkBRecOn___lambda__1___closed__1() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = lean_unsigned_to_nat(2u); +x_2 = lean_mk_empty_array_with_capacity(x_1); +return x_2; +} +} +lean_object* l_Lean_Elab_Structural_mkBRecOn___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, lean_object* x_12, lean_object* x_13, lean_object* x_14, lean_object* x_15) { +_start: +{ +lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; +x_16 = l_Lean_instInhabitedExpr; +x_17 = lean_unsigned_to_nat(0u); +x_18 = lean_array_get(x_16, x_8, x_17); +lean_inc(x_14); +lean_inc(x_13); +lean_inc(x_12); +lean_inc(x_11); +lean_inc(x_18); +x_19 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop(x_1, x_2, x_18, x_3, x_10, x_11, x_12, x_13, x_14, x_15); +if (lean_obj_tag(x_19) == 0) +{ +lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; uint8_t x_27; uint8_t x_28; lean_object* x_29; +x_20 = lean_ctor_get(x_19, 0); +lean_inc(x_20); +x_21 = lean_ctor_get(x_19, 1); +lean_inc(x_21); +lean_dec(x_19); +x_22 = l_Lean_Elab_Structural_mkBRecOn___lambda__1___closed__1; +x_23 = lean_array_push(x_22, x_4); +x_24 = lean_array_push(x_23, x_18); +x_25 = l_Array_append___rarg(x_5, x_24); +lean_inc(x_6); +x_26 = l_Array_append___rarg(x_25, x_6); +x_27 = 0; +x_28 = 1; +x_29 = l_Lean_Meta_mkLambdaFVars(x_26, x_20, x_27, x_28, x_11, x_12, x_13, x_14, x_21); +lean_dec(x_14); +lean_dec(x_13); +lean_dec(x_12); +if (lean_obj_tag(x_29) == 0) +{ +uint8_t x_30; +x_30 = !lean_is_exclusive(x_29); +if (x_30 == 0) +{ +lean_object* x_31; lean_object* x_32; lean_object* x_33; +x_31 = lean_ctor_get(x_29, 0); +x_32 = l_Lean_mkApp(x_7, x_31); +x_33 = l_Lean_mkAppN(x_32, x_6); +lean_ctor_set(x_29, 0, x_33); +return x_29; +} +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_29, 0); +x_35 = lean_ctor_get(x_29, 1); +lean_inc(x_35); +lean_inc(x_34); +lean_dec(x_29); +x_36 = l_Lean_mkApp(x_7, x_34); +x_37 = l_Lean_mkAppN(x_36, x_6); +x_38 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_38, 0, x_37); +lean_ctor_set(x_38, 1, x_35); +return x_38; +} +} +else +{ +uint8_t x_39; +lean_dec(x_7); +lean_dec(x_6); +x_39 = !lean_is_exclusive(x_29); +if (x_39 == 0) +{ +return x_29; +} +else +{ +lean_object* x_40; lean_object* x_41; lean_object* x_42; +x_40 = lean_ctor_get(x_29, 0); +x_41 = lean_ctor_get(x_29, 1); +lean_inc(x_41); +lean_inc(x_40); +lean_dec(x_29); +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 +{ +uint8_t x_43; +lean_dec(x_18); +lean_dec(x_14); +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +x_43 = !lean_is_exclusive(x_19); +if (x_43 == 0) +{ +return x_19; +} +else +{ +lean_object* x_44; lean_object* x_45; lean_object* x_46; +x_44 = lean_ctor_get(x_19, 0); +x_45 = lean_ctor_get(x_19, 1); +lean_inc(x_45); +lean_inc(x_44); +lean_dec(x_19); +x_46 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_46, 0, x_44); +lean_ctor_set(x_46, 1, x_45); +return x_46; +} +} +} +} +lean_object* l_Lean_Elab_Structural_mkBRecOn___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_object* x_12, lean_object* x_13, lean_object* x_14, lean_object* x_15, lean_object* x_16) { +_start: +{ +lean_object* x_17; lean_object* x_18; +x_17 = lean_unsigned_to_nat(0u); +lean_inc(x_15); +lean_inc(x_14); +lean_inc(x_13); +lean_inc(x_12); +x_18 = l___private_Lean_Meta_Basic_0__Lean_Meta_instantiateForallAux(x_1, x_17, x_2, x_12, x_13, x_14, x_15, x_16); +if (lean_obj_tag(x_18) == 0) +{ +lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; +x_19 = lean_ctor_get(x_18, 0); +lean_inc(x_19); +x_20 = lean_ctor_get(x_18, 1); +lean_inc(x_20); +lean_dec(x_18); +x_21 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__4; +lean_inc(x_3); +x_22 = lean_array_push(x_21, x_3); +lean_inc(x_15); +lean_inc(x_14); +lean_inc(x_13); +lean_inc(x_12); +x_23 = l___private_Lean_Meta_Basic_0__Lean_Meta_instantiateForallAux(x_22, x_17, x_19, x_12, x_13, x_14, x_15, x_20); +lean_dec(x_22); +if (lean_obj_tag(x_23) == 0) +{ +lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; +x_24 = lean_ctor_get(x_23, 0); +lean_inc(x_24); +x_25 = lean_ctor_get(x_23, 1); +lean_inc(x_25); +lean_dec(x_23); +x_26 = lean_alloc_closure((void*)(l_Lean_Elab_Structural_mkBRecOn___lambda__1___boxed), 15, 7); +lean_closure_set(x_26, 0, x_4); +lean_closure_set(x_26, 1, x_5); +lean_closure_set(x_26, 2, x_6); +lean_closure_set(x_26, 3, x_3); +lean_closure_set(x_26, 4, x_1); +lean_closure_set(x_26, 5, x_7); +lean_closure_set(x_26, 6, x_8); +x_27 = l_Lean_Meta_forallBoundedTelescope___at_Lean_Elab_Structural_mkBRecOn___spec__1___rarg(x_24, x_9, x_26, x_11, x_12, x_13, x_14, x_15, x_25); +return x_27; +} +else +{ +uint8_t x_28; +lean_dec(x_15); +lean_dec(x_14); +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_11); +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_23); +if (x_28 == 0) +{ +return x_23; +} +else +{ +lean_object* x_29; lean_object* x_30; lean_object* x_31; +x_29 = lean_ctor_get(x_23, 0); +x_30 = lean_ctor_get(x_23, 1); +lean_inc(x_30); +lean_inc(x_29); +lean_dec(x_23); +x_31 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_31, 0, x_29); +lean_ctor_set(x_31, 1, x_30); +return x_31; +} +} +} +else +{ +uint8_t x_32; +lean_dec(x_15); +lean_dec(x_14); +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_11); +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_32 = !lean_is_exclusive(x_18); +if (x_32 == 0) +{ +return x_18; +} +else +{ +lean_object* x_33; lean_object* x_34; lean_object* x_35; +x_33 = lean_ctor_get(x_18, 0); +x_34 = lean_ctor_get(x_18, 1); +lean_inc(x_34); +lean_inc(x_33); +lean_dec(x_18); +x_35 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_35, 0, x_33); +lean_ctor_set(x_35, 1, x_34); +return x_35; +} +} +} +} +static lean_object* _init_l_Lean_Elab_Structural_mkBRecOn___lambda__3___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("FType: "); +return x_1; +} +} +static lean_object* _init_l_Lean_Elab_Structural_mkBRecOn___lambda__3___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Elab_Structural_mkBRecOn___lambda__3___closed__1; +x_2 = l_Lean_stringToMessageData(x_1); +return x_2; +} +} +lean_object* l_Lean_Elab_Structural_mkBRecOn___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_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, lean_object* x_17) { +_start: +{ +lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; +lean_dec(x_11); +x_18 = l_Lean_instInhabitedExpr; +x_19 = lean_unsigned_to_nat(0u); +x_20 = lean_array_get(x_18, x_10, x_19); +lean_dec(x_10); +lean_inc(x_16); +lean_inc(x_15); +lean_inc(x_14); +lean_inc(x_13); +x_21 = lean_infer_type(x_20, x_13, x_14, x_15, x_16, x_17); +if (lean_obj_tag(x_21) == 0) +{ +lean_object* x_22; lean_object* x_23; uint8_t x_24; lean_object* x_25; lean_object* x_38; lean_object* x_39; lean_object* x_40; uint8_t x_41; +x_22 = lean_ctor_get(x_21, 0); +lean_inc(x_22); +x_23 = lean_ctor_get(x_21, 1); +lean_inc(x_23); +lean_dec(x_21); +x_38 = lean_st_ref_get(x_16, x_23); +x_39 = lean_ctor_get(x_38, 0); +lean_inc(x_39); +x_40 = lean_ctor_get(x_39, 3); +lean_inc(x_40); +lean_dec(x_39); +x_41 = lean_ctor_get_uint8(x_40, sizeof(void*)*1); +lean_dec(x_40); +if (x_41 == 0) +{ +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 = 0; +x_24 = x_43; +x_25 = x_42; +goto block_37; +} +else +{ +lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; uint8_t x_48; +x_44 = lean_ctor_get(x_38, 1); +lean_inc(x_44); +lean_dec(x_38); +lean_inc(x_9); +x_45 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__12(x_9, x_12, x_13, x_14, x_15, x_16, x_44); +x_46 = lean_ctor_get(x_45, 0); +lean_inc(x_46); +x_47 = lean_ctor_get(x_45, 1); +lean_inc(x_47); +lean_dec(x_45); +x_48 = lean_unbox(x_46); +lean_dec(x_46); +x_24 = x_48; +x_25 = x_47; +goto block_37; +} +block_37: +{ +if (x_24 == 0) +{ +lean_object* x_26; lean_object* x_27; +lean_dec(x_9); +x_26 = lean_box(0); +x_27 = l_Lean_Elab_Structural_mkBRecOn___lambda__2(x_1, x_22, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_26, x_12, x_13, x_14, x_15, x_16, x_25); +return x_27; +} +else +{ +lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; +lean_inc(x_22); +x_28 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_28, 0, x_22); +x_29 = l_Lean_Elab_Structural_mkBRecOn___lambda__3___closed__2; +x_30 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_30, 0, x_29); +lean_ctor_set(x_30, 1, x_28); +x_31 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__12; +x_32 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_32, 0, x_30); +lean_ctor_set(x_32, 1, x_31); +x_33 = l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11(x_9, x_32, x_12, x_13, x_14, x_15, x_16, x_25); +x_34 = lean_ctor_get(x_33, 0); +lean_inc(x_34); +x_35 = lean_ctor_get(x_33, 1); +lean_inc(x_35); +lean_dec(x_33); +x_36 = l_Lean_Elab_Structural_mkBRecOn___lambda__2(x_1, x_22, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_34, x_12, x_13, x_14, x_15, x_16, x_35); +lean_dec(x_34); +return x_36; +} +} +} +else +{ +uint8_t x_49; +lean_dec(x_16); +lean_dec(x_15); +lean_dec(x_14); +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_49 = !lean_is_exclusive(x_21); +if (x_49 == 0) +{ +return x_21; +} +else +{ +lean_object* x_50; lean_object* x_51; lean_object* x_52; +x_50 = lean_ctor_get(x_21, 0); +x_51 = lean_ctor_get(x_21, 1); +lean_inc(x_51); +lean_inc(x_50); +lean_dec(x_21); +x_52 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_52, 0, x_50); +lean_ctor_set(x_52, 1, x_51); +return x_52; +} +} +} +} +lean_object* l_Lean_Elab_Structural_mkBRecOn___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, 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: +{ +lean_object* x_17; lean_object* x_18; lean_object* x_19; +x_17 = l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___lambda__3___closed__1; +x_18 = lean_alloc_closure((void*)(l_Lean_Elab_Structural_mkBRecOn___lambda__3___boxed), 17, 9); +lean_closure_set(x_18, 0, x_1); +lean_closure_set(x_18, 1, x_2); +lean_closure_set(x_18, 2, x_3); +lean_closure_set(x_18, 3, x_4); +lean_closure_set(x_18, 4, x_5); +lean_closure_set(x_18, 5, x_6); +lean_closure_set(x_18, 6, x_7); +lean_closure_set(x_18, 7, x_17); +lean_closure_set(x_18, 8, x_8); +x_19 = l_Lean_Meta_forallBoundedTelescope___at_Lean_Elab_Structural_mkBRecOn___spec__1___rarg(x_9, x_17, x_18, x_11, x_12, x_13, x_14, x_15, x_16); +return x_19; +} +} +static lean_object* _init_l_Lean_Elab_Structural_mkBRecOn___lambda__5___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("brecOnType "); +return x_1; +} +} +static lean_object* _init_l_Lean_Elab_Structural_mkBRecOn___lambda__5___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Elab_Structural_mkBRecOn___lambda__5___closed__1; +x_2 = l_Lean_stringToMessageData(x_1); +return x_2; +} +} +lean_object* l_Lean_Elab_Structural_mkBRecOn___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, 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_17; lean_object* x_18; lean_object* x_31; lean_object* x_32; lean_object* x_33; uint8_t x_34; +lean_dec(x_10); +x_31 = lean_st_ref_get(x_15, x_16); +x_32 = lean_ctor_get(x_31, 0); +lean_inc(x_32); +x_33 = lean_ctor_get(x_32, 3); +lean_inc(x_33); +lean_dec(x_32); +x_34 = lean_ctor_get_uint8(x_33, sizeof(void*)*1); +lean_dec(x_33); +if (x_34 == 0) +{ +lean_object* x_35; uint8_t x_36; +x_35 = lean_ctor_get(x_31, 1); +lean_inc(x_35); +lean_dec(x_31); +x_36 = 0; +x_17 = x_36; +x_18 = x_35; +goto block_30; +} +else +{ +lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; uint8_t x_41; +x_37 = lean_ctor_get(x_31, 1); +lean_inc(x_37); +lean_dec(x_31); +lean_inc(x_8); +x_38 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__12(x_8, x_11, x_12, x_13, x_14, x_15, x_37); +x_39 = lean_ctor_get(x_38, 0); +lean_inc(x_39); +x_40 = lean_ctor_get(x_38, 1); +lean_inc(x_40); +lean_dec(x_38); +x_41 = lean_unbox(x_39); +lean_dec(x_39); +x_17 = x_41; +x_18 = x_40; +goto block_30; +} +block_30: +{ +if (x_17 == 0) +{ +lean_object* x_19; lean_object* x_20; +x_19 = lean_box(0); +x_20 = l_Lean_Elab_Structural_mkBRecOn___lambda__4(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_19, x_11, x_12, x_13, x_14, x_15, x_18); +return x_20; +} +else +{ +lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; +lean_inc(x_9); +x_21 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_21, 0, x_9); +x_22 = l_Lean_Elab_Structural_mkBRecOn___lambda__5___closed__2; +x_23 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_23, 0, x_22); +lean_ctor_set(x_23, 1, x_21); +x_24 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__12; +x_25 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_25, 0, x_23); +lean_ctor_set(x_25, 1, x_24); +lean_inc(x_8); +x_26 = l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11(x_8, x_25, x_11, x_12, x_13, x_14, x_15, x_18); +x_27 = lean_ctor_get(x_26, 0); +lean_inc(x_27); +x_28 = lean_ctor_get(x_26, 1); +lean_inc(x_28); +lean_dec(x_26); +x_29 = l_Lean_Elab_Structural_mkBRecOn___lambda__4(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_27, x_11, x_12, x_13, x_14, x_15, x_28); +lean_dec(x_27); +return x_29; +} +} +} +} +static lean_object* _init_l_Lean_Elab_Structural_mkBRecOn___lambda__6___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("brecOn "); +return x_1; +} +} +static lean_object* _init_l_Lean_Elab_Structural_mkBRecOn___lambda__6___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Elab_Structural_mkBRecOn___lambda__6___closed__1; +x_2 = l_Lean_stringToMessageData(x_1); +return x_2; +} +} +lean_object* l_Lean_Elab_Structural_mkBRecOn___lambda__6(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, uint8_t 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, lean_object* x_17) { +_start: +{ +lean_object* x_18; lean_object* x_19; +lean_dec(x_11); +x_18 = lean_ctor_get(x_1, 6); +lean_inc(x_18); +if (x_9 == 0) +{ +lean_object* x_63; lean_object* x_64; lean_object* x_65; lean_object* x_66; lean_object* x_67; lean_object* x_68; +x_63 = lean_ctor_get(x_1, 4); +lean_inc(x_63); +x_64 = l_Lean_brecOnSuffix; +x_65 = lean_name_mk_string(x_63, x_64); +x_66 = lean_ctor_get(x_1, 5); +lean_inc(x_66); +x_67 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_67, 0, x_10); +lean_ctor_set(x_67, 1, x_66); +x_68 = l_Lean_mkConst(x_65, x_67); +x_19 = x_68; +goto block_62; +} +else +{ +lean_object* x_69; lean_object* x_70; lean_object* x_71; lean_object* x_72; lean_object* x_73; +lean_dec(x_10); +x_69 = lean_ctor_get(x_1, 4); +lean_inc(x_69); +x_70 = l_Lean_binductionOnSuffix; +x_71 = lean_name_mk_string(x_69, x_70); +x_72 = lean_ctor_get(x_1, 5); +lean_inc(x_72); +x_73 = l_Lean_mkConst(x_71, x_72); +x_19 = x_73; +goto block_62; +} +block_62: +{ +lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; +x_20 = l_Lean_mkAppN(x_19, x_18); +x_21 = l_Lean_mkApp(x_20, x_2); +lean_inc(x_3); +x_22 = l_Lean_mkAppN(x_21, x_3); +lean_inc(x_4); +x_23 = l_Lean_mkApp(x_22, x_4); +lean_inc(x_16); +lean_inc(x_15); +lean_inc(x_14); +lean_inc(x_13); +lean_inc(x_23); +x_24 = l_Lean_Meta_check(x_23, x_13, x_14, x_15, x_16, x_17); +if (lean_obj_tag(x_24) == 0) +{ +lean_object* x_25; lean_object* x_26; +x_25 = lean_ctor_get(x_24, 1); +lean_inc(x_25); +lean_dec(x_24); +lean_inc(x_16); +lean_inc(x_15); +lean_inc(x_14); +lean_inc(x_13); +lean_inc(x_23); +x_26 = lean_infer_type(x_23, x_13, x_14, x_15, x_16, x_25); +if (lean_obj_tag(x_26) == 0) +{ +lean_object* x_27; lean_object* x_28; uint8_t x_29; lean_object* x_30; lean_object* x_43; lean_object* x_44; lean_object* x_45; uint8_t x_46; +x_27 = lean_ctor_get(x_26, 0); +lean_inc(x_27); +x_28 = lean_ctor_get(x_26, 1); +lean_inc(x_28); +lean_dec(x_26); +x_43 = lean_st_ref_get(x_16, x_28); +x_44 = lean_ctor_get(x_43, 0); +lean_inc(x_44); +x_45 = lean_ctor_get(x_44, 3); +lean_inc(x_45); +lean_dec(x_44); +x_46 = lean_ctor_get_uint8(x_45, sizeof(void*)*1); +lean_dec(x_45); +if (x_46 == 0) +{ +lean_object* x_47; uint8_t x_48; +x_47 = lean_ctor_get(x_43, 1); +lean_inc(x_47); +lean_dec(x_43); +x_48 = 0; +x_29 = x_48; +x_30 = x_47; +goto block_42; +} +else +{ +lean_object* x_49; lean_object* x_50; lean_object* x_51; lean_object* x_52; uint8_t x_53; +x_49 = lean_ctor_get(x_43, 1); +lean_inc(x_49); +lean_dec(x_43); +lean_inc(x_8); +x_50 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__12(x_8, x_12, x_13, x_14, x_15, x_16, x_49); +x_51 = lean_ctor_get(x_50, 0); +lean_inc(x_51); +x_52 = lean_ctor_get(x_50, 1); +lean_inc(x_52); +lean_dec(x_50); +x_53 = lean_unbox(x_51); +lean_dec(x_51); +x_29 = x_53; +x_30 = x_52; +goto block_42; +} +block_42: +{ +if (x_29 == 0) +{ +lean_object* x_31; lean_object* x_32; +x_31 = lean_box(0); +x_32 = l_Lean_Elab_Structural_mkBRecOn___lambda__5(x_3, x_4, x_5, x_1, x_6, x_7, x_23, x_8, x_27, x_31, x_12, x_13, x_14, x_15, x_16, x_30); +return x_32; +} +else +{ +lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; +lean_inc(x_23); +x_33 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_33, 0, x_23); +x_34 = l_Lean_Elab_Structural_mkBRecOn___lambda__6___closed__2; +x_35 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_35, 0, x_34); +lean_ctor_set(x_35, 1, x_33); +x_36 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__12; +x_37 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_37, 0, x_35); +lean_ctor_set(x_37, 1, x_36); +lean_inc(x_8); +x_38 = l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11(x_8, x_37, x_12, x_13, x_14, x_15, x_16, x_30); +x_39 = lean_ctor_get(x_38, 0); +lean_inc(x_39); +x_40 = lean_ctor_get(x_38, 1); +lean_inc(x_40); +lean_dec(x_38); +x_41 = l_Lean_Elab_Structural_mkBRecOn___lambda__5(x_3, x_4, x_5, x_1, x_6, x_7, x_23, x_8, x_27, x_39, x_12, x_13, x_14, x_15, x_16, x_40); +return x_41; +} +} +} +else +{ +uint8_t x_54; +lean_dec(x_23); +lean_dec(x_16); +lean_dec(x_15); +lean_dec(x_14); +lean_dec(x_13); +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); +lean_dec(x_1); +x_54 = !lean_is_exclusive(x_26); +if (x_54 == 0) +{ +return x_26; +} +else +{ +lean_object* x_55; lean_object* x_56; lean_object* x_57; +x_55 = lean_ctor_get(x_26, 0); +x_56 = lean_ctor_get(x_26, 1); +lean_inc(x_56); +lean_inc(x_55); +lean_dec(x_26); +x_57 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_57, 0, x_55); +lean_ctor_set(x_57, 1, x_56); +return x_57; +} +} +} +else +{ +uint8_t x_58; +lean_dec(x_23); +lean_dec(x_16); +lean_dec(x_15); +lean_dec(x_14); +lean_dec(x_13); +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); +lean_dec(x_1); +x_58 = !lean_is_exclusive(x_24); +if (x_58 == 0) +{ +return x_24; +} +else +{ +lean_object* x_59; lean_object* x_60; lean_object* x_61; +x_59 = lean_ctor_get(x_24, 0); +x_60 = lean_ctor_get(x_24, 1); +lean_inc(x_60); +lean_inc(x_59); +lean_dec(x_24); +x_61 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_61, 0, x_59); +lean_ctor_set(x_61, 1, x_60); +return x_61; +} +} +} +} +} +static lean_object* _init_l_Lean_Elab_Structural_mkBRecOn___lambda__7___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("brecOn motive: "); +return x_1; +} +} +static lean_object* _init_l_Lean_Elab_Structural_mkBRecOn___lambda__7___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Elab_Structural_mkBRecOn___lambda__7___closed__1; +x_2 = l_Lean_stringToMessageData(x_1); +return x_2; +} +} +lean_object* l_Lean_Elab_Structural_mkBRecOn___lambda__7(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, uint8_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: +{ +lean_object* x_17; lean_object* x_18; uint8_t x_19; uint8_t x_20; lean_object* x_21; +lean_dec(x_10); +x_17 = lean_ctor_get(x_1, 7); +lean_inc(x_17); +lean_inc(x_2); +lean_inc(x_17); +x_18 = lean_array_push(x_17, x_2); +x_19 = 0; +x_20 = 1; +lean_inc(x_12); +x_21 = l_Lean_Meta_mkLambdaFVars(x_18, x_3, x_19, x_20, x_12, x_13, x_14, x_15, x_16); +if (lean_obj_tag(x_21) == 0) +{ +lean_object* x_22; lean_object* x_23; uint8_t x_24; lean_object* x_25; lean_object* x_38; lean_object* x_39; lean_object* x_40; uint8_t x_41; +x_22 = lean_ctor_get(x_21, 0); +lean_inc(x_22); +x_23 = lean_ctor_get(x_21, 1); +lean_inc(x_23); +lean_dec(x_21); +x_38 = lean_st_ref_get(x_15, x_23); +x_39 = lean_ctor_get(x_38, 0); +lean_inc(x_39); +x_40 = lean_ctor_get(x_39, 3); +lean_inc(x_40); +lean_dec(x_39); +x_41 = lean_ctor_get_uint8(x_40, sizeof(void*)*1); +lean_dec(x_40); +if (x_41 == 0) +{ +lean_object* x_42; +x_42 = lean_ctor_get(x_38, 1); +lean_inc(x_42); +lean_dec(x_38); +x_24 = x_19; +x_25 = x_42; +goto block_37; +} +else +{ +lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; uint8_t x_47; +x_43 = lean_ctor_get(x_38, 1); +lean_inc(x_43); +lean_dec(x_38); +lean_inc(x_7); +x_44 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__12(x_7, x_11, x_12, x_13, x_14, x_15, x_43); +x_45 = lean_ctor_get(x_44, 0); +lean_inc(x_45); +x_46 = lean_ctor_get(x_44, 1); +lean_inc(x_46); +lean_dec(x_44); +x_47 = lean_unbox(x_45); +lean_dec(x_45); +x_24 = x_47; +x_25 = x_46; +goto block_37; +} +block_37: +{ +if (x_24 == 0) +{ +lean_object* x_26; lean_object* x_27; +x_26 = lean_box(0); +x_27 = l_Lean_Elab_Structural_mkBRecOn___lambda__6(x_1, x_22, x_17, x_2, x_4, x_5, x_6, x_7, x_8, x_9, x_26, x_11, x_12, x_13, x_14, x_15, x_25); +return x_27; +} +else +{ +lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; +lean_inc(x_22); +x_28 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_28, 0, x_22); +x_29 = l_Lean_Elab_Structural_mkBRecOn___lambda__7___closed__2; +x_30 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_30, 0, x_29); +lean_ctor_set(x_30, 1, x_28); +x_31 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__12; +x_32 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_32, 0, x_30); +lean_ctor_set(x_32, 1, x_31); +lean_inc(x_7); +x_33 = l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11(x_7, x_32, x_11, x_12, x_13, x_14, x_15, x_25); +x_34 = lean_ctor_get(x_33, 0); +lean_inc(x_34); +x_35 = lean_ctor_get(x_33, 1); +lean_inc(x_35); +lean_dec(x_33); +x_36 = l_Lean_Elab_Structural_mkBRecOn___lambda__6(x_1, x_22, x_17, x_2, x_4, x_5, x_6, x_7, x_8, x_9, x_34, x_11, x_12, x_13, x_14, x_15, x_35); +return x_36; +} +} +} +else +{ +uint8_t x_48; +lean_dec(x_17); +lean_dec(x_15); +lean_dec(x_14); +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_9); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_2); +lean_dec(x_1); +x_48 = !lean_is_exclusive(x_21); +if (x_48 == 0) +{ +return x_21; +} +else +{ +lean_object* x_49; lean_object* x_50; lean_object* x_51; +x_49 = lean_ctor_get(x_21, 0); +x_50 = lean_ctor_get(x_21, 1); +lean_inc(x_50); +lean_inc(x_49); +lean_dec(x_21); +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; +} +} +} +} +lean_object* l_Lean_Elab_Structural_mkBRecOn___lambda__8(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; uint8_t x_17; +lean_dec(x_9); +x_16 = lean_ctor_get_uint8(x_1, sizeof(void*)*8); +if (x_16 == 0) +{ +uint8_t x_34; +x_34 = 0; +x_17 = x_34; +goto block_33; +} +else +{ +lean_object* x_35; uint8_t x_36; +x_35 = l_Lean_levelZero; +x_36 = lean_level_eq(x_8, x_35); +x_17 = x_36; +goto block_33; +} +block_33: +{ +if (x_16 == 0) +{ +lean_object* x_18; lean_object* x_19; +x_18 = lean_box(0); +x_19 = l_Lean_Elab_Structural_mkBRecOn___lambda__7(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_17, x_8, x_18, x_10, x_11, x_12, x_13, x_14, x_15); +return x_19; +} +else +{ +lean_object* x_20; uint8_t x_21; +x_20 = l_Lean_levelZero; +x_21 = lean_level_eq(x_8, x_20); +if (x_21 == 0) +{ +lean_object* x_22; +x_22 = l_Lean_Meta_decLevel(x_8, x_11, x_12, x_13, x_14, x_15); +if (lean_obj_tag(x_22) == 0) +{ +lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; +x_23 = lean_ctor_get(x_22, 0); +lean_inc(x_23); +x_24 = lean_ctor_get(x_22, 1); +lean_inc(x_24); +lean_dec(x_22); +x_25 = lean_box(0); +x_26 = l_Lean_Elab_Structural_mkBRecOn___lambda__7(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_17, x_23, x_25, x_10, x_11, x_12, x_13, x_14, x_24); +return x_26; +} +else +{ +uint8_t x_27; +lean_dec(x_14); +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_10); +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_27 = !lean_is_exclusive(x_22); +if (x_27 == 0) +{ +return x_22; +} +else +{ +lean_object* x_28; lean_object* x_29; lean_object* x_30; +x_28 = lean_ctor_get(x_22, 0); +x_29 = lean_ctor_get(x_22, 1); +lean_inc(x_29); +lean_inc(x_28); +lean_dec(x_22); +x_30 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_30, 0, x_28); +lean_ctor_set(x_30, 1, x_29); +return x_30; +} +} +} +else +{ +lean_object* x_31; lean_object* x_32; +x_31 = lean_box(0); +x_32 = l_Lean_Elab_Structural_mkBRecOn___lambda__7(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_17, x_8, x_31, x_10, x_11, x_12, x_13, x_14, x_15); +return x_32; +} +} +} +} +} +static lean_object* _init_l_Lean_Elab_Structural_mkBRecOn___lambda__9___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("brecOn univ: "); +return x_1; +} +} +static lean_object* _init_l_Lean_Elab_Structural_mkBRecOn___lambda__9___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Elab_Structural_mkBRecOn___lambda__9___closed__1; +x_2 = l_Lean_stringToMessageData(x_1); +return x_2; +} +} +lean_object* l_Lean_Elab_Structural_mkBRecOn___lambda__9(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: +{ +uint8_t x_15; uint8_t x_16; lean_object* x_17; +lean_dec(x_8); +x_15 = 0; +x_16 = 1; +lean_inc(x_10); +lean_inc(x_1); +x_17 = l_Lean_Meta_mkForallFVars(x_1, x_2, x_15, x_16, x_10, x_11, x_12, x_13, x_14); +if (lean_obj_tag(x_17) == 0) +{ +lean_object* x_18; lean_object* x_19; lean_object* x_20; +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); +lean_inc(x_13); +lean_inc(x_12); +lean_inc(x_11); +lean_inc(x_10); +lean_inc(x_18); +x_20 = l_Lean_Meta_getLevel(x_18, x_10, x_11, x_12, x_13, x_19); +if (lean_obj_tag(x_20) == 0) +{ +lean_object* x_21; lean_object* x_22; uint8_t x_23; lean_object* x_24; lean_object* x_37; lean_object* x_38; lean_object* x_39; uint8_t x_40; +x_21 = lean_ctor_get(x_20, 0); +lean_inc(x_21); +x_22 = lean_ctor_get(x_20, 1); +lean_inc(x_22); +lean_dec(x_20); +x_37 = lean_st_ref_get(x_13, x_22); +x_38 = lean_ctor_get(x_37, 0); +lean_inc(x_38); +x_39 = lean_ctor_get(x_38, 3); +lean_inc(x_39); +lean_dec(x_38); +x_40 = lean_ctor_get_uint8(x_39, sizeof(void*)*1); +lean_dec(x_39); +if (x_40 == 0) +{ +lean_object* x_41; +x_41 = lean_ctor_get(x_37, 1); +lean_inc(x_41); +lean_dec(x_37); +x_23 = x_15; +x_24 = x_41; +goto block_36; +} +else +{ +lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; uint8_t x_46; +x_42 = lean_ctor_get(x_37, 1); +lean_inc(x_42); +lean_dec(x_37); +lean_inc(x_7); +x_43 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__12(x_7, x_9, x_10, x_11, x_12, x_13, x_42); +x_44 = lean_ctor_get(x_43, 0); +lean_inc(x_44); +x_45 = lean_ctor_get(x_43, 1); +lean_inc(x_45); +lean_dec(x_43); +x_46 = lean_unbox(x_44); +lean_dec(x_44); +x_23 = x_46; +x_24 = x_45; +goto block_36; +} +block_36: +{ +if (x_23 == 0) +{ +lean_object* x_25; lean_object* x_26; +x_25 = lean_box(0); +x_26 = l_Lean_Elab_Structural_mkBRecOn___lambda__8(x_3, x_4, x_18, x_5, x_6, x_1, x_7, x_21, x_25, x_9, x_10, x_11, x_12, x_13, x_24); +return x_26; +} +else +{ +lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; +lean_inc(x_21); +x_27 = lean_alloc_ctor(3, 1, 0); +lean_ctor_set(x_27, 0, x_21); +x_28 = l_Lean_Elab_Structural_mkBRecOn___lambda__9___closed__2; +x_29 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_29, 0, x_28); +lean_ctor_set(x_29, 1, x_27); +x_30 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__12; +x_31 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_31, 0, x_29); +lean_ctor_set(x_31, 1, x_30); +lean_inc(x_7); +x_32 = l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11(x_7, x_31, x_9, x_10, x_11, x_12, x_13, x_24); +x_33 = lean_ctor_get(x_32, 0); +lean_inc(x_33); +x_34 = lean_ctor_get(x_32, 1); +lean_inc(x_34); +lean_dec(x_32); +x_35 = l_Lean_Elab_Structural_mkBRecOn___lambda__8(x_3, x_4, x_18, x_5, x_6, x_1, x_7, x_21, x_33, x_9, x_10, x_11, x_12, x_13, x_34); +return x_35; +} +} +} +else +{ +uint8_t x_47; +lean_dec(x_18); +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +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_47 = !lean_is_exclusive(x_20); +if (x_47 == 0) +{ +return x_20; +} +else +{ +lean_object* x_48; lean_object* x_49; lean_object* x_50; +x_48 = lean_ctor_get(x_20, 0); +x_49 = lean_ctor_get(x_20, 1); +lean_inc(x_49); +lean_inc(x_48); +lean_dec(x_20); +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; +} +} +} +else +{ +uint8_t x_51; +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +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_51 = !lean_is_exclusive(x_17); +if (x_51 == 0) +{ +return x_17; +} +else +{ +lean_object* x_52; lean_object* x_53; lean_object* x_54; +x_52 = lean_ctor_get(x_17, 0); +x_53 = lean_ctor_get(x_17, 1); +lean_inc(x_53); +lean_inc(x_52); +lean_dec(x_17); +x_54 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_54, 0, x_52); +lean_ctor_set(x_54, 1, x_53); +return x_54; +} +} +} +} +static lean_object* _init_l_Lean_Elab_Structural_mkBRecOn___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("fixedParams: "); +return x_1; +} +} +static lean_object* _init_l_Lean_Elab_Structural_mkBRecOn___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Elab_Structural_mkBRecOn___closed__1; +x_2 = l_Lean_stringToMessageData(x_1); +return x_2; +} +} +static lean_object* _init_l_Lean_Elab_Structural_mkBRecOn___closed__3() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string(", otherArgs: "); +return x_1; +} +} +static lean_object* _init_l_Lean_Elab_Structural_mkBRecOn___closed__4() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Elab_Structural_mkBRecOn___closed__3; +x_2 = l_Lean_stringToMessageData(x_1); +return x_2; +} +} +lean_object* l_Lean_Elab_Structural_mkBRecOn(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 = lean_infer_type(x_3, 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; 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; lean_object* x_23; +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_Expr_headBeta(x_11); +x_14 = lean_ctor_get(x_2, 1); +lean_inc(x_14); +x_15 = lean_ctor_get(x_2, 2); +lean_inc(x_15); +x_16 = l_Lean_instInhabitedExpr; +x_17 = lean_array_get(x_16, x_14, x_15); +lean_dec(x_15); +x_18 = lean_array_get_size(x_14); +x_19 = lean_unsigned_to_nat(0u); +x_20 = lean_nat_dec_lt(x_19, x_18); +x_21 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__6; +x_22 = lean_st_ref_get(x_8, x_12); +if (x_20 == 0) +{ +lean_object* x_59; +lean_dec(x_18); +lean_dec(x_14); +x_59 = l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___lambda__1___closed__1; +x_23 = x_59; +goto block_58; +} +else +{ +uint8_t x_60; +x_60 = lean_nat_dec_le(x_18, x_18); +if (x_60 == 0) +{ +lean_object* x_61; +lean_dec(x_18); +lean_dec(x_14); +x_61 = l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___lambda__1___closed__1; +x_23 = x_61; +goto block_58; +} +else +{ +size_t x_62; size_t x_63; lean_object* x_64; lean_object* x_65; +x_62 = 0; +x_63 = lean_usize_of_nat(x_18); +lean_dec(x_18); +x_64 = l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___lambda__1___closed__1; +x_65 = l_Array_foldlMUnsafe_fold___at_Lean_Elab_Structural_mkBRecOn___spec__2(x_2, x_17, x_14, x_62, x_63, x_64); +lean_dec(x_14); +x_23 = x_65; +goto block_58; +} +} +block_58: +{ +uint8_t x_24; lean_object* x_25; lean_object* x_48; lean_object* x_49; uint8_t x_50; +x_48 = lean_ctor_get(x_22, 0); +lean_inc(x_48); +x_49 = lean_ctor_get(x_48, 3); +lean_inc(x_49); +lean_dec(x_48); +x_50 = lean_ctor_get_uint8(x_49, sizeof(void*)*1); +lean_dec(x_49); +if (x_50 == 0) +{ +lean_object* x_51; uint8_t x_52; +x_51 = lean_ctor_get(x_22, 1); +lean_inc(x_51); +lean_dec(x_22); +x_52 = 0; +x_24 = x_52; +x_25 = x_51; +goto block_47; +} +else +{ +lean_object* x_53; lean_object* x_54; lean_object* x_55; lean_object* x_56; uint8_t x_57; +x_53 = lean_ctor_get(x_22, 1); +lean_inc(x_53); +lean_dec(x_22); +x_54 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__12(x_21, x_4, x_5, x_6, x_7, x_8, x_53); +x_55 = lean_ctor_get(x_54, 0); +lean_inc(x_55); +x_56 = lean_ctor_get(x_54, 1); +lean_inc(x_56); +lean_dec(x_54); +x_57 = lean_unbox(x_55); +lean_dec(x_55); +x_24 = x_57; +x_25 = x_56; +goto block_47; +} +block_47: +{ +if (x_24 == 0) +{ +lean_object* x_26; lean_object* x_27; +x_26 = lean_box(0); +x_27 = l_Lean_Elab_Structural_mkBRecOn___lambda__9(x_23, x_13, x_2, x_17, x_1, x_3, x_21, x_26, x_4, x_5, x_6, x_7, x_8, x_25); +return x_27; +} +else +{ +lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; +x_28 = lean_ctor_get(x_2, 0); +lean_inc(x_28); +x_29 = lean_array_to_list(lean_box(0), x_28); +x_30 = lean_box(0); +x_31 = l_List_mapTRAux___at_Lean_MessageData_instCoeListExprMessageData___spec__1(x_29, x_30); +x_32 = l_Lean_MessageData_ofList(x_31); +lean_dec(x_31); +x_33 = l_Lean_Elab_Structural_mkBRecOn___closed__2; +x_34 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_34, 0, x_33); +lean_ctor_set(x_34, 1, x_32); +x_35 = l_Lean_Elab_Structural_mkBRecOn___closed__4; +x_36 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_36, 0, x_34); +lean_ctor_set(x_36, 1, x_35); +lean_inc(x_23); +x_37 = lean_array_to_list(lean_box(0), x_23); +x_38 = l_List_mapTRAux___at_Lean_MessageData_instCoeListExprMessageData___spec__1(x_37, x_30); +x_39 = l_Lean_MessageData_ofList(x_38); +lean_dec(x_38); +x_40 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_40, 0, x_36); +lean_ctor_set(x_40, 1, x_39); +x_41 = l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__12; +x_42 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_42, 0, x_40); +lean_ctor_set(x_42, 1, x_41); +x_43 = l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11(x_21, x_42, x_4, x_5, x_6, x_7, x_8, x_25); +x_44 = lean_ctor_get(x_43, 0); +lean_inc(x_44); +x_45 = lean_ctor_get(x_43, 1); +lean_inc(x_45); +lean_dec(x_43); +x_46 = l_Lean_Elab_Structural_mkBRecOn___lambda__9(x_23, x_13, x_2, x_17, x_1, x_3, x_21, x_44, x_4, x_5, x_6, x_7, x_8, x_45); +return x_46; +} +} +} +} +else +{ +uint8_t x_66; +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_66 = !lean_is_exclusive(x_10); +if (x_66 == 0) +{ +return x_10; +} +else +{ +lean_object* x_67; lean_object* x_68; lean_object* x_69; +x_67 = lean_ctor_get(x_10, 0); +x_68 = lean_ctor_get(x_10, 1); +lean_inc(x_68); +lean_inc(x_67); +lean_dec(x_10); +x_69 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_69, 0, x_67); +lean_ctor_set(x_69, 1, x_68); +return x_69; +} +} +} +} +lean_object* l_Array_foldlMUnsafe_fold___at_Lean_Elab_Structural_mkBRecOn___spec__2___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { +_start: +{ +size_t x_7; size_t x_8; lean_object* x_9; +x_7 = lean_unbox_usize(x_4); +lean_dec(x_4); +x_8 = lean_unbox_usize(x_5); +lean_dec(x_5); +x_9 = l_Array_foldlMUnsafe_fold___at_Lean_Elab_Structural_mkBRecOn___spec__2(x_1, x_2, x_3, x_7, x_8, x_6); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +return x_9; +} +} +lean_object* l_Lean_Elab_Structural_mkBRecOn___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, lean_object* x_12, lean_object* x_13, lean_object* x_14, lean_object* x_15) { +_start: +{ +lean_object* x_16; +x_16 = l_Lean_Elab_Structural_mkBRecOn___lambda__1(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_12, x_13, x_14, x_15); +lean_dec(x_9); +lean_dec(x_8); +return x_16; +} +} +lean_object* l_Lean_Elab_Structural_mkBRecOn___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_object* x_12, lean_object* x_13, lean_object* x_14, lean_object* x_15, lean_object* x_16) { +_start: +{ +lean_object* x_17; +x_17 = l_Lean_Elab_Structural_mkBRecOn___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, x_13, x_14, x_15, x_16); +lean_dec(x_10); +return x_17; +} +} +lean_object* l_Lean_Elab_Structural_mkBRecOn___lambda__3___boxed(lean_object** _args) { +lean_object* x_1 = _args[0]; +lean_object* x_2 = _args[1]; +lean_object* x_3 = _args[2]; +lean_object* x_4 = _args[3]; +lean_object* x_5 = _args[4]; +lean_object* x_6 = _args[5]; +lean_object* x_7 = _args[6]; +lean_object* x_8 = _args[7]; +lean_object* x_9 = _args[8]; +lean_object* x_10 = _args[9]; +lean_object* x_11 = _args[10]; +lean_object* x_12 = _args[11]; +lean_object* x_13 = _args[12]; +lean_object* x_14 = _args[13]; +lean_object* x_15 = _args[14]; +lean_object* x_16 = _args[15]; +lean_object* x_17 = _args[16]; +_start: +{ +lean_object* x_18; +x_18 = l_Lean_Elab_Structural_mkBRecOn___lambda__3(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_12, x_13, x_14, x_15, x_16, x_17); +return x_18; +} +} +lean_object* l_Lean_Elab_Structural_mkBRecOn___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, 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: +{ +lean_object* x_17; +x_17 = l_Lean_Elab_Structural_mkBRecOn___lambda__4(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_12, x_13, x_14, x_15, x_16); +lean_dec(x_10); +return x_17; +} +} +lean_object* l_Lean_Elab_Structural_mkBRecOn___lambda__6___boxed(lean_object** _args) { +lean_object* x_1 = _args[0]; +lean_object* x_2 = _args[1]; +lean_object* x_3 = _args[2]; +lean_object* x_4 = _args[3]; +lean_object* x_5 = _args[4]; +lean_object* x_6 = _args[5]; +lean_object* x_7 = _args[6]; +lean_object* x_8 = _args[7]; +lean_object* x_9 = _args[8]; +lean_object* x_10 = _args[9]; +lean_object* x_11 = _args[10]; +lean_object* x_12 = _args[11]; +lean_object* x_13 = _args[12]; +lean_object* x_14 = _args[13]; +lean_object* x_15 = _args[14]; +lean_object* x_16 = _args[15]; +lean_object* x_17 = _args[16]; +_start: +{ +uint8_t x_18; lean_object* x_19; +x_18 = lean_unbox(x_9); +lean_dec(x_9); +x_19 = l_Lean_Elab_Structural_mkBRecOn___lambda__6(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_18, x_10, x_11, x_12, x_13, x_14, x_15, x_16, x_17); +return x_19; +} +} +lean_object* l_Lean_Elab_Structural_mkBRecOn___lambda__7___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: +{ +uint8_t x_17; lean_object* x_18; +x_17 = lean_unbox(x_8); +lean_dec(x_8); +x_18 = l_Lean_Elab_Structural_mkBRecOn___lambda__7(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_17, x_9, x_10, x_11, x_12, x_13, x_14, x_15, x_16); +return x_18; +} +} +lean_object* initialize_Init(lean_object*); +lean_object* initialize_Lean_Meta_Match_Match(lean_object*); +lean_object* initialize_Lean_Elab_PreDefinition_Structural_Basic(lean_object*); +static bool _G_initialized = false; +lean_object* initialize_Lean_Elab_PreDefinition_Structural_BRecOn(lean_object* w) { +lean_object * res; +if (_G_initialized) return lean_io_result_mk_ok(lean_box(0)); +_G_initialized = true; +res = initialize_Init(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); +res = initialize_Lean_Meta_Match_Match(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); +res = initialize_Lean_Elab_PreDefinition_Structural_Basic(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); +l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_throwToBelowFailed___rarg___closed__1 = _init_l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_throwToBelowFailed___rarg___closed__1(); +lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_throwToBelowFailed___rarg___closed__1); +l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_throwToBelowFailed___rarg___closed__2 = _init_l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_throwToBelowFailed___rarg___closed__2(); +lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_throwToBelowFailed___rarg___closed__2); +l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux_match__2___rarg___closed__1 = _init_l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux_match__2___rarg___closed__1(); +lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux_match__2___rarg___closed__1); +l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux_match__2___rarg___closed__2 = _init_l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux_match__2___rarg___closed__2(); +lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux_match__2___rarg___closed__2); +l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__4___closed__1 = _init_l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__4___closed__1(); +lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__4___closed__1); +l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__1 = _init_l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__1(); +lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__1); +l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__2 = _init_l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__2(); +lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__2); +l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__3 = _init_l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__3(); +lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__3); +l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__4 = _init_l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__4(); +lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__4); +l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__5 = _init_l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__5(); +lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__5); +l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__6 = _init_l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__6(); +lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__6); +l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__7 = _init_l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__7(); +lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__7); +l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__8 = _init_l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__8(); +lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__8); +l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__9 = _init_l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__9(); +lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__9); +l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__10 = _init_l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__10(); +lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__10); +l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__11 = _init_l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__11(); +lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___lambda__5___closed__11); +l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__1 = _init_l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__1(); +lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__1); +l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__2 = _init_l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__2(); +lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__2); +l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__3 = _init_l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__3(); +lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__3); +l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__4 = _init_l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__4(); +lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__4); +l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__5 = _init_l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__5(); +lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__5); +l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__6 = _init_l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__6(); +lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__6); +l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__7 = _init_l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__7(); +lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__7); +l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__8 = _init_l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__8(); +lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__8); +l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__9 = _init_l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__9(); +lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__9); +l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__10 = _init_l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__10(); +lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__10); +l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__11 = _init_l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__11(); +lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__11); +l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__12 = _init_l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__12(); +lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_toBelowAux___closed__12); +l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___lambda__2___closed__1 = _init_l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___lambda__2___closed__1(); +lean_mark_persistent(l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___lambda__2___closed__1); +l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___lambda__2___closed__2 = _init_l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___lambda__2___closed__2(); +lean_mark_persistent(l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___lambda__2___closed__2); +l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___lambda__3___closed__1 = _init_l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___lambda__3___closed__1(); +lean_mark_persistent(l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___lambda__3___closed__1); +l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___closed__1 = _init_l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___closed__1(); +lean_mark_persistent(l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___closed__1); +l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___closed__2 = _init_l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___closed__2(); +lean_mark_persistent(l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_withBelowDict___spec__1___rarg___closed__2); +l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_withBelowDict___rarg___closed__1 = _init_l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_withBelowDict___rarg___closed__1(); +lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_withBelowDict___rarg___closed__1); +l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_withBelowDict___rarg___closed__2 = _init_l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_withBelowDict___rarg___closed__2(); +lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_withBelowDict___rarg___closed__2); +l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___lambda__1___closed__1 = _init_l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___lambda__1___closed__1(); +lean_mark_persistent(l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___lambda__1___closed__1); +l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___lambda__2___closed__1 = _init_l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___lambda__2___closed__1(); +lean_mark_persistent(l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___lambda__2___closed__1); +l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___lambda__2___closed__2 = _init_l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___lambda__2___closed__2(); +lean_mark_persistent(l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___lambda__2___closed__2); +l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___closed__1 = _init_l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___closed__1(); +lean_mark_persistent(l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___closed__1); +l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___closed__2 = _init_l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___closed__2(); +lean_mark_persistent(l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___closed__2); +l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___boxed__const__1 = _init_l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___boxed__const__1(); +lean_mark_persistent(l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__7___boxed__const__1); +l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__10___boxed__const__1 = _init_l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__10___boxed__const__1(); +lean_mark_persistent(l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__10___boxed__const__1); +l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___closed__1 = _init_l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___closed__1(); +lean_mark_persistent(l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___closed__1); +l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___closed__2 = _init_l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___closed__2(); +lean_mark_persistent(l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___closed__2); +l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___closed__3 = _init_l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___closed__3(); +lean_mark_persistent(l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___closed__3); +l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___closed__4 = _init_l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___closed__4(); +lean_mark_persistent(l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___closed__4); +l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___closed__5 = _init_l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___closed__5(); +lean_mark_persistent(l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___closed__5); +l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___closed__6 = _init_l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___closed__6(); +lean_mark_persistent(l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__11___closed__6); +l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__2___closed__1 = _init_l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__2___closed__1(); +lean_mark_persistent(l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__2___closed__1); +l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__2___closed__2 = _init_l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__2___closed__2(); +lean_mark_persistent(l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__2___closed__2); +l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__2___closed__3 = _init_l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__2___closed__3(); +lean_mark_persistent(l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__2___closed__3); +l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__2___closed__4 = _init_l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__2___closed__4(); +lean_mark_persistent(l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__2___closed__4); +l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__3___closed__1 = _init_l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__3___closed__1(); +lean_mark_persistent(l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__3___closed__1); +l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__3___closed__2 = _init_l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__3___closed__2(); +lean_mark_persistent(l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__3___closed__2); +l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__3___closed__3 = _init_l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__3___closed__3(); +lean_mark_persistent(l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__3___closed__3); +l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__3___closed__4 = _init_l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__3___closed__4(); +lean_mark_persistent(l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__14___lambda__3___closed__4); +l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__1___closed__1 = _init_l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__1___closed__1(); +lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__1___closed__1); +l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__1___closed__2 = _init_l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__1___closed__2(); +lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__1___closed__2); +l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__1___closed__3 = _init_l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__1___closed__3(); +lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__1___closed__3); +l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__2___closed__1 = _init_l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__2___closed__1(); +lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__2___closed__1); +l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__2___boxed__const__1 = _init_l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__2___boxed__const__1(); +lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___lambda__2___boxed__const__1); +l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___closed__1 = _init_l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___closed__1(); +lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___closed__1); +l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___closed__2 = _init_l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___closed__2(); +lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___closed__2); +l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___closed__3 = _init_l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___closed__3(); +lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___closed__3); +l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___closed__4 = _init_l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___closed__4(); +lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___closed__4); +l_Lean_Elab_Structural_mkBRecOn___lambda__1___closed__1 = _init_l_Lean_Elab_Structural_mkBRecOn___lambda__1___closed__1(); +lean_mark_persistent(l_Lean_Elab_Structural_mkBRecOn___lambda__1___closed__1); +l_Lean_Elab_Structural_mkBRecOn___lambda__3___closed__1 = _init_l_Lean_Elab_Structural_mkBRecOn___lambda__3___closed__1(); +lean_mark_persistent(l_Lean_Elab_Structural_mkBRecOn___lambda__3___closed__1); +l_Lean_Elab_Structural_mkBRecOn___lambda__3___closed__2 = _init_l_Lean_Elab_Structural_mkBRecOn___lambda__3___closed__2(); +lean_mark_persistent(l_Lean_Elab_Structural_mkBRecOn___lambda__3___closed__2); +l_Lean_Elab_Structural_mkBRecOn___lambda__5___closed__1 = _init_l_Lean_Elab_Structural_mkBRecOn___lambda__5___closed__1(); +lean_mark_persistent(l_Lean_Elab_Structural_mkBRecOn___lambda__5___closed__1); +l_Lean_Elab_Structural_mkBRecOn___lambda__5___closed__2 = _init_l_Lean_Elab_Structural_mkBRecOn___lambda__5___closed__2(); +lean_mark_persistent(l_Lean_Elab_Structural_mkBRecOn___lambda__5___closed__2); +l_Lean_Elab_Structural_mkBRecOn___lambda__6___closed__1 = _init_l_Lean_Elab_Structural_mkBRecOn___lambda__6___closed__1(); +lean_mark_persistent(l_Lean_Elab_Structural_mkBRecOn___lambda__6___closed__1); +l_Lean_Elab_Structural_mkBRecOn___lambda__6___closed__2 = _init_l_Lean_Elab_Structural_mkBRecOn___lambda__6___closed__2(); +lean_mark_persistent(l_Lean_Elab_Structural_mkBRecOn___lambda__6___closed__2); +l_Lean_Elab_Structural_mkBRecOn___lambda__7___closed__1 = _init_l_Lean_Elab_Structural_mkBRecOn___lambda__7___closed__1(); +lean_mark_persistent(l_Lean_Elab_Structural_mkBRecOn___lambda__7___closed__1); +l_Lean_Elab_Structural_mkBRecOn___lambda__7___closed__2 = _init_l_Lean_Elab_Structural_mkBRecOn___lambda__7___closed__2(); +lean_mark_persistent(l_Lean_Elab_Structural_mkBRecOn___lambda__7___closed__2); +l_Lean_Elab_Structural_mkBRecOn___lambda__9___closed__1 = _init_l_Lean_Elab_Structural_mkBRecOn___lambda__9___closed__1(); +lean_mark_persistent(l_Lean_Elab_Structural_mkBRecOn___lambda__9___closed__1); +l_Lean_Elab_Structural_mkBRecOn___lambda__9___closed__2 = _init_l_Lean_Elab_Structural_mkBRecOn___lambda__9___closed__2(); +lean_mark_persistent(l_Lean_Elab_Structural_mkBRecOn___lambda__9___closed__2); +l_Lean_Elab_Structural_mkBRecOn___closed__1 = _init_l_Lean_Elab_Structural_mkBRecOn___closed__1(); +lean_mark_persistent(l_Lean_Elab_Structural_mkBRecOn___closed__1); +l_Lean_Elab_Structural_mkBRecOn___closed__2 = _init_l_Lean_Elab_Structural_mkBRecOn___closed__2(); +lean_mark_persistent(l_Lean_Elab_Structural_mkBRecOn___closed__2); +l_Lean_Elab_Structural_mkBRecOn___closed__3 = _init_l_Lean_Elab_Structural_mkBRecOn___closed__3(); +lean_mark_persistent(l_Lean_Elab_Structural_mkBRecOn___closed__3); +l_Lean_Elab_Structural_mkBRecOn___closed__4 = _init_l_Lean_Elab_Structural_mkBRecOn___closed__4(); +lean_mark_persistent(l_Lean_Elab_Structural_mkBRecOn___closed__4); +return lean_io_result_mk_ok(lean_box(0)); +} +#ifdef __cplusplus +} +#endif diff --git a/stage0/stdlib/Lean/Elab/PreDefinition/Structural/Basic.c b/stage0/stdlib/Lean/Elab/PreDefinition/Structural/Basic.c new file mode 100644 index 0000000000..1170673978 --- /dev/null +++ b/stage0/stdlib/Lean/Elab/PreDefinition/Structural/Basic.c @@ -0,0 +1,623 @@ +// Lean compiler output +// Module: Lean.Elab.PreDefinition.Structural.Basic +// Imports: Init Lean.Meta.Basic Lean.Meta.ForEachExpr +#include +#if defined(__clang__) +#pragma clang diagnostic ignored "-Wunused-parameter" +#pragma clang diagnostic ignored "-Wunused-label" +#elif defined(__GNUC__) && !defined(__CLANG__) +#pragma GCC diagnostic ignored "-Wunused-parameter" +#pragma GCC diagnostic ignored "-Wunused-label" +#pragma GCC diagnostic ignored "-Wunused-but-set-variable" +#endif +#ifdef __cplusplus +extern "C" { +#endif +lean_object* l_Lean_Elab_Structural_recArgHasLooseBVarsAt___lambda__1___boxed(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_stringToMessageData(lean_object*); +lean_object* lean_mk_empty_array_with_capacity(lean_object*); +uint8_t l___private_Lean_Elab_PreDefinition_Structural_Basic_0__Lean_Elab_Structural_containsRecFn(lean_object*, lean_object*); +uint8_t l_Lean_Elab_Structural_recArgHasLooseBVarsAt___lambda__1(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_throwError___at_Lean_Meta_setInlineAttribute___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_Elab_Structural_ensureNoRecFn___lambda__1___closed__4; +static lean_object* l_Lean_Elab_Structural_instInhabitedM___closed__3; +lean_object* lean_st_ref_get(lean_object*, lean_object*); +uint8_t l_Lean_Elab_Structural_recArgHasLooseBVarsAt(lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Elab_PreDefinition_Structural_Basic_0__Lean_Elab_Structural_containsRecFn___lambda__1___boxed(lean_object*, lean_object*); +uint8_t l_Lean_Expr_isAppOf(lean_object*, lean_object*); +lean_object* lean_array_get_size(lean_object*); +lean_object* l_Lean_throwError___at_Lean_Elab_Structural_instInhabitedM___spec__1(lean_object*); +lean_object* l_Lean_Expr_getRevArg_x21(lean_object*, lean_object*); +lean_object* lean_nat_add(lean_object*, lean_object*); +lean_object* l_Lean_Elab_Structural_ensureNoRecFn___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_throwError___at_Lean_Elab_Structural_instInhabitedM___spec__1___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_forEachExpr(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* lean_nat_sub(lean_object*, lean_object*); +static lean_object* l_Lean_Elab_Structural_instInhabitedM___closed__2; +static lean_object* l_Lean_Elab_Structural_instInhabitedM___closed__1; +lean_object* l_Lean_Elab_Structural_State_matcherBelowDep___default; +lean_object* lean_st_mk_ref(lean_object*, lean_object*); +lean_object* l_Lean_Elab_Structural_ensureNoRecFn(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_Elab_Structural_ensureNoRecFn___lambda__1___closed__3; +lean_object* l_Lean_Elab_Structural_recArgHasLooseBVarsAt___boxed(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_throwError___at_Lean_Elab_Structural_instInhabitedM___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Elab_PreDefinition_Structural_Basic_0__Lean_Elab_Structural_containsRecFn___boxed(lean_object*, lean_object*); +uint8_t l_Lean_Expr_isConstOf(lean_object*, lean_object*); +extern lean_object* l_Lean_NameSet_empty; +extern lean_object* l_Lean_Expr_FindImpl_initCache; +lean_object* l_Lean_Expr_getAppNumArgsAux(lean_object*, lean_object*); +static lean_object* l_Lean_Elab_Structural_ensureNoRecFn___lambda__1___closed__2; +uint8_t l___private_Lean_Elab_PreDefinition_Structural_Basic_0__Lean_Elab_Structural_containsRecFn___lambda__1(lean_object*, lean_object*); +lean_object* l_Lean_Elab_Structural_State_addMatchers___default; +lean_object* l_Lean_Elab_Structural_run(lean_object*); +static lean_object* l_Lean_Elab_Structural_ensureNoRecFn___lambda__1___closed__1; +lean_object* l_Lean_Elab_Structural_ensureNoRecFn___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_addMessageContextFull___at_Lean_Meta_instAddMessageContextMetaM___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +uint8_t l_Lean_Expr_hasLooseBVars(lean_object*); +lean_object* l_Lean_Elab_Structural_run___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Expr_FindImpl_findM_x3f_visit(lean_object*, size_t, lean_object*, lean_object*); +lean_object* l_Lean_indentExpr(lean_object*); +lean_object* l_Lean_Elab_Structural_instInhabitedM(lean_object*); +static lean_object* l_Lean_Elab_Structural_State_addMatchers___default___closed__1; +uint8_t lean_nat_dec_lt(lean_object*, lean_object*); +static lean_object* _init_l_Lean_Elab_Structural_State_matcherBelowDep___default() { +_start: +{ +lean_object* x_1; +x_1 = l_Lean_NameSet_empty; +return x_1; +} +} +static lean_object* _init_l_Lean_Elab_Structural_State_addMatchers___default___closed__1() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = lean_unsigned_to_nat(0u); +x_2 = lean_mk_empty_array_with_capacity(x_1); +return x_2; +} +} +static lean_object* _init_l_Lean_Elab_Structural_State_addMatchers___default() { +_start: +{ +lean_object* x_1; +x_1 = l_Lean_Elab_Structural_State_addMatchers___default___closed__1; +return x_1; +} +} +lean_object* l_Lean_throwError___at_Lean_Elab_Structural_instInhabitedM___spec__1___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { +_start: +{ +lean_object* x_8; lean_object* x_9; uint8_t x_10; +x_8 = lean_ctor_get(x_5, 3); +x_9 = l_Lean_addMessageContextFull___at_Lean_Meta_instAddMessageContextMetaM___spec__1(x_1, x_3, x_4, x_5, x_6, x_7); +x_10 = !lean_is_exclusive(x_9); +if (x_10 == 0) +{ +lean_object* x_11; lean_object* x_12; +x_11 = lean_ctor_get(x_9, 0); +lean_inc(x_8); +x_12 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_12, 0, x_8); +lean_ctor_set(x_12, 1, x_11); +lean_ctor_set_tag(x_9, 1); +lean_ctor_set(x_9, 0, x_12); +return x_9; +} +else +{ +lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; +x_13 = lean_ctor_get(x_9, 0); +x_14 = lean_ctor_get(x_9, 1); +lean_inc(x_14); +lean_inc(x_13); +lean_dec(x_9); +lean_inc(x_8); +x_15 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_15, 0, x_8); +lean_ctor_set(x_15, 1, x_13); +x_16 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_16, 0, x_15); +lean_ctor_set(x_16, 1, x_14); +return x_16; +} +} +} +lean_object* l_Lean_throwError___at_Lean_Elab_Structural_instInhabitedM___spec__1(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_Lean_throwError___at_Lean_Elab_Structural_instInhabitedM___spec__1___rarg___boxed), 7, 0); +return x_2; +} +} +static lean_object* _init_l_Lean_Elab_Structural_instInhabitedM___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("failed"); +return x_1; +} +} +static lean_object* _init_l_Lean_Elab_Structural_instInhabitedM___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Elab_Structural_instInhabitedM___closed__1; +x_2 = l_Lean_stringToMessageData(x_1); +return x_2; +} +} +static lean_object* _init_l_Lean_Elab_Structural_instInhabitedM___closed__3() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Elab_Structural_instInhabitedM___closed__2; +x_2 = lean_alloc_closure((void*)(l_Lean_throwError___at_Lean_Elab_Structural_instInhabitedM___spec__1___rarg___boxed), 7, 1); +lean_closure_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* l_Lean_Elab_Structural_instInhabitedM(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = l_Lean_Elab_Structural_instInhabitedM___closed__3; +return x_2; +} +} +lean_object* l_Lean_throwError___at_Lean_Elab_Structural_instInhabitedM___spec__1___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { +_start: +{ +lean_object* x_8; +x_8 = l_Lean_throwError___at_Lean_Elab_Structural_instInhabitedM___spec__1___rarg(x_1, x_2, x_3, x_4, x_5, x_6, x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +return x_8; +} +} +lean_object* l_Lean_Elab_Structural_run___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { +_start: +{ +lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; +x_8 = lean_st_ref_get(x_6, x_7); +x_9 = lean_ctor_get(x_8, 1); +lean_inc(x_9); +lean_dec(x_8); +x_10 = lean_st_mk_ref(x_2, x_9); +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); +lean_inc(x_6); +lean_inc(x_11); +x_13 = lean_apply_6(x_1, x_11, x_3, x_4, x_5, x_6, x_12); +if (lean_obj_tag(x_13) == 0) +{ +lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; uint8_t x_19; +x_14 = lean_ctor_get(x_13, 0); +lean_inc(x_14); +x_15 = lean_ctor_get(x_13, 1); +lean_inc(x_15); +lean_dec(x_13); +x_16 = lean_st_ref_get(x_6, x_15); +lean_dec(x_6); +x_17 = lean_ctor_get(x_16, 1); +lean_inc(x_17); +lean_dec(x_16); +x_18 = lean_st_ref_get(x_11, x_17); +lean_dec(x_11); +x_19 = !lean_is_exclusive(x_18); +if (x_19 == 0) +{ +lean_object* x_20; lean_object* x_21; +x_20 = lean_ctor_get(x_18, 0); +x_21 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_21, 0, x_14); +lean_ctor_set(x_21, 1, x_20); +lean_ctor_set(x_18, 0, x_21); +return x_18; +} +else +{ +lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; +x_22 = lean_ctor_get(x_18, 0); +x_23 = lean_ctor_get(x_18, 1); +lean_inc(x_23); +lean_inc(x_22); +lean_dec(x_18); +x_24 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_24, 0, x_14); +lean_ctor_set(x_24, 1, x_22); +x_25 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_25, 0, x_24); +lean_ctor_set(x_25, 1, x_23); +return x_25; +} +} +else +{ +uint8_t x_26; +lean_dec(x_11); +lean_dec(x_6); +x_26 = !lean_is_exclusive(x_13); +if (x_26 == 0) +{ +return x_13; +} +else +{ +lean_object* x_27; lean_object* x_28; lean_object* x_29; +x_27 = lean_ctor_get(x_13, 0); +x_28 = lean_ctor_get(x_13, 1); +lean_inc(x_28); +lean_inc(x_27); +lean_dec(x_13); +x_29 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_29, 0, x_27); +lean_ctor_set(x_29, 1, x_28); +return x_29; +} +} +} +} +lean_object* l_Lean_Elab_Structural_run(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_Lean_Elab_Structural_run___rarg), 7, 0); +return x_2; +} +} +uint8_t l_Lean_Elab_Structural_recArgHasLooseBVarsAt___lambda__1(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +uint8_t x_4; +x_4 = l_Lean_Expr_isAppOf(x_3, x_1); +if (x_4 == 0) +{ +uint8_t x_5; +x_5 = 0; +return x_5; +} +else +{ +lean_object* x_6; lean_object* x_7; uint8_t x_8; +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Lean_Expr_getAppNumArgsAux(x_3, x_6); +x_8 = lean_nat_dec_lt(x_2, x_7); +if (x_8 == 0) +{ +uint8_t x_9; +lean_dec(x_7); +x_9 = 0; +return x_9; +} +else +{ +lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; uint8_t x_14; +x_10 = lean_nat_sub(x_7, x_2); +lean_dec(x_7); +x_11 = lean_unsigned_to_nat(1u); +x_12 = lean_nat_sub(x_10, x_11); +lean_dec(x_10); +x_13 = l_Lean_Expr_getRevArg_x21(x_3, x_12); +x_14 = l_Lean_Expr_hasLooseBVars(x_13); +lean_dec(x_13); +return x_14; +} +} +} +} +uint8_t l_Lean_Elab_Structural_recArgHasLooseBVarsAt(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; size_t x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; +x_4 = lean_ctor_get(x_2, 0); +x_5 = lean_array_get_size(x_4); +x_6 = lean_ctor_get(x_2, 2); +x_7 = lean_nat_add(x_5, x_6); +lean_dec(x_5); +x_8 = lean_alloc_closure((void*)(l_Lean_Elab_Structural_recArgHasLooseBVarsAt___lambda__1___boxed), 3, 2); +lean_closure_set(x_8, 0, x_1); +lean_closure_set(x_8, 1, x_7); +x_9 = 8192; +x_10 = l_Lean_Expr_FindImpl_initCache; +x_11 = l_Lean_Expr_FindImpl_findM_x3f_visit(x_8, x_9, x_3, x_10); +x_12 = lean_ctor_get(x_11, 0); +lean_inc(x_12); +lean_dec(x_11); +if (lean_obj_tag(x_12) == 0) +{ +uint8_t x_13; +x_13 = 0; +return x_13; +} +else +{ +uint8_t x_14; +lean_dec(x_12); +x_14 = 1; +return x_14; +} +} +} +lean_object* l_Lean_Elab_Structural_recArgHasLooseBVarsAt___lambda__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +uint8_t x_4; lean_object* x_5; +x_4 = l_Lean_Elab_Structural_recArgHasLooseBVarsAt___lambda__1(x_1, x_2, x_3); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_5 = lean_box(x_4); +return x_5; +} +} +lean_object* l_Lean_Elab_Structural_recArgHasLooseBVarsAt___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +uint8_t x_4; lean_object* x_5; +x_4 = l_Lean_Elab_Structural_recArgHasLooseBVarsAt(x_1, x_2, x_3); +lean_dec(x_2); +x_5 = lean_box(x_4); +return x_5; +} +} +uint8_t l___private_Lean_Elab_PreDefinition_Structural_Basic_0__Lean_Elab_Structural_containsRecFn___lambda__1(lean_object* x_1, lean_object* x_2) { +_start: +{ +uint8_t x_3; +x_3 = l_Lean_Expr_isConstOf(x_2, x_1); +return x_3; +} +} +uint8_t l___private_Lean_Elab_PreDefinition_Structural_Basic_0__Lean_Elab_Structural_containsRecFn(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; size_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; +x_3 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_Basic_0__Lean_Elab_Structural_containsRecFn___lambda__1___boxed), 2, 1); +lean_closure_set(x_3, 0, x_1); +x_4 = 8192; +x_5 = l_Lean_Expr_FindImpl_initCache; +x_6 = l_Lean_Expr_FindImpl_findM_x3f_visit(x_3, x_4, x_2, x_5); +x_7 = lean_ctor_get(x_6, 0); +lean_inc(x_7); +lean_dec(x_6); +if (lean_obj_tag(x_7) == 0) +{ +uint8_t x_8; +x_8 = 0; +return x_8; +} +else +{ +uint8_t x_9; +lean_dec(x_7); +x_9 = 1; +return x_9; +} +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_Basic_0__Lean_Elab_Structural_containsRecFn___lambda__1___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +uint8_t x_3; lean_object* x_4; +x_3 = l___private_Lean_Elab_PreDefinition_Structural_Basic_0__Lean_Elab_Structural_containsRecFn___lambda__1(x_1, x_2); +lean_dec(x_2); +lean_dec(x_1); +x_4 = lean_box(x_3); +return x_4; +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_Basic_0__Lean_Elab_Structural_containsRecFn___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +uint8_t x_3; lean_object* x_4; +x_3 = l___private_Lean_Elab_PreDefinition_Structural_Basic_0__Lean_Elab_Structural_containsRecFn(x_1, x_2); +x_4 = lean_box(x_3); +return x_4; +} +} +static lean_object* _init_l_Lean_Elab_Structural_ensureNoRecFn___lambda__1___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("unexpected occurrence of recursive application"); +return x_1; +} +} +static lean_object* _init_l_Lean_Elab_Structural_ensureNoRecFn___lambda__1___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Elab_Structural_ensureNoRecFn___lambda__1___closed__1; +x_2 = l_Lean_stringToMessageData(x_1); +return x_2; +} +} +static lean_object* _init_l_Lean_Elab_Structural_ensureNoRecFn___lambda__1___closed__3() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string(""); +return x_1; +} +} +static lean_object* _init_l_Lean_Elab_Structural_ensureNoRecFn___lambda__1___closed__4() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Elab_Structural_ensureNoRecFn___lambda__1___closed__3; +x_2 = l_Lean_stringToMessageData(x_1); +return x_2; +} +} +lean_object* l_Lean_Elab_Structural_ensureNoRecFn___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: +{ +uint8_t x_8; +x_8 = l_Lean_Expr_isAppOf(x_2, x_1); +if (x_8 == 0) +{ +lean_object* x_9; lean_object* x_10; +lean_dec(x_2); +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_7); +return x_10; +} +else +{ +lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; +x_11 = l_Lean_indentExpr(x_2); +x_12 = l_Lean_Elab_Structural_ensureNoRecFn___lambda__1___closed__2; +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_Lean_Elab_Structural_ensureNoRecFn___lambda__1___closed__4; +x_15 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_15, 0, x_13); +lean_ctor_set(x_15, 1, x_14); +x_16 = l_Lean_throwError___at_Lean_Meta_setInlineAttribute___spec__1(x_15, x_3, x_4, x_5, x_6, x_7); +return x_16; +} +} +} +lean_object* l_Lean_Elab_Structural_ensureNoRecFn(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: +{ +uint8_t x_8; +lean_inc(x_2); +lean_inc(x_1); +x_8 = l___private_Lean_Elab_PreDefinition_Structural_Basic_0__Lean_Elab_Structural_containsRecFn(x_1, x_2); +if (x_8 == 0) +{ +lean_object* x_9; +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_1); +x_9 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_9, 0, x_2); +lean_ctor_set(x_9, 1, x_7); +return x_9; +} +else +{ +lean_object* x_10; lean_object* x_11; +x_10 = lean_alloc_closure((void*)(l_Lean_Elab_Structural_ensureNoRecFn___lambda__1___boxed), 7, 1); +lean_closure_set(x_10, 0, x_1); +lean_inc(x_2); +x_11 = l_Lean_Meta_forEachExpr(x_2, x_10, x_3, x_4, x_5, x_6, x_7); +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; +x_13 = lean_ctor_get(x_11, 0); +lean_dec(x_13); +lean_ctor_set(x_11, 0, x_2); +return x_11; +} +else +{ +lean_object* x_14; lean_object* x_15; +x_14 = lean_ctor_get(x_11, 1); +lean_inc(x_14); +lean_dec(x_11); +x_15 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_15, 0, x_2); +lean_ctor_set(x_15, 1, x_14); +return x_15; +} +} +else +{ +uint8_t x_16; +lean_dec(x_2); +x_16 = !lean_is_exclusive(x_11); +if (x_16 == 0) +{ +return x_11; +} +else +{ +lean_object* x_17; lean_object* x_18; lean_object* 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_alloc_ctor(1, 2, 0); +lean_ctor_set(x_19, 0, x_17); +lean_ctor_set(x_19, 1, x_18); +return x_19; +} +} +} +} +} +lean_object* l_Lean_Elab_Structural_ensureNoRecFn___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_Elab_Structural_ensureNoRecFn___lambda__1(x_1, x_2, x_3, x_4, x_5, x_6, x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_1); +return x_8; +} +} +lean_object* initialize_Init(lean_object*); +lean_object* initialize_Lean_Meta_Basic(lean_object*); +lean_object* initialize_Lean_Meta_ForEachExpr(lean_object*); +static bool _G_initialized = false; +lean_object* initialize_Lean_Elab_PreDefinition_Structural_Basic(lean_object* w) { +lean_object * res; +if (_G_initialized) return lean_io_result_mk_ok(lean_box(0)); +_G_initialized = true; +res = initialize_Init(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); +res = initialize_Lean_Meta_Basic(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); +res = initialize_Lean_Meta_ForEachExpr(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); +l_Lean_Elab_Structural_State_matcherBelowDep___default = _init_l_Lean_Elab_Structural_State_matcherBelowDep___default(); +lean_mark_persistent(l_Lean_Elab_Structural_State_matcherBelowDep___default); +l_Lean_Elab_Structural_State_addMatchers___default___closed__1 = _init_l_Lean_Elab_Structural_State_addMatchers___default___closed__1(); +lean_mark_persistent(l_Lean_Elab_Structural_State_addMatchers___default___closed__1); +l_Lean_Elab_Structural_State_addMatchers___default = _init_l_Lean_Elab_Structural_State_addMatchers___default(); +lean_mark_persistent(l_Lean_Elab_Structural_State_addMatchers___default); +l_Lean_Elab_Structural_instInhabitedM___closed__1 = _init_l_Lean_Elab_Structural_instInhabitedM___closed__1(); +lean_mark_persistent(l_Lean_Elab_Structural_instInhabitedM___closed__1); +l_Lean_Elab_Structural_instInhabitedM___closed__2 = _init_l_Lean_Elab_Structural_instInhabitedM___closed__2(); +lean_mark_persistent(l_Lean_Elab_Structural_instInhabitedM___closed__2); +l_Lean_Elab_Structural_instInhabitedM___closed__3 = _init_l_Lean_Elab_Structural_instInhabitedM___closed__3(); +lean_mark_persistent(l_Lean_Elab_Structural_instInhabitedM___closed__3); +l_Lean_Elab_Structural_ensureNoRecFn___lambda__1___closed__1 = _init_l_Lean_Elab_Structural_ensureNoRecFn___lambda__1___closed__1(); +lean_mark_persistent(l_Lean_Elab_Structural_ensureNoRecFn___lambda__1___closed__1); +l_Lean_Elab_Structural_ensureNoRecFn___lambda__1___closed__2 = _init_l_Lean_Elab_Structural_ensureNoRecFn___lambda__1___closed__2(); +lean_mark_persistent(l_Lean_Elab_Structural_ensureNoRecFn___lambda__1___closed__2); +l_Lean_Elab_Structural_ensureNoRecFn___lambda__1___closed__3 = _init_l_Lean_Elab_Structural_ensureNoRecFn___lambda__1___closed__3(); +lean_mark_persistent(l_Lean_Elab_Structural_ensureNoRecFn___lambda__1___closed__3); +l_Lean_Elab_Structural_ensureNoRecFn___lambda__1___closed__4 = _init_l_Lean_Elab_Structural_ensureNoRecFn___lambda__1___closed__4(); +lean_mark_persistent(l_Lean_Elab_Structural_ensureNoRecFn___lambda__1___closed__4); +return lean_io_result_mk_ok(lean_box(0)); +} +#ifdef __cplusplus +} +#endif diff --git a/stage0/stdlib/Lean/Elab/PreDefinition/Structural/Eqns.c b/stage0/stdlib/Lean/Elab/PreDefinition/Structural/Eqns.c new file mode 100644 index 0000000000..a57d8c113e --- /dev/null +++ b/stage0/stdlib/Lean/Elab/PreDefinition/Structural/Eqns.c @@ -0,0 +1,328 @@ +// Lean compiler output +// Module: Lean.Elab.PreDefinition.Structural.Eqns +// Imports: Init Lean.Elab.PreDefinition.Basic Lean.Elab.PreDefinition.Structural.Basic +#include +#if defined(__clang__) +#pragma clang diagnostic ignored "-Wunused-parameter" +#pragma clang diagnostic ignored "-Wunused-label" +#elif defined(__GNUC__) && !defined(__CLANG__) +#pragma GCC diagnostic ignored "-Wunused-parameter" +#pragma GCC diagnostic ignored "-Wunused-label" +#pragma GCC diagnostic ignored "-Wunused-but-set-variable" +#endif +#ifdef __cplusplus +extern "C" { +#endif +lean_object* l_Lean_registerTraceClass(lean_object*, lean_object*); +lean_object* l_Lean_stringToMessageData(lean_object*); +lean_object* lean_name_mk_string(lean_object*, lean_object*); +lean_object* lean_st_ref_get(lean_object*, lean_object*); +lean_object* l_Lean_Elab_Structural_mkEqns___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Structural_mkEqns___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_Elab_Structural_mkEqns___closed__10; +static lean_object* l_Lean_Elab_Structural_mkEqns___closed__1; +static lean_object* l_Lean_Elab_Structural_mkEqns___closed__8; +static lean_object* l_Lean_Elab_Structural_mkEqns___closed__4; +static lean_object* l_Lean_Elab_Structural_mkEqns___closed__9; +static lean_object* l_Lean_Elab_Structural_mkEqns___closed__7; +static lean_object* l_Lean_Elab_Structural_mkEqns___closed__3; +static lean_object* l_Lean_Elab_Structural_mkEqns___closed__5; +static lean_object* l_Lean_Elab_Structural_mkEqns___closed__12; +static lean_object* l_Lean_Elab_Structural_mkEqns___closed__6; +lean_object* l_Lean_addTrace___at___private_Lean_Elab_Term_0__Lean_Elab_Term_postponeElabTerm___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_Elab_Structural_mkEqns___closed__13; +lean_object* l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at___private_Lean_Elab_Term_0__Lean_Elab_Term_postponeElabTerm___spec__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Structural_mkEqns___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_Elab_Structural_mkEqns___closed__2; +static lean_object* l_Lean_Elab_Structural_mkEqns___closed__11; +lean_object* l_Lean_Elab_Structural_mkEqns(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Structural_initFn____x40_Lean_Elab_PreDefinition_Structural_Eqns___hyg_80_(lean_object*); +lean_object* l_Lean_Elab_Structural_mkEqns___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_Elab_Structural_mkEqns___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("Elab"); +return x_1; +} +} +static lean_object* _init_l_Lean_Elab_Structural_mkEqns___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l_Lean_Elab_Structural_mkEqns___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +static lean_object* _init_l_Lean_Elab_Structural_mkEqns___closed__3() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("definition"); +return x_1; +} +} +static lean_object* _init_l_Lean_Elab_Structural_mkEqns___closed__4() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Elab_Structural_mkEqns___closed__2; +x_2 = l_Lean_Elab_Structural_mkEqns___closed__3; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +static lean_object* _init_l_Lean_Elab_Structural_mkEqns___closed__5() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("structural"); +return x_1; +} +} +static lean_object* _init_l_Lean_Elab_Structural_mkEqns___closed__6() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Elab_Structural_mkEqns___closed__4; +x_2 = l_Lean_Elab_Structural_mkEqns___closed__5; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +static lean_object* _init_l_Lean_Elab_Structural_mkEqns___closed__7() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("eqns"); +return x_1; +} +} +static lean_object* _init_l_Lean_Elab_Structural_mkEqns___closed__8() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Elab_Structural_mkEqns___closed__6; +x_2 = l_Lean_Elab_Structural_mkEqns___closed__7; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +static lean_object* _init_l_Lean_Elab_Structural_mkEqns___closed__9() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_Elab_Structural_mkEqns___lambda__1___boxed), 8, 0); +return x_1; +} +} +static lean_object* _init_l_Lean_Elab_Structural_mkEqns___closed__10() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("mkEqns:\n"); +return x_1; +} +} +static lean_object* _init_l_Lean_Elab_Structural_mkEqns___closed__11() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Elab_Structural_mkEqns___closed__10; +x_2 = l_Lean_stringToMessageData(x_1); +return x_2; +} +} +static lean_object* _init_l_Lean_Elab_Structural_mkEqns___closed__12() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string(""); +return x_1; +} +} +static lean_object* _init_l_Lean_Elab_Structural_mkEqns___closed__13() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Elab_Structural_mkEqns___closed__12; +x_2 = l_Lean_stringToMessageData(x_1); +return x_2; +} +} +lean_object* l_Lean_Elab_Structural_mkEqns(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; uint8_t x_10; lean_object* x_11; lean_object* x_26; lean_object* x_27; lean_object* x_28; uint8_t x_29; +x_9 = l_Lean_Elab_Structural_mkEqns___closed__8; +x_26 = lean_st_ref_get(x_7, x_8); +x_27 = lean_ctor_get(x_26, 0); +lean_inc(x_27); +x_28 = lean_ctor_get(x_27, 3); +lean_inc(x_28); +lean_dec(x_27); +x_29 = lean_ctor_get_uint8(x_28, sizeof(void*)*1); +lean_dec(x_28); +if (x_29 == 0) +{ +lean_object* x_30; uint8_t x_31; +x_30 = lean_ctor_get(x_26, 1); +lean_inc(x_30); +lean_dec(x_26); +x_31 = 0; +x_10 = x_31; +x_11 = x_30; +goto block_25; +} +else +{ +lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; uint8_t x_36; +x_32 = lean_ctor_get(x_26, 1); +lean_inc(x_32); +lean_dec(x_26); +x_33 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at___private_Lean_Elab_Term_0__Lean_Elab_Term_postponeElabTerm___spec__2(x_9, x_2, x_3, x_4, x_5, x_6, x_7, x_32); +x_34 = lean_ctor_get(x_33, 0); +lean_inc(x_34); +x_35 = lean_ctor_get(x_33, 1); +lean_inc(x_35); +lean_dec(x_33); +x_36 = lean_unbox(x_34); +lean_dec(x_34); +x_10 = x_36; +x_11 = x_35; +goto block_25; +} +block_25: +{ +lean_object* x_12; +x_12 = l_Lean_Elab_Structural_mkEqns___closed__9; +if (x_10 == 0) +{ +lean_object* x_13; lean_object* x_14; +x_13 = lean_box(0); +x_14 = lean_apply_8(x_12, x_13, x_2, x_3, x_4, x_5, x_6, x_7, x_11); +return x_14; +} +else +{ +lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; +x_15 = lean_ctor_get(x_1, 5); +lean_inc(x_15); +x_16 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_16, 0, x_15); +x_17 = l_Lean_Elab_Structural_mkEqns___closed__11; +x_18 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_18, 0, x_17); +lean_ctor_set(x_18, 1, x_16); +x_19 = l_Lean_Elab_Structural_mkEqns___closed__13; +x_20 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_20, 0, x_18); +lean_ctor_set(x_20, 1, x_19); +x_21 = l_Lean_addTrace___at___private_Lean_Elab_Term_0__Lean_Elab_Term_postponeElabTerm___spec__1(x_9, x_20, x_2, x_3, x_4, x_5, x_6, x_7, x_11); +x_22 = lean_ctor_get(x_21, 0); +lean_inc(x_22); +x_23 = lean_ctor_get(x_21, 1); +lean_inc(x_23); +lean_dec(x_21); +x_24 = lean_apply_8(x_12, x_22, x_2, x_3, x_4, x_5, x_6, x_7, x_23); +return x_24; +} +} +} +} +lean_object* l_Lean_Elab_Structural_mkEqns___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_Elab_Structural_mkEqns___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_object* l_Lean_Elab_Structural_mkEqns___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_Elab_Structural_mkEqns(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8); +lean_dec(x_1); +return x_9; +} +} +lean_object* l_Lean_Elab_Structural_initFn____x40_Lean_Elab_PreDefinition_Structural_Eqns___hyg_80_(lean_object* x_1) { +_start: +{ +lean_object* x_2; lean_object* x_3; +x_2 = l_Lean_Elab_Structural_mkEqns___closed__8; +x_3 = l_Lean_registerTraceClass(x_2, x_1); +return x_3; +} +} +lean_object* initialize_Init(lean_object*); +lean_object* initialize_Lean_Elab_PreDefinition_Basic(lean_object*); +lean_object* initialize_Lean_Elab_PreDefinition_Structural_Basic(lean_object*); +static bool _G_initialized = false; +lean_object* initialize_Lean_Elab_PreDefinition_Structural_Eqns(lean_object* w) { +lean_object * res; +if (_G_initialized) return lean_io_result_mk_ok(lean_box(0)); +_G_initialized = true; +res = initialize_Init(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); +res = initialize_Lean_Elab_PreDefinition_Basic(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); +res = initialize_Lean_Elab_PreDefinition_Structural_Basic(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); +l_Lean_Elab_Structural_mkEqns___closed__1 = _init_l_Lean_Elab_Structural_mkEqns___closed__1(); +lean_mark_persistent(l_Lean_Elab_Structural_mkEqns___closed__1); +l_Lean_Elab_Structural_mkEqns___closed__2 = _init_l_Lean_Elab_Structural_mkEqns___closed__2(); +lean_mark_persistent(l_Lean_Elab_Structural_mkEqns___closed__2); +l_Lean_Elab_Structural_mkEqns___closed__3 = _init_l_Lean_Elab_Structural_mkEqns___closed__3(); +lean_mark_persistent(l_Lean_Elab_Structural_mkEqns___closed__3); +l_Lean_Elab_Structural_mkEqns___closed__4 = _init_l_Lean_Elab_Structural_mkEqns___closed__4(); +lean_mark_persistent(l_Lean_Elab_Structural_mkEqns___closed__4); +l_Lean_Elab_Structural_mkEqns___closed__5 = _init_l_Lean_Elab_Structural_mkEqns___closed__5(); +lean_mark_persistent(l_Lean_Elab_Structural_mkEqns___closed__5); +l_Lean_Elab_Structural_mkEqns___closed__6 = _init_l_Lean_Elab_Structural_mkEqns___closed__6(); +lean_mark_persistent(l_Lean_Elab_Structural_mkEqns___closed__6); +l_Lean_Elab_Structural_mkEqns___closed__7 = _init_l_Lean_Elab_Structural_mkEqns___closed__7(); +lean_mark_persistent(l_Lean_Elab_Structural_mkEqns___closed__7); +l_Lean_Elab_Structural_mkEqns___closed__8 = _init_l_Lean_Elab_Structural_mkEqns___closed__8(); +lean_mark_persistent(l_Lean_Elab_Structural_mkEqns___closed__8); +l_Lean_Elab_Structural_mkEqns___closed__9 = _init_l_Lean_Elab_Structural_mkEqns___closed__9(); +lean_mark_persistent(l_Lean_Elab_Structural_mkEqns___closed__9); +l_Lean_Elab_Structural_mkEqns___closed__10 = _init_l_Lean_Elab_Structural_mkEqns___closed__10(); +lean_mark_persistent(l_Lean_Elab_Structural_mkEqns___closed__10); +l_Lean_Elab_Structural_mkEqns___closed__11 = _init_l_Lean_Elab_Structural_mkEqns___closed__11(); +lean_mark_persistent(l_Lean_Elab_Structural_mkEqns___closed__11); +l_Lean_Elab_Structural_mkEqns___closed__12 = _init_l_Lean_Elab_Structural_mkEqns___closed__12(); +lean_mark_persistent(l_Lean_Elab_Structural_mkEqns___closed__12); +l_Lean_Elab_Structural_mkEqns___closed__13 = _init_l_Lean_Elab_Structural_mkEqns___closed__13(); +lean_mark_persistent(l_Lean_Elab_Structural_mkEqns___closed__13); +res = l_Lean_Elab_Structural_initFn____x40_Lean_Elab_PreDefinition_Structural_Eqns___hyg_80_(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); +return lean_io_result_mk_ok(lean_box(0)); +} +#ifdef __cplusplus +} +#endif diff --git a/stage0/stdlib/Lean/Elab/PreDefinition/Structural/FindRecArg.c b/stage0/stdlib/Lean/Elab/PreDefinition/Structural/FindRecArg.c new file mode 100644 index 0000000000..e4191537b7 --- /dev/null +++ b/stage0/stdlib/Lean/Elab/PreDefinition/Structural/FindRecArg.c @@ -0,0 +1,3763 @@ +// Lean compiler output +// Module: Lean.Elab.PreDefinition.Structural.FindRecArg +// Imports: Init Lean.Elab.PreDefinition.Structural.Basic +#include +#if defined(__clang__) +#pragma clang diagnostic ignored "-Wunused-parameter" +#pragma clang diagnostic ignored "-Wunused-label" +#elif defined(__GNUC__) && !defined(__CLANG__) +#pragma GCC diagnostic ignored "-Wunused-parameter" +#pragma GCC diagnostic ignored "-Wunused-label" +#pragma GCC diagnostic ignored "-Wunused-but-set-variable" +#endif +#ifdef __cplusplus +extern "C" { +#endif +lean_object* l___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_hasBadParamDep_x3f___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +size_t l_USize_add(size_t, size_t); +lean_object* l_Lean_stringToMessageData(lean_object*); +static lean_object* l___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_throwStructuralFailed___rarg___closed__2; +lean_object* l_Lean_mkSort(lean_object*); +lean_object* l___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_getIndexMinPos_match__1___rarg(lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__12; +lean_object* l___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_getIndexMinPos(lean_object*, lean_object*); +lean_object* l_Lean_isInductivePredicate___at_Lean_Elab_Structural_findRecArg_loop___spec__3___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* lean_name_mk_string(lean_object*, lean_object*); +uint8_t l_USize_decEq(size_t, size_t); +lean_object* lean_array_uget(lean_object*, size_t); +static lean_object* l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__18; +lean_object* l___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_orelse_x27___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Structural_findRecArg_loop_match__2___rarg(lean_object*, lean_object*, lean_object*); +lean_object* lean_array_uset(lean_object*, size_t, lean_object*); +lean_object* l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_throwStructuralFailed___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_extract___rarg(lean_object*, lean_object*, lean_object*); +static lean_object* l___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_throwStructuralFailed___rarg___closed__1; +static lean_object* l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__5; +lean_object* lean_environment_find(lean_object*, lean_object*); +lean_object* l_Lean_throwError___at_Lean_Elab_Structural_findRecArg_loop___spec__5___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_dependsOn(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* lean_st_ref_get(lean_object*, lean_object*); +lean_object* l_Lean_throwError___at_Lean_Elab_Structural_findRecArg_loop___spec__5(lean_object*); +lean_object* l_Lean_Elab_Structural_findRecArg___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_throwError___at_Lean_Elab_Structural_findRecArg_loop___spec__9(lean_object*); +extern lean_object* l_instInhabitedNat; +static lean_object* l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__13; +lean_object* lean_array_get_size(lean_object*); +lean_object* l___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_getIndexMinPos_match__1___boxed(lean_object*, lean_object*); +lean_object* l_Lean_throwError___at_Lean_Elab_Structural_findRecArg_loop___spec__11___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_findRecArg_loop___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_throwError___at_Lean_Elab_Structural_findRecArg_loop___spec__5___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_findRecArg_loop___spec__2___closed__1; +static lean_object* l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_findRecArg_loop___spec__2___closed__2; +uint8_t l_USize_decLt(size_t, size_t); +lean_object* l___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_hasBadIndexDep_x3f___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +extern lean_object* l_Lean_binductionOnSuffix; +extern lean_object* l_Lean_levelZero; +lean_object* lean_nat_add(lean_object*, lean_object*); +lean_object* l_Array_anyMUnsafe_any___at_Lean_Elab_Structural_findRecArg_loop___spec__10___boxed(lean_object*, lean_object*, lean_object*); +lean_object* l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_getIndexMinPos___spec__2(lean_object*, lean_object*, size_t, size_t, lean_object*); +lean_object* l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_hasBadIndexDep_x3f___spec__4___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__17; +lean_object* l___private_Lean_Expr_0__Lean_Expr_getAppArgsAux(lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__4; +lean_object* l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_throwStructuralFailed___spec__1(lean_object*); +lean_object* lean_array_fget(lean_object*, lean_object*); +uint8_t lean_nat_dec_eq(lean_object*, lean_object*); +lean_object* l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_getIndexMinPos___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Structural_findRecArg(lean_object*); +lean_object* l_Lean_Elab_Structural_findRecArg_loop___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_isInductivePredicate___at_Lean_Elab_Structural_findRecArg_loop___spec__3(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* lean_nat_sub(lean_object*, lean_object*); +lean_object* l_Lean_Elab_Structural_findRecArg_loop_match__1___rarg(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_throwError___at_Lean_Elab_Structural_findRecArg_loop___spec__6(lean_object*); +uint8_t l_Array_anyMUnsafe_any___at_Lean_Elab_Structural_findRecArg_loop___spec__10(lean_object*, size_t, size_t); +lean_object* l_Lean_throwError___at_Lean_Elab_Structural_findRecArg_loop___spec__6___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_throwStructuralFailed___spec__1___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_throwError___at_Lean_Elab_Structural_findRecArg_loop___spec__11___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Expr_fvarId_x21(lean_object*); +static lean_object* l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__14; +lean_object* l___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_hasBadIndexDep_x3f_match__1(lean_object*); +lean_object* l___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_throwStructuralFailed___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__5; +lean_object* l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_hasBadParamDep_x3f___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_Elab_Structural_findRecArg_loop___rarg___closed__3; +lean_object* l___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_throwStructuralFailed(lean_object*); +static lean_object* l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__15; +static lean_object* l_Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__3; +lean_object* l_Nat_repr(lean_object*); +static lean_object* l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__1; +lean_object* l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_findRecArg_loop___spec__2(lean_object*, size_t, size_t, lean_object*); +lean_object* l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_hasBadParamDep_x3f___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*); +uint8_t l_Array_anyMUnsafe_any___at___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_hasBadIndexDep_x3f___spec__2(lean_object*, lean_object*, size_t, size_t); +static lean_object* l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__8; +static lean_object* l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__2; +lean_object* l_Lean_hasConst___at_Lean_Elab_Structural_findRecArg_loop___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_hasBadParamDep_x3f___spec__2(lean_object*, lean_object*, lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +uint8_t l_Lean_Environment_contains(lean_object*, lean_object*); +lean_object* l_Lean_Elab_Structural_findRecArg_loop(lean_object*); +lean_object* l___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_hasBadIndexDep_x3f___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__9; +lean_object* l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_hasBadIndexDep_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*); +uint8_t l___private_Init_Data_Array_Basic_0__Array_allDiffAux___at_Lean_Elab_Structural_findRecArg_loop___spec__7(lean_object*, lean_object*); +static lean_object* l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__6; +static lean_object* l_Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__2; +uint8_t l_Lean_isInductivePredicate_visit(lean_object*); +lean_object* l_Lean_throwError___at_Lean_Elab_Structural_findRecArg_loop___spec__11(lean_object*); +lean_object* l___private_Init_Util_0__mkPanicMessageWithDecl(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_anyMUnsafe_any___at___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_hasBadIndexDep_x3f___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_throwError___at_Lean_Elab_Structural_findRecArg_loop___spec__9___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_mapErrorImp___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Structural_findRecArg_loop_match__1(lean_object*, lean_object*); +lean_object* l___private_Init_Data_Array_Basic_0__Array_allDiffAux___at_Lean_Elab_Structural_findRecArg_loop___spec__7___boxed(lean_object*, lean_object*); +size_t lean_usize_of_nat(lean_object*); +static lean_object* l_Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__4; +lean_object* l_Lean_setEnv___at_Lean_Meta_setInlineAttribute___spec__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Structural_findRecArg_loop___rarg___lambda__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__1; +lean_object* l_Array_indexOfAux___at___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_getIndexMinPos___spec__1___boxed(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Structural_findRecArg_loop_match__2(lean_object*); +lean_object* l___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_getIndexMinPos___boxed(lean_object*, lean_object*); +lean_object* l_Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___boxed(lean_object*, lean_object*); +lean_object* l_Lean_LocalDecl_type(lean_object*); +lean_object* l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_hasBadIndexDep_x3f___spec__4(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* l_Lean_Elab_Structural_findRecArg_loop_match__1___boxed(lean_object*, lean_object*); +lean_object* l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_hasBadIndexDep_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* l_Lean_Expr_getAppNumArgsAux(lean_object*, lean_object*); +uint8_t l_Array_contains___at___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_hasBadIndexDep_x3f___spec__1(lean_object*, lean_object*); +lean_object* l_Array_indexOfAux___at___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_getIndexMinPos___spec__1(lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_hasBadParamDep_x3f(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__6; +lean_object* l___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_hasBadIndexDep_x3f_match__1___rarg(lean_object*, lean_object*, lean_object*); +uint8_t lean_expr_eqv(lean_object*, lean_object*); +lean_object* l___private_Init_Data_Array_Basic_0__Array_allDiffAuxAux___at_Lean_Elab_Structural_findRecArg_loop___spec__8___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +uint8_t lean_nat_dec_le(lean_object*, lean_object*); +static lean_object* l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_findRecArg_loop___spec__2___closed__3; +lean_object* lean_panic_fn(lean_object*, lean_object*); +lean_object* l_Array_contains___at___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_hasBadIndexDep_x3f___spec__1___boxed(lean_object*, lean_object*); +lean_object* l_Lean_throwError___at_Lean_Elab_Structural_findRecArg_loop___spec__9___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_hasConst___at_Lean_Elab_Structural_findRecArg_loop___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_hasBadParamDep_x3f___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*); +lean_object* l_ReaderT_bind___at_Lean_Elab_Structural_findRecArg_loop___spec__4(lean_object*, lean_object*); +lean_object* lean_st_ref_set(lean_object*, lean_object*, lean_object*); +uint8_t l_Lean_Expr_isFVar(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*); +static lean_object* l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__7; +lean_object* lean_infer_type(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_findRecArg_loop___spec__2___closed__4; +uint8_t l___private_Init_Data_Array_Basic_0__Array_allDiffAuxAux___at_Lean_Elab_Structural_findRecArg_loop___spec__8(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_hasBadIndexDep_x3f___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__16; +lean_object* lean_mk_array(lean_object*, lean_object*); +lean_object* l_Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1(lean_object*, lean_object*); +lean_object* l_Lean_indentD(lean_object*); +lean_object* l_Lean_Meta_whnfD(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +extern lean_object* l_Lean_brecOnSuffix; +lean_object* l_Lean_Expr_getAppFn(lean_object*); +lean_object* l_unsafeCast(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_throwError___at_Lean_Elab_Structural_findRecArg_loop___spec__6___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__11; +lean_object* l_Lean_Meta_setMCtx(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_indentExpr(lean_object*); +static lean_object* l___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_orelse_x27___rarg___closed__1; +lean_object* l___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_getIndexMinPos_match__1(lean_object*, lean_object*); +lean_object* l___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_orelse_x27(lean_object*); +lean_object* l_ReaderT_bind___at_Lean_Elab_Structural_findRecArg_loop___spec__4___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_hasBadIndexDep_x3f(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_hasBadIndexDep_x3f___closed__1; +uint8_t l_Lean_LocalDecl_isLet(lean_object*); +uint8_t lean_nat_dec_lt(lean_object*, lean_object*); +static lean_object* l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__10; +lean_object* l_Lean_Meta_getFVarLocalDecl(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_getIndexMinPos_match__1___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +if (lean_obj_tag(x_1) == 0) +{ +lean_object* x_4; +lean_dec(x_2); +x_4 = lean_apply_1(x_3, x_1); +return x_4; +} +else +{ +lean_object* x_5; lean_object* x_6; +lean_dec(x_3); +x_5 = lean_ctor_get(x_1, 0); +lean_inc(x_5); +lean_dec(x_1); +x_6 = lean_apply_1(x_2, x_5); +return x_6; +} +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_getIndexMinPos_match__1(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_getIndexMinPos_match__1___rarg), 3, 0); +return x_3; +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_getIndexMinPos_match__1___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = l___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_getIndexMinPos_match__1(x_1, x_2); +lean_dec(x_1); +return x_3; +} +} +lean_object* l_Array_indexOfAux___at___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_getIndexMinPos___spec__1(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; uint8_t x_5; +x_4 = lean_array_get_size(x_1); +x_5 = lean_nat_dec_lt(x_3, x_4); +lean_dec(x_4); +if (x_5 == 0) +{ +lean_object* x_6; +lean_dec(x_3); +x_6 = lean_box(0); +return x_6; +} +else +{ +lean_object* x_7; uint8_t x_8; +x_7 = lean_array_fget(x_1, x_3); +x_8 = lean_expr_eqv(x_7, x_2); +lean_dec(x_7); +if (x_8 == 0) +{ +lean_object* x_9; lean_object* x_10; +x_9 = lean_unsigned_to_nat(1u); +x_10 = lean_nat_add(x_3, x_9); +lean_dec(x_3); +x_3 = x_10; +goto _start; +} +else +{ +lean_object* x_12; +x_12 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_12, 0, x_3); +return x_12; +} +} +} +} +lean_object* l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_getIndexMinPos___spec__2(lean_object* x_1, lean_object* x_2, size_t x_3, size_t x_4, lean_object* x_5) { +_start: +{ +uint8_t x_6; +x_6 = x_4 < x_3; +if (x_6 == 0) +{ +return x_5; +} +else +{ +lean_object* x_7; lean_object* x_8; lean_object* x_9; +x_7 = lean_array_uget(x_2, x_4); +x_8 = lean_unsigned_to_nat(0u); +x_9 = l_Array_indexOfAux___at___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_getIndexMinPos___spec__1(x_1, x_7, x_8); +lean_dec(x_7); +if (lean_obj_tag(x_9) == 0) +{ +size_t x_10; size_t x_11; +x_10 = 1; +x_11 = x_4 + x_10; +x_4 = x_11; +goto _start; +} +else +{ +lean_object* x_13; uint8_t x_14; +x_13 = lean_ctor_get(x_9, 0); +lean_inc(x_13); +lean_dec(x_9); +x_14 = lean_nat_dec_lt(x_13, x_5); +if (x_14 == 0) +{ +size_t x_15; size_t x_16; +lean_dec(x_13); +x_15 = 1; +x_16 = x_4 + x_15; +x_4 = x_16; +goto _start; +} +else +{ +size_t x_18; size_t x_19; +lean_dec(x_5); +x_18 = 1; +x_19 = x_4 + x_18; +x_4 = x_19; +x_5 = x_13; +goto _start; +} +} +} +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_getIndexMinPos(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; lean_object* x_4; size_t x_5; size_t x_6; lean_object* x_7; +x_3 = lean_array_get_size(x_1); +x_4 = lean_array_get_size(x_2); +x_5 = lean_usize_of_nat(x_4); +lean_dec(x_4); +x_6 = 0; +x_7 = l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_getIndexMinPos___spec__2(x_1, x_2, x_5, x_6, x_3); +return x_7; +} +} +lean_object* l_Array_indexOfAux___at___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_getIndexMinPos___spec__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; +x_4 = l_Array_indexOfAux___at___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_getIndexMinPos___spec__1(x_1, x_2, x_3); +lean_dec(x_2); +lean_dec(x_1); +return x_4; +} +} +lean_object* l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_getIndexMinPos___spec__2___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { +_start: +{ +size_t x_6; size_t x_7; lean_object* x_8; +x_6 = lean_unbox_usize(x_3); +lean_dec(x_3); +x_7 = lean_unbox_usize(x_4); +lean_dec(x_4); +x_8 = l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_getIndexMinPos___spec__2(x_1, x_2, x_6, x_7, x_5); +lean_dec(x_2); +lean_dec(x_1); +return x_8; +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_getIndexMinPos___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = l___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_getIndexMinPos(x_1, x_2); +lean_dec(x_2); +lean_dec(x_1); +return x_3; +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_hasBadIndexDep_x3f_match__1___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +if (lean_obj_tag(x_1) == 0) +{ +lean_object* x_4; lean_object* x_5; +lean_dec(x_3); +x_4 = lean_box(0); +x_5 = lean_apply_1(x_2, x_4); +return x_5; +} +else +{ +lean_object* x_6; lean_object* x_7; +lean_dec(x_2); +x_6 = lean_ctor_get(x_1, 0); +lean_inc(x_6); +lean_dec(x_1); +x_7 = lean_apply_1(x_3, x_6); +return x_7; +} +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_hasBadIndexDep_x3f_match__1(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_hasBadIndexDep_x3f_match__1___rarg), 3, 0); +return x_2; +} +} +uint8_t l_Array_anyMUnsafe_any___at___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_hasBadIndexDep_x3f___spec__2(lean_object* x_1, lean_object* x_2, size_t x_3, size_t x_4) { +_start: +{ +uint8_t x_5; +x_5 = x_3 == x_4; +if (x_5 == 0) +{ +lean_object* x_6; uint8_t x_7; +x_6 = lean_array_uget(x_2, x_3); +x_7 = lean_expr_eqv(x_1, x_6); +lean_dec(x_6); +if (x_7 == 0) +{ +size_t x_8; size_t x_9; +x_8 = 1; +x_9 = x_3 + x_8; +x_3 = x_9; +goto _start; +} +else +{ +uint8_t x_11; +x_11 = 1; +return x_11; +} +} +else +{ +uint8_t x_12; +x_12 = 0; +return x_12; +} +} +} +uint8_t l_Array_contains___at___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_hasBadIndexDep_x3f___spec__1(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; lean_object* x_4; uint8_t x_5; +x_3 = lean_array_get_size(x_1); +x_4 = lean_unsigned_to_nat(0u); +x_5 = lean_nat_dec_lt(x_4, x_3); +if (x_5 == 0) +{ +uint8_t x_6; +lean_dec(x_3); +x_6 = 0; +return x_6; +} +else +{ +uint8_t x_7; +x_7 = lean_nat_dec_le(x_3, x_3); +if (x_7 == 0) +{ +uint8_t x_8; +lean_dec(x_3); +x_8 = 0; +return x_8; +} +else +{ +size_t x_9; size_t x_10; uint8_t x_11; +x_9 = 0; +x_10 = lean_usize_of_nat(x_3); +lean_dec(x_3); +x_11 = l_Array_anyMUnsafe_any___at___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_hasBadIndexDep_x3f___spec__2(x_2, x_1, x_9, x_10); +return x_11; +} +} +} +} +lean_object* l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_hasBadIndexDep_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) { +_start: +{ +uint8_t x_14; +x_14 = x_7 < x_6; +if (x_14 == 0) +{ +lean_object* x_15; +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +x_15 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_15, 0, x_8); +lean_ctor_set(x_15, 1, x_13); +return x_15; +} +else +{ +lean_object* x_16; lean_object* x_17; lean_object* x_18; uint8_t x_19; +lean_dec(x_8); +x_16 = lean_array_uget(x_5, x_7); +x_17 = l_Lean_Expr_fvarId_x21(x_16); +lean_inc(x_4); +x_18 = l_Lean_Meta_dependsOn(x_4, x_17, x_9, x_10, x_11, x_12, x_13); +lean_dec(x_17); +x_19 = !lean_is_exclusive(x_18); +if (x_19 == 0) +{ +lean_object* x_20; lean_object* x_21; uint8_t x_22; +x_20 = lean_ctor_get(x_18, 0); +x_21 = lean_ctor_get(x_18, 1); +x_22 = l_Array_contains___at___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_hasBadIndexDep_x3f___spec__1(x_1, x_16); +if (x_22 == 0) +{ +uint8_t x_23; +x_23 = lean_unbox(x_20); +lean_dec(x_20); +if (x_23 == 0) +{ +size_t x_24; size_t x_25; +lean_free_object(x_18); +lean_dec(x_16); +x_24 = 1; +x_25 = x_7 + x_24; +lean_inc(x_2); +{ +size_t _tmp_6 = x_25; +lean_object* _tmp_7 = x_2; +lean_object* _tmp_12 = x_21; +x_7 = _tmp_6; +x_8 = _tmp_7; +x_13 = _tmp_12; +} +goto _start; +} +else +{ +lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; +lean_dec(x_4); +lean_dec(x_2); +x_27 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_27, 0, x_3); +lean_ctor_set(x_27, 1, x_16); +x_28 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_28, 0, x_27); +x_29 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_29, 0, x_28); +x_30 = lean_box(0); +x_31 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_31, 0, x_29); +lean_ctor_set(x_31, 1, x_30); +lean_ctor_set(x_18, 0, x_31); +return x_18; +} +} +else +{ +size_t x_32; size_t x_33; +lean_free_object(x_18); +lean_dec(x_20); +lean_dec(x_16); +x_32 = 1; +x_33 = x_7 + x_32; +lean_inc(x_2); +{ +size_t _tmp_6 = x_33; +lean_object* _tmp_7 = x_2; +lean_object* _tmp_12 = x_21; +x_7 = _tmp_6; +x_8 = _tmp_7; +x_13 = _tmp_12; +} +goto _start; +} +} +else +{ +lean_object* x_35; lean_object* x_36; uint8_t x_37; +x_35 = lean_ctor_get(x_18, 0); +x_36 = lean_ctor_get(x_18, 1); +lean_inc(x_36); +lean_inc(x_35); +lean_dec(x_18); +x_37 = l_Array_contains___at___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_hasBadIndexDep_x3f___spec__1(x_1, x_16); +if (x_37 == 0) +{ +uint8_t x_38; +x_38 = lean_unbox(x_35); +lean_dec(x_35); +if (x_38 == 0) +{ +size_t x_39; size_t x_40; +lean_dec(x_16); +x_39 = 1; +x_40 = x_7 + x_39; +lean_inc(x_2); +{ +size_t _tmp_6 = x_40; +lean_object* _tmp_7 = x_2; +lean_object* _tmp_12 = x_36; +x_7 = _tmp_6; +x_8 = _tmp_7; +x_13 = _tmp_12; +} +goto _start; +} +else +{ +lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; +lean_dec(x_4); +lean_dec(x_2); +x_42 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_42, 0, x_3); +lean_ctor_set(x_42, 1, x_16); +x_43 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_43, 0, x_42); +x_44 = lean_alloc_ctor(1, 1, 0); +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); +lean_ctor_set(x_47, 1, x_36); +return x_47; +} +} +else +{ +size_t x_48; size_t x_49; +lean_dec(x_35); +lean_dec(x_16); +x_48 = 1; +x_49 = x_7 + x_48; +lean_inc(x_2); +{ +size_t _tmp_6 = x_49; +lean_object* _tmp_7 = x_2; +lean_object* _tmp_12 = x_36; +x_7 = _tmp_6; +x_8 = _tmp_7; +x_13 = _tmp_12; +} +goto _start; +} +} +} +} +} +lean_object* l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_hasBadIndexDep_x3f___spec__4(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) { +_start: +{ +uint8_t x_13; +x_13 = x_6 < x_5; +if (x_13 == 0) +{ +lean_object* x_14; +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_3); +x_14 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_14, 0, x_7); +lean_ctor_set(x_14, 1, x_12); +return x_14; +} +else +{ +lean_object* x_15; lean_object* x_16; +lean_dec(x_7); +x_15 = lean_array_uget(x_4, x_6); +lean_inc(x_11); +lean_inc(x_10); +lean_inc(x_9); +lean_inc(x_8); +lean_inc(x_15); +x_16 = lean_infer_type(x_15, x_8, x_9, x_10, x_11, x_12); +if (lean_obj_tag(x_16) == 0) +{ +lean_object* x_17; lean_object* x_18; lean_object* x_19; size_t x_20; size_t x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; +x_17 = lean_ctor_get(x_16, 0); +lean_inc(x_17); +x_18 = lean_ctor_get(x_16, 1); +lean_inc(x_18); +lean_dec(x_16); +x_19 = lean_array_get_size(x_1); +x_20 = lean_usize_of_nat(x_19); +lean_dec(x_19); +x_21 = 0; +lean_inc_n(x_3, 2); +x_22 = l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_hasBadIndexDep_x3f___spec__3(x_2, x_3, x_15, x_17, x_1, x_20, x_21, x_3, x_8, x_9, x_10, x_11, x_18); +x_23 = lean_ctor_get(x_22, 0); +lean_inc(x_23); +x_24 = lean_ctor_get(x_23, 0); +lean_inc(x_24); +lean_dec(x_23); +if (lean_obj_tag(x_24) == 0) +{ +lean_object* x_25; size_t x_26; size_t x_27; +x_25 = lean_ctor_get(x_22, 1); +lean_inc(x_25); +lean_dec(x_22); +x_26 = 1; +x_27 = x_6 + x_26; +lean_inc(x_3); +{ +size_t _tmp_5 = x_27; +lean_object* _tmp_6 = x_3; +lean_object* _tmp_11 = x_25; +x_6 = _tmp_5; +x_7 = _tmp_6; +x_12 = _tmp_11; +} +goto _start; +} +else +{ +uint8_t x_29; +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_3); +x_29 = !lean_is_exclusive(x_22); +if (x_29 == 0) +{ +lean_object* x_30; uint8_t x_31; +x_30 = lean_ctor_get(x_22, 0); +lean_dec(x_30); +x_31 = !lean_is_exclusive(x_24); +if (x_31 == 0) +{ +lean_object* x_32; lean_object* x_33; +x_32 = lean_box(0); +x_33 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_33, 0, x_24); +lean_ctor_set(x_33, 1, x_32); +lean_ctor_set(x_22, 0, x_33); +return x_22; +} +else +{ +lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; +x_34 = lean_ctor_get(x_24, 0); +lean_inc(x_34); +lean_dec(x_24); +x_35 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_35, 0, x_34); +x_36 = lean_box(0); +x_37 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_37, 0, x_35); +lean_ctor_set(x_37, 1, x_36); +lean_ctor_set(x_22, 0, x_37); +return x_22; +} +} +else +{ +lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; +x_38 = lean_ctor_get(x_22, 1); +lean_inc(x_38); +lean_dec(x_22); +x_39 = lean_ctor_get(x_24, 0); +lean_inc(x_39); +if (lean_is_exclusive(x_24)) { + lean_ctor_release(x_24, 0); + x_40 = x_24; +} else { + lean_dec_ref(x_24); + x_40 = lean_box(0); +} +if (lean_is_scalar(x_40)) { + x_41 = lean_alloc_ctor(1, 1, 0); +} else { + x_41 = x_40; +} +lean_ctor_set(x_41, 0, x_39); +x_42 = lean_box(0); +x_43 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_43, 0, x_41); +lean_ctor_set(x_43, 1, x_42); +x_44 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_44, 0, x_43); +lean_ctor_set(x_44, 1, x_38); +return x_44; +} +} +} +else +{ +uint8_t x_45; +lean_dec(x_15); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_3); +x_45 = !lean_is_exclusive(x_16); +if (x_45 == 0) +{ +return x_16; +} +else +{ +lean_object* x_46; lean_object* x_47; lean_object* x_48; +x_46 = lean_ctor_get(x_16, 0); +x_47 = lean_ctor_get(x_16, 1); +lean_inc(x_47); +lean_inc(x_46); +lean_dec(x_16); +x_48 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_48, 0, x_46); +lean_ctor_set(x_48, 1, x_47); +return x_48; +} +} +} +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_hasBadIndexDep_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) { +_start: +{ +lean_object* x_8; +x_8 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_8, 0, x_1); +lean_ctor_set(x_8, 1, x_7); +return x_8; +} +} +static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_hasBadIndexDep_x3f___closed__1() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = lean_box(0); +x_3 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_3, 0, x_1); +lean_ctor_set(x_3, 1, x_2); +return x_3; +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_hasBadIndexDep_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) { +_start: +{ +lean_object* x_8; lean_object* x_9; size_t x_10; size_t x_11; lean_object* x_12; lean_object* x_13; +x_8 = lean_box(0); +x_9 = lean_array_get_size(x_2); +x_10 = lean_usize_of_nat(x_9); +lean_dec(x_9); +x_11 = 0; +x_12 = l___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_hasBadIndexDep_x3f___closed__1; +x_13 = l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_hasBadIndexDep_x3f___spec__4(x_1, x_2, x_12, x_2, x_10, x_11, x_12, x_3, x_4, x_5, x_6, x_7); +if (lean_obj_tag(x_13) == 0) +{ +lean_object* x_14; lean_object* x_15; +x_14 = lean_ctor_get(x_13, 0); +lean_inc(x_14); +x_15 = lean_ctor_get(x_14, 0); +lean_inc(x_15); +lean_dec(x_14); +if (lean_obj_tag(x_15) == 0) +{ +uint8_t x_16; +x_16 = !lean_is_exclusive(x_13); +if (x_16 == 0) +{ +lean_object* x_17; +x_17 = lean_ctor_get(x_13, 0); +lean_dec(x_17); +lean_ctor_set(x_13, 0, x_8); +return x_13; +} +else +{ +lean_object* x_18; lean_object* x_19; +x_18 = lean_ctor_get(x_13, 1); +lean_inc(x_18); +lean_dec(x_13); +x_19 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_19, 0, x_8); +lean_ctor_set(x_19, 1, x_18); +return x_19; +} +} +else +{ +uint8_t x_20; +x_20 = !lean_is_exclusive(x_13); +if (x_20 == 0) +{ +lean_object* x_21; lean_object* x_22; +x_21 = lean_ctor_get(x_13, 0); +lean_dec(x_21); +x_22 = lean_ctor_get(x_15, 0); +lean_inc(x_22); +lean_dec(x_15); +lean_ctor_set(x_13, 0, x_22); +return x_13; +} +else +{ +lean_object* x_23; lean_object* x_24; lean_object* x_25; +x_23 = lean_ctor_get(x_13, 1); +lean_inc(x_23); +lean_dec(x_13); +x_24 = lean_ctor_get(x_15, 0); +lean_inc(x_24); +lean_dec(x_15); +x_25 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_25, 0, x_24); +lean_ctor_set(x_25, 1, x_23); +return x_25; +} +} +} +else +{ +uint8_t x_26; +x_26 = !lean_is_exclusive(x_13); +if (x_26 == 0) +{ +return x_13; +} +else +{ +lean_object* x_27; lean_object* x_28; lean_object* x_29; +x_27 = lean_ctor_get(x_13, 0); +x_28 = lean_ctor_get(x_13, 1); +lean_inc(x_28); +lean_inc(x_27); +lean_dec(x_13); +x_29 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_29, 0, x_27); +lean_ctor_set(x_29, 1, x_28); +return x_29; +} +} +} +} +lean_object* l_Array_anyMUnsafe_any___at___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_hasBadIndexDep_x3f___spec__2___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +size_t x_5; size_t x_6; uint8_t x_7; lean_object* x_8; +x_5 = lean_unbox_usize(x_3); +lean_dec(x_3); +x_6 = lean_unbox_usize(x_4); +lean_dec(x_4); +x_7 = l_Array_anyMUnsafe_any___at___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_hasBadIndexDep_x3f___spec__2(x_1, x_2, x_5, x_6); +lean_dec(x_2); +lean_dec(x_1); +x_8 = lean_box(x_7); +return x_8; +} +} +lean_object* l_Array_contains___at___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_hasBadIndexDep_x3f___spec__1___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +uint8_t x_3; lean_object* x_4; +x_3 = l_Array_contains___at___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_hasBadIndexDep_x3f___spec__1(x_1, x_2); +lean_dec(x_2); +lean_dec(x_1); +x_4 = lean_box(x_3); +return x_4; +} +} +lean_object* l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_hasBadIndexDep_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) { +_start: +{ +size_t x_14; size_t x_15; lean_object* x_16; +x_14 = lean_unbox_usize(x_6); +lean_dec(x_6); +x_15 = lean_unbox_usize(x_7); +lean_dec(x_7); +x_16 = l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_hasBadIndexDep_x3f___spec__3(x_1, x_2, x_3, x_4, x_5, x_14, x_15, x_8, x_9, x_10, x_11, x_12, x_13); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_5); +lean_dec(x_1); +return x_16; +} +} +lean_object* l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_hasBadIndexDep_x3f___spec__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, lean_object* x_11, lean_object* x_12) { +_start: +{ +size_t x_13; size_t x_14; lean_object* x_15; +x_13 = lean_unbox_usize(x_5); +lean_dec(x_5); +x_14 = lean_unbox_usize(x_6); +lean_dec(x_6); +x_15 = l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_hasBadIndexDep_x3f___spec__4(x_1, x_2, x_3, x_4, x_13, x_14, x_7, x_8, x_9, x_10, x_11, x_12); +lean_dec(x_4); +lean_dec(x_2); +lean_dec(x_1); +return x_15; +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_hasBadIndexDep_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) { +_start: +{ +lean_object* x_8; +x_8 = l___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_hasBadIndexDep_x3f___lambda__1(x_1, x_2, x_3, x_4, x_5, x_6, x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +return x_8; +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_hasBadIndexDep_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) { +_start: +{ +lean_object* x_8; +x_8 = l___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_hasBadIndexDep_x3f(x_1, x_2, x_3, x_4, x_5, x_6, x_7); +lean_dec(x_2); +lean_dec(x_1); +return x_8; +} +} +lean_object* l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_hasBadParamDep_x3f___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) { +_start: +{ +uint8_t x_13; +x_13 = x_6 < x_5; +if (x_13 == 0) +{ +lean_object* x_14; +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_14 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_14, 0, x_7); +lean_ctor_set(x_14, 1, x_12); +return x_14; +} +else +{ +lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; uint8_t x_19; +lean_dec(x_7); +x_15 = lean_array_uget(x_4, x_6); +x_16 = l_Lean_Expr_fvarId_x21(x_15); +lean_inc(x_3); +x_17 = l_Lean_Meta_dependsOn(x_3, x_16, x_8, x_9, x_10, x_11, x_12); +lean_dec(x_16); +x_18 = lean_ctor_get(x_17, 0); +lean_inc(x_18); +x_19 = lean_unbox(x_18); +lean_dec(x_18); +if (x_19 == 0) +{ +lean_object* x_20; size_t x_21; size_t x_22; +lean_dec(x_15); +x_20 = lean_ctor_get(x_17, 1); +lean_inc(x_20); +lean_dec(x_17); +x_21 = 1; +x_22 = x_6 + x_21; +lean_inc(x_1); +{ +size_t _tmp_5 = x_22; +lean_object* _tmp_6 = x_1; +lean_object* _tmp_11 = x_20; +x_6 = _tmp_5; +x_7 = _tmp_6; +x_12 = _tmp_11; +} +goto _start; +} +else +{ +uint8_t x_24; +lean_dec(x_3); +lean_dec(x_1); +x_24 = !lean_is_exclusive(x_17); +if (x_24 == 0) +{ +lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; +x_25 = lean_ctor_get(x_17, 0); +lean_dec(x_25); +x_26 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_26, 0, x_2); +lean_ctor_set(x_26, 1, x_15); +x_27 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_27, 0, x_26); +x_28 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_28, 0, x_27); +x_29 = lean_box(0); +x_30 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_30, 0, x_28); +lean_ctor_set(x_30, 1, x_29); +lean_ctor_set(x_17, 0, x_30); +return x_17; +} +else +{ +lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; +x_31 = lean_ctor_get(x_17, 1); +lean_inc(x_31); +lean_dec(x_17); +x_32 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_32, 0, x_2); +lean_ctor_set(x_32, 1, x_15); +x_33 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_33, 0, x_32); +x_34 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_34, 0, x_33); +x_35 = lean_box(0); +x_36 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_36, 0, x_34); +lean_ctor_set(x_36, 1, x_35); +x_37 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_37, 0, x_36); +lean_ctor_set(x_37, 1, x_31); +return x_37; +} +} +} +} +} +lean_object* l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_hasBadParamDep_x3f___spec__2(lean_object* x_1, lean_object* x_2, lean_object* x_3, size_t x_4, size_t 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: +{ +uint8_t x_12; +x_12 = x_5 < x_4; +if (x_12 == 0) +{ +lean_object* x_13; +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_2); +x_13 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_13, 0, x_6); +lean_ctor_set(x_13, 1, x_11); +return x_13; +} +else +{ +lean_object* x_14; lean_object* x_15; +lean_dec(x_6); +x_14 = lean_array_uget(x_3, x_5); +lean_inc(x_10); +lean_inc(x_9); +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_14); +x_15 = lean_infer_type(x_14, x_7, x_8, x_9, x_10, x_11); +if (lean_obj_tag(x_15) == 0) +{ +lean_object* x_16; lean_object* x_17; lean_object* x_18; size_t x_19; size_t x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; +x_16 = lean_ctor_get(x_15, 0); +lean_inc(x_16); +x_17 = lean_ctor_get(x_15, 1); +lean_inc(x_17); +lean_dec(x_15); +x_18 = lean_array_get_size(x_1); +x_19 = lean_usize_of_nat(x_18); +lean_dec(x_18); +x_20 = 0; +lean_inc_n(x_2, 2); +x_21 = l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_hasBadParamDep_x3f___spec__1(x_2, x_14, x_16, x_1, x_19, x_20, x_2, x_7, x_8, x_9, x_10, x_17); +x_22 = lean_ctor_get(x_21, 0); +lean_inc(x_22); +x_23 = lean_ctor_get(x_22, 0); +lean_inc(x_23); +lean_dec(x_22); +if (lean_obj_tag(x_23) == 0) +{ +lean_object* x_24; size_t x_25; size_t x_26; +x_24 = lean_ctor_get(x_21, 1); +lean_inc(x_24); +lean_dec(x_21); +x_25 = 1; +x_26 = x_5 + x_25; +lean_inc(x_2); +{ +size_t _tmp_4 = x_26; +lean_object* _tmp_5 = x_2; +lean_object* _tmp_10 = x_24; +x_5 = _tmp_4; +x_6 = _tmp_5; +x_11 = _tmp_10; +} +goto _start; +} +else +{ +uint8_t x_28; +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_2); +x_28 = !lean_is_exclusive(x_21); +if (x_28 == 0) +{ +lean_object* x_29; uint8_t x_30; +x_29 = lean_ctor_get(x_21, 0); +lean_dec(x_29); +x_30 = !lean_is_exclusive(x_23); +if (x_30 == 0) +{ +lean_object* x_31; lean_object* x_32; +x_31 = lean_box(0); +x_32 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_32, 0, x_23); +lean_ctor_set(x_32, 1, x_31); +lean_ctor_set(x_21, 0, x_32); +return x_21; +} +else +{ +lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; +x_33 = lean_ctor_get(x_23, 0); +lean_inc(x_33); +lean_dec(x_23); +x_34 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_34, 0, x_33); +x_35 = lean_box(0); +x_36 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_36, 0, x_34); +lean_ctor_set(x_36, 1, x_35); +lean_ctor_set(x_21, 0, x_36); +return x_21; +} +} +else +{ +lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; +x_37 = lean_ctor_get(x_21, 1); +lean_inc(x_37); +lean_dec(x_21); +x_38 = lean_ctor_get(x_23, 0); +lean_inc(x_38); +if (lean_is_exclusive(x_23)) { + lean_ctor_release(x_23, 0); + x_39 = x_23; +} else { + lean_dec_ref(x_23); + x_39 = lean_box(0); +} +if (lean_is_scalar(x_39)) { + x_40 = lean_alloc_ctor(1, 1, 0); +} else { + x_40 = x_39; +} +lean_ctor_set(x_40, 0, x_38); +x_41 = lean_box(0); +x_42 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_42, 0, x_40); +lean_ctor_set(x_42, 1, x_41); +x_43 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_43, 0, x_42); +lean_ctor_set(x_43, 1, x_37); +return x_43; +} +} +} +else +{ +uint8_t x_44; +lean_dec(x_14); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_2); +x_44 = !lean_is_exclusive(x_15); +if (x_44 == 0) +{ +return x_15; +} +else +{ +lean_object* x_45; lean_object* x_46; lean_object* x_47; +x_45 = lean_ctor_get(x_15, 0); +x_46 = lean_ctor_get(x_15, 1); +lean_inc(x_46); +lean_inc(x_45); +lean_dec(x_15); +x_47 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_47, 0, x_45); +lean_ctor_set(x_47, 1, x_46); +return x_47; +} +} +} +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_hasBadParamDep_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) { +_start: +{ +lean_object* x_8; lean_object* x_9; size_t x_10; size_t x_11; lean_object* x_12; lean_object* x_13; +x_8 = lean_box(0); +x_9 = lean_array_get_size(x_2); +x_10 = lean_usize_of_nat(x_9); +lean_dec(x_9); +x_11 = 0; +x_12 = l___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_hasBadIndexDep_x3f___closed__1; +x_13 = l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_hasBadParamDep_x3f___spec__2(x_1, x_12, x_2, x_10, x_11, x_12, x_3, x_4, x_5, x_6, x_7); +if (lean_obj_tag(x_13) == 0) +{ +lean_object* x_14; lean_object* x_15; +x_14 = lean_ctor_get(x_13, 0); +lean_inc(x_14); +x_15 = lean_ctor_get(x_14, 0); +lean_inc(x_15); +lean_dec(x_14); +if (lean_obj_tag(x_15) == 0) +{ +uint8_t x_16; +x_16 = !lean_is_exclusive(x_13); +if (x_16 == 0) +{ +lean_object* x_17; +x_17 = lean_ctor_get(x_13, 0); +lean_dec(x_17); +lean_ctor_set(x_13, 0, x_8); +return x_13; +} +else +{ +lean_object* x_18; lean_object* x_19; +x_18 = lean_ctor_get(x_13, 1); +lean_inc(x_18); +lean_dec(x_13); +x_19 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_19, 0, x_8); +lean_ctor_set(x_19, 1, x_18); +return x_19; +} +} +else +{ +uint8_t x_20; +x_20 = !lean_is_exclusive(x_13); +if (x_20 == 0) +{ +lean_object* x_21; lean_object* x_22; +x_21 = lean_ctor_get(x_13, 0); +lean_dec(x_21); +x_22 = lean_ctor_get(x_15, 0); +lean_inc(x_22); +lean_dec(x_15); +lean_ctor_set(x_13, 0, x_22); +return x_13; +} +else +{ +lean_object* x_23; lean_object* x_24; lean_object* x_25; +x_23 = lean_ctor_get(x_13, 1); +lean_inc(x_23); +lean_dec(x_13); +x_24 = lean_ctor_get(x_15, 0); +lean_inc(x_24); +lean_dec(x_15); +x_25 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_25, 0, x_24); +lean_ctor_set(x_25, 1, x_23); +return x_25; +} +} +} +else +{ +uint8_t x_26; +x_26 = !lean_is_exclusive(x_13); +if (x_26 == 0) +{ +return x_13; +} +else +{ +lean_object* x_27; lean_object* x_28; lean_object* x_29; +x_27 = lean_ctor_get(x_13, 0); +x_28 = lean_ctor_get(x_13, 1); +lean_inc(x_28); +lean_inc(x_27); +lean_dec(x_13); +x_29 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_29, 0, x_27); +lean_ctor_set(x_29, 1, x_28); +return x_29; +} +} +} +} +lean_object* l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_hasBadParamDep_x3f___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) { +_start: +{ +size_t x_13; size_t x_14; lean_object* x_15; +x_13 = lean_unbox_usize(x_5); +lean_dec(x_5); +x_14 = lean_unbox_usize(x_6); +lean_dec(x_6); +x_15 = l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_hasBadParamDep_x3f___spec__1(x_1, x_2, x_3, x_4, x_13, x_14, x_7, x_8, x_9, x_10, x_11, x_12); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_4); +return x_15; +} +} +lean_object* l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_hasBadParamDep_x3f___spec__2___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11) { +_start: +{ +size_t x_12; size_t x_13; lean_object* x_14; +x_12 = lean_unbox_usize(x_4); +lean_dec(x_4); +x_13 = lean_unbox_usize(x_5); +lean_dec(x_5); +x_14 = l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_hasBadParamDep_x3f___spec__2(x_1, x_2, x_3, x_12, x_13, x_6, x_7, x_8, x_9, x_10, x_11); +lean_dec(x_3); +lean_dec(x_1); +return x_14; +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_hasBadParamDep_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) { +_start: +{ +lean_object* x_8; +x_8 = l___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_hasBadParamDep_x3f(x_1, x_2, x_3, x_4, x_5, x_6, x_7); +lean_dec(x_2); +lean_dec(x_1); +return x_8; +} +} +lean_object* l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_throwStructuralFailed___spec__1___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { +_start: +{ +lean_object* x_7; lean_object* x_8; uint8_t x_9; +x_7 = lean_ctor_get(x_4, 3); +x_8 = l_Lean_addMessageContextFull___at_Lean_Meta_instAddMessageContextMetaM___spec__1(x_1, x_2, x_3, x_4, x_5, x_6); +x_9 = !lean_is_exclusive(x_8); +if (x_9 == 0) +{ +lean_object* x_10; lean_object* x_11; +x_10 = lean_ctor_get(x_8, 0); +lean_inc(x_7); +x_11 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_11, 0, x_7); +lean_ctor_set(x_11, 1, x_10); +lean_ctor_set_tag(x_8, 1); +lean_ctor_set(x_8, 0, x_11); +return x_8; +} +else +{ +lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; +x_12 = lean_ctor_get(x_8, 0); +x_13 = lean_ctor_get(x_8, 1); +lean_inc(x_13); +lean_inc(x_12); +lean_dec(x_8); +lean_inc(x_7); +x_14 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_14, 0, x_7); +lean_ctor_set(x_14, 1, x_12); +x_15 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_15, 0, x_14); +lean_ctor_set(x_15, 1, x_13); +return x_15; +} +} +} +lean_object* l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_throwStructuralFailed___spec__1(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_throwStructuralFailed___spec__1___rarg___boxed), 6, 0); +return x_2; +} +} +static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_throwStructuralFailed___rarg___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("structural recursion cannot be used"); +return x_1; +} +} +static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_throwStructuralFailed___rarg___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_throwStructuralFailed___rarg___closed__1; +x_2 = l_Lean_stringToMessageData(x_1); +return x_2; +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_throwStructuralFailed___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { +_start: +{ +lean_object* x_6; lean_object* x_7; +x_6 = l___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_throwStructuralFailed___rarg___closed__2; +x_7 = l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_throwStructuralFailed___spec__1___rarg(x_6, x_1, x_2, x_3, x_4, x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +return x_7; +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_throwStructuralFailed(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_throwStructuralFailed___rarg), 5, 0); +return x_2; +} +} +lean_object* l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_throwStructuralFailed___spec__1___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { +_start: +{ +lean_object* x_7; +x_7 = l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_throwStructuralFailed___spec__1___rarg(x_1, x_2, x_3, x_4, x_5, x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +return x_7; +} +} +static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_orelse_x27___rarg___closed__1() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = lean_box(1); +x_2 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_orelse_x27___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { +_start: +{ +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_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; +x_9 = lean_st_ref_get(x_7, x_8); +x_10 = lean_ctor_get(x_9, 1); +lean_inc(x_10); +lean_dec(x_9); +x_11 = lean_st_ref_get(x_3, x_10); +x_12 = lean_ctor_get(x_11, 0); +lean_inc(x_12); +x_13 = lean_ctor_get(x_11, 1); +lean_inc(x_13); +lean_dec(x_11); +x_24 = lean_st_ref_get(x_7, x_13); +x_25 = lean_ctor_get(x_24, 0); +lean_inc(x_25); +x_26 = lean_ctor_get(x_24, 1); +lean_inc(x_26); +lean_dec(x_24); +x_27 = lean_ctor_get(x_25, 0); +lean_inc(x_27); +lean_dec(x_25); +x_28 = lean_st_ref_get(x_7, x_26); +x_29 = lean_ctor_get(x_28, 1); +lean_inc(x_29); +lean_dec(x_28); +x_30 = lean_st_ref_get(x_5, x_29); +x_31 = lean_ctor_get(x_30, 0); +lean_inc(x_31); +x_32 = lean_ctor_get(x_30, 1); +lean_inc(x_32); +lean_dec(x_30); +x_33 = lean_ctor_get(x_31, 0); +lean_inc(x_33); +lean_dec(x_31); +lean_inc(x_7); +lean_inc(x_6); +lean_inc(x_5); +lean_inc(x_4); +lean_inc(x_3); +x_34 = lean_apply_6(x_1, x_3, x_4, x_5, x_6, x_7, x_32); +if (lean_obj_tag(x_34) == 0) +{ +lean_dec(x_33); +lean_dec(x_27); +lean_dec(x_12); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +x_14 = x_34; +goto block_23; +} +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_34, 0); +lean_inc(x_35); +x_36 = lean_ctor_get(x_34, 1); +lean_inc(x_36); +lean_dec(x_34); +x_37 = l_Lean_setEnv___at_Lean_Meta_setInlineAttribute___spec__2(x_27, x_4, x_5, x_6, x_7, x_36); +x_38 = lean_ctor_get(x_37, 1); +lean_inc(x_38); +lean_dec(x_37); +x_39 = l_Lean_Meta_setMCtx(x_33, x_4, x_5, x_6, x_7, x_38); +if (lean_obj_tag(x_35) == 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_39, 1); +lean_inc(x_40); +lean_dec(x_39); +x_41 = lean_ctor_get(x_35, 0); +lean_inc(x_41); +x_42 = lean_ctor_get(x_35, 1); +lean_inc(x_42); +lean_dec(x_35); +x_43 = lean_st_ref_get(x_7, x_40); +x_44 = lean_ctor_get(x_43, 1); +lean_inc(x_44); +lean_dec(x_43); +x_45 = lean_st_ref_set(x_3, x_12, x_44); +x_46 = lean_ctor_get(x_45, 1); +lean_inc(x_46); +lean_dec(x_45); +x_47 = lean_apply_6(x_2, x_3, x_4, x_5, x_6, x_7, x_46); +if (lean_obj_tag(x_47) == 0) +{ +lean_dec(x_42); +lean_dec(x_41); +x_14 = x_47; +goto block_23; +} +else +{ +lean_object* x_48; +x_48 = lean_ctor_get(x_47, 0); +lean_inc(x_48); +if (lean_obj_tag(x_48) == 0) +{ +uint8_t x_49; +x_49 = !lean_is_exclusive(x_47); +if (x_49 == 0) +{ +lean_object* x_50; uint8_t x_51; +x_50 = lean_ctor_get(x_47, 0); +lean_dec(x_50); +x_51 = !lean_is_exclusive(x_48); +if (x_51 == 0) +{ +lean_object* x_52; lean_object* x_53; lean_object* x_54; lean_object* x_55; lean_object* x_56; lean_object* x_57; +x_52 = lean_ctor_get(x_48, 1); +x_53 = lean_ctor_get(x_48, 0); +lean_dec(x_53); +x_54 = l___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_orelse_x27___rarg___closed__1; +x_55 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_55, 0, x_42); +lean_ctor_set(x_55, 1, x_54); +x_56 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_56, 0, x_55); +lean_ctor_set(x_56, 1, x_54); +x_57 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_57, 0, x_56); +lean_ctor_set(x_57, 1, x_52); +lean_ctor_set(x_48, 1, x_57); +lean_ctor_set(x_48, 0, x_41); +x_14 = x_47; +goto block_23; +} +else +{ +lean_object* x_58; lean_object* x_59; lean_object* x_60; lean_object* x_61; lean_object* x_62; lean_object* x_63; +x_58 = lean_ctor_get(x_48, 1); +lean_inc(x_58); +lean_dec(x_48); +x_59 = l___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_orelse_x27___rarg___closed__1; +x_60 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_60, 0, x_42); +lean_ctor_set(x_60, 1, x_59); +x_61 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_61, 0, x_60); +lean_ctor_set(x_61, 1, x_59); +x_62 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_62, 0, x_61); +lean_ctor_set(x_62, 1, x_58); +x_63 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_63, 0, x_41); +lean_ctor_set(x_63, 1, x_62); +lean_ctor_set(x_47, 0, x_63); +x_14 = x_47; +goto block_23; +} +} +else +{ +lean_object* x_64; lean_object* x_65; lean_object* x_66; lean_object* x_67; lean_object* x_68; lean_object* x_69; lean_object* x_70; lean_object* x_71; lean_object* x_72; +x_64 = lean_ctor_get(x_47, 1); +lean_inc(x_64); +lean_dec(x_47); +x_65 = lean_ctor_get(x_48, 1); +lean_inc(x_65); +if (lean_is_exclusive(x_48)) { + lean_ctor_release(x_48, 0); + lean_ctor_release(x_48, 1); + x_66 = x_48; +} else { + lean_dec_ref(x_48); + x_66 = lean_box(0); +} +x_67 = l___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_orelse_x27___rarg___closed__1; +x_68 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_68, 0, x_42); +lean_ctor_set(x_68, 1, x_67); +x_69 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_69, 0, x_68); +lean_ctor_set(x_69, 1, x_67); +x_70 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_70, 0, x_69); +lean_ctor_set(x_70, 1, x_65); +if (lean_is_scalar(x_66)) { + x_71 = lean_alloc_ctor(0, 2, 0); +} else { + x_71 = x_66; +} +lean_ctor_set(x_71, 0, x_41); +lean_ctor_set(x_71, 1, x_70); +x_72 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_72, 0, x_71); +lean_ctor_set(x_72, 1, x_64); +x_14 = x_72; +goto block_23; +} +} +else +{ +uint8_t x_73; +lean_dec(x_42); +lean_dec(x_41); +x_73 = !lean_is_exclusive(x_47); +if (x_73 == 0) +{ +lean_object* x_74; +x_74 = lean_ctor_get(x_47, 0); +lean_dec(x_74); +x_14 = x_47; +goto block_23; +} +else +{ +lean_object* x_75; lean_object* x_76; +x_75 = lean_ctor_get(x_47, 1); +lean_inc(x_75); +lean_dec(x_47); +x_76 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_76, 0, x_48); +lean_ctor_set(x_76, 1, x_75); +x_14 = x_76; +goto block_23; +} +} +} +} +else +{ +uint8_t x_77; +lean_dec(x_12); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +x_77 = !lean_is_exclusive(x_39); +if (x_77 == 0) +{ +lean_object* x_78; +x_78 = lean_ctor_get(x_39, 0); +lean_dec(x_78); +lean_ctor_set_tag(x_39, 1); +lean_ctor_set(x_39, 0, x_35); +x_14 = x_39; +goto block_23; +} +else +{ +lean_object* x_79; lean_object* x_80; +x_79 = lean_ctor_get(x_39, 1); +lean_inc(x_79); +lean_dec(x_39); +x_80 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_80, 0, x_35); +lean_ctor_set(x_80, 1, x_79); +x_14 = x_80; +goto block_23; +} +} +} +block_23: +{ +if (lean_obj_tag(x_14) == 0) +{ +uint8_t x_15; +x_15 = !lean_is_exclusive(x_14); +if (x_15 == 0) +{ +return x_14; +} +else +{ +lean_object* x_16; lean_object* x_17; lean_object* x_18; +x_16 = lean_ctor_get(x_14, 0); +x_17 = lean_ctor_get(x_14, 1); +lean_inc(x_17); +lean_inc(x_16); +lean_dec(x_14); +x_18 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_18, 0, x_16); +lean_ctor_set(x_18, 1, x_17); +return x_18; +} +} +else +{ +uint8_t x_19; +x_19 = !lean_is_exclusive(x_14); +if (x_19 == 0) +{ +return x_14; +} +else +{ +lean_object* x_20; lean_object* x_21; lean_object* x_22; +x_20 = lean_ctor_get(x_14, 0); +x_21 = lean_ctor_get(x_14, 1); +lean_inc(x_21); +lean_inc(x_20); +lean_dec(x_14); +x_22 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_22, 0, x_20); +lean_ctor_set(x_22, 1, x_21); +return x_22; +} +} +} +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_orelse_x27(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_orelse_x27___rarg), 8, 0); +return x_2; +} +} +lean_object* l_Lean_Elab_Structural_findRecArg_loop_match__1___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +if (lean_obj_tag(x_1) == 0) +{ +lean_object* x_4; lean_object* x_5; +lean_dec(x_2); +x_4 = lean_box(0); +x_5 = lean_apply_1(x_3, x_4); +return x_5; +} +else +{ +lean_object* x_6; lean_object* x_7; +lean_dec(x_3); +x_6 = lean_ctor_get(x_1, 0); +lean_inc(x_6); +lean_dec(x_1); +x_7 = lean_apply_1(x_2, x_6); +return x_7; +} +} +} +lean_object* l_Lean_Elab_Structural_findRecArg_loop_match__1(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = lean_alloc_closure((void*)(l_Lean_Elab_Structural_findRecArg_loop_match__1___rarg), 3, 0); +return x_3; +} +} +lean_object* l_Lean_Elab_Structural_findRecArg_loop_match__1___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = l_Lean_Elab_Structural_findRecArg_loop_match__1(x_1, x_2); +lean_dec(x_1); +return x_3; +} +} +lean_object* l_Lean_Elab_Structural_findRecArg_loop_match__2___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +if (lean_obj_tag(x_1) == 0) +{ +lean_object* x_4; lean_object* x_5; +lean_dec(x_2); +x_4 = lean_box(0); +x_5 = lean_apply_1(x_3, x_4); +return x_5; +} +else +{ +lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; +lean_dec(x_3); +x_6 = lean_ctor_get(x_1, 0); +lean_inc(x_6); +lean_dec(x_1); +x_7 = lean_ctor_get(x_6, 0); +lean_inc(x_7); +x_8 = lean_ctor_get(x_6, 1); +lean_inc(x_8); +lean_dec(x_6); +x_9 = lean_apply_2(x_2, x_7, x_8); +return x_9; +} +} +} +lean_object* l_Lean_Elab_Structural_findRecArg_loop_match__2(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_Lean_Elab_Structural_findRecArg_loop_match__2___rarg), 3, 0); +return x_2; +} +} +lean_object* l_Lean_hasConst___at_Lean_Elab_Structural_findRecArg_loop___spec__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { +_start: +{ +lean_object* x_8; uint8_t x_9; +x_8 = lean_st_ref_get(x_6, x_7); +x_9 = !lean_is_exclusive(x_8); +if (x_9 == 0) +{ +lean_object* x_10; lean_object* x_11; uint8_t x_12; lean_object* x_13; +x_10 = lean_ctor_get(x_8, 0); +x_11 = lean_ctor_get(x_10, 0); +lean_inc(x_11); +lean_dec(x_10); +x_12 = l_Lean_Environment_contains(x_11, x_1); +x_13 = lean_box(x_12); +lean_ctor_set(x_8, 0, x_13); +return x_8; +} +else +{ +lean_object* x_14; lean_object* x_15; lean_object* x_16; uint8_t x_17; lean_object* x_18; lean_object* x_19; +x_14 = lean_ctor_get(x_8, 0); +x_15 = lean_ctor_get(x_8, 1); +lean_inc(x_15); +lean_inc(x_14); +lean_dec(x_8); +x_16 = lean_ctor_get(x_14, 0); +lean_inc(x_16); +lean_dec(x_14); +x_17 = l_Lean_Environment_contains(x_16, x_1); +x_18 = lean_box(x_17); +x_19 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_19, 0, x_18); +lean_ctor_set(x_19, 1, x_15); +return x_19; +} +} +} +static lean_object* _init_l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_findRecArg_loop___spec__2___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("Lean.Elab.PreDefinition.Structural.FindRecArg"); +return x_1; +} +} +static lean_object* _init_l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_findRecArg_loop___spec__2___closed__2() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("Lean.Elab.Structural.findRecArg.loop"); +return x_1; +} +} +static lean_object* _init_l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_findRecArg_loop___spec__2___closed__3() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("unreachable code has been reached"); +return x_1; +} +} +static lean_object* _init_l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_findRecArg_loop___spec__2___closed__4() { +_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_Array_mapMUnsafe_map___at_Lean_Elab_Structural_findRecArg_loop___spec__2___closed__1; +x_2 = l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_findRecArg_loop___spec__2___closed__2; +x_3 = lean_unsigned_to_nat(87u); +x_4 = lean_unsigned_to_nat(119u); +x_5 = l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_findRecArg_loop___spec__2___closed__3; +x_6 = l___private_Init_Util_0__mkPanicMessageWithDecl(x_1, x_2, x_3, x_4, x_5); +return x_6; +} +} +lean_object* l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_findRecArg_loop___spec__2(lean_object* x_1, size_t x_2, size_t x_3, lean_object* x_4) { +_start: +{ +uint8_t x_5; +x_5 = x_3 < x_2; +if (x_5 == 0) +{ +lean_object* x_6; +x_6 = x_4; +return x_6; +} +else +{ +lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; size_t x_12; size_t x_13; +x_7 = lean_array_uget(x_4, x_3); +x_8 = lean_unsigned_to_nat(0u); +x_9 = lean_array_uset(x_4, x_3, x_8); +x_10 = x_7; +x_11 = l_Array_indexOfAux___at___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_getIndexMinPos___spec__1(x_1, x_10, x_8); +lean_dec(x_10); +x_12 = 1; +x_13 = x_3 + x_12; +if (lean_obj_tag(x_11) == 0) +{ +lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; +x_14 = l_instInhabitedNat; +x_15 = l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_findRecArg_loop___spec__2___closed__4; +x_16 = lean_panic_fn(x_14, x_15); +x_17 = x_16; +x_18 = lean_array_uset(x_9, x_3, x_17); +x_3 = x_13; +x_4 = x_18; +goto _start; +} +else +{ +lean_object* x_20; lean_object* x_21; lean_object* x_22; +x_20 = lean_ctor_get(x_11, 0); +lean_inc(x_20); +lean_dec(x_11); +x_21 = x_20; +x_22 = lean_array_uset(x_9, x_3, x_21); +x_3 = x_13; +x_4 = x_22; +goto _start; +} +} +} +} +lean_object* l_Lean_isInductivePredicate___at_Lean_Elab_Structural_findRecArg_loop___spec__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) { +_start: +{ +lean_object* x_8; uint8_t x_9; +x_8 = lean_st_ref_get(x_6, x_7); +x_9 = !lean_is_exclusive(x_8); +if (x_9 == 0) +{ +lean_object* x_10; lean_object* x_11; lean_object* x_12; +x_10 = lean_ctor_get(x_8, 0); +x_11 = lean_ctor_get(x_10, 0); +lean_inc(x_11); +lean_dec(x_10); +x_12 = lean_environment_find(x_11, x_1); +if (lean_obj_tag(x_12) == 0) +{ +uint8_t x_13; lean_object* x_14; +x_13 = 0; +x_14 = lean_box(x_13); +lean_ctor_set(x_8, 0, x_14); +return x_8; +} +else +{ +lean_object* x_15; +x_15 = lean_ctor_get(x_12, 0); +lean_inc(x_15); +lean_dec(x_12); +if (lean_obj_tag(x_15) == 5) +{ +lean_object* x_16; lean_object* x_17; lean_object* x_18; uint8_t x_19; lean_object* x_20; +x_16 = lean_ctor_get(x_15, 0); +lean_inc(x_16); +lean_dec(x_15); +x_17 = lean_ctor_get(x_16, 0); +lean_inc(x_17); +lean_dec(x_16); +x_18 = lean_ctor_get(x_17, 2); +lean_inc(x_18); +lean_dec(x_17); +x_19 = l_Lean_isInductivePredicate_visit(x_18); +lean_dec(x_18); +x_20 = lean_box(x_19); +lean_ctor_set(x_8, 0, x_20); +return x_8; +} +else +{ +uint8_t x_21; lean_object* x_22; +lean_dec(x_15); +x_21 = 0; +x_22 = lean_box(x_21); +lean_ctor_set(x_8, 0, x_22); +return x_8; +} +} +} +else +{ +lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; +x_23 = lean_ctor_get(x_8, 0); +x_24 = lean_ctor_get(x_8, 1); +lean_inc(x_24); +lean_inc(x_23); +lean_dec(x_8); +x_25 = lean_ctor_get(x_23, 0); +lean_inc(x_25); +lean_dec(x_23); +x_26 = lean_environment_find(x_25, x_1); +if (lean_obj_tag(x_26) == 0) +{ +uint8_t x_27; lean_object* x_28; lean_object* x_29; +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_24); +return x_29; +} +else +{ +lean_object* x_30; +x_30 = lean_ctor_get(x_26, 0); +lean_inc(x_30); +lean_dec(x_26); +if (lean_obj_tag(x_30) == 5) +{ +lean_object* x_31; lean_object* x_32; lean_object* x_33; uint8_t x_34; lean_object* x_35; lean_object* x_36; +x_31 = lean_ctor_get(x_30, 0); +lean_inc(x_31); +lean_dec(x_30); +x_32 = lean_ctor_get(x_31, 0); +lean_inc(x_32); +lean_dec(x_31); +x_33 = lean_ctor_get(x_32, 2); +lean_inc(x_33); +lean_dec(x_32); +x_34 = l_Lean_isInductivePredicate_visit(x_33); +lean_dec(x_33); +x_35 = lean_box(x_34); +x_36 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_36, 0, x_35); +lean_ctor_set(x_36, 1, x_24); +return x_36; +} +else +{ +uint8_t x_37; lean_object* x_38; lean_object* x_39; +lean_dec(x_30); +x_37 = 0; +x_38 = lean_box(x_37); +x_39 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_39, 0, x_38); +lean_ctor_set(x_39, 1, x_24); +return x_39; +} +} +} +} +} +lean_object* l_ReaderT_bind___at_Lean_Elab_Structural_findRecArg_loop___spec__4___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { +_start: +{ +lean_object* x_9; +lean_inc(x_7); +lean_inc(x_6); +lean_inc(x_5); +lean_inc(x_4); +lean_inc(x_3); +x_9 = lean_apply_6(x_1, x_3, x_4, x_5, x_6, x_7, x_8); +if (lean_obj_tag(x_9) == 0) +{ +lean_object* x_10; lean_object* x_11; lean_object* x_12; +x_10 = lean_ctor_get(x_9, 0); +lean_inc(x_10); +x_11 = lean_ctor_get(x_9, 1); +lean_inc(x_11); +lean_dec(x_9); +x_12 = lean_apply_7(x_2, x_10, x_3, x_4, x_5, x_6, x_7, x_11); +return x_12; +} +else +{ +uint8_t x_13; +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +x_13 = !lean_is_exclusive(x_9); +if (x_13 == 0) +{ +return x_9; +} +else +{ +lean_object* x_14; lean_object* x_15; lean_object* x_16; +x_14 = lean_ctor_get(x_9, 0); +x_15 = lean_ctor_get(x_9, 1); +lean_inc(x_15); +lean_inc(x_14); +lean_dec(x_9); +x_16 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_16, 0, x_14); +lean_ctor_set(x_16, 1, x_15); +return x_16; +} +} +} +} +lean_object* l_ReaderT_bind___at_Lean_Elab_Structural_findRecArg_loop___spec__4(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = lean_alloc_closure((void*)(l_ReaderT_bind___at_Lean_Elab_Structural_findRecArg_loop___spec__4___rarg), 8, 0); +return x_3; +} +} +lean_object* l_Lean_throwError___at_Lean_Elab_Structural_findRecArg_loop___spec__5___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { +_start: +{ +lean_object* x_8; lean_object* x_9; uint8_t x_10; +x_8 = lean_ctor_get(x_5, 3); +x_9 = l_Lean_addMessageContextFull___at_Lean_Meta_instAddMessageContextMetaM___spec__1(x_1, x_3, x_4, x_5, x_6, x_7); +x_10 = !lean_is_exclusive(x_9); +if (x_10 == 0) +{ +lean_object* x_11; lean_object* x_12; +x_11 = lean_ctor_get(x_9, 0); +lean_inc(x_8); +x_12 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_12, 0, x_8); +lean_ctor_set(x_12, 1, x_11); +lean_ctor_set_tag(x_9, 1); +lean_ctor_set(x_9, 0, x_12); +return x_9; +} +else +{ +lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; +x_13 = lean_ctor_get(x_9, 0); +x_14 = lean_ctor_get(x_9, 1); +lean_inc(x_14); +lean_inc(x_13); +lean_dec(x_9); +lean_inc(x_8); +x_15 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_15, 0, x_8); +lean_ctor_set(x_15, 1, x_13); +x_16 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_16, 0, x_15); +lean_ctor_set(x_16, 1, x_14); +return x_16; +} +} +} +lean_object* l_Lean_throwError___at_Lean_Elab_Structural_findRecArg_loop___spec__5(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_Lean_throwError___at_Lean_Elab_Structural_findRecArg_loop___spec__5___rarg___boxed), 7, 0); +return x_2; +} +} +lean_object* l_Lean_throwError___at_Lean_Elab_Structural_findRecArg_loop___spec__6___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { +_start: +{ +lean_object* x_8; lean_object* x_9; uint8_t x_10; +x_8 = lean_ctor_get(x_5, 3); +x_9 = l_Lean_addMessageContextFull___at_Lean_Meta_instAddMessageContextMetaM___spec__1(x_1, x_3, x_4, x_5, x_6, x_7); +x_10 = !lean_is_exclusive(x_9); +if (x_10 == 0) +{ +lean_object* x_11; lean_object* x_12; +x_11 = lean_ctor_get(x_9, 0); +lean_inc(x_8); +x_12 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_12, 0, x_8); +lean_ctor_set(x_12, 1, x_11); +lean_ctor_set_tag(x_9, 1); +lean_ctor_set(x_9, 0, x_12); +return x_9; +} +else +{ +lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; +x_13 = lean_ctor_get(x_9, 0); +x_14 = lean_ctor_get(x_9, 1); +lean_inc(x_14); +lean_inc(x_13); +lean_dec(x_9); +lean_inc(x_8); +x_15 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_15, 0, x_8); +lean_ctor_set(x_15, 1, x_13); +x_16 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_16, 0, x_15); +lean_ctor_set(x_16, 1, x_14); +return x_16; +} +} +} +lean_object* l_Lean_throwError___at_Lean_Elab_Structural_findRecArg_loop___spec__6(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_Lean_throwError___at_Lean_Elab_Structural_findRecArg_loop___spec__6___rarg___boxed), 7, 0); +return x_2; +} +} +uint8_t l___private_Init_Data_Array_Basic_0__Array_allDiffAuxAux___at_Lean_Elab_Structural_findRecArg_loop___spec__8(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; uint8_t x_6; +x_5 = lean_unsigned_to_nat(0u); +x_6 = lean_nat_dec_eq(x_3, x_5); +if (x_6 == 0) +{ +lean_object* x_7; lean_object* x_8; lean_object* x_9; uint8_t x_10; +x_7 = lean_unsigned_to_nat(1u); +x_8 = lean_nat_sub(x_3, x_7); +lean_dec(x_3); +x_9 = lean_array_fget(x_1, x_8); +x_10 = lean_expr_eqv(x_2, x_9); +lean_dec(x_9); +if (x_10 == 0) +{ +x_3 = x_8; +x_4 = lean_box(0); +goto _start; +} +else +{ +uint8_t x_12; +lean_dec(x_8); +x_12 = 0; +return x_12; +} +} +else +{ +uint8_t x_13; +lean_dec(x_3); +x_13 = 1; +return x_13; +} +} +} +uint8_t l___private_Init_Data_Array_Basic_0__Array_allDiffAux___at_Lean_Elab_Structural_findRecArg_loop___spec__7(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; uint8_t x_4; +x_3 = lean_array_get_size(x_1); +x_4 = lean_nat_dec_lt(x_2, x_3); +lean_dec(x_3); +if (x_4 == 0) +{ +uint8_t x_5; +lean_dec(x_2); +x_5 = 1; +return x_5; +} +else +{ +lean_object* x_6; uint8_t x_7; +x_6 = lean_array_fget(x_1, x_2); +lean_inc(x_2); +x_7 = l___private_Init_Data_Array_Basic_0__Array_allDiffAuxAux___at_Lean_Elab_Structural_findRecArg_loop___spec__8(x_1, x_6, x_2, lean_box(0)); +lean_dec(x_6); +if (x_7 == 0) +{ +uint8_t x_8; +lean_dec(x_2); +x_8 = 0; +return x_8; +} +else +{ +lean_object* x_9; lean_object* x_10; +x_9 = lean_unsigned_to_nat(1u); +x_10 = lean_nat_add(x_2, x_9); +lean_dec(x_2); +x_2 = x_10; +goto _start; +} +} +} +} +lean_object* l_Lean_throwError___at_Lean_Elab_Structural_findRecArg_loop___spec__9___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { +_start: +{ +lean_object* x_8; lean_object* x_9; uint8_t x_10; +x_8 = lean_ctor_get(x_5, 3); +x_9 = l_Lean_addMessageContextFull___at_Lean_Meta_instAddMessageContextMetaM___spec__1(x_1, x_3, x_4, x_5, x_6, x_7); +x_10 = !lean_is_exclusive(x_9); +if (x_10 == 0) +{ +lean_object* x_11; lean_object* x_12; +x_11 = lean_ctor_get(x_9, 0); +lean_inc(x_8); +x_12 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_12, 0, x_8); +lean_ctor_set(x_12, 1, x_11); +lean_ctor_set_tag(x_9, 1); +lean_ctor_set(x_9, 0, x_12); +return x_9; +} +else +{ +lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; +x_13 = lean_ctor_get(x_9, 0); +x_14 = lean_ctor_get(x_9, 1); +lean_inc(x_14); +lean_inc(x_13); +lean_dec(x_9); +lean_inc(x_8); +x_15 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_15, 0, x_8); +lean_ctor_set(x_15, 1, x_13); +x_16 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_16, 0, x_15); +lean_ctor_set(x_16, 1, x_14); +return x_16; +} +} +} +lean_object* l_Lean_throwError___at_Lean_Elab_Structural_findRecArg_loop___spec__9(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_Lean_throwError___at_Lean_Elab_Structural_findRecArg_loop___spec__9___rarg___boxed), 7, 0); +return x_2; +} +} +uint8_t l_Array_anyMUnsafe_any___at_Lean_Elab_Structural_findRecArg_loop___spec__10(lean_object* x_1, size_t x_2, size_t x_3) { +_start: +{ +uint8_t x_4; +x_4 = x_2 == x_3; +if (x_4 == 0) +{ +lean_object* x_5; uint8_t x_6; +x_5 = lean_array_uget(x_1, x_2); +x_6 = l_Lean_Expr_isFVar(x_5); +lean_dec(x_5); +if (x_6 == 0) +{ +uint8_t x_7; +x_7 = 1; +return x_7; +} +else +{ +size_t x_8; size_t x_9; +x_8 = 1; +x_9 = x_2 + x_8; +x_2 = x_9; +goto _start; +} +} +else +{ +uint8_t x_11; +x_11 = 0; +return x_11; +} +} +} +lean_object* l_Lean_throwError___at_Lean_Elab_Structural_findRecArg_loop___spec__11___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { +_start: +{ +lean_object* x_8; lean_object* x_9; uint8_t x_10; +x_8 = lean_ctor_get(x_5, 3); +x_9 = l_Lean_addMessageContextFull___at_Lean_Meta_instAddMessageContextMetaM___spec__1(x_1, x_3, x_4, x_5, x_6, x_7); +x_10 = !lean_is_exclusive(x_9); +if (x_10 == 0) +{ +lean_object* x_11; lean_object* x_12; +x_11 = lean_ctor_get(x_9, 0); +lean_inc(x_8); +x_12 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_12, 0, x_8); +lean_ctor_set(x_12, 1, x_11); +lean_ctor_set_tag(x_9, 1); +lean_ctor_set(x_9, 0, x_12); +return x_9; +} +else +{ +lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; +x_13 = lean_ctor_get(x_9, 0); +x_14 = lean_ctor_get(x_9, 1); +lean_inc(x_14); +lean_inc(x_13); +lean_dec(x_9); +lean_inc(x_8); +x_15 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_15, 0, x_8); +lean_ctor_set(x_15, 1, x_13); +x_16 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_16, 0, x_15); +lean_ctor_set(x_16, 1, x_14); +return x_16; +} +} +} +lean_object* l_Lean_throwError___at_Lean_Elab_Structural_findRecArg_loop___spec__11(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_Lean_throwError___at_Lean_Elab_Structural_findRecArg_loop___spec__11___rarg___boxed), 7, 0); +return x_2; +} +} +static lean_object* _init_l_Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("argument #"); +return x_1; +} +} +static lean_object* _init_l_Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__1; +x_2 = l_Lean_stringToMessageData(x_1); +return x_2; +} +} +static lean_object* _init_l_Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__3() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string(" was not used for structural recursion"); +return x_1; +} +} +static lean_object* _init_l_Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__4() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__3; +x_2 = l_Lean_stringToMessageData(x_1); +return x_2; +} +} +static lean_object* _init_l_Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__5() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string(""); +return x_1; +} +} +static lean_object* _init_l_Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__6() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__5; +x_2 = l_Lean_stringToMessageData(x_1); +return x_2; +} +} +lean_object* l_Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; +x_3 = lean_unsigned_to_nat(1u); +x_4 = lean_nat_add(x_1, x_3); +x_5 = l_Nat_repr(x_4); +x_6 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_6, 0, x_5); +x_7 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_7, 0, x_6); +x_8 = l_Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__2; +x_9 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_9, 0, x_8); +lean_ctor_set(x_9, 1, x_7); +x_10 = l_Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__4; +x_11 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_11, 0, x_9); +lean_ctor_set(x_11, 1, x_10); +x_12 = l_Lean_indentD(x_2); +x_13 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_13, 0, x_11); +lean_ctor_set(x_13, 1, x_12); +x_14 = l_Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__6; +x_15 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_15, 0, x_13); +lean_ctor_set(x_15, 1, x_14); +return x_15; +} +} +lean_object* l_Lean_Elab_Structural_findRecArg_loop___rarg___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; lean_object* x_11; +x_10 = lean_apply_2(x_1, x_2, x_4); +x_11 = l_Lean_Meta_mapErrorImp___rarg(x_10, x_3, x_5, x_6, x_7, x_8, x_9); +return x_11; +} +} +static lean_object* _init_l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__1() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_levelZero; +x_2 = l_Lean_mkSort(x_1); +return x_2; +} +} +static lean_object* _init_l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__2() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_hasBadIndexDep_x3f___lambda__1___boxed), 7, 0); +return x_1; +} +} +static lean_object* _init_l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__3() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string(" was not used because its type is an inductive datatype"); +return x_1; +} +} +static lean_object* _init_l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__4() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__3; +x_2 = l_Lean_stringToMessageData(x_1); +return x_2; +} +} +static lean_object* _init_l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__5() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("\nand parameter"); +return x_1; +} +} +static lean_object* _init_l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__6() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__5; +x_2 = l_Lean_stringToMessageData(x_1); +return x_2; +} +} +static lean_object* _init_l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__7() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("\ndepends on"); +return x_1; +} +} +static lean_object* _init_l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__8() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__7; +x_2 = l_Lean_stringToMessageData(x_1); +return x_2; +} +} +static lean_object* _init_l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__9() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string(" was not used because its type is an inductive family"); +return x_1; +} +} +static lean_object* _init_l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__10() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__9; +x_2 = l_Lean_stringToMessageData(x_1); +return x_2; +} +} +static lean_object* _init_l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__11() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("\nand index"); +return x_1; +} +} +static lean_object* _init_l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__12() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__11; +x_2 = l_Lean_stringToMessageData(x_1); +return x_2; +} +} +static lean_object* _init_l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__13() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("\ndepends on the non index"); +return x_1; +} +} +static lean_object* _init_l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__14() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__13; +x_2 = l_Lean_stringToMessageData(x_1); +return x_2; +} +} +static lean_object* _init_l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__15() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string(" was not used because its type is an inductive family and indices are not pairwise distinct"); +return x_1; +} +} +static lean_object* _init_l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__16() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__15; +x_2 = l_Lean_stringToMessageData(x_1); +return x_2; +} +} +static lean_object* _init_l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__17() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string(" was not used because its type is an inductive family and indices are not variables"); +return x_1; +} +} +static lean_object* _init_l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__18() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__17; +x_2 = l_Lean_stringToMessageData(x_1); +return x_2; +} +} +lean_object* l_Lean_Elab_Structural_findRecArg_loop___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10) { +_start: +{ +lean_object* x_11; uint8_t x_12; +x_11 = lean_array_get_size(x_2); +x_12 = lean_nat_dec_lt(x_4, x_11); +if (x_12 == 0) +{ +lean_object* x_13; +lean_dec(x_11); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_13 = l___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_throwStructuralFailed___rarg(x_6, x_7, x_8, x_9, x_10); +return x_13; +} +else +{ +lean_object* x_14; lean_object* x_15; +x_14 = lean_array_fget(x_2, x_4); +lean_inc(x_6); +x_15 = l_Lean_Meta_getFVarLocalDecl(x_14, x_6, x_7, x_8, x_9, x_10); +lean_dec(x_14); +if (lean_obj_tag(x_15) == 0) +{ +lean_object* x_16; lean_object* x_17; uint8_t x_18; +x_16 = lean_ctor_get(x_15, 0); +lean_inc(x_16); +x_17 = lean_ctor_get(x_15, 1); +lean_inc(x_17); +lean_dec(x_15); +x_18 = l_Lean_LocalDecl_isLet(x_16); +if (x_18 == 0) +{ +lean_object* x_19; lean_object* x_20; +x_19 = l_Lean_LocalDecl_type(x_16); +lean_dec(x_16); +lean_inc(x_9); +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_6); +x_20 = l_Lean_Meta_whnfD(x_19, x_6, x_7, x_8, x_9, x_17); +if (lean_obj_tag(x_20) == 0) +{ +lean_object* x_21; lean_object* x_22; lean_object* x_23; +x_21 = lean_ctor_get(x_20, 0); +lean_inc(x_21); +x_22 = lean_ctor_get(x_20, 1); +lean_inc(x_22); +lean_dec(x_20); +x_23 = l_Lean_Expr_getAppFn(x_21); +if (lean_obj_tag(x_23) == 4) +{ +lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; +x_24 = lean_ctor_get(x_23, 0); +lean_inc(x_24); +x_25 = lean_ctor_get(x_23, 1); +lean_inc(x_25); +lean_dec(x_23); +x_26 = lean_st_ref_get(x_9, x_22); +x_27 = lean_ctor_get(x_26, 0); +lean_inc(x_27); +x_28 = lean_ctor_get(x_26, 1); +lean_inc(x_28); +lean_dec(x_26); +x_29 = lean_ctor_get(x_27, 0); +lean_inc(x_29); +lean_dec(x_27); +x_30 = lean_environment_find(x_29, x_24); +if (lean_obj_tag(x_30) == 0) +{ +lean_object* x_31; lean_object* x_32; +lean_dec(x_25); +lean_dec(x_21); +lean_dec(x_11); +x_31 = lean_unsigned_to_nat(1u); +x_32 = lean_nat_add(x_4, x_31); +lean_dec(x_4); +x_4 = x_32; +x_10 = x_28; +goto _start; +} +else +{ +lean_object* x_34; +x_34 = lean_ctor_get(x_30, 0); +lean_inc(x_34); +lean_dec(x_30); +if (lean_obj_tag(x_34) == 5) +{ +lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; uint8_t x_42; +x_35 = lean_ctor_get(x_34, 0); +lean_inc(x_35); +lean_dec(x_34); +x_36 = lean_ctor_get(x_35, 0); +lean_inc(x_36); +x_37 = lean_ctor_get(x_36, 0); +lean_inc(x_37); +lean_dec(x_36); +x_38 = l_Lean_brecOnSuffix; +lean_inc(x_37); +x_39 = lean_name_mk_string(x_37, x_38); +x_40 = l_Lean_hasConst___at_Lean_Elab_Structural_findRecArg_loop___spec__1(x_39, x_5, x_6, x_7, x_8, x_9, x_28); +x_41 = lean_ctor_get(x_40, 0); +lean_inc(x_41); +x_42 = lean_unbox(x_41); +lean_dec(x_41); +if (x_42 == 0) +{ +lean_object* x_43; lean_object* x_44; lean_object* x_45; +lean_dec(x_37); +lean_dec(x_35); +lean_dec(x_25); +lean_dec(x_21); +lean_dec(x_11); +x_43 = lean_ctor_get(x_40, 1); +lean_inc(x_43); +lean_dec(x_40); +x_44 = lean_unsigned_to_nat(1u); +x_45 = lean_nat_add(x_4, x_44); +lean_dec(x_4); +x_4 = x_45; +x_10 = x_43; +goto _start; +} +else +{ +lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_object* x_51; lean_object* x_52; uint8_t x_53; lean_object* x_54; +x_47 = lean_ctor_get(x_40, 1); +lean_inc(x_47); +lean_dec(x_40); +x_48 = l_Lean_binductionOnSuffix; +lean_inc(x_37); +x_49 = lean_name_mk_string(x_37, x_48); +x_50 = l_Lean_hasConst___at_Lean_Elab_Structural_findRecArg_loop___spec__1(x_49, x_5, x_6, x_7, x_8, x_9, x_47); +x_51 = lean_ctor_get(x_50, 0); +lean_inc(x_51); +x_52 = lean_ctor_get(x_50, 1); +lean_inc(x_52); +lean_dec(x_50); +x_53 = lean_ctor_get_uint8(x_35, sizeof(void*)*5 + 2); +if (x_53 == 0) +{ +lean_object* x_203; +lean_dec(x_51); +x_203 = lean_box(0); +x_54 = x_203; +goto block_202; +} +else +{ +uint8_t x_204; +x_204 = lean_unbox(x_51); +lean_dec(x_51); +if (x_204 == 0) +{ +lean_object* x_205; lean_object* x_206; +lean_dec(x_37); +lean_dec(x_35); +lean_dec(x_25); +lean_dec(x_21); +lean_dec(x_11); +x_205 = lean_unsigned_to_nat(1u); +x_206 = lean_nat_add(x_4, x_205); +lean_dec(x_4); +x_4 = x_206; +x_10 = x_52; +goto _start; +} +else +{ +lean_object* x_208; +x_208 = lean_box(0); +x_54 = x_208; +goto block_202; +} +} +block_202: +{ +lean_object* x_55; lean_object* x_56; lean_object* x_57; lean_object* x_58; lean_object* x_59; lean_object* x_60; lean_object* x_61; lean_object* x_62; lean_object* x_63; lean_object* x_64; lean_object* x_65; lean_object* x_66; lean_object* x_158; lean_object* x_178; uint8_t x_179; +lean_dec(x_54); +x_55 = lean_unsigned_to_nat(0u); +x_56 = l_Lean_Expr_getAppNumArgsAux(x_21, x_55); +x_57 = l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__1; +lean_inc(x_56); +x_58 = lean_mk_array(x_56, x_57); +x_59 = lean_unsigned_to_nat(1u); +x_60 = lean_nat_sub(x_56, x_59); +lean_dec(x_56); +lean_inc(x_21); +x_61 = l___private_Lean_Expr_0__Lean_Expr_getAppArgsAux(x_21, x_58, x_60); +x_62 = lean_ctor_get(x_35, 1); +lean_inc(x_62); +lean_dec(x_35); +lean_inc(x_62); +lean_inc(x_61); +x_63 = l_Array_extract___rarg(x_61, x_55, x_62); +x_64 = lean_array_get_size(x_61); +x_65 = l_Array_extract___rarg(x_61, x_62, x_64); +x_178 = lean_array_get_size(x_65); +x_179 = lean_nat_dec_lt(x_55, x_178); +if (x_179 == 0) +{ +lean_object* x_180; +lean_dec(x_178); +x_180 = lean_box(0); +x_158 = x_180; +goto block_177; +} +else +{ +uint8_t x_181; +x_181 = lean_nat_dec_le(x_178, x_178); +if (x_181 == 0) +{ +lean_object* x_182; +lean_dec(x_178); +x_182 = lean_box(0); +x_158 = x_182; +goto block_177; +} +else +{ +size_t x_183; size_t x_184; uint8_t x_185; +x_183 = 0; +x_184 = lean_usize_of_nat(x_178); +lean_dec(x_178); +x_185 = l_Array_anyMUnsafe_any___at_Lean_Elab_Structural_findRecArg_loop___spec__10(x_65, x_183, x_184); +if (x_185 == 0) +{ +lean_object* x_186; +x_186 = lean_box(0); +x_158 = x_186; +goto block_177; +} +else +{ +lean_object* x_187; lean_object* x_188; lean_object* x_189; lean_object* x_190; lean_object* x_191; lean_object* x_192; lean_object* x_193; 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; +lean_dec(x_65); +lean_dec(x_63); +lean_dec(x_37); +lean_dec(x_25); +lean_dec(x_11); +x_187 = lean_nat_add(x_4, x_59); +lean_dec(x_4); +lean_inc(x_187); +x_188 = l_Nat_repr(x_187); +x_189 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_189, 0, x_188); +x_190 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_190, 0, x_189); +x_191 = l_Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__2; +x_192 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_192, 0, x_191); +lean_ctor_set(x_192, 1, x_190); +x_193 = l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__18; +x_194 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_194, 0, x_192); +lean_ctor_set(x_194, 1, x_193); +x_195 = l_Lean_indentExpr(x_21); +x_196 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_196, 0, x_194); +lean_ctor_set(x_196, 1, x_195); +x_197 = l_Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__6; +x_198 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_198, 0, x_196); +lean_ctor_set(x_198, 1, x_197); +x_199 = lean_alloc_closure((void*)(l_Lean_throwError___at_Lean_Elab_Structural_findRecArg_loop___spec__11___rarg___boxed), 7, 1); +lean_closure_set(x_199, 0, x_198); +x_200 = lean_alloc_closure((void*)(l_Lean_Elab_Structural_findRecArg_loop___rarg), 10, 4); +lean_closure_set(x_200, 0, x_1); +lean_closure_set(x_200, 1, x_2); +lean_closure_set(x_200, 2, x_3); +lean_closure_set(x_200, 3, x_187); +x_201 = l___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_orelse_x27___rarg(x_199, x_200, x_5, x_6, x_7, x_8, x_9, x_52); +return x_201; +} +} +} +block_157: +{ +lean_object* x_67; lean_object* x_68; lean_object* x_69; +lean_inc(x_66); +lean_inc(x_2); +x_67 = l_Array_extract___rarg(x_2, x_55, x_66); +lean_inc(x_2); +x_68 = l_Array_extract___rarg(x_2, x_66, x_11); +lean_inc(x_9); +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_6); +x_69 = l___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_hasBadIndexDep_x3f(x_68, x_65, x_6, x_7, x_8, x_9, x_52); +if (lean_obj_tag(x_69) == 0) +{ +lean_object* x_70; +x_70 = lean_ctor_get(x_69, 0); +lean_inc(x_70); +if (lean_obj_tag(x_70) == 0) +{ +lean_object* x_71; lean_object* x_72; +x_71 = lean_ctor_get(x_69, 1); +lean_inc(x_71); +lean_dec(x_69); +lean_inc(x_9); +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_6); +x_72 = l___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_hasBadParamDep_x3f(x_68, x_63, x_6, x_7, x_8, x_9, x_71); +if (lean_obj_tag(x_72) == 0) +{ +lean_object* x_73; +x_73 = lean_ctor_get(x_72, 0); +lean_inc(x_73); +if (lean_obj_tag(x_73) == 0) +{ +lean_object* x_74; lean_object* x_75; size_t x_76; size_t x_77; lean_object* x_78; lean_object* x_79; lean_object* x_80; lean_object* x_81; lean_object* x_82; lean_object* x_83; lean_object* x_84; lean_object* x_85; lean_object* x_86; uint8_t x_87; lean_object* x_88; lean_object* x_89; lean_object* x_90; lean_object* x_91; lean_object* x_92; lean_object* x_93; lean_object* x_94; +lean_dec(x_21); +x_74 = lean_ctor_get(x_72, 1); +lean_inc(x_74); +lean_dec(x_72); +x_75 = lean_array_get_size(x_65); +x_76 = lean_usize_of_nat(x_75); +lean_dec(x_75); +x_77 = 0; +lean_inc(x_65); +x_78 = x_65; +x_79 = l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_findRecArg_loop___spec__2(x_68, x_76, x_77, x_78); +x_80 = x_79; +lean_inc(x_37); +x_81 = l_Lean_isInductivePredicate___at_Lean_Elab_Structural_findRecArg_loop___spec__3(x_37, x_5, x_6, x_7, x_8, x_9, x_74); +x_82 = lean_ctor_get(x_81, 0); +lean_inc(x_82); +x_83 = lean_ctor_get(x_81, 1); +lean_inc(x_83); +lean_dec(x_81); +x_84 = lean_array_get_size(x_67); +x_85 = lean_nat_sub(x_4, x_84); +lean_dec(x_84); +x_86 = lean_alloc_ctor(0, 8, 2); +lean_ctor_set(x_86, 0, x_67); +lean_ctor_set(x_86, 1, x_68); +lean_ctor_set(x_86, 2, x_85); +lean_ctor_set(x_86, 3, x_80); +lean_ctor_set(x_86, 4, x_37); +lean_ctor_set(x_86, 5, x_25); +lean_ctor_set(x_86, 6, x_63); +lean_ctor_set(x_86, 7, x_65); +lean_ctor_set_uint8(x_86, sizeof(void*)*8, x_53); +x_87 = lean_unbox(x_82); +lean_dec(x_82); +lean_ctor_set_uint8(x_86, sizeof(void*)*8 + 1, x_87); +lean_inc(x_4); +x_88 = lean_alloc_closure((void*)(l_Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___boxed), 2, 1); +lean_closure_set(x_88, 0, x_4); +lean_inc(x_3); +x_89 = lean_alloc_closure((void*)(l_Lean_Elab_Structural_findRecArg_loop___rarg___lambda__2), 9, 3); +lean_closure_set(x_89, 0, x_3); +lean_closure_set(x_89, 1, x_86); +lean_closure_set(x_89, 2, x_88); +x_90 = l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__2; +x_91 = lean_alloc_closure((void*)(l_ReaderT_bind___at_Lean_Elab_Structural_findRecArg_loop___spec__4___rarg), 8, 2); +lean_closure_set(x_91, 0, x_89); +lean_closure_set(x_91, 1, x_90); +x_92 = lean_nat_add(x_4, x_59); +lean_dec(x_4); +x_93 = lean_alloc_closure((void*)(l_Lean_Elab_Structural_findRecArg_loop___rarg), 10, 4); +lean_closure_set(x_93, 0, x_1); +lean_closure_set(x_93, 1, x_2); +lean_closure_set(x_93, 2, x_3); +lean_closure_set(x_93, 3, x_92); +x_94 = l___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_orelse_x27___rarg(x_91, x_93, x_5, x_6, x_7, x_8, x_9, x_83); +return x_94; +} +else +{ +lean_object* x_95; lean_object* x_96; lean_object* x_97; lean_object* x_98; lean_object* x_99; lean_object* x_100; lean_object* x_101; lean_object* x_102; lean_object* x_103; lean_object* x_104; lean_object* x_105; lean_object* x_106; lean_object* x_107; lean_object* x_108; lean_object* x_109; lean_object* x_110; lean_object* x_111; lean_object* x_112; lean_object* x_113; lean_object* x_114; lean_object* x_115; lean_object* x_116; lean_object* x_117; lean_object* x_118; lean_object* x_119; lean_object* x_120; lean_object* x_121; +lean_dec(x_68); +lean_dec(x_67); +lean_dec(x_65); +lean_dec(x_63); +lean_dec(x_37); +lean_dec(x_25); +x_95 = lean_ctor_get(x_73, 0); +lean_inc(x_95); +lean_dec(x_73); +x_96 = lean_ctor_get(x_72, 1); +lean_inc(x_96); +lean_dec(x_72); +x_97 = lean_ctor_get(x_95, 0); +lean_inc(x_97); +x_98 = lean_ctor_get(x_95, 1); +lean_inc(x_98); +lean_dec(x_95); +x_99 = lean_nat_add(x_4, x_59); +lean_dec(x_4); +lean_inc(x_99); +x_100 = l_Nat_repr(x_99); +x_101 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_101, 0, x_100); +x_102 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_102, 0, x_101); +x_103 = l_Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__2; +x_104 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_104, 0, x_103); +lean_ctor_set(x_104, 1, x_102); +x_105 = l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__4; +x_106 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_106, 0, x_104); +lean_ctor_set(x_106, 1, x_105); +x_107 = l_Lean_indentExpr(x_21); +x_108 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_108, 0, x_106); +lean_ctor_set(x_108, 1, x_107); +x_109 = l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__6; +x_110 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_110, 0, x_108); +lean_ctor_set(x_110, 1, x_109); +x_111 = l_Lean_indentExpr(x_97); +x_112 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_112, 0, x_110); +lean_ctor_set(x_112, 1, x_111); +x_113 = l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__8; +x_114 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_114, 0, x_112); +lean_ctor_set(x_114, 1, x_113); +x_115 = l_Lean_indentExpr(x_98); +x_116 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_116, 0, x_114); +lean_ctor_set(x_116, 1, x_115); +x_117 = l_Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__6; +x_118 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_118, 0, x_116); +lean_ctor_set(x_118, 1, x_117); +x_119 = lean_alloc_closure((void*)(l_Lean_throwError___at_Lean_Elab_Structural_findRecArg_loop___spec__5___rarg___boxed), 7, 1); +lean_closure_set(x_119, 0, x_118); +x_120 = lean_alloc_closure((void*)(l_Lean_Elab_Structural_findRecArg_loop___rarg), 10, 4); +lean_closure_set(x_120, 0, x_1); +lean_closure_set(x_120, 1, x_2); +lean_closure_set(x_120, 2, x_3); +lean_closure_set(x_120, 3, x_99); +x_121 = l___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_orelse_x27___rarg(x_119, x_120, x_5, x_6, x_7, x_8, x_9, x_96); +return x_121; +} +} +else +{ +uint8_t x_122; +lean_dec(x_68); +lean_dec(x_67); +lean_dec(x_65); +lean_dec(x_63); +lean_dec(x_37); +lean_dec(x_25); +lean_dec(x_21); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_122 = !lean_is_exclusive(x_72); +if (x_122 == 0) +{ +return x_72; +} +else +{ +lean_object* x_123; lean_object* x_124; lean_object* x_125; +x_123 = lean_ctor_get(x_72, 0); +x_124 = lean_ctor_get(x_72, 1); +lean_inc(x_124); +lean_inc(x_123); +lean_dec(x_72); +x_125 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_125, 0, x_123); +lean_ctor_set(x_125, 1, x_124); +return x_125; +} +} +} +else +{ +lean_object* x_126; lean_object* x_127; lean_object* x_128; lean_object* x_129; lean_object* x_130; lean_object* x_131; lean_object* x_132; lean_object* x_133; lean_object* x_134; lean_object* x_135; lean_object* x_136; lean_object* x_137; lean_object* x_138; lean_object* x_139; lean_object* x_140; lean_object* x_141; lean_object* x_142; lean_object* x_143; lean_object* x_144; lean_object* x_145; lean_object* x_146; lean_object* x_147; lean_object* x_148; lean_object* x_149; lean_object* x_150; lean_object* x_151; lean_object* x_152; +lean_dec(x_68); +lean_dec(x_67); +lean_dec(x_65); +lean_dec(x_63); +lean_dec(x_37); +lean_dec(x_25); +x_126 = lean_ctor_get(x_70, 0); +lean_inc(x_126); +lean_dec(x_70); +x_127 = lean_ctor_get(x_69, 1); +lean_inc(x_127); +lean_dec(x_69); +x_128 = lean_ctor_get(x_126, 0); +lean_inc(x_128); +x_129 = lean_ctor_get(x_126, 1); +lean_inc(x_129); +lean_dec(x_126); +x_130 = lean_nat_add(x_4, x_59); +lean_dec(x_4); +lean_inc(x_130); +x_131 = l_Nat_repr(x_130); +x_132 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_132, 0, x_131); +x_133 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_133, 0, x_132); +x_134 = l_Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__2; +x_135 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_135, 0, x_134); +lean_ctor_set(x_135, 1, x_133); +x_136 = l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__10; +x_137 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_137, 0, x_135); +lean_ctor_set(x_137, 1, x_136); +x_138 = l_Lean_indentExpr(x_21); +x_139 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_139, 0, x_137); +lean_ctor_set(x_139, 1, x_138); +x_140 = l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__12; +x_141 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_141, 0, x_139); +lean_ctor_set(x_141, 1, x_140); +x_142 = l_Lean_indentExpr(x_128); +x_143 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_143, 0, x_141); +lean_ctor_set(x_143, 1, x_142); +x_144 = l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__14; +x_145 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_145, 0, x_143); +lean_ctor_set(x_145, 1, x_144); +x_146 = l_Lean_indentExpr(x_129); +x_147 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_147, 0, x_145); +lean_ctor_set(x_147, 1, x_146); +x_148 = l_Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__6; +x_149 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_149, 0, x_147); +lean_ctor_set(x_149, 1, x_148); +x_150 = lean_alloc_closure((void*)(l_Lean_throwError___at_Lean_Elab_Structural_findRecArg_loop___spec__6___rarg___boxed), 7, 1); +lean_closure_set(x_150, 0, x_149); +x_151 = lean_alloc_closure((void*)(l_Lean_Elab_Structural_findRecArg_loop___rarg), 10, 4); +lean_closure_set(x_151, 0, x_1); +lean_closure_set(x_151, 1, x_2); +lean_closure_set(x_151, 2, x_3); +lean_closure_set(x_151, 3, x_130); +x_152 = l___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_orelse_x27___rarg(x_150, x_151, x_5, x_6, x_7, x_8, x_9, x_127); +return x_152; +} +} +else +{ +uint8_t x_153; +lean_dec(x_68); +lean_dec(x_67); +lean_dec(x_65); +lean_dec(x_63); +lean_dec(x_37); +lean_dec(x_25); +lean_dec(x_21); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_153 = !lean_is_exclusive(x_69); +if (x_153 == 0) +{ +return x_69; +} +else +{ +lean_object* x_154; lean_object* x_155; lean_object* x_156; +x_154 = lean_ctor_get(x_69, 0); +x_155 = lean_ctor_get(x_69, 1); +lean_inc(x_155); +lean_inc(x_154); +lean_dec(x_69); +x_156 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_156, 0, x_154); +lean_ctor_set(x_156, 1, x_155); +return x_156; +} +} +} +block_177: +{ +uint8_t x_159; +lean_dec(x_158); +x_159 = l___private_Init_Data_Array_Basic_0__Array_allDiffAux___at_Lean_Elab_Structural_findRecArg_loop___spec__7(x_65, x_55); +if (x_159 == 0) +{ +lean_object* x_160; lean_object* x_161; lean_object* x_162; lean_object* x_163; lean_object* x_164; lean_object* x_165; lean_object* x_166; lean_object* x_167; 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; +lean_dec(x_65); +lean_dec(x_63); +lean_dec(x_37); +lean_dec(x_25); +lean_dec(x_11); +x_160 = lean_nat_add(x_4, x_59); +lean_dec(x_4); +lean_inc(x_160); +x_161 = l_Nat_repr(x_160); +x_162 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_162, 0, x_161); +x_163 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_163, 0, x_162); +x_164 = l_Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__2; +x_165 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_165, 0, x_164); +lean_ctor_set(x_165, 1, x_163); +x_166 = l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__16; +x_167 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_167, 0, x_165); +lean_ctor_set(x_167, 1, x_166); +x_168 = l_Lean_indentExpr(x_21); +x_169 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_169, 0, x_167); +lean_ctor_set(x_169, 1, x_168); +x_170 = l_Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__6; +x_171 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_171, 0, x_169); +lean_ctor_set(x_171, 1, x_170); +x_172 = lean_alloc_closure((void*)(l_Lean_throwError___at_Lean_Elab_Structural_findRecArg_loop___spec__9___rarg___boxed), 7, 1); +lean_closure_set(x_172, 0, x_171); +x_173 = lean_alloc_closure((void*)(l_Lean_Elab_Structural_findRecArg_loop___rarg), 10, 4); +lean_closure_set(x_173, 0, x_1); +lean_closure_set(x_173, 1, x_2); +lean_closure_set(x_173, 2, x_3); +lean_closure_set(x_173, 3, x_160); +x_174 = l___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_orelse_x27___rarg(x_172, x_173, x_5, x_6, x_7, x_8, x_9, x_52); +return x_174; +} +else +{ +lean_object* x_175; uint8_t x_176; +x_175 = l___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_getIndexMinPos(x_2, x_65); +x_176 = lean_nat_dec_lt(x_175, x_1); +if (x_176 == 0) +{ +lean_dec(x_175); +lean_inc(x_1); +x_66 = x_1; +goto block_157; +} +else +{ +x_66 = x_175; +goto block_157; +} +} +} +} +} +} +else +{ +lean_object* x_209; lean_object* x_210; +lean_dec(x_34); +lean_dec(x_25); +lean_dec(x_21); +lean_dec(x_11); +x_209 = lean_unsigned_to_nat(1u); +x_210 = lean_nat_add(x_4, x_209); +lean_dec(x_4); +x_4 = x_210; +x_10 = x_28; +goto _start; +} +} +} +else +{ +lean_object* x_212; lean_object* x_213; +lean_dec(x_23); +lean_dec(x_21); +lean_dec(x_11); +x_212 = lean_unsigned_to_nat(1u); +x_213 = lean_nat_add(x_4, x_212); +lean_dec(x_4); +x_4 = x_213; +x_10 = x_22; +goto _start; +} +} +else +{ +uint8_t x_215; +lean_dec(x_11); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_215 = !lean_is_exclusive(x_20); +if (x_215 == 0) +{ +return x_20; +} +else +{ +lean_object* x_216; lean_object* x_217; lean_object* x_218; +x_216 = lean_ctor_get(x_20, 0); +x_217 = lean_ctor_get(x_20, 1); +lean_inc(x_217); +lean_inc(x_216); +lean_dec(x_20); +x_218 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_218, 0, x_216); +lean_ctor_set(x_218, 1, x_217); +return x_218; +} +} +} +else +{ +lean_object* x_219; +lean_dec(x_16); +lean_dec(x_11); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_219 = l___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_throwStructuralFailed___rarg(x_6, x_7, x_8, x_9, x_17); +return x_219; +} +} +else +{ +uint8_t x_220; +lean_dec(x_11); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_220 = !lean_is_exclusive(x_15); +if (x_220 == 0) +{ +return x_15; +} +else +{ +lean_object* x_221; lean_object* x_222; lean_object* x_223; +x_221 = lean_ctor_get(x_15, 0); +x_222 = lean_ctor_get(x_15, 1); +lean_inc(x_222); +lean_inc(x_221); +lean_dec(x_15); +x_223 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_223, 0, x_221); +lean_ctor_set(x_223, 1, x_222); +return x_223; +} +} +} +} +} +lean_object* l_Lean_Elab_Structural_findRecArg_loop(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_Lean_Elab_Structural_findRecArg_loop___rarg), 10, 0); +return x_2; +} +} +lean_object* l_Lean_hasConst___at_Lean_Elab_Structural_findRecArg_loop___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) { +_start: +{ +lean_object* x_8; +x_8 = l_Lean_hasConst___at_Lean_Elab_Structural_findRecArg_loop___spec__1(x_1, x_2, x_3, x_4, x_5, x_6, x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +return x_8; +} +} +lean_object* l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_findRecArg_loop___spec__2___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +size_t x_5; size_t x_6; lean_object* x_7; +x_5 = lean_unbox_usize(x_2); +lean_dec(x_2); +x_6 = lean_unbox_usize(x_3); +lean_dec(x_3); +x_7 = l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_findRecArg_loop___spec__2(x_1, x_5, x_6, x_4); +lean_dec(x_1); +return x_7; +} +} +lean_object* l_Lean_isInductivePredicate___at_Lean_Elab_Structural_findRecArg_loop___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) { +_start: +{ +lean_object* x_8; +x_8 = l_Lean_isInductivePredicate___at_Lean_Elab_Structural_findRecArg_loop___spec__3(x_1, x_2, x_3, x_4, x_5, x_6, x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +return x_8; +} +} +lean_object* l_Lean_throwError___at_Lean_Elab_Structural_findRecArg_loop___spec__5___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { +_start: +{ +lean_object* x_8; +x_8 = l_Lean_throwError___at_Lean_Elab_Structural_findRecArg_loop___spec__5___rarg(x_1, x_2, x_3, x_4, x_5, x_6, x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +return x_8; +} +} +lean_object* l_Lean_throwError___at_Lean_Elab_Structural_findRecArg_loop___spec__6___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { +_start: +{ +lean_object* x_8; +x_8 = l_Lean_throwError___at_Lean_Elab_Structural_findRecArg_loop___spec__6___rarg(x_1, x_2, x_3, x_4, x_5, x_6, x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +return x_8; +} +} +lean_object* l___private_Init_Data_Array_Basic_0__Array_allDiffAuxAux___at_Lean_Elab_Structural_findRecArg_loop___spec__8___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +uint8_t x_5; lean_object* x_6; +x_5 = l___private_Init_Data_Array_Basic_0__Array_allDiffAuxAux___at_Lean_Elab_Structural_findRecArg_loop___spec__8(x_1, x_2, x_3, x_4); +lean_dec(x_2); +lean_dec(x_1); +x_6 = lean_box(x_5); +return x_6; +} +} +lean_object* l___private_Init_Data_Array_Basic_0__Array_allDiffAux___at_Lean_Elab_Structural_findRecArg_loop___spec__7___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +uint8_t x_3; lean_object* x_4; +x_3 = l___private_Init_Data_Array_Basic_0__Array_allDiffAux___at_Lean_Elab_Structural_findRecArg_loop___spec__7(x_1, x_2); +lean_dec(x_1); +x_4 = lean_box(x_3); +return x_4; +} +} +lean_object* l_Lean_throwError___at_Lean_Elab_Structural_findRecArg_loop___spec__9___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { +_start: +{ +lean_object* x_8; +x_8 = l_Lean_throwError___at_Lean_Elab_Structural_findRecArg_loop___spec__9___rarg(x_1, x_2, x_3, x_4, x_5, x_6, x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +return x_8; +} +} +lean_object* l_Array_anyMUnsafe_any___at_Lean_Elab_Structural_findRecArg_loop___spec__10___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +size_t x_4; size_t x_5; uint8_t x_6; lean_object* x_7; +x_4 = lean_unbox_usize(x_2); +lean_dec(x_2); +x_5 = lean_unbox_usize(x_3); +lean_dec(x_3); +x_6 = l_Array_anyMUnsafe_any___at_Lean_Elab_Structural_findRecArg_loop___spec__10(x_1, x_4, x_5); +lean_dec(x_1); +x_7 = lean_box(x_6); +return x_7; +} +} +lean_object* l_Lean_throwError___at_Lean_Elab_Structural_findRecArg_loop___spec__11___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { +_start: +{ +lean_object* x_8; +x_8 = l_Lean_throwError___at_Lean_Elab_Structural_findRecArg_loop___spec__11___rarg(x_1, x_2, x_3, x_4, x_5, x_6, x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +return x_8; +} +} +lean_object* l_Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = l_Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1(x_1, x_2); +lean_dec(x_1); +return x_3; +} +} +lean_object* l_Lean_Elab_Structural_findRecArg___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9) { +_start: +{ +lean_object* x_10; +lean_inc(x_1); +x_10 = l_Lean_Elab_Structural_findRecArg_loop___rarg(x_1, x_2, x_3, x_1, x_4, x_5, x_6, x_7, x_8, x_9); +return x_10; +} +} +lean_object* l_Lean_Elab_Structural_findRecArg(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_Lean_Elab_Structural_findRecArg___rarg), 9, 0); +return x_2; +} +} +lean_object* initialize_Init(lean_object*); +lean_object* initialize_Lean_Elab_PreDefinition_Structural_Basic(lean_object*); +static bool _G_initialized = false; +lean_object* initialize_Lean_Elab_PreDefinition_Structural_FindRecArg(lean_object* w) { +lean_object * res; +if (_G_initialized) return lean_io_result_mk_ok(lean_box(0)); +_G_initialized = true; +res = initialize_Init(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); +res = initialize_Lean_Elab_PreDefinition_Structural_Basic(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); +l___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_hasBadIndexDep_x3f___closed__1 = _init_l___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_hasBadIndexDep_x3f___closed__1(); +lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_hasBadIndexDep_x3f___closed__1); +l___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_throwStructuralFailed___rarg___closed__1 = _init_l___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_throwStructuralFailed___rarg___closed__1(); +lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_throwStructuralFailed___rarg___closed__1); +l___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_throwStructuralFailed___rarg___closed__2 = _init_l___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_throwStructuralFailed___rarg___closed__2(); +lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_throwStructuralFailed___rarg___closed__2); +l___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_orelse_x27___rarg___closed__1 = _init_l___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_orelse_x27___rarg___closed__1(); +lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_FindRecArg_0__Lean_Elab_Structural_orelse_x27___rarg___closed__1); +l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_findRecArg_loop___spec__2___closed__1 = _init_l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_findRecArg_loop___spec__2___closed__1(); +lean_mark_persistent(l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_findRecArg_loop___spec__2___closed__1); +l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_findRecArg_loop___spec__2___closed__2 = _init_l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_findRecArg_loop___spec__2___closed__2(); +lean_mark_persistent(l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_findRecArg_loop___spec__2___closed__2); +l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_findRecArg_loop___spec__2___closed__3 = _init_l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_findRecArg_loop___spec__2___closed__3(); +lean_mark_persistent(l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_findRecArg_loop___spec__2___closed__3); +l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_findRecArg_loop___spec__2___closed__4 = _init_l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_findRecArg_loop___spec__2___closed__4(); +lean_mark_persistent(l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_findRecArg_loop___spec__2___closed__4); +l_Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__1 = _init_l_Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__1(); +lean_mark_persistent(l_Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__1); +l_Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__2 = _init_l_Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__2(); +lean_mark_persistent(l_Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__2); +l_Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__3 = _init_l_Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__3(); +lean_mark_persistent(l_Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__3); +l_Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__4 = _init_l_Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__4(); +lean_mark_persistent(l_Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__4); +l_Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__5 = _init_l_Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__5(); +lean_mark_persistent(l_Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__5); +l_Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__6 = _init_l_Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__6(); +lean_mark_persistent(l_Lean_Elab_Structural_findRecArg_loop___rarg___lambda__1___closed__6); +l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__1 = _init_l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__1(); +lean_mark_persistent(l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__1); +l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__2 = _init_l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__2(); +lean_mark_persistent(l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__2); +l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__3 = _init_l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__3(); +lean_mark_persistent(l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__3); +l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__4 = _init_l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__4(); +lean_mark_persistent(l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__4); +l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__5 = _init_l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__5(); +lean_mark_persistent(l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__5); +l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__6 = _init_l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__6(); +lean_mark_persistent(l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__6); +l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__7 = _init_l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__7(); +lean_mark_persistent(l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__7); +l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__8 = _init_l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__8(); +lean_mark_persistent(l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__8); +l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__9 = _init_l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__9(); +lean_mark_persistent(l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__9); +l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__10 = _init_l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__10(); +lean_mark_persistent(l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__10); +l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__11 = _init_l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__11(); +lean_mark_persistent(l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__11); +l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__12 = _init_l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__12(); +lean_mark_persistent(l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__12); +l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__13 = _init_l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__13(); +lean_mark_persistent(l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__13); +l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__14 = _init_l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__14(); +lean_mark_persistent(l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__14); +l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__15 = _init_l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__15(); +lean_mark_persistent(l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__15); +l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__16 = _init_l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__16(); +lean_mark_persistent(l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__16); +l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__17 = _init_l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__17(); +lean_mark_persistent(l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__17); +l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__18 = _init_l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__18(); +lean_mark_persistent(l_Lean_Elab_Structural_findRecArg_loop___rarg___closed__18); +return lean_io_result_mk_ok(lean_box(0)); +} +#ifdef __cplusplus +} +#endif diff --git a/stage0/stdlib/Lean/Elab/PreDefinition/Structural/IndPred.c b/stage0/stdlib/Lean/Elab/PreDefinition/Structural/IndPred.c new file mode 100644 index 0000000000..49bb488060 --- /dev/null +++ b/stage0/stdlib/Lean/Elab/PreDefinition/Structural/IndPred.c @@ -0,0 +1,5438 @@ +// Lean compiler output +// Module: Lean.Elab.PreDefinition.Structural.IndPred +// Imports: Init Lean.Meta.IndPredBelow Lean.Elab.PreDefinition.Basic Lean.Elab.PreDefinition.Structural.Basic +#include +#if defined(__clang__) +#pragma clang diagnostic ignored "-Wunused-parameter" +#pragma clang diagnostic ignored "-Wunused-label" +#elif defined(__GNUC__) && !defined(__CLANG__) +#pragma GCC diagnostic ignored "-Wunused-parameter" +#pragma GCC diagnostic ignored "-Wunused-label" +#pragma GCC diagnostic ignored "-Wunused-but-set-variable" +#endif +#ifdef __cplusplus +extern "C" { +#endif +lean_object* lean_array_set(lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_Elab_Structural_mkIndPredBRecOn___lambda__5___closed__2; +size_t l_USize_add(size_t, size_t); +lean_object* l_Lean_Expr_mvarId_x21(lean_object*); +lean_object* l_Lean_Elab_Structural_mkIndPredBRecOn___lambda__5___boxed(lean_object**); +lean_object* l_Lean_stringToMessageData(lean_object*); +lean_object* lean_mk_empty_array_with_capacity(lean_object*); +static lean_object* l_Lean_Elab_Structural_mkIndPredBRecOn___lambda__5___closed__1; +lean_object* l_Lean_mkSort(lean_object*); +lean_object* l_Lean_Meta_mkForallFVars(lean_object*, lean_object*, uint8_t, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___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_name_mk_string(lean_object*, lean_object*); +lean_object* l_Lean_Meta_forallBoundedTelescope___at_Lean_Elab_Structural_mkIndPredBRecOn___spec__1___rarg___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +uint8_t l_USize_decEq(size_t, size_t); +static lean_object* l_Lean_Elab_Structural_mkIndPredBRecOn___closed__5; +lean_object* lean_array_uget(lean_object*, size_t); +lean_object* l_Array_append___rarg(lean_object*, lean_object*); +lean_object* l_Lean_Meta_IndPredBelow_mkBelowMatcher(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_withLocalDecl___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__9(lean_object*); +static lean_object* l_Lean_Elab_Structural_mkIndPredBRecOn___lambda__6___closed__1; +lean_object* l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* lean_array_uset(lean_object*, size_t, lean_object*); +lean_object* l_Lean_Meta_getMatcherInfo_x3f___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_Elab_Structural_mkIndPredBRecOn___closed__3; +lean_object* l_Array_extract___rarg(lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_Basic_0__Lean_Meta_withLocalDeclImp___rarg(lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_addTrace_addTraceOptions(lean_object*); +uint8_t l_Lean_checkTraceOption(lean_object*, lean_object*); +static lean_object* l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___closed__6; +static lean_object* l_Lean_Elab_Structural_mkIndPredBRecOn___lambda__2___closed__2; +lean_object* lean_st_ref_get(lean_object*, lean_object*); +lean_object* l_Lean_Elab_Structural_mkIndPredBRecOn(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +uint8_t l_Lean_Elab_Structural_recArgHasLooseBVarsAt(lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__7___closed__1; +lean_object* lean_expr_instantiate1(lean_object*, lean_object*); +lean_object* l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___lambda__4___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_toSubarray___rarg(lean_object*, lean_object*, lean_object*); +lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___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_array_push(lean_object*, lean_object*); +lean_object* lean_array_get_size(lean_object*); +lean_object* l_Lean_MessageData_ofList(lean_object*); +lean_object* l_Lean_Elab_Structural_mkIndPredBRecOn___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*, lean_object*); +lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__3(lean_object*, lean_object*, lean_object*, lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Structural_mkIndPredBRecOn___lambda__4___boxed(lean_object**); +static lean_object* l_Lean_Elab_Structural_mkIndPredBRecOn___lambda__4___closed__1; +static lean_object* l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__7___closed__5; +lean_object* l_Lean_Meta_forallBoundedTelescope___at_Lean_Elab_Structural_mkIndPredBRecOn___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___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* l_Array_foldlMUnsafe_fold___at_Lean_Elab_Structural_mkIndPredBRecOn___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +uint8_t l_USize_decLt(size_t, size_t); +lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__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* l_Lean_Meta_withLetDecl___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__10(lean_object*); +extern lean_object* l_Lean_levelZero; +static lean_object* l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___closed__2; +lean_object* lean_nat_add(lean_object*, lean_object*); +static lean_object* l_Lean_Elab_Structural_mkIndPredBRecOn___lambda__6___closed__2; +lean_object* l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___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* l_Lean_mkAppN(lean_object*, lean_object*); +lean_object* l_Lean_mkMData(lean_object*, lean_object*); +lean_object* l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow_match__1___rarg(lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Expr_0__Lean_Expr_getAppArgsAux(lean_object*, lean_object*, lean_object*); +lean_object* l_List_mapTRAux___at_Lean_MessageData_instCoeListExprMessageData___spec__1(lean_object*, lean_object*); +lean_object* l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_match__2___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___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* l_Lean_Meta_IndPredBelow_backwardsChaining(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_mkProj(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Option_get___at_Lean_initFn____x40_Lean_Util_PPExt___hyg_218____spec__1(lean_object*, lean_object*); +static lean_object* l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___closed__4; +lean_object* l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow_match__3___rarg(lean_object*, lean_object*, lean_object*); +lean_object* lean_st_ref_take(lean_object*, lean_object*); +lean_object* lean_nat_sub(lean_object*, lean_object*); +static lean_object* l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___closed__1; +lean_object* l_Lean_Expr_headBeta(lean_object*); +static lean_object* l_Lean_Elab_Structural_mkIndPredBRecOn___lambda__7___closed__1; +static lean_object* l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___lambda__2___closed__2; +lean_object* l_Lean_Meta_getMatcherInfo_x3f___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___spec__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___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_array_get(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_mkLambdaFVars(lean_object*, lean_object*, uint8_t, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__7___closed__2; +static lean_object* l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___closed__8; +static lean_object* l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___closed__4; +static lean_object* l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___closed__1; +lean_object* l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow_match__1(lean_object*); +lean_object* l_Lean_Elab_Structural_mkIndPredBRecOn___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*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Structural_mkIndPredBRecOn___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_object*, lean_object*); +lean_object* l_Lean_Meta_withLocalDecl___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__9___rarg___boxed(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_Meta_Basic_0__Lean_Meta_forallTelescopeReducingAux___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow_match__3(lean_object*); +lean_object* l_Lean_Elab_Structural_ensureNoRecFn(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___lambda__2___closed__1; +lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_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*); +static lean_object* l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__7___closed__4; +lean_object* lean_array_to_list(lean_object*, lean_object*); +static lean_object* l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___lambda__2___closed__4; +static lean_object* l_Lean_Elab_Structural_mkIndPredBRecOn___lambda__2___closed__1; +lean_object* l_Lean_Elab_Structural_mkIndPredBRecOn___lambda__6(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___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_object*, lean_object*, lean_object*); +extern lean_object* l_Lean_instInhabitedExpr; +lean_object* l_Lean_Elab_Structural_mkIndPredBRecOn___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* l_Lean_Elab_Structural_mkIndPredBRecOn___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*); +static lean_object* l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___closed__5; +uint8_t l_Lean_Expr_isConstOf(lean_object*, lean_object*); +lean_object* l_Lean_Elab_Structural_mkIndPredBRecOn___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*); +lean_object* l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___spec__3___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___closed__3; +lean_object* l_Lean_Elab_Structural_mkIndPredBRecOn___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___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___lambda__2___closed__3; +uint8_t l_Lean_Expr_Data_binderInfo(uint64_t); +lean_object* l_Lean_Meta_withLetDecl___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__10___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +size_t lean_usize_of_nat(lean_object*); +static lean_object* l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__7___closed__3; +lean_object* l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___spec__3(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__4___boxed__const__1; +lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps(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_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___closed__7; +static lean_object* l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___closed__2; +static lean_object* l_Lean_Elab_Structural_mkIndPredBRecOn___lambda__7___closed__2; +lean_object* l_Lean_Meta_withLocalDecl___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__9___rarg___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__8___boxed(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_object* l_Lean_Expr_getAppNumArgsAux(lean_object*, lean_object*); +static lean_object* l_Lean_Elab_Structural_mkIndPredBRecOn___closed__1; +lean_object* l_Array_foldlMUnsafe_fold___at_Lean_Elab_Structural_mkIndPredBRecOn___spec__2(lean_object*, lean_object*, lean_object*, size_t, size_t, lean_object*); +static lean_object* l_Lean_Elab_Structural_mkIndPredBRecOn___closed__2; +uint8_t lean_expr_eqv(lean_object*, lean_object*); +extern lean_object* l_Lean_Meta_IndPredBelow_maxBackwardChainingDepth; +uint8_t lean_nat_dec_le(lean_object*, lean_object*); +lean_object* l_Lean_mkApp(lean_object*, lean_object*); +lean_object* l_Lean_Name_append(lean_object*, lean_object*); +lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__6___boxed__const__1; +lean_object* l___private_Lean_Meta_Basic_0__Lean_Meta_instantiateForallAux(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_Elab_Structural_mkIndPredBRecOn___closed__4; +lean_object* l_Lean_Meta_forallBoundedTelescope___at_Lean_Elab_Structural_mkIndPredBRecOn___spec__1(lean_object*); +lean_object* l_Lean_Meta_MatcherApp_toExpr(lean_object*); +lean_object* l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_match__1___rarg(lean_object*, lean_object*, lean_object*); +static lean_object* l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___closed__3; +lean_object* l_Array_ofSubarray___rarg(lean_object*); +lean_object* lean_st_ref_set(lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop(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_addMessageContextFull___at_Lean_Meta_instAddMessageContextMetaM___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_match__2(lean_object*); +lean_object* l_List_toArrayAux___rarg(lean_object*, lean_object*); +lean_object* lean_infer_type(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__5___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__7___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_matchMatcherApp_x3f___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_Match_MatcherInfo_arity(lean_object*); +uint8_t l_Array_contains___at_Lean_Meta_getElimInfo___spec__4(lean_object*, lean_object*); +static lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__2___closed__2; +lean_object* lean_mk_array(lean_object*, lean_object*); +lean_object* l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__7(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__7___closed__6; +static lean_object* l_Lean_Elab_Structural_mkIndPredBRecOn___lambda__3___closed__1; +lean_object* l_Lean_Elab_Structural_mkIndPredBRecOn___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__5(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* l_Lean_Elab_Structural_mkIndPredBRecOn___lambda__3___boxed(lean_object**); +lean_object* l_Lean_Meta_IndPredBelow_findBelowIdx(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow_match__2(lean_object*); +extern lean_object* l_Lean_brecOnSuffix; +lean_object* l_Lean_Expr_getAppFn(lean_object*); +lean_object* l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___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* l_Lean_Meta_Match_MatcherInfo_numAlts(lean_object*); +lean_object* l_Lean_Meta_mkFreshExprSyntheticOpaqueMVar(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___lambda__3___closed__1; +lean_object* l_unsafeCast(lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_Meta_matchMatcherApp_x3f___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___spec__1___closed__1; +lean_object* l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow_match__2___rarg(lean_object*, lean_object*); +lean_object* l_Lean_Meta_withLocalDecl___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__9___rarg(lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_matchMatcherApp_x3f___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_Basic_0__Lean_Meta_withLetDeclImp___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_Match_Extension_getMatcherInfo_x3f(lean_object*, lean_object*); +lean_object* l_Lean_mkConst(lean_object*, lean_object*); +static lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__2___closed__1; +lean_object* l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__8(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_match__1(lean_object*); +lean_object* l_Lean_Meta_check(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__2___boxed__const__1; +uint8_t lean_nat_dec_lt(lean_object*, lean_object*); +lean_object* l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow_match__1___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +if (lean_obj_tag(x_1) == 0) +{ +lean_object* x_4; +lean_dec(x_2); +x_4 = lean_apply_1(x_3, x_1); +return x_4; +} +else +{ +lean_object* x_5; lean_object* x_6; +lean_dec(x_3); +x_5 = lean_ctor_get(x_1, 0); +lean_inc(x_5); +lean_dec(x_1); +x_6 = lean_apply_1(x_2, x_5); +return x_6; +} +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow_match__1(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow_match__1___rarg), 3, 0); +return x_2; +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow_match__2___rarg(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; lean_object* x_4; lean_object* x_5; +x_3 = lean_ctor_get(x_1, 0); +lean_inc(x_3); +x_4 = lean_ctor_get(x_1, 1); +lean_inc(x_4); +lean_dec(x_1); +x_5 = lean_apply_2(x_2, x_3, x_4); +return x_5; +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow_match__2(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow_match__2___rarg), 2, 0); +return x_2; +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow_match__3___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +if (lean_obj_tag(x_1) == 0) +{ +lean_object* x_4; +lean_dec(x_2); +x_4 = lean_apply_1(x_3, x_1); +return x_4; +} +else +{ +lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; +lean_dec(x_3); +x_5 = lean_ctor_get(x_1, 0); +lean_inc(x_5); +lean_dec(x_1); +x_6 = lean_ctor_get(x_5, 0); +lean_inc(x_6); +x_7 = lean_ctor_get(x_5, 1); +lean_inc(x_7); +lean_dec(x_5); +x_8 = lean_apply_2(x_2, x_6, x_7); +return x_8; +} +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow_match__3(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow_match__3___rarg), 3, 0); +return x_2; +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_match__1___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +if (lean_obj_tag(x_1) == 0) +{ +lean_object* x_4; lean_object* x_5; +lean_dec(x_2); +x_4 = lean_box(0); +x_5 = lean_apply_1(x_3, x_4); +return x_5; +} +else +{ +lean_object* x_6; lean_object* x_7; +lean_dec(x_3); +x_6 = lean_ctor_get(x_1, 0); +lean_inc(x_6); +lean_dec(x_1); +x_7 = lean_apply_1(x_2, x_6); +return x_7; +} +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_match__1(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_match__1___rarg), 3, 0); +return x_2; +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_match__2___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { +_start: +{ +switch (lean_obj_tag(x_1)) { +case 5: +{ +lean_object* x_9; lean_object* x_10; uint64_t x_11; lean_object* x_12; lean_object* x_13; +lean_dec(x_8); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +x_9 = lean_ctor_get(x_1, 0); +lean_inc(x_9); +x_10 = lean_ctor_get(x_1, 1); +lean_inc(x_10); +x_11 = lean_ctor_get_uint64(x_1, sizeof(void*)*2); +lean_dec(x_1); +x_12 = lean_box_uint64(x_11); +x_13 = lean_apply_3(x_7, x_9, x_10, x_12); +return x_13; +} +case 6: +{ +lean_object* x_14; lean_object* x_15; lean_object* x_16; uint64_t x_17; lean_object* x_18; lean_object* 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); +x_14 = lean_ctor_get(x_1, 0); +lean_inc(x_14); +x_15 = lean_ctor_get(x_1, 1); +lean_inc(x_15); +x_16 = lean_ctor_get(x_1, 2); +lean_inc(x_16); +x_17 = lean_ctor_get_uint64(x_1, sizeof(void*)*3); +lean_dec(x_1); +x_18 = lean_box_uint64(x_17); +x_19 = lean_apply_4(x_2, x_14, x_15, x_16, x_18); +return x_19; +} +case 7: +{ +lean_object* x_20; lean_object* x_21; lean_object* x_22; uint64_t x_23; lean_object* x_24; lean_object* x_25; +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_2); +x_20 = lean_ctor_get(x_1, 0); +lean_inc(x_20); +x_21 = lean_ctor_get(x_1, 1); +lean_inc(x_21); +x_22 = lean_ctor_get(x_1, 2); +lean_inc(x_22); +x_23 = lean_ctor_get_uint64(x_1, sizeof(void*)*3); +lean_dec(x_1); +x_24 = lean_box_uint64(x_23); +x_25 = lean_apply_4(x_3, x_20, x_21, x_22, x_24); +return x_25; +} +case 8: +{ +lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; uint64_t x_30; lean_object* x_31; lean_object* x_32; +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_3); +lean_dec(x_2); +x_26 = lean_ctor_get(x_1, 0); +lean_inc(x_26); +x_27 = lean_ctor_get(x_1, 1); +lean_inc(x_27); +x_28 = lean_ctor_get(x_1, 2); +lean_inc(x_28); +x_29 = lean_ctor_get(x_1, 3); +lean_inc(x_29); +x_30 = lean_ctor_get_uint64(x_1, sizeof(void*)*4); +lean_dec(x_1); +x_31 = lean_box_uint64(x_30); +x_32 = lean_apply_5(x_4, x_26, x_27, x_28, x_29, x_31); +return x_32; +} +case 10: +{ +lean_object* x_33; lean_object* x_34; uint64_t x_35; lean_object* x_36; lean_object* x_37; +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +x_33 = lean_ctor_get(x_1, 0); +lean_inc(x_33); +x_34 = lean_ctor_get(x_1, 1); +lean_inc(x_34); +x_35 = lean_ctor_get_uint64(x_1, sizeof(void*)*2); +lean_dec(x_1); +x_36 = lean_box_uint64(x_35); +x_37 = lean_apply_3(x_5, x_33, x_34, x_36); +return x_37; +} +case 11: +{ +lean_object* x_38; lean_object* x_39; lean_object* x_40; uint64_t x_41; lean_object* x_42; lean_object* x_43; +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +x_38 = lean_ctor_get(x_1, 0); +lean_inc(x_38); +x_39 = lean_ctor_get(x_1, 1); +lean_inc(x_39); +x_40 = lean_ctor_get(x_1, 2); +lean_inc(x_40); +x_41 = lean_ctor_get_uint64(x_1, sizeof(void*)*3); +lean_dec(x_1); +x_42 = lean_box_uint64(x_41); +x_43 = lean_apply_4(x_6, x_38, x_39, x_40, x_42); +return x_43; +} +default: +{ +lean_object* x_44; +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +x_44 = lean_apply_1(x_8, x_1); +return x_44; +} +} +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_match__2(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_match__2___rarg), 8, 0); +return x_2; +} +} +lean_object* l_Lean_Meta_getMatcherInfo_x3f___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___spec__2(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { +_start: +{ +lean_object* x_8; uint8_t x_9; +x_8 = lean_st_ref_get(x_6, x_7); +x_9 = !lean_is_exclusive(x_8); +if (x_9 == 0) +{ +lean_object* x_10; lean_object* x_11; lean_object* x_12; +x_10 = lean_ctor_get(x_8, 0); +x_11 = lean_ctor_get(x_10, 0); +lean_inc(x_11); +lean_dec(x_10); +x_12 = l_Lean_Meta_Match_Extension_getMatcherInfo_x3f(x_11, x_1); +lean_ctor_set(x_8, 0, x_12); +return x_8; +} +else +{ +lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; +x_13 = lean_ctor_get(x_8, 0); +x_14 = lean_ctor_get(x_8, 1); +lean_inc(x_14); +lean_inc(x_13); +lean_dec(x_8); +x_15 = lean_ctor_get(x_13, 0); +lean_inc(x_15); +lean_dec(x_13); +x_16 = l_Lean_Meta_Match_Extension_getMatcherInfo_x3f(x_15, x_1); +x_17 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_17, 0, x_16); +lean_ctor_set(x_17, 1, x_14); +return x_17; +} +} +} +static lean_object* _init_l_Lean_Meta_matchMatcherApp_x3f___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___spec__1___closed__1() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_levelZero; +x_2 = l_Lean_mkSort(x_1); +return x_2; +} +} +lean_object* l_Lean_Meta_matchMatcherApp_x3f___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___spec__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { +_start: +{ +lean_object* x_8; +x_8 = l_Lean_Expr_getAppFn(x_1); +if (lean_obj_tag(x_8) == 4) +{ +lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; +x_9 = lean_ctor_get(x_8, 0); +lean_inc(x_9); +x_10 = lean_ctor_get(x_8, 1); +lean_inc(x_10); +lean_dec(x_8); +lean_inc(x_9); +x_11 = l_Lean_Meta_getMatcherInfo_x3f___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___spec__2(x_9, x_2, x_3, x_4, x_5, x_6, x_7); +x_12 = lean_ctor_get(x_11, 0); +lean_inc(x_12); +if (lean_obj_tag(x_12) == 0) +{ +uint8_t x_13; +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_1); +x_13 = !lean_is_exclusive(x_11); +if (x_13 == 0) +{ +lean_object* x_14; lean_object* x_15; +x_14 = lean_ctor_get(x_11, 0); +lean_dec(x_14); +x_15 = lean_box(0); +lean_ctor_set(x_11, 0, x_15); +return x_11; +} +else +{ +lean_object* x_16; lean_object* x_17; lean_object* x_18; +x_16 = lean_ctor_get(x_11, 1); +lean_inc(x_16); +lean_dec(x_11); +x_17 = lean_box(0); +x_18 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_18, 0, x_17); +lean_ctor_set(x_18, 1, x_16); +return x_18; +} +} +else +{ +uint8_t x_19; +x_19 = !lean_is_exclusive(x_11); +if (x_19 == 0) +{ +lean_object* x_20; uint8_t x_21; +x_20 = lean_ctor_get(x_11, 0); +lean_dec(x_20); +x_21 = !lean_is_exclusive(x_12); +if (x_21 == 0) +{ +lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; uint8_t x_32; +x_22 = lean_ctor_get(x_12, 0); +x_23 = lean_unsigned_to_nat(0u); +x_24 = l_Lean_Expr_getAppNumArgsAux(x_1, x_23); +x_25 = l_Lean_Meta_matchMatcherApp_x3f___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___spec__1___closed__1; +lean_inc(x_24); +x_26 = lean_mk_array(x_24, x_25); +x_27 = lean_unsigned_to_nat(1u); +x_28 = lean_nat_sub(x_24, x_27); +lean_dec(x_24); +x_29 = l___private_Lean_Expr_0__Lean_Expr_getAppArgsAux(x_1, x_26, x_28); +x_30 = lean_array_get_size(x_29); +x_31 = l_Lean_Meta_Match_MatcherInfo_arity(x_22); +x_32 = lean_nat_dec_lt(x_30, x_31); +lean_dec(x_31); +if (x_32 == 0) +{ +lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_object* x_51; lean_object* x_52; lean_object* x_53; +x_33 = l_List_redLength___rarg(x_10); +x_34 = lean_mk_empty_array_with_capacity(x_33); +lean_dec(x_33); +x_35 = l_List_toArrayAux___rarg(x_10, x_34); +x_36 = lean_ctor_get(x_22, 3); +lean_inc(x_36); +x_37 = lean_ctor_get(x_22, 0); +lean_inc(x_37); +lean_inc(x_37); +lean_inc(x_29); +x_38 = l_Array_extract___rarg(x_29, x_23, x_37); +x_39 = l_Lean_instInhabitedExpr; +x_40 = lean_array_get(x_39, x_29, x_37); +x_41 = lean_nat_add(x_37, x_27); +lean_dec(x_37); +x_42 = lean_ctor_get(x_22, 1); +lean_inc(x_42); +x_43 = lean_nat_add(x_41, x_42); +lean_dec(x_42); +lean_inc(x_43); +lean_inc(x_29); +x_44 = l_Array_toSubarray___rarg(x_29, x_41, x_43); +x_45 = l_Array_ofSubarray___rarg(x_44); +x_46 = lean_ctor_get(x_22, 2); +lean_inc(x_46); +x_47 = l_Lean_Meta_Match_MatcherInfo_numAlts(x_22); +lean_dec(x_22); +x_48 = lean_nat_add(x_43, x_47); +lean_dec(x_47); +lean_inc(x_48); +lean_inc(x_29); +x_49 = l_Array_toSubarray___rarg(x_29, x_43, x_48); +x_50 = l_Array_ofSubarray___rarg(x_49); +x_51 = l_Array_toSubarray___rarg(x_29, x_48, x_30); +x_52 = l_Array_ofSubarray___rarg(x_51); +x_53 = lean_alloc_ctor(0, 9, 0); +lean_ctor_set(x_53, 0, x_9); +lean_ctor_set(x_53, 1, x_35); +lean_ctor_set(x_53, 2, x_36); +lean_ctor_set(x_53, 3, x_38); +lean_ctor_set(x_53, 4, x_40); +lean_ctor_set(x_53, 5, x_45); +lean_ctor_set(x_53, 6, x_46); +lean_ctor_set(x_53, 7, x_50); +lean_ctor_set(x_53, 8, x_52); +lean_ctor_set(x_12, 0, x_53); +return x_11; +} +else +{ +lean_object* x_54; +lean_dec(x_30); +lean_dec(x_29); +lean_free_object(x_12); +lean_dec(x_22); +lean_dec(x_10); +lean_dec(x_9); +x_54 = lean_box(0); +lean_ctor_set(x_11, 0, x_54); +return x_11; +} +} +else +{ +lean_object* x_55; lean_object* x_56; lean_object* x_57; lean_object* x_58; lean_object* x_59; lean_object* x_60; lean_object* x_61; lean_object* x_62; lean_object* x_63; lean_object* x_64; uint8_t x_65; +x_55 = lean_ctor_get(x_12, 0); +lean_inc(x_55); +lean_dec(x_12); +x_56 = lean_unsigned_to_nat(0u); +x_57 = l_Lean_Expr_getAppNumArgsAux(x_1, x_56); +x_58 = l_Lean_Meta_matchMatcherApp_x3f___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___spec__1___closed__1; +lean_inc(x_57); +x_59 = lean_mk_array(x_57, x_58); +x_60 = lean_unsigned_to_nat(1u); +x_61 = lean_nat_sub(x_57, x_60); +lean_dec(x_57); +x_62 = l___private_Lean_Expr_0__Lean_Expr_getAppArgsAux(x_1, x_59, x_61); +x_63 = lean_array_get_size(x_62); +x_64 = l_Lean_Meta_Match_MatcherInfo_arity(x_55); +x_65 = lean_nat_dec_lt(x_63, x_64); +lean_dec(x_64); +if (x_65 == 0) +{ +lean_object* x_66; lean_object* x_67; lean_object* x_68; lean_object* x_69; lean_object* x_70; lean_object* x_71; lean_object* x_72; lean_object* x_73; lean_object* x_74; lean_object* x_75; lean_object* x_76; lean_object* x_77; lean_object* x_78; lean_object* x_79; lean_object* x_80; lean_object* x_81; lean_object* x_82; lean_object* x_83; lean_object* x_84; lean_object* x_85; lean_object* x_86; lean_object* x_87; +x_66 = l_List_redLength___rarg(x_10); +x_67 = lean_mk_empty_array_with_capacity(x_66); +lean_dec(x_66); +x_68 = l_List_toArrayAux___rarg(x_10, x_67); +x_69 = lean_ctor_get(x_55, 3); +lean_inc(x_69); +x_70 = lean_ctor_get(x_55, 0); +lean_inc(x_70); +lean_inc(x_70); +lean_inc(x_62); +x_71 = l_Array_extract___rarg(x_62, x_56, x_70); +x_72 = l_Lean_instInhabitedExpr; +x_73 = lean_array_get(x_72, x_62, x_70); +x_74 = lean_nat_add(x_70, x_60); +lean_dec(x_70); +x_75 = lean_ctor_get(x_55, 1); +lean_inc(x_75); +x_76 = lean_nat_add(x_74, x_75); +lean_dec(x_75); +lean_inc(x_76); +lean_inc(x_62); +x_77 = l_Array_toSubarray___rarg(x_62, x_74, x_76); +x_78 = l_Array_ofSubarray___rarg(x_77); +x_79 = lean_ctor_get(x_55, 2); +lean_inc(x_79); +x_80 = l_Lean_Meta_Match_MatcherInfo_numAlts(x_55); +lean_dec(x_55); +x_81 = lean_nat_add(x_76, x_80); +lean_dec(x_80); +lean_inc(x_81); +lean_inc(x_62); +x_82 = l_Array_toSubarray___rarg(x_62, x_76, x_81); +x_83 = l_Array_ofSubarray___rarg(x_82); +x_84 = l_Array_toSubarray___rarg(x_62, x_81, x_63); +x_85 = l_Array_ofSubarray___rarg(x_84); +x_86 = lean_alloc_ctor(0, 9, 0); +lean_ctor_set(x_86, 0, x_9); +lean_ctor_set(x_86, 1, x_68); +lean_ctor_set(x_86, 2, x_69); +lean_ctor_set(x_86, 3, x_71); +lean_ctor_set(x_86, 4, x_73); +lean_ctor_set(x_86, 5, x_78); +lean_ctor_set(x_86, 6, x_79); +lean_ctor_set(x_86, 7, x_83); +lean_ctor_set(x_86, 8, x_85); +x_87 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_87, 0, x_86); +lean_ctor_set(x_11, 0, x_87); +return x_11; +} +else +{ +lean_object* x_88; +lean_dec(x_63); +lean_dec(x_62); +lean_dec(x_55); +lean_dec(x_10); +lean_dec(x_9); +x_88 = lean_box(0); +lean_ctor_set(x_11, 0, x_88); +return x_11; +} +} +} +else +{ +lean_object* x_89; lean_object* x_90; lean_object* x_91; lean_object* x_92; lean_object* x_93; lean_object* x_94; lean_object* x_95; lean_object* x_96; lean_object* x_97; lean_object* x_98; lean_object* x_99; lean_object* x_100; uint8_t x_101; +x_89 = lean_ctor_get(x_11, 1); +lean_inc(x_89); +lean_dec(x_11); +x_90 = lean_ctor_get(x_12, 0); +lean_inc(x_90); +if (lean_is_exclusive(x_12)) { + lean_ctor_release(x_12, 0); + x_91 = x_12; +} else { + lean_dec_ref(x_12); + x_91 = lean_box(0); +} +x_92 = lean_unsigned_to_nat(0u); +x_93 = l_Lean_Expr_getAppNumArgsAux(x_1, x_92); +x_94 = l_Lean_Meta_matchMatcherApp_x3f___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___spec__1___closed__1; +lean_inc(x_93); +x_95 = lean_mk_array(x_93, x_94); +x_96 = lean_unsigned_to_nat(1u); +x_97 = lean_nat_sub(x_93, x_96); +lean_dec(x_93); +x_98 = l___private_Lean_Expr_0__Lean_Expr_getAppArgsAux(x_1, x_95, x_97); +x_99 = lean_array_get_size(x_98); +x_100 = l_Lean_Meta_Match_MatcherInfo_arity(x_90); +x_101 = lean_nat_dec_lt(x_99, x_100); +lean_dec(x_100); +if (x_101 == 0) +{ +lean_object* x_102; lean_object* x_103; lean_object* x_104; lean_object* x_105; lean_object* x_106; lean_object* x_107; lean_object* x_108; lean_object* x_109; lean_object* x_110; lean_object* x_111; lean_object* x_112; lean_object* x_113; lean_object* x_114; lean_object* x_115; lean_object* x_116; lean_object* x_117; lean_object* x_118; lean_object* x_119; lean_object* x_120; lean_object* x_121; lean_object* x_122; lean_object* x_123; lean_object* x_124; +x_102 = l_List_redLength___rarg(x_10); +x_103 = lean_mk_empty_array_with_capacity(x_102); +lean_dec(x_102); +x_104 = l_List_toArrayAux___rarg(x_10, x_103); +x_105 = lean_ctor_get(x_90, 3); +lean_inc(x_105); +x_106 = lean_ctor_get(x_90, 0); +lean_inc(x_106); +lean_inc(x_106); +lean_inc(x_98); +x_107 = l_Array_extract___rarg(x_98, x_92, x_106); +x_108 = l_Lean_instInhabitedExpr; +x_109 = lean_array_get(x_108, x_98, x_106); +x_110 = lean_nat_add(x_106, x_96); +lean_dec(x_106); +x_111 = lean_ctor_get(x_90, 1); +lean_inc(x_111); +x_112 = lean_nat_add(x_110, x_111); +lean_dec(x_111); +lean_inc(x_112); +lean_inc(x_98); +x_113 = l_Array_toSubarray___rarg(x_98, x_110, x_112); +x_114 = l_Array_ofSubarray___rarg(x_113); +x_115 = lean_ctor_get(x_90, 2); +lean_inc(x_115); +x_116 = l_Lean_Meta_Match_MatcherInfo_numAlts(x_90); +lean_dec(x_90); +x_117 = lean_nat_add(x_112, x_116); +lean_dec(x_116); +lean_inc(x_117); +lean_inc(x_98); +x_118 = l_Array_toSubarray___rarg(x_98, x_112, x_117); +x_119 = l_Array_ofSubarray___rarg(x_118); +x_120 = l_Array_toSubarray___rarg(x_98, x_117, x_99); +x_121 = l_Array_ofSubarray___rarg(x_120); +x_122 = lean_alloc_ctor(0, 9, 0); +lean_ctor_set(x_122, 0, x_9); +lean_ctor_set(x_122, 1, x_104); +lean_ctor_set(x_122, 2, x_105); +lean_ctor_set(x_122, 3, x_107); +lean_ctor_set(x_122, 4, x_109); +lean_ctor_set(x_122, 5, x_114); +lean_ctor_set(x_122, 6, x_115); +lean_ctor_set(x_122, 7, x_119); +lean_ctor_set(x_122, 8, x_121); +if (lean_is_scalar(x_91)) { + x_123 = lean_alloc_ctor(1, 1, 0); +} else { + x_123 = x_91; +} +lean_ctor_set(x_123, 0, x_122); +x_124 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_124, 0, x_123); +lean_ctor_set(x_124, 1, x_89); +return x_124; +} +else +{ +lean_object* x_125; lean_object* x_126; +lean_dec(x_99); +lean_dec(x_98); +lean_dec(x_91); +lean_dec(x_90); +lean_dec(x_10); +lean_dec(x_9); +x_125 = lean_box(0); +x_126 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_126, 0, x_125); +lean_ctor_set(x_126, 1, x_89); +return x_126; +} +} +} +} +else +{ +lean_object* x_127; lean_object* x_128; +lean_dec(x_8); +lean_dec(x_1); +x_127 = lean_box(0); +x_128 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_128, 0, x_127); +lean_ctor_set(x_128, 1, x_7); +return x_128; +} +} +} +lean_object* l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___spec__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) { +_start: +{ +lean_object* x_8; lean_object* x_9; uint8_t x_10; +x_8 = lean_ctor_get(x_5, 3); +x_9 = l_Lean_addMessageContextFull___at_Lean_Meta_instAddMessageContextMetaM___spec__1(x_1, x_3, x_4, x_5, x_6, x_7); +x_10 = !lean_is_exclusive(x_9); +if (x_10 == 0) +{ +lean_object* x_11; lean_object* x_12; +x_11 = lean_ctor_get(x_9, 0); +lean_inc(x_8); +x_12 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_12, 0, x_8); +lean_ctor_set(x_12, 1, x_11); +lean_ctor_set_tag(x_9, 1); +lean_ctor_set(x_9, 0, x_12); +return x_9; +} +else +{ +lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; +x_13 = lean_ctor_get(x_9, 0); +x_14 = lean_ctor_get(x_9, 1); +lean_inc(x_14); +lean_inc(x_13); +lean_dec(x_9); +lean_inc(x_8); +x_15 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_15, 0, x_8); +lean_ctor_set(x_15, 1, x_13); +x_16 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_16, 0, x_15); +lean_ctor_set(x_16, 1, x_14); +return x_16; +} +} +} +static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("not a matcherApp: "); +return x_1; +} +} +static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___closed__1; +x_2 = l_Lean_stringToMessageData(x_1); +return x_2; +} +} +static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___closed__3() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string(""); +return x_1; +} +} +static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___closed__4() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___closed__3; +x_2 = l_Lean_stringToMessageData(x_1); +return x_2; +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow(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_ctor_get(x_2, 5); +lean_inc(x_9); +lean_inc(x_7); +lean_inc(x_6); +lean_inc(x_5); +lean_inc(x_4); +lean_inc(x_1); +x_10 = l_Lean_Meta_IndPredBelow_findBelowIdx(x_9, x_1, x_4, x_5, x_6, x_7, x_8); +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) +{ +uint8_t x_12; +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_1); +x_12 = !lean_is_exclusive(x_10); +if (x_12 == 0) +{ +lean_object* x_13; lean_object* x_14; +x_13 = lean_ctor_get(x_10, 0); +lean_dec(x_13); +x_14 = l_Lean_Meta_MatcherApp_toExpr(x_2); +lean_ctor_set(x_10, 0, x_14); +return x_10; +} +else +{ +lean_object* x_15; lean_object* x_16; lean_object* x_17; +x_15 = lean_ctor_get(x_10, 1); +lean_inc(x_15); +lean_dec(x_10); +x_16 = l_Lean_Meta_MatcherApp_toExpr(x_2); +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; +} +} +else +{ +lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; +x_18 = lean_ctor_get(x_11, 0); +lean_inc(x_18); +lean_dec(x_11); +x_19 = lean_ctor_get(x_10, 1); +lean_inc(x_19); +lean_dec(x_10); +x_20 = lean_ctor_get(x_18, 0); +lean_inc(x_20); +x_21 = lean_ctor_get(x_18, 1); +lean_inc(x_21); +lean_dec(x_18); +lean_inc(x_7); +lean_inc(x_6); +lean_inc(x_5); +lean_inc(x_4); +lean_inc(x_1); +x_22 = l_Lean_Meta_IndPredBelow_mkBelowMatcher(x_2, x_1, x_20, x_21, x_4, x_5, x_6, x_7, x_19); +if (lean_obj_tag(x_22) == 0) +{ +lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; uint8_t x_32; +x_23 = lean_ctor_get(x_22, 0); +lean_inc(x_23); +x_24 = lean_ctor_get(x_22, 1); +lean_inc(x_24); +lean_dec(x_22); +x_25 = lean_ctor_get(x_23, 0); +lean_inc(x_25); +x_26 = lean_ctor_get(x_23, 1); +lean_inc(x_26); +lean_dec(x_23); +x_27 = lean_st_ref_get(x_7, x_24); +x_28 = lean_ctor_get(x_27, 1); +lean_inc(x_28); +lean_dec(x_27); +x_29 = lean_st_ref_take(x_3, 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_is_exclusive(x_30); +if (x_32 == 0) +{ +lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; +x_33 = lean_ctor_get(x_30, 1); +x_34 = lean_array_push(x_33, x_26); +lean_ctor_set(x_30, 1, x_34); +x_35 = lean_st_ref_set(x_3, x_30, x_31); +x_36 = lean_ctor_get(x_35, 1); +lean_inc(x_36); +lean_dec(x_35); +lean_inc(x_25); +x_37 = l_Lean_Meta_matchMatcherApp_x3f___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___spec__1(x_25, x_3, x_4, x_5, x_6, x_7, x_36); +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; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; +lean_dec(x_1); +x_39 = lean_ctor_get(x_37, 1); +lean_inc(x_39); +lean_dec(x_37); +x_40 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_40, 0, x_25); +x_41 = l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___closed__2; +x_42 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_42, 0, x_41); +lean_ctor_set(x_42, 1, x_40); +x_43 = l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___closed__4; +x_44 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_44, 0, x_42); +lean_ctor_set(x_44, 1, x_43); +x_45 = l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___spec__3(x_44, x_3, x_4, x_5, x_6, x_7, x_39); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +return x_45; +} +else +{ +lean_object* x_46; lean_object* x_47; +lean_dec(x_25); +x_46 = lean_ctor_get(x_37, 1); +lean_inc(x_46); +lean_dec(x_37); +x_47 = lean_ctor_get(x_38, 0); +lean_inc(x_47); +lean_dec(x_38); +x_2 = x_47; +x_8 = x_46; +goto _start; +} +} +else +{ +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; +x_49 = lean_ctor_get(x_30, 0); +x_50 = lean_ctor_get(x_30, 1); +lean_inc(x_50); +lean_inc(x_49); +lean_dec(x_30); +x_51 = lean_array_push(x_50, x_26); +x_52 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_52, 0, x_49); +lean_ctor_set(x_52, 1, x_51); +x_53 = lean_st_ref_set(x_3, x_52, x_31); +x_54 = lean_ctor_get(x_53, 1); +lean_inc(x_54); +lean_dec(x_53); +lean_inc(x_25); +x_55 = l_Lean_Meta_matchMatcherApp_x3f___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___spec__1(x_25, x_3, x_4, x_5, x_6, x_7, x_54); +x_56 = lean_ctor_get(x_55, 0); +lean_inc(x_56); +if (lean_obj_tag(x_56) == 0) +{ +lean_object* x_57; lean_object* x_58; lean_object* x_59; lean_object* x_60; lean_object* x_61; lean_object* x_62; lean_object* x_63; +lean_dec(x_1); +x_57 = lean_ctor_get(x_55, 1); +lean_inc(x_57); +lean_dec(x_55); +x_58 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_58, 0, x_25); +x_59 = l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___closed__2; +x_60 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_60, 0, x_59); +lean_ctor_set(x_60, 1, x_58); +x_61 = l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___closed__4; +x_62 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_62, 0, x_60); +lean_ctor_set(x_62, 1, x_61); +x_63 = l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___spec__3(x_62, x_3, x_4, x_5, x_6, x_7, x_57); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +return x_63; +} +else +{ +lean_object* x_64; lean_object* x_65; +lean_dec(x_25); +x_64 = lean_ctor_get(x_55, 1); +lean_inc(x_64); +lean_dec(x_55); +x_65 = lean_ctor_get(x_56, 0); +lean_inc(x_65); +lean_dec(x_56); +x_2 = x_65; +x_8 = x_64; +goto _start; +} +} +} +else +{ +uint8_t x_67; +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_67 = !lean_is_exclusive(x_22); +if (x_67 == 0) +{ +return x_22; +} +else +{ +lean_object* x_68; lean_object* x_69; lean_object* x_70; +x_68 = lean_ctor_get(x_22, 0); +x_69 = lean_ctor_get(x_22, 1); +lean_inc(x_69); +lean_inc(x_68); +lean_dec(x_22); +x_70 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_70, 0, x_68); +lean_ctor_set(x_70, 1, x_69); +return x_70; +} +} +} +} +else +{ +uint8_t x_71; +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_71 = !lean_is_exclusive(x_10); +if (x_71 == 0) +{ +return x_10; +} +else +{ +lean_object* x_72; lean_object* x_73; lean_object* x_74; +x_72 = lean_ctor_get(x_10, 0); +x_73 = lean_ctor_get(x_10, 1); +lean_inc(x_73); +lean_inc(x_72); +lean_dec(x_10); +x_74 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_74, 0, x_72); +lean_ctor_set(x_74, 1, x_73); +return x_74; +} +} +} +} +lean_object* l_Lean_Meta_getMatcherInfo_x3f___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___spec__2___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { +_start: +{ +lean_object* x_8; +x_8 = l_Lean_Meta_getMatcherInfo_x3f___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___spec__2(x_1, x_2, x_3, x_4, x_5, x_6, x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +return x_8; +} +} +lean_object* l_Lean_Meta_matchMatcherApp_x3f___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___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) { +_start: +{ +lean_object* x_8; +x_8 = l_Lean_Meta_matchMatcherApp_x3f___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___spec__1(x_1, x_2, x_3, x_4, x_5, x_6, x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +return x_8; +} +} +lean_object* l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___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) { +_start: +{ +lean_object* x_8; +x_8 = l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___spec__3(x_1, x_2, x_3, x_4, x_5, x_6, x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +return x_8; +} +} +lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___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) { +_start: +{ +uint8_t x_14; +x_14 = x_6 < x_5; +if (x_14 == 0) +{ +lean_object* x_15; lean_object* x_16; +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_15 = x_7; +x_16 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_16, 0, x_15); +lean_ctor_set(x_16, 1, x_13); +return x_16; +} +else +{ +lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; +x_17 = lean_array_uget(x_7, x_6); +x_18 = lean_unsigned_to_nat(0u); +x_19 = lean_array_uset(x_7, x_6, x_18); +x_20 = x_17; +lean_inc(x_12); +lean_inc(x_11); +lean_inc(x_10); +lean_inc(x_9); +lean_inc(x_8); +lean_inc(x_4); +lean_inc(x_3); +lean_inc(x_2); +lean_inc(x_1); +x_21 = l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop(x_1, x_2, x_3, x_4, x_20, x_8, x_9, x_10, x_11, x_12, x_13); +if (lean_obj_tag(x_21) == 0) +{ +lean_object* x_22; lean_object* x_23; size_t x_24; size_t x_25; lean_object* x_26; lean_object* x_27; +x_22 = lean_ctor_get(x_21, 0); +lean_inc(x_22); +x_23 = lean_ctor_get(x_21, 1); +lean_inc(x_23); +lean_dec(x_21); +x_24 = 1; +x_25 = x_6 + x_24; +x_26 = x_22; +x_27 = lean_array_uset(x_19, x_6, x_26); +x_6 = x_25; +x_7 = x_27; +x_13 = x_23; +goto _start; +} +else +{ +uint8_t x_29; +lean_dec(x_19); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +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; +} +} +} +} +} +static lean_object* _init_l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__2___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("could not solve using backwards chaining "); +return x_1; +} +} +static lean_object* _init_l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__2___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__2___closed__1; +x_2 = l_Lean_stringToMessageData(x_1); +return x_2; +} +} +static lean_object* _init_l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__2___boxed__const__1() { +_start: +{ +size_t x_1; lean_object* x_2; +x_1 = 0; +x_2 = lean_box_usize(x_1); +return x_2; +} +} +lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__2(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, 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: +{ +if (lean_obj_tag(x_6) == 5) +{ +lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; +x_15 = lean_ctor_get(x_6, 0); +lean_inc(x_15); +x_16 = lean_ctor_get(x_6, 1); +lean_inc(x_16); +lean_dec(x_6); +x_17 = lean_array_set(x_7, x_8, x_16); +x_18 = lean_unsigned_to_nat(1u); +x_19 = lean_nat_sub(x_8, x_18); +lean_dec(x_8); +x_6 = x_15; +x_7 = x_17; +x_8 = x_19; +goto _start; +} +else +{ +uint8_t x_21; +lean_dec(x_8); +x_21 = l_Lean_Expr_isConstOf(x_6, x_1); +if (x_21 == 0) +{ +lean_object* x_22; +lean_dec(x_5); +lean_inc(x_13); +lean_inc(x_12); +lean_inc(x_11); +lean_inc(x_10); +lean_inc(x_9); +lean_inc(x_4); +lean_inc(x_3); +lean_inc(x_2); +lean_inc(x_1); +x_22 = l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop(x_1, x_2, x_3, x_4, x_6, x_9, x_10, x_11, x_12, x_13, x_14); +if (lean_obj_tag(x_22) == 0) +{ +lean_object* x_23; lean_object* x_24; lean_object* x_25; size_t x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; +x_23 = lean_ctor_get(x_22, 0); +lean_inc(x_23); +x_24 = lean_ctor_get(x_22, 1); +lean_inc(x_24); +lean_dec(x_22); +x_25 = lean_array_get_size(x_7); +x_26 = lean_usize_of_nat(x_25); +lean_dec(x_25); +x_27 = x_7; +x_28 = lean_box_usize(x_26); +x_29 = l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__2___boxed__const__1; +x_30 = lean_alloc_closure((void*)(l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__1___boxed), 13, 7); +lean_closure_set(x_30, 0, x_1); +lean_closure_set(x_30, 1, x_2); +lean_closure_set(x_30, 2, x_3); +lean_closure_set(x_30, 3, x_4); +lean_closure_set(x_30, 4, x_28); +lean_closure_set(x_30, 5, x_29); +lean_closure_set(x_30, 6, x_27); +x_31 = x_30; +x_32 = lean_apply_6(x_31, x_9, x_10, x_11, x_12, x_13, x_24); +if (lean_obj_tag(x_32) == 0) +{ +uint8_t x_33; +x_33 = !lean_is_exclusive(x_32); +if (x_33 == 0) +{ +lean_object* x_34; lean_object* x_35; +x_34 = lean_ctor_get(x_32, 0); +x_35 = l_Lean_mkAppN(x_23, x_34); +lean_ctor_set(x_32, 0, x_35); +return x_32; +} +else +{ +lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; +x_36 = lean_ctor_get(x_32, 0); +x_37 = lean_ctor_get(x_32, 1); +lean_inc(x_37); +lean_inc(x_36); +lean_dec(x_32); +x_38 = l_Lean_mkAppN(x_23, x_36); +x_39 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_39, 0, x_38); +lean_ctor_set(x_39, 1, x_37); +return x_39; +} +} +else +{ +uint8_t x_40; +lean_dec(x_23); +x_40 = !lean_is_exclusive(x_32); +if (x_40 == 0) +{ +return x_32; +} +else +{ +lean_object* x_41; lean_object* x_42; lean_object* x_43; +x_41 = lean_ctor_get(x_32, 0); +x_42 = lean_ctor_get(x_32, 1); +lean_inc(x_42); +lean_inc(x_41); +lean_dec(x_32); +x_43 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_43, 0, x_41); +lean_ctor_set(x_43, 1, x_42); +return x_43; +} +} +} +else +{ +uint8_t x_44; +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_7); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_44 = !lean_is_exclusive(x_22); +if (x_44 == 0) +{ +return x_22; +} +else +{ +lean_object* x_45; lean_object* x_46; lean_object* x_47; +x_45 = lean_ctor_get(x_22, 0); +x_46 = lean_ctor_get(x_22, 1); +lean_inc(x_46); +lean_inc(x_45); +lean_dec(x_22); +x_47 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_47, 0, x_45); +lean_ctor_set(x_47, 1, x_46); +return x_47; +} +} +} +else +{ +lean_object* x_48; +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +lean_inc(x_13); +lean_inc(x_12); +lean_inc(x_11); +lean_inc(x_10); +x_48 = lean_infer_type(x_5, x_10, x_11, x_12, x_13, x_14); +if (lean_obj_tag(x_48) == 0) +{ +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; +x_49 = lean_ctor_get(x_48, 0); +lean_inc(x_49); +x_50 = lean_ctor_get(x_48, 1); +lean_inc(x_50); +lean_dec(x_48); +x_51 = lean_box(0); +lean_inc(x_10); +x_52 = l_Lean_Meta_mkFreshExprSyntheticOpaqueMVar(x_49, x_51, x_10, x_11, x_12, x_13, x_50); +x_53 = lean_ctor_get(x_52, 0); +lean_inc(x_53); +x_54 = lean_ctor_get(x_52, 1); +lean_inc(x_54); +lean_dec(x_52); +x_55 = l_Lean_Expr_mvarId_x21(x_53); +lean_inc(x_13); +lean_inc(x_12); +lean_inc(x_11); +lean_inc(x_10); +lean_inc(x_55); +x_56 = l_Lean_Meta_IndPredBelow_backwardsChaining(x_55, x_4, x_10, x_11, x_12, x_13, x_54); +if (lean_obj_tag(x_56) == 0) +{ +lean_object* x_57; uint8_t x_58; +x_57 = lean_ctor_get(x_56, 0); +lean_inc(x_57); +x_58 = lean_unbox(x_57); +lean_dec(x_57); +if (x_58 == 0) +{ +lean_object* x_59; lean_object* x_60; lean_object* x_61; lean_object* x_62; lean_object* x_63; lean_object* x_64; lean_object* x_65; +lean_dec(x_53); +x_59 = lean_ctor_get(x_56, 1); +lean_inc(x_59); +lean_dec(x_56); +x_60 = lean_alloc_ctor(5, 1, 0); +lean_ctor_set(x_60, 0, x_55); +x_61 = l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__2___closed__2; +x_62 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_62, 0, x_61); +lean_ctor_set(x_62, 1, x_60); +x_63 = l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___closed__4; +x_64 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_64, 0, x_62); +lean_ctor_set(x_64, 1, x_63); +x_65 = l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___spec__3(x_64, x_9, x_10, x_11, x_12, x_13, x_59); +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +return x_65; +} +else +{ +uint8_t x_66; +lean_dec(x_55); +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +x_66 = !lean_is_exclusive(x_56); +if (x_66 == 0) +{ +lean_object* x_67; +x_67 = lean_ctor_get(x_56, 0); +lean_dec(x_67); +lean_ctor_set(x_56, 0, x_53); +return x_56; +} +else +{ +lean_object* x_68; lean_object* x_69; +x_68 = lean_ctor_get(x_56, 1); +lean_inc(x_68); +lean_dec(x_56); +x_69 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_69, 0, x_53); +lean_ctor_set(x_69, 1, x_68); +return x_69; +} +} +} +else +{ +uint8_t x_70; +lean_dec(x_55); +lean_dec(x_53); +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +x_70 = !lean_is_exclusive(x_56); +if (x_70 == 0) +{ +return x_56; +} +else +{ +lean_object* x_71; lean_object* x_72; lean_object* x_73; +x_71 = lean_ctor_get(x_56, 0); +x_72 = lean_ctor_get(x_56, 1); +lean_inc(x_72); +lean_inc(x_71); +lean_dec(x_56); +x_73 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_73, 0, x_71); +lean_ctor_set(x_73, 1, x_72); +return x_73; +} +} +} +else +{ +uint8_t x_74; +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_4); +x_74 = !lean_is_exclusive(x_48); +if (x_74 == 0) +{ +return x_48; +} +else +{ +lean_object* x_75; lean_object* x_76; lean_object* x_77; +x_75 = lean_ctor_get(x_48, 0); +x_76 = lean_ctor_get(x_48, 1); +lean_inc(x_76); +lean_inc(x_75); +lean_dec(x_48); +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; +} +} +} +} +} +} +lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__3(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) { +_start: +{ +uint8_t x_14; +x_14 = x_6 < x_5; +if (x_14 == 0) +{ +lean_object* x_15; lean_object* x_16; +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_15 = x_7; +x_16 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_16, 0, x_15); +lean_ctor_set(x_16, 1, x_13); +return x_16; +} +else +{ +lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; +x_17 = lean_array_uget(x_7, x_6); +x_18 = lean_unsigned_to_nat(0u); +x_19 = lean_array_uset(x_7, x_6, x_18); +x_20 = x_17; +lean_inc(x_12); +lean_inc(x_11); +lean_inc(x_10); +lean_inc(x_9); +lean_inc(x_8); +lean_inc(x_4); +lean_inc(x_3); +lean_inc(x_2); +lean_inc(x_1); +x_21 = l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop(x_1, x_2, x_3, x_4, x_20, x_8, x_9, x_10, x_11, x_12, x_13); +if (lean_obj_tag(x_21) == 0) +{ +lean_object* x_22; lean_object* x_23; size_t x_24; size_t x_25; lean_object* x_26; lean_object* x_27; +x_22 = lean_ctor_get(x_21, 0); +lean_inc(x_22); +x_23 = lean_ctor_get(x_21, 1); +lean_inc(x_23); +lean_dec(x_21); +x_24 = 1; +x_25 = x_6 + x_24; +x_26 = x_22; +x_27 = lean_array_uset(x_19, x_6, x_26); +x_6 = x_25; +x_7 = x_27; +x_13 = x_23; +goto _start; +} +else +{ +uint8_t x_29; +lean_dec(x_19); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +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; +} +} +} +} +} +static lean_object* _init_l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__4___boxed__const__1() { +_start: +{ +size_t x_1; lean_object* x_2; +x_1 = 0; +x_2 = lean_box_usize(x_1); +return x_2; +} +} +lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__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, lean_object* x_11, lean_object* x_12, lean_object* x_13, lean_object* x_14) { +_start: +{ +if (lean_obj_tag(x_6) == 5) +{ +lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; +x_15 = lean_ctor_get(x_6, 0); +lean_inc(x_15); +x_16 = lean_ctor_get(x_6, 1); +lean_inc(x_16); +lean_dec(x_6); +x_17 = lean_array_set(x_7, x_8, x_16); +x_18 = lean_unsigned_to_nat(1u); +x_19 = lean_nat_sub(x_8, x_18); +lean_dec(x_8); +x_6 = x_15; +x_7 = x_17; +x_8 = x_19; +goto _start; +} +else +{ +uint8_t x_21; +lean_dec(x_8); +x_21 = l_Lean_Expr_isConstOf(x_6, x_1); +if (x_21 == 0) +{ +lean_object* x_22; +lean_dec(x_5); +lean_inc(x_13); +lean_inc(x_12); +lean_inc(x_11); +lean_inc(x_10); +lean_inc(x_9); +lean_inc(x_4); +lean_inc(x_3); +lean_inc(x_2); +lean_inc(x_1); +x_22 = l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop(x_1, x_2, x_3, x_4, x_6, x_9, x_10, x_11, x_12, x_13, x_14); +if (lean_obj_tag(x_22) == 0) +{ +lean_object* x_23; lean_object* x_24; lean_object* x_25; size_t x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; +x_23 = lean_ctor_get(x_22, 0); +lean_inc(x_23); +x_24 = lean_ctor_get(x_22, 1); +lean_inc(x_24); +lean_dec(x_22); +x_25 = lean_array_get_size(x_7); +x_26 = lean_usize_of_nat(x_25); +lean_dec(x_25); +x_27 = x_7; +x_28 = lean_box_usize(x_26); +x_29 = l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__4___boxed__const__1; +x_30 = lean_alloc_closure((void*)(l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__3___boxed), 13, 7); +lean_closure_set(x_30, 0, x_1); +lean_closure_set(x_30, 1, x_2); +lean_closure_set(x_30, 2, x_3); +lean_closure_set(x_30, 3, x_4); +lean_closure_set(x_30, 4, x_28); +lean_closure_set(x_30, 5, x_29); +lean_closure_set(x_30, 6, x_27); +x_31 = x_30; +x_32 = lean_apply_6(x_31, x_9, x_10, x_11, x_12, x_13, x_24); +if (lean_obj_tag(x_32) == 0) +{ +uint8_t x_33; +x_33 = !lean_is_exclusive(x_32); +if (x_33 == 0) +{ +lean_object* x_34; lean_object* x_35; +x_34 = lean_ctor_get(x_32, 0); +x_35 = l_Lean_mkAppN(x_23, x_34); +lean_ctor_set(x_32, 0, x_35); +return x_32; +} +else +{ +lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; +x_36 = lean_ctor_get(x_32, 0); +x_37 = lean_ctor_get(x_32, 1); +lean_inc(x_37); +lean_inc(x_36); +lean_dec(x_32); +x_38 = l_Lean_mkAppN(x_23, x_36); +x_39 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_39, 0, x_38); +lean_ctor_set(x_39, 1, x_37); +return x_39; +} +} +else +{ +uint8_t x_40; +lean_dec(x_23); +x_40 = !lean_is_exclusive(x_32); +if (x_40 == 0) +{ +return x_32; +} +else +{ +lean_object* x_41; lean_object* x_42; lean_object* x_43; +x_41 = lean_ctor_get(x_32, 0); +x_42 = lean_ctor_get(x_32, 1); +lean_inc(x_42); +lean_inc(x_41); +lean_dec(x_32); +x_43 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_43, 0, x_41); +lean_ctor_set(x_43, 1, x_42); +return x_43; +} +} +} +else +{ +uint8_t x_44; +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_7); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_44 = !lean_is_exclusive(x_22); +if (x_44 == 0) +{ +return x_22; +} +else +{ +lean_object* x_45; lean_object* x_46; lean_object* x_47; +x_45 = lean_ctor_get(x_22, 0); +x_46 = lean_ctor_get(x_22, 1); +lean_inc(x_46); +lean_inc(x_45); +lean_dec(x_22); +x_47 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_47, 0, x_45); +lean_ctor_set(x_47, 1, x_46); +return x_47; +} +} +} +else +{ +lean_object* x_48; +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +lean_inc(x_13); +lean_inc(x_12); +lean_inc(x_11); +lean_inc(x_10); +x_48 = lean_infer_type(x_5, x_10, x_11, x_12, x_13, x_14); +if (lean_obj_tag(x_48) == 0) +{ +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; +x_49 = lean_ctor_get(x_48, 0); +lean_inc(x_49); +x_50 = lean_ctor_get(x_48, 1); +lean_inc(x_50); +lean_dec(x_48); +x_51 = lean_box(0); +lean_inc(x_10); +x_52 = l_Lean_Meta_mkFreshExprSyntheticOpaqueMVar(x_49, x_51, x_10, x_11, x_12, x_13, x_50); +x_53 = lean_ctor_get(x_52, 0); +lean_inc(x_53); +x_54 = lean_ctor_get(x_52, 1); +lean_inc(x_54); +lean_dec(x_52); +x_55 = l_Lean_Expr_mvarId_x21(x_53); +lean_inc(x_13); +lean_inc(x_12); +lean_inc(x_11); +lean_inc(x_10); +lean_inc(x_55); +x_56 = l_Lean_Meta_IndPredBelow_backwardsChaining(x_55, x_4, x_10, x_11, x_12, x_13, x_54); +if (lean_obj_tag(x_56) == 0) +{ +lean_object* x_57; uint8_t x_58; +x_57 = lean_ctor_get(x_56, 0); +lean_inc(x_57); +x_58 = lean_unbox(x_57); +lean_dec(x_57); +if (x_58 == 0) +{ +lean_object* x_59; lean_object* x_60; lean_object* x_61; lean_object* x_62; lean_object* x_63; lean_object* x_64; lean_object* x_65; +lean_dec(x_53); +x_59 = lean_ctor_get(x_56, 1); +lean_inc(x_59); +lean_dec(x_56); +x_60 = lean_alloc_ctor(5, 1, 0); +lean_ctor_set(x_60, 0, x_55); +x_61 = l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__2___closed__2; +x_62 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_62, 0, x_61); +lean_ctor_set(x_62, 1, x_60); +x_63 = l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___closed__4; +x_64 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_64, 0, x_62); +lean_ctor_set(x_64, 1, x_63); +x_65 = l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___spec__3(x_64, x_9, x_10, x_11, x_12, x_13, x_59); +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +return x_65; +} +else +{ +uint8_t x_66; +lean_dec(x_55); +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +x_66 = !lean_is_exclusive(x_56); +if (x_66 == 0) +{ +lean_object* x_67; +x_67 = lean_ctor_get(x_56, 0); +lean_dec(x_67); +lean_ctor_set(x_56, 0, x_53); +return x_56; +} +else +{ +lean_object* x_68; lean_object* x_69; +x_68 = lean_ctor_get(x_56, 1); +lean_inc(x_68); +lean_dec(x_56); +x_69 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_69, 0, x_53); +lean_ctor_set(x_69, 1, x_68); +return x_69; +} +} +} +else +{ +uint8_t x_70; +lean_dec(x_55); +lean_dec(x_53); +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +x_70 = !lean_is_exclusive(x_56); +if (x_70 == 0) +{ +return x_56; +} +else +{ +lean_object* x_71; lean_object* x_72; lean_object* x_73; +x_71 = lean_ctor_get(x_56, 0); +x_72 = lean_ctor_get(x_56, 1); +lean_inc(x_72); +lean_inc(x_71); +lean_dec(x_56); +x_73 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_73, 0, x_71); +lean_ctor_set(x_73, 1, x_72); +return x_73; +} +} +} +else +{ +uint8_t x_74; +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_4); +x_74 = !lean_is_exclusive(x_48); +if (x_74 == 0) +{ +return x_48; +} +else +{ +lean_object* x_75; lean_object* x_76; lean_object* x_77; +x_75 = lean_ctor_get(x_48, 0); +x_76 = lean_ctor_get(x_48, 1); +lean_inc(x_76); +lean_inc(x_75); +lean_dec(x_48); +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; +} +} +} +} +} +} +lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__5(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) { +_start: +{ +uint8_t x_14; +x_14 = x_6 < x_5; +if (x_14 == 0) +{ +lean_object* x_15; lean_object* x_16; +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_15 = x_7; +x_16 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_16, 0, x_15); +lean_ctor_set(x_16, 1, x_13); +return x_16; +} +else +{ +lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; +x_17 = lean_array_uget(x_7, x_6); +x_18 = lean_unsigned_to_nat(0u); +x_19 = lean_array_uset(x_7, x_6, x_18); +x_20 = x_17; +lean_inc(x_12); +lean_inc(x_11); +lean_inc(x_10); +lean_inc(x_9); +lean_inc(x_8); +lean_inc(x_4); +lean_inc(x_3); +lean_inc(x_2); +lean_inc(x_1); +x_21 = l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop(x_1, x_2, x_3, x_4, x_20, x_8, x_9, x_10, x_11, x_12, x_13); +if (lean_obj_tag(x_21) == 0) +{ +lean_object* x_22; lean_object* x_23; size_t x_24; size_t x_25; lean_object* x_26; lean_object* x_27; +x_22 = lean_ctor_get(x_21, 0); +lean_inc(x_22); +x_23 = lean_ctor_get(x_21, 1); +lean_inc(x_23); +lean_dec(x_21); +x_24 = 1; +x_25 = x_6 + x_24; +x_26 = x_22; +x_27 = lean_array_uset(x_19, x_6, x_26); +x_6 = x_25; +x_7 = x_27; +x_13 = x_23; +goto _start; +} +else +{ +uint8_t x_29; +lean_dec(x_19); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +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; +} +} +} +} +} +static lean_object* _init_l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__6___boxed__const__1() { +_start: +{ +size_t x_1; lean_object* x_2; +x_1 = 0; +x_2 = lean_box_usize(x_1); +return x_2; +} +} +lean_object* l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__6(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: +{ +if (lean_obj_tag(x_6) == 5) +{ +lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; +x_15 = lean_ctor_get(x_6, 0); +lean_inc(x_15); +x_16 = lean_ctor_get(x_6, 1); +lean_inc(x_16); +lean_dec(x_6); +x_17 = lean_array_set(x_7, x_8, x_16); +x_18 = lean_unsigned_to_nat(1u); +x_19 = lean_nat_sub(x_8, x_18); +lean_dec(x_8); +x_6 = x_15; +x_7 = x_17; +x_8 = x_19; +goto _start; +} +else +{ +uint8_t x_21; +lean_dec(x_8); +x_21 = l_Lean_Expr_isConstOf(x_6, x_1); +if (x_21 == 0) +{ +lean_object* x_22; +lean_dec(x_5); +lean_inc(x_13); +lean_inc(x_12); +lean_inc(x_11); +lean_inc(x_10); +lean_inc(x_9); +lean_inc(x_4); +lean_inc(x_3); +lean_inc(x_2); +lean_inc(x_1); +x_22 = l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop(x_1, x_2, x_3, x_4, x_6, x_9, x_10, x_11, x_12, x_13, x_14); +if (lean_obj_tag(x_22) == 0) +{ +lean_object* x_23; lean_object* x_24; lean_object* x_25; size_t x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; +x_23 = lean_ctor_get(x_22, 0); +lean_inc(x_23); +x_24 = lean_ctor_get(x_22, 1); +lean_inc(x_24); +lean_dec(x_22); +x_25 = lean_array_get_size(x_7); +x_26 = lean_usize_of_nat(x_25); +lean_dec(x_25); +x_27 = x_7; +x_28 = lean_box_usize(x_26); +x_29 = l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__6___boxed__const__1; +x_30 = lean_alloc_closure((void*)(l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__5___boxed), 13, 7); +lean_closure_set(x_30, 0, x_1); +lean_closure_set(x_30, 1, x_2); +lean_closure_set(x_30, 2, x_3); +lean_closure_set(x_30, 3, x_4); +lean_closure_set(x_30, 4, x_28); +lean_closure_set(x_30, 5, x_29); +lean_closure_set(x_30, 6, x_27); +x_31 = x_30; +x_32 = lean_apply_6(x_31, x_9, x_10, x_11, x_12, x_13, x_24); +if (lean_obj_tag(x_32) == 0) +{ +uint8_t x_33; +x_33 = !lean_is_exclusive(x_32); +if (x_33 == 0) +{ +lean_object* x_34; lean_object* x_35; +x_34 = lean_ctor_get(x_32, 0); +x_35 = l_Lean_mkAppN(x_23, x_34); +lean_ctor_set(x_32, 0, x_35); +return x_32; +} +else +{ +lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; +x_36 = lean_ctor_get(x_32, 0); +x_37 = lean_ctor_get(x_32, 1); +lean_inc(x_37); +lean_inc(x_36); +lean_dec(x_32); +x_38 = l_Lean_mkAppN(x_23, x_36); +x_39 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_39, 0, x_38); +lean_ctor_set(x_39, 1, x_37); +return x_39; +} +} +else +{ +uint8_t x_40; +lean_dec(x_23); +x_40 = !lean_is_exclusive(x_32); +if (x_40 == 0) +{ +return x_32; +} +else +{ +lean_object* x_41; lean_object* x_42; lean_object* x_43; +x_41 = lean_ctor_get(x_32, 0); +x_42 = lean_ctor_get(x_32, 1); +lean_inc(x_42); +lean_inc(x_41); +lean_dec(x_32); +x_43 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_43, 0, x_41); +lean_ctor_set(x_43, 1, x_42); +return x_43; +} +} +} +else +{ +uint8_t x_44; +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_7); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_44 = !lean_is_exclusive(x_22); +if (x_44 == 0) +{ +return x_22; +} +else +{ +lean_object* x_45; lean_object* x_46; lean_object* x_47; +x_45 = lean_ctor_get(x_22, 0); +x_46 = lean_ctor_get(x_22, 1); +lean_inc(x_46); +lean_inc(x_45); +lean_dec(x_22); +x_47 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_47, 0, x_45); +lean_ctor_set(x_47, 1, x_46); +return x_47; +} +} +} +else +{ +lean_object* x_48; +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +lean_inc(x_13); +lean_inc(x_12); +lean_inc(x_11); +lean_inc(x_10); +x_48 = lean_infer_type(x_5, x_10, x_11, x_12, x_13, x_14); +if (lean_obj_tag(x_48) == 0) +{ +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; +x_49 = lean_ctor_get(x_48, 0); +lean_inc(x_49); +x_50 = lean_ctor_get(x_48, 1); +lean_inc(x_50); +lean_dec(x_48); +x_51 = lean_box(0); +lean_inc(x_10); +x_52 = l_Lean_Meta_mkFreshExprSyntheticOpaqueMVar(x_49, x_51, x_10, x_11, x_12, x_13, x_50); +x_53 = lean_ctor_get(x_52, 0); +lean_inc(x_53); +x_54 = lean_ctor_get(x_52, 1); +lean_inc(x_54); +lean_dec(x_52); +x_55 = l_Lean_Expr_mvarId_x21(x_53); +lean_inc(x_13); +lean_inc(x_12); +lean_inc(x_11); +lean_inc(x_10); +lean_inc(x_55); +x_56 = l_Lean_Meta_IndPredBelow_backwardsChaining(x_55, x_4, x_10, x_11, x_12, x_13, x_54); +if (lean_obj_tag(x_56) == 0) +{ +lean_object* x_57; uint8_t x_58; +x_57 = lean_ctor_get(x_56, 0); +lean_inc(x_57); +x_58 = lean_unbox(x_57); +lean_dec(x_57); +if (x_58 == 0) +{ +lean_object* x_59; lean_object* x_60; lean_object* x_61; lean_object* x_62; lean_object* x_63; lean_object* x_64; lean_object* x_65; +lean_dec(x_53); +x_59 = lean_ctor_get(x_56, 1); +lean_inc(x_59); +lean_dec(x_56); +x_60 = lean_alloc_ctor(5, 1, 0); +lean_ctor_set(x_60, 0, x_55); +x_61 = l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__2___closed__2; +x_62 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_62, 0, x_61); +lean_ctor_set(x_62, 1, x_60); +x_63 = l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___closed__4; +x_64 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_64, 0, x_62); +lean_ctor_set(x_64, 1, x_63); +x_65 = l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___spec__3(x_64, x_9, x_10, x_11, x_12, x_13, x_59); +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +return x_65; +} +else +{ +uint8_t x_66; +lean_dec(x_55); +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +x_66 = !lean_is_exclusive(x_56); +if (x_66 == 0) +{ +lean_object* x_67; +x_67 = lean_ctor_get(x_56, 0); +lean_dec(x_67); +lean_ctor_set(x_56, 0, x_53); +return x_56; +} +else +{ +lean_object* x_68; lean_object* x_69; +x_68 = lean_ctor_get(x_56, 1); +lean_inc(x_68); +lean_dec(x_56); +x_69 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_69, 0, x_53); +lean_ctor_set(x_69, 1, x_68); +return x_69; +} +} +} +else +{ +uint8_t x_70; +lean_dec(x_55); +lean_dec(x_53); +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +x_70 = !lean_is_exclusive(x_56); +if (x_70 == 0) +{ +return x_56; +} +else +{ +lean_object* x_71; lean_object* x_72; lean_object* x_73; +x_71 = lean_ctor_get(x_56, 0); +x_72 = lean_ctor_get(x_56, 1); +lean_inc(x_72); +lean_inc(x_71); +lean_dec(x_56); +x_73 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_73, 0, x_71); +lean_ctor_set(x_73, 1, x_72); +return x_73; +} +} +} +else +{ +uint8_t x_74; +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_4); +x_74 = !lean_is_exclusive(x_48); +if (x_74 == 0) +{ +return x_48; +} +else +{ +lean_object* x_75; lean_object* x_76; lean_object* x_77; +x_75 = lean_ctor_get(x_48, 0); +x_76 = lean_ctor_get(x_48, 1); +lean_inc(x_76); +lean_inc(x_75); +lean_dec(x_48); +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; +} +} +} +} +} +} +static lean_object* _init_l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__7___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("_traceMsg"); +return x_1; +} +} +static lean_object* _init_l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__7___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__7___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +static lean_object* _init_l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__7___closed__3() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("["); +return x_1; +} +} +static lean_object* _init_l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__7___closed__4() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__7___closed__3; +x_2 = l_Lean_stringToMessageData(x_1); +return x_2; +} +} +static lean_object* _init_l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__7___closed__5() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("] "); +return x_1; +} +} +static lean_object* _init_l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__7___closed__6() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__7___closed__5; +x_2 = l_Lean_stringToMessageData(x_1); +return x_2; +} +} +lean_object* l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__7(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; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; uint8_t x_18; +x_9 = lean_ctor_get(x_6, 3); +x_10 = l_Lean_addMessageContextFull___at_Lean_Meta_instAddMessageContextMetaM___spec__1(x_2, x_4, x_5, x_6, x_7, x_8); +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_addTrace_addTraceOptions(x_11); +x_14 = lean_st_ref_take(x_7, x_12); +x_15 = lean_ctor_get(x_14, 0); +lean_inc(x_15); +x_16 = lean_ctor_get(x_15, 3); +lean_inc(x_16); +x_17 = lean_ctor_get(x_14, 1); +lean_inc(x_17); +lean_dec(x_14); +x_18 = !lean_is_exclusive(x_15); +if (x_18 == 0) +{ +lean_object* x_19; uint8_t x_20; +x_19 = lean_ctor_get(x_15, 3); +lean_dec(x_19); +x_20 = !lean_is_exclusive(x_16); +if (x_20 == 0) +{ +lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; uint8_t x_36; +x_21 = lean_ctor_get(x_16, 0); +x_22 = l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__7___closed__2; +x_23 = l_Lean_Name_append(x_1, x_22); +x_24 = lean_alloc_ctor(4, 1, 0); +lean_ctor_set(x_24, 0, x_1); +x_25 = l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__7___closed__4; +x_26 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_26, 0, x_25); +lean_ctor_set(x_26, 1, x_24); +x_27 = l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__7___closed__6; +x_28 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_28, 0, x_26); +lean_ctor_set(x_28, 1, x_27); +x_29 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_29, 0, x_28); +lean_ctor_set(x_29, 1, x_13); +x_30 = l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___closed__4; +x_31 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_31, 0, x_29); +lean_ctor_set(x_31, 1, x_30); +x_32 = lean_alloc_ctor(11, 2, 0); +lean_ctor_set(x_32, 0, x_23); +lean_ctor_set(x_32, 1, x_31); +lean_inc(x_9); +x_33 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_33, 0, x_9); +lean_ctor_set(x_33, 1, x_32); +x_34 = l_Std_PersistentArray_push___rarg(x_21, x_33); +lean_ctor_set(x_16, 0, x_34); +x_35 = lean_st_ref_set(x_7, x_15, x_17); +x_36 = !lean_is_exclusive(x_35); +if (x_36 == 0) +{ +lean_object* x_37; lean_object* x_38; +x_37 = lean_ctor_get(x_35, 0); +lean_dec(x_37); +x_38 = lean_box(0); +lean_ctor_set(x_35, 0, x_38); +return x_35; +} +else +{ +lean_object* x_39; lean_object* x_40; lean_object* x_41; +x_39 = lean_ctor_get(x_35, 1); +lean_inc(x_39); +lean_dec(x_35); +x_40 = lean_box(0); +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_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_object* x_51; lean_object* x_52; lean_object* x_53; lean_object* x_54; lean_object* x_55; lean_object* x_56; lean_object* x_57; lean_object* x_58; lean_object* x_59; lean_object* x_60; lean_object* x_61; lean_object* x_62; +x_42 = lean_ctor_get_uint8(x_16, sizeof(void*)*1); +x_43 = lean_ctor_get(x_16, 0); +lean_inc(x_43); +lean_dec(x_16); +x_44 = l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__7___closed__2; +x_45 = l_Lean_Name_append(x_1, x_44); +x_46 = lean_alloc_ctor(4, 1, 0); +lean_ctor_set(x_46, 0, x_1); +x_47 = l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__7___closed__4; +x_48 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_48, 0, x_47); +lean_ctor_set(x_48, 1, x_46); +x_49 = l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__7___closed__6; +x_50 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_50, 0, x_48); +lean_ctor_set(x_50, 1, x_49); +x_51 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_51, 0, x_50); +lean_ctor_set(x_51, 1, x_13); +x_52 = l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___closed__4; +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(11, 2, 0); +lean_ctor_set(x_54, 0, x_45); +lean_ctor_set(x_54, 1, x_53); +lean_inc(x_9); +x_55 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_55, 0, x_9); +lean_ctor_set(x_55, 1, x_54); +x_56 = l_Std_PersistentArray_push___rarg(x_43, x_55); +x_57 = lean_alloc_ctor(0, 1, 1); +lean_ctor_set(x_57, 0, x_56); +lean_ctor_set_uint8(x_57, sizeof(void*)*1, x_42); +lean_ctor_set(x_15, 3, x_57); +x_58 = lean_st_ref_set(x_7, x_15, x_17); +x_59 = lean_ctor_get(x_58, 1); +lean_inc(x_59); +if (lean_is_exclusive(x_58)) { + lean_ctor_release(x_58, 0); + lean_ctor_release(x_58, 1); + x_60 = x_58; +} else { + lean_dec_ref(x_58); + x_60 = lean_box(0); +} +x_61 = lean_box(0); +if (lean_is_scalar(x_60)) { + x_62 = lean_alloc_ctor(0, 2, 0); +} else { + x_62 = x_60; +} +lean_ctor_set(x_62, 0, x_61); +lean_ctor_set(x_62, 1, x_59); +return x_62; +} +} +else +{ +lean_object* x_63; lean_object* x_64; lean_object* x_65; uint8_t x_66; lean_object* x_67; lean_object* x_68; lean_object* x_69; lean_object* x_70; lean_object* x_71; lean_object* x_72; lean_object* x_73; lean_object* x_74; lean_object* x_75; lean_object* x_76; lean_object* x_77; lean_object* x_78; lean_object* x_79; lean_object* x_80; lean_object* x_81; lean_object* x_82; lean_object* x_83; lean_object* x_84; lean_object* x_85; lean_object* x_86; lean_object* x_87; lean_object* x_88; +x_63 = lean_ctor_get(x_15, 0); +x_64 = lean_ctor_get(x_15, 1); +x_65 = lean_ctor_get(x_15, 2); +lean_inc(x_65); +lean_inc(x_64); +lean_inc(x_63); +lean_dec(x_15); +x_66 = lean_ctor_get_uint8(x_16, sizeof(void*)*1); +x_67 = lean_ctor_get(x_16, 0); +lean_inc(x_67); +if (lean_is_exclusive(x_16)) { + lean_ctor_release(x_16, 0); + x_68 = x_16; +} else { + lean_dec_ref(x_16); + x_68 = lean_box(0); +} +x_69 = l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__7___closed__2; +x_70 = l_Lean_Name_append(x_1, x_69); +x_71 = lean_alloc_ctor(4, 1, 0); +lean_ctor_set(x_71, 0, x_1); +x_72 = l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__7___closed__4; +x_73 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_73, 0, x_72); +lean_ctor_set(x_73, 1, x_71); +x_74 = l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__7___closed__6; +x_75 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_75, 0, x_73); +lean_ctor_set(x_75, 1, x_74); +x_76 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_76, 0, x_75); +lean_ctor_set(x_76, 1, x_13); +x_77 = l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___closed__4; +x_78 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_78, 0, x_76); +lean_ctor_set(x_78, 1, x_77); +x_79 = lean_alloc_ctor(11, 2, 0); +lean_ctor_set(x_79, 0, x_70); +lean_ctor_set(x_79, 1, x_78); +lean_inc(x_9); +x_80 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_80, 0, x_9); +lean_ctor_set(x_80, 1, x_79); +x_81 = l_Std_PersistentArray_push___rarg(x_67, x_80); +if (lean_is_scalar(x_68)) { + x_82 = lean_alloc_ctor(0, 1, 1); +} else { + x_82 = x_68; +} +lean_ctor_set(x_82, 0, x_81); +lean_ctor_set_uint8(x_82, sizeof(void*)*1, x_66); +x_83 = lean_alloc_ctor(0, 4, 0); +lean_ctor_set(x_83, 0, x_63); +lean_ctor_set(x_83, 1, x_64); +lean_ctor_set(x_83, 2, x_65); +lean_ctor_set(x_83, 3, x_82); +x_84 = lean_st_ref_set(x_7, x_83, x_17); +x_85 = lean_ctor_get(x_84, 1); +lean_inc(x_85); +if (lean_is_exclusive(x_84)) { + lean_ctor_release(x_84, 0); + lean_ctor_release(x_84, 1); + x_86 = x_84; +} else { + lean_dec_ref(x_84); + x_86 = lean_box(0); +} +x_87 = lean_box(0); +if (lean_is_scalar(x_86)) { + x_88 = lean_alloc_ctor(0, 2, 0); +} else { + x_88 = x_86; +} +lean_ctor_set(x_88, 0, x_87); +lean_ctor_set(x_88, 1, x_85); +return x_88; +} +} +} +lean_object* l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__8(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; uint8_t x_9; lean_object* x_10; lean_object* x_11; +x_8 = lean_ctor_get(x_5, 0); +x_9 = l_Lean_checkTraceOption(x_8, x_1); +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_7); +return x_11; +} +} +lean_object* l_Lean_Meta_withLocalDecl___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__9___rarg___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; +x_9 = lean_apply_7(x_1, x_3, x_2, x_4, x_5, x_6, x_7, x_8); +return x_9; +} +} +lean_object* l_Lean_Meta_withLocalDecl___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__9___rarg(lean_object* x_1, uint8_t x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10) { +_start: +{ +lean_object* x_11; lean_object* x_12; +x_11 = lean_alloc_closure((void*)(l_Lean_Meta_withLocalDecl___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__9___rarg___lambda__1), 8, 2); +lean_closure_set(x_11, 0, x_4); +lean_closure_set(x_11, 1, x_5); +x_12 = l___private_Lean_Meta_Basic_0__Lean_Meta_withLocalDeclImp___rarg(x_1, x_2, x_3, x_11, x_6, x_7, x_8, x_9, x_10); +if (lean_obj_tag(x_12) == 0) +{ +uint8_t x_13; +x_13 = !lean_is_exclusive(x_12); +if (x_13 == 0) +{ +return x_12; +} +else +{ +lean_object* x_14; lean_object* x_15; lean_object* x_16; +x_14 = lean_ctor_get(x_12, 0); +x_15 = lean_ctor_get(x_12, 1); +lean_inc(x_15); +lean_inc(x_14); +lean_dec(x_12); +x_16 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_16, 0, x_14); +lean_ctor_set(x_16, 1, x_15); +return x_16; +} +} +else +{ +uint8_t x_17; +x_17 = !lean_is_exclusive(x_12); +if (x_17 == 0) +{ +return x_12; +} +else +{ +lean_object* x_18; lean_object* x_19; lean_object* x_20; +x_18 = lean_ctor_get(x_12, 0); +x_19 = lean_ctor_get(x_12, 1); +lean_inc(x_19); +lean_inc(x_18); +lean_dec(x_12); +x_20 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_20, 0, x_18); +lean_ctor_set(x_20, 1, x_19); +return x_20; +} +} +} +} +lean_object* l_Lean_Meta_withLocalDecl___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__9(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_Lean_Meta_withLocalDecl___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__9___rarg___boxed), 10, 0); +return x_2; +} +} +lean_object* l_Lean_Meta_withLetDecl___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__10___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* 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_closure((void*)(l_Lean_Meta_withLocalDecl___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__9___rarg___lambda__1), 8, 2); +lean_closure_set(x_11, 0, x_4); +lean_closure_set(x_11, 1, x_5); +x_12 = l___private_Lean_Meta_Basic_0__Lean_Meta_withLetDeclImp___rarg(x_1, x_2, x_3, x_11, x_6, x_7, x_8, x_9, x_10); +if (lean_obj_tag(x_12) == 0) +{ +uint8_t x_13; +x_13 = !lean_is_exclusive(x_12); +if (x_13 == 0) +{ +return x_12; +} +else +{ +lean_object* x_14; lean_object* x_15; lean_object* x_16; +x_14 = lean_ctor_get(x_12, 0); +x_15 = lean_ctor_get(x_12, 1); +lean_inc(x_15); +lean_inc(x_14); +lean_dec(x_12); +x_16 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_16, 0, x_14); +lean_ctor_set(x_16, 1, x_15); +return x_16; +} +} +else +{ +uint8_t x_17; +x_17 = !lean_is_exclusive(x_12); +if (x_17 == 0) +{ +return x_12; +} +else +{ +lean_object* x_18; lean_object* x_19; lean_object* x_20; +x_18 = lean_ctor_get(x_12, 0); +x_19 = lean_ctor_get(x_12, 1); +lean_inc(x_19); +lean_inc(x_18); +lean_dec(x_12); +x_20 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_20, 0, x_18); +lean_ctor_set(x_20, 1, x_19); +return x_20; +} +} +} +} +lean_object* l_Lean_Meta_withLetDecl___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__10(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_Lean_Meta_withLetDecl___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__10___rarg), 10, 0); +return x_2; +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___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, lean_object* x_12) { +_start: +{ +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_dec(x_6); +x_13 = lean_unsigned_to_nat(0u); +x_14 = l_Lean_Expr_getAppNumArgsAux(x_1, x_13); +x_15 = l_Lean_Meta_matchMatcherApp_x3f___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___spec__1___closed__1; +lean_inc(x_14); +x_16 = lean_mk_array(x_14, x_15); +x_17 = lean_unsigned_to_nat(1u); +x_18 = lean_nat_sub(x_14, x_17); +lean_dec(x_14); +lean_inc(x_1); +x_19 = l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__6(x_2, x_3, x_4, x_5, x_1, x_1, x_16, x_18, x_7, x_8, x_9, x_10, x_11, x_12); +return x_19; +} +} +static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___lambda__2___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("modified matcher:\n"); +return x_1; +} +} +static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___lambda__2___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___lambda__2___closed__1; +x_2 = l_Lean_stringToMessageData(x_1); +return x_2; +} +} +static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___lambda__2___closed__3() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("could not add below discriminant"); +return x_1; +} +} +static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___lambda__2___closed__4() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___lambda__2___closed__3; +x_2 = l_Lean_stringToMessageData(x_1); +return x_2; +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___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_object* x_12, lean_object* x_13) { +_start: +{ +lean_object* x_14; +lean_dec(x_7); +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_14 = l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow(x_1, x_2, x_8, x_9, x_10, x_11, x_12, x_13); +if (lean_obj_tag(x_14) == 0) +{ +lean_object* x_15; lean_object* x_16; lean_object* x_17; uint8_t x_18; +x_15 = lean_ctor_get(x_14, 0); +lean_inc(x_15); +x_16 = lean_ctor_get(x_14, 1); +lean_inc(x_16); +lean_dec(x_14); +x_17 = l_Lean_Meta_MatcherApp_toExpr(x_2); +x_18 = lean_expr_eqv(x_15, x_17); +lean_dec(x_17); +if (x_18 == 0) +{ +uint8_t x_19; lean_object* x_20; lean_object* x_33; lean_object* x_34; lean_object* x_35; uint8_t x_36; +x_33 = lean_st_ref_get(x_12, x_16); +x_34 = lean_ctor_get(x_33, 0); +lean_inc(x_34); +x_35 = lean_ctor_get(x_34, 3); +lean_inc(x_35); +lean_dec(x_34); +x_36 = lean_ctor_get_uint8(x_35, sizeof(void*)*1); +lean_dec(x_35); +if (x_36 == 0) +{ +lean_object* x_37; uint8_t x_38; +x_37 = lean_ctor_get(x_33, 1); +lean_inc(x_37); +lean_dec(x_33); +x_38 = 0; +x_19 = x_38; +x_20 = x_37; +goto block_32; +} +else +{ +lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; uint8_t x_43; +x_39 = lean_ctor_get(x_33, 1); +lean_inc(x_39); +lean_dec(x_33); +lean_inc(x_6); +x_40 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__8(x_6, x_8, x_9, x_10, x_11, x_12, x_39); +x_41 = lean_ctor_get(x_40, 0); +lean_inc(x_41); +x_42 = lean_ctor_get(x_40, 1); +lean_inc(x_42); +lean_dec(x_40); +x_43 = lean_unbox(x_41); +lean_dec(x_41); +x_19 = x_43; +x_20 = x_42; +goto block_32; +} +block_32: +{ +if (x_19 == 0) +{ +lean_object* x_21; lean_object* x_22; +lean_dec(x_6); +x_21 = lean_box(0); +x_22 = l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___lambda__1(x_15, x_3, x_4, x_1, x_5, x_21, x_8, x_9, x_10, x_11, x_12, x_20); +return x_22; +} +else +{ +lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; +lean_inc(x_15); +x_23 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_23, 0, x_15); +x_24 = l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___lambda__2___closed__2; +x_25 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_25, 0, x_24); +lean_ctor_set(x_25, 1, x_23); +x_26 = l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___closed__4; +x_27 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_27, 0, x_25); +lean_ctor_set(x_27, 1, x_26); +x_28 = l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__7(x_6, x_27, x_8, x_9, x_10, x_11, x_12, x_20); +x_29 = lean_ctor_get(x_28, 0); +lean_inc(x_29); +x_30 = lean_ctor_get(x_28, 1); +lean_inc(x_30); +lean_dec(x_28); +x_31 = l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___lambda__1(x_15, x_3, x_4, x_1, x_5, x_29, x_8, x_9, x_10, x_11, x_12, x_30); +return x_31; +} +} +} +else +{ +lean_object* x_44; lean_object* x_45; +lean_dec(x_15); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_1); +x_44 = l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___lambda__2___closed__4; +x_45 = l_Lean_throwError___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___spec__3(x_44, x_8, x_9, x_10, x_11, x_12, x_16); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +return x_45; +} +} +else +{ +uint8_t x_46; +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_46 = !lean_is_exclusive(x_14); +if (x_46 == 0) +{ +return x_14; +} +else +{ +lean_object* x_47; lean_object* x_48; lean_object* x_49; +x_47 = lean_ctor_get(x_14, 0); +x_48 = lean_ctor_get(x_14, 1); +lean_inc(x_48); +lean_inc(x_47); +lean_dec(x_14); +x_49 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_49, 0, x_47); +lean_ctor_set(x_49, 1, x_48); +return x_49; +} +} +} +} +static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___lambda__3___closed__1() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = lean_unsigned_to_nat(1u); +x_2 = lean_mk_empty_array_with_capacity(x_1); +return x_2; +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___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_object* x_10, lean_object* x_11, lean_object* x_12) { +_start: +{ +lean_object* x_13; lean_object* x_14; +x_13 = lean_expr_instantiate1(x_1, x_6); +lean_inc(x_11); +lean_inc(x_10); +lean_inc(x_9); +lean_inc(x_8); +x_14 = l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop(x_2, x_3, x_4, x_5, x_13, x_7, x_8, x_9, x_10, x_11, x_12); +if (lean_obj_tag(x_14) == 0) +{ +lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; uint8_t x_19; uint8_t x_20; lean_object* x_21; +x_15 = lean_ctor_get(x_14, 0); +lean_inc(x_15); +x_16 = lean_ctor_get(x_14, 1); +lean_inc(x_16); +lean_dec(x_14); +x_17 = l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___lambda__3___closed__1; +x_18 = lean_array_push(x_17, x_6); +x_19 = 0; +x_20 = 1; +x_21 = l_Lean_Meta_mkLambdaFVars(x_18, x_15, x_19, x_20, x_8, x_9, x_10, x_11, x_16); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +return x_21; +} +else +{ +uint8_t x_22; +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_6); +x_22 = !lean_is_exclusive(x_14); +if (x_22 == 0) +{ +return x_14; +} +else +{ +lean_object* x_23; lean_object* x_24; lean_object* x_25; +x_23 = lean_ctor_get(x_14, 0); +x_24 = lean_ctor_get(x_14, 1); +lean_inc(x_24); +lean_inc(x_23); +lean_dec(x_14); +x_25 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_25, 0, x_23); +lean_ctor_set(x_25, 1, x_24); +return x_25; +} +} +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___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, lean_object* x_11, lean_object* x_12) { +_start: +{ +lean_object* x_13; lean_object* x_14; +x_13 = lean_expr_instantiate1(x_1, x_6); +lean_inc(x_11); +lean_inc(x_10); +lean_inc(x_9); +lean_inc(x_8); +x_14 = l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop(x_2, x_3, x_4, x_5, x_13, x_7, x_8, x_9, x_10, x_11, x_12); +if (lean_obj_tag(x_14) == 0) +{ +lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; uint8_t x_19; uint8_t x_20; lean_object* x_21; +x_15 = lean_ctor_get(x_14, 0); +lean_inc(x_15); +x_16 = lean_ctor_get(x_14, 1); +lean_inc(x_16); +lean_dec(x_14); +x_17 = l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___lambda__3___closed__1; +x_18 = lean_array_push(x_17, x_6); +x_19 = 0; +x_20 = 1; +x_21 = l_Lean_Meta_mkForallFVars(x_18, x_15, x_19, x_20, x_8, x_9, x_10, x_11, x_16); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +return x_21; +} +else +{ +uint8_t x_22; +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_6); +x_22 = !lean_is_exclusive(x_14); +if (x_22 == 0) +{ +return x_14; +} +else +{ +lean_object* x_23; lean_object* x_24; lean_object* x_25; +x_23 = lean_ctor_get(x_14, 0); +x_24 = lean_ctor_get(x_14, 1); +lean_inc(x_24); +lean_inc(x_23); +lean_dec(x_14); +x_25 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_25, 0, x_23); +lean_ctor_set(x_25, 1, x_24); +return x_25; +} +} +} +} +static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("Elab"); +return x_1; +} +} +static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___closed__3() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("definition"); +return x_1; +} +} +static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___closed__4() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___closed__2; +x_2 = l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___closed__3; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___closed__5() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("structural"); +return x_1; +} +} +static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___closed__6() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___closed__4; +x_2 = l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___closed__5; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___closed__7() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("matcherApp before adding below transformation:\n"); +return x_1; +} +} +static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___closed__8() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___closed__7; +x_2 = l_Lean_stringToMessageData(x_1); +return x_2; +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop(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: +{ +switch (lean_obj_tag(x_5)) { +case 5: +{ +lean_object* x_12; lean_object* x_13; +lean_inc(x_5); +x_12 = l_Lean_Meta_matchMatcherApp_x3f___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___spec__1(x_5, x_6, x_7, x_8, x_9, x_10, x_11); +x_13 = lean_ctor_get(x_12, 0); +lean_inc(x_13); +if (lean_obj_tag(x_13) == 0) +{ +lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; +x_14 = lean_ctor_get(x_12, 1); +lean_inc(x_14); +lean_dec(x_12); +x_15 = lean_unsigned_to_nat(0u); +x_16 = l_Lean_Expr_getAppNumArgsAux(x_5, x_15); +x_17 = l_Lean_Meta_matchMatcherApp_x3f___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___spec__1___closed__1; +lean_inc(x_16); +x_18 = lean_mk_array(x_16, x_17); +x_19 = lean_unsigned_to_nat(1u); +x_20 = lean_nat_sub(x_16, x_19); +lean_dec(x_16); +lean_inc(x_5); +x_21 = l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__2(x_1, x_2, x_3, x_4, x_5, x_5, x_18, x_20, x_6, x_7, x_8, x_9, x_10, x_14); +return x_21; +} +else +{ +lean_object* x_22; lean_object* x_23; uint8_t x_24; +x_22 = lean_ctor_get(x_12, 1); +lean_inc(x_22); +lean_dec(x_12); +x_23 = lean_ctor_get(x_13, 0); +lean_inc(x_23); +lean_dec(x_13); +lean_inc(x_5); +lean_inc(x_1); +x_24 = l_Lean_Elab_Structural_recArgHasLooseBVarsAt(x_1, x_2, x_5); +if (x_24 == 0) +{ +lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; +lean_dec(x_23); +x_25 = lean_unsigned_to_nat(0u); +x_26 = l_Lean_Expr_getAppNumArgsAux(x_5, x_25); +x_27 = l_Lean_Meta_matchMatcherApp_x3f___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___spec__1___closed__1; +lean_inc(x_26); +x_28 = lean_mk_array(x_26, x_27); +x_29 = lean_unsigned_to_nat(1u); +x_30 = lean_nat_sub(x_26, x_29); +lean_dec(x_26); +lean_inc(x_5); +x_31 = l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__4(x_1, x_2, x_3, x_4, x_5, x_5, x_28, x_30, x_6, x_7, x_8, x_9, x_10, x_22); +return x_31; +} +else +{ +lean_object* x_32; uint8_t x_33; lean_object* x_34; lean_object* x_48; lean_object* x_49; lean_object* x_50; uint8_t x_51; +lean_dec(x_5); +x_32 = l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___closed__6; +x_48 = lean_st_ref_get(x_10, x_22); +x_49 = lean_ctor_get(x_48, 0); +lean_inc(x_49); +x_50 = lean_ctor_get(x_49, 3); +lean_inc(x_50); +lean_dec(x_49); +x_51 = lean_ctor_get_uint8(x_50, sizeof(void*)*1); +lean_dec(x_50); +if (x_51 == 0) +{ +lean_object* x_52; uint8_t x_53; +x_52 = lean_ctor_get(x_48, 1); +lean_inc(x_52); +lean_dec(x_48); +x_53 = 0; +x_33 = x_53; +x_34 = x_52; +goto block_47; +} +else +{ +lean_object* x_54; lean_object* x_55; lean_object* x_56; lean_object* x_57; uint8_t x_58; +x_54 = lean_ctor_get(x_48, 1); +lean_inc(x_54); +lean_dec(x_48); +x_55 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__8(x_32, x_6, x_7, x_8, x_9, x_10, x_54); +x_56 = lean_ctor_get(x_55, 0); +lean_inc(x_56); +x_57 = lean_ctor_get(x_55, 1); +lean_inc(x_57); +lean_dec(x_55); +x_58 = lean_unbox(x_56); +lean_dec(x_56); +x_33 = x_58; +x_34 = x_57; +goto block_47; +} +block_47: +{ +if (x_33 == 0) +{ +lean_object* x_35; lean_object* x_36; +x_35 = lean_box(0); +x_36 = l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___lambda__2(x_3, x_23, x_1, x_2, x_4, x_32, x_35, x_6, x_7, x_8, x_9, x_10, x_34); +return x_36; +} +else +{ +lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; +lean_inc(x_23); +x_37 = l_Lean_Meta_MatcherApp_toExpr(x_23); +x_38 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_38, 0, x_37); +x_39 = l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___closed__8; +x_40 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_40, 0, x_39); +lean_ctor_set(x_40, 1, x_38); +x_41 = l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___closed__4; +x_42 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_42, 0, x_40); +lean_ctor_set(x_42, 1, x_41); +x_43 = l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__7(x_32, x_42, x_6, x_7, x_8, x_9, x_10, x_34); +x_44 = lean_ctor_get(x_43, 0); +lean_inc(x_44); +x_45 = lean_ctor_get(x_43, 1); +lean_inc(x_45); +lean_dec(x_43); +x_46 = l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___lambda__2(x_3, x_23, x_1, x_2, x_4, x_32, x_44, x_6, x_7, x_8, x_9, x_10, x_45); +return x_46; +} +} +} +} +} +case 6: +{ +lean_object* x_59; lean_object* x_60; lean_object* x_61; uint64_t x_62; lean_object* x_63; +x_59 = lean_ctor_get(x_5, 0); +lean_inc(x_59); +x_60 = lean_ctor_get(x_5, 1); +lean_inc(x_60); +x_61 = lean_ctor_get(x_5, 2); +lean_inc(x_61); +x_62 = lean_ctor_get_uint64(x_5, sizeof(void*)*3); +lean_dec(x_5); +lean_inc(x_10); +lean_inc(x_9); +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_6); +lean_inc(x_4); +lean_inc(x_3); +lean_inc(x_2); +lean_inc(x_1); +x_63 = l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop(x_1, x_2, x_3, x_4, x_60, x_6, x_7, x_8, x_9, x_10, x_11); +if (lean_obj_tag(x_63) == 0) +{ +lean_object* x_64; lean_object* x_65; uint8_t x_66; lean_object* x_67; lean_object* x_68; +x_64 = lean_ctor_get(x_63, 0); +lean_inc(x_64); +x_65 = lean_ctor_get(x_63, 1); +lean_inc(x_65); +lean_dec(x_63); +x_66 = (uint8_t)((x_62 << 24) >> 61); +x_67 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___lambda__3___boxed), 12, 5); +lean_closure_set(x_67, 0, x_61); +lean_closure_set(x_67, 1, x_1); +lean_closure_set(x_67, 2, x_2); +lean_closure_set(x_67, 3, x_3); +lean_closure_set(x_67, 4, x_4); +x_68 = l_Lean_Meta_withLocalDecl___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__9___rarg(x_59, x_66, x_64, x_67, x_6, x_7, x_8, x_9, x_10, x_65); +return x_68; +} +else +{ +uint8_t x_69; +lean_dec(x_61); +lean_dec(x_59); +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_2); +lean_dec(x_1); +x_69 = !lean_is_exclusive(x_63); +if (x_69 == 0) +{ +return x_63; +} +else +{ +lean_object* x_70; lean_object* x_71; lean_object* x_72; +x_70 = lean_ctor_get(x_63, 0); +x_71 = lean_ctor_get(x_63, 1); +lean_inc(x_71); +lean_inc(x_70); +lean_dec(x_63); +x_72 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_72, 0, x_70); +lean_ctor_set(x_72, 1, x_71); +return x_72; +} +} +} +case 7: +{ +lean_object* x_73; lean_object* x_74; lean_object* x_75; uint64_t x_76; lean_object* x_77; +x_73 = lean_ctor_get(x_5, 0); +lean_inc(x_73); +x_74 = lean_ctor_get(x_5, 1); +lean_inc(x_74); +x_75 = lean_ctor_get(x_5, 2); +lean_inc(x_75); +x_76 = lean_ctor_get_uint64(x_5, sizeof(void*)*3); +lean_dec(x_5); +lean_inc(x_10); +lean_inc(x_9); +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_6); +lean_inc(x_4); +lean_inc(x_3); +lean_inc(x_2); +lean_inc(x_1); +x_77 = l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop(x_1, x_2, x_3, x_4, x_74, x_6, x_7, x_8, x_9, x_10, x_11); +if (lean_obj_tag(x_77) == 0) +{ +lean_object* x_78; lean_object* x_79; uint8_t x_80; lean_object* x_81; lean_object* x_82; +x_78 = lean_ctor_get(x_77, 0); +lean_inc(x_78); +x_79 = lean_ctor_get(x_77, 1); +lean_inc(x_79); +lean_dec(x_77); +x_80 = (uint8_t)((x_76 << 24) >> 61); +x_81 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___lambda__4___boxed), 12, 5); +lean_closure_set(x_81, 0, x_75); +lean_closure_set(x_81, 1, x_1); +lean_closure_set(x_81, 2, x_2); +lean_closure_set(x_81, 3, x_3); +lean_closure_set(x_81, 4, x_4); +x_82 = l_Lean_Meta_withLocalDecl___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__9___rarg(x_73, x_80, x_78, x_81, x_6, x_7, x_8, x_9, x_10, x_79); +return x_82; +} +else +{ +uint8_t x_83; +lean_dec(x_75); +lean_dec(x_73); +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_2); +lean_dec(x_1); +x_83 = !lean_is_exclusive(x_77); +if (x_83 == 0) +{ +return x_77; +} +else +{ +lean_object* x_84; lean_object* x_85; lean_object* x_86; +x_84 = lean_ctor_get(x_77, 0); +x_85 = lean_ctor_get(x_77, 1); +lean_inc(x_85); +lean_inc(x_84); +lean_dec(x_77); +x_86 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_86, 0, x_84); +lean_ctor_set(x_86, 1, x_85); +return x_86; +} +} +} +case 8: +{ +lean_object* x_87; lean_object* x_88; lean_object* x_89; lean_object* x_90; lean_object* x_91; +x_87 = lean_ctor_get(x_5, 0); +lean_inc(x_87); +x_88 = lean_ctor_get(x_5, 1); +lean_inc(x_88); +x_89 = lean_ctor_get(x_5, 2); +lean_inc(x_89); +x_90 = lean_ctor_get(x_5, 3); +lean_inc(x_90); +lean_dec(x_5); +lean_inc(x_10); +lean_inc(x_9); +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_6); +lean_inc(x_4); +lean_inc(x_3); +lean_inc(x_2); +lean_inc(x_1); +x_91 = l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop(x_1, x_2, x_3, x_4, x_88, x_6, x_7, x_8, x_9, x_10, x_11); +if (lean_obj_tag(x_91) == 0) +{ +lean_object* x_92; lean_object* x_93; lean_object* x_94; +x_92 = lean_ctor_get(x_91, 0); +lean_inc(x_92); +x_93 = lean_ctor_get(x_91, 1); +lean_inc(x_93); +lean_dec(x_91); +lean_inc(x_10); +lean_inc(x_9); +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_6); +lean_inc(x_4); +lean_inc(x_3); +lean_inc(x_2); +lean_inc(x_1); +x_94 = l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop(x_1, x_2, x_3, x_4, x_89, x_6, x_7, x_8, x_9, x_10, x_93); +if (lean_obj_tag(x_94) == 0) +{ +lean_object* x_95; lean_object* x_96; lean_object* x_97; lean_object* x_98; +x_95 = lean_ctor_get(x_94, 0); +lean_inc(x_95); +x_96 = lean_ctor_get(x_94, 1); +lean_inc(x_96); +lean_dec(x_94); +x_97 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___lambda__3___boxed), 12, 5); +lean_closure_set(x_97, 0, x_90); +lean_closure_set(x_97, 1, x_1); +lean_closure_set(x_97, 2, x_2); +lean_closure_set(x_97, 3, x_3); +lean_closure_set(x_97, 4, x_4); +x_98 = l_Lean_Meta_withLetDecl___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__10___rarg(x_87, x_92, x_95, x_97, x_6, x_7, x_8, x_9, x_10, x_96); +return x_98; +} +else +{ +uint8_t x_99; +lean_dec(x_92); +lean_dec(x_90); +lean_dec(x_87); +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_2); +lean_dec(x_1); +x_99 = !lean_is_exclusive(x_94); +if (x_99 == 0) +{ +return x_94; +} +else +{ +lean_object* x_100; lean_object* x_101; lean_object* x_102; +x_100 = lean_ctor_get(x_94, 0); +x_101 = lean_ctor_get(x_94, 1); +lean_inc(x_101); +lean_inc(x_100); +lean_dec(x_94); +x_102 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_102, 0, x_100); +lean_ctor_set(x_102, 1, x_101); +return x_102; +} +} +} +else +{ +uint8_t x_103; +lean_dec(x_90); +lean_dec(x_89); +lean_dec(x_87); +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_2); +lean_dec(x_1); +x_103 = !lean_is_exclusive(x_91); +if (x_103 == 0) +{ +return x_91; +} +else +{ +lean_object* x_104; lean_object* x_105; lean_object* x_106; +x_104 = lean_ctor_get(x_91, 0); +x_105 = lean_ctor_get(x_91, 1); +lean_inc(x_105); +lean_inc(x_104); +lean_dec(x_91); +x_106 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_106, 0, x_104); +lean_ctor_set(x_106, 1, x_105); +return x_106; +} +} +} +case 10: +{ +lean_object* x_107; lean_object* x_108; lean_object* x_109; +x_107 = lean_ctor_get(x_5, 0); +lean_inc(x_107); +x_108 = lean_ctor_get(x_5, 1); +lean_inc(x_108); +lean_dec(x_5); +x_109 = l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop(x_1, x_2, x_3, x_4, x_108, x_6, x_7, x_8, x_9, x_10, x_11); +if (lean_obj_tag(x_109) == 0) +{ +uint8_t x_110; +x_110 = !lean_is_exclusive(x_109); +if (x_110 == 0) +{ +lean_object* x_111; lean_object* x_112; +x_111 = lean_ctor_get(x_109, 0); +x_112 = l_Lean_mkMData(x_107, x_111); +lean_ctor_set(x_109, 0, x_112); +return x_109; +} +else +{ +lean_object* x_113; lean_object* x_114; lean_object* x_115; lean_object* x_116; +x_113 = lean_ctor_get(x_109, 0); +x_114 = lean_ctor_get(x_109, 1); +lean_inc(x_114); +lean_inc(x_113); +lean_dec(x_109); +x_115 = l_Lean_mkMData(x_107, x_113); +x_116 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_116, 0, x_115); +lean_ctor_set(x_116, 1, x_114); +return x_116; +} +} +else +{ +uint8_t x_117; +lean_dec(x_107); +x_117 = !lean_is_exclusive(x_109); +if (x_117 == 0) +{ +return x_109; +} +else +{ +lean_object* x_118; lean_object* x_119; lean_object* x_120; +x_118 = lean_ctor_get(x_109, 0); +x_119 = lean_ctor_get(x_109, 1); +lean_inc(x_119); +lean_inc(x_118); +lean_dec(x_109); +x_120 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_120, 0, x_118); +lean_ctor_set(x_120, 1, x_119); +return x_120; +} +} +} +case 11: +{ +lean_object* x_121; lean_object* x_122; lean_object* x_123; lean_object* x_124; +x_121 = lean_ctor_get(x_5, 0); +lean_inc(x_121); +x_122 = lean_ctor_get(x_5, 1); +lean_inc(x_122); +x_123 = lean_ctor_get(x_5, 2); +lean_inc(x_123); +lean_dec(x_5); +x_124 = l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop(x_1, x_2, x_3, x_4, x_123, x_6, x_7, x_8, x_9, x_10, x_11); +if (lean_obj_tag(x_124) == 0) +{ +uint8_t x_125; +x_125 = !lean_is_exclusive(x_124); +if (x_125 == 0) +{ +lean_object* x_126; lean_object* x_127; +x_126 = lean_ctor_get(x_124, 0); +x_127 = l_Lean_mkProj(x_121, x_122, x_126); +lean_ctor_set(x_124, 0, x_127); +return x_124; +} +else +{ +lean_object* x_128; lean_object* x_129; lean_object* x_130; lean_object* x_131; +x_128 = lean_ctor_get(x_124, 0); +x_129 = lean_ctor_get(x_124, 1); +lean_inc(x_129); +lean_inc(x_128); +lean_dec(x_124); +x_130 = l_Lean_mkProj(x_121, x_122, x_128); +x_131 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_131, 0, x_130); +lean_ctor_set(x_131, 1, x_129); +return x_131; +} +} +else +{ +uint8_t x_132; +lean_dec(x_122); +lean_dec(x_121); +x_132 = !lean_is_exclusive(x_124); +if (x_132 == 0) +{ +return x_124; +} +else +{ +lean_object* x_133; lean_object* x_134; lean_object* x_135; +x_133 = lean_ctor_get(x_124, 0); +x_134 = lean_ctor_get(x_124, 1); +lean_inc(x_134); +lean_inc(x_133); +lean_dec(x_124); +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; +} +} +} +default: +{ +lean_object* x_136; +lean_dec(x_6); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +x_136 = l_Lean_Elab_Structural_ensureNoRecFn(x_1, x_5, x_7, x_8, x_9, x_10, x_11); +return x_136; +} +} +} +} +lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___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) { +_start: +{ +size_t x_14; size_t x_15; lean_object* x_16; +x_14 = lean_unbox_usize(x_5); +lean_dec(x_5); +x_15 = lean_unbox_usize(x_6); +lean_dec(x_6); +x_16 = l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__1(x_1, x_2, x_3, x_4, x_14, x_15, x_7, x_8, x_9, x_10, x_11, x_12, x_13); +return x_16; +} +} +lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___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) { +_start: +{ +size_t x_14; size_t x_15; lean_object* x_16; +x_14 = lean_unbox_usize(x_5); +lean_dec(x_5); +x_15 = lean_unbox_usize(x_6); +lean_dec(x_6); +x_16 = l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__3(x_1, x_2, x_3, x_4, x_14, x_15, x_7, x_8, x_9, x_10, x_11, x_12, x_13); +return x_16; +} +} +lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__5___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: +{ +size_t x_14; size_t x_15; lean_object* x_16; +x_14 = lean_unbox_usize(x_5); +lean_dec(x_5); +x_15 = lean_unbox_usize(x_6); +lean_dec(x_6); +x_16 = l_Array_mapMUnsafe_map___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__5(x_1, x_2, x_3, x_4, x_14, x_15, x_7, x_8, x_9, x_10, x_11, x_12, x_13); +return x_16; +} +} +lean_object* l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__7___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_addTrace___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__7(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); +return x_9; +} +} +lean_object* l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__8___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___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__8(x_1, x_2, x_3, x_4, x_5, x_6, x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +return x_8; +} +} +lean_object* l_Lean_Meta_withLocalDecl___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__9___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10) { +_start: +{ +uint8_t x_11; lean_object* x_12; +x_11 = lean_unbox(x_2); +lean_dec(x_2); +x_12 = l_Lean_Meta_withLocalDecl___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__9___rarg(x_1, x_11, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10); +return x_12; +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___lambda__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) { +_start: +{ +lean_object* x_13; +x_13 = l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___lambda__3(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_12); +lean_dec(x_1); +return x_13; +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___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, lean_object* x_11, lean_object* x_12) { +_start: +{ +lean_object* x_13; +x_13 = l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___lambda__4(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_12); +lean_dec(x_1); +return x_13; +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps(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; lean_object* x_13; lean_object* x_14; +x_11 = lean_ctor_get(x_8, 0); +lean_inc(x_11); +x_12 = l_Lean_Meta_IndPredBelow_maxBackwardChainingDepth; +x_13 = l_Lean_Option_get___at_Lean_initFn____x40_Lean_Util_PPExt___hyg_218____spec__1(x_11, x_12); +lean_dec(x_11); +x_14 = l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop(x_1, x_2, x_3, x_13, x_4, x_5, x_6, x_7, x_8, x_9, x_10); +return x_14; +} +} +lean_object* l_Lean_Meta_forallBoundedTelescope___at_Lean_Elab_Structural_mkIndPredBRecOn___spec__1___rarg___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) { +_start: +{ +lean_object* x_10; +x_10 = lean_apply_8(x_1, x_3, x_4, x_2, x_5, x_6, x_7, x_8, x_9); +return x_10; +} +} +lean_object* l_Lean_Meta_forallBoundedTelescope___at_Lean_Elab_Structural_mkIndPredBRecOn___spec__1___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9) { +_start: +{ +lean_object* x_10; lean_object* x_11; +x_10 = lean_alloc_closure((void*)(l_Lean_Meta_forallBoundedTelescope___at_Lean_Elab_Structural_mkIndPredBRecOn___spec__1___rarg___lambda__1), 9, 2); +lean_closure_set(x_10, 0, x_3); +lean_closure_set(x_10, 1, x_4); +x_11 = l___private_Lean_Meta_Basic_0__Lean_Meta_forallTelescopeReducingAux___rarg(x_1, x_2, x_10, x_5, x_6, x_7, x_8, x_9); +if (lean_obj_tag(x_11) == 0) +{ +uint8_t x_12; +x_12 = !lean_is_exclusive(x_11); +if (x_12 == 0) +{ +return x_11; +} +else +{ +lean_object* x_13; lean_object* x_14; lean_object* x_15; +x_13 = lean_ctor_get(x_11, 0); +x_14 = lean_ctor_get(x_11, 1); +lean_inc(x_14); +lean_inc(x_13); +lean_dec(x_11); +x_15 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_15, 0, x_13); +lean_ctor_set(x_15, 1, x_14); +return x_15; +} +} +else +{ +uint8_t x_16; +x_16 = !lean_is_exclusive(x_11); +if (x_16 == 0) +{ +return x_11; +} +else +{ +lean_object* x_17; lean_object* x_18; lean_object* 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_alloc_ctor(1, 2, 0); +lean_ctor_set(x_19, 0, x_17); +lean_ctor_set(x_19, 1, x_18); +return x_19; +} +} +} +} +lean_object* l_Lean_Meta_forallBoundedTelescope___at_Lean_Elab_Structural_mkIndPredBRecOn___spec__1(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_Lean_Meta_forallBoundedTelescope___at_Lean_Elab_Structural_mkIndPredBRecOn___spec__1___rarg), 9, 0); +return x_2; +} +} +lean_object* l_Array_foldlMUnsafe_fold___at_Lean_Elab_Structural_mkIndPredBRecOn___spec__2(lean_object* x_1, lean_object* x_2, lean_object* x_3, size_t x_4, size_t x_5, lean_object* x_6) { +_start: +{ +uint8_t x_7; +x_7 = x_4 == x_5; +if (x_7 == 0) +{ +lean_object* x_8; uint8_t x_9; size_t x_10; size_t x_11; +x_8 = lean_array_uget(x_3, x_4); +x_9 = lean_expr_eqv(x_8, x_2); +x_10 = 1; +x_11 = x_4 + x_10; +if (x_9 == 0) +{ +lean_object* x_12; uint8_t x_13; +x_12 = lean_ctor_get(x_1, 7); +x_13 = l_Array_contains___at_Lean_Meta_getElimInfo___spec__4(x_12, x_8); +if (x_13 == 0) +{ +lean_object* x_14; +x_14 = lean_array_push(x_6, x_8); +x_4 = x_11; +x_6 = x_14; +goto _start; +} +else +{ +lean_dec(x_8); +x_4 = x_11; +goto _start; +} +} +else +{ +lean_dec(x_8); +x_4 = x_11; +goto _start; +} +} +else +{ +return x_6; +} +} +} +lean_object* l_Lean_Elab_Structural_mkIndPredBRecOn___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) { +_start: +{ +lean_object* x_11; lean_object* x_12; +x_11 = lean_unsigned_to_nat(0u); +lean_inc(x_9); +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_6); +x_12 = l___private_Lean_Meta_Basic_0__Lean_Meta_instantiateForallAux(x_1, x_11, x_2, x_6, x_7, x_8, x_9, x_10); +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; +x_13 = lean_ctor_get(x_12, 0); +lean_inc(x_13); +x_14 = lean_ctor_get(x_12, 1); +lean_inc(x_14); +lean_dec(x_12); +x_15 = l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___lambda__3___closed__1; +x_16 = lean_array_push(x_15, x_3); +x_17 = l___private_Lean_Meta_Basic_0__Lean_Meta_instantiateForallAux(x_16, x_11, x_13, x_6, x_7, x_8, x_9, x_14); +lean_dec(x_16); +return x_17; +} +else +{ +uint8_t x_18; +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_3); +x_18 = !lean_is_exclusive(x_12); +if (x_18 == 0) +{ +return x_12; +} +else +{ +lean_object* x_19; lean_object* x_20; lean_object* x_21; +x_19 = lean_ctor_get(x_12, 0); +x_20 = lean_ctor_get(x_12, 1); +lean_inc(x_20); +lean_inc(x_19); +lean_dec(x_12); +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; +} +} +} +} +static lean_object* _init_l_Lean_Elab_Structural_mkIndPredBRecOn___lambda__2___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("FType: "); +return x_1; +} +} +static lean_object* _init_l_Lean_Elab_Structural_mkIndPredBRecOn___lambda__2___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Elab_Structural_mkIndPredBRecOn___lambda__2___closed__1; +x_2 = l_Lean_stringToMessageData(x_1); +return x_2; +} +} +lean_object* l_Lean_Elab_Structural_mkIndPredBRecOn___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) { +_start: +{ +lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; +lean_dec(x_5); +x_12 = l_Lean_instInhabitedExpr; +x_13 = lean_unsigned_to_nat(0u); +x_14 = lean_array_get(x_12, x_4, x_13); +lean_dec(x_4); +lean_inc(x_10); +lean_inc(x_9); +lean_inc(x_8); +lean_inc(x_7); +x_15 = lean_infer_type(x_14, x_7, x_8, x_9, x_10, x_11); +if (lean_obj_tag(x_15) == 0) +{ +lean_object* x_16; lean_object* x_17; uint8_t x_18; lean_object* x_19; lean_object* x_32; lean_object* x_33; lean_object* x_34; uint8_t x_35; +x_16 = lean_ctor_get(x_15, 0); +lean_inc(x_16); +x_17 = lean_ctor_get(x_15, 1); +lean_inc(x_17); +lean_dec(x_15); +x_32 = lean_st_ref_get(x_10, x_17); +x_33 = lean_ctor_get(x_32, 0); +lean_inc(x_33); +x_34 = lean_ctor_get(x_33, 3); +lean_inc(x_34); +lean_dec(x_33); +x_35 = lean_ctor_get_uint8(x_34, sizeof(void*)*1); +lean_dec(x_34); +if (x_35 == 0) +{ +lean_object* x_36; uint8_t x_37; +x_36 = lean_ctor_get(x_32, 1); +lean_inc(x_36); +lean_dec(x_32); +x_37 = 0; +x_18 = x_37; +x_19 = x_36; +goto block_31; +} +else +{ +lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; uint8_t x_42; +x_38 = lean_ctor_get(x_32, 1); +lean_inc(x_38); +lean_dec(x_32); +lean_inc(x_3); +x_39 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__8(x_3, x_6, x_7, x_8, x_9, x_10, x_38); +x_40 = lean_ctor_get(x_39, 0); +lean_inc(x_40); +x_41 = lean_ctor_get(x_39, 1); +lean_inc(x_41); +lean_dec(x_39); +x_42 = lean_unbox(x_40); +lean_dec(x_40); +x_18 = x_42; +x_19 = x_41; +goto block_31; +} +block_31: +{ +if (x_18 == 0) +{ +lean_object* x_20; lean_object* x_21; +lean_dec(x_3); +x_20 = lean_box(0); +x_21 = l_Lean_Elab_Structural_mkIndPredBRecOn___lambda__1(x_1, x_16, x_2, x_20, x_6, x_7, x_8, x_9, x_10, x_19); +lean_dec(x_6); +return x_21; +} +else +{ +lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; +lean_inc(x_16); +x_22 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_22, 0, x_16); +x_23 = l_Lean_Elab_Structural_mkIndPredBRecOn___lambda__2___closed__2; +x_24 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_24, 0, x_23); +lean_ctor_set(x_24, 1, x_22); +x_25 = l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___closed__4; +x_26 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_26, 0, x_24); +lean_ctor_set(x_26, 1, x_25); +x_27 = l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__7(x_3, x_26, x_6, x_7, x_8, x_9, x_10, x_19); +x_28 = lean_ctor_get(x_27, 0); +lean_inc(x_28); +x_29 = lean_ctor_get(x_27, 1); +lean_inc(x_29); +lean_dec(x_27); +x_30 = l_Lean_Elab_Structural_mkIndPredBRecOn___lambda__1(x_1, x_16, x_2, x_28, x_6, x_7, x_8, x_9, x_10, x_29); +lean_dec(x_6); +lean_dec(x_28); +return x_30; +} +} +} +else +{ +uint8_t x_43; +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_3); +lean_dec(x_2); +x_43 = !lean_is_exclusive(x_15); +if (x_43 == 0) +{ +return x_15; +} +else +{ +lean_object* x_44; lean_object* x_45; lean_object* x_46; +x_44 = lean_ctor_get(x_15, 0); +x_45 = lean_ctor_get(x_15, 1); +lean_inc(x_45); +lean_inc(x_44); +lean_dec(x_15); +x_46 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_46, 0, x_44); +lean_ctor_set(x_46, 1, x_45); +return x_46; +} +} +} +} +static lean_object* _init_l_Lean_Elab_Structural_mkIndPredBRecOn___lambda__3___closed__1() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = lean_unsigned_to_nat(2u); +x_2 = lean_mk_empty_array_with_capacity(x_1); +return x_2; +} +} +lean_object* l_Lean_Elab_Structural_mkIndPredBRecOn___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_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, lean_object* x_17) { +_start: +{ +lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; +x_18 = lean_box(0); +lean_inc(x_13); +x_19 = l_Lean_Meta_mkFreshExprSyntheticOpaqueMVar(x_1, x_18, x_13, x_14, x_15, x_16, x_17); +x_20 = lean_ctor_get(x_19, 1); +lean_inc(x_20); +lean_dec(x_19); +x_21 = l_Lean_instInhabitedExpr; +x_22 = lean_unsigned_to_nat(0u); +x_23 = lean_array_get(x_21, x_10, x_22); +lean_inc(x_16); +lean_inc(x_15); +lean_inc(x_14); +lean_inc(x_13); +x_24 = l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps(x_2, x_3, x_4, x_5, x_12, x_13, x_14, x_15, x_16, x_20); +if (lean_obj_tag(x_24) == 0) +{ +lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; uint8_t x_32; uint8_t x_33; lean_object* x_34; +x_25 = lean_ctor_get(x_24, 0); +lean_inc(x_25); +x_26 = lean_ctor_get(x_24, 1); +lean_inc(x_26); +lean_dec(x_24); +x_27 = l_Lean_Elab_Structural_mkIndPredBRecOn___lambda__3___closed__1; +x_28 = lean_array_push(x_27, x_6); +x_29 = lean_array_push(x_28, x_23); +x_30 = l_Array_append___rarg(x_7, x_29); +lean_inc(x_8); +x_31 = l_Array_append___rarg(x_30, x_8); +x_32 = 0; +x_33 = 1; +x_34 = l_Lean_Meta_mkLambdaFVars(x_31, x_25, x_32, x_33, x_13, x_14, x_15, x_16, x_26); +lean_dec(x_16); +lean_dec(x_15); +lean_dec(x_14); +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; lean_object* x_38; +x_36 = lean_ctor_get(x_34, 0); +x_37 = l_Lean_mkApp(x_9, x_36); +x_38 = l_Lean_mkAppN(x_37, x_8); +lean_ctor_set(x_34, 0, x_38); +return x_34; +} +else +{ +lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; +x_39 = lean_ctor_get(x_34, 0); +x_40 = lean_ctor_get(x_34, 1); +lean_inc(x_40); +lean_inc(x_39); +lean_dec(x_34); +x_41 = l_Lean_mkApp(x_9, x_39); +x_42 = l_Lean_mkAppN(x_41, x_8); +x_43 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_43, 0, x_42); +lean_ctor_set(x_43, 1, x_40); +return x_43; +} +} +else +{ +uint8_t x_44; +lean_dec(x_9); +lean_dec(x_8); +x_44 = !lean_is_exclusive(x_34); +if (x_44 == 0) +{ +return x_34; +} +else +{ +lean_object* x_45; lean_object* x_46; lean_object* x_47; +x_45 = lean_ctor_get(x_34, 0); +x_46 = lean_ctor_get(x_34, 1); +lean_inc(x_46); +lean_inc(x_45); +lean_dec(x_34); +x_47 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_47, 0, x_45); +lean_ctor_set(x_47, 1, x_46); +return x_47; +} +} +} +else +{ +uint8_t x_48; +lean_dec(x_23); +lean_dec(x_16); +lean_dec(x_15); +lean_dec(x_14); +lean_dec(x_13); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +x_48 = !lean_is_exclusive(x_24); +if (x_48 == 0) +{ +return x_24; +} +else +{ +lean_object* x_49; lean_object* x_50; lean_object* x_51; +x_49 = lean_ctor_get(x_24, 0); +x_50 = lean_ctor_get(x_24, 1); +lean_inc(x_50); +lean_inc(x_49); +lean_dec(x_24); +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; +} +} +} +} +static lean_object* _init_l_Lean_Elab_Structural_mkIndPredBRecOn___lambda__4___closed__1() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = lean_unsigned_to_nat(1u); +x_2 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* l_Lean_Elab_Structural_mkIndPredBRecOn___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, lean_object* x_11, lean_object* x_12, lean_object* x_13, lean_object* x_14, lean_object* x_15, lean_object* x_16, lean_object* x_17) { +_start: +{ +lean_object* x_18; lean_object* x_19; lean_object* x_20; +lean_inc(x_2); +lean_inc(x_1); +x_18 = lean_alloc_closure((void*)(l_Lean_Elab_Structural_mkIndPredBRecOn___lambda__2___boxed), 11, 3); +lean_closure_set(x_18, 0, x_1); +lean_closure_set(x_18, 1, x_2); +lean_closure_set(x_18, 2, x_3); +x_19 = l_Lean_Elab_Structural_mkIndPredBRecOn___lambda__4___closed__1; +lean_inc(x_16); +lean_inc(x_15); +lean_inc(x_14); +lean_inc(x_13); +lean_inc(x_12); +x_20 = l_Lean_Meta_forallBoundedTelescope___at_Lean_Elab_Structural_mkIndPredBRecOn___spec__1___rarg(x_4, x_19, x_18, x_12, x_13, x_14, x_15, x_16, x_17); +if (lean_obj_tag(x_20) == 0) +{ +lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; +x_21 = lean_ctor_get(x_20, 0); +lean_inc(x_21); +x_22 = lean_ctor_get(x_20, 1); +lean_inc(x_22); +lean_dec(x_20); +lean_inc(x_21); +x_23 = lean_alloc_closure((void*)(l_Lean_Elab_Structural_mkIndPredBRecOn___lambda__3___boxed), 17, 9); +lean_closure_set(x_23, 0, x_21); +lean_closure_set(x_23, 1, x_5); +lean_closure_set(x_23, 2, x_6); +lean_closure_set(x_23, 3, x_7); +lean_closure_set(x_23, 4, x_8); +lean_closure_set(x_23, 5, x_2); +lean_closure_set(x_23, 6, x_1); +lean_closure_set(x_23, 7, x_9); +lean_closure_set(x_23, 8, x_10); +x_24 = l_Lean_Meta_forallBoundedTelescope___at_Lean_Elab_Structural_mkIndPredBRecOn___spec__1___rarg(x_21, x_19, x_23, x_12, x_13, x_14, x_15, x_16, x_22); +return x_24; +} +else +{ +uint8_t x_25; +lean_dec(x_16); +lean_dec(x_15); +lean_dec(x_14); +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_2); +lean_dec(x_1); +x_25 = !lean_is_exclusive(x_20); +if (x_25 == 0) +{ +return x_20; +} +else +{ +lean_object* x_26; lean_object* x_27; lean_object* x_28; +x_26 = lean_ctor_get(x_20, 0); +x_27 = lean_ctor_get(x_20, 1); +lean_inc(x_27); +lean_inc(x_26); +lean_dec(x_20); +x_28 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_28, 0, x_26); +lean_ctor_set(x_28, 1, x_27); +return x_28; +} +} +} +} +static lean_object* _init_l_Lean_Elab_Structural_mkIndPredBRecOn___lambda__5___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("brecOnType "); +return x_1; +} +} +static lean_object* _init_l_Lean_Elab_Structural_mkIndPredBRecOn___lambda__5___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Elab_Structural_mkIndPredBRecOn___lambda__5___closed__1; +x_2 = l_Lean_stringToMessageData(x_1); +return x_2; +} +} +lean_object* l_Lean_Elab_Structural_mkIndPredBRecOn___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, 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, lean_object* x_17) { +_start: +{ +uint8_t x_18; lean_object* x_19; lean_object* x_32; lean_object* x_33; lean_object* x_34; uint8_t x_35; +lean_dec(x_11); +x_32 = lean_st_ref_get(x_16, x_17); +x_33 = lean_ctor_get(x_32, 0); +lean_inc(x_33); +x_34 = lean_ctor_get(x_33, 3); +lean_inc(x_34); +lean_dec(x_33); +x_35 = lean_ctor_get_uint8(x_34, sizeof(void*)*1); +lean_dec(x_34); +if (x_35 == 0) +{ +lean_object* x_36; uint8_t x_37; +x_36 = lean_ctor_get(x_32, 1); +lean_inc(x_36); +lean_dec(x_32); +x_37 = 0; +x_18 = x_37; +x_19 = x_36; +goto block_31; +} +else +{ +lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; uint8_t x_42; +x_38 = lean_ctor_get(x_32, 1); +lean_inc(x_38); +lean_dec(x_32); +lean_inc(x_3); +x_39 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__8(x_3, x_12, x_13, x_14, x_15, x_16, x_38); +x_40 = lean_ctor_get(x_39, 0); +lean_inc(x_40); +x_41 = lean_ctor_get(x_39, 1); +lean_inc(x_41); +lean_dec(x_39); +x_42 = lean_unbox(x_40); +lean_dec(x_40); +x_18 = x_42; +x_19 = x_41; +goto block_31; +} +block_31: +{ +if (x_18 == 0) +{ +lean_object* x_20; lean_object* x_21; +x_20 = lean_box(0); +x_21 = l_Lean_Elab_Structural_mkIndPredBRecOn___lambda__4(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_20, x_12, x_13, x_14, x_15, x_16, x_19); +return x_21; +} +else +{ +lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; +lean_inc(x_4); +x_22 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_22, 0, x_4); +x_23 = l_Lean_Elab_Structural_mkIndPredBRecOn___lambda__5___closed__2; +x_24 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_24, 0, x_23); +lean_ctor_set(x_24, 1, x_22); +x_25 = l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___closed__4; +x_26 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_26, 0, x_24); +lean_ctor_set(x_26, 1, x_25); +lean_inc(x_3); +x_27 = l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__7(x_3, x_26, x_12, x_13, x_14, x_15, x_16, x_19); +x_28 = lean_ctor_get(x_27, 0); +lean_inc(x_28); +x_29 = lean_ctor_get(x_27, 1); +lean_inc(x_29); +lean_dec(x_27); +x_30 = l_Lean_Elab_Structural_mkIndPredBRecOn___lambda__4(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_28, x_12, x_13, x_14, x_15, x_16, x_29); +lean_dec(x_28); +return x_30; +} +} +} +} +static lean_object* _init_l_Lean_Elab_Structural_mkIndPredBRecOn___lambda__6___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("brecOn "); +return x_1; +} +} +static lean_object* _init_l_Lean_Elab_Structural_mkIndPredBRecOn___lambda__6___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Elab_Structural_mkIndPredBRecOn___lambda__6___closed__1; +x_2 = l_Lean_stringToMessageData(x_1); +return x_2; +} +} +lean_object* l_Lean_Elab_Structural_mkIndPredBRecOn___lambda__6(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: +{ +lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; +lean_dec(x_9); +x_16 = lean_ctor_get(x_1, 4); +lean_inc(x_16); +x_17 = l_Lean_brecOnSuffix; +x_18 = lean_name_mk_string(x_16, x_17); +x_19 = lean_ctor_get(x_1, 5); +lean_inc(x_19); +x_20 = l_Lean_mkConst(x_18, x_19); +x_21 = lean_ctor_get(x_1, 6); +lean_inc(x_21); +x_22 = l_Lean_mkAppN(x_20, x_21); +lean_inc(x_2); +x_23 = l_Lean_mkApp(x_22, x_2); +lean_inc(x_3); +x_24 = l_Lean_mkAppN(x_23, x_3); +lean_inc(x_4); +x_25 = l_Lean_mkApp(x_24, x_4); +lean_inc(x_14); +lean_inc(x_13); +lean_inc(x_12); +lean_inc(x_11); +lean_inc(x_25); +x_26 = l_Lean_Meta_check(x_25, x_11, x_12, x_13, x_14, x_15); +if (lean_obj_tag(x_26) == 0) +{ +lean_object* x_27; lean_object* x_28; +x_27 = lean_ctor_get(x_26, 1); +lean_inc(x_27); +lean_dec(x_26); +lean_inc(x_14); +lean_inc(x_13); +lean_inc(x_12); +lean_inc(x_11); +lean_inc(x_25); +x_28 = lean_infer_type(x_25, x_11, x_12, x_13, x_14, x_27); +if (lean_obj_tag(x_28) == 0) +{ +lean_object* x_29; lean_object* x_30; uint8_t x_31; lean_object* x_32; lean_object* x_45; lean_object* x_46; lean_object* x_47; uint8_t x_48; +x_29 = lean_ctor_get(x_28, 0); +lean_inc(x_29); +x_30 = lean_ctor_get(x_28, 1); +lean_inc(x_30); +lean_dec(x_28); +x_45 = lean_st_ref_get(x_14, x_30); +x_46 = lean_ctor_get(x_45, 0); +lean_inc(x_46); +x_47 = lean_ctor_get(x_46, 3); +lean_inc(x_47); +lean_dec(x_46); +x_48 = lean_ctor_get_uint8(x_47, sizeof(void*)*1); +lean_dec(x_47); +if (x_48 == 0) +{ +lean_object* x_49; uint8_t x_50; +x_49 = lean_ctor_get(x_45, 1); +lean_inc(x_49); +lean_dec(x_45); +x_50 = 0; +x_31 = x_50; +x_32 = x_49; +goto block_44; +} +else +{ +lean_object* x_51; lean_object* x_52; lean_object* x_53; lean_object* x_54; uint8_t x_55; +x_51 = lean_ctor_get(x_45, 1); +lean_inc(x_51); +lean_dec(x_45); +lean_inc(x_5); +x_52 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__8(x_5, x_10, x_11, x_12, x_13, x_14, x_51); +x_53 = lean_ctor_get(x_52, 0); +lean_inc(x_53); +x_54 = lean_ctor_get(x_52, 1); +lean_inc(x_54); +lean_dec(x_52); +x_55 = lean_unbox(x_53); +lean_dec(x_53); +x_31 = x_55; +x_32 = x_54; +goto block_44; +} +block_44: +{ +if (x_31 == 0) +{ +lean_object* x_33; lean_object* x_34; +x_33 = lean_box(0); +x_34 = l_Lean_Elab_Structural_mkIndPredBRecOn___lambda__5(x_3, x_4, x_5, x_29, x_6, x_1, x_2, x_7, x_8, x_25, x_33, x_10, x_11, x_12, x_13, x_14, x_32); +return x_34; +} +else +{ +lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; +lean_inc(x_25); +x_35 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_35, 0, x_25); +x_36 = l_Lean_Elab_Structural_mkIndPredBRecOn___lambda__6___closed__2; +x_37 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_37, 0, x_36); +lean_ctor_set(x_37, 1, x_35); +x_38 = l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___closed__4; +x_39 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_39, 0, x_37); +lean_ctor_set(x_39, 1, x_38); +lean_inc(x_5); +x_40 = l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__7(x_5, x_39, x_10, x_11, x_12, x_13, x_14, x_32); +x_41 = lean_ctor_get(x_40, 0); +lean_inc(x_41); +x_42 = lean_ctor_get(x_40, 1); +lean_inc(x_42); +lean_dec(x_40); +x_43 = l_Lean_Elab_Structural_mkIndPredBRecOn___lambda__5(x_3, x_4, x_5, x_29, x_6, x_1, x_2, x_7, x_8, x_25, x_41, x_10, x_11, x_12, x_13, x_14, x_42); +return x_43; +} +} +} +else +{ +uint8_t x_56; +lean_dec(x_25); +lean_dec(x_14); +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_10); +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_56 = !lean_is_exclusive(x_28); +if (x_56 == 0) +{ +return x_28; +} +else +{ +lean_object* x_57; lean_object* x_58; lean_object* x_59; +x_57 = lean_ctor_get(x_28, 0); +x_58 = lean_ctor_get(x_28, 1); +lean_inc(x_58); +lean_inc(x_57); +lean_dec(x_28); +x_59 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_59, 0, x_57); +lean_ctor_set(x_59, 1, x_58); +return x_59; +} +} +} +else +{ +uint8_t x_60; +lean_dec(x_25); +lean_dec(x_14); +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_10); +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_60 = !lean_is_exclusive(x_26); +if (x_60 == 0) +{ +return x_26; +} +else +{ +lean_object* x_61; lean_object* x_62; lean_object* x_63; +x_61 = lean_ctor_get(x_26, 0); +x_62 = lean_ctor_get(x_26, 1); +lean_inc(x_62); +lean_inc(x_61); +lean_dec(x_26); +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; +} +} +} +} +static lean_object* _init_l_Lean_Elab_Structural_mkIndPredBRecOn___lambda__7___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("brecOn motive: "); +return x_1; +} +} +static lean_object* _init_l_Lean_Elab_Structural_mkIndPredBRecOn___lambda__7___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Elab_Structural_mkIndPredBRecOn___lambda__7___closed__1; +x_2 = l_Lean_stringToMessageData(x_1); +return x_2; +} +} +lean_object* l_Lean_Elab_Structural_mkIndPredBRecOn___lambda__7(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: +{ +uint8_t x_15; uint8_t x_16; lean_object* x_17; +lean_dec(x_8); +x_15 = 0; +x_16 = 1; +lean_inc(x_10); +lean_inc(x_1); +x_17 = l_Lean_Meta_mkForallFVars(x_1, x_2, x_15, x_16, x_10, x_11, x_12, x_13, x_14); +if (lean_obj_tag(x_17) == 0) +{ +lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; +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 = lean_ctor_get(x_3, 7); +lean_inc(x_20); +lean_inc(x_4); +lean_inc(x_20); +x_21 = lean_array_push(x_20, x_4); +lean_inc(x_10); +x_22 = l_Lean_Meta_mkLambdaFVars(x_21, x_18, x_15, x_16, x_10, x_11, x_12, x_13, x_19); +if (lean_obj_tag(x_22) == 0) +{ +lean_object* x_23; lean_object* x_24; uint8_t x_25; lean_object* x_26; lean_object* x_39; lean_object* x_40; lean_object* x_41; uint8_t x_42; +x_23 = lean_ctor_get(x_22, 0); +lean_inc(x_23); +x_24 = lean_ctor_get(x_22, 1); +lean_inc(x_24); +lean_dec(x_22); +x_39 = lean_st_ref_get(x_13, x_24); +x_40 = lean_ctor_get(x_39, 0); +lean_inc(x_40); +x_41 = lean_ctor_get(x_40, 3); +lean_inc(x_41); +lean_dec(x_40); +x_42 = lean_ctor_get_uint8(x_41, sizeof(void*)*1); +lean_dec(x_41); +if (x_42 == 0) +{ +lean_object* x_43; +x_43 = lean_ctor_get(x_39, 1); +lean_inc(x_43); +lean_dec(x_39); +x_25 = x_15; +x_26 = x_43; +goto block_38; +} +else +{ +lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; uint8_t x_48; +x_44 = lean_ctor_get(x_39, 1); +lean_inc(x_44); +lean_dec(x_39); +lean_inc(x_5); +x_45 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__8(x_5, x_9, x_10, x_11, x_12, x_13, x_44); +x_46 = lean_ctor_get(x_45, 0); +lean_inc(x_46); +x_47 = lean_ctor_get(x_45, 1); +lean_inc(x_47); +lean_dec(x_45); +x_48 = lean_unbox(x_46); +lean_dec(x_46); +x_25 = x_48; +x_26 = x_47; +goto block_38; +} +block_38: +{ +if (x_25 == 0) +{ +lean_object* x_27; lean_object* x_28; +x_27 = lean_box(0); +x_28 = l_Lean_Elab_Structural_mkIndPredBRecOn___lambda__6(x_3, x_23, x_20, x_4, x_5, x_6, x_7, x_1, x_27, x_9, x_10, x_11, x_12, x_13, x_26); +return x_28; +} +else +{ +lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; +lean_inc(x_23); +x_29 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_29, 0, x_23); +x_30 = l_Lean_Elab_Structural_mkIndPredBRecOn___lambda__7___closed__2; +x_31 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_31, 0, x_30); +lean_ctor_set(x_31, 1, x_29); +x_32 = l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___closed__4; +x_33 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_33, 0, x_31); +lean_ctor_set(x_33, 1, x_32); +lean_inc(x_5); +x_34 = l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__7(x_5, x_33, x_9, x_10, x_11, x_12, x_13, x_26); +x_35 = lean_ctor_get(x_34, 0); +lean_inc(x_35); +x_36 = lean_ctor_get(x_34, 1); +lean_inc(x_36); +lean_dec(x_34); +x_37 = l_Lean_Elab_Structural_mkIndPredBRecOn___lambda__6(x_3, x_23, x_20, x_4, x_5, x_6, x_7, x_1, x_35, x_9, x_10, x_11, x_12, x_13, x_36); +return x_37; +} +} +} +else +{ +uint8_t x_49; +lean_dec(x_20); +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +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_49 = !lean_is_exclusive(x_22); +if (x_49 == 0) +{ +return x_22; +} +else +{ +lean_object* x_50; lean_object* x_51; lean_object* x_52; +x_50 = lean_ctor_get(x_22, 0); +x_51 = lean_ctor_get(x_22, 1); +lean_inc(x_51); +lean_inc(x_50); +lean_dec(x_22); +x_52 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_52, 0, x_50); +lean_ctor_set(x_52, 1, x_51); +return x_52; +} +} +} +else +{ +uint8_t x_53; +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +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_53 = !lean_is_exclusive(x_17); +if (x_53 == 0) +{ +return x_17; +} +else +{ +lean_object* x_54; lean_object* x_55; lean_object* x_56; +x_54 = lean_ctor_get(x_17, 0); +x_55 = lean_ctor_get(x_17, 1); +lean_inc(x_55); +lean_inc(x_54); +lean_dec(x_17); +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; +} +} +} +} +static lean_object* _init_l_Lean_Elab_Structural_mkIndPredBRecOn___closed__1() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = lean_unsigned_to_nat(0u); +x_2 = lean_mk_empty_array_with_capacity(x_1); +return x_2; +} +} +static lean_object* _init_l_Lean_Elab_Structural_mkIndPredBRecOn___closed__2() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("fixedParams: "); +return x_1; +} +} +static lean_object* _init_l_Lean_Elab_Structural_mkIndPredBRecOn___closed__3() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Elab_Structural_mkIndPredBRecOn___closed__2; +x_2 = l_Lean_stringToMessageData(x_1); +return x_2; +} +} +static lean_object* _init_l_Lean_Elab_Structural_mkIndPredBRecOn___closed__4() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string(", otherArgs: "); +return x_1; +} +} +static lean_object* _init_l_Lean_Elab_Structural_mkIndPredBRecOn___closed__5() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Elab_Structural_mkIndPredBRecOn___closed__4; +x_2 = l_Lean_stringToMessageData(x_1); +return x_2; +} +} +lean_object* l_Lean_Elab_Structural_mkIndPredBRecOn(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 = lean_infer_type(x_3, 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; 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; lean_object* x_23; +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_Expr_headBeta(x_11); +x_14 = lean_ctor_get(x_2, 1); +lean_inc(x_14); +x_15 = lean_ctor_get(x_2, 2); +lean_inc(x_15); +x_16 = l_Lean_instInhabitedExpr; +x_17 = lean_array_get(x_16, x_14, x_15); +lean_dec(x_15); +x_18 = lean_array_get_size(x_14); +x_19 = lean_unsigned_to_nat(0u); +x_20 = lean_nat_dec_lt(x_19, x_18); +x_21 = l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___closed__6; +x_22 = lean_st_ref_get(x_8, x_12); +if (x_20 == 0) +{ +lean_object* x_59; +lean_dec(x_18); +lean_dec(x_14); +x_59 = l_Lean_Elab_Structural_mkIndPredBRecOn___closed__1; +x_23 = x_59; +goto block_58; +} +else +{ +uint8_t x_60; +x_60 = lean_nat_dec_le(x_18, x_18); +if (x_60 == 0) +{ +lean_object* x_61; +lean_dec(x_18); +lean_dec(x_14); +x_61 = l_Lean_Elab_Structural_mkIndPredBRecOn___closed__1; +x_23 = x_61; +goto block_58; +} +else +{ +size_t x_62; size_t x_63; lean_object* x_64; lean_object* x_65; +x_62 = 0; +x_63 = lean_usize_of_nat(x_18); +lean_dec(x_18); +x_64 = l_Lean_Elab_Structural_mkIndPredBRecOn___closed__1; +x_65 = l_Array_foldlMUnsafe_fold___at_Lean_Elab_Structural_mkIndPredBRecOn___spec__2(x_2, x_17, x_14, x_62, x_63, x_64); +lean_dec(x_14); +x_23 = x_65; +goto block_58; +} +} +block_58: +{ +uint8_t x_24; lean_object* x_25; lean_object* x_48; lean_object* x_49; uint8_t x_50; +x_48 = lean_ctor_get(x_22, 0); +lean_inc(x_48); +x_49 = lean_ctor_get(x_48, 3); +lean_inc(x_49); +lean_dec(x_48); +x_50 = lean_ctor_get_uint8(x_49, sizeof(void*)*1); +lean_dec(x_49); +if (x_50 == 0) +{ +lean_object* x_51; uint8_t x_52; +x_51 = lean_ctor_get(x_22, 1); +lean_inc(x_51); +lean_dec(x_22); +x_52 = 0; +x_24 = x_52; +x_25 = x_51; +goto block_47; +} +else +{ +lean_object* x_53; lean_object* x_54; lean_object* x_55; lean_object* x_56; uint8_t x_57; +x_53 = lean_ctor_get(x_22, 1); +lean_inc(x_53); +lean_dec(x_22); +x_54 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__8(x_21, x_4, x_5, x_6, x_7, x_8, x_53); +x_55 = lean_ctor_get(x_54, 0); +lean_inc(x_55); +x_56 = lean_ctor_get(x_54, 1); +lean_inc(x_56); +lean_dec(x_54); +x_57 = lean_unbox(x_55); +lean_dec(x_55); +x_24 = x_57; +x_25 = x_56; +goto block_47; +} +block_47: +{ +if (x_24 == 0) +{ +lean_object* x_26; lean_object* x_27; +x_26 = lean_box(0); +x_27 = l_Lean_Elab_Structural_mkIndPredBRecOn___lambda__7(x_23, x_13, x_2, x_17, x_21, x_1, x_3, x_26, x_4, x_5, x_6, x_7, x_8, x_25); +return x_27; +} +else +{ +lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; +x_28 = lean_ctor_get(x_2, 0); +lean_inc(x_28); +x_29 = lean_array_to_list(lean_box(0), x_28); +x_30 = lean_box(0); +x_31 = l_List_mapTRAux___at_Lean_MessageData_instCoeListExprMessageData___spec__1(x_29, x_30); +x_32 = l_Lean_MessageData_ofList(x_31); +lean_dec(x_31); +x_33 = l_Lean_Elab_Structural_mkIndPredBRecOn___closed__3; +x_34 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_34, 0, x_33); +lean_ctor_set(x_34, 1, x_32); +x_35 = l_Lean_Elab_Structural_mkIndPredBRecOn___closed__5; +x_36 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_36, 0, x_34); +lean_ctor_set(x_36, 1, x_35); +lean_inc(x_23); +x_37 = lean_array_to_list(lean_box(0), x_23); +x_38 = l_List_mapTRAux___at_Lean_MessageData_instCoeListExprMessageData___spec__1(x_37, x_30); +x_39 = l_Lean_MessageData_ofList(x_38); +lean_dec(x_38); +x_40 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_40, 0, x_36); +lean_ctor_set(x_40, 1, x_39); +x_41 = l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___closed__4; +x_42 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_42, 0, x_40); +lean_ctor_set(x_42, 1, x_41); +x_43 = l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__7(x_21, x_42, x_4, x_5, x_6, x_7, x_8, x_25); +x_44 = lean_ctor_get(x_43, 0); +lean_inc(x_44); +x_45 = lean_ctor_get(x_43, 1); +lean_inc(x_45); +lean_dec(x_43); +x_46 = l_Lean_Elab_Structural_mkIndPredBRecOn___lambda__7(x_23, x_13, x_2, x_17, x_21, x_1, x_3, x_44, x_4, x_5, x_6, x_7, x_8, x_45); +return x_46; +} +} +} +} +else +{ +uint8_t x_66; +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_66 = !lean_is_exclusive(x_10); +if (x_66 == 0) +{ +return x_10; +} +else +{ +lean_object* x_67; lean_object* x_68; lean_object* x_69; +x_67 = lean_ctor_get(x_10, 0); +x_68 = lean_ctor_get(x_10, 1); +lean_inc(x_68); +lean_inc(x_67); +lean_dec(x_10); +x_69 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_69, 0, x_67); +lean_ctor_set(x_69, 1, x_68); +return x_69; +} +} +} +} +lean_object* l_Array_foldlMUnsafe_fold___at_Lean_Elab_Structural_mkIndPredBRecOn___spec__2___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { +_start: +{ +size_t x_7; size_t x_8; lean_object* x_9; +x_7 = lean_unbox_usize(x_4); +lean_dec(x_4); +x_8 = lean_unbox_usize(x_5); +lean_dec(x_5); +x_9 = l_Array_foldlMUnsafe_fold___at_Lean_Elab_Structural_mkIndPredBRecOn___spec__2(x_1, x_2, x_3, x_7, x_8, x_6); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +return x_9; +} +} +lean_object* l_Lean_Elab_Structural_mkIndPredBRecOn___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) { +_start: +{ +lean_object* x_11; +x_11 = l_Lean_Elab_Structural_mkIndPredBRecOn___lambda__1(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_1); +return x_11; +} +} +lean_object* l_Lean_Elab_Structural_mkIndPredBRecOn___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) { +_start: +{ +lean_object* x_12; +x_12 = l_Lean_Elab_Structural_mkIndPredBRecOn___lambda__2(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_1); +return x_12; +} +} +lean_object* l_Lean_Elab_Structural_mkIndPredBRecOn___lambda__3___boxed(lean_object** _args) { +lean_object* x_1 = _args[0]; +lean_object* x_2 = _args[1]; +lean_object* x_3 = _args[2]; +lean_object* x_4 = _args[3]; +lean_object* x_5 = _args[4]; +lean_object* x_6 = _args[5]; +lean_object* x_7 = _args[6]; +lean_object* x_8 = _args[7]; +lean_object* x_9 = _args[8]; +lean_object* x_10 = _args[9]; +lean_object* x_11 = _args[10]; +lean_object* x_12 = _args[11]; +lean_object* x_13 = _args[12]; +lean_object* x_14 = _args[13]; +lean_object* x_15 = _args[14]; +lean_object* x_16 = _args[15]; +lean_object* x_17 = _args[16]; +_start: +{ +lean_object* x_18; +x_18 = l_Lean_Elab_Structural_mkIndPredBRecOn___lambda__3(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_12, x_13, x_14, x_15, x_16, x_17); +lean_dec(x_11); +lean_dec(x_10); +return x_18; +} +} +lean_object* l_Lean_Elab_Structural_mkIndPredBRecOn___lambda__4___boxed(lean_object** _args) { +lean_object* x_1 = _args[0]; +lean_object* x_2 = _args[1]; +lean_object* x_3 = _args[2]; +lean_object* x_4 = _args[3]; +lean_object* x_5 = _args[4]; +lean_object* x_6 = _args[5]; +lean_object* x_7 = _args[6]; +lean_object* x_8 = _args[7]; +lean_object* x_9 = _args[8]; +lean_object* x_10 = _args[9]; +lean_object* x_11 = _args[10]; +lean_object* x_12 = _args[11]; +lean_object* x_13 = _args[12]; +lean_object* x_14 = _args[13]; +lean_object* x_15 = _args[14]; +lean_object* x_16 = _args[15]; +lean_object* x_17 = _args[16]; +_start: +{ +lean_object* x_18; +x_18 = l_Lean_Elab_Structural_mkIndPredBRecOn___lambda__4(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_12, x_13, x_14, x_15, x_16, x_17); +lean_dec(x_11); +return x_18; +} +} +lean_object* l_Lean_Elab_Structural_mkIndPredBRecOn___lambda__5___boxed(lean_object** _args) { +lean_object* x_1 = _args[0]; +lean_object* x_2 = _args[1]; +lean_object* x_3 = _args[2]; +lean_object* x_4 = _args[3]; +lean_object* x_5 = _args[4]; +lean_object* x_6 = _args[5]; +lean_object* x_7 = _args[6]; +lean_object* x_8 = _args[7]; +lean_object* x_9 = _args[8]; +lean_object* x_10 = _args[9]; +lean_object* x_11 = _args[10]; +lean_object* x_12 = _args[11]; +lean_object* x_13 = _args[12]; +lean_object* x_14 = _args[13]; +lean_object* x_15 = _args[14]; +lean_object* x_16 = _args[15]; +lean_object* x_17 = _args[16]; +_start: +{ +lean_object* x_18; +x_18 = l_Lean_Elab_Structural_mkIndPredBRecOn___lambda__5(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_12, x_13, x_14, x_15, x_16, x_17); +return x_18; +} +} +lean_object* initialize_Init(lean_object*); +lean_object* initialize_Lean_Meta_IndPredBelow(lean_object*); +lean_object* initialize_Lean_Elab_PreDefinition_Basic(lean_object*); +lean_object* initialize_Lean_Elab_PreDefinition_Structural_Basic(lean_object*); +static bool _G_initialized = false; +lean_object* initialize_Lean_Elab_PreDefinition_Structural_IndPred(lean_object* w) { +lean_object * res; +if (_G_initialized) return lean_io_result_mk_ok(lean_box(0)); +_G_initialized = true; +res = initialize_Init(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); +res = initialize_Lean_Meta_IndPredBelow(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); +res = initialize_Lean_Elab_PreDefinition_Basic(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); +res = initialize_Lean_Elab_PreDefinition_Structural_Basic(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); +l_Lean_Meta_matchMatcherApp_x3f___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___spec__1___closed__1 = _init_l_Lean_Meta_matchMatcherApp_x3f___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___spec__1___closed__1(); +lean_mark_persistent(l_Lean_Meta_matchMatcherApp_x3f___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___spec__1___closed__1); +l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___closed__1 = _init_l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___closed__1(); +lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___closed__1); +l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___closed__2 = _init_l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___closed__2(); +lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___closed__2); +l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___closed__3 = _init_l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___closed__3(); +lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___closed__3); +l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___closed__4 = _init_l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___closed__4(); +lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop_addBelow___closed__4); +l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__2___closed__1 = _init_l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__2___closed__1(); +lean_mark_persistent(l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__2___closed__1); +l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__2___closed__2 = _init_l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__2___closed__2(); +lean_mark_persistent(l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__2___closed__2); +l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__2___boxed__const__1 = _init_l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__2___boxed__const__1(); +lean_mark_persistent(l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__2___boxed__const__1); +l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__4___boxed__const__1 = _init_l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__4___boxed__const__1(); +lean_mark_persistent(l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__4___boxed__const__1); +l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__6___boxed__const__1 = _init_l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__6___boxed__const__1(); +lean_mark_persistent(l_Lean_Expr_withAppAux___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__6___boxed__const__1); +l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__7___closed__1 = _init_l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__7___closed__1(); +lean_mark_persistent(l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__7___closed__1); +l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__7___closed__2 = _init_l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__7___closed__2(); +lean_mark_persistent(l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__7___closed__2); +l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__7___closed__3 = _init_l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__7___closed__3(); +lean_mark_persistent(l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__7___closed__3); +l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__7___closed__4 = _init_l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__7___closed__4(); +lean_mark_persistent(l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__7___closed__4); +l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__7___closed__5 = _init_l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__7___closed__5(); +lean_mark_persistent(l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__7___closed__5); +l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__7___closed__6 = _init_l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__7___closed__6(); +lean_mark_persistent(l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__7___closed__6); +l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___lambda__2___closed__1 = _init_l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___lambda__2___closed__1(); +lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___lambda__2___closed__1); +l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___lambda__2___closed__2 = _init_l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___lambda__2___closed__2(); +lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___lambda__2___closed__2); +l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___lambda__2___closed__3 = _init_l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___lambda__2___closed__3(); +lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___lambda__2___closed__3); +l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___lambda__2___closed__4 = _init_l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___lambda__2___closed__4(); +lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___lambda__2___closed__4); +l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___lambda__3___closed__1 = _init_l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___lambda__3___closed__1(); +lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___lambda__3___closed__1); +l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___closed__1 = _init_l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___closed__1(); +lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___closed__1); +l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___closed__2 = _init_l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___closed__2(); +lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___closed__2); +l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___closed__3 = _init_l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___closed__3(); +lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___closed__3); +l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___closed__4 = _init_l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___closed__4(); +lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___closed__4); +l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___closed__5 = _init_l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___closed__5(); +lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___closed__5); +l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___closed__6 = _init_l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___closed__6(); +lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___closed__6); +l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___closed__7 = _init_l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___closed__7(); +lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___closed__7); +l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___closed__8 = _init_l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___closed__8(); +lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___closed__8); +l_Lean_Elab_Structural_mkIndPredBRecOn___lambda__2___closed__1 = _init_l_Lean_Elab_Structural_mkIndPredBRecOn___lambda__2___closed__1(); +lean_mark_persistent(l_Lean_Elab_Structural_mkIndPredBRecOn___lambda__2___closed__1); +l_Lean_Elab_Structural_mkIndPredBRecOn___lambda__2___closed__2 = _init_l_Lean_Elab_Structural_mkIndPredBRecOn___lambda__2___closed__2(); +lean_mark_persistent(l_Lean_Elab_Structural_mkIndPredBRecOn___lambda__2___closed__2); +l_Lean_Elab_Structural_mkIndPredBRecOn___lambda__3___closed__1 = _init_l_Lean_Elab_Structural_mkIndPredBRecOn___lambda__3___closed__1(); +lean_mark_persistent(l_Lean_Elab_Structural_mkIndPredBRecOn___lambda__3___closed__1); +l_Lean_Elab_Structural_mkIndPredBRecOn___lambda__4___closed__1 = _init_l_Lean_Elab_Structural_mkIndPredBRecOn___lambda__4___closed__1(); +lean_mark_persistent(l_Lean_Elab_Structural_mkIndPredBRecOn___lambda__4___closed__1); +l_Lean_Elab_Structural_mkIndPredBRecOn___lambda__5___closed__1 = _init_l_Lean_Elab_Structural_mkIndPredBRecOn___lambda__5___closed__1(); +lean_mark_persistent(l_Lean_Elab_Structural_mkIndPredBRecOn___lambda__5___closed__1); +l_Lean_Elab_Structural_mkIndPredBRecOn___lambda__5___closed__2 = _init_l_Lean_Elab_Structural_mkIndPredBRecOn___lambda__5___closed__2(); +lean_mark_persistent(l_Lean_Elab_Structural_mkIndPredBRecOn___lambda__5___closed__2); +l_Lean_Elab_Structural_mkIndPredBRecOn___lambda__6___closed__1 = _init_l_Lean_Elab_Structural_mkIndPredBRecOn___lambda__6___closed__1(); +lean_mark_persistent(l_Lean_Elab_Structural_mkIndPredBRecOn___lambda__6___closed__1); +l_Lean_Elab_Structural_mkIndPredBRecOn___lambda__6___closed__2 = _init_l_Lean_Elab_Structural_mkIndPredBRecOn___lambda__6___closed__2(); +lean_mark_persistent(l_Lean_Elab_Structural_mkIndPredBRecOn___lambda__6___closed__2); +l_Lean_Elab_Structural_mkIndPredBRecOn___lambda__7___closed__1 = _init_l_Lean_Elab_Structural_mkIndPredBRecOn___lambda__7___closed__1(); +lean_mark_persistent(l_Lean_Elab_Structural_mkIndPredBRecOn___lambda__7___closed__1); +l_Lean_Elab_Structural_mkIndPredBRecOn___lambda__7___closed__2 = _init_l_Lean_Elab_Structural_mkIndPredBRecOn___lambda__7___closed__2(); +lean_mark_persistent(l_Lean_Elab_Structural_mkIndPredBRecOn___lambda__7___closed__2); +l_Lean_Elab_Structural_mkIndPredBRecOn___closed__1 = _init_l_Lean_Elab_Structural_mkIndPredBRecOn___closed__1(); +lean_mark_persistent(l_Lean_Elab_Structural_mkIndPredBRecOn___closed__1); +l_Lean_Elab_Structural_mkIndPredBRecOn___closed__2 = _init_l_Lean_Elab_Structural_mkIndPredBRecOn___closed__2(); +lean_mark_persistent(l_Lean_Elab_Structural_mkIndPredBRecOn___closed__2); +l_Lean_Elab_Structural_mkIndPredBRecOn___closed__3 = _init_l_Lean_Elab_Structural_mkIndPredBRecOn___closed__3(); +lean_mark_persistent(l_Lean_Elab_Structural_mkIndPredBRecOn___closed__3); +l_Lean_Elab_Structural_mkIndPredBRecOn___closed__4 = _init_l_Lean_Elab_Structural_mkIndPredBRecOn___closed__4(); +lean_mark_persistent(l_Lean_Elab_Structural_mkIndPredBRecOn___closed__4); +l_Lean_Elab_Structural_mkIndPredBRecOn___closed__5 = _init_l_Lean_Elab_Structural_mkIndPredBRecOn___closed__5(); +lean_mark_persistent(l_Lean_Elab_Structural_mkIndPredBRecOn___closed__5); +return lean_io_result_mk_ok(lean_box(0)); +} +#ifdef __cplusplus +} +#endif diff --git a/stage0/stdlib/Lean/Elab/PreDefinition/Structural/Main.c b/stage0/stdlib/Lean/Elab/PreDefinition/Structural/Main.c new file mode 100644 index 0000000000..b052c21be8 --- /dev/null +++ b/stage0/stdlib/Lean/Elab/PreDefinition/Structural/Main.c @@ -0,0 +1,2801 @@ +// Lean compiler output +// Module: Lean.Elab.PreDefinition.Structural.Main +// Imports: Init Lean.Elab.PreDefinition.Structural.Basic Lean.Elab.PreDefinition.Structural.FindRecArg Lean.Elab.PreDefinition.Structural.Preprocess Lean.Elab.PreDefinition.Structural.BRecOn Lean.Elab.PreDefinition.Structural.IndPred Lean.Elab.PreDefinition.Structural.Eqns Lean.Elab.PreDefinition.Structural.SmartUnfolding +#include +#if defined(__clang__) +#pragma clang diagnostic ignored "-Wunused-parameter" +#pragma clang diagnostic ignored "-Wunused-label" +#elif defined(__GNUC__) && !defined(__CLANG__) +#pragma GCC diagnostic ignored "-Wunused-parameter" +#pragma GCC diagnostic ignored "-Wunused-label" +#pragma GCC diagnostic ignored "-Wunused-but-set-variable" +#endif +#ifdef __cplusplus +extern "C" { +#endif +lean_object* l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +size_t l_USize_add(size_t, size_t); +lean_object* l_Lean_registerTraceClass(lean_object*, lean_object*); +lean_object* l_Lean_stringToMessageData(lean_object*); +lean_object* l_Lean_Elab_addAsAxiom(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* lean_mk_empty_array_with_capacity(lean_object*); +lean_object* l_Lean_mkSort(lean_object*); +lean_object* l_Lean_setEnv___at___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___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___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__6___closed__7; +lean_object* lean_name_mk_string(lean_object*, lean_object*); +uint8_t l_USize_decEq(size_t, size_t); +lean_object* lean_array_uget(lean_object*, size_t); +lean_object* l_Array_foldlMUnsafe_fold___at_Lean_Elab_Structural_structuralRecursion___spec__1(lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__6___closed__5; +lean_object* l_Lean_Elab_Structural_structuralRecursion(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__6___closed__3; +lean_object* l_Lean_Elab_Structural_initFn____x40_Lean_Elab_PreDefinition_Structural_Main___hyg_737_(lean_object*); +static lean_object* l_Lean_Elab_Structural_structuralRecursion___lambda__1___closed__1; +lean_object* lean_st_ref_get(lean_object*, lean_object*); +lean_object* l_Lean_Elab_Structural_mkIndPredBRecOn(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +uint8_t l_Lean_Expr_isAppOf(lean_object*, lean_object*); +lean_object* l_Array_toSubarray___rarg(lean_object*, lean_object*, lean_object*); +lean_object* lean_array_get_size(lean_object*); +lean_object* l_Lean_MessageData_ofList(lean_object*); +lean_object* l_Lean_Elab_Structural_structuralRecursion_match__1___rarg(lean_object*, lean_object*); +uint8_t l_USize_decLt(size_t, size_t); +extern lean_object* l_Lean_levelZero; +lean_object* lean_nat_add(lean_object*, lean_object*); +lean_object* l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_getFixedPrefix___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_getFixedPrefix_match__1___rarg(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_throwError___at_Lean_Elab_Term_throwErrorIfErrors___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_getFixedPrefix(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__5___closed__1; +lean_object* l___private_Lean_Expr_0__Lean_Expr_getAppArgsAux(lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_getFixedPrefix_match__2(lean_object*); +lean_object* l_List_mapTRAux___at_Lean_MessageData_instCoeListExprMessageData___spec__1(lean_object*, lean_object*); +lean_object* lean_array_fget(lean_object*, lean_object*); +uint8_t lean_nat_dec_eq(lean_object*, lean_object*); +lean_object* l_Lean_Elab_Structural_findRecArg_loop___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___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_st_ref_take(lean_object*, lean_object*); +lean_object* lean_nat_sub(lean_object*, lean_object*); +lean_object* l_Array_foldlMUnsafe_fold___at_Lean_Elab_Structural_structuralRecursion___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* l_Lean_Elab_Structural_structuralRecursion___lambda__1(lean_object*); +lean_object* l_Lean_Elab_Structural_preprocess(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_lambdaTelescope___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__13___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_addNonRec(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* lean_array_get(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_mkLambdaFVars(lean_object*, lean_object*, uint8_t, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__6___closed__10; +lean_object* l_Nat_repr(lean_object*); +static lean_object* l_Lean_Elab_Structural_structuralRecursion___closed__3; +lean_object* l_Lean_setEnv___at___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Structural_ensureNoRecFn(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__2___closed__1; +lean_object* l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___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*); +extern lean_object* l_Lean_Elab_instInhabitedPreDefinition; +lean_object* lean_array_to_list(lean_object*, lean_object*); +static lean_object* l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__2___closed__2; +static lean_object* l_Lean_Elab_Structural_structuralRecursion___lambda__1___closed__2; +lean_object* l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_getFixedPrefix___spec__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___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__2___closed__4; +lean_object* l_Lean_Meta_mapErrorImp___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_getFixedPrefix___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___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_getFixedPrefix___lambda__2___closed__1; +size_t lean_usize_of_nat(lean_object*); +lean_object* l_Lean_Elab_addAndCompilePartialRec(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +extern lean_object* l_Lean_NameSet_empty; +static lean_object* l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_getFixedPrefix___spec__1___closed__1; +lean_object* l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_getFixedPrefix___lambda__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Structural_structuralRecursion_match__1(lean_object*); +lean_object* l_Lean_Elab_Structural_mkBRecOn(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_getFixedPrefix___spec__1(lean_object*, lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Expr_getAppNumArgsAux(lean_object*, lean_object*); +uint8_t lean_nat_dec_le(lean_object*, lean_object*); +lean_object* l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_getFixedPrefix_match__1(lean_object*); +lean_object* l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___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*); +static lean_object* l_Lean_Elab_Structural_structuralRecursion___closed__5; +static lean_object* l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__5___closed__2; +static lean_object* l_Lean_Elab_Structural_structuralRecursion___closed__4; +lean_object* lean_st_ref_set(lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_Elab_Structural_structuralRecursion___closed__2; +lean_object* l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_getFixedPrefix___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__4___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_isExprDefEq(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__6___closed__6; +lean_object* l_Lean_Meta_forEachExpr_x27(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_Elab_Structural_structuralRecursion___closed__1; +lean_object* lean_mk_array(lean_object*, lean_object*); +lean_object* l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__7(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_getFixedPrefix___lambda__2___closed__2; +lean_object* l_Lean_Elab_Structural_run___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_indentD(lean_object*); +lean_object* l_Lean_Elab_Structural_addSmartUnfoldingDef(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__6___closed__2; +lean_object* l_IO_mkRef___rarg(lean_object*, lean_object*); +lean_object* l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___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* l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___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*); +static lean_object* l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__6___closed__4; +lean_object* l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___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*); +static lean_object* l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__2___closed__3; +static lean_object* l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__6___closed__1; +lean_object* l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__6(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__8(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Structural_mkEqns(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__6___closed__8; +static lean_object* l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__6___closed__9; +lean_object* l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_getFixedPrefix_match__2___rarg(lean_object*, lean_object*, lean_object*); +uint8_t lean_nat_dec_lt(lean_object*, lean_object*); +lean_object* l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_getFixedPrefix_match__1___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +if (lean_obj_tag(x_1) == 0) +{ +lean_object* x_4; lean_object* x_5; +lean_dec(x_3); +x_4 = lean_box(0); +x_5 = lean_apply_1(x_2, x_4); +return x_5; +} +else +{ +lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; +lean_dec(x_2); +x_6 = lean_ctor_get(x_1, 0); +lean_inc(x_6); +lean_dec(x_1); +x_7 = lean_ctor_get(x_6, 0); +lean_inc(x_7); +x_8 = lean_ctor_get(x_6, 1); +lean_inc(x_8); +lean_dec(x_6); +x_9 = lean_apply_2(x_3, x_7, x_8); +return x_9; +} +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_getFixedPrefix_match__1(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_getFixedPrefix_match__1___rarg), 3, 0); +return x_2; +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_getFixedPrefix_match__2___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +if (lean_obj_tag(x_1) == 0) +{ +lean_object* x_4; lean_object* x_5; +lean_dec(x_3); +x_4 = lean_box(0); +x_5 = lean_apply_1(x_2, x_4); +return x_5; +} +else +{ +lean_object* x_6; lean_object* x_7; +lean_dec(x_2); +x_6 = lean_ctor_get(x_1, 0); +lean_inc(x_6); +lean_dec(x_1); +x_7 = lean_apply_1(x_3, x_6); +return x_7; +} +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_getFixedPrefix_match__2(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_getFixedPrefix_match__2___rarg), 3, 0); +return x_2; +} +} +static lean_object* _init_l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_getFixedPrefix___spec__1___closed__1() { +_start: +{ +uint8_t x_1; lean_object* x_2; lean_object* x_3; +x_1 = 1; +x_2 = lean_box(x_1); +x_3 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_3, 0, x_2); +return x_3; +} +} +lean_object* l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_getFixedPrefix___spec__1(lean_object* x_1, lean_object* x_2, size_t x_3, size_t 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; +x_11 = x_4 < x_3; +if (x_11 == 0) +{ +lean_object* x_12; +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_1); +x_12 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_12, 0, x_5); +lean_ctor_set(x_12, 1, x_10); +return x_12; +} +else +{ +lean_object* x_13; uint8_t x_14; +x_13 = lean_array_uget(x_2, x_4); +x_14 = !lean_is_exclusive(x_5); +if (x_14 == 0) +{ +lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; uint8_t x_20; +x_15 = lean_ctor_get(x_5, 1); +x_16 = lean_ctor_get(x_5, 0); +lean_dec(x_16); +x_17 = lean_ctor_get(x_15, 0); +lean_inc(x_17); +x_18 = lean_ctor_get(x_15, 1); +lean_inc(x_18); +x_19 = lean_ctor_get(x_15, 2); +lean_inc(x_19); +x_20 = lean_nat_dec_lt(x_18, x_19); +if (x_20 == 0) +{ +lean_object* x_21; +lean_dec(x_19); +lean_dec(x_18); +lean_dec(x_17); +lean_dec(x_13); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_ctor_set(x_5, 0, x_1); +x_21 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_21, 0, x_5); +lean_ctor_set(x_21, 1, x_10); +return x_21; +} +else +{ +uint8_t x_22; +x_22 = !lean_is_exclusive(x_15); +if (x_22 == 0) +{ +lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; uint8_t x_34; +x_23 = lean_ctor_get(x_15, 2); +lean_dec(x_23); +x_24 = lean_ctor_get(x_15, 1); +lean_dec(x_24); +x_25 = lean_ctor_get(x_15, 0); +lean_dec(x_25); +x_26 = lean_array_fget(x_17, x_18); +x_27 = lean_unsigned_to_nat(1u); +x_28 = lean_nat_add(x_18, x_27); +lean_dec(x_18); +lean_ctor_set(x_15, 1, x_28); +x_29 = lean_ctor_get(x_6, 0); +lean_inc(x_29); +x_30 = lean_ctor_get(x_6, 1); +lean_inc(x_30); +x_31 = lean_ctor_get(x_6, 2); +lean_inc(x_31); +x_32 = lean_ctor_get(x_6, 3); +lean_inc(x_32); +x_33 = lean_ctor_get(x_6, 4); +lean_inc(x_33); +x_34 = !lean_is_exclusive(x_29); +if (x_34 == 0) +{ +uint8_t x_35; uint8_t x_36; lean_object* x_37; lean_object* x_38; +x_35 = 2; +x_36 = 0; +lean_ctor_set_uint8(x_29, 5, x_35); +lean_ctor_set_uint8(x_29, 9, x_36); +x_37 = lean_alloc_ctor(0, 5, 0); +lean_ctor_set(x_37, 0, x_29); +lean_ctor_set(x_37, 1, x_30); +lean_ctor_set(x_37, 2, x_31); +lean_ctor_set(x_37, 3, x_32); +lean_ctor_set(x_37, 4, x_33); +lean_inc(x_9); +lean_inc(x_8); +lean_inc(x_7); +x_38 = l_Lean_Meta_isExprDefEq(x_13, x_26, x_37, x_7, x_8, x_9, x_10); +if (lean_obj_tag(x_38) == 0) +{ +lean_object* x_39; uint8_t x_40; +x_39 = lean_ctor_get(x_38, 0); +lean_inc(x_39); +x_40 = lean_unbox(x_39); +lean_dec(x_39); +if (x_40 == 0) +{ +uint8_t x_41; +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_1); +x_41 = !lean_is_exclusive(x_38); +if (x_41 == 0) +{ +lean_object* x_42; lean_object* x_43; +x_42 = lean_ctor_get(x_38, 0); +lean_dec(x_42); +x_43 = l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_getFixedPrefix___spec__1___closed__1; +lean_ctor_set(x_5, 0, x_43); +lean_ctor_set(x_38, 0, x_5); +return x_38; +} +else +{ +lean_object* x_44; lean_object* x_45; lean_object* x_46; +x_44 = lean_ctor_get(x_38, 1); +lean_inc(x_44); +lean_dec(x_38); +x_45 = l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_getFixedPrefix___spec__1___closed__1; +lean_ctor_set(x_5, 0, x_45); +x_46 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_46, 0, x_5); +lean_ctor_set(x_46, 1, x_44); +return x_46; +} +} +else +{ +lean_object* x_47; size_t x_48; size_t x_49; +x_47 = lean_ctor_get(x_38, 1); +lean_inc(x_47); +lean_dec(x_38); +lean_inc(x_1); +lean_ctor_set(x_5, 0, x_1); +x_48 = 1; +x_49 = x_4 + x_48; +x_4 = x_49; +x_10 = x_47; +goto _start; +} +} +else +{ +uint8_t x_51; +lean_dec(x_15); +lean_free_object(x_5); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_1); +x_51 = !lean_is_exclusive(x_38); +if (x_51 == 0) +{ +return x_38; +} +else +{ +lean_object* x_52; lean_object* x_53; lean_object* x_54; +x_52 = lean_ctor_get(x_38, 0); +x_53 = lean_ctor_get(x_38, 1); +lean_inc(x_53); +lean_inc(x_52); +lean_dec(x_38); +x_54 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_54, 0, x_52); +lean_ctor_set(x_54, 1, x_53); +return x_54; +} +} +} +else +{ +uint8_t x_55; uint8_t x_56; uint8_t x_57; uint8_t x_58; uint8_t x_59; uint8_t x_60; uint8_t x_61; uint8_t x_62; uint8_t x_63; uint8_t x_64; uint8_t x_65; uint8_t x_66; lean_object* x_67; lean_object* x_68; lean_object* x_69; +x_55 = lean_ctor_get_uint8(x_29, 0); +x_56 = lean_ctor_get_uint8(x_29, 1); +x_57 = lean_ctor_get_uint8(x_29, 2); +x_58 = lean_ctor_get_uint8(x_29, 3); +x_59 = lean_ctor_get_uint8(x_29, 4); +x_60 = lean_ctor_get_uint8(x_29, 6); +x_61 = lean_ctor_get_uint8(x_29, 7); +x_62 = lean_ctor_get_uint8(x_29, 8); +x_63 = lean_ctor_get_uint8(x_29, 10); +x_64 = lean_ctor_get_uint8(x_29, 11); +lean_dec(x_29); +x_65 = 2; +x_66 = 0; +x_67 = lean_alloc_ctor(0, 0, 12); +lean_ctor_set_uint8(x_67, 0, x_55); +lean_ctor_set_uint8(x_67, 1, x_56); +lean_ctor_set_uint8(x_67, 2, x_57); +lean_ctor_set_uint8(x_67, 3, x_58); +lean_ctor_set_uint8(x_67, 4, x_59); +lean_ctor_set_uint8(x_67, 5, x_65); +lean_ctor_set_uint8(x_67, 6, x_60); +lean_ctor_set_uint8(x_67, 7, x_61); +lean_ctor_set_uint8(x_67, 8, x_62); +lean_ctor_set_uint8(x_67, 9, x_66); +lean_ctor_set_uint8(x_67, 10, x_63); +lean_ctor_set_uint8(x_67, 11, x_64); +x_68 = lean_alloc_ctor(0, 5, 0); +lean_ctor_set(x_68, 0, x_67); +lean_ctor_set(x_68, 1, x_30); +lean_ctor_set(x_68, 2, x_31); +lean_ctor_set(x_68, 3, x_32); +lean_ctor_set(x_68, 4, x_33); +lean_inc(x_9); +lean_inc(x_8); +lean_inc(x_7); +x_69 = l_Lean_Meta_isExprDefEq(x_13, x_26, x_68, x_7, x_8, x_9, x_10); +if (lean_obj_tag(x_69) == 0) +{ +lean_object* x_70; uint8_t x_71; +x_70 = lean_ctor_get(x_69, 0); +lean_inc(x_70); +x_71 = lean_unbox(x_70); +lean_dec(x_70); +if (x_71 == 0) +{ +lean_object* x_72; lean_object* x_73; lean_object* x_74; lean_object* x_75; +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_1); +x_72 = lean_ctor_get(x_69, 1); +lean_inc(x_72); +if (lean_is_exclusive(x_69)) { + lean_ctor_release(x_69, 0); + lean_ctor_release(x_69, 1); + x_73 = x_69; +} else { + lean_dec_ref(x_69); + x_73 = lean_box(0); +} +x_74 = l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_getFixedPrefix___spec__1___closed__1; +lean_ctor_set(x_5, 0, x_74); +if (lean_is_scalar(x_73)) { + x_75 = lean_alloc_ctor(0, 2, 0); +} else { + x_75 = x_73; +} +lean_ctor_set(x_75, 0, x_5); +lean_ctor_set(x_75, 1, x_72); +return x_75; +} +else +{ +lean_object* x_76; size_t x_77; size_t x_78; +x_76 = lean_ctor_get(x_69, 1); +lean_inc(x_76); +lean_dec(x_69); +lean_inc(x_1); +lean_ctor_set(x_5, 0, x_1); +x_77 = 1; +x_78 = x_4 + x_77; +x_4 = x_78; +x_10 = x_76; +goto _start; +} +} +else +{ +lean_object* x_80; lean_object* x_81; lean_object* x_82; lean_object* x_83; +lean_dec(x_15); +lean_free_object(x_5); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_1); +x_80 = lean_ctor_get(x_69, 0); +lean_inc(x_80); +x_81 = lean_ctor_get(x_69, 1); +lean_inc(x_81); +if (lean_is_exclusive(x_69)) { + lean_ctor_release(x_69, 0); + lean_ctor_release(x_69, 1); + x_82 = x_69; +} else { + lean_dec_ref(x_69); + x_82 = lean_box(0); +} +if (lean_is_scalar(x_82)) { + x_83 = lean_alloc_ctor(1, 2, 0); +} else { + x_83 = x_82; +} +lean_ctor_set(x_83, 0, x_80); +lean_ctor_set(x_83, 1, x_81); +return x_83; +} +} +} +else +{ +lean_object* x_84; lean_object* x_85; lean_object* x_86; lean_object* x_87; lean_object* x_88; lean_object* x_89; lean_object* x_90; lean_object* x_91; lean_object* x_92; uint8_t x_93; uint8_t x_94; uint8_t x_95; uint8_t x_96; uint8_t x_97; uint8_t x_98; uint8_t x_99; uint8_t x_100; uint8_t x_101; uint8_t x_102; lean_object* x_103; uint8_t x_104; uint8_t x_105; lean_object* x_106; lean_object* x_107; lean_object* x_108; +lean_dec(x_15); +x_84 = lean_array_fget(x_17, x_18); +x_85 = lean_unsigned_to_nat(1u); +x_86 = lean_nat_add(x_18, x_85); +lean_dec(x_18); +x_87 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_87, 0, x_17); +lean_ctor_set(x_87, 1, x_86); +lean_ctor_set(x_87, 2, x_19); +x_88 = lean_ctor_get(x_6, 0); +lean_inc(x_88); +x_89 = lean_ctor_get(x_6, 1); +lean_inc(x_89); +x_90 = lean_ctor_get(x_6, 2); +lean_inc(x_90); +x_91 = lean_ctor_get(x_6, 3); +lean_inc(x_91); +x_92 = lean_ctor_get(x_6, 4); +lean_inc(x_92); +x_93 = lean_ctor_get_uint8(x_88, 0); +x_94 = lean_ctor_get_uint8(x_88, 1); +x_95 = lean_ctor_get_uint8(x_88, 2); +x_96 = lean_ctor_get_uint8(x_88, 3); +x_97 = lean_ctor_get_uint8(x_88, 4); +x_98 = lean_ctor_get_uint8(x_88, 6); +x_99 = lean_ctor_get_uint8(x_88, 7); +x_100 = lean_ctor_get_uint8(x_88, 8); +x_101 = lean_ctor_get_uint8(x_88, 10); +x_102 = lean_ctor_get_uint8(x_88, 11); +if (lean_is_exclusive(x_88)) { + x_103 = x_88; +} else { + lean_dec_ref(x_88); + x_103 = lean_box(0); +} +x_104 = 2; +x_105 = 0; +if (lean_is_scalar(x_103)) { + x_106 = lean_alloc_ctor(0, 0, 12); +} else { + x_106 = x_103; +} +lean_ctor_set_uint8(x_106, 0, x_93); +lean_ctor_set_uint8(x_106, 1, x_94); +lean_ctor_set_uint8(x_106, 2, x_95); +lean_ctor_set_uint8(x_106, 3, x_96); +lean_ctor_set_uint8(x_106, 4, x_97); +lean_ctor_set_uint8(x_106, 5, x_104); +lean_ctor_set_uint8(x_106, 6, x_98); +lean_ctor_set_uint8(x_106, 7, x_99); +lean_ctor_set_uint8(x_106, 8, x_100); +lean_ctor_set_uint8(x_106, 9, x_105); +lean_ctor_set_uint8(x_106, 10, x_101); +lean_ctor_set_uint8(x_106, 11, x_102); +x_107 = lean_alloc_ctor(0, 5, 0); +lean_ctor_set(x_107, 0, x_106); +lean_ctor_set(x_107, 1, x_89); +lean_ctor_set(x_107, 2, x_90); +lean_ctor_set(x_107, 3, x_91); +lean_ctor_set(x_107, 4, x_92); +lean_inc(x_9); +lean_inc(x_8); +lean_inc(x_7); +x_108 = l_Lean_Meta_isExprDefEq(x_13, x_84, x_107, x_7, x_8, x_9, x_10); +if (lean_obj_tag(x_108) == 0) +{ +lean_object* x_109; uint8_t x_110; +x_109 = lean_ctor_get(x_108, 0); +lean_inc(x_109); +x_110 = lean_unbox(x_109); +lean_dec(x_109); +if (x_110 == 0) +{ +lean_object* x_111; lean_object* x_112; lean_object* x_113; lean_object* x_114; +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_1); +x_111 = lean_ctor_get(x_108, 1); +lean_inc(x_111); +if (lean_is_exclusive(x_108)) { + lean_ctor_release(x_108, 0); + lean_ctor_release(x_108, 1); + x_112 = x_108; +} else { + lean_dec_ref(x_108); + x_112 = lean_box(0); +} +x_113 = l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_getFixedPrefix___spec__1___closed__1; +lean_ctor_set(x_5, 1, x_87); +lean_ctor_set(x_5, 0, x_113); +if (lean_is_scalar(x_112)) { + x_114 = lean_alloc_ctor(0, 2, 0); +} else { + x_114 = x_112; +} +lean_ctor_set(x_114, 0, x_5); +lean_ctor_set(x_114, 1, x_111); +return x_114; +} +else +{ +lean_object* x_115; size_t x_116; size_t x_117; +x_115 = lean_ctor_get(x_108, 1); +lean_inc(x_115); +lean_dec(x_108); +lean_inc(x_1); +lean_ctor_set(x_5, 1, x_87); +lean_ctor_set(x_5, 0, x_1); +x_116 = 1; +x_117 = x_4 + x_116; +x_4 = x_117; +x_10 = x_115; +goto _start; +} +} +else +{ +lean_object* x_119; lean_object* x_120; lean_object* x_121; lean_object* x_122; +lean_dec(x_87); +lean_free_object(x_5); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_1); +x_119 = lean_ctor_get(x_108, 0); +lean_inc(x_119); +x_120 = lean_ctor_get(x_108, 1); +lean_inc(x_120); +if (lean_is_exclusive(x_108)) { + lean_ctor_release(x_108, 0); + lean_ctor_release(x_108, 1); + x_121 = x_108; +} else { + lean_dec_ref(x_108); + x_121 = lean_box(0); +} +if (lean_is_scalar(x_121)) { + x_122 = lean_alloc_ctor(1, 2, 0); +} else { + x_122 = x_121; +} +lean_ctor_set(x_122, 0, x_119); +lean_ctor_set(x_122, 1, x_120); +return x_122; +} +} +} +} +else +{ +lean_object* x_123; lean_object* x_124; lean_object* x_125; lean_object* x_126; uint8_t x_127; +x_123 = lean_ctor_get(x_5, 1); +lean_inc(x_123); +lean_dec(x_5); +x_124 = lean_ctor_get(x_123, 0); +lean_inc(x_124); +x_125 = lean_ctor_get(x_123, 1); +lean_inc(x_125); +x_126 = lean_ctor_get(x_123, 2); +lean_inc(x_126); +x_127 = lean_nat_dec_lt(x_125, x_126); +if (x_127 == 0) +{ +lean_object* x_128; lean_object* x_129; +lean_dec(x_126); +lean_dec(x_125); +lean_dec(x_124); +lean_dec(x_13); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +x_128 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_128, 0, x_1); +lean_ctor_set(x_128, 1, x_123); +x_129 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_129, 0, x_128); +lean_ctor_set(x_129, 1, x_10); +return x_129; +} +else +{ +lean_object* x_130; lean_object* x_131; lean_object* x_132; lean_object* x_133; lean_object* x_134; lean_object* x_135; lean_object* x_136; lean_object* x_137; lean_object* x_138; lean_object* 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; uint8_t x_149; lean_object* x_150; uint8_t x_151; uint8_t x_152; lean_object* x_153; lean_object* x_154; lean_object* x_155; +if (lean_is_exclusive(x_123)) { + lean_ctor_release(x_123, 0); + lean_ctor_release(x_123, 1); + lean_ctor_release(x_123, 2); + x_130 = x_123; +} else { + lean_dec_ref(x_123); + x_130 = lean_box(0); +} +x_131 = lean_array_fget(x_124, x_125); +x_132 = lean_unsigned_to_nat(1u); +x_133 = lean_nat_add(x_125, x_132); +lean_dec(x_125); +if (lean_is_scalar(x_130)) { + x_134 = lean_alloc_ctor(0, 3, 0); +} else { + x_134 = x_130; +} +lean_ctor_set(x_134, 0, x_124); +lean_ctor_set(x_134, 1, x_133); +lean_ctor_set(x_134, 2, x_126); +x_135 = lean_ctor_get(x_6, 0); +lean_inc(x_135); +x_136 = lean_ctor_get(x_6, 1); +lean_inc(x_136); +x_137 = lean_ctor_get(x_6, 2); +lean_inc(x_137); +x_138 = lean_ctor_get(x_6, 3); +lean_inc(x_138); +x_139 = lean_ctor_get(x_6, 4); +lean_inc(x_139); +x_140 = lean_ctor_get_uint8(x_135, 0); +x_141 = lean_ctor_get_uint8(x_135, 1); +x_142 = lean_ctor_get_uint8(x_135, 2); +x_143 = lean_ctor_get_uint8(x_135, 3); +x_144 = lean_ctor_get_uint8(x_135, 4); +x_145 = lean_ctor_get_uint8(x_135, 6); +x_146 = lean_ctor_get_uint8(x_135, 7); +x_147 = lean_ctor_get_uint8(x_135, 8); +x_148 = lean_ctor_get_uint8(x_135, 10); +x_149 = lean_ctor_get_uint8(x_135, 11); +if (lean_is_exclusive(x_135)) { + x_150 = x_135; +} else { + lean_dec_ref(x_135); + x_150 = lean_box(0); +} +x_151 = 2; +x_152 = 0; +if (lean_is_scalar(x_150)) { + x_153 = lean_alloc_ctor(0, 0, 12); +} else { + x_153 = x_150; +} +lean_ctor_set_uint8(x_153, 0, x_140); +lean_ctor_set_uint8(x_153, 1, x_141); +lean_ctor_set_uint8(x_153, 2, x_142); +lean_ctor_set_uint8(x_153, 3, x_143); +lean_ctor_set_uint8(x_153, 4, x_144); +lean_ctor_set_uint8(x_153, 5, x_151); +lean_ctor_set_uint8(x_153, 6, x_145); +lean_ctor_set_uint8(x_153, 7, x_146); +lean_ctor_set_uint8(x_153, 8, x_147); +lean_ctor_set_uint8(x_153, 9, x_152); +lean_ctor_set_uint8(x_153, 10, x_148); +lean_ctor_set_uint8(x_153, 11, x_149); +x_154 = lean_alloc_ctor(0, 5, 0); +lean_ctor_set(x_154, 0, x_153); +lean_ctor_set(x_154, 1, x_136); +lean_ctor_set(x_154, 2, x_137); +lean_ctor_set(x_154, 3, x_138); +lean_ctor_set(x_154, 4, x_139); +lean_inc(x_9); +lean_inc(x_8); +lean_inc(x_7); +x_155 = l_Lean_Meta_isExprDefEq(x_13, x_131, x_154, x_7, x_8, x_9, x_10); +if (lean_obj_tag(x_155) == 0) +{ +lean_object* x_156; uint8_t x_157; +x_156 = lean_ctor_get(x_155, 0); +lean_inc(x_156); +x_157 = lean_unbox(x_156); +lean_dec(x_156); +if (x_157 == 0) +{ +lean_object* x_158; lean_object* x_159; lean_object* x_160; lean_object* x_161; lean_object* x_162; +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_1); +x_158 = lean_ctor_get(x_155, 1); +lean_inc(x_158); +if (lean_is_exclusive(x_155)) { + lean_ctor_release(x_155, 0); + lean_ctor_release(x_155, 1); + x_159 = x_155; +} else { + lean_dec_ref(x_155); + x_159 = lean_box(0); +} +x_160 = l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_getFixedPrefix___spec__1___closed__1; +x_161 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_161, 0, x_160); +lean_ctor_set(x_161, 1, x_134); +if (lean_is_scalar(x_159)) { + x_162 = lean_alloc_ctor(0, 2, 0); +} else { + x_162 = x_159; +} +lean_ctor_set(x_162, 0, x_161); +lean_ctor_set(x_162, 1, x_158); +return x_162; +} +else +{ +lean_object* x_163; lean_object* x_164; size_t x_165; size_t x_166; +x_163 = lean_ctor_get(x_155, 1); +lean_inc(x_163); +lean_dec(x_155); +lean_inc(x_1); +x_164 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_164, 0, x_1); +lean_ctor_set(x_164, 1, x_134); +x_165 = 1; +x_166 = x_4 + x_165; +x_4 = x_166; +x_5 = x_164; +x_10 = x_163; +goto _start; +} +} +else +{ +lean_object* x_168; lean_object* x_169; lean_object* x_170; lean_object* x_171; +lean_dec(x_134); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_1); +x_168 = lean_ctor_get(x_155, 0); +lean_inc(x_168); +x_169 = lean_ctor_get(x_155, 1); +lean_inc(x_169); +if (lean_is_exclusive(x_155)) { + lean_ctor_release(x_155, 0); + lean_ctor_release(x_155, 1); + x_170 = x_155; +} else { + lean_dec_ref(x_155); + x_170 = lean_box(0); +} +if (lean_is_scalar(x_170)) { + x_171 = lean_alloc_ctor(1, 2, 0); +} else { + x_171 = x_170; +} +lean_ctor_set(x_171, 0, x_168); +lean_ctor_set(x_171, 1, x_169); +return x_171; +} +} +} +} +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_getFixedPrefix___lambda__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { +_start: +{ +uint8_t x_7; lean_object* x_8; lean_object* x_9; +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_6); +return x_9; +} +} +static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_getFixedPrefix___lambda__2___closed__1() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_levelZero; +x_2 = l_Lean_mkSort(x_1); +return x_2; +} +} +static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_getFixedPrefix___lambda__2___closed__2() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_getFixedPrefix___lambda__1___boxed), 6, 0); +return x_1; +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_getFixedPrefix___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: +{ +uint8_t x_11; +x_11 = l_Lean_Expr_isAppOf(x_5, x_1); +if (x_11 == 0) +{ +uint8_t x_12; lean_object* x_13; lean_object* x_14; +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_3); +lean_dec(x_2); +x_12 = 1; +x_13 = lean_box(x_12); +x_14 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_14, 0, x_13); +lean_ctor_set(x_14, 1, x_10); +return x_14; +} +else +{ +lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_object* x_51; lean_object* x_52; uint8_t x_53; +x_15 = lean_unsigned_to_nat(0u); +x_16 = l_Lean_Expr_getAppNumArgsAux(x_5, x_15); +x_17 = l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_getFixedPrefix___lambda__2___closed__1; +lean_inc(x_16); +x_18 = lean_mk_array(x_16, x_17); +x_19 = lean_unsigned_to_nat(1u); +x_20 = lean_nat_sub(x_16, x_19); +lean_dec(x_16); +x_21 = l___private_Lean_Expr_0__Lean_Expr_getAppArgsAux(x_5, x_18, x_20); +x_47 = lean_st_ref_get(x_9, x_10); +x_48 = lean_ctor_get(x_47, 1); +lean_inc(x_48); +lean_dec(x_47); +x_49 = lean_st_ref_take(x_4, x_48); +x_50 = lean_ctor_get(x_49, 0); +lean_inc(x_50); +x_51 = lean_ctor_get(x_49, 1); +lean_inc(x_51); +lean_dec(x_49); +x_52 = lean_array_get_size(x_21); +x_53 = lean_nat_dec_lt(x_52, x_50); +if (x_53 == 0) +{ +lean_object* x_54; lean_object* x_55; +lean_dec(x_52); +x_54 = lean_st_ref_set(x_4, x_50, x_51); +x_55 = lean_ctor_get(x_54, 1); +lean_inc(x_55); +lean_dec(x_54); +x_22 = x_55; +goto block_46; +} +else +{ +lean_object* x_56; lean_object* x_57; +lean_dec(x_50); +x_56 = lean_st_ref_set(x_4, x_52, x_51); +x_57 = lean_ctor_get(x_56, 1); +lean_inc(x_57); +lean_dec(x_56); +x_22 = x_57; +goto block_46; +} +block_46: +{ +lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; size_t x_27; size_t x_28; lean_object* x_29; +x_23 = l_Array_toSubarray___rarg(x_2, x_15, x_3); +x_24 = lean_box(0); +x_25 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_25, 0, x_24); +lean_ctor_set(x_25, 1, x_23); +x_26 = lean_array_get_size(x_21); +x_27 = lean_usize_of_nat(x_26); +lean_dec(x_26); +x_28 = 0; +lean_inc(x_9); +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_6); +x_29 = l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_getFixedPrefix___spec__1(x_24, x_21, x_27, x_28, x_25, x_6, x_7, x_8, x_9, x_22); +lean_dec(x_21); +if (lean_obj_tag(x_29) == 0) +{ +lean_object* x_30; lean_object* x_31; +x_30 = lean_ctor_get(x_29, 0); +lean_inc(x_30); +x_31 = lean_ctor_get(x_30, 0); +lean_inc(x_31); +lean_dec(x_30); +if (lean_obj_tag(x_31) == 0) +{ +lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; +x_32 = lean_ctor_get(x_29, 1); +lean_inc(x_32); +lean_dec(x_29); +x_33 = l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_getFixedPrefix___lambda__2___closed__2; +x_34 = lean_box(0); +x_35 = lean_apply_6(x_33, x_34, x_6, x_7, x_8, x_9, x_32); +return x_35; +} +else +{ +uint8_t x_36; +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +x_36 = !lean_is_exclusive(x_29); +if (x_36 == 0) +{ +lean_object* x_37; lean_object* x_38; +x_37 = lean_ctor_get(x_29, 0); +lean_dec(x_37); +x_38 = lean_ctor_get(x_31, 0); +lean_inc(x_38); +lean_dec(x_31); +lean_ctor_set(x_29, 0, x_38); +return x_29; +} +else +{ +lean_object* x_39; lean_object* x_40; lean_object* x_41; +x_39 = lean_ctor_get(x_29, 1); +lean_inc(x_39); +lean_dec(x_29); +x_40 = lean_ctor_get(x_31, 0); +lean_inc(x_40); +lean_dec(x_31); +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_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +x_42 = !lean_is_exclusive(x_29); +if (x_42 == 0) +{ +return x_29; +} +else +{ +lean_object* x_43; lean_object* x_44; lean_object* x_45; +x_43 = lean_ctor_get(x_29, 0); +x_44 = lean_ctor_get(x_29, 1); +lean_inc(x_44); +lean_inc(x_43); +lean_dec(x_29); +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; +} +} +} +} +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_getFixedPrefix(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; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; +x_9 = lean_array_get_size(x_2); +x_10 = lean_st_ref_get(x_7, x_8); +x_11 = lean_ctor_get(x_10, 1); +lean_inc(x_11); +lean_dec(x_10); +lean_inc(x_9); +x_12 = l_IO_mkRef___rarg(x_9, x_11); +x_13 = lean_ctor_get(x_12, 0); +lean_inc(x_13); +x_14 = lean_ctor_get(x_12, 1); +lean_inc(x_14); +lean_dec(x_12); +lean_inc(x_13); +x_15 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_getFixedPrefix___lambda__2___boxed), 10, 4); +lean_closure_set(x_15, 0, x_1); +lean_closure_set(x_15, 1, x_2); +lean_closure_set(x_15, 2, x_9); +lean_closure_set(x_15, 3, x_13); +lean_inc(x_7); +x_16 = l_Lean_Meta_forEachExpr_x27(x_3, x_15, x_4, x_5, x_6, x_7, x_14); +if (lean_obj_tag(x_16) == 0) +{ +lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; uint8_t x_21; +x_17 = lean_ctor_get(x_16, 1); +lean_inc(x_17); +lean_dec(x_16); +x_18 = lean_st_ref_get(x_7, x_17); +lean_dec(x_7); +x_19 = lean_ctor_get(x_18, 1); +lean_inc(x_19); +lean_dec(x_18); +x_20 = lean_st_ref_get(x_13, x_19); +lean_dec(x_13); +x_21 = !lean_is_exclusive(x_20); +if (x_21 == 0) +{ +return x_20; +} +else +{ +lean_object* x_22; lean_object* x_23; lean_object* x_24; +x_22 = lean_ctor_get(x_20, 0); +x_23 = lean_ctor_get(x_20, 1); +lean_inc(x_23); +lean_inc(x_22); +lean_dec(x_20); +x_24 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_24, 0, x_22); +lean_ctor_set(x_24, 1, x_23); +return x_24; +} +} +else +{ +uint8_t x_25; +lean_dec(x_13); +lean_dec(x_7); +x_25 = !lean_is_exclusive(x_16); +if (x_25 == 0) +{ +return x_16; +} +else +{ +lean_object* x_26; lean_object* x_27; lean_object* x_28; +x_26 = lean_ctor_get(x_16, 0); +x_27 = lean_ctor_get(x_16, 1); +lean_inc(x_27); +lean_inc(x_26); +lean_dec(x_16); +x_28 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_28, 0, x_26); +lean_ctor_set(x_28, 1, x_27); +return x_28; +} +} +} +} +lean_object* l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_getFixedPrefix___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) { +_start: +{ +size_t x_11; size_t x_12; lean_object* x_13; +x_11 = lean_unbox_usize(x_3); +lean_dec(x_3); +x_12 = lean_unbox_usize(x_4); +lean_dec(x_4); +x_13 = l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_getFixedPrefix___spec__1(x_1, x_2, x_11, x_12, x_5, x_6, x_7, x_8, x_9, x_10); +lean_dec(x_2); +return x_13; +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_getFixedPrefix___lambda__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { +_start: +{ +lean_object* x_7; +x_7 = l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_getFixedPrefix___lambda__1(x_1, x_2, x_3, x_4, x_5, x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +return x_7; +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_getFixedPrefix___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_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_getFixedPrefix___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_4); +lean_dec(x_1); +return x_11; +} +} +lean_object* l_Lean_setEnv___at___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___spec__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { +_start: +{ +lean_object* x_8; lean_object* x_9; lean_object* x_10; uint8_t x_11; +x_8 = lean_st_ref_take(x_6, x_7); +x_9 = lean_ctor_get(x_8, 0); +lean_inc(x_9); +x_10 = lean_ctor_get(x_8, 1); +lean_inc(x_10); +lean_dec(x_8); +x_11 = !lean_is_exclusive(x_9); +if (x_11 == 0) +{ +lean_object* x_12; lean_object* x_13; uint8_t x_14; +x_12 = lean_ctor_get(x_9, 0); +lean_dec(x_12); +lean_ctor_set(x_9, 0, x_1); +x_13 = lean_st_ref_set(x_6, x_9, x_10); +x_14 = !lean_is_exclusive(x_13); +if (x_14 == 0) +{ +lean_object* x_15; lean_object* x_16; +x_15 = lean_ctor_get(x_13, 0); +lean_dec(x_15); +x_16 = lean_box(0); +lean_ctor_set(x_13, 0, x_16); +return x_13; +} +else +{ +lean_object* x_17; lean_object* x_18; lean_object* x_19; +x_17 = lean_ctor_get(x_13, 1); +lean_inc(x_17); +lean_dec(x_13); +x_18 = lean_box(0); +x_19 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_19, 0, x_18); +lean_ctor_set(x_19, 1, x_17); +return x_19; +} +} +else +{ +lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; +x_20 = lean_ctor_get(x_9, 1); +x_21 = lean_ctor_get(x_9, 2); +x_22 = lean_ctor_get(x_9, 3); +lean_inc(x_22); +lean_inc(x_21); +lean_inc(x_20); +lean_dec(x_9); +x_23 = lean_alloc_ctor(0, 4, 0); +lean_ctor_set(x_23, 0, x_1); +lean_ctor_set(x_23, 1, x_20); +lean_ctor_set(x_23, 2, x_21); +lean_ctor_set(x_23, 3, x_22); +x_24 = lean_st_ref_set(x_6, x_23, x_10); +x_25 = lean_ctor_get(x_24, 1); +lean_inc(x_25); +if (lean_is_exclusive(x_24)) { + lean_ctor_release(x_24, 0); + lean_ctor_release(x_24, 1); + x_26 = x_24; +} else { + lean_dec_ref(x_24); + x_26 = lean_box(0); +} +x_27 = lean_box(0); +if (lean_is_scalar(x_26)) { + x_28 = lean_alloc_ctor(0, 2, 0); +} else { + x_28 = x_26; +} +lean_ctor_set(x_28, 0, x_27); +lean_ctor_set(x_28, 1, x_25); +return x_28; +} +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___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) { +_start: +{ +lean_object* x_11; +lean_inc(x_1); +x_11 = l_Lean_Elab_Structural_ensureNoRecFn(x_1, x_2, 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; lean_object* x_14; uint8_t x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; +x_13 = lean_ctor_get(x_11, 0); +x_14 = lean_ctor_get(x_3, 0); +x_15 = lean_ctor_get_uint8(x_3, sizeof(void*)*6); +x_16 = lean_ctor_get(x_3, 1); +x_17 = lean_ctor_get(x_3, 2); +x_18 = lean_ctor_get(x_3, 4); +lean_inc(x_18); +lean_inc(x_17); +lean_inc(x_16); +lean_inc(x_14); +x_19 = lean_alloc_ctor(0, 6, 1); +lean_ctor_set(x_19, 0, x_14); +lean_ctor_set(x_19, 1, x_16); +lean_ctor_set(x_19, 2, x_17); +lean_ctor_set(x_19, 3, x_1); +lean_ctor_set(x_19, 4, x_18); +lean_ctor_set(x_19, 5, x_13); +lean_ctor_set_uint8(x_19, sizeof(void*)*6, x_15); +lean_ctor_set(x_11, 0, x_19); +return x_11; +} +else +{ +lean_object* x_20; lean_object* x_21; lean_object* x_22; uint8_t x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; +x_20 = lean_ctor_get(x_11, 0); +x_21 = lean_ctor_get(x_11, 1); +lean_inc(x_21); +lean_inc(x_20); +lean_dec(x_11); +x_22 = lean_ctor_get(x_3, 0); +x_23 = lean_ctor_get_uint8(x_3, sizeof(void*)*6); +x_24 = lean_ctor_get(x_3, 1); +x_25 = lean_ctor_get(x_3, 2); +x_26 = lean_ctor_get(x_3, 4); +lean_inc(x_26); +lean_inc(x_25); +lean_inc(x_24); +lean_inc(x_22); +x_27 = lean_alloc_ctor(0, 6, 1); +lean_ctor_set(x_27, 0, x_22); +lean_ctor_set(x_27, 1, x_24); +lean_ctor_set(x_27, 2, x_25); +lean_ctor_set(x_27, 3, x_1); +lean_ctor_set(x_27, 4, x_26); +lean_ctor_set(x_27, 5, x_20); +lean_ctor_set_uint8(x_27, sizeof(void*)*6, x_23); +x_28 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_28, 0, x_27); +lean_ctor_set(x_28, 1, x_21); +return x_28; +} +} +else +{ +uint8_t x_29; +lean_dec(x_1); +x_29 = !lean_is_exclusive(x_11); +if (x_29 == 0) +{ +return x_11; +} +else +{ +lean_object* x_30; lean_object* x_31; lean_object* x_32; +x_30 = lean_ctor_get(x_11, 0); +x_31 = lean_ctor_get(x_11, 1); +lean_inc(x_31); +lean_inc(x_30); +lean_dec(x_11); +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; +} +} +} +} +static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__2___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("result: "); +return x_1; +} +} +static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__2___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__2___closed__1; +x_2 = l_Lean_stringToMessageData(x_1); +return x_2; +} +} +static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__2___closed__3() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string(""); +return x_1; +} +} +static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__2___closed__4() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__2___closed__3; +x_2 = l_Lean_stringToMessageData(x_1); +return x_2; +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___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) { +_start: +{ +uint8_t x_12; uint8_t x_13; lean_object* x_14; +x_12 = 0; +x_13 = 1; +lean_inc(x_7); +x_14 = l_Lean_Meta_mkLambdaFVars(x_1, x_5, x_12, x_13, x_7, x_8, x_9, x_10, x_11); +if (lean_obj_tag(x_14) == 0) +{ +lean_object* x_15; lean_object* x_16; uint8_t x_17; lean_object* x_18; lean_object* x_31; lean_object* x_32; lean_object* x_33; uint8_t x_34; +x_15 = lean_ctor_get(x_14, 0); +lean_inc(x_15); +x_16 = lean_ctor_get(x_14, 1); +lean_inc(x_16); +lean_dec(x_14); +x_31 = lean_st_ref_get(x_10, x_16); +x_32 = lean_ctor_get(x_31, 0); +lean_inc(x_32); +x_33 = lean_ctor_get(x_32, 3); +lean_inc(x_33); +lean_dec(x_32); +x_34 = lean_ctor_get_uint8(x_33, sizeof(void*)*1); +lean_dec(x_33); +if (x_34 == 0) +{ +lean_object* x_35; +x_35 = lean_ctor_get(x_31, 1); +lean_inc(x_35); +lean_dec(x_31); +x_17 = x_12; +x_18 = x_35; +goto block_30; +} +else +{ +lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; uint8_t x_40; +x_36 = lean_ctor_get(x_31, 1); +lean_inc(x_36); +lean_dec(x_31); +lean_inc(x_4); +x_37 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__8(x_4, x_6, x_7, x_8, x_9, x_10, x_36); +x_38 = lean_ctor_get(x_37, 0); +lean_inc(x_38); +x_39 = lean_ctor_get(x_37, 1); +lean_inc(x_39); +lean_dec(x_37); +x_40 = lean_unbox(x_38); +lean_dec(x_38); +x_17 = x_40; +x_18 = x_39; +goto block_30; +} +block_30: +{ +if (x_17 == 0) +{ +lean_object* x_19; lean_object* x_20; +lean_dec(x_4); +x_19 = lean_box(0); +x_20 = l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__1(x_2, x_15, x_3, x_19, x_6, x_7, x_8, x_9, x_10, x_18); +lean_dec(x_6); +return x_20; +} +else +{ +lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; +lean_inc(x_15); +x_21 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_21, 0, x_15); +x_22 = l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__2___closed__2; +x_23 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_23, 0, x_22); +lean_ctor_set(x_23, 1, x_21); +x_24 = l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__2___closed__4; +x_25 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_25, 0, x_23); +lean_ctor_set(x_25, 1, x_24); +x_26 = l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__7(x_4, x_25, x_6, x_7, x_8, x_9, x_10, x_18); +x_27 = lean_ctor_get(x_26, 0); +lean_inc(x_27); +x_28 = lean_ctor_get(x_26, 1); +lean_inc(x_28); +lean_dec(x_26); +x_29 = l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__1(x_2, x_15, x_3, x_27, x_6, x_7, x_8, x_9, x_10, x_28); +lean_dec(x_6); +lean_dec(x_27); +return x_29; +} +} +} +else +{ +uint8_t x_41; +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_2); +x_41 = !lean_is_exclusive(x_14); +if (x_41 == 0) +{ +return x_14; +} +else +{ +lean_object* x_42; lean_object* x_43; lean_object* x_44; +x_42 = lean_ctor_get(x_14, 0); +x_43 = lean_ctor_get(x_14, 1); +lean_inc(x_43); +lean_inc(x_42); +lean_dec(x_14); +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; +} +} +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___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_object* x_10, lean_object* x_11, lean_object* x_12) { +_start: +{ +uint8_t x_13; +x_13 = lean_ctor_get_uint8(x_6, sizeof(void*)*8 + 1); +if (x_13 == 0) +{ +lean_object* x_14; +lean_inc(x_11); +lean_inc(x_10); +lean_inc(x_9); +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_2); +x_14 = l_Lean_Elab_Structural_mkBRecOn(x_2, x_6, x_5, x_7, x_8, x_9, x_10, x_11, x_12); +if (lean_obj_tag(x_14) == 0) +{ +lean_object* x_15; lean_object* x_16; lean_object* x_17; +x_15 = lean_ctor_get(x_14, 0); +lean_inc(x_15); +x_16 = lean_ctor_get(x_14, 1); +lean_inc(x_16); +lean_dec(x_14); +x_17 = l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__2(x_1, x_2, x_3, x_4, x_15, x_7, x_8, x_9, x_10, x_11, x_16); +return x_17; +} +else +{ +uint8_t x_18; +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_4); +lean_dec(x_2); +lean_dec(x_1); +x_18 = !lean_is_exclusive(x_14); +if (x_18 == 0) +{ +return x_14; +} +else +{ +lean_object* x_19; lean_object* x_20; lean_object* x_21; +x_19 = lean_ctor_get(x_14, 0); +x_20 = lean_ctor_get(x_14, 1); +lean_inc(x_20); +lean_inc(x_19); +lean_dec(x_14); +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; +} +} +} +else +{ +lean_object* x_22; +lean_inc(x_11); +lean_inc(x_10); +lean_inc(x_9); +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_2); +x_22 = l_Lean_Elab_Structural_mkIndPredBRecOn(x_2, x_6, x_5, x_7, x_8, x_9, x_10, x_11, x_12); +if (lean_obj_tag(x_22) == 0) +{ +lean_object* x_23; lean_object* x_24; lean_object* x_25; +x_23 = lean_ctor_get(x_22, 0); +lean_inc(x_23); +x_24 = lean_ctor_get(x_22, 1); +lean_inc(x_24); +lean_dec(x_22); +x_25 = l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__2(x_1, x_2, x_3, x_4, x_23, x_7, x_8, x_9, x_10, x_11, x_24); +return x_25; +} +else +{ +uint8_t x_26; +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_4); +lean_dec(x_2); +lean_dec(x_1); +x_26 = !lean_is_exclusive(x_22); +if (x_26 == 0) +{ +return x_22; +} +else +{ +lean_object* x_27; lean_object* x_28; lean_object* x_29; +x_27 = lean_ctor_get(x_22, 0); +x_28 = lean_ctor_get(x_22, 1); +lean_inc(x_28); +lean_inc(x_27); +lean_dec(x_22); +x_29 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_29, 0, x_27); +lean_ctor_set(x_29, 1, x_28); +return x_29; +} +} +} +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___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, lean_object* x_11, lean_object* x_12, lean_object* x_13) { +_start: +{ +lean_object* x_14; lean_object* x_15; +lean_inc(x_1); +x_14 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__3___boxed), 12, 5); +lean_closure_set(x_14, 0, x_1); +lean_closure_set(x_14, 1, x_2); +lean_closure_set(x_14, 2, x_3); +lean_closure_set(x_14, 3, x_4); +lean_closure_set(x_14, 4, x_5); +lean_inc(x_6); +x_15 = l_Lean_Elab_Structural_findRecArg_loop___rarg(x_6, x_1, x_14, x_6, x_8, x_9, x_10, x_11, x_12, x_13); +return x_15; +} +} +static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__5___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("numFixed: "); +return x_1; +} +} +static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__5___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__5___closed__1; +x_2 = l_Lean_stringToMessageData(x_1); +return x_2; +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___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, lean_object* x_10, lean_object* x_11, lean_object* x_12) { +_start: +{ +lean_object* x_13; +lean_dec(x_6); +lean_inc(x_11); +lean_inc(x_10); +lean_inc(x_9); +lean_inc(x_8); +lean_inc(x_3); +lean_inc(x_2); +lean_inc(x_1); +x_13 = l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_getFixedPrefix(x_1, x_2, x_3, x_8, x_9, x_10, x_11, x_12); +if (lean_obj_tag(x_13) == 0) +{ +lean_object* x_14; lean_object* x_15; uint8_t x_16; lean_object* x_17; lean_object* x_32; lean_object* x_33; lean_object* x_34; uint8_t x_35; +x_14 = lean_ctor_get(x_13, 0); +lean_inc(x_14); +x_15 = lean_ctor_get(x_13, 1); +lean_inc(x_15); +lean_dec(x_13); +x_32 = lean_st_ref_get(x_11, x_15); +x_33 = lean_ctor_get(x_32, 0); +lean_inc(x_33); +x_34 = lean_ctor_get(x_33, 3); +lean_inc(x_34); +lean_dec(x_33); +x_35 = lean_ctor_get_uint8(x_34, sizeof(void*)*1); +lean_dec(x_34); +if (x_35 == 0) +{ +lean_object* x_36; uint8_t x_37; +x_36 = lean_ctor_get(x_32, 1); +lean_inc(x_36); +lean_dec(x_32); +x_37 = 0; +x_16 = x_37; +x_17 = x_36; +goto block_31; +} +else +{ +lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; uint8_t x_42; +x_38 = lean_ctor_get(x_32, 1); +lean_inc(x_38); +lean_dec(x_32); +lean_inc(x_5); +x_39 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__8(x_5, x_7, x_8, x_9, x_10, x_11, x_38); +x_40 = lean_ctor_get(x_39, 0); +lean_inc(x_40); +x_41 = lean_ctor_get(x_39, 1); +lean_inc(x_41); +lean_dec(x_39); +x_42 = lean_unbox(x_40); +lean_dec(x_40); +x_16 = x_42; +x_17 = x_41; +goto block_31; +} +block_31: +{ +if (x_16 == 0) +{ +lean_object* x_18; lean_object* x_19; +x_18 = lean_box(0); +x_19 = l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__4(x_2, x_1, x_4, x_5, x_3, x_14, x_18, x_7, x_8, x_9, x_10, x_11, x_17); +return x_19; +} +else +{ +lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; +lean_inc(x_14); +x_20 = l_Nat_repr(x_14); +x_21 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_21, 0, x_20); +x_22 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_22, 0, x_21); +x_23 = l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__5___closed__2; +x_24 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_24, 0, x_23); +lean_ctor_set(x_24, 1, x_22); +x_25 = l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__2___closed__4; +x_26 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_26, 0, x_24); +lean_ctor_set(x_26, 1, x_25); +lean_inc(x_5); +x_27 = l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__7(x_5, x_26, x_7, x_8, x_9, x_10, x_11, x_17); +x_28 = lean_ctor_get(x_27, 0); +lean_inc(x_28); +x_29 = lean_ctor_get(x_27, 1); +lean_inc(x_29); +lean_dec(x_27); +x_30 = l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__4(x_2, x_1, x_4, x_5, x_3, x_14, x_28, x_7, x_8, x_9, x_10, x_11, x_29); +lean_dec(x_28); +return x_30; +} +} +} +else +{ +uint8_t x_43; +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_43 = !lean_is_exclusive(x_13); +if (x_43 == 0) +{ +return x_13; +} +else +{ +lean_object* x_44; lean_object* x_45; lean_object* x_46; +x_44 = lean_ctor_get(x_13, 0); +x_45 = lean_ctor_get(x_13, 1); +lean_inc(x_45); +lean_inc(x_44); +lean_dec(x_13); +x_46 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_46, 0, x_44); +lean_ctor_set(x_46, 1, x_45); +return x_46; +} +} +} +} +static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__6___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("Elab"); +return x_1; +} +} +static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__6___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__6___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__6___closed__3() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("definition"); +return x_1; +} +} +static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__6___closed__4() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__6___closed__2; +x_2 = l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__6___closed__3; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__6___closed__5() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("structural"); +return x_1; +} +} +static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__6___closed__6() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__6___closed__4; +x_2 = l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__6___closed__5; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__6___closed__7() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string(" "); +return x_1; +} +} +static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__6___closed__8() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__6___closed__7; +x_2 = l_Lean_stringToMessageData(x_1); +return x_2; +} +} +static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__6___closed__9() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string(" :=\n"); +return x_1; +} +} +static lean_object* _init_l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__6___closed__10() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__6___closed__9; +x_2 = l_Lean_stringToMessageData(x_1); +return x_2; +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__6(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_7); +x_10 = l_Lean_Elab_addAsAxiom(x_1, 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; +x_11 = lean_ctor_get(x_10, 1); +lean_inc(x_11); +lean_dec(x_10); +x_12 = lean_ctor_get(x_1, 3); +lean_inc(x_12); +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_12); +x_13 = l_Lean_Elab_Structural_preprocess(x_3, x_12, x_7, x_8, x_11); +if (lean_obj_tag(x_13) == 0) +{ +lean_object* x_14; lean_object* x_15; lean_object* x_16; uint8_t x_17; lean_object* x_18; lean_object* x_41; lean_object* x_42; lean_object* x_43; uint8_t x_44; +x_14 = lean_ctor_get(x_13, 0); +lean_inc(x_14); +x_15 = lean_ctor_get(x_13, 1); +lean_inc(x_15); +lean_dec(x_13); +x_16 = l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__6___closed__6; +x_41 = lean_st_ref_get(x_8, x_15); +x_42 = lean_ctor_get(x_41, 0); +lean_inc(x_42); +x_43 = lean_ctor_get(x_42, 3); +lean_inc(x_43); +lean_dec(x_42); +x_44 = lean_ctor_get_uint8(x_43, sizeof(void*)*1); +lean_dec(x_43); +if (x_44 == 0) +{ +lean_object* x_45; uint8_t x_46; +x_45 = lean_ctor_get(x_41, 1); +lean_inc(x_45); +lean_dec(x_41); +x_46 = 0; +x_17 = x_46; +x_18 = x_45; +goto block_40; +} +else +{ +lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; uint8_t x_51; +x_47 = lean_ctor_get(x_41, 1); +lean_inc(x_47); +lean_dec(x_41); +x_48 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__8(x_16, x_4, x_5, x_6, x_7, x_8, x_47); +x_49 = lean_ctor_get(x_48, 0); +lean_inc(x_49); +x_50 = lean_ctor_get(x_48, 1); +lean_inc(x_50); +lean_dec(x_48); +x_51 = lean_unbox(x_49); +lean_dec(x_49); +x_17 = x_51; +x_18 = x_50; +goto block_40; +} +block_40: +{ +if (x_17 == 0) +{ +lean_object* x_19; lean_object* x_20; +x_19 = lean_box(0); +x_20 = l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__5(x_12, x_2, x_14, x_1, x_16, x_19, x_4, x_5, x_6, x_7, x_8, x_18); +return x_20; +} +else +{ +lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; +lean_inc(x_12); +x_21 = lean_alloc_ctor(4, 1, 0); +lean_ctor_set(x_21, 0, x_12); +x_22 = l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__2___closed__4; +x_23 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_23, 0, x_22); +lean_ctor_set(x_23, 1, x_21); +x_24 = l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__6___closed__8; +x_25 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_25, 0, x_23); +lean_ctor_set(x_25, 1, x_24); +lean_inc(x_2); +x_26 = lean_array_to_list(lean_box(0), x_2); +x_27 = lean_box(0); +x_28 = l_List_mapTRAux___at_Lean_MessageData_instCoeListExprMessageData___spec__1(x_26, x_27); +x_29 = l_Lean_MessageData_ofList(x_28); +lean_dec(x_28); +x_30 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_30, 0, x_25); +lean_ctor_set(x_30, 1, x_29); +x_31 = l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__6___closed__10; +x_32 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_32, 0, x_30); +lean_ctor_set(x_32, 1, x_31); +lean_inc(x_14); +x_33 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_33, 0, x_14); +x_34 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_34, 0, x_32); +lean_ctor_set(x_34, 1, x_33); +x_35 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_35, 0, x_34); +lean_ctor_set(x_35, 1, x_22); +x_36 = l_Lean_addTrace___at___private_Lean_Elab_PreDefinition_Structural_IndPred_0__Lean_Elab_Structural_replaceIndPredRecApps_loop___spec__7(x_16, x_35, x_4, x_5, x_6, x_7, x_8, x_18); +x_37 = lean_ctor_get(x_36, 0); +lean_inc(x_37); +x_38 = lean_ctor_get(x_36, 1); +lean_inc(x_38); +lean_dec(x_36); +x_39 = l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__5(x_12, x_2, x_14, x_1, x_16, x_37, x_4, x_5, x_6, x_7, x_8, x_38); +return x_39; +} +} +} +else +{ +uint8_t x_52; +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_2); +lean_dec(x_1); +x_52 = !lean_is_exclusive(x_13); +if (x_52 == 0) +{ +return x_13; +} +else +{ +lean_object* x_53; lean_object* x_54; lean_object* x_55; +x_53 = lean_ctor_get(x_13, 0); +x_54 = lean_ctor_get(x_13, 1); +lean_inc(x_54); +lean_inc(x_53); +lean_dec(x_13); +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; +} +} +} +else +{ +uint8_t x_56; +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_56 = !lean_is_exclusive(x_10); +if (x_56 == 0) +{ +return x_10; +} +else +{ +lean_object* x_57; lean_object* x_58; lean_object* x_59; +x_57 = lean_ctor_get(x_10, 0); +x_58 = lean_ctor_get(x_10, 1); +lean_inc(x_58); +lean_inc(x_57); +lean_dec(x_10); +x_59 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_59, 0, x_57); +lean_ctor_set(x_59, 1, x_58); +return x_59; +} +} +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion(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; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; +x_8 = lean_ctor_get(x_1, 5); +lean_inc(x_8); +x_9 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__6), 9, 1); +lean_closure_set(x_9, 0, x_1); +x_10 = lean_st_ref_get(x_6, x_7); +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 = lean_ctor_get(x_11, 0); +lean_inc(x_13); +lean_dec(x_11); +lean_inc(x_6); +lean_inc(x_5); +lean_inc(x_4); +lean_inc(x_3); +lean_inc(x_2); +x_14 = l_Lean_Meta_lambdaTelescope___at___private_Lean_Elab_PreDefinition_Structural_BRecOn_0__Lean_Elab_Structural_replaceRecApps_loop___spec__13___rarg(x_8, x_9, x_2, x_3, x_4, x_5, x_6, x_12); +if (lean_obj_tag(x_14) == 0) +{ +lean_object* x_15; lean_object* x_16; lean_object* x_17; uint8_t x_18; +x_15 = lean_ctor_get(x_14, 0); +lean_inc(x_15); +x_16 = lean_ctor_get(x_14, 1); +lean_inc(x_16); +lean_dec(x_14); +x_17 = l_Lean_setEnv___at___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___spec__1(x_13, x_2, x_3, x_4, x_5, x_6, x_16); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +x_18 = !lean_is_exclusive(x_17); +if (x_18 == 0) +{ +lean_object* x_19; +x_19 = lean_ctor_get(x_17, 0); +lean_dec(x_19); +lean_ctor_set(x_17, 0, x_15); +return x_17; +} +else +{ +lean_object* x_20; lean_object* x_21; +x_20 = lean_ctor_get(x_17, 1); +lean_inc(x_20); +lean_dec(x_17); +x_21 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_21, 0, x_15); +lean_ctor_set(x_21, 1, x_20); +return x_21; +} +} +else +{ +lean_object* x_22; lean_object* x_23; lean_object* x_24; uint8_t x_25; +x_22 = lean_ctor_get(x_14, 0); +lean_inc(x_22); +x_23 = lean_ctor_get(x_14, 1); +lean_inc(x_23); +lean_dec(x_14); +x_24 = l_Lean_setEnv___at___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___spec__1(x_13, x_2, x_3, x_4, x_5, x_6, x_23); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +x_25 = !lean_is_exclusive(x_24); +if (x_25 == 0) +{ +lean_object* x_26; +x_26 = lean_ctor_get(x_24, 0); +lean_dec(x_26); +lean_ctor_set_tag(x_24, 1); +lean_ctor_set(x_24, 0, x_22); +return x_24; +} +else +{ +lean_object* x_27; lean_object* x_28; +x_27 = lean_ctor_get(x_24, 1); +lean_inc(x_27); +lean_dec(x_24); +x_28 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_28, 0, x_22); +lean_ctor_set(x_28, 1, x_27); +return x_28; +} +} +} +} +lean_object* l_Lean_setEnv___at___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___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) { +_start: +{ +lean_object* x_8; +x_8 = l_Lean_setEnv___at___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___spec__1(x_1, x_2, x_3, x_4, x_5, x_6, x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +return x_8; +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___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) { +_start: +{ +lean_object* x_11; +x_11 = l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__1(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +return x_11; +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___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) { +_start: +{ +lean_object* x_12; +x_12 = l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__2(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_3); +return x_12; +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__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) { +_start: +{ +lean_object* x_13; +x_13 = l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__3(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_12); +lean_dec(x_3); +return x_13; +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___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, lean_object* x_11, lean_object* x_12, lean_object* x_13) { +_start: +{ +lean_object* x_14; +x_14 = l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__4(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_12, x_13); +lean_dec(x_7); +return x_14; +} +} +lean_object* l_Lean_Elab_Structural_structuralRecursion_match__1___rarg(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; lean_object* x_4; lean_object* x_5; +x_3 = lean_ctor_get(x_1, 0); +lean_inc(x_3); +x_4 = lean_ctor_get(x_1, 1); +lean_inc(x_4); +lean_dec(x_1); +x_5 = lean_apply_2(x_2, x_3, x_4); +return x_5; +} +} +lean_object* l_Lean_Elab_Structural_structuralRecursion_match__1(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_Lean_Elab_Structural_structuralRecursion_match__1___rarg), 2, 0); +return x_2; +} +} +lean_object* l_Array_foldlMUnsafe_fold___at_Lean_Elab_Structural_structuralRecursion___spec__1(lean_object* x_1, size_t x_2, size_t x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11) { +_start: +{ +uint8_t x_12; +x_12 = x_2 == x_3; +if (x_12 == 0) +{ +lean_object* x_13; lean_object* x_14; +lean_dec(x_4); +x_13 = lean_array_uget(x_1, x_2); +lean_inc(x_10); +lean_inc(x_9); +lean_inc(x_8); +lean_inc(x_7); +x_14 = lean_apply_5(x_13, x_7, x_8, x_9, x_10, x_11); +if (lean_obj_tag(x_14) == 0) +{ +lean_object* x_15; lean_object* x_16; size_t x_17; size_t x_18; +x_15 = lean_ctor_get(x_14, 0); +lean_inc(x_15); +x_16 = lean_ctor_get(x_14, 1); +lean_inc(x_16); +lean_dec(x_14); +x_17 = 1; +x_18 = x_2 + x_17; +x_2 = x_18; +x_4 = x_15; +x_11 = x_16; +goto _start; +} +else +{ +uint8_t x_20; +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +x_20 = !lean_is_exclusive(x_14); +if (x_20 == 0) +{ +return x_14; +} +else +{ +lean_object* x_21; lean_object* x_22; lean_object* x_23; +x_21 = lean_ctor_get(x_14, 0); +x_22 = lean_ctor_get(x_14, 1); +lean_inc(x_22); +lean_inc(x_21); +lean_dec(x_14); +x_23 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_23, 0, x_21); +lean_ctor_set(x_23, 1, x_22); +return x_23; +} +} +} +else +{ +lean_object* x_24; +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +x_24 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_24, 0, x_4); +lean_ctor_set(x_24, 1, x_11); +return x_24; +} +} +} +static lean_object* _init_l_Lean_Elab_Structural_structuralRecursion___lambda__1___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("structural recursion failed, produced type incorrect term"); +return x_1; +} +} +static lean_object* _init_l_Lean_Elab_Structural_structuralRecursion___lambda__1___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Elab_Structural_structuralRecursion___lambda__1___closed__1; +x_2 = l_Lean_stringToMessageData(x_1); +return x_2; +} +} +lean_object* l_Lean_Elab_Structural_structuralRecursion___lambda__1(lean_object* x_1) { +_start: +{ +lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; +x_2 = l_Lean_indentD(x_1); +x_3 = l_Lean_Elab_Structural_structuralRecursion___lambda__1___closed__2; +x_4 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_4, 0, x_3); +lean_ctor_set(x_4, 1, x_2); +x_5 = l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__2___closed__4; +x_6 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_6, 0, x_4); +lean_ctor_set(x_6, 1, x_5); +return x_6; +} +} +static lean_object* _init_l_Lean_Elab_Structural_structuralRecursion___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("structural recursion does not handle mutually recursive functions"); +return x_1; +} +} +static lean_object* _init_l_Lean_Elab_Structural_structuralRecursion___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Elab_Structural_structuralRecursion___closed__1; +x_2 = l_Lean_stringToMessageData(x_1); +return x_2; +} +} +static lean_object* _init_l_Lean_Elab_Structural_structuralRecursion___closed__3() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = lean_unsigned_to_nat(0u); +x_2 = lean_mk_empty_array_with_capacity(x_1); +return x_2; +} +} +static lean_object* _init_l_Lean_Elab_Structural_structuralRecursion___closed__4() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_NameSet_empty; +x_2 = l_Lean_Elab_Structural_structuralRecursion___closed__3; +x_3 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_3, 0, x_1); +lean_ctor_set(x_3, 1, x_2); +return x_3; +} +} +static lean_object* _init_l_Lean_Elab_Structural_structuralRecursion___closed__5() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_Elab_Structural_structuralRecursion___lambda__1), 1, 0); +return x_1; +} +} +lean_object* l_Lean_Elab_Structural_structuralRecursion(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; uint8_t x_11; +x_9 = lean_array_get_size(x_1); +x_10 = lean_unsigned_to_nat(1u); +x_11 = lean_nat_dec_eq(x_9, x_10); +lean_dec(x_9); +if (x_11 == 0) +{ +lean_object* x_12; lean_object* x_13; +lean_dec(x_1); +x_12 = l_Lean_Elab_Structural_structuralRecursion___closed__2; +x_13 = l_Lean_throwError___at_Lean_Elab_Term_throwErrorIfErrors___spec__1(x_12, 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); +return x_13; +} +else +{ +lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; +x_14 = l_Lean_Elab_instInhabitedPreDefinition; +x_15 = lean_unsigned_to_nat(0u); +x_16 = lean_array_get(x_14, x_1, x_15); +lean_inc(x_16); +x_17 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion), 7, 1); +lean_closure_set(x_17, 0, x_16); +x_18 = l_Lean_Elab_Structural_structuralRecursion___closed__4; +lean_inc(x_7); +lean_inc(x_6); +lean_inc(x_5); +lean_inc(x_4); +x_19 = l_Lean_Elab_Structural_run___rarg(x_17, x_18, x_4, x_5, x_6, x_7, x_8); +if (lean_obj_tag(x_19) == 0) +{ +lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; uint8_t x_26; lean_object* x_27; +x_20 = lean_ctor_get(x_19, 0); +lean_inc(x_20); +x_21 = lean_ctor_get(x_19, 1); +lean_inc(x_21); +lean_dec(x_19); +x_22 = lean_ctor_get(x_20, 0); +lean_inc(x_22); +x_23 = lean_ctor_get(x_20, 1); +lean_inc(x_23); +lean_dec(x_20); +x_24 = lean_ctor_get(x_23, 1); +lean_inc(x_24); +x_25 = lean_array_get_size(x_24); +x_26 = lean_nat_dec_lt(x_15, x_25); +if (x_26 == 0) +{ +lean_dec(x_25); +lean_dec(x_24); +x_27 = x_21; +goto block_49; +} +else +{ +uint8_t x_50; +x_50 = lean_nat_dec_le(x_25, x_25); +if (x_50 == 0) +{ +lean_dec(x_25); +lean_dec(x_24); +x_27 = x_21; +goto block_49; +} +else +{ +size_t x_51; size_t x_52; lean_object* x_53; lean_object* x_54; +x_51 = 0; +x_52 = lean_usize_of_nat(x_25); +lean_dec(x_25); +x_53 = lean_box(0); +lean_inc(x_7); +lean_inc(x_6); +lean_inc(x_5); +lean_inc(x_4); +x_54 = l_Array_foldlMUnsafe_fold___at_Lean_Elab_Structural_structuralRecursion___spec__1(x_24, x_51, x_52, x_53, x_2, x_3, x_4, x_5, x_6, x_7, x_21); +lean_dec(x_24); +if (lean_obj_tag(x_54) == 0) +{ +lean_object* x_55; +x_55 = lean_ctor_get(x_54, 1); +lean_inc(x_55); +lean_dec(x_54); +x_27 = x_55; +goto block_49; +} +else +{ +uint8_t x_56; +lean_dec(x_23); +lean_dec(x_22); +lean_dec(x_16); +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_56 = !lean_is_exclusive(x_54); +if (x_56 == 0) +{ +return x_54; +} +else +{ +lean_object* x_57; lean_object* x_58; lean_object* x_59; +x_57 = lean_ctor_get(x_54, 0); +x_58 = lean_ctor_get(x_54, 1); +lean_inc(x_58); +lean_inc(x_57); +lean_dec(x_54); +x_59 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_59, 0, x_57); +lean_ctor_set(x_59, 1, x_58); +return x_59; +} +} +} +} +block_49: +{ +lean_object* x_28; lean_object* x_29; lean_object* x_30; +lean_inc(x_3); +lean_inc(x_2); +x_28 = lean_alloc_closure((void*)(l_Lean_Elab_addNonRec), 8, 3); +lean_closure_set(x_28, 0, x_22); +lean_closure_set(x_28, 1, x_2); +lean_closure_set(x_28, 2, x_3); +x_29 = l_Lean_Elab_Structural_structuralRecursion___closed__5; +lean_inc(x_7); +lean_inc(x_6); +lean_inc(x_5); +lean_inc(x_4); +x_30 = l_Lean_Meta_mapErrorImp___rarg(x_28, x_29, x_4, x_5, x_6, x_7, x_27); +if (lean_obj_tag(x_30) == 0) +{ +lean_object* x_31; lean_object* x_32; +x_31 = lean_ctor_get(x_30, 1); +lean_inc(x_31); +lean_dec(x_30); +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_32 = l_Lean_Elab_addAndCompilePartialRec(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_31); +if (lean_obj_tag(x_32) == 0) +{ +lean_object* x_33; lean_object* x_34; +x_33 = lean_ctor_get(x_32, 1); +lean_inc(x_33); +lean_dec(x_32); +lean_inc(x_7); +lean_inc(x_6); +lean_inc(x_5); +lean_inc(x_4); +lean_inc(x_3); +lean_inc(x_2); +lean_inc(x_16); +x_34 = l_Lean_Elab_Structural_addSmartUnfoldingDef(x_16, x_23, x_2, x_3, x_4, x_5, x_6, x_7, x_33); +if (lean_obj_tag(x_34) == 0) +{ +lean_object* x_35; lean_object* x_36; +x_35 = lean_ctor_get(x_34, 1); +lean_inc(x_35); +lean_dec(x_34); +x_36 = l_Lean_Elab_Structural_mkEqns(x_16, x_2, x_3, x_4, x_5, x_6, x_7, x_35); +lean_dec(x_16); +return x_36; +} +else +{ +uint8_t x_37; +lean_dec(x_16); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +x_37 = !lean_is_exclusive(x_34); +if (x_37 == 0) +{ +return x_34; +} +else +{ +lean_object* x_38; lean_object* x_39; lean_object* x_40; +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 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_40, 0, x_38); +lean_ctor_set(x_40, 1, x_39); +return x_40; +} +} +} +else +{ +uint8_t x_41; +lean_dec(x_23); +lean_dec(x_16); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +x_41 = !lean_is_exclusive(x_32); +if (x_41 == 0) +{ +return x_32; +} +else +{ +lean_object* x_42; lean_object* x_43; lean_object* x_44; +x_42 = lean_ctor_get(x_32, 0); +x_43 = lean_ctor_get(x_32, 1); +lean_inc(x_43); +lean_inc(x_42); +lean_dec(x_32); +x_44 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_44, 0, x_42); +lean_ctor_set(x_44, 1, x_43); +return x_44; +} +} +} +else +{ +uint8_t x_45; +lean_dec(x_23); +lean_dec(x_16); +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_45 = !lean_is_exclusive(x_30); +if (x_45 == 0) +{ +return x_30; +} +else +{ +lean_object* x_46; lean_object* x_47; lean_object* x_48; +x_46 = lean_ctor_get(x_30, 0); +x_47 = lean_ctor_get(x_30, 1); +lean_inc(x_47); +lean_inc(x_46); +lean_dec(x_30); +x_48 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_48, 0, x_46); +lean_ctor_set(x_48, 1, x_47); +return x_48; +} +} +} +} +else +{ +uint8_t x_60; +lean_dec(x_16); +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_60 = !lean_is_exclusive(x_19); +if (x_60 == 0) +{ +return x_19; +} +else +{ +lean_object* x_61; lean_object* x_62; lean_object* x_63; +x_61 = lean_ctor_get(x_19, 0); +x_62 = lean_ctor_get(x_19, 1); +lean_inc(x_62); +lean_inc(x_61); +lean_dec(x_19); +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; +} +} +} +} +} +lean_object* l_Array_foldlMUnsafe_fold___at_Lean_Elab_Structural_structuralRecursion___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) { +_start: +{ +size_t x_12; size_t x_13; lean_object* x_14; +x_12 = lean_unbox_usize(x_2); +lean_dec(x_2); +x_13 = lean_unbox_usize(x_3); +lean_dec(x_3); +x_14 = l_Array_foldlMUnsafe_fold___at_Lean_Elab_Structural_structuralRecursion___spec__1(x_1, x_12, x_13, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_1); +return x_14; +} +} +lean_object* l_Lean_Elab_Structural_initFn____x40_Lean_Elab_PreDefinition_Structural_Main___hyg_737_(lean_object* x_1) { +_start: +{ +lean_object* x_2; lean_object* x_3; +x_2 = l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__6___closed__6; +x_3 = l_Lean_registerTraceClass(x_2, x_1); +return x_3; +} +} +lean_object* initialize_Init(lean_object*); +lean_object* initialize_Lean_Elab_PreDefinition_Structural_Basic(lean_object*); +lean_object* initialize_Lean_Elab_PreDefinition_Structural_FindRecArg(lean_object*); +lean_object* initialize_Lean_Elab_PreDefinition_Structural_Preprocess(lean_object*); +lean_object* initialize_Lean_Elab_PreDefinition_Structural_BRecOn(lean_object*); +lean_object* initialize_Lean_Elab_PreDefinition_Structural_IndPred(lean_object*); +lean_object* initialize_Lean_Elab_PreDefinition_Structural_Eqns(lean_object*); +lean_object* initialize_Lean_Elab_PreDefinition_Structural_SmartUnfolding(lean_object*); +static bool _G_initialized = false; +lean_object* initialize_Lean_Elab_PreDefinition_Structural_Main(lean_object* w) { +lean_object * res; +if (_G_initialized) return lean_io_result_mk_ok(lean_box(0)); +_G_initialized = true; +res = initialize_Init(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); +res = initialize_Lean_Elab_PreDefinition_Structural_Basic(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); +res = initialize_Lean_Elab_PreDefinition_Structural_FindRecArg(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); +res = initialize_Lean_Elab_PreDefinition_Structural_Preprocess(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); +res = initialize_Lean_Elab_PreDefinition_Structural_BRecOn(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); +res = initialize_Lean_Elab_PreDefinition_Structural_IndPred(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); +res = initialize_Lean_Elab_PreDefinition_Structural_Eqns(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); +res = initialize_Lean_Elab_PreDefinition_Structural_SmartUnfolding(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); +l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_getFixedPrefix___spec__1___closed__1 = _init_l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_getFixedPrefix___spec__1___closed__1(); +lean_mark_persistent(l_Array_forInUnsafe_loop___at___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_getFixedPrefix___spec__1___closed__1); +l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_getFixedPrefix___lambda__2___closed__1 = _init_l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_getFixedPrefix___lambda__2___closed__1(); +lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_getFixedPrefix___lambda__2___closed__1); +l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_getFixedPrefix___lambda__2___closed__2 = _init_l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_getFixedPrefix___lambda__2___closed__2(); +lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_getFixedPrefix___lambda__2___closed__2); +l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__2___closed__1 = _init_l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__2___closed__1(); +lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__2___closed__1); +l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__2___closed__2 = _init_l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__2___closed__2(); +lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__2___closed__2); +l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__2___closed__3 = _init_l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__2___closed__3(); +lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__2___closed__3); +l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__2___closed__4 = _init_l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__2___closed__4(); +lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__2___closed__4); +l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__5___closed__1 = _init_l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__5___closed__1(); +lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__5___closed__1); +l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__5___closed__2 = _init_l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__5___closed__2(); +lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__5___closed__2); +l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__6___closed__1 = _init_l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__6___closed__1(); +lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__6___closed__1); +l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__6___closed__2 = _init_l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__6___closed__2(); +lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__6___closed__2); +l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__6___closed__3 = _init_l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__6___closed__3(); +lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__6___closed__3); +l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__6___closed__4 = _init_l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__6___closed__4(); +lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__6___closed__4); +l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__6___closed__5 = _init_l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__6___closed__5(); +lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__6___closed__5); +l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__6___closed__6 = _init_l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__6___closed__6(); +lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__6___closed__6); +l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__6___closed__7 = _init_l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__6___closed__7(); +lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__6___closed__7); +l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__6___closed__8 = _init_l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__6___closed__8(); +lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__6___closed__8); +l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__6___closed__9 = _init_l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__6___closed__9(); +lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__6___closed__9); +l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__6___closed__10 = _init_l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__6___closed__10(); +lean_mark_persistent(l___private_Lean_Elab_PreDefinition_Structural_Main_0__Lean_Elab_Structural_elimRecursion___lambda__6___closed__10); +l_Lean_Elab_Structural_structuralRecursion___lambda__1___closed__1 = _init_l_Lean_Elab_Structural_structuralRecursion___lambda__1___closed__1(); +lean_mark_persistent(l_Lean_Elab_Structural_structuralRecursion___lambda__1___closed__1); +l_Lean_Elab_Structural_structuralRecursion___lambda__1___closed__2 = _init_l_Lean_Elab_Structural_structuralRecursion___lambda__1___closed__2(); +lean_mark_persistent(l_Lean_Elab_Structural_structuralRecursion___lambda__1___closed__2); +l_Lean_Elab_Structural_structuralRecursion___closed__1 = _init_l_Lean_Elab_Structural_structuralRecursion___closed__1(); +lean_mark_persistent(l_Lean_Elab_Structural_structuralRecursion___closed__1); +l_Lean_Elab_Structural_structuralRecursion___closed__2 = _init_l_Lean_Elab_Structural_structuralRecursion___closed__2(); +lean_mark_persistent(l_Lean_Elab_Structural_structuralRecursion___closed__2); +l_Lean_Elab_Structural_structuralRecursion___closed__3 = _init_l_Lean_Elab_Structural_structuralRecursion___closed__3(); +lean_mark_persistent(l_Lean_Elab_Structural_structuralRecursion___closed__3); +l_Lean_Elab_Structural_structuralRecursion___closed__4 = _init_l_Lean_Elab_Structural_structuralRecursion___closed__4(); +lean_mark_persistent(l_Lean_Elab_Structural_structuralRecursion___closed__4); +l_Lean_Elab_Structural_structuralRecursion___closed__5 = _init_l_Lean_Elab_Structural_structuralRecursion___closed__5(); +lean_mark_persistent(l_Lean_Elab_Structural_structuralRecursion___closed__5); +res = l_Lean_Elab_Structural_initFn____x40_Lean_Elab_PreDefinition_Structural_Main___hyg_737_(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); +return lean_io_result_mk_ok(lean_box(0)); +} +#ifdef __cplusplus +} +#endif diff --git a/stage0/stdlib/Lean/Elab/PreDefinition/Structural/Preprocess.c b/stage0/stdlib/Lean/Elab/PreDefinition/Structural/Preprocess.c new file mode 100644 index 0000000000..71d8ad5bc8 --- /dev/null +++ b/stage0/stdlib/Lean/Elab/PreDefinition/Structural/Preprocess.c @@ -0,0 +1,200 @@ +// Lean compiler output +// Module: Lean.Elab.PreDefinition.Structural.Preprocess +// Imports: Init Lean.Meta.Transform +#include +#if defined(__clang__) +#pragma clang diagnostic ignored "-Wunused-parameter" +#pragma clang diagnostic ignored "-Wunused-label" +#elif defined(__GNUC__) && !defined(__CLANG__) +#pragma GCC diagnostic ignored "-Wunused-parameter" +#pragma GCC diagnostic ignored "-Wunused-label" +#pragma GCC diagnostic ignored "-Wunused-but-set-variable" +#endif +#ifdef __cplusplus +extern "C" { +#endif +lean_object* l_Lean_Elab_Structural_preprocess___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Structural_preprocess___lambda__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +uint8_t l___private_Lean_Elab_PreDefinition_Structural_Preprocess_0__Lean_Elab_Structural_shouldBetaReduce(lean_object*, lean_object*); +lean_object* l_Lean_Elab_Structural_preprocess___lambda__2(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Elab_PreDefinition_Structural_Preprocess_0__Lean_Elab_Structural_shouldBetaReduce___lambda__1___boxed(lean_object*, lean_object*); +lean_object* l_Lean_Elab_Structural_preprocess(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Expr_headBeta(lean_object*); +uint8_t l_Lean_Expr_isHeadBetaTarget(lean_object*); +uint8_t l___private_Lean_Elab_PreDefinition_Structural_Preprocess_0__Lean_Elab_Structural_shouldBetaReduce___lambda__1(lean_object*, lean_object*); +static lean_object* l_Lean_Elab_Structural_preprocess___closed__1; +lean_object* l_Lean_Elab_Structural_preprocess___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +uint8_t l_Lean_Expr_isConstOf(lean_object*, lean_object*); +lean_object* l_Lean_Core_transform___at_Lean_Core_betaReduce___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +extern lean_object* l_Lean_Expr_FindImpl_initCache; +lean_object* l___private_Lean_Elab_PreDefinition_Structural_Preprocess_0__Lean_Elab_Structural_shouldBetaReduce___boxed(lean_object*, lean_object*); +lean_object* l_Lean_Expr_FindImpl_findM_x3f_visit(lean_object*, size_t, lean_object*, lean_object*); +lean_object* l_Lean_Expr_getAppFn(lean_object*); +uint8_t l___private_Lean_Elab_PreDefinition_Structural_Preprocess_0__Lean_Elab_Structural_shouldBetaReduce___lambda__1(lean_object* x_1, lean_object* x_2) { +_start: +{ +uint8_t x_3; +x_3 = l_Lean_Expr_isConstOf(x_2, x_1); +return x_3; +} +} +uint8_t l___private_Lean_Elab_PreDefinition_Structural_Preprocess_0__Lean_Elab_Structural_shouldBetaReduce(lean_object* x_1, lean_object* x_2) { +_start: +{ +uint8_t x_3; +x_3 = l_Lean_Expr_isHeadBetaTarget(x_1); +if (x_3 == 0) +{ +uint8_t x_4; +lean_dec(x_2); +x_4 = 0; +return x_4; +} +else +{ +lean_object* x_5; lean_object* x_6; size_t x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; +x_5 = lean_alloc_closure((void*)(l___private_Lean_Elab_PreDefinition_Structural_Preprocess_0__Lean_Elab_Structural_shouldBetaReduce___lambda__1___boxed), 2, 1); +lean_closure_set(x_5, 0, x_2); +x_6 = l_Lean_Expr_getAppFn(x_1); +x_7 = 8192; +x_8 = l_Lean_Expr_FindImpl_initCache; +x_9 = l_Lean_Expr_FindImpl_findM_x3f_visit(x_5, x_7, x_6, x_8); +x_10 = lean_ctor_get(x_9, 0); +lean_inc(x_10); +lean_dec(x_9); +if (lean_obj_tag(x_10) == 0) +{ +uint8_t x_11; +x_11 = 0; +return x_11; +} +else +{ +uint8_t x_12; +lean_dec(x_10); +x_12 = 1; +return x_12; +} +} +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_Preprocess_0__Lean_Elab_Structural_shouldBetaReduce___lambda__1___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +uint8_t x_3; lean_object* x_4; +x_3 = l___private_Lean_Elab_PreDefinition_Structural_Preprocess_0__Lean_Elab_Structural_shouldBetaReduce___lambda__1(x_1, x_2); +lean_dec(x_2); +lean_dec(x_1); +x_4 = lean_box(x_3); +return x_4; +} +} +lean_object* l___private_Lean_Elab_PreDefinition_Structural_Preprocess_0__Lean_Elab_Structural_shouldBetaReduce___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +uint8_t x_3; lean_object* x_4; +x_3 = l___private_Lean_Elab_PreDefinition_Structural_Preprocess_0__Lean_Elab_Structural_shouldBetaReduce(x_1, x_2); +lean_dec(x_1); +x_4 = lean_box(x_3); +return x_4; +} +} +lean_object* l_Lean_Elab_Structural_preprocess___lambda__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { +_start: +{ +uint8_t x_6; +x_6 = l___private_Lean_Elab_PreDefinition_Structural_Preprocess_0__Lean_Elab_Structural_shouldBetaReduce(x_2, x_1); +if (x_6 == 0) +{ +lean_object* x_7; lean_object* x_8; +x_7 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_7, 0, x_2); +x_8 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_8, 0, x_7); +lean_ctor_set(x_8, 1, x_5); +return x_8; +} +else +{ +lean_object* x_9; lean_object* x_10; lean_object* x_11; +x_9 = l_Lean_Expr_headBeta(x_2); +x_10 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_10, 0, 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; +} +} +} +lean_object* l_Lean_Elab_Structural_preprocess___lambda__2(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; lean_object* x_6; +x_5 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_5, 0, x_1); +x_6 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_6, 0, x_5); +lean_ctor_set(x_6, 1, x_4); +return x_6; +} +} +static lean_object* _init_l_Lean_Elab_Structural_preprocess___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_Elab_Structural_preprocess___lambda__2___boxed), 4, 0); +return x_1; +} +} +lean_object* l_Lean_Elab_Structural_preprocess(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { +_start: +{ +lean_object* x_6; lean_object* x_7; lean_object* x_8; +x_6 = lean_alloc_closure((void*)(l_Lean_Elab_Structural_preprocess___lambda__1___boxed), 5, 1); +lean_closure_set(x_6, 0, x_2); +x_7 = l_Lean_Elab_Structural_preprocess___closed__1; +x_8 = l_Lean_Core_transform___at_Lean_Core_betaReduce___spec__1(x_1, x_6, x_7, x_3, x_4, x_5); +return x_8; +} +} +lean_object* l_Lean_Elab_Structural_preprocess___lambda__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { +_start: +{ +lean_object* x_6; +x_6 = l_Lean_Elab_Structural_preprocess___lambda__1(x_1, x_2, x_3, x_4, x_5); +lean_dec(x_4); +lean_dec(x_3); +return x_6; +} +} +lean_object* l_Lean_Elab_Structural_preprocess___lambda__2___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_Elab_Structural_preprocess___lambda__2(x_1, x_2, x_3, x_4); +lean_dec(x_3); +lean_dec(x_2); +return x_5; +} +} +lean_object* initialize_Init(lean_object*); +lean_object* initialize_Lean_Meta_Transform(lean_object*); +static bool _G_initialized = false; +lean_object* initialize_Lean_Elab_PreDefinition_Structural_Preprocess(lean_object* w) { +lean_object * res; +if (_G_initialized) return lean_io_result_mk_ok(lean_box(0)); +_G_initialized = true; +res = initialize_Init(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); +res = initialize_Lean_Meta_Transform(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); +l_Lean_Elab_Structural_preprocess___closed__1 = _init_l_Lean_Elab_Structural_preprocess___closed__1(); +lean_mark_persistent(l_Lean_Elab_Structural_preprocess___closed__1); +return lean_io_result_mk_ok(lean_box(0)); +} +#ifdef __cplusplus +} +#endif diff --git a/stage0/stdlib/Lean/Elab/PreDefinition/Structural/SmartUnfolding.c b/stage0/stdlib/Lean/Elab/PreDefinition/Structural/SmartUnfolding.c new file mode 100644 index 0000000000..31c4696d72 --- /dev/null +++ b/stage0/stdlib/Lean/Elab/PreDefinition/Structural/SmartUnfolding.c @@ -0,0 +1,2868 @@ +// Lean compiler output +// Module: Lean.Elab.PreDefinition.Structural.SmartUnfolding +// Imports: Init Lean.Elab.PreDefinition.Basic Lean.Elab.PreDefinition.Structural.Basic +#include +#if defined(__clang__) +#pragma clang diagnostic ignored "-Wunused-parameter" +#pragma clang diagnostic ignored "-Wunused-label" +#elif defined(__GNUC__) && !defined(__CLANG__) +#pragma GCC diagnostic ignored "-Wunused-parameter" +#pragma GCC diagnostic ignored "-Wunused-label" +#pragma GCC diagnostic ignored "-Wunused-but-set-variable" +#endif +#ifdef __cplusplus +extern "C" { +#endif +static lean_object* l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__7___lambda__2___closed__4; +lean_object* lean_array_set(lean_object*, lean_object*, lean_object*); +size_t l_USize_add(size_t, size_t); +lean_object* l_Lean_Elab_Structural_addSmartUnfoldingDefAux(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_stringToMessageData(lean_object*); +lean_object* lean_mk_empty_array_with_capacity(lean_object*); +lean_object* l_Lean_mkSort(lean_object*); +lean_object* l_Lean_Meta_mkForallFVars(lean_object*, lean_object*, uint8_t, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__4___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* lean_name_mk_string(lean_object*, lean_object*); +static lean_object* l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__7___lambda__2___closed__1; +lean_object* lean_array_uget(lean_object*, size_t); +static lean_object* l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__7___lambda__2___closed__2; +lean_object* l_Lean_Meta_withLetDecl___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__8___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* lean_array_uset(lean_object*, size_t, lean_object*); +lean_object* l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit_match__3___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_extract___rarg(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit_match__2(lean_object*); +lean_object* l_Lean_Expr_withAppAux___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__5___boxed__const__1; +lean_object* l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___lambda__3___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___lambda__3___closed__1; +lean_object* l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__2(lean_object*, lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* lean_expr_instantiate1(lean_object*, lean_object*); +lean_object* l_Array_toSubarray___rarg(lean_object*, lean_object*, lean_object*); +lean_object* lean_array_push(lean_object*, lean_object*); +lean_object* lean_array_get_size(lean_object*); +uint8_t l_Lean_Elab_Structural_addSmartUnfoldingDefAux___lambda__1(lean_object*, lean_object*); +lean_object* l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit_match__1___rarg(lean_object*, lean_object*); +uint8_t l_USize_decLt(size_t, size_t); +extern lean_object* l_Lean_levelZero; +lean_object* lean_nat_add(lean_object*, lean_object*); +lean_object* l_Array_zip___rarg(lean_object*, lean_object*); +lean_object* l_Lean_mkAppN(lean_object*, lean_object*); +lean_object* l_Lean_mkMData(lean_object*, lean_object*); +extern lean_object* l_Lean_Meta_smartUnfoldingSuffix; +lean_object* l___private_Lean_Expr_0__Lean_Expr_getAppArgsAux(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_lambdaTelescope___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__6___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__7___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* l_Lean_mkProj(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Expr_withAppAux___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__5(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_lambdaTelescope___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__6(lean_object*); +lean_object* l_Lean_Expr_withAppAux___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__3___boxed__const__1; +lean_object* lean_nat_sub(lean_object*, lean_object*); +lean_object* l_Lean_Meta_withLetDecl___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__8(lean_object*); +lean_object* l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__4(lean_object*, lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__7___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_Elab_Structural_addSmartUnfoldingDefAux_visit_match__2___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__7(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_array_get(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_mkLambdaFVars(lean_object*, lean_object*, uint8_t, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +uint8_t l_Lean_Elab_Structural_addSmartUnfoldingDefAux___lambda__2(lean_object*, lean_object*); +lean_object* l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__7___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___private_Lean_Elab_PreDefinition_Basic_0__Lean_Elab_addNonRecAux(lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +extern lean_object* l_Lean_instInhabitedExpr; +lean_object* l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +uint8_t l_Lean_Expr_isConst(lean_object*); +lean_object* l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__7___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_matchMatcherApp_x3f___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +size_t lean_usize_of_nat(lean_object*); +lean_object* l_Lean_Elab_Structural_addSmartUnfoldingDefAux___lambda__3___boxed(lean_object*, lean_object*); +static lean_object* l_Lean_Elab_Structural_addSmartUnfoldingDefAux___closed__1; +lean_object* l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_forallTelescope___at___private_Lean_Meta_InferType_0__Lean_Meta_inferForallType___spec__2___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_Elab_Structural_addSmartUnfoldingDefAux___closed__2; +lean_object* l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit_match__3(lean_object*); +static lean_object* l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__7___lambda__2___closed__5; +extern lean_object* l_Lean_Expr_FindImpl_initCache; +uint8_t l_Lean_Elab_Structural_addSmartUnfoldingDefAux___lambda__3(lean_object*, lean_object*); +lean_object* l_List_redLength___rarg(lean_object*); +lean_object* l_Lean_Expr_getAppNumArgsAux(lean_object*, lean_object*); +uint8_t lean_nat_dec_le(lean_object*, lean_object*); +lean_object* l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit_match__1(lean_object*); +lean_object* l_Lean_Meta_mkIdRhs(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_MatcherApp_toExpr(lean_object*); +static lean_object* l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__7___lambda__2___closed__6; +lean_object* l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___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* l_Array_ofSubarray___rarg(lean_object*); +lean_object* l_List_toArrayAux___rarg(lean_object*, lean_object*); +lean_object* l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___lambda__3(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_Match_MatcherInfo_arity(lean_object*); +lean_object* lean_mk_array(lean_object*, lean_object*); +static lean_object* l_Lean_Meta_matchMatcherApp_x3f___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__1___closed__1; +lean_object* l_Lean_Meta_getMatcherInfo_x3f___at_Lean_Meta_reduceMatcher_x3f___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_throwError___at_Lean_Meta_withIncRecDepth___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Expr_FindImpl_findM_x3f_visit(lean_object*, size_t, lean_object*, lean_object*); +uint8_t l_Lean_NameSet_contains(lean_object*, lean_object*); +lean_object* l_Lean_Elab_Structural_addSmartUnfoldingDef(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Expr_getAppFn(lean_object*); +lean_object* l_Lean_Meta_Match_MatcherInfo_numAlts(lean_object*); +lean_object* l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___lambda__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_unsafeCast(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___boxed__const__1; +lean_object* l___private_Lean_Meta_Basic_0__Lean_Meta_lambdaTelescopeImp___rarg(lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_Basic_0__Lean_Meta_withLetDeclImp___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_matchMatcherApp_x3f___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__7___lambda__2___closed__3; +lean_object* l_Lean_Meta_isProp(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_indentExpr(lean_object*); +lean_object* l_Lean_Elab_Structural_addSmartUnfoldingDefAux___lambda__1___boxed(lean_object*, lean_object*); +lean_object* l_Lean_Expr_constName_x21(lean_object*); +lean_object* l_Lean_Expr_withAppAux___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__3(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit_match__2___rarg(uint8_t, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Structural_addSmartUnfoldingDefAux___lambda__2___boxed(lean_object*, lean_object*); +uint8_t lean_nat_dec_lt(lean_object*, lean_object*); +lean_object* l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit_match__1___rarg(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; lean_object* x_4; lean_object* x_5; +x_3 = lean_ctor_get(x_1, 0); +lean_inc(x_3); +x_4 = lean_ctor_get(x_1, 1); +lean_inc(x_4); +lean_dec(x_1); +x_5 = lean_apply_2(x_2, x_3, x_4); +return x_5; +} +} +lean_object* l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit_match__1(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit_match__1___rarg), 2, 0); +return x_2; +} +} +lean_object* l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit_match__2___rarg(uint8_t x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +if (x_1 == 0) +{ +lean_object* x_5; lean_object* x_6; +lean_dec(x_3); +x_5 = lean_box(x_1); +x_6 = lean_apply_2(x_4, x_5, x_2); +return x_6; +} +else +{ +if (lean_obj_tag(x_2) == 0) +{ +lean_object* x_7; lean_object* x_8; +lean_dec(x_3); +x_7 = lean_box(x_1); +x_8 = lean_apply_2(x_4, x_7, x_2); +return x_8; +} +else +{ +lean_object* x_9; lean_object* x_10; +lean_dec(x_4); +x_9 = lean_ctor_get(x_2, 0); +lean_inc(x_9); +lean_dec(x_2); +x_10 = lean_apply_1(x_3, x_9); +return x_10; +} +} +} +} +lean_object* l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit_match__2(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit_match__2___rarg___boxed), 4, 0); +return x_2; +} +} +lean_object* l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit_match__2___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +uint8_t x_5; lean_object* x_6; +x_5 = lean_unbox(x_1); +lean_dec(x_1); +x_6 = l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit_match__2___rarg(x_5, x_2, x_3, x_4); +return x_6; +} +} +lean_object* l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit_match__3___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { +_start: +{ +switch (lean_obj_tag(x_1)) { +case 5: +{ +lean_object* x_9; lean_object* x_10; uint64_t x_11; lean_object* x_12; lean_object* x_13; +lean_dec(x_8); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +x_9 = lean_ctor_get(x_1, 0); +lean_inc(x_9); +x_10 = lean_ctor_get(x_1, 1); +lean_inc(x_10); +x_11 = lean_ctor_get_uint64(x_1, sizeof(void*)*2); +lean_dec(x_1); +x_12 = lean_box_uint64(x_11); +x_13 = lean_apply_3(x_7, x_9, x_10, x_12); +return x_13; +} +case 6: +{ +lean_object* x_14; lean_object* x_15; lean_object* x_16; uint64_t x_17; lean_object* x_18; lean_object* 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); +x_14 = lean_ctor_get(x_1, 0); +lean_inc(x_14); +x_15 = lean_ctor_get(x_1, 1); +lean_inc(x_15); +x_16 = lean_ctor_get(x_1, 2); +lean_inc(x_16); +x_17 = lean_ctor_get_uint64(x_1, sizeof(void*)*3); +lean_dec(x_1); +x_18 = lean_box_uint64(x_17); +x_19 = lean_apply_4(x_2, x_14, x_15, x_16, x_18); +return x_19; +} +case 7: +{ +lean_object* x_20; lean_object* x_21; lean_object* x_22; uint64_t x_23; lean_object* x_24; lean_object* x_25; +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_2); +x_20 = lean_ctor_get(x_1, 0); +lean_inc(x_20); +x_21 = lean_ctor_get(x_1, 1); +lean_inc(x_21); +x_22 = lean_ctor_get(x_1, 2); +lean_inc(x_22); +x_23 = lean_ctor_get_uint64(x_1, sizeof(void*)*3); +lean_dec(x_1); +x_24 = lean_box_uint64(x_23); +x_25 = lean_apply_4(x_3, x_20, x_21, x_22, x_24); +return x_25; +} +case 8: +{ +lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; uint64_t x_30; lean_object* x_31; lean_object* x_32; +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_3); +lean_dec(x_2); +x_26 = lean_ctor_get(x_1, 0); +lean_inc(x_26); +x_27 = lean_ctor_get(x_1, 1); +lean_inc(x_27); +x_28 = lean_ctor_get(x_1, 2); +lean_inc(x_28); +x_29 = lean_ctor_get(x_1, 3); +lean_inc(x_29); +x_30 = lean_ctor_get_uint64(x_1, sizeof(void*)*4); +lean_dec(x_1); +x_31 = lean_box_uint64(x_30); +x_32 = lean_apply_5(x_4, x_26, x_27, x_28, x_29, x_31); +return x_32; +} +case 10: +{ +lean_object* x_33; lean_object* x_34; uint64_t x_35; lean_object* x_36; lean_object* x_37; +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +x_33 = lean_ctor_get(x_1, 0); +lean_inc(x_33); +x_34 = lean_ctor_get(x_1, 1); +lean_inc(x_34); +x_35 = lean_ctor_get_uint64(x_1, sizeof(void*)*2); +lean_dec(x_1); +x_36 = lean_box_uint64(x_35); +x_37 = lean_apply_3(x_5, x_33, x_34, x_36); +return x_37; +} +case 11: +{ +lean_object* x_38; lean_object* x_39; lean_object* x_40; uint64_t x_41; lean_object* x_42; lean_object* x_43; +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +x_38 = lean_ctor_get(x_1, 0); +lean_inc(x_38); +x_39 = lean_ctor_get(x_1, 1); +lean_inc(x_39); +x_40 = lean_ctor_get(x_1, 2); +lean_inc(x_40); +x_41 = lean_ctor_get_uint64(x_1, sizeof(void*)*3); +lean_dec(x_1); +x_42 = lean_box_uint64(x_41); +x_43 = lean_apply_4(x_6, x_38, x_39, x_40, x_42); +return x_43; +} +default: +{ +lean_object* x_44; +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +x_44 = lean_apply_1(x_8, x_1); +return x_44; +} +} +} +} +lean_object* l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit_match__3(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit_match__3___rarg), 8, 0); +return x_2; +} +} +static lean_object* _init_l_Lean_Meta_matchMatcherApp_x3f___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__1___closed__1() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_levelZero; +x_2 = l_Lean_mkSort(x_1); +return x_2; +} +} +lean_object* l_Lean_Meta_matchMatcherApp_x3f___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { +_start: +{ +lean_object* x_7; +x_7 = l_Lean_Expr_getAppFn(x_1); +if (lean_obj_tag(x_7) == 4) +{ +lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; +x_8 = lean_ctor_get(x_7, 0); +lean_inc(x_8); +x_9 = lean_ctor_get(x_7, 1); +lean_inc(x_9); +lean_dec(x_7); +lean_inc(x_8); +x_10 = l_Lean_Meta_getMatcherInfo_x3f___at_Lean_Meta_reduceMatcher_x3f___spec__1(x_8, x_2, x_3, x_4, x_5, x_6); +x_11 = lean_ctor_get(x_10, 0); +lean_inc(x_11); +if (lean_obj_tag(x_11) == 0) +{ +uint8_t x_12; +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_1); +x_12 = !lean_is_exclusive(x_10); +if (x_12 == 0) +{ +lean_object* x_13; lean_object* x_14; +x_13 = lean_ctor_get(x_10, 0); +lean_dec(x_13); +x_14 = lean_box(0); +lean_ctor_set(x_10, 0, x_14); +return x_10; +} +else +{ +lean_object* x_15; lean_object* x_16; lean_object* x_17; +x_15 = lean_ctor_get(x_10, 1); +lean_inc(x_15); +lean_dec(x_10); +x_16 = lean_box(0); +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; +} +} +else +{ +uint8_t x_18; +x_18 = !lean_is_exclusive(x_10); +if (x_18 == 0) +{ +lean_object* x_19; uint8_t x_20; +x_19 = lean_ctor_get(x_10, 0); +lean_dec(x_19); +x_20 = !lean_is_exclusive(x_11); +if (x_20 == 0) +{ +lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; uint8_t x_31; +x_21 = lean_ctor_get(x_11, 0); +x_22 = lean_unsigned_to_nat(0u); +x_23 = l_Lean_Expr_getAppNumArgsAux(x_1, x_22); +x_24 = l_Lean_Meta_matchMatcherApp_x3f___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__1___closed__1; +lean_inc(x_23); +x_25 = lean_mk_array(x_23, x_24); +x_26 = lean_unsigned_to_nat(1u); +x_27 = lean_nat_sub(x_23, x_26); +lean_dec(x_23); +x_28 = l___private_Lean_Expr_0__Lean_Expr_getAppArgsAux(x_1, x_25, x_27); +x_29 = lean_array_get_size(x_28); +x_30 = l_Lean_Meta_Match_MatcherInfo_arity(x_21); +x_31 = lean_nat_dec_lt(x_29, x_30); +lean_dec(x_30); +if (x_31 == 0) +{ +lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_object* x_51; lean_object* x_52; +x_32 = l_List_redLength___rarg(x_9); +x_33 = lean_mk_empty_array_with_capacity(x_32); +lean_dec(x_32); +x_34 = l_List_toArrayAux___rarg(x_9, x_33); +x_35 = lean_ctor_get(x_21, 3); +lean_inc(x_35); +x_36 = lean_ctor_get(x_21, 0); +lean_inc(x_36); +lean_inc(x_36); +lean_inc(x_28); +x_37 = l_Array_extract___rarg(x_28, x_22, x_36); +x_38 = l_Lean_instInhabitedExpr; +x_39 = lean_array_get(x_38, x_28, x_36); +x_40 = lean_nat_add(x_36, x_26); +lean_dec(x_36); +x_41 = lean_ctor_get(x_21, 1); +lean_inc(x_41); +x_42 = lean_nat_add(x_40, x_41); +lean_dec(x_41); +lean_inc(x_42); +lean_inc(x_28); +x_43 = l_Array_toSubarray___rarg(x_28, x_40, x_42); +x_44 = l_Array_ofSubarray___rarg(x_43); +x_45 = lean_ctor_get(x_21, 2); +lean_inc(x_45); +x_46 = l_Lean_Meta_Match_MatcherInfo_numAlts(x_21); +lean_dec(x_21); +x_47 = lean_nat_add(x_42, x_46); +lean_dec(x_46); +lean_inc(x_47); +lean_inc(x_28); +x_48 = l_Array_toSubarray___rarg(x_28, x_42, x_47); +x_49 = l_Array_ofSubarray___rarg(x_48); +x_50 = l_Array_toSubarray___rarg(x_28, x_47, x_29); +x_51 = l_Array_ofSubarray___rarg(x_50); +x_52 = lean_alloc_ctor(0, 9, 0); +lean_ctor_set(x_52, 0, x_8); +lean_ctor_set(x_52, 1, x_34); +lean_ctor_set(x_52, 2, x_35); +lean_ctor_set(x_52, 3, x_37); +lean_ctor_set(x_52, 4, x_39); +lean_ctor_set(x_52, 5, x_44); +lean_ctor_set(x_52, 6, x_45); +lean_ctor_set(x_52, 7, x_49); +lean_ctor_set(x_52, 8, x_51); +lean_ctor_set(x_11, 0, x_52); +return x_10; +} +else +{ +lean_object* x_53; +lean_dec(x_29); +lean_dec(x_28); +lean_free_object(x_11); +lean_dec(x_21); +lean_dec(x_9); +lean_dec(x_8); +x_53 = lean_box(0); +lean_ctor_set(x_10, 0, x_53); +return x_10; +} +} +else +{ +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; lean_object* x_62; lean_object* x_63; uint8_t x_64; +x_54 = lean_ctor_get(x_11, 0); +lean_inc(x_54); +lean_dec(x_11); +x_55 = lean_unsigned_to_nat(0u); +x_56 = l_Lean_Expr_getAppNumArgsAux(x_1, x_55); +x_57 = l_Lean_Meta_matchMatcherApp_x3f___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__1___closed__1; +lean_inc(x_56); +x_58 = lean_mk_array(x_56, x_57); +x_59 = lean_unsigned_to_nat(1u); +x_60 = lean_nat_sub(x_56, x_59); +lean_dec(x_56); +x_61 = l___private_Lean_Expr_0__Lean_Expr_getAppArgsAux(x_1, x_58, x_60); +x_62 = lean_array_get_size(x_61); +x_63 = l_Lean_Meta_Match_MatcherInfo_arity(x_54); +x_64 = lean_nat_dec_lt(x_62, x_63); +lean_dec(x_63); +if (x_64 == 0) +{ +lean_object* x_65; lean_object* x_66; lean_object* x_67; lean_object* x_68; lean_object* x_69; lean_object* x_70; lean_object* x_71; lean_object* x_72; lean_object* x_73; lean_object* x_74; lean_object* x_75; lean_object* x_76; lean_object* x_77; lean_object* x_78; lean_object* x_79; lean_object* x_80; lean_object* x_81; lean_object* x_82; lean_object* x_83; lean_object* x_84; lean_object* x_85; lean_object* x_86; +x_65 = l_List_redLength___rarg(x_9); +x_66 = lean_mk_empty_array_with_capacity(x_65); +lean_dec(x_65); +x_67 = l_List_toArrayAux___rarg(x_9, x_66); +x_68 = lean_ctor_get(x_54, 3); +lean_inc(x_68); +x_69 = lean_ctor_get(x_54, 0); +lean_inc(x_69); +lean_inc(x_69); +lean_inc(x_61); +x_70 = l_Array_extract___rarg(x_61, x_55, x_69); +x_71 = l_Lean_instInhabitedExpr; +x_72 = lean_array_get(x_71, x_61, x_69); +x_73 = lean_nat_add(x_69, x_59); +lean_dec(x_69); +x_74 = lean_ctor_get(x_54, 1); +lean_inc(x_74); +x_75 = lean_nat_add(x_73, x_74); +lean_dec(x_74); +lean_inc(x_75); +lean_inc(x_61); +x_76 = l_Array_toSubarray___rarg(x_61, x_73, x_75); +x_77 = l_Array_ofSubarray___rarg(x_76); +x_78 = lean_ctor_get(x_54, 2); +lean_inc(x_78); +x_79 = l_Lean_Meta_Match_MatcherInfo_numAlts(x_54); +lean_dec(x_54); +x_80 = lean_nat_add(x_75, x_79); +lean_dec(x_79); +lean_inc(x_80); +lean_inc(x_61); +x_81 = l_Array_toSubarray___rarg(x_61, x_75, x_80); +x_82 = l_Array_ofSubarray___rarg(x_81); +x_83 = l_Array_toSubarray___rarg(x_61, x_80, x_62); +x_84 = l_Array_ofSubarray___rarg(x_83); +x_85 = lean_alloc_ctor(0, 9, 0); +lean_ctor_set(x_85, 0, x_8); +lean_ctor_set(x_85, 1, x_67); +lean_ctor_set(x_85, 2, x_68); +lean_ctor_set(x_85, 3, x_70); +lean_ctor_set(x_85, 4, x_72); +lean_ctor_set(x_85, 5, x_77); +lean_ctor_set(x_85, 6, x_78); +lean_ctor_set(x_85, 7, x_82); +lean_ctor_set(x_85, 8, x_84); +x_86 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_86, 0, x_85); +lean_ctor_set(x_10, 0, x_86); +return x_10; +} +else +{ +lean_object* x_87; +lean_dec(x_62); +lean_dec(x_61); +lean_dec(x_54); +lean_dec(x_9); +lean_dec(x_8); +x_87 = lean_box(0); +lean_ctor_set(x_10, 0, x_87); +return x_10; +} +} +} +else +{ +lean_object* x_88; lean_object* x_89; lean_object* x_90; lean_object* x_91; lean_object* x_92; lean_object* x_93; lean_object* x_94; lean_object* x_95; lean_object* x_96; lean_object* x_97; lean_object* x_98; lean_object* x_99; uint8_t x_100; +x_88 = lean_ctor_get(x_10, 1); +lean_inc(x_88); +lean_dec(x_10); +x_89 = lean_ctor_get(x_11, 0); +lean_inc(x_89); +if (lean_is_exclusive(x_11)) { + lean_ctor_release(x_11, 0); + x_90 = x_11; +} else { + lean_dec_ref(x_11); + x_90 = lean_box(0); +} +x_91 = lean_unsigned_to_nat(0u); +x_92 = l_Lean_Expr_getAppNumArgsAux(x_1, x_91); +x_93 = l_Lean_Meta_matchMatcherApp_x3f___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__1___closed__1; +lean_inc(x_92); +x_94 = lean_mk_array(x_92, x_93); +x_95 = lean_unsigned_to_nat(1u); +x_96 = lean_nat_sub(x_92, x_95); +lean_dec(x_92); +x_97 = l___private_Lean_Expr_0__Lean_Expr_getAppArgsAux(x_1, x_94, x_96); +x_98 = lean_array_get_size(x_97); +x_99 = l_Lean_Meta_Match_MatcherInfo_arity(x_89); +x_100 = lean_nat_dec_lt(x_98, x_99); +lean_dec(x_99); +if (x_100 == 0) +{ +lean_object* x_101; lean_object* x_102; lean_object* x_103; lean_object* x_104; lean_object* x_105; lean_object* x_106; lean_object* x_107; lean_object* x_108; lean_object* x_109; lean_object* x_110; lean_object* x_111; lean_object* x_112; lean_object* x_113; lean_object* x_114; lean_object* x_115; lean_object* x_116; lean_object* x_117; lean_object* x_118; lean_object* x_119; lean_object* x_120; lean_object* x_121; lean_object* x_122; lean_object* x_123; +x_101 = l_List_redLength___rarg(x_9); +x_102 = lean_mk_empty_array_with_capacity(x_101); +lean_dec(x_101); +x_103 = l_List_toArrayAux___rarg(x_9, x_102); +x_104 = lean_ctor_get(x_89, 3); +lean_inc(x_104); +x_105 = lean_ctor_get(x_89, 0); +lean_inc(x_105); +lean_inc(x_105); +lean_inc(x_97); +x_106 = l_Array_extract___rarg(x_97, x_91, x_105); +x_107 = l_Lean_instInhabitedExpr; +x_108 = lean_array_get(x_107, x_97, x_105); +x_109 = lean_nat_add(x_105, x_95); +lean_dec(x_105); +x_110 = lean_ctor_get(x_89, 1); +lean_inc(x_110); +x_111 = lean_nat_add(x_109, x_110); +lean_dec(x_110); +lean_inc(x_111); +lean_inc(x_97); +x_112 = l_Array_toSubarray___rarg(x_97, x_109, x_111); +x_113 = l_Array_ofSubarray___rarg(x_112); +x_114 = lean_ctor_get(x_89, 2); +lean_inc(x_114); +x_115 = l_Lean_Meta_Match_MatcherInfo_numAlts(x_89); +lean_dec(x_89); +x_116 = lean_nat_add(x_111, x_115); +lean_dec(x_115); +lean_inc(x_116); +lean_inc(x_97); +x_117 = l_Array_toSubarray___rarg(x_97, x_111, x_116); +x_118 = l_Array_ofSubarray___rarg(x_117); +x_119 = l_Array_toSubarray___rarg(x_97, x_116, x_98); +x_120 = l_Array_ofSubarray___rarg(x_119); +x_121 = lean_alloc_ctor(0, 9, 0); +lean_ctor_set(x_121, 0, x_8); +lean_ctor_set(x_121, 1, x_103); +lean_ctor_set(x_121, 2, x_104); +lean_ctor_set(x_121, 3, x_106); +lean_ctor_set(x_121, 4, x_108); +lean_ctor_set(x_121, 5, x_113); +lean_ctor_set(x_121, 6, x_114); +lean_ctor_set(x_121, 7, x_118); +lean_ctor_set(x_121, 8, x_120); +if (lean_is_scalar(x_90)) { + x_122 = lean_alloc_ctor(1, 1, 0); +} else { + x_122 = x_90; +} +lean_ctor_set(x_122, 0, x_121); +x_123 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_123, 0, x_122); +lean_ctor_set(x_123, 1, x_88); +return x_123; +} +else +{ +lean_object* x_124; lean_object* x_125; +lean_dec(x_98); +lean_dec(x_97); +lean_dec(x_90); +lean_dec(x_89); +lean_dec(x_9); +lean_dec(x_8); +x_124 = lean_box(0); +x_125 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_125, 0, x_124); +lean_ctor_set(x_125, 1, x_88); +return x_125; +} +} +} +} +else +{ +lean_object* x_126; lean_object* x_127; +lean_dec(x_7); +lean_dec(x_1); +x_126 = lean_box(0); +x_127 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_127, 0, x_126); +lean_ctor_set(x_127, 1, x_6); +return x_127; +} +} +} +lean_object* l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__2(lean_object* x_1, lean_object* x_2, size_t x_3, size_t 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; +x_11 = x_4 < x_3; +if (x_11 == 0) +{ +lean_object* x_12; lean_object* x_13; +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_2); +lean_dec(x_1); +x_12 = x_5; +x_13 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_13, 0, x_12); +lean_ctor_set(x_13, 1, x_10); +return x_13; +} +else +{ +lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; +x_14 = lean_array_uget(x_5, x_4); +x_15 = lean_unsigned_to_nat(0u); +x_16 = lean_array_uset(x_5, x_4, x_15); +x_17 = x_14; +lean_inc(x_9); +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_6); +lean_inc(x_2); +lean_inc(x_1); +x_18 = l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit(x_1, x_2, x_17, x_6, x_7, x_8, x_9, x_10); +if (lean_obj_tag(x_18) == 0) +{ +lean_object* x_19; lean_object* x_20; size_t x_21; size_t x_22; lean_object* x_23; lean_object* x_24; +x_19 = lean_ctor_get(x_18, 0); +lean_inc(x_19); +x_20 = lean_ctor_get(x_18, 1); +lean_inc(x_20); +lean_dec(x_18); +x_21 = 1; +x_22 = x_4 + x_21; +x_23 = x_19; +x_24 = lean_array_uset(x_16, x_4, x_23); +x_4 = x_22; +x_5 = x_24; +x_10 = x_20; +goto _start; +} +else +{ +uint8_t x_26; +lean_dec(x_16); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_2); +lean_dec(x_1); +x_26 = !lean_is_exclusive(x_18); +if (x_26 == 0) +{ +return x_18; +} +else +{ +lean_object* x_27; lean_object* x_28; lean_object* x_29; +x_27 = lean_ctor_get(x_18, 0); +x_28 = lean_ctor_get(x_18, 1); +lean_inc(x_28); +lean_inc(x_27); +lean_dec(x_18); +x_29 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_29, 0, x_27); +lean_ctor_set(x_29, 1, x_28); +return x_29; +} +} +} +} +} +static lean_object* _init_l_Lean_Expr_withAppAux___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__3___boxed__const__1() { +_start: +{ +size_t x_1; lean_object* x_2; +x_1 = 0; +x_2 = lean_box_usize(x_1); +return x_2; +} +} +lean_object* l_Lean_Expr_withAppAux___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__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_object* x_10) { +_start: +{ +if (lean_obj_tag(x_3) == 5) +{ +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_3, 0); +lean_inc(x_11); +x_12 = lean_ctor_get(x_3, 1); +lean_inc(x_12); +lean_dec(x_3); +x_13 = lean_array_set(x_4, x_5, x_12); +x_14 = lean_unsigned_to_nat(1u); +x_15 = lean_nat_sub(x_5, x_14); +lean_dec(x_5); +x_3 = x_11; +x_4 = x_13; +x_5 = x_15; +goto _start; +} +else +{ +lean_object* x_17; +lean_dec(x_5); +lean_inc(x_9); +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_6); +lean_inc(x_2); +lean_inc(x_1); +x_17 = l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit(x_1, x_2, x_3, x_6, x_7, x_8, x_9, x_10); +if (lean_obj_tag(x_17) == 0) +{ +lean_object* x_18; lean_object* x_19; lean_object* x_20; size_t x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; +x_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 = lean_array_get_size(x_4); +x_21 = lean_usize_of_nat(x_20); +lean_dec(x_20); +x_22 = x_4; +x_23 = lean_box_usize(x_21); +x_24 = l_Lean_Expr_withAppAux___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__3___boxed__const__1; +x_25 = lean_alloc_closure((void*)(l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__2___boxed), 10, 5); +lean_closure_set(x_25, 0, x_1); +lean_closure_set(x_25, 1, x_2); +lean_closure_set(x_25, 2, x_23); +lean_closure_set(x_25, 3, x_24); +lean_closure_set(x_25, 4, x_22); +x_26 = x_25; +x_27 = lean_apply_5(x_26, x_6, x_7, x_8, x_9, x_19); +if (lean_obj_tag(x_27) == 0) +{ +uint8_t x_28; +x_28 = !lean_is_exclusive(x_27); +if (x_28 == 0) +{ +lean_object* x_29; lean_object* x_30; +x_29 = lean_ctor_get(x_27, 0); +x_30 = l_Lean_mkAppN(x_18, x_29); +lean_ctor_set(x_27, 0, x_30); +return x_27; +} +else +{ +lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; +x_31 = lean_ctor_get(x_27, 0); +x_32 = lean_ctor_get(x_27, 1); +lean_inc(x_32); +lean_inc(x_31); +lean_dec(x_27); +x_33 = l_Lean_mkAppN(x_18, x_31); +x_34 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_34, 0, x_33); +lean_ctor_set(x_34, 1, x_32); +return x_34; +} +} +else +{ +uint8_t x_35; +lean_dec(x_18); +x_35 = !lean_is_exclusive(x_27); +if (x_35 == 0) +{ +return x_27; +} +else +{ +lean_object* x_36; lean_object* x_37; lean_object* x_38; +x_36 = lean_ctor_get(x_27, 0); +x_37 = lean_ctor_get(x_27, 1); +lean_inc(x_37); +lean_inc(x_36); +lean_dec(x_27); +x_38 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_38, 0, x_36); +lean_ctor_set(x_38, 1, x_37); +return x_38; +} +} +} +else +{ +uint8_t x_39; +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_4); +lean_dec(x_2); +lean_dec(x_1); +x_39 = !lean_is_exclusive(x_17); +if (x_39 == 0) +{ +return x_17; +} +else +{ +lean_object* x_40; lean_object* x_41; lean_object* x_42; +x_40 = lean_ctor_get(x_17, 0); +x_41 = lean_ctor_get(x_17, 1); +lean_inc(x_41); +lean_inc(x_40); +lean_dec(x_17); +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; +} +} +} +} +} +lean_object* l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__4(lean_object* x_1, lean_object* x_2, size_t x_3, size_t 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; +x_11 = x_4 < x_3; +if (x_11 == 0) +{ +lean_object* x_12; lean_object* x_13; +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_2); +lean_dec(x_1); +x_12 = x_5; +x_13 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_13, 0, x_12); +lean_ctor_set(x_13, 1, x_10); +return x_13; +} +else +{ +lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; +x_14 = lean_array_uget(x_5, x_4); +x_15 = lean_unsigned_to_nat(0u); +x_16 = lean_array_uset(x_5, x_4, x_15); +x_17 = x_14; +lean_inc(x_9); +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_6); +lean_inc(x_2); +lean_inc(x_1); +x_18 = l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit(x_1, x_2, x_17, x_6, x_7, x_8, x_9, x_10); +if (lean_obj_tag(x_18) == 0) +{ +lean_object* x_19; lean_object* x_20; size_t x_21; size_t x_22; lean_object* x_23; lean_object* x_24; +x_19 = lean_ctor_get(x_18, 0); +lean_inc(x_19); +x_20 = lean_ctor_get(x_18, 1); +lean_inc(x_20); +lean_dec(x_18); +x_21 = 1; +x_22 = x_4 + x_21; +x_23 = x_19; +x_24 = lean_array_uset(x_16, x_4, x_23); +x_4 = x_22; +x_5 = x_24; +x_10 = x_20; +goto _start; +} +else +{ +uint8_t x_26; +lean_dec(x_16); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_2); +lean_dec(x_1); +x_26 = !lean_is_exclusive(x_18); +if (x_26 == 0) +{ +return x_18; +} +else +{ +lean_object* x_27; lean_object* x_28; lean_object* x_29; +x_27 = lean_ctor_get(x_18, 0); +x_28 = lean_ctor_get(x_18, 1); +lean_inc(x_28); +lean_inc(x_27); +lean_dec(x_18); +x_29 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_29, 0, x_27); +lean_ctor_set(x_29, 1, x_28); +return x_29; +} +} +} +} +} +static lean_object* _init_l_Lean_Expr_withAppAux___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__5___boxed__const__1() { +_start: +{ +size_t x_1; lean_object* x_2; +x_1 = 0; +x_2 = lean_box_usize(x_1); +return x_2; +} +} +lean_object* l_Lean_Expr_withAppAux___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__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, lean_object* x_10) { +_start: +{ +if (lean_obj_tag(x_3) == 5) +{ +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_3, 0); +lean_inc(x_11); +x_12 = lean_ctor_get(x_3, 1); +lean_inc(x_12); +lean_dec(x_3); +x_13 = lean_array_set(x_4, x_5, x_12); +x_14 = lean_unsigned_to_nat(1u); +x_15 = lean_nat_sub(x_5, x_14); +lean_dec(x_5); +x_3 = x_11; +x_4 = x_13; +x_5 = x_15; +goto _start; +} +else +{ +lean_object* x_17; +lean_dec(x_5); +lean_inc(x_9); +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_6); +lean_inc(x_2); +lean_inc(x_1); +x_17 = l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit(x_1, x_2, x_3, x_6, x_7, x_8, x_9, x_10); +if (lean_obj_tag(x_17) == 0) +{ +lean_object* x_18; lean_object* x_19; lean_object* x_20; size_t x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; +x_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 = lean_array_get_size(x_4); +x_21 = lean_usize_of_nat(x_20); +lean_dec(x_20); +x_22 = x_4; +x_23 = lean_box_usize(x_21); +x_24 = l_Lean_Expr_withAppAux___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__5___boxed__const__1; +x_25 = lean_alloc_closure((void*)(l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__4___boxed), 10, 5); +lean_closure_set(x_25, 0, x_1); +lean_closure_set(x_25, 1, x_2); +lean_closure_set(x_25, 2, x_23); +lean_closure_set(x_25, 3, x_24); +lean_closure_set(x_25, 4, x_22); +x_26 = x_25; +x_27 = lean_apply_5(x_26, x_6, x_7, x_8, x_9, x_19); +if (lean_obj_tag(x_27) == 0) +{ +uint8_t x_28; +x_28 = !lean_is_exclusive(x_27); +if (x_28 == 0) +{ +lean_object* x_29; lean_object* x_30; +x_29 = lean_ctor_get(x_27, 0); +x_30 = l_Lean_mkAppN(x_18, x_29); +lean_ctor_set(x_27, 0, x_30); +return x_27; +} +else +{ +lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; +x_31 = lean_ctor_get(x_27, 0); +x_32 = lean_ctor_get(x_27, 1); +lean_inc(x_32); +lean_inc(x_31); +lean_dec(x_27); +x_33 = l_Lean_mkAppN(x_18, x_31); +x_34 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_34, 0, x_33); +lean_ctor_set(x_34, 1, x_32); +return x_34; +} +} +else +{ +uint8_t x_35; +lean_dec(x_18); +x_35 = !lean_is_exclusive(x_27); +if (x_35 == 0) +{ +return x_27; +} +else +{ +lean_object* x_36; lean_object* x_37; lean_object* x_38; +x_36 = lean_ctor_get(x_27, 0); +x_37 = lean_ctor_get(x_27, 1); +lean_inc(x_37); +lean_inc(x_36); +lean_dec(x_27); +x_38 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_38, 0, x_36); +lean_ctor_set(x_38, 1, x_37); +return x_38; +} +} +} +else +{ +uint8_t x_39; +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_4); +lean_dec(x_2); +lean_dec(x_1); +x_39 = !lean_is_exclusive(x_17); +if (x_39 == 0) +{ +return x_17; +} +else +{ +lean_object* x_40; lean_object* x_41; lean_object* x_42; +x_40 = lean_ctor_get(x_17, 0); +x_41 = lean_ctor_get(x_17, 1); +lean_inc(x_41); +lean_inc(x_40); +lean_dec(x_17); +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; +} +} +} +} +} +lean_object* l_Lean_Meta_lambdaTelescope___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__6___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { +_start: +{ +uint8_t x_8; lean_object* x_9; +x_8 = 0; +x_9 = l___private_Lean_Meta_Basic_0__Lean_Meta_lambdaTelescopeImp___rarg(x_1, x_8, x_2, x_3, x_4, x_5, x_6, x_7); +if (lean_obj_tag(x_9) == 0) +{ +uint8_t x_10; +x_10 = !lean_is_exclusive(x_9); +if (x_10 == 0) +{ +return x_9; +} +else +{ +lean_object* x_11; lean_object* x_12; lean_object* x_13; +x_11 = lean_ctor_get(x_9, 0); +x_12 = lean_ctor_get(x_9, 1); +lean_inc(x_12); +lean_inc(x_11); +lean_dec(x_9); +x_13 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_13, 0, x_11); +lean_ctor_set(x_13, 1, x_12); +return x_13; +} +} +else +{ +uint8_t x_14; +x_14 = !lean_is_exclusive(x_9); +if (x_14 == 0) +{ +return x_9; +} +else +{ +lean_object* x_15; lean_object* x_16; lean_object* x_17; +x_15 = lean_ctor_get(x_9, 0); +x_16 = lean_ctor_get(x_9, 1); +lean_inc(x_16); +lean_inc(x_15); +lean_dec(x_9); +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_object* l_Lean_Meta_lambdaTelescope___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__6(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_Lean_Meta_lambdaTelescope___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__6___rarg), 7, 0); +return x_2; +} +} +lean_object* l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__7___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; uint8_t x_13; +lean_inc(x_1); +lean_inc(x_2); +x_12 = lean_apply_1(x_1, x_2); +x_13 = lean_unbox(x_12); +lean_dec(x_12); +if (x_13 == 0) +{ +lean_object* x_14; lean_object* x_15; lean_object* x_16; uint8_t x_17; uint8_t x_18; lean_object* x_19; +lean_dec(x_5); +lean_dec(x_1); +x_14 = lean_array_get_size(x_3); +lean_inc(x_4); +lean_inc(x_3); +x_15 = l_Array_toSubarray___rarg(x_3, x_4, x_14); +x_16 = l_Array_ofSubarray___rarg(x_15); +x_17 = 0; +x_18 = 1; +lean_inc(x_7); +x_19 = l_Lean_Meta_mkLambdaFVars(x_16, x_2, x_17, x_18, x_7, x_8, x_9, x_10, x_11); +if (lean_obj_tag(x_19) == 0) +{ +lean_object* x_20; lean_object* x_21; lean_object* x_22; +x_20 = lean_ctor_get(x_19, 0); +lean_inc(x_20); +x_21 = lean_ctor_get(x_19, 1); +lean_inc(x_21); +lean_dec(x_19); +lean_inc(x_10); +lean_inc(x_9); +lean_inc(x_8); +lean_inc(x_7); +x_22 = l_Lean_Meta_mkIdRhs(x_20, x_7, x_8, x_9, x_10, x_21); +if (lean_obj_tag(x_22) == 0) +{ +lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; +x_23 = lean_ctor_get(x_22, 0); +lean_inc(x_23); +x_24 = lean_ctor_get(x_22, 1); +lean_inc(x_24); +lean_dec(x_22); +x_25 = lean_unsigned_to_nat(0u); +x_26 = l_Array_toSubarray___rarg(x_3, x_25, x_4); +x_27 = l_Array_ofSubarray___rarg(x_26); +x_28 = l_Lean_Meta_mkLambdaFVars(x_27, x_23, x_17, x_18, x_7, x_8, x_9, x_10, x_24); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +return x_28; +} +else +{ +uint8_t x_29; +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_4); +lean_dec(x_3); +x_29 = !lean_is_exclusive(x_22); +if (x_29 == 0) +{ +return x_22; +} +else +{ +lean_object* x_30; lean_object* x_31; lean_object* x_32; +x_30 = lean_ctor_get(x_22, 0); +x_31 = lean_ctor_get(x_22, 1); +lean_inc(x_31); +lean_inc(x_30); +lean_dec(x_22); +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; +} +} +} +else +{ +uint8_t x_33; +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_4); +lean_dec(x_3); +x_33 = !lean_is_exclusive(x_19); +if (x_33 == 0) +{ +return x_19; +} +else +{ +lean_object* x_34; lean_object* x_35; lean_object* x_36; +x_34 = lean_ctor_get(x_19, 0); +x_35 = lean_ctor_get(x_19, 1); +lean_inc(x_35); +lean_inc(x_34); +lean_dec(x_19); +x_36 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_36, 0, x_34); +lean_ctor_set(x_36, 1, x_35); +return x_36; +} +} +} +else +{ +lean_object* x_37; +lean_dec(x_4); +lean_inc(x_10); +lean_inc(x_9); +lean_inc(x_8); +lean_inc(x_7); +x_37 = l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit(x_5, x_1, x_2, x_7, x_8, x_9, x_10, x_11); +if (lean_obj_tag(x_37) == 0) +{ +lean_object* x_38; lean_object* x_39; uint8_t x_40; uint8_t x_41; lean_object* x_42; +x_38 = lean_ctor_get(x_37, 0); +lean_inc(x_38); +x_39 = lean_ctor_get(x_37, 1); +lean_inc(x_39); +lean_dec(x_37); +x_40 = 0; +x_41 = 1; +x_42 = l_Lean_Meta_mkLambdaFVars(x_3, x_38, x_40, x_41, x_7, x_8, x_9, x_10, x_39); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +return x_42; +} +else +{ +uint8_t x_43; +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_3); +x_43 = !lean_is_exclusive(x_37); +if (x_43 == 0) +{ +return x_37; +} +else +{ +lean_object* x_44; lean_object* x_45; lean_object* x_46; +x_44 = lean_ctor_get(x_37, 0); +x_45 = lean_ctor_get(x_37, 1); +lean_inc(x_45); +lean_inc(x_44); +lean_dec(x_37); +x_46 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_46, 0, x_44); +lean_ctor_set(x_46, 1, x_45); +return x_46; +} +} +} +} +} +static lean_object* _init_l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__7___lambda__2___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("unexpected matcher application alternative"); +return x_1; +} +} +static lean_object* _init_l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__7___lambda__2___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__7___lambda__2___closed__1; +x_2 = l_Lean_stringToMessageData(x_1); +return x_2; +} +} +static lean_object* _init_l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__7___lambda__2___closed__3() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("\nat application"); +return x_1; +} +} +static lean_object* _init_l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__7___lambda__2___closed__4() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__7___lambda__2___closed__3; +x_2 = l_Lean_stringToMessageData(x_1); +return x_2; +} +} +static lean_object* _init_l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__7___lambda__2___closed__5() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string(""); +return x_1; +} +} +static lean_object* _init_l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__7___lambda__2___closed__6() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__7___lambda__2___closed__5; +x_2 = l_Lean_stringToMessageData(x_1); +return x_2; +} +} +lean_object* l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__7___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_object* x_12) { +_start: +{ +lean_object* x_13; uint8_t x_14; +x_13 = lean_array_get_size(x_6); +x_14 = lean_nat_dec_le(x_2, x_13); +lean_dec(x_13); +if (x_14 == 0) +{ +lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; uint8_t x_25; +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_15 = l_Lean_indentExpr(x_4); +x_16 = l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__7___lambda__2___closed__2; +x_17 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_17, 0, x_16); +lean_ctor_set(x_17, 1, x_15); +x_18 = l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__7___lambda__2___closed__4; +x_19 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_19, 0, x_17); +lean_ctor_set(x_19, 1, x_18); +x_20 = l_Lean_indentExpr(x_5); +x_21 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_21, 0, x_19); +lean_ctor_set(x_21, 1, x_20); +x_22 = l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__7___lambda__2___closed__6; +x_23 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_23, 0, x_21); +lean_ctor_set(x_23, 1, x_22); +x_24 = l_Lean_throwError___at_Lean_Meta_withIncRecDepth___spec__1(x_23, x_8, x_9, x_10, x_11, x_12); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +x_25 = !lean_is_exclusive(x_24); +if (x_25 == 0) +{ +return x_24; +} +else +{ +lean_object* x_26; lean_object* x_27; lean_object* x_28; +x_26 = lean_ctor_get(x_24, 0); +x_27 = lean_ctor_get(x_24, 1); +lean_inc(x_27); +lean_inc(x_26); +lean_dec(x_24); +x_28 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_28, 0, x_26); +lean_ctor_set(x_28, 1, x_27); +return x_28; +} +} +else +{ +lean_object* x_29; lean_object* x_30; +lean_dec(x_5); +lean_dec(x_4); +x_29 = lean_box(0); +x_30 = l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__7___lambda__1(x_1, x_7, x_6, x_2, x_3, x_29, x_8, x_9, x_10, x_11, x_12); +return x_30; +} +} +} +lean_object* l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__7(lean_object* x_1, lean_object* x_2, lean_object* x_3, size_t x_4, size_t 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: +{ +uint8_t x_12; +x_12 = x_5 < x_4; +if (x_12 == 0) +{ +lean_object* x_13; lean_object* x_14; +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_13 = x_6; +x_14 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_14, 0, x_13); +lean_ctor_set(x_14, 1, x_11); +return x_14; +} +else +{ +lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; +x_15 = lean_array_uget(x_6, x_5); +x_16 = lean_unsigned_to_nat(0u); +x_17 = lean_array_uset(x_6, x_5, x_16); +x_18 = x_15; +x_19 = lean_ctor_get(x_18, 0); +lean_inc(x_19); +x_20 = lean_ctor_get(x_18, 1); +lean_inc(x_20); +lean_dec(x_18); +lean_inc(x_3); +lean_inc(x_19); +lean_inc(x_1); +lean_inc(x_2); +x_21 = lean_alloc_closure((void*)(l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__7___lambda__2), 12, 5); +lean_closure_set(x_21, 0, x_2); +lean_closure_set(x_21, 1, x_20); +lean_closure_set(x_21, 2, x_1); +lean_closure_set(x_21, 3, x_19); +lean_closure_set(x_21, 4, x_3); +lean_inc(x_10); +lean_inc(x_9); +lean_inc(x_8); +lean_inc(x_7); +x_22 = l_Lean_Meta_lambdaTelescope___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__6___rarg(x_19, x_21, x_7, x_8, x_9, x_10, x_11); +if (lean_obj_tag(x_22) == 0) +{ +lean_object* x_23; lean_object* x_24; size_t x_25; size_t x_26; lean_object* x_27; lean_object* x_28; +x_23 = lean_ctor_get(x_22, 0); +lean_inc(x_23); +x_24 = lean_ctor_get(x_22, 1); +lean_inc(x_24); +lean_dec(x_22); +x_25 = 1; +x_26 = x_5 + x_25; +x_27 = x_23; +x_28 = lean_array_uset(x_17, x_5, x_27); +x_5 = x_26; +x_6 = x_28; +x_11 = x_24; +goto _start; +} +else +{ +uint8_t x_30; +lean_dec(x_17); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_30 = !lean_is_exclusive(x_22); +if (x_30 == 0) +{ +return x_22; +} +else +{ +lean_object* x_31; lean_object* x_32; lean_object* x_33; +x_31 = lean_ctor_get(x_22, 0); +x_32 = lean_ctor_get(x_22, 1); +lean_inc(x_32); +lean_inc(x_31); +lean_dec(x_22); +x_33 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_33, 0, x_31); +lean_ctor_set(x_33, 1, x_32); +return x_33; +} +} +} +} +} +lean_object* l_Lean_Meta_withLetDecl___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__8___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9) { +_start: +{ +lean_object* x_10; +x_10 = l___private_Lean_Meta_Basic_0__Lean_Meta_withLetDeclImp___rarg(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) +{ +uint8_t x_11; +x_11 = !lean_is_exclusive(x_10); +if (x_11 == 0) +{ +return x_10; +} +else +{ +lean_object* x_12; lean_object* x_13; lean_object* x_14; +x_12 = lean_ctor_get(x_10, 0); +x_13 = lean_ctor_get(x_10, 1); +lean_inc(x_13); +lean_inc(x_12); +lean_dec(x_10); +x_14 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_14, 0, x_12); +lean_ctor_set(x_14, 1, x_13); +return x_14; +} +} +else +{ +uint8_t x_15; +x_15 = !lean_is_exclusive(x_10); +if (x_15 == 0) +{ +return x_10; +} +else +{ +lean_object* x_16; lean_object* x_17; lean_object* x_18; +x_16 = lean_ctor_get(x_10, 0); +x_17 = lean_ctor_get(x_10, 1); +lean_inc(x_17); +lean_inc(x_16); +lean_dec(x_10); +x_18 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_18, 0, x_16); +lean_ctor_set(x_18, 1, x_17); +return x_18; +} +} +} +} +lean_object* l_Lean_Meta_withLetDecl___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__8(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_Lean_Meta_withLetDecl___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__8___rarg), 9, 0); +return x_2; +} +} +lean_object* l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___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) { +_start: +{ +lean_object* x_10; +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_6); +lean_inc(x_5); +x_10 = l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit(x_1, x_2, 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; uint8_t x_13; uint8_t 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); +lean_dec(x_10); +x_13 = 0; +x_14 = 1; +x_15 = l_Lean_Meta_mkLambdaFVars(x_3, x_11, x_13, x_14, x_5, x_6, x_7, x_8, x_12); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +return x_15; +} +else +{ +uint8_t x_16; +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_3); +x_16 = !lean_is_exclusive(x_10); +if (x_16 == 0) +{ +return x_10; +} +else +{ +lean_object* x_17; lean_object* x_18; lean_object* x_19; +x_17 = lean_ctor_get(x_10, 0); +x_18 = lean_ctor_get(x_10, 1); +lean_inc(x_18); +lean_inc(x_17); +lean_dec(x_10); +x_19 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_19, 0, x_17); +lean_ctor_set(x_19, 1, x_18); +return x_19; +} +} +} +} +lean_object* l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___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; +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_6); +lean_inc(x_5); +x_10 = l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit(x_1, x_2, 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; uint8_t x_13; uint8_t 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); +lean_dec(x_10); +x_13 = 0; +x_14 = 1; +x_15 = l_Lean_Meta_mkForallFVars(x_3, x_11, x_13, x_14, x_5, x_6, x_7, x_8, x_12); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +return x_15; +} +else +{ +uint8_t x_16; +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_3); +x_16 = !lean_is_exclusive(x_10); +if (x_16 == 0) +{ +return x_10; +} +else +{ +lean_object* x_17; lean_object* x_18; lean_object* x_19; +x_17 = lean_ctor_get(x_10, 0); +x_18 = lean_ctor_get(x_10, 1); +lean_inc(x_18); +lean_inc(x_17); +lean_dec(x_10); +x_19 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_19, 0, x_17); +lean_ctor_set(x_19, 1, x_18); +return x_19; +} +} +} +} +static lean_object* _init_l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___lambda__3___closed__1() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = lean_unsigned_to_nat(1u); +x_2 = lean_mk_empty_array_with_capacity(x_1); +return x_2; +} +} +lean_object* l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___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; lean_object* x_11; +x_10 = lean_expr_instantiate1(x_1, x_4); +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_6); +lean_inc(x_5); +x_11 = l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit(x_2, x_3, x_10, 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; uint8_t x_16; uint8_t x_17; lean_object* x_18; +x_12 = lean_ctor_get(x_11, 0); +lean_inc(x_12); +x_13 = lean_ctor_get(x_11, 1); +lean_inc(x_13); +lean_dec(x_11); +x_14 = l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___lambda__3___closed__1; +x_15 = lean_array_push(x_14, x_4); +x_16 = 0; +x_17 = 1; +x_18 = l_Lean_Meta_mkLambdaFVars(x_15, x_12, x_16, x_17, x_5, x_6, x_7, x_8, x_13); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +return x_18; +} +else +{ +uint8_t x_19; +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +x_19 = !lean_is_exclusive(x_11); +if (x_19 == 0) +{ +return x_11; +} +else +{ +lean_object* x_20; lean_object* x_21; lean_object* x_22; +x_20 = lean_ctor_get(x_11, 0); +x_21 = lean_ctor_get(x_11, 1); +lean_inc(x_21); +lean_inc(x_20); +lean_dec(x_11); +x_22 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_22, 0, x_20); +lean_ctor_set(x_22, 1, x_21); +return x_22; +} +} +} +} +static lean_object* _init_l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___boxed__const__1() { +_start: +{ +size_t x_1; lean_object* x_2; +x_1 = 0; +x_2 = lean_box_usize(x_1); +return x_2; +} +} +lean_object* l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit(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: +{ +switch (lean_obj_tag(x_3)) { +case 5: +{ +lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; uint8_t x_13; +lean_inc(x_3); +x_9 = l_Lean_Meta_matchMatcherApp_x3f___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__1(x_3, x_4, x_5, x_6, x_7, x_8); +x_10 = lean_ctor_get(x_9, 0); +lean_inc(x_10); +x_11 = lean_ctor_get(x_9, 1); +lean_inc(x_11); +lean_dec(x_9); +lean_inc(x_1); +lean_inc(x_3); +x_12 = lean_apply_1(x_1, x_3); +x_13 = lean_unbox(x_12); +lean_dec(x_12); +if (x_13 == 0) +{ +lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; +lean_dec(x_10); +x_14 = lean_unsigned_to_nat(0u); +x_15 = l_Lean_Expr_getAppNumArgsAux(x_3, x_14); +x_16 = l_Lean_Meta_matchMatcherApp_x3f___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__1___closed__1; +lean_inc(x_15); +x_17 = lean_mk_array(x_15, x_16); +x_18 = lean_unsigned_to_nat(1u); +x_19 = lean_nat_sub(x_15, x_18); +lean_dec(x_15); +x_20 = l_Lean_Expr_withAppAux___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__3(x_1, x_2, x_3, x_17, x_19, x_4, x_5, x_6, x_7, x_11); +return x_20; +} +else +{ +if (lean_obj_tag(x_10) == 0) +{ +lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; +x_21 = lean_unsigned_to_nat(0u); +x_22 = l_Lean_Expr_getAppNumArgsAux(x_3, x_21); +x_23 = l_Lean_Meta_matchMatcherApp_x3f___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__1___closed__1; +lean_inc(x_22); +x_24 = lean_mk_array(x_22, x_23); +x_25 = lean_unsigned_to_nat(1u); +x_26 = lean_nat_sub(x_22, x_25); +lean_dec(x_22); +x_27 = l_Lean_Expr_withAppAux___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__5(x_1, x_2, x_3, x_24, x_26, x_4, x_5, x_6, x_7, x_11); +return x_27; +} +else +{ +lean_object* x_28; uint8_t x_29; +x_28 = lean_ctor_get(x_10, 0); +lean_inc(x_28); +lean_dec(x_10); +x_29 = !lean_is_exclusive(x_28); +if (x_29 == 0) +{ +lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; size_t 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_30 = lean_ctor_get(x_28, 0); +x_31 = lean_ctor_get(x_28, 1); +x_32 = lean_ctor_get(x_28, 2); +x_33 = lean_ctor_get(x_28, 3); +x_34 = lean_ctor_get(x_28, 4); +x_35 = lean_ctor_get(x_28, 5); +x_36 = lean_ctor_get(x_28, 6); +x_37 = lean_ctor_get(x_28, 7); +x_38 = lean_ctor_get(x_28, 8); +x_39 = l_Array_zip___rarg(x_37, x_36); +lean_dec(x_37); +x_40 = lean_array_get_size(x_39); +x_41 = lean_usize_of_nat(x_40); +lean_dec(x_40); +x_42 = x_39; +x_43 = lean_box_usize(x_41); +x_44 = l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___boxed__const__1; +x_45 = lean_alloc_closure((void*)(l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__7___boxed), 11, 6); +lean_closure_set(x_45, 0, x_1); +lean_closure_set(x_45, 1, x_2); +lean_closure_set(x_45, 2, x_3); +lean_closure_set(x_45, 3, x_43); +lean_closure_set(x_45, 4, x_44); +lean_closure_set(x_45, 5, x_42); +x_46 = x_45; +x_47 = lean_apply_5(x_46, x_4, x_5, x_6, x_7, x_11); +if (lean_obj_tag(x_47) == 0) +{ +uint8_t x_48; +x_48 = !lean_is_exclusive(x_47); +if (x_48 == 0) +{ +lean_object* x_49; lean_object* x_50; +x_49 = lean_ctor_get(x_47, 0); +lean_ctor_set(x_28, 7, x_49); +x_50 = l_Lean_Meta_MatcherApp_toExpr(x_28); +lean_ctor_set(x_47, 0, x_50); +return x_47; +} +else +{ +lean_object* x_51; lean_object* x_52; lean_object* x_53; lean_object* x_54; +x_51 = lean_ctor_get(x_47, 0); +x_52 = lean_ctor_get(x_47, 1); +lean_inc(x_52); +lean_inc(x_51); +lean_dec(x_47); +lean_ctor_set(x_28, 7, x_51); +x_53 = l_Lean_Meta_MatcherApp_toExpr(x_28); +x_54 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_54, 0, x_53); +lean_ctor_set(x_54, 1, x_52); +return x_54; +} +} +else +{ +uint8_t x_55; +lean_free_object(x_28); +lean_dec(x_38); +lean_dec(x_36); +lean_dec(x_35); +lean_dec(x_34); +lean_dec(x_33); +lean_dec(x_32); +lean_dec(x_31); +lean_dec(x_30); +x_55 = !lean_is_exclusive(x_47); +if (x_55 == 0) +{ +return x_47; +} +else +{ +lean_object* x_56; lean_object* x_57; lean_object* x_58; +x_56 = lean_ctor_get(x_47, 0); +x_57 = lean_ctor_get(x_47, 1); +lean_inc(x_57); +lean_inc(x_56); +lean_dec(x_47); +x_58 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_58, 0, x_56); +lean_ctor_set(x_58, 1, x_57); +return x_58; +} +} +} +else +{ +lean_object* x_59; lean_object* x_60; lean_object* x_61; lean_object* x_62; lean_object* x_63; lean_object* x_64; lean_object* x_65; lean_object* x_66; lean_object* x_67; lean_object* x_68; lean_object* x_69; size_t x_70; lean_object* x_71; lean_object* x_72; lean_object* x_73; lean_object* x_74; lean_object* x_75; lean_object* x_76; +x_59 = lean_ctor_get(x_28, 0); +x_60 = lean_ctor_get(x_28, 1); +x_61 = lean_ctor_get(x_28, 2); +x_62 = lean_ctor_get(x_28, 3); +x_63 = lean_ctor_get(x_28, 4); +x_64 = lean_ctor_get(x_28, 5); +x_65 = lean_ctor_get(x_28, 6); +x_66 = lean_ctor_get(x_28, 7); +x_67 = lean_ctor_get(x_28, 8); +lean_inc(x_67); +lean_inc(x_66); +lean_inc(x_65); +lean_inc(x_64); +lean_inc(x_63); +lean_inc(x_62); +lean_inc(x_61); +lean_inc(x_60); +lean_inc(x_59); +lean_dec(x_28); +x_68 = l_Array_zip___rarg(x_66, x_65); +lean_dec(x_66); +x_69 = lean_array_get_size(x_68); +x_70 = lean_usize_of_nat(x_69); +lean_dec(x_69); +x_71 = x_68; +x_72 = lean_box_usize(x_70); +x_73 = l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___boxed__const__1; +x_74 = lean_alloc_closure((void*)(l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__7___boxed), 11, 6); +lean_closure_set(x_74, 0, x_1); +lean_closure_set(x_74, 1, x_2); +lean_closure_set(x_74, 2, x_3); +lean_closure_set(x_74, 3, x_72); +lean_closure_set(x_74, 4, x_73); +lean_closure_set(x_74, 5, x_71); +x_75 = x_74; +x_76 = lean_apply_5(x_75, x_4, x_5, x_6, x_7, x_11); +if (lean_obj_tag(x_76) == 0) +{ +lean_object* x_77; lean_object* x_78; lean_object* x_79; lean_object* x_80; lean_object* x_81; lean_object* x_82; +x_77 = lean_ctor_get(x_76, 0); +lean_inc(x_77); +x_78 = lean_ctor_get(x_76, 1); +lean_inc(x_78); +if (lean_is_exclusive(x_76)) { + lean_ctor_release(x_76, 0); + lean_ctor_release(x_76, 1); + x_79 = x_76; +} else { + lean_dec_ref(x_76); + x_79 = lean_box(0); +} +x_80 = lean_alloc_ctor(0, 9, 0); +lean_ctor_set(x_80, 0, x_59); +lean_ctor_set(x_80, 1, x_60); +lean_ctor_set(x_80, 2, x_61); +lean_ctor_set(x_80, 3, x_62); +lean_ctor_set(x_80, 4, x_63); +lean_ctor_set(x_80, 5, x_64); +lean_ctor_set(x_80, 6, x_65); +lean_ctor_set(x_80, 7, x_77); +lean_ctor_set(x_80, 8, x_67); +x_81 = l_Lean_Meta_MatcherApp_toExpr(x_80); +if (lean_is_scalar(x_79)) { + x_82 = lean_alloc_ctor(0, 2, 0); +} else { + x_82 = x_79; +} +lean_ctor_set(x_82, 0, x_81); +lean_ctor_set(x_82, 1, x_78); +return x_82; +} +else +{ +lean_object* x_83; lean_object* x_84; lean_object* x_85; lean_object* x_86; +lean_dec(x_67); +lean_dec(x_65); +lean_dec(x_64); +lean_dec(x_63); +lean_dec(x_62); +lean_dec(x_61); +lean_dec(x_60); +lean_dec(x_59); +x_83 = lean_ctor_get(x_76, 0); +lean_inc(x_83); +x_84 = lean_ctor_get(x_76, 1); +lean_inc(x_84); +if (lean_is_exclusive(x_76)) { + lean_ctor_release(x_76, 0); + lean_ctor_release(x_76, 1); + x_85 = x_76; +} else { + lean_dec_ref(x_76); + x_85 = lean_box(0); +} +if (lean_is_scalar(x_85)) { + x_86 = lean_alloc_ctor(1, 2, 0); +} else { + x_86 = x_85; +} +lean_ctor_set(x_86, 0, x_83); +lean_ctor_set(x_86, 1, x_84); +return x_86; +} +} +} +} +} +case 6: +{ +lean_object* x_87; lean_object* x_88; +x_87 = lean_alloc_closure((void*)(l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___lambda__1), 9, 2); +lean_closure_set(x_87, 0, x_1); +lean_closure_set(x_87, 1, x_2); +x_88 = l_Lean_Meta_lambdaTelescope___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__6___rarg(x_3, x_87, x_4, x_5, x_6, x_7, x_8); +return x_88; +} +case 7: +{ +lean_object* x_89; lean_object* x_90; +x_89 = lean_alloc_closure((void*)(l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___lambda__2), 9, 2); +lean_closure_set(x_89, 0, x_1); +lean_closure_set(x_89, 1, x_2); +x_90 = l_Lean_Meta_forallTelescope___at___private_Lean_Meta_InferType_0__Lean_Meta_inferForallType___spec__2___rarg(x_3, x_89, x_4, x_5, x_6, x_7, x_8); +return x_90; +} +case 8: +{ +lean_object* x_91; lean_object* x_92; lean_object* x_93; lean_object* x_94; lean_object* x_95; +x_91 = lean_ctor_get(x_3, 0); +lean_inc(x_91); +x_92 = lean_ctor_get(x_3, 1); +lean_inc(x_92); +x_93 = lean_ctor_get(x_3, 2); +lean_inc(x_93); +x_94 = lean_ctor_get(x_3, 3); +lean_inc(x_94); +lean_dec(x_3); +lean_inc(x_7); +lean_inc(x_6); +lean_inc(x_5); +lean_inc(x_4); +lean_inc(x_2); +lean_inc(x_1); +x_95 = l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit(x_1, x_2, x_93, x_4, x_5, x_6, x_7, x_8); +if (lean_obj_tag(x_95) == 0) +{ +lean_object* x_96; lean_object* x_97; lean_object* x_98; lean_object* x_99; +x_96 = lean_ctor_get(x_95, 0); +lean_inc(x_96); +x_97 = lean_ctor_get(x_95, 1); +lean_inc(x_97); +lean_dec(x_95); +x_98 = lean_alloc_closure((void*)(l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___lambda__3___boxed), 9, 3); +lean_closure_set(x_98, 0, x_94); +lean_closure_set(x_98, 1, x_1); +lean_closure_set(x_98, 2, x_2); +x_99 = l_Lean_Meta_withLetDecl___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__8___rarg(x_91, x_92, x_96, x_98, x_4, x_5, x_6, x_7, x_97); +return x_99; +} +else +{ +uint8_t x_100; +lean_dec(x_94); +lean_dec(x_92); +lean_dec(x_91); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_2); +lean_dec(x_1); +x_100 = !lean_is_exclusive(x_95); +if (x_100 == 0) +{ +return x_95; +} +else +{ +lean_object* x_101; lean_object* x_102; lean_object* x_103; +x_101 = lean_ctor_get(x_95, 0); +x_102 = lean_ctor_get(x_95, 1); +lean_inc(x_102); +lean_inc(x_101); +lean_dec(x_95); +x_103 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_103, 0, x_101); +lean_ctor_set(x_103, 1, x_102); +return x_103; +} +} +} +case 10: +{ +lean_object* x_104; lean_object* x_105; lean_object* x_106; +x_104 = lean_ctor_get(x_3, 0); +lean_inc(x_104); +x_105 = lean_ctor_get(x_3, 1); +lean_inc(x_105); +lean_dec(x_3); +x_106 = l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit(x_1, x_2, x_105, x_4, x_5, x_6, x_7, x_8); +if (lean_obj_tag(x_106) == 0) +{ +uint8_t x_107; +x_107 = !lean_is_exclusive(x_106); +if (x_107 == 0) +{ +lean_object* x_108; lean_object* x_109; +x_108 = lean_ctor_get(x_106, 0); +x_109 = l_Lean_mkMData(x_104, x_108); +lean_ctor_set(x_106, 0, x_109); +return x_106; +} +else +{ +lean_object* x_110; lean_object* x_111; lean_object* x_112; lean_object* x_113; +x_110 = lean_ctor_get(x_106, 0); +x_111 = lean_ctor_get(x_106, 1); +lean_inc(x_111); +lean_inc(x_110); +lean_dec(x_106); +x_112 = l_Lean_mkMData(x_104, x_110); +x_113 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_113, 0, x_112); +lean_ctor_set(x_113, 1, x_111); +return x_113; +} +} +else +{ +uint8_t x_114; +lean_dec(x_104); +x_114 = !lean_is_exclusive(x_106); +if (x_114 == 0) +{ +return x_106; +} +else +{ +lean_object* x_115; lean_object* x_116; lean_object* x_117; +x_115 = lean_ctor_get(x_106, 0); +x_116 = lean_ctor_get(x_106, 1); +lean_inc(x_116); +lean_inc(x_115); +lean_dec(x_106); +x_117 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_117, 0, x_115); +lean_ctor_set(x_117, 1, x_116); +return x_117; +} +} +} +case 11: +{ +lean_object* x_118; lean_object* x_119; lean_object* x_120; lean_object* x_121; +x_118 = lean_ctor_get(x_3, 0); +lean_inc(x_118); +x_119 = lean_ctor_get(x_3, 1); +lean_inc(x_119); +x_120 = lean_ctor_get(x_3, 2); +lean_inc(x_120); +lean_dec(x_3); +x_121 = l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit(x_1, x_2, x_120, x_4, x_5, x_6, x_7, x_8); +if (lean_obj_tag(x_121) == 0) +{ +uint8_t x_122; +x_122 = !lean_is_exclusive(x_121); +if (x_122 == 0) +{ +lean_object* x_123; lean_object* x_124; +x_123 = lean_ctor_get(x_121, 0); +x_124 = l_Lean_mkProj(x_118, x_119, x_123); +lean_ctor_set(x_121, 0, x_124); +return x_121; +} +else +{ +lean_object* x_125; lean_object* x_126; lean_object* x_127; lean_object* x_128; +x_125 = lean_ctor_get(x_121, 0); +x_126 = lean_ctor_get(x_121, 1); +lean_inc(x_126); +lean_inc(x_125); +lean_dec(x_121); +x_127 = l_Lean_mkProj(x_118, x_119, x_125); +x_128 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_128, 0, x_127); +lean_ctor_set(x_128, 1, x_126); +return x_128; +} +} +else +{ +uint8_t x_129; +lean_dec(x_119); +lean_dec(x_118); +x_129 = !lean_is_exclusive(x_121); +if (x_129 == 0) +{ +return x_121; +} +else +{ +lean_object* x_130; lean_object* x_131; lean_object* x_132; +x_130 = lean_ctor_get(x_121, 0); +x_131 = lean_ctor_get(x_121, 1); +lean_inc(x_131); +lean_inc(x_130); +lean_dec(x_121); +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; +} +} +} +default: +{ +lean_object* x_133; +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_2); +lean_dec(x_1); +x_133 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_133, 0, x_3); +lean_ctor_set(x_133, 1, x_8); +return x_133; +} +} +} +} +lean_object* l_Lean_Meta_matchMatcherApp_x3f___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { +_start: +{ +lean_object* x_7; +x_7 = l_Lean_Meta_matchMatcherApp_x3f___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__1(x_1, x_2, x_3, x_4, x_5, x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +return x_7; +} +} +lean_object* l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__2___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10) { +_start: +{ +size_t x_11; size_t x_12; lean_object* x_13; +x_11 = lean_unbox_usize(x_3); +lean_dec(x_3); +x_12 = lean_unbox_usize(x_4); +lean_dec(x_4); +x_13 = l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__2(x_1, x_2, x_11, x_12, x_5, x_6, x_7, x_8, x_9, x_10); +return x_13; +} +} +lean_object* l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__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: +{ +size_t x_11; size_t x_12; lean_object* x_13; +x_11 = lean_unbox_usize(x_3); +lean_dec(x_3); +x_12 = lean_unbox_usize(x_4); +lean_dec(x_4); +x_13 = l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__4(x_1, x_2, x_11, x_12, x_5, x_6, x_7, x_8, x_9, x_10); +return x_13; +} +} +lean_object* l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__7___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_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__7___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_6); +return x_12; +} +} +lean_object* l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__7___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: +{ +size_t x_12; size_t x_13; lean_object* x_14; +x_12 = lean_unbox_usize(x_4); +lean_dec(x_4); +x_13 = lean_unbox_usize(x_5); +lean_dec(x_5); +x_14 = l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__7(x_1, x_2, x_3, x_12, x_13, x_6, x_7, x_8, x_9, x_10, x_11); +return x_14; +} +} +lean_object* l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___lambda__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) { +_start: +{ +lean_object* x_10; +x_10 = l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___lambda__3(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9); +lean_dec(x_1); +return x_10; +} +} +uint8_t l_Lean_Elab_Structural_addSmartUnfoldingDefAux___lambda__1(lean_object* x_1, lean_object* x_2) { +_start: +{ +uint8_t x_3; +x_3 = l_Lean_Expr_isConst(x_2); +if (x_3 == 0) +{ +uint8_t x_4; +x_4 = 0; +return x_4; +} +else +{ +lean_object* x_5; uint8_t x_6; +x_5 = l_Lean_Expr_constName_x21(x_2); +x_6 = l_Lean_NameSet_contains(x_1, x_5); +lean_dec(x_5); +return x_6; +} +} +} +uint8_t l_Lean_Elab_Structural_addSmartUnfoldingDefAux___lambda__2(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; uint8_t x_4; +x_3 = l_Lean_Expr_getAppFn(x_2); +x_4 = l_Lean_Expr_isConst(x_3); +if (x_4 == 0) +{ +uint8_t x_5; +lean_dec(x_3); +x_5 = 0; +return x_5; +} +else +{ +lean_object* x_6; uint8_t x_7; +x_6 = l_Lean_Expr_constName_x21(x_3); +lean_dec(x_3); +x_7 = l_Lean_NameSet_contains(x_1, x_6); +lean_dec(x_6); +return x_7; +} +} +} +uint8_t l_Lean_Elab_Structural_addSmartUnfoldingDefAux___lambda__3(lean_object* x_1, lean_object* x_2) { +_start: +{ +size_t x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; +x_3 = 8192; +x_4 = l_Lean_Expr_FindImpl_initCache; +x_5 = l_Lean_Expr_FindImpl_findM_x3f_visit(x_1, x_3, x_2, x_4); +x_6 = lean_ctor_get(x_5, 0); +lean_inc(x_6); +lean_dec(x_5); +if (lean_obj_tag(x_6) == 0) +{ +uint8_t x_7; +x_7 = 0; +return x_7; +} +else +{ +uint8_t x_8; +lean_dec(x_6); +x_8 = 1; +return x_8; +} +} +} +static lean_object* _init_l_Lean_Elab_Structural_addSmartUnfoldingDefAux___closed__1() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = lean_unsigned_to_nat(0u); +x_2 = lean_mk_empty_array_with_capacity(x_1); +return x_2; +} +} +static lean_object* _init_l_Lean_Elab_Structural_addSmartUnfoldingDefAux___closed__2() { +_start: +{ +lean_object* x_1; uint8_t x_2; uint8_t x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; +x_1 = lean_box(0); +x_2 = 0; +x_3 = 0; +x_4 = 2; +x_5 = l_Lean_Elab_Structural_addSmartUnfoldingDefAux___closed__1; +x_6 = lean_alloc_ctor(0, 2, 4); +lean_ctor_set(x_6, 0, x_1); +lean_ctor_set(x_6, 1, x_5); +lean_ctor_set_uint8(x_6, sizeof(void*)*2, x_2); +lean_ctor_set_uint8(x_6, sizeof(void*)*2 + 1, x_3); +lean_ctor_set_uint8(x_6, sizeof(void*)*2 + 2, x_4); +lean_ctor_set_uint8(x_6, sizeof(void*)*2 + 3, x_3); +return x_6; +} +} +lean_object* l_Lean_Elab_Structural_addSmartUnfoldingDefAux(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; lean_object* x_9; lean_object* x_10; uint8_t x_11; +lean_inc(x_2); +x_8 = lean_alloc_closure((void*)(l_Lean_Elab_Structural_addSmartUnfoldingDefAux___lambda__1___boxed), 2, 1); +lean_closure_set(x_8, 0, x_2); +x_9 = lean_alloc_closure((void*)(l_Lean_Elab_Structural_addSmartUnfoldingDefAux___lambda__2___boxed), 2, 1); +lean_closure_set(x_9, 0, x_2); +x_10 = lean_alloc_closure((void*)(l_Lean_Elab_Structural_addSmartUnfoldingDefAux___lambda__3___boxed), 2, 1); +lean_closure_set(x_10, 0, x_8); +x_11 = !lean_is_exclusive(x_1); +if (x_11 == 0) +{ +lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; +x_12 = lean_ctor_get(x_1, 0); +x_13 = lean_ctor_get(x_1, 1); +x_14 = lean_ctor_get(x_1, 3); +x_15 = lean_ctor_get(x_1, 4); +x_16 = lean_ctor_get(x_1, 5); +x_17 = lean_ctor_get(x_1, 2); +lean_dec(x_17); +x_18 = l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit(x_9, x_10, x_16, x_3, x_4, x_5, x_6, x_7); +if (lean_obj_tag(x_18) == 0) +{ +uint8_t x_19; +x_19 = !lean_is_exclusive(x_18); +if (x_19 == 0) +{ +lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; +x_20 = lean_ctor_get(x_18, 0); +x_21 = l_Lean_Meta_smartUnfoldingSuffix; +x_22 = lean_name_mk_string(x_14, x_21); +x_23 = l_Lean_Elab_Structural_addSmartUnfoldingDefAux___closed__2; +lean_ctor_set(x_1, 5, x_20); +lean_ctor_set(x_1, 3, x_22); +lean_ctor_set(x_1, 2, x_23); +lean_ctor_set(x_18, 0, x_1); +return x_18; +} +else +{ +lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; +x_24 = lean_ctor_get(x_18, 0); +x_25 = lean_ctor_get(x_18, 1); +lean_inc(x_25); +lean_inc(x_24); +lean_dec(x_18); +x_26 = l_Lean_Meta_smartUnfoldingSuffix; +x_27 = lean_name_mk_string(x_14, x_26); +x_28 = l_Lean_Elab_Structural_addSmartUnfoldingDefAux___closed__2; +lean_ctor_set(x_1, 5, x_24); +lean_ctor_set(x_1, 3, x_27); +lean_ctor_set(x_1, 2, x_28); +x_29 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_29, 0, x_1); +lean_ctor_set(x_29, 1, x_25); +return x_29; +} +} +else +{ +uint8_t x_30; +lean_free_object(x_1); +lean_dec(x_15); +lean_dec(x_14); +lean_dec(x_13); +lean_dec(x_12); +x_30 = !lean_is_exclusive(x_18); +if (x_30 == 0) +{ +return x_18; +} +else +{ +lean_object* x_31; lean_object* x_32; lean_object* x_33; +x_31 = lean_ctor_get(x_18, 0); +x_32 = lean_ctor_get(x_18, 1); +lean_inc(x_32); +lean_inc(x_31); +lean_dec(x_18); +x_33 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_33, 0, x_31); +lean_ctor_set(x_33, 1, x_32); +return x_33; +} +} +} +else +{ +lean_object* x_34; uint8_t x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; +x_34 = lean_ctor_get(x_1, 0); +x_35 = lean_ctor_get_uint8(x_1, sizeof(void*)*6); +x_36 = lean_ctor_get(x_1, 1); +x_37 = lean_ctor_get(x_1, 3); +x_38 = lean_ctor_get(x_1, 4); +x_39 = lean_ctor_get(x_1, 5); +lean_inc(x_39); +lean_inc(x_38); +lean_inc(x_37); +lean_inc(x_36); +lean_inc(x_34); +lean_dec(x_1); +x_40 = l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit(x_9, x_10, x_39, x_3, x_4, x_5, x_6, x_7); +if (lean_obj_tag(x_40) == 0) +{ +lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; lean_object* x_48; +x_41 = lean_ctor_get(x_40, 0); +lean_inc(x_41); +x_42 = lean_ctor_get(x_40, 1); +lean_inc(x_42); +if (lean_is_exclusive(x_40)) { + lean_ctor_release(x_40, 0); + lean_ctor_release(x_40, 1); + x_43 = x_40; +} else { + lean_dec_ref(x_40); + x_43 = lean_box(0); +} +x_44 = l_Lean_Meta_smartUnfoldingSuffix; +x_45 = lean_name_mk_string(x_37, x_44); +x_46 = l_Lean_Elab_Structural_addSmartUnfoldingDefAux___closed__2; +x_47 = lean_alloc_ctor(0, 6, 1); +lean_ctor_set(x_47, 0, x_34); +lean_ctor_set(x_47, 1, x_36); +lean_ctor_set(x_47, 2, x_46); +lean_ctor_set(x_47, 3, x_45); +lean_ctor_set(x_47, 4, x_38); +lean_ctor_set(x_47, 5, x_41); +lean_ctor_set_uint8(x_47, sizeof(void*)*6, x_35); +if (lean_is_scalar(x_43)) { + x_48 = lean_alloc_ctor(0, 2, 0); +} else { + x_48 = x_43; +} +lean_ctor_set(x_48, 0, x_47); +lean_ctor_set(x_48, 1, x_42); +return x_48; +} +else +{ +lean_object* x_49; lean_object* x_50; lean_object* x_51; lean_object* x_52; +lean_dec(x_38); +lean_dec(x_37); +lean_dec(x_36); +lean_dec(x_34); +x_49 = lean_ctor_get(x_40, 0); +lean_inc(x_49); +x_50 = lean_ctor_get(x_40, 1); +lean_inc(x_50); +if (lean_is_exclusive(x_40)) { + lean_ctor_release(x_40, 0); + lean_ctor_release(x_40, 1); + x_51 = x_40; +} else { + lean_dec_ref(x_40); + x_51 = lean_box(0); +} +if (lean_is_scalar(x_51)) { + x_52 = lean_alloc_ctor(1, 2, 0); +} else { + x_52 = x_51; +} +lean_ctor_set(x_52, 0, x_49); +lean_ctor_set(x_52, 1, x_50); +return x_52; +} +} +} +} +lean_object* l_Lean_Elab_Structural_addSmartUnfoldingDefAux___lambda__1___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +uint8_t x_3; lean_object* x_4; +x_3 = l_Lean_Elab_Structural_addSmartUnfoldingDefAux___lambda__1(x_1, x_2); +lean_dec(x_2); +lean_dec(x_1); +x_4 = lean_box(x_3); +return x_4; +} +} +lean_object* l_Lean_Elab_Structural_addSmartUnfoldingDefAux___lambda__2___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +uint8_t x_3; lean_object* x_4; +x_3 = l_Lean_Elab_Structural_addSmartUnfoldingDefAux___lambda__2(x_1, x_2); +lean_dec(x_2); +lean_dec(x_1); +x_4 = lean_box(x_3); +return x_4; +} +} +lean_object* l_Lean_Elab_Structural_addSmartUnfoldingDefAux___lambda__3___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +uint8_t x_3; lean_object* x_4; +x_3 = l_Lean_Elab_Structural_addSmartUnfoldingDefAux___lambda__3(x_1, x_2); +x_4 = lean_box(x_3); +return x_4; +} +} +lean_object* l_Lean_Elab_Structural_addSmartUnfoldingDef(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; +x_10 = lean_ctor_get(x_1, 4); +lean_inc(x_10); +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_6); +lean_inc(x_5); +x_11 = l_Lean_Meta_isProp(x_10, x_5, x_6, x_7, x_8, x_9); +if (lean_obj_tag(x_11) == 0) +{ +lean_object* x_12; uint8_t x_13; +x_12 = lean_ctor_get(x_11, 0); +lean_inc(x_12); +x_13 = lean_unbox(x_12); +lean_dec(x_12); +if (x_13 == 0) +{ +lean_object* x_14; lean_object* x_15; lean_object* x_16; +x_14 = lean_ctor_get(x_11, 1); +lean_inc(x_14); +lean_dec(x_11); +x_15 = lean_ctor_get(x_2, 0); +lean_inc(x_15); +lean_dec(x_2); +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_6); +lean_inc(x_5); +x_16 = l_Lean_Elab_Structural_addSmartUnfoldingDefAux(x_1, x_15, x_5, x_6, x_7, x_8, x_14); +if (lean_obj_tag(x_16) == 0) +{ +lean_object* x_17; lean_object* x_18; uint8_t x_19; lean_object* x_20; +x_17 = lean_ctor_get(x_16, 0); +lean_inc(x_17); +x_18 = lean_ctor_get(x_16, 1); +lean_inc(x_18); +lean_dec(x_16); +x_19 = 0; +x_20 = l___private_Lean_Elab_PreDefinition_Basic_0__Lean_Elab_addNonRecAux(x_17, x_19, x_3, x_4, x_5, x_6, x_7, x_8, x_18); +return x_20; +} +else +{ +uint8_t x_21; +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_21 = !lean_is_exclusive(x_16); +if (x_21 == 0) +{ +return x_16; +} +else +{ +lean_object* x_22; lean_object* x_23; lean_object* x_24; +x_22 = lean_ctor_get(x_16, 0); +x_23 = lean_ctor_get(x_16, 1); +lean_inc(x_23); +lean_inc(x_22); +lean_dec(x_16); +x_24 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_24, 0, x_22); +lean_ctor_set(x_24, 1, x_23); +return x_24; +} +} +} +else +{ +uint8_t x_25; +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_25 = !lean_is_exclusive(x_11); +if (x_25 == 0) +{ +lean_object* x_26; lean_object* x_27; +x_26 = lean_ctor_get(x_11, 0); +lean_dec(x_26); +x_27 = lean_box(0); +lean_ctor_set(x_11, 0, x_27); +return x_11; +} +else +{ +lean_object* x_28; lean_object* x_29; lean_object* x_30; +x_28 = lean_ctor_get(x_11, 1); +lean_inc(x_28); +lean_dec(x_11); +x_29 = lean_box(0); +x_30 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_30, 0, x_29); +lean_ctor_set(x_30, 1, x_28); +return x_30; +} +} +} +else +{ +uint8_t x_31; +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_31 = !lean_is_exclusive(x_11); +if (x_31 == 0) +{ +return x_11; +} +else +{ +lean_object* x_32; lean_object* x_33; lean_object* x_34; +x_32 = lean_ctor_get(x_11, 0); +x_33 = lean_ctor_get(x_11, 1); +lean_inc(x_33); +lean_inc(x_32); +lean_dec(x_11); +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; +} +} +} +} +lean_object* initialize_Init(lean_object*); +lean_object* initialize_Lean_Elab_PreDefinition_Basic(lean_object*); +lean_object* initialize_Lean_Elab_PreDefinition_Structural_Basic(lean_object*); +static bool _G_initialized = false; +lean_object* initialize_Lean_Elab_PreDefinition_Structural_SmartUnfolding(lean_object* w) { +lean_object * res; +if (_G_initialized) return lean_io_result_mk_ok(lean_box(0)); +_G_initialized = true; +res = initialize_Init(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); +res = initialize_Lean_Elab_PreDefinition_Basic(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); +res = initialize_Lean_Elab_PreDefinition_Structural_Basic(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); +l_Lean_Meta_matchMatcherApp_x3f___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__1___closed__1 = _init_l_Lean_Meta_matchMatcherApp_x3f___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__1___closed__1(); +lean_mark_persistent(l_Lean_Meta_matchMatcherApp_x3f___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__1___closed__1); +l_Lean_Expr_withAppAux___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__3___boxed__const__1 = _init_l_Lean_Expr_withAppAux___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__3___boxed__const__1(); +lean_mark_persistent(l_Lean_Expr_withAppAux___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__3___boxed__const__1); +l_Lean_Expr_withAppAux___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__5___boxed__const__1 = _init_l_Lean_Expr_withAppAux___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__5___boxed__const__1(); +lean_mark_persistent(l_Lean_Expr_withAppAux___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__5___boxed__const__1); +l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__7___lambda__2___closed__1 = _init_l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__7___lambda__2___closed__1(); +lean_mark_persistent(l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__7___lambda__2___closed__1); +l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__7___lambda__2___closed__2 = _init_l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__7___lambda__2___closed__2(); +lean_mark_persistent(l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__7___lambda__2___closed__2); +l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__7___lambda__2___closed__3 = _init_l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__7___lambda__2___closed__3(); +lean_mark_persistent(l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__7___lambda__2___closed__3); +l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__7___lambda__2___closed__4 = _init_l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__7___lambda__2___closed__4(); +lean_mark_persistent(l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__7___lambda__2___closed__4); +l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__7___lambda__2___closed__5 = _init_l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__7___lambda__2___closed__5(); +lean_mark_persistent(l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__7___lambda__2___closed__5); +l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__7___lambda__2___closed__6 = _init_l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__7___lambda__2___closed__6(); +lean_mark_persistent(l_Array_mapMUnsafe_map___at_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___spec__7___lambda__2___closed__6); +l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___lambda__3___closed__1 = _init_l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___lambda__3___closed__1(); +lean_mark_persistent(l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___lambda__3___closed__1); +l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___boxed__const__1 = _init_l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___boxed__const__1(); +lean_mark_persistent(l_Lean_Elab_Structural_addSmartUnfoldingDefAux_visit___boxed__const__1); +l_Lean_Elab_Structural_addSmartUnfoldingDefAux___closed__1 = _init_l_Lean_Elab_Structural_addSmartUnfoldingDefAux___closed__1(); +lean_mark_persistent(l_Lean_Elab_Structural_addSmartUnfoldingDefAux___closed__1); +l_Lean_Elab_Structural_addSmartUnfoldingDefAux___closed__2 = _init_l_Lean_Elab_Structural_addSmartUnfoldingDefAux___closed__2(); +lean_mark_persistent(l_Lean_Elab_Structural_addSmartUnfoldingDefAux___closed__2); +return lean_io_result_mk_ok(lean_box(0)); +} +#ifdef __cplusplus +} +#endif diff --git a/stage0/stdlib/Lean/Expr.c b/stage0/stdlib/Lean/Expr.c index af4ccad18c..fed6d68365 100644 --- a/stage0/stdlib/Lean/Expr.c +++ b/stage0/stdlib/Lean/Expr.c @@ -201,6 +201,7 @@ lean_object* l_Lean_Expr_isLet_match__1(lean_object*); lean_object* lean_array_push(lean_object*, lean_object*); lean_object* lean_array_get_size(lean_object*); lean_object* lean_expr_lift_loose_bvars(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_mkLetFunAnnotation(lean_object*); uint8_t lean_expr_has_level_mvar(lean_object*); static lean_object* l_Lean_ExprStructEq_instBEqExprStructEq___closed__1; static lean_object* l_Lean_Expr_updateForall_x21___closed__1; @@ -208,7 +209,6 @@ static lean_object* l_Lean_ExprStructEq_instHashableExprStructEq___closed__1; static lean_object* l_Lean_Expr_appFn_x21___closed__3; lean_object* l_Lean_Expr_isNatLit_match__1___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Expr_getOptParamDefault_x3f(lean_object*); -lean_object* l_Lean_isLHSGoal_x3f_match__1(lean_object*); lean_object* l_Lean_Expr_getRevArgD(lean_object*, lean_object*, lean_object*); uint64_t l_List_foldl___at_Lean_mkConst___spec__1(uint64_t, lean_object*); lean_object* l_List_mapTRAux___at_Lean_Expr_instantiateLevelParams___spec__4___boxed(lean_object*, lean_object*, lean_object*, lean_object*); @@ -284,6 +284,7 @@ lean_object* l_Lean_mkLet___boxed(lean_object*, lean_object*, lean_object*, lean lean_object* l_Lean_BinderInfo_noConfusion___rarg(uint8_t, uint8_t, lean_object*); lean_object* lean_expr_lower_loose_bvars(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Expr_setOption___at_Lean_Expr_setPPExplicit___spec__1(lean_object*, lean_object*, uint8_t); +lean_object* l_Lean_letFunAnnotation_x3f(lean_object*); lean_object* l_Lean_Expr_isMVar___boxed(lean_object*); lean_object* l___private_Lean_Expr_0__Lean_beqBinderInfo____x40_Lean_Expr___hyg_309____boxed(lean_object*, lean_object*); uint8_t l_Lean_Expr_Data_hasExprMVar(uint64_t); @@ -314,6 +315,7 @@ static lean_object* l_Lean_Expr_updateForall_x21___closed__2; static lean_object* l_Lean_Expr_updateLambdaE_x21___closed__2; lean_object* l_Lean_mkProj(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_instReprFVarId___boxed(lean_object*, lean_object*); +lean_object* l_Lean_isLetFun_match__1___rarg(lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Expr_getOptParamDefault_x3f___closed__2; lean_object* l_Lean_BinderInfo_noConfusion___rarg___lambda__1___boxed(lean_object*); lean_object* l_Lean_Expr_inferImplicit_match__1___rarg(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*); @@ -363,6 +365,7 @@ static uint64_t l_Lean_Expr_mkData___closed__2; lean_object* lean_level_update_max(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_mkAnnotation(lean_object*, lean_object*); lean_object* l_Lean_Expr_isLit_match__1___rarg(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_letFunAnnotation_x3f___boxed(lean_object*); lean_object* l_Lean_Name_toString(lean_object*, uint8_t); lean_object* l_Lean_Expr_isHeadBetaTargetFn_match__1(lean_object*); uint8_t l_Lean_BinderInfo_isStrictImplicit(uint8_t); @@ -399,6 +402,7 @@ static lean_object* l___private_Lean_Expr_0__Lean_reprBinderInfo____x40_Lean_Exp lean_object* l_Lean_Expr_isFVar___boxed(lean_object*); lean_object* l_Array_mapMUnsafe_map___at_Lean_Expr_setAppPPExplicitForExposingMVars___spec__1(size_t, size_t, lean_object*); uint64_t l_Lean_Name_hash(lean_object*); +lean_object* l_Lean_isLetFun_match__1(lean_object*); lean_object* l_Nat_repr(lean_object*); lean_object* l___private_Lean_Expr_0__Lean_Expr_getParamSubst_match__1(lean_object*); uint8_t l_Lean_Expr_Data_hasFVar(uint64_t); @@ -466,6 +470,7 @@ lean_object* l_Lean_Expr_mkDataForLet___boxed(lean_object*, lean_object*, lean_o uint64_t l___private_Lean_Level_0__Lean_hashMVarId____x40_Lean_Level___hyg_205_(lean_object*); lean_object* l_Lean_Expr_instantiate___boxed(lean_object*, lean_object*); uint8_t l___private_Lean_Expr_0__Lean_beqLiteral____x40_Lean_Expr___hyg_30_(lean_object*, lean_object*); +lean_object* l_Lean_isLetFun___boxed(lean_object*); static lean_object* l_Lean_mkSimpleThunk___closed__1; lean_object* l___private_Lean_Expr_0__Lean_reprLiteral____x40_Lean_Expr___hyg_98__match__1___rarg(lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Expr_appFn_x21___closed__1; @@ -478,6 +483,7 @@ uint8_t l_Lean_Expr_isConstOf(lean_object*, lean_object*); static lean_object* l_Lean_Expr_fvarId_x21___closed__3; lean_object* l_Lean_Expr_instantiateRange___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Expr_hasFVar___boxed(lean_object*); +uint8_t l_Lean_isLetFun(lean_object*); lean_object* l_Lean_mkLambda(lean_object*, uint8_t, lean_object*, lean_object*); lean_object* l_Lean_instBEqData__1___boxed(lean_object*, lean_object*); uint8_t l_Lean_BinderInfo_isAuxDecl(uint8_t); @@ -668,7 +674,6 @@ lean_object* l_Lean_Expr_quickLt___boxed(lean_object*, lean_object*); lean_object* l_Lean_Expr_instToStringExpr; static lean_object* l_Lean_mkEM___closed__4; lean_object* l___private_Lean_Expr_0__Lean_Expr_getAppArgsAux_match__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_isLHSGoal_x3f_match__1___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Expr_isFVar_match__1___rarg(lean_object*, lean_object*, lean_object*); uint64_t l_UInt32_toUInt64(uint32_t); lean_object* l_Lean_ExprStructEq_instToStringExprStructEq___boxed(lean_object*); @@ -794,6 +799,7 @@ lean_object* l_Lean_instBEqLiteral; lean_object* l_Lean_Expr_getArgD___boxed(lean_object*, lean_object*, lean_object*, lean_object*); uint8_t l_Lean_instDecidableLt(lean_object*, lean_object*); static lean_object* l___private_Lean_Expr_0__Lean_reprBinderInfo____x40_Lean_Expr___hyg_324____closed__8; +static lean_object* l_Lean_mkLetFunAnnotation___closed__2; lean_object* l___private_Lean_Expr_0__Lean_reprBinderInfo____x40_Lean_Expr___hyg_324__match__1___rarg(uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_instBEqBinderInfo___closed__1; lean_object* l___private_Lean_Expr_0__Lean_beqLiteral____x40_Lean_Expr___hyg_30__match__1(lean_object*); @@ -820,6 +826,7 @@ lean_object* l_Lean_Expr_bindingBody_x21(lean_object*); lean_object* l_Lean_Expr_equal___boxed(lean_object*, lean_object*); lean_object* l_Lean_Expr_updateLet_x21(lean_object*, lean_object*, lean_object*, lean_object*); uint8_t l_Lean_Literal_lt(lean_object*, lean_object*); +static lean_object* l_Lean_mkLetFunAnnotation___closed__1; lean_object* l_Lean_Expr_updateForall___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_mkConst(lean_object*, lean_object*); lean_object* l_Lean_Expr_bindingInfo_x21___boxed(lean_object*); @@ -16762,6 +16769,129 @@ lean_dec(x_1); return x_3; } } +static lean_object* _init_l_Lean_mkLetFunAnnotation___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("let_fun"); +return x_1; +} +} +static lean_object* _init_l_Lean_mkLetFunAnnotation___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l_Lean_mkLetFunAnnotation___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* l_Lean_mkLetFunAnnotation(lean_object* x_1) { +_start: +{ +lean_object* x_2; lean_object* x_3; +x_2 = l_Lean_mkLetFunAnnotation___closed__2; +x_3 = l_Lean_mkAnnotation(x_2, x_1); +return x_3; +} +} +lean_object* l_Lean_letFunAnnotation_x3f(lean_object* x_1) { +_start: +{ +lean_object* x_2; lean_object* x_3; +x_2 = l_Lean_mkLetFunAnnotation___closed__2; +x_3 = l_Lean_annotation_x3f(x_2, x_1); +return x_3; +} +} +lean_object* l_Lean_letFunAnnotation_x3f___boxed(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = l_Lean_letFunAnnotation_x3f(x_1); +lean_dec(x_1); +return x_2; +} +} +lean_object* l_Lean_isLetFun_match__1___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +if (lean_obj_tag(x_1) == 0) +{ +lean_object* x_4; lean_object* x_5; +lean_dec(x_3); +x_4 = lean_box(0); +x_5 = lean_apply_1(x_2, x_4); +return x_5; +} +else +{ +lean_object* x_6; lean_object* x_7; +lean_dec(x_2); +x_6 = lean_ctor_get(x_1, 0); +lean_inc(x_6); +lean_dec(x_1); +x_7 = lean_apply_1(x_3, x_6); +return x_7; +} +} +} +lean_object* l_Lean_isLetFun_match__1(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_Lean_isLetFun_match__1___rarg), 3, 0); +return x_2; +} +} +uint8_t l_Lean_isLetFun(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = l_Lean_letFunAnnotation_x3f(x_1); +if (lean_obj_tag(x_2) == 0) +{ +uint8_t x_3; +x_3 = 0; +return x_3; +} +else +{ +lean_object* x_4; uint8_t x_5; +x_4 = lean_ctor_get(x_2, 0); +lean_inc(x_4); +lean_dec(x_2); +x_5 = l_Lean_Expr_isApp(x_4); +if (x_5 == 0) +{ +uint8_t x_6; +lean_dec(x_4); +x_6 = 0; +return x_6; +} +else +{ +lean_object* x_7; uint8_t x_8; +x_7 = l_Lean_Expr_appFn_x21(x_4); +lean_dec(x_4); +x_8 = l_Lean_Expr_isLambda(x_7); +lean_dec(x_7); +return x_8; +} +} +} +} +lean_object* l_Lean_isLetFun___boxed(lean_object* x_1) { +_start: +{ +uint8_t x_2; lean_object* x_3; +x_2 = l_Lean_isLetFun(x_1); +lean_dec(x_1); +x_3 = lean_box(x_2); +return x_3; +} +} static lean_object* _init_l_Lean_mkLHSGoal___closed__1() { _start: { @@ -16789,37 +16919,6 @@ x_3 = l_Lean_mkAnnotation(x_2, x_1); return x_3; } } -lean_object* l_Lean_isLHSGoal_x3f_match__1___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3) { -_start: -{ -if (lean_obj_tag(x_1) == 0) -{ -lean_object* x_4; lean_object* x_5; -lean_dec(x_3); -x_4 = lean_box(0); -x_5 = lean_apply_1(x_2, x_4); -return x_5; -} -else -{ -lean_object* x_6; lean_object* x_7; -lean_dec(x_2); -x_6 = lean_ctor_get(x_1, 0); -lean_inc(x_6); -lean_dec(x_1); -x_7 = lean_apply_1(x_3, x_6); -return x_7; -} -} -} -lean_object* l_Lean_isLHSGoal_x3f_match__1(lean_object* x_1) { -_start: -{ -lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l_Lean_isLHSGoal_x3f_match__1___rarg), 3, 0); -return x_2; -} -} static lean_object* _init_l_Lean_isLHSGoal_x3f___closed__1() { _start: { @@ -17588,6 +17687,10 @@ l_Lean_Expr_setPPUniverses___closed__2 = _init_l_Lean_Expr_setPPUniverses___clos lean_mark_persistent(l_Lean_Expr_setPPUniverses___closed__2); l_Lean_mkAnnotation___closed__1 = _init_l_Lean_mkAnnotation___closed__1(); lean_mark_persistent(l_Lean_mkAnnotation___closed__1); +l_Lean_mkLetFunAnnotation___closed__1 = _init_l_Lean_mkLetFunAnnotation___closed__1(); +lean_mark_persistent(l_Lean_mkLetFunAnnotation___closed__1); +l_Lean_mkLetFunAnnotation___closed__2 = _init_l_Lean_mkLetFunAnnotation___closed__2(); +lean_mark_persistent(l_Lean_mkLetFunAnnotation___closed__2); l_Lean_mkLHSGoal___closed__1 = _init_l_Lean_mkLHSGoal___closed__1(); lean_mark_persistent(l_Lean_mkLHSGoal___closed__1); l_Lean_mkLHSGoal___closed__2 = _init_l_Lean_mkLHSGoal___closed__2(); diff --git a/stage0/stdlib/Lean/Meta/AppBuilder.c b/stage0/stdlib/Lean/Meta/AppBuilder.c index 9d64fcb5fd..6fa750e11f 100644 --- a/stage0/stdlib/Lean/Meta/AppBuilder.c +++ b/stage0/stdlib/Lean/Meta/AppBuilder.c @@ -76,6 +76,7 @@ lean_object* lean_environment_find(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_mkSorry___closed__4; lean_object* l_Lean_Meta_isMonad_x3f_match__1(lean_object*); +lean_object* l_Lean_Meta_mkLetCongr(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_mkProjection_match__5(lean_object*); static lean_object* l_Lean_Meta_mkEqOfHEq___closed__4; static lean_object* l_Lean_Meta_mkPure___closed__1; @@ -86,6 +87,7 @@ lean_object* l_Array_foldlMUnsafe_fold___at___private_Lean_Meta_AppBuilder_0__Le lean_object* l_Lean_Meta_mkCongrFun(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_mkFalseElim___closed__3; static lean_object* l___private_Lean_Meta_AppBuilder_0__Lean_Meta_mkAppOptMAux___closed__5; +lean_object* l_Lean_Meta_mkLetBodyCongr(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_mkEqRec(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_mkId___closed__2; lean_object* l_Lean_Meta_mkProjection_match__4(lean_object*); @@ -118,10 +120,12 @@ lean_object* l___private_Lean_Meta_AppBuilder_0__Lean_Meta_throwAppBuilderExcept lean_object* l___private_Lean_Meta_AppBuilder_0__Lean_Meta_mkAppMFinal___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_mkNoConfusion___closed__9; lean_object* l_Lean_getProjFnForField_x3f(lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_Meta_mkLetBodyCongr___closed__2; static lean_object* l_Lean_Meta_mkDecide___closed__1; static lean_object* l_Lean_Meta_mkProjection___closed__4; static lean_object* l_Lean_Meta_mkSorry___closed__9; uint8_t l_USize_decLt(size_t, size_t); +static lean_object* l_Lean_Meta_mkLetBodyCongr___closed__1; lean_object* l___private_Lean_Meta_AppBuilder_0__Lean_Meta_mkAppMArgs_loop_match__1___rarg(uint8_t, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_mkCongrArg___closed__2; lean_object* l_Lean_Meta_mkAppOptM(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -159,6 +163,7 @@ lean_object* lean_expr_instantiate_rev_range(lean_object*, lean_object*, lean_ob lean_object* l___private_Lean_Meta_AppBuilder_0__Lean_Meta_mkAppMArgs_loop_match__1___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); uint8_t lean_nat_dec_eq(lean_object*, lean_object*); static lean_object* l_Lean_Meta_mkFalseElim___closed__4; +lean_object* l_Lean_Meta_mkLetValCongr(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_mkDecide___closed__3; lean_object* l_Lean_Meta_mkSorry(lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_mkEqFalse___closed__2; @@ -191,11 +196,13 @@ lean_object* l_Lean_Meta_mkEqTrans_match__1___rarg(lean_object*, lean_object*, l static lean_object* l_Lean_Meta_mkEqNDRec___closed__6; lean_object* l_Lean_Name_toString(lean_object*, uint8_t); static lean_object* l_Lean_Meta_mkNoConfusion___closed__1; +static lean_object* l_Lean_Meta_mkLetValCongr___closed__2; lean_object* lean_array_get(lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Meta_AppBuilder_0__Lean_Meta_mkFun___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_mkNumeral___closed__2; lean_object* l___private_Lean_Meta_AppBuilder_0__Lean_Meta_mkAppOptMAux(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Meta_AppBuilder_0__Lean_Meta_mkAppOptMAux_match__2(lean_object*); +static lean_object* l_Lean_Meta_mkLetValCongr___closed__1; lean_object* l_List_mapM___at___private_Lean_Meta_AppBuilder_0__Lean_Meta_mkFun___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_mkNoConfusion___closed__4; lean_object* l_Lean_Meta_mkEqSymm_match__1(lean_object*); @@ -218,9 +225,11 @@ static lean_object* l_Lean_Meta_mkHEqRefl___closed__1; lean_object* l_Lean_Meta_mkArrayLit(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_mkAbsurd(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_mkEqTrans___closed__1; +static lean_object* l_Lean_Meta_mkLetCongr___closed__1; lean_object* l_Lean_Meta_mkProjection___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*); static lean_object* l_Lean_Meta_mkEqRec___closed__1; static lean_object* l_Lean_Meta_mkProjection___lambda__1___closed__1; +static lean_object* l_Lean_Meta_mkLetCongr___closed__2; static lean_object* l_Lean_Meta_mkProjection___lambda__1___closed__3; lean_object* l_Lean_Meta_mkProjection_match__1___rarg(lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_mkFalseElim___closed__2; @@ -352,7 +361,7 @@ static lean_object* l_Lean_Meta_mkEqOfHEq___closed__3; static lean_object* l_Lean_Meta_mkProjection___lambda__1___closed__9; static lean_object* l_Lean_Meta_mkEqMPR___closed__1; lean_object* lean_infer_type(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_AppBuilder___hyg_4527_(lean_object*); +lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_AppBuilder___hyg_4572_(lean_object*); lean_object* l_Lean_Meta_isExprDefEq(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Meta_Basic_0__Lean_Meta_mkFreshExprMVarImpl(lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_withNewMCtxDepth___at___private_Lean_Meta_Instances_0__Lean_Meta_mkInstanceKey___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -12284,6 +12293,96 @@ x_10 = l_Lean_Meta_mkAppM(x_9, x_8, x_2, x_3, x_4, x_5, x_6); return x_10; } } +static lean_object* _init_l_Lean_Meta_mkLetCongr___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("let_congr"); +return x_1; +} +} +static lean_object* _init_l_Lean_Meta_mkLetCongr___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_mkLetCongr___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* l_Lean_Meta_mkLetCongr(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; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; +x_8 = l_Lean_Meta_mkEqMP___closed__3; +x_9 = lean_array_push(x_8, x_1); +x_10 = lean_array_push(x_9, x_2); +x_11 = l_Lean_Meta_mkLetCongr___closed__2; +x_12 = l_Lean_Meta_mkAppM(x_11, x_10, x_3, x_4, x_5, x_6, x_7); +return x_12; +} +} +static lean_object* _init_l_Lean_Meta_mkLetValCongr___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("let_val_congr"); +return x_1; +} +} +static lean_object* _init_l_Lean_Meta_mkLetValCongr___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_mkLetValCongr___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* l_Lean_Meta_mkLetValCongr(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; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; +x_8 = l_Lean_Meta_mkEqMP___closed__3; +x_9 = lean_array_push(x_8, x_1); +x_10 = lean_array_push(x_9, x_2); +x_11 = l_Lean_Meta_mkLetValCongr___closed__2; +x_12 = l_Lean_Meta_mkAppM(x_11, x_10, x_3, x_4, x_5, x_6, x_7); +return x_12; +} +} +static lean_object* _init_l_Lean_Meta_mkLetBodyCongr___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("let_body_congr"); +return x_1; +} +} +static lean_object* _init_l_Lean_Meta_mkLetBodyCongr___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_mkLetBodyCongr___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* l_Lean_Meta_mkLetBodyCongr(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; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; +x_8 = l_Lean_Meta_mkEqMP___closed__3; +x_9 = lean_array_push(x_8, x_1); +x_10 = lean_array_push(x_9, x_2); +x_11 = l_Lean_Meta_mkLetBodyCongr___closed__2; +x_12 = l_Lean_Meta_mkAppM(x_11, x_10, x_3, x_4, x_5, x_6, x_7); +return x_12; +} +} static lean_object* _init_l_Lean_Meta_mkOfEqTrue___closed__1() { _start: { @@ -13148,7 +13247,7 @@ x_10 = l___private_Lean_Meta_AppBuilder_0__Lean_Meta_mkBinaryOp(x_8, x_9, x_1, x return x_10; } } -lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_AppBuilder___hyg_4527_(lean_object* x_1) { +lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_AppBuilder___hyg_4572_(lean_object* x_1) { _start: { lean_object* x_2; lean_object* x_3; @@ -13524,6 +13623,18 @@ l_Lean_Meta_mkPropExt___closed__1 = _init_l_Lean_Meta_mkPropExt___closed__1(); lean_mark_persistent(l_Lean_Meta_mkPropExt___closed__1); l_Lean_Meta_mkPropExt___closed__2 = _init_l_Lean_Meta_mkPropExt___closed__2(); lean_mark_persistent(l_Lean_Meta_mkPropExt___closed__2); +l_Lean_Meta_mkLetCongr___closed__1 = _init_l_Lean_Meta_mkLetCongr___closed__1(); +lean_mark_persistent(l_Lean_Meta_mkLetCongr___closed__1); +l_Lean_Meta_mkLetCongr___closed__2 = _init_l_Lean_Meta_mkLetCongr___closed__2(); +lean_mark_persistent(l_Lean_Meta_mkLetCongr___closed__2); +l_Lean_Meta_mkLetValCongr___closed__1 = _init_l_Lean_Meta_mkLetValCongr___closed__1(); +lean_mark_persistent(l_Lean_Meta_mkLetValCongr___closed__1); +l_Lean_Meta_mkLetValCongr___closed__2 = _init_l_Lean_Meta_mkLetValCongr___closed__2(); +lean_mark_persistent(l_Lean_Meta_mkLetValCongr___closed__2); +l_Lean_Meta_mkLetBodyCongr___closed__1 = _init_l_Lean_Meta_mkLetBodyCongr___closed__1(); +lean_mark_persistent(l_Lean_Meta_mkLetBodyCongr___closed__1); +l_Lean_Meta_mkLetBodyCongr___closed__2 = _init_l_Lean_Meta_mkLetBodyCongr___closed__2(); +lean_mark_persistent(l_Lean_Meta_mkLetBodyCongr___closed__2); l_Lean_Meta_mkOfEqTrue___closed__1 = _init_l_Lean_Meta_mkOfEqTrue___closed__1(); lean_mark_persistent(l_Lean_Meta_mkOfEqTrue___closed__1); l_Lean_Meta_mkOfEqTrue___closed__2 = _init_l_Lean_Meta_mkOfEqTrue___closed__2(); @@ -13588,7 +13699,7 @@ l_Lean_Meta_mkMul___closed__3 = _init_l_Lean_Meta_mkMul___closed__3(); lean_mark_persistent(l_Lean_Meta_mkMul___closed__3); l_Lean_Meta_mkMul___closed__4 = _init_l_Lean_Meta_mkMul___closed__4(); lean_mark_persistent(l_Lean_Meta_mkMul___closed__4); -res = l_Lean_Meta_initFn____x40_Lean_Meta_AppBuilder___hyg_4527_(lean_io_mk_world()); +res = l_Lean_Meta_initFn____x40_Lean_Meta_AppBuilder___hyg_4572_(lean_io_mk_world()); if (lean_io_result_is_error(res)) return res; lean_dec_ref(res); return lean_io_result_mk_ok(lean_box(0)); diff --git a/stage0/stdlib/Lean/Meta/Match/Match.c b/stage0/stdlib/Lean/Meta/Match/Match.c index 68bcf1e08b..48bf6f0bdc 100644 --- a/stage0/stdlib/Lean/Meta/Match/Match.c +++ b/stage0/stdlib/Lean/Meta/Match/Match.c @@ -113,7 +113,7 @@ lean_object* l_Lean_Meta_forallTelescopeReducing___at_Lean_Meta_getParamNames___ lean_object* l_Lean_Meta_Match_processInaccessibleAsCtor___lambda__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_Match_mkMatcher___lambda__4___closed__2; static lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_throwInductiveTypeExpected___rarg___closed__3; -lean_object* l_Lean_Meta_Match_mkMatcherAuxDefinition___lambda__4(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*); +lean_object* l_Lean_Meta_Match_mkMatcherAuxDefinition___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_Array_extract___rarg(lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_process_search(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_EnvExtensionInterfaceUnsafe_registerExt___rarg(lean_object*, lean_object*); @@ -233,7 +233,7 @@ lean_object* l_List_mapTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_M lean_object* l_List_foldr___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_hasVarPattern___spec__1___boxed(lean_object*, lean_object*); lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_traceStep(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_hasValPattern_match__1(lean_object*); -lean_object* l_Lean_Meta_Match_mkMatcherAuxDefinition___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* l_Lean_Meta_Match_mkMatcherAuxDefinition___lambda__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_Match_getMkMatcherInputInContext___lambda__3___closed__4; lean_object* l_Lean_Meta_Match_getMkMatcherInputInContext___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_Match_matcherExt___closed__2; @@ -268,7 +268,7 @@ lean_object* l_Lean_mkAppN(lean_object*, lean_object*); static lean_object* l_List_filterMapM_loop___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processNonVariable___spec__1___closed__2; static lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_withAlts_loop___rarg___closed__3; size_t l_UInt64_toUSize(uint64_t); -lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_Match_Match___hyg_9482_(lean_object*); +lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_Match_Match___hyg_9460_(lean_object*); uint8_t l_Lean_Environment_hasUnsafe(lean_object*, lean_object*); lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_checkNextPatternTypes(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_Match_mkMatcher_match__2(lean_object*); @@ -452,7 +452,7 @@ static lean_object* l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_ lean_object* l_List_foldr___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_isConstructorTransition___spec__1___boxed(lean_object*, lean_object*); lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_List_moveToFront___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_moveToFront___spec__1___boxed(lean_object*, lean_object*); lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_process_checkVarDeps_match__1(lean_object*); -lean_object* l_Lean_Meta_Match_mkMatcherAuxDefinition___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_Meta_Match_mkMatcherAuxDefinition___lambda__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processAsPattern___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_array_to_list(lean_object*, lean_object*); lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_expandVarIntoArrayLit_loop_match__1___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); @@ -623,7 +623,7 @@ static lean_object* l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_ lean_object* l_Lean_Name_append(lean_object*, lean_object*); static lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_process_tryToProcess___lambda__1___closed__1; lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processSkipInaccessible_match__2___rarg(lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Meta_Match_mkMatcherAuxDefinition___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* l_Lean_Meta_Match_mkMatcherAuxDefinition___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*); static lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processAsPattern___closed__3; lean_object* l_Lean_Meta_FVarSubst_insert(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_Match_isCurrVarInductive(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -773,7 +773,7 @@ lean_object* l_Lean_indentD(lean_object*); static lean_object* l_Lean_Meta_Match_State_used___default___closed__1; lean_object* l_List_mapTRAux___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_expandVarIntoCtor_x3f___spec__4___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_Match_initFn____x40_Lean_Meta_Match_Match___hyg_7282____lambda__1___boxed(lean_object*, lean_object*); -lean_object* l_Lean_Meta_Match_mkMatcherAuxDefinition___lambda__3(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* l_Lean_Meta_Match_mkMatcherAuxDefinition___lambda__3(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*); lean_object* l_List_filterMapM_loop___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processConstructor___spec__9(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_Match_examplesToMessageData(lean_object*); lean_object* l_Lean_Expr_FindImpl_findM_x3f_visit(lean_object*, size_t, lean_object*, lean_object*); @@ -799,7 +799,6 @@ lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_inLocalDecls__ lean_object* l_Lean_Meta_Match_mkMatcher_match__3___rarg(lean_object*, lean_object*); static lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processVariable___closed__1; lean_object* l_Lean_Meta_setInlineAttribute(lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Meta_Match_mkMatcherAuxDefinition___lambda__5(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_Meta_Match_Match_0__Lean_Meta_Match_processValue(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_Match_mkMatcher___lambda__5___closed__3; static lean_object* l_Lean_Meta_Match_mkMatcher___lambda__5___closed__7; @@ -845,7 +844,6 @@ lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_hasNonTrivialE lean_object* l___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_isVariableTransition___boxed(lean_object*); lean_object* l_Array_mapMUnsafe_map___at_Lean_Meta_Match_mkMatcher___spec__2(size_t, size_t, lean_object*); lean_object* l_Std_HashSetImp_moveEntries___at___private_Lean_Meta_Match_Match_0__Lean_Meta_Match_processLeaf___spec__5(lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Meta_Match_mkMatcherAuxDefinition___lambda__4___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_indentExpr(lean_object*); lean_object* l_Lean_Meta_Match_mkMatcherAuxDefinition___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_MatcherApp_addArg___lambda__2___closed__2; @@ -24126,84 +24124,7 @@ x_6 = l_Std_PersistentHashMap_insert___rarg(x_1, x_2, x_5, x_3, x_4); return x_6; } } -lean_object* l_Lean_Meta_Match_mkMatcherAuxDefinition___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) { -_start: -{ -lean_object* x_12; lean_object* x_13; lean_object* x_14; uint8_t x_15; -x_12 = lean_st_ref_take(x_10, x_11); -x_13 = lean_ctor_get(x_12, 0); -lean_inc(x_13); -x_14 = lean_ctor_get(x_12, 1); -lean_inc(x_14); -lean_dec(x_12); -x_15 = !lean_is_exclusive(x_13); -if (x_15 == 0) -{ -lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; uint8_t x_24; lean_object* x_25; -x_16 = lean_ctor_get(x_13, 0); -lean_inc(x_4); -x_17 = lean_alloc_closure((void*)(l_Lean_Meta_Match_mkMatcherAuxDefinition___lambda__1), 5, 4); -lean_closure_set(x_17, 0, x_1); -lean_closure_set(x_17, 1, x_2); -lean_closure_set(x_17, 2, x_3); -lean_closure_set(x_17, 3, x_4); -x_18 = l_Lean_Meta_Match_matcherExt; -x_19 = l_Lean_EnvExtensionInterfaceUnsafe_imp___elambda__2___rarg(x_18, x_16, x_17); -lean_ctor_set(x_13, 0, x_19); -x_20 = lean_st_ref_set(x_10, x_13, x_14); -x_21 = lean_ctor_get(x_20, 1); -lean_inc(x_21); -lean_dec(x_20); -lean_inc(x_4); -x_22 = l_Lean_Meta_Match_addMatcherInfo(x_4, x_5, x_7, x_8, x_9, x_10, x_21); -x_23 = lean_ctor_get(x_22, 1); -lean_inc(x_23); -lean_dec(x_22); -x_24 = 0; -x_25 = l_Lean_Meta_setInlineAttribute(x_4, x_24, x_7, x_8, x_9, x_10, x_23); -return x_25; -} -else -{ -lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; uint8_t x_38; lean_object* x_39; -x_26 = lean_ctor_get(x_13, 0); -x_27 = lean_ctor_get(x_13, 1); -x_28 = lean_ctor_get(x_13, 2); -x_29 = lean_ctor_get(x_13, 3); -lean_inc(x_29); -lean_inc(x_28); -lean_inc(x_27); -lean_inc(x_26); -lean_dec(x_13); -lean_inc(x_4); -x_30 = lean_alloc_closure((void*)(l_Lean_Meta_Match_mkMatcherAuxDefinition___lambda__1), 5, 4); -lean_closure_set(x_30, 0, x_1); -lean_closure_set(x_30, 1, x_2); -lean_closure_set(x_30, 2, x_3); -lean_closure_set(x_30, 3, x_4); -x_31 = l_Lean_Meta_Match_matcherExt; -x_32 = l_Lean_EnvExtensionInterfaceUnsafe_imp___elambda__2___rarg(x_31, x_26, x_30); -x_33 = lean_alloc_ctor(0, 4, 0); -lean_ctor_set(x_33, 0, x_32); -lean_ctor_set(x_33, 1, x_27); -lean_ctor_set(x_33, 2, x_28); -lean_ctor_set(x_33, 3, x_29); -x_34 = lean_st_ref_set(x_10, x_33, x_14); -x_35 = lean_ctor_get(x_34, 1); -lean_inc(x_35); -lean_dec(x_34); -lean_inc(x_4); -x_36 = l_Lean_Meta_Match_addMatcherInfo(x_4, x_5, x_7, x_8, x_9, x_10, x_35); -x_37 = lean_ctor_get(x_36, 1); -lean_inc(x_37); -lean_dec(x_36); -x_38 = 0; -x_39 = l_Lean_Meta_setInlineAttribute(x_4, x_38, x_7, x_8, x_9, x_10, x_37); -return x_39; -} -} -} -lean_object* l_Lean_Meta_Match_mkMatcherAuxDefinition___lambda__3(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* l_Lean_Meta_Match_mkMatcherAuxDefinition___lambda__2(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) { _start: { lean_object* x_13; @@ -24212,76 +24133,230 @@ lean_inc(x_1); x_13 = l_Lean_addDecl___at_Lean_Meta_mkAuxDefinition___spec__1(x_1, x_8, x_9, x_10, x_11, x_12); if (lean_obj_tag(x_13) == 0) { -if (x_6 == 0) -{ -lean_object* x_14; lean_object* x_15; lean_object* x_16; -lean_dec(x_1); +lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; uint8_t x_18; x_14 = lean_ctor_get(x_13, 1); lean_inc(x_14); lean_dec(x_13); -x_15 = lean_box(0); -x_16 = l_Lean_Meta_Match_mkMatcherAuxDefinition___lambda__2(x_2, x_3, x_4, x_5, x_7, x_15, x_8, x_9, x_10, x_11, x_14); -return x_16; -} -else -{ -lean_object* x_17; lean_object* x_18; -x_17 = lean_ctor_get(x_13, 1); +x_15 = lean_st_ref_take(x_11, x_14); +x_16 = lean_ctor_get(x_15, 0); +lean_inc(x_16); +x_17 = lean_ctor_get(x_15, 1); lean_inc(x_17); -lean_dec(x_13); +lean_dec(x_15); +x_18 = !lean_is_exclusive(x_16); +if (x_18 == 0) +{ +lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; uint8_t x_27; lean_object* x_28; +x_19 = lean_ctor_get(x_16, 0); +lean_inc(x_5); +x_20 = lean_alloc_closure((void*)(l_Lean_Meta_Match_mkMatcherAuxDefinition___lambda__1), 5, 4); +lean_closure_set(x_20, 0, x_2); +lean_closure_set(x_20, 1, x_3); +lean_closure_set(x_20, 2, x_4); +lean_closure_set(x_20, 3, x_5); +x_21 = l_Lean_Meta_Match_matcherExt; +x_22 = l_Lean_EnvExtensionInterfaceUnsafe_imp___elambda__2___rarg(x_21, x_19, x_20); +lean_ctor_set(x_16, 0, x_22); +x_23 = lean_st_ref_set(x_11, x_16, x_17); +x_24 = lean_ctor_get(x_23, 1); +lean_inc(x_24); +lean_dec(x_23); +lean_inc(x_5); +x_25 = l_Lean_Meta_Match_addMatcherInfo(x_5, x_7, x_8, x_9, x_10, x_11, x_24); +x_26 = lean_ctor_get(x_25, 1); +lean_inc(x_26); +lean_dec(x_25); +x_27 = 0; lean_inc(x_11); lean_inc(x_10); lean_inc(x_9); lean_inc(x_8); -x_18 = l_Lean_compileDecl___at_Lean_Meta_mkAuxDefinition___spec__3(x_1, x_8, x_9, x_10, x_11, x_17); -if (lean_obj_tag(x_18) == 0) +x_28 = l_Lean_Meta_setInlineAttribute(x_5, x_27, x_8, x_9, x_10, x_11, x_26); +if (lean_obj_tag(x_28) == 0) { -lean_object* x_19; lean_object* x_20; lean_object* x_21; -x_19 = lean_ctor_get(x_18, 0); -lean_inc(x_19); -x_20 = lean_ctor_get(x_18, 1); -lean_inc(x_20); -lean_dec(x_18); -x_21 = l_Lean_Meta_Match_mkMatcherAuxDefinition___lambda__2(x_2, x_3, x_4, x_5, x_7, x_19, x_8, x_9, x_10, x_11, x_20); -lean_dec(x_19); -return x_21; -} -else +if (x_6 == 0) { -uint8_t x_22; +uint8_t x_29; lean_dec(x_11); lean_dec(x_10); lean_dec(x_9); lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -x_22 = !lean_is_exclusive(x_18); -if (x_22 == 0) +lean_dec(x_1); +x_29 = !lean_is_exclusive(x_28); +if (x_29 == 0) { -return x_18; +lean_object* x_30; lean_object* x_31; +x_30 = lean_ctor_get(x_28, 0); +lean_dec(x_30); +x_31 = lean_box(0); +lean_ctor_set(x_28, 0, x_31); +return x_28; } else { -lean_object* x_23; lean_object* x_24; lean_object* x_25; -x_23 = lean_ctor_get(x_18, 0); -x_24 = lean_ctor_get(x_18, 1); -lean_inc(x_24); -lean_inc(x_23); -lean_dec(x_18); -x_25 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_25, 0, x_23); -lean_ctor_set(x_25, 1, x_24); -return x_25; +lean_object* x_32; lean_object* x_33; lean_object* x_34; +x_32 = lean_ctor_get(x_28, 1); +lean_inc(x_32); +lean_dec(x_28); +x_33 = lean_box(0); +x_34 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_34, 0, x_33); +lean_ctor_set(x_34, 1, x_32); +return x_34; } } +else +{ +lean_object* x_35; lean_object* x_36; +x_35 = lean_ctor_get(x_28, 1); +lean_inc(x_35); +lean_dec(x_28); +x_36 = l_Lean_compileDecl___at_Lean_Meta_mkAuxDefinition___spec__3(x_1, x_8, x_9, x_10, x_11, x_35); +return x_36; +} +} +else +{ +uint8_t x_37; +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_1); +x_37 = !lean_is_exclusive(x_28); +if (x_37 == 0) +{ +return x_28; +} +else +{ +lean_object* x_38; lean_object* x_39; lean_object* x_40; +x_38 = lean_ctor_get(x_28, 0); +x_39 = lean_ctor_get(x_28, 1); +lean_inc(x_39); +lean_inc(x_38); +lean_dec(x_28); +x_40 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_40, 0, x_38); +lean_ctor_set(x_40, 1, x_39); +return x_40; +} } } else { -uint8_t x_26; +lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_object* x_51; lean_object* x_52; uint8_t x_53; lean_object* x_54; +x_41 = lean_ctor_get(x_16, 0); +x_42 = lean_ctor_get(x_16, 1); +x_43 = lean_ctor_get(x_16, 2); +x_44 = lean_ctor_get(x_16, 3); +lean_inc(x_44); +lean_inc(x_43); +lean_inc(x_42); +lean_inc(x_41); +lean_dec(x_16); +lean_inc(x_5); +x_45 = lean_alloc_closure((void*)(l_Lean_Meta_Match_mkMatcherAuxDefinition___lambda__1), 5, 4); +lean_closure_set(x_45, 0, x_2); +lean_closure_set(x_45, 1, x_3); +lean_closure_set(x_45, 2, x_4); +lean_closure_set(x_45, 3, x_5); +x_46 = l_Lean_Meta_Match_matcherExt; +x_47 = l_Lean_EnvExtensionInterfaceUnsafe_imp___elambda__2___rarg(x_46, x_41, x_45); +x_48 = lean_alloc_ctor(0, 4, 0); +lean_ctor_set(x_48, 0, x_47); +lean_ctor_set(x_48, 1, x_42); +lean_ctor_set(x_48, 2, x_43); +lean_ctor_set(x_48, 3, x_44); +x_49 = lean_st_ref_set(x_11, x_48, x_17); +x_50 = lean_ctor_get(x_49, 1); +lean_inc(x_50); +lean_dec(x_49); +lean_inc(x_5); +x_51 = l_Lean_Meta_Match_addMatcherInfo(x_5, x_7, x_8, x_9, x_10, x_11, x_50); +x_52 = lean_ctor_get(x_51, 1); +lean_inc(x_52); +lean_dec(x_51); +x_53 = 0; +lean_inc(x_11); +lean_inc(x_10); +lean_inc(x_9); +lean_inc(x_8); +x_54 = l_Lean_Meta_setInlineAttribute(x_5, x_53, x_8, x_9, x_10, x_11, x_52); +if (lean_obj_tag(x_54) == 0) +{ +if (x_6 == 0) +{ +lean_object* x_55; lean_object* x_56; lean_object* x_57; lean_object* x_58; +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_1); +x_55 = lean_ctor_get(x_54, 1); +lean_inc(x_55); +if (lean_is_exclusive(x_54)) { + lean_ctor_release(x_54, 0); + lean_ctor_release(x_54, 1); + x_56 = x_54; +} else { + lean_dec_ref(x_54); + x_56 = lean_box(0); +} +x_57 = lean_box(0); +if (lean_is_scalar(x_56)) { + x_58 = lean_alloc_ctor(0, 2, 0); +} else { + x_58 = x_56; +} +lean_ctor_set(x_58, 0, x_57); +lean_ctor_set(x_58, 1, x_55); +return x_58; +} +else +{ +lean_object* x_59; lean_object* x_60; +x_59 = lean_ctor_get(x_54, 1); +lean_inc(x_59); +lean_dec(x_54); +x_60 = l_Lean_compileDecl___at_Lean_Meta_mkAuxDefinition___spec__3(x_1, x_8, x_9, x_10, x_11, x_59); +return x_60; +} +} +else +{ +lean_object* x_61; lean_object* x_62; lean_object* x_63; lean_object* x_64; +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_1); +x_61 = lean_ctor_get(x_54, 0); +lean_inc(x_61); +x_62 = lean_ctor_get(x_54, 1); +lean_inc(x_62); +if (lean_is_exclusive(x_54)) { + lean_ctor_release(x_54, 0); + lean_ctor_release(x_54, 1); + x_63 = x_54; +} else { + lean_dec_ref(x_54); + x_63 = lean_box(0); +} +if (lean_is_scalar(x_63)) { + x_64 = lean_alloc_ctor(1, 2, 0); +} else { + x_64 = x_63; +} +lean_ctor_set(x_64, 0, x_61); +lean_ctor_set(x_64, 1, x_62); +return x_64; +} +} +} +else +{ +uint8_t x_65; lean_dec(x_11); lean_dec(x_10); lean_dec(x_9); @@ -24292,34 +24367,34 @@ lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); -x_26 = !lean_is_exclusive(x_13); -if (x_26 == 0) +x_65 = !lean_is_exclusive(x_13); +if (x_65 == 0) { return x_13; } else { -lean_object* x_27; lean_object* x_28; lean_object* x_29; -x_27 = lean_ctor_get(x_13, 0); -x_28 = lean_ctor_get(x_13, 1); -lean_inc(x_28); -lean_inc(x_27); +lean_object* x_66; lean_object* x_67; lean_object* x_68; +x_66 = lean_ctor_get(x_13, 0); +x_67 = lean_ctor_get(x_13, 1); +lean_inc(x_67); +lean_inc(x_66); lean_dec(x_13); -x_29 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_29, 0, x_27); -lean_ctor_set(x_29, 1, x_28); -return x_29; +x_68 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_68, 0, x_66); +lean_ctor_set(x_68, 1, x_67); +return x_68; } } } } -lean_object* l_Lean_Meta_Match_mkMatcherAuxDefinition___lambda__4(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) { +lean_object* l_Lean_Meta_Match_mkMatcherAuxDefinition___lambda__3(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_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; x_14 = lean_box(x_6); lean_inc(x_5); -x_15 = lean_alloc_closure((void*)(l_Lean_Meta_Match_mkMatcherAuxDefinition___lambda__3___boxed), 12, 6); +x_15 = lean_alloc_closure((void*)(l_Lean_Meta_Match_mkMatcherAuxDefinition___lambda__2___boxed), 12, 6); lean_closure_set(x_15, 0, x_1); lean_closure_set(x_15, 1, x_2); lean_closure_set(x_15, 2, x_3); @@ -24345,7 +24420,7 @@ lean_ctor_set(x_23, 1, x_13); return x_23; } } -lean_object* l_Lean_Meta_Match_mkMatcherAuxDefinition___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, lean_object* x_10) { +lean_object* l_Lean_Meta_Match_mkMatcherAuxDefinition___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_object* x_12; uint8_t x_13; uint8_t x_14; lean_object* x_15; @@ -24504,7 +24579,7 @@ lean_dec(x_33); lean_dec(x_25); lean_dec(x_4); x_46 = lean_box(0); -x_47 = l_Lean_Meta_Match_mkMatcherAuxDefinition___lambda__4(x_43, x_28, x_29, x_27, x_3, x_13, x_16, x_46, x_6, x_7, x_8, x_9, x_45); +x_47 = l_Lean_Meta_Match_mkMatcherAuxDefinition___lambda__3(x_43, x_28, x_29, x_27, x_3, x_13, x_16, x_46, x_6, x_7, x_8, x_9, x_45); lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); @@ -24548,7 +24623,7 @@ lean_inc(x_61); x_62 = lean_ctor_get(x_60, 1); lean_inc(x_62); lean_dec(x_60); -x_63 = l_Lean_Meta_Match_mkMatcherAuxDefinition___lambda__4(x_43, x_28, x_29, x_27, x_3, x_13, x_16, x_61, x_6, x_7, x_8, x_9, x_62); +x_63 = l_Lean_Meta_Match_mkMatcherAuxDefinition___lambda__3(x_43, x_28, x_29, x_27, x_3, x_13, x_16, x_61, x_6, x_7, x_8, x_9, x_62); lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); @@ -24725,7 +24800,7 @@ lean_dec(x_101); lean_dec(x_93); lean_dec(x_4); x_114 = lean_box(0); -x_115 = l_Lean_Meta_Match_mkMatcherAuxDefinition___lambda__4(x_111, x_96, x_97, x_95, x_3, x_13, x_16, x_114, x_6, x_7, x_8, x_9, x_113); +x_115 = l_Lean_Meta_Match_mkMatcherAuxDefinition___lambda__3(x_111, x_96, x_97, x_95, x_3, x_13, x_16, x_114, x_6, x_7, x_8, x_9, x_113); lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); @@ -24769,7 +24844,7 @@ lean_inc(x_129); x_130 = lean_ctor_get(x_128, 1); lean_inc(x_130); lean_dec(x_128); -x_131 = l_Lean_Meta_Match_mkMatcherAuxDefinition___lambda__4(x_111, x_96, x_97, x_95, x_3, x_13, x_16, x_129, x_6, x_7, x_8, x_9, x_130); +x_131 = l_Lean_Meta_Match_mkMatcherAuxDefinition___lambda__3(x_111, x_96, x_97, x_95, x_3, x_13, x_16, x_129, x_6, x_7, x_8, x_9, x_130); lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); @@ -24902,7 +24977,7 @@ if (x_10 == 0) { lean_object* x_12; lean_object* x_13; x_12 = lean_box(0); -x_13 = l_Lean_Meta_Match_mkMatcherAuxDefinition___lambda__5(x_2, x_3, x_1, x_9, x_12, x_4, x_5, x_6, x_7, x_11); +x_13 = l_Lean_Meta_Match_mkMatcherAuxDefinition___lambda__4(x_2, x_3, x_1, x_9, x_12, x_4, x_5, x_6, x_7, x_11); return x_13; } else @@ -24944,7 +25019,7 @@ lean_inc(x_27); x_28 = lean_ctor_get(x_26, 1); lean_inc(x_28); lean_dec(x_26); -x_29 = l_Lean_Meta_Match_mkMatcherAuxDefinition___lambda__5(x_2, x_3, x_1, x_9, x_27, x_4, x_5, x_6, x_7, x_28); +x_29 = l_Lean_Meta_Match_mkMatcherAuxDefinition___lambda__4(x_2, x_3, x_1, x_9, x_27, x_4, x_5, x_6, x_7, x_28); return x_29; } } @@ -24960,32 +25035,23 @@ lean_dec(x_1); return x_3; } } -lean_object* l_Lean_Meta_Match_mkMatcherAuxDefinition___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) { -_start: -{ -lean_object* x_12; -x_12 = l_Lean_Meta_Match_mkMatcherAuxDefinition___lambda__2(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_6); -return x_12; -} -} -lean_object* l_Lean_Meta_Match_mkMatcherAuxDefinition___lambda__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* l_Lean_Meta_Match_mkMatcherAuxDefinition___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_object* x_12) { _start: { uint8_t x_13; lean_object* x_14; x_13 = lean_unbox(x_6); lean_dec(x_6); -x_14 = l_Lean_Meta_Match_mkMatcherAuxDefinition___lambda__3(x_1, x_2, x_3, x_4, x_5, x_13, x_7, x_8, x_9, x_10, x_11, x_12); +x_14 = l_Lean_Meta_Match_mkMatcherAuxDefinition___lambda__2(x_1, x_2, x_3, x_4, x_5, x_13, x_7, x_8, x_9, x_10, x_11, x_12); return x_14; } } -lean_object* l_Lean_Meta_Match_mkMatcherAuxDefinition___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, lean_object* x_11, lean_object* x_12, lean_object* x_13) { +lean_object* l_Lean_Meta_Match_mkMatcherAuxDefinition___lambda__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) { _start: { uint8_t x_14; lean_object* x_15; x_14 = lean_unbox(x_6); lean_dec(x_6); -x_15 = l_Lean_Meta_Match_mkMatcherAuxDefinition___lambda__4(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); +x_15 = l_Lean_Meta_Match_mkMatcherAuxDefinition___lambda__3(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_12); lean_dec(x_11); lean_dec(x_10); @@ -30204,7 +30270,7 @@ lean_dec(x_9); return x_15; } } -lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_Match_Match___hyg_9482_(lean_object* x_1) { +lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_Match_Match___hyg_9460_(lean_object* x_1) { _start: { lean_object* x_2; lean_object* x_3; @@ -30800,7 +30866,7 @@ l_Lean_Meta_MatcherApp_addArg___lambda__4___closed__3 = _init_l_Lean_Meta_Matche lean_mark_persistent(l_Lean_Meta_MatcherApp_addArg___lambda__4___closed__3); l_Lean_Meta_MatcherApp_addArg___lambda__4___closed__4 = _init_l_Lean_Meta_MatcherApp_addArg___lambda__4___closed__4(); lean_mark_persistent(l_Lean_Meta_MatcherApp_addArg___lambda__4___closed__4); -res = l_Lean_Meta_initFn____x40_Lean_Meta_Match_Match___hyg_9482_(lean_io_mk_world()); +res = l_Lean_Meta_initFn____x40_Lean_Meta_Match_Match___hyg_9460_(lean_io_mk_world()); if (lean_io_result_is_error(res)) return res; lean_dec_ref(res); return lean_io_result_mk_ok(lean_box(0)); diff --git a/stage0/stdlib/Lean/Meta/Match/MatcherInfo.c b/stage0/stdlib/Lean/Meta/Match/MatcherInfo.c index d37a2c1caf..082b570f20 100644 --- a/stage0/stdlib/Lean/Meta/Match/MatcherInfo.c +++ b/stage0/stdlib/Lean/Meta/Match/MatcherInfo.c @@ -16,6 +16,8 @@ extern "C" { lean_object* l_List_reverse___rarg(lean_object*); size_t l_USize_add(size_t, size_t); lean_object* l_Lean_Meta_getMatcherInfo_x3f___rarg(lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__5___lambda__1___closed__1; +lean_object* l_Array_foldlMUnsafe_fold___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__3___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_mk_empty_array_with_capacity(lean_object*); lean_object* l_Lean_mkSort(lean_object*); static lean_object* l_Lean_Meta_Match_Extension_extension___elambda__4___rarg___closed__3; @@ -25,80 +27,87 @@ lean_object* lean_name_mk_string(lean_object*, lean_object*); uint8_t l_USize_decEq(size_t, size_t); lean_object* lean_array_uget(lean_object*, size_t); lean_object* l_Lean_Meta_isMatcherCore___boxed(lean_object*, lean_object*); -lean_object* l_Lean_Meta_isMatcherAppCore_match__1___rarg(lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Meta_isMatcherAppCore_match__1(lean_object*); +static lean_object* l_Lean_registerSimplePersistentEnvExtension___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__4___closed__1; +lean_object* l_Lean_Meta_isMatcherAppCore_x3f(lean_object*, lean_object*); lean_object* l_Lean_SimplePersistentEnvExtension_getState___at_Lean_Meta_Match_Extension_getMatcherInfo_x3f___spec__1___boxed(lean_object*, lean_object*); -static lean_object* l_Lean_registerSimplePersistentEnvExtension___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__4___closed__1; lean_object* l_Array_extract___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_EnvExtensionInterfaceUnsafe_registerExt___rarg(lean_object*, lean_object*); static lean_object* l_Lean_Meta_Match_Extension_extension___closed__7; +static lean_object* l_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____closed__5; +lean_object* l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__5___lambda__2(lean_object*, lean_object*, lean_object*); lean_object* lean_st_ref_get(lean_object*, lean_object*); extern lean_object* l_Lean_instHashableName; uint8_t lean_name_eq(lean_object*, lean_object*); -static lean_object* l_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____closed__1; -lean_object* l_Array_foldlMUnsafe_fold___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__2(lean_object*, size_t, size_t, lean_object*); lean_object* l_Lean_Meta_Match_MatcherInfo_getMotivePos(lean_object*); lean_object* l_Lean_Meta_isMatcherApp___rarg___lambda__1(lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_EnvExtensionInterfaceUnsafe_getState___at_Lean_Meta_Match_Extension_getMatcherInfo_x3f___spec__3___closed__4; +lean_object* l_Lean_Meta_Match_MatcherInfo_getFirstDiscrPos(lean_object*); lean_object* l_Lean_Meta_Match_Extension_extension___elambda__3___boxed(lean_object*, lean_object*); lean_object* l_Array_toSubarray___rarg(lean_object*, lean_object*, lean_object*); lean_object* lean_array_push(lean_object*, lean_object*); -lean_object* l_Array_foldlMUnsafe_fold___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_matchMatcherApp_x3f___rarg___lambda__1___closed__1; lean_object* lean_array_get_size(lean_object*); static lean_object* l_Lean_Meta_Match_Extension_instInhabitedState___closed__2; lean_object* lean_string_append(lean_object*, lean_object*); -static lean_object* l_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____closed__2; +lean_object* l_Array_foldlMUnsafe_fold___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_isMatcherAppCore_x3f___boxed(lean_object*, lean_object*); lean_object* l_Lean_Meta_Match_Extension_State_map___default; lean_object* l_Lean_SMap_switch___at_Lean_Meta_Match_Extension_State_switch___spec__1(lean_object*); +static lean_object* l_Lean_registerSimplePersistentEnvExtension___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__4___lambda__4___closed__1; lean_object* l_Lean_Meta_getMatcherInfo_x3f___rarg___lambda__1(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_matchMatcherApp_x3f_match__2(lean_object*); +lean_object* l_Array_foldlMUnsafe_fold___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__2(lean_object*, size_t, size_t, lean_object*); lean_object* l_Lean_SMap_insert___at_Lean_Meta_Match_Extension_State_addEntry___spec__1(lean_object*, lean_object*, lean_object*); static uint32_t l_Lean_Meta_Match_Extension_extension___elambda__4___rarg___closed__1; static lean_object* l_Lean_Meta_Match_Extension_extension___elambda__4___rarg___closed__2; +lean_object* l_Lean_Meta_Match_MatcherInfo_getFirstDiscrPos___boxed(lean_object*); +lean_object* l_Lean_registerSimplePersistentEnvExtension___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__4___lambda__4___boxed(lean_object*); extern lean_object* l_Lean_levelZero; lean_object* lean_nat_add(lean_object*, lean_object*); -lean_object* l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__5(lean_object*, lean_object*); +lean_object* l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__5(lean_object*, lean_object*); extern lean_object* l___private_Lean_Environment_0__Lean_EnvExtensionInterfaceUnsafe_invalidExtMsg; lean_object* l_Lean_mkAppN(lean_object*, lean_object*); size_t l_UInt64_toUSize(uint64_t); -static lean_object* l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__5___lambda__1___closed__1; +lean_object* l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__5___lambda__2___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Std_HashMap_insert___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Array_foldlMUnsafe_fold___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__3(lean_object*, size_t, size_t, lean_object*); +static lean_object* l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__5___lambda__2___closed__1; lean_object* l___private_Lean_Expr_0__Lean_Expr_getAppArgsAux(lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__5___lambda__2(lean_object*, lean_object*, lean_object*); lean_object* lean_array_fget(lean_object*, lean_object*); -lean_object* l_Lean_registerSimplePersistentEnvExtension___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__4___lambda__3(lean_object*, lean_object*); +lean_object* l_Lean_mkStateFromImportedEntries___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__1(lean_object*, lean_object*); lean_object* lean_st_ref_take(lean_object*, lean_object*); lean_object* l_EStateM_bind___rarg(lean_object*, lean_object*, lean_object*); lean_object* lean_nat_sub(lean_object*, lean_object*); -lean_object* l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__5___lambda__2___boxed(lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_Match_Extension_State_map___default___closed__2; -static lean_object* l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__5___lambda__2___closed__1; +lean_object* l_Array_foldlMUnsafe_fold___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__3(lean_object*, size_t, size_t, lean_object*); static lean_object* l_Lean_Meta_Match_Extension_extension___closed__6; -lean_object* l_Lean_registerSimplePersistentEnvExtension___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__4___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_isMatcher___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_Match_Extension_State_addEntry(lean_object*, lean_object*); lean_object* l_Lean_Name_toString(lean_object*, uint8_t); static lean_object* l_Lean_Meta_Match_Extension_instInhabitedState___closed__1; lean_object* lean_array_get(lean_object*, lean_object*, lean_object*); uint8_t l_Lean_Meta_isMatcherAppCore(lean_object*, lean_object*); +lean_object* l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__5___lambda__1(lean_object*, lean_object*); lean_object* l_Lean_SimplePersistentEnvExtension_getState___at_Lean_Meta_Match_Extension_getMatcherInfo_x3f___spec__1(lean_object*, lean_object*); +lean_object* l_Lean_registerSimplePersistentEnvExtension___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__4___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Std_mkHashMapImp___rarg(lean_object*); static lean_object* l_Lean_Meta_Match_Extension_extension___closed__1; -lean_object* l_Lean_registerSimplePersistentEnvExtension___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__4___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_Match_Extension_extension___closed__2; static lean_object* l_Lean_Meta_Match_Extension_State_map___default___closed__1; uint64_t l_Lean_Name_hash(lean_object*); static lean_object* l_Lean_Meta_Match_Extension_State_map___default___closed__4; lean_object* l_Nat_repr(lean_object*); lean_object* l_Lean_Meta_Match_Extension_State_switch(lean_object*); +static lean_object* l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__5___closed__2; +static lean_object* l_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____closed__1; lean_object* l_Std_HashMapImp_find_x3f___at_Lean_Meta_Match_Extension_getMatcherInfo_x3f___spec__5(lean_object*, lean_object*); lean_object* l_Lean_Meta_Match_Extension_extension; -uint8_t l_Lean_Meta_isMatcherCore(lean_object*, lean_object*); +uint8_t lean_is_matcher(lean_object*, lean_object*); +static lean_object* l_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____closed__4; lean_object* l_Lean_Meta_isMatcher(lean_object*); lean_object* l_Std_PersistentHashMap_mkEmptyEntriesArray(lean_object*, lean_object*); lean_object* l_Std_mkHashMap___at_Lean_Meta_Match_Extension_State_map___default___spec__1(lean_object*); +static lean_object* l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__5___closed__1; +static lean_object* l_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____closed__2; lean_object* lean_array_to_list(lean_object*, lean_object*); extern lean_object* l_Lean_persistentEnvExtensionsRef; lean_object* l_Lean_Meta_matchMatcherApp_x3f_match__2___rarg(lean_object*, lean_object*, lean_object*); @@ -108,11 +117,11 @@ size_t lean_usize_modn(size_t, lean_object*); lean_object* l___private_Init_Util_0__mkPanicMessageWithDecl(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); uint8_t l_Lean_Expr_isConst(lean_object*); static lean_object* l_Lean_Meta_Match_Extension_extension___closed__4; -lean_object* l_Lean_registerSimplePersistentEnvExtension___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__4___lambda__4(lean_object*); lean_object* l_Lean_Meta_Match_Extension_addMatcherInfo(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_Match_MatcherInfo_getMotivePos___boxed(lean_object*); static lean_object* l_Lean_EnvExtensionInterfaceUnsafe_getState___at_Lean_Meta_Match_Extension_getMatcherInfo_x3f___spec__3___closed__5; lean_object* l_Std_PersistentHashMap_insert___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____closed__6; lean_object* l_Lean_PersistentEnvExtension_getState___at_Lean_Meta_Match_Extension_getMatcherInfo_x3f___spec__2___boxed(lean_object*, lean_object*); size_t lean_usize_of_nat(lean_object*); lean_object* l_Lean_Meta_matchMatcherApp_x3f___rarg(lean_object*, lean_object*, lean_object*); @@ -120,79 +129,74 @@ lean_object* l_Lean_PersistentEnvExtension_addEntry___rarg(lean_object*, lean_ob static lean_object* l_Lean_EnvExtensionInterfaceUnsafe_getState___at_Lean_Meta_Match_Extension_getMatcherInfo_x3f___spec__3___closed__3; lean_object* l_Lean_Meta_Match_Extension_extension___elambda__4___rarg(lean_object*); lean_object* l_Lean_EnvExtensionInterfaceUnsafe_instInhabitedExt___lambda__1(lean_object*); -static lean_object* l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__5___closed__1; lean_object* l_Lean_Meta_Match_Extension_extension___elambda__4(lean_object*, lean_object*); +lean_object* l_Lean_registerSimplePersistentEnvExtension___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__4___lambda__4(lean_object*); lean_object* l_Lean_Meta_Match_addMatcherInfo___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_matchMatcherApp_x3f___rarg___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_getMatcherInfo_x3f(lean_object*); -static lean_object* l_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____closed__3; +static lean_object* l_Lean_registerSimplePersistentEnvExtension___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__4___lambda__4___closed__2; lean_object* l_List_redLength___rarg(lean_object*); lean_object* l_Lean_Meta_matchMatcherApp_x3f(lean_object*); lean_object* l_Lean_Expr_getAppNumArgsAux(lean_object*, lean_object*); -static lean_object* l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__5___closed__2; +lean_object* l_Lean_Meta_isMatcherAppCore_x3f_match__1(lean_object*); lean_object* lean_list_to_array(lean_object*, lean_object*); -lean_object* l_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137_(lean_object*); -lean_object* l_Lean_mkStateFromImportedEntries___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__1(lean_object*, lean_object*); +lean_object* l_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148_(lean_object*); lean_object* l_Lean_Meta_isMatcherApp___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_Match_Extension_extension___elambda__3(lean_object*, lean_object*); uint8_t lean_nat_dec_le(lean_object*, lean_object*); lean_object* l_Lean_mkApp(lean_object*, lean_object*); -lean_object* l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__5___lambda__1(lean_object*, lean_object*); lean_object* l_Lean_Meta_Match_Extension_extension___elambda__1___boxed(lean_object*); lean_object* lean_panic_fn(lean_object*, lean_object*); lean_object* l_Lean_Meta_Match_Extension_extension___elambda__1(lean_object*); lean_object* l_Lean_Meta_MatcherApp_toExpr(lean_object*); -lean_object* l_Lean_registerSimplePersistentEnvExtension___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__4___lambda__2(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_getMatcherInfoCore_x3f(lean_object*, lean_object*); lean_object* l_Lean_EnvExtensionInterfaceUnsafe_getState___at_Lean_Meta_Match_Extension_getMatcherInfo_x3f___spec__3___boxed(lean_object*, lean_object*); static lean_object* l_Lean_EnvExtensionInterfaceUnsafe_getState___at_Lean_Meta_Match_Extension_getMatcherInfo_x3f___spec__3___closed__1; lean_object* l_Lean_Meta_Match_Extension_instInhabitedState; lean_object* l_Lean_Meta_matchMatcherApp_x3f_match__1___rarg(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_registerSimplePersistentEnvExtension___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__4___lambda__2(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_Match_Extension_extension___elambda__4___boxed(lean_object*, lean_object*); lean_object* l_Lean_Meta_isMatcherApp(lean_object*); lean_object* l_Array_ofSubarray___rarg(lean_object*); +uint8_t l_Array_anyMUnsafe_any___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__6(lean_object*, lean_object*, size_t, size_t); +lean_object* l_Lean_registerSimplePersistentEnvExtension___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__4___lambda__1(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_instInhabitedPersistentEnvExtensionState___rarg(lean_object*); -static lean_object* l_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____closed__4; +lean_object* l_Lean_registerSimplePersistentEnvExtension___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__4___lambda__3(lean_object*, lean_object*); +lean_object* l_Lean_registerSimplePersistentEnvExtension___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__4(lean_object*, lean_object*); static lean_object* l_Lean_EnvExtensionInterfaceUnsafe_getState___at_Lean_Meta_Match_Extension_getMatcherInfo_x3f___spec__3___closed__2; lean_object* l_List_toArrayAux___rarg(lean_object*, lean_object*); lean_object* l_Lean_SMap_find_x3f___at_Lean_Meta_Match_Extension_getMatcherInfo_x3f___spec__4(lean_object*, lean_object*); lean_object* l_Lean_Meta_Match_MatcherInfo_arity(lean_object*); -static lean_object* l_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____closed__6; lean_object* lean_mk_array(lean_object*, lean_object*); -static lean_object* l_Lean_registerSimplePersistentEnvExtension___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__4___lambda__4___closed__1; lean_object* l_Lean_Meta_isMatcherAppCore___boxed(lean_object*, lean_object*); lean_object* l_Lean_Meta_matchMatcherApp_x3f_match__1(lean_object*); -static lean_object* l_Lean_registerSimplePersistentEnvExtension___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__4___lambda__4___closed__2; static lean_object* l_Lean_Meta_Match_Extension_State_map___default___closed__5; +static lean_object* l_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____closed__3; lean_object* l_Std_mkHashMap___at_Lean_Meta_Match_Extension_State_map___default___spec__1___boxed(lean_object*); lean_object* l_Std_AssocList_find_x3f___at_Lean_Meta_Match_Extension_getMatcherInfo_x3f___spec__6(lean_object*, lean_object*); static lean_object* l_Lean_Meta_Match_Extension_State_map___default___closed__3; +lean_object* l_Array_anyMUnsafe_any___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__6___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_List_lengthTRAux___rarg(lean_object*, lean_object*); lean_object* l_Lean_Meta_isMatcherApp___rarg___lambda__1___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Expr_getAppFn(lean_object*); +lean_object* l_Lean_Meta_isMatcherAppCore_x3f_match__1___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_Std_PersistentHashMap_find_x3f___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_Match_MatcherInfo_numAlts(lean_object*); +lean_object* l_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____lambda__1(lean_object*); lean_object* l_unsafeCast(lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_Match_Extension_extension___closed__3; -lean_object* l_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____lambda__1(lean_object*); lean_object* l_EStateM_pure___rarg(lean_object*, lean_object*); uint32_t lean_uint32_of_nat(lean_object*); -static lean_object* l_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____closed__5; lean_object* l_Lean_Meta_Match_Extension_getMatcherInfo_x3f(lean_object*, lean_object*); -lean_object* l_Lean_registerSimplePersistentEnvExtension___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__4___lambda__4___boxed(lean_object*); lean_object* l_Lean_Meta_Match_Extension_extension___elambda__2___boxed(lean_object*); lean_object* l_Lean_mkConst(lean_object*, lean_object*); -lean_object* l_Lean_registerSimplePersistentEnvExtension___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__4(lean_object*, lean_object*); lean_object* l_Lean_Expr_constName_x21(lean_object*); -lean_object* l_Array_foldlMUnsafe_fold___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__3___boxed(lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_Match_Extension_extension___closed__5; lean_object* l_Lean_Meta_Match_Extension_extension___elambda__2(lean_object*); lean_object* l_Std_AssocList_find_x3f___at_Lean_Meta_Match_Extension_getMatcherInfo_x3f___spec__6___boxed(lean_object*, lean_object*); lean_object* l_Lean_EnvExtensionInterfaceUnsafe_getState___at_Lean_Meta_Match_Extension_getMatcherInfo_x3f___spec__3(lean_object*, lean_object*); -lean_object* l_Array_anyMUnsafe_any___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__6___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PersistentEnvExtension_getState___at_Lean_Meta_Match_Extension_getMatcherInfo_x3f___spec__2(lean_object*, lean_object*); -uint8_t l_Array_anyMUnsafe_any___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__6(lean_object*, lean_object*, size_t, size_t); lean_object* l_Lean_Meta_isMatcher___rarg___lambda__1(lean_object*, lean_object*, lean_object*); uint8_t lean_nat_dec_lt(lean_object*, lean_object*); extern lean_object* l_Lean_Name_instBEqName; @@ -240,6 +244,25 @@ lean_dec(x_1); return x_2; } } +lean_object* l_Lean_Meta_Match_MatcherInfo_getFirstDiscrPos(lean_object* x_1) { +_start: +{ +lean_object* x_2; lean_object* x_3; lean_object* x_4; +x_2 = lean_ctor_get(x_1, 0); +x_3 = lean_unsigned_to_nat(1u); +x_4 = lean_nat_add(x_2, x_3); +return x_4; +} +} +lean_object* l_Lean_Meta_Match_MatcherInfo_getFirstDiscrPos___boxed(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = l_Lean_Meta_Match_MatcherInfo_getFirstDiscrPos(x_1); +lean_dec(x_1); +return x_2; +} +} lean_object* l_Lean_Meta_Match_MatcherInfo_getMotivePos(lean_object* x_1) { _start: { @@ -503,7 +526,7 @@ x_2 = l_Lean_SMap_switch___at_Lean_Meta_Match_Extension_State_switch___spec__1(x return x_2; } } -lean_object* l_Array_foldlMUnsafe_fold___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__2(lean_object* x_1, size_t x_2, size_t x_3, lean_object* x_4) { +lean_object* l_Array_foldlMUnsafe_fold___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__2(lean_object* x_1, size_t x_2, size_t x_3, lean_object* x_4) { _start: { uint8_t x_5; @@ -525,7 +548,7 @@ return x_4; } } } -lean_object* l_Array_foldlMUnsafe_fold___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__3(lean_object* x_1, size_t x_2, size_t x_3, lean_object* x_4) { +lean_object* l_Array_foldlMUnsafe_fold___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__3(lean_object* x_1, size_t x_2, size_t x_3, lean_object* x_4) { _start: { uint8_t x_5; @@ -563,7 +586,7 @@ size_t x_15; size_t x_16; lean_object* x_17; x_15 = 0; x_16 = lean_usize_of_nat(x_7); lean_dec(x_7); -x_17 = l_Array_foldlMUnsafe_fold___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__2(x_6, x_15, x_16, x_4); +x_17 = l_Array_foldlMUnsafe_fold___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__2(x_6, x_15, x_16, x_4); lean_dec(x_6); x_2 = x_11; x_4 = x_17; @@ -577,7 +600,7 @@ return x_4; } } } -lean_object* l_Lean_mkStateFromImportedEntries___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__1(lean_object* x_1, lean_object* x_2) { +lean_object* l_Lean_mkStateFromImportedEntries___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__1(lean_object* x_1, lean_object* x_2) { _start: { lean_object* x_3; lean_object* x_4; uint8_t x_5; @@ -606,14 +629,14 @@ size_t x_7; size_t x_8; lean_object* x_9; x_7 = 0; x_8 = lean_usize_of_nat(x_3); lean_dec(x_3); -x_9 = l_Array_foldlMUnsafe_fold___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__3(x_2, x_7, x_8, x_1); +x_9 = l_Array_foldlMUnsafe_fold___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__3(x_2, x_7, x_8, x_1); lean_dec(x_2); return x_9; } } } } -uint8_t l_Array_anyMUnsafe_any___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__6(lean_object* x_1, lean_object* x_2, size_t x_3, size_t x_4) { +uint8_t l_Array_anyMUnsafe_any___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__6(lean_object* x_1, lean_object* x_2, size_t x_3, size_t x_4) { _start: { uint8_t x_5; @@ -651,7 +674,7 @@ return x_14; } } } -static lean_object* _init_l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__5___lambda__1___closed__1() { +static lean_object* _init_l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__5___lambda__1___closed__1() { _start: { lean_object* x_1; lean_object* x_2; @@ -660,11 +683,11 @@ x_2 = lean_mk_empty_array_with_capacity(x_1); return x_2; } } -lean_object* l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__5___lambda__1(lean_object* x_1, lean_object* x_2) { +lean_object* l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__5___lambda__1(lean_object* x_1, lean_object* x_2) { _start: { lean_object* x_3; lean_object* x_4; lean_object* x_5; -x_3 = l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__5___lambda__1___closed__1; +x_3 = l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__5___lambda__1___closed__1; x_4 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_4, 0, x_3); lean_ctor_set(x_4, 1, x_1); @@ -674,15 +697,15 @@ lean_ctor_set(x_5, 1, x_2); return x_5; } } -static lean_object* _init_l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__5___lambda__2___closed__1() { +static lean_object* _init_l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__5___lambda__2___closed__1() { _start: { lean_object* x_1; -x_1 = lean_alloc_closure((void*)(l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__5___lambda__1), 2, 0); +x_1 = lean_alloc_closure((void*)(l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__5___lambda__1), 2, 0); return x_1; } } -lean_object* l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__5___lambda__2(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +lean_object* l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__5___lambda__2(lean_object* x_1, lean_object* x_2, lean_object* x_3) { _start: { 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; @@ -699,7 +722,7 @@ lean_inc(x_8); x_9 = lean_ctor_get(x_1, 5); lean_inc(x_9); lean_dec(x_1); -x_10 = l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__5___lambda__2___closed__1; +x_10 = l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__5___lambda__2___closed__1; x_11 = lean_alloc_closure((void*)(l_EStateM_bind___rarg), 3, 2); lean_closure_set(x_11, 0, x_5); lean_closure_set(x_11, 1, x_10); @@ -780,7 +803,7 @@ return x_30; } } } -static lean_object* _init_l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__5___closed__1() { +static lean_object* _init_l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__5___closed__1() { _start: { lean_object* x_1; @@ -788,7 +811,7 @@ x_1 = lean_mk_string("invalid environment extension, '"); return x_1; } } -static lean_object* _init_l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__5___closed__2() { +static lean_object* _init_l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__5___closed__2() { _start: { lean_object* x_1; @@ -796,7 +819,7 @@ x_1 = lean_mk_string("' has already been used"); return x_1; } } -lean_object* l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__5(lean_object* x_1, lean_object* x_2) { +lean_object* l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__5(lean_object* x_1, lean_object* x_2) { _start: { lean_object* x_3; lean_object* x_4; uint8_t x_5; @@ -818,7 +841,7 @@ lean_dec(x_8); lean_free_object(x_4); lean_dec(x_6); x_11 = lean_box(0); -x_12 = l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__5___lambda__2(x_1, x_11, x_7); +x_12 = l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__5___lambda__2(x_1, x_11, x_7); return x_12; } else @@ -832,7 +855,7 @@ lean_dec(x_8); lean_free_object(x_4); lean_dec(x_6); x_14 = lean_box(0); -x_15 = l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__5___lambda__2(x_1, x_14, x_7); +x_15 = l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__5___lambda__2(x_1, x_14, x_7); return x_15; } else @@ -841,14 +864,14 @@ size_t x_16; size_t x_17; uint8_t x_18; x_16 = 0; x_17 = lean_usize_of_nat(x_8); lean_dec(x_8); -x_18 = l_Array_anyMUnsafe_any___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__6(x_1, x_6, x_16, x_17); +x_18 = l_Array_anyMUnsafe_any___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__6(x_1, x_6, x_16, x_17); lean_dec(x_6); if (x_18 == 0) { lean_object* x_19; lean_object* x_20; lean_free_object(x_4); x_19 = lean_box(0); -x_20 = l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__5___lambda__2(x_1, x_19, x_7); +x_20 = l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__5___lambda__2(x_1, x_19, x_7); return x_20; } else @@ -859,10 +882,10 @@ lean_inc(x_21); lean_dec(x_1); x_22 = 1; x_23 = l_Lean_Name_toString(x_21, x_22); -x_24 = l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__5___closed__1; +x_24 = l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__5___closed__1; x_25 = lean_string_append(x_24, x_23); lean_dec(x_23); -x_26 = l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__5___closed__2; +x_26 = l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__5___closed__2; x_27 = lean_string_append(x_25, x_26); x_28 = lean_alloc_ctor(18, 1, 0); lean_ctor_set(x_28, 0, x_27); @@ -890,7 +913,7 @@ lean_object* x_34; lean_object* x_35; lean_dec(x_31); lean_dec(x_29); x_34 = lean_box(0); -x_35 = l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__5___lambda__2(x_1, x_34, x_30); +x_35 = l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__5___lambda__2(x_1, x_34, x_30); return x_35; } else @@ -903,7 +926,7 @@ lean_object* x_37; lean_object* x_38; lean_dec(x_31); lean_dec(x_29); x_37 = lean_box(0); -x_38 = l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__5___lambda__2(x_1, x_37, x_30); +x_38 = l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__5___lambda__2(x_1, x_37, x_30); return x_38; } else @@ -912,13 +935,13 @@ size_t x_39; size_t x_40; uint8_t x_41; x_39 = 0; x_40 = lean_usize_of_nat(x_31); lean_dec(x_31); -x_41 = l_Array_anyMUnsafe_any___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__6(x_1, x_29, x_39, x_40); +x_41 = l_Array_anyMUnsafe_any___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__6(x_1, x_29, x_39, x_40); lean_dec(x_29); if (x_41 == 0) { lean_object* x_42; lean_object* x_43; x_42 = lean_box(0); -x_43 = l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__5___lambda__2(x_1, x_42, x_30); +x_43 = l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__5___lambda__2(x_1, x_42, x_30); return x_43; } else @@ -929,10 +952,10 @@ lean_inc(x_44); lean_dec(x_1); x_45 = 1; x_46 = l_Lean_Name_toString(x_44, x_45); -x_47 = l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__5___closed__1; +x_47 = l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__5___closed__1; x_48 = lean_string_append(x_47, x_46); lean_dec(x_46); -x_49 = l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__5___closed__2; +x_49 = l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__5___closed__2; x_50 = lean_string_append(x_48, x_49); x_51 = lean_alloc_ctor(18, 1, 0); lean_ctor_set(x_51, 0, x_50); @@ -946,7 +969,7 @@ return x_52; } } } -lean_object* l_Lean_registerSimplePersistentEnvExtension___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__4___lambda__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { +lean_object* l_Lean_registerSimplePersistentEnvExtension___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__4___lambda__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { _start: { lean_object* x_6; lean_object* x_7; lean_object* x_8; @@ -960,7 +983,7 @@ lean_ctor_set(x_8, 1, x_5); return x_8; } } -lean_object* l_Lean_registerSimplePersistentEnvExtension___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__4___lambda__2(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +lean_object* l_Lean_registerSimplePersistentEnvExtension___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__4___lambda__2(lean_object* x_1, lean_object* x_2, lean_object* x_3) { _start: { uint8_t x_4; @@ -1005,7 +1028,7 @@ return x_15; } } } -lean_object* l_Lean_registerSimplePersistentEnvExtension___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__4___lambda__3(lean_object* x_1, lean_object* x_2) { +lean_object* l_Lean_registerSimplePersistentEnvExtension___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__4___lambda__3(lean_object* x_1, lean_object* x_2) { _start: { lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; @@ -1020,7 +1043,7 @@ x_6 = lean_apply_1(x_3, x_5); return x_6; } } -static lean_object* _init_l_Lean_registerSimplePersistentEnvExtension___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__4___lambda__4___closed__1() { +static lean_object* _init_l_Lean_registerSimplePersistentEnvExtension___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__4___lambda__4___closed__1() { _start: { lean_object* x_1; @@ -1028,17 +1051,17 @@ x_1 = lean_mk_string("number of local entries: "); return x_1; } } -static lean_object* _init_l_Lean_registerSimplePersistentEnvExtension___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__4___lambda__4___closed__2() { +static lean_object* _init_l_Lean_registerSimplePersistentEnvExtension___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__4___lambda__4___closed__2() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_registerSimplePersistentEnvExtension___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__4___lambda__4___closed__1; +x_1 = l_Lean_registerSimplePersistentEnvExtension___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__4___lambda__4___closed__1; x_2 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -lean_object* l_Lean_registerSimplePersistentEnvExtension___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__4___lambda__4(lean_object* x_1) { +lean_object* l_Lean_registerSimplePersistentEnvExtension___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__4___lambda__4(lean_object* x_1) { _start: { lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; @@ -1048,22 +1071,22 @@ x_4 = l_List_lengthTRAux___rarg(x_2, x_3); x_5 = l_Nat_repr(x_4); x_6 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_6, 0, x_5); -x_7 = l_Lean_registerSimplePersistentEnvExtension___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__4___lambda__4___closed__2; +x_7 = l_Lean_registerSimplePersistentEnvExtension___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__4___lambda__4___closed__2; x_8 = lean_alloc_ctor(4, 2, 0); lean_ctor_set(x_8, 0, x_7); lean_ctor_set(x_8, 1, x_6); return x_8; } } -static lean_object* _init_l_Lean_registerSimplePersistentEnvExtension___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__4___closed__1() { +static lean_object* _init_l_Lean_registerSimplePersistentEnvExtension___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__4___closed__1() { _start: { lean_object* x_1; -x_1 = lean_alloc_closure((void*)(l_Lean_registerSimplePersistentEnvExtension___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__4___lambda__4___boxed), 1, 0); +x_1 = lean_alloc_closure((void*)(l_Lean_registerSimplePersistentEnvExtension___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__4___lambda__4___boxed), 1, 0); return x_1; } } -lean_object* l_Lean_registerSimplePersistentEnvExtension___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__4(lean_object* x_1, lean_object* x_2) { +lean_object* l_Lean_registerSimplePersistentEnvExtension___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__4(lean_object* x_1, lean_object* x_2) { _start: { lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; @@ -1072,7 +1095,7 @@ lean_inc(x_3); x_4 = lean_ctor_get(x_1, 2); lean_inc(x_4); x_5 = lean_box(0); -x_6 = l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__5___lambda__1___closed__1; +x_6 = l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__5___lambda__1___closed__1; lean_inc(x_4); x_7 = lean_apply_1(x_4, x_6); x_8 = lean_alloc_ctor(0, 2, 0); @@ -1080,15 +1103,15 @@ lean_ctor_set(x_8, 0, x_5); lean_ctor_set(x_8, 1, x_7); x_9 = lean_alloc_closure((void*)(l_EStateM_pure___rarg), 2, 1); lean_closure_set(x_9, 0, x_8); -x_10 = lean_alloc_closure((void*)(l_Lean_registerSimplePersistentEnvExtension___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__4___lambda__1___boxed), 5, 2); +x_10 = lean_alloc_closure((void*)(l_Lean_registerSimplePersistentEnvExtension___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__4___lambda__1___boxed), 5, 2); lean_closure_set(x_10, 0, x_4); lean_closure_set(x_10, 1, x_5); lean_inc(x_1); -x_11 = lean_alloc_closure((void*)(l_Lean_registerSimplePersistentEnvExtension___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__4___lambda__2), 3, 1); +x_11 = lean_alloc_closure((void*)(l_Lean_registerSimplePersistentEnvExtension___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__4___lambda__2), 3, 1); lean_closure_set(x_11, 0, x_1); -x_12 = lean_alloc_closure((void*)(l_Lean_registerSimplePersistentEnvExtension___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__4___lambda__3), 2, 1); +x_12 = lean_alloc_closure((void*)(l_Lean_registerSimplePersistentEnvExtension___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__4___lambda__3), 2, 1); lean_closure_set(x_12, 0, x_1); -x_13 = l_Lean_registerSimplePersistentEnvExtension___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__4___closed__1; +x_13 = l_Lean_registerSimplePersistentEnvExtension___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__4___closed__1; x_14 = lean_alloc_ctor(0, 6, 0); lean_ctor_set(x_14, 0, x_3); lean_ctor_set(x_14, 1, x_9); @@ -1096,21 +1119,21 @@ lean_ctor_set(x_14, 2, x_10); lean_ctor_set(x_14, 3, x_11); lean_ctor_set(x_14, 4, x_12); lean_ctor_set(x_14, 5, x_13); -x_15 = l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__5(x_14, x_2); +x_15 = l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__5(x_14, x_2); return x_15; } } -lean_object* l_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____lambda__1(lean_object* x_1) { +lean_object* l_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____lambda__1(lean_object* x_1) { _start: { lean_object* x_2; lean_object* x_3; lean_object* x_4; x_2 = l_Lean_Meta_Match_Extension_instInhabitedState___closed__2; -x_3 = l_Lean_mkStateFromImportedEntries___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__1(x_2, x_1); +x_3 = l_Lean_mkStateFromImportedEntries___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__1(x_2, x_1); x_4 = l_Lean_SMap_switch___at_Lean_Meta_Match_Extension_State_switch___spec__1(x_3); return x_4; } } -static lean_object* _init_l_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____closed__1() { +static lean_object* _init_l_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____closed__1() { _start: { lean_object* x_1; @@ -1118,17 +1141,17 @@ x_1 = lean_mk_string("matcher"); return x_1; } } -static lean_object* _init_l_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____closed__2() { +static lean_object* _init_l_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____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_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____closed__1; +x_2 = l_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; } } -static lean_object* _init_l_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____closed__3() { +static lean_object* _init_l_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____closed__3() { _start: { lean_object* x_1; @@ -1137,7 +1160,7 @@ lean_closure_set(x_1, 0, lean_box(0)); return x_1; } } -static lean_object* _init_l_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____closed__4() { +static lean_object* _init_l_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____closed__4() { _start: { lean_object* x_1; @@ -1145,22 +1168,22 @@ x_1 = lean_alloc_closure((void*)(l_Lean_Meta_Match_Extension_State_addEntry), 2, return x_1; } } -static lean_object* _init_l_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____closed__5() { +static lean_object* _init_l_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____closed__5() { _start: { lean_object* x_1; -x_1 = lean_alloc_closure((void*)(l_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____lambda__1), 1, 0); +x_1 = lean_alloc_closure((void*)(l_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____lambda__1), 1, 0); return x_1; } } -static lean_object* _init_l_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____closed__6() { +static lean_object* _init_l_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____closed__6() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; -x_1 = l_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____closed__2; -x_2 = l_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____closed__4; -x_3 = l_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____closed__5; -x_4 = l_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____closed__3; +x_1 = l_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____closed__2; +x_2 = l_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____closed__4; +x_3 = l_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____closed__5; +x_4 = l_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____closed__3; x_5 = lean_alloc_ctor(0, 4, 0); lean_ctor_set(x_5, 0, x_1); lean_ctor_set(x_5, 1, x_2); @@ -1169,16 +1192,16 @@ lean_ctor_set(x_5, 3, x_4); return x_5; } } -lean_object* l_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137_(lean_object* x_1) { +lean_object* l_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148_(lean_object* x_1) { _start: { lean_object* x_2; lean_object* x_3; -x_2 = l_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____closed__6; -x_3 = l_Lean_registerSimplePersistentEnvExtension___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__4(x_2, x_1); +x_2 = l_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____closed__6; +x_3 = l_Lean_registerSimplePersistentEnvExtension___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__4(x_2, x_1); return x_3; } } -lean_object* l_Array_foldlMUnsafe_fold___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__2___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +lean_object* l_Array_foldlMUnsafe_fold___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__2___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { size_t x_5; size_t x_6; lean_object* x_7; @@ -1186,12 +1209,12 @@ x_5 = lean_unbox_usize(x_2); lean_dec(x_2); x_6 = lean_unbox_usize(x_3); lean_dec(x_3); -x_7 = l_Array_foldlMUnsafe_fold___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__2(x_1, x_5, x_6, x_4); +x_7 = l_Array_foldlMUnsafe_fold___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__2(x_1, x_5, x_6, x_4); lean_dec(x_1); return x_7; } } -lean_object* l_Array_foldlMUnsafe_fold___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__3___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +lean_object* l_Array_foldlMUnsafe_fold___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__3___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { size_t x_5; size_t x_6; lean_object* x_7; @@ -1199,12 +1222,12 @@ x_5 = lean_unbox_usize(x_2); lean_dec(x_2); x_6 = lean_unbox_usize(x_3); lean_dec(x_3); -x_7 = l_Array_foldlMUnsafe_fold___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__3(x_1, x_5, x_6, x_4); +x_7 = l_Array_foldlMUnsafe_fold___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__3(x_1, x_5, x_6, x_4); lean_dec(x_1); return x_7; } } -lean_object* l_Array_anyMUnsafe_any___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__6___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +lean_object* l_Array_anyMUnsafe_any___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__6___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { size_t x_5; size_t x_6; uint8_t x_7; lean_object* x_8; @@ -1212,36 +1235,36 @@ x_5 = lean_unbox_usize(x_3); lean_dec(x_3); x_6 = lean_unbox_usize(x_4); lean_dec(x_4); -x_7 = l_Array_anyMUnsafe_any___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__6(x_1, x_2, x_5, x_6); +x_7 = l_Array_anyMUnsafe_any___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__6(x_1, x_2, x_5, x_6); lean_dec(x_2); lean_dec(x_1); x_8 = lean_box(x_7); return x_8; } } -lean_object* l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__5___lambda__2___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +lean_object* l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__5___lambda__2___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { _start: { lean_object* x_4; -x_4 = l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__5___lambda__2(x_1, x_2, x_3); +x_4 = l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__5___lambda__2(x_1, x_2, x_3); lean_dec(x_2); return x_4; } } -lean_object* l_Lean_registerSimplePersistentEnvExtension___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__4___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* l_Lean_registerSimplePersistentEnvExtension___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__4___lambda__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { _start: { lean_object* x_6; -x_6 = l_Lean_registerSimplePersistentEnvExtension___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__4___lambda__1(x_1, x_2, x_3, x_4, x_5); +x_6 = l_Lean_registerSimplePersistentEnvExtension___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__4___lambda__1(x_1, x_2, x_3, x_4, x_5); lean_dec(x_4); return x_6; } } -lean_object* l_Lean_registerSimplePersistentEnvExtension___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__4___lambda__4___boxed(lean_object* x_1) { +lean_object* l_Lean_registerSimplePersistentEnvExtension___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__4___lambda__4___boxed(lean_object* x_1) { _start: { lean_object* x_2; -x_2 = l_Lean_registerSimplePersistentEnvExtension___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__4___lambda__4(x_1); +x_2 = l_Lean_registerSimplePersistentEnvExtension___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__4___lambda__4(x_1); lean_dec(x_1); return x_2; } @@ -1258,7 +1281,7 @@ lean_object* l_Lean_Meta_Match_Extension_extension___elambda__2(lean_object* x_1 _start: { lean_object* x_2; -x_2 = l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__5___lambda__1___closed__1; +x_2 = l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__5___lambda__1___closed__1; return x_2; } } @@ -1840,7 +1863,7 @@ x_2 = lean_alloc_closure((void*)(l_Lean_Meta_getMatcherInfo_x3f___rarg), 3, 0); return x_2; } } -uint8_t l_Lean_Meta_isMatcherCore(lean_object* x_1, lean_object* x_2) { +uint8_t lean_is_matcher(lean_object* x_1, lean_object* x_2) { _start: { lean_object* x_3; @@ -1864,7 +1887,7 @@ lean_object* l_Lean_Meta_isMatcherCore___boxed(lean_object* x_1, lean_object* x_ _start: { uint8_t x_3; lean_object* x_4; -x_3 = l_Lean_Meta_isMatcherCore(x_1, x_2); +x_3 = lean_is_matcher(x_1, x_2); x_4 = lean_box(x_3); return x_4; } @@ -1879,7 +1902,7 @@ lean_dec(x_1); x_5 = lean_ctor_get(x_4, 1); lean_inc(x_5); lean_dec(x_4); -x_6 = l_Lean_Meta_isMatcherCore(x_3, x_2); +x_6 = lean_is_matcher(x_3, x_2); x_7 = lean_box(x_6); x_8 = lean_apply_2(x_5, lean_box(0), x_7); return x_8; @@ -1909,7 +1932,7 @@ x_2 = lean_alloc_closure((void*)(l_Lean_Meta_isMatcher___rarg), 3, 0); return x_2; } } -lean_object* l_Lean_Meta_isMatcherAppCore_match__1___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +lean_object* l_Lean_Meta_isMatcherAppCore_x3f_match__1___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3) { _start: { if (lean_obj_tag(x_1) == 0) @@ -1931,15 +1954,15 @@ return x_6; } } } -lean_object* l_Lean_Meta_isMatcherAppCore_match__1(lean_object* x_1) { +lean_object* l_Lean_Meta_isMatcherAppCore_x3f_match__1(lean_object* x_1) { _start: { lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l_Lean_Meta_isMatcherAppCore_match__1___rarg), 3, 0); +x_2 = lean_alloc_closure((void*)(l_Lean_Meta_isMatcherAppCore_x3f_match__1___rarg), 3, 0); return x_2; } } -uint8_t l_Lean_Meta_isMatcherAppCore(lean_object* x_1, lean_object* x_2) { +lean_object* l_Lean_Meta_isMatcherAppCore_x3f(lean_object* x_1, lean_object* x_2) { _start: { lean_object* x_3; uint8_t x_4; @@ -1947,10 +1970,10 @@ x_3 = l_Lean_Expr_getAppFn(x_2); x_4 = l_Lean_Expr_isConst(x_3); if (x_4 == 0) { -uint8_t x_5; +lean_object* x_5; lean_dec(x_3); lean_dec(x_1); -x_5 = 0; +x_5 = lean_box(0); return x_5; } else @@ -1961,25 +1984,94 @@ lean_dec(x_3); x_7 = l_Lean_Meta_Match_Extension_getMatcherInfo_x3f(x_1, x_6); if (lean_obj_tag(x_7) == 0) { -uint8_t x_8; -x_8 = 0; +lean_object* x_8; +x_8 = lean_box(0); return x_8; } else { -lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; uint8_t x_13; -x_9 = lean_ctor_get(x_7, 0); -lean_inc(x_9); -lean_dec(x_7); -x_10 = l_Lean_Meta_Match_MatcherInfo_arity(x_9); -lean_dec(x_9); -x_11 = lean_unsigned_to_nat(0u); -x_12 = l_Lean_Expr_getAppNumArgsAux(x_2, x_11); -x_13 = lean_nat_dec_le(x_10, x_12); -lean_dec(x_12); +uint8_t x_9; +x_9 = !lean_is_exclusive(x_7); +if (x_9 == 0) +{ +lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; uint8_t x_14; +x_10 = lean_ctor_get(x_7, 0); +x_11 = l_Lean_Meta_Match_MatcherInfo_arity(x_10); +x_12 = lean_unsigned_to_nat(0u); +x_13 = l_Lean_Expr_getAppNumArgsAux(x_2, x_12); +x_14 = lean_nat_dec_le(x_11, x_13); +lean_dec(x_13); +lean_dec(x_11); +if (x_14 == 0) +{ +lean_object* x_15; +lean_free_object(x_7); lean_dec(x_10); -return x_13; +x_15 = lean_box(0); +return x_15; } +else +{ +return x_7; +} +} +else +{ +lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; uint8_t x_20; +x_16 = lean_ctor_get(x_7, 0); +lean_inc(x_16); +lean_dec(x_7); +x_17 = l_Lean_Meta_Match_MatcherInfo_arity(x_16); +x_18 = lean_unsigned_to_nat(0u); +x_19 = l_Lean_Expr_getAppNumArgsAux(x_2, x_18); +x_20 = lean_nat_dec_le(x_17, x_19); +lean_dec(x_19); +lean_dec(x_17); +if (x_20 == 0) +{ +lean_object* x_21; +lean_dec(x_16); +x_21 = lean_box(0); +return x_21; +} +else +{ +lean_object* x_22; +x_22 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_22, 0, x_16); +return x_22; +} +} +} +} +} +} +lean_object* l_Lean_Meta_isMatcherAppCore_x3f___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = l_Lean_Meta_isMatcherAppCore_x3f(x_1, x_2); +lean_dec(x_2); +return x_3; +} +} +uint8_t l_Lean_Meta_isMatcherAppCore(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = l_Lean_Meta_isMatcherAppCore_x3f(x_1, x_2); +if (lean_obj_tag(x_3) == 0) +{ +uint8_t x_4; +x_4 = 0; +return x_4; +} +else +{ +uint8_t x_5; +lean_dec(x_3); +x_5 = 1; +return x_5; } } } @@ -2446,32 +2538,32 @@ l_Lean_Meta_Match_Extension_instInhabitedState___closed__2 = _init_l_Lean_Meta_M lean_mark_persistent(l_Lean_Meta_Match_Extension_instInhabitedState___closed__2); l_Lean_Meta_Match_Extension_instInhabitedState = _init_l_Lean_Meta_Match_Extension_instInhabitedState(); lean_mark_persistent(l_Lean_Meta_Match_Extension_instInhabitedState); -l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__5___lambda__1___closed__1 = _init_l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__5___lambda__1___closed__1(); -lean_mark_persistent(l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__5___lambda__1___closed__1); -l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__5___lambda__2___closed__1 = _init_l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__5___lambda__2___closed__1(); -lean_mark_persistent(l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__5___lambda__2___closed__1); -l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__5___closed__1 = _init_l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__5___closed__1(); -lean_mark_persistent(l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__5___closed__1); -l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__5___closed__2 = _init_l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__5___closed__2(); -lean_mark_persistent(l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__5___closed__2); -l_Lean_registerSimplePersistentEnvExtension___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__4___lambda__4___closed__1 = _init_l_Lean_registerSimplePersistentEnvExtension___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__4___lambda__4___closed__1(); -lean_mark_persistent(l_Lean_registerSimplePersistentEnvExtension___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__4___lambda__4___closed__1); -l_Lean_registerSimplePersistentEnvExtension___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__4___lambda__4___closed__2 = _init_l_Lean_registerSimplePersistentEnvExtension___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__4___lambda__4___closed__2(); -lean_mark_persistent(l_Lean_registerSimplePersistentEnvExtension___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__4___lambda__4___closed__2); -l_Lean_registerSimplePersistentEnvExtension___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__4___closed__1 = _init_l_Lean_registerSimplePersistentEnvExtension___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__4___closed__1(); -lean_mark_persistent(l_Lean_registerSimplePersistentEnvExtension___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____spec__4___closed__1); -l_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____closed__1 = _init_l_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____closed__1(); -lean_mark_persistent(l_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____closed__1); -l_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____closed__2 = _init_l_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____closed__2(); -lean_mark_persistent(l_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____closed__2); -l_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____closed__3 = _init_l_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____closed__3(); -lean_mark_persistent(l_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____closed__3); -l_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____closed__4 = _init_l_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____closed__4(); -lean_mark_persistent(l_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____closed__4); -l_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____closed__5 = _init_l_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____closed__5(); -lean_mark_persistent(l_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____closed__5); -l_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____closed__6 = _init_l_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____closed__6(); -lean_mark_persistent(l_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137____closed__6); +l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__5___lambda__1___closed__1 = _init_l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__5___lambda__1___closed__1(); +lean_mark_persistent(l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__5___lambda__1___closed__1); +l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__5___lambda__2___closed__1 = _init_l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__5___lambda__2___closed__1(); +lean_mark_persistent(l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__5___lambda__2___closed__1); +l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__5___closed__1 = _init_l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__5___closed__1(); +lean_mark_persistent(l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__5___closed__1); +l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__5___closed__2 = _init_l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__5___closed__2(); +lean_mark_persistent(l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__5___closed__2); +l_Lean_registerSimplePersistentEnvExtension___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__4___lambda__4___closed__1 = _init_l_Lean_registerSimplePersistentEnvExtension___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__4___lambda__4___closed__1(); +lean_mark_persistent(l_Lean_registerSimplePersistentEnvExtension___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__4___lambda__4___closed__1); +l_Lean_registerSimplePersistentEnvExtension___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__4___lambda__4___closed__2 = _init_l_Lean_registerSimplePersistentEnvExtension___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__4___lambda__4___closed__2(); +lean_mark_persistent(l_Lean_registerSimplePersistentEnvExtension___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__4___lambda__4___closed__2); +l_Lean_registerSimplePersistentEnvExtension___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__4___closed__1 = _init_l_Lean_registerSimplePersistentEnvExtension___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__4___closed__1(); +lean_mark_persistent(l_Lean_registerSimplePersistentEnvExtension___at_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____spec__4___closed__1); +l_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____closed__1 = _init_l_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____closed__1(); +lean_mark_persistent(l_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____closed__1); +l_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____closed__2 = _init_l_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____closed__2(); +lean_mark_persistent(l_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____closed__2); +l_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____closed__3 = _init_l_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____closed__3(); +lean_mark_persistent(l_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____closed__3); +l_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____closed__4 = _init_l_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____closed__4(); +lean_mark_persistent(l_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____closed__4); +l_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____closed__5 = _init_l_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____closed__5(); +lean_mark_persistent(l_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____closed__5); +l_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____closed__6 = _init_l_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____closed__6(); +lean_mark_persistent(l_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148____closed__6); l_Lean_Meta_Match_Extension_extension___elambda__4___rarg___closed__1 = _init_l_Lean_Meta_Match_Extension_extension___elambda__4___rarg___closed__1(); l_Lean_Meta_Match_Extension_extension___elambda__4___rarg___closed__2 = _init_l_Lean_Meta_Match_Extension_extension___elambda__4___rarg___closed__2(); lean_mark_persistent(l_Lean_Meta_Match_Extension_extension___elambda__4___rarg___closed__2); @@ -2491,7 +2583,7 @@ l_Lean_Meta_Match_Extension_extension___closed__6 = _init_l_Lean_Meta_Match_Exte lean_mark_persistent(l_Lean_Meta_Match_Extension_extension___closed__6); l_Lean_Meta_Match_Extension_extension___closed__7 = _init_l_Lean_Meta_Match_Extension_extension___closed__7(); lean_mark_persistent(l_Lean_Meta_Match_Extension_extension___closed__7); -res = l_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_137_(lean_io_mk_world()); +res = l_Lean_Meta_Match_Extension_initFn____x40_Lean_Meta_Match_MatcherInfo___hyg_148_(lean_io_mk_world()); if (lean_io_result_is_error(res)) return res; l_Lean_Meta_Match_Extension_extension = lean_io_result_get_value(res); lean_mark_persistent(l_Lean_Meta_Match_Extension_extension); diff --git a/stage0/stdlib/Lean/Meta/Tactic/Simp/Main.c b/stage0/stdlib/Lean/Meta/Tactic/Simp/Main.c index b0e3179717..06c201034c 100644 --- a/stage0/stdlib/Lean/Meta/Tactic/Simp/Main.c +++ b/stage0/stdlib/Lean/Meta/Tactic/Simp/Main.c @@ -36,8 +36,8 @@ lean_object* l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_mkImpCongr uint8_t l_Lean_Expr_isNatLit(lean_object*); lean_object* l_Lean_Meta_Simp_simp_cacheResult___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_stringToMessageData(lean_object*); -static lean_object* l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__3___closed__6; lean_object* l_Lean_Meta_Simp_simp_tryCongrLemma_x3f___lambda__7(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_simpLet___lambda__1___closed__1; lean_object* l_Lean_Meta_transform_visit___at___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___spec__2___lambda__2(lean_object*, lean_object*, lean_object*); lean_object* lean_mk_empty_array_with_capacity(lean_object*); lean_object* l_Lean_mkSort(lean_object*); @@ -46,10 +46,10 @@ lean_object* l_Lean_Meta_withLocalDecl___at___private_Lean_Meta_Tactic_Simp_Main lean_object* l_Lean_Meta_Simp_simp_simpLambda___lambda__2(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_mkForallFVars(lean_object*, lean_object*, uint8_t, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_simpGoal___spec__3___lambda__1___closed__1; -static lean_object* l_Lean_Meta_Simp_simp_simpLet___closed__8; lean_object* l_Lean_Meta_withLetDecl___at___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___spec__9___boxed(lean_object*, lean_object*); lean_object* l_Lean_LocalDecl_userName(lean_object*); static lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_simp_congrDefault___spec__1___closed__3; +static lean_object* l_Lean_Meta_Simp_simp_simpStep___closed__6; lean_object* l_Lean_Meta_simpGoal_match__4(lean_object*); lean_object* l_Lean_Meta_Simp_simp_congrDefault(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_Simp_simp_withNewLemmas_match__1(lean_object*); @@ -62,6 +62,7 @@ static lean_object* l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___closed__2; lean_object* lean_array_uget(lean_object*, size_t); lean_object* l_Lean_Meta_Simp_simp_tryCongrLemma_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* l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_simp_congrDefault___spec__1___lambda__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_Simp_simp_simpLet___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_object* lean_expr_update_mdata(lean_object*, lean_object*); lean_object* l_Lean_Expr_bindingDomain_x21(lean_object*); static lean_object* l_Lean_Meta_Simp_simp_simpArrow___lambda__3___closed__3; @@ -73,14 +74,16 @@ lean_object* l_Lean_Meta_Simp_simp_simpArrow___lambda__2(lean_object*, lean_obje static lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_simp_congrDefault___spec__1___closed__2; lean_object* l_Lean_Meta_Simp_simp___lambda__2(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_transform_visit___at___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___spec__2___lambda__1___closed__1; -static lean_object* l_Lean_Meta_Simp_simp_simpLet___closed__5; static lean_object* l_Lean_Meta_Simp_simp_tryCongrLemma_x3f___lambda__4___closed__1; extern lean_object* l_Lean_ExprStructEq_instHashableExprStructEq; +lean_object* l_Lean_Meta_withLocalDecl___at_Lean_Meta_Simp_simp_simpLet___spec__1___rarg___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_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__2___closed__8; extern lean_object* l_Lean_maxRecDepthErrorMessage; uint8_t l_Lean_Expr_isArrow(lean_object*); lean_object* lean_array_uset(lean_object*, size_t, lean_object*); static lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_simp_congrDefault___spec__1___closed__4; lean_object* l_Lean_Meta_Simp_simp_simpLambda___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at_Lean_Meta_Simp_simp_simpForall___spec__3___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); 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_object* l_Lean_Expr_withAppAux___at_Lean_Meta_Simp_simp_congrDefault___spec__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -98,10 +101,12 @@ lean_object* lean_environment_find(lean_object*, lean_object*); lean_object* l_Lean_addTrace_addTraceOptions(lean_object*); static lean_object* l_Lean_Meta_Simp_simp_simpLambda___closed__1; lean_object* l_Lean_Meta_simpTargetCore___lambda__1(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_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*); 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_Simp_mkCongr_match__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_dependsOn(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_st_ref_get(lean_object*, lean_object*); extern lean_object* l_Lean_instHashableName; lean_object* l_Lean_Meta_mkCongr(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -110,9 +115,9 @@ static lean_object* l_Lean_Meta_Simp_simp_simpArrow___lambda__4___closed__13; lean_object* l_Lean_Meta_transform_visit___at___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___spec__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_mkCongrFun(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_simpStep(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_mkLetBodyCongr(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); uint8_t l_Lean_Expr_isApp(lean_object*); lean_object* l_Array_foldrMUnsafe_fold___at_Lean_Meta_Simp_simp_simpLambda___spec__1(lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Meta_withLocalDecl___at_Lean_Meta_Simp_simp_simpForall___spec__2___rarg___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_simpGoal___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* l_Lean_Expr_appFn_x21(lean_object*); lean_object* l_Lean_Meta_Simp_simp_tryCongrLemma_x3f___lambda__6(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -131,7 +136,9 @@ lean_object* l_Lean_Meta_Simp_simp_simpArrow___lambda__3(lean_object*, lean_obje lean_object* lean_array_get_size(lean_object*); lean_object* l_Lean_Meta_withIncRecDepth___at___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___spec__13___rarg(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_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_reduceProjFn_x3f_match__1___rarg(lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_Meta_Simp_simp_simpStep___closed__5; lean_object* l_Lean_Meta_Simp_simp_tryCongrLemma_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* l_Lean_Meta_isTypeCorrect(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); 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*); 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; @@ -139,6 +146,7 @@ lean_object* l_Lean_Meta_unfoldDefinition_x3f(lean_object*, lean_object*, lean_o lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_simpGoal___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* l_Lean_Meta_transform_visit_visitForall___at___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___spec__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*, lean_object*, lean_object*); lean_object* l_Lean_Meta_withIncRecDepth___at___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___spec__13(lean_object*, lean_object*); +lean_object* l_Lean_Meta_abstract(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_Simp_simp_tryCongrLemma_x3f___lambda__6___boxed(lean_object**); lean_object* l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_mkImpCongr_match__1(lean_object*); lean_object* l_Lean_Expr_withAppAux___at_Lean_Meta_Simp_simp_processCongrHypothesis___spec__1___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -150,6 +158,7 @@ static lean_object* l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_red static lean_object* l_Lean_Meta_Simp_DefaultMethods_methods___closed__1; static lean_object* l_Lean_Meta_Simp_simp_simpLit___closed__3; lean_object* l_Lean_Expr_appArg_x21(lean_object*); +lean_object* l_Lean_Meta_withLocalDecl___at_Lean_Meta_Simp_simp_simpLet___spec__1(lean_object*); static lean_object* l_Lean_Meta_Simp_main___closed__1; 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_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*); @@ -170,7 +179,6 @@ lean_object* l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp(lean extern lean_object* l_Lean_levelZero; extern lean_object* l_Lean_ExprStructEq_instBEqExprStructEq; lean_object* lean_nat_add(lean_object*, lean_object*); -static lean_object* l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__3___closed__3; lean_object* l_Lean_Meta_Simp_simp_withNewLemmas_match__1___rarg(lean_object*, lean_object*); lean_object* l_Lean_Meta_mkEqRefl(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_simpGoal_match__4___rarg(lean_object*, lean_object*); @@ -178,6 +186,7 @@ lean_object* l_ReaderT_bind___at_Lean_Meta_Simp_simp_simpForall___spec__1___rarg lean_object* l_Lean_Meta_Simp_simp_processCongrHypothesis___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Std_AssocList_find_x3f___at_Lean_Meta_Simp_simp___spec__2___boxed(lean_object*, lean_object*); lean_object* l_Lean_mkAppN(lean_object*, lean_object*); +lean_object* l_Lean_mkMData(lean_object*, lean_object*); size_t l_UInt64_toUSize(uint64_t); lean_object* l_Lean_Meta_Simp_simp_tryCongrLemma_x3f(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___closed__5; @@ -186,34 +195,38 @@ static lean_object* l_Lean_Meta_Simp_simp_tryCongrLemma_x3f___closed__4; lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_simp_congrDefault___spec__1(lean_object*, lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_simpGoal_match__1___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_Simp_simp_simpLit_match__1___rarg(lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_Meta_Simp_simp_simpStep___closed__3; lean_object* l_Std_HashMap_insert___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_withLocalDecl___at_Lean_Meta_Simp_simp_simpLet___spec__1___rarg(lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_simp_tryCongrLemma_x3f___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___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_reduce___closed__1; lean_object* l_Lean_Meta_Simp_simp_withNewLemmas___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_withLocalDecl___at___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___spec__7(lean_object*, lean_object*); lean_object* l_StateRefT_x27_lift___rarg___boxed(lean_object*, lean_object*); +static lean_object* l_Lean_Meta_Simp_simp_simpStep___closed__7; lean_object* l___private_Lean_Expr_0__Lean_Expr_getAppArgsAux(lean_object*, lean_object*, lean_object*); -static lean_object* l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__3___closed__7; lean_object* l_Lean_Meta_simpTarget___lambda__1(lean_object*, lean_object*, lean_object*, 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; +lean_object* l_Lean_Meta_withLocalDecl___at_Lean_Meta_Simp_simp_simpLet___spec__1___rarg___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_Std_RBNode_find___at_Lean_Meta_simpGoal___spec__1___boxed(lean_object*, lean_object*); lean_object* l_Lean_Meta_lambdaTelescope___at_Lean_Meta_Simp_simp_simpLambda___spec__2(lean_object*); lean_object* l_Lean_Meta_simpGoal___lambda__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_mkImpCongr_match__1___rarg(lean_object*, lean_object*, lean_object*, 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*); +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_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*); lean_object* l_Lean_Meta_Simp_getConfig___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_simpTargetCore(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_Simp_simp_tryCongrLemma_x3f___closed__3; lean_object* l_Lean_Meta_simp_match__1___rarg(lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__2___closed__4; lean_object* l___private_Lean_Meta_Basic_0__Lean_Meta_forallMetaTelescopeReducingAux(lean_object*, uint8_t, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_simpTarget___closed__1; lean_object* l_Lean_getProjectionFnInfo_x3f___at___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_reduceProjFn_x3f___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_st_ref_take(lean_object*, lean_object*); -lean_object* l_Lean_Meta_withLocalDecl___at_Lean_Meta_Simp_simp_simpForall___spec__2___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* 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*); 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* lean_nat_sub(lean_object*, lean_object*); @@ -225,8 +238,8 @@ static lean_object* l_Lean_Meta_Simp_DefaultMethods_methods___closed__2; lean_object* l_Lean_Meta_Simp_simp_simpConst___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_simpLocalDecl_match__1(lean_object*); 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*); -static lean_object* l_Lean_Meta_Simp_simp_simpForall___lambda__2___closed__1; static lean_object* l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___closed__3; +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*); lean_object* l_Lean_Meta_tryClear(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_simpGoal___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -246,6 +259,7 @@ lean_object* l_Lean_Meta_Simp_simp_match__1(lean_object*); lean_object* l_Lean_Meta_lambdaTelescope___at_Lean_Meta_Simp_simp_simpLambda___spec__2___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*); lean_object* l_Lean_Meta_mkLambdaFVars(lean_object*, lean_object*, uint8_t, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_Simp_simp(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Expr_fvarId_x21(lean_object*); lean_object* l_ST_Prim_Ref_get___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_Simp_simp_tryCongrLemma_x3f_match__3(lean_object*); lean_object* l_Std_mkHashMapImp___rarg(lean_object*); @@ -254,8 +268,9 @@ lean_object* l_Lean_Meta_SimpLemmas_eraseCore___at_Lean_Meta_simpGoal___spec__2_ lean_object* l_instInhabited___rarg(lean_object*, lean_object*); static lean_object* l_Lean_Meta_Simp_simp_simpArrow___lambda__4___closed__5; static lean_object* l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___closed__7; +lean_object* l_Lean_Meta_Simp_simp_simpLet___lambda__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_ConstantInfo_name(lean_object*); -lean_object* l_Lean_Meta_Simp_simp_simpLet_match__1___rarg(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_Simp_simp_simpLet_match__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); 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*); lean_object* l_Lean_Meta_Simp_getSimpLemmas___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -264,7 +279,6 @@ lean_object* l_Lean_Meta_Simp_DefaultMethods_methods; lean_object* l_Nat_repr(lean_object*); lean_object* l_Lean_Meta_Simp_simp_congrDefault_match__1(lean_object*); lean_object* l_Lean_Expr_withAppAux___at_Lean_Meta_Simp_simp_processCongrHypothesis___spec__1___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_simp_simpLet___closed__4; lean_object* lean_st_mk_ref(lean_object*, lean_object*); lean_object* l_Lean_Meta_transform_visit_visitLambda___at___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___spec__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* l_Lean_Expr_withAppAux___at___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___spec__11___boxed__const__1; @@ -299,6 +313,7 @@ lean_object* l_Lean_Meta_withLocalDecl___at___private_Lean_Meta_Tactic_Simp_Main lean_object* l___private_Init_Util_0__mkPanicMessageWithDecl(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_reduceFVar(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); uint8_t l_Lean_Expr_isConst(lean_object*); +lean_object* l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___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* l_Lean_Meta_Simp_simp___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_simpStep___closed__1; static lean_object* l_Lean_Meta_Simp_simp_simpArrow___lambda__4___closed__11; @@ -308,11 +323,13 @@ static lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_simp_congrDefau static lean_object* l_Lean_Meta_Simp_throwCongrHypothesisFailed___rarg___closed__1; lean_object* l_Lean_Meta_isProof(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_reduceProj_match__1___rarg(lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__2___closed__2; lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_simp_congrDefault___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*); static lean_object* l_Lean_Meta_Simp_simp_simpArrow___lambda__3___closed__1; extern lean_object* l_Lean_Meta_instMonadMetaM; static lean_object* l_Lean_Meta_Simp_simp_congr___closed__1; static lean_object* l_Lean_Meta_Simp_simp_simpArrow___lambda__3___closed__4; +lean_object* lean_whnf(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Std_PersistentHashMap_insert___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); 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_object* l_Lean_Meta_lambdaTelescope___at_Lean_Meta_Simp_simp_simpLambda___spec__2___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -332,6 +349,7 @@ lean_object* l_Lean_throwError___at_Lean_Meta_Simp_simp_simpLoop___spec__1(lean_ lean_object* l_Lean_throwError___at_Lean_Meta_Simp_simp_simpLoop___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_Simp_DefaultMethods_pre(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_registerInternalExceptionId(lean_object*, lean_object*); +lean_object* l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__2(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_simpForall___closed__5; lean_object* l_Lean_Meta_Simp_simp_match__1___rarg(lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_Simp_initFn____x40_Lean_Meta_Tactic_Simp_Main___hyg_4____closed__1; @@ -349,20 +367,16 @@ lean_object* l_Lean_Meta_Simp_simp_congr_match__1(lean_object*); static lean_object* l_Lean_Meta_transform___at___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___spec__1___closed__2; lean_object* l_Lean_isProjectionFn___at___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_unfold_x3f___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_Simp_simp_congr(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__7; lean_object* l_Lean_Meta_assignExprMVar(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___spec__10___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_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__3___closed__8; lean_object* l_Lean_Meta_mkForallCongr(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Meta_withLocalDecl___at_Lean_Meta_Simp_simp_simpForall___spec__2(lean_object*); lean_object* l_Lean_throwError___at___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_reduce___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_reduce___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_Std_PersistentArray_push___rarg(lean_object*, lean_object*); 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*); -static lean_object* l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__3___closed__1; lean_object* l_Lean_Meta_Simp_simp_congr_match__1___rarg(lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___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* l_Lean_Expr_getAppNumArgsAux(lean_object*, lean_object*); -static lean_object* l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__3___closed__4; lean_object* l_Lean_Meta_Simp_simp_simpStep_match__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_Simp_simp_simpStep_match__1(lean_object*); lean_object* l_Lean_Meta_SimpLemmas_eraseCore___at_Lean_Meta_simpGoal___spec__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -371,7 +385,6 @@ lean_object* l_Lean_Meta_transform_visit_visitLet___at___private_Lean_Meta_Tacti static lean_object* l_Lean_Meta_transform___at___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___spec__1___closed__1; lean_object* l_Lean_Expr_bindingName_x21(lean_object*); lean_object* l_Lean_Meta_checkNotAssigned(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Meta_withLocalDecl___at_Lean_Meta_Simp_simp_simpForall___spec__2___rarg(lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_getLocalDecl(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); uint8_t lean_expr_eqv(lean_object*, lean_object*); lean_object* l_Lean_Meta_Simp_mkCongrFun(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -383,7 +396,6 @@ uint8_t lean_nat_dec_le(lean_object*, lean_object*); static lean_object* l_Lean_Meta_Simp_simp_simpForall___closed__10; lean_object* l_Lean_mkApp(lean_object*, lean_object*); lean_object* l_Lean_Meta_withLocalDecl___at___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___spec__7___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at_Lean_Meta_Simp_simp_simpForall___spec__4(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_simp_tryCongrLemma_x3f___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*); static lean_object* l_Lean_Meta_Simp_isOfNatNatLit___closed__4; lean_object* l_Lean_Name_append(lean_object*, lean_object*); @@ -413,9 +425,7 @@ lean_object* l_Std_PersistentHashMap_erase___rarg(lean_object*, lean_object*, le static lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_simp_tryCongrLemma_x3f___spec__1___closed__4; static lean_object* l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___closed__2; uint8_t l_Lean_Meta_SimpLemmas_isDeclToUnfold(lean_object*, lean_object*); -static lean_object* l_Lean_Meta_Simp_simp_simpLet___closed__7; static lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_simp_congrDefault___spec__1___closed__6; -static lean_object* l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__3___closed__2; static lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_simp_tryCongrLemma_x3f___spec__1___closed__8; lean_object* l_Lean_Meta_Simp_throwCongrHypothesisFailed___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_transform___at___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -448,6 +458,7 @@ lean_object* l_Lean_Meta_mkFalseElim(lean_object*, lean_object*, lean_object*, l lean_object* l_Lean_Meta_Simp_simp_simpLoop_match__1(lean_object*); 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*); static lean_object* l_Lean_Meta_Simp_simp_simpArrow___lambda__4___closed__4; +lean_object* l_Lean_mkLet(lean_object*, lean_object*, lean_object*, lean_object*, uint8_t); lean_object* l_Lean_Meta_withLocalDecl___at___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___spec__8___rarg(lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_Simp_simp_tryCongrLemma_x3f___lambda__8___closed__1; lean_object* l_Std_HashMapImp_find_x3f___at_Lean_Meta_Simp_simp___spec__1(lean_object*, lean_object*); @@ -461,7 +472,6 @@ lean_object* lean_mk_array(lean_object*, lean_object*); static lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_simp_congrDefault___spec__1___closed__5; static lean_object* l_Lean_Meta_Simp_simp_simpForall___closed__8; lean_object* l_Lean_Meta_Simp_simp_tryCongrLemma_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* l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at_Lean_Meta_Simp_simp_simpForall___spec__4___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_Simp_simp_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_Lean_Meta_Simp_simp_simpForall___closed__2; extern lean_object* l_Lean_Expr_instBEqExpr; @@ -469,6 +479,7 @@ static lean_object* l_Lean_Meta_Simp_simp_simpArrow___lambda__4___closed__1; lean_object* l_Lean_throwError___at_Lean_Meta_withIncRecDepth___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_simp_tryCongrLemma_x3f___spec__1___closed__3; static lean_object* l_Lean_Meta_Simp_simp_simpArrow___lambda__4___closed__2; +lean_object* l_Lean_Meta_Simp_simp_simpLet_match__2(lean_object*); 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_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*); @@ -483,8 +494,9 @@ lean_object* l_Lean_Meta_simpGoal___lambda__3(lean_object*, lean_object*, lean_o lean_object* l_Lean_Meta_Simp_simp_tryCongrLemma_x3f___lambda__1___boxed(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_tryCongrLemma_x3f___spec__1___closed__5; lean_object* l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_reduceProj(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at_Lean_Meta_Simp_simp_simpForall___spec__3(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_simpStep___closed__8; lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_simpGoal___spec__3___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__3(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Expr_getAppFn(lean_object*); lean_object* l_Lean_Meta_Simp_simp_tryCongrLemma_x3f_match__2(lean_object*); lean_object* l_Lean_Meta_Simp_simp_simpForall___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -496,10 +508,10 @@ lean_object* l_unsafeCast(lean_object*, lean_object*, lean_object*); static lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_simp_tryCongrLemma_x3f___spec__1___closed__2; static lean_object* l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___closed__4; lean_object* l_Std_HashMapImp_find_x3f___at_Lean_MetavarContext_instantiateExprMVars___spec__1(lean_object*, lean_object*); +static lean_object* l_Lean_Meta_Simp_simp_simpStep___closed__4; lean_object* l___private_Lean_Meta_Basic_0__Lean_Meta_lambdaTelescopeImp___rarg(lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_Simp_mkCongr_match__1(lean_object*); lean_object* l___private_Lean_Meta_Basic_0__Lean_Meta_withLetDeclImp___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__3___closed__5; lean_object* l_Lean_Meta_withLocalDecl___at___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___spec__7___boxed(lean_object*, lean_object*); lean_object* l_Lean_Meta_simpLocalDecl_match__2___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_Simp_simp_simpLit___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -524,15 +536,17 @@ lean_object* l_Lean_Meta_simpGoal_match__2(lean_object*); lean_object* l_Lean_Meta_reduceRecMatcher_x3f(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_mkFunExt(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); 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_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*); lean_object* l_Lean_Expr_constName_x21(lean_object*); lean_object* l_Lean_Meta_simpGoal_match__1(lean_object*); lean_object* l_Lean_Meta_Simp_simp_tryCongrLemma_x3f_match__2___rarg(lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_simpStep___closed__2; +lean_object* l_Lean_Meta_Simp_simp_simpLet_match__2___rarg(lean_object*, lean_object*, lean_object*); 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*); -static lean_object* l_Lean_Meta_Simp_simp_simpLet___closed__3; 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_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; static lean_object* l_Lean_Meta_Simp_DefaultMethods_discharge_x3f___closed__1; static lean_object* l_Lean_Meta_Simp_simp_simpStep___closed__1; static lean_object* l_Lean_Meta_Simp_simp_simpForall___closed__6; @@ -540,10 +554,10 @@ lean_object* l_Lean_Meta_Simp_simp_tryCongrLemma_x3f_match__1___rarg(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; lean_object* l_Lean_Meta_Simp_simp_simpLit(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_simpLet___closed__6; lean_object* l_Lean_Meta_withLetDecl___at___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___spec__9___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_withIncRecDepth___at___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___spec__13___rarg___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_simp(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__5; lean_object* l_Lean_Meta_mkNumeral(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__8; lean_object* l_Lean_Meta_mkImpCongr(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -8243,7 +8257,66 @@ x_2 = lean_alloc_closure((void*)(l_Lean_Meta_Simp_simp_withNewLemmas_match__1___ return x_2; } } -lean_object* l_Lean_Meta_Simp_simp_simpLet_match__1___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +lean_object* l_Lean_Meta_Simp_simp_simpLet_match__1___rarg(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) == 0) +{ +lean_dec(x_4); +if (lean_obj_tag(x_2) == 0) +{ +lean_object* x_6; lean_object* x_7; +lean_dec(x_5); +x_6 = lean_box(0); +x_7 = lean_apply_1(x_3, x_6); +return x_7; +} +else +{ +lean_object* x_8; lean_object* x_9; +lean_dec(x_3); +x_8 = lean_ctor_get(x_2, 0); +lean_inc(x_8); +lean_dec(x_2); +x_9 = lean_apply_2(x_5, x_1, x_8); +return x_9; +} +} +else +{ +lean_dec(x_3); +if (lean_obj_tag(x_2) == 0) +{ +lean_object* x_10; lean_object* x_11; +lean_dec(x_5); +x_10 = lean_ctor_get(x_1, 0); +lean_inc(x_10); +lean_dec(x_1); +x_11 = lean_apply_1(x_4, x_10); +return x_11; +} +else +{ +lean_object* x_12; lean_object* x_13; +lean_dec(x_4); +x_12 = lean_ctor_get(x_2, 0); +lean_inc(x_12); +lean_dec(x_2); +x_13 = lean_apply_2(x_5, x_1, x_12); +return x_13; +} +} +} +} +lean_object* l_Lean_Meta_Simp_simp_simpLet_match__1(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_Lean_Meta_Simp_simp_simpLet_match__1___rarg), 5, 0); +return x_2; +} +} +lean_object* l_Lean_Meta_Simp_simp_simpLet_match__2___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3) { _start: { if (lean_obj_tag(x_1) == 8) @@ -8273,11 +8346,11 @@ return x_11; } } } -lean_object* l_Lean_Meta_Simp_simp_simpLet_match__1(lean_object* x_1) { +lean_object* l_Lean_Meta_Simp_simp_simpLet_match__2(lean_object* x_1) { _start: { lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l_Lean_Meta_Simp_simp_simpLet_match__1___rarg), 3, 0); +x_2 = lean_alloc_closure((void*)(l_Lean_Meta_Simp_simp_simpLet_match__2___rarg), 3, 0); return x_2; } } @@ -8509,229 +8582,6 @@ lean_dec(x_2); return x_10; } } -static lean_object* _init_l_Lean_Meta_Simp_simp_simpLet___closed__1() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Meta_instMonadMetaM; -x_2 = l_ReaderT_instMonadReaderT___rarg(x_1); -return x_2; -} -} -static lean_object* _init_l_Lean_Meta_Simp_simp_simpLet___closed__2() { -_start: -{ -lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Meta_Simp_simp_simpLet___closed__1; -x_2 = l_Lean_Meta_Simp_instInhabitedResult; -x_3 = l_instInhabited___rarg(x_1, x_2); -return x_3; -} -} -static lean_object* _init_l_Lean_Meta_Simp_simp_simpLet___closed__3() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Meta_Simp_simp_simpLet___closed__2; -x_2 = lean_alloc_closure((void*)(l_instInhabitedReaderT___rarg___boxed), 2, 1); -lean_closure_set(x_2, 0, x_1); -return x_2; -} -} -static lean_object* _init_l_Lean_Meta_Simp_simp_simpLet___closed__4() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Meta_Simp_simp_simpLet___closed__3; -x_2 = lean_alloc_closure((void*)(l_instInhabitedReaderT___rarg___boxed), 2, 1); -lean_closure_set(x_2, 0, x_1); -return x_2; -} -} -static lean_object* _init_l_Lean_Meta_Simp_simp_simpLet___closed__5() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string("Lean.Meta.Tactic.Simp.Main"); -return x_1; -} -} -static lean_object* _init_l_Lean_Meta_Simp_simp_simpLet___closed__6() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string("Lean.Meta.Simp.simp.simpLet"); -return x_1; -} -} -static lean_object* _init_l_Lean_Meta_Simp_simp_simpLet___closed__7() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string("unreachable code has been reached"); -return x_1; -} -} -static lean_object* _init_l_Lean_Meta_Simp_simp_simpLet___closed__8() { -_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_simpLet___closed__5; -x_2 = l_Lean_Meta_Simp_simp_simpLet___closed__6; -x_3 = lean_unsigned_to_nat(329u); -x_4 = lean_unsigned_to_nat(13u); -x_5 = l_Lean_Meta_Simp_simp_simpLet___closed__7; -x_6 = l___private_Init_Util_0__mkPanicMessageWithDecl(x_1, x_2, x_3, x_4, x_5); -return x_6; -} -} -lean_object* l_Lean_Meta_Simp_simp_simpLet(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; uint8_t x_12; -x_10 = l_Lean_Meta_Simp_getConfig___rarg(x_3, x_4, x_5, x_6, x_7, x_8, x_9); -x_11 = lean_ctor_get(x_10, 0); -lean_inc(x_11); -x_12 = lean_ctor_get_uint8(x_11, sizeof(void*)*2 + 3); -lean_dec(x_11); -if (x_12 == 0) -{ -lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; -x_13 = lean_ctor_get(x_10, 1); -lean_inc(x_13); -lean_dec(x_10); -x_14 = l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___closed__1; -x_15 = l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___closed__2; -x_16 = l_Lean_Meta_transform___at___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___spec__1(x_1, x_14, x_15, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_13); -if (lean_obj_tag(x_16) == 0) -{ -uint8_t x_17; -x_17 = !lean_is_exclusive(x_16); -if (x_17 == 0) -{ -lean_object* x_18; lean_object* x_19; lean_object* x_20; -x_18 = lean_ctor_get(x_16, 0); -x_19 = lean_box(0); -x_20 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_20, 0, x_18); -lean_ctor_set(x_20, 1, x_19); -lean_ctor_set(x_16, 0, x_20); -return x_16; -} -else -{ -lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; -x_21 = lean_ctor_get(x_16, 0); -x_22 = lean_ctor_get(x_16, 1); -lean_inc(x_22); -lean_inc(x_21); -lean_dec(x_16); -x_23 = lean_box(0); -x_24 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_24, 0, x_21); -lean_ctor_set(x_24, 1, x_23); -x_25 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_25, 0, x_24); -lean_ctor_set(x_25, 1, x_22); -return x_25; -} -} -else -{ -uint8_t x_26; -x_26 = !lean_is_exclusive(x_16); -if (x_26 == 0) -{ -return x_16; -} -else -{ -lean_object* x_27; lean_object* x_28; lean_object* x_29; -x_27 = lean_ctor_get(x_16, 0); -x_28 = lean_ctor_get(x_16, 1); -lean_inc(x_28); -lean_inc(x_27); -lean_dec(x_16); -x_29 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_29, 0, x_27); -lean_ctor_set(x_29, 1, x_28); -return x_29; -} -} -} -else -{ -if (lean_obj_tag(x_1) == 8) -{ -uint8_t 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); -x_30 = !lean_is_exclusive(x_10); -if (x_30 == 0) -{ -lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; -x_31 = lean_ctor_get(x_10, 0); -lean_dec(x_31); -x_32 = lean_ctor_get(x_1, 2); -lean_inc(x_32); -x_33 = lean_ctor_get(x_1, 3); -lean_inc(x_33); -lean_dec(x_1); -x_34 = lean_expr_instantiate1(x_33, x_32); -lean_dec(x_32); -lean_dec(x_33); -x_35 = lean_box(0); -x_36 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_36, 0, x_34); -lean_ctor_set(x_36, 1, x_35); -lean_ctor_set(x_10, 0, x_36); -return x_10; -} -else -{ -lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; -x_37 = lean_ctor_get(x_10, 1); -lean_inc(x_37); -lean_dec(x_10); -x_38 = lean_ctor_get(x_1, 2); -lean_inc(x_38); -x_39 = lean_ctor_get(x_1, 3); -lean_inc(x_39); -lean_dec(x_1); -x_40 = lean_expr_instantiate1(x_39, x_38); -lean_dec(x_38); -lean_dec(x_39); -x_41 = lean_box(0); -x_42 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_42, 0, x_40); -lean_ctor_set(x_42, 1, x_41); -x_43 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_43, 0, x_42); -lean_ctor_set(x_43, 1, x_37); -return x_43; -} -} -else -{ -lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; lean_object* x_48; -lean_dec(x_1); -x_44 = lean_ctor_get(x_10, 1); -lean_inc(x_44); -lean_dec(x_10); -x_45 = l_Lean_Meta_Simp_simp_simpLet___closed__4; -x_46 = l_Lean_Meta_Simp_simp_simpLet___closed__8; -x_47 = lean_panic_fn(x_45, x_46); -x_48 = lean_apply_8(x_47, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_44); -return x_48; -} -} -} -} lean_object* l_Lean_Meta_Simp_simp_cacheResult___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) { _start: { @@ -10865,20 +10715,75 @@ return x_176; static lean_object* _init_l_Lean_Meta_Simp_simp_simpStep___closed__1() { _start: { -lean_object* x_1; -x_1 = lean_mk_string("Lean.Meta.Simp.simp.simpStep"); -return x_1; +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Meta_instMonadMetaM; +x_2 = l_ReaderT_instMonadReaderT___rarg(x_1); +return x_2; } } static lean_object* _init_l_Lean_Meta_Simp_simp_simpStep___closed__2() { _start: { +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Meta_Simp_simp_simpStep___closed__1; +x_2 = l_Lean_Meta_Simp_instInhabitedResult; +x_3 = l_instInhabited___rarg(x_1, x_2); +return x_3; +} +} +static lean_object* _init_l_Lean_Meta_Simp_simp_simpStep___closed__3() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Meta_Simp_simp_simpStep___closed__2; +x_2 = lean_alloc_closure((void*)(l_instInhabitedReaderT___rarg___boxed), 2, 1); +lean_closure_set(x_2, 0, x_1); +return x_2; +} +} +static lean_object* _init_l_Lean_Meta_Simp_simp_simpStep___closed__4() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Meta_Simp_simp_simpStep___closed__3; +x_2 = lean_alloc_closure((void*)(l_instInhabitedReaderT___rarg___boxed), 2, 1); +lean_closure_set(x_2, 0, x_1); +return x_2; +} +} +static lean_object* _init_l_Lean_Meta_Simp_simp_simpStep___closed__5() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("Lean.Meta.Tactic.Simp.Main"); +return x_1; +} +} +static lean_object* _init_l_Lean_Meta_Simp_simp_simpStep___closed__6() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("Lean.Meta.Simp.simp.simpStep"); +return x_1; +} +} +static lean_object* _init_l_Lean_Meta_Simp_simp_simpStep___closed__7() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("unreachable code has been reached"); +return x_1; +} +} +static lean_object* _init_l_Lean_Meta_Simp_simp_simpStep___closed__8() { +_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_simpLet___closed__5; -x_2 = l_Lean_Meta_Simp_simp_simpStep___closed__1; +x_1 = l_Lean_Meta_Simp_simp_simpStep___closed__5; +x_2 = l_Lean_Meta_Simp_simp_simpStep___closed__6; x_3 = lean_unsigned_to_nat(165u); x_4 = lean_unsigned_to_nat(26u); -x_5 = l_Lean_Meta_Simp_simp_simpLet___closed__7; +x_5 = l_Lean_Meta_Simp_simp_simpStep___closed__7; x_6 = l___private_Init_Util_0__mkPanicMessageWithDecl(x_1, x_2, x_3, x_4, x_5); return x_6; } @@ -10891,8 +10796,8 @@ case 0: { lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_dec(x_1); -x_10 = l_Lean_Meta_Simp_simp_simpLet___closed__4; -x_11 = l_Lean_Meta_Simp_simp_simpStep___closed__2; +x_10 = l_Lean_Meta_Simp_simp_simpStep___closed__4; +x_11 = l_Lean_Meta_Simp_simp_simpStep___closed__8; x_12 = lean_panic_fn(x_10, x_11); x_13 = lean_apply_8(x_12, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9); return x_13; @@ -11094,143 +10999,171 @@ return x_53; } case 10: { -lean_object* x_54; lean_object* x_55; -x_54 = lean_ctor_get(x_1, 1); +lean_object* x_54; lean_object* x_55; lean_object* x_56; +x_54 = lean_ctor_get(x_1, 0); lean_inc(x_54); +x_55 = lean_ctor_get(x_1, 1); +lean_inc(x_55); lean_dec(x_1); -x_55 = l_Lean_Meta_Simp_simp(x_54, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9); -return x_55; -} -default: -{ -lean_object* x_56; -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -x_56 = l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_reduceProj(x_1, x_5, x_6, x_7, x_8, x_9); +x_56 = l_Lean_Meta_Simp_simp(x_55, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9); if (lean_obj_tag(x_56) == 0) { uint8_t x_57; x_57 = !lean_is_exclusive(x_56); if (x_57 == 0) { -lean_object* x_58; lean_object* x_59; lean_object* x_60; +lean_object* x_58; uint8_t x_59; x_58 = lean_ctor_get(x_56, 0); -x_59 = lean_box(0); -x_60 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_60, 0, x_58); -lean_ctor_set(x_60, 1, x_59); -lean_ctor_set(x_56, 0, x_60); +x_59 = !lean_is_exclusive(x_58); +if (x_59 == 0) +{ +lean_object* x_60; lean_object* x_61; +x_60 = lean_ctor_get(x_58, 0); +x_61 = l_Lean_mkMData(x_54, x_60); +lean_ctor_set(x_58, 0, x_61); return x_56; } else { -lean_object* x_61; lean_object* x_62; lean_object* x_63; lean_object* x_64; lean_object* x_65; -x_61 = lean_ctor_get(x_56, 0); -x_62 = lean_ctor_get(x_56, 1); +lean_object* x_62; lean_object* x_63; lean_object* x_64; lean_object* x_65; +x_62 = lean_ctor_get(x_58, 0); +x_63 = lean_ctor_get(x_58, 1); +lean_inc(x_63); lean_inc(x_62); -lean_inc(x_61); -lean_dec(x_56); -x_63 = lean_box(0); -x_64 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_64, 0, x_61); -lean_ctor_set(x_64, 1, x_63); +lean_dec(x_58); +x_64 = l_Lean_mkMData(x_54, x_62); x_65 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_65, 0, x_64); -lean_ctor_set(x_65, 1, x_62); -return x_65; +lean_ctor_set(x_65, 1, x_63); +lean_ctor_set(x_56, 0, x_65); +return x_56; } } else { -uint8_t x_66; -x_66 = !lean_is_exclusive(x_56); -if (x_66 == 0) +lean_object* x_66; lean_object* x_67; lean_object* x_68; lean_object* x_69; lean_object* x_70; lean_object* x_71; lean_object* x_72; lean_object* x_73; +x_66 = lean_ctor_get(x_56, 0); +x_67 = lean_ctor_get(x_56, 1); +lean_inc(x_67); +lean_inc(x_66); +lean_dec(x_56); +x_68 = lean_ctor_get(x_66, 0); +lean_inc(x_68); +x_69 = lean_ctor_get(x_66, 1); +lean_inc(x_69); +if (lean_is_exclusive(x_66)) { + lean_ctor_release(x_66, 0); + lean_ctor_release(x_66, 1); + x_70 = x_66; +} else { + lean_dec_ref(x_66); + x_70 = lean_box(0); +} +x_71 = l_Lean_mkMData(x_54, x_68); +if (lean_is_scalar(x_70)) { + x_72 = lean_alloc_ctor(0, 2, 0); +} else { + x_72 = x_70; +} +lean_ctor_set(x_72, 0, x_71); +lean_ctor_set(x_72, 1, x_69); +x_73 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_73, 0, x_72); +lean_ctor_set(x_73, 1, x_67); +return x_73; +} +} +else +{ +uint8_t x_74; +lean_dec(x_54); +x_74 = !lean_is_exclusive(x_56); +if (x_74 == 0) { return x_56; } else { -lean_object* x_67; lean_object* x_68; lean_object* x_69; -x_67 = lean_ctor_get(x_56, 0); -x_68 = lean_ctor_get(x_56, 1); -lean_inc(x_68); -lean_inc(x_67); +lean_object* x_75; lean_object* x_76; lean_object* x_77; +x_75 = lean_ctor_get(x_56, 0); +x_76 = lean_ctor_get(x_56, 1); +lean_inc(x_76); +lean_inc(x_75); lean_dec(x_56); -x_69 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_69, 0, x_67); -lean_ctor_set(x_69, 1, x_68); -return x_69; +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; } } } -} -} -} -lean_object* l_ReaderT_bind___at_Lean_Meta_Simp_simp_simpForall___spec__1___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10) { -_start: +default: { -lean_object* x_11; -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); -x_11 = lean_apply_8(x_1, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10); -if (lean_obj_tag(x_11) == 0) -{ -lean_object* x_12; lean_object* x_13; lean_object* x_14; -x_12 = lean_ctor_get(x_11, 0); -lean_inc(x_12); -x_13 = lean_ctor_get(x_11, 1); -lean_inc(x_13); -lean_dec(x_11); -x_14 = lean_apply_9(x_2, x_12, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_13); -return x_14; -} -else -{ -uint8_t x_15; -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); +lean_object* x_78; lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); -x_15 = !lean_is_exclusive(x_11); -if (x_15 == 0) +x_78 = l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_reduceProj(x_1, x_5, x_6, x_7, x_8, x_9); +if (lean_obj_tag(x_78) == 0) { -return x_11; +uint8_t x_79; +x_79 = !lean_is_exclusive(x_78); +if (x_79 == 0) +{ +lean_object* x_80; lean_object* x_81; lean_object* x_82; +x_80 = lean_ctor_get(x_78, 0); +x_81 = lean_box(0); +x_82 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_82, 0, x_80); +lean_ctor_set(x_82, 1, x_81); +lean_ctor_set(x_78, 0, x_82); +return x_78; } else { -lean_object* x_16; lean_object* x_17; lean_object* x_18; -x_16 = lean_ctor_get(x_11, 0); -x_17 = lean_ctor_get(x_11, 1); -lean_inc(x_17); -lean_inc(x_16); -lean_dec(x_11); -x_18 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_18, 0, x_16); -lean_ctor_set(x_18, 1, x_17); -return x_18; +lean_object* x_83; lean_object* x_84; lean_object* x_85; lean_object* x_86; lean_object* x_87; +x_83 = lean_ctor_get(x_78, 0); +x_84 = lean_ctor_get(x_78, 1); +lean_inc(x_84); +lean_inc(x_83); +lean_dec(x_78); +x_85 = lean_box(0); +x_86 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_86, 0, x_83); +lean_ctor_set(x_86, 1, x_85); +x_87 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_87, 0, x_86); +lean_ctor_set(x_87, 1, x_84); +return x_87; } } -} -} -lean_object* l_ReaderT_bind___at_Lean_Meta_Simp_simp_simpForall___spec__1(lean_object* x_1, lean_object* x_2) { -_start: +else { -lean_object* x_3; -x_3 = lean_alloc_closure((void*)(l_ReaderT_bind___at_Lean_Meta_Simp_simp_simpForall___spec__1___rarg), 10, 0); -return x_3; +uint8_t x_88; +x_88 = !lean_is_exclusive(x_78); +if (x_88 == 0) +{ +return x_78; +} +else +{ +lean_object* x_89; lean_object* x_90; lean_object* x_91; +x_89 = lean_ctor_get(x_78, 0); +x_90 = lean_ctor_get(x_78, 1); +lean_inc(x_90); +lean_inc(x_89); +lean_dec(x_78); +x_91 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_91, 0, x_89); +lean_ctor_set(x_91, 1, x_90); +return x_91; } } -lean_object* l_Lean_Meta_withLocalDecl___at_Lean_Meta_Simp_simp_simpForall___spec__2___rarg___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* l_Lean_Meta_withLocalDecl___at_Lean_Meta_Simp_simp_simpLet___spec__1___rarg___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) { _start: { lean_object* x_11; @@ -11238,11 +11171,11 @@ x_11 = lean_apply_9(x_1, x_5, x_2, x_3, x_4, x_6, x_7, x_8, x_9, x_10); return x_11; } } -lean_object* l_Lean_Meta_withLocalDecl___at_Lean_Meta_Simp_simp_simpForall___spec__2___rarg(lean_object* x_1, uint8_t x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11, lean_object* x_12) { +lean_object* l_Lean_Meta_withLocalDecl___at_Lean_Meta_Simp_simp_simpLet___spec__1___rarg(lean_object* x_1, uint8_t x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11, lean_object* x_12) { _start: { lean_object* x_13; lean_object* x_14; -x_13 = lean_alloc_closure((void*)(l_Lean_Meta_withLocalDecl___at_Lean_Meta_Simp_simp_simpForall___spec__2___rarg___lambda__1), 10, 4); +x_13 = lean_alloc_closure((void*)(l_Lean_Meta_withLocalDecl___at_Lean_Meta_Simp_simp_simpLet___spec__1___rarg___lambda__1), 10, 4); lean_closure_set(x_13, 0, x_4); lean_closure_set(x_13, 1, x_5); lean_closure_set(x_13, 2, x_6); @@ -11294,622 +11227,15 @@ return x_22; } } } -lean_object* l_Lean_Meta_withLocalDecl___at_Lean_Meta_Simp_simp_simpForall___spec__2(lean_object* x_1) { +lean_object* l_Lean_Meta_withLocalDecl___at_Lean_Meta_Simp_simp_simpLet___spec__1(lean_object* x_1) { _start: { lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l_Lean_Meta_withLocalDecl___at_Lean_Meta_Simp_simp_simpForall___spec__2___rarg___boxed), 12, 0); +x_2 = lean_alloc_closure((void*)(l_Lean_Meta_withLocalDecl___at_Lean_Meta_Simp_simp_simpLet___spec__1___rarg___boxed), 12, 0); return x_2; } } -static lean_object* _init_l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__3___closed__1() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string("_traceMsg"); -return x_1; -} -} -static lean_object* _init_l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__3___closed__2() { -_start: -{ -lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = lean_box(0); -x_2 = l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__3___closed__1; -x_3 = lean_name_mk_string(x_1, x_2); -return x_3; -} -} -static lean_object* _init_l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__3___closed__3() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string("["); -return x_1; -} -} -static lean_object* _init_l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__3___closed__4() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__3___closed__3; -x_2 = l_Lean_stringToMessageData(x_1); -return x_2; -} -} -static lean_object* _init_l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__3___closed__5() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string("] "); -return x_1; -} -} -static lean_object* _init_l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__3___closed__6() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__3___closed__5; -x_2 = l_Lean_stringToMessageData(x_1); -return x_2; -} -} -static lean_object* _init_l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__3___closed__7() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string(""); -return x_1; -} -} -static lean_object* _init_l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__3___closed__8() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__3___closed__7; -x_2 = l_Lean_stringToMessageData(x_1); -return x_2; -} -} -lean_object* l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__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_object* x_10) { -_start: -{ -lean_object* x_11; 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; uint8_t x_20; -x_11 = lean_ctor_get(x_8, 3); -x_12 = l_Lean_addMessageContextFull___at_Lean_Meta_instAddMessageContextMetaM___spec__1(x_2, x_6, x_7, x_8, x_9, x_10); -x_13 = lean_ctor_get(x_12, 0); -lean_inc(x_13); -x_14 = lean_ctor_get(x_12, 1); -lean_inc(x_14); -lean_dec(x_12); -x_15 = l_Lean_addTrace_addTraceOptions(x_13); -x_16 = lean_st_ref_take(x_9, x_14); -x_17 = lean_ctor_get(x_16, 0); -lean_inc(x_17); -x_18 = lean_ctor_get(x_17, 3); -lean_inc(x_18); -x_19 = lean_ctor_get(x_16, 1); -lean_inc(x_19); -lean_dec(x_16); -x_20 = !lean_is_exclusive(x_17); -if (x_20 == 0) -{ -lean_object* x_21; uint8_t x_22; -x_21 = lean_ctor_get(x_17, 3); -lean_dec(x_21); -x_22 = !lean_is_exclusive(x_18); -if (x_22 == 0) -{ -lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; uint8_t x_38; -x_23 = lean_ctor_get(x_18, 0); -x_24 = l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__3___closed__2; -x_25 = l_Lean_Name_append(x_1, x_24); -x_26 = lean_alloc_ctor(4, 1, 0); -lean_ctor_set(x_26, 0, x_1); -x_27 = l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__3___closed__4; -x_28 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_28, 0, x_27); -lean_ctor_set(x_28, 1, x_26); -x_29 = l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__3___closed__6; -x_30 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_30, 0, x_28); -lean_ctor_set(x_30, 1, x_29); -x_31 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_31, 0, x_30); -lean_ctor_set(x_31, 1, x_15); -x_32 = l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__3___closed__8; -x_33 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_33, 0, x_31); -lean_ctor_set(x_33, 1, x_32); -x_34 = lean_alloc_ctor(11, 2, 0); -lean_ctor_set(x_34, 0, x_25); -lean_ctor_set(x_34, 1, x_33); -lean_inc(x_11); -x_35 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_35, 0, x_11); -lean_ctor_set(x_35, 1, x_34); -x_36 = l_Std_PersistentArray_push___rarg(x_23, x_35); -lean_ctor_set(x_18, 0, x_36); -x_37 = lean_st_ref_set(x_9, x_17, x_19); -x_38 = !lean_is_exclusive(x_37); -if (x_38 == 0) -{ -lean_object* x_39; lean_object* x_40; -x_39 = lean_ctor_get(x_37, 0); -lean_dec(x_39); -x_40 = lean_box(0); -lean_ctor_set(x_37, 0, x_40); -return x_37; -} -else -{ -lean_object* x_41; lean_object* x_42; lean_object* x_43; -x_41 = lean_ctor_get(x_37, 1); -lean_inc(x_41); -lean_dec(x_37); -x_42 = lean_box(0); -x_43 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_43, 0, x_42); -lean_ctor_set(x_43, 1, x_41); -return x_43; -} -} -else -{ -uint8_t 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_60; lean_object* x_61; lean_object* x_62; lean_object* x_63; lean_object* x_64; -x_44 = lean_ctor_get_uint8(x_18, sizeof(void*)*1); -x_45 = lean_ctor_get(x_18, 0); -lean_inc(x_45); -lean_dec(x_18); -x_46 = l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__3___closed__2; -x_47 = l_Lean_Name_append(x_1, x_46); -x_48 = lean_alloc_ctor(4, 1, 0); -lean_ctor_set(x_48, 0, x_1); -x_49 = l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__3___closed__4; -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_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__3___closed__6; -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(10, 2, 0); -lean_ctor_set(x_53, 0, x_52); -lean_ctor_set(x_53, 1, x_15); -x_54 = l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__3___closed__8; -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 = lean_alloc_ctor(11, 2, 0); -lean_ctor_set(x_56, 0, x_47); -lean_ctor_set(x_56, 1, x_55); -lean_inc(x_11); -x_57 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_57, 0, x_11); -lean_ctor_set(x_57, 1, x_56); -x_58 = l_Std_PersistentArray_push___rarg(x_45, x_57); -x_59 = lean_alloc_ctor(0, 1, 1); -lean_ctor_set(x_59, 0, x_58); -lean_ctor_set_uint8(x_59, sizeof(void*)*1, x_44); -lean_ctor_set(x_17, 3, x_59); -x_60 = lean_st_ref_set(x_9, x_17, x_19); -x_61 = lean_ctor_get(x_60, 1); -lean_inc(x_61); -if (lean_is_exclusive(x_60)) { - lean_ctor_release(x_60, 0); - lean_ctor_release(x_60, 1); - x_62 = x_60; -} else { - lean_dec_ref(x_60); - x_62 = lean_box(0); -} -x_63 = lean_box(0); -if (lean_is_scalar(x_62)) { - x_64 = lean_alloc_ctor(0, 2, 0); -} else { - x_64 = x_62; -} -lean_ctor_set(x_64, 0, x_63); -lean_ctor_set(x_64, 1, x_61); -return x_64; -} -} -else -{ -lean_object* x_65; lean_object* x_66; lean_object* x_67; uint8_t x_68; lean_object* x_69; lean_object* x_70; lean_object* x_71; lean_object* x_72; lean_object* x_73; lean_object* x_74; lean_object* x_75; lean_object* x_76; lean_object* x_77; lean_object* x_78; lean_object* x_79; lean_object* x_80; lean_object* x_81; lean_object* x_82; lean_object* x_83; lean_object* x_84; lean_object* x_85; lean_object* x_86; lean_object* x_87; lean_object* x_88; lean_object* x_89; lean_object* x_90; -x_65 = lean_ctor_get(x_17, 0); -x_66 = lean_ctor_get(x_17, 1); -x_67 = lean_ctor_get(x_17, 2); -lean_inc(x_67); -lean_inc(x_66); -lean_inc(x_65); -lean_dec(x_17); -x_68 = lean_ctor_get_uint8(x_18, sizeof(void*)*1); -x_69 = lean_ctor_get(x_18, 0); -lean_inc(x_69); -if (lean_is_exclusive(x_18)) { - lean_ctor_release(x_18, 0); - x_70 = x_18; -} else { - lean_dec_ref(x_18); - x_70 = lean_box(0); -} -x_71 = l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__3___closed__2; -x_72 = l_Lean_Name_append(x_1, x_71); -x_73 = lean_alloc_ctor(4, 1, 0); -lean_ctor_set(x_73, 0, x_1); -x_74 = l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__3___closed__4; -x_75 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_75, 0, x_74); -lean_ctor_set(x_75, 1, x_73); -x_76 = l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__3___closed__6; -x_77 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_77, 0, x_75); -lean_ctor_set(x_77, 1, x_76); -x_78 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_78, 0, x_77); -lean_ctor_set(x_78, 1, x_15); -x_79 = l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__3___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); -x_81 = lean_alloc_ctor(11, 2, 0); -lean_ctor_set(x_81, 0, x_72); -lean_ctor_set(x_81, 1, x_80); -lean_inc(x_11); -x_82 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_82, 0, x_11); -lean_ctor_set(x_82, 1, x_81); -x_83 = l_Std_PersistentArray_push___rarg(x_69, x_82); -if (lean_is_scalar(x_70)) { - x_84 = lean_alloc_ctor(0, 1, 1); -} else { - x_84 = x_70; -} -lean_ctor_set(x_84, 0, x_83); -lean_ctor_set_uint8(x_84, sizeof(void*)*1, x_68); -x_85 = lean_alloc_ctor(0, 4, 0); -lean_ctor_set(x_85, 0, x_65); -lean_ctor_set(x_85, 1, x_66); -lean_ctor_set(x_85, 2, x_67); -lean_ctor_set(x_85, 3, x_84); -x_86 = lean_st_ref_set(x_9, x_85, x_19); -x_87 = lean_ctor_get(x_86, 1); -lean_inc(x_87); -if (lean_is_exclusive(x_86)) { - lean_ctor_release(x_86, 0); - lean_ctor_release(x_86, 1); - x_88 = x_86; -} else { - lean_dec_ref(x_86); - x_88 = lean_box(0); -} -x_89 = lean_box(0); -if (lean_is_scalar(x_88)) { - x_90 = lean_alloc_ctor(0, 2, 0); -} else { - x_90 = x_88; -} -lean_ctor_set(x_90, 0, x_89); -lean_ctor_set(x_90, 1, x_87); -return x_90; -} -} -} -lean_object* l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at_Lean_Meta_Simp_simp_simpForall___spec__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) { -_start: -{ -lean_object* x_10; uint8_t x_11; lean_object* x_12; lean_object* x_13; -x_10 = lean_ctor_get(x_7, 0); -x_11 = l_Lean_checkTraceOption(x_10, x_1); -x_12 = lean_box(x_11); -x_13 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_13, 0, x_12); -lean_ctor_set(x_13, 1, x_9); -return x_13; -} -} -lean_object* l_Lean_Meta_Simp_simp_simpForall___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) { -_start: -{ -lean_object* x_11; uint8_t x_12; uint8_t x_13; lean_object* x_14; -x_11 = lean_ctor_get(x_2, 0); -lean_inc(x_11); -x_12 = 0; -x_13 = 1; -lean_inc(x_6); -lean_inc(x_1); -x_14 = l_Lean_Meta_mkForallFVars(x_1, x_11, x_12, x_13, x_6, x_7, x_8, x_9, x_10); -if (lean_obj_tag(x_14) == 0) -{ -lean_object* x_15; -x_15 = lean_ctor_get(x_2, 1); -lean_inc(x_15); -lean_dec(x_2); -if (lean_obj_tag(x_15) == 0) -{ -uint8_t x_16; -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_1); -x_16 = !lean_is_exclusive(x_14); -if (x_16 == 0) -{ -lean_object* x_17; lean_object* x_18; lean_object* x_19; -x_17 = lean_ctor_get(x_14, 0); -x_18 = lean_box(0); -x_19 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_19, 0, x_17); -lean_ctor_set(x_19, 1, x_18); -lean_ctor_set(x_14, 0, x_19); -return x_14; -} -else -{ -lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; -x_20 = lean_ctor_get(x_14, 0); -x_21 = lean_ctor_get(x_14, 1); -lean_inc(x_21); -lean_inc(x_20); -lean_dec(x_14); -x_22 = lean_box(0); -x_23 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_23, 0, x_20); -lean_ctor_set(x_23, 1, x_22); -x_24 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_24, 0, x_23); -lean_ctor_set(x_24, 1, x_21); -return x_24; -} -} -else -{ -lean_object* x_25; lean_object* x_26; uint8_t x_27; -x_25 = lean_ctor_get(x_14, 0); -lean_inc(x_25); -x_26 = lean_ctor_get(x_14, 1); -lean_inc(x_26); -lean_dec(x_14); -x_27 = !lean_is_exclusive(x_15); -if (x_27 == 0) -{ -lean_object* x_28; lean_object* x_29; -x_28 = lean_ctor_get(x_15, 0); -lean_inc(x_6); -x_29 = l_Lean_Meta_mkLambdaFVars(x_1, x_28, x_12, x_13, x_6, x_7, x_8, x_9, x_26); -if (lean_obj_tag(x_29) == 0) -{ -lean_object* x_30; lean_object* x_31; lean_object* x_32; -x_30 = lean_ctor_get(x_29, 0); -lean_inc(x_30); -x_31 = lean_ctor_get(x_29, 1); -lean_inc(x_31); -lean_dec(x_29); -x_32 = l_Lean_Meta_mkForallCongr(x_30, x_6, x_7, x_8, x_9, x_31); -if (lean_obj_tag(x_32) == 0) -{ -uint8_t x_33; -x_33 = !lean_is_exclusive(x_32); -if (x_33 == 0) -{ -lean_object* x_34; lean_object* x_35; -x_34 = lean_ctor_get(x_32, 0); -lean_ctor_set(x_15, 0, x_34); -x_35 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_35, 0, x_25); -lean_ctor_set(x_35, 1, x_15); -lean_ctor_set(x_32, 0, x_35); -return x_32; -} -else -{ -lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; -x_36 = lean_ctor_get(x_32, 0); -x_37 = lean_ctor_get(x_32, 1); -lean_inc(x_37); -lean_inc(x_36); -lean_dec(x_32); -lean_ctor_set(x_15, 0, x_36); -x_38 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_38, 0, x_25); -lean_ctor_set(x_38, 1, x_15); -x_39 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_39, 0, x_38); -lean_ctor_set(x_39, 1, x_37); -return x_39; -} -} -else -{ -uint8_t x_40; -lean_free_object(x_15); -lean_dec(x_25); -x_40 = !lean_is_exclusive(x_32); -if (x_40 == 0) -{ -return x_32; -} -else -{ -lean_object* x_41; lean_object* x_42; lean_object* x_43; -x_41 = lean_ctor_get(x_32, 0); -x_42 = lean_ctor_get(x_32, 1); -lean_inc(x_42); -lean_inc(x_41); -lean_dec(x_32); -x_43 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_43, 0, x_41); -lean_ctor_set(x_43, 1, x_42); -return x_43; -} -} -} -else -{ -uint8_t x_44; -lean_free_object(x_15); -lean_dec(x_25); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -x_44 = !lean_is_exclusive(x_29); -if (x_44 == 0) -{ -return x_29; -} -else -{ -lean_object* x_45; lean_object* x_46; lean_object* x_47; -x_45 = lean_ctor_get(x_29, 0); -x_46 = lean_ctor_get(x_29, 1); -lean_inc(x_46); -lean_inc(x_45); -lean_dec(x_29); -x_47 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_47, 0, x_45); -lean_ctor_set(x_47, 1, x_46); -return x_47; -} -} -} -else -{ -lean_object* x_48; lean_object* x_49; -x_48 = lean_ctor_get(x_15, 0); -lean_inc(x_48); -lean_dec(x_15); -lean_inc(x_6); -x_49 = l_Lean_Meta_mkLambdaFVars(x_1, x_48, x_12, x_13, x_6, x_7, x_8, x_9, x_26); -if (lean_obj_tag(x_49) == 0) -{ -lean_object* x_50; lean_object* x_51; lean_object* x_52; -x_50 = lean_ctor_get(x_49, 0); -lean_inc(x_50); -x_51 = lean_ctor_get(x_49, 1); -lean_inc(x_51); -lean_dec(x_49); -x_52 = l_Lean_Meta_mkForallCongr(x_50, x_6, x_7, x_8, x_9, x_51); -if (lean_obj_tag(x_52) == 0) -{ -lean_object* x_53; lean_object* x_54; lean_object* x_55; lean_object* x_56; lean_object* x_57; lean_object* x_58; -x_53 = lean_ctor_get(x_52, 0); -lean_inc(x_53); -x_54 = lean_ctor_get(x_52, 1); -lean_inc(x_54); -if (lean_is_exclusive(x_52)) { - lean_ctor_release(x_52, 0); - lean_ctor_release(x_52, 1); - x_55 = x_52; -} else { - lean_dec_ref(x_52); - x_55 = lean_box(0); -} -x_56 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_56, 0, x_53); -x_57 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_57, 0, x_25); -lean_ctor_set(x_57, 1, x_56); -if (lean_is_scalar(x_55)) { - x_58 = lean_alloc_ctor(0, 2, 0); -} else { - x_58 = x_55; -} -lean_ctor_set(x_58, 0, x_57); -lean_ctor_set(x_58, 1, x_54); -return x_58; -} -else -{ -lean_object* x_59; lean_object* x_60; lean_object* x_61; lean_object* x_62; -lean_dec(x_25); -x_59 = lean_ctor_get(x_52, 0); -lean_inc(x_59); -x_60 = lean_ctor_get(x_52, 1); -lean_inc(x_60); -if (lean_is_exclusive(x_52)) { - lean_ctor_release(x_52, 0); - lean_ctor_release(x_52, 1); - x_61 = x_52; -} else { - lean_dec_ref(x_52); - x_61 = lean_box(0); -} -if (lean_is_scalar(x_61)) { - x_62 = lean_alloc_ctor(1, 2, 0); -} else { - x_62 = x_61; -} -lean_ctor_set(x_62, 0, x_59); -lean_ctor_set(x_62, 1, x_60); -return x_62; -} -} -else -{ -lean_object* x_63; lean_object* x_64; lean_object* x_65; lean_object* x_66; -lean_dec(x_25); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -x_63 = lean_ctor_get(x_49, 0); -lean_inc(x_63); -x_64 = lean_ctor_get(x_49, 1); -lean_inc(x_64); -if (lean_is_exclusive(x_49)) { - lean_ctor_release(x_49, 0); - lean_ctor_release(x_49, 1); - x_65 = x_49; -} else { - lean_dec_ref(x_49); - x_65 = lean_box(0); -} -if (lean_is_scalar(x_65)) { - x_66 = lean_alloc_ctor(1, 2, 0); -} else { - x_66 = x_65; -} -lean_ctor_set(x_66, 0, x_63); -lean_ctor_set(x_66, 1, x_64); -return x_66; -} -} -} -} -else -{ -uint8_t x_67; -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_2); -lean_dec(x_1); -x_67 = !lean_is_exclusive(x_14); -if (x_67 == 0) -{ -return x_14; -} -else -{ -lean_object* x_68; lean_object* x_69; lean_object* x_70; -x_68 = lean_ctor_get(x_14, 0); -x_69 = lean_ctor_get(x_14, 1); -lean_inc(x_69); -lean_inc(x_68); -lean_dec(x_14); -x_70 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_70, 0, x_68); -lean_ctor_set(x_70, 1, x_69); -return x_70; -} -} -} -} -static lean_object* _init_l_Lean_Meta_Simp_simp_simpForall___lambda__2___closed__1() { +static lean_object* _init_l_Lean_Meta_Simp_simp_simpLet___lambda__1___closed__1() { _start: { lean_object* x_1; lean_object* x_2; @@ -11918,135 +11244,1741 @@ x_2 = lean_mk_empty_array_with_capacity(x_1); return x_2; } } -lean_object* l_Lean_Meta_Simp_simp_simpForall___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* l_Lean_Meta_Simp_simp_simpLet___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, lean_object* x_12, lean_object* x_13, lean_object* x_14, lean_object* x_15) { _start: { -lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; -x_11 = l_Lean_Meta_Simp_simp_simpForall___lambda__2___closed__1; -lean_inc(x_2); -x_12 = lean_array_push(x_11, x_2); -x_13 = l_Lean_Expr_bindingBody_x21(x_1); -x_14 = lean_expr_instantiate1(x_13, x_2); -lean_dec(x_2); -lean_dec(x_13); -x_15 = lean_alloc_closure((void*)(l_Lean_Meta_Simp_simp), 9, 1); -lean_closure_set(x_15, 0, x_14); -lean_inc(x_12); -x_16 = lean_alloc_closure((void*)(l_Lean_Meta_Simp_simp_simpForall___lambda__1___boxed), 10, 1); -lean_closure_set(x_16, 0, x_12); -x_17 = lean_alloc_closure((void*)(l_ReaderT_bind___at_Lean_Meta_Simp_simp_simpForall___spec__1___rarg), 10, 2); -lean_closure_set(x_17, 0, x_15); -lean_closure_set(x_17, 1, x_16); -x_18 = l_Lean_Meta_Simp_simp_withNewLemmas___rarg(x_12, x_17, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10); -lean_dec(x_12); -return x_18; -} -} -lean_object* l_Lean_Meta_Simp_simp_simpForall___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_object* x_10) { -_start: -{ -uint8_t x_11; -lean_dec(x_2); -x_11 = l_Lean_Expr_isArrow(x_1); -if (x_11 == 0) -{ -lean_object* x_12; -lean_inc(x_9); -lean_inc(x_8); -lean_inc(x_7); -lean_inc(x_6); -lean_inc(x_1); -x_12 = l_Lean_Meta_isProp(x_1, x_6, x_7, x_8, x_9, x_10); -if (lean_obj_tag(x_12) == 0) -{ -lean_object* x_13; uint8_t x_14; -x_13 = lean_ctor_get(x_12, 0); -lean_inc(x_13); -x_14 = lean_unbox(x_13); -lean_dec(x_13); -if (x_14 == 0) -{ -lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; -x_15 = lean_ctor_get(x_12, 1); -lean_inc(x_15); -lean_dec(x_12); -x_16 = l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___closed__1; -x_17 = l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___closed__2; -x_18 = l_Lean_Meta_transform___at___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___spec__1(x_1, x_16, x_17, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_15); -if (lean_obj_tag(x_18) == 0) -{ -uint8_t x_19; -x_19 = !lean_is_exclusive(x_18); +lean_object* x_16; lean_object* x_17; lean_object* x_18; uint8_t x_19; +x_16 = l_Lean_Expr_fvarId_x21(x_1); +x_17 = l_Lean_Meta_dependsOn(x_2, x_16, x_11, x_12, x_13, x_14, x_15); +lean_dec(x_16); +x_18 = lean_ctor_get(x_17, 0); +lean_inc(x_18); +x_19 = lean_unbox(x_18); +lean_dec(x_18); if (x_19 == 0) { -lean_object* x_20; lean_object* x_21; lean_object* x_22; -x_20 = lean_ctor_get(x_18, 0); -x_21 = lean_box(0); -x_22 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_22, 0, x_20); -lean_ctor_set(x_22, 1, x_21); -lean_ctor_set(x_18, 0, x_22); -return x_18; -} -else +lean_object* x_20; lean_object* x_21; +x_20 = lean_ctor_get(x_17, 1); +lean_inc(x_20); +lean_dec(x_17); +lean_inc(x_14); +lean_inc(x_13); +lean_inc(x_12); +lean_inc(x_11); +x_21 = l_Lean_Meta_Simp_simp(x_3, x_8, x_9, x_10, x_11, x_12, x_13, x_14, x_20); +if (lean_obj_tag(x_21) == 0) { -lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; -x_23 = lean_ctor_get(x_18, 0); -x_24 = lean_ctor_get(x_18, 1); -lean_inc(x_24); +lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; +x_22 = lean_ctor_get(x_21, 0); +lean_inc(x_22); +x_23 = lean_ctor_get(x_21, 1); lean_inc(x_23); -lean_dec(x_18); -x_25 = lean_box(0); -x_26 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_26, 0, x_23); -lean_ctor_set(x_26, 1, x_25); -x_27 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_27, 0, x_26); -lean_ctor_set(x_27, 1, x_24); -return x_27; -} -} -else +lean_dec(x_21); +x_24 = lean_ctor_get(x_4, 0); +lean_inc(x_24); +lean_dec(x_4); +x_25 = l_Lean_Meta_Simp_simp_simpLet___lambda__1___closed__1; +x_26 = lean_array_push(x_25, x_1); +lean_inc(x_13); +lean_inc(x_11); +lean_inc(x_26); +lean_inc(x_24); +x_27 = l_Lean_Meta_abstract(x_24, x_26, x_11, x_12, x_13, x_14, x_23); +if (lean_obj_tag(x_27) == 0) { uint8_t x_28; -x_28 = !lean_is_exclusive(x_18); +x_28 = !lean_is_exclusive(x_27); if (x_28 == 0) { -return x_18; +lean_object* x_29; lean_object* x_30; lean_object* x_31; uint8_t x_32; lean_object* x_33; lean_object* x_34; +x_29 = lean_ctor_get(x_27, 0); +x_30 = lean_ctor_get(x_27, 1); +x_31 = lean_ctor_get(x_22, 0); +lean_inc(x_31); +x_32 = 0; +x_33 = l_Lean_mkLet(x_5, x_6, x_31, x_29, x_32); +x_34 = lean_ctor_get(x_22, 1); +lean_inc(x_34); +if (lean_obj_tag(x_34) == 0) +{ +lean_dec(x_26); +lean_dec(x_24); +if (lean_obj_tag(x_7) == 0) +{ +lean_object* x_35; lean_object* x_36; +lean_dec(x_22); +lean_dec(x_14); +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_11); +x_35 = lean_box(0); +x_36 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_36, 0, x_33); +lean_ctor_set(x_36, 1, x_35); +lean_ctor_set(x_27, 0, x_36); +return x_27; } else { -lean_object* x_29; lean_object* x_30; lean_object* x_31; -x_29 = lean_ctor_get(x_18, 0); -x_30 = lean_ctor_get(x_18, 1); -lean_inc(x_30); -lean_inc(x_29); -lean_dec(x_18); -x_31 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_31, 0, x_29); -lean_ctor_set(x_31, 1, x_30); +uint8_t x_37; +lean_free_object(x_27); +x_37 = !lean_is_exclusive(x_7); +if (x_37 == 0) +{ +lean_object* x_38; lean_object* x_39; +x_38 = lean_ctor_get(x_7, 0); +lean_inc(x_14); +lean_inc(x_13); +lean_inc(x_12); +lean_inc(x_11); +x_39 = l_Lean_Meta_Simp_Result_getProof(x_22, x_11, x_12, x_13, x_14, x_30); +if (lean_obj_tag(x_39) == 0) +{ +lean_object* x_40; lean_object* x_41; lean_object* x_42; +x_40 = lean_ctor_get(x_39, 0); +lean_inc(x_40); +x_41 = lean_ctor_get(x_39, 1); +lean_inc(x_41); +lean_dec(x_39); +x_42 = l_Lean_Meta_mkLetCongr(x_40, x_38, x_11, x_12, x_13, x_14, x_41); +if (lean_obj_tag(x_42) == 0) +{ +uint8_t x_43; +x_43 = !lean_is_exclusive(x_42); +if (x_43 == 0) +{ +lean_object* x_44; lean_object* x_45; +x_44 = lean_ctor_get(x_42, 0); +lean_ctor_set(x_7, 0, x_44); +x_45 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_45, 0, x_33); +lean_ctor_set(x_45, 1, x_7); +lean_ctor_set(x_42, 0, x_45); +return x_42; +} +else +{ +lean_object* x_46; lean_object* x_47; lean_object* x_48; lean_object* x_49; +x_46 = lean_ctor_get(x_42, 0); +x_47 = lean_ctor_get(x_42, 1); +lean_inc(x_47); +lean_inc(x_46); +lean_dec(x_42); +lean_ctor_set(x_7, 0, x_46); +x_48 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_48, 0, x_33); +lean_ctor_set(x_48, 1, x_7); +x_49 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_49, 0, x_48); +lean_ctor_set(x_49, 1, x_47); +return x_49; +} +} +else +{ +uint8_t x_50; +lean_free_object(x_7); +lean_dec(x_33); +x_50 = !lean_is_exclusive(x_42); +if (x_50 == 0) +{ +return x_42; +} +else +{ +lean_object* x_51; lean_object* x_52; lean_object* x_53; +x_51 = lean_ctor_get(x_42, 0); +x_52 = lean_ctor_get(x_42, 1); +lean_inc(x_52); +lean_inc(x_51); +lean_dec(x_42); +x_53 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_53, 0, x_51); +lean_ctor_set(x_53, 1, x_52); +return x_53; +} +} +} +else +{ +uint8_t x_54; +lean_free_object(x_7); +lean_dec(x_38); +lean_dec(x_33); +lean_dec(x_14); +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_11); +x_54 = !lean_is_exclusive(x_39); +if (x_54 == 0) +{ +return x_39; +} +else +{ +lean_object* x_55; lean_object* x_56; lean_object* x_57; +x_55 = lean_ctor_get(x_39, 0); +x_56 = lean_ctor_get(x_39, 1); +lean_inc(x_56); +lean_inc(x_55); +lean_dec(x_39); +x_57 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_57, 0, x_55); +lean_ctor_set(x_57, 1, x_56); +return x_57; +} +} +} +else +{ +lean_object* x_58; lean_object* x_59; +x_58 = lean_ctor_get(x_7, 0); +lean_inc(x_58); +lean_dec(x_7); +lean_inc(x_14); +lean_inc(x_13); +lean_inc(x_12); +lean_inc(x_11); +x_59 = l_Lean_Meta_Simp_Result_getProof(x_22, x_11, x_12, x_13, x_14, x_30); +if (lean_obj_tag(x_59) == 0) +{ +lean_object* x_60; lean_object* x_61; lean_object* x_62; +x_60 = lean_ctor_get(x_59, 0); +lean_inc(x_60); +x_61 = lean_ctor_get(x_59, 1); +lean_inc(x_61); +lean_dec(x_59); +x_62 = l_Lean_Meta_mkLetCongr(x_60, x_58, x_11, x_12, x_13, x_14, x_61); +if (lean_obj_tag(x_62) == 0) +{ +lean_object* x_63; lean_object* x_64; lean_object* x_65; lean_object* x_66; lean_object* x_67; lean_object* x_68; +x_63 = lean_ctor_get(x_62, 0); +lean_inc(x_63); +x_64 = lean_ctor_get(x_62, 1); +lean_inc(x_64); +if (lean_is_exclusive(x_62)) { + lean_ctor_release(x_62, 0); + lean_ctor_release(x_62, 1); + x_65 = x_62; +} else { + lean_dec_ref(x_62); + x_65 = lean_box(0); +} +x_66 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_66, 0, x_63); +x_67 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_67, 0, x_33); +lean_ctor_set(x_67, 1, x_66); +if (lean_is_scalar(x_65)) { + x_68 = lean_alloc_ctor(0, 2, 0); +} else { + x_68 = x_65; +} +lean_ctor_set(x_68, 0, x_67); +lean_ctor_set(x_68, 1, x_64); +return x_68; +} +else +{ +lean_object* x_69; lean_object* x_70; lean_object* x_71; lean_object* x_72; +lean_dec(x_33); +x_69 = lean_ctor_get(x_62, 0); +lean_inc(x_69); +x_70 = lean_ctor_get(x_62, 1); +lean_inc(x_70); +if (lean_is_exclusive(x_62)) { + lean_ctor_release(x_62, 0); + lean_ctor_release(x_62, 1); + x_71 = x_62; +} else { + lean_dec_ref(x_62); + x_71 = lean_box(0); +} +if (lean_is_scalar(x_71)) { + x_72 = lean_alloc_ctor(1, 2, 0); +} else { + x_72 = x_71; +} +lean_ctor_set(x_72, 0, x_69); +lean_ctor_set(x_72, 1, x_70); +return x_72; +} +} +else +{ +lean_object* x_73; lean_object* x_74; lean_object* x_75; lean_object* x_76; +lean_dec(x_58); +lean_dec(x_33); +lean_dec(x_14); +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_11); +x_73 = lean_ctor_get(x_59, 0); +lean_inc(x_73); +x_74 = lean_ctor_get(x_59, 1); +lean_inc(x_74); +if (lean_is_exclusive(x_59)) { + lean_ctor_release(x_59, 0); + lean_ctor_release(x_59, 1); + x_75 = x_59; +} else { + lean_dec_ref(x_59); + x_75 = lean_box(0); +} +if (lean_is_scalar(x_75)) { + x_76 = lean_alloc_ctor(1, 2, 0); +} else { + x_76 = x_75; +} +lean_ctor_set(x_76, 0, x_73); +lean_ctor_set(x_76, 1, x_74); +return x_76; +} +} +} +} +else +{ +lean_free_object(x_27); +if (lean_obj_tag(x_7) == 0) +{ +uint8_t x_77; +lean_dec(x_22); +x_77 = !lean_is_exclusive(x_34); +if (x_77 == 0) +{ +lean_object* x_78; uint8_t x_79; lean_object* x_80; +x_78 = lean_ctor_get(x_34, 0); +x_79 = 1; +lean_inc(x_11); +x_80 = l_Lean_Meta_mkLambdaFVars(x_26, x_24, x_32, x_79, x_11, x_12, x_13, x_14, x_30); +if (lean_obj_tag(x_80) == 0) +{ +lean_object* x_81; lean_object* x_82; lean_object* x_83; +x_81 = lean_ctor_get(x_80, 0); +lean_inc(x_81); +x_82 = lean_ctor_get(x_80, 1); +lean_inc(x_82); +lean_dec(x_80); +x_83 = l_Lean_Meta_mkLetValCongr(x_81, x_78, x_11, x_12, x_13, x_14, x_82); +if (lean_obj_tag(x_83) == 0) +{ +uint8_t x_84; +x_84 = !lean_is_exclusive(x_83); +if (x_84 == 0) +{ +lean_object* x_85; lean_object* x_86; +x_85 = lean_ctor_get(x_83, 0); +lean_ctor_set(x_34, 0, x_85); +x_86 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_86, 0, x_33); +lean_ctor_set(x_86, 1, x_34); +lean_ctor_set(x_83, 0, x_86); +return x_83; +} +else +{ +lean_object* x_87; lean_object* x_88; lean_object* x_89; lean_object* x_90; +x_87 = lean_ctor_get(x_83, 0); +x_88 = lean_ctor_get(x_83, 1); +lean_inc(x_88); +lean_inc(x_87); +lean_dec(x_83); +lean_ctor_set(x_34, 0, x_87); +x_89 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_89, 0, x_33); +lean_ctor_set(x_89, 1, x_34); +x_90 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_90, 0, x_89); +lean_ctor_set(x_90, 1, x_88); +return x_90; +} +} +else +{ +uint8_t x_91; +lean_free_object(x_34); +lean_dec(x_33); +x_91 = !lean_is_exclusive(x_83); +if (x_91 == 0) +{ +return x_83; +} +else +{ +lean_object* x_92; lean_object* x_93; lean_object* x_94; +x_92 = lean_ctor_get(x_83, 0); +x_93 = lean_ctor_get(x_83, 1); +lean_inc(x_93); +lean_inc(x_92); +lean_dec(x_83); +x_94 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_94, 0, x_92); +lean_ctor_set(x_94, 1, x_93); +return x_94; +} +} +} +else +{ +uint8_t x_95; +lean_free_object(x_34); +lean_dec(x_78); +lean_dec(x_33); +lean_dec(x_14); +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_11); +x_95 = !lean_is_exclusive(x_80); +if (x_95 == 0) +{ +return x_80; +} +else +{ +lean_object* x_96; lean_object* x_97; lean_object* x_98; +x_96 = lean_ctor_get(x_80, 0); +x_97 = lean_ctor_get(x_80, 1); +lean_inc(x_97); +lean_inc(x_96); +lean_dec(x_80); +x_98 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_98, 0, x_96); +lean_ctor_set(x_98, 1, x_97); +return x_98; +} +} +} +else +{ +lean_object* x_99; uint8_t x_100; lean_object* x_101; +x_99 = lean_ctor_get(x_34, 0); +lean_inc(x_99); +lean_dec(x_34); +x_100 = 1; +lean_inc(x_11); +x_101 = l_Lean_Meta_mkLambdaFVars(x_26, x_24, x_32, x_100, x_11, x_12, x_13, x_14, x_30); +if (lean_obj_tag(x_101) == 0) +{ +lean_object* x_102; lean_object* x_103; lean_object* x_104; +x_102 = lean_ctor_get(x_101, 0); +lean_inc(x_102); +x_103 = lean_ctor_get(x_101, 1); +lean_inc(x_103); +lean_dec(x_101); +x_104 = l_Lean_Meta_mkLetValCongr(x_102, x_99, x_11, x_12, x_13, x_14, x_103); +if (lean_obj_tag(x_104) == 0) +{ +lean_object* x_105; lean_object* x_106; lean_object* x_107; lean_object* x_108; lean_object* x_109; lean_object* x_110; +x_105 = lean_ctor_get(x_104, 0); +lean_inc(x_105); +x_106 = lean_ctor_get(x_104, 1); +lean_inc(x_106); +if (lean_is_exclusive(x_104)) { + lean_ctor_release(x_104, 0); + lean_ctor_release(x_104, 1); + x_107 = x_104; +} else { + lean_dec_ref(x_104); + x_107 = lean_box(0); +} +x_108 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_108, 0, x_105); +x_109 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_109, 0, x_33); +lean_ctor_set(x_109, 1, x_108); +if (lean_is_scalar(x_107)) { + x_110 = lean_alloc_ctor(0, 2, 0); +} else { + x_110 = x_107; +} +lean_ctor_set(x_110, 0, x_109); +lean_ctor_set(x_110, 1, x_106); +return x_110; +} +else +{ +lean_object* x_111; lean_object* x_112; lean_object* x_113; lean_object* x_114; +lean_dec(x_33); +x_111 = lean_ctor_get(x_104, 0); +lean_inc(x_111); +x_112 = lean_ctor_get(x_104, 1); +lean_inc(x_112); +if (lean_is_exclusive(x_104)) { + lean_ctor_release(x_104, 0); + lean_ctor_release(x_104, 1); + x_113 = x_104; +} else { + lean_dec_ref(x_104); + x_113 = lean_box(0); +} +if (lean_is_scalar(x_113)) { + x_114 = lean_alloc_ctor(1, 2, 0); +} else { + x_114 = x_113; +} +lean_ctor_set(x_114, 0, x_111); +lean_ctor_set(x_114, 1, x_112); +return x_114; +} +} +else +{ +lean_object* x_115; lean_object* x_116; lean_object* x_117; lean_object* x_118; +lean_dec(x_99); +lean_dec(x_33); +lean_dec(x_14); +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_11); +x_115 = lean_ctor_get(x_101, 0); +lean_inc(x_115); +x_116 = lean_ctor_get(x_101, 1); +lean_inc(x_116); +if (lean_is_exclusive(x_101)) { + lean_ctor_release(x_101, 0); + lean_ctor_release(x_101, 1); + x_117 = x_101; +} else { + lean_dec_ref(x_101); + x_117 = lean_box(0); +} +if (lean_is_scalar(x_117)) { + x_118 = lean_alloc_ctor(1, 2, 0); +} else { + x_118 = x_117; +} +lean_ctor_set(x_118, 0, x_115); +lean_ctor_set(x_118, 1, x_116); +return x_118; +} +} +} +else +{ +uint8_t x_119; +lean_dec(x_34); +lean_dec(x_26); +lean_dec(x_24); +x_119 = !lean_is_exclusive(x_7); +if (x_119 == 0) +{ +lean_object* x_120; lean_object* x_121; +x_120 = lean_ctor_get(x_7, 0); +lean_inc(x_14); +lean_inc(x_13); +lean_inc(x_12); +lean_inc(x_11); +x_121 = l_Lean_Meta_Simp_Result_getProof(x_22, x_11, x_12, x_13, x_14, x_30); +if (lean_obj_tag(x_121) == 0) +{ +lean_object* x_122; lean_object* x_123; lean_object* x_124; +x_122 = lean_ctor_get(x_121, 0); +lean_inc(x_122); +x_123 = lean_ctor_get(x_121, 1); +lean_inc(x_123); +lean_dec(x_121); +x_124 = l_Lean_Meta_mkLetCongr(x_122, x_120, x_11, x_12, x_13, x_14, x_123); +if (lean_obj_tag(x_124) == 0) +{ +uint8_t x_125; +x_125 = !lean_is_exclusive(x_124); +if (x_125 == 0) +{ +lean_object* x_126; lean_object* x_127; +x_126 = lean_ctor_get(x_124, 0); +lean_ctor_set(x_7, 0, x_126); +x_127 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_127, 0, x_33); +lean_ctor_set(x_127, 1, x_7); +lean_ctor_set(x_124, 0, x_127); +return x_124; +} +else +{ +lean_object* x_128; lean_object* x_129; lean_object* x_130; lean_object* x_131; +x_128 = lean_ctor_get(x_124, 0); +x_129 = lean_ctor_get(x_124, 1); +lean_inc(x_129); +lean_inc(x_128); +lean_dec(x_124); +lean_ctor_set(x_7, 0, x_128); +x_130 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_130, 0, x_33); +lean_ctor_set(x_130, 1, x_7); +x_131 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_131, 0, x_130); +lean_ctor_set(x_131, 1, x_129); +return x_131; +} +} +else +{ +uint8_t x_132; +lean_free_object(x_7); +lean_dec(x_33); +x_132 = !lean_is_exclusive(x_124); +if (x_132 == 0) +{ +return x_124; +} +else +{ +lean_object* x_133; lean_object* x_134; lean_object* x_135; +x_133 = lean_ctor_get(x_124, 0); +x_134 = lean_ctor_get(x_124, 1); +lean_inc(x_134); +lean_inc(x_133); +lean_dec(x_124); +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 +{ +uint8_t x_136; +lean_free_object(x_7); +lean_dec(x_120); +lean_dec(x_33); +lean_dec(x_14); +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_11); +x_136 = !lean_is_exclusive(x_121); +if (x_136 == 0) +{ +return x_121; +} +else +{ +lean_object* x_137; lean_object* x_138; lean_object* x_139; +x_137 = lean_ctor_get(x_121, 0); +x_138 = lean_ctor_get(x_121, 1); +lean_inc(x_138); +lean_inc(x_137); +lean_dec(x_121); +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; +} +} +} +else +{ +lean_object* x_140; lean_object* x_141; +x_140 = lean_ctor_get(x_7, 0); +lean_inc(x_140); +lean_dec(x_7); +lean_inc(x_14); +lean_inc(x_13); +lean_inc(x_12); +lean_inc(x_11); +x_141 = l_Lean_Meta_Simp_Result_getProof(x_22, x_11, x_12, x_13, x_14, x_30); +if (lean_obj_tag(x_141) == 0) +{ +lean_object* x_142; lean_object* x_143; lean_object* x_144; +x_142 = lean_ctor_get(x_141, 0); +lean_inc(x_142); +x_143 = lean_ctor_get(x_141, 1); +lean_inc(x_143); +lean_dec(x_141); +x_144 = l_Lean_Meta_mkLetCongr(x_142, x_140, x_11, x_12, x_13, x_14, x_143); +if (lean_obj_tag(x_144) == 0) +{ +lean_object* x_145; lean_object* x_146; lean_object* x_147; lean_object* x_148; lean_object* x_149; lean_object* x_150; +x_145 = lean_ctor_get(x_144, 0); +lean_inc(x_145); +x_146 = lean_ctor_get(x_144, 1); +lean_inc(x_146); +if (lean_is_exclusive(x_144)) { + lean_ctor_release(x_144, 0); + lean_ctor_release(x_144, 1); + x_147 = x_144; +} else { + lean_dec_ref(x_144); + x_147 = lean_box(0); +} +x_148 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_148, 0, x_145); +x_149 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_149, 0, x_33); +lean_ctor_set(x_149, 1, x_148); +if (lean_is_scalar(x_147)) { + x_150 = lean_alloc_ctor(0, 2, 0); +} else { + x_150 = x_147; +} +lean_ctor_set(x_150, 0, x_149); +lean_ctor_set(x_150, 1, x_146); +return x_150; +} +else +{ +lean_object* x_151; lean_object* x_152; lean_object* x_153; lean_object* x_154; +lean_dec(x_33); +x_151 = lean_ctor_get(x_144, 0); +lean_inc(x_151); +x_152 = lean_ctor_get(x_144, 1); +lean_inc(x_152); +if (lean_is_exclusive(x_144)) { + lean_ctor_release(x_144, 0); + lean_ctor_release(x_144, 1); + x_153 = x_144; +} else { + lean_dec_ref(x_144); + x_153 = lean_box(0); +} +if (lean_is_scalar(x_153)) { + x_154 = lean_alloc_ctor(1, 2, 0); +} else { + x_154 = x_153; +} +lean_ctor_set(x_154, 0, x_151); +lean_ctor_set(x_154, 1, x_152); +return x_154; +} +} +else +{ +lean_object* x_155; lean_object* x_156; lean_object* x_157; lean_object* x_158; +lean_dec(x_140); +lean_dec(x_33); +lean_dec(x_14); +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_11); +x_155 = lean_ctor_get(x_141, 0); +lean_inc(x_155); +x_156 = lean_ctor_get(x_141, 1); +lean_inc(x_156); +if (lean_is_exclusive(x_141)) { + lean_ctor_release(x_141, 0); + lean_ctor_release(x_141, 1); + x_157 = x_141; +} else { + lean_dec_ref(x_141); + x_157 = lean_box(0); +} +if (lean_is_scalar(x_157)) { + x_158 = lean_alloc_ctor(1, 2, 0); +} else { + x_158 = x_157; +} +lean_ctor_set(x_158, 0, x_155); +lean_ctor_set(x_158, 1, x_156); +return x_158; +} +} +} +} +} +else +{ +lean_object* x_159; lean_object* x_160; lean_object* x_161; uint8_t x_162; lean_object* x_163; lean_object* x_164; +x_159 = lean_ctor_get(x_27, 0); +x_160 = lean_ctor_get(x_27, 1); +lean_inc(x_160); +lean_inc(x_159); +lean_dec(x_27); +x_161 = lean_ctor_get(x_22, 0); +lean_inc(x_161); +x_162 = 0; +x_163 = l_Lean_mkLet(x_5, x_6, x_161, x_159, x_162); +x_164 = lean_ctor_get(x_22, 1); +lean_inc(x_164); +if (lean_obj_tag(x_164) == 0) +{ +lean_dec(x_26); +lean_dec(x_24); +if (lean_obj_tag(x_7) == 0) +{ +lean_object* x_165; lean_object* x_166; lean_object* x_167; +lean_dec(x_22); +lean_dec(x_14); +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_11); +x_165 = lean_box(0); +x_166 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_166, 0, x_163); +lean_ctor_set(x_166, 1, x_165); +x_167 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_167, 0, x_166); +lean_ctor_set(x_167, 1, x_160); +return x_167; +} +else +{ +lean_object* x_168; lean_object* x_169; lean_object* x_170; +x_168 = lean_ctor_get(x_7, 0); +lean_inc(x_168); +if (lean_is_exclusive(x_7)) { + lean_ctor_release(x_7, 0); + x_169 = x_7; +} else { + lean_dec_ref(x_7); + x_169 = lean_box(0); +} +lean_inc(x_14); +lean_inc(x_13); +lean_inc(x_12); +lean_inc(x_11); +x_170 = l_Lean_Meta_Simp_Result_getProof(x_22, x_11, x_12, x_13, x_14, x_160); +if (lean_obj_tag(x_170) == 0) +{ +lean_object* x_171; lean_object* x_172; lean_object* x_173; +x_171 = lean_ctor_get(x_170, 0); +lean_inc(x_171); +x_172 = lean_ctor_get(x_170, 1); +lean_inc(x_172); +lean_dec(x_170); +x_173 = l_Lean_Meta_mkLetCongr(x_171, x_168, x_11, x_12, x_13, x_14, x_172); +if (lean_obj_tag(x_173) == 0) +{ +lean_object* x_174; lean_object* x_175; lean_object* x_176; lean_object* x_177; lean_object* x_178; lean_object* x_179; +x_174 = lean_ctor_get(x_173, 0); +lean_inc(x_174); +x_175 = lean_ctor_get(x_173, 1); +lean_inc(x_175); +if (lean_is_exclusive(x_173)) { + lean_ctor_release(x_173, 0); + lean_ctor_release(x_173, 1); + x_176 = x_173; +} else { + lean_dec_ref(x_173); + x_176 = lean_box(0); +} +if (lean_is_scalar(x_169)) { + x_177 = lean_alloc_ctor(1, 1, 0); +} else { + x_177 = x_169; +} +lean_ctor_set(x_177, 0, x_174); +x_178 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_178, 0, x_163); +lean_ctor_set(x_178, 1, x_177); +if (lean_is_scalar(x_176)) { + x_179 = lean_alloc_ctor(0, 2, 0); +} else { + x_179 = x_176; +} +lean_ctor_set(x_179, 0, x_178); +lean_ctor_set(x_179, 1, x_175); +return x_179; +} +else +{ +lean_object* x_180; lean_object* x_181; lean_object* x_182; lean_object* x_183; +lean_dec(x_169); +lean_dec(x_163); +x_180 = lean_ctor_get(x_173, 0); +lean_inc(x_180); +x_181 = lean_ctor_get(x_173, 1); +lean_inc(x_181); +if (lean_is_exclusive(x_173)) { + lean_ctor_release(x_173, 0); + lean_ctor_release(x_173, 1); + x_182 = x_173; +} else { + lean_dec_ref(x_173); + x_182 = lean_box(0); +} +if (lean_is_scalar(x_182)) { + x_183 = lean_alloc_ctor(1, 2, 0); +} else { + x_183 = x_182; +} +lean_ctor_set(x_183, 0, x_180); +lean_ctor_set(x_183, 1, x_181); +return x_183; +} +} +else +{ +lean_object* x_184; lean_object* x_185; lean_object* x_186; lean_object* x_187; +lean_dec(x_169); +lean_dec(x_168); +lean_dec(x_163); +lean_dec(x_14); +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_11); +x_184 = lean_ctor_get(x_170, 0); +lean_inc(x_184); +x_185 = lean_ctor_get(x_170, 1); +lean_inc(x_185); +if (lean_is_exclusive(x_170)) { + lean_ctor_release(x_170, 0); + lean_ctor_release(x_170, 1); + x_186 = x_170; +} else { + lean_dec_ref(x_170); + x_186 = lean_box(0); +} +if (lean_is_scalar(x_186)) { + x_187 = lean_alloc_ctor(1, 2, 0); +} else { + x_187 = x_186; +} +lean_ctor_set(x_187, 0, x_184); +lean_ctor_set(x_187, 1, x_185); +return x_187; +} +} +} +else +{ +if (lean_obj_tag(x_7) == 0) +{ +lean_object* x_188; lean_object* x_189; uint8_t x_190; lean_object* x_191; +lean_dec(x_22); +x_188 = lean_ctor_get(x_164, 0); +lean_inc(x_188); +if (lean_is_exclusive(x_164)) { + lean_ctor_release(x_164, 0); + x_189 = x_164; +} else { + lean_dec_ref(x_164); + x_189 = lean_box(0); +} +x_190 = 1; +lean_inc(x_11); +x_191 = l_Lean_Meta_mkLambdaFVars(x_26, x_24, x_162, x_190, x_11, x_12, x_13, x_14, x_160); +if (lean_obj_tag(x_191) == 0) +{ +lean_object* x_192; lean_object* x_193; lean_object* x_194; +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 = l_Lean_Meta_mkLetValCongr(x_192, x_188, x_11, x_12, x_13, x_14, x_193); +if (lean_obj_tag(x_194) == 0) +{ +lean_object* x_195; lean_object* x_196; lean_object* x_197; lean_object* x_198; lean_object* x_199; lean_object* x_200; +x_195 = lean_ctor_get(x_194, 0); +lean_inc(x_195); +x_196 = lean_ctor_get(x_194, 1); +lean_inc(x_196); +if (lean_is_exclusive(x_194)) { + lean_ctor_release(x_194, 0); + lean_ctor_release(x_194, 1); + x_197 = x_194; +} else { + lean_dec_ref(x_194); + x_197 = lean_box(0); +} +if (lean_is_scalar(x_189)) { + x_198 = lean_alloc_ctor(1, 1, 0); +} else { + x_198 = x_189; +} +lean_ctor_set(x_198, 0, x_195); +x_199 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_199, 0, x_163); +lean_ctor_set(x_199, 1, x_198); +if (lean_is_scalar(x_197)) { + x_200 = lean_alloc_ctor(0, 2, 0); +} else { + x_200 = x_197; +} +lean_ctor_set(x_200, 0, x_199); +lean_ctor_set(x_200, 1, x_196); +return x_200; +} +else +{ +lean_object* x_201; lean_object* x_202; lean_object* x_203; lean_object* x_204; +lean_dec(x_189); +lean_dec(x_163); +x_201 = lean_ctor_get(x_194, 0); +lean_inc(x_201); +x_202 = lean_ctor_get(x_194, 1); +lean_inc(x_202); +if (lean_is_exclusive(x_194)) { + lean_ctor_release(x_194, 0); + lean_ctor_release(x_194, 1); + x_203 = x_194; +} else { + lean_dec_ref(x_194); + x_203 = lean_box(0); +} +if (lean_is_scalar(x_203)) { + x_204 = lean_alloc_ctor(1, 2, 0); +} else { + x_204 = x_203; +} +lean_ctor_set(x_204, 0, x_201); +lean_ctor_set(x_204, 1, x_202); +return x_204; +} +} +else +{ +lean_object* x_205; lean_object* x_206; lean_object* x_207; lean_object* x_208; +lean_dec(x_189); +lean_dec(x_188); +lean_dec(x_163); +lean_dec(x_14); +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_11); +x_205 = lean_ctor_get(x_191, 0); +lean_inc(x_205); +x_206 = lean_ctor_get(x_191, 1); +lean_inc(x_206); +if (lean_is_exclusive(x_191)) { + lean_ctor_release(x_191, 0); + lean_ctor_release(x_191, 1); + x_207 = x_191; +} else { + lean_dec_ref(x_191); + x_207 = lean_box(0); +} +if (lean_is_scalar(x_207)) { + x_208 = lean_alloc_ctor(1, 2, 0); +} else { + x_208 = x_207; +} +lean_ctor_set(x_208, 0, x_205); +lean_ctor_set(x_208, 1, x_206); +return x_208; +} +} +else +{ +lean_object* x_209; lean_object* x_210; lean_object* x_211; +lean_dec(x_164); +lean_dec(x_26); +lean_dec(x_24); +x_209 = lean_ctor_get(x_7, 0); +lean_inc(x_209); +if (lean_is_exclusive(x_7)) { + lean_ctor_release(x_7, 0); + x_210 = x_7; +} else { + lean_dec_ref(x_7); + x_210 = lean_box(0); +} +lean_inc(x_14); +lean_inc(x_13); +lean_inc(x_12); +lean_inc(x_11); +x_211 = l_Lean_Meta_Simp_Result_getProof(x_22, x_11, x_12, x_13, x_14, x_160); +if (lean_obj_tag(x_211) == 0) +{ +lean_object* x_212; lean_object* x_213; lean_object* x_214; +x_212 = lean_ctor_get(x_211, 0); +lean_inc(x_212); +x_213 = lean_ctor_get(x_211, 1); +lean_inc(x_213); +lean_dec(x_211); +x_214 = l_Lean_Meta_mkLetCongr(x_212, x_209, x_11, x_12, x_13, x_14, x_213); +if (lean_obj_tag(x_214) == 0) +{ +lean_object* x_215; lean_object* x_216; lean_object* x_217; lean_object* x_218; lean_object* x_219; lean_object* x_220; +x_215 = lean_ctor_get(x_214, 0); +lean_inc(x_215); +x_216 = lean_ctor_get(x_214, 1); +lean_inc(x_216); +if (lean_is_exclusive(x_214)) { + lean_ctor_release(x_214, 0); + lean_ctor_release(x_214, 1); + x_217 = x_214; +} else { + lean_dec_ref(x_214); + x_217 = lean_box(0); +} +if (lean_is_scalar(x_210)) { + x_218 = lean_alloc_ctor(1, 1, 0); +} else { + x_218 = x_210; +} +lean_ctor_set(x_218, 0, x_215); +x_219 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_219, 0, x_163); +lean_ctor_set(x_219, 1, x_218); +if (lean_is_scalar(x_217)) { + x_220 = lean_alloc_ctor(0, 2, 0); +} else { + x_220 = x_217; +} +lean_ctor_set(x_220, 0, x_219); +lean_ctor_set(x_220, 1, x_216); +return x_220; +} +else +{ +lean_object* x_221; lean_object* x_222; lean_object* x_223; lean_object* x_224; +lean_dec(x_210); +lean_dec(x_163); +x_221 = lean_ctor_get(x_214, 0); +lean_inc(x_221); +x_222 = lean_ctor_get(x_214, 1); +lean_inc(x_222); +if (lean_is_exclusive(x_214)) { + lean_ctor_release(x_214, 0); + lean_ctor_release(x_214, 1); + x_223 = x_214; +} else { + lean_dec_ref(x_214); + x_223 = lean_box(0); +} +if (lean_is_scalar(x_223)) { + x_224 = lean_alloc_ctor(1, 2, 0); +} else { + x_224 = x_223; +} +lean_ctor_set(x_224, 0, x_221); +lean_ctor_set(x_224, 1, x_222); +return x_224; +} +} +else +{ +lean_object* x_225; lean_object* x_226; lean_object* x_227; lean_object* x_228; +lean_dec(x_210); +lean_dec(x_209); +lean_dec(x_163); +lean_dec(x_14); +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_11); +x_225 = lean_ctor_get(x_211, 0); +lean_inc(x_225); +x_226 = lean_ctor_get(x_211, 1); +lean_inc(x_226); +if (lean_is_exclusive(x_211)) { + lean_ctor_release(x_211, 0); + lean_ctor_release(x_211, 1); + x_227 = x_211; +} else { + lean_dec_ref(x_211); + x_227 = lean_box(0); +} +if (lean_is_scalar(x_227)) { + x_228 = lean_alloc_ctor(1, 2, 0); +} else { + x_228 = x_227; +} +lean_ctor_set(x_228, 0, x_225); +lean_ctor_set(x_228, 1, x_226); +return x_228; +} +} +} +} +} +else +{ +uint8_t x_229; +lean_dec(x_26); +lean_dec(x_24); +lean_dec(x_22); +lean_dec(x_14); +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +x_229 = !lean_is_exclusive(x_27); +if (x_229 == 0) +{ +return x_27; +} +else +{ +lean_object* x_230; lean_object* x_231; lean_object* x_232; +x_230 = lean_ctor_get(x_27, 0); +x_231 = lean_ctor_get(x_27, 1); +lean_inc(x_231); +lean_inc(x_230); +lean_dec(x_27); +x_232 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_232, 0, x_230); +lean_ctor_set(x_232, 1, x_231); +return x_232; +} +} +} +else +{ +uint8_t x_233; +lean_dec(x_14); +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_1); +x_233 = !lean_is_exclusive(x_21); +if (x_233 == 0) +{ +return x_21; +} +else +{ +lean_object* x_234; lean_object* x_235; lean_object* x_236; +x_234 = lean_ctor_get(x_21, 0); +x_235 = lean_ctor_get(x_21, 1); +lean_inc(x_235); +lean_inc(x_234); +lean_dec(x_21); +x_236 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_236, 0, x_234); +lean_ctor_set(x_236, 1, x_235); +return x_236; +} +} +} +else +{ +lean_object* x_237; lean_object* x_238; lean_object* x_239; lean_object* x_240; +x_237 = lean_ctor_get(x_17, 1); +lean_inc(x_237); +lean_dec(x_17); +x_238 = l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___closed__1; +x_239 = l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___closed__2; +lean_inc(x_14); +lean_inc(x_13); +lean_inc(x_12); +lean_inc(x_11); +x_240 = l_Lean_Meta_transform___at___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___spec__1(x_3, x_238, x_239, x_8, x_9, x_10, x_11, x_12, x_13, x_14, x_237); +if (lean_obj_tag(x_240) == 0) +{ +lean_object* x_241; lean_object* x_242; lean_object* x_243; lean_object* x_244; lean_object* x_245; lean_object* x_246; +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); +x_243 = lean_ctor_get(x_4, 0); +lean_inc(x_243); +lean_dec(x_4); +x_244 = l_Lean_Meta_Simp_simp_simpLet___lambda__1___closed__1; +x_245 = lean_array_push(x_244, x_1); +lean_inc(x_13); +lean_inc(x_11); +x_246 = l_Lean_Meta_abstract(x_243, x_245, x_11, x_12, x_13, x_14, x_242); +if (lean_obj_tag(x_246) == 0) +{ +uint8_t x_247; +x_247 = !lean_is_exclusive(x_246); +if (x_247 == 0) +{ +lean_object* x_248; lean_object* x_249; uint8_t x_250; lean_object* x_251; +x_248 = lean_ctor_get(x_246, 0); +x_249 = lean_ctor_get(x_246, 1); +x_250 = 0; +lean_inc(x_241); +x_251 = l_Lean_mkLet(x_5, x_6, x_241, x_248, x_250); +if (lean_obj_tag(x_7) == 0) +{ +lean_object* x_252; lean_object* x_253; +lean_dec(x_241); +lean_dec(x_14); +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_11); +x_252 = lean_box(0); +x_253 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_253, 0, x_251); +lean_ctor_set(x_253, 1, x_252); +lean_ctor_set(x_246, 0, x_253); +return x_246; +} +else +{ +uint8_t x_254; +lean_free_object(x_246); +x_254 = !lean_is_exclusive(x_7); +if (x_254 == 0) +{ +lean_object* x_255; lean_object* x_256; +x_255 = lean_ctor_get(x_7, 0); +x_256 = l_Lean_Meta_mkLetBodyCongr(x_241, x_255, x_11, x_12, x_13, x_14, x_249); +if (lean_obj_tag(x_256) == 0) +{ +uint8_t x_257; +x_257 = !lean_is_exclusive(x_256); +if (x_257 == 0) +{ +lean_object* x_258; lean_object* x_259; +x_258 = lean_ctor_get(x_256, 0); +lean_ctor_set(x_7, 0, x_258); +x_259 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_259, 0, x_251); +lean_ctor_set(x_259, 1, x_7); +lean_ctor_set(x_256, 0, x_259); +return x_256; +} +else +{ +lean_object* x_260; lean_object* x_261; lean_object* x_262; lean_object* x_263; +x_260 = lean_ctor_get(x_256, 0); +x_261 = lean_ctor_get(x_256, 1); +lean_inc(x_261); +lean_inc(x_260); +lean_dec(x_256); +lean_ctor_set(x_7, 0, x_260); +x_262 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_262, 0, x_251); +lean_ctor_set(x_262, 1, x_7); +x_263 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_263, 0, x_262); +lean_ctor_set(x_263, 1, x_261); +return x_263; +} +} +else +{ +uint8_t x_264; +lean_free_object(x_7); +lean_dec(x_251); +x_264 = !lean_is_exclusive(x_256); +if (x_264 == 0) +{ +return x_256; +} +else +{ +lean_object* x_265; lean_object* x_266; lean_object* x_267; +x_265 = lean_ctor_get(x_256, 0); +x_266 = lean_ctor_get(x_256, 1); +lean_inc(x_266); +lean_inc(x_265); +lean_dec(x_256); +x_267 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_267, 0, x_265); +lean_ctor_set(x_267, 1, x_266); +return x_267; +} +} +} +else +{ +lean_object* x_268; lean_object* x_269; +x_268 = lean_ctor_get(x_7, 0); +lean_inc(x_268); +lean_dec(x_7); +x_269 = l_Lean_Meta_mkLetBodyCongr(x_241, x_268, x_11, x_12, x_13, x_14, x_249); +if (lean_obj_tag(x_269) == 0) +{ +lean_object* x_270; lean_object* x_271; lean_object* x_272; lean_object* x_273; lean_object* x_274; lean_object* x_275; +x_270 = lean_ctor_get(x_269, 0); +lean_inc(x_270); +x_271 = lean_ctor_get(x_269, 1); +lean_inc(x_271); +if (lean_is_exclusive(x_269)) { + lean_ctor_release(x_269, 0); + lean_ctor_release(x_269, 1); + x_272 = x_269; +} else { + lean_dec_ref(x_269); + x_272 = lean_box(0); +} +x_273 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_273, 0, x_270); +x_274 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_274, 0, x_251); +lean_ctor_set(x_274, 1, x_273); +if (lean_is_scalar(x_272)) { + x_275 = lean_alloc_ctor(0, 2, 0); +} else { + x_275 = x_272; +} +lean_ctor_set(x_275, 0, x_274); +lean_ctor_set(x_275, 1, x_271); +return x_275; +} +else +{ +lean_object* x_276; lean_object* x_277; lean_object* x_278; lean_object* x_279; +lean_dec(x_251); +x_276 = lean_ctor_get(x_269, 0); +lean_inc(x_276); +x_277 = lean_ctor_get(x_269, 1); +lean_inc(x_277); +if (lean_is_exclusive(x_269)) { + lean_ctor_release(x_269, 0); + lean_ctor_release(x_269, 1); + x_278 = x_269; +} else { + lean_dec_ref(x_269); + x_278 = lean_box(0); +} +if (lean_is_scalar(x_278)) { + x_279 = lean_alloc_ctor(1, 2, 0); +} else { + x_279 = x_278; +} +lean_ctor_set(x_279, 0, x_276); +lean_ctor_set(x_279, 1, x_277); +return x_279; +} +} +} +} +else +{ +lean_object* x_280; lean_object* x_281; uint8_t x_282; lean_object* x_283; +x_280 = lean_ctor_get(x_246, 0); +x_281 = lean_ctor_get(x_246, 1); +lean_inc(x_281); +lean_inc(x_280); +lean_dec(x_246); +x_282 = 0; +lean_inc(x_241); +x_283 = l_Lean_mkLet(x_5, x_6, x_241, x_280, x_282); +if (lean_obj_tag(x_7) == 0) +{ +lean_object* x_284; lean_object* x_285; lean_object* x_286; +lean_dec(x_241); +lean_dec(x_14); +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_11); +x_284 = lean_box(0); +x_285 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_285, 0, x_283); +lean_ctor_set(x_285, 1, x_284); +x_286 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_286, 0, x_285); +lean_ctor_set(x_286, 1, x_281); +return x_286; +} +else +{ +lean_object* x_287; lean_object* x_288; lean_object* x_289; +x_287 = lean_ctor_get(x_7, 0); +lean_inc(x_287); +if (lean_is_exclusive(x_7)) { + lean_ctor_release(x_7, 0); + x_288 = x_7; +} else { + lean_dec_ref(x_7); + x_288 = lean_box(0); +} +x_289 = l_Lean_Meta_mkLetBodyCongr(x_241, x_287, x_11, x_12, x_13, x_14, x_281); +if (lean_obj_tag(x_289) == 0) +{ +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_290 = lean_ctor_get(x_289, 0); +lean_inc(x_290); +x_291 = lean_ctor_get(x_289, 1); +lean_inc(x_291); +if (lean_is_exclusive(x_289)) { + lean_ctor_release(x_289, 0); + lean_ctor_release(x_289, 1); + x_292 = x_289; +} else { + lean_dec_ref(x_289); + x_292 = lean_box(0); +} +if (lean_is_scalar(x_288)) { + x_293 = lean_alloc_ctor(1, 1, 0); +} else { + x_293 = x_288; +} +lean_ctor_set(x_293, 0, x_290); +x_294 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_294, 0, x_283); +lean_ctor_set(x_294, 1, x_293); +if (lean_is_scalar(x_292)) { + x_295 = lean_alloc_ctor(0, 2, 0); +} else { + x_295 = x_292; +} +lean_ctor_set(x_295, 0, x_294); +lean_ctor_set(x_295, 1, x_291); +return x_295; +} +else +{ +lean_object* x_296; lean_object* x_297; lean_object* x_298; lean_object* x_299; +lean_dec(x_288); +lean_dec(x_283); +x_296 = lean_ctor_get(x_289, 0); +lean_inc(x_296); +x_297 = lean_ctor_get(x_289, 1); +lean_inc(x_297); +if (lean_is_exclusive(x_289)) { + lean_ctor_release(x_289, 0); + lean_ctor_release(x_289, 1); + x_298 = x_289; +} else { + lean_dec_ref(x_289); + x_298 = lean_box(0); +} +if (lean_is_scalar(x_298)) { + x_299 = lean_alloc_ctor(1, 2, 0); +} else { + x_299 = x_298; +} +lean_ctor_set(x_299, 0, x_296); +lean_ctor_set(x_299, 1, x_297); +return x_299; +} +} +} +} +else +{ +uint8_t x_300; +lean_dec(x_241); +lean_dec(x_14); +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +x_300 = !lean_is_exclusive(x_246); +if (x_300 == 0) +{ +return x_246; +} +else +{ +lean_object* x_301; lean_object* x_302; lean_object* x_303; +x_301 = lean_ctor_get(x_246, 0); +x_302 = lean_ctor_get(x_246, 1); +lean_inc(x_302); +lean_inc(x_301); +lean_dec(x_246); +x_303 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_303, 0, x_301); +lean_ctor_set(x_303, 1, x_302); +return x_303; +} +} +} +else +{ +uint8_t x_304; +lean_dec(x_14); +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_1); +x_304 = !lean_is_exclusive(x_240); +if (x_304 == 0) +{ +return x_240; +} +else +{ +lean_object* x_305; lean_object* x_306; lean_object* x_307; +x_305 = lean_ctor_get(x_240, 0); +x_306 = lean_ctor_get(x_240, 1); +lean_inc(x_306); +lean_inc(x_305); +lean_dec(x_240); +x_307 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_307, 0, x_305); +lean_ctor_set(x_307, 1, x_306); +return x_307; +} +} +} +} +} +lean_object* l_Lean_Meta_Simp_simp_simpLet___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_object* x_12, lean_object* x_13, lean_object* x_14) { +_start: +{ +lean_object* x_15; lean_object* x_16; lean_object* x_17; uint8_t x_18; +x_15 = lean_expr_instantiate1(x_1, x_6); +lean_dec(x_1); +lean_inc(x_13); +lean_inc(x_12); +lean_inc(x_11); +lean_inc(x_10); +lean_inc(x_15); +x_16 = l_Lean_Meta_isTypeCorrect(x_15, x_10, x_11, x_12, x_13, x_14); +x_17 = lean_ctor_get(x_16, 0); +lean_inc(x_17); +x_18 = lean_unbox(x_17); +lean_dec(x_17); +if (x_18 == 0) +{ +lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; +lean_dec(x_15); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +x_19 = lean_ctor_get(x_16, 1); +lean_inc(x_19); +lean_dec(x_16); +x_20 = l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___closed__1; +x_21 = l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___closed__2; +x_22 = l_Lean_Meta_transform___at___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___spec__1(x_2, x_20, x_21, x_7, x_8, x_9, x_10, x_11, x_12, x_13, x_19); +if (lean_obj_tag(x_22) == 0) +{ +uint8_t x_23; +x_23 = !lean_is_exclusive(x_22); +if (x_23 == 0) +{ +lean_object* x_24; lean_object* x_25; lean_object* x_26; +x_24 = lean_ctor_get(x_22, 0); +x_25 = lean_box(0); +x_26 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_26, 0, x_24); +lean_ctor_set(x_26, 1, x_25); +lean_ctor_set(x_22, 0, x_26); +return x_22; +} +else +{ +lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; +x_27 = lean_ctor_get(x_22, 0); +x_28 = lean_ctor_get(x_22, 1); +lean_inc(x_28); +lean_inc(x_27); +lean_dec(x_22); +x_29 = lean_box(0); +x_30 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_30, 0, x_27); +lean_ctor_set(x_30, 1, x_29); +x_31 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_31, 0, x_30); +lean_ctor_set(x_31, 1, x_28); return x_31; } } +else +{ +uint8_t x_32; +x_32 = !lean_is_exclusive(x_22); +if (x_32 == 0) +{ +return x_22; } else { -lean_object* x_32; lean_object* x_33; uint8_t x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; -x_32 = lean_ctor_get(x_12, 1); -lean_inc(x_32); +lean_object* x_33; lean_object* x_34; lean_object* x_35; +x_33 = lean_ctor_get(x_22, 0); +x_34 = lean_ctor_get(x_22, 1); +lean_inc(x_34); +lean_inc(x_33); +lean_dec(x_22); +x_35 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_35, 0, x_33); +lean_ctor_set(x_35, 1, x_34); +return x_35; +} +} +} +else +{ +lean_object* x_36; lean_object* x_37; +lean_dec(x_2); +x_36 = lean_ctor_get(x_16, 1); +lean_inc(x_36); +lean_dec(x_16); +lean_inc(x_13); +lean_inc(x_12); +lean_inc(x_11); +lean_inc(x_10); +lean_inc(x_15); +x_37 = lean_infer_type(x_15, x_10, x_11, x_12, x_13, x_36); +if (lean_obj_tag(x_37) == 0) +{ +lean_object* x_38; lean_object* x_39; lean_object* x_40; +x_38 = lean_ctor_get(x_37, 0); +lean_inc(x_38); +x_39 = lean_ctor_get(x_37, 1); +lean_inc(x_39); +lean_dec(x_37); +lean_inc(x_13); +lean_inc(x_12); +lean_inc(x_11); +lean_inc(x_10); +x_40 = lean_whnf(x_38, x_10, x_11, x_12, x_13, x_39); +if (lean_obj_tag(x_40) == 0) +{ +lean_object* x_41; lean_object* x_42; lean_object* x_43; +x_41 = lean_ctor_get(x_40, 0); +lean_inc(x_41); +x_42 = lean_ctor_get(x_40, 1); +lean_inc(x_42); +lean_dec(x_40); +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_7); +x_43 = l_Lean_Meta_Simp_simp(x_15, x_7, x_8, x_9, x_10, x_11, x_12, x_13, x_42); +if (lean_obj_tag(x_43) == 0) +{ +lean_object* x_44; lean_object* x_45; +x_44 = lean_ctor_get(x_43, 0); +lean_inc(x_44); +x_45 = lean_ctor_get(x_44, 1); +lean_inc(x_45); +if (lean_obj_tag(x_45) == 0) +{ +lean_object* x_46; lean_object* x_47; lean_object* x_48; +x_46 = lean_ctor_get(x_43, 1); +lean_inc(x_46); +lean_dec(x_43); +x_47 = lean_box(0); +x_48 = l_Lean_Meta_Simp_simp_simpLet___lambda__1(x_6, x_41, x_3, x_44, x_4, x_5, x_47, x_7, x_8, x_9, x_10, x_11, x_12, x_13, x_46); +return x_48; +} +else +{ +lean_object* x_49; uint8_t x_50; +x_49 = lean_ctor_get(x_43, 1); +lean_inc(x_49); +lean_dec(x_43); +x_50 = !lean_is_exclusive(x_45); +if (x_50 == 0) +{ +lean_object* x_51; lean_object* x_52; lean_object* x_53; uint8_t x_54; uint8_t x_55; lean_object* x_56; +x_51 = lean_ctor_get(x_45, 0); +x_52 = l_Lean_Meta_Simp_simp_simpLet___lambda__1___closed__1; +lean_inc(x_6); +x_53 = lean_array_push(x_52, x_6); +x_54 = 0; +x_55 = 1; +lean_inc(x_10); +x_56 = l_Lean_Meta_mkLambdaFVars(x_53, x_51, x_54, x_55, x_10, x_11, x_12, x_13, x_49); +if (lean_obj_tag(x_56) == 0) +{ +lean_object* x_57; lean_object* x_58; lean_object* x_59; +x_57 = lean_ctor_get(x_56, 0); +lean_inc(x_57); +x_58 = lean_ctor_get(x_56, 1); +lean_inc(x_58); +lean_dec(x_56); +lean_ctor_set(x_45, 0, x_57); +x_59 = l_Lean_Meta_Simp_simp_simpLet___lambda__1(x_6, x_41, x_3, x_44, x_4, x_5, x_45, x_7, x_8, x_9, x_10, x_11, x_12, x_13, x_58); +return x_59; +} +else +{ +uint8_t x_60; +lean_free_object(x_45); +lean_dec(x_44); +lean_dec(x_41); +lean_dec(x_13); lean_dec(x_12); -x_33 = l_Lean_Expr_bindingName_x21(x_1); -x_34 = l_Lean_Expr_bindingInfo_x21(x_1); -x_35 = l_Lean_Expr_bindingDomain_x21(x_1); -x_36 = lean_alloc_closure((void*)(l_Lean_Meta_Simp_simp_simpForall___lambda__2___boxed), 10, 1); -lean_closure_set(x_36, 0, x_1); -x_37 = l_Lean_Meta_withLocalDecl___at_Lean_Meta_Simp_simp_simpForall___spec__2___rarg(x_33, x_34, x_35, x_36, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_32); -return x_37; -} -} -else -{ -uint8_t x_38; +lean_dec(x_11); +lean_dec(x_10); lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); @@ -12054,303 +12986,317 @@ lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_3); -lean_dec(x_1); -x_38 = !lean_is_exclusive(x_12); -if (x_38 == 0) +x_60 = !lean_is_exclusive(x_56); +if (x_60 == 0) { -return x_12; +return x_56; } else { -lean_object* x_39; lean_object* x_40; lean_object* x_41; -x_39 = lean_ctor_get(x_12, 0); -x_40 = lean_ctor_get(x_12, 1); -lean_inc(x_40); -lean_inc(x_39); -lean_dec(x_12); -x_41 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_41, 0, x_39); -lean_ctor_set(x_41, 1, x_40); -return x_41; -} -} -} -else -{ -lean_object* x_42; -x_42 = l_Lean_Meta_Simp_simp_simpArrow(x_1, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10); -return x_42; -} -} -} -static lean_object* _init_l_Lean_Meta_Simp_simp_simpForall___closed__1() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string("Debug"); -return x_1; -} -} -static lean_object* _init_l_Lean_Meta_Simp_simp_simpForall___closed__2() { -_start: -{ -lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = lean_box(0); -x_2 = l_Lean_Meta_Simp_simp_simpForall___closed__1; -x_3 = lean_name_mk_string(x_1, x_2); -return x_3; -} -} -static lean_object* _init_l_Lean_Meta_Simp_simp_simpForall___closed__3() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string("Meta"); -return x_1; -} -} -static lean_object* _init_l_Lean_Meta_Simp_simp_simpForall___closed__4() { -_start: -{ -lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Meta_Simp_simp_simpForall___closed__2; -x_2 = l_Lean_Meta_Simp_simp_simpForall___closed__3; -x_3 = lean_name_mk_string(x_1, x_2); -return x_3; -} -} -static lean_object* _init_l_Lean_Meta_Simp_simp_simpForall___closed__5() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string("Tactic"); -return x_1; -} -} -static lean_object* _init_l_Lean_Meta_Simp_simp_simpForall___closed__6() { -_start: -{ -lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Meta_Simp_simp_simpForall___closed__4; -x_2 = l_Lean_Meta_Simp_simp_simpForall___closed__5; -x_3 = lean_name_mk_string(x_1, x_2); -return x_3; -} -} -static lean_object* _init_l_Lean_Meta_Simp_simp_simpForall___closed__7() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string("simp"); -return x_1; -} -} -static lean_object* _init_l_Lean_Meta_Simp_simp_simpForall___closed__8() { -_start: -{ -lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Meta_Simp_simp_simpForall___closed__6; -x_2 = l_Lean_Meta_Simp_simp_simpForall___closed__7; -x_3 = lean_name_mk_string(x_1, x_2); -return x_3; -} -} -static lean_object* _init_l_Lean_Meta_Simp_simp_simpForall___closed__9() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string("forall "); -return x_1; -} -} -static lean_object* _init_l_Lean_Meta_Simp_simp_simpForall___closed__10() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Meta_Simp_simp_simpForall___closed__9; -x_2 = l_Lean_stringToMessageData(x_1); -return x_2; -} -} -lean_object* l_Lean_Meta_Simp_simp_simpForall(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9) { -_start: -{ -lean_object* x_10; uint8_t x_11; -x_10 = l_Lean_Meta_Simp_simp_simpForall___closed__8; -x_11 = !lean_is_exclusive(x_3); -if (x_11 == 0) -{ -lean_object* x_12; lean_object* x_13; uint8_t x_14; lean_object* x_15; lean_object* x_28; lean_object* x_29; lean_object* x_30; uint8_t x_31; -x_12 = lean_ctor_get(x_3, 3); -lean_dec(x_12); -lean_inc(x_1); -x_13 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_13, 0, x_1); -lean_ctor_set(x_3, 3, x_13); -x_28 = lean_st_ref_get(x_8, x_9); -x_29 = lean_ctor_get(x_28, 0); -lean_inc(x_29); -x_30 = lean_ctor_get(x_29, 3); -lean_inc(x_30); -lean_dec(x_29); -x_31 = lean_ctor_get_uint8(x_30, sizeof(void*)*1); -lean_dec(x_30); -if (x_31 == 0) -{ -lean_object* x_32; uint8_t x_33; -x_32 = lean_ctor_get(x_28, 1); -lean_inc(x_32); -lean_dec(x_28); -x_33 = 0; -x_14 = x_33; -x_15 = x_32; -goto block_27; -} -else -{ -lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; uint8_t x_38; -x_34 = lean_ctor_get(x_28, 1); -lean_inc(x_34); -lean_dec(x_28); -x_35 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at_Lean_Meta_Simp_simp_simpForall___spec__4(x_10, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_34); -x_36 = lean_ctor_get(x_35, 0); -lean_inc(x_36); -x_37 = lean_ctor_get(x_35, 1); -lean_inc(x_37); -lean_dec(x_35); -x_38 = lean_unbox(x_36); -lean_dec(x_36); -x_14 = x_38; -x_15 = x_37; -goto block_27; -} -block_27: -{ -if (x_14 == 0) -{ -lean_object* x_16; lean_object* x_17; -x_16 = lean_box(0); -x_17 = l_Lean_Meta_Simp_simp_simpForall___lambda__3(x_1, x_16, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_15); -return x_17; -} -else -{ -lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; -lean_inc(x_1); -x_18 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_18, 0, x_1); -x_19 = l_Lean_Meta_Simp_simp_simpForall___closed__10; -x_20 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_20, 0, x_19); -lean_ctor_set(x_20, 1, x_18); -x_21 = l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__3___closed__8; -x_22 = lean_alloc_ctor(10, 2, 0); -lean_ctor_set(x_22, 0, x_20); -lean_ctor_set(x_22, 1, x_21); -x_23 = l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__3(x_10, x_22, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_15); -x_24 = lean_ctor_get(x_23, 0); -lean_inc(x_24); -x_25 = lean_ctor_get(x_23, 1); -lean_inc(x_25); -lean_dec(x_23); -x_26 = l_Lean_Meta_Simp_simp_simpForall___lambda__3(x_1, x_24, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_25); -return x_26; -} -} -} -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; uint8_t x_45; lean_object* x_46; lean_object* x_59; lean_object* x_60; lean_object* x_61; uint8_t x_62; -x_39 = lean_ctor_get(x_3, 0); -x_40 = lean_ctor_get(x_3, 1); -x_41 = lean_ctor_get(x_3, 2); -x_42 = lean_ctor_get(x_3, 4); -lean_inc(x_42); -lean_inc(x_41); -lean_inc(x_40); -lean_inc(x_39); -lean_dec(x_3); -lean_inc(x_1); -x_43 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_43, 0, x_1); -x_44 = lean_alloc_ctor(0, 5, 0); -lean_ctor_set(x_44, 0, x_39); -lean_ctor_set(x_44, 1, x_40); -lean_ctor_set(x_44, 2, x_41); -lean_ctor_set(x_44, 3, x_43); -lean_ctor_set(x_44, 4, x_42); -x_59 = lean_st_ref_get(x_8, x_9); -x_60 = lean_ctor_get(x_59, 0); -lean_inc(x_60); -x_61 = lean_ctor_get(x_60, 3); +lean_object* x_61; lean_object* x_62; lean_object* x_63; +x_61 = lean_ctor_get(x_56, 0); +x_62 = lean_ctor_get(x_56, 1); +lean_inc(x_62); lean_inc(x_61); -lean_dec(x_60); -x_62 = lean_ctor_get_uint8(x_61, sizeof(void*)*1); -lean_dec(x_61); -if (x_62 == 0) -{ -lean_object* x_63; uint8_t x_64; -x_63 = lean_ctor_get(x_59, 1); -lean_inc(x_63); -lean_dec(x_59); -x_64 = 0; -x_45 = x_64; -x_46 = x_63; -goto block_58; +lean_dec(x_56); +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_65; lean_object* x_66; lean_object* x_67; lean_object* x_68; uint8_t x_69; -x_65 = lean_ctor_get(x_59, 1); -lean_inc(x_65); -lean_dec(x_59); -x_66 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at_Lean_Meta_Simp_simp_simpForall___spec__4(x_10, x_2, x_44, x_4, x_5, x_6, x_7, x_8, x_65); -x_67 = lean_ctor_get(x_66, 0); -lean_inc(x_67); -x_68 = lean_ctor_get(x_66, 1); -lean_inc(x_68); -lean_dec(x_66); -x_69 = lean_unbox(x_67); -lean_dec(x_67); -x_45 = x_69; -x_46 = x_68; -goto block_58; -} -block_58: +lean_object* x_64; lean_object* x_65; lean_object* x_66; uint8_t x_67; uint8_t x_68; lean_object* x_69; +x_64 = lean_ctor_get(x_45, 0); +lean_inc(x_64); +lean_dec(x_45); +x_65 = l_Lean_Meta_Simp_simp_simpLet___lambda__1___closed__1; +lean_inc(x_6); +x_66 = lean_array_push(x_65, x_6); +x_67 = 0; +x_68 = 1; +lean_inc(x_10); +x_69 = l_Lean_Meta_mkLambdaFVars(x_66, x_64, x_67, x_68, x_10, x_11, x_12, x_13, x_49); +if (lean_obj_tag(x_69) == 0) { -if (x_45 == 0) -{ -lean_object* x_47; lean_object* x_48; -x_47 = lean_box(0); -x_48 = l_Lean_Meta_Simp_simp_simpForall___lambda__3(x_1, x_47, x_2, x_44, x_4, x_5, x_6, x_7, x_8, x_46); -return x_48; +lean_object* x_70; lean_object* x_71; lean_object* x_72; lean_object* x_73; +x_70 = lean_ctor_get(x_69, 0); +lean_inc(x_70); +x_71 = lean_ctor_get(x_69, 1); +lean_inc(x_71); +lean_dec(x_69); +x_72 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_72, 0, x_70); +x_73 = l_Lean_Meta_Simp_simp_simpLet___lambda__1(x_6, x_41, x_3, x_44, x_4, x_5, x_72, x_7, x_8, x_9, x_10, x_11, x_12, x_13, x_71); +return x_73; } else { -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_inc(x_1); -x_49 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_49, 0, x_1); -x_50 = l_Lean_Meta_Simp_simp_simpForall___closed__10; -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_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__3___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_simp_simpForall___spec__3(x_10, x_53, x_2, x_44, x_4, x_5, x_6, x_7, x_8, x_46); -x_55 = lean_ctor_get(x_54, 0); -lean_inc(x_55); -x_56 = lean_ctor_get(x_54, 1); -lean_inc(x_56); -lean_dec(x_54); -x_57 = l_Lean_Meta_Simp_simp_simpForall___lambda__3(x_1, x_55, x_2, x_44, x_4, x_5, x_6, x_7, x_8, x_56); -return x_57; +lean_object* x_74; lean_object* x_75; lean_object* x_76; lean_object* x_77; +lean_dec(x_44); +lean_dec(x_41); +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_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +x_74 = lean_ctor_get(x_69, 0); +lean_inc(x_74); +x_75 = lean_ctor_get(x_69, 1); +lean_inc(x_75); +if (lean_is_exclusive(x_69)) { + lean_ctor_release(x_69, 0); + lean_ctor_release(x_69, 1); + x_76 = x_69; +} else { + lean_dec_ref(x_69); + x_76 = lean_box(0); +} +if (lean_is_scalar(x_76)) { + x_77 = lean_alloc_ctor(1, 2, 0); +} else { + x_77 = x_76; +} +lean_ctor_set(x_77, 0, x_74); +lean_ctor_set(x_77, 1, x_75); +return x_77; } } } } +else +{ +uint8_t x_78; +lean_dec(x_41); +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_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +x_78 = !lean_is_exclusive(x_43); +if (x_78 == 0) +{ +return x_43; +} +else +{ +lean_object* x_79; lean_object* x_80; lean_object* x_81; +x_79 = lean_ctor_get(x_43, 0); +x_80 = lean_ctor_get(x_43, 1); +lean_inc(x_80); +lean_inc(x_79); +lean_dec(x_43); +x_81 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_81, 0, x_79); +lean_ctor_set(x_81, 1, x_80); +return x_81; +} +} +} +else +{ +uint8_t x_82; +lean_dec(x_15); +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_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +x_82 = !lean_is_exclusive(x_40); +if (x_82 == 0) +{ +return x_40; +} +else +{ +lean_object* x_83; lean_object* x_84; lean_object* x_85; +x_83 = lean_ctor_get(x_40, 0); +x_84 = lean_ctor_get(x_40, 1); +lean_inc(x_84); +lean_inc(x_83); +lean_dec(x_40); +x_85 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_85, 0, x_83); +lean_ctor_set(x_85, 1, x_84); +return x_85; +} +} +} +else +{ +uint8_t x_86; +lean_dec(x_15); +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_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +x_86 = !lean_is_exclusive(x_37); +if (x_86 == 0) +{ +return x_37; +} +else +{ +lean_object* x_87; lean_object* x_88; lean_object* x_89; +x_87 = lean_ctor_get(x_37, 0); +x_88 = lean_ctor_get(x_37, 1); +lean_inc(x_88); +lean_inc(x_87); +lean_dec(x_37); +x_89 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_89, 0, x_87); +lean_ctor_set(x_89, 1, x_88); +return x_89; +} +} +} +} +} +static lean_object* _init_l_Lean_Meta_Simp_simp_simpLet___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("Lean.Meta.Simp.simp.simpLet"); +return x_1; +} +} +static lean_object* _init_l_Lean_Meta_Simp_simp_simpLet___closed__2() { +_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__5; +x_2 = l_Lean_Meta_Simp_simp_simpLet___closed__1; +x_3 = lean_unsigned_to_nat(358u); +x_4 = lean_unsigned_to_nat(11u); +x_5 = l_Lean_Meta_Simp_simp_simpStep___closed__7; +x_6 = l___private_Init_Util_0__mkPanicMessageWithDecl(x_1, x_2, x_3, x_4, x_5); +return x_6; +} +} +lean_object* l_Lean_Meta_Simp_simp_simpLet(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: +{ +if (lean_obj_tag(x_1) == 8) +{ +lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; uint8_t x_16; +x_10 = lean_ctor_get(x_1, 0); +lean_inc(x_10); +x_11 = lean_ctor_get(x_1, 1); +lean_inc(x_11); +x_12 = lean_ctor_get(x_1, 2); +lean_inc(x_12); +x_13 = lean_ctor_get(x_1, 3); +lean_inc(x_13); +x_14 = l_Lean_Meta_Simp_getConfig___rarg(x_3, x_4, x_5, x_6, x_7, x_8, x_9); +x_15 = lean_ctor_get(x_14, 0); +lean_inc(x_15); +x_16 = lean_ctor_get_uint8(x_15, sizeof(void*)*2 + 3); +lean_dec(x_15); +if (x_16 == 0) +{ +lean_object* x_17; lean_object* x_18; uint8_t x_19; lean_object* x_20; +x_17 = lean_ctor_get(x_14, 1); +lean_inc(x_17); +lean_dec(x_14); +lean_inc(x_11); +lean_inc(x_10); +x_18 = lean_alloc_closure((void*)(l_Lean_Meta_Simp_simp_simpLet___lambda__2), 14, 5); +lean_closure_set(x_18, 0, x_13); +lean_closure_set(x_18, 1, x_1); +lean_closure_set(x_18, 2, x_12); +lean_closure_set(x_18, 3, x_10); +lean_closure_set(x_18, 4, x_11); +x_19 = 0; +x_20 = l_Lean_Meta_withLocalDecl___at_Lean_Meta_Simp_simp_simpLet___spec__1___rarg(x_10, x_19, x_11, x_18, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_17); +return x_20; +} +else +{ +uint8_t x_21; +lean_dec(x_11); +lean_dec(x_10); +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_21 = !lean_is_exclusive(x_14); +if (x_21 == 0) +{ +lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; +x_22 = lean_ctor_get(x_14, 0); +lean_dec(x_22); +x_23 = lean_expr_instantiate1(x_13, x_12); +lean_dec(x_12); +lean_dec(x_13); +x_24 = lean_box(0); +x_25 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_25, 0, x_23); +lean_ctor_set(x_25, 1, x_24); +lean_ctor_set(x_14, 0, x_25); +return x_14; +} +else +{ +lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; +x_26 = lean_ctor_get(x_14, 1); +lean_inc(x_26); +lean_dec(x_14); +x_27 = lean_expr_instantiate1(x_13, x_12); +lean_dec(x_12); +lean_dec(x_13); +x_28 = lean_box(0); +x_29 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_29, 0, x_27); +lean_ctor_set(x_29, 1, 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_26); +return x_30; +} +} +} +else +{ +lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; +lean_dec(x_1); +x_31 = l_Lean_Meta_Simp_simp_simpStep___closed__4; +x_32 = l_Lean_Meta_Simp_simp_simpLet___closed__2; +x_33 = lean_panic_fn(x_31, x_32); +x_34 = lean_apply_8(x_33, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9); +return x_34; +} +} } lean_object* l_Std_AssocList_find_x3f___at_Lean_Meta_Simp_simp___spec__2(lean_object* x_1, lean_object* x_2) { _start: @@ -12854,6 +13800,1110 @@ return x_20; } } } +lean_object* l_ReaderT_bind___at_Lean_Meta_Simp_simp_simpForall___spec__1___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10) { +_start: +{ +lean_object* x_11; +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); +x_11 = lean_apply_8(x_1, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10); +if (lean_obj_tag(x_11) == 0) +{ +lean_object* x_12; lean_object* x_13; lean_object* x_14; +x_12 = lean_ctor_get(x_11, 0); +lean_inc(x_12); +x_13 = lean_ctor_get(x_11, 1); +lean_inc(x_13); +lean_dec(x_11); +x_14 = lean_apply_9(x_2, x_12, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_13); +return x_14; +} +else +{ +uint8_t x_15; +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +x_15 = !lean_is_exclusive(x_11); +if (x_15 == 0) +{ +return x_11; +} +else +{ +lean_object* x_16; lean_object* x_17; lean_object* x_18; +x_16 = lean_ctor_get(x_11, 0); +x_17 = lean_ctor_get(x_11, 1); +lean_inc(x_17); +lean_inc(x_16); +lean_dec(x_11); +x_18 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_18, 0, x_16); +lean_ctor_set(x_18, 1, x_17); +return x_18; +} +} +} +} +lean_object* l_ReaderT_bind___at_Lean_Meta_Simp_simp_simpForall___spec__1(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = lean_alloc_closure((void*)(l_ReaderT_bind___at_Lean_Meta_Simp_simp_simpForall___spec__1___rarg), 10, 0); +return x_3; +} +} +static lean_object* _init_l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__2___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("_traceMsg"); +return x_1; +} +} +static lean_object* _init_l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__2___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__2___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +static lean_object* _init_l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__2___closed__3() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("["); +return x_1; +} +} +static lean_object* _init_l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__2___closed__4() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__2___closed__3; +x_2 = l_Lean_stringToMessageData(x_1); +return x_2; +} +} +static lean_object* _init_l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__2___closed__5() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("] "); +return x_1; +} +} +static lean_object* _init_l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__2___closed__6() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__2___closed__5; +x_2 = l_Lean_stringToMessageData(x_1); +return x_2; +} +} +static lean_object* _init_l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__2___closed__7() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string(""); +return x_1; +} +} +static lean_object* _init_l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__2___closed__8() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__2___closed__7; +x_2 = l_Lean_stringToMessageData(x_1); +return x_2; +} +} +lean_object* l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__2(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, 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; 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; uint8_t x_20; +x_11 = lean_ctor_get(x_8, 3); +x_12 = l_Lean_addMessageContextFull___at_Lean_Meta_instAddMessageContextMetaM___spec__1(x_2, x_6, x_7, x_8, x_9, x_10); +x_13 = lean_ctor_get(x_12, 0); +lean_inc(x_13); +x_14 = lean_ctor_get(x_12, 1); +lean_inc(x_14); +lean_dec(x_12); +x_15 = l_Lean_addTrace_addTraceOptions(x_13); +x_16 = lean_st_ref_take(x_9, x_14); +x_17 = lean_ctor_get(x_16, 0); +lean_inc(x_17); +x_18 = lean_ctor_get(x_17, 3); +lean_inc(x_18); +x_19 = lean_ctor_get(x_16, 1); +lean_inc(x_19); +lean_dec(x_16); +x_20 = !lean_is_exclusive(x_17); +if (x_20 == 0) +{ +lean_object* x_21; uint8_t x_22; +x_21 = lean_ctor_get(x_17, 3); +lean_dec(x_21); +x_22 = !lean_is_exclusive(x_18); +if (x_22 == 0) +{ +lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; uint8_t x_38; +x_23 = lean_ctor_get(x_18, 0); +x_24 = l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__2___closed__2; +x_25 = l_Lean_Name_append(x_1, x_24); +x_26 = lean_alloc_ctor(4, 1, 0); +lean_ctor_set(x_26, 0, x_1); +x_27 = l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__2___closed__4; +x_28 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_28, 0, x_27); +lean_ctor_set(x_28, 1, x_26); +x_29 = l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__2___closed__6; +x_30 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_30, 0, x_28); +lean_ctor_set(x_30, 1, x_29); +x_31 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_31, 0, x_30); +lean_ctor_set(x_31, 1, x_15); +x_32 = l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__2___closed__8; +x_33 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_33, 0, x_31); +lean_ctor_set(x_33, 1, x_32); +x_34 = lean_alloc_ctor(11, 2, 0); +lean_ctor_set(x_34, 0, x_25); +lean_ctor_set(x_34, 1, x_33); +lean_inc(x_11); +x_35 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_35, 0, x_11); +lean_ctor_set(x_35, 1, x_34); +x_36 = l_Std_PersistentArray_push___rarg(x_23, x_35); +lean_ctor_set(x_18, 0, x_36); +x_37 = lean_st_ref_set(x_9, x_17, x_19); +x_38 = !lean_is_exclusive(x_37); +if (x_38 == 0) +{ +lean_object* x_39; lean_object* x_40; +x_39 = lean_ctor_get(x_37, 0); +lean_dec(x_39); +x_40 = lean_box(0); +lean_ctor_set(x_37, 0, x_40); +return x_37; +} +else +{ +lean_object* x_41; lean_object* x_42; lean_object* x_43; +x_41 = lean_ctor_get(x_37, 1); +lean_inc(x_41); +lean_dec(x_37); +x_42 = lean_box(0); +x_43 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_43, 0, x_42); +lean_ctor_set(x_43, 1, x_41); +return x_43; +} +} +else +{ +uint8_t 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_60; lean_object* x_61; lean_object* x_62; lean_object* x_63; lean_object* x_64; +x_44 = lean_ctor_get_uint8(x_18, sizeof(void*)*1); +x_45 = lean_ctor_get(x_18, 0); +lean_inc(x_45); +lean_dec(x_18); +x_46 = l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__2___closed__2; +x_47 = l_Lean_Name_append(x_1, x_46); +x_48 = lean_alloc_ctor(4, 1, 0); +lean_ctor_set(x_48, 0, x_1); +x_49 = l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__2___closed__4; +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_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__2___closed__6; +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(10, 2, 0); +lean_ctor_set(x_53, 0, x_52); +lean_ctor_set(x_53, 1, x_15); +x_54 = l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__2___closed__8; +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 = lean_alloc_ctor(11, 2, 0); +lean_ctor_set(x_56, 0, x_47); +lean_ctor_set(x_56, 1, x_55); +lean_inc(x_11); +x_57 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_57, 0, x_11); +lean_ctor_set(x_57, 1, x_56); +x_58 = l_Std_PersistentArray_push___rarg(x_45, x_57); +x_59 = lean_alloc_ctor(0, 1, 1); +lean_ctor_set(x_59, 0, x_58); +lean_ctor_set_uint8(x_59, sizeof(void*)*1, x_44); +lean_ctor_set(x_17, 3, x_59); +x_60 = lean_st_ref_set(x_9, x_17, x_19); +x_61 = lean_ctor_get(x_60, 1); +lean_inc(x_61); +if (lean_is_exclusive(x_60)) { + lean_ctor_release(x_60, 0); + lean_ctor_release(x_60, 1); + x_62 = x_60; +} else { + lean_dec_ref(x_60); + x_62 = lean_box(0); +} +x_63 = lean_box(0); +if (lean_is_scalar(x_62)) { + x_64 = lean_alloc_ctor(0, 2, 0); +} else { + x_64 = x_62; +} +lean_ctor_set(x_64, 0, x_63); +lean_ctor_set(x_64, 1, x_61); +return x_64; +} +} +else +{ +lean_object* x_65; lean_object* x_66; lean_object* x_67; uint8_t x_68; lean_object* x_69; lean_object* x_70; lean_object* x_71; lean_object* x_72; lean_object* x_73; lean_object* x_74; lean_object* x_75; lean_object* x_76; lean_object* x_77; lean_object* x_78; lean_object* x_79; lean_object* x_80; lean_object* x_81; lean_object* x_82; lean_object* x_83; lean_object* x_84; lean_object* x_85; lean_object* x_86; lean_object* x_87; lean_object* x_88; lean_object* x_89; lean_object* x_90; +x_65 = lean_ctor_get(x_17, 0); +x_66 = lean_ctor_get(x_17, 1); +x_67 = lean_ctor_get(x_17, 2); +lean_inc(x_67); +lean_inc(x_66); +lean_inc(x_65); +lean_dec(x_17); +x_68 = lean_ctor_get_uint8(x_18, sizeof(void*)*1); +x_69 = lean_ctor_get(x_18, 0); +lean_inc(x_69); +if (lean_is_exclusive(x_18)) { + lean_ctor_release(x_18, 0); + x_70 = x_18; +} else { + lean_dec_ref(x_18); + x_70 = lean_box(0); +} +x_71 = l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__2___closed__2; +x_72 = l_Lean_Name_append(x_1, x_71); +x_73 = lean_alloc_ctor(4, 1, 0); +lean_ctor_set(x_73, 0, x_1); +x_74 = l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__2___closed__4; +x_75 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_75, 0, x_74); +lean_ctor_set(x_75, 1, x_73); +x_76 = l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__2___closed__6; +x_77 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_77, 0, x_75); +lean_ctor_set(x_77, 1, x_76); +x_78 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_78, 0, x_77); +lean_ctor_set(x_78, 1, x_15); +x_79 = l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__2___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); +x_81 = lean_alloc_ctor(11, 2, 0); +lean_ctor_set(x_81, 0, x_72); +lean_ctor_set(x_81, 1, x_80); +lean_inc(x_11); +x_82 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_82, 0, x_11); +lean_ctor_set(x_82, 1, x_81); +x_83 = l_Std_PersistentArray_push___rarg(x_69, x_82); +if (lean_is_scalar(x_70)) { + x_84 = lean_alloc_ctor(0, 1, 1); +} else { + x_84 = x_70; +} +lean_ctor_set(x_84, 0, x_83); +lean_ctor_set_uint8(x_84, sizeof(void*)*1, x_68); +x_85 = lean_alloc_ctor(0, 4, 0); +lean_ctor_set(x_85, 0, x_65); +lean_ctor_set(x_85, 1, x_66); +lean_ctor_set(x_85, 2, x_67); +lean_ctor_set(x_85, 3, x_84); +x_86 = lean_st_ref_set(x_9, x_85, x_19); +x_87 = lean_ctor_get(x_86, 1); +lean_inc(x_87); +if (lean_is_exclusive(x_86)) { + lean_ctor_release(x_86, 0); + lean_ctor_release(x_86, 1); + x_88 = x_86; +} else { + lean_dec_ref(x_86); + x_88 = lean_box(0); +} +x_89 = lean_box(0); +if (lean_is_scalar(x_88)) { + x_90 = lean_alloc_ctor(0, 2, 0); +} else { + x_90 = x_88; +} +lean_ctor_set(x_90, 0, x_89); +lean_ctor_set(x_90, 1, x_87); +return x_90; +} +} +} +lean_object* l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at_Lean_Meta_Simp_simp_simpForall___spec__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; lean_object* x_13; +x_10 = lean_ctor_get(x_7, 0); +x_11 = l_Lean_checkTraceOption(x_10, x_1); +x_12 = lean_box(x_11); +x_13 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_13, 0, x_12); +lean_ctor_set(x_13, 1, x_9); +return x_13; +} +} +lean_object* l_Lean_Meta_Simp_simp_simpForall___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) { +_start: +{ +lean_object* x_11; uint8_t x_12; uint8_t x_13; lean_object* x_14; +x_11 = lean_ctor_get(x_2, 0); +lean_inc(x_11); +x_12 = 0; +x_13 = 1; +lean_inc(x_6); +lean_inc(x_1); +x_14 = l_Lean_Meta_mkForallFVars(x_1, x_11, x_12, x_13, x_6, x_7, x_8, x_9, x_10); +if (lean_obj_tag(x_14) == 0) +{ +lean_object* x_15; +x_15 = lean_ctor_get(x_2, 1); +lean_inc(x_15); +lean_dec(x_2); +if (lean_obj_tag(x_15) == 0) +{ +uint8_t x_16; +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_1); +x_16 = !lean_is_exclusive(x_14); +if (x_16 == 0) +{ +lean_object* x_17; lean_object* x_18; lean_object* x_19; +x_17 = lean_ctor_get(x_14, 0); +x_18 = lean_box(0); +x_19 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_19, 0, x_17); +lean_ctor_set(x_19, 1, x_18); +lean_ctor_set(x_14, 0, x_19); +return x_14; +} +else +{ +lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; +x_20 = lean_ctor_get(x_14, 0); +x_21 = lean_ctor_get(x_14, 1); +lean_inc(x_21); +lean_inc(x_20); +lean_dec(x_14); +x_22 = lean_box(0); +x_23 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_23, 0, x_20); +lean_ctor_set(x_23, 1, x_22); +x_24 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_24, 0, x_23); +lean_ctor_set(x_24, 1, x_21); +return x_24; +} +} +else +{ +lean_object* x_25; lean_object* x_26; uint8_t x_27; +x_25 = lean_ctor_get(x_14, 0); +lean_inc(x_25); +x_26 = lean_ctor_get(x_14, 1); +lean_inc(x_26); +lean_dec(x_14); +x_27 = !lean_is_exclusive(x_15); +if (x_27 == 0) +{ +lean_object* x_28; lean_object* x_29; +x_28 = lean_ctor_get(x_15, 0); +lean_inc(x_6); +x_29 = l_Lean_Meta_mkLambdaFVars(x_1, x_28, x_12, x_13, x_6, x_7, x_8, x_9, x_26); +if (lean_obj_tag(x_29) == 0) +{ +lean_object* x_30; lean_object* x_31; lean_object* x_32; +x_30 = lean_ctor_get(x_29, 0); +lean_inc(x_30); +x_31 = lean_ctor_get(x_29, 1); +lean_inc(x_31); +lean_dec(x_29); +x_32 = l_Lean_Meta_mkForallCongr(x_30, x_6, x_7, x_8, x_9, x_31); +if (lean_obj_tag(x_32) == 0) +{ +uint8_t x_33; +x_33 = !lean_is_exclusive(x_32); +if (x_33 == 0) +{ +lean_object* x_34; lean_object* x_35; +x_34 = lean_ctor_get(x_32, 0); +lean_ctor_set(x_15, 0, x_34); +x_35 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_35, 0, x_25); +lean_ctor_set(x_35, 1, x_15); +lean_ctor_set(x_32, 0, x_35); +return x_32; +} +else +{ +lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; +x_36 = lean_ctor_get(x_32, 0); +x_37 = lean_ctor_get(x_32, 1); +lean_inc(x_37); +lean_inc(x_36); +lean_dec(x_32); +lean_ctor_set(x_15, 0, x_36); +x_38 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_38, 0, x_25); +lean_ctor_set(x_38, 1, x_15); +x_39 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_39, 0, x_38); +lean_ctor_set(x_39, 1, x_37); +return x_39; +} +} +else +{ +uint8_t x_40; +lean_free_object(x_15); +lean_dec(x_25); +x_40 = !lean_is_exclusive(x_32); +if (x_40 == 0) +{ +return x_32; +} +else +{ +lean_object* x_41; lean_object* x_42; lean_object* x_43; +x_41 = lean_ctor_get(x_32, 0); +x_42 = lean_ctor_get(x_32, 1); +lean_inc(x_42); +lean_inc(x_41); +lean_dec(x_32); +x_43 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_43, 0, x_41); +lean_ctor_set(x_43, 1, x_42); +return x_43; +} +} +} +else +{ +uint8_t x_44; +lean_free_object(x_15); +lean_dec(x_25); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +x_44 = !lean_is_exclusive(x_29); +if (x_44 == 0) +{ +return x_29; +} +else +{ +lean_object* x_45; lean_object* x_46; lean_object* x_47; +x_45 = lean_ctor_get(x_29, 0); +x_46 = lean_ctor_get(x_29, 1); +lean_inc(x_46); +lean_inc(x_45); +lean_dec(x_29); +x_47 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_47, 0, x_45); +lean_ctor_set(x_47, 1, x_46); +return x_47; +} +} +} +else +{ +lean_object* x_48; lean_object* x_49; +x_48 = lean_ctor_get(x_15, 0); +lean_inc(x_48); +lean_dec(x_15); +lean_inc(x_6); +x_49 = l_Lean_Meta_mkLambdaFVars(x_1, x_48, x_12, x_13, x_6, x_7, x_8, x_9, x_26); +if (lean_obj_tag(x_49) == 0) +{ +lean_object* x_50; lean_object* x_51; lean_object* x_52; +x_50 = lean_ctor_get(x_49, 0); +lean_inc(x_50); +x_51 = lean_ctor_get(x_49, 1); +lean_inc(x_51); +lean_dec(x_49); +x_52 = l_Lean_Meta_mkForallCongr(x_50, x_6, x_7, x_8, x_9, x_51); +if (lean_obj_tag(x_52) == 0) +{ +lean_object* x_53; lean_object* x_54; lean_object* x_55; lean_object* x_56; lean_object* x_57; lean_object* x_58; +x_53 = lean_ctor_get(x_52, 0); +lean_inc(x_53); +x_54 = lean_ctor_get(x_52, 1); +lean_inc(x_54); +if (lean_is_exclusive(x_52)) { + lean_ctor_release(x_52, 0); + lean_ctor_release(x_52, 1); + x_55 = x_52; +} else { + lean_dec_ref(x_52); + x_55 = lean_box(0); +} +x_56 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_56, 0, x_53); +x_57 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_57, 0, x_25); +lean_ctor_set(x_57, 1, x_56); +if (lean_is_scalar(x_55)) { + x_58 = lean_alloc_ctor(0, 2, 0); +} else { + x_58 = x_55; +} +lean_ctor_set(x_58, 0, x_57); +lean_ctor_set(x_58, 1, x_54); +return x_58; +} +else +{ +lean_object* x_59; lean_object* x_60; lean_object* x_61; lean_object* x_62; +lean_dec(x_25); +x_59 = lean_ctor_get(x_52, 0); +lean_inc(x_59); +x_60 = lean_ctor_get(x_52, 1); +lean_inc(x_60); +if (lean_is_exclusive(x_52)) { + lean_ctor_release(x_52, 0); + lean_ctor_release(x_52, 1); + x_61 = x_52; +} else { + lean_dec_ref(x_52); + x_61 = lean_box(0); +} +if (lean_is_scalar(x_61)) { + x_62 = lean_alloc_ctor(1, 2, 0); +} else { + x_62 = x_61; +} +lean_ctor_set(x_62, 0, x_59); +lean_ctor_set(x_62, 1, x_60); +return x_62; +} +} +else +{ +lean_object* x_63; lean_object* x_64; lean_object* x_65; lean_object* x_66; +lean_dec(x_25); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +x_63 = lean_ctor_get(x_49, 0); +lean_inc(x_63); +x_64 = lean_ctor_get(x_49, 1); +lean_inc(x_64); +if (lean_is_exclusive(x_49)) { + lean_ctor_release(x_49, 0); + lean_ctor_release(x_49, 1); + x_65 = x_49; +} else { + lean_dec_ref(x_49); + x_65 = lean_box(0); +} +if (lean_is_scalar(x_65)) { + x_66 = lean_alloc_ctor(1, 2, 0); +} else { + x_66 = x_65; +} +lean_ctor_set(x_66, 0, x_63); +lean_ctor_set(x_66, 1, x_64); +return x_66; +} +} +} +} +else +{ +uint8_t x_67; +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_2); +lean_dec(x_1); +x_67 = !lean_is_exclusive(x_14); +if (x_67 == 0) +{ +return x_14; +} +else +{ +lean_object* x_68; lean_object* x_69; lean_object* x_70; +x_68 = lean_ctor_get(x_14, 0); +x_69 = lean_ctor_get(x_14, 1); +lean_inc(x_69); +lean_inc(x_68); +lean_dec(x_14); +x_70 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_70, 0, x_68); +lean_ctor_set(x_70, 1, x_69); +return x_70; +} +} +} +} +lean_object* l_Lean_Meta_Simp_simp_simpForall___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; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; +x_11 = l_Lean_Meta_Simp_simp_simpLet___lambda__1___closed__1; +lean_inc(x_2); +x_12 = lean_array_push(x_11, x_2); +x_13 = l_Lean_Expr_bindingBody_x21(x_1); +x_14 = lean_expr_instantiate1(x_13, x_2); +lean_dec(x_2); +lean_dec(x_13); +x_15 = lean_alloc_closure((void*)(l_Lean_Meta_Simp_simp), 9, 1); +lean_closure_set(x_15, 0, x_14); +lean_inc(x_12); +x_16 = lean_alloc_closure((void*)(l_Lean_Meta_Simp_simp_simpForall___lambda__1___boxed), 10, 1); +lean_closure_set(x_16, 0, x_12); +x_17 = lean_alloc_closure((void*)(l_ReaderT_bind___at_Lean_Meta_Simp_simp_simpForall___spec__1___rarg), 10, 2); +lean_closure_set(x_17, 0, x_15); +lean_closure_set(x_17, 1, x_16); +x_18 = l_Lean_Meta_Simp_simp_withNewLemmas___rarg(x_12, x_17, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10); +lean_dec(x_12); +return x_18; +} +} +lean_object* l_Lean_Meta_Simp_simp_simpForall___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_object* x_10) { +_start: +{ +uint8_t x_11; +lean_dec(x_2); +x_11 = l_Lean_Expr_isArrow(x_1); +if (x_11 == 0) +{ +lean_object* x_12; +lean_inc(x_9); +lean_inc(x_8); +lean_inc(x_7); +lean_inc(x_6); +lean_inc(x_1); +x_12 = l_Lean_Meta_isProp(x_1, x_6, x_7, x_8, x_9, x_10); +if (lean_obj_tag(x_12) == 0) +{ +lean_object* x_13; uint8_t x_14; +x_13 = lean_ctor_get(x_12, 0); +lean_inc(x_13); +x_14 = lean_unbox(x_13); +lean_dec(x_13); +if (x_14 == 0) +{ +lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; +x_15 = lean_ctor_get(x_12, 1); +lean_inc(x_15); +lean_dec(x_12); +x_16 = l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___closed__1; +x_17 = l___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___closed__2; +x_18 = l_Lean_Meta_transform___at___private_Lean_Meta_Tactic_Simp_Main_0__Lean_Meta_Simp_dsimp___spec__1(x_1, x_16, x_17, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_15); +if (lean_obj_tag(x_18) == 0) +{ +uint8_t x_19; +x_19 = !lean_is_exclusive(x_18); +if (x_19 == 0) +{ +lean_object* x_20; lean_object* x_21; lean_object* x_22; +x_20 = lean_ctor_get(x_18, 0); +x_21 = lean_box(0); +x_22 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_22, 0, x_20); +lean_ctor_set(x_22, 1, x_21); +lean_ctor_set(x_18, 0, x_22); +return x_18; +} +else +{ +lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; +x_23 = lean_ctor_get(x_18, 0); +x_24 = lean_ctor_get(x_18, 1); +lean_inc(x_24); +lean_inc(x_23); +lean_dec(x_18); +x_25 = lean_box(0); +x_26 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_26, 0, x_23); +lean_ctor_set(x_26, 1, x_25); +x_27 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_27, 0, x_26); +lean_ctor_set(x_27, 1, x_24); +return x_27; +} +} +else +{ +uint8_t x_28; +x_28 = !lean_is_exclusive(x_18); +if (x_28 == 0) +{ +return x_18; +} +else +{ +lean_object* x_29; lean_object* x_30; lean_object* x_31; +x_29 = lean_ctor_get(x_18, 0); +x_30 = lean_ctor_get(x_18, 1); +lean_inc(x_30); +lean_inc(x_29); +lean_dec(x_18); +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 +{ +lean_object* x_32; lean_object* x_33; uint8_t x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; +x_32 = lean_ctor_get(x_12, 1); +lean_inc(x_32); +lean_dec(x_12); +x_33 = l_Lean_Expr_bindingName_x21(x_1); +x_34 = l_Lean_Expr_bindingInfo_x21(x_1); +x_35 = l_Lean_Expr_bindingDomain_x21(x_1); +x_36 = lean_alloc_closure((void*)(l_Lean_Meta_Simp_simp_simpForall___lambda__2___boxed), 10, 1); +lean_closure_set(x_36, 0, x_1); +x_37 = l_Lean_Meta_withLocalDecl___at_Lean_Meta_Simp_simp_simpLet___spec__1___rarg(x_33, x_34, x_35, x_36, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_32); +return x_37; +} +} +else +{ +uint8_t x_38; +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_38 = !lean_is_exclusive(x_12); +if (x_38 == 0) +{ +return x_12; +} +else +{ +lean_object* x_39; lean_object* x_40; lean_object* x_41; +x_39 = lean_ctor_get(x_12, 0); +x_40 = lean_ctor_get(x_12, 1); +lean_inc(x_40); +lean_inc(x_39); +lean_dec(x_12); +x_41 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_41, 0, x_39); +lean_ctor_set(x_41, 1, x_40); +return x_41; +} +} +} +else +{ +lean_object* x_42; +x_42 = l_Lean_Meta_Simp_simp_simpArrow(x_1, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10); +return x_42; +} +} +} +static lean_object* _init_l_Lean_Meta_Simp_simp_simpForall___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("Debug"); +return x_1; +} +} +static lean_object* _init_l_Lean_Meta_Simp_simp_simpForall___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l_Lean_Meta_Simp_simp_simpForall___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +static lean_object* _init_l_Lean_Meta_Simp_simp_simpForall___closed__3() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("Meta"); +return x_1; +} +} +static lean_object* _init_l_Lean_Meta_Simp_simp_simpForall___closed__4() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Meta_Simp_simp_simpForall___closed__2; +x_2 = l_Lean_Meta_Simp_simp_simpForall___closed__3; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +static lean_object* _init_l_Lean_Meta_Simp_simp_simpForall___closed__5() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("Tactic"); +return x_1; +} +} +static lean_object* _init_l_Lean_Meta_Simp_simp_simpForall___closed__6() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Meta_Simp_simp_simpForall___closed__4; +x_2 = l_Lean_Meta_Simp_simp_simpForall___closed__5; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +static lean_object* _init_l_Lean_Meta_Simp_simp_simpForall___closed__7() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("simp"); +return x_1; +} +} +static lean_object* _init_l_Lean_Meta_Simp_simp_simpForall___closed__8() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Meta_Simp_simp_simpForall___closed__6; +x_2 = l_Lean_Meta_Simp_simp_simpForall___closed__7; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +static lean_object* _init_l_Lean_Meta_Simp_simp_simpForall___closed__9() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("forall "); +return x_1; +} +} +static lean_object* _init_l_Lean_Meta_Simp_simp_simpForall___closed__10() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Meta_Simp_simp_simpForall___closed__9; +x_2 = l_Lean_stringToMessageData(x_1); +return x_2; +} +} +lean_object* l_Lean_Meta_Simp_simp_simpForall(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9) { +_start: +{ +lean_object* x_10; uint8_t x_11; +x_10 = l_Lean_Meta_Simp_simp_simpForall___closed__8; +x_11 = !lean_is_exclusive(x_3); +if (x_11 == 0) +{ +lean_object* x_12; lean_object* x_13; uint8_t x_14; lean_object* x_15; lean_object* x_28; lean_object* x_29; lean_object* x_30; uint8_t x_31; +x_12 = lean_ctor_get(x_3, 3); +lean_dec(x_12); +lean_inc(x_1); +x_13 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_13, 0, x_1); +lean_ctor_set(x_3, 3, x_13); +x_28 = lean_st_ref_get(x_8, x_9); +x_29 = lean_ctor_get(x_28, 0); +lean_inc(x_29); +x_30 = lean_ctor_get(x_29, 3); +lean_inc(x_30); +lean_dec(x_29); +x_31 = lean_ctor_get_uint8(x_30, sizeof(void*)*1); +lean_dec(x_30); +if (x_31 == 0) +{ +lean_object* x_32; uint8_t x_33; +x_32 = lean_ctor_get(x_28, 1); +lean_inc(x_32); +lean_dec(x_28); +x_33 = 0; +x_14 = x_33; +x_15 = x_32; +goto block_27; +} +else +{ +lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; uint8_t x_38; +x_34 = lean_ctor_get(x_28, 1); +lean_inc(x_34); +lean_dec(x_28); +x_35 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at_Lean_Meta_Simp_simp_simpForall___spec__3(x_10, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_34); +x_36 = lean_ctor_get(x_35, 0); +lean_inc(x_36); +x_37 = lean_ctor_get(x_35, 1); +lean_inc(x_37); +lean_dec(x_35); +x_38 = lean_unbox(x_36); +lean_dec(x_36); +x_14 = x_38; +x_15 = x_37; +goto block_27; +} +block_27: +{ +if (x_14 == 0) +{ +lean_object* x_16; lean_object* x_17; +x_16 = lean_box(0); +x_17 = l_Lean_Meta_Simp_simp_simpForall___lambda__3(x_1, x_16, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_15); +return x_17; +} +else +{ +lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; +lean_inc(x_1); +x_18 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_18, 0, x_1); +x_19 = l_Lean_Meta_Simp_simp_simpForall___closed__10; +x_20 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_20, 0, x_19); +lean_ctor_set(x_20, 1, x_18); +x_21 = l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__2___closed__8; +x_22 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_22, 0, x_20); +lean_ctor_set(x_22, 1, x_21); +x_23 = l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__2(x_10, x_22, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_15); +x_24 = lean_ctor_get(x_23, 0); +lean_inc(x_24); +x_25 = lean_ctor_get(x_23, 1); +lean_inc(x_25); +lean_dec(x_23); +x_26 = l_Lean_Meta_Simp_simp_simpForall___lambda__3(x_1, x_24, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_25); +return x_26; +} +} +} +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; uint8_t x_45; lean_object* x_46; lean_object* x_59; lean_object* x_60; lean_object* x_61; uint8_t x_62; +x_39 = lean_ctor_get(x_3, 0); +x_40 = lean_ctor_get(x_3, 1); +x_41 = lean_ctor_get(x_3, 2); +x_42 = lean_ctor_get(x_3, 4); +lean_inc(x_42); +lean_inc(x_41); +lean_inc(x_40); +lean_inc(x_39); +lean_dec(x_3); +lean_inc(x_1); +x_43 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_43, 0, x_1); +x_44 = lean_alloc_ctor(0, 5, 0); +lean_ctor_set(x_44, 0, x_39); +lean_ctor_set(x_44, 1, x_40); +lean_ctor_set(x_44, 2, x_41); +lean_ctor_set(x_44, 3, x_43); +lean_ctor_set(x_44, 4, x_42); +x_59 = lean_st_ref_get(x_8, x_9); +x_60 = lean_ctor_get(x_59, 0); +lean_inc(x_60); +x_61 = lean_ctor_get(x_60, 3); +lean_inc(x_61); +lean_dec(x_60); +x_62 = lean_ctor_get_uint8(x_61, sizeof(void*)*1); +lean_dec(x_61); +if (x_62 == 0) +{ +lean_object* x_63; uint8_t x_64; +x_63 = lean_ctor_get(x_59, 1); +lean_inc(x_63); +lean_dec(x_59); +x_64 = 0; +x_45 = x_64; +x_46 = x_63; +goto block_58; +} +else +{ +lean_object* x_65; lean_object* x_66; lean_object* x_67; lean_object* x_68; uint8_t x_69; +x_65 = lean_ctor_get(x_59, 1); +lean_inc(x_65); +lean_dec(x_59); +x_66 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at_Lean_Meta_Simp_simp_simpForall___spec__3(x_10, x_2, x_44, x_4, x_5, x_6, x_7, x_8, x_65); +x_67 = lean_ctor_get(x_66, 0); +lean_inc(x_67); +x_68 = lean_ctor_get(x_66, 1); +lean_inc(x_68); +lean_dec(x_66); +x_69 = lean_unbox(x_67); +lean_dec(x_67); +x_45 = x_69; +x_46 = x_68; +goto block_58; +} +block_58: +{ +if (x_45 == 0) +{ +lean_object* x_47; lean_object* x_48; +x_47 = lean_box(0); +x_48 = l_Lean_Meta_Simp_simp_simpForall___lambda__3(x_1, x_47, x_2, x_44, x_4, x_5, x_6, x_7, x_8, x_46); +return x_48; +} +else +{ +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_inc(x_1); +x_49 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_49, 0, x_1); +x_50 = l_Lean_Meta_Simp_simp_simpForall___closed__10; +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_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__2___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_simp_simpForall___spec__2(x_10, x_53, x_2, x_44, x_4, x_5, x_6, x_7, x_8, x_46); +x_55 = lean_ctor_get(x_54, 0); +lean_inc(x_55); +x_56 = lean_ctor_get(x_54, 1); +lean_inc(x_56); +lean_dec(x_54); +x_57 = l_Lean_Meta_Simp_simp_simpForall___lambda__3(x_1, x_55, x_2, x_44, x_4, x_5, x_6, x_7, x_8, x_56); +return x_57; +} +} +} +} +} lean_object* l_Lean_Meta_Simp_simp_simpArrow___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, lean_object* x_12) { _start: { @@ -12984,7 +15034,7 @@ if (x_94 == 0) { lean_object* x_95; lean_object* x_96; lean_object* x_97; lean_object* x_98; x_95 = lean_ctor_get(x_86, 0); -x_96 = l_Lean_Meta_Simp_simp_simpForall___lambda__2___closed__1; +x_96 = l_Lean_Meta_Simp_simp_simpLet___lambda__1___closed__1; x_97 = lean_array_push(x_96, x_4); lean_inc(x_8); x_98 = l_Lean_Meta_mkLambdaFVars(x_97, x_95, x_18, x_19, x_8, x_9, x_10, x_11, x_93); @@ -13096,7 +15146,7 @@ lean_object* x_118; lean_object* x_119; lean_object* x_120; lean_object* x_121; x_118 = lean_ctor_get(x_86, 0); lean_inc(x_118); lean_dec(x_86); -x_119 = l_Lean_Meta_Simp_simp_simpForall___lambda__2___closed__1; +x_119 = l_Lean_Meta_Simp_simp_simpLet___lambda__1___closed__1; x_120 = lean_array_push(x_119, x_4); lean_inc(x_8); x_121 = l_Lean_Meta_mkLambdaFVars(x_120, x_118, x_18, x_19, x_8, x_9, x_10, x_11, x_93); @@ -13302,7 +15352,7 @@ if (lean_is_exclusive(x_151)) { lean_dec_ref(x_151); x_160 = lean_box(0); } -x_161 = l_Lean_Meta_Simp_simp_simpForall___lambda__2___closed__1; +x_161 = l_Lean_Meta_Simp_simp_simpLet___lambda__1___closed__1; x_162 = lean_array_push(x_161, x_4); lean_inc(x_8); x_163 = l_Lean_Meta_mkLambdaFVars(x_162, x_159, x_18, x_19, x_8, x_9, x_10, x_11, x_158); @@ -13540,7 +15590,7 @@ if (lean_is_exclusive(x_199)) { lean_dec_ref(x_199); x_208 = lean_box(0); } -x_209 = l_Lean_Meta_Simp_simp_simpForall___lambda__2___closed__1; +x_209 = l_Lean_Meta_Simp_simp_simpLet___lambda__1___closed__1; x_210 = lean_array_push(x_209, x_4); lean_inc(x_8); x_211 = l_Lean_Meta_mkLambdaFVars(x_210, x_207, x_18, x_19, x_8, x_9, x_10, x_11, x_206); @@ -13874,7 +15924,7 @@ lean_closure_set(x_15, 0, x_3); lean_closure_set(x_15, 1, x_2); lean_closure_set(x_15, 2, x_14); x_16 = 0; -x_17 = l_Lean_Meta_withLocalDecl___at_Lean_Meta_Simp_simp_simpForall___spec__2___rarg(x_13, x_16, x_14, x_15, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_12); +x_17 = l_Lean_Meta_withLocalDecl___at_Lean_Meta_Simp_simp_simpLet___spec__1___rarg(x_13, x_16, x_14, x_15, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_12); return x_17; } } @@ -14134,7 +16184,7 @@ x_54 = lean_ctor_get(x_48, 1); lean_inc(x_54); lean_dec(x_48); lean_inc(x_4); -x_55 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at_Lean_Meta_Simp_simp_simpForall___spec__4(x_4, x_7, x_8, x_9, x_10, x_11, x_12, x_13, x_54); +x_55 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at_Lean_Meta_Simp_simp_simpForall___spec__3(x_4, x_7, x_8, x_9, x_10, x_11, x_12, x_13, x_54); x_56 = lean_ctor_get(x_55, 0); lean_inc(x_56); x_57 = lean_ctor_get(x_55, 1); @@ -14177,11 +16227,11 @@ lean_ctor_set(x_39, 0, x_1); x_40 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_40, 0, x_38); lean_ctor_set(x_40, 1, x_39); -x_41 = l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__3___closed__8; +x_41 = l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__2___closed__8; x_42 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_42, 0, x_40); lean_ctor_set(x_42, 1, x_41); -x_43 = l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__3(x_4, x_42, x_7, x_8, x_9, x_10, x_11, x_12, x_13, x_30); +x_43 = l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__2(x_4, x_42, x_7, x_8, x_9, x_10, x_11, x_12, x_13, x_30); x_44 = lean_ctor_get(x_43, 0); lean_inc(x_44); x_45 = lean_ctor_get(x_43, 1); @@ -14369,7 +16419,7 @@ x_90 = lean_ctor_get(x_84, 1); lean_inc(x_90); lean_dec(x_84); lean_inc(x_2); -x_91 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at_Lean_Meta_Simp_simp_simpForall___spec__4(x_2, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_90); +x_91 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at_Lean_Meta_Simp_simp_simpForall___spec__3(x_2, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_90); x_92 = lean_ctor_get(x_91, 0); lean_inc(x_92); x_93 = lean_ctor_get(x_91, 1); @@ -14460,7 +16510,7 @@ x_36 = l_Lean_Meta_Simp_simp_simpArrow___lambda__4___closed__2; x_37 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_37, 0, x_36); lean_ctor_set(x_37, 1, x_35); -x_38 = l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__3___closed__6; +x_38 = l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__2___closed__6; x_39 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_39, 0, x_37); lean_ctor_set(x_39, 1, x_38); @@ -14521,7 +16571,7 @@ x_55 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_55, 0, x_53); lean_ctor_set(x_55, 1, x_54); lean_inc(x_2); -x_56 = l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__3(x_2, x_55, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_29); +x_56 = l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__2(x_2, x_55, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_29); x_57 = lean_ctor_get(x_56, 0); lean_inc(x_57); x_58 = lean_ctor_get(x_56, 1); @@ -14542,7 +16592,7 @@ x_63 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_63, 0, x_61); lean_ctor_set(x_63, 1, x_62); lean_inc(x_2); -x_64 = l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__3(x_2, x_63, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_29); +x_64 = l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__2(x_2, x_63, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_29); x_65 = lean_ctor_get(x_64, 0); lean_inc(x_65); x_66 = lean_ctor_get(x_64, 1); @@ -14711,7 +16761,7 @@ lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; uint x_31 = lean_ctor_get(x_25, 1); lean_inc(x_31); lean_dec(x_25); -x_32 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at_Lean_Meta_Simp_simp_simpForall___spec__4(x_10, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_31); +x_32 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at_Lean_Meta_Simp_simp_simpForall___spec__3(x_10, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_31); x_33 = lean_ctor_get(x_32, 0); lean_inc(x_33); x_34 = lean_ctor_get(x_32, 1); @@ -14742,11 +16792,11 @@ x_16 = l_Lean_Meta_Simp_simp_simpArrow___closed__2; x_17 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_17, 0, x_16); lean_ctor_set(x_17, 1, x_15); -x_18 = l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__3___closed__8; +x_18 = l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__2___closed__8; x_19 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_19, 0, x_17); lean_ctor_set(x_19, 1, x_18); -x_20 = l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__3(x_10, x_19, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_12); +x_20 = l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__2(x_10, x_19, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_12); x_21 = lean_ctor_get(x_20, 0); lean_inc(x_21); x_22 = lean_ctor_get(x_20, 1); @@ -14769,7 +16819,7 @@ size_t x_14; size_t x_15; lean_object* x_16; lean_object* x_17; lean_object* x_1 x_14 = 1; x_15 = x_2 - x_14; x_16 = lean_array_uget(x_1, x_15); -x_17 = l_Lean_Meta_Simp_simp_simpForall___lambda__2___closed__1; +x_17 = l_Lean_Meta_Simp_simp_simpLet___lambda__1___closed__1; x_18 = lean_array_push(x_17, x_16); x_19 = 0; x_20 = 1; @@ -16422,7 +18472,7 @@ lean_object* x_95; lean_object* x_96; lean_object* x_97; lean_object* x_98; uint x_95 = lean_ctor_get(x_89, 1); lean_inc(x_95); lean_dec(x_89); -x_96 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at_Lean_Meta_Simp_simp_simpForall___spec__4(x_28, x_6, x_7, x_8, x_9, x_10, x_11, x_12, x_95); +x_96 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at_Lean_Meta_Simp_simp_simpForall___spec__3(x_28, x_6, x_7, x_8, x_9, x_10, x_11, x_12, x_95); x_97 = lean_ctor_get(x_96, 0); lean_inc(x_97); x_98 = lean_ctor_get(x_96, 1); @@ -16537,7 +18587,7 @@ x_42 = l_Array_forInUnsafe_loop___at_Lean_Meta_Simp_simp_congrDefault___spec__1_ 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_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__3___closed__6; +x_44 = l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__2___closed__6; x_45 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_45, 0, x_43); lean_ctor_set(x_45, 1, x_44); @@ -16575,11 +18625,11 @@ x_60 = l_Lean_Meta_Simp_simp_simpArrow___lambda__4___closed__11; x_61 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_61, 0, x_56); lean_ctor_set(x_61, 1, x_60); -x_62 = l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__3___closed__8; +x_62 = l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__2___closed__8; x_63 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_63, 0, x_61); lean_ctor_set(x_63, 1, x_62); -x_64 = l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__3(x_28, x_63, x_6, x_7, x_8, x_9, x_10, x_11, x_12, x_30); +x_64 = l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__2(x_28, x_63, x_6, x_7, x_8, x_9, x_10, x_11, x_12, x_30); x_65 = lean_ctor_get(x_64, 0); lean_inc(x_65); x_66 = lean_ctor_get(x_64, 1); @@ -16643,11 +18693,11 @@ x_74 = l_Lean_Meta_Simp_simp_simpArrow___lambda__4___closed__14; x_75 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_75, 0, x_56); lean_ctor_set(x_75, 1, x_74); -x_76 = l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__3___closed__8; +x_76 = l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__2___closed__8; x_77 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_77, 0, x_75); lean_ctor_set(x_77, 1, x_76); -x_78 = l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__3(x_28, x_77, x_6, x_7, x_8, x_9, x_10, x_11, x_12, x_30); +x_78 = l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__2(x_28, x_77, x_6, x_7, x_8, x_9, x_10, x_11, x_12, x_30); x_79 = lean_ctor_get(x_78, 0); lean_inc(x_79); x_80 = lean_ctor_get(x_78, 1); @@ -17169,7 +19219,7 @@ lean_object* x_89; lean_object* x_90; lean_object* x_91; lean_object* x_92; uint x_89 = lean_ctor_get(x_83, 1); lean_inc(x_89); lean_dec(x_83); -x_90 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at_Lean_Meta_Simp_simp_simpForall___spec__4(x_51, x_8, x_9, x_10, x_11, x_12, x_13, x_14, x_89); +x_90 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at_Lean_Meta_Simp_simp_simpForall___spec__3(x_51, x_8, x_9, x_10, x_11, x_12, x_13, x_14, x_89); x_91 = lean_ctor_get(x_90, 0); lean_inc(x_91); x_92 = lean_ctor_get(x_90, 1); @@ -17232,11 +19282,11 @@ lean_ctor_set(x_67, 0, x_60); x_68 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_68, 0, x_66); lean_ctor_set(x_68, 1, x_67); -x_69 = l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__3___closed__8; +x_69 = l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__2___closed__8; x_70 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_70, 0, x_68); lean_ctor_set(x_70, 1, x_69); -x_71 = l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__3(x_51, x_70, x_8, x_9, x_10, x_11, x_12, x_13, x_14, x_61); +x_71 = l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__2(x_51, x_70, x_8, x_9, x_10, x_11, x_12, x_13, x_14, x_61); x_72 = lean_ctor_get(x_71, 0); lean_inc(x_72); x_73 = lean_ctor_get(x_71, 1); @@ -17524,7 +19574,7 @@ return x_14; else { lean_object* x_15; -x_15 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at_Lean_Meta_Simp_simp_simpForall___spec__4(x_1, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10); +x_15 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at_Lean_Meta_Simp_simp_simpForall___spec__3(x_1, 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); @@ -17729,7 +19779,7 @@ lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; uint x_43 = lean_ctor_get(x_37, 1); lean_inc(x_43); lean_dec(x_37); -x_44 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at_Lean_Meta_Simp_simp_simpForall___spec__4(x_22, x_8, x_9, x_10, x_11, x_12, x_13, x_14, x_43); +x_44 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at_Lean_Meta_Simp_simp_simpForall___spec__3(x_22, x_8, x_9, x_10, x_11, x_12, x_13, x_14, x_43); x_45 = lean_ctor_get(x_44, 0); lean_inc(x_45); x_46 = lean_ctor_get(x_44, 1); @@ -17769,7 +19819,7 @@ lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean lean_dec(x_21); x_26 = lean_alloc_ctor(4, 1, 0); lean_ctor_set(x_26, 0, x_1); -x_27 = l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__3___closed__8; +x_27 = l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__2___closed__8; x_28 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_28, 0, x_27); lean_ctor_set(x_28, 1, x_26); @@ -17777,7 +19827,7 @@ x_29 = l_Lean_Meta_Simp_simp_tryCongrLemma_x3f___lambda__4___closed__2; x_30 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_30, 0, x_28); lean_ctor_set(x_30, 1, x_29); -x_31 = l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__3(x_22, x_30, x_8, x_9, x_10, x_11, x_12, x_13, x_14, x_24); +x_31 = l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__2(x_22, x_30, x_8, x_9, x_10, x_11, x_12, x_13, x_14, x_24); lean_dec(x_14); lean_dec(x_13); lean_dec(x_12); @@ -17914,7 +19964,7 @@ lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; uint x_38 = lean_ctor_get(x_32, 1); lean_inc(x_38); lean_dec(x_32); -x_39 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at_Lean_Meta_Simp_simp_simpForall___spec__4(x_17, x_9, x_10, x_11, x_12, x_13, x_14, x_15, x_38); +x_39 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at_Lean_Meta_Simp_simp_simpForall___spec__3(x_17, x_9, x_10, x_11, x_12, x_13, x_14, x_15, x_38); x_40 = lean_ctor_get(x_39, 0); lean_inc(x_40); x_41 = lean_ctor_get(x_39, 1); @@ -17949,7 +19999,7 @@ else lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; uint8_t x_27; x_21 = lean_alloc_ctor(4, 1, 0); lean_ctor_set(x_21, 0, x_3); -x_22 = l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__3___closed__8; +x_22 = l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__2___closed__8; x_23 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_23, 0, x_22); lean_ctor_set(x_23, 1, x_21); @@ -17957,7 +20007,7 @@ x_24 = l_Lean_Meta_Simp_simp_tryCongrLemma_x3f___lambda__5___closed__2; x_25 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_25, 0, x_23); lean_ctor_set(x_25, 1, x_24); -x_26 = l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__3(x_17, x_25, x_9, x_10, x_11, x_12, x_13, x_14, x_15, x_19); +x_26 = l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__2(x_17, x_25, x_9, x_10, x_11, x_12, x_13, x_14, x_15, x_19); lean_dec(x_15); lean_dec(x_14); lean_dec(x_13); @@ -18569,7 +20619,7 @@ x_15 = lean_ctor_get(x_1, 0); lean_inc(x_15); x_16 = lean_alloc_ctor(4, 1, 0); lean_ctor_set(x_16, 0, x_15); -x_17 = l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__3___closed__8; +x_17 = l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__2___closed__8; x_18 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_18, 0, x_17); lean_ctor_set(x_18, 1, x_16); @@ -18586,7 +20636,7 @@ lean_ctor_set(x_22, 1, x_21); x_23 = lean_alloc_ctor(10, 2, 0); lean_ctor_set(x_23, 0, x_22); lean_ctor_set(x_23, 1, x_17); -x_24 = l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__3(x_3, x_23, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_12); +x_24 = l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__2(x_3, x_23, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_12); x_25 = lean_ctor_get(x_24, 0); lean_inc(x_25); x_26 = lean_ctor_get(x_24, 1); @@ -19271,21 +21321,46 @@ lean_dec(x_2); return x_10; } } -lean_object* l_Lean_Meta_withLocalDecl___at_Lean_Meta_Simp_simp_simpForall___spec__2___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11, lean_object* x_12) { +lean_object* l_Lean_Meta_withLocalDecl___at_Lean_Meta_Simp_simp_simpLet___spec__1___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11, lean_object* x_12) { _start: { uint8_t x_13; lean_object* x_14; x_13 = lean_unbox(x_2); lean_dec(x_2); -x_14 = l_Lean_Meta_withLocalDecl___at_Lean_Meta_Simp_simp_simpForall___spec__2___rarg(x_1, x_13, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_12); +x_14 = l_Lean_Meta_withLocalDecl___at_Lean_Meta_Simp_simp_simpLet___spec__1___rarg(x_1, x_13, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11, x_12); return x_14; } } -lean_object* l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___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* l_Std_AssocList_find_x3f___at_Lean_Meta_Simp_simp___spec__2___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = l_Std_AssocList_find_x3f___at_Lean_Meta_Simp_simp___spec__2(x_1, x_2); +lean_dec(x_2); +lean_dec(x_1); +return x_3; +} +} +lean_object* l_Lean_throwError___at_Lean_Meta_Simp_simp___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) { +_start: +{ +lean_object* x_10; +x_10 = l_Lean_throwError___at_Lean_Meta_Simp_simp___spec__3(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +return x_10; +} +} +lean_object* l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__2___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10) { _start: { lean_object* x_11; -x_11 = l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__3(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10); +x_11 = l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__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); @@ -19296,11 +21371,11 @@ lean_dec(x_3); return x_11; } } -lean_object* l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at_Lean_Meta_Simp_simp_simpForall___spec__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* l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at_Lean_Meta_Simp_simp_simpForall___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) { _start: { lean_object* x_10; -x_10 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at_Lean_Meta_Simp_simp_simpForall___spec__4(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9); +x_10 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at_Lean_Meta_Simp_simp_simpForall___spec__3(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9); lean_dec(x_8); lean_dec(x_7); lean_dec(x_6); @@ -19331,31 +21406,6 @@ lean_dec(x_1); return x_11; } } -lean_object* l_Std_AssocList_find_x3f___at_Lean_Meta_Simp_simp___spec__2___boxed(lean_object* x_1, lean_object* x_2) { -_start: -{ -lean_object* x_3; -x_3 = l_Std_AssocList_find_x3f___at_Lean_Meta_Simp_simp___spec__2(x_1, x_2); -lean_dec(x_2); -lean_dec(x_1); -return x_3; -} -} -lean_object* l_Lean_throwError___at_Lean_Meta_Simp_simp___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) { -_start: -{ -lean_object* x_10; -x_10 = l_Lean_throwError___at_Lean_Meta_Simp_simp___spec__3(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9); -lean_dec(x_8); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -return x_10; -} -} lean_object* l_Array_foldrMUnsafe_fold___at_Lean_Meta_Simp_simp_simpLambda___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) { _start: { @@ -24998,22 +27048,6 @@ l_Lean_Meta_Simp_simp_simpLit___closed__2 = _init_l_Lean_Meta_Simp_simp_simpLit_ lean_mark_persistent(l_Lean_Meta_Simp_simp_simpLit___closed__2); l_Lean_Meta_Simp_simp_simpLit___closed__3 = _init_l_Lean_Meta_Simp_simp_simpLit___closed__3(); lean_mark_persistent(l_Lean_Meta_Simp_simp_simpLit___closed__3); -l_Lean_Meta_Simp_simp_simpLet___closed__1 = _init_l_Lean_Meta_Simp_simp_simpLet___closed__1(); -lean_mark_persistent(l_Lean_Meta_Simp_simp_simpLet___closed__1); -l_Lean_Meta_Simp_simp_simpLet___closed__2 = _init_l_Lean_Meta_Simp_simp_simpLet___closed__2(); -lean_mark_persistent(l_Lean_Meta_Simp_simp_simpLet___closed__2); -l_Lean_Meta_Simp_simp_simpLet___closed__3 = _init_l_Lean_Meta_Simp_simp_simpLet___closed__3(); -lean_mark_persistent(l_Lean_Meta_Simp_simp_simpLet___closed__3); -l_Lean_Meta_Simp_simp_simpLet___closed__4 = _init_l_Lean_Meta_Simp_simp_simpLet___closed__4(); -lean_mark_persistent(l_Lean_Meta_Simp_simp_simpLet___closed__4); -l_Lean_Meta_Simp_simp_simpLet___closed__5 = _init_l_Lean_Meta_Simp_simp_simpLet___closed__5(); -lean_mark_persistent(l_Lean_Meta_Simp_simp_simpLet___closed__5); -l_Lean_Meta_Simp_simp_simpLet___closed__6 = _init_l_Lean_Meta_Simp_simp_simpLet___closed__6(); -lean_mark_persistent(l_Lean_Meta_Simp_simp_simpLet___closed__6); -l_Lean_Meta_Simp_simp_simpLet___closed__7 = _init_l_Lean_Meta_Simp_simp_simpLet___closed__7(); -lean_mark_persistent(l_Lean_Meta_Simp_simp_simpLet___closed__7); -l_Lean_Meta_Simp_simp_simpLet___closed__8 = _init_l_Lean_Meta_Simp_simp_simpLet___closed__8(); -lean_mark_persistent(l_Lean_Meta_Simp_simp_simpLet___closed__8); l_Lean_Meta_Simp_simp_simpLoop___closed__1 = _init_l_Lean_Meta_Simp_simp_simpLoop___closed__1(); lean_mark_persistent(l_Lean_Meta_Simp_simp_simpLoop___closed__1); l_Lean_Meta_Simp_simp_simpLoop___closed__2 = _init_l_Lean_Meta_Simp_simp_simpLoop___closed__2(); @@ -25022,24 +27056,40 @@ l_Lean_Meta_Simp_simp_simpStep___closed__1 = _init_l_Lean_Meta_Simp_simp_simpSte lean_mark_persistent(l_Lean_Meta_Simp_simp_simpStep___closed__1); l_Lean_Meta_Simp_simp_simpStep___closed__2 = _init_l_Lean_Meta_Simp_simp_simpStep___closed__2(); lean_mark_persistent(l_Lean_Meta_Simp_simp_simpStep___closed__2); -l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__3___closed__1 = _init_l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__3___closed__1(); -lean_mark_persistent(l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__3___closed__1); -l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__3___closed__2 = _init_l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__3___closed__2(); -lean_mark_persistent(l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__3___closed__2); -l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__3___closed__3 = _init_l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__3___closed__3(); -lean_mark_persistent(l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__3___closed__3); -l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__3___closed__4 = _init_l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__3___closed__4(); -lean_mark_persistent(l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__3___closed__4); -l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__3___closed__5 = _init_l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__3___closed__5(); -lean_mark_persistent(l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__3___closed__5); -l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__3___closed__6 = _init_l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__3___closed__6(); -lean_mark_persistent(l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__3___closed__6); -l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__3___closed__7 = _init_l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__3___closed__7(); -lean_mark_persistent(l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__3___closed__7); -l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__3___closed__8 = _init_l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__3___closed__8(); -lean_mark_persistent(l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__3___closed__8); -l_Lean_Meta_Simp_simp_simpForall___lambda__2___closed__1 = _init_l_Lean_Meta_Simp_simp_simpForall___lambda__2___closed__1(); -lean_mark_persistent(l_Lean_Meta_Simp_simp_simpForall___lambda__2___closed__1); +l_Lean_Meta_Simp_simp_simpStep___closed__3 = _init_l_Lean_Meta_Simp_simp_simpStep___closed__3(); +lean_mark_persistent(l_Lean_Meta_Simp_simp_simpStep___closed__3); +l_Lean_Meta_Simp_simp_simpStep___closed__4 = _init_l_Lean_Meta_Simp_simp_simpStep___closed__4(); +lean_mark_persistent(l_Lean_Meta_Simp_simp_simpStep___closed__4); +l_Lean_Meta_Simp_simp_simpStep___closed__5 = _init_l_Lean_Meta_Simp_simp_simpStep___closed__5(); +lean_mark_persistent(l_Lean_Meta_Simp_simp_simpStep___closed__5); +l_Lean_Meta_Simp_simp_simpStep___closed__6 = _init_l_Lean_Meta_Simp_simp_simpStep___closed__6(); +lean_mark_persistent(l_Lean_Meta_Simp_simp_simpStep___closed__6); +l_Lean_Meta_Simp_simp_simpStep___closed__7 = _init_l_Lean_Meta_Simp_simp_simpStep___closed__7(); +lean_mark_persistent(l_Lean_Meta_Simp_simp_simpStep___closed__7); +l_Lean_Meta_Simp_simp_simpStep___closed__8 = _init_l_Lean_Meta_Simp_simp_simpStep___closed__8(); +lean_mark_persistent(l_Lean_Meta_Simp_simp_simpStep___closed__8); +l_Lean_Meta_Simp_simp_simpLet___lambda__1___closed__1 = _init_l_Lean_Meta_Simp_simp_simpLet___lambda__1___closed__1(); +lean_mark_persistent(l_Lean_Meta_Simp_simp_simpLet___lambda__1___closed__1); +l_Lean_Meta_Simp_simp_simpLet___closed__1 = _init_l_Lean_Meta_Simp_simp_simpLet___closed__1(); +lean_mark_persistent(l_Lean_Meta_Simp_simp_simpLet___closed__1); +l_Lean_Meta_Simp_simp_simpLet___closed__2 = _init_l_Lean_Meta_Simp_simp_simpLet___closed__2(); +lean_mark_persistent(l_Lean_Meta_Simp_simp_simpLet___closed__2); +l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__2___closed__1 = _init_l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__2___closed__1(); +lean_mark_persistent(l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__2___closed__1); +l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__2___closed__2 = _init_l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__2___closed__2(); +lean_mark_persistent(l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__2___closed__2); +l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__2___closed__3 = _init_l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__2___closed__3(); +lean_mark_persistent(l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__2___closed__3); +l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__2___closed__4 = _init_l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__2___closed__4(); +lean_mark_persistent(l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__2___closed__4); +l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__2___closed__5 = _init_l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__2___closed__5(); +lean_mark_persistent(l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__2___closed__5); +l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__2___closed__6 = _init_l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__2___closed__6(); +lean_mark_persistent(l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__2___closed__6); +l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__2___closed__7 = _init_l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__2___closed__7(); +lean_mark_persistent(l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__2___closed__7); +l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__2___closed__8 = _init_l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__2___closed__8(); +lean_mark_persistent(l_Lean_addTrace___at_Lean_Meta_Simp_simp_simpForall___spec__2___closed__8); l_Lean_Meta_Simp_simp_simpForall___closed__1 = _init_l_Lean_Meta_Simp_simp_simpForall___closed__1(); lean_mark_persistent(l_Lean_Meta_Simp_simp_simpForall___closed__1); l_Lean_Meta_Simp_simp_simpForall___closed__2 = _init_l_Lean_Meta_Simp_simp_simpForall___closed__2(); diff --git a/stage0/stdlib/Lean/Meta/Tactic/Split.c b/stage0/stdlib/Lean/Meta/Tactic/Split.c index 800599ef87..bae9a5244e 100644 --- a/stage0/stdlib/Lean/Meta/Tactic/Split.c +++ b/stage0/stdlib/Lean/Meta/Tactic/Split.c @@ -18,6 +18,7 @@ lean_object* l_Lean_Meta_replaceTargetDefEq(lean_object*, lean_object*, lean_obj lean_object* lean_array_set(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_Split_splitMatch_match__2___rarg(lean_object*, lean_object*); size_t l_USize_add(size_t, size_t); +lean_object* l_Lean_registerTraceClass(lean_object*, lean_object*); uint8_t l_Array_anyMUnsafe_any___at_Lean_Meta_CheckAssignment_checkApp___spec__2(lean_object*, size_t, size_t); lean_object* l_Lean_stringToMessageData(lean_object*); static lean_object* l_Lean_Meta_Split_simpMatch_pre___closed__1; @@ -28,7 +29,9 @@ lean_object* l___private_Lean_Meta_Tactic_Split_0__Lean_Meta_Split_getSimpMatchC lean_object* lean_name_mk_string(lean_object*, lean_object*); lean_object* l_Lean_Meta_Split_simpMatch_pre_match__3(lean_object*); lean_object* lean_array_uget(lean_object*, size_t); +static lean_object* l_Lean_Meta_Split_findSplit_x3f_isCandidate___closed__1; lean_object* l_Lean_Meta_getCongrLemmas___rarg(lean_object*, lean_object*); +lean_object* l_Lean_Meta_isMatcherAppCore_x3f(lean_object*, lean_object*); lean_object* l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at_Lean_Meta_mkCongrLemma___spec__10(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_Split_splitMatch(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_Split_simpMatch_pre___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -38,15 +41,21 @@ static lean_object* l_Lean_Meta_Split_simpMatch___closed__1; lean_object* l_Array_extract___rarg(lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_Split_simpMatch___closed__2; lean_object* l_List_foldlM___at_Lean_Meta_Split_splitMatch___spec__2___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*); +static lean_object* l_Lean_Meta_Split_findSplit_x3f_isCandidate___closed__3; lean_object* l_Lean_Meta_saveState___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_SplitIf_discharge_x3f___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_Split_splitMatch___closed__2; lean_object* lean_st_ref_get(lean_object*, lean_object*); +static lean_object* l_Lean_Meta_Split_findSplit_x3f_isCandidate___closed__2; lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Meta_Tactic_Split_0__Lean_Meta_Split_generalizeMatchDiscrs___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Std_Range_forIn_loop___at_Lean_Meta_Split_findSplit_x3f_isCandidate___spec__1___closed__2; static lean_object* l_Lean_Meta_Split_simpMatch___closed__4; extern lean_object* l_instInhabitedNat; uint8_t l_Lean_Expr_isAppOf(lean_object*, lean_object*); lean_object* l___private_Lean_Meta_Tactic_Split_0__Lean_Meta_Split_getSimpMatchContext___rarg(lean_object*, lean_object*); +static lean_object* l_Lean_Meta_Split_findSplit_x3f_isCandidate___closed__4; +lean_object* l_Lean_Meta_Match_MatcherInfo_getFirstDiscrPos(lean_object*); +static lean_object* l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitTarget_x3f___spec__1___at_Lean_Meta_splitTarget_x3f___spec__2___closed__1; lean_object* l_Array_toSubarray___rarg(lean_object*, lean_object*, lean_object*); lean_object* lean_array_push(lean_object*, lean_object*); lean_object* lean_array_get_size(lean_object*); @@ -67,15 +76,20 @@ lean_object* l_List_foldlM___at_Lean_Meta_Split_splitMatch___spec__2___lambda__1 lean_object* l_Lean_Meta_apply(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_mkAppN(lean_object*, lean_object*); lean_object* l___private_Lean_Meta_Tactic_Split_0__Lean_Meta_Split_simpMatchCore_pre___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_Split_findSplit_x3f_isCandidate___lambda__1___boxed(lean_object*); lean_object* l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitTarget_x3f___spec__1___at_Lean_Meta_splitTarget_x3f___spec__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_Split_splitMatch___closed__7; +lean_object* l_Lean_Meta_Split_findSplit_x3f_isCandidate_match__2(lean_object*); lean_object* l___private_Lean_Expr_0__Lean_Expr_getAppArgsAux(lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Meta_Split_findSplit_x3f___lambda__1___boxed(lean_object*, lean_object*); +lean_object* l_Std_Range_forIn_loop___at_Lean_Meta_Split_findSplit_x3f_isCandidate___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Std_Range_forIn_loop___at_Lean_Meta_Split_findSplit_x3f_isCandidate___spec__1___closed__1; lean_object* l___private_Lean_CoreM_0__Lean_Core_mkFreshNameImp(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Meta_Tactic_Split_0__Lean_Meta_Split_simpMatchTargetCore___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Meta_Tactic_Split_0__Lean_Meta_Split_generalizeMatchDiscrs___spec__1___closed__1; +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*); lean_object* l_Lean_Meta_getMVarType(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_Split_findSplit_x3f_isCandidate(lean_object*, lean_object*); 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* lean_nat_sub(lean_object*, lean_object*); lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Meta_Match_MatchEqs_0__Lean_Meta_Match_mkSplitterProof_proveSubgoal___spec__1(size_t, size_t, lean_object*); @@ -83,20 +97,19 @@ lean_object* l_Lean_addTrace___at_Lean_Meta_mkCongrLemma___spec__9(lean_object*, lean_object* l_Lean_Meta_splitLocalDecl_x3f_match__1___rarg(lean_object*, lean_object*); lean_object* l_Lean_Meta_Simp_tryLemma_x3f(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_splitLocalDecl_x3f___lambda__1___closed__1; +lean_object* l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitTarget_x3f___spec__1___at_Lean_Meta_splitTarget_x3f___spec__2___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_Split_simpMatch_pre_match__2___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_Split_simpMatch___lambda__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_array_get(lean_object*, lean_object*, lean_object*); -uint8_t l_Lean_Meta_isMatcherAppCore(lean_object*, lean_object*); lean_object* l_Lean_Meta_mkLambdaFVars(lean_object*, lean_object*, uint8_t, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l_Lean_Meta_Split_findSplit_x3f___closed__2; -uint8_t l_Lean_Meta_Split_findSplit_x3f___lambda__1(lean_object*, lean_object*); -static lean_object* l_Lean_Meta_Split_findSplit_x3f___closed__1; lean_object* l_Lean_Meta_Split_simpMatch_pre_match__1___rarg(lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Meta_Tactic_Split_0__Lean_Meta_Split_generalizeMatchDiscrs(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Meta_Tactic_Split_0__Lean_Meta_Split_generalizeMatchDiscrs___boxed__const__1; +static lean_object* l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitTarget_x3f___spec__1___at_Lean_Meta_splitTarget_x3f___spec__2___closed__6; lean_object* l_Lean_Meta_Split_splitMatch___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_object*); lean_object* l_Lean_Meta_generalize(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_revert(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitTarget_x3f___spec__1___at_Lean_Meta_splitTarget_x3f___spec__2___closed__2; lean_object* lean_array_to_list(lean_object*, lean_object*); lean_object* l_Lean_Meta_splitLocalDecl_x3f___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Array_mapMUnsafe_map___at___private_Lean_Meta_Tactic_Split_0__Lean_Meta_Split_generalizeMatchDiscrs___spec__1___closed__2; @@ -127,6 +140,7 @@ extern lean_object* l_Lean_Expr_FindImpl_initCache; lean_object* l_Lean_Meta_Split_simpMatch___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_List_foldlM___at_Lean_Meta_Split_splitMatch___spec__2___closed__4; lean_object* l_List_redLength___rarg(lean_object*); +static lean_object* l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitTarget_x3f___spec__1___at_Lean_Meta_splitTarget_x3f___spec__2___closed__5; lean_object* l_Lean_Meta_matchMatcherApp_x3f___at_Lean_Meta_Split_simpMatch_pre___spec__1(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*); static lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_Split_simpMatch_pre___spec__3___closed__2; @@ -143,8 +157,11 @@ lean_object* l_Lean_Meta_Split_findSplit_x3f_match__1___rarg(lean_object*, lean_ lean_object* l_Lean_Meta_matchMatcherApp_x3f___at_Lean_Meta_Split_simpMatch_pre___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_List_foldlM___at_Lean_Meta_Split_splitMatch___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*, lean_object*); static lean_object* l_List_foldlM___at_Lean_Meta_Split_splitMatch___spec__2___closed__1; +static lean_object* l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitTarget_x3f___spec__1___at_Lean_Meta_splitTarget_x3f___spec__2___closed__7; lean_object* l_Lean_Meta_Split_findSplit_x3f(lean_object*, lean_object*); lean_object* l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitIfTarget_x3f___spec__1___at_Lean_Meta_splitIfTarget_x3f___spec__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitTarget_x3f___spec__1___at_Lean_Meta_splitTarget_x3f___spec__2___closed__3; +lean_object* l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitTarget_x3f___spec__1___at_Lean_Meta_splitTarget_x3f___spec__2___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_ofSubarray___rarg(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*); extern lean_object* l_Lean_instInhabitedName; @@ -161,14 +178,18 @@ lean_object* l_Lean_Meta_Match_MatcherInfo_arity(lean_object*); lean_object* l_Lean_Meta_instantiateMVars(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_Split_splitMatch___closed__8; lean_object* lean_mk_array(lean_object*, lean_object*); +lean_object* l_Std_Range_forIn_loop___at_Lean_Meta_Split_findSplit_x3f_isCandidate___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_Split_splitMatch___closed__4; lean_object* l_Lean_Expr_FindImpl_findM_x3f_visit(lean_object*, size_t, lean_object*, lean_object*); lean_object* l_Lean_Meta_getMatcherInfo_x3f___at_Lean_Meta_Split_simpMatch_pre___spec__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +uint8_t l_Lean_Meta_Split_findSplit_x3f_isCandidate___lambda__1(lean_object*); lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_Split_simpMatch_pre___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*); static lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_Split_simpMatch_pre___spec__3___closed__1; +static lean_object* l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitTarget_x3f___spec__1___at_Lean_Meta_splitTarget_x3f___spec__2___closed__4; lean_object* l_Lean_Expr_getAppFn(lean_object*); lean_object* l_Lean_Meta_Match_MatcherInfo_numAlts(lean_object*); lean_object* l_Lean_Meta_Split_splitMatch___lambda__3(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_Split_findSplit_x3f_isCandidate_match__1(lean_object*); lean_object* l_Lean_Meta_Split_simpMatch_pre___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_unsafeCast(lean_object*, lean_object*, lean_object*); lean_object* l_Array_forInUnsafe_loop___at_Lean_Meta_Split_simpMatch_pre___spec__3(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*); @@ -176,11 +197,13 @@ lean_object* l_Lean_Meta_Split_splitMatch_match__2(lean_object*); lean_object* l_Lean_Meta_Split_splitMatch_match__1(lean_object*); lean_object* l_Lean_Meta_Split_simpMatch_pre_match__4___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_Match_Extension_getMatcherInfo_x3f(lean_object*, lean_object*); +lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Split___hyg_1831_(lean_object*); lean_object* l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitTarget_x3f___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_reduceRecMatcher_x3f(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l___private_Lean_Meta_Tactic_Split_0__Lean_Meta_Split_getSimpMatchContext___rarg___closed__1; lean_object* l_Lean_mkConst(lean_object*, lean_object*); lean_object* l___private_Lean_Meta_Tactic_Split_0__Lean_Meta_Split_getSimpMatchContext___rarg___boxed(lean_object*, lean_object*); +lean_object* l_Lean_Meta_Split_findSplit_x3f_isCandidate_match__1___rarg(lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Meta_Simp_defaultMaxSteps; lean_object* l_Lean_Meta_Split_simpMatch_pre_match__4(lean_object*); lean_object* l_Lean_throwError___at_Lean_Meta_Split_splitMatch___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -189,6 +212,7 @@ lean_object* l_Lean_Meta_getMatcherInfo_x3f___at_Lean_Meta_Split_simpMatch_pre__ static lean_object* l_Lean_Meta_Split_splitMatch___closed__1; lean_object* l_Lean_Meta_DiscrTree_empty(lean_object*); lean_object* l_Lean_Meta_check(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_Split_findSplit_x3f_isCandidate_match__2___rarg(lean_object*, lean_object*, lean_object*); uint8_t lean_nat_dec_lt(lean_object*, lean_object*); lean_object* l_Lean_Meta_Split_simpMatch_pre_match__3___rarg(lean_object*, lean_object*, lean_object*); static lean_object* _init_l___private_Lean_Meta_Tactic_Split_0__Lean_Meta_Split_getSimpMatchContext___rarg___closed__1() { @@ -4047,6 +4071,67 @@ lean_dec(x_5); return x_11; } } +lean_object* l_Lean_Meta_Split_findSplit_x3f_isCandidate_match__1___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +if (lean_obj_tag(x_1) == 0) +{ +lean_object* x_4; lean_object* x_5; +lean_dec(x_3); +x_4 = lean_box(0); +x_5 = lean_apply_1(x_2, x_4); +return x_5; +} +else +{ +lean_object* x_6; lean_object* x_7; +lean_dec(x_2); +x_6 = lean_ctor_get(x_1, 0); +lean_inc(x_6); +lean_dec(x_1); +x_7 = lean_apply_1(x_3, x_6); +return x_7; +} +} +} +lean_object* l_Lean_Meta_Split_findSplit_x3f_isCandidate_match__1(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_Lean_Meta_Split_findSplit_x3f_isCandidate_match__1___rarg), 3, 0); +return x_2; +} +} +lean_object* l_Lean_Meta_Split_findSplit_x3f_isCandidate_match__2___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +if (lean_obj_tag(x_1) == 0) +{ +lean_object* x_4; +lean_dec(x_2); +x_4 = lean_apply_1(x_3, x_1); +return x_4; +} +else +{ +lean_object* x_5; lean_object* x_6; +lean_dec(x_3); +x_5 = lean_ctor_get(x_1, 0); +lean_inc(x_5); +lean_dec(x_1); +x_6 = lean_apply_1(x_2, x_5); +return x_6; +} +} +} +lean_object* l_Lean_Meta_Split_findSplit_x3f_isCandidate_match__2(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_Lean_Meta_Split_findSplit_x3f_isCandidate_match__2___rarg), 3, 0); +return x_2; +} +} lean_object* l_Lean_Meta_Split_findSplit_x3f_match__1___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3) { _start: { @@ -4077,51 +4162,119 @@ x_2 = lean_alloc_closure((void*)(l_Lean_Meta_Split_findSplit_x3f_match__1___rarg return x_2; } } -uint8_t l_Lean_Meta_Split_findSplit_x3f___lambda__1(lean_object* x_1, lean_object* x_2) { +static lean_object* _init_l_Std_Range_forIn_loop___at_Lean_Meta_Split_findSplit_x3f_isCandidate___spec__1___closed__1() { _start: { -uint8_t x_3; -x_3 = l_Lean_Expr_hasLooseBVars(x_2); -if (x_3 == 0) +uint8_t x_1; lean_object* x_2; lean_object* x_3; +x_1 = 0; +x_2 = lean_box(x_1); +x_3 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_3, 0, x_2); +return x_3; +} +} +static lean_object* _init_l_Std_Range_forIn_loop___at_Lean_Meta_Split_findSplit_x3f_isCandidate___spec__1___closed__2() { +_start: { -uint8_t x_4; -x_4 = l_Lean_Expr_isIte(x_2); -if (x_4 == 0) +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Std_Range_forIn_loop___at_Lean_Meta_Split_findSplit_x3f_isCandidate___spec__1___closed__1; +x_2 = lean_box(0); +x_3 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_3, 0, x_1); +lean_ctor_set(x_3, 1, x_2); +return x_3; +} +} +lean_object* l_Std_Range_forIn_loop___at_Lean_Meta_Split_findSplit_x3f_isCandidate___spec__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { +_start: { -uint8_t x_5; -x_5 = l_Lean_Expr_isDIte(x_2); -if (x_5 == 0) +lean_object* x_7; uint8_t x_8; +x_7 = lean_ctor_get(x_3, 1); +x_8 = lean_nat_dec_le(x_7, x_5); +if (x_8 == 0) { -uint8_t x_6; -x_6 = l_Lean_Meta_isMatcherAppCore(x_1, x_2); +lean_object* x_9; uint8_t x_10; +x_9 = lean_unsigned_to_nat(0u); +x_10 = lean_nat_dec_eq(x_4, x_9); +if (x_10 == 0) +{ +lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; uint8_t x_15; +x_11 = lean_unsigned_to_nat(1u); +x_12 = lean_nat_sub(x_4, x_11); +lean_dec(x_4); +x_13 = l_Lean_instInhabitedExpr; +x_14 = lean_array_get(x_13, x_1, x_5); +x_15 = l_Lean_Expr_hasLooseBVars(x_14); +lean_dec(x_14); +if (x_15 == 0) +{ +lean_object* x_16; lean_object* x_17; +x_16 = lean_ctor_get(x_3, 2); +x_17 = lean_nat_add(x_5, x_16); +lean_dec(x_5); +{ +lean_object* _tmp_3 = x_12; +lean_object* _tmp_4 = x_17; +lean_object* _tmp_5 = x_2; +x_4 = _tmp_3; +x_5 = _tmp_4; +x_6 = _tmp_5; +} +goto _start; +} +else +{ +lean_object* x_19; +lean_dec(x_12); +lean_dec(x_5); +x_19 = l_Std_Range_forIn_loop___at_Lean_Meta_Split_findSplit_x3f_isCandidate___spec__1___closed__2; +return x_19; +} +} +else +{ +lean_dec(x_5); +lean_dec(x_4); +lean_inc(x_6); return x_6; } -else -{ -uint8_t x_7; -lean_dec(x_1); -x_7 = 1; -return x_7; -} } else { -uint8_t x_8; -lean_dec(x_1); -x_8 = 1; -return x_8; +lean_dec(x_5); +lean_dec(x_4); +lean_inc(x_6); +return x_6; } } -else +} +uint8_t l_Lean_Meta_Split_findSplit_x3f_isCandidate___lambda__1(lean_object* x_1) { +_start: { -uint8_t x_9; -lean_dec(x_1); -x_9 = 0; -return x_9; +uint8_t x_2; +x_2 = 1; +return x_2; } } +static lean_object* _init_l_Lean_Meta_Split_findSplit_x3f_isCandidate___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_Meta_Split_findSplit_x3f_isCandidate___lambda__1___boxed), 1, 0); +return x_1; } -static lean_object* _init_l_Lean_Meta_Split_findSplit_x3f___closed__1() { +} +static lean_object* _init_l_Lean_Meta_Split_findSplit_x3f_isCandidate___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Meta_Split_findSplit_x3f_isCandidate___closed__1; +x_2 = lean_box(0); +x_3 = lean_apply_1(x_1, x_2); +return x_3; +} +} +static lean_object* _init_l_Lean_Meta_Split_findSplit_x3f_isCandidate___closed__3() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; @@ -4131,22 +4284,166 @@ x_3 = lean_nat_sub(x_1, x_2); return x_3; } } -static lean_object* _init_l_Lean_Meta_Split_findSplit_x3f___closed__2() { +static lean_object* _init_l_Lean_Meta_Split_findSplit_x3f_isCandidate___closed__4() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Meta_Split_findSplit_x3f___closed__1; +x_1 = l_Lean_Meta_Split_findSplit_x3f_isCandidate___closed__3; x_2 = lean_unsigned_to_nat(1u); x_3 = lean_nat_sub(x_1, x_2); return x_3; } } +lean_object* l_Lean_Meta_Split_findSplit_x3f_isCandidate(lean_object* x_1, lean_object* x_2) { +_start: +{ +uint8_t x_3; +x_3 = l_Lean_Expr_isIte(x_2); +if (x_3 == 0) +{ +uint8_t x_4; +x_4 = l_Lean_Expr_isDIte(x_2); +if (x_4 == 0) +{ +lean_object* x_5; +x_5 = l_Lean_Meta_isMatcherAppCore_x3f(x_1, x_2); +if (lean_obj_tag(x_5) == 0) +{ +uint8_t x_6; lean_object* x_7; +lean_dec(x_2); +x_6 = 0; +x_7 = lean_box(x_6); +return x_7; +} +else +{ +lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; +x_8 = lean_ctor_get(x_5, 0); +lean_inc(x_8); +lean_dec(x_5); +x_9 = lean_unsigned_to_nat(0u); +x_10 = l_Lean_Expr_getAppNumArgsAux(x_2, x_9); +x_11 = l_Lean_Meta_matchMatcherApp_x3f___at_Lean_Meta_Split_simpMatch_pre___spec__1___closed__1; +lean_inc(x_10); +x_12 = lean_mk_array(x_10, x_11); +x_13 = lean_unsigned_to_nat(1u); +x_14 = lean_nat_sub(x_10, x_13); +lean_dec(x_10); +x_15 = l___private_Lean_Expr_0__Lean_Expr_getAppArgsAux(x_2, x_12, x_14); +x_16 = l_Lean_Meta_Match_MatcherInfo_getFirstDiscrPos(x_8); +x_17 = lean_ctor_get(x_8, 1); +lean_inc(x_17); +lean_dec(x_8); +x_18 = lean_nat_add(x_16, x_17); +lean_dec(x_17); +lean_inc(x_18); +lean_inc(x_16); +x_19 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_19, 0, x_16); +lean_ctor_set(x_19, 1, x_18); +lean_ctor_set(x_19, 2, x_13); +x_20 = l_Lean_Meta_Split_simpMatch_pre___closed__1; +x_21 = l_Std_Range_forIn_loop___at_Lean_Meta_Split_findSplit_x3f_isCandidate___spec__1(x_15, x_20, x_19, x_18, x_16, x_20); +lean_dec(x_19); +lean_dec(x_15); +x_22 = lean_ctor_get(x_21, 0); +lean_inc(x_22); +lean_dec(x_21); +if (lean_obj_tag(x_22) == 0) +{ +lean_object* x_23; +x_23 = l_Lean_Meta_Split_findSplit_x3f_isCandidate___closed__2; +return x_23; +} +else +{ +lean_object* x_24; +x_24 = lean_ctor_get(x_22, 0); +lean_inc(x_24); +lean_dec(x_22); +return x_24; +} +} +} +else +{ +lean_object* x_25; lean_object* x_26; uint8_t x_27; +lean_dec(x_1); +x_25 = l_Lean_Meta_Split_findSplit_x3f_isCandidate___closed__4; +x_26 = l_Lean_Expr_getRevArg_x21(x_2, x_25); +lean_dec(x_2); +x_27 = l_Lean_Expr_hasLooseBVars(x_26); +lean_dec(x_26); +if (x_27 == 0) +{ +uint8_t x_28; lean_object* x_29; +x_28 = 1; +x_29 = lean_box(x_28); +return x_29; +} +else +{ +uint8_t x_30; lean_object* x_31; +x_30 = 0; +x_31 = lean_box(x_30); +return x_31; +} +} +} +else +{ +lean_object* x_32; lean_object* x_33; uint8_t x_34; +lean_dec(x_1); +x_32 = l_Lean_Meta_Split_findSplit_x3f_isCandidate___closed__4; +x_33 = l_Lean_Expr_getRevArg_x21(x_2, x_32); +lean_dec(x_2); +x_34 = l_Lean_Expr_hasLooseBVars(x_33); +lean_dec(x_33); +if (x_34 == 0) +{ +uint8_t x_35; lean_object* x_36; +x_35 = 1; +x_36 = lean_box(x_35); +return x_36; +} +else +{ +uint8_t x_37; lean_object* x_38; +x_37 = 0; +x_38 = lean_box(x_37); +return x_38; +} +} +} +} +lean_object* l_Std_Range_forIn_loop___at_Lean_Meta_Split_findSplit_x3f_isCandidate___spec__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { +_start: +{ +lean_object* x_7; +x_7 = l_Std_Range_forIn_loop___at_Lean_Meta_Split_findSplit_x3f_isCandidate___spec__1(x_1, x_2, x_3, x_4, x_5, x_6); +lean_dec(x_6); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +return x_7; +} +} +lean_object* l_Lean_Meta_Split_findSplit_x3f_isCandidate___lambda__1___boxed(lean_object* x_1) { +_start: +{ +uint8_t x_2; lean_object* x_3; +x_2 = l_Lean_Meta_Split_findSplit_x3f_isCandidate___lambda__1(x_1); +lean_dec(x_1); +x_3 = lean_box(x_2); +return x_3; +} +} lean_object* l_Lean_Meta_Split_findSplit_x3f(lean_object* x_1, lean_object* x_2) { _start: { lean_object* x_3; size_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_inc(x_1); -x_3 = lean_alloc_closure((void*)(l_Lean_Meta_Split_findSplit_x3f___lambda__1___boxed), 2, 1); +x_3 = lean_alloc_closure((void*)(l_Lean_Meta_Split_findSplit_x3f_isCandidate), 2, 1); lean_closure_set(x_3, 0, x_1); x_4 = 8192; x_5 = l_Lean_Expr_FindImpl_initCache; @@ -4185,7 +4482,7 @@ return x_7; else { lean_object* x_13; lean_object* x_14; lean_object* x_15; -x_13 = l_Lean_Meta_Split_findSplit_x3f___closed__2; +x_13 = l_Lean_Meta_Split_findSplit_x3f_isCandidate___closed__4; x_14 = l_Lean_Expr_getRevArg_x21(x_10, x_13); x_15 = l_Lean_Meta_Split_findSplit_x3f(x_1, x_14); if (lean_obj_tag(x_15) == 0) @@ -4219,7 +4516,7 @@ else { lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_dec(x_2); -x_19 = l_Lean_Meta_Split_findSplit_x3f___closed__2; +x_19 = l_Lean_Meta_Split_findSplit_x3f_isCandidate___closed__4; x_20 = l_Lean_Expr_getRevArg_x21(x_10, x_19); x_21 = l_Lean_Meta_Split_findSplit_x3f(x_1, x_20); if (lean_obj_tag(x_21) == 0) @@ -4272,7 +4569,7 @@ return x_28; else { lean_object* x_29; lean_object* x_30; lean_object* x_31; -x_29 = l_Lean_Meta_Split_findSplit_x3f___closed__2; +x_29 = l_Lean_Meta_Split_findSplit_x3f_isCandidate___closed__4; x_30 = l_Lean_Expr_getRevArg_x21(x_25, x_29); x_31 = l_Lean_Meta_Split_findSplit_x3f(x_1, x_30); if (lean_obj_tag(x_31) == 0) @@ -4309,7 +4606,7 @@ else { lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_dec(x_2); -x_36 = l_Lean_Meta_Split_findSplit_x3f___closed__2; +x_36 = l_Lean_Meta_Split_findSplit_x3f_isCandidate___closed__4; x_37 = l_Lean_Expr_getRevArg_x21(x_25, x_36); x_38 = l_Lean_Meta_Split_findSplit_x3f(x_1, x_37); if (lean_obj_tag(x_38) == 0) @@ -4345,16 +4642,6 @@ return x_42; } } } -lean_object* l_Lean_Meta_Split_findSplit_x3f___lambda__1___boxed(lean_object* x_1, lean_object* x_2) { -_start: -{ -uint8_t x_3; lean_object* x_4; -x_3 = l_Lean_Meta_Split_findSplit_x3f___lambda__1(x_1, x_2); -lean_dec(x_2); -x_4 = lean_box(x_3); -return x_4; -} -} lean_object* l_Lean_Meta_splitTarget_x3f_match__1___rarg(lean_object* x_1, lean_object* x_2) { _start: { @@ -4528,6 +4815,78 @@ return x_36; } } } +lean_object* l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitTarget_x3f___spec__1___at_Lean_Meta_splitTarget_x3f___spec__2___lambda__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { +_start: +{ +lean_object* x_7; lean_object* x_8; +x_7 = lean_box(0); +x_8 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_8, 0, x_7); +lean_ctor_set(x_8, 1, x_6); +return x_8; +} +} +static lean_object* _init_l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitTarget_x3f___spec__1___at_Lean_Meta_splitTarget_x3f___spec__2___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("Tactic"); +return x_1; +} +} +static lean_object* _init_l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitTarget_x3f___spec__1___at_Lean_Meta_splitTarget_x3f___spec__2___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Meta_Split_splitMatch___closed__4; +x_2 = l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitTarget_x3f___spec__1___at_Lean_Meta_splitTarget_x3f___spec__2___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +static lean_object* _init_l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitTarget_x3f___spec__1___at_Lean_Meta_splitTarget_x3f___spec__2___closed__3() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("split"); +return x_1; +} +} +static lean_object* _init_l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitTarget_x3f___spec__1___at_Lean_Meta_splitTarget_x3f___spec__2___closed__4() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitTarget_x3f___spec__1___at_Lean_Meta_splitTarget_x3f___spec__2___closed__2; +x_2 = l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitTarget_x3f___spec__1___at_Lean_Meta_splitTarget_x3f___spec__2___closed__3; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +static lean_object* _init_l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitTarget_x3f___spec__1___at_Lean_Meta_splitTarget_x3f___spec__2___closed__5() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitTarget_x3f___spec__1___at_Lean_Meta_splitTarget_x3f___spec__2___lambda__1___boxed), 6, 0); +return x_1; +} +} +static lean_object* _init_l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitTarget_x3f___spec__1___at_Lean_Meta_splitTarget_x3f___spec__2___closed__6() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("did not find term to split\n"); +return x_1; +} +} +static lean_object* _init_l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitTarget_x3f___spec__1___at_Lean_Meta_splitTarget_x3f___spec__2___closed__7() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitTarget_x3f___spec__1___at_Lean_Meta_splitTarget_x3f___spec__2___closed__6; +x_2 = l_Lean_stringToMessageData(x_1); +return x_2; +} +} lean_object* l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitTarget_x3f___spec__1___at_Lean_Meta_splitTarget_x3f___spec__2(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { _start: { @@ -4567,34 +4926,59 @@ lean_dec(x_38); x_41 = l_Lean_Meta_Split_findSplit_x3f(x_37, x_39); if (lean_obj_tag(x_41) == 0) { -lean_object* x_42; -lean_dec(x_1); -x_42 = lean_box(0); -x_11 = x_42; -x_12 = x_40; -goto block_25; +lean_object* x_42; uint8_t x_43; lean_object* x_44; lean_object* x_66; lean_object* x_67; lean_object* x_68; uint8_t x_69; +x_42 = l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitTarget_x3f___spec__1___at_Lean_Meta_splitTarget_x3f___spec__2___closed__4; +x_66 = lean_st_ref_get(x_5, x_40); +x_67 = lean_ctor_get(x_66, 0); +lean_inc(x_67); +x_68 = lean_ctor_get(x_67, 3); +lean_inc(x_68); +lean_dec(x_67); +x_69 = lean_ctor_get_uint8(x_68, sizeof(void*)*1); +lean_dec(x_68); +if (x_69 == 0) +{ +lean_object* x_70; uint8_t x_71; +x_70 = lean_ctor_get(x_66, 1); +lean_inc(x_70); +lean_dec(x_66); +x_71 = 0; +x_43 = x_71; +x_44 = x_70; +goto block_65; } else { -uint8_t x_43; -x_43 = !lean_is_exclusive(x_41); +lean_object* x_72; lean_object* x_73; lean_object* x_74; lean_object* x_75; uint8_t x_76; +x_72 = lean_ctor_get(x_66, 1); +lean_inc(x_72); +lean_dec(x_66); +x_73 = l___private_Lean_Util_Trace_0__Lean_checkTraceOptionM___at_Lean_Meta_mkCongrLemma___spec__10(x_42, x_2, x_3, x_4, x_5, x_72); +x_74 = lean_ctor_get(x_73, 0); +lean_inc(x_74); +x_75 = lean_ctor_get(x_73, 1); +lean_inc(x_75); +lean_dec(x_73); +x_76 = lean_unbox(x_74); +lean_dec(x_74); +x_43 = x_76; +x_44 = x_75; +goto block_65; +} +block_65: +{ +lean_object* x_45; +x_45 = l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitTarget_x3f___spec__1___at_Lean_Meta_splitTarget_x3f___spec__2___closed__5; if (x_43 == 0) { -lean_object* x_44; uint8_t x_45; -x_44 = lean_ctor_get(x_41, 0); -x_45 = l_Lean_Expr_isIte(x_44); -if (x_45 == 0) -{ -uint8_t x_46; -x_46 = l_Lean_Expr_isDIte(x_44); -if (x_46 == 0) -{ -lean_object* x_47; +lean_object* x_46; lean_object* x_47; +lean_dec(x_1); +x_46 = lean_box(0); lean_inc(x_5); lean_inc(x_4); lean_inc(x_3); lean_inc(x_2); -x_47 = l_Lean_Meta_Split_splitMatch(x_1, x_44, x_2, x_3, x_4, x_5, x_40); +x_47 = lean_apply_6(x_45, x_46, x_2, x_3, x_4, x_5, x_44); if (lean_obj_tag(x_47) == 0) { lean_object* x_48; lean_object* x_49; @@ -4603,15 +4987,13 @@ lean_inc(x_48); x_49 = lean_ctor_get(x_47, 1); lean_inc(x_49); lean_dec(x_47); -lean_ctor_set(x_41, 0, x_48); -x_11 = x_41; +x_11 = x_48; x_12 = x_49; goto block_25; } else { lean_object* x_50; lean_object* x_51; -lean_free_object(x_41); lean_dec(x_10); x_50 = lean_ctor_get(x_47, 0); lean_inc(x_50); @@ -4625,454 +5007,555 @@ goto block_33; } else { -lean_object* x_52; lean_object* x_53; -lean_free_object(x_41); -lean_dec(x_44); -x_52 = lean_box(0); -lean_inc(x_5); -lean_inc(x_4); -lean_inc(x_3); -lean_inc(x_2); -x_53 = l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitIfTarget_x3f___spec__1___at_Lean_Meta_splitIfTarget_x3f___spec__2(x_1, x_52, x_2, x_3, x_4, x_5, x_40); -if (lean_obj_tag(x_53) == 0) -{ -lean_object* x_54; -x_54 = lean_ctor_get(x_53, 0); -lean_inc(x_54); -if (lean_obj_tag(x_54) == 0) -{ -lean_object* x_55; -x_55 = lean_ctor_get(x_53, 1); -lean_inc(x_55); -lean_dec(x_53); -x_11 = x_52; -x_12 = x_55; -goto block_25; -} -else -{ -uint8_t x_56; -x_56 = !lean_is_exclusive(x_54); -if (x_56 == 0) -{ -lean_object* x_57; lean_object* x_58; lean_object* x_59; lean_object* x_60; lean_object* x_61; lean_object* x_62; lean_object* x_63; lean_object* x_64; lean_object* x_65; -x_57 = lean_ctor_get(x_54, 0); +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_52 = lean_alloc_ctor(5, 1, 0); +lean_ctor_set(x_52, 0, x_1); +x_53 = l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitTarget_x3f___spec__1___at_Lean_Meta_splitTarget_x3f___spec__2___closed__7; +x_54 = lean_alloc_ctor(10, 2, 0); +lean_ctor_set(x_54, 0, x_53); +lean_ctor_set(x_54, 1, x_52); +x_55 = l_List_foldlM___at_Lean_Meta_Split_splitMatch___spec__2___closed__4; +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_mkCongrLemma___spec__9(x_42, x_56, x_2, x_3, x_4, x_5, x_44); x_58 = lean_ctor_get(x_57, 0); lean_inc(x_58); x_59 = lean_ctor_get(x_57, 1); lean_inc(x_59); lean_dec(x_57); -x_60 = lean_ctor_get(x_53, 1); -lean_inc(x_60); -lean_dec(x_53); -x_61 = lean_ctor_get(x_58, 0); -lean_inc(x_61); -lean_dec(x_58); -x_62 = lean_ctor_get(x_59, 0); -lean_inc(x_62); -lean_dec(x_59); -x_63 = lean_box(0); -x_64 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_64, 0, x_62); -lean_ctor_set(x_64, 1, x_63); -x_65 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_65, 0, x_61); -lean_ctor_set(x_65, 1, x_64); -lean_ctor_set(x_54, 0, x_65); -x_11 = x_54; -x_12 = x_60; -goto block_25; -} -else -{ -lean_object* x_66; lean_object* x_67; lean_object* x_68; lean_object* x_69; lean_object* x_70; lean_object* x_71; lean_object* x_72; lean_object* x_73; lean_object* x_74; lean_object* x_75; -x_66 = lean_ctor_get(x_54, 0); -lean_inc(x_66); -lean_dec(x_54); -x_67 = lean_ctor_get(x_66, 0); -lean_inc(x_67); -x_68 = lean_ctor_get(x_66, 1); -lean_inc(x_68); -lean_dec(x_66); -x_69 = lean_ctor_get(x_53, 1); -lean_inc(x_69); -lean_dec(x_53); -x_70 = lean_ctor_get(x_67, 0); -lean_inc(x_70); -lean_dec(x_67); -x_71 = lean_ctor_get(x_68, 0); -lean_inc(x_71); -lean_dec(x_68); -x_72 = lean_box(0); -x_73 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_73, 0, x_71); -lean_ctor_set(x_73, 1, x_72); -x_74 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_74, 0, x_70); -lean_ctor_set(x_74, 1, x_73); -x_75 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_75, 0, x_74); -x_11 = x_75; -x_12 = x_69; -goto block_25; -} -} -} -else -{ -lean_object* x_76; lean_object* x_77; -lean_dec(x_10); -x_76 = lean_ctor_get(x_53, 0); -lean_inc(x_76); -x_77 = lean_ctor_get(x_53, 1); -lean_inc(x_77); -lean_dec(x_53); -x_26 = x_76; -x_27 = x_77; -goto block_33; -} -} -} -else -{ -lean_object* x_78; lean_object* x_79; -lean_free_object(x_41); -lean_dec(x_44); -x_78 = lean_box(0); lean_inc(x_5); lean_inc(x_4); lean_inc(x_3); lean_inc(x_2); -x_79 = l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitIfTarget_x3f___spec__1___at_Lean_Meta_splitIfTarget_x3f___spec__2(x_1, x_78, x_2, x_3, x_4, x_5, x_40); -if (lean_obj_tag(x_79) == 0) +x_60 = lean_apply_6(x_45, x_58, x_2, x_3, x_4, x_5, x_59); +if (lean_obj_tag(x_60) == 0) { -lean_object* x_80; -x_80 = lean_ctor_get(x_79, 0); -lean_inc(x_80); -if (lean_obj_tag(x_80) == 0) +lean_object* x_61; lean_object* x_62; +x_61 = lean_ctor_get(x_60, 0); +lean_inc(x_61); +x_62 = lean_ctor_get(x_60, 1); +lean_inc(x_62); +lean_dec(x_60); +x_11 = x_61; +x_12 = x_62; +goto block_25; +} +else +{ +lean_object* x_63; lean_object* x_64; +lean_dec(x_10); +x_63 = lean_ctor_get(x_60, 0); +lean_inc(x_63); +x_64 = lean_ctor_get(x_60, 1); +lean_inc(x_64); +lean_dec(x_60); +x_26 = x_63; +x_27 = x_64; +goto block_33; +} +} +} +} +else +{ +uint8_t x_77; +x_77 = !lean_is_exclusive(x_41); +if (x_77 == 0) +{ +lean_object* x_78; uint8_t x_79; +x_78 = lean_ctor_get(x_41, 0); +x_79 = l_Lean_Expr_isIte(x_78); +if (x_79 == 0) +{ +uint8_t x_80; +x_80 = l_Lean_Expr_isDIte(x_78); +if (x_80 == 0) { lean_object* x_81; -x_81 = lean_ctor_get(x_79, 1); -lean_inc(x_81); -lean_dec(x_79); -x_11 = x_78; -x_12 = x_81; +lean_inc(x_5); +lean_inc(x_4); +lean_inc(x_3); +lean_inc(x_2); +x_81 = l_Lean_Meta_Split_splitMatch(x_1, x_78, x_2, x_3, x_4, x_5, x_40); +if (lean_obj_tag(x_81) == 0) +{ +lean_object* x_82; lean_object* x_83; +x_82 = lean_ctor_get(x_81, 0); +lean_inc(x_82); +x_83 = lean_ctor_get(x_81, 1); +lean_inc(x_83); +lean_dec(x_81); +lean_ctor_set(x_41, 0, x_82); +x_11 = x_41; +x_12 = x_83; goto block_25; } else { -uint8_t x_82; -x_82 = !lean_is_exclusive(x_80); -if (x_82 == 0) -{ -lean_object* x_83; lean_object* x_84; lean_object* x_85; lean_object* x_86; lean_object* x_87; lean_object* x_88; lean_object* x_89; lean_object* x_90; lean_object* x_91; -x_83 = lean_ctor_get(x_80, 0); -x_84 = lean_ctor_get(x_83, 0); +lean_object* x_84; lean_object* x_85; +lean_free_object(x_41); +lean_dec(x_10); +x_84 = lean_ctor_get(x_81, 0); lean_inc(x_84); -x_85 = lean_ctor_get(x_83, 1); +x_85 = lean_ctor_get(x_81, 1); lean_inc(x_85); -lean_dec(x_83); -x_86 = lean_ctor_get(x_79, 1); -lean_inc(x_86); -lean_dec(x_79); -x_87 = lean_ctor_get(x_84, 0); -lean_inc(x_87); -lean_dec(x_84); -x_88 = lean_ctor_get(x_85, 0); +lean_dec(x_81); +x_26 = x_84; +x_27 = x_85; +goto block_33; +} +} +else +{ +lean_object* x_86; lean_object* x_87; +lean_free_object(x_41); +lean_dec(x_78); +x_86 = lean_box(0); +lean_inc(x_5); +lean_inc(x_4); +lean_inc(x_3); +lean_inc(x_2); +x_87 = l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitIfTarget_x3f___spec__1___at_Lean_Meta_splitIfTarget_x3f___spec__2(x_1, x_86, x_2, x_3, x_4, x_5, x_40); +if (lean_obj_tag(x_87) == 0) +{ +lean_object* x_88; +x_88 = lean_ctor_get(x_87, 0); lean_inc(x_88); -lean_dec(x_85); -x_89 = lean_box(0); -x_90 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_90, 0, x_88); -lean_ctor_set(x_90, 1, x_89); -x_91 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_91, 0, x_87); -lean_ctor_set(x_91, 1, x_90); -lean_ctor_set(x_80, 0, x_91); -x_11 = x_80; -x_12 = x_86; +if (lean_obj_tag(x_88) == 0) +{ +lean_object* x_89; +x_89 = lean_ctor_get(x_87, 1); +lean_inc(x_89); +lean_dec(x_87); +x_11 = x_86; +x_12 = x_89; goto block_25; } else { -lean_object* x_92; lean_object* x_93; lean_object* x_94; lean_object* x_95; lean_object* x_96; lean_object* x_97; lean_object* x_98; lean_object* x_99; lean_object* x_100; lean_object* x_101; -x_92 = lean_ctor_get(x_80, 0); +uint8_t x_90; +x_90 = !lean_is_exclusive(x_88); +if (x_90 == 0) +{ +lean_object* x_91; lean_object* x_92; lean_object* x_93; lean_object* x_94; lean_object* x_95; lean_object* x_96; lean_object* x_97; lean_object* x_98; lean_object* x_99; +x_91 = lean_ctor_get(x_88, 0); +x_92 = lean_ctor_get(x_91, 0); lean_inc(x_92); -lean_dec(x_80); -x_93 = lean_ctor_get(x_92, 0); +x_93 = lean_ctor_get(x_91, 1); lean_inc(x_93); -x_94 = lean_ctor_get(x_92, 1); +lean_dec(x_91); +x_94 = lean_ctor_get(x_87, 1); lean_inc(x_94); -lean_dec(x_92); -x_95 = lean_ctor_get(x_79, 1); +lean_dec(x_87); +x_95 = lean_ctor_get(x_92, 0); lean_inc(x_95); -lean_dec(x_79); +lean_dec(x_92); x_96 = lean_ctor_get(x_93, 0); lean_inc(x_96); lean_dec(x_93); -x_97 = lean_ctor_get(x_94, 0); -lean_inc(x_97); -lean_dec(x_94); -x_98 = lean_box(0); +x_97 = lean_box(0); +x_98 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_98, 0, x_96); +lean_ctor_set(x_98, 1, x_97); x_99 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_99, 0, x_97); +lean_ctor_set(x_99, 0, x_95); lean_ctor_set(x_99, 1, x_98); -x_100 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_100, 0, x_96); -lean_ctor_set(x_100, 1, x_99); -x_101 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_101, 0, x_100); -x_11 = x_101; -x_12 = x_95; +lean_ctor_set(x_88, 0, x_99); +x_11 = x_88; +x_12 = x_94; goto block_25; } -} -} else { -lean_object* x_102; lean_object* x_103; -lean_dec(x_10); -x_102 = lean_ctor_get(x_79, 0); +lean_object* x_100; lean_object* x_101; lean_object* x_102; lean_object* x_103; lean_object* x_104; lean_object* x_105; lean_object* x_106; lean_object* x_107; lean_object* x_108; lean_object* x_109; +x_100 = lean_ctor_get(x_88, 0); +lean_inc(x_100); +lean_dec(x_88); +x_101 = lean_ctor_get(x_100, 0); +lean_inc(x_101); +x_102 = lean_ctor_get(x_100, 1); lean_inc(x_102); -x_103 = lean_ctor_get(x_79, 1); +lean_dec(x_100); +x_103 = lean_ctor_get(x_87, 1); lean_inc(x_103); -lean_dec(x_79); -x_26 = x_102; -x_27 = x_103; -goto block_33; -} -} -} -else -{ -lean_object* x_104; uint8_t x_105; -x_104 = lean_ctor_get(x_41, 0); +lean_dec(x_87); +x_104 = lean_ctor_get(x_101, 0); lean_inc(x_104); -lean_dec(x_41); -x_105 = l_Lean_Expr_isIte(x_104); -if (x_105 == 0) -{ -uint8_t x_106; -x_106 = l_Lean_Expr_isDIte(x_104); -if (x_106 == 0) -{ -lean_object* x_107; -lean_inc(x_5); -lean_inc(x_4); -lean_inc(x_3); -lean_inc(x_2); -x_107 = l_Lean_Meta_Split_splitMatch(x_1, x_104, x_2, x_3, x_4, x_5, x_40); -if (lean_obj_tag(x_107) == 0) -{ -lean_object* x_108; lean_object* x_109; lean_object* x_110; -x_108 = lean_ctor_get(x_107, 0); -lean_inc(x_108); -x_109 = lean_ctor_get(x_107, 1); -lean_inc(x_109); -lean_dec(x_107); -x_110 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_110, 0, x_108); -x_11 = x_110; -x_12 = x_109; +lean_dec(x_101); +x_105 = lean_ctor_get(x_102, 0); +lean_inc(x_105); +lean_dec(x_102); +x_106 = lean_box(0); +x_107 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_107, 0, x_105); +lean_ctor_set(x_107, 1, x_106); +x_108 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_108, 0, x_104); +lean_ctor_set(x_108, 1, x_107); +x_109 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_109, 0, x_108); +x_11 = x_109; +x_12 = x_103; goto block_25; } +} +} else { -lean_object* x_111; lean_object* x_112; +lean_object* x_110; lean_object* x_111; lean_dec(x_10); -x_111 = lean_ctor_get(x_107, 0); +x_110 = lean_ctor_get(x_87, 0); +lean_inc(x_110); +x_111 = lean_ctor_get(x_87, 1); lean_inc(x_111); -x_112 = lean_ctor_get(x_107, 1); -lean_inc(x_112); -lean_dec(x_107); -x_26 = x_111; -x_27 = x_112; +lean_dec(x_87); +x_26 = x_110; +x_27 = x_111; goto block_33; } } +} else { -lean_object* x_113; lean_object* x_114; -lean_dec(x_104); -x_113 = lean_box(0); +lean_object* x_112; lean_object* x_113; +lean_free_object(x_41); +lean_dec(x_78); +x_112 = lean_box(0); lean_inc(x_5); lean_inc(x_4); lean_inc(x_3); lean_inc(x_2); -x_114 = l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitIfTarget_x3f___spec__1___at_Lean_Meta_splitIfTarget_x3f___spec__2(x_1, x_113, x_2, x_3, x_4, x_5, x_40); +x_113 = l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitIfTarget_x3f___spec__1___at_Lean_Meta_splitIfTarget_x3f___spec__2(x_1, x_112, x_2, x_3, x_4, x_5, x_40); +if (lean_obj_tag(x_113) == 0) +{ +lean_object* x_114; +x_114 = lean_ctor_get(x_113, 0); +lean_inc(x_114); if (lean_obj_tag(x_114) == 0) { lean_object* x_115; -x_115 = lean_ctor_get(x_114, 0); +x_115 = lean_ctor_get(x_113, 1); lean_inc(x_115); -if (lean_obj_tag(x_115) == 0) -{ -lean_object* x_116; -x_116 = lean_ctor_get(x_114, 1); -lean_inc(x_116); -lean_dec(x_114); -x_11 = x_113; -x_12 = x_116; +lean_dec(x_113); +x_11 = x_112; +x_12 = x_115; goto block_25; } else { -lean_object* x_117; lean_object* x_118; lean_object* x_119; lean_object* x_120; lean_object* x_121; lean_object* x_122; lean_object* x_123; lean_object* x_124; lean_object* x_125; lean_object* x_126; lean_object* x_127; -x_117 = lean_ctor_get(x_115, 0); -lean_inc(x_117); -if (lean_is_exclusive(x_115)) { - lean_ctor_release(x_115, 0); - x_118 = x_115; -} else { - lean_dec_ref(x_115); - x_118 = lean_box(0); -} -x_119 = lean_ctor_get(x_117, 0); +uint8_t x_116; +x_116 = !lean_is_exclusive(x_114); +if (x_116 == 0) +{ +lean_object* x_117; lean_object* x_118; lean_object* x_119; lean_object* x_120; lean_object* x_121; lean_object* x_122; lean_object* x_123; lean_object* x_124; lean_object* x_125; +x_117 = lean_ctor_get(x_114, 0); +x_118 = lean_ctor_get(x_117, 0); +lean_inc(x_118); +x_119 = lean_ctor_get(x_117, 1); lean_inc(x_119); -x_120 = lean_ctor_get(x_117, 1); -lean_inc(x_120); lean_dec(x_117); -x_121 = lean_ctor_get(x_114, 1); +x_120 = lean_ctor_get(x_113, 1); +lean_inc(x_120); +lean_dec(x_113); +x_121 = lean_ctor_get(x_118, 0); lean_inc(x_121); -lean_dec(x_114); +lean_dec(x_118); x_122 = lean_ctor_get(x_119, 0); 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 = lean_box(0); +x_123 = lean_box(0); +x_124 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_124, 0, x_122); +lean_ctor_set(x_124, 1, x_123); x_125 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_125, 0, x_123); +lean_ctor_set(x_125, 0, x_121); lean_ctor_set(x_125, 1, x_124); -x_126 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_126, 0, x_122); -lean_ctor_set(x_126, 1, x_125); -if (lean_is_scalar(x_118)) { - x_127 = lean_alloc_ctor(1, 1, 0); -} else { - x_127 = x_118; -} -lean_ctor_set(x_127, 0, x_126); -x_11 = x_127; -x_12 = x_121; +lean_ctor_set(x_114, 0, x_125); +x_11 = x_114; +x_12 = x_120; goto block_25; } +else +{ +lean_object* x_126; lean_object* x_127; lean_object* x_128; lean_object* x_129; lean_object* x_130; lean_object* x_131; lean_object* x_132; lean_object* x_133; lean_object* x_134; lean_object* x_135; +x_126 = lean_ctor_get(x_114, 0); +lean_inc(x_126); +lean_dec(x_114); +x_127 = lean_ctor_get(x_126, 0); +lean_inc(x_127); +x_128 = lean_ctor_get(x_126, 1); +lean_inc(x_128); +lean_dec(x_126); +x_129 = lean_ctor_get(x_113, 1); +lean_inc(x_129); +lean_dec(x_113); +x_130 = lean_ctor_get(x_127, 0); +lean_inc(x_130); +lean_dec(x_127); +x_131 = lean_ctor_get(x_128, 0); +lean_inc(x_131); +lean_dec(x_128); +x_132 = lean_box(0); +x_133 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_133, 0, x_131); +lean_ctor_set(x_133, 1, x_132); +x_134 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_134, 0, x_130); +lean_ctor_set(x_134, 1, x_133); +x_135 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_135, 0, x_134); +x_11 = x_135; +x_12 = x_129; +goto block_25; +} +} } else { -lean_object* x_128; lean_object* x_129; +lean_object* x_136; lean_object* x_137; lean_dec(x_10); -x_128 = lean_ctor_get(x_114, 0); -lean_inc(x_128); -x_129 = lean_ctor_get(x_114, 1); -lean_inc(x_129); -lean_dec(x_114); -x_26 = x_128; -x_27 = x_129; +x_136 = lean_ctor_get(x_113, 0); +lean_inc(x_136); +x_137 = lean_ctor_get(x_113, 1); +lean_inc(x_137); +lean_dec(x_113); +x_26 = x_136; +x_27 = x_137; goto block_33; } } } else { -lean_object* x_130; lean_object* x_131; -lean_dec(x_104); -x_130 = lean_box(0); +lean_object* x_138; uint8_t x_139; +x_138 = lean_ctor_get(x_41, 0); +lean_inc(x_138); +lean_dec(x_41); +x_139 = l_Lean_Expr_isIte(x_138); +if (x_139 == 0) +{ +uint8_t x_140; +x_140 = l_Lean_Expr_isDIte(x_138); +if (x_140 == 0) +{ +lean_object* x_141; lean_inc(x_5); lean_inc(x_4); lean_inc(x_3); lean_inc(x_2); -x_131 = l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitIfTarget_x3f___spec__1___at_Lean_Meta_splitIfTarget_x3f___spec__2(x_1, x_130, x_2, x_3, x_4, x_5, x_40); -if (lean_obj_tag(x_131) == 0) +x_141 = l_Lean_Meta_Split_splitMatch(x_1, x_138, x_2, x_3, x_4, x_5, x_40); +if (lean_obj_tag(x_141) == 0) { -lean_object* x_132; -x_132 = lean_ctor_get(x_131, 0); -lean_inc(x_132); -if (lean_obj_tag(x_132) == 0) -{ -lean_object* x_133; -x_133 = lean_ctor_get(x_131, 1); -lean_inc(x_133); -lean_dec(x_131); -x_11 = x_130; -x_12 = x_133; -goto block_25; -} -else -{ -lean_object* x_134; lean_object* x_135; lean_object* x_136; lean_object* x_137; lean_object* x_138; lean_object* x_139; lean_object* x_140; lean_object* x_141; lean_object* x_142; lean_object* x_143; lean_object* x_144; -x_134 = lean_ctor_get(x_132, 0); -lean_inc(x_134); -if (lean_is_exclusive(x_132)) { - lean_ctor_release(x_132, 0); - x_135 = x_132; -} else { - lean_dec_ref(x_132); - x_135 = lean_box(0); -} -x_136 = lean_ctor_get(x_134, 0); -lean_inc(x_136); -x_137 = lean_ctor_get(x_134, 1); -lean_inc(x_137); -lean_dec(x_134); -x_138 = lean_ctor_get(x_131, 1); -lean_inc(x_138); -lean_dec(x_131); -x_139 = lean_ctor_get(x_136, 0); -lean_inc(x_139); -lean_dec(x_136); -x_140 = lean_ctor_get(x_137, 0); -lean_inc(x_140); -lean_dec(x_137); -x_141 = lean_box(0); -x_142 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_142, 0, x_140); -lean_ctor_set(x_142, 1, x_141); -x_143 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_143, 0, x_139); -lean_ctor_set(x_143, 1, x_142); -if (lean_is_scalar(x_135)) { - x_144 = lean_alloc_ctor(1, 1, 0); -} else { - x_144 = x_135; -} -lean_ctor_set(x_144, 0, x_143); +lean_object* x_142; lean_object* x_143; lean_object* x_144; +x_142 = lean_ctor_get(x_141, 0); +lean_inc(x_142); +x_143 = lean_ctor_get(x_141, 1); +lean_inc(x_143); +lean_dec(x_141); +x_144 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_144, 0, x_142); x_11 = x_144; -x_12 = x_138; +x_12 = x_143; goto block_25; } -} else { lean_object* x_145; lean_object* x_146; lean_dec(x_10); -x_145 = lean_ctor_get(x_131, 0); +x_145 = lean_ctor_get(x_141, 0); lean_inc(x_145); -x_146 = lean_ctor_get(x_131, 1); +x_146 = lean_ctor_get(x_141, 1); lean_inc(x_146); -lean_dec(x_131); +lean_dec(x_141); x_26 = x_145; x_27 = x_146; goto block_33; } } +else +{ +lean_object* x_147; lean_object* x_148; +lean_dec(x_138); +x_147 = lean_box(0); +lean_inc(x_5); +lean_inc(x_4); +lean_inc(x_3); +lean_inc(x_2); +x_148 = l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitIfTarget_x3f___spec__1___at_Lean_Meta_splitIfTarget_x3f___spec__2(x_1, x_147, x_2, x_3, x_4, x_5, x_40); +if (lean_obj_tag(x_148) == 0) +{ +lean_object* x_149; +x_149 = lean_ctor_get(x_148, 0); +lean_inc(x_149); +if (lean_obj_tag(x_149) == 0) +{ +lean_object* x_150; +x_150 = lean_ctor_get(x_148, 1); +lean_inc(x_150); +lean_dec(x_148); +x_11 = x_147; +x_12 = x_150; +goto block_25; +} +else +{ +lean_object* x_151; lean_object* x_152; lean_object* x_153; lean_object* x_154; lean_object* x_155; lean_object* x_156; lean_object* x_157; lean_object* x_158; lean_object* x_159; lean_object* x_160; lean_object* x_161; +x_151 = lean_ctor_get(x_149, 0); +lean_inc(x_151); +if (lean_is_exclusive(x_149)) { + lean_ctor_release(x_149, 0); + x_152 = x_149; +} else { + lean_dec_ref(x_149); + x_152 = lean_box(0); +} +x_153 = lean_ctor_get(x_151, 0); +lean_inc(x_153); +x_154 = lean_ctor_get(x_151, 1); +lean_inc(x_154); +lean_dec(x_151); +x_155 = lean_ctor_get(x_148, 1); +lean_inc(x_155); +lean_dec(x_148); +x_156 = lean_ctor_get(x_153, 0); +lean_inc(x_156); +lean_dec(x_153); +x_157 = lean_ctor_get(x_154, 0); +lean_inc(x_157); +lean_dec(x_154); +x_158 = lean_box(0); +x_159 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_159, 0, x_157); +lean_ctor_set(x_159, 1, x_158); +x_160 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_160, 0, x_156); +lean_ctor_set(x_160, 1, x_159); +if (lean_is_scalar(x_152)) { + x_161 = lean_alloc_ctor(1, 1, 0); +} else { + x_161 = x_152; +} +lean_ctor_set(x_161, 0, x_160); +x_11 = x_161; +x_12 = x_155; +goto block_25; +} +} +else +{ +lean_object* x_162; lean_object* x_163; +lean_dec(x_10); +x_162 = lean_ctor_get(x_148, 0); +lean_inc(x_162); +x_163 = lean_ctor_get(x_148, 1); +lean_inc(x_163); +lean_dec(x_148); +x_26 = x_162; +x_27 = x_163; +goto block_33; +} +} +} +else +{ +lean_object* x_164; lean_object* x_165; +lean_dec(x_138); +x_164 = lean_box(0); +lean_inc(x_5); +lean_inc(x_4); +lean_inc(x_3); +lean_inc(x_2); +x_165 = l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitIfTarget_x3f___spec__1___at_Lean_Meta_splitIfTarget_x3f___spec__2(x_1, x_164, x_2, x_3, x_4, x_5, x_40); +if (lean_obj_tag(x_165) == 0) +{ +lean_object* x_166; +x_166 = lean_ctor_get(x_165, 0); +lean_inc(x_166); +if (lean_obj_tag(x_166) == 0) +{ +lean_object* x_167; +x_167 = lean_ctor_get(x_165, 1); +lean_inc(x_167); +lean_dec(x_165); +x_11 = x_164; +x_12 = x_167; +goto block_25; +} +else +{ +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; lean_object* x_175; lean_object* x_176; lean_object* x_177; lean_object* x_178; +x_168 = lean_ctor_get(x_166, 0); +lean_inc(x_168); +if (lean_is_exclusive(x_166)) { + lean_ctor_release(x_166, 0); + x_169 = x_166; +} else { + lean_dec_ref(x_166); + x_169 = lean_box(0); +} +x_170 = lean_ctor_get(x_168, 0); +lean_inc(x_170); +x_171 = lean_ctor_get(x_168, 1); +lean_inc(x_171); +lean_dec(x_168); +x_172 = lean_ctor_get(x_165, 1); +lean_inc(x_172); +lean_dec(x_165); +x_173 = lean_ctor_get(x_170, 0); +lean_inc(x_173); +lean_dec(x_170); +x_174 = lean_ctor_get(x_171, 0); +lean_inc(x_174); +lean_dec(x_171); +x_175 = lean_box(0); +x_176 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_176, 0, x_174); +lean_ctor_set(x_176, 1, x_175); +x_177 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_177, 0, x_173); +lean_ctor_set(x_177, 1, x_176); +if (lean_is_scalar(x_169)) { + x_178 = lean_alloc_ctor(1, 1, 0); +} else { + x_178 = x_169; +} +lean_ctor_set(x_178, 0, x_177); +x_11 = x_178; +x_12 = x_172; +goto block_25; +} +} +else +{ +lean_object* x_179; lean_object* x_180; +lean_dec(x_10); +x_179 = lean_ctor_get(x_165, 0); +lean_inc(x_179); +x_180 = lean_ctor_get(x_165, 1); +lean_inc(x_180); +lean_dec(x_165); +x_26 = x_179; +x_27 = x_180; +goto block_33; +} +} } } } else { -lean_object* x_147; lean_object* x_148; +lean_object* x_181; lean_object* x_182; lean_dec(x_37); lean_dec(x_10); lean_dec(x_1); -x_147 = lean_ctor_get(x_38, 0); -lean_inc(x_147); -x_148 = lean_ctor_get(x_38, 1); -lean_inc(x_148); +x_181 = lean_ctor_get(x_38, 0); +lean_inc(x_181); +x_182 = lean_ctor_get(x_38, 1); +lean_inc(x_182); lean_dec(x_38); -x_26 = x_147; -x_27 = x_148; +x_26 = x_181; +x_27 = x_182; goto block_33; } block_25: @@ -5191,6 +5674,19 @@ x_7 = l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitTarget_x3f___spec__1___at_Le return x_7; } } +lean_object* l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitTarget_x3f___spec__1___at_Lean_Meta_splitTarget_x3f___spec__2___lambda__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { +_start: +{ +lean_object* x_7; +x_7 = l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitTarget_x3f___spec__1___at_Lean_Meta_splitTarget_x3f___spec__2___lambda__1(x_1, x_2, x_3, x_4, x_5, x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +return x_7; +} +} lean_object* l_Lean_Meta_splitLocalDecl_x3f_match__1___rarg(lean_object* x_1, lean_object* x_2) { _start: { @@ -6835,6 +7331,15 @@ x_10 = l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitTarget_x3f___spec__1(x_9, x return x_10; } } +lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Split___hyg_1831_(lean_object* x_1) { +_start: +{ +lean_object* x_2; lean_object* x_3; +x_2 = l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitTarget_x3f___spec__1___at_Lean_Meta_splitTarget_x3f___spec__2___closed__4; +x_3 = l_Lean_registerTraceClass(x_2, x_1); +return x_3; +} +} lean_object* initialize_Init(lean_object*); lean_object* initialize_Lean_Meta_Match_MatchEqs(lean_object*); lean_object* initialize_Lean_Meta_Tactic_Generalize(lean_object*); @@ -6904,12 +7409,37 @@ l_Lean_Meta_Split_splitMatch___closed__7 = _init_l_Lean_Meta_Split_splitMatch___ lean_mark_persistent(l_Lean_Meta_Split_splitMatch___closed__7); l_Lean_Meta_Split_splitMatch___closed__8 = _init_l_Lean_Meta_Split_splitMatch___closed__8(); lean_mark_persistent(l_Lean_Meta_Split_splitMatch___closed__8); -l_Lean_Meta_Split_findSplit_x3f___closed__1 = _init_l_Lean_Meta_Split_findSplit_x3f___closed__1(); -lean_mark_persistent(l_Lean_Meta_Split_findSplit_x3f___closed__1); -l_Lean_Meta_Split_findSplit_x3f___closed__2 = _init_l_Lean_Meta_Split_findSplit_x3f___closed__2(); -lean_mark_persistent(l_Lean_Meta_Split_findSplit_x3f___closed__2); +l_Std_Range_forIn_loop___at_Lean_Meta_Split_findSplit_x3f_isCandidate___spec__1___closed__1 = _init_l_Std_Range_forIn_loop___at_Lean_Meta_Split_findSplit_x3f_isCandidate___spec__1___closed__1(); +lean_mark_persistent(l_Std_Range_forIn_loop___at_Lean_Meta_Split_findSplit_x3f_isCandidate___spec__1___closed__1); +l_Std_Range_forIn_loop___at_Lean_Meta_Split_findSplit_x3f_isCandidate___spec__1___closed__2 = _init_l_Std_Range_forIn_loop___at_Lean_Meta_Split_findSplit_x3f_isCandidate___spec__1___closed__2(); +lean_mark_persistent(l_Std_Range_forIn_loop___at_Lean_Meta_Split_findSplit_x3f_isCandidate___spec__1___closed__2); +l_Lean_Meta_Split_findSplit_x3f_isCandidate___closed__1 = _init_l_Lean_Meta_Split_findSplit_x3f_isCandidate___closed__1(); +lean_mark_persistent(l_Lean_Meta_Split_findSplit_x3f_isCandidate___closed__1); +l_Lean_Meta_Split_findSplit_x3f_isCandidate___closed__2 = _init_l_Lean_Meta_Split_findSplit_x3f_isCandidate___closed__2(); +lean_mark_persistent(l_Lean_Meta_Split_findSplit_x3f_isCandidate___closed__2); +l_Lean_Meta_Split_findSplit_x3f_isCandidate___closed__3 = _init_l_Lean_Meta_Split_findSplit_x3f_isCandidate___closed__3(); +lean_mark_persistent(l_Lean_Meta_Split_findSplit_x3f_isCandidate___closed__3); +l_Lean_Meta_Split_findSplit_x3f_isCandidate___closed__4 = _init_l_Lean_Meta_Split_findSplit_x3f_isCandidate___closed__4(); +lean_mark_persistent(l_Lean_Meta_Split_findSplit_x3f_isCandidate___closed__4); +l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitTarget_x3f___spec__1___at_Lean_Meta_splitTarget_x3f___spec__2___closed__1 = _init_l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitTarget_x3f___spec__1___at_Lean_Meta_splitTarget_x3f___spec__2___closed__1(); +lean_mark_persistent(l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitTarget_x3f___spec__1___at_Lean_Meta_splitTarget_x3f___spec__2___closed__1); +l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitTarget_x3f___spec__1___at_Lean_Meta_splitTarget_x3f___spec__2___closed__2 = _init_l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitTarget_x3f___spec__1___at_Lean_Meta_splitTarget_x3f___spec__2___closed__2(); +lean_mark_persistent(l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitTarget_x3f___spec__1___at_Lean_Meta_splitTarget_x3f___spec__2___closed__2); +l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitTarget_x3f___spec__1___at_Lean_Meta_splitTarget_x3f___spec__2___closed__3 = _init_l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitTarget_x3f___spec__1___at_Lean_Meta_splitTarget_x3f___spec__2___closed__3(); +lean_mark_persistent(l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitTarget_x3f___spec__1___at_Lean_Meta_splitTarget_x3f___spec__2___closed__3); +l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitTarget_x3f___spec__1___at_Lean_Meta_splitTarget_x3f___spec__2___closed__4 = _init_l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitTarget_x3f___spec__1___at_Lean_Meta_splitTarget_x3f___spec__2___closed__4(); +lean_mark_persistent(l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitTarget_x3f___spec__1___at_Lean_Meta_splitTarget_x3f___spec__2___closed__4); +l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitTarget_x3f___spec__1___at_Lean_Meta_splitTarget_x3f___spec__2___closed__5 = _init_l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitTarget_x3f___spec__1___at_Lean_Meta_splitTarget_x3f___spec__2___closed__5(); +lean_mark_persistent(l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitTarget_x3f___spec__1___at_Lean_Meta_splitTarget_x3f___spec__2___closed__5); +l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitTarget_x3f___spec__1___at_Lean_Meta_splitTarget_x3f___spec__2___closed__6 = _init_l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitTarget_x3f___spec__1___at_Lean_Meta_splitTarget_x3f___spec__2___closed__6(); +lean_mark_persistent(l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitTarget_x3f___spec__1___at_Lean_Meta_splitTarget_x3f___spec__2___closed__6); +l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitTarget_x3f___spec__1___at_Lean_Meta_splitTarget_x3f___spec__2___closed__7 = _init_l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitTarget_x3f___spec__1___at_Lean_Meta_splitTarget_x3f___spec__2___closed__7(); +lean_mark_persistent(l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitTarget_x3f___spec__1___at_Lean_Meta_splitTarget_x3f___spec__2___closed__7); l_Lean_Meta_splitLocalDecl_x3f___lambda__1___closed__1 = _init_l_Lean_Meta_splitLocalDecl_x3f___lambda__1___closed__1(); lean_mark_persistent(l_Lean_Meta_splitLocalDecl_x3f___lambda__1___closed__1); +res = l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_Split___hyg_1831_(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); return lean_io_result_mk_ok(lean_box(0)); } #ifdef __cplusplus diff --git a/stage0/stdlib/Lean/Meta/Tactic/SplitIf.c b/stage0/stdlib/Lean/Meta/Tactic/SplitIf.c index 68f485aa06..910dc32583 100644 --- a/stage0/stdlib/Lean/Meta/Tactic/SplitIf.c +++ b/stage0/stdlib/Lean/Meta/Tactic/SplitIf.c @@ -21,7 +21,6 @@ static lean_object* l_Lean_Meta_SplitIf_discharge_x3f___closed__2; lean_object* l_Lean_registerTraceClass(lean_object*, lean_object*); static lean_object* l_Array_findSomeRevM_x3f_find___at_Lean_Meta_SplitIf_discharge_x3f___spec__3___closed__2; lean_object* l_Lean_stringToMessageData(lean_object*); -static lean_object* l_Lean_Meta_SplitIf_findIfToSplit_x3f___closed__2; lean_object* l_Lean_Meta_simpIfLocalDecl_match__1___rarg(lean_object*, lean_object*, lean_object*); uint8_t l_Lean_LocalDecl_isAuxDecl(lean_object*); lean_object* lean_name_mk_string(lean_object*, lean_object*); @@ -75,7 +74,6 @@ lean_object* lean_nat_sub(lean_object*, lean_object*); static lean_object* l_Lean_EnvExtensionInterfaceUnsafe_getState___at_Lean_Meta_SplitIf_getSimpContext___spec__2___closed__1; lean_object* l_Lean_addTrace___at_Lean_Meta_mkCongrLemma___spec__9(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Std_PersistentArray_findSomeRevM_x3f___at_Lean_Meta_SplitIf_discharge_x3f___spec__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l_Lean_Meta_SplitIf_findIfToSplit_x3f___closed__3; static lean_object* l_Lean_EnvExtensionInterfaceUnsafe_getState___at_Lean_Meta_SplitIf_getSimpContext___spec__2___closed__3; lean_object* l_Array_findSomeRevM_x3f_find___at_Lean_Meta_SplitIf_discharge_x3f___spec__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* l_Lean_LocalContext_findDeclRevM_x3f___at_Lean_Meta_SplitIf_discharge_x3f___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -110,7 +108,7 @@ lean_object* l_Lean_LocalDecl_toExpr(lean_object*); uint8_t l_Lean_Expr_isConstOf(lean_object*, lean_object*); lean_object* l_Lean_Meta_SplitIf_discharge_x3f_match__1(lean_object*); lean_object* l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitIfLocalDecl_x3f___spec__1___at_Lean_Meta_splitIfLocalDecl_x3f___spec__2___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_SplitIf___hyg_1016_(lean_object*); +lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_SplitIf___hyg_1020_(lean_object*); static lean_object* l_Lean_Meta_SplitIf_discharge_x3f___lambda__2___closed__7; lean_object* l_Lean_Meta_SplitIf_ext___elambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_Meta_simpIfTarget___closed__5; @@ -128,6 +126,7 @@ lean_object* l_Lean_Meta_SavedState_restore(lean_object*, lean_object*, lean_obj static lean_object* l_Lean_Meta_SplitIf_initFn____x40_Lean_Meta_Tactic_SplitIf___hyg_4____lambda__1___closed__2; extern lean_object* l_Std_PersistentHashMap_empty___at_Lean_Meta_Instances_instanceNames___default___spec__1; lean_object* l_Lean_Meta_withMVarContext___at___private_Lean_Meta_SynthInstance_0__Lean_Meta_synthPendingImp___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_Meta_SplitIf_findIfToSplit_x3f___lambda__1___closed__1; static lean_object* l_Lean_Meta_SplitIf_ext___closed__4; static lean_object* l_Lean_Meta_SplitIf_splitIfAt_x3f___lambda__2___closed__2; lean_object* l_Lean_EnvExtensionInterfaceUnsafe_instInhabitedExt___lambda__1(lean_object*); @@ -182,6 +181,7 @@ static lean_object* l_Lean_Meta_SplitIf_initFn____x40_Lean_Meta_Tactic_SplitIf__ lean_object* l_unsafeCast(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_SimpLemmas_addConst(lean_object*, lean_object*, uint8_t, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_SplitIf_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*); +static lean_object* l_Lean_Meta_SplitIf_findIfToSplit_x3f___lambda__1___closed__2; lean_object* l_Lean_Meta_SplitIf_splitIfAt_x3f___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_SplitIf_ext___closed__1; lean_object* l_Lean_registerLazyInitExtension___rarg(lean_object*, lean_object*); @@ -3370,45 +3370,7 @@ x_2 = lean_alloc_closure((void*)(l_Lean_Meta_SplitIf_findIfToSplit_x3f_match__1_ return x_2; } } -uint8_t l_Lean_Meta_SplitIf_findIfToSplit_x3f___lambda__1(lean_object* x_1) { -_start: -{ -uint8_t x_2; -x_2 = l_Lean_Expr_hasLooseBVars(x_1); -if (x_2 == 0) -{ -uint8_t x_3; -x_3 = l_Lean_Expr_isIte(x_1); -if (x_3 == 0) -{ -uint8_t x_4; -x_4 = l_Lean_Expr_isDIte(x_1); -return x_4; -} -else -{ -uint8_t x_5; -x_5 = 1; -return x_5; -} -} -else -{ -uint8_t x_6; -x_6 = 0; -return x_6; -} -} -} -static lean_object* _init_l_Lean_Meta_SplitIf_findIfToSplit_x3f___closed__1() { -_start: -{ -lean_object* x_1; -x_1 = lean_alloc_closure((void*)(l_Lean_Meta_SplitIf_findIfToSplit_x3f___lambda__1___boxed), 1, 0); -return x_1; -} -} -static lean_object* _init_l_Lean_Meta_SplitIf_findIfToSplit_x3f___closed__2() { +static lean_object* _init_l_Lean_Meta_SplitIf_findIfToSplit_x3f___lambda__1___closed__1() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; @@ -3418,16 +3380,82 @@ x_3 = lean_nat_sub(x_1, x_2); return x_3; } } -static lean_object* _init_l_Lean_Meta_SplitIf_findIfToSplit_x3f___closed__3() { +static lean_object* _init_l_Lean_Meta_SplitIf_findIfToSplit_x3f___lambda__1___closed__2() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Meta_SplitIf_findIfToSplit_x3f___closed__2; +x_1 = l_Lean_Meta_SplitIf_findIfToSplit_x3f___lambda__1___closed__1; x_2 = lean_unsigned_to_nat(1u); x_3 = lean_nat_sub(x_1, x_2); return x_3; } } +uint8_t l_Lean_Meta_SplitIf_findIfToSplit_x3f___lambda__1(lean_object* x_1) { +_start: +{ +uint8_t x_2; +x_2 = l_Lean_Expr_isIte(x_1); +if (x_2 == 0) +{ +uint8_t x_3; +x_3 = l_Lean_Expr_isDIte(x_1); +if (x_3 == 0) +{ +uint8_t x_4; +x_4 = 0; +return x_4; +} +else +{ +lean_object* x_5; lean_object* x_6; uint8_t x_7; +x_5 = l_Lean_Meta_SplitIf_findIfToSplit_x3f___lambda__1___closed__2; +x_6 = l_Lean_Expr_getRevArg_x21(x_1, x_5); +x_7 = l_Lean_Expr_hasLooseBVars(x_6); +lean_dec(x_6); +if (x_7 == 0) +{ +uint8_t x_8; +x_8 = 1; +return x_8; +} +else +{ +uint8_t x_9; +x_9 = 0; +return x_9; +} +} +} +else +{ +lean_object* x_10; lean_object* x_11; uint8_t x_12; +x_10 = l_Lean_Meta_SplitIf_findIfToSplit_x3f___lambda__1___closed__2; +x_11 = l_Lean_Expr_getRevArg_x21(x_1, x_10); +x_12 = l_Lean_Expr_hasLooseBVars(x_11); +lean_dec(x_11); +if (x_12 == 0) +{ +uint8_t x_13; +x_13 = 1; +return x_13; +} +else +{ +uint8_t x_14; +x_14 = 0; +return x_14; +} +} +} +} +static lean_object* _init_l_Lean_Meta_SplitIf_findIfToSplit_x3f___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_Meta_SplitIf_findIfToSplit_x3f___lambda__1___boxed), 1, 0); +return x_1; +} +} lean_object* l_Lean_Meta_SplitIf_findIfToSplit_x3f(lean_object* x_1) { _start: { @@ -3453,7 +3481,7 @@ if (x_8 == 0) { lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; x_9 = lean_ctor_get(x_6, 0); -x_10 = l_Lean_Meta_SplitIf_findIfToSplit_x3f___closed__3; +x_10 = l_Lean_Meta_SplitIf_findIfToSplit_x3f___lambda__1___closed__2; x_11 = l_Lean_Expr_getRevArg_x21(x_9, x_10); lean_dec(x_9); lean_inc(x_11); @@ -3491,7 +3519,7 @@ lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; x_16 = lean_ctor_get(x_6, 0); lean_inc(x_16); lean_dec(x_6); -x_17 = l_Lean_Meta_SplitIf_findIfToSplit_x3f___closed__3; +x_17 = l_Lean_Meta_SplitIf_findIfToSplit_x3f___lambda__1___closed__2; x_18 = l_Lean_Expr_getRevArg_x21(x_16, x_17); lean_dec(x_16); lean_inc(x_18); @@ -6391,7 +6419,7 @@ x_10 = l_Lean_commitWhenSome_x3f___at_Lean_Meta_splitIfLocalDecl_x3f___spec__1__ return x_10; } } -lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_SplitIf___hyg_1016_(lean_object* x_1) { +lean_object* l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_SplitIf___hyg_1020_(lean_object* x_1) { _start: { lean_object* x_2; lean_object* x_3; @@ -6538,12 +6566,12 @@ l_Lean_Meta_SplitIf_discharge_x3f___closed__14 = _init_l_Lean_Meta_SplitIf_disch lean_mark_persistent(l_Lean_Meta_SplitIf_discharge_x3f___closed__14); l_Lean_Meta_SplitIf_discharge_x3f___closed__15 = _init_l_Lean_Meta_SplitIf_discharge_x3f___closed__15(); lean_mark_persistent(l_Lean_Meta_SplitIf_discharge_x3f___closed__15); +l_Lean_Meta_SplitIf_findIfToSplit_x3f___lambda__1___closed__1 = _init_l_Lean_Meta_SplitIf_findIfToSplit_x3f___lambda__1___closed__1(); +lean_mark_persistent(l_Lean_Meta_SplitIf_findIfToSplit_x3f___lambda__1___closed__1); +l_Lean_Meta_SplitIf_findIfToSplit_x3f___lambda__1___closed__2 = _init_l_Lean_Meta_SplitIf_findIfToSplit_x3f___lambda__1___closed__2(); +lean_mark_persistent(l_Lean_Meta_SplitIf_findIfToSplit_x3f___lambda__1___closed__2); l_Lean_Meta_SplitIf_findIfToSplit_x3f___closed__1 = _init_l_Lean_Meta_SplitIf_findIfToSplit_x3f___closed__1(); lean_mark_persistent(l_Lean_Meta_SplitIf_findIfToSplit_x3f___closed__1); -l_Lean_Meta_SplitIf_findIfToSplit_x3f___closed__2 = _init_l_Lean_Meta_SplitIf_findIfToSplit_x3f___closed__2(); -lean_mark_persistent(l_Lean_Meta_SplitIf_findIfToSplit_x3f___closed__2); -l_Lean_Meta_SplitIf_findIfToSplit_x3f___closed__3 = _init_l_Lean_Meta_SplitIf_findIfToSplit_x3f___closed__3(); -lean_mark_persistent(l_Lean_Meta_SplitIf_findIfToSplit_x3f___closed__3); l_Lean_Meta_SplitIf_splitIfAt_x3f___lambda__2___closed__1 = _init_l_Lean_Meta_SplitIf_splitIfAt_x3f___lambda__2___closed__1(); lean_mark_persistent(l_Lean_Meta_SplitIf_splitIfAt_x3f___lambda__2___closed__1); l_Lean_Meta_SplitIf_splitIfAt_x3f___lambda__2___closed__2 = _init_l_Lean_Meta_SplitIf_splitIfAt_x3f___lambda__2___closed__2(); @@ -6570,7 +6598,7 @@ l_Lean_Meta_simpIfLocalDecl___closed__3 = _init_l_Lean_Meta_simpIfLocalDecl___cl lean_mark_persistent(l_Lean_Meta_simpIfLocalDecl___closed__3); l_Lean_Meta_simpIfLocalDecl___closed__4 = _init_l_Lean_Meta_simpIfLocalDecl___closed__4(); lean_mark_persistent(l_Lean_Meta_simpIfLocalDecl___closed__4); -res = l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_SplitIf___hyg_1016_(lean_io_mk_world()); +res = l_Lean_Meta_initFn____x40_Lean_Meta_Tactic_SplitIf___hyg_1020_(lean_io_mk_world()); if (lean_io_result_is_error(res)) return res; lean_dec_ref(res); return lean_io_result_mk_ok(lean_box(0)); diff --git a/stage0/stdlib/Lean/PrettyPrinter/Delaborator/Builtins.c b/stage0/stdlib/Lean/PrettyPrinter/Delaborator/Builtins.c index 6fcd46a62e..f5d93e3a35 100644 --- a/stage0/stdlib/Lean/PrettyPrinter/Delaborator/Builtins.c +++ b/stage0/stdlib/Lean/PrettyPrinter/Delaborator/Builtins.c @@ -45,6 +45,7 @@ lean_object* l_Lean_getPPLetVarTypes___boxed(lean_object*); static lean_object* l_Lean_PrettyPrinter_Delaborator_delabDoElems___closed__1; lean_object* l___private_Lean_Meta_Basic_0__Lean_Meta_forallTelescopeReducingAuxAux___rarg(uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_foldrMUnsafe_fold___at_Lean_PrettyPrinter_Delaborator_delabForall___spec__2(lean_object*, lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__10; static lean_object* l___regBuiltin_Lean_PrettyPrinter_Delaborator_delabNameMkNum___closed__3; lean_object* l_Lean_MonadRef_mkInfoFromRefPos___at_Lean_PrettyPrinter_Delaborator_delab___spec__3___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_isLHSGoal_x3f(lean_object*); @@ -116,12 +117,10 @@ lean_object* lean_array_uget(lean_object*, size_t); static lean_object* l_Lean_PrettyPrinter_Delaborator_SubExpr_withMDataExpr___at_Lean_PrettyPrinter_Delaborator_isRegularApp___spec__4___closed__1; lean_object* l_Std_Range_forIn_loop___at_Lean_PrettyPrinter_Delaborator_unexpandStructureInstance___spec__6___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_foldrMUnsafe_fold___at_Lean_PrettyPrinter_Delaborator_delabForall___spec__4(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_PrettyPrinter_Delaborator_delabDoElems_match__1___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Delaborator_delabOfScientific_match__2___rarg(lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_PrettyPrinter_Delaborator_delabLam___lambda__3___closed__2; lean_object* l_Lean_getPPAnalysisNamedArg___boxed(lean_object*); lean_object* l_Array_mapMUnsafe_map___at_Lean_PrettyPrinter_Delaborator_delabAppMatch___spec__12___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_PrettyPrinter_Delaborator_SubExpr_withAppArg___at_Lean_PrettyPrinter_Delaborator_delabMData___spec__4(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_List_forIn_loop___at_Lean_PrettyPrinter_Delaborator_isRegularApp___spec__3(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_PrettyPrinter_Delaborator_delabAppExplicit___lambda__5___closed__9; lean_object* l_Lean_Expr_bindingDomain_x21(lean_object*); @@ -145,11 +144,11 @@ static lean_object* l___regBuiltin_Lean_PrettyPrinter_Delaborator_delabFVar___cl lean_object* l___regBuiltin_Lean_PrettyPrinter_Delaborator_delabNameMkNum(lean_object*); static lean_object* l_Lean_PrettyPrinter_Delaborator_delabLam___lambda__3___closed__1; lean_object* l_Array_mapMUnsafe_map___at_Lean_PrettyPrinter_Delaborator_delabAppMatch___spec__14(lean_object*, lean_object*, lean_object*, lean_object*, size_t, size_t, lean_object*); +lean_object* l_Lean_PrettyPrinter_Delaborator_SubExpr_withBindingBody___at_Lean_PrettyPrinter_Delaborator_delabLetFun___spec__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_PrettyPrinter_Delaborator_unexpandStructureInstance___lambda__3___closed__15; uint8_t l_Array_anyMUnsafe_any___at_Lean_PrettyPrinter_Delaborator_delabAppExplicit___spec__1(lean_object*, size_t, size_t); lean_object* l_Lean_PrettyPrinter_Delaborator_SubExpr_withAppArg___at_Lean_PrettyPrinter_Delaborator_delabDoElems___spec__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_array_uset(lean_object*, size_t, lean_object*); -lean_object* l_Lean_PrettyPrinter_Delaborator_SubExpr_withBindingBody___at_Lean_PrettyPrinter_Delaborator_delabDIte_delabBranch___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_PrettyPrinter_Delaborator_delabSort___closed__10; static lean_object* l___regBuiltin_Lean_PrettyPrinter_Delaborator_delabMData___closed__4; static lean_object* l_Lean_PrettyPrinter_Delaborator_delabProjectionApp___closed__2; @@ -194,9 +193,9 @@ lean_object* l_Lean_PrettyPrinter_Delaborator_withMDataOptions___at_Lean_PrettyP lean_object* l_Lean_PrettyPrinter_Delaborator_delabConst___lambda__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_st_ref_get(lean_object*, lean_object*); static lean_object* l_Lean_PrettyPrinter_Delaborator_delabLam___lambda__3___closed__3; +lean_object* l_Lean_PrettyPrinter_Delaborator_SubExpr_withBindingBody___at_Lean_PrettyPrinter_Delaborator_delabLetFun___spec__2___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_List_tailD___rarg(lean_object*, lean_object*); lean_object* l_Array_mapMUnsafe_map___at_Lean_PrettyPrinter_Delaborator_delabConst___spec__1___boxed(lean_object*, lean_object*, lean_object*); -static lean_object* l_Lean_PrettyPrinter_Delaborator_delabLetE___closed__7; lean_object* l_Lean_PrettyPrinter_Delaborator_withMDataOptions(lean_object*); lean_object* l_Lean_PrettyPrinter_Delaborator_delabAppExplicit___lambda__7(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l___regBuiltin_Lean_PrettyPrinter_Delaborator_delabFVar___closed__8; @@ -269,7 +268,6 @@ lean_object* l_Lean_PrettyPrinter_Delaborator_unresolveNameGlobal_unresolveNameC static lean_object* l_Lean_PrettyPrinter_Delaborator_delabNameMkStr___closed__1; lean_object* l_Array_shrink___rarg(lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Delaborator_unfoldMDatas___boxed(lean_object*); -lean_object* l_Lean_PrettyPrinter_Delaborator_SubExpr_withBindingBody___at_Lean_PrettyPrinter_Delaborator_delabDIte_delabBranch___spec__1___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_PrettyPrinter_Delaborator_delabAppImplicit___lambda__4___closed__1; lean_object* l_Lean_PrettyPrinter_Delaborator_delabDIte_match__1(lean_object*); uint8_t l_Lean_PrettyPrinter_Delaborator_isCoe(lean_object*); @@ -286,6 +284,7 @@ lean_object* l_Lean_PrettyPrinter_Delaborator_delabDo___lambda__1___boxed(lean_o lean_object* l_Lean_Expr_appArg_x21(lean_object*); static lean_object* l_Lean_PrettyPrinter_Delaborator_delabDo___lambda__1___closed__4; lean_object* l_Lean_PrettyPrinter_Delaborator_unfoldMDatas_match__1___rarg(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_PrettyPrinter_Delaborator_SubExpr_withBindingBody___at_Lean_PrettyPrinter_Delaborator_delabLetFun___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* l_Lean_PrettyPrinter_Delaborator_delabOfScientific_match__2(lean_object*); static lean_object* l_Lean_PrettyPrinter_Delaborator_delabNamedPattern___closed__2; lean_object* l_Array_mapMUnsafe_map___at_Lean_PrettyPrinter_Delaborator_delabConst___spec__1(size_t, size_t, lean_object*); @@ -305,7 +304,6 @@ lean_object* l_Lean_KeyedDeclsAttribute_addBuiltin___rarg(lean_object*, lean_obj lean_object* l_Lean_PrettyPrinter_Delaborator_delabDIte_delabBranch___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l___regBuiltin_Lean_PrettyPrinter_Delaborator_delabDo___closed__5; lean_object* l_Lean_PrettyPrinter_Delaborator_delabForall___lambda__1(uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l_Lean_PrettyPrinter_Delaborator_delabLetE___closed__10; static lean_object* l_Lean_PrettyPrinter_Delaborator_delabAppMatch___closed__2; uint8_t l_USize_decLt(size_t, size_t); lean_object* l_Lean_PrettyPrinter_Delaborator_delabAppExplicit_match__1___rarg(lean_object*, lean_object*, lean_object*); @@ -330,6 +328,7 @@ lean_object* l_Lean_PrettyPrinter_Delaborator_delabAppMatch___lambda__2___boxed( lean_object* l_Lean_PrettyPrinter_Delaborator_delabOfScientific_match__1(lean_object*); static lean_object* l_Array_mapIdxM_map___at___private_Lean_PrettyPrinter_Delaborator_Builtins_0__Lean_PrettyPrinter_Delaborator_delabPatterns___spec__5___closed__3; static lean_object* l___regBuiltin_Lean_PrettyPrinter_Delaborator_delabProj___closed__4; +lean_object* l_Array_anyMUnsafe_any___at_Lean_PrettyPrinter_Delaborator_delabLam___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Delaborator_delabAppImplicit_match__1(lean_object*); static lean_object* l___regBuiltin_Lean_PrettyPrinter_Delaborator_delabDo___closed__2; static lean_object* l_Lean_PrettyPrinter_Delaborator_delabDIte_delabBranch___closed__1; @@ -342,7 +341,6 @@ lean_object* l_Lean_PrettyPrinter_Delaborator_delabProjectionApp_match__3___rarg static lean_object* l___regBuiltin_Lean_PrettyPrinter_Delaborator_delabBVar___closed__5; lean_object* l_Lean_PrettyPrinter_Delaborator_ParamKind_defVal___default; lean_object* l_Lean_PrettyPrinter_Delaborator_SubExpr_withAppFn___at___private_Lean_PrettyPrinter_Delaborator_Builtins_0__Lean_PrettyPrinter_Delaborator_delabPatterns___spec__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l_Lean_PrettyPrinter_Delaborator_delabLetE___closed__5; lean_object* l_Array_zip___rarg(lean_object*, lean_object*); static lean_object* l_Lean_PrettyPrinter_Delaborator_delabAppMatch___lambda__6___closed__10; static lean_object* l___regBuiltin_Lean_PrettyPrinter_Delaborator_delabMVar___closed__1; @@ -354,6 +352,7 @@ lean_object* l___private_Lean_PrettyPrinter_Delaborator_Builtins_0__Lean_PrettyP lean_object* l_Lean_Meta_lambdaTelescope___at_Lean_PrettyPrinter_Delaborator_delabAppMatch___spec__4___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_mkAppN(lean_object*, lean_object*); lean_object* l___regBuiltin_Lean_PrettyPrinter_Delaborator_delabOfScientific(lean_object*); +lean_object* l_Lean_PrettyPrinter_Delaborator_delabLetFun_match__1(lean_object*); lean_object* l_Array_anyMUnsafe_any___at_Lean_PrettyPrinter_Delaborator_hasIdent___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l___regBuiltin_Lean_PrettyPrinter_Delaborator_delabMVar___closed__3; lean_object* l_Lean_PrettyPrinter_Delaborator_delabDo(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -387,11 +386,13 @@ static lean_object* l_Array_mapMUnsafe_map___at_Lean_PrettyPrinter_Delaborator_d static lean_object* l_Lean_PrettyPrinter_Delaborator_SubExpr_withMDataExpr___at_Lean_PrettyPrinter_Delaborator_withMDataOptions___spec__2___rarg___closed__2; lean_object* l___private_Lean_PrettyPrinter_Delaborator_Builtins_0__Lean_PrettyPrinter_Delaborator_delabBinders(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_PrettyPrinter_Delaborator_delabMVar___closed__3; +uint8_t l_Array_anyMUnsafe_any___at_Lean_PrettyPrinter_Delaborator_delabLam___spec__1(lean_object*, lean_object*, size_t, size_t); static lean_object* l_Lean_PrettyPrinter_Delaborator_delabOfScientific___lambda__1___closed__5; lean_object* l___private_Lean_PrettyPrinter_Delaborator_Builtins_0__Lean_PrettyPrinter_Delaborator_delabBinders_match__1(lean_object*); uint8_t lean_nat_dec_eq(lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Delaborator_delabAppImplicit___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*); uint8_t l_Array_anyMUnsafe_any___at_Lean_PrettyPrinter_Delaborator_hasIdent___spec__1(lean_object*, lean_object*, size_t, size_t); +static lean_object* l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__6; lean_object* l_Lean_PrettyPrinter_Delaborator_isRegularApp___lambda__1(uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Delaborator_delabDIte_delabBranch_match__1___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Delaborator_delabProj_match__1___rarg(lean_object*, lean_object*, lean_object*); @@ -410,7 +411,6 @@ lean_object* l_Lean_PrettyPrinter_Delaborator_hasIdent___boxed(lean_object*, lea lean_object* lean_nat_sub(lean_object*, lean_object*); lean_object* l_Array_mapMUnsafe_map___at_Lean_PrettyPrinter_Delaborator_delabAppMatch___spec__15(lean_object*, lean_object*, size_t, size_t, lean_object*); static lean_object* l___regBuiltin_Lean_PrettyPrinter_Delaborator_delabNameMkStr___closed__1; -lean_object* l_Lean_PrettyPrinter_Delaborator_SubExpr_withAppFn___at_Lean_PrettyPrinter_Delaborator_delabMData___spec__5(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_PrettyPrinter_Delaborator_delabSort___closed__14; static lean_object* l_Lean_PrettyPrinter_Delaborator_unresolveNameGlobal___lambda__2___closed__1; lean_object* l___regBuiltin_Lean_PrettyPrinter_Delaborator_delabAppImplicit(lean_object*); @@ -451,7 +451,6 @@ static lean_object* l___regBuiltin_Lean_PrettyPrinter_Delaborator_delabFVar___cl lean_object* l_Lean_PrettyPrinter_Delaborator_delabConst___lambda__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_PrettyPrinter_Delaborator_unexpandStructureInstance___lambda__3___closed__2; lean_object* l_Lean_PrettyPrinter_Delaborator_reifyName_match__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l_Lean_PrettyPrinter_Delaborator_delabLetE___closed__6; lean_object* lean_array_get(lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_PrettyPrinter_Delaborator_delabMData___closed__5; static lean_object* l___regBuiltin_Lean_PrettyPrinter_Delaborator_delabAppMatch___closed__2; @@ -508,6 +507,7 @@ static lean_object* l_Lean_PrettyPrinter_Delaborator_delabLam___lambda__1___clos lean_object* l___regBuiltin_Lean_PrettyPrinter_Delaborator_delabOfNat(lean_object*); lean_object* l_Lean_getConstInfo___at_Lean_PrettyPrinter_Delaborator_delabAppMatch___spec__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_PrettyPrinter_Delaborator_unexpandStructureInstance___lambda__3___closed__6; +lean_object* l_Lean_PrettyPrinter_Delaborator_SubExpr_withBindingDomain___at_Lean_PrettyPrinter_Delaborator_delabLetFun___spec__3(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Delaborator_SubExpr_descend___at_Lean_PrettyPrinter_Delaborator_unexpandStructureInstance___spec__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_Meta_Basic_0__Lean_Meta_forallTelescopeReducingAux___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); uint8_t l_Lean_LocalDecl_binderInfo(lean_object*); @@ -562,18 +562,21 @@ static lean_object* l_Lean_PrettyPrinter_Delaborator_delabLam___lambda__1___clos static lean_object* l___regBuiltin_Lean_PrettyPrinter_Delaborator_delabForall___closed__4; static lean_object* l_Lean_PrettyPrinter_Delaborator_delabAppExplicit___lambda__5___closed__1; lean_object* l___private_Lean_PrettyPrinter_Delaborator_Builtins_0__Lean_PrettyPrinter_Delaborator_delabPatterns___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_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__11; static lean_object* l___regBuiltin_Lean_PrettyPrinter_Delaborator_delabLetE___closed__5; lean_object* l_Lean_PrettyPrinter_Delaborator_delabDoElems___lambda__5___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Delaborator_delabLit_match__1___rarg(lean_object*, lean_object*, lean_object*); static lean_object* l___private_Lean_PrettyPrinter_Delaborator_Builtins_0__Lean_PrettyPrinter_Delaborator_shouldGroupWithNext___closed__1; lean_object* l_Lean_PrettyPrinter_Delaborator_unexpandStructureInstance_match__2___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Syntax_mkStrLit(lean_object*, lean_object*); +static lean_object* l_Lean_PrettyPrinter_Delaborator_delabMData___closed__6; static lean_object* l_Lean_PrettyPrinter_Delaborator_delabForall___lambda__1___closed__4; static lean_object* l_Lean_PrettyPrinter_Delaborator_getParamKinds___closed__1; uint8_t l_Lean_Expr_isAppOfArity(lean_object*, lean_object*, lean_object*); static lean_object* l_Std_Range_forIn_loop___at_Lean_PrettyPrinter_Delaborator_unexpandStructureInstance___spec__2___closed__5; static lean_object* l_Lean_PrettyPrinter_Delaborator_SubExpr_withProj___at_Lean_PrettyPrinter_Delaborator_delabProj___spec__1___closed__2; lean_object* l_Lean_PrettyPrinter_Delaborator_delabLetE___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_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__1; static lean_object* l_Lean_PrettyPrinter_Delaborator_delabConst___closed__10; lean_object* l_Lean_getRevAliases(lean_object*, lean_object*); extern lean_object* l_Lean_instInhabitedExpr; @@ -593,11 +596,13 @@ uint8_t l_Array_isEmpty___rarg(lean_object*); static lean_object* l___regBuiltin_Lean_PrettyPrinter_Delaborator_delabOfNat___closed__3; static lean_object* l_Lean_PrettyPrinter_Delaborator_delabAppExplicit___lambda__5___closed__7; lean_object* l_Lean_PrettyPrinter_Delaborator_delabAppMatch_match__2___rarg(lean_object*, lean_object*); +static lean_object* l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__5; static lean_object* l_Std_Range_forIn_loop___at_Lean_PrettyPrinter_Delaborator_isRegularApp___spec__7___closed__1; extern lean_object* l_Lean_instInhabitedSyntax; uint8_t l_Lean_Expr_isConstOf(lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Delaborator_getUnusedName(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_mapMUnsafe_map___at_Lean_PrettyPrinter_Delaborator_unexpandStructureInstance___spec__5(lean_object*, lean_object*, size_t, size_t, lean_object*); +uint8_t l_Lean_isLetFun(lean_object*); static lean_object* l_Lean_PrettyPrinter_Delaborator_delabAppExplicit___lambda__5___closed__10; static lean_object* l_Std_Range_forIn_loop___at_Lean_PrettyPrinter_Delaborator_isRegularApp___spec__7___closed__2; static lean_object* l___private_Lean_PrettyPrinter_Delaborator_Builtins_0__Lean_PrettyPrinter_Delaborator_skippingBinders_loop___rarg___lambda__1___closed__3; @@ -646,7 +651,6 @@ lean_object* l_Array_mapMUnsafe_map___at_Lean_PrettyPrinter_Delaborator_delabApp lean_object* l_Lean_PrettyPrinter_Delaborator_delabProjectionApp_match__2___rarg(lean_object*, lean_object*, lean_object*); static lean_object* l___regBuiltin_Lean_PrettyPrinter_Delaborator_delabAppImplicit___closed__3; uint8_t l_Lean_Expr_isAutoParam(lean_object*); -lean_object* l_Array_anyMUnsafe_any___at_Lean_PrettyPrinter_Delaborator_delabLam___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Delaborator_delabProjectionApp_match__2(lean_object*); static lean_object* l_Lean_PrettyPrinter_Delaborator_unexpandStructureInstance___lambda__3___closed__11; uint8_t l_Lean_Expr_isLambda(lean_object*); @@ -657,6 +661,7 @@ lean_object* l_Lean_PrettyPrinter_Delaborator_unresolveNameGlobal_unresolveNameC lean_object* l___regBuiltin_Lean_PrettyPrinter_Delaborator_delabFVar(lean_object*); lean_object* l_Lean_PrettyPrinter_Delaborator_withBindingBodyUnusedName___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_mapMUnsafe_map___at_Lean_PrettyPrinter_Delaborator_delabAppMatch___spec__9___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +static lean_object* l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__7; lean_object* l___private_Lean_PrettyPrinter_Delaborator_Builtins_0__Lean_PrettyPrinter_Delaborator_skippingBinders_loop_match__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l___regBuiltin_Lean_PrettyPrinter_Delaborator_delabLam___closed__3; static lean_object* l_Lean_PrettyPrinter_Delaborator_maybeAddBlockImplicit___closed__8; @@ -665,6 +670,7 @@ static lean_object* l___regBuiltin_Lean_PrettyPrinter_Delaborator_delabSort___cl static lean_object* l___regBuiltin_Lean_PrettyPrinter_Delaborator_delabFVar___closed__7; lean_object* l_Lean_PrettyPrinter_Delaborator_delabOfNat(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_projectionFnInfoExt; +static lean_object* l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__3; static lean_object* l_Array_mapMUnsafe_map___at_Lean_PrettyPrinter_Delaborator_delabAppMatch___spec__9___closed__1; lean_object* l_Lean_PrettyPrinter_Delaborator_delabAppExplicit___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_getPPCoercions___boxed(lean_object*); @@ -685,7 +691,6 @@ static lean_object* l___regBuiltin_Lean_PrettyPrinter_Delaborator_delabSort___cl lean_object* l_Lean_PrettyPrinter_Delaborator_SubExpr_withBindingBody___at___private_Lean_PrettyPrinter_Delaborator_Builtins_0__Lean_PrettyPrinter_Delaborator_shouldGroupWithNext___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_PrettyPrinter_Delaborator_delabDoElems___lambda__3___closed__6; uint8_t l_Lean_Syntax_isNodeOf(lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_PrettyPrinter_Delaborator_SubExpr_withBindingBody___at_Lean_PrettyPrinter_Delaborator_delabDIte_delabBranch___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*); lean_object* l_Lean_LocalDecl_type(lean_object*); static lean_object* l_Lean_PrettyPrinter_Delaborator_delabAppMatch___lambda__4___closed__2; static lean_object* l_Lean_getConstInfo___at_Lean_PrettyPrinter_Delaborator_delabAppMatch___spec__2___closed__3; @@ -700,7 +705,6 @@ lean_object* l_Lean_PrettyPrinter_Delaborator_delabDoElems(lean_object*, lean_ob uint8_t l_Array_contains___at___private_Lean_Meta_Match_Value_0__Lean_Meta_isUIntTypeName___spec__1(lean_object*, lean_object*); static lean_object* l_Lean_PrettyPrinter_Delaborator_delabDIte___lambda__1___closed__7; static lean_object* l_Lean_PrettyPrinter_Delaborator_delabAppImplicit___lambda__3___closed__5; -static lean_object* l_Lean_PrettyPrinter_Delaborator_delabLetE___closed__9; static lean_object* l_Lean_PrettyPrinter_Delaborator_delabBVar___closed__1; static lean_object* l_Lean_PrettyPrinter_Delaborator_delabSort___closed__6; static lean_object* l_Lean_PrettyPrinter_Delaborator_unexpandStructureInstance___closed__1; @@ -709,6 +713,7 @@ static lean_object* l_Lean_PrettyPrinter_Delaborator_delabMVar___closed__1; lean_object* l_List_redLength___rarg(lean_object*); static lean_object* l_Array_mapIdxM_map___at___private_Lean_PrettyPrinter_Delaborator_Builtins_0__Lean_PrettyPrinter_Delaborator_delabPatterns___spec__5___closed__1; lean_object* l_Array_mapMUnsafe_map___at_Lean_PrettyPrinter_Delaborator_unexpandStructureInstance___spec__7___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_PrettyPrinter_Delaborator_delabLetFun___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_PrettyPrinter_Delaborator_delabOfNat___closed__2; lean_object* l_Array_foldrMUnsafe_fold___at_Lean_PrettyPrinter_Delaborator_delabForall___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_PrettyPrinter_Delaborator_delabForall___lambda__2___closed__5; @@ -740,6 +745,7 @@ lean_object* l_Lean_Expr_bindingName_x21(lean_object*); lean_object* l_Lean_PrettyPrinter_Delaborator_getParamKinds_forallTelescopeArgs___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* l_Lean_Meta_getLocalDecl(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Delaborator_delabSort_match__3(lean_object*); +static lean_object* l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__8; static lean_object* l_Lean_PrettyPrinter_Delaborator_unexpandStructureInstance___closed__2; static lean_object* l_Lean_PrettyPrinter_Delaborator_delabMVar___closed__7; uint8_t lean_expr_eqv(lean_object*, lean_object*); @@ -750,12 +756,12 @@ lean_object* l___regBuiltin_Lean_PrettyPrinter_Delaborator_delabLam(lean_object* static lean_object* l___regBuiltin_Lean_PrettyPrinter_Delaborator_delabDo___closed__1; lean_object* l_Lean_PrettyPrinter_Delaborator_SubExpr_descend___at___private_Lean_PrettyPrinter_Delaborator_Builtins_0__Lean_PrettyPrinter_Delaborator_delabPatterns___spec__3(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Delaborator_delabNameMkStr(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -static lean_object* l_Lean_PrettyPrinter_Delaborator_delabLetE___closed__8; static lean_object* l_Lean_PrettyPrinter_Delaborator_delabAppImplicit___lambda__3___closed__3; lean_object* l_Array_foldrMUnsafe_fold___at_Lean_PrettyPrinter_Delaborator_delabForall___spec__1(lean_object*, lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_PrettyPrinter_Delaborator_maybeAddBlockImplicit___closed__5; lean_object* l_Lean_Meta_forallTelescopeReducing___at_Lean_PrettyPrinter_Delaborator_getParamKinds_forallTelescopeArgs___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l___regBuiltin_Lean_PrettyPrinter_Delaborator_delabOfNat___closed__5; +static lean_object* l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__9; uint8_t lean_nat_dec_le(lean_object*, lean_object*); static lean_object* l_Lean_PrettyPrinter_Delaborator_delabSort___closed__13; lean_object* l_Lean_PrettyPrinter_Delaborator_delabAppImplicit___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -777,8 +783,10 @@ static lean_object* l_Lean_PrettyPrinter_Delaborator_delabAppMatch___lambda__6__ lean_object* l_Lean_PrettyPrinter_Delaborator_delabDIte_delabBranch___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l___regBuiltin_Lean_PrettyPrinter_Delaborator_delabNameMkStr___closed__2; static lean_object* l_Lean_PrettyPrinter_Delaborator_delabOfScientific___lambda__1___closed__4; +static lean_object* l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__4; uint8_t l_Lean_BinderInfo_isExplicit(uint8_t); lean_object* l_Lean_Syntax_getKind(lean_object*); +static lean_object* l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__2; static lean_object* l_Lean_PrettyPrinter_Delaborator_getParamKinds___closed__2; uint8_t l_Lean_PrettyPrinter_Delaborator_AppMatchState_motiveNamed___default; lean_object* l_Lean_MonadRef_mkInfoFromRefPos___at_Lean_PrettyPrinter_Delaborator_delab___spec__3___rarg(lean_object*, lean_object*, lean_object*); @@ -798,6 +806,7 @@ lean_object* lean_panic_fn(lean_object*, lean_object*); lean_object* l_Lean_getPPInstanceTypes___boxed(lean_object*); lean_object* l_Lean_PrettyPrinter_Delaborator_SubExpr_withNaryArg___at_Lean_PrettyPrinter_Delaborator_isRegularApp___spec__6(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_PrettyPrinter_Delaborator_isRegularApp___lambda__4___closed__3; +lean_object* l_Lean_PrettyPrinter_Delaborator_delabLetFun_match__1___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Delaborator_delabDoElems___lambda__4(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Delaborator_AppMatchState_rhss___default; lean_object* l___regBuiltin_Lean_PrettyPrinter_Delaborator_delabDIte(lean_object*); @@ -806,6 +815,7 @@ lean_object* l_Lean_PrettyPrinter_Delaborator_SubExpr_descend___at_Lean_PrettyPr lean_object* l_Lean_KVMap_insertCore(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Delaborator_unresolveNameGlobal_unresolveNameCore___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l___regBuiltin_Lean_PrettyPrinter_Delaborator_delabNameMkNum___closed__1; +lean_object* l_Lean_PrettyPrinter_Delaborator_delabLetFun(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); uint8_t l_Lean_getPPMotivesAll(lean_object*); lean_object* l_Lean_PrettyPrinter_Delaborator_delabLit(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_PrettyPrinter_Delaborator_delabAppExplicit___lambda__6___closed__3; @@ -855,7 +865,6 @@ lean_object* l_Lean_PrettyPrinter_Delaborator_SubExpr_withType___at_Lean_PrettyP lean_object* l_Lean_addMessageContextFull___at_Lean_Meta_instAddMessageContextMetaM___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_PrettyPrinter_Delaborator_delabConst___closed__14; lean_object* l_Lean_PrettyPrinter_Delaborator_isRegularApp___lambda__4(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_PrettyPrinter_Delaborator_SubExpr_withBindingDomain___at_Lean_PrettyPrinter_Delaborator_delabLam___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_instInhabitedName; static lean_object* l_Lean_getConstInfo___at_Lean_PrettyPrinter_Delaborator_delabAppMatch___spec__2___closed__4; lean_object* l_Lean_getPPInstances___boxed(lean_object*); @@ -865,7 +874,6 @@ lean_object* l_Lean_PrettyPrinter_Delaborator_AppMatchState_params___default; lean_object* l_List_toArrayAux___rarg(lean_object*, lean_object*); lean_object* lean_name_mk_numeral(lean_object*, lean_object*); static lean_object* l_Lean_PrettyPrinter_Delaborator_delabAppExplicit___lambda__5___closed__6; -static lean_object* l_Lean_PrettyPrinter_Delaborator_delabLetE___closed__11; lean_object* lean_infer_type(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Delaborator_delabLam_match__1(lean_object*); lean_object* l_List_forIn_loop___at_Lean_PrettyPrinter_Delaborator_isRegularApp___spec__3___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -975,6 +983,7 @@ static lean_object* l___regBuiltin_Lean_PrettyPrinter_Delaborator_delabAppImplic lean_object* l___private_Lean_Meta_Basic_0__Lean_Meta_lambdaTelescopeImp___rarg(lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l___regBuiltin_Lean_PrettyPrinter_Delaborator_delabLit___closed__4; static lean_object* l_Lean_PrettyPrinter_Delaborator_delabAppExplicit___closed__4; +lean_object* l_Lean_PrettyPrinter_Delaborator_SubExpr_withAppFn___at_Lean_PrettyPrinter_Delaborator_delabLetFun___spec__4(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Delaborator_delabLit_match__1(lean_object*); lean_object* l_Lean_PrettyPrinter_Delaborator_SubExpr_withBindingBody___at___private_Lean_PrettyPrinter_Delaborator_Builtins_0__Lean_PrettyPrinter_Delaborator_delabPatterns_usingNamesAux___spec__1(lean_object*); static lean_object* l_Lean_PrettyPrinter_Delaborator_isRegularApp___lambda__4___closed__2; @@ -1043,7 +1052,6 @@ lean_object* l_Lean_PrettyPrinter_Delaborator_isRegularApp___lambda__3___boxed(l lean_object* l_Lean_PrettyPrinter_Delaborator_withMDatasOptions___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static lean_object* l_Lean_PrettyPrinter_Delaborator_maybeAddBlockImplicit___closed__3; static lean_object* l___regBuiltin_Lean_PrettyPrinter_Delaborator_delabAppExplicit___closed__2; -lean_object* l_Lean_PrettyPrinter_Delaborator_delabDoElems_match__1(lean_object*); lean_object* l_Lean_getPPStructureProjections___boxed(lean_object*); lean_object* l_Lean_PrettyPrinter_Delaborator_failure___rarg(lean_object*); lean_object* l_Lean_PrettyPrinter_Delaborator_delabAppMatch___lambda__5(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -1063,12 +1071,12 @@ uint8_t l_Lean_Expr_isLet(lean_object*); uint8_t l_Lean_isStructure(lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Delaborator_unresolveNameGlobal_match__1___rarg(lean_object*, lean_object*, lean_object*); static lean_object* l___regBuiltin_Lean_PrettyPrinter_Delaborator_delabLam___closed__2; -uint8_t l_Array_anyMUnsafe_any___at_Lean_PrettyPrinter_Delaborator_delabLam___spec__2(lean_object*, lean_object*, size_t, size_t); static lean_object* l___regBuiltin_Lean_PrettyPrinter_Delaborator_delabLit___closed__3; lean_object* l_Lean_PrettyPrinter_Delaborator_AppMatchState_varNames___default; static lean_object* l_Lean_PrettyPrinter_Delaborator_delabAppMatch___lambda__6___closed__5; lean_object* l_Lean_PrettyPrinter_Delaborator_delabDoElems___lambda__7(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_getPPPiBinderTypes___boxed(lean_object*); +lean_object* l_Lean_PrettyPrinter_Delaborator_SubExpr_withAppArg___at_Lean_PrettyPrinter_Delaborator_delabLetFun___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Delaborator_delabNamedPattern(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); uint8_t lean_string_dec_eq(lean_object*, lean_object*); lean_object* l_Lean_Syntax_mkLit(lean_object*, lean_object*, lean_object*); @@ -18804,6 +18812,845 @@ x_6 = l_Lean_KeyedDeclsAttribute_addBuiltin___rarg(x_2, x_3, x_4, x_5, x_1); return x_6; } } +lean_object* l_Lean_PrettyPrinter_Delaborator_delabLetFun_match__1___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +if (lean_obj_tag(x_1) == 6) +{ +lean_object* x_4; lean_object* x_5; lean_object* x_6; uint64_t x_7; lean_object* x_8; lean_object* x_9; +lean_dec(x_3); +x_4 = lean_ctor_get(x_1, 0); +lean_inc(x_4); +x_5 = lean_ctor_get(x_1, 1); +lean_inc(x_5); +x_6 = lean_ctor_get(x_1, 2); +lean_inc(x_6); +x_7 = lean_ctor_get_uint64(x_1, sizeof(void*)*3); +lean_dec(x_1); +x_8 = lean_box_uint64(x_7); +x_9 = lean_apply_4(x_2, x_4, x_5, x_6, x_8); +return x_9; +} +else +{ +lean_object* x_10; +lean_dec(x_2); +x_10 = lean_apply_1(x_3, x_1); +return x_10; +} +} +} +lean_object* l_Lean_PrettyPrinter_Delaborator_delabLetFun_match__1(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Delaborator_delabLetFun_match__1___rarg), 3, 0); +return x_2; +} +} +lean_object* l_Lean_PrettyPrinter_Delaborator_SubExpr_withAppArg___at_Lean_PrettyPrinter_Delaborator_delabLetFun___spec__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { +_start: +{ +lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; +x_9 = l_Lean_PrettyPrinter_Delaborator_SubExpr_getExpr___at_Lean_PrettyPrinter_Delaborator_getExprKind___spec__1(x_2, x_3, x_4, x_5, x_6, x_7, x_8); +x_10 = lean_ctor_get(x_9, 0); +lean_inc(x_10); +x_11 = lean_ctor_get(x_9, 1); +lean_inc(x_11); +lean_dec(x_9); +x_12 = l_Lean_Expr_appArg_x21(x_10); +lean_dec(x_10); +x_13 = lean_unsigned_to_nat(1u); +x_14 = l_Lean_PrettyPrinter_Delaborator_SubExpr_descend___at_Lean_PrettyPrinter_Delaborator_delab___spec__2(x_12, x_13, x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_11); +return x_14; +} +} +lean_object* l_Lean_PrettyPrinter_Delaborator_SubExpr_withBindingBody___at_Lean_PrettyPrinter_Delaborator_delabLetFun___spec__2___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) { +_start: +{ +lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; +x_11 = l_Lean_Expr_bindingBody_x21(x_1); +x_12 = lean_expr_instantiate1(x_11, x_3); +lean_dec(x_11); +x_13 = lean_unsigned_to_nat(1u); +x_14 = l_Lean_PrettyPrinter_Delaborator_SubExpr_descend___at_Lean_PrettyPrinter_Delaborator_delab___spec__2(x_12, x_13, x_2, x_4, x_5, x_6, x_7, x_8, x_9, x_10); +return x_14; +} +} +lean_object* l_Lean_PrettyPrinter_Delaborator_SubExpr_withBindingBody___at_Lean_PrettyPrinter_Delaborator_delabLetFun___spec__2(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, 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; uint8_t x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; +x_10 = l_Lean_PrettyPrinter_Delaborator_SubExpr_getExpr___at_Lean_PrettyPrinter_Delaborator_getExprKind___spec__1(x_3, x_4, x_5, x_6, x_7, x_8, x_9); +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_Expr_binderInfo(x_11); +x_14 = l_Lean_Expr_bindingDomain_x21(x_11); +x_15 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Delaborator_SubExpr_withBindingBody___at_Lean_PrettyPrinter_Delaborator_delabLetFun___spec__2___lambda__1___boxed), 10, 2); +lean_closure_set(x_15, 0, x_11); +lean_closure_set(x_15, 1, x_2); +x_16 = l_Lean_Meta_withLocalDecl___at_Lean_PrettyPrinter_Delaborator_withBindingBodyUnusedName___spec__3___rarg(x_1, x_13, x_14, x_15, x_3, x_4, x_5, x_6, x_7, x_8, x_12); +return x_16; +} +} +lean_object* l_Lean_PrettyPrinter_Delaborator_SubExpr_withBindingDomain___at_Lean_PrettyPrinter_Delaborator_delabLetFun___spec__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) { +_start: +{ +lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; +x_9 = l_Lean_PrettyPrinter_Delaborator_SubExpr_getExpr___at_Lean_PrettyPrinter_Delaborator_getExprKind___spec__1(x_2, x_3, x_4, x_5, x_6, x_7, x_8); +x_10 = lean_ctor_get(x_9, 0); +lean_inc(x_10); +x_11 = lean_ctor_get(x_9, 1); +lean_inc(x_11); +lean_dec(x_9); +x_12 = l_Lean_Expr_bindingDomain_x21(x_10); +lean_dec(x_10); +x_13 = lean_unsigned_to_nat(0u); +x_14 = l_Lean_PrettyPrinter_Delaborator_SubExpr_descend___at_Lean_PrettyPrinter_Delaborator_delab___spec__2(x_12, x_13, x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_11); +return x_14; +} +} +lean_object* l_Lean_PrettyPrinter_Delaborator_SubExpr_withAppFn___at_Lean_PrettyPrinter_Delaborator_delabLetFun___spec__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) { +_start: +{ +lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; +x_9 = l_Lean_PrettyPrinter_Delaborator_SubExpr_getExpr___at_Lean_PrettyPrinter_Delaborator_getExprKind___spec__1(x_2, x_3, x_4, x_5, x_6, x_7, x_8); +x_10 = lean_ctor_get(x_9, 0); +lean_inc(x_10); +x_11 = lean_ctor_get(x_9, 1); +lean_inc(x_11); +lean_dec(x_9); +x_12 = l_Lean_Expr_appFn_x21(x_10); +lean_dec(x_10); +x_13 = lean_unsigned_to_nat(0u); +x_14 = l_Lean_PrettyPrinter_Delaborator_SubExpr_descend___at_Lean_PrettyPrinter_Delaborator_delab___spec__2(x_12, x_13, x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_11); +return x_14; +} +} +static lean_object* _init_l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("Lean.PrettyPrinter.Delaborator.delabLetFun"); +return x_1; +} +} +static lean_object* _init_l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__2() { +_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_PrettyPrinter_Delaborator_delabFVar___closed__2; +x_2 = l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__1; +x_3 = lean_unsigned_to_nat(416u); +x_4 = lean_unsigned_to_nat(37u); +x_5 = l_Lean_PrettyPrinter_Delaborator_delabFVar___closed__4; +x_6 = l___private_Init_Util_0__mkPanicMessageWithDecl(x_1, x_2, x_3, x_4, x_5); +return x_6; +} +} +static lean_object* _init_l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__3() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("let_fun"); +return x_1; +} +} +static lean_object* _init_l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__4() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_PrettyPrinter_Delaborator_maybeAddBlockImplicit___closed__7; +x_2 = l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__3; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +static lean_object* _init_l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__5() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("letDecl"); +return x_1; +} +} +static lean_object* _init_l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__6() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_PrettyPrinter_Delaborator_maybeAddBlockImplicit___closed__7; +x_2 = l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__5; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +static lean_object* _init_l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__7() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("letIdDecl"); +return x_1; +} +} +static lean_object* _init_l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__8() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_PrettyPrinter_Delaborator_maybeAddBlockImplicit___closed__7; +x_2 = l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__7; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +static lean_object* _init_l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__9() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string(";"); +return x_1; +} +} +static lean_object* _init_l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__10() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_getPPLetVarTypes___boxed), 1, 0); +return x_1; +} +} +static lean_object* _init_l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__11() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_getPPAnalysisLetVarType___boxed), 1, 0); +return x_1; +} +} +lean_object* l_Lean_PrettyPrinter_Delaborator_delabLetFun___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) { +_start: +{ +if (lean_obj_tag(x_2) == 6) +{ +lean_object* x_10; lean_object* x_11; lean_object* x_12; +x_10 = lean_ctor_get(x_2, 0); +lean_inc(x_10); +x_11 = lean_ctor_get(x_2, 2); +lean_inc(x_11); +lean_dec(x_2); +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_12 = l_Lean_PrettyPrinter_Delaborator_getUnusedName(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; lean_object* x_14; lean_object* x_15; lean_object* x_16; +x_13 = lean_ctor_get(x_12, 0); +lean_inc(x_13); +x_14 = lean_ctor_get(x_12, 1); +lean_inc(x_14); +lean_dec(x_12); +x_15 = l_Lean_PrettyPrinter_Delaborator_delabAppExplicit___lambda__5___closed__2; +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_13); +x_16 = l_Lean_PrettyPrinter_Delaborator_SubExpr_withBindingBody___at_Lean_PrettyPrinter_Delaborator_delabLetFun___spec__2(x_13, x_15, x_3, x_4, x_5, x_6, x_7, x_8, x_14); +if (lean_obj_tag(x_16) == 0) +{ +lean_object* x_17; lean_object* x_18; uint8_t x_19; lean_object* x_20; lean_object* x_179; lean_object* x_180; +x_17 = lean_ctor_get(x_16, 0); +lean_inc(x_17); +x_18 = lean_ctor_get(x_16, 1); +lean_inc(x_18); +lean_dec(x_16); +x_179 = l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__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); +x_180 = l_Lean_PrettyPrinter_Delaborator_getPPOption(x_179, x_3, x_4, x_5, x_6, x_7, x_8, x_18); +if (lean_obj_tag(x_180) == 0) +{ +lean_object* x_181; uint8_t x_182; +x_181 = lean_ctor_get(x_180, 0); +lean_inc(x_181); +x_182 = lean_unbox(x_181); +if (x_182 == 0) +{ +lean_object* x_183; lean_object* x_184; lean_object* x_185; +lean_dec(x_181); +x_183 = lean_ctor_get(x_180, 1); +lean_inc(x_183); +lean_dec(x_180); +x_184 = l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__11; +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_185 = l_Lean_PrettyPrinter_Delaborator_getPPOption(x_184, x_3, x_4, x_5, x_6, x_7, x_8, x_183); +if (lean_obj_tag(x_185) == 0) +{ +lean_object* x_186; lean_object* x_187; uint8_t 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); +x_188 = lean_unbox(x_186); +lean_dec(x_186); +x_19 = x_188; +x_20 = x_187; +goto block_178; +} +else +{ +uint8_t x_189; +lean_dec(x_17); +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); +lean_dec(x_1); +x_189 = !lean_is_exclusive(x_185); +if (x_189 == 0) +{ +return x_185; +} +else +{ +lean_object* x_190; lean_object* x_191; lean_object* x_192; +x_190 = lean_ctor_get(x_185, 0); +x_191 = lean_ctor_get(x_185, 1); +lean_inc(x_191); +lean_inc(x_190); +lean_dec(x_185); +x_192 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_192, 0, x_190); +lean_ctor_set(x_192, 1, x_191); +return x_192; +} +} +} +else +{ +lean_object* x_193; uint8_t x_194; +x_193 = lean_ctor_get(x_180, 1); +lean_inc(x_193); +lean_dec(x_180); +x_194 = lean_unbox(x_181); +lean_dec(x_181); +x_19 = x_194; +x_20 = x_193; +goto block_178; +} +} +else +{ +uint8_t x_195; +lean_dec(x_17); +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); +lean_dec(x_1); +x_195 = !lean_is_exclusive(x_180); +if (x_195 == 0) +{ +return x_180; +} +else +{ +lean_object* x_196; lean_object* x_197; lean_object* x_198; +x_196 = lean_ctor_get(x_180, 0); +x_197 = lean_ctor_get(x_180, 1); +lean_inc(x_197); +lean_inc(x_196); +lean_dec(x_180); +x_198 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_198, 0, x_196); +lean_ctor_set(x_198, 1, x_197); +return x_198; +} +} +block_178: +{ +if (x_19 == 0) +{ +lean_object* x_21; uint8_t x_22; +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +x_21 = l_Lean_MonadRef_mkInfoFromRefPos___at_Lean_PrettyPrinter_Delaborator_delab___spec__3___rarg(x_7, x_8, x_20); +lean_dec(x_8); +x_22 = !lean_is_exclusive(x_21); +if (x_22 == 0) +{ +lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_object* x_51; lean_object* x_52; lean_object* x_53; +x_23 = lean_ctor_get(x_21, 0); +x_24 = l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__3; +lean_inc(x_23); +x_25 = lean_alloc_ctor(2, 2, 0); +lean_ctor_set(x_25, 0, x_23); +lean_ctor_set(x_25, 1, x_24); +x_26 = lean_mk_syntax_ident(x_13); +x_27 = l_Std_Range_forIn_loop___at_Lean_PrettyPrinter_Delaborator_unexpandStructureInstance___spec__2___closed__5; +lean_inc(x_23); +x_28 = lean_alloc_ctor(2, 2, 0); +lean_ctor_set(x_28, 0, x_23); +lean_ctor_set(x_28, 1, x_27); +x_29 = l_Lean_PrettyPrinter_Delaborator_delabAppImplicit___lambda__3___closed__4; +x_30 = lean_array_push(x_29, x_26); +x_31 = l_Lean_PrettyPrinter_Delaborator_delabSort___closed__13; +x_32 = lean_array_push(x_30, x_31); +x_33 = lean_array_push(x_32, x_31); +x_34 = lean_array_push(x_33, x_28); +x_35 = lean_array_push(x_34, x_1); +x_36 = l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__8; +x_37 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_37, 0, x_36); +lean_ctor_set(x_37, 1, x_35); +x_38 = l_Lean_PrettyPrinter_Delaborator_delabSort___closed__6; +x_39 = lean_array_push(x_38, x_37); +x_40 = l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__6; +x_41 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_41, 0, x_40); +lean_ctor_set(x_41, 1, x_39); +x_42 = l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__9; +x_43 = lean_alloc_ctor(2, 2, 0); +lean_ctor_set(x_43, 0, x_23); +lean_ctor_set(x_43, 1, x_42); +x_44 = lean_array_push(x_38, x_43); +x_45 = l_Lean_PrettyPrinter_Delaborator_delabSort___closed__11; +x_46 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_46, 0, x_45); +lean_ctor_set(x_46, 1, x_44); +x_47 = l_Lean_PrettyPrinter_Delaborator_delabConst___closed__15; +x_48 = lean_array_push(x_47, x_25); +x_49 = lean_array_push(x_48, x_41); +x_50 = lean_array_push(x_49, x_46); +x_51 = lean_array_push(x_50, x_17); +x_52 = l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__4; +x_53 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_53, 0, x_52); +lean_ctor_set(x_53, 1, x_51); +lean_ctor_set(x_21, 0, x_53); +return x_21; +} +else +{ +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; lean_object* x_62; lean_object* x_63; lean_object* x_64; lean_object* x_65; lean_object* x_66; lean_object* x_67; lean_object* x_68; lean_object* x_69; lean_object* x_70; lean_object* x_71; lean_object* x_72; lean_object* x_73; lean_object* x_74; lean_object* x_75; lean_object* x_76; lean_object* x_77; lean_object* x_78; lean_object* x_79; lean_object* x_80; lean_object* x_81; lean_object* x_82; lean_object* x_83; lean_object* x_84; lean_object* x_85; lean_object* x_86; +x_54 = lean_ctor_get(x_21, 0); +x_55 = lean_ctor_get(x_21, 1); +lean_inc(x_55); +lean_inc(x_54); +lean_dec(x_21); +x_56 = l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__3; +lean_inc(x_54); +x_57 = lean_alloc_ctor(2, 2, 0); +lean_ctor_set(x_57, 0, x_54); +lean_ctor_set(x_57, 1, x_56); +x_58 = lean_mk_syntax_ident(x_13); +x_59 = l_Std_Range_forIn_loop___at_Lean_PrettyPrinter_Delaborator_unexpandStructureInstance___spec__2___closed__5; +lean_inc(x_54); +x_60 = lean_alloc_ctor(2, 2, 0); +lean_ctor_set(x_60, 0, x_54); +lean_ctor_set(x_60, 1, x_59); +x_61 = l_Lean_PrettyPrinter_Delaborator_delabAppImplicit___lambda__3___closed__4; +x_62 = lean_array_push(x_61, x_58); +x_63 = l_Lean_PrettyPrinter_Delaborator_delabSort___closed__13; +x_64 = lean_array_push(x_62, x_63); +x_65 = lean_array_push(x_64, x_63); +x_66 = lean_array_push(x_65, x_60); +x_67 = lean_array_push(x_66, x_1); +x_68 = l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__8; +x_69 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_69, 0, x_68); +lean_ctor_set(x_69, 1, x_67); +x_70 = l_Lean_PrettyPrinter_Delaborator_delabSort___closed__6; +x_71 = lean_array_push(x_70, x_69); +x_72 = l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__6; +x_73 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_73, 0, x_72); +lean_ctor_set(x_73, 1, x_71); +x_74 = l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__9; +x_75 = lean_alloc_ctor(2, 2, 0); +lean_ctor_set(x_75, 0, x_54); +lean_ctor_set(x_75, 1, x_74); +x_76 = lean_array_push(x_70, x_75); +x_77 = l_Lean_PrettyPrinter_Delaborator_delabSort___closed__11; +x_78 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_78, 0, x_77); +lean_ctor_set(x_78, 1, x_76); +x_79 = l_Lean_PrettyPrinter_Delaborator_delabConst___closed__15; +x_80 = lean_array_push(x_79, x_57); +x_81 = lean_array_push(x_80, x_73); +x_82 = lean_array_push(x_81, x_78); +x_83 = lean_array_push(x_82, x_17); +x_84 = l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__4; +x_85 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_85, 0, x_84); +lean_ctor_set(x_85, 1, x_83); +x_86 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_86, 0, x_85); +lean_ctor_set(x_86, 1, x_55); +return x_86; +} +} +else +{ +lean_object* x_87; +lean_inc(x_8); +lean_inc(x_7); +x_87 = l_Lean_PrettyPrinter_Delaborator_SubExpr_withBindingDomain___at_Lean_PrettyPrinter_Delaborator_delabLetFun___spec__3(x_15, x_3, x_4, x_5, x_6, x_7, x_8, x_20); +if (lean_obj_tag(x_87) == 0) +{ +lean_object* x_88; lean_object* x_89; lean_object* x_90; uint8_t x_91; +x_88 = lean_ctor_get(x_87, 0); +lean_inc(x_88); +x_89 = lean_ctor_get(x_87, 1); +lean_inc(x_89); +lean_dec(x_87); +x_90 = l_Lean_MonadRef_mkInfoFromRefPos___at_Lean_PrettyPrinter_Delaborator_delab___spec__3___rarg(x_7, x_8, x_89); +lean_dec(x_8); +x_91 = !lean_is_exclusive(x_90); +if (x_91 == 0) +{ +lean_object* x_92; lean_object* x_93; lean_object* x_94; lean_object* x_95; lean_object* x_96; lean_object* x_97; lean_object* x_98; lean_object* x_99; lean_object* x_100; lean_object* x_101; lean_object* x_102; lean_object* x_103; lean_object* x_104; lean_object* x_105; lean_object* x_106; lean_object* x_107; lean_object* x_108; lean_object* x_109; lean_object* x_110; lean_object* x_111; lean_object* x_112; lean_object* x_113; lean_object* x_114; lean_object* x_115; lean_object* x_116; lean_object* x_117; lean_object* x_118; lean_object* x_119; lean_object* x_120; lean_object* x_121; lean_object* x_122; lean_object* x_123; lean_object* x_124; lean_object* x_125; lean_object* x_126; lean_object* x_127; lean_object* x_128; lean_object* x_129; lean_object* x_130; lean_object* x_131; +x_92 = lean_ctor_get(x_90, 0); +x_93 = l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__3; +lean_inc(x_92); +x_94 = lean_alloc_ctor(2, 2, 0); +lean_ctor_set(x_94, 0, x_92); +lean_ctor_set(x_94, 1, x_93); +x_95 = lean_mk_syntax_ident(x_13); +x_96 = l_Lean_PrettyPrinter_Delaborator_delabAppExplicit___lambda__5___closed__8; +lean_inc(x_92); +x_97 = lean_alloc_ctor(2, 2, 0); +lean_ctor_set(x_97, 0, x_92); +lean_ctor_set(x_97, 1, x_96); +x_98 = l_Lean_PrettyPrinter_Delaborator_maybeAddBlockImplicit___closed__11; +x_99 = lean_array_push(x_98, x_97); +x_100 = lean_array_push(x_99, x_88); +x_101 = l_Lean_PrettyPrinter_Delaborator_delabAppMatch___lambda__6___closed__7; +x_102 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_102, 0, x_101); +lean_ctor_set(x_102, 1, x_100); +x_103 = l_Lean_PrettyPrinter_Delaborator_delabSort___closed__6; +x_104 = lean_array_push(x_103, x_102); +x_105 = l_Lean_PrettyPrinter_Delaborator_delabSort___closed__11; +x_106 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_106, 0, x_105); +lean_ctor_set(x_106, 1, x_104); +x_107 = l_Std_Range_forIn_loop___at_Lean_PrettyPrinter_Delaborator_unexpandStructureInstance___spec__2___closed__5; +lean_inc(x_92); +x_108 = lean_alloc_ctor(2, 2, 0); +lean_ctor_set(x_108, 0, x_92); +lean_ctor_set(x_108, 1, x_107); +x_109 = l_Lean_PrettyPrinter_Delaborator_delabAppImplicit___lambda__3___closed__4; +x_110 = lean_array_push(x_109, x_95); +x_111 = l_Lean_PrettyPrinter_Delaborator_delabSort___closed__13; +x_112 = lean_array_push(x_110, x_111); +x_113 = lean_array_push(x_112, x_106); +x_114 = lean_array_push(x_113, x_108); +x_115 = lean_array_push(x_114, x_1); +x_116 = l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__8; +x_117 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_117, 0, x_116); +lean_ctor_set(x_117, 1, x_115); +x_118 = lean_array_push(x_103, x_117); +x_119 = l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__6; +x_120 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_120, 0, x_119); +lean_ctor_set(x_120, 1, x_118); +x_121 = l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__9; +x_122 = lean_alloc_ctor(2, 2, 0); +lean_ctor_set(x_122, 0, x_92); +lean_ctor_set(x_122, 1, x_121); +x_123 = lean_array_push(x_103, x_122); +x_124 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_124, 0, x_105); +lean_ctor_set(x_124, 1, x_123); +x_125 = l_Lean_PrettyPrinter_Delaborator_delabConst___closed__15; +x_126 = lean_array_push(x_125, x_94); +x_127 = lean_array_push(x_126, x_120); +x_128 = lean_array_push(x_127, x_124); +x_129 = lean_array_push(x_128, x_17); +x_130 = l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__4; +x_131 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_131, 0, x_130); +lean_ctor_set(x_131, 1, x_129); +lean_ctor_set(x_90, 0, x_131); +return x_90; +} +else +{ +lean_object* x_132; lean_object* x_133; lean_object* x_134; lean_object* x_135; lean_object* x_136; lean_object* x_137; lean_object* x_138; lean_object* x_139; lean_object* x_140; lean_object* x_141; lean_object* x_142; lean_object* x_143; lean_object* x_144; lean_object* x_145; lean_object* x_146; lean_object* x_147; lean_object* x_148; lean_object* x_149; lean_object* 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; lean_object* x_157; lean_object* x_158; lean_object* x_159; lean_object* x_160; lean_object* x_161; lean_object* x_162; lean_object* x_163; lean_object* x_164; lean_object* x_165; lean_object* x_166; lean_object* x_167; lean_object* x_168; lean_object* x_169; lean_object* x_170; lean_object* x_171; lean_object* x_172; lean_object* x_173; +x_132 = lean_ctor_get(x_90, 0); +x_133 = lean_ctor_get(x_90, 1); +lean_inc(x_133); +lean_inc(x_132); +lean_dec(x_90); +x_134 = l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__3; +lean_inc(x_132); +x_135 = lean_alloc_ctor(2, 2, 0); +lean_ctor_set(x_135, 0, x_132); +lean_ctor_set(x_135, 1, x_134); +x_136 = lean_mk_syntax_ident(x_13); +x_137 = l_Lean_PrettyPrinter_Delaborator_delabAppExplicit___lambda__5___closed__8; +lean_inc(x_132); +x_138 = lean_alloc_ctor(2, 2, 0); +lean_ctor_set(x_138, 0, x_132); +lean_ctor_set(x_138, 1, x_137); +x_139 = l_Lean_PrettyPrinter_Delaborator_maybeAddBlockImplicit___closed__11; +x_140 = lean_array_push(x_139, x_138); +x_141 = lean_array_push(x_140, x_88); +x_142 = l_Lean_PrettyPrinter_Delaborator_delabAppMatch___lambda__6___closed__7; +x_143 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_143, 0, x_142); +lean_ctor_set(x_143, 1, x_141); +x_144 = l_Lean_PrettyPrinter_Delaborator_delabSort___closed__6; +x_145 = lean_array_push(x_144, x_143); +x_146 = l_Lean_PrettyPrinter_Delaborator_delabSort___closed__11; +x_147 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_147, 0, x_146); +lean_ctor_set(x_147, 1, x_145); +x_148 = l_Std_Range_forIn_loop___at_Lean_PrettyPrinter_Delaborator_unexpandStructureInstance___spec__2___closed__5; +lean_inc(x_132); +x_149 = lean_alloc_ctor(2, 2, 0); +lean_ctor_set(x_149, 0, x_132); +lean_ctor_set(x_149, 1, x_148); +x_150 = l_Lean_PrettyPrinter_Delaborator_delabAppImplicit___lambda__3___closed__4; +x_151 = lean_array_push(x_150, x_136); +x_152 = l_Lean_PrettyPrinter_Delaborator_delabSort___closed__13; +x_153 = lean_array_push(x_151, x_152); +x_154 = lean_array_push(x_153, x_147); +x_155 = lean_array_push(x_154, x_149); +x_156 = lean_array_push(x_155, x_1); +x_157 = l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__8; +x_158 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_158, 0, x_157); +lean_ctor_set(x_158, 1, x_156); +x_159 = lean_array_push(x_144, x_158); +x_160 = l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__6; +x_161 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_161, 0, x_160); +lean_ctor_set(x_161, 1, x_159); +x_162 = l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__9; +x_163 = lean_alloc_ctor(2, 2, 0); +lean_ctor_set(x_163, 0, x_132); +lean_ctor_set(x_163, 1, x_162); +x_164 = lean_array_push(x_144, x_163); +x_165 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_165, 0, x_146); +lean_ctor_set(x_165, 1, x_164); +x_166 = l_Lean_PrettyPrinter_Delaborator_delabConst___closed__15; +x_167 = lean_array_push(x_166, x_135); +x_168 = lean_array_push(x_167, x_161); +x_169 = lean_array_push(x_168, x_165); +x_170 = lean_array_push(x_169, x_17); +x_171 = l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__4; +x_172 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_172, 0, x_171); +lean_ctor_set(x_172, 1, x_170); +x_173 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_173, 0, x_172); +lean_ctor_set(x_173, 1, x_133); +return x_173; +} +} +else +{ +uint8_t x_174; +lean_dec(x_17); +lean_dec(x_13); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_1); +x_174 = !lean_is_exclusive(x_87); +if (x_174 == 0) +{ +return x_87; +} +else +{ +lean_object* x_175; lean_object* x_176; lean_object* x_177; +x_175 = lean_ctor_get(x_87, 0); +x_176 = lean_ctor_get(x_87, 1); +lean_inc(x_176); +lean_inc(x_175); +lean_dec(x_87); +x_177 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_177, 0, x_175); +lean_ctor_set(x_177, 1, x_176); +return x_177; +} +} +} +} +} +else +{ +uint8_t x_199; +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); +lean_dec(x_1); +x_199 = !lean_is_exclusive(x_16); +if (x_199 == 0) +{ +return x_16; +} +else +{ +lean_object* x_200; lean_object* x_201; lean_object* x_202; +x_200 = lean_ctor_get(x_16, 0); +x_201 = lean_ctor_get(x_16, 1); +lean_inc(x_201); +lean_inc(x_200); +lean_dec(x_16); +x_202 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_202, 0, x_200); +lean_ctor_set(x_202, 1, x_201); +return x_202; +} +} +} +else +{ +uint8_t x_203; +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_203 = !lean_is_exclusive(x_12); +if (x_203 == 0) +{ +return x_12; +} +else +{ +lean_object* x_204; lean_object* x_205; lean_object* x_206; +x_204 = lean_ctor_get(x_12, 0); +x_205 = lean_ctor_get(x_12, 1); +lean_inc(x_205); +lean_inc(x_204); +lean_dec(x_12); +x_206 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_206, 0, x_204); +lean_ctor_set(x_206, 1, x_205); +return x_206; +} +} +} +else +{ +lean_object* x_207; lean_object* x_208; lean_object* x_209; lean_object* x_210; +lean_dec(x_2); +lean_dec(x_1); +x_207 = l_Lean_PrettyPrinter_Delaborator_delabFVar___closed__1; +x_208 = l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__2; +x_209 = lean_panic_fn(x_207, x_208); +x_210 = lean_apply_7(x_209, x_3, x_4, x_5, x_6, x_7, x_8, x_9); +return x_210; +} +} +} +lean_object* l_Lean_PrettyPrinter_Delaborator_delabLetFun(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; lean_object* x_9; +x_8 = l_Lean_PrettyPrinter_Delaborator_delabAppExplicit___lambda__5___closed__2; +lean_inc(x_6); +lean_inc(x_5); +lean_inc(x_4); +lean_inc(x_3); +lean_inc(x_2); +lean_inc(x_1); +x_9 = l_Lean_PrettyPrinter_Delaborator_SubExpr_withAppArg___at_Lean_PrettyPrinter_Delaborator_delabLetFun___spec__1(x_8, x_1, x_2, x_3, x_4, x_5, x_6, x_7); +if (lean_obj_tag(x_9) == 0) +{ +lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; +x_10 = lean_ctor_get(x_9, 0); +lean_inc(x_10); +x_11 = lean_ctor_get(x_9, 1); +lean_inc(x_11); +lean_dec(x_9); +x_12 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1), 9, 1); +lean_closure_set(x_12, 0, x_10); +x_13 = l_Lean_PrettyPrinter_Delaborator_delabAppExplicit___lambda__7___closed__1; +x_14 = lean_alloc_closure((void*)(l_ReaderT_bind___at_Lean_PrettyPrinter_Delaborator_delabAppExplicit___spec__2___rarg), 9, 2); +lean_closure_set(x_14, 0, x_13); +lean_closure_set(x_14, 1, x_12); +x_15 = l_Lean_PrettyPrinter_Delaborator_SubExpr_withAppFn___at_Lean_PrettyPrinter_Delaborator_delabLetFun___spec__4(x_14, x_1, x_2, x_3, x_4, x_5, x_6, x_11); +return x_15; +} +else +{ +uint8_t x_16; +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_16 = !lean_is_exclusive(x_9); +if (x_16 == 0) +{ +return x_9; +} +else +{ +lean_object* x_17; lean_object* x_18; lean_object* x_19; +x_17 = lean_ctor_get(x_9, 0); +x_18 = lean_ctor_get(x_9, 1); +lean_inc(x_18); +lean_inc(x_17); +lean_dec(x_9); +x_19 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_19, 0, x_17); +lean_ctor_set(x_19, 1, x_18); +return x_19; +} +} +} +} +lean_object* l_Lean_PrettyPrinter_Delaborator_SubExpr_withBindingBody___at_Lean_PrettyPrinter_Delaborator_delabLetFun___spec__2___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) { +_start: +{ +lean_object* x_11; +x_11 = l_Lean_PrettyPrinter_Delaborator_SubExpr_withBindingBody___at_Lean_PrettyPrinter_Delaborator_delabLetFun___spec__2___lambda__1(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_1); +return x_11; +} +} lean_object* l_Lean_PrettyPrinter_Delaborator_delabMData_match__1___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3) { _start: { @@ -19104,46 +19951,12 @@ return x_37; } } } -lean_object* l_Lean_PrettyPrinter_Delaborator_SubExpr_withAppArg___at_Lean_PrettyPrinter_Delaborator_delabMData___spec__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) { -_start: -{ -lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; -x_9 = l_Lean_PrettyPrinter_Delaborator_SubExpr_getExpr___at_Lean_PrettyPrinter_Delaborator_getExprKind___spec__1(x_2, x_3, x_4, x_5, x_6, x_7, x_8); -x_10 = lean_ctor_get(x_9, 0); -lean_inc(x_10); -x_11 = lean_ctor_get(x_9, 1); -lean_inc(x_11); -lean_dec(x_9); -x_12 = l_Lean_Expr_appArg_x21(x_10); -lean_dec(x_10); -x_13 = lean_unsigned_to_nat(1u); -x_14 = l_Lean_PrettyPrinter_Delaborator_SubExpr_descend___at_Lean_PrettyPrinter_Delaborator_delab___spec__2(x_12, x_13, x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_11); -return x_14; -} -} -lean_object* l_Lean_PrettyPrinter_Delaborator_SubExpr_withAppFn___at_Lean_PrettyPrinter_Delaborator_delabMData___spec__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) { -_start: -{ -lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; -x_9 = l_Lean_PrettyPrinter_Delaborator_SubExpr_getExpr___at_Lean_PrettyPrinter_Delaborator_getExprKind___spec__1(x_2, x_3, x_4, x_5, x_6, x_7, x_8); -x_10 = lean_ctor_get(x_9, 0); -lean_inc(x_10); -x_11 = lean_ctor_get(x_9, 1); -lean_inc(x_11); -lean_dec(x_9); -x_12 = l_Lean_Expr_appFn_x21(x_10); -lean_dec(x_10); -x_13 = lean_unsigned_to_nat(0u); -x_14 = l_Lean_PrettyPrinter_Delaborator_SubExpr_descend___at_Lean_PrettyPrinter_Delaborator_delab___spec__2(x_12, x_13, x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_11); -return x_14; -} -} static lean_object* _init_l_Lean_PrettyPrinter_Delaborator_delabMData___closed__1() { _start: { lean_object* x_1; lean_object* x_2; x_1 = l_Lean_PrettyPrinter_Delaborator_delabAppExplicit___lambda__5___closed__2; -x_2 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Delaborator_SubExpr_withAppArg___at_Lean_PrettyPrinter_Delaborator_delabMData___spec__4), 8, 1); +x_2 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Delaborator_SubExpr_withAppArg___at_Lean_PrettyPrinter_Delaborator_delabLetFun___spec__1), 8, 1); lean_closure_set(x_2, 0, x_1); return x_2; } @@ -19153,7 +19966,7 @@ _start: { lean_object* x_1; lean_object* x_2; x_1 = l_Lean_PrettyPrinter_Delaborator_delabMData___closed__1; -x_2 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Delaborator_SubExpr_withAppFn___at_Lean_PrettyPrinter_Delaborator_delabMData___spec__5), 8, 1); +x_2 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Delaborator_SubExpr_withAppFn___at_Lean_PrettyPrinter_Delaborator_delabLetFun___spec__4), 8, 1); lean_closure_set(x_2, 0, x_1); return x_2; } @@ -19162,21 +19975,29 @@ static lean_object* _init_l_Lean_PrettyPrinter_Delaborator_delabMData___closed__ _start: { lean_object* x_1; -x_1 = lean_mk_string("inaccessible"); +x_1 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Delaborator_delabLetFun), 7, 0); return x_1; } } static lean_object* _init_l_Lean_PrettyPrinter_Delaborator_delabMData___closed__4() { _start: { +lean_object* x_1; +x_1 = lean_mk_string("inaccessible"); +return x_1; +} +} +static lean_object* _init_l_Lean_PrettyPrinter_Delaborator_delabMData___closed__5() { +_start: +{ lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = l_Lean_PrettyPrinter_Delaborator_maybeAddBlockImplicit___closed__7; -x_2 = l_Lean_PrettyPrinter_Delaborator_delabMData___closed__3; +x_2 = l_Lean_PrettyPrinter_Delaborator_delabMData___closed__4; x_3 = lean_name_mk_string(x_1, x_2); return x_3; } } -static lean_object* _init_l_Lean_PrettyPrinter_Delaborator_delabMData___closed__5() { +static lean_object* _init_l_Lean_PrettyPrinter_Delaborator_delabMData___closed__6() { _start: { lean_object* x_1; @@ -19198,159 +20019,178 @@ x_11 = l_Lean_Meta_Match_inaccessible_x3f(x_9); lean_dec(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_12; lean_object* x_13; lean_object* x_14; uint8_t x_15; x_12 = l_Lean_PrettyPrinter_Delaborator_SubExpr_getExpr___at_Lean_PrettyPrinter_Delaborator_getExprKind___spec__1(x_1, x_2, x_3, x_4, x_5, x_6, x_10); x_13 = lean_ctor_get(x_12, 0); lean_inc(x_13); x_14 = lean_ctor_get(x_12, 1); lean_inc(x_14); lean_dec(x_12); -x_15 = l_Lean_isLHSGoal_x3f(x_13); +x_15 = l_Lean_isLetFun(x_13); lean_dec(x_13); -if (lean_obj_tag(x_15) == 0) +if (x_15 == 0) { -lean_object* x_16; lean_object* x_17; -x_16 = l_Lean_PrettyPrinter_Delaborator_delabAppExplicit___lambda__5___closed__2; -x_17 = l_Lean_PrettyPrinter_Delaborator_withMDataOptions___at_Lean_PrettyPrinter_Delaborator_delabMData___spec__1(x_16, x_1, x_2, x_3, x_4, x_5, x_6, x_14); -return x_17; -} -else -{ -lean_object* x_18; lean_object* x_19; -lean_dec(x_15); -x_18 = l_Lean_PrettyPrinter_Delaborator_delabMData___closed__2; -x_19 = l_Lean_PrettyPrinter_Delaborator_SubExpr_withMDataExpr___at_Lean_PrettyPrinter_Delaborator_delabMData___spec__3(x_18, x_1, x_2, x_3, x_4, x_5, x_6, x_14); -return x_19; -} -} -else +lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; +x_16 = l_Lean_PrettyPrinter_Delaborator_SubExpr_getExpr___at_Lean_PrettyPrinter_Delaborator_getExprKind___spec__1(x_1, x_2, x_3, x_4, x_5, x_6, x_14); +x_17 = lean_ctor_get(x_16, 0); +lean_inc(x_17); +x_18 = lean_ctor_get(x_16, 1); +lean_inc(x_18); +lean_dec(x_16); +x_19 = l_Lean_isLHSGoal_x3f(x_17); +lean_dec(x_17); +if (lean_obj_tag(x_19) == 0) { lean_object* x_20; lean_object* x_21; -lean_dec(x_11); x_20 = l_Lean_PrettyPrinter_Delaborator_delabAppExplicit___lambda__5___closed__2; +x_21 = l_Lean_PrettyPrinter_Delaborator_withMDataOptions___at_Lean_PrettyPrinter_Delaborator_delabMData___spec__1(x_20, x_1, x_2, x_3, x_4, x_5, x_6, x_18); +return x_21; +} +else +{ +lean_object* x_22; lean_object* x_23; +lean_dec(x_19); +x_22 = l_Lean_PrettyPrinter_Delaborator_delabMData___closed__2; +x_23 = l_Lean_PrettyPrinter_Delaborator_SubExpr_withMDataExpr___at_Lean_PrettyPrinter_Delaborator_delabMData___spec__3(x_22, x_1, x_2, x_3, x_4, x_5, x_6, x_18); +return x_23; +} +} +else +{ +lean_object* x_24; lean_object* x_25; +x_24 = l_Lean_PrettyPrinter_Delaborator_delabMData___closed__3; +x_25 = l_Lean_PrettyPrinter_Delaborator_SubExpr_withMDataExpr___at_Lean_PrettyPrinter_Delaborator_delabMData___spec__3(x_24, x_1, x_2, x_3, x_4, x_5, x_6, x_14); +return x_25; +} +} +else +{ +lean_object* x_26; lean_object* x_27; +lean_dec(x_11); +x_26 = l_Lean_PrettyPrinter_Delaborator_delabAppExplicit___lambda__5___closed__2; lean_inc(x_6); lean_inc(x_5); lean_inc(x_1); -x_21 = l_Lean_PrettyPrinter_Delaborator_SubExpr_withMDataExpr___at_Lean_PrettyPrinter_Delaborator_delabMData___spec__3(x_20, x_1, x_2, x_3, x_4, x_5, x_6, x_10); -if (lean_obj_tag(x_21) == 0) +x_27 = l_Lean_PrettyPrinter_Delaborator_SubExpr_withMDataExpr___at_Lean_PrettyPrinter_Delaborator_delabMData___spec__3(x_26, x_1, x_2, x_3, x_4, x_5, x_6, x_10); +if (lean_obj_tag(x_27) == 0) { -uint8_t x_22; -x_22 = lean_ctor_get_uint8(x_1, sizeof(void*)*5); +uint8_t x_28; +x_28 = lean_ctor_get_uint8(x_1, sizeof(void*)*5); lean_dec(x_1); -if (x_22 == 0) +if (x_28 == 0) { -uint8_t x_23; +uint8_t x_29; lean_dec(x_6); lean_dec(x_5); -x_23 = !lean_is_exclusive(x_21); -if (x_23 == 0) +x_29 = !lean_is_exclusive(x_27); +if (x_29 == 0) { -return x_21; +return x_27; } else { -lean_object* x_24; lean_object* x_25; lean_object* x_26; -x_24 = lean_ctor_get(x_21, 0); -x_25 = lean_ctor_get(x_21, 1); -lean_inc(x_25); -lean_inc(x_24); -lean_dec(x_21); -x_26 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_26, 0, x_24); -lean_ctor_set(x_26, 1, x_25); -return x_26; -} -} -else -{ -lean_object* x_27; lean_object* x_28; lean_object* x_29; uint8_t x_30; -x_27 = lean_ctor_get(x_21, 0); -lean_inc(x_27); -x_28 = lean_ctor_get(x_21, 1); -lean_inc(x_28); -lean_dec(x_21); -x_29 = l_Lean_MonadRef_mkInfoFromRefPos___at_Lean_PrettyPrinter_Delaborator_delab___spec__3___rarg(x_5, x_6, x_28); -lean_dec(x_6); -x_30 = !lean_is_exclusive(x_29); -if (x_30 == 0) -{ -lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; -x_31 = lean_ctor_get(x_29, 0); -x_32 = l_Lean_PrettyPrinter_Delaborator_delabMData___closed__5; +lean_object* x_30; lean_object* x_31; lean_object* x_32; +x_30 = lean_ctor_get(x_27, 0); +x_31 = lean_ctor_get(x_27, 1); lean_inc(x_31); -x_33 = lean_alloc_ctor(2, 2, 0); -lean_ctor_set(x_33, 0, x_31); -lean_ctor_set(x_33, 1, x_32); -x_34 = l_Lean_PrettyPrinter_Delaborator_delabAppExplicit___lambda__5___closed__9; -x_35 = lean_alloc_ctor(2, 2, 0); -lean_ctor_set(x_35, 0, x_31); -lean_ctor_set(x_35, 1, x_34); -x_36 = l_Lean_PrettyPrinter_Delaborator_delabAppExplicit___lambda__5___closed__10; -x_37 = lean_array_push(x_36, x_33); -x_38 = lean_array_push(x_37, x_27); -x_39 = lean_array_push(x_38, x_35); -x_40 = l_Lean_PrettyPrinter_Delaborator_delabMData___closed__4; -x_41 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_41, 0, x_40); -lean_ctor_set(x_41, 1, x_39); -lean_ctor_set(x_29, 0, x_41); -return x_29; +lean_inc(x_30); +lean_dec(x_27); +x_32 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_32, 0, x_30); +lean_ctor_set(x_32, 1, x_31); +return x_32; +} } else { -lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_object* x_51; lean_object* x_52; lean_object* x_53; lean_object* x_54; -x_42 = lean_ctor_get(x_29, 0); -x_43 = lean_ctor_get(x_29, 1); -lean_inc(x_43); -lean_inc(x_42); -lean_dec(x_29); -x_44 = l_Lean_PrettyPrinter_Delaborator_delabMData___closed__5; -lean_inc(x_42); -x_45 = lean_alloc_ctor(2, 2, 0); -lean_ctor_set(x_45, 0, x_42); -lean_ctor_set(x_45, 1, x_44); -x_46 = l_Lean_PrettyPrinter_Delaborator_delabAppExplicit___lambda__5___closed__9; -x_47 = lean_alloc_ctor(2, 2, 0); -lean_ctor_set(x_47, 0, x_42); -lean_ctor_set(x_47, 1, x_46); -x_48 = l_Lean_PrettyPrinter_Delaborator_delabAppExplicit___lambda__5___closed__10; -x_49 = lean_array_push(x_48, x_45); -x_50 = lean_array_push(x_49, x_27); -x_51 = lean_array_push(x_50, x_47); -x_52 = l_Lean_PrettyPrinter_Delaborator_delabMData___closed__4; -x_53 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_53, 0, x_52); -lean_ctor_set(x_53, 1, x_51); -x_54 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_54, 0, x_53); -lean_ctor_set(x_54, 1, x_43); -return x_54; +lean_object* x_33; lean_object* x_34; lean_object* x_35; uint8_t x_36; +x_33 = lean_ctor_get(x_27, 0); +lean_inc(x_33); +x_34 = lean_ctor_get(x_27, 1); +lean_inc(x_34); +lean_dec(x_27); +x_35 = l_Lean_MonadRef_mkInfoFromRefPos___at_Lean_PrettyPrinter_Delaborator_delab___spec__3___rarg(x_5, x_6, x_34); +lean_dec(x_6); +x_36 = !lean_is_exclusive(x_35); +if (x_36 == 0) +{ +lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; +x_37 = lean_ctor_get(x_35, 0); +x_38 = l_Lean_PrettyPrinter_Delaborator_delabMData___closed__6; +lean_inc(x_37); +x_39 = lean_alloc_ctor(2, 2, 0); +lean_ctor_set(x_39, 0, x_37); +lean_ctor_set(x_39, 1, x_38); +x_40 = l_Lean_PrettyPrinter_Delaborator_delabAppExplicit___lambda__5___closed__9; +x_41 = lean_alloc_ctor(2, 2, 0); +lean_ctor_set(x_41, 0, x_37); +lean_ctor_set(x_41, 1, x_40); +x_42 = l_Lean_PrettyPrinter_Delaborator_delabAppExplicit___lambda__5___closed__10; +x_43 = lean_array_push(x_42, x_39); +x_44 = lean_array_push(x_43, x_33); +x_45 = lean_array_push(x_44, x_41); +x_46 = l_Lean_PrettyPrinter_Delaborator_delabMData___closed__5; +x_47 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_47, 0, x_46); +lean_ctor_set(x_47, 1, x_45); +lean_ctor_set(x_35, 0, x_47); +return x_35; +} +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 = lean_ctor_get(x_35, 0); +x_49 = lean_ctor_get(x_35, 1); +lean_inc(x_49); +lean_inc(x_48); +lean_dec(x_35); +x_50 = l_Lean_PrettyPrinter_Delaborator_delabMData___closed__6; +lean_inc(x_48); +x_51 = lean_alloc_ctor(2, 2, 0); +lean_ctor_set(x_51, 0, x_48); +lean_ctor_set(x_51, 1, x_50); +x_52 = l_Lean_PrettyPrinter_Delaborator_delabAppExplicit___lambda__5___closed__9; +x_53 = lean_alloc_ctor(2, 2, 0); +lean_ctor_set(x_53, 0, x_48); +lean_ctor_set(x_53, 1, x_52); +x_54 = l_Lean_PrettyPrinter_Delaborator_delabAppExplicit___lambda__5___closed__10; +x_55 = lean_array_push(x_54, x_51); +x_56 = lean_array_push(x_55, x_33); +x_57 = lean_array_push(x_56, x_53); +x_58 = l_Lean_PrettyPrinter_Delaborator_delabMData___closed__5; +x_59 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_59, 0, x_58); +lean_ctor_set(x_59, 1, x_57); +x_60 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_60, 0, x_59); +lean_ctor_set(x_60, 1, x_49); +return x_60; } } } else { -uint8_t x_55; +uint8_t x_61; lean_dec(x_6); lean_dec(x_5); lean_dec(x_1); -x_55 = !lean_is_exclusive(x_21); -if (x_55 == 0) +x_61 = !lean_is_exclusive(x_27); +if (x_61 == 0) { -return x_21; +return x_27; } else { -lean_object* x_56; lean_object* x_57; lean_object* x_58; -x_56 = lean_ctor_get(x_21, 0); -x_57 = lean_ctor_get(x_21, 1); -lean_inc(x_57); -lean_inc(x_56); -lean_dec(x_21); -x_58 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_58, 0, x_56); -lean_ctor_set(x_58, 1, x_57); -return x_58; +lean_object* x_62; lean_object* x_63; lean_object* x_64; +x_62 = lean_ctor_get(x_27, 0); +x_63 = lean_ctor_get(x_27, 1); +lean_inc(x_63); +lean_inc(x_62); +lean_dec(x_27); +x_64 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_64, 0, x_62); +lean_ctor_set(x_64, 1, x_63); +return x_64; } } } @@ -21030,24 +21870,7 @@ x_13 = l_Lean_PrettyPrinter_Delaborator_delabLam_match__1___rarg(x_11, x_12, x_3 return x_13; } } -lean_object* l_Lean_PrettyPrinter_Delaborator_SubExpr_withBindingDomain___at_Lean_PrettyPrinter_Delaborator_delabLam___spec__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { -_start: -{ -lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; -x_9 = l_Lean_PrettyPrinter_Delaborator_SubExpr_getExpr___at_Lean_PrettyPrinter_Delaborator_getExprKind___spec__1(x_2, x_3, x_4, x_5, x_6, x_7, x_8); -x_10 = lean_ctor_get(x_9, 0); -lean_inc(x_10); -x_11 = lean_ctor_get(x_9, 1); -lean_inc(x_11); -lean_dec(x_9); -x_12 = l_Lean_Expr_bindingDomain_x21(x_10); -lean_dec(x_10); -x_13 = lean_unsigned_to_nat(0u); -x_14 = l_Lean_PrettyPrinter_Delaborator_SubExpr_descend___at_Lean_PrettyPrinter_Delaborator_delab___spec__2(x_12, x_13, x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_11); -return x_14; -} -} -uint8_t l_Array_anyMUnsafe_any___at_Lean_PrettyPrinter_Delaborator_delabLam___spec__2(lean_object* x_1, lean_object* x_2, size_t x_3, size_t x_4) { +uint8_t l_Array_anyMUnsafe_any___at_Lean_PrettyPrinter_Delaborator_delabLam___spec__1(lean_object* x_1, lean_object* x_2, size_t x_3, size_t x_4) { _start: { uint8_t x_5; @@ -21562,7 +22385,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_PrettyPrinter_Delaborator_delabFVar___closed__2; x_2 = l_Lean_PrettyPrinter_Delaborator_delabLam___lambda__3___closed__12; -x_3 = lean_unsigned_to_nat(517u); +x_3 = lean_unsigned_to_nat(534u); x_4 = lean_unsigned_to_nat(44u); x_5 = l_Lean_PrettyPrinter_Delaborator_delabFVar___closed__4; x_6 = l___private_Init_Util_0__mkPanicMessageWithDecl(x_1, x_2, x_3, x_4, x_5); @@ -21586,7 +22409,7 @@ lean_inc(x_6); lean_inc(x_5); lean_inc(x_4); lean_inc(x_3); -x_14 = l_Lean_PrettyPrinter_Delaborator_SubExpr_withBindingDomain___at_Lean_PrettyPrinter_Delaborator_delabLam___spec__1(x_13, x_3, x_4, x_5, x_6, x_7, x_8, x_12); +x_14 = l_Lean_PrettyPrinter_Delaborator_SubExpr_withBindingDomain___at_Lean_PrettyPrinter_Delaborator_delabLetFun___spec__3(x_13, x_3, x_4, x_5, x_6, x_7, x_8, x_12); if (lean_obj_tag(x_14) == 0) { lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; @@ -21884,7 +22707,7 @@ x_202 = 0; x_203 = lean_usize_of_nat(x_24); lean_dec(x_24); lean_inc(x_2); -x_204 = l_Array_anyMUnsafe_any___at_Lean_PrettyPrinter_Delaborator_delabLam___spec__2(x_2, x_1, x_202, x_203); +x_204 = l_Array_anyMUnsafe_any___at_Lean_PrettyPrinter_Delaborator_delabLam___spec__1(x_2, x_1, x_202, x_203); if (x_204 == 0) { lean_object* x_205; @@ -22443,7 +23266,7 @@ x_10 = l___private_Lean_PrettyPrinter_Delaborator_Builtins_0__Lean_PrettyPrinter return x_10; } } -lean_object* l_Array_anyMUnsafe_any___at_Lean_PrettyPrinter_Delaborator_delabLam___spec__2___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +lean_object* l_Array_anyMUnsafe_any___at_Lean_PrettyPrinter_Delaborator_delabLam___spec__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { size_t x_5; size_t x_6; uint8_t x_7; lean_object* x_8; @@ -22451,7 +23274,7 @@ x_5 = lean_unbox_usize(x_3); lean_dec(x_3); x_6 = lean_unbox_usize(x_4); lean_dec(x_4); -x_7 = l_Array_anyMUnsafe_any___at_Lean_PrettyPrinter_Delaborator_delabLam___spec__2(x_1, x_2, x_5, x_6); +x_7 = l_Array_anyMUnsafe_any___at_Lean_PrettyPrinter_Delaborator_delabLam___spec__1(x_1, x_2, x_5, x_6); lean_dec(x_2); x_8 = lean_box(x_7); return x_8; @@ -23200,7 +24023,7 @@ lean_inc(x_8); lean_inc(x_7); lean_inc(x_6); lean_inc(x_5); -x_13 = l_Lean_PrettyPrinter_Delaborator_SubExpr_withBindingDomain___at_Lean_PrettyPrinter_Delaborator_delabLam___spec__1(x_12, x_5, x_6, x_7, x_8, x_9, x_10, x_11); +x_13 = l_Lean_PrettyPrinter_Delaborator_SubExpr_withBindingDomain___at_Lean_PrettyPrinter_Delaborator_delabLetFun___spec__3(x_12, x_5, x_6, x_7, x_8, x_9, x_10, x_11); if (lean_obj_tag(x_13) == 0) { lean_object* x_14; lean_object* x_15; lean_object* x_16; uint8_t x_17; @@ -24595,7 +25418,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_PrettyPrinter_Delaborator_delabFVar___closed__2; x_2 = l_Lean_PrettyPrinter_Delaborator_delabLetE___closed__1; -x_3 = lean_unsigned_to_nat(554u); +x_3 = lean_unsigned_to_nat(571u); x_4 = lean_unsigned_to_nat(38u); x_5 = l_Lean_PrettyPrinter_Delaborator_delabFVar___closed__4; x_6 = l___private_Init_Util_0__mkPanicMessageWithDecl(x_1, x_2, x_3, x_4, x_5); @@ -24620,66 +25443,6 @@ x_3 = lean_name_mk_string(x_1, x_2); return x_3; } } -static lean_object* _init_l_Lean_PrettyPrinter_Delaborator_delabLetE___closed__5() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string("letDecl"); -return x_1; -} -} -static lean_object* _init_l_Lean_PrettyPrinter_Delaborator_delabLetE___closed__6() { -_start: -{ -lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_PrettyPrinter_Delaborator_maybeAddBlockImplicit___closed__7; -x_2 = l_Lean_PrettyPrinter_Delaborator_delabLetE___closed__5; -x_3 = lean_name_mk_string(x_1, x_2); -return x_3; -} -} -static lean_object* _init_l_Lean_PrettyPrinter_Delaborator_delabLetE___closed__7() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string("letIdDecl"); -return x_1; -} -} -static lean_object* _init_l_Lean_PrettyPrinter_Delaborator_delabLetE___closed__8() { -_start: -{ -lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_PrettyPrinter_Delaborator_maybeAddBlockImplicit___closed__7; -x_2 = l_Lean_PrettyPrinter_Delaborator_delabLetE___closed__7; -x_3 = lean_name_mk_string(x_1, x_2); -return x_3; -} -} -static lean_object* _init_l_Lean_PrettyPrinter_Delaborator_delabLetE___closed__9() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string(";"); -return x_1; -} -} -static lean_object* _init_l_Lean_PrettyPrinter_Delaborator_delabLetE___closed__10() { -_start: -{ -lean_object* x_1; -x_1 = lean_alloc_closure((void*)(l_Lean_getPPLetVarTypes___boxed), 1, 0); -return x_1; -} -} -static lean_object* _init_l_Lean_PrettyPrinter_Delaborator_delabLetE___closed__11() { -_start: -{ -lean_object* x_1; -x_1 = lean_alloc_closure((void*)(l_Lean_getPPAnalysisLetVarType___boxed), 1, 0); -return x_1; -} -} lean_object* l_Lean_PrettyPrinter_Delaborator_delabLetE(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: { @@ -24755,7 +25518,7 @@ lean_inc(x_25); x_26 = lean_ctor_get(x_24, 1); lean_inc(x_26); lean_dec(x_24); -x_188 = l_Lean_PrettyPrinter_Delaborator_delabLetE___closed__10; +x_188 = l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__10; lean_inc(x_6); lean_inc(x_5); lean_inc(x_4); @@ -24776,7 +25539,7 @@ lean_dec(x_190); x_192 = lean_ctor_get(x_189, 1); lean_inc(x_192); lean_dec(x_189); -x_193 = l_Lean_PrettyPrinter_Delaborator_delabLetE___closed__11; +x_193 = l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__11; lean_inc(x_6); lean_inc(x_5); lean_inc(x_4); @@ -24911,17 +25674,17 @@ x_40 = lean_array_push(x_38, x_39); x_41 = lean_array_push(x_40, x_39); x_42 = lean_array_push(x_41, x_36); x_43 = lean_array_push(x_42, x_21); -x_44 = l_Lean_PrettyPrinter_Delaborator_delabLetE___closed__8; +x_44 = l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__8; x_45 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_45, 0, x_44); lean_ctor_set(x_45, 1, x_43); x_46 = l_Lean_PrettyPrinter_Delaborator_delabSort___closed__6; x_47 = lean_array_push(x_46, x_45); -x_48 = l_Lean_PrettyPrinter_Delaborator_delabLetE___closed__6; +x_48 = l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__6; x_49 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_49, 0, x_48); lean_ctor_set(x_49, 1, x_47); -x_50 = l_Lean_PrettyPrinter_Delaborator_delabLetE___closed__9; +x_50 = l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__9; x_51 = lean_alloc_ctor(2, 2, 0); lean_ctor_set(x_51, 0, x_31); lean_ctor_set(x_51, 1, x_50); @@ -24968,17 +25731,17 @@ x_72 = lean_array_push(x_70, x_71); x_73 = lean_array_push(x_72, x_71); x_74 = lean_array_push(x_73, x_68); x_75 = lean_array_push(x_74, x_21); -x_76 = l_Lean_PrettyPrinter_Delaborator_delabLetE___closed__8; +x_76 = l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__8; x_77 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_77, 0, x_76); lean_ctor_set(x_77, 1, x_75); x_78 = l_Lean_PrettyPrinter_Delaborator_delabSort___closed__6; x_79 = lean_array_push(x_78, x_77); -x_80 = l_Lean_PrettyPrinter_Delaborator_delabLetE___closed__6; +x_80 = l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__6; x_81 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_81, 0, x_80); lean_ctor_set(x_81, 1, x_79); -x_82 = l_Lean_PrettyPrinter_Delaborator_delabLetE___closed__9; +x_82 = l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__9; x_83 = lean_alloc_ctor(2, 2, 0); lean_ctor_set(x_83, 0, x_62); lean_ctor_set(x_83, 1, x_82); @@ -25060,16 +25823,16 @@ x_121 = lean_array_push(x_119, x_120); x_122 = lean_array_push(x_121, x_115); x_123 = lean_array_push(x_122, x_117); x_124 = lean_array_push(x_123, x_21); -x_125 = l_Lean_PrettyPrinter_Delaborator_delabLetE___closed__8; +x_125 = l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__8; x_126 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_126, 0, x_125); lean_ctor_set(x_126, 1, x_124); x_127 = lean_array_push(x_112, x_126); -x_128 = l_Lean_PrettyPrinter_Delaborator_delabLetE___closed__6; +x_128 = l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__6; x_129 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_129, 0, x_128); lean_ctor_set(x_129, 1, x_127); -x_130 = l_Lean_PrettyPrinter_Delaborator_delabLetE___closed__9; +x_130 = l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__9; x_131 = lean_alloc_ctor(2, 2, 0); lean_ctor_set(x_131, 0, x_101); lean_ctor_set(x_131, 1, x_130); @@ -25133,16 +25896,16 @@ x_162 = lean_array_push(x_160, x_161); x_163 = lean_array_push(x_162, x_156); x_164 = lean_array_push(x_163, x_158); x_165 = lean_array_push(x_164, x_21); -x_166 = l_Lean_PrettyPrinter_Delaborator_delabLetE___closed__8; +x_166 = l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__8; x_167 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_167, 0, x_166); lean_ctor_set(x_167, 1, x_165); x_168 = lean_array_push(x_153, x_167); -x_169 = l_Lean_PrettyPrinter_Delaborator_delabLetE___closed__6; +x_169 = l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__6; x_170 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_170, 0, x_169); lean_ctor_set(x_170, 1, x_168); -x_171 = l_Lean_PrettyPrinter_Delaborator_delabLetE___closed__9; +x_171 = l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__9; x_172 = lean_alloc_ctor(2, 2, 0); lean_ctor_set(x_172, 0, x_141); lean_ctor_set(x_172, 1, x_171); @@ -25452,7 +26215,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_PrettyPrinter_Delaborator_delabFVar___closed__2; x_2 = l_Lean_PrettyPrinter_Delaborator_delabLit___closed__1; -x_3 = lean_unsigned_to_nat(567u); +x_3 = lean_unsigned_to_nat(584u); x_4 = lean_unsigned_to_nat(31u); x_5 = l_Lean_PrettyPrinter_Delaborator_delabFVar___closed__4; x_6 = l___private_Init_Util_0__mkPanicMessageWithDecl(x_1, x_2, x_3, x_4, x_5); @@ -27194,7 +27957,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_PrettyPrinter_Delaborator_delabFVar___closed__2; x_2 = l_Lean_PrettyPrinter_Delaborator_delabProj___closed__1; -x_3 = lean_unsigned_to_nat(606u); +x_3 = lean_unsigned_to_nat(623u); x_4 = lean_unsigned_to_nat(38u); x_5 = l_Lean_PrettyPrinter_Delaborator_delabFVar___closed__4; x_6 = l___private_Init_Util_0__mkPanicMessageWithDecl(x_1, x_2, x_3, x_4, x_5); @@ -27633,7 +28396,7 @@ lean_dec(x_30); x_34 = l_Lean_PrettyPrinter_Delaborator_delabAppExplicit___lambda__5___closed__2; lean_inc(x_7); lean_inc(x_6); -x_35 = l_Lean_PrettyPrinter_Delaborator_SubExpr_withAppArg___at_Lean_PrettyPrinter_Delaborator_delabMData___spec__4(x_34, x_2, x_3, x_4, x_5, x_6, x_7, x_33); +x_35 = l_Lean_PrettyPrinter_Delaborator_SubExpr_withAppArg___at_Lean_PrettyPrinter_Delaborator_delabLetFun___spec__1(x_34, x_2, x_3, x_4, x_5, x_6, x_7, x_33); if (lean_obj_tag(x_35) == 0) { lean_object* x_36; lean_object* x_37; lean_object* x_38; uint8_t x_39; @@ -27766,7 +28529,7 @@ lean_object* x_77; lean_object* x_78; x_77 = l_Lean_PrettyPrinter_Delaborator_delabAppExplicit___lambda__5___closed__2; lean_inc(x_7); lean_inc(x_6); -x_78 = l_Lean_PrettyPrinter_Delaborator_SubExpr_withAppArg___at_Lean_PrettyPrinter_Delaborator_delabMData___spec__4(x_77, x_2, x_3, x_4, x_5, x_6, x_7, x_70); +x_78 = l_Lean_PrettyPrinter_Delaborator_SubExpr_withAppArg___at_Lean_PrettyPrinter_Delaborator_delabLetFun___spec__1(x_77, x_2, x_3, x_4, x_5, x_6, x_7, x_70); if (lean_obj_tag(x_78) == 0) { lean_object* x_79; lean_object* x_80; lean_object* x_81; uint8_t x_82; @@ -28101,37 +28864,6 @@ x_2 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Delaborator_delabDIte_matc return x_2; } } -lean_object* l_Lean_PrettyPrinter_Delaborator_SubExpr_withBindingBody___at_Lean_PrettyPrinter_Delaborator_delabDIte_delabBranch___spec__1___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) { -_start: -{ -lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; -x_11 = l_Lean_Expr_bindingBody_x21(x_1); -x_12 = lean_expr_instantiate1(x_11, x_3); -lean_dec(x_11); -x_13 = lean_unsigned_to_nat(1u); -x_14 = l_Lean_PrettyPrinter_Delaborator_SubExpr_descend___at_Lean_PrettyPrinter_Delaborator_delab___spec__2(x_12, x_13, x_2, x_4, x_5, x_6, x_7, x_8, x_9, x_10); -return x_14; -} -} -lean_object* l_Lean_PrettyPrinter_Delaborator_SubExpr_withBindingBody___at_Lean_PrettyPrinter_Delaborator_delabDIte_delabBranch___spec__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, 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; uint8_t x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; -x_10 = l_Lean_PrettyPrinter_Delaborator_SubExpr_getExpr___at_Lean_PrettyPrinter_Delaborator_getExprKind___spec__1(x_3, x_4, x_5, x_6, x_7, x_8, x_9); -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_Expr_binderInfo(x_11); -x_14 = l_Lean_Expr_bindingDomain_x21(x_11); -x_15 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Delaborator_SubExpr_withBindingBody___at_Lean_PrettyPrinter_Delaborator_delabDIte_delabBranch___spec__1___lambda__1___boxed), 10, 2); -lean_closure_set(x_15, 0, x_11); -lean_closure_set(x_15, 1, x_2); -x_16 = l_Lean_Meta_withLocalDecl___at_Lean_PrettyPrinter_Delaborator_withBindingBodyUnusedName___spec__3___rarg(x_1, x_13, x_14, x_15, x_3, x_4, x_5, x_6, x_7, x_8, x_12); -return x_16; -} -} lean_object* l_Lean_PrettyPrinter_Delaborator_delabDIte_delabBranch___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: { @@ -28261,7 +28993,7 @@ lean_inc(x_20); lean_dec(x_1); x_21 = l_Lean_PrettyPrinter_Delaborator_delabAppExplicit___lambda__5___closed__2; lean_inc(x_20); -x_22 = l_Lean_PrettyPrinter_Delaborator_SubExpr_withBindingBody___at_Lean_PrettyPrinter_Delaborator_delabDIte_delabBranch___spec__1(x_20, x_21, x_2, x_3, x_4, x_5, x_6, x_7, x_11); +x_22 = l_Lean_PrettyPrinter_Delaborator_SubExpr_withBindingBody___at_Lean_PrettyPrinter_Delaborator_delabLetFun___spec__2(x_20, x_21, x_2, x_3, x_4, x_5, x_6, x_7, x_11); if (lean_obj_tag(x_22) == 0) { uint8_t x_23; @@ -28320,16 +29052,6 @@ return x_33; } } } -lean_object* l_Lean_PrettyPrinter_Delaborator_SubExpr_withBindingBody___at_Lean_PrettyPrinter_Delaborator_delabDIte_delabBranch___spec__1___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) { -_start: -{ -lean_object* x_11; -x_11 = l_Lean_PrettyPrinter_Delaborator_SubExpr_withBindingBody___at_Lean_PrettyPrinter_Delaborator_delabDIte_delabBranch___spec__1___lambda__1(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_1); -return x_11; -} -} lean_object* l_Lean_PrettyPrinter_Delaborator_delabDIte_delabBranch___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: { @@ -28440,7 +29162,7 @@ _start: { lean_object* x_1; lean_object* x_2; x_1 = l_Lean_PrettyPrinter_Delaborator_delabMData___closed__2; -x_2 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Delaborator_SubExpr_withAppFn___at_Lean_PrettyPrinter_Delaborator_delabMData___spec__5), 8, 1); +x_2 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Delaborator_SubExpr_withAppFn___at_Lean_PrettyPrinter_Delaborator_delabLetFun___spec__4), 8, 1); lean_closure_set(x_2, 0, x_1); return x_2; } @@ -28569,7 +29291,7 @@ lean_inc(x_5); lean_inc(x_4); lean_inc(x_3); lean_inc(x_2); -x_15 = l_Lean_PrettyPrinter_Delaborator_SubExpr_withAppFn___at_Lean_PrettyPrinter_Delaborator_delabMData___spec__5(x_14, x_2, x_3, x_4, x_5, x_6, x_7, x_13); +x_15 = l_Lean_PrettyPrinter_Delaborator_SubExpr_withAppFn___at_Lean_PrettyPrinter_Delaborator_delabLetFun___spec__4(x_14, x_2, x_3, x_4, x_5, x_6, x_7, x_13); if (lean_obj_tag(x_15) == 0) { lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; @@ -29017,7 +29739,7 @@ lean_inc(x_4); lean_inc(x_3); lean_inc(x_2); lean_inc(x_1); -x_19 = l_Lean_PrettyPrinter_Delaborator_SubExpr_withAppFn___at_Lean_PrettyPrinter_Delaborator_delabMData___spec__5(x_18, x_1, x_2, x_3, x_4, x_5, x_6, x_17); +x_19 = l_Lean_PrettyPrinter_Delaborator_SubExpr_withAppFn___at_Lean_PrettyPrinter_Delaborator_delabLetFun___spec__4(x_18, x_1, x_2, x_3, x_4, x_5, x_6, x_17); if (lean_obj_tag(x_19) == 0) { lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; @@ -29029,7 +29751,7 @@ lean_dec(x_19); x_22 = l_Lean_PrettyPrinter_Delaborator_delabAppExplicit___lambda__5___closed__2; lean_inc(x_6); lean_inc(x_5); -x_23 = l_Lean_PrettyPrinter_Delaborator_SubExpr_withAppArg___at_Lean_PrettyPrinter_Delaborator_delabMData___spec__4(x_22, x_1, x_2, x_3, x_4, x_5, x_6, x_21); +x_23 = l_Lean_PrettyPrinter_Delaborator_SubExpr_withAppArg___at_Lean_PrettyPrinter_Delaborator_delabLetFun___spec__1(x_22, x_1, x_2, x_3, x_4, x_5, x_6, x_21); if (lean_obj_tag(x_23) == 0) { lean_object* x_24; lean_object* x_25; uint8_t x_26; @@ -29224,42 +29946,6 @@ x_6 = l_Lean_KeyedDeclsAttribute_addBuiltin___rarg(x_2, x_3, x_4, x_5, x_1); return x_6; } } -lean_object* l_Lean_PrettyPrinter_Delaborator_delabDoElems_match__1___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3) { -_start: -{ -if (lean_obj_tag(x_1) == 6) -{ -lean_object* x_4; lean_object* x_5; lean_object* x_6; uint64_t x_7; lean_object* x_8; lean_object* x_9; -lean_dec(x_3); -x_4 = lean_ctor_get(x_1, 0); -lean_inc(x_4); -x_5 = lean_ctor_get(x_1, 1); -lean_inc(x_5); -x_6 = lean_ctor_get(x_1, 2); -lean_inc(x_6); -x_7 = lean_ctor_get_uint64(x_1, sizeof(void*)*3); -lean_dec(x_1); -x_8 = lean_box_uint64(x_7); -x_9 = lean_apply_4(x_2, x_4, x_5, x_6, x_8); -return x_9; -} -else -{ -lean_object* x_10; -lean_dec(x_2); -x_10 = lean_apply_1(x_3, x_1); -return x_10; -} -} -} -lean_object* l_Lean_PrettyPrinter_Delaborator_delabDoElems_match__1(lean_object* x_1) { -_start: -{ -lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Delaborator_delabDoElems_match__1___rarg), 3, 0); -return x_2; -} -} lean_object* l_Lean_PrettyPrinter_Delaborator_delabDoElems_prependAndRec(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { _start: { @@ -29501,12 +30187,12 @@ x_31 = lean_array_push(x_29, x_30); x_32 = lean_array_push(x_31, x_25); x_33 = lean_array_push(x_32, x_27); x_34 = lean_array_push(x_33, x_3); -x_35 = l_Lean_PrettyPrinter_Delaborator_delabLetE___closed__8; +x_35 = l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__8; x_36 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_36, 0, x_35); lean_ctor_set(x_36, 1, x_34); x_37 = lean_array_push(x_22, x_36); -x_38 = l_Lean_PrettyPrinter_Delaborator_delabLetE___closed__6; +x_38 = l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__6; x_39 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_39, 0, x_38); lean_ctor_set(x_39, 1, x_37); @@ -29902,7 +30588,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_PrettyPrinter_Delaborator_delabFVar___closed__2; x_2 = l_Lean_PrettyPrinter_Delaborator_delabDoElems___closed__5; -x_3 = lean_unsigned_to_nat(678u); +x_3 = lean_unsigned_to_nat(695u); x_4 = lean_unsigned_to_nat(40u); x_5 = l_Lean_PrettyPrinter_Delaborator_delabFVar___closed__4; x_6 = l___private_Init_Util_0__mkPanicMessageWithDecl(x_1, x_2, x_3, x_4, x_5); @@ -30227,7 +30913,7 @@ lean_inc(x_4); lean_inc(x_3); lean_inc(x_2); lean_inc(x_1); -x_88 = l_Lean_PrettyPrinter_Delaborator_SubExpr_withAppFn___at_Lean_PrettyPrinter_Delaborator_delabMData___spec__5(x_87, x_1, x_2, x_3, x_4, x_5, x_6, x_10); +x_88 = l_Lean_PrettyPrinter_Delaborator_SubExpr_withAppFn___at_Lean_PrettyPrinter_Delaborator_delabLetFun___spec__4(x_87, x_1, x_2, x_3, x_4, x_5, x_6, x_10); if (lean_obj_tag(x_88) == 0) { lean_object* x_89; lean_object* x_90; lean_object* x_91; lean_object* x_92; lean_object* x_93; lean_object* x_94; @@ -35039,6 +35725,28 @@ lean_mark_persistent(l___regBuiltin_Lean_PrettyPrinter_Delaborator_delabAppMatch res = l___regBuiltin_Lean_PrettyPrinter_Delaborator_delabAppMatch(lean_io_mk_world()); if (lean_io_result_is_error(res)) return res; lean_dec_ref(res); +l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__1 = _init_l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__1(); +lean_mark_persistent(l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__1); +l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__2 = _init_l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__2(); +lean_mark_persistent(l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__2); +l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__3 = _init_l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__3(); +lean_mark_persistent(l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__3); +l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__4 = _init_l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__4(); +lean_mark_persistent(l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__4); +l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__5 = _init_l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__5(); +lean_mark_persistent(l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__5); +l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__6 = _init_l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__6(); +lean_mark_persistent(l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__6); +l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__7 = _init_l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__7(); +lean_mark_persistent(l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__7); +l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__8 = _init_l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__8(); +lean_mark_persistent(l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__8); +l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__9 = _init_l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__9(); +lean_mark_persistent(l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__9); +l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__10 = _init_l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__10(); +lean_mark_persistent(l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__10); +l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__11 = _init_l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__11(); +lean_mark_persistent(l_Lean_PrettyPrinter_Delaborator_delabLetFun___lambda__1___closed__11); l_Lean_PrettyPrinter_Delaborator_SubExpr_withMDataExpr___at_Lean_PrettyPrinter_Delaborator_delabMData___spec__3___closed__1 = _init_l_Lean_PrettyPrinter_Delaborator_SubExpr_withMDataExpr___at_Lean_PrettyPrinter_Delaborator_delabMData___spec__3___closed__1(); lean_mark_persistent(l_Lean_PrettyPrinter_Delaborator_SubExpr_withMDataExpr___at_Lean_PrettyPrinter_Delaborator_delabMData___spec__3___closed__1); l_Lean_PrettyPrinter_Delaborator_delabMData___closed__1 = _init_l_Lean_PrettyPrinter_Delaborator_delabMData___closed__1(); @@ -35051,6 +35759,8 @@ l_Lean_PrettyPrinter_Delaborator_delabMData___closed__4 = _init_l_Lean_PrettyPri lean_mark_persistent(l_Lean_PrettyPrinter_Delaborator_delabMData___closed__4); l_Lean_PrettyPrinter_Delaborator_delabMData___closed__5 = _init_l_Lean_PrettyPrinter_Delaborator_delabMData___closed__5(); lean_mark_persistent(l_Lean_PrettyPrinter_Delaborator_delabMData___closed__5); +l_Lean_PrettyPrinter_Delaborator_delabMData___closed__6 = _init_l_Lean_PrettyPrinter_Delaborator_delabMData___closed__6(); +lean_mark_persistent(l_Lean_PrettyPrinter_Delaborator_delabMData___closed__6); l___regBuiltin_Lean_PrettyPrinter_Delaborator_delabMData___closed__1 = _init_l___regBuiltin_Lean_PrettyPrinter_Delaborator_delabMData___closed__1(); lean_mark_persistent(l___regBuiltin_Lean_PrettyPrinter_Delaborator_delabMData___closed__1); l___regBuiltin_Lean_PrettyPrinter_Delaborator_delabMData___closed__2 = _init_l___regBuiltin_Lean_PrettyPrinter_Delaborator_delabMData___closed__2(); @@ -35166,20 +35876,6 @@ l_Lean_PrettyPrinter_Delaborator_delabLetE___closed__3 = _init_l_Lean_PrettyPrin lean_mark_persistent(l_Lean_PrettyPrinter_Delaborator_delabLetE___closed__3); l_Lean_PrettyPrinter_Delaborator_delabLetE___closed__4 = _init_l_Lean_PrettyPrinter_Delaborator_delabLetE___closed__4(); lean_mark_persistent(l_Lean_PrettyPrinter_Delaborator_delabLetE___closed__4); -l_Lean_PrettyPrinter_Delaborator_delabLetE___closed__5 = _init_l_Lean_PrettyPrinter_Delaborator_delabLetE___closed__5(); -lean_mark_persistent(l_Lean_PrettyPrinter_Delaborator_delabLetE___closed__5); -l_Lean_PrettyPrinter_Delaborator_delabLetE___closed__6 = _init_l_Lean_PrettyPrinter_Delaborator_delabLetE___closed__6(); -lean_mark_persistent(l_Lean_PrettyPrinter_Delaborator_delabLetE___closed__6); -l_Lean_PrettyPrinter_Delaborator_delabLetE___closed__7 = _init_l_Lean_PrettyPrinter_Delaborator_delabLetE___closed__7(); -lean_mark_persistent(l_Lean_PrettyPrinter_Delaborator_delabLetE___closed__7); -l_Lean_PrettyPrinter_Delaborator_delabLetE___closed__8 = _init_l_Lean_PrettyPrinter_Delaborator_delabLetE___closed__8(); -lean_mark_persistent(l_Lean_PrettyPrinter_Delaborator_delabLetE___closed__8); -l_Lean_PrettyPrinter_Delaborator_delabLetE___closed__9 = _init_l_Lean_PrettyPrinter_Delaborator_delabLetE___closed__9(); -lean_mark_persistent(l_Lean_PrettyPrinter_Delaborator_delabLetE___closed__9); -l_Lean_PrettyPrinter_Delaborator_delabLetE___closed__10 = _init_l_Lean_PrettyPrinter_Delaborator_delabLetE___closed__10(); -lean_mark_persistent(l_Lean_PrettyPrinter_Delaborator_delabLetE___closed__10); -l_Lean_PrettyPrinter_Delaborator_delabLetE___closed__11 = _init_l_Lean_PrettyPrinter_Delaborator_delabLetE___closed__11(); -lean_mark_persistent(l_Lean_PrettyPrinter_Delaborator_delabLetE___closed__11); l___regBuiltin_Lean_PrettyPrinter_Delaborator_delabLetE___closed__1 = _init_l___regBuiltin_Lean_PrettyPrinter_Delaborator_delabLetE___closed__1(); lean_mark_persistent(l___regBuiltin_Lean_PrettyPrinter_Delaborator_delabLetE___closed__1); l___regBuiltin_Lean_PrettyPrinter_Delaborator_delabLetE___closed__2 = _init_l___regBuiltin_Lean_PrettyPrinter_Delaborator_delabLetE___closed__2(); diff --git a/stage0/stdlib/Lean/Server/Completion.c b/stage0/stdlib/Lean/Server/Completion.c index d20c233cdc..6f08c0218a 100644 --- a/stage0/stdlib/Lean/Server/Completion.c +++ b/stage0/stdlib/Lean/Server/Completion.c @@ -188,7 +188,7 @@ lean_object* lean_st_mk_ref(lean_object*, lean_object*); static lean_object* l___private_Lean_Server_Completion_0__Lean_Server_Completion_dotCompletion___lambda__2___closed__4; lean_object* l___private_Lean_Server_Completion_0__Lean_Server_Completion_idCompletionCore___lambda__4(lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Syntax_getId(lean_object*); -uint8_t l_Lean_Meta_isMatcherCore(lean_object*, lean_object*); +uint8_t lean_is_matcher(lean_object*, lean_object*); lean_object* lean_format_pretty(lean_object*, lean_object*); lean_object* l_Array_forInUnsafe_loop___at___private_Lean_Server_Completion_0__Lean_Server_Completion_getDotCompletionTypeNames_visit___spec__1(lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Std_PersistentHashMap_mkEmptyEntriesArray(lean_object*, lean_object*); @@ -666,7 +666,7 @@ x_9 = lean_ctor_get(x_7, 0); x_10 = lean_ctor_get(x_9, 0); lean_inc(x_10); lean_dec(x_9); -x_11 = l_Lean_Meta_isMatcherCore(x_10, x_1); +x_11 = lean_is_matcher(x_10, x_1); x_12 = lean_box(x_11); lean_ctor_set(x_7, 0, x_12); return x_7; @@ -682,7 +682,7 @@ lean_dec(x_7); x_15 = lean_ctor_get(x_13, 0); lean_inc(x_15); lean_dec(x_13); -x_16 = l_Lean_Meta_isMatcherCore(x_15, x_1); +x_16 = lean_is_matcher(x_15, x_1); x_17 = lean_box(x_16); x_18 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_18, 0, x_17);