diff --git a/stage0/src/Init/Lean/Elab/Tactic.lean b/stage0/src/Init/Lean/Elab/Tactic.lean index 2ae2bef354..b5b6a2d2ca 100644 --- a/stage0/src/Init/Lean/Elab/Tactic.lean +++ b/stage0/src/Init/Lean/Elab/Tactic.lean @@ -13,7 +13,7 @@ namespace Elab namespace Term def mkTacticMVar (ref : Syntax) (type : Expr) (tacticCode : Syntax) : TermElabM Expr := do -mvar ← mkFreshExprMVar ref type MetavarKind.synthetic `main; +mvar ← mkFreshExprMVar ref type MetavarKind.syntheticOpaque `main; let mvarId := mvar.mvarId!; registerSyntheticMVar ref mvarId $ SyntheticMVarKind.tactic tacticCode; pure mvar @@ -24,7 +24,7 @@ fun stx expectedType? => | some expectedType => mkTacticMVar stx expectedType (stx.getArg 1) | none => throwError stx ("invalid tactic block, expected type has not been provided") -open Tactic (TacticM evalTactic) +open Tactic (TacticM evalTactic getUnsolvedGoals) def liftTacticElabM {α} (ref : Syntax) (mvarId : MVarId) (x : TacticM α) : TermElabM α := withMVarContext mvarId $ fun ctx s => @@ -32,16 +32,13 @@ withMVarContext mvarId $ fun ctx s => | EStateM.Result.error ex newS => EStateM.Result.error (Term.Exception.ex ex) newS.toTermState | EStateM.Result.ok a newS => EStateM.Result.ok a newS.toTermState -def reportUnsolvedGoals (ref : Syntax) (goals : List MVarId) : TermElabM Unit := -throwError ref $ "unsolved goals" ++ Format.line ++ MessageData.joinSep (goals.map $ MessageData.ofGoal) Format.line - def ensureAssignmentHasNoMVars (ref : Syntax) (mvarId : MVarId) : TermElabM Unit := do val ← instantiateMVars ref (mkMVar mvarId); when val.hasMVar $ throwError ref ("tactic failed, result still contain metavariables" ++ indentExpr val) def runTactic (ref : Syntax) (mvarId : MVarId) (tacticCode : Syntax) : TermElabM Unit := do modify $ fun s => { mctx := s.mctx.instantiateMVarDeclMVars mvarId, .. s }; -remainingGoals ← liftTacticElabM ref mvarId $ do { evalTactic tacticCode; s ← get; pure s.goals }; +remainingGoals ← liftTacticElabM ref mvarId $ do { evalTactic tacticCode; getUnsolvedGoals }; let tailRef := ref.getTailWithInfo.getD ref; unless remainingGoals.isEmpty (reportUnsolvedGoals tailRef remainingGoals); ensureAssignmentHasNoMVars tailRef mvarId diff --git a/stage0/src/Init/Lean/Elab/Tactic/Basic.lean b/stage0/src/Init/Lean/Elab/Tactic/Basic.lean index 2f5437be69..e531f91b89 100644 --- a/stage0/src/Init/Lean/Elab/Tactic/Basic.lean +++ b/stage0/src/Init/Lean/Elab/Tactic/Basic.lean @@ -4,6 +4,7 @@ Released under Apache 2.0 license as described in the file LICENSE. Authors: Leonardo de Moura, Sebastian Ullrich -/ prelude +import Init.Lean.Util.CollectMVars import Init.Lean.Elab.Util import Init.Lean.Elab.Term import Init.Lean.Meta.Tactic.Assumption @@ -11,6 +12,11 @@ import Init.Lean.Meta.Tactic.Intro namespace Lean namespace Elab + +def Term.reportUnsolvedGoals (ref : Syntax) (goals : List MVarId) : TermElabM Unit := +let tailRef := ref.getTailWithInfo.getD ref; +Term.throwError tailRef $ "unsolved goals" ++ Format.line ++ MessageData.joinSep (goals.map $ MessageData.ofGoal) (Format.line ++ Format.line) + namespace Tactic structure Context extends toTermCtx : Term.Context := @@ -22,12 +28,27 @@ structure State extends toTermState : Term.State := instance State.inhabited : Inhabited State := ⟨{ goals := [], toTermState := arbitrary _ }⟩ +structure BacktrackableState := +(env : Environment) +(mctx : MetavarContext) +(goals : List MVarId) + abbrev Exception := Elab.Exception abbrev TacticM := ReaderT Context (EStateM Exception State) abbrev Tactic := Syntax → TacticM Unit +protected def save (s : State) : BacktrackableState := +{ .. s } + +protected def restore (s : State) (bs : BacktrackableState) : State := +{ env := bs.env, mctx := bs.mctx, goals := bs.goals, .. s } + +instance : EStateM.Backtrackable BacktrackableState State := +{ save := Tactic.save, + restore := Tactic.restore } + def liftTermElabM {α} (x : TermElabM α) : TacticM α := fun ctx s => match x ctx.toTermCtx s.toTermState with | EStateM.Result.ok a newS => EStateM.Result.ok a { toTermState := newS, .. s } @@ -44,9 +65,17 @@ def getOptions : TacticM Options := do ctx ← read; pure ctx.config.opts def getMVarDecl (mvarId : MVarId) : TacticM MetavarDecl := do mctx ← getMCtx; pure $ mctx.getDecl mvarId def instantiateMVars (ref : Syntax) (e : Expr) : TacticM Expr := liftTermElabM $ Term.instantiateMVars ref e def addContext (msg : MessageData) : TacticM MessageData := liftTermElabM $ Term.addContext msg +def isExprMVarAssigned (mvarId : MVarId) : TacticM Bool := liftTermElabM $ Term.isExprMVarAssigned mvarId def assignExprMVar (mvarId : MVarId) (val : Expr) : TacticM Unit := liftTermElabM $ Term.assignExprMVar mvarId val def ensureHasType (ref : Syntax) (expectedType? : Option Expr) (e : Expr) : TacticM Expr := liftTermElabM $ Term.ensureHasType ref expectedType? e def elabTerm (stx : Syntax) (expectedType? : Option Expr) : TacticM Expr := liftTermElabM $ Term.elabTerm stx expectedType? +def reportUnsolvedGoals (ref : Syntax) (goals : List MVarId) : TacticM Unit := liftTermElabM $ Term.reportUnsolvedGoals ref goals + +/-- Collect unassigned metavariables -/ +def collectMVars (ref : Syntax) (e : Expr) : TacticM (List MVarId) := do +e ← instantiateMVars ref e; +let s := Lean.collectMVars {} e; +pure s.result.toList instance monadLog : MonadLog TacticM := { getCmdPos := do ctx ← read; pure ctx.cmdPos, @@ -180,8 +209,13 @@ let needReset := ctx.localInstances == mvarDecl.localInstances; withLCtx mvarDecl.lctx mvarDecl.localInstances $ resettingSynthInstanceCacheWhen needReset x def getGoals : TacticM (List MVarId) := do s ← get; pure s.goals -def getMainGoal (ref : Syntax) : TacticM (MVarId × List MVarId) := do (g::gs) ← getGoals | throwError ref "no goals to be solved"; pure (g, gs) -def updateGoals (gs : List MVarId) : TacticM Unit := modify $ fun s => { goals := gs, .. s } +def setGoals (gs : List MVarId) : TacticM Unit := modify $ fun s => { goals := gs, .. s } +def pruneSolvedGoals : TacticM Unit := do +gs ← getGoals; +gs ← gs.filterM $ fun g => not <$> isExprMVarAssigned g; +setGoals gs +def getUnsolvedGoals : TacticM (List MVarId) := do pruneSolvedGoals; getGoals +def getMainGoal (ref : Syntax) : TacticM (MVarId × List MVarId) := do (g::gs) ← getUnsolvedGoals | throwError ref "no goals to be solved"; pure (g, gs) def ensureHasNoMVars (ref : Syntax) (e : Expr) : TacticM Unit := do e ← instantiateMVars ref e; when e.hasMVar $ throwError ref ("tactic failed, resulting expression contains metavariables" ++ indentExpr e) @@ -190,7 +224,19 @@ when e.hasMVar $ throwError ref ("tactic failed, resulting expression contains m (g, gs) ← getMainGoal ref; withMVarContext g $ do gs' ← liftMetaM ref $ tactic g; - updateGoals (gs' ++ gs) + setGoals (gs' ++ gs) + +def done (ref : Syntax) : TacticM Unit := do +gs ← getUnsolvedGoals; +unless gs.isEmpty $ reportUnsolvedGoals ref gs + +def focus {α} (ref : Syntax) (tactic : TacticM α) : TacticM α := do +(g, gs) ← getMainGoal ref; +setGoals [g]; +a ← tactic; +done ref; +setGoals gs; +pure a @[builtinTactic seq] def evalSeq : Tactic := fun stx => (stx.getArg 0).forSepArgsM evalTactic @@ -216,9 +262,30 @@ fun stx => match_syntax stx with ensureHasNoMVars ref val; assignExprMVar g val }; - updateGoals gs + setGoals gs | _ => throwUnsupportedSyntax +@[builtinTactic «refine»] def evalRefine : Tactic := +fun stx => match_syntax stx with + | `(tactic| refine $e) => do + let ref := stx; + (g, gs) ← getMainGoal stx; + gs' ← withMVarContext g $ do { + decl ← getMVarDecl g; + val ← elabTerm e decl.type; + val ← ensureHasType ref decl.type val; + assignExprMVar g val; + collectMVars ref val + }; + setGoals (gs' ++ gs) + | _ => throwUnsupportedSyntax + +@[builtinTactic nestedTacticBlock] def evalNestedTacticBlock : Tactic := +fun stx => focus stx (evalTactic (stx.getArg 1)) + +@[builtinTactic nestedTacticBlockCurly] def evalNestedTacticBlockCurly : Tactic := +evalNestedTacticBlock + @[init] private def regTraceClasses : IO Unit := do registerTraceClass `Elab.tactic; pure () diff --git a/stage0/src/Init/Lean/Elab/Term.lean b/stage0/src/Init/Lean/Elab/Term.lean index a7cd5e68a4..8a6a3d483b 100644 --- a/stage0/src/Init/Lean/Elab/Term.lean +++ b/stage0/src/Init/Lean/Elab/Term.lean @@ -638,6 +638,11 @@ fun _ _ => pure $ mkSort levelOne @[builtinTermElab «hole»] def elabHole : TermElab := fun stx expectedType? => mkFreshExprMVar stx expectedType? +@[builtinTermElab «namedHole»] def elabNamedHole : TermElab := +fun stx expectedType? => + let name := stx.getIdAt 1; + mkFreshExprMVar stx expectedType? MetavarKind.syntheticOpaque name + /-- Main loop for `mkPairs`. -/ private partial def mkPairsAux (elems : Array Syntax) : Nat → Syntax → TermElabM Syntax | i, acc => diff --git a/stage0/src/Init/Lean/LocalContext.lean b/stage0/src/Init/Lean/LocalContext.lean index e27bb39d65..46a51a4d57 100644 --- a/stage0/src/Init/Lean/LocalContext.lean +++ b/stage0/src/Init/Lean/LocalContext.lean @@ -7,6 +7,7 @@ prelude import Init.Data.PersistentArray.Basic import Init.Data.PersistentHashMap.Basic import Init.Lean.Expr +import Init.Lean.Hygiene namespace Lean @@ -149,7 +150,7 @@ lctx.decls.findRev? (fun decl => def usesUserName (lctx : LocalContext) (userName : Name) : Bool := (lctx.findFromUserName? userName).isSome -partial def getUnusedNameAux (lctx : LocalContext) (suggestion : Name) : Nat → Name × Nat +private partial def getUnusedNameAux (lctx : LocalContext) (suggestion : Name) : Nat → Name × Nat | i => let curr := suggestion.appendIndexAfter i; if lctx.usesUserName curr then getUnusedNameAux (i + 1) @@ -157,7 +158,8 @@ partial def getUnusedNameAux (lctx : LocalContext) (suggestion : Name) : Nat → @[export lean_local_ctx_get_unused_name] def getUnusedName (lctx : LocalContext) (suggestion : Name) : Name := -if lctx.usesUserName suggestion then (lctx.getUnusedNameAux suggestion 1).1 +let (suggestion, _) := extractMacroScopes suggestion; +if lctx.usesUserName suggestion then (getUnusedNameAux lctx suggestion 1).1 else suggestion @[export lean_local_ctx_last_decl] diff --git a/stage0/src/Init/Lean/Meta/Tactic/Intro.lean b/stage0/src/Init/Lean/Meta/Tactic/Intro.lean index 220fb7d922..08233df1bf 100644 --- a/stage0/src/Init/Lean/Meta/Tactic/Intro.lean +++ b/stage0/src/Init/Lean/Meta/Tactic/Intro.lean @@ -16,7 +16,8 @@ def introNCoreAux {σ} (mvarId : MVarId) (mkName : LocalContext → Name → σ let type := type.instantiateRevRange j fvars.size fvars; adaptReader (fun (ctx : Context) => { lctx := lctx, .. ctx }) $ withNewLocalInstances isClassExpensive fvars j $ do - newMVar ← mkFreshExprSyntheticOpaqueMVar type; + tag ← getMVarTag mvarId; + newMVar ← mkFreshExprSyntheticOpaqueMVar type tag; lctx ← getLCtx; newVal ← mkLambda fvars newMVar; modify $ fun s => { mctx := s.mctx.assignExpr mvarId newVal, .. s }; diff --git a/stage0/src/Init/Lean/Meta/Tactic/Util.lean b/stage0/src/Init/Lean/Meta/Tactic/Util.lean index 3031240915..cd8c55378e 100644 --- a/stage0/src/Init/Lean/Meta/Tactic/Util.lean +++ b/stage0/src/Init/Lean/Meta/Tactic/Util.lean @@ -9,6 +9,11 @@ import Init.Lean.Meta.Basic namespace Lean namespace Meta +/-- Aka user name -/ +def getMVarTag (mvarId : MVarId) : MetaM Name := do +mvarDecl ← getMVarDecl mvarId; +pure mvarDecl.userName + def mkFreshExprSyntheticOpaqueMVar (type : Expr) (userName : Name := Name.anonymous) : MetaM Expr := mkFreshExprMVar type userName MetavarKind.syntheticOpaque diff --git a/stage0/src/Init/Lean/Parser/Tactic.lean b/stage0/src/Init/Lean/Parser/Tactic.lean index 1e8c799579..3cc4c8fc6e 100644 --- a/stage0/src/Init/Lean/Parser/Tactic.lean +++ b/stage0/src/Init/Lean/Parser/Tactic.lean @@ -42,6 +42,7 @@ def seq := parser! sepBy tacticParser "; " true @[builtinTacticParser] def «apply» := parser! nonReservedSymbol "apply " >> termParser @[builtinTacticParser] def «exact» := parser! nonReservedSymbol "exact " >> termParser @[builtinTacticParser] def «refine» := parser! nonReservedSymbol "refine " >> termParser +@[builtinTacticParser] def «case» := parser! nonReservedSymbol "case " >> ident >> tacticParser @[builtinTacticParser] def nestedTacticBlock := parser! "begin " >> seq >> "end" @[builtinTacticParser] def nestedTacticBlockCurly := parser! "{" >> seq >> "}" @[builtinTacticParser] def orelse := tparser! pushLeading >> " <|> " >> tacticParser 1 diff --git a/stage0/src/Init/Lean/Util/CollectMVars.lean b/stage0/src/Init/Lean/Util/CollectMVars.lean new file mode 100644 index 0000000000..9a41a8af1a --- /dev/null +++ b/stage0/src/Init/Lean/Util/CollectMVars.lean @@ -0,0 +1,41 @@ +/- +Copyright (c) 2020 Microsoft Corporation. All rights reserved. +Released under Apache 2.0 license as described in the file LICENSE. +Authors: Leonardo de Moura +-/ +prelude +import Init.Lean.Expr + +namespace Lean + +namespace CollectMVars + +structure State := +(visitedExpr : ExprSet := {}) +(result : Array MVarId := #[]) + +instance State.inhabited : Inhabited State := ⟨{}⟩ + +abbrev Visitor := State → State + +@[inline] def visit (f : Expr → Visitor) (e : Expr) : Visitor := +fun s => + if !e.hasMVar || s.visitedExpr.contains e then s + else f e { visitedExpr := s.visitedExpr.insert e, .. s } + +partial def main : Expr → Visitor +| Expr.proj _ _ e _ => visit main e +| Expr.forallE _ d b _ => visit main b ∘ visit main d +| Expr.lam _ d b _ => visit main b ∘ visit main d +| Expr.letE _ t v b _ => visit main b ∘ visit main v ∘ visit main t +| Expr.app f a _ => visit main a ∘ visit main f +| Expr.mdata _ b _ => visit main b +| Expr.mvar mvarId _ => fun s => { result := s.result.push mvarId, .. s } +| _ => id + +end CollectMVars + +def collectMVars (s : CollectMVars.State) (e : Expr) : CollectMVars.State := +CollectMVars.visit CollectMVars.main e s + +end Lean diff --git a/stage0/src/Init/Lean/Util/PPGoal.lean b/stage0/src/Init/Lean/Util/PPGoal.lean index b5f2909384..bd1d058966 100644 --- a/stage0/src/Init/Lean/Util/PPGoal.lean +++ b/stage0/src/Init/Lean/Util/PPGoal.lean @@ -43,6 +43,9 @@ match mctx.findDecl? mvarId with ([], none, Format.nil); let fmt := pushPending varNames type? fmt; let fmt := addLine fmt; - fmt ++ "⊢" ++ " " ++ Format.nest indent (pp mvarDecl.type) + let fmt := fmt ++ "⊢" ++ " " ++ Format.nest indent (pp mvarDecl.type); + match mvarDecl.userName with + | Name.anonymous => fmt + | name => "case " ++ format name ++ Format.line ++ fmt end Lean diff --git a/stage0/stdlib/CMakeLists.txt b/stage0/stdlib/CMakeLists.txt index 3a8f809d5c..df5aa110b2 100644 --- a/stage0/stdlib/CMakeLists.txt +++ b/stage0/stdlib/CMakeLists.txt @@ -1 +1 @@ -add_library (stage0 OBJECT Init/./Coe.c Init/./Control.c Init/./Control/Alternative.c Init/./Control/Applicative.c Init/./Control/Conditional.c Init/./Control/EState.c Init/./Control/Except.c Init/./Control/Functor.c Init/./Control/Id.c Init/./Control/Lift.c Init/./Control/Monad.c Init/./Control/MonadFail.c Init/./Control/Option.c Init/./Control/Reader.c Init/./Control/State.c Init/./Core.c Init/./Data.c Init/./Data/Array.c Init/./Data/Array/Basic.c Init/./Data/Array/BinSearch.c Init/./Data/Array/QSort.c Init/./Data/AssocList.c Init/./Data/Basic.c Init/./Data/BinomialHeap.c Init/./Data/BinomialHeap/Basic.c Init/./Data/ByteArray.c Init/./Data/ByteArray/Basic.c Init/./Data/Char.c Init/./Data/Char/Basic.c Init/./Data/DList.c Init/./Data/Fin.c Init/./Data/Fin/Basic.c Init/./Data/HashMap.c Init/./Data/HashMap/Basic.c Init/./Data/HashSet.c Init/./Data/Hashable.c Init/./Data/Int.c Init/./Data/Int/Basic.c Init/./Data/List.c Init/./Data/List/Basic.c Init/./Data/List/BasicAux.c Init/./Data/List/Control.c Init/./Data/List/Instances.c Init/./Data/Nat.c Init/./Data/Nat/Basic.c Init/./Data/Nat/Bitwise.c Init/./Data/Nat/Control.c Init/./Data/Nat/Div.c Init/./Data/Option.c Init/./Data/Option/Basic.c Init/./Data/Option/BasicAux.c Init/./Data/Option/Instances.c Init/./Data/PersistentArray.c Init/./Data/PersistentArray/Basic.c Init/./Data/PersistentHashMap.c Init/./Data/PersistentHashMap/Basic.c Init/./Data/PersistentHashSet.c Init/./Data/Queue.c Init/./Data/Queue/Basic.c Init/./Data/RBMap.c Init/./Data/RBMap/Basic.c Init/./Data/RBMap/BasicAux.c Init/./Data/RBTree.c Init/./Data/RBTree/Basic.c Init/./Data/Random.c Init/./Data/Repr.c Init/./Data/Stack.c Init/./Data/Stack/Basic.c Init/./Data/String.c Init/./Data/String/Basic.c Init/./Data/ToString.c Init/./Data/UInt.c Init/./Default.c Init/./Fix.c Init/./Lean.c Init/./Lean/Attributes.c Init/./Lean/AuxRecursor.c Init/./Lean/Class.c Init/./Lean/Compiler.c Init/./Lean/Compiler/ClosedTermCache.c Init/./Lean/Compiler/ConstFolding.c Init/./Lean/Compiler/ExportAttr.c Init/./Lean/Compiler/ExternAttr.c Init/./Lean/Compiler/IR.c Init/./Lean/Compiler/IR/Basic.c Init/./Lean/Compiler/IR/Borrow.c Init/./Lean/Compiler/IR/Boxing.c Init/./Lean/Compiler/IR/Checker.c Init/./Lean/Compiler/IR/CompilerM.c Init/./Lean/Compiler/IR/CtorLayout.c Init/./Lean/Compiler/IR/ElimDeadBranches.c Init/./Lean/Compiler/IR/ElimDeadVars.c Init/./Lean/Compiler/IR/EmitC.c Init/./Lean/Compiler/IR/EmitUtil.c Init/./Lean/Compiler/IR/ExpandResetReuse.c Init/./Lean/Compiler/IR/Format.c Init/./Lean/Compiler/IR/FreeVars.c Init/./Lean/Compiler/IR/LiveVars.c Init/./Lean/Compiler/IR/NormIds.c Init/./Lean/Compiler/IR/PushProj.c Init/./Lean/Compiler/IR/RC.c Init/./Lean/Compiler/IR/ResetReuse.c Init/./Lean/Compiler/IR/SimpCase.c Init/./Lean/Compiler/IR/UnboxResult.c Init/./Lean/Compiler/ImplementedByAttr.c Init/./Lean/Compiler/InitAttr.c Init/./Lean/Compiler/InlineAttrs.c Init/./Lean/Compiler/NameMangling.c Init/./Lean/Compiler/NeverExtractAttr.c Init/./Lean/Compiler/Specialize.c Init/./Lean/Compiler/Util.c Init/./Lean/Data/Format.c Init/./Lean/Data/KVMap.c Init/./Lean/Data/LBool.c Init/./Lean/Data/LOption.c Init/./Lean/Data/Name.c Init/./Lean/Data/NameGenerator.c Init/./Lean/Data/Occurrences.c Init/./Lean/Data/Options.c Init/./Lean/Data/Position.c Init/./Lean/Data/SMap.c Init/./Lean/Data/Trie.c Init/./Lean/Declaration.c Init/./Lean/Elab.c Init/./Lean/Elab/Alias.c Init/./Lean/Elab/BuiltinNotation.c Init/./Lean/Elab/Command.c Init/./Lean/Elab/DeclModifiers.c Init/./Lean/Elab/Declaration.c Init/./Lean/Elab/Definition.c Init/./Lean/Elab/ElabStrategyAttrs.c Init/./Lean/Elab/Exception.c Init/./Lean/Elab/Frontend.c Init/./Lean/Elab/Import.c Init/./Lean/Elab/Level.c Init/./Lean/Elab/Log.c Init/./Lean/Elab/Quotation.c Init/./Lean/Elab/ResolveName.c Init/./Lean/Elab/Syntax.c Init/./Lean/Elab/SynthesizeSyntheticMVars.c Init/./Lean/Elab/Tactic.c Init/./Lean/Elab/Tactic/Basic.c Init/./Lean/Elab/Term.c Init/./Lean/Elab/TermApp.c Init/./Lean/Elab/TermBinders.c Init/./Lean/Elab/Util.c Init/./Lean/Environment.c Init/./Lean/EqnCompiler.c Init/./Lean/EqnCompiler/MatchPattern.c Init/./Lean/Eval.c Init/./Lean/Expr.c Init/./Lean/HeadIndex.c Init/./Lean/Hygiene.c Init/./Lean/Level.c Init/./Lean/Linter.c Init/./Lean/LocalContext.c Init/./Lean/Message.c Init/./Lean/Meta.c Init/./Lean/Meta/AbstractMVars.c Init/./Lean/Meta/AppBuilder.c Init/./Lean/Meta/Basic.c Init/./Lean/Meta/Check.c Init/./Lean/Meta/DiscrTree.c Init/./Lean/Meta/DiscrTreeTypes.c Init/./Lean/Meta/Exception.c Init/./Lean/Meta/ExprDefEq.c Init/./Lean/Meta/FunInfo.c Init/./Lean/Meta/InferType.c Init/./Lean/Meta/Instances.c Init/./Lean/Meta/KAbstract.c Init/./Lean/Meta/LevelDefEq.c Init/./Lean/Meta/Message.c Init/./Lean/Meta/Offset.c Init/./Lean/Meta/Reduce.c Init/./Lean/Meta/SynthInstance.c Init/./Lean/Meta/Tactic.c Init/./Lean/Meta/Tactic/Assumption.c Init/./Lean/Meta/Tactic/Intro.c Init/./Lean/Meta/Tactic/Util.c Init/./Lean/Meta/WHNF.c Init/./Lean/MetavarContext.c Init/./Lean/Modifiers.c Init/./Lean/Parser.c Init/./Lean/Parser/Command.c Init/./Lean/Parser/Identifier.c Init/./Lean/Parser/Level.c Init/./Lean/Parser/Module.c Init/./Lean/Parser/Parser.c Init/./Lean/Parser/Syntax.c Init/./Lean/Parser/Tactic.c Init/./Lean/Parser/Term.c Init/./Lean/Parser/Transform.c Init/./Lean/ProjFns.c Init/./Lean/ReducibilityAttrs.c Init/./Lean/Runtime.c Init/./Lean/Scopes.c Init/./Lean/Structure.c Init/./Lean/Syntax.c Init/./Lean/ToExpr.c Init/./Lean/Util/CollectFVars.c Init/./Lean/Util/CollectLevelParams.c Init/./Lean/Util/MonadCache.c Init/./Lean/Util/PPExt.c Init/./Lean/Util/PPGoal.c Init/./Lean/Util/Path.c Init/./Lean/Util/Profile.c Init/./Lean/Util/RecDepth.c Init/./Lean/Util/Sorry.c Init/./Lean/Util/Trace.c Init/./Lean/Util/WHNF.c Init/./LeanInit.c Init/./System.c Init/./System/FilePath.c Init/./System/IO.c Init/./System/IOError.c Init/./System/Platform.c Init/./Util.c Init/./WF.c) +add_library (stage0 OBJECT Init/./Coe.c Init/./Control.c Init/./Control/Alternative.c Init/./Control/Applicative.c Init/./Control/Conditional.c Init/./Control/EState.c Init/./Control/Except.c Init/./Control/Functor.c Init/./Control/Id.c Init/./Control/Lift.c Init/./Control/Monad.c Init/./Control/MonadFail.c Init/./Control/Option.c Init/./Control/Reader.c Init/./Control/State.c Init/./Core.c Init/./Data.c Init/./Data/Array.c Init/./Data/Array/Basic.c Init/./Data/Array/BinSearch.c Init/./Data/Array/QSort.c Init/./Data/AssocList.c Init/./Data/Basic.c Init/./Data/BinomialHeap.c Init/./Data/BinomialHeap/Basic.c Init/./Data/ByteArray.c Init/./Data/ByteArray/Basic.c Init/./Data/Char.c Init/./Data/Char/Basic.c Init/./Data/DList.c Init/./Data/Fin.c Init/./Data/Fin/Basic.c Init/./Data/HashMap.c Init/./Data/HashMap/Basic.c Init/./Data/HashSet.c Init/./Data/Hashable.c Init/./Data/Int.c Init/./Data/Int/Basic.c Init/./Data/List.c Init/./Data/List/Basic.c Init/./Data/List/BasicAux.c Init/./Data/List/Control.c Init/./Data/List/Instances.c Init/./Data/Nat.c Init/./Data/Nat/Basic.c Init/./Data/Nat/Bitwise.c Init/./Data/Nat/Control.c Init/./Data/Nat/Div.c Init/./Data/Option.c Init/./Data/Option/Basic.c Init/./Data/Option/BasicAux.c Init/./Data/Option/Instances.c Init/./Data/PersistentArray.c Init/./Data/PersistentArray/Basic.c Init/./Data/PersistentHashMap.c Init/./Data/PersistentHashMap/Basic.c Init/./Data/PersistentHashSet.c Init/./Data/Queue.c Init/./Data/Queue/Basic.c Init/./Data/RBMap.c Init/./Data/RBMap/Basic.c Init/./Data/RBMap/BasicAux.c Init/./Data/RBTree.c Init/./Data/RBTree/Basic.c Init/./Data/Random.c Init/./Data/Repr.c Init/./Data/Stack.c Init/./Data/Stack/Basic.c Init/./Data/String.c Init/./Data/String/Basic.c Init/./Data/ToString.c Init/./Data/UInt.c Init/./Default.c Init/./Fix.c Init/./Lean.c Init/./Lean/Attributes.c Init/./Lean/AuxRecursor.c Init/./Lean/Class.c Init/./Lean/Compiler.c Init/./Lean/Compiler/ClosedTermCache.c Init/./Lean/Compiler/ConstFolding.c Init/./Lean/Compiler/ExportAttr.c Init/./Lean/Compiler/ExternAttr.c Init/./Lean/Compiler/IR.c Init/./Lean/Compiler/IR/Basic.c Init/./Lean/Compiler/IR/Borrow.c Init/./Lean/Compiler/IR/Boxing.c Init/./Lean/Compiler/IR/Checker.c Init/./Lean/Compiler/IR/CompilerM.c Init/./Lean/Compiler/IR/CtorLayout.c Init/./Lean/Compiler/IR/ElimDeadBranches.c Init/./Lean/Compiler/IR/ElimDeadVars.c Init/./Lean/Compiler/IR/EmitC.c Init/./Lean/Compiler/IR/EmitUtil.c Init/./Lean/Compiler/IR/ExpandResetReuse.c Init/./Lean/Compiler/IR/Format.c Init/./Lean/Compiler/IR/FreeVars.c Init/./Lean/Compiler/IR/LiveVars.c Init/./Lean/Compiler/IR/NormIds.c Init/./Lean/Compiler/IR/PushProj.c Init/./Lean/Compiler/IR/RC.c Init/./Lean/Compiler/IR/ResetReuse.c Init/./Lean/Compiler/IR/SimpCase.c Init/./Lean/Compiler/IR/UnboxResult.c Init/./Lean/Compiler/ImplementedByAttr.c Init/./Lean/Compiler/InitAttr.c Init/./Lean/Compiler/InlineAttrs.c Init/./Lean/Compiler/NameMangling.c Init/./Lean/Compiler/NeverExtractAttr.c Init/./Lean/Compiler/Specialize.c Init/./Lean/Compiler/Util.c Init/./Lean/Data/Format.c Init/./Lean/Data/KVMap.c Init/./Lean/Data/LBool.c Init/./Lean/Data/LOption.c Init/./Lean/Data/Name.c Init/./Lean/Data/NameGenerator.c Init/./Lean/Data/Occurrences.c Init/./Lean/Data/Options.c Init/./Lean/Data/Position.c Init/./Lean/Data/SMap.c Init/./Lean/Data/Trie.c Init/./Lean/Declaration.c Init/./Lean/Elab.c Init/./Lean/Elab/Alias.c Init/./Lean/Elab/BuiltinNotation.c Init/./Lean/Elab/Command.c Init/./Lean/Elab/DeclModifiers.c Init/./Lean/Elab/Declaration.c Init/./Lean/Elab/Definition.c Init/./Lean/Elab/ElabStrategyAttrs.c Init/./Lean/Elab/Exception.c Init/./Lean/Elab/Frontend.c Init/./Lean/Elab/Import.c Init/./Lean/Elab/Level.c Init/./Lean/Elab/Log.c Init/./Lean/Elab/Quotation.c Init/./Lean/Elab/ResolveName.c Init/./Lean/Elab/Syntax.c Init/./Lean/Elab/SynthesizeSyntheticMVars.c Init/./Lean/Elab/Tactic.c Init/./Lean/Elab/Tactic/Basic.c Init/./Lean/Elab/Term.c Init/./Lean/Elab/TermApp.c Init/./Lean/Elab/TermBinders.c Init/./Lean/Elab/Util.c Init/./Lean/Environment.c Init/./Lean/EqnCompiler.c Init/./Lean/EqnCompiler/MatchPattern.c Init/./Lean/Eval.c Init/./Lean/Expr.c Init/./Lean/HeadIndex.c Init/./Lean/Hygiene.c Init/./Lean/Level.c Init/./Lean/Linter.c Init/./Lean/LocalContext.c Init/./Lean/Message.c Init/./Lean/Meta.c Init/./Lean/Meta/AbstractMVars.c Init/./Lean/Meta/AppBuilder.c Init/./Lean/Meta/Basic.c Init/./Lean/Meta/Check.c Init/./Lean/Meta/DiscrTree.c Init/./Lean/Meta/DiscrTreeTypes.c Init/./Lean/Meta/Exception.c Init/./Lean/Meta/ExprDefEq.c Init/./Lean/Meta/FunInfo.c Init/./Lean/Meta/InferType.c Init/./Lean/Meta/Instances.c Init/./Lean/Meta/KAbstract.c Init/./Lean/Meta/LevelDefEq.c Init/./Lean/Meta/Message.c Init/./Lean/Meta/Offset.c Init/./Lean/Meta/Reduce.c Init/./Lean/Meta/SynthInstance.c Init/./Lean/Meta/Tactic.c Init/./Lean/Meta/Tactic/Assumption.c Init/./Lean/Meta/Tactic/Intro.c Init/./Lean/Meta/Tactic/Util.c Init/./Lean/Meta/WHNF.c Init/./Lean/MetavarContext.c Init/./Lean/Modifiers.c Init/./Lean/Parser.c Init/./Lean/Parser/Command.c Init/./Lean/Parser/Identifier.c Init/./Lean/Parser/Level.c Init/./Lean/Parser/Module.c Init/./Lean/Parser/Parser.c Init/./Lean/Parser/Syntax.c Init/./Lean/Parser/Tactic.c Init/./Lean/Parser/Term.c Init/./Lean/Parser/Transform.c Init/./Lean/ProjFns.c Init/./Lean/ReducibilityAttrs.c Init/./Lean/Runtime.c Init/./Lean/Scopes.c Init/./Lean/Structure.c Init/./Lean/Syntax.c Init/./Lean/ToExpr.c Init/./Lean/Util/CollectFVars.c Init/./Lean/Util/CollectLevelParams.c Init/./Lean/Util/CollectMVars.c Init/./Lean/Util/MonadCache.c Init/./Lean/Util/PPExt.c Init/./Lean/Util/PPGoal.c Init/./Lean/Util/Path.c Init/./Lean/Util/Profile.c Init/./Lean/Util/RecDepth.c Init/./Lean/Util/Sorry.c Init/./Lean/Util/Trace.c Init/./Lean/Util/WHNF.c Init/./LeanInit.c Init/./System.c Init/./System/FilePath.c Init/./System/IO.c Init/./System/IOError.c Init/./System/Platform.c Init/./Util.c Init/./WF.c) diff --git a/stage0/stdlib/Init/Lean/Elab/Command.c b/stage0/stdlib/Init/Lean/Elab/Command.c index 3cd6e6b671..271a0c1bc0 100644 --- a/stage0/stdlib/Init/Lean/Elab/Command.c +++ b/stage0/stdlib/Init/Lean/Elab/Command.c @@ -149,6 +149,7 @@ size_t l_USize_shiftRight(size_t, size_t); lean_object* l_Lean_SMap_find_x3f___at_Lean_Elab_Command_elabCommand___main___spec__1___boxed(lean_object*, lean_object*); lean_object* l_Lean_Elab_getPos___at_Lean_Elab_Command_throwError___spec__2___boxed(lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Elab_Exception_inhabited___closed__1; +extern lean_object* l_Lean_FileMap_ofString___closed__1; lean_object* l_Lean_Elab_Command_Scope_inhabited; extern lean_object* l_Lean_Parser_Command_section___elambda__1___closed__1; extern lean_object* l_Lean_Meta_MetaHasEval___rarg___closed__4; @@ -463,7 +464,6 @@ lean_object* l___regBuiltinCommandElab_Lean_Elab_Command_elabUniverse___closed__ extern lean_object* l_Lean_Parser_Command_universes___elambda__1___closed__2; lean_object* l_Lean_Elab_Command_elabEnd___closed__3; lean_object* lean_io_ref_set(lean_object*, lean_object*, lean_object*); -extern lean_object* l_Lean_mkOptionalNode___closed__1; lean_object* l___regBuiltinCommandElab_Lean_Elab_Command_elabCheck___closed__4; lean_object* l___private_Init_Lean_Elab_Command_6__mkTermContext___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Command_getLevelNames(lean_object*, lean_object*); @@ -14518,7 +14518,7 @@ lean_object* l_Lean_Elab_Command_elabVariable___lambda__1(lean_object* x_1, lean _start: { lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; -x_5 = l_Lean_mkOptionalNode___closed__1; +x_5 = l_Lean_FileMap_ofString___closed__1; x_6 = lean_array_push(x_5, x_1); x_7 = l_Lean_Meta_dbgTrace___rarg___closed__1; x_8 = l_Lean_Elab_Term_elabBinders___rarg(x_6, x_7, x_3, x_4); diff --git a/stage0/stdlib/Init/Lean/Elab/Syntax.c b/stage0/stdlib/Init/Lean/Elab/Syntax.c index 9661b964aa..5080e5b62a 100644 --- a/stage0/stdlib/Init/Lean/Elab/Syntax.c +++ b/stage0/stdlib/Init/Lean/Elab/Syntax.c @@ -121,6 +121,7 @@ lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__98; lean_object* lean_string_utf8_byte_size(lean_object*); lean_object* l_Lean_mkAtom(lean_object*); lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__20; +extern lean_object* l_Lean_FileMap_ofString___closed__1; lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__10; lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__32; lean_object* l_Array_umapMAux___main___at_Lean_Elab_Command_elabNotation___spec__3(lean_object*, lean_object*); @@ -411,7 +412,6 @@ lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__17; lean_object* l_Lean_Elab_Command_elabSyntax___closed__23; lean_object* l_Lean_Elab_Command_elabMacroRules___lambda__1___closed__12; lean_object* l___private_Init_Lean_Elab_Syntax_3__getMode___boxed(lean_object*, lean_object*, lean_object*, lean_object*); -extern lean_object* l_Lean_mkOptionalNode___closed__1; lean_object* l_Array_findIdxAux___main___at___private_Init_Lean_Elab_Syntax_8__antiquote___main___spec__4___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Command_elabSyntax___closed__13; lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__57; @@ -949,7 +949,7 @@ x_4 = l_Nat_repr(x_3); x_5 = lean_box(0); x_6 = l_Lean_numLitKind; x_7 = l_Lean_mkStxLit(x_6, x_4, x_5); -x_8 = l_Lean_mkOptionalNode___closed__1; +x_8 = l_Lean_FileMap_ofString___closed__1; x_9 = lean_array_push(x_8, x_7); x_10 = l_Lean_Parser_Term_num___elambda__1___closed__1; x_11 = lean_alloc_ctor(1, 2, 0); @@ -3654,7 +3654,7 @@ lean_ctor_set(x_1067, 0, x_1066); lean_ctor_set(x_1067, 1, x_1065); x_1068 = lean_array_push(x_1062, x_1067); x_1069 = l_Lean_mkStxStrLit(x_1049, x_1056); -x_1070 = l_Lean_mkOptionalNode___closed__1; +x_1070 = l_Lean_FileMap_ofString___closed__1; x_1071 = lean_array_push(x_1070, x_1069); x_1072 = l_Lean_Parser_Term_str___elambda__1___closed__2; x_1073 = lean_alloc_ctor(1, 2, 0); @@ -3707,7 +3707,7 @@ lean_ctor_set(x_1097, 0, x_1096); lean_ctor_set(x_1097, 1, x_1095); x_1098 = lean_array_push(x_1092, x_1097); x_1099 = l_Lean_mkStxStrLit(x_1049, x_1086); -x_1100 = l_Lean_mkOptionalNode___closed__1; +x_1100 = l_Lean_FileMap_ofString___closed__1; x_1101 = lean_array_push(x_1100, x_1099); x_1102 = l_Lean_Parser_Term_str___elambda__1___closed__2; x_1103 = lean_alloc_ctor(1, 2, 0); @@ -4067,7 +4067,7 @@ x_1151 = lean_array_push(x_1143, x_1150); x_1152 = l_Nat_repr(x_1133); x_1153 = l_Lean_numLitKind; x_1154 = l_Lean_mkStxLit(x_1153, x_1152, x_1137); -x_1155 = l_Lean_mkOptionalNode___closed__1; +x_1155 = l_Lean_FileMap_ofString___closed__1; x_1156 = lean_array_push(x_1155, x_1154); x_1157 = l_Lean_Parser_Term_num___elambda__1___closed__1; x_1158 = lean_alloc_ctor(1, 2, 0); @@ -4125,7 +4125,7 @@ x_1182 = lean_array_push(x_1174, x_1181); x_1183 = l_Nat_repr(x_1133); x_1184 = l_Lean_numLitKind; x_1185 = l_Lean_mkStxLit(x_1184, x_1183, x_1168); -x_1186 = l_Lean_mkOptionalNode___closed__1; +x_1186 = l_Lean_FileMap_ofString___closed__1; x_1187 = lean_array_push(x_1186, x_1185); x_1188 = l_Lean_Parser_Term_num___elambda__1___closed__1; x_1189 = lean_alloc_ctor(1, 2, 0); @@ -11437,7 +11437,7 @@ lean_inc(x_22); x_23 = lean_ctor_get(x_21, 1); lean_inc(x_23); lean_dec(x_21); -x_24 = l_Lean_mkOptionalNode___closed__1; +x_24 = l_Lean_FileMap_ofString___closed__1; x_25 = lean_array_push(x_24, x_18); x_26 = l_Array_iterateMAux___main___at_Array_append___spec__1___rarg(x_22, x_22, x_20, x_25); lean_dec(x_22); diff --git a/stage0/stdlib/Init/Lean/Elab/Tactic.c b/stage0/stdlib/Init/Lean/Elab/Tactic.c index d79984de5e..b117b95e69 100644 --- a/stage0/stdlib/Init/Lean/Elab/Tactic.c +++ b/stage0/stdlib/Init/Lean/Elab/Tactic.c @@ -20,28 +20,23 @@ lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabTacticBlock(lean_object*) lean_object* l_Lean_Elab_Term_instantiateMVars(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_mkFreshExprMVar(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_liftTacticElabM___rarg___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -extern lean_object* l_Lean_MessageData_ofList___closed__3; lean_object* l_Lean_Elab_Term_runTactic___lambda__1(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_ensureAssignmentHasNoMVars___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_mkMVar(lean_object*); lean_object* l_Lean_Elab_Term_liftTacticElabM___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Tactic_evalTactic(lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Parser_Term_tacticBlock___elambda__1___closed__2; -lean_object* l_Lean_Elab_Term_reportUnsolvedGoals___closed__3; lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabTacticBlock___closed__3; lean_object* l_Lean_Syntax_getTailWithInfo___main(lean_object*); lean_object* l_Lean_Elab_Term_ensureAssignmentHasNoMVars___closed__3; lean_object* l_ReaderT_bind___at_Lean_Elab_Tactic_monadLog___spec__2___rarg(lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_List_map___main___at_Lean_Elab_Term_reportUnsolvedGoals___spec__1(lean_object*); lean_object* l_Lean_Elab_Term_elabTacticBlock___closed__1; +lean_object* l_Lean_Elab_Tactic_getUnsolvedGoals(lean_object*, lean_object*); lean_object* lean_name_mk_string(lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_throwError___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_elabTacticBlock___closed__2; -lean_object* l_Lean_Elab_Term_reportUnsolvedGoals___closed__1; lean_object* l_Lean_Elab_Term_liftTacticElabM(lean_object*); -lean_object* l_Lean_Elab_Term_reportUnsolvedGoals___closed__4; lean_object* l_Lean_Elab_Term_withMVarContext___rarg(lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_MessageData_joinSep___main(lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_runTactic(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_runTactic___closed__1; lean_object* l_Lean_Elab_Term_elabTacticBlock___closed__3; @@ -59,9 +54,7 @@ lean_object* l_Lean_Elab_Term_elabTacticBlock(lean_object*, lean_object*, lean_o uint8_t l_List_isEmpty___rarg(lean_object*); lean_object* l_Lean_Elab_Term_mkTacticMVar(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_indentExpr(lean_object*); -lean_object* l_Lean_Elab_Term_reportUnsolvedGoals___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_mkTacticMVar___closed__1; -lean_object* l_Lean_Elab_Term_reportUnsolvedGoals___closed__2; lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabTacticBlock___closed__1; lean_object* l_Lean_Elab_Term_ensureAssignmentHasNoMVars(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* _init_l_Lean_Elab_Term_mkTacticMVar___closed__1() { @@ -88,7 +81,7 @@ _start: lean_object* x_6; uint8_t x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; uint8_t x_15; x_6 = lean_alloc_ctor(1, 1, 0); lean_ctor_set(x_6, 0, x_2); -x_7 = 1; +x_7 = 2; x_8 = l_Lean_Elab_Term_mkTacticMVar___closed__2; lean_inc(x_4); x_9 = l_Lean_Elab_Term_mkFreshExprMVar(x_1, x_6, x_7, x_8, x_4, x_5); @@ -562,115 +555,6 @@ x_2 = lean_alloc_closure((void*)(l_Lean_Elab_Term_liftTacticElabM___rarg), 5, 0) return x_2; } } -lean_object* l_List_map___main___at_Lean_Elab_Term_reportUnsolvedGoals___spec__1(lean_object* x_1) { -_start: -{ -if (lean_obj_tag(x_1) == 0) -{ -lean_object* x_2; -x_2 = lean_box(0); -return x_2; -} -else -{ -uint8_t x_3; -x_3 = !lean_is_exclusive(x_1); -if (x_3 == 0) -{ -lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; -x_4 = lean_ctor_get(x_1, 0); -x_5 = lean_ctor_get(x_1, 1); -x_6 = lean_alloc_ctor(5, 1, 0); -lean_ctor_set(x_6, 0, x_4); -x_7 = l_List_map___main___at_Lean_Elab_Term_reportUnsolvedGoals___spec__1(x_5); -lean_ctor_set(x_1, 1, x_7); -lean_ctor_set(x_1, 0, x_6); -return x_1; -} -else -{ -lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; -x_8 = lean_ctor_get(x_1, 0); -x_9 = lean_ctor_get(x_1, 1); -lean_inc(x_9); -lean_inc(x_8); -lean_dec(x_1); -x_10 = lean_alloc_ctor(5, 1, 0); -lean_ctor_set(x_10, 0, x_8); -x_11 = l_List_map___main___at_Lean_Elab_Term_reportUnsolvedGoals___spec__1(x_9); -x_12 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_12, 0, x_10); -lean_ctor_set(x_12, 1, x_11); -return x_12; -} -} -} -} -lean_object* _init_l_Lean_Elab_Term_reportUnsolvedGoals___closed__1() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string("unsolved goals"); -return x_1; -} -} -lean_object* _init_l_Lean_Elab_Term_reportUnsolvedGoals___closed__2() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Elab_Term_reportUnsolvedGoals___closed__1; -x_2 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_2, 0, x_1); -return x_2; -} -} -lean_object* _init_l_Lean_Elab_Term_reportUnsolvedGoals___closed__3() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Elab_Term_reportUnsolvedGoals___closed__2; -x_2 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_2, 0, x_1); -return x_2; -} -} -lean_object* _init_l_Lean_Elab_Term_reportUnsolvedGoals___closed__4() { -_start: -{ -lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Elab_Term_reportUnsolvedGoals___closed__3; -x_2 = l_Lean_MessageData_ofList___closed__3; -x_3 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_3, 0, x_1); -lean_ctor_set(x_3, 1, x_2); -return x_3; -} -} -lean_object* l_Lean_Elab_Term_reportUnsolvedGoals(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; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; -x_5 = l_List_map___main___at_Lean_Elab_Term_reportUnsolvedGoals___spec__1(x_2); -x_6 = l_Lean_MessageData_ofList___closed__3; -x_7 = l_Lean_MessageData_joinSep___main(x_5, x_6); -lean_dec(x_5); -x_8 = l_Lean_Elab_Term_reportUnsolvedGoals___closed__4; -x_9 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_9, 0, x_8); -lean_ctor_set(x_9, 1, x_7); -x_10 = l_Lean_Elab_Term_throwError___rarg(x_1, x_9, x_3, x_4); -return x_10; -} -} -lean_object* l_Lean_Elab_Term_reportUnsolvedGoals___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_Term_reportUnsolvedGoals(x_1, x_2, x_3, x_4); -lean_dec(x_1); -return x_5; -} -} lean_object* _init_l_Lean_Elab_Term_ensureAssignmentHasNoMVars___closed__1() { _start: { @@ -785,13 +669,9 @@ return x_5; lean_object* l_Lean_Elab_Term_runTactic___lambda__1(lean_object* x_1, lean_object* x_2, lean_object* x_3) { _start: { -lean_object* x_4; lean_object* x_5; -x_4 = lean_ctor_get(x_3, 1); -lean_inc(x_4); -x_5 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_5, 0, x_4); -lean_ctor_set(x_5, 1, x_3); -return x_5; +lean_object* x_4; +x_4 = l_Lean_Elab_Tactic_getUnsolvedGoals(x_2, x_3); +return x_4; } } lean_object* _init_l_Lean_Elab_Term_runTactic___closed__1() { @@ -847,7 +727,6 @@ if (x_18 == 0) lean_object* x_19; uint8_t x_20; lean_dec(x_2); x_19 = l_Lean_Elab_Term_reportUnsolvedGoals(x_1, x_15, x_4, x_16); -lean_dec(x_1); x_20 = !lean_is_exclusive(x_19); if (x_20 == 0) { @@ -887,7 +766,6 @@ x_25 = lean_ctor_get(x_17, 0); lean_inc(x_25); lean_dec(x_17); x_26 = l_Lean_Elab_Term_reportUnsolvedGoals(x_25, x_15, x_4, x_16); -lean_dec(x_25); x_27 = !lean_is_exclusive(x_26); if (x_27 == 0) { @@ -1000,7 +878,6 @@ if (x_52 == 0) lean_object* x_53; lean_object* x_54; lean_object* x_55; lean_object* x_56; lean_object* x_57; lean_dec(x_2); x_53 = l_Lean_Elab_Term_reportUnsolvedGoals(x_1, x_49, x_4, x_50); -lean_dec(x_1); x_54 = lean_ctor_get(x_53, 0); lean_inc(x_54); x_55 = lean_ctor_get(x_53, 1); @@ -1042,7 +919,6 @@ x_59 = lean_ctor_get(x_51, 0); lean_inc(x_59); lean_dec(x_51); x_60 = l_Lean_Elab_Term_reportUnsolvedGoals(x_59, x_49, x_4, x_50); -lean_dec(x_59); x_61 = lean_ctor_get(x_60, 0); lean_inc(x_61); x_62 = lean_ctor_get(x_60, 1); @@ -1194,7 +1070,6 @@ if (x_94 == 0) lean_object* x_95; lean_object* x_96; lean_object* x_97; lean_object* x_98; lean_object* x_99; lean_dec(x_2); x_95 = l_Lean_Elab_Term_reportUnsolvedGoals(x_1, x_91, x_4, x_92); -lean_dec(x_1); x_96 = lean_ctor_get(x_95, 0); lean_inc(x_96); x_97 = lean_ctor_get(x_95, 1); @@ -1236,7 +1111,6 @@ x_101 = lean_ctor_get(x_93, 0); lean_inc(x_101); lean_dec(x_93); x_102 = l_Lean_Elab_Term_reportUnsolvedGoals(x_101, x_91, x_4, x_92); -lean_dec(x_101); x_103 = lean_ctor_get(x_102, 0); lean_inc(x_103); x_104 = lean_ctor_get(x_102, 1); @@ -1306,7 +1180,6 @@ _start: { lean_object* x_4; x_4 = l_Lean_Elab_Term_runTactic___lambda__1(x_1, x_2, x_3); -lean_dec(x_2); lean_dec(x_1); return x_4; } @@ -1343,14 +1216,6 @@ lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabTacticBlock___clo res = l___regBuiltinTermElab_Lean_Elab_Term_elabTacticBlock(lean_io_mk_world()); if (lean_io_result_is_error(res)) return res; lean_dec_ref(res); -l_Lean_Elab_Term_reportUnsolvedGoals___closed__1 = _init_l_Lean_Elab_Term_reportUnsolvedGoals___closed__1(); -lean_mark_persistent(l_Lean_Elab_Term_reportUnsolvedGoals___closed__1); -l_Lean_Elab_Term_reportUnsolvedGoals___closed__2 = _init_l_Lean_Elab_Term_reportUnsolvedGoals___closed__2(); -lean_mark_persistent(l_Lean_Elab_Term_reportUnsolvedGoals___closed__2); -l_Lean_Elab_Term_reportUnsolvedGoals___closed__3 = _init_l_Lean_Elab_Term_reportUnsolvedGoals___closed__3(); -lean_mark_persistent(l_Lean_Elab_Term_reportUnsolvedGoals___closed__3); -l_Lean_Elab_Term_reportUnsolvedGoals___closed__4 = _init_l_Lean_Elab_Term_reportUnsolvedGoals___closed__4(); -lean_mark_persistent(l_Lean_Elab_Term_reportUnsolvedGoals___closed__4); l_Lean_Elab_Term_ensureAssignmentHasNoMVars___closed__1 = _init_l_Lean_Elab_Term_ensureAssignmentHasNoMVars___closed__1(); lean_mark_persistent(l_Lean_Elab_Term_ensureAssignmentHasNoMVars___closed__1); l_Lean_Elab_Term_ensureAssignmentHasNoMVars___closed__2 = _init_l_Lean_Elab_Term_ensureAssignmentHasNoMVars___closed__2(); diff --git a/stage0/stdlib/Init/Lean/Elab/Tactic/Basic.c b/stage0/stdlib/Init/Lean/Elab/Tactic/Basic.c index 2ee1ae2668..0c31ef06ce 100644 --- a/stage0/stdlib/Init/Lean/Elab/Tactic/Basic.c +++ b/stage0/stdlib/Init/Lean/Elab/Tactic/Basic.c @@ -1,6 +1,6 @@ // Lean compiler output // Module: Init.Lean.Elab.Tactic.Basic -// Imports: Init.Lean.Elab.Util Init.Lean.Elab.Term Init.Lean.Meta.Tactic.Assumption Init.Lean.Meta.Tactic.Intro +// Imports: Init.Lean.Util.CollectMVars Init.Lean.Elab.Util Init.Lean.Elab.Term Init.Lean.Meta.Tactic.Assumption Init.Lean.Meta.Tactic.Intro #include "runtime/lean.h" #if defined(__clang__) #pragma clang diagnostic ignored "-Wunused-parameter" @@ -13,12 +13,13 @@ #ifdef __cplusplus extern "C" { #endif +lean_object* l_List_reverse___rarg(lean_object*); lean_object* l_Lean_SMap_find_x3f___at_Lean_Elab_Tactic_evalTactic___main___spec__1(lean_object*, lean_object*); lean_object* l___private_Init_Lean_Elab_Tactic_Basic_2__regTraceClasses___closed__1; lean_object* l_Lean_Elab_Tactic_withIncRecDepth___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___regBuiltinTactic_Lean_Elab_Tactic_evalIntro(lean_object*); lean_object* l_Lean_Elab_Tactic_monadLog; -extern lean_object* l_Lean_Name_toString___closed__1; +extern lean_object* l_Lean_Parser_Tactic_nestedTacticBlockCurly___elambda__1___closed__1; lean_object* l___private_Init_Lean_Elab_Tactic_Basic_1__evalTacticUsing___main(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Tactic_getLocalInsts___boxed(lean_object*, lean_object*); extern lean_object* l_Lean_Parser_declareLeadingBuiltinParser___closed__1; @@ -35,25 +36,32 @@ lean_object* l_Lean_Elab_Tactic_monadQuotation; lean_object* l_unreachable_x21___rarg(lean_object*); lean_object* l_Lean_Elab_Tactic_registerBuiltinTacticAttr(lean_object*); extern lean_object* l_Lean_nullKind; +lean_object* l___regBuiltinTactic_Lean_Elab_Tactic_evalNestedTacticBlock___closed__4; extern lean_object* l_Lean_Elab_Term_elabTermAux___main___closed__6; lean_object* l_Lean_Elab_Tactic_mkTacticAttribute(lean_object*); lean_object* l_Lean_Elab_Tactic_getMCtx___rarg(lean_object*); extern lean_object* l_Lean_MessageData_ofList___closed__3; lean_object* lean_array_uget(lean_object*, size_t); lean_object* l_Lean_Elab_Term_assignExprMVar___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Tactic_pruneSolvedGoals(lean_object*, lean_object*); lean_object* l_Lean_Elab_Tactic_registerBuiltinTacticAttr___lambda__1___closed__2; lean_object* l_Lean_Elab_Tactic_evalIntro___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_PersistentHashMap_findAtAux___main___at_Lean_Elab_Tactic_evalTactic___main___spec__4(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Tactic_getEnv(lean_object*); extern size_t l_PersistentHashMap_insertAux___main___rarg___closed__2; +lean_object* l_Lean_Elab_Tactic_reportUnsolvedGoals(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Tactic_trace(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Init_Lean_Elab_Tactic_Basic_1__evalTacticUsing(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Tactic_focus(lean_object*); lean_object* l_Lean_Elab_Tactic_getLCtx___boxed(lean_object*, lean_object*); lean_object* l_Lean_Elab_Tactic_monadQuotation___closed__2; extern uint8_t l___private_Init_Lean_Elab_Term_4__isCDot___closed__1; lean_object* l_Lean_Elab_Tactic_evalIntro___lambda__2___boxed(lean_object*, lean_object*, lean_object*); +lean_object* l___regBuiltinTactic_Lean_Elab_Tactic_evalRefine___closed__1; lean_object* l_Lean_Elab_Tactic_liftMetaM___rarg(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Tactic_done(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Tactic_declareBuiltinTactic(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_List_filterAuxM___main___at_Lean_Elab_Tactic_pruneSolvedGoals___spec__1(lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Array_empty___closed__1; lean_object* l_HashMapImp_find_x3f___at_Lean_Elab_Tactic_evalTactic___main___spec__5___boxed(lean_object*, lean_object*); lean_object* lean_environment_find(lean_object*, lean_object*); @@ -61,6 +69,7 @@ lean_object* l_Lean_Elab_Tactic_resettingSynthInstanceCacheWhen(lean_object*); lean_object* l_Lean_Elab_Tactic_monadQuotation___closed__1; lean_object* lean_dbg_trace(lean_object*, lean_object*); lean_object* lean_io_mk_ref(lean_object*, lean_object*); +lean_object* l_Lean_Elab_Tactic_restore(lean_object*, lean_object*); lean_object* l_Lean_Elab_ElabFnTable_insert___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_ReaderT_bind___at_Lean_Meta_isClassExpensive___main___spec__4___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_List_append___rarg(lean_object*, lean_object*); @@ -68,6 +77,7 @@ uint8_t lean_name_eq(lean_object*, lean_object*); lean_object* lean_io_ref_get(lean_object*, lean_object*); lean_object* l_Lean_Elab_Tactic_evalTactic(lean_object*, lean_object*, lean_object*); lean_object* l___private_Init_Lean_Elab_Tactic_Basic_2__regTraceClasses(lean_object*); +lean_object* l_Lean_Elab_Term_reportUnsolvedGoals___closed__5; uint8_t l_PersistentHashMap_containsAtAux___main___at_Lean_Parser_mkFreshKindAux___main___spec__3(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Tactic_resettingSynthInstanceCacheWhen___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Tactic_evalIntro(lean_object*, lean_object*, lean_object*); @@ -76,6 +86,7 @@ lean_object* l_PersistentHashMap_findAux___main___at_Lean_Elab_Tactic_evalTactic lean_object* l_Lean_Meta_assumption___boxed(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_Elab_Tactic_setGoals___boxed(lean_object*, lean_object*, lean_object*); uint8_t l_Lean_SMap_contains___at_Lean_Elab_Tactic_addBuiltinTactic___spec__1(lean_object*, lean_object*); lean_object* lean_string_append(lean_object*, lean_object*); lean_object* l_Lean_Elab_Tactic_getMCtx___boxed(lean_object*); @@ -85,15 +96,20 @@ lean_object* l_Lean_Elab_Tactic_registerBuiltinTacticAttr___closed__2; extern lean_object* l_String_splitAux___main___closed__1; lean_object* l_Lean_Elab_Term_logTrace___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Tactic_withFreshMacroScope(lean_object*); +lean_object* l_Lean_Elab_Term_reportUnsolvedGoals___closed__3; extern lean_object* l_Lean_Meta_isLevelDefEqAux___main___closed__5; lean_object* l_AssocList_find___main___at_Lean_Elab_Tactic_evalTactic___main___spec__6___boxed(lean_object*, lean_object*); +lean_object* l___regBuiltinTactic_Lean_Elab_Tactic_evalNestedTacticBlock___closed__2; size_t l_USize_shiftRight(size_t, size_t); lean_object* l_Lean_Elab_Tactic_resettingSynthInstanceCacheWhen___rarg(uint8_t, lean_object*, lean_object*, lean_object*); uint8_t l_PersistentHashMap_containsAux___main___at_Lean_Elab_Tactic_addBuiltinTactic___spec__5(lean_object*, size_t, lean_object*); lean_object* l_Lean_Elab_Tactic_getLocalInsts(lean_object*, lean_object*); lean_object* l_Lean_Elab_Tactic_monadLog___closed__10; +lean_object* l_Lean_Elab_Tactic_evalRefine(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Tactic_mkTacticAttribute___closed__1; lean_object* l_Lean_Elab_Tactic_registerBuiltinTacticAttr___closed__4; +lean_object* l_Lean_Elab_Tactic_restore___boxed(lean_object*, lean_object*); +lean_object* l___regBuiltinTactic_Lean_Elab_Tactic_evalNestedTacticBlock___closed__1; extern lean_object* l_Lean_LocalContext_Inhabited___closed__1; extern lean_object* l___private_Init_Lean_Elab_Util_8__regTraceClasses___closed__2; lean_object* l_Lean_Elab_Term_trace___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -102,6 +118,7 @@ lean_object* l_Lean_Elab_Tactic_tacticElabAttribute___closed__2; lean_object* l___regBuiltinTactic_Lean_Elab_Tactic_evalExact(lean_object*); extern lean_object* l_Lean_AttributeImpl_inhabited___closed__2; lean_object* lean_nat_add(lean_object*, lean_object*); +lean_object* l_Lean_Elab_Tactic_collectMVars___closed__1; lean_object* l_IO_ofExcept___at_Lean_registerClassAttr___spec__1(lean_object*, lean_object*); lean_object* l_Lean_Elab_Tactic_registerBuiltinTacticAttr___closed__1; lean_object* l_Lean_Elab_Tactic_getMainGoal___closed__2; @@ -110,6 +127,7 @@ extern lean_object* l_Lean_Parser_Tactic_intro___elambda__1___closed__1; extern lean_object* l_Lean_PersistentEnvExtension_inhabited___rarg___closed__1; lean_object* l_Lean_Meta_intro(lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Meta_Exception_toMessageData___closed__45; +lean_object* l_Lean_Syntax_getTailWithInfo___main(lean_object*); lean_object* l_Array_isEqvAux___main___at_Lean_Elab_Tactic_withMVarContext___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Tactic_declareBuiltinTactic___closed__7; extern lean_object* l_Lean_Meta_dbgTrace___rarg___closed__1; @@ -120,21 +138,28 @@ lean_object* lean_array_fget(lean_object*, lean_object*); lean_object* l_Lean_Elab_Tactic_declareBuiltinTactic___closed__5; extern lean_object* l_Lean_Elab_Term_declareBuiltinTermElab___closed__3; uint8_t lean_nat_dec_eq(lean_object*, lean_object*); +lean_object* l___regBuiltinTactic_Lean_Elab_Tactic_evalRefine___closed__3; extern lean_object* l_Lean_Elab_Term_termElabAttribute___closed__4; lean_object* l_Lean_Elab_Term_addContext___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_ReaderT_bind___at_Lean_Elab_Tactic_monadLog___spec__2___rarg(lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_EnvExtension_Inhabited___rarg___closed__1; lean_object* l_Lean_Elab_Tactic_declareBuiltinTactic___closed__3; +lean_object* l_Lean_Elab_Tactic_focus___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Tactic_monadLog___closed__5; +lean_object* l_Lean_Elab_Term_isExprMVarAssigned___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Name_append___main(lean_object*, lean_object*); lean_object* l_PersistentHashMap_findAux___main___at_Lean_Elab_Tactic_evalTactic___main___spec__3___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Tactic_dbgTrace___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Tactic_addContext(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Tactic_evalSeq___boxed(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Tactic_EStateM_Backtrackable; +lean_object* l_List_map___main___at_Lean_Elab_Term_reportUnsolvedGoals___spec__1(lean_object*); lean_object* l_PersistentHashMap_contains___at_Lean_Elab_Tactic_addBuiltinTactic___spec__4___boxed(lean_object*, lean_object*); lean_object* lean_array_get(lean_object*, lean_object*, lean_object*); +lean_object* l___regBuiltinTactic_Lean_Elab_Tactic_evalNestedTacticBlock___closed__3; lean_object* l_Lean_Elab_Tactic_liftTermElabM(lean_object*); lean_object* l___regBuiltinTactic_Lean_Elab_Tactic_evalAssumption___closed__4; +lean_object* l_Lean_Elab_Tactic_getUnsolvedGoals(lean_object*, lean_object*); lean_object* l_Lean_Elab_Tactic_evalExact___closed__1; lean_object* l_Lean_Elab_Tactic_getGoals___rarg(lean_object*); lean_object* l_PersistentHashMap_find_x3f___at_Lean_Elab_Tactic_evalTactic___main___spec__2___boxed(lean_object*, lean_object*); @@ -148,6 +173,7 @@ extern lean_object* l_Lean_Elab_Term_State_inhabited___closed__2; extern lean_object* l_Char_HasRepr___closed__1; lean_object* l___regBuiltinTactic_Lean_Elab_Tactic_evalAssumption___closed__1; extern lean_object* l_Lean_Parser_Tactic_exact___elambda__1___closed__1; +lean_object* l___regBuiltinTactic_Lean_Elab_Tactic_evalRefine(lean_object*); lean_object* l_Lean_Elab_Tactic_getMVarDecl___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Tactic_resetSynthInstanceCache(lean_object*, lean_object*); lean_object* l_PersistentHashMap_containsAux___main___at_Lean_Elab_Tactic_addBuiltinTactic___spec__5___boxed(lean_object*, lean_object*, lean_object*); @@ -157,8 +183,10 @@ lean_object* l_Lean_Syntax_prettyPrint(lean_object*); lean_object* lean_name_mk_string(lean_object*, lean_object*); lean_object* l_Lean_Elab_Tactic_builtinTacticTable; lean_object* l_Lean_Elab_Tactic_tacticElabAttribute___closed__4; +lean_object* l_Lean_Elab_Term_throwError___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Tactic_monadLog___lambda__4___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Tactic_State_inhabited___closed__1; +lean_object* l_Lean_collectMVars(lean_object*, lean_object*); lean_object* l___regBuiltinTactic_Lean_Elab_Tactic_evalSeq___closed__2; lean_object* l_Lean_Elab_Tactic_monadLog___lambda__2___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_throwUnsupportedSyntax___boxed(lean_object*, lean_object*); @@ -171,21 +199,28 @@ lean_object* l_Lean_Elab_Tactic_withLCtx___rarg(lean_object*, lean_object*, lean uint8_t l_coeDecidableEq(uint8_t); lean_object* l_ReaderT_read___at_Lean_Elab_Tactic_monadLog___spec__1(lean_object*, lean_object*); size_t lean_usize_modn(size_t, lean_object*); +lean_object* l___regBuiltinTactic_Lean_Elab_Tactic_evalNestedTacticBlockCurly(lean_object*); lean_object* l_Lean_Elab_Tactic_tacticElabAttribute___closed__1; lean_object* l_Lean_Elab_Tactic_registerBuiltinTacticAttr___lambda__1___closed__3; lean_object* l_Lean_registerBuiltinAttribute(lean_object*, lean_object*); lean_object* l_Lean_Elab_Tactic_monadLog___closed__1; lean_object* l_Lean_Elab_Term_ensureHasType___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_mkElabAttribute___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Tactic_save___boxed(lean_object*); lean_object* l_Lean_Elab_Tactic_registerBuiltinTacticAttr___closed__5; lean_object* l_mkHashMapImp___rarg(lean_object*); lean_object* l___regBuiltinTactic_Lean_Elab_Tactic_evalIntro___closed__3; +lean_object* l_Lean_Elab_Term_reportUnsolvedGoals___closed__1; lean_object* l_Lean_Elab_Tactic_declareBuiltinTactic___closed__6; +lean_object* l_Lean_Elab_Term_reportUnsolvedGoals___closed__4; extern lean_object* l_Lean_PersistentEnvExtension_inhabited___rarg___closed__3; lean_object* l_Lean_Elab_Tactic_liftMetaM(lean_object*); +lean_object* l_Lean_Elab_Tactic_evalNestedTacticBlock(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Tactic_tacticElabAttribute; extern lean_object* l_Lean_Parser_Term_seq___elambda__1___closed__1; lean_object* l_Lean_ConstantInfo_type(lean_object*); +lean_object* l_Lean_MessageData_joinSep___main(lean_object*, lean_object*); +lean_object* l___regBuiltinTactic_Lean_Elab_Tactic_evalNestedTacticBlockCurly___closed__4; lean_object* l_Lean_Elab_Tactic_State_inhabited; lean_object* l_HashMapImp_find_x3f___at_Lean_Elab_Tactic_evalTactic___main___spec__5(lean_object*, lean_object*); lean_object* l_Lean_Elab_Tactic_evalExact___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -200,11 +235,14 @@ lean_object* l_Lean_Elab_Tactic_registerBuiltinTacticAttr___closed__3; lean_object* l_Lean_Elab_Tactic_registerBuiltinTacticAttr___lambda__1___closed__5; lean_object* l_Lean_Elab_Tactic_evalExact___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_traceAtCmdPos___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Tactic_evalRefine___closed__1; lean_object* l_Lean_Elab_Tactic_registerBuiltinTacticAttr___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Tactic_throwUnsupportedSyntax(lean_object*); lean_object* l_Lean_Elab_Tactic_registerBuiltinTacticAttr___lambda__1___closed__1; lean_object* l_Lean_Elab_Tactic_withLCtx(lean_object*); +lean_object* l___regBuiltinTactic_Lean_Elab_Tactic_evalNestedTacticBlockCurly___closed__1; lean_object* l_Lean_Elab_Term_liftMetaM___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Tactic_evalRefine___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Tactic_evalTactic___main___closed__4; lean_object* l_Lean_Elab_Tactic_registerBuiltinTacticAttr___lambda__1___closed__4; lean_object* l___regBuiltinTactic_Lean_Elab_Tactic_evalExact___closed__1; @@ -214,6 +252,7 @@ lean_object* l_Lean_Elab_Tactic_declareBuiltinTactic___closed__4; extern lean_object* l_Lean_Elab_Exception_inhabited; lean_object* l_Lean_Elab_Tactic_liftTermElabM___rarg___closed__1; lean_object* l_Lean_Elab_Tactic_evalAssumption___closed__1; +lean_object* l_Lean_Elab_Tactic_isExprMVarAssigned(lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Meta_assumptionAux___closed__1; lean_object* l_Lean_Elab_Tactic_liftMetaTactic(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Tactic_evalTactic___main___closed__1; @@ -221,6 +260,7 @@ lean_object* l_Lean_Elab_Tactic_evalTactic___main___lambda__1___boxed(lean_objec lean_object* l_PersistentHashMap_empty___at_Lean_Elab_Tactic_mkBuiltinTacticTable___spec__3; lean_object* l___regBuiltinTactic_Lean_Elab_Tactic_evalExact___closed__2; lean_object* l_Lean_Elab_Tactic_ensureHasNoMVars___closed__2; +lean_object* l_Lean_Elab_Tactic_evalNestedTacticBlockCurly(lean_object*, lean_object*, lean_object*); lean_object* l_ReaderT_bind___at_Lean_Elab_Tactic_monadLog___spec__2(lean_object*, lean_object*); lean_object* l_Lean_Elab_Tactic_liftMetaTactic___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Tactic_evalTactic___main(lean_object*, lean_object*, lean_object*); @@ -233,11 +273,15 @@ lean_object* l_Lean_Elab_Tactic_monadLog___closed__6; lean_object* l_Lean_Elab_Tactic_evalSeq(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Environment_addAndCompile(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Syntax_getKind(lean_object*); +lean_object* l___regBuiltinTactic_Lean_Elab_Tactic_evalNestedTacticBlockCurly___closed__3; lean_object* l_Lean_Elab_Tactic_ensureHasNoMVars___closed__1; lean_object* l_Lean_Elab_Tactic_resettingSynthInstanceCache(lean_object*); lean_object* l_Lean_Elab_Tactic_evalIntro___closed__1; +lean_object* l_Lean_Elab_Tactic_evalRefine___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Tactic_evalAssumption(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Tactic_save(lean_object*); lean_object* l_Lean_Elab_Tactic_monadLog___closed__2; +lean_object* l_Lean_Elab_Tactic_setGoals(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Tactic_addBuiltinTactic(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_elabTerm___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Tactic_getOptions___boxed(lean_object*, lean_object*); @@ -257,6 +301,7 @@ lean_object* l_Lean_Elab_Tactic_addBuiltinTactic___closed__1; lean_object* l_Lean_Elab_Tactic_assignExprMVar(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Tactic_ensureHasNoMVars(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_instantiateMVars___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Tactic_EStateM_Backtrackable___closed__1; lean_object* l_Lean_Elab_Tactic_elabTerm(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_SMap_empty___at_Lean_Elab_Tactic_mkBuiltinTacticTable___spec__1___closed__2; lean_object* lean_io_ref_set(lean_object*, lean_object*, lean_object*); @@ -266,9 +311,12 @@ lean_object* l_Lean_Elab_Tactic_tacticElabAttribute___closed__5; lean_object* l_Lean_Elab_Tactic_getEnv___rarg(lean_object*); lean_object* l___regBuiltinTactic_Lean_Elab_Tactic_evalSeq___closed__3; lean_object* l_Lean_Meta_intro1(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Tactic_EStateM_Backtrackable___closed__2; +lean_object* l_Array_toList___rarg(lean_object*); lean_object* l_Lean_Elab_Tactic_ensureHasType(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Tactic_withMacroExpansion___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Tactic_instantiateMVars(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Term_reportUnsolvedGoals(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_AssocList_find___main___at_Lean_Elab_Tactic_evalTactic___main___spec__6(lean_object*, lean_object*); lean_object* l_Lean_Elab_Tactic_monadLog___lambda__3(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Tactic_registerBuiltinTacticAttr___lambda__1(lean_object*, lean_object*, lean_object*, uint8_t, lean_object*); @@ -276,6 +324,7 @@ uint8_t l_Lean_Syntax_isOfKind(lean_object*, lean_object*); lean_object* l_Lean_PersistentEnvExtension_getState___rarg(lean_object*, lean_object*); lean_object* l_Lean_Elab_Tactic_tacticElabAttribute___closed__3; lean_object* l_Lean_Elab_Tactic_evalIntro___lambda__2(lean_object*, lean_object*, lean_object*); +lean_object* l___regBuiltinTactic_Lean_Elab_Tactic_evalNestedTacticBlock(lean_object*); lean_object* l_HashMapImp_contains___at_Lean_Elab_Tactic_addBuiltinTactic___spec__2___boxed(lean_object*, lean_object*); extern lean_object* l_Lean_Parser_regBuiltinTacticParserAttr___closed__3; extern lean_object* l___private_Init_Lean_Parser_Parser_8__throwParserCategoryAlreadyDefined___rarg___closed__2; @@ -290,6 +339,7 @@ lean_object* l_Lean_Syntax_getArg(lean_object*, lean_object*); lean_object* l___regBuiltinTactic_Lean_Elab_Tactic_evalIntro___closed__2; lean_object* l_Lean_Elab_Tactic_monadLog___closed__11; lean_object* l_Lean_SMap_contains___at_Lean_Elab_Tactic_addBuiltinTactic___spec__1___boxed(lean_object*, lean_object*); +lean_object* l_Lean_Elab_Tactic_collectMVars(lean_object*, lean_object*, lean_object*, lean_object*); uint8_t l_Lean_LocalInstance_beq(lean_object*, lean_object*); lean_object* l_Lean_Elab_Tactic_evalIntro___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Tactic_withMVarContext(lean_object*); @@ -297,18 +347,24 @@ lean_object* l_Lean_Elab_Tactic_withMacroExpansion(lean_object*); lean_object* l_Lean_MetavarContext_getDecl(lean_object*, lean_object*); uint8_t l_HashMapImp_contains___at_Lean_Elab_Tactic_addBuiltinTactic___spec__2(lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_resetSynthInstanceCache___boxed(lean_object*); +extern lean_object* l_System_FilePath_dirName___closed__1; lean_object* l_Lean_Elab_Tactic_monadLog___lambda__1___boxed(lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Parser_regBuiltinTacticParserAttr___closed__4; +uint8_t l_List_isEmpty___rarg(lean_object*); lean_object* l___regBuiltinTactic_Lean_Elab_Tactic_evalAssumption___closed__3; lean_object* l_Array_iterateMAux___main___at_Lean_mkAppN___spec__1(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Tactic_dbgTrace(lean_object*); lean_object* l_Lean_Name_toStringWithSep___main(lean_object*, lean_object*); extern lean_object* l___private_Init_Lean_Elab_Util_8__regTraceClasses___closed__1; lean_object* l_Lean_Elab_Tactic_monadLog___lambda__3___boxed(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Tactic_EStateM_Backtrackable___closed__3; +lean_object* l___regBuiltinTactic_Lean_Elab_Tactic_evalRefine___closed__2; lean_object* lean_usize_to_nat(size_t); lean_object* l_Lean_Elab_Tactic_getCurrMacroScope(lean_object*, lean_object*); -lean_object* l_Lean_Elab_Tactic_updateGoals(lean_object*, lean_object*, lean_object*); +extern lean_object* l_Lean_Parser_Tactic_refine___elambda__1___closed__1; lean_object* l_Lean_Elab_Tactic_resettingSynthInstanceCache___rarg(lean_object*, lean_object*, lean_object*); +lean_object* l___regBuiltinTactic_Lean_Elab_Tactic_evalNestedTacticBlockCurly___closed__2; +extern lean_object* l_HashMap_Inhabited___closed__1; lean_object* l_Lean_Elab_Tactic_throwUnsupportedSyntax___rarg___closed__1; lean_object* l___regBuiltinTactic_Lean_Elab_Tactic_evalExact___closed__3; lean_object* l_Lean_indentExpr(lean_object*); @@ -317,8 +373,10 @@ lean_object* l_IO_ofExcept___at___private_Init_Lean_Elab_Util_6__ElabAttribute_a lean_object* l_Lean_mkConst(lean_object*, lean_object*); lean_object* l_Lean_Elab_Tactic_getCurrMacroScope___boxed(lean_object*, lean_object*); lean_object* l_Lean_Elab_Tactic_getGoals(lean_object*); +extern lean_object* l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__1; lean_object* l_Lean_Elab_Tactic_evalExact(lean_object*, lean_object*, lean_object*); extern lean_object* l___private_Init_Lean_Elab_Term_8__elabTermUsing___main___closed__3; +lean_object* l_Lean_Elab_Term_reportUnsolvedGoals___closed__2; extern lean_object* l_Lean_PersistentEnvExtension_inhabited___rarg___closed__4; lean_object* l_Lean_Elab_Tactic_traceAtCmdPos(lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_initAttr; @@ -330,7 +388,6 @@ lean_object* l_AssocList_contains___main___at_Lean_Elab_Tactic_addBuiltinTactic_ lean_object* l_Lean_Elab_Tactic_monadLog___closed__4; lean_object* l_Lean_Elab_Tactic_getMCtx(lean_object*); lean_object* l_Lean_Elab_Tactic_throwError___rarg(lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Elab_Tactic_updateGoals___boxed(lean_object*, lean_object*, lean_object*); extern lean_object* l___private_Init_Lean_Parser_Parser_18__BuiltinParserAttribute_add___closed__2; lean_object* l_mkHashMap___at_Lean_Elab_Tactic_mkBuiltinTacticTable___spec__2(lean_object*); lean_object* l_Lean_Elab_Tactic_monadLog___closed__9; @@ -338,6 +395,135 @@ uint8_t lean_string_dec_eq(lean_object*, lean_object*); lean_object* l_Lean_Elab_expandMacro(lean_object*, lean_object*, lean_object*); uint8_t lean_nat_dec_lt(lean_object*, lean_object*); lean_object* l_Lean_Elab_Tactic_withIncRecDepth(lean_object*); +lean_object* l_List_map___main___at_Lean_Elab_Term_reportUnsolvedGoals___spec__1(lean_object* x_1) { +_start: +{ +if (lean_obj_tag(x_1) == 0) +{ +lean_object* x_2; +x_2 = lean_box(0); +return x_2; +} +else +{ +uint8_t x_3; +x_3 = !lean_is_exclusive(x_1); +if (x_3 == 0) +{ +lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; +x_4 = lean_ctor_get(x_1, 0); +x_5 = lean_ctor_get(x_1, 1); +x_6 = lean_alloc_ctor(5, 1, 0); +lean_ctor_set(x_6, 0, x_4); +x_7 = l_List_map___main___at_Lean_Elab_Term_reportUnsolvedGoals___spec__1(x_5); +lean_ctor_set(x_1, 1, x_7); +lean_ctor_set(x_1, 0, x_6); +return x_1; +} +else +{ +lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; +x_8 = lean_ctor_get(x_1, 0); +x_9 = lean_ctor_get(x_1, 1); +lean_inc(x_9); +lean_inc(x_8); +lean_dec(x_1); +x_10 = lean_alloc_ctor(5, 1, 0); +lean_ctor_set(x_10, 0, x_8); +x_11 = l_List_map___main___at_Lean_Elab_Term_reportUnsolvedGoals___spec__1(x_9); +x_12 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_12, 0, x_10); +lean_ctor_set(x_12, 1, x_11); +return x_12; +} +} +} +} +lean_object* _init_l_Lean_Elab_Term_reportUnsolvedGoals___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("unsolved goals"); +return x_1; +} +} +lean_object* _init_l_Lean_Elab_Term_reportUnsolvedGoals___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Elab_Term_reportUnsolvedGoals___closed__1; +x_2 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* _init_l_Lean_Elab_Term_reportUnsolvedGoals___closed__3() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Elab_Term_reportUnsolvedGoals___closed__2; +x_2 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* _init_l_Lean_Elab_Term_reportUnsolvedGoals___closed__4() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Elab_Term_reportUnsolvedGoals___closed__3; +x_2 = l_Lean_MessageData_ofList___closed__3; +x_3 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_3, 0, x_1); +lean_ctor_set(x_3, 1, x_2); +return x_3; +} +} +lean_object* _init_l_Lean_Elab_Term_reportUnsolvedGoals___closed__5() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_MessageData_ofList___closed__3; +x_2 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_2, 0, x_1); +lean_ctor_set(x_2, 1, x_1); +return x_2; +} +} +lean_object* l_Lean_Elab_Term_reportUnsolvedGoals(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; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; +lean_inc(x_1); +x_5 = l_Lean_Syntax_getTailWithInfo___main(x_1); +x_6 = l_List_map___main___at_Lean_Elab_Term_reportUnsolvedGoals___spec__1(x_2); +x_7 = l_Lean_Elab_Term_reportUnsolvedGoals___closed__5; +x_8 = l_Lean_MessageData_joinSep___main(x_6, x_7); +lean_dec(x_6); +x_9 = l_Lean_Elab_Term_reportUnsolvedGoals___closed__4; +x_10 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_10, 0, x_9); +lean_ctor_set(x_10, 1, x_8); +if (lean_obj_tag(x_5) == 0) +{ +lean_object* x_11; +x_11 = l_Lean_Elab_Term_throwError___rarg(x_1, x_10, x_3, x_4); +lean_dec(x_1); +return x_11; +} +else +{ +lean_object* x_12; lean_object* x_13; +lean_dec(x_1); +x_12 = lean_ctor_get(x_5, 0); +lean_inc(x_12); +lean_dec(x_5); +x_13 = l_Lean_Elab_Term_throwError___rarg(x_12, x_10, x_3, x_4); +lean_dec(x_12); +return x_13; +} +} +} lean_object* _init_l_Lean_Elab_Tactic_State_inhabited___closed__1() { _start: { @@ -358,6 +544,209 @@ x_1 = l_Lean_Elab_Tactic_State_inhabited___closed__1; return x_1; } } +lean_object* l_Lean_Elab_Tactic_save(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; +x_2 = lean_ctor_get(x_1, 0); +x_3 = lean_ctor_get(x_2, 0); +x_4 = lean_ctor_get(x_3, 0); +x_5 = lean_ctor_get(x_3, 1); +x_6 = lean_ctor_get(x_1, 1); +lean_inc(x_6); +lean_inc(x_5); +lean_inc(x_4); +x_7 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_7, 0, x_4); +lean_ctor_set(x_7, 1, x_5); +lean_ctor_set(x_7, 2, x_6); +return x_7; +} +} +lean_object* l_Lean_Elab_Tactic_save___boxed(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = l_Lean_Elab_Tactic_save(x_1); +lean_dec(x_1); +return x_2; +} +} +lean_object* l_Lean_Elab_Tactic_restore(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; lean_object* x_4; uint8_t x_5; +x_3 = lean_ctor_get(x_1, 0); +lean_inc(x_3); +lean_dec(x_1); +x_4 = lean_ctor_get(x_3, 0); +lean_inc(x_4); +x_5 = !lean_is_exclusive(x_3); +if (x_5 == 0) +{ +lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; uint8_t x_10; +x_6 = lean_ctor_get(x_2, 0); +x_7 = lean_ctor_get(x_2, 1); +x_8 = lean_ctor_get(x_2, 2); +x_9 = lean_ctor_get(x_3, 0); +lean_dec(x_9); +x_10 = !lean_is_exclusive(x_4); +if (x_10 == 0) +{ +lean_object* x_11; lean_object* x_12; lean_object* x_13; +x_11 = lean_ctor_get(x_4, 1); +lean_dec(x_11); +x_12 = lean_ctor_get(x_4, 0); +lean_dec(x_12); +lean_inc(x_7); +lean_inc(x_6); +lean_ctor_set(x_4, 1, x_7); +lean_ctor_set(x_4, 0, x_6); +lean_inc(x_8); +x_13 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_13, 0, x_3); +lean_ctor_set(x_13, 1, x_8); +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 = lean_ctor_get(x_4, 2); +x_15 = lean_ctor_get(x_4, 3); +x_16 = lean_ctor_get(x_4, 4); +x_17 = lean_ctor_get(x_4, 5); +lean_inc(x_17); +lean_inc(x_16); +lean_inc(x_15); +lean_inc(x_14); +lean_dec(x_4); +lean_inc(x_7); +lean_inc(x_6); +x_18 = lean_alloc_ctor(0, 6, 0); +lean_ctor_set(x_18, 0, x_6); +lean_ctor_set(x_18, 1, x_7); +lean_ctor_set(x_18, 2, x_14); +lean_ctor_set(x_18, 3, x_15); +lean_ctor_set(x_18, 4, x_16); +lean_ctor_set(x_18, 5, x_17); +lean_ctor_set(x_3, 0, x_18); +lean_inc(x_8); +x_19 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_19, 0, x_3); +lean_ctor_set(x_19, 1, x_8); +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_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; +x_20 = lean_ctor_get(x_2, 0); +x_21 = lean_ctor_get(x_2, 1); +x_22 = lean_ctor_get(x_2, 2); +x_23 = lean_ctor_get(x_3, 1); +x_24 = lean_ctor_get(x_3, 2); +x_25 = lean_ctor_get(x_3, 3); +x_26 = lean_ctor_get(x_3, 4); +x_27 = lean_ctor_get(x_3, 5); +lean_inc(x_27); +lean_inc(x_26); +lean_inc(x_25); +lean_inc(x_24); +lean_inc(x_23); +lean_dec(x_3); +x_28 = lean_ctor_get(x_4, 2); +lean_inc(x_28); +x_29 = lean_ctor_get(x_4, 3); +lean_inc(x_29); +x_30 = lean_ctor_get(x_4, 4); +lean_inc(x_30); +x_31 = lean_ctor_get(x_4, 5); +lean_inc(x_31); +if (lean_is_exclusive(x_4)) { + lean_ctor_release(x_4, 0); + lean_ctor_release(x_4, 1); + lean_ctor_release(x_4, 2); + lean_ctor_release(x_4, 3); + lean_ctor_release(x_4, 4); + lean_ctor_release(x_4, 5); + x_32 = x_4; +} else { + lean_dec_ref(x_4); + x_32 = lean_box(0); +} +lean_inc(x_21); +lean_inc(x_20); +if (lean_is_scalar(x_32)) { + x_33 = lean_alloc_ctor(0, 6, 0); +} else { + x_33 = x_32; +} +lean_ctor_set(x_33, 0, x_20); +lean_ctor_set(x_33, 1, x_21); +lean_ctor_set(x_33, 2, x_28); +lean_ctor_set(x_33, 3, x_29); +lean_ctor_set(x_33, 4, x_30); +lean_ctor_set(x_33, 5, x_31); +x_34 = lean_alloc_ctor(0, 6, 0); +lean_ctor_set(x_34, 0, x_33); +lean_ctor_set(x_34, 1, x_23); +lean_ctor_set(x_34, 2, x_24); +lean_ctor_set(x_34, 3, x_25); +lean_ctor_set(x_34, 4, x_26); +lean_ctor_set(x_34, 5, x_27); +lean_inc(x_22); +x_35 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_35, 0, x_34); +lean_ctor_set(x_35, 1, x_22); +return x_35; +} +} +} +lean_object* l_Lean_Elab_Tactic_restore___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = l_Lean_Elab_Tactic_restore(x_1, x_2); +lean_dec(x_2); +return x_3; +} +} +lean_object* _init_l_Lean_Elab_Tactic_EStateM_Backtrackable___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_Elab_Tactic_save___boxed), 1, 0); +return x_1; +} +} +lean_object* _init_l_Lean_Elab_Tactic_EStateM_Backtrackable___closed__2() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_Elab_Tactic_restore___boxed), 2, 0); +return x_1; +} +} +lean_object* _init_l_Lean_Elab_Tactic_EStateM_Backtrackable___closed__3() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Elab_Tactic_EStateM_Backtrackable___closed__1; +x_2 = l_Lean_Elab_Tactic_EStateM_Backtrackable___closed__2; +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* _init_l_Lean_Elab_Tactic_EStateM_Backtrackable() { +_start: +{ +lean_object* x_1; +x_1 = l_Lean_Elab_Tactic_EStateM_Backtrackable___closed__3; +return x_1; +} +} lean_object* _init_l_Lean_Elab_Tactic_liftTermElabM___rarg___closed__1() { _start: { @@ -772,6 +1161,16 @@ x_5 = l_Lean_Elab_Tactic_liftTermElabM___rarg(x_4, x_2, x_3); return x_5; } } +lean_object* l_Lean_Elab_Tactic_isExprMVarAssigned(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; lean_object* x_5; +x_4 = lean_alloc_closure((void*)(l_Lean_Elab_Term_isExprMVarAssigned___boxed), 3, 1); +lean_closure_set(x_4, 0, x_1); +x_5 = l_Lean_Elab_Tactic_liftTermElabM___rarg(x_4, x_2, x_3); +return x_5; +} +} lean_object* l_Lean_Elab_Tactic_assignExprMVar(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { @@ -811,6 +1210,97 @@ x_9 = l_Lean_Elab_Tactic_liftTermElabM___rarg(x_8, x_3, x_4); return x_9; } } +lean_object* l_Lean_Elab_Tactic_reportUnsolvedGoals(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_closure((void*)(l_Lean_Elab_Term_reportUnsolvedGoals), 4, 2); +lean_closure_set(x_5, 0, x_1); +lean_closure_set(x_5, 1, x_2); +x_6 = l_Lean_Elab_Tactic_liftTermElabM___rarg(x_5, x_3, x_4); +return x_6; +} +} +lean_object* _init_l_Lean_Elab_Tactic_collectMVars___closed__1() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_HashMap_Inhabited___closed__1; +x_2 = l_Array_empty___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; +} +} +lean_object* l_Lean_Elab_Tactic_collectMVars(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_Tactic_instantiateMVars(x_1, x_2, x_3, x_4); +if (lean_obj_tag(x_5) == 0) +{ +uint8_t x_6; +x_6 = !lean_is_exclusive(x_5); +if (x_6 == 0) +{ +lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; +x_7 = lean_ctor_get(x_5, 0); +x_8 = l_Lean_Elab_Tactic_collectMVars___closed__1; +x_9 = l_Lean_collectMVars(x_8, x_7); +x_10 = lean_ctor_get(x_9, 1); +lean_inc(x_10); +lean_dec(x_9); +x_11 = l_Array_toList___rarg(x_10); +lean_dec(x_10); +lean_ctor_set(x_5, 0, x_11); +return x_5; +} +else +{ +lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; +x_12 = lean_ctor_get(x_5, 0); +x_13 = lean_ctor_get(x_5, 1); +lean_inc(x_13); +lean_inc(x_12); +lean_dec(x_5); +x_14 = l_Lean_Elab_Tactic_collectMVars___closed__1; +x_15 = l_Lean_collectMVars(x_14, x_12); +x_16 = lean_ctor_get(x_15, 1); +lean_inc(x_16); +lean_dec(x_15); +x_17 = l_Array_toList___rarg(x_16); +lean_dec(x_16); +x_18 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_18, 0, x_17); +lean_ctor_set(x_18, 1, x_13); +return x_18; +} +} +else +{ +uint8_t x_19; +x_19 = !lean_is_exclusive(x_5); +if (x_19 == 0) +{ +return x_5; +} +else +{ +lean_object* x_20; lean_object* x_21; lean_object* x_22; +x_20 = lean_ctor_get(x_5, 0); +x_21 = lean_ctor_get(x_5, 1); +lean_inc(x_21); +lean_inc(x_20); +lean_dec(x_5); +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_ReaderT_read___at_Lean_Elab_Tactic_monadLog___spec__1(lean_object* x_1, lean_object* x_2) { _start: { @@ -2303,7 +2793,7 @@ 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_dec(x_3); -x_26 = l_Lean_Name_toString___closed__1; +x_26 = l_System_FilePath_dirName___closed__1; x_27 = l_Lean_Name_toStringWithSep___main(x_26, x_1); x_28 = l_Lean_Elab_Tactic_addBuiltinTactic___closed__1; x_29 = lean_string_append(x_28, x_27); @@ -2408,7 +2898,7 @@ else { 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_dec(x_3); -x_51 = l_Lean_Name_toString___closed__1; +x_51 = l_System_FilePath_dirName___closed__1; x_52 = l_Lean_Name_toStringWithSep___main(x_51, x_1); x_53 = l_Lean_Elab_Tactic_addBuiltinTactic___closed__1; x_54 = lean_string_append(x_53, x_52); @@ -2621,7 +3111,7 @@ if (lean_obj_tag(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_dec(x_25); lean_dec(x_6); -x_26 = l_Lean_Name_toString___closed__1; +x_26 = l_System_FilePath_dirName___closed__1; x_27 = l_Lean_Name_toStringWithSep___main(x_26, x_3); x_28 = l_Lean_Elab_Tactic_declareBuiltinTactic___closed__7; x_29 = lean_string_append(x_28, x_27); @@ -2950,7 +3440,7 @@ block_23: { 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_dec(x_14); -x_15 = l_Lean_Name_toString___closed__1; +x_15 = l_System_FilePath_dirName___closed__1; x_16 = l_Lean_Name_toStringWithSep___main(x_15, x_2); x_17 = l_Lean_Elab_Tactic_registerBuiltinTacticAttr___lambda__1___closed__4; x_18 = lean_string_append(x_17, x_16); @@ -3244,57 +3734,66 @@ return x_14; } else { -lean_object* x_15; lean_object* x_16; lean_object* x_17; +lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; x_15 = lean_ctor_get(x_3, 0); lean_inc(x_15); x_16 = lean_ctor_get(x_3, 1); lean_inc(x_16); lean_dec(x_3); +x_17 = l_Lean_Elab_Tactic_save(x_5); lean_inc(x_4); lean_inc(x_2); -x_17 = lean_apply_3(x_15, x_2, x_4, x_5); -if (lean_obj_tag(x_17) == 0) -{ -lean_dec(x_16); -lean_dec(x_4); -lean_dec(x_2); -lean_dec(x_1); -return x_17; -} -else -{ -lean_object* x_18; -x_18 = lean_ctor_get(x_17, 0); -lean_inc(x_18); +x_18 = lean_apply_3(x_15, x_2, x_4, x_5); if (lean_obj_tag(x_18) == 0) { -uint8_t x_19; +lean_dec(x_17); lean_dec(x_16); lean_dec(x_4); lean_dec(x_2); lean_dec(x_1); -x_19 = !lean_is_exclusive(x_17); -if (x_19 == 0) -{ -lean_object* x_20; -x_20 = lean_ctor_get(x_17, 0); -lean_dec(x_20); -return x_17; +return x_18; } else { -lean_object* x_21; lean_object* x_22; -x_21 = lean_ctor_get(x_17, 1); -lean_inc(x_21); +lean_object* x_19; +x_19 = lean_ctor_get(x_18, 0); +lean_inc(x_19); +if (lean_obj_tag(x_19) == 0) +{ +uint8_t x_20; +lean_dec(x_16); +lean_dec(x_4); +lean_dec(x_2); +lean_dec(x_1); +x_20 = !lean_is_exclusive(x_18); +if (x_20 == 0) +{ +lean_object* x_21; lean_object* x_22; lean_object* x_23; +x_21 = lean_ctor_get(x_18, 1); +x_22 = lean_ctor_get(x_18, 0); +lean_dec(x_22); +x_23 = l_Lean_Elab_Tactic_restore(x_21, x_17); lean_dec(x_17); -x_22 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_22, 0, x_18); -lean_ctor_set(x_22, 1, x_21); -return x_22; +lean_ctor_set(x_18, 1, x_23); +return x_18; +} +else +{ +lean_object* x_24; lean_object* x_25; lean_object* x_26; +x_24 = lean_ctor_get(x_18, 1); +lean_inc(x_24); +lean_dec(x_18); +x_25 = l_Lean_Elab_Tactic_restore(x_24, x_17); +lean_dec(x_17); +x_26 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_26, 0, x_19); +lean_ctor_set(x_26, 1, x_25); +return x_26; } } else { +lean_dec(x_18); lean_dec(x_17); lean_inc(x_1); { @@ -4007,7 +4506,7 @@ lean_dec(x_13); lean_dec(x_12); lean_dec(x_9); lean_dec(x_8); -x_56 = l_Lean_Name_toString___closed__1; +x_56 = l_System_FilePath_dirName___closed__1; x_57 = l_Lean_Name_toStringWithSep___main(x_56, x_47); x_58 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_58, 0, x_57); @@ -4282,7 +4781,7 @@ lean_dec(x_13); lean_dec(x_12); lean_dec(x_9); lean_dec(x_8); -x_115 = l_Lean_Name_toString___closed__1; +x_115 = l_System_FilePath_dirName___closed__1; x_116 = l_Lean_Name_toStringWithSep___main(x_115, x_106); x_117 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_117, 0, x_116); @@ -4582,7 +5081,7 @@ lean_dec(x_13); lean_dec(x_12); lean_dec(x_9); lean_dec(x_8); -x_178 = l_Lean_Name_toString___closed__1; +x_178 = l_System_FilePath_dirName___closed__1; x_179 = l_Lean_Name_toStringWithSep___main(x_178, x_169); x_180 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_180, 0, x_179); @@ -4914,7 +5413,7 @@ lean_dec(x_13); lean_dec(x_12); lean_dec(x_9); lean_dec(x_8); -x_250 = l_Lean_Name_toString___closed__1; +x_250 = l_System_FilePath_dirName___closed__1; x_251 = l_Lean_Name_toStringWithSep___main(x_250, x_241); x_252 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_252, 0, x_251); @@ -5289,7 +5788,7 @@ lean_dec(x_278); lean_dec(x_277); lean_dec(x_9); lean_dec(x_8); -x_333 = l_Lean_Name_toString___closed__1; +x_333 = l_System_FilePath_dirName___closed__1; x_334 = l_Lean_Name_toStringWithSep___main(x_333, x_324); x_335 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_335, 0, x_334); @@ -5691,7 +6190,7 @@ lean_dec(x_363); lean_dec(x_362); lean_dec(x_361); lean_dec(x_360); -x_420 = l_Lean_Name_toString___closed__1; +x_420 = l_System_FilePath_dirName___closed__1; x_421 = l_Lean_Name_toStringWithSep___main(x_420, x_411); x_422 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_422, 0, x_421); @@ -6200,234 +6699,216 @@ lean_inc(x_2); x_9 = l_Lean_Elab_Tactic_liftTermElabM___rarg(x_8, x_2, x_3); if (lean_obj_tag(x_9) == 0) { -lean_object* x_10; lean_object* x_11; +lean_object* x_10; lean_object* x_11; lean_object* x_12; x_10 = lean_ctor_get(x_9, 1); lean_inc(x_10); lean_dec(x_9); -x_11 = lean_apply_2(x_1, x_2, x_10); -if (lean_obj_tag(x_11) == 0) +x_11 = l_Lean_Elab_Tactic_save(x_10); +lean_inc(x_10); +x_12 = lean_apply_2(x_1, x_2, x_10); +if (lean_obj_tag(x_12) == 0) { -lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; uint8_t x_16; -x_12 = lean_ctor_get(x_11, 1); -lean_inc(x_12); -x_13 = lean_ctor_get(x_12, 0); +lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; uint8_t x_17; +lean_dec(x_11); +lean_dec(x_10); +x_13 = lean_ctor_get(x_12, 1); lean_inc(x_13); x_14 = lean_ctor_get(x_13, 0); lean_inc(x_14); -x_15 = lean_ctor_get(x_14, 2); +x_15 = lean_ctor_get(x_14, 0); lean_inc(x_15); -x_16 = !lean_is_exclusive(x_11); -if (x_16 == 0) +x_16 = lean_ctor_get(x_15, 2); +lean_inc(x_16); +x_17 = !lean_is_exclusive(x_12); +if (x_17 == 0) { -lean_object* x_17; uint8_t x_18; -x_17 = lean_ctor_get(x_11, 1); -lean_dec(x_17); -x_18 = !lean_is_exclusive(x_12); -if (x_18 == 0) +lean_object* x_18; uint8_t x_19; +x_18 = lean_ctor_get(x_12, 1); +lean_dec(x_18); +x_19 = !lean_is_exclusive(x_13); +if (x_19 == 0) { -lean_object* x_19; uint8_t x_20; -x_19 = lean_ctor_get(x_12, 0); -lean_dec(x_19); -x_20 = !lean_is_exclusive(x_13); -if (x_20 == 0) +lean_object* x_20; uint8_t x_21; +x_20 = lean_ctor_get(x_13, 0); +lean_dec(x_20); +x_21 = !lean_is_exclusive(x_14); +if (x_21 == 0) { -lean_object* x_21; uint8_t x_22; -x_21 = lean_ctor_get(x_13, 0); -lean_dec(x_21); -x_22 = !lean_is_exclusive(x_14); -if (x_22 == 0) +lean_object* x_22; uint8_t x_23; +x_22 = lean_ctor_get(x_14, 0); +lean_dec(x_22); +x_23 = !lean_is_exclusive(x_15); +if (x_23 == 0) { -lean_object* x_23; uint8_t x_24; -x_23 = lean_ctor_get(x_14, 2); -lean_dec(x_23); -x_24 = !lean_is_exclusive(x_15); -if (x_24 == 0) +lean_object* x_24; uint8_t x_25; +x_24 = lean_ctor_get(x_15, 2); +lean_dec(x_24); +x_25 = !lean_is_exclusive(x_16); +if (x_25 == 0) { -lean_object* x_25; -x_25 = lean_ctor_get(x_15, 2); -lean_dec(x_25); -lean_ctor_set(x_15, 2, x_7); -return x_11; +lean_object* x_26; +x_26 = lean_ctor_get(x_16, 2); +lean_dec(x_26); +lean_ctor_set(x_16, 2, x_7); +return x_12; } 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_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_inc(x_26); -lean_dec(x_15); -x_28 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_28, 0, x_26); -lean_ctor_set(x_28, 1, x_27); -lean_ctor_set(x_28, 2, x_7); -lean_ctor_set(x_14, 2, x_28); -return x_11; +lean_dec(x_16); +x_29 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_29, 0, x_27); +lean_ctor_set(x_29, 1, x_28); +lean_ctor_set(x_29, 2, x_7); +lean_ctor_set(x_15, 2, x_29); +return x_12; } } 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_object* x_38; -x_29 = lean_ctor_get(x_14, 0); -x_30 = lean_ctor_get(x_14, 1); -x_31 = lean_ctor_get(x_14, 3); -x_32 = lean_ctor_get(x_14, 4); -x_33 = lean_ctor_get(x_14, 5); +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; +x_30 = lean_ctor_get(x_15, 0); +x_31 = lean_ctor_get(x_15, 1); +x_32 = lean_ctor_get(x_15, 3); +x_33 = lean_ctor_get(x_15, 4); +x_34 = lean_ctor_get(x_15, 5); +lean_inc(x_34); lean_inc(x_33); lean_inc(x_32); lean_inc(x_31); lean_inc(x_30); -lean_inc(x_29); -lean_dec(x_14); -x_34 = lean_ctor_get(x_15, 0); -lean_inc(x_34); -x_35 = lean_ctor_get(x_15, 1); +lean_dec(x_15); +x_35 = lean_ctor_get(x_16, 0); lean_inc(x_35); -if (lean_is_exclusive(x_15)) { - lean_ctor_release(x_15, 0); - lean_ctor_release(x_15, 1); - lean_ctor_release(x_15, 2); - x_36 = x_15; +x_36 = lean_ctor_get(x_16, 1); +lean_inc(x_36); +if (lean_is_exclusive(x_16)) { + lean_ctor_release(x_16, 0); + lean_ctor_release(x_16, 1); + lean_ctor_release(x_16, 2); + x_37 = x_16; } else { - lean_dec_ref(x_15); - x_36 = lean_box(0); + lean_dec_ref(x_16); + x_37 = lean_box(0); } -if (lean_is_scalar(x_36)) { - x_37 = lean_alloc_ctor(0, 3, 0); +if (lean_is_scalar(x_37)) { + x_38 = lean_alloc_ctor(0, 3, 0); } else { - x_37 = x_36; + x_38 = x_37; } -lean_ctor_set(x_37, 0, x_34); -lean_ctor_set(x_37, 1, x_35); -lean_ctor_set(x_37, 2, x_7); -x_38 = lean_alloc_ctor(0, 6, 0); -lean_ctor_set(x_38, 0, x_29); -lean_ctor_set(x_38, 1, x_30); -lean_ctor_set(x_38, 2, x_37); -lean_ctor_set(x_38, 3, x_31); -lean_ctor_set(x_38, 4, x_32); -lean_ctor_set(x_38, 5, x_33); -lean_ctor_set(x_13, 0, x_38); -return x_11; +lean_ctor_set(x_38, 0, x_35); +lean_ctor_set(x_38, 1, x_36); +lean_ctor_set(x_38, 2, x_7); +x_39 = lean_alloc_ctor(0, 6, 0); +lean_ctor_set(x_39, 0, x_30); +lean_ctor_set(x_39, 1, x_31); +lean_ctor_set(x_39, 2, x_38); +lean_ctor_set(x_39, 3, x_32); +lean_ctor_set(x_39, 4, x_33); +lean_ctor_set(x_39, 5, x_34); +lean_ctor_set(x_14, 0, x_39); +return x_12; } } else { -lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; 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; -x_39 = lean_ctor_get(x_13, 1); -x_40 = lean_ctor_get(x_13, 2); -x_41 = lean_ctor_get(x_13, 3); -x_42 = lean_ctor_get(x_13, 4); -x_43 = lean_ctor_get(x_13, 5); +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; lean_object* x_54; lean_object* x_55; lean_object* x_56; +x_40 = lean_ctor_get(x_14, 1); +x_41 = lean_ctor_get(x_14, 2); +x_42 = lean_ctor_get(x_14, 3); +x_43 = lean_ctor_get(x_14, 4); +x_44 = lean_ctor_get(x_14, 5); +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_dec(x_13); -x_44 = lean_ctor_get(x_14, 0); -lean_inc(x_44); -x_45 = lean_ctor_get(x_14, 1); +lean_dec(x_14); +x_45 = lean_ctor_get(x_15, 0); lean_inc(x_45); -x_46 = lean_ctor_get(x_14, 3); +x_46 = lean_ctor_get(x_15, 1); lean_inc(x_46); -x_47 = lean_ctor_get(x_14, 4); +x_47 = lean_ctor_get(x_15, 3); lean_inc(x_47); -x_48 = lean_ctor_get(x_14, 5); +x_48 = lean_ctor_get(x_15, 4); lean_inc(x_48); -if (lean_is_exclusive(x_14)) { - lean_ctor_release(x_14, 0); - lean_ctor_release(x_14, 1); - lean_ctor_release(x_14, 2); - lean_ctor_release(x_14, 3); - lean_ctor_release(x_14, 4); - lean_ctor_release(x_14, 5); - x_49 = x_14; -} else { - lean_dec_ref(x_14); - x_49 = lean_box(0); -} -x_50 = lean_ctor_get(x_15, 0); -lean_inc(x_50); -x_51 = lean_ctor_get(x_15, 1); -lean_inc(x_51); +x_49 = lean_ctor_get(x_15, 5); +lean_inc(x_49); if (lean_is_exclusive(x_15)) { lean_ctor_release(x_15, 0); lean_ctor_release(x_15, 1); lean_ctor_release(x_15, 2); - x_52 = x_15; + lean_ctor_release(x_15, 3); + lean_ctor_release(x_15, 4); + lean_ctor_release(x_15, 5); + x_50 = x_15; } else { lean_dec_ref(x_15); - x_52 = lean_box(0); + x_50 = lean_box(0); } -if (lean_is_scalar(x_52)) { - x_53 = lean_alloc_ctor(0, 3, 0); +x_51 = lean_ctor_get(x_16, 0); +lean_inc(x_51); +x_52 = lean_ctor_get(x_16, 1); +lean_inc(x_52); +if (lean_is_exclusive(x_16)) { + lean_ctor_release(x_16, 0); + lean_ctor_release(x_16, 1); + lean_ctor_release(x_16, 2); + x_53 = x_16; } else { - x_53 = x_52; + lean_dec_ref(x_16); + x_53 = lean_box(0); } -lean_ctor_set(x_53, 0, x_50); -lean_ctor_set(x_53, 1, x_51); -lean_ctor_set(x_53, 2, x_7); -if (lean_is_scalar(x_49)) { - x_54 = lean_alloc_ctor(0, 6, 0); +if (lean_is_scalar(x_53)) { + x_54 = lean_alloc_ctor(0, 3, 0); } else { - x_54 = x_49; + x_54 = x_53; } -lean_ctor_set(x_54, 0, x_44); -lean_ctor_set(x_54, 1, x_45); -lean_ctor_set(x_54, 2, x_53); -lean_ctor_set(x_54, 3, x_46); -lean_ctor_set(x_54, 4, x_47); -lean_ctor_set(x_54, 5, x_48); -x_55 = lean_alloc_ctor(0, 6, 0); -lean_ctor_set(x_55, 0, x_54); -lean_ctor_set(x_55, 1, x_39); -lean_ctor_set(x_55, 2, x_40); -lean_ctor_set(x_55, 3, x_41); -lean_ctor_set(x_55, 4, x_42); -lean_ctor_set(x_55, 5, x_43); -lean_ctor_set(x_12, 0, x_55); -return x_11; +lean_ctor_set(x_54, 0, x_51); +lean_ctor_set(x_54, 1, x_52); +lean_ctor_set(x_54, 2, x_7); +if (lean_is_scalar(x_50)) { + x_55 = lean_alloc_ctor(0, 6, 0); +} else { + x_55 = x_50; +} +lean_ctor_set(x_55, 0, x_45); +lean_ctor_set(x_55, 1, x_46); +lean_ctor_set(x_55, 2, x_54); +lean_ctor_set(x_55, 3, x_47); +lean_ctor_set(x_55, 4, x_48); +lean_ctor_set(x_55, 5, x_49); +x_56 = lean_alloc_ctor(0, 6, 0); +lean_ctor_set(x_56, 0, x_55); +lean_ctor_set(x_56, 1, x_40); +lean_ctor_set(x_56, 2, x_41); +lean_ctor_set(x_56, 3, x_42); +lean_ctor_set(x_56, 4, x_43); +lean_ctor_set(x_56, 5, x_44); +lean_ctor_set(x_13, 0, x_56); +return x_12; } } else { -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; -x_56 = lean_ctor_get(x_12, 1); -lean_inc(x_56); -lean_dec(x_12); +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; x_57 = lean_ctor_get(x_13, 1); lean_inc(x_57); -x_58 = lean_ctor_get(x_13, 2); +lean_dec(x_13); +x_58 = lean_ctor_get(x_14, 1); lean_inc(x_58); -x_59 = lean_ctor_get(x_13, 3); +x_59 = lean_ctor_get(x_14, 2); lean_inc(x_59); -x_60 = lean_ctor_get(x_13, 4); +x_60 = lean_ctor_get(x_14, 3); lean_inc(x_60); -x_61 = lean_ctor_get(x_13, 5); +x_61 = lean_ctor_get(x_14, 4); lean_inc(x_61); -if (lean_is_exclusive(x_13)) { - lean_ctor_release(x_13, 0); - lean_ctor_release(x_13, 1); - lean_ctor_release(x_13, 2); - lean_ctor_release(x_13, 3); - lean_ctor_release(x_13, 4); - lean_ctor_release(x_13, 5); - x_62 = x_13; -} else { - lean_dec_ref(x_13); - x_62 = lean_box(0); -} -x_63 = lean_ctor_get(x_14, 0); -lean_inc(x_63); -x_64 = lean_ctor_get(x_14, 1); -lean_inc(x_64); -x_65 = lean_ctor_get(x_14, 3); -lean_inc(x_65); -x_66 = lean_ctor_get(x_14, 4); -lean_inc(x_66); -x_67 = lean_ctor_get(x_14, 5); -lean_inc(x_67); +x_62 = lean_ctor_get(x_14, 5); +lean_inc(x_62); if (lean_is_exclusive(x_14)) { lean_ctor_release(x_14, 0); lean_ctor_release(x_14, 1); @@ -6435,109 +6916,109 @@ if (lean_is_exclusive(x_14)) { lean_ctor_release(x_14, 3); lean_ctor_release(x_14, 4); lean_ctor_release(x_14, 5); - x_68 = x_14; + x_63 = x_14; } else { lean_dec_ref(x_14); - x_68 = lean_box(0); + x_63 = lean_box(0); } -x_69 = lean_ctor_get(x_15, 0); -lean_inc(x_69); -x_70 = lean_ctor_get(x_15, 1); -lean_inc(x_70); +x_64 = lean_ctor_get(x_15, 0); +lean_inc(x_64); +x_65 = lean_ctor_get(x_15, 1); +lean_inc(x_65); +x_66 = lean_ctor_get(x_15, 3); +lean_inc(x_66); +x_67 = lean_ctor_get(x_15, 4); +lean_inc(x_67); +x_68 = lean_ctor_get(x_15, 5); +lean_inc(x_68); if (lean_is_exclusive(x_15)) { lean_ctor_release(x_15, 0); lean_ctor_release(x_15, 1); lean_ctor_release(x_15, 2); - x_71 = x_15; + lean_ctor_release(x_15, 3); + lean_ctor_release(x_15, 4); + lean_ctor_release(x_15, 5); + x_69 = x_15; } else { lean_dec_ref(x_15); - x_71 = lean_box(0); + x_69 = lean_box(0); } -if (lean_is_scalar(x_71)) { - x_72 = lean_alloc_ctor(0, 3, 0); +x_70 = lean_ctor_get(x_16, 0); +lean_inc(x_70); +x_71 = lean_ctor_get(x_16, 1); +lean_inc(x_71); +if (lean_is_exclusive(x_16)) { + lean_ctor_release(x_16, 0); + lean_ctor_release(x_16, 1); + lean_ctor_release(x_16, 2); + x_72 = x_16; } else { - x_72 = x_71; + lean_dec_ref(x_16); + x_72 = lean_box(0); } -lean_ctor_set(x_72, 0, x_69); -lean_ctor_set(x_72, 1, x_70); -lean_ctor_set(x_72, 2, x_7); -if (lean_is_scalar(x_68)) { - x_73 = lean_alloc_ctor(0, 6, 0); +if (lean_is_scalar(x_72)) { + x_73 = lean_alloc_ctor(0, 3, 0); } else { - x_73 = x_68; + x_73 = x_72; } -lean_ctor_set(x_73, 0, x_63); -lean_ctor_set(x_73, 1, x_64); -lean_ctor_set(x_73, 2, x_72); -lean_ctor_set(x_73, 3, x_65); -lean_ctor_set(x_73, 4, x_66); -lean_ctor_set(x_73, 5, x_67); -if (lean_is_scalar(x_62)) { +lean_ctor_set(x_73, 0, x_70); +lean_ctor_set(x_73, 1, x_71); +lean_ctor_set(x_73, 2, x_7); +if (lean_is_scalar(x_69)) { x_74 = lean_alloc_ctor(0, 6, 0); } else { - x_74 = x_62; + x_74 = x_69; +} +lean_ctor_set(x_74, 0, x_64); +lean_ctor_set(x_74, 1, x_65); +lean_ctor_set(x_74, 2, x_73); +lean_ctor_set(x_74, 3, x_66); +lean_ctor_set(x_74, 4, x_67); +lean_ctor_set(x_74, 5, x_68); +if (lean_is_scalar(x_63)) { + x_75 = lean_alloc_ctor(0, 6, 0); +} else { + x_75 = x_63; } -lean_ctor_set(x_74, 0, x_73); -lean_ctor_set(x_74, 1, x_57); -lean_ctor_set(x_74, 2, x_58); -lean_ctor_set(x_74, 3, x_59); -lean_ctor_set(x_74, 4, x_60); -lean_ctor_set(x_74, 5, x_61); -x_75 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_75, 0, x_74); -lean_ctor_set(x_75, 1, x_56); -lean_ctor_set(x_11, 1, x_75); -return x_11; +lean_ctor_set(x_75, 1, x_58); +lean_ctor_set(x_75, 2, x_59); +lean_ctor_set(x_75, 3, x_60); +lean_ctor_set(x_75, 4, x_61); +lean_ctor_set(x_75, 5, x_62); +x_76 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_76, 0, x_75); +lean_ctor_set(x_76, 1, x_57); +lean_ctor_set(x_12, 1, x_76); +return x_12; } } else { -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; 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; -x_76 = lean_ctor_get(x_11, 0); -lean_inc(x_76); -lean_dec(x_11); -x_77 = lean_ctor_get(x_12, 1); +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; 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_77 = lean_ctor_get(x_12, 0); lean_inc(x_77); -if (lean_is_exclusive(x_12)) { - lean_ctor_release(x_12, 0); - lean_ctor_release(x_12, 1); - x_78 = x_12; -} else { - lean_dec_ref(x_12); - x_78 = lean_box(0); -} -x_79 = lean_ctor_get(x_13, 1); -lean_inc(x_79); -x_80 = lean_ctor_get(x_13, 2); -lean_inc(x_80); -x_81 = lean_ctor_get(x_13, 3); -lean_inc(x_81); -x_82 = lean_ctor_get(x_13, 4); -lean_inc(x_82); -x_83 = lean_ctor_get(x_13, 5); -lean_inc(x_83); +lean_dec(x_12); +x_78 = lean_ctor_get(x_13, 1); +lean_inc(x_78); if (lean_is_exclusive(x_13)) { lean_ctor_release(x_13, 0); lean_ctor_release(x_13, 1); - lean_ctor_release(x_13, 2); - lean_ctor_release(x_13, 3); - lean_ctor_release(x_13, 4); - lean_ctor_release(x_13, 5); - x_84 = x_13; + x_79 = x_13; } else { lean_dec_ref(x_13); - x_84 = lean_box(0); + x_79 = lean_box(0); } -x_85 = lean_ctor_get(x_14, 0); -lean_inc(x_85); -x_86 = lean_ctor_get(x_14, 1); -lean_inc(x_86); -x_87 = lean_ctor_get(x_14, 3); -lean_inc(x_87); -x_88 = lean_ctor_get(x_14, 4); -lean_inc(x_88); -x_89 = lean_ctor_get(x_14, 5); -lean_inc(x_89); +x_80 = lean_ctor_get(x_14, 1); +lean_inc(x_80); +x_81 = lean_ctor_get(x_14, 2); +lean_inc(x_81); +x_82 = lean_ctor_get(x_14, 3); +lean_inc(x_82); +x_83 = lean_ctor_get(x_14, 4); +lean_inc(x_83); +x_84 = lean_ctor_get(x_14, 5); +lean_inc(x_84); if (lean_is_exclusive(x_14)) { lean_ctor_release(x_14, 0); lean_ctor_release(x_14, 1); @@ -6545,492 +7026,493 @@ if (lean_is_exclusive(x_14)) { lean_ctor_release(x_14, 3); lean_ctor_release(x_14, 4); lean_ctor_release(x_14, 5); - x_90 = x_14; + x_85 = x_14; } else { lean_dec_ref(x_14); - x_90 = lean_box(0); + x_85 = lean_box(0); } -x_91 = lean_ctor_get(x_15, 0); -lean_inc(x_91); -x_92 = lean_ctor_get(x_15, 1); -lean_inc(x_92); +x_86 = lean_ctor_get(x_15, 0); +lean_inc(x_86); +x_87 = lean_ctor_get(x_15, 1); +lean_inc(x_87); +x_88 = lean_ctor_get(x_15, 3); +lean_inc(x_88); +x_89 = lean_ctor_get(x_15, 4); +lean_inc(x_89); +x_90 = lean_ctor_get(x_15, 5); +lean_inc(x_90); if (lean_is_exclusive(x_15)) { lean_ctor_release(x_15, 0); lean_ctor_release(x_15, 1); lean_ctor_release(x_15, 2); - x_93 = x_15; + lean_ctor_release(x_15, 3); + lean_ctor_release(x_15, 4); + lean_ctor_release(x_15, 5); + x_91 = x_15; } else { lean_dec_ref(x_15); - x_93 = lean_box(0); + x_91 = lean_box(0); } -if (lean_is_scalar(x_93)) { - x_94 = lean_alloc_ctor(0, 3, 0); +x_92 = lean_ctor_get(x_16, 0); +lean_inc(x_92); +x_93 = lean_ctor_get(x_16, 1); +lean_inc(x_93); +if (lean_is_exclusive(x_16)) { + lean_ctor_release(x_16, 0); + lean_ctor_release(x_16, 1); + lean_ctor_release(x_16, 2); + x_94 = x_16; } else { - x_94 = x_93; + lean_dec_ref(x_16); + x_94 = lean_box(0); } -lean_ctor_set(x_94, 0, x_91); -lean_ctor_set(x_94, 1, x_92); -lean_ctor_set(x_94, 2, x_7); -if (lean_is_scalar(x_90)) { - x_95 = lean_alloc_ctor(0, 6, 0); +if (lean_is_scalar(x_94)) { + x_95 = lean_alloc_ctor(0, 3, 0); } else { - x_95 = x_90; + x_95 = x_94; } -lean_ctor_set(x_95, 0, x_85); -lean_ctor_set(x_95, 1, x_86); -lean_ctor_set(x_95, 2, x_94); -lean_ctor_set(x_95, 3, x_87); -lean_ctor_set(x_95, 4, x_88); -lean_ctor_set(x_95, 5, x_89); -if (lean_is_scalar(x_84)) { +lean_ctor_set(x_95, 0, x_92); +lean_ctor_set(x_95, 1, x_93); +lean_ctor_set(x_95, 2, x_7); +if (lean_is_scalar(x_91)) { x_96 = lean_alloc_ctor(0, 6, 0); } else { - x_96 = x_84; + x_96 = x_91; } -lean_ctor_set(x_96, 0, x_95); -lean_ctor_set(x_96, 1, x_79); -lean_ctor_set(x_96, 2, x_80); -lean_ctor_set(x_96, 3, x_81); -lean_ctor_set(x_96, 4, x_82); -lean_ctor_set(x_96, 5, x_83); -if (lean_is_scalar(x_78)) { - x_97 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_96, 0, x_86); +lean_ctor_set(x_96, 1, x_87); +lean_ctor_set(x_96, 2, x_95); +lean_ctor_set(x_96, 3, x_88); +lean_ctor_set(x_96, 4, x_89); +lean_ctor_set(x_96, 5, x_90); +if (lean_is_scalar(x_85)) { + x_97 = lean_alloc_ctor(0, 6, 0); } else { - x_97 = x_78; + x_97 = x_85; } lean_ctor_set(x_97, 0, x_96); -lean_ctor_set(x_97, 1, x_77); -x_98 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_98, 0, x_76); -lean_ctor_set(x_98, 1, x_97); -return x_98; +lean_ctor_set(x_97, 1, x_80); +lean_ctor_set(x_97, 2, x_81); +lean_ctor_set(x_97, 3, x_82); +lean_ctor_set(x_97, 4, x_83); +lean_ctor_set(x_97, 5, x_84); +if (lean_is_scalar(x_79)) { + x_98 = lean_alloc_ctor(0, 2, 0); +} else { + x_98 = x_79; +} +lean_ctor_set(x_98, 0, x_97); +lean_ctor_set(x_98, 1, x_78); +x_99 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_99, 0, x_77); +lean_ctor_set(x_99, 1, x_98); +return x_99; } } else { -lean_object* x_99; lean_object* x_100; lean_object* x_101; lean_object* x_102; uint8_t x_103; -x_99 = lean_ctor_get(x_11, 1); -lean_inc(x_99); -x_100 = lean_ctor_get(x_99, 0); -lean_inc(x_100); -x_101 = lean_ctor_get(x_100, 0); -lean_inc(x_101); -x_102 = lean_ctor_get(x_101, 2); -lean_inc(x_102); -x_103 = !lean_is_exclusive(x_11); -if (x_103 == 0) +uint8_t x_100; +x_100 = !lean_is_exclusive(x_12); +if (x_100 == 0) { -lean_object* x_104; uint8_t x_105; -x_104 = lean_ctor_get(x_11, 1); -lean_dec(x_104); -x_105 = !lean_is_exclusive(x_99); -if (x_105 == 0) -{ -lean_object* x_106; uint8_t x_107; -x_106 = lean_ctor_get(x_99, 0); -lean_dec(x_106); -x_107 = !lean_is_exclusive(x_100); -if (x_107 == 0) -{ -lean_object* x_108; uint8_t x_109; -x_108 = lean_ctor_get(x_100, 0); -lean_dec(x_108); -x_109 = !lean_is_exclusive(x_101); -if (x_109 == 0) -{ -lean_object* x_110; uint8_t x_111; -x_110 = lean_ctor_get(x_101, 2); -lean_dec(x_110); -x_111 = !lean_is_exclusive(x_102); -if (x_111 == 0) -{ -lean_object* x_112; -x_112 = lean_ctor_get(x_102, 2); -lean_dec(x_112); -lean_ctor_set(x_102, 2, x_7); -return x_11; -} -else -{ -lean_object* x_113; lean_object* x_114; lean_object* x_115; -x_113 = lean_ctor_get(x_102, 0); -x_114 = lean_ctor_get(x_102, 1); -lean_inc(x_114); -lean_inc(x_113); +lean_object* x_101; lean_object* x_102; lean_object* x_103; lean_object* x_104; lean_object* x_105; uint8_t x_106; +x_101 = lean_ctor_get(x_12, 1); +x_102 = l_Lean_Elab_Tactic_restore(x_101, x_11); +lean_dec(x_11); +x_103 = lean_ctor_get(x_102, 0); +lean_inc(x_103); lean_dec(x_102); -x_115 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_115, 0, x_113); +x_104 = lean_ctor_get(x_103, 0); +lean_inc(x_104); +x_105 = lean_ctor_get(x_104, 2); +lean_inc(x_105); +x_106 = !lean_is_exclusive(x_103); +if (x_106 == 0) +{ +lean_object* x_107; uint8_t x_108; +x_107 = lean_ctor_get(x_103, 0); +lean_dec(x_107); +x_108 = !lean_is_exclusive(x_104); +if (x_108 == 0) +{ +lean_object* x_109; uint8_t x_110; +x_109 = lean_ctor_get(x_104, 2); +lean_dec(x_109); +x_110 = !lean_is_exclusive(x_105); +if (x_110 == 0) +{ +lean_object* x_111; uint8_t x_112; +x_111 = lean_ctor_get(x_105, 2); +lean_dec(x_111); +lean_ctor_set(x_105, 2, x_7); +x_112 = !lean_is_exclusive(x_10); +if (x_112 == 0) +{ +lean_object* x_113; +x_113 = lean_ctor_get(x_10, 0); +lean_dec(x_113); +lean_ctor_set(x_10, 0, x_103); +lean_ctor_set(x_12, 1, x_10); +return x_12; +} +else +{ +lean_object* x_114; lean_object* x_115; +x_114 = lean_ctor_get(x_10, 1); +lean_inc(x_114); +lean_dec(x_10); +x_115 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_115, 0, x_103); lean_ctor_set(x_115, 1, x_114); -lean_ctor_set(x_115, 2, x_7); -lean_ctor_set(x_101, 2, x_115); -return x_11; +lean_ctor_set(x_12, 1, x_115); +return x_12; } } else { -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; -x_116 = lean_ctor_get(x_101, 0); -x_117 = lean_ctor_get(x_101, 1); -x_118 = lean_ctor_get(x_101, 3); -x_119 = lean_ctor_get(x_101, 4); -x_120 = lean_ctor_get(x_101, 5); -lean_inc(x_120); -lean_inc(x_119); -lean_inc(x_118); +lean_object* x_116; lean_object* x_117; lean_object* x_118; lean_object* x_119; lean_object* x_120; lean_object* x_121; +x_116 = lean_ctor_get(x_105, 0); +x_117 = lean_ctor_get(x_105, 1); lean_inc(x_117); lean_inc(x_116); -lean_dec(x_101); -x_121 = lean_ctor_get(x_102, 0); -lean_inc(x_121); -x_122 = lean_ctor_get(x_102, 1); -lean_inc(x_122); -if (lean_is_exclusive(x_102)) { - lean_ctor_release(x_102, 0); - lean_ctor_release(x_102, 1); - lean_ctor_release(x_102, 2); - x_123 = x_102; +lean_dec(x_105); +x_118 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_118, 0, x_116); +lean_ctor_set(x_118, 1, x_117); +lean_ctor_set(x_118, 2, x_7); +lean_ctor_set(x_104, 2, x_118); +x_119 = lean_ctor_get(x_10, 1); +lean_inc(x_119); +if (lean_is_exclusive(x_10)) { + lean_ctor_release(x_10, 0); + lean_ctor_release(x_10, 1); + x_120 = x_10; } else { - lean_dec_ref(x_102); - x_123 = lean_box(0); + lean_dec_ref(x_10); + x_120 = lean_box(0); } -if (lean_is_scalar(x_123)) { - x_124 = lean_alloc_ctor(0, 3, 0); +if (lean_is_scalar(x_120)) { + x_121 = lean_alloc_ctor(0, 2, 0); } else { - x_124 = x_123; + x_121 = x_120; } -lean_ctor_set(x_124, 0, x_121); -lean_ctor_set(x_124, 1, x_122); -lean_ctor_set(x_124, 2, x_7); -x_125 = lean_alloc_ctor(0, 6, 0); -lean_ctor_set(x_125, 0, x_116); -lean_ctor_set(x_125, 1, x_117); -lean_ctor_set(x_125, 2, x_124); -lean_ctor_set(x_125, 3, x_118); -lean_ctor_set(x_125, 4, x_119); -lean_ctor_set(x_125, 5, x_120); -lean_ctor_set(x_100, 0, x_125); -return x_11; +lean_ctor_set(x_121, 0, x_103); +lean_ctor_set(x_121, 1, x_119); +lean_ctor_set(x_12, 1, x_121); +return x_12; } } 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; -x_126 = lean_ctor_get(x_100, 1); -x_127 = lean_ctor_get(x_100, 2); -x_128 = lean_ctor_get(x_100, 3); -x_129 = lean_ctor_get(x_100, 4); -x_130 = lean_ctor_get(x_100, 5); -lean_inc(x_130); -lean_inc(x_129); -lean_inc(x_128); -lean_inc(x_127); +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; lean_object* x_132; lean_object* x_133; lean_object* x_134; +x_122 = lean_ctor_get(x_104, 0); +x_123 = lean_ctor_get(x_104, 1); +x_124 = lean_ctor_get(x_104, 3); +x_125 = lean_ctor_get(x_104, 4); +x_126 = lean_ctor_get(x_104, 5); lean_inc(x_126); -lean_dec(x_100); -x_131 = lean_ctor_get(x_101, 0); -lean_inc(x_131); -x_132 = lean_ctor_get(x_101, 1); +lean_inc(x_125); +lean_inc(x_124); +lean_inc(x_123); +lean_inc(x_122); +lean_dec(x_104); +x_127 = lean_ctor_get(x_105, 0); +lean_inc(x_127); +x_128 = lean_ctor_get(x_105, 1); +lean_inc(x_128); +if (lean_is_exclusive(x_105)) { + lean_ctor_release(x_105, 0); + lean_ctor_release(x_105, 1); + lean_ctor_release(x_105, 2); + x_129 = x_105; +} else { + lean_dec_ref(x_105); + x_129 = lean_box(0); +} +if (lean_is_scalar(x_129)) { + x_130 = lean_alloc_ctor(0, 3, 0); +} else { + x_130 = x_129; +} +lean_ctor_set(x_130, 0, x_127); +lean_ctor_set(x_130, 1, x_128); +lean_ctor_set(x_130, 2, x_7); +x_131 = lean_alloc_ctor(0, 6, 0); +lean_ctor_set(x_131, 0, x_122); +lean_ctor_set(x_131, 1, x_123); +lean_ctor_set(x_131, 2, x_130); +lean_ctor_set(x_131, 3, x_124); +lean_ctor_set(x_131, 4, x_125); +lean_ctor_set(x_131, 5, x_126); +lean_ctor_set(x_103, 0, x_131); +x_132 = lean_ctor_get(x_10, 1); lean_inc(x_132); -x_133 = lean_ctor_get(x_101, 3); -lean_inc(x_133); -x_134 = lean_ctor_get(x_101, 4); -lean_inc(x_134); -x_135 = lean_ctor_get(x_101, 5); -lean_inc(x_135); -if (lean_is_exclusive(x_101)) { - lean_ctor_release(x_101, 0); - lean_ctor_release(x_101, 1); - lean_ctor_release(x_101, 2); - lean_ctor_release(x_101, 3); - lean_ctor_release(x_101, 4); - lean_ctor_release(x_101, 5); - x_136 = x_101; +if (lean_is_exclusive(x_10)) { + lean_ctor_release(x_10, 0); + lean_ctor_release(x_10, 1); + x_133 = x_10; } else { - lean_dec_ref(x_101); - x_136 = lean_box(0); + lean_dec_ref(x_10); + x_133 = lean_box(0); } -x_137 = lean_ctor_get(x_102, 0); -lean_inc(x_137); -x_138 = lean_ctor_get(x_102, 1); +if (lean_is_scalar(x_133)) { + x_134 = lean_alloc_ctor(0, 2, 0); +} else { + x_134 = x_133; +} +lean_ctor_set(x_134, 0, x_103); +lean_ctor_set(x_134, 1, x_132); +lean_ctor_set(x_12, 1, x_134); +return x_12; +} +} +else +{ +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; +x_135 = lean_ctor_get(x_103, 1); +x_136 = lean_ctor_get(x_103, 2); +x_137 = lean_ctor_get(x_103, 3); +x_138 = lean_ctor_get(x_103, 4); +x_139 = lean_ctor_get(x_103, 5); +lean_inc(x_139); lean_inc(x_138); -if (lean_is_exclusive(x_102)) { - lean_ctor_release(x_102, 0); - lean_ctor_release(x_102, 1); - lean_ctor_release(x_102, 2); - x_139 = x_102; -} else { - lean_dec_ref(x_102); - x_139 = lean_box(0); -} -if (lean_is_scalar(x_139)) { - x_140 = lean_alloc_ctor(0, 3, 0); -} else { - x_140 = x_139; -} -lean_ctor_set(x_140, 0, x_137); -lean_ctor_set(x_140, 1, x_138); -lean_ctor_set(x_140, 2, x_7); -if (lean_is_scalar(x_136)) { - x_141 = lean_alloc_ctor(0, 6, 0); -} else { - x_141 = x_136; -} -lean_ctor_set(x_141, 0, x_131); -lean_ctor_set(x_141, 1, x_132); -lean_ctor_set(x_141, 2, x_140); -lean_ctor_set(x_141, 3, x_133); -lean_ctor_set(x_141, 4, x_134); -lean_ctor_set(x_141, 5, x_135); -x_142 = lean_alloc_ctor(0, 6, 0); -lean_ctor_set(x_142, 0, x_141); -lean_ctor_set(x_142, 1, x_126); -lean_ctor_set(x_142, 2, x_127); -lean_ctor_set(x_142, 3, x_128); -lean_ctor_set(x_142, 4, x_129); -lean_ctor_set(x_142, 5, x_130); -lean_ctor_set(x_99, 0, x_142); -return x_11; -} -} -else -{ -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; -x_143 = lean_ctor_get(x_99, 1); +lean_inc(x_137); +lean_inc(x_136); +lean_inc(x_135); +lean_dec(x_103); +x_140 = lean_ctor_get(x_104, 0); +lean_inc(x_140); +x_141 = lean_ctor_get(x_104, 1); +lean_inc(x_141); +x_142 = lean_ctor_get(x_104, 3); +lean_inc(x_142); +x_143 = lean_ctor_get(x_104, 4); lean_inc(x_143); -lean_dec(x_99); -x_144 = lean_ctor_get(x_100, 1); +x_144 = lean_ctor_get(x_104, 5); lean_inc(x_144); -x_145 = lean_ctor_get(x_100, 2); -lean_inc(x_145); -x_146 = lean_ctor_get(x_100, 3); +if (lean_is_exclusive(x_104)) { + lean_ctor_release(x_104, 0); + lean_ctor_release(x_104, 1); + lean_ctor_release(x_104, 2); + lean_ctor_release(x_104, 3); + lean_ctor_release(x_104, 4); + lean_ctor_release(x_104, 5); + x_145 = x_104; +} else { + lean_dec_ref(x_104); + x_145 = lean_box(0); +} +x_146 = lean_ctor_get(x_105, 0); lean_inc(x_146); -x_147 = lean_ctor_get(x_100, 4); +x_147 = lean_ctor_get(x_105, 1); lean_inc(x_147); -x_148 = lean_ctor_get(x_100, 5); -lean_inc(x_148); -if (lean_is_exclusive(x_100)) { - lean_ctor_release(x_100, 0); - lean_ctor_release(x_100, 1); - lean_ctor_release(x_100, 2); - lean_ctor_release(x_100, 3); - lean_ctor_release(x_100, 4); - lean_ctor_release(x_100, 5); - x_149 = x_100; +if (lean_is_exclusive(x_105)) { + lean_ctor_release(x_105, 0); + lean_ctor_release(x_105, 1); + lean_ctor_release(x_105, 2); + x_148 = x_105; } else { - lean_dec_ref(x_100); - x_149 = lean_box(0); + lean_dec_ref(x_105); + x_148 = lean_box(0); } -x_150 = lean_ctor_get(x_101, 0); -lean_inc(x_150); -x_151 = lean_ctor_get(x_101, 1); -lean_inc(x_151); -x_152 = lean_ctor_get(x_101, 3); +if (lean_is_scalar(x_148)) { + x_149 = lean_alloc_ctor(0, 3, 0); +} else { + x_149 = x_148; +} +lean_ctor_set(x_149, 0, x_146); +lean_ctor_set(x_149, 1, x_147); +lean_ctor_set(x_149, 2, x_7); +if (lean_is_scalar(x_145)) { + x_150 = lean_alloc_ctor(0, 6, 0); +} else { + x_150 = x_145; +} +lean_ctor_set(x_150, 0, x_140); +lean_ctor_set(x_150, 1, x_141); +lean_ctor_set(x_150, 2, x_149); +lean_ctor_set(x_150, 3, x_142); +lean_ctor_set(x_150, 4, x_143); +lean_ctor_set(x_150, 5, x_144); +x_151 = lean_alloc_ctor(0, 6, 0); +lean_ctor_set(x_151, 0, x_150); +lean_ctor_set(x_151, 1, x_135); +lean_ctor_set(x_151, 2, x_136); +lean_ctor_set(x_151, 3, x_137); +lean_ctor_set(x_151, 4, x_138); +lean_ctor_set(x_151, 5, x_139); +x_152 = lean_ctor_get(x_10, 1); lean_inc(x_152); -x_153 = lean_ctor_get(x_101, 4); -lean_inc(x_153); -x_154 = lean_ctor_get(x_101, 5); -lean_inc(x_154); -if (lean_is_exclusive(x_101)) { - lean_ctor_release(x_101, 0); - lean_ctor_release(x_101, 1); - lean_ctor_release(x_101, 2); - lean_ctor_release(x_101, 3); - lean_ctor_release(x_101, 4); - lean_ctor_release(x_101, 5); - x_155 = x_101; +if (lean_is_exclusive(x_10)) { + lean_ctor_release(x_10, 0); + lean_ctor_release(x_10, 1); + x_153 = x_10; } else { - lean_dec_ref(x_101); - x_155 = lean_box(0); + lean_dec_ref(x_10); + x_153 = lean_box(0); } -x_156 = lean_ctor_get(x_102, 0); -lean_inc(x_156); -x_157 = lean_ctor_get(x_102, 1); -lean_inc(x_157); -if (lean_is_exclusive(x_102)) { - lean_ctor_release(x_102, 0); - lean_ctor_release(x_102, 1); - lean_ctor_release(x_102, 2); - x_158 = x_102; +if (lean_is_scalar(x_153)) { + x_154 = lean_alloc_ctor(0, 2, 0); } else { - lean_dec_ref(x_102); - x_158 = lean_box(0); + x_154 = x_153; } -if (lean_is_scalar(x_158)) { - x_159 = lean_alloc_ctor(0, 3, 0); -} else { - x_159 = x_158; -} -lean_ctor_set(x_159, 0, x_156); -lean_ctor_set(x_159, 1, x_157); -lean_ctor_set(x_159, 2, x_7); -if (lean_is_scalar(x_155)) { - x_160 = lean_alloc_ctor(0, 6, 0); -} else { - x_160 = x_155; -} -lean_ctor_set(x_160, 0, x_150); -lean_ctor_set(x_160, 1, x_151); -lean_ctor_set(x_160, 2, x_159); -lean_ctor_set(x_160, 3, x_152); -lean_ctor_set(x_160, 4, x_153); -lean_ctor_set(x_160, 5, x_154); -if (lean_is_scalar(x_149)) { - x_161 = lean_alloc_ctor(0, 6, 0); -} else { - x_161 = x_149; -} -lean_ctor_set(x_161, 0, x_160); -lean_ctor_set(x_161, 1, x_144); -lean_ctor_set(x_161, 2, x_145); -lean_ctor_set(x_161, 3, x_146); -lean_ctor_set(x_161, 4, x_147); -lean_ctor_set(x_161, 5, x_148); -x_162 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_162, 0, x_161); -lean_ctor_set(x_162, 1, x_143); -lean_ctor_set(x_11, 1, x_162); -return x_11; +lean_ctor_set(x_154, 0, x_151); +lean_ctor_set(x_154, 1, x_152); +lean_ctor_set(x_12, 1, x_154); +return x_12; } } else { -lean_object* x_163; lean_object* x_164; lean_object* x_165; lean_object* x_166; lean_object* x_167; lean_object* x_168; lean_object* x_169; lean_object* x_170; lean_object* x_171; 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; -x_163 = lean_ctor_get(x_11, 0); -lean_inc(x_163); +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; 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; +x_155 = lean_ctor_get(x_12, 0); +x_156 = lean_ctor_get(x_12, 1); +lean_inc(x_156); +lean_inc(x_155); +lean_dec(x_12); +x_157 = l_Lean_Elab_Tactic_restore(x_156, x_11); lean_dec(x_11); -x_164 = lean_ctor_get(x_99, 1); +x_158 = lean_ctor_get(x_157, 0); +lean_inc(x_158); +lean_dec(x_157); +x_159 = lean_ctor_get(x_158, 0); +lean_inc(x_159); +x_160 = lean_ctor_get(x_159, 2); +lean_inc(x_160); +x_161 = lean_ctor_get(x_158, 1); +lean_inc(x_161); +x_162 = lean_ctor_get(x_158, 2); +lean_inc(x_162); +x_163 = lean_ctor_get(x_158, 3); +lean_inc(x_163); +x_164 = lean_ctor_get(x_158, 4); lean_inc(x_164); -if (lean_is_exclusive(x_99)) { - lean_ctor_release(x_99, 0); - lean_ctor_release(x_99, 1); - x_165 = x_99; +x_165 = lean_ctor_get(x_158, 5); +lean_inc(x_165); +if (lean_is_exclusive(x_158)) { + lean_ctor_release(x_158, 0); + lean_ctor_release(x_158, 1); + lean_ctor_release(x_158, 2); + lean_ctor_release(x_158, 3); + lean_ctor_release(x_158, 4); + lean_ctor_release(x_158, 5); + x_166 = x_158; } else { - lean_dec_ref(x_99); - x_165 = lean_box(0); + lean_dec_ref(x_158); + x_166 = lean_box(0); } -x_166 = lean_ctor_get(x_100, 1); -lean_inc(x_166); -x_167 = lean_ctor_get(x_100, 2); +x_167 = lean_ctor_get(x_159, 0); lean_inc(x_167); -x_168 = lean_ctor_get(x_100, 3); +x_168 = lean_ctor_get(x_159, 1); lean_inc(x_168); -x_169 = lean_ctor_get(x_100, 4); +x_169 = lean_ctor_get(x_159, 3); lean_inc(x_169); -x_170 = lean_ctor_get(x_100, 5); +x_170 = lean_ctor_get(x_159, 4); lean_inc(x_170); -if (lean_is_exclusive(x_100)) { - lean_ctor_release(x_100, 0); - lean_ctor_release(x_100, 1); - lean_ctor_release(x_100, 2); - lean_ctor_release(x_100, 3); - lean_ctor_release(x_100, 4); - lean_ctor_release(x_100, 5); - x_171 = x_100; +x_171 = lean_ctor_get(x_159, 5); +lean_inc(x_171); +if (lean_is_exclusive(x_159)) { + lean_ctor_release(x_159, 0); + lean_ctor_release(x_159, 1); + lean_ctor_release(x_159, 2); + lean_ctor_release(x_159, 3); + lean_ctor_release(x_159, 4); + lean_ctor_release(x_159, 5); + x_172 = x_159; } else { - lean_dec_ref(x_100); - x_171 = lean_box(0); + lean_dec_ref(x_159); + x_172 = lean_box(0); } -x_172 = lean_ctor_get(x_101, 0); -lean_inc(x_172); -x_173 = lean_ctor_get(x_101, 1); +x_173 = lean_ctor_get(x_160, 0); lean_inc(x_173); -x_174 = lean_ctor_get(x_101, 3); +x_174 = lean_ctor_get(x_160, 1); lean_inc(x_174); -x_175 = lean_ctor_get(x_101, 4); -lean_inc(x_175); -x_176 = lean_ctor_get(x_101, 5); -lean_inc(x_176); -if (lean_is_exclusive(x_101)) { - lean_ctor_release(x_101, 0); - lean_ctor_release(x_101, 1); - lean_ctor_release(x_101, 2); - lean_ctor_release(x_101, 3); - lean_ctor_release(x_101, 4); - lean_ctor_release(x_101, 5); - x_177 = x_101; +if (lean_is_exclusive(x_160)) { + lean_ctor_release(x_160, 0); + lean_ctor_release(x_160, 1); + lean_ctor_release(x_160, 2); + x_175 = x_160; } else { - lean_dec_ref(x_101); - x_177 = lean_box(0); + lean_dec_ref(x_160); + x_175 = lean_box(0); } -x_178 = lean_ctor_get(x_102, 0); -lean_inc(x_178); -x_179 = lean_ctor_get(x_102, 1); -lean_inc(x_179); -if (lean_is_exclusive(x_102)) { - lean_ctor_release(x_102, 0); - lean_ctor_release(x_102, 1); - lean_ctor_release(x_102, 2); - x_180 = x_102; +if (lean_is_scalar(x_175)) { + x_176 = lean_alloc_ctor(0, 3, 0); } else { - lean_dec_ref(x_102); + x_176 = x_175; +} +lean_ctor_set(x_176, 0, x_173); +lean_ctor_set(x_176, 1, x_174); +lean_ctor_set(x_176, 2, x_7); +if (lean_is_scalar(x_172)) { + x_177 = lean_alloc_ctor(0, 6, 0); +} else { + x_177 = x_172; +} +lean_ctor_set(x_177, 0, x_167); +lean_ctor_set(x_177, 1, x_168); +lean_ctor_set(x_177, 2, x_176); +lean_ctor_set(x_177, 3, x_169); +lean_ctor_set(x_177, 4, x_170); +lean_ctor_set(x_177, 5, x_171); +if (lean_is_scalar(x_166)) { + x_178 = lean_alloc_ctor(0, 6, 0); +} else { + x_178 = x_166; +} +lean_ctor_set(x_178, 0, x_177); +lean_ctor_set(x_178, 1, x_161); +lean_ctor_set(x_178, 2, x_162); +lean_ctor_set(x_178, 3, x_163); +lean_ctor_set(x_178, 4, x_164); +lean_ctor_set(x_178, 5, x_165); +x_179 = lean_ctor_get(x_10, 1); +lean_inc(x_179); +if (lean_is_exclusive(x_10)) { + lean_ctor_release(x_10, 0); + lean_ctor_release(x_10, 1); + x_180 = x_10; +} else { + lean_dec_ref(x_10); x_180 = lean_box(0); } if (lean_is_scalar(x_180)) { - x_181 = lean_alloc_ctor(0, 3, 0); + x_181 = lean_alloc_ctor(0, 2, 0); } else { x_181 = x_180; } lean_ctor_set(x_181, 0, x_178); lean_ctor_set(x_181, 1, x_179); -lean_ctor_set(x_181, 2, x_7); -if (lean_is_scalar(x_177)) { - x_182 = lean_alloc_ctor(0, 6, 0); -} else { - x_182 = x_177; -} -lean_ctor_set(x_182, 0, x_172); -lean_ctor_set(x_182, 1, x_173); -lean_ctor_set(x_182, 2, x_181); -lean_ctor_set(x_182, 3, x_174); -lean_ctor_set(x_182, 4, x_175); -lean_ctor_set(x_182, 5, x_176); -if (lean_is_scalar(x_171)) { - x_183 = lean_alloc_ctor(0, 6, 0); -} else { - x_183 = x_171; -} -lean_ctor_set(x_183, 0, x_182); -lean_ctor_set(x_183, 1, x_166); -lean_ctor_set(x_183, 2, x_167); -lean_ctor_set(x_183, 3, x_168); -lean_ctor_set(x_183, 4, x_169); -lean_ctor_set(x_183, 5, x_170); -if (lean_is_scalar(x_165)) { - x_184 = lean_alloc_ctor(0, 2, 0); -} else { - x_184 = x_165; -} -lean_ctor_set(x_184, 0, x_183); -lean_ctor_set(x_184, 1, x_164); -x_185 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_185, 0, x_163); -lean_ctor_set(x_185, 1, x_184); -return x_185; +x_182 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_182, 0, x_155); +lean_ctor_set(x_182, 1, x_181); +return x_182; } } } else { -uint8_t x_186; +uint8_t x_183; lean_dec(x_7); lean_dec(x_2); lean_dec(x_1); -x_186 = !lean_is_exclusive(x_9); -if (x_186 == 0) +x_183 = !lean_is_exclusive(x_9); +if (x_183 == 0) { return x_9; } else { -lean_object* x_187; lean_object* x_188; lean_object* x_189; -x_187 = lean_ctor_get(x_9, 0); -x_188 = lean_ctor_get(x_9, 1); -lean_inc(x_188); -lean_inc(x_187); +lean_object* x_184; lean_object* x_185; lean_object* x_186; +x_184 = lean_ctor_get(x_9, 0); +x_185 = lean_ctor_get(x_9, 1); +lean_inc(x_185); +lean_inc(x_184); lean_dec(x_9); -x_189 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_189, 0, x_187); -lean_ctor_set(x_189, 1, x_188); -return x_189; +x_186 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_186, 0, x_184); +lean_ctor_set(x_186, 1, x_185); +return x_186; } } } @@ -7071,234 +7553,216 @@ lean_inc(x_3); x_11 = l_Lean_Elab_Tactic_liftTermElabM___rarg(x_10, x_3, x_4); if (lean_obj_tag(x_11) == 0) { -lean_object* x_12; lean_object* x_13; +lean_object* x_12; lean_object* x_13; lean_object* x_14; x_12 = lean_ctor_get(x_11, 1); lean_inc(x_12); lean_dec(x_11); -x_13 = lean_apply_2(x_2, x_3, x_12); -if (lean_obj_tag(x_13) == 0) +x_13 = l_Lean_Elab_Tactic_save(x_12); +lean_inc(x_12); +x_14 = lean_apply_2(x_2, x_3, x_12); +if (lean_obj_tag(x_14) == 0) { -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); -x_15 = lean_ctor_get(x_14, 0); +lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; uint8_t x_19; +lean_dec(x_13); +lean_dec(x_12); +x_15 = lean_ctor_get(x_14, 1); lean_inc(x_15); x_16 = lean_ctor_get(x_15, 0); lean_inc(x_16); -x_17 = lean_ctor_get(x_16, 2); +x_17 = lean_ctor_get(x_16, 0); lean_inc(x_17); -x_18 = !lean_is_exclusive(x_13); -if (x_18 == 0) +x_18 = lean_ctor_get(x_17, 2); +lean_inc(x_18); +x_19 = !lean_is_exclusive(x_14); +if (x_19 == 0) { -lean_object* x_19; uint8_t x_20; -x_19 = lean_ctor_get(x_13, 1); -lean_dec(x_19); -x_20 = !lean_is_exclusive(x_14); -if (x_20 == 0) +lean_object* x_20; uint8_t x_21; +x_20 = lean_ctor_get(x_14, 1); +lean_dec(x_20); +x_21 = !lean_is_exclusive(x_15); +if (x_21 == 0) { -lean_object* x_21; uint8_t x_22; -x_21 = lean_ctor_get(x_14, 0); -lean_dec(x_21); -x_22 = !lean_is_exclusive(x_15); -if (x_22 == 0) +lean_object* x_22; uint8_t x_23; +x_22 = lean_ctor_get(x_15, 0); +lean_dec(x_22); +x_23 = !lean_is_exclusive(x_16); +if (x_23 == 0) { -lean_object* x_23; uint8_t x_24; -x_23 = lean_ctor_get(x_15, 0); -lean_dec(x_23); -x_24 = !lean_is_exclusive(x_16); -if (x_24 == 0) +lean_object* x_24; uint8_t x_25; +x_24 = lean_ctor_get(x_16, 0); +lean_dec(x_24); +x_25 = !lean_is_exclusive(x_17); +if (x_25 == 0) { -lean_object* x_25; uint8_t x_26; -x_25 = lean_ctor_get(x_16, 2); -lean_dec(x_25); -x_26 = !lean_is_exclusive(x_17); -if (x_26 == 0) +lean_object* x_26; uint8_t x_27; +x_26 = lean_ctor_get(x_17, 2); +lean_dec(x_26); +x_27 = !lean_is_exclusive(x_18); +if (x_27 == 0) { -lean_object* x_27; -x_27 = lean_ctor_get(x_17, 2); -lean_dec(x_27); -lean_ctor_set(x_17, 2, x_9); -return x_13; +lean_object* x_28; +x_28 = lean_ctor_get(x_18, 2); +lean_dec(x_28); +lean_ctor_set(x_18, 2, x_9); +return x_14; } else { -lean_object* x_28; lean_object* x_29; lean_object* x_30; -x_28 = lean_ctor_get(x_17, 0); -x_29 = lean_ctor_get(x_17, 1); +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_inc(x_28); -lean_dec(x_17); -x_30 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_30, 0, x_28); -lean_ctor_set(x_30, 1, x_29); -lean_ctor_set(x_30, 2, x_9); -lean_ctor_set(x_16, 2, x_30); -return x_13; +lean_dec(x_18); +x_31 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_31, 0, x_29); +lean_ctor_set(x_31, 1, x_30); +lean_ctor_set(x_31, 2, x_9); +lean_ctor_set(x_17, 2, x_31); +return x_14; } } 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; lean_object* x_38; lean_object* x_39; lean_object* x_40; -x_31 = lean_ctor_get(x_16, 0); -x_32 = lean_ctor_get(x_16, 1); -x_33 = lean_ctor_get(x_16, 3); -x_34 = lean_ctor_get(x_16, 4); -x_35 = lean_ctor_get(x_16, 5); +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_32 = lean_ctor_get(x_17, 0); +x_33 = lean_ctor_get(x_17, 1); +x_34 = lean_ctor_get(x_17, 3); +x_35 = lean_ctor_get(x_17, 4); +x_36 = lean_ctor_get(x_17, 5); +lean_inc(x_36); lean_inc(x_35); lean_inc(x_34); lean_inc(x_33); lean_inc(x_32); -lean_inc(x_31); -lean_dec(x_16); -x_36 = lean_ctor_get(x_17, 0); -lean_inc(x_36); -x_37 = lean_ctor_get(x_17, 1); +lean_dec(x_17); +x_37 = lean_ctor_get(x_18, 0); lean_inc(x_37); -if (lean_is_exclusive(x_17)) { - lean_ctor_release(x_17, 0); - lean_ctor_release(x_17, 1); - lean_ctor_release(x_17, 2); - x_38 = x_17; +x_38 = lean_ctor_get(x_18, 1); +lean_inc(x_38); +if (lean_is_exclusive(x_18)) { + lean_ctor_release(x_18, 0); + lean_ctor_release(x_18, 1); + lean_ctor_release(x_18, 2); + x_39 = x_18; } else { - lean_dec_ref(x_17); - x_38 = lean_box(0); + lean_dec_ref(x_18); + x_39 = lean_box(0); } -if (lean_is_scalar(x_38)) { - x_39 = lean_alloc_ctor(0, 3, 0); +if (lean_is_scalar(x_39)) { + x_40 = lean_alloc_ctor(0, 3, 0); } else { - x_39 = x_38; + x_40 = x_39; } -lean_ctor_set(x_39, 0, x_36); -lean_ctor_set(x_39, 1, x_37); -lean_ctor_set(x_39, 2, x_9); -x_40 = lean_alloc_ctor(0, 6, 0); -lean_ctor_set(x_40, 0, x_31); -lean_ctor_set(x_40, 1, x_32); -lean_ctor_set(x_40, 2, x_39); -lean_ctor_set(x_40, 3, x_33); -lean_ctor_set(x_40, 4, x_34); -lean_ctor_set(x_40, 5, x_35); -lean_ctor_set(x_15, 0, x_40); -return x_13; +lean_ctor_set(x_40, 0, x_37); +lean_ctor_set(x_40, 1, x_38); +lean_ctor_set(x_40, 2, x_9); +x_41 = lean_alloc_ctor(0, 6, 0); +lean_ctor_set(x_41, 0, x_32); +lean_ctor_set(x_41, 1, x_33); +lean_ctor_set(x_41, 2, x_40); +lean_ctor_set(x_41, 3, x_34); +lean_ctor_set(x_41, 4, x_35); +lean_ctor_set(x_41, 5, x_36); +lean_ctor_set(x_16, 0, x_41); +return x_14; } } else { -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; lean_object* x_54; lean_object* x_55; lean_object* x_56; lean_object* x_57; -x_41 = lean_ctor_get(x_15, 1); -x_42 = lean_ctor_get(x_15, 2); -x_43 = lean_ctor_get(x_15, 3); -x_44 = lean_ctor_get(x_15, 4); -x_45 = lean_ctor_get(x_15, 5); +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; lean_object* x_55; lean_object* x_56; lean_object* x_57; lean_object* x_58; +x_42 = lean_ctor_get(x_16, 1); +x_43 = lean_ctor_get(x_16, 2); +x_44 = lean_ctor_get(x_16, 3); +x_45 = lean_ctor_get(x_16, 4); +x_46 = lean_ctor_get(x_16, 5); +lean_inc(x_46); lean_inc(x_45); lean_inc(x_44); lean_inc(x_43); lean_inc(x_42); -lean_inc(x_41); -lean_dec(x_15); -x_46 = lean_ctor_get(x_16, 0); -lean_inc(x_46); -x_47 = lean_ctor_get(x_16, 1); +lean_dec(x_16); +x_47 = lean_ctor_get(x_17, 0); lean_inc(x_47); -x_48 = lean_ctor_get(x_16, 3); +x_48 = lean_ctor_get(x_17, 1); lean_inc(x_48); -x_49 = lean_ctor_get(x_16, 4); +x_49 = lean_ctor_get(x_17, 3); lean_inc(x_49); -x_50 = lean_ctor_get(x_16, 5); +x_50 = lean_ctor_get(x_17, 4); lean_inc(x_50); -if (lean_is_exclusive(x_16)) { - lean_ctor_release(x_16, 0); - lean_ctor_release(x_16, 1); - lean_ctor_release(x_16, 2); - lean_ctor_release(x_16, 3); - lean_ctor_release(x_16, 4); - lean_ctor_release(x_16, 5); - x_51 = x_16; -} else { - lean_dec_ref(x_16); - x_51 = lean_box(0); -} -x_52 = lean_ctor_get(x_17, 0); -lean_inc(x_52); -x_53 = lean_ctor_get(x_17, 1); -lean_inc(x_53); +x_51 = lean_ctor_get(x_17, 5); +lean_inc(x_51); if (lean_is_exclusive(x_17)) { lean_ctor_release(x_17, 0); lean_ctor_release(x_17, 1); lean_ctor_release(x_17, 2); - x_54 = x_17; + lean_ctor_release(x_17, 3); + lean_ctor_release(x_17, 4); + lean_ctor_release(x_17, 5); + x_52 = x_17; } else { lean_dec_ref(x_17); - x_54 = lean_box(0); + x_52 = lean_box(0); } -if (lean_is_scalar(x_54)) { - x_55 = lean_alloc_ctor(0, 3, 0); +x_53 = lean_ctor_get(x_18, 0); +lean_inc(x_53); +x_54 = lean_ctor_get(x_18, 1); +lean_inc(x_54); +if (lean_is_exclusive(x_18)) { + lean_ctor_release(x_18, 0); + lean_ctor_release(x_18, 1); + lean_ctor_release(x_18, 2); + x_55 = x_18; } else { - x_55 = x_54; + lean_dec_ref(x_18); + x_55 = lean_box(0); } -lean_ctor_set(x_55, 0, x_52); -lean_ctor_set(x_55, 1, x_53); -lean_ctor_set(x_55, 2, x_9); -if (lean_is_scalar(x_51)) { - x_56 = lean_alloc_ctor(0, 6, 0); +if (lean_is_scalar(x_55)) { + x_56 = lean_alloc_ctor(0, 3, 0); } else { - x_56 = x_51; + x_56 = x_55; } -lean_ctor_set(x_56, 0, x_46); -lean_ctor_set(x_56, 1, x_47); -lean_ctor_set(x_56, 2, x_55); -lean_ctor_set(x_56, 3, x_48); -lean_ctor_set(x_56, 4, x_49); -lean_ctor_set(x_56, 5, x_50); -x_57 = lean_alloc_ctor(0, 6, 0); -lean_ctor_set(x_57, 0, x_56); -lean_ctor_set(x_57, 1, x_41); -lean_ctor_set(x_57, 2, x_42); -lean_ctor_set(x_57, 3, x_43); -lean_ctor_set(x_57, 4, x_44); -lean_ctor_set(x_57, 5, x_45); -lean_ctor_set(x_14, 0, x_57); -return x_13; +lean_ctor_set(x_56, 0, x_53); +lean_ctor_set(x_56, 1, x_54); +lean_ctor_set(x_56, 2, x_9); +if (lean_is_scalar(x_52)) { + x_57 = lean_alloc_ctor(0, 6, 0); +} else { + x_57 = x_52; +} +lean_ctor_set(x_57, 0, x_47); +lean_ctor_set(x_57, 1, x_48); +lean_ctor_set(x_57, 2, x_56); +lean_ctor_set(x_57, 3, x_49); +lean_ctor_set(x_57, 4, x_50); +lean_ctor_set(x_57, 5, x_51); +x_58 = lean_alloc_ctor(0, 6, 0); +lean_ctor_set(x_58, 0, x_57); +lean_ctor_set(x_58, 1, x_42); +lean_ctor_set(x_58, 2, x_43); +lean_ctor_set(x_58, 3, x_44); +lean_ctor_set(x_58, 4, x_45); +lean_ctor_set(x_58, 5, x_46); +lean_ctor_set(x_15, 0, x_58); +return x_14; } } 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_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_58 = lean_ctor_get(x_14, 1); -lean_inc(x_58); -lean_dec(x_14); +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; x_59 = lean_ctor_get(x_15, 1); lean_inc(x_59); -x_60 = lean_ctor_get(x_15, 2); +lean_dec(x_15); +x_60 = lean_ctor_get(x_16, 1); lean_inc(x_60); -x_61 = lean_ctor_get(x_15, 3); +x_61 = lean_ctor_get(x_16, 2); lean_inc(x_61); -x_62 = lean_ctor_get(x_15, 4); +x_62 = lean_ctor_get(x_16, 3); lean_inc(x_62); -x_63 = lean_ctor_get(x_15, 5); +x_63 = lean_ctor_get(x_16, 4); lean_inc(x_63); -if (lean_is_exclusive(x_15)) { - lean_ctor_release(x_15, 0); - lean_ctor_release(x_15, 1); - lean_ctor_release(x_15, 2); - lean_ctor_release(x_15, 3); - lean_ctor_release(x_15, 4); - lean_ctor_release(x_15, 5); - x_64 = x_15; -} else { - lean_dec_ref(x_15); - x_64 = lean_box(0); -} -x_65 = lean_ctor_get(x_16, 0); -lean_inc(x_65); -x_66 = lean_ctor_get(x_16, 1); -lean_inc(x_66); -x_67 = lean_ctor_get(x_16, 3); -lean_inc(x_67); -x_68 = lean_ctor_get(x_16, 4); -lean_inc(x_68); -x_69 = lean_ctor_get(x_16, 5); -lean_inc(x_69); +x_64 = lean_ctor_get(x_16, 5); +lean_inc(x_64); if (lean_is_exclusive(x_16)) { lean_ctor_release(x_16, 0); lean_ctor_release(x_16, 1); @@ -7306,109 +7770,109 @@ if (lean_is_exclusive(x_16)) { lean_ctor_release(x_16, 3); lean_ctor_release(x_16, 4); lean_ctor_release(x_16, 5); - x_70 = x_16; + x_65 = x_16; } else { lean_dec_ref(x_16); - x_70 = lean_box(0); + x_65 = lean_box(0); } -x_71 = lean_ctor_get(x_17, 0); -lean_inc(x_71); -x_72 = lean_ctor_get(x_17, 1); -lean_inc(x_72); +x_66 = lean_ctor_get(x_17, 0); +lean_inc(x_66); +x_67 = lean_ctor_get(x_17, 1); +lean_inc(x_67); +x_68 = lean_ctor_get(x_17, 3); +lean_inc(x_68); +x_69 = lean_ctor_get(x_17, 4); +lean_inc(x_69); +x_70 = lean_ctor_get(x_17, 5); +lean_inc(x_70); if (lean_is_exclusive(x_17)) { lean_ctor_release(x_17, 0); lean_ctor_release(x_17, 1); lean_ctor_release(x_17, 2); - x_73 = x_17; + lean_ctor_release(x_17, 3); + lean_ctor_release(x_17, 4); + lean_ctor_release(x_17, 5); + x_71 = x_17; } else { lean_dec_ref(x_17); - x_73 = lean_box(0); + x_71 = lean_box(0); } -if (lean_is_scalar(x_73)) { - x_74 = lean_alloc_ctor(0, 3, 0); +x_72 = lean_ctor_get(x_18, 0); +lean_inc(x_72); +x_73 = lean_ctor_get(x_18, 1); +lean_inc(x_73); +if (lean_is_exclusive(x_18)) { + lean_ctor_release(x_18, 0); + lean_ctor_release(x_18, 1); + lean_ctor_release(x_18, 2); + x_74 = x_18; } else { - x_74 = x_73; + lean_dec_ref(x_18); + x_74 = lean_box(0); } -lean_ctor_set(x_74, 0, x_71); -lean_ctor_set(x_74, 1, x_72); -lean_ctor_set(x_74, 2, x_9); -if (lean_is_scalar(x_70)) { - x_75 = lean_alloc_ctor(0, 6, 0); +if (lean_is_scalar(x_74)) { + x_75 = lean_alloc_ctor(0, 3, 0); } else { - x_75 = x_70; + x_75 = x_74; } -lean_ctor_set(x_75, 0, x_65); -lean_ctor_set(x_75, 1, x_66); -lean_ctor_set(x_75, 2, x_74); -lean_ctor_set(x_75, 3, x_67); -lean_ctor_set(x_75, 4, x_68); -lean_ctor_set(x_75, 5, x_69); -if (lean_is_scalar(x_64)) { +lean_ctor_set(x_75, 0, x_72); +lean_ctor_set(x_75, 1, x_73); +lean_ctor_set(x_75, 2, x_9); +if (lean_is_scalar(x_71)) { x_76 = lean_alloc_ctor(0, 6, 0); } else { - x_76 = x_64; + x_76 = x_71; +} +lean_ctor_set(x_76, 0, x_66); +lean_ctor_set(x_76, 1, x_67); +lean_ctor_set(x_76, 2, x_75); +lean_ctor_set(x_76, 3, x_68); +lean_ctor_set(x_76, 4, x_69); +lean_ctor_set(x_76, 5, x_70); +if (lean_is_scalar(x_65)) { + x_77 = lean_alloc_ctor(0, 6, 0); +} else { + x_77 = x_65; } -lean_ctor_set(x_76, 0, x_75); -lean_ctor_set(x_76, 1, x_59); -lean_ctor_set(x_76, 2, x_60); -lean_ctor_set(x_76, 3, x_61); -lean_ctor_set(x_76, 4, x_62); -lean_ctor_set(x_76, 5, x_63); -x_77 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_77, 0, x_76); -lean_ctor_set(x_77, 1, x_58); -lean_ctor_set(x_13, 1, x_77); -return x_13; +lean_ctor_set(x_77, 1, x_60); +lean_ctor_set(x_77, 2, x_61); +lean_ctor_set(x_77, 3, x_62); +lean_ctor_set(x_77, 4, x_63); +lean_ctor_set(x_77, 5, x_64); +x_78 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_78, 0, x_77); +lean_ctor_set(x_78, 1, x_59); +lean_ctor_set(x_14, 1, x_78); +return x_14; } } 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; 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; -x_78 = lean_ctor_get(x_13, 0); -lean_inc(x_78); -lean_dec(x_13); -x_79 = lean_ctor_get(x_14, 1); +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; 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; +x_79 = lean_ctor_get(x_14, 0); lean_inc(x_79); -if (lean_is_exclusive(x_14)) { - lean_ctor_release(x_14, 0); - lean_ctor_release(x_14, 1); - x_80 = x_14; -} else { - lean_dec_ref(x_14); - x_80 = lean_box(0); -} -x_81 = lean_ctor_get(x_15, 1); -lean_inc(x_81); -x_82 = lean_ctor_get(x_15, 2); -lean_inc(x_82); -x_83 = lean_ctor_get(x_15, 3); -lean_inc(x_83); -x_84 = lean_ctor_get(x_15, 4); -lean_inc(x_84); -x_85 = lean_ctor_get(x_15, 5); -lean_inc(x_85); +lean_dec(x_14); +x_80 = lean_ctor_get(x_15, 1); +lean_inc(x_80); if (lean_is_exclusive(x_15)) { lean_ctor_release(x_15, 0); lean_ctor_release(x_15, 1); - lean_ctor_release(x_15, 2); - lean_ctor_release(x_15, 3); - lean_ctor_release(x_15, 4); - lean_ctor_release(x_15, 5); - x_86 = x_15; + x_81 = x_15; } else { lean_dec_ref(x_15); - x_86 = lean_box(0); + x_81 = lean_box(0); } -x_87 = lean_ctor_get(x_16, 0); -lean_inc(x_87); -x_88 = lean_ctor_get(x_16, 1); -lean_inc(x_88); -x_89 = lean_ctor_get(x_16, 3); -lean_inc(x_89); -x_90 = lean_ctor_get(x_16, 4); -lean_inc(x_90); -x_91 = lean_ctor_get(x_16, 5); -lean_inc(x_91); +x_82 = lean_ctor_get(x_16, 1); +lean_inc(x_82); +x_83 = lean_ctor_get(x_16, 2); +lean_inc(x_83); +x_84 = lean_ctor_get(x_16, 3); +lean_inc(x_84); +x_85 = lean_ctor_get(x_16, 4); +lean_inc(x_85); +x_86 = lean_ctor_get(x_16, 5); +lean_inc(x_86); if (lean_is_exclusive(x_16)) { lean_ctor_release(x_16, 0); lean_ctor_release(x_16, 1); @@ -7416,492 +7880,493 @@ if (lean_is_exclusive(x_16)) { lean_ctor_release(x_16, 3); lean_ctor_release(x_16, 4); lean_ctor_release(x_16, 5); - x_92 = x_16; + x_87 = x_16; } else { lean_dec_ref(x_16); - x_92 = lean_box(0); + x_87 = lean_box(0); } -x_93 = lean_ctor_get(x_17, 0); -lean_inc(x_93); -x_94 = lean_ctor_get(x_17, 1); -lean_inc(x_94); +x_88 = lean_ctor_get(x_17, 0); +lean_inc(x_88); +x_89 = lean_ctor_get(x_17, 1); +lean_inc(x_89); +x_90 = lean_ctor_get(x_17, 3); +lean_inc(x_90); +x_91 = lean_ctor_get(x_17, 4); +lean_inc(x_91); +x_92 = lean_ctor_get(x_17, 5); +lean_inc(x_92); if (lean_is_exclusive(x_17)) { lean_ctor_release(x_17, 0); lean_ctor_release(x_17, 1); lean_ctor_release(x_17, 2); - x_95 = x_17; + lean_ctor_release(x_17, 3); + lean_ctor_release(x_17, 4); + lean_ctor_release(x_17, 5); + x_93 = x_17; } else { lean_dec_ref(x_17); - x_95 = lean_box(0); + x_93 = lean_box(0); } -if (lean_is_scalar(x_95)) { - x_96 = lean_alloc_ctor(0, 3, 0); +x_94 = lean_ctor_get(x_18, 0); +lean_inc(x_94); +x_95 = lean_ctor_get(x_18, 1); +lean_inc(x_95); +if (lean_is_exclusive(x_18)) { + lean_ctor_release(x_18, 0); + lean_ctor_release(x_18, 1); + lean_ctor_release(x_18, 2); + x_96 = x_18; } else { - x_96 = x_95; + lean_dec_ref(x_18); + x_96 = lean_box(0); } -lean_ctor_set(x_96, 0, x_93); -lean_ctor_set(x_96, 1, x_94); -lean_ctor_set(x_96, 2, x_9); -if (lean_is_scalar(x_92)) { - x_97 = lean_alloc_ctor(0, 6, 0); +if (lean_is_scalar(x_96)) { + x_97 = lean_alloc_ctor(0, 3, 0); } else { - x_97 = x_92; + x_97 = x_96; } -lean_ctor_set(x_97, 0, x_87); -lean_ctor_set(x_97, 1, x_88); -lean_ctor_set(x_97, 2, x_96); -lean_ctor_set(x_97, 3, x_89); -lean_ctor_set(x_97, 4, x_90); -lean_ctor_set(x_97, 5, x_91); -if (lean_is_scalar(x_86)) { +lean_ctor_set(x_97, 0, x_94); +lean_ctor_set(x_97, 1, x_95); +lean_ctor_set(x_97, 2, x_9); +if (lean_is_scalar(x_93)) { x_98 = lean_alloc_ctor(0, 6, 0); } else { - x_98 = x_86; + x_98 = x_93; } -lean_ctor_set(x_98, 0, x_97); -lean_ctor_set(x_98, 1, x_81); -lean_ctor_set(x_98, 2, x_82); -lean_ctor_set(x_98, 3, x_83); -lean_ctor_set(x_98, 4, x_84); -lean_ctor_set(x_98, 5, x_85); -if (lean_is_scalar(x_80)) { - x_99 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_98, 0, x_88); +lean_ctor_set(x_98, 1, x_89); +lean_ctor_set(x_98, 2, x_97); +lean_ctor_set(x_98, 3, x_90); +lean_ctor_set(x_98, 4, x_91); +lean_ctor_set(x_98, 5, x_92); +if (lean_is_scalar(x_87)) { + x_99 = lean_alloc_ctor(0, 6, 0); } else { - x_99 = x_80; + x_99 = x_87; } lean_ctor_set(x_99, 0, x_98); -lean_ctor_set(x_99, 1, x_79); -x_100 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_100, 0, x_78); -lean_ctor_set(x_100, 1, x_99); -return x_100; +lean_ctor_set(x_99, 1, x_82); +lean_ctor_set(x_99, 2, x_83); +lean_ctor_set(x_99, 3, x_84); +lean_ctor_set(x_99, 4, x_85); +lean_ctor_set(x_99, 5, x_86); +if (lean_is_scalar(x_81)) { + x_100 = lean_alloc_ctor(0, 2, 0); +} else { + x_100 = x_81; +} +lean_ctor_set(x_100, 0, x_99); +lean_ctor_set(x_100, 1, x_80); +x_101 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_101, 0, x_79); +lean_ctor_set(x_101, 1, x_100); +return x_101; } } else { -lean_object* x_101; lean_object* x_102; lean_object* x_103; lean_object* x_104; uint8_t x_105; -x_101 = lean_ctor_get(x_13, 1); -lean_inc(x_101); -x_102 = lean_ctor_get(x_101, 0); -lean_inc(x_102); -x_103 = lean_ctor_get(x_102, 0); -lean_inc(x_103); -x_104 = lean_ctor_get(x_103, 2); -lean_inc(x_104); -x_105 = !lean_is_exclusive(x_13); -if (x_105 == 0) +uint8_t x_102; +x_102 = !lean_is_exclusive(x_14); +if (x_102 == 0) { -lean_object* x_106; uint8_t x_107; -x_106 = lean_ctor_get(x_13, 1); -lean_dec(x_106); -x_107 = !lean_is_exclusive(x_101); -if (x_107 == 0) -{ -lean_object* x_108; uint8_t x_109; -x_108 = lean_ctor_get(x_101, 0); -lean_dec(x_108); -x_109 = !lean_is_exclusive(x_102); -if (x_109 == 0) -{ -lean_object* x_110; uint8_t x_111; -x_110 = lean_ctor_get(x_102, 0); -lean_dec(x_110); -x_111 = !lean_is_exclusive(x_103); -if (x_111 == 0) -{ -lean_object* x_112; uint8_t x_113; -x_112 = lean_ctor_get(x_103, 2); -lean_dec(x_112); -x_113 = !lean_is_exclusive(x_104); -if (x_113 == 0) -{ -lean_object* x_114; -x_114 = lean_ctor_get(x_104, 2); -lean_dec(x_114); -lean_ctor_set(x_104, 2, x_9); -return x_13; -} -else -{ -lean_object* x_115; lean_object* x_116; lean_object* x_117; -x_115 = lean_ctor_get(x_104, 0); -x_116 = lean_ctor_get(x_104, 1); -lean_inc(x_116); -lean_inc(x_115); +lean_object* x_103; lean_object* x_104; lean_object* x_105; lean_object* x_106; lean_object* x_107; uint8_t x_108; +x_103 = lean_ctor_get(x_14, 1); +x_104 = l_Lean_Elab_Tactic_restore(x_103, x_13); +lean_dec(x_13); +x_105 = lean_ctor_get(x_104, 0); +lean_inc(x_105); lean_dec(x_104); -x_117 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_117, 0, x_115); +x_106 = lean_ctor_get(x_105, 0); +lean_inc(x_106); +x_107 = lean_ctor_get(x_106, 2); +lean_inc(x_107); +x_108 = !lean_is_exclusive(x_105); +if (x_108 == 0) +{ +lean_object* x_109; uint8_t x_110; +x_109 = lean_ctor_get(x_105, 0); +lean_dec(x_109); +x_110 = !lean_is_exclusive(x_106); +if (x_110 == 0) +{ +lean_object* x_111; uint8_t x_112; +x_111 = lean_ctor_get(x_106, 2); +lean_dec(x_111); +x_112 = !lean_is_exclusive(x_107); +if (x_112 == 0) +{ +lean_object* x_113; uint8_t x_114; +x_113 = lean_ctor_get(x_107, 2); +lean_dec(x_113); +lean_ctor_set(x_107, 2, x_9); +x_114 = !lean_is_exclusive(x_12); +if (x_114 == 0) +{ +lean_object* x_115; +x_115 = lean_ctor_get(x_12, 0); +lean_dec(x_115); +lean_ctor_set(x_12, 0, x_105); +lean_ctor_set(x_14, 1, x_12); +return x_14; +} +else +{ +lean_object* x_116; lean_object* x_117; +x_116 = lean_ctor_get(x_12, 1); +lean_inc(x_116); +lean_dec(x_12); +x_117 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_117, 0, x_105); lean_ctor_set(x_117, 1, x_116); -lean_ctor_set(x_117, 2, x_9); -lean_ctor_set(x_103, 2, x_117); -return x_13; +lean_ctor_set(x_14, 1, x_117); +return x_14; } } else { -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_118 = lean_ctor_get(x_103, 0); -x_119 = lean_ctor_get(x_103, 1); -x_120 = lean_ctor_get(x_103, 3); -x_121 = lean_ctor_get(x_103, 4); -x_122 = lean_ctor_get(x_103, 5); -lean_inc(x_122); -lean_inc(x_121); -lean_inc(x_120); +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_118 = lean_ctor_get(x_107, 0); +x_119 = lean_ctor_get(x_107, 1); lean_inc(x_119); lean_inc(x_118); -lean_dec(x_103); -x_123 = lean_ctor_get(x_104, 0); -lean_inc(x_123); -x_124 = lean_ctor_get(x_104, 1); -lean_inc(x_124); -if (lean_is_exclusive(x_104)) { - lean_ctor_release(x_104, 0); - lean_ctor_release(x_104, 1); - lean_ctor_release(x_104, 2); - x_125 = x_104; +lean_dec(x_107); +x_120 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_120, 0, x_118); +lean_ctor_set(x_120, 1, x_119); +lean_ctor_set(x_120, 2, x_9); +lean_ctor_set(x_106, 2, x_120); +x_121 = lean_ctor_get(x_12, 1); +lean_inc(x_121); +if (lean_is_exclusive(x_12)) { + lean_ctor_release(x_12, 0); + lean_ctor_release(x_12, 1); + x_122 = x_12; } else { - lean_dec_ref(x_104); - x_125 = lean_box(0); + lean_dec_ref(x_12); + x_122 = lean_box(0); } -if (lean_is_scalar(x_125)) { - x_126 = lean_alloc_ctor(0, 3, 0); +if (lean_is_scalar(x_122)) { + x_123 = lean_alloc_ctor(0, 2, 0); } else { - x_126 = x_125; + x_123 = x_122; } -lean_ctor_set(x_126, 0, x_123); -lean_ctor_set(x_126, 1, x_124); -lean_ctor_set(x_126, 2, x_9); -x_127 = lean_alloc_ctor(0, 6, 0); -lean_ctor_set(x_127, 0, x_118); -lean_ctor_set(x_127, 1, x_119); -lean_ctor_set(x_127, 2, x_126); -lean_ctor_set(x_127, 3, x_120); -lean_ctor_set(x_127, 4, x_121); -lean_ctor_set(x_127, 5, x_122); -lean_ctor_set(x_102, 0, x_127); -return x_13; +lean_ctor_set(x_123, 0, x_105); +lean_ctor_set(x_123, 1, x_121); +lean_ctor_set(x_14, 1, x_123); +return x_14; } } else { -lean_object* x_128; lean_object* x_129; lean_object* x_130; lean_object* x_131; lean_object* x_132; lean_object* x_133; lean_object* x_134; lean_object* x_135; lean_object* x_136; lean_object* x_137; lean_object* x_138; lean_object* x_139; lean_object* x_140; lean_object* x_141; lean_object* x_142; lean_object* x_143; lean_object* x_144; -x_128 = lean_ctor_get(x_102, 1); -x_129 = lean_ctor_get(x_102, 2); -x_130 = lean_ctor_get(x_102, 3); -x_131 = lean_ctor_get(x_102, 4); -x_132 = lean_ctor_get(x_102, 5); -lean_inc(x_132); -lean_inc(x_131); -lean_inc(x_130); -lean_inc(x_129); +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; lean_object* x_132; lean_object* x_133; lean_object* x_134; lean_object* x_135; lean_object* x_136; +x_124 = lean_ctor_get(x_106, 0); +x_125 = lean_ctor_get(x_106, 1); +x_126 = lean_ctor_get(x_106, 3); +x_127 = lean_ctor_get(x_106, 4); +x_128 = lean_ctor_get(x_106, 5); lean_inc(x_128); -lean_dec(x_102); -x_133 = lean_ctor_get(x_103, 0); -lean_inc(x_133); -x_134 = lean_ctor_get(x_103, 1); +lean_inc(x_127); +lean_inc(x_126); +lean_inc(x_125); +lean_inc(x_124); +lean_dec(x_106); +x_129 = lean_ctor_get(x_107, 0); +lean_inc(x_129); +x_130 = lean_ctor_get(x_107, 1); +lean_inc(x_130); +if (lean_is_exclusive(x_107)) { + lean_ctor_release(x_107, 0); + lean_ctor_release(x_107, 1); + lean_ctor_release(x_107, 2); + x_131 = x_107; +} else { + lean_dec_ref(x_107); + x_131 = lean_box(0); +} +if (lean_is_scalar(x_131)) { + x_132 = lean_alloc_ctor(0, 3, 0); +} else { + x_132 = x_131; +} +lean_ctor_set(x_132, 0, x_129); +lean_ctor_set(x_132, 1, x_130); +lean_ctor_set(x_132, 2, x_9); +x_133 = lean_alloc_ctor(0, 6, 0); +lean_ctor_set(x_133, 0, x_124); +lean_ctor_set(x_133, 1, x_125); +lean_ctor_set(x_133, 2, x_132); +lean_ctor_set(x_133, 3, x_126); +lean_ctor_set(x_133, 4, x_127); +lean_ctor_set(x_133, 5, x_128); +lean_ctor_set(x_105, 0, x_133); +x_134 = lean_ctor_get(x_12, 1); lean_inc(x_134); -x_135 = lean_ctor_get(x_103, 3); -lean_inc(x_135); -x_136 = lean_ctor_get(x_103, 4); -lean_inc(x_136); -x_137 = lean_ctor_get(x_103, 5); -lean_inc(x_137); -if (lean_is_exclusive(x_103)) { - lean_ctor_release(x_103, 0); - lean_ctor_release(x_103, 1); - lean_ctor_release(x_103, 2); - lean_ctor_release(x_103, 3); - lean_ctor_release(x_103, 4); - lean_ctor_release(x_103, 5); - x_138 = x_103; +if (lean_is_exclusive(x_12)) { + lean_ctor_release(x_12, 0); + lean_ctor_release(x_12, 1); + x_135 = x_12; } else { - lean_dec_ref(x_103); - x_138 = lean_box(0); + lean_dec_ref(x_12); + x_135 = lean_box(0); } -x_139 = lean_ctor_get(x_104, 0); -lean_inc(x_139); -x_140 = lean_ctor_get(x_104, 1); +if (lean_is_scalar(x_135)) { + x_136 = lean_alloc_ctor(0, 2, 0); +} else { + x_136 = x_135; +} +lean_ctor_set(x_136, 0, x_105); +lean_ctor_set(x_136, 1, x_134); +lean_ctor_set(x_14, 1, x_136); +return x_14; +} +} +else +{ +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; +x_137 = lean_ctor_get(x_105, 1); +x_138 = lean_ctor_get(x_105, 2); +x_139 = lean_ctor_get(x_105, 3); +x_140 = lean_ctor_get(x_105, 4); +x_141 = lean_ctor_get(x_105, 5); +lean_inc(x_141); lean_inc(x_140); -if (lean_is_exclusive(x_104)) { - lean_ctor_release(x_104, 0); - lean_ctor_release(x_104, 1); - lean_ctor_release(x_104, 2); - x_141 = x_104; -} else { - lean_dec_ref(x_104); - x_141 = lean_box(0); -} -if (lean_is_scalar(x_141)) { - x_142 = lean_alloc_ctor(0, 3, 0); -} else { - x_142 = x_141; -} -lean_ctor_set(x_142, 0, x_139); -lean_ctor_set(x_142, 1, x_140); -lean_ctor_set(x_142, 2, x_9); -if (lean_is_scalar(x_138)) { - x_143 = lean_alloc_ctor(0, 6, 0); -} else { - x_143 = x_138; -} -lean_ctor_set(x_143, 0, x_133); -lean_ctor_set(x_143, 1, x_134); -lean_ctor_set(x_143, 2, x_142); -lean_ctor_set(x_143, 3, x_135); -lean_ctor_set(x_143, 4, x_136); -lean_ctor_set(x_143, 5, x_137); -x_144 = lean_alloc_ctor(0, 6, 0); -lean_ctor_set(x_144, 0, x_143); -lean_ctor_set(x_144, 1, x_128); -lean_ctor_set(x_144, 2, x_129); -lean_ctor_set(x_144, 3, x_130); -lean_ctor_set(x_144, 4, x_131); -lean_ctor_set(x_144, 5, x_132); -lean_ctor_set(x_101, 0, x_144); -return x_13; -} -} -else -{ -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; -x_145 = lean_ctor_get(x_101, 1); +lean_inc(x_139); +lean_inc(x_138); +lean_inc(x_137); +lean_dec(x_105); +x_142 = lean_ctor_get(x_106, 0); +lean_inc(x_142); +x_143 = lean_ctor_get(x_106, 1); +lean_inc(x_143); +x_144 = lean_ctor_get(x_106, 3); +lean_inc(x_144); +x_145 = lean_ctor_get(x_106, 4); lean_inc(x_145); -lean_dec(x_101); -x_146 = lean_ctor_get(x_102, 1); +x_146 = lean_ctor_get(x_106, 5); lean_inc(x_146); -x_147 = lean_ctor_get(x_102, 2); -lean_inc(x_147); -x_148 = lean_ctor_get(x_102, 3); +if (lean_is_exclusive(x_106)) { + lean_ctor_release(x_106, 0); + lean_ctor_release(x_106, 1); + lean_ctor_release(x_106, 2); + lean_ctor_release(x_106, 3); + lean_ctor_release(x_106, 4); + lean_ctor_release(x_106, 5); + x_147 = x_106; +} else { + lean_dec_ref(x_106); + x_147 = lean_box(0); +} +x_148 = lean_ctor_get(x_107, 0); lean_inc(x_148); -x_149 = lean_ctor_get(x_102, 4); +x_149 = lean_ctor_get(x_107, 1); lean_inc(x_149); -x_150 = lean_ctor_get(x_102, 5); -lean_inc(x_150); -if (lean_is_exclusive(x_102)) { - lean_ctor_release(x_102, 0); - lean_ctor_release(x_102, 1); - lean_ctor_release(x_102, 2); - lean_ctor_release(x_102, 3); - lean_ctor_release(x_102, 4); - lean_ctor_release(x_102, 5); - x_151 = x_102; +if (lean_is_exclusive(x_107)) { + lean_ctor_release(x_107, 0); + lean_ctor_release(x_107, 1); + lean_ctor_release(x_107, 2); + x_150 = x_107; } else { - lean_dec_ref(x_102); - x_151 = lean_box(0); + lean_dec_ref(x_107); + x_150 = lean_box(0); } -x_152 = lean_ctor_get(x_103, 0); -lean_inc(x_152); -x_153 = lean_ctor_get(x_103, 1); -lean_inc(x_153); -x_154 = lean_ctor_get(x_103, 3); +if (lean_is_scalar(x_150)) { + x_151 = lean_alloc_ctor(0, 3, 0); +} else { + x_151 = x_150; +} +lean_ctor_set(x_151, 0, x_148); +lean_ctor_set(x_151, 1, x_149); +lean_ctor_set(x_151, 2, x_9); +if (lean_is_scalar(x_147)) { + x_152 = lean_alloc_ctor(0, 6, 0); +} else { + x_152 = x_147; +} +lean_ctor_set(x_152, 0, x_142); +lean_ctor_set(x_152, 1, x_143); +lean_ctor_set(x_152, 2, x_151); +lean_ctor_set(x_152, 3, x_144); +lean_ctor_set(x_152, 4, x_145); +lean_ctor_set(x_152, 5, x_146); +x_153 = lean_alloc_ctor(0, 6, 0); +lean_ctor_set(x_153, 0, x_152); +lean_ctor_set(x_153, 1, x_137); +lean_ctor_set(x_153, 2, x_138); +lean_ctor_set(x_153, 3, x_139); +lean_ctor_set(x_153, 4, x_140); +lean_ctor_set(x_153, 5, x_141); +x_154 = lean_ctor_get(x_12, 1); lean_inc(x_154); -x_155 = lean_ctor_get(x_103, 4); -lean_inc(x_155); -x_156 = lean_ctor_get(x_103, 5); -lean_inc(x_156); -if (lean_is_exclusive(x_103)) { - lean_ctor_release(x_103, 0); - lean_ctor_release(x_103, 1); - lean_ctor_release(x_103, 2); - lean_ctor_release(x_103, 3); - lean_ctor_release(x_103, 4); - lean_ctor_release(x_103, 5); - x_157 = x_103; +if (lean_is_exclusive(x_12)) { + lean_ctor_release(x_12, 0); + lean_ctor_release(x_12, 1); + x_155 = x_12; } else { - lean_dec_ref(x_103); - x_157 = lean_box(0); + lean_dec_ref(x_12); + x_155 = lean_box(0); } -x_158 = lean_ctor_get(x_104, 0); -lean_inc(x_158); -x_159 = lean_ctor_get(x_104, 1); -lean_inc(x_159); -if (lean_is_exclusive(x_104)) { - lean_ctor_release(x_104, 0); - lean_ctor_release(x_104, 1); - lean_ctor_release(x_104, 2); - x_160 = x_104; +if (lean_is_scalar(x_155)) { + x_156 = lean_alloc_ctor(0, 2, 0); } else { - lean_dec_ref(x_104); - x_160 = lean_box(0); + x_156 = x_155; } -if (lean_is_scalar(x_160)) { - x_161 = lean_alloc_ctor(0, 3, 0); -} else { - x_161 = x_160; -} -lean_ctor_set(x_161, 0, x_158); -lean_ctor_set(x_161, 1, x_159); -lean_ctor_set(x_161, 2, x_9); -if (lean_is_scalar(x_157)) { - x_162 = lean_alloc_ctor(0, 6, 0); -} else { - x_162 = x_157; -} -lean_ctor_set(x_162, 0, x_152); -lean_ctor_set(x_162, 1, x_153); -lean_ctor_set(x_162, 2, x_161); -lean_ctor_set(x_162, 3, x_154); -lean_ctor_set(x_162, 4, x_155); -lean_ctor_set(x_162, 5, x_156); -if (lean_is_scalar(x_151)) { - x_163 = lean_alloc_ctor(0, 6, 0); -} else { - x_163 = x_151; -} -lean_ctor_set(x_163, 0, x_162); -lean_ctor_set(x_163, 1, x_146); -lean_ctor_set(x_163, 2, x_147); -lean_ctor_set(x_163, 3, x_148); -lean_ctor_set(x_163, 4, x_149); -lean_ctor_set(x_163, 5, x_150); -x_164 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_164, 0, x_163); -lean_ctor_set(x_164, 1, x_145); -lean_ctor_set(x_13, 1, x_164); -return x_13; +lean_ctor_set(x_156, 0, x_153); +lean_ctor_set(x_156, 1, x_154); +lean_ctor_set(x_14, 1, x_156); +return x_14; } } else { -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_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; -x_165 = lean_ctor_get(x_13, 0); -lean_inc(x_165); +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; 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; +x_157 = lean_ctor_get(x_14, 0); +x_158 = lean_ctor_get(x_14, 1); +lean_inc(x_158); +lean_inc(x_157); +lean_dec(x_14); +x_159 = l_Lean_Elab_Tactic_restore(x_158, x_13); lean_dec(x_13); -x_166 = lean_ctor_get(x_101, 1); +x_160 = lean_ctor_get(x_159, 0); +lean_inc(x_160); +lean_dec(x_159); +x_161 = lean_ctor_get(x_160, 0); +lean_inc(x_161); +x_162 = lean_ctor_get(x_161, 2); +lean_inc(x_162); +x_163 = lean_ctor_get(x_160, 1); +lean_inc(x_163); +x_164 = lean_ctor_get(x_160, 2); +lean_inc(x_164); +x_165 = lean_ctor_get(x_160, 3); +lean_inc(x_165); +x_166 = lean_ctor_get(x_160, 4); lean_inc(x_166); -if (lean_is_exclusive(x_101)) { - lean_ctor_release(x_101, 0); - lean_ctor_release(x_101, 1); - x_167 = x_101; +x_167 = lean_ctor_get(x_160, 5); +lean_inc(x_167); +if (lean_is_exclusive(x_160)) { + lean_ctor_release(x_160, 0); + lean_ctor_release(x_160, 1); + lean_ctor_release(x_160, 2); + lean_ctor_release(x_160, 3); + lean_ctor_release(x_160, 4); + lean_ctor_release(x_160, 5); + x_168 = x_160; } else { - lean_dec_ref(x_101); - x_167 = lean_box(0); + lean_dec_ref(x_160); + x_168 = lean_box(0); } -x_168 = lean_ctor_get(x_102, 1); -lean_inc(x_168); -x_169 = lean_ctor_get(x_102, 2); +x_169 = lean_ctor_get(x_161, 0); lean_inc(x_169); -x_170 = lean_ctor_get(x_102, 3); +x_170 = lean_ctor_get(x_161, 1); lean_inc(x_170); -x_171 = lean_ctor_get(x_102, 4); +x_171 = lean_ctor_get(x_161, 3); lean_inc(x_171); -x_172 = lean_ctor_get(x_102, 5); +x_172 = lean_ctor_get(x_161, 4); lean_inc(x_172); -if (lean_is_exclusive(x_102)) { - lean_ctor_release(x_102, 0); - lean_ctor_release(x_102, 1); - lean_ctor_release(x_102, 2); - lean_ctor_release(x_102, 3); - lean_ctor_release(x_102, 4); - lean_ctor_release(x_102, 5); - x_173 = x_102; +x_173 = lean_ctor_get(x_161, 5); +lean_inc(x_173); +if (lean_is_exclusive(x_161)) { + lean_ctor_release(x_161, 0); + lean_ctor_release(x_161, 1); + lean_ctor_release(x_161, 2); + lean_ctor_release(x_161, 3); + lean_ctor_release(x_161, 4); + lean_ctor_release(x_161, 5); + x_174 = x_161; } else { - lean_dec_ref(x_102); - x_173 = lean_box(0); + lean_dec_ref(x_161); + x_174 = lean_box(0); } -x_174 = lean_ctor_get(x_103, 0); -lean_inc(x_174); -x_175 = lean_ctor_get(x_103, 1); +x_175 = lean_ctor_get(x_162, 0); lean_inc(x_175); -x_176 = lean_ctor_get(x_103, 3); +x_176 = lean_ctor_get(x_162, 1); lean_inc(x_176); -x_177 = lean_ctor_get(x_103, 4); -lean_inc(x_177); -x_178 = lean_ctor_get(x_103, 5); -lean_inc(x_178); -if (lean_is_exclusive(x_103)) { - lean_ctor_release(x_103, 0); - lean_ctor_release(x_103, 1); - lean_ctor_release(x_103, 2); - lean_ctor_release(x_103, 3); - lean_ctor_release(x_103, 4); - lean_ctor_release(x_103, 5); - x_179 = x_103; +if (lean_is_exclusive(x_162)) { + lean_ctor_release(x_162, 0); + lean_ctor_release(x_162, 1); + lean_ctor_release(x_162, 2); + x_177 = x_162; } else { - lean_dec_ref(x_103); - x_179 = lean_box(0); + lean_dec_ref(x_162); + x_177 = lean_box(0); } -x_180 = lean_ctor_get(x_104, 0); -lean_inc(x_180); -x_181 = lean_ctor_get(x_104, 1); -lean_inc(x_181); -if (lean_is_exclusive(x_104)) { - lean_ctor_release(x_104, 0); - lean_ctor_release(x_104, 1); - lean_ctor_release(x_104, 2); - x_182 = x_104; +if (lean_is_scalar(x_177)) { + x_178 = lean_alloc_ctor(0, 3, 0); } else { - lean_dec_ref(x_104); + x_178 = x_177; +} +lean_ctor_set(x_178, 0, x_175); +lean_ctor_set(x_178, 1, x_176); +lean_ctor_set(x_178, 2, x_9); +if (lean_is_scalar(x_174)) { + x_179 = lean_alloc_ctor(0, 6, 0); +} else { + x_179 = x_174; +} +lean_ctor_set(x_179, 0, x_169); +lean_ctor_set(x_179, 1, x_170); +lean_ctor_set(x_179, 2, x_178); +lean_ctor_set(x_179, 3, x_171); +lean_ctor_set(x_179, 4, x_172); +lean_ctor_set(x_179, 5, x_173); +if (lean_is_scalar(x_168)) { + x_180 = lean_alloc_ctor(0, 6, 0); +} else { + x_180 = x_168; +} +lean_ctor_set(x_180, 0, x_179); +lean_ctor_set(x_180, 1, x_163); +lean_ctor_set(x_180, 2, x_164); +lean_ctor_set(x_180, 3, x_165); +lean_ctor_set(x_180, 4, x_166); +lean_ctor_set(x_180, 5, x_167); +x_181 = lean_ctor_get(x_12, 1); +lean_inc(x_181); +if (lean_is_exclusive(x_12)) { + lean_ctor_release(x_12, 0); + lean_ctor_release(x_12, 1); + x_182 = x_12; +} else { + lean_dec_ref(x_12); x_182 = lean_box(0); } if (lean_is_scalar(x_182)) { - x_183 = lean_alloc_ctor(0, 3, 0); + x_183 = lean_alloc_ctor(0, 2, 0); } else { x_183 = x_182; } lean_ctor_set(x_183, 0, x_180); lean_ctor_set(x_183, 1, x_181); -lean_ctor_set(x_183, 2, x_9); -if (lean_is_scalar(x_179)) { - x_184 = lean_alloc_ctor(0, 6, 0); -} else { - x_184 = x_179; -} -lean_ctor_set(x_184, 0, x_174); -lean_ctor_set(x_184, 1, x_175); -lean_ctor_set(x_184, 2, x_183); -lean_ctor_set(x_184, 3, x_176); -lean_ctor_set(x_184, 4, x_177); -lean_ctor_set(x_184, 5, x_178); -if (lean_is_scalar(x_173)) { - x_185 = lean_alloc_ctor(0, 6, 0); -} else { - x_185 = x_173; -} -lean_ctor_set(x_185, 0, x_184); -lean_ctor_set(x_185, 1, x_168); -lean_ctor_set(x_185, 2, x_169); -lean_ctor_set(x_185, 3, x_170); -lean_ctor_set(x_185, 4, x_171); -lean_ctor_set(x_185, 5, x_172); -if (lean_is_scalar(x_167)) { - x_186 = lean_alloc_ctor(0, 2, 0); -} else { - x_186 = x_167; -} -lean_ctor_set(x_186, 0, x_185); -lean_ctor_set(x_186, 1, x_166); -x_187 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_187, 0, x_165); -lean_ctor_set(x_187, 1, x_186); -return x_187; +x_184 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_184, 0, x_157); +lean_ctor_set(x_184, 1, x_183); +return x_184; } } } else { -uint8_t x_188; +uint8_t x_185; lean_dec(x_9); lean_dec(x_3); lean_dec(x_2); -x_188 = !lean_is_exclusive(x_11); -if (x_188 == 0) +x_185 = !lean_is_exclusive(x_11); +if (x_185 == 0) { return x_11; } else { -lean_object* x_189; lean_object* x_190; lean_object* x_191; -x_189 = lean_ctor_get(x_11, 0); -x_190 = lean_ctor_get(x_11, 1); -lean_inc(x_190); -lean_inc(x_189); +lean_object* x_186; lean_object* x_187; lean_object* x_188; +x_186 = lean_ctor_get(x_11, 0); +x_187 = lean_ctor_get(x_11, 1); +lean_inc(x_187); +lean_inc(x_186); lean_dec(x_11); -x_191 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_191, 0, x_189); -lean_ctor_set(x_191, 1, x_190); -return x_191; +x_188 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_188, 0, x_186); +lean_ctor_set(x_188, 1, x_187); +return x_188; } } } @@ -8058,234 +8523,216 @@ lean_inc(x_22); x_32 = l_Lean_Elab_Tactic_liftTermElabM___rarg(x_31, x_22, x_9); if (lean_obj_tag(x_32) == 0) { -lean_object* x_33; lean_object* x_34; +lean_object* x_33; lean_object* x_34; lean_object* x_35; x_33 = lean_ctor_get(x_32, 1); lean_inc(x_33); lean_dec(x_32); -x_34 = lean_apply_2(x_2, x_22, x_33); -if (lean_obj_tag(x_34) == 0) +x_34 = l_Lean_Elab_Tactic_save(x_33); +lean_inc(x_33); +x_35 = lean_apply_2(x_2, x_22, x_33); +if (lean_obj_tag(x_35) == 0) { -lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; uint8_t x_39; -x_35 = lean_ctor_get(x_34, 1); -lean_inc(x_35); -x_36 = lean_ctor_get(x_35, 0); +lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; uint8_t x_40; +lean_dec(x_34); +lean_dec(x_33); +x_36 = lean_ctor_get(x_35, 1); lean_inc(x_36); x_37 = lean_ctor_get(x_36, 0); lean_inc(x_37); -x_38 = lean_ctor_get(x_37, 2); +x_38 = lean_ctor_get(x_37, 0); lean_inc(x_38); -x_39 = !lean_is_exclusive(x_34); -if (x_39 == 0) +x_39 = lean_ctor_get(x_38, 2); +lean_inc(x_39); +x_40 = !lean_is_exclusive(x_35); +if (x_40 == 0) { -lean_object* x_40; uint8_t x_41; -x_40 = lean_ctor_get(x_34, 1); -lean_dec(x_40); -x_41 = !lean_is_exclusive(x_35); -if (x_41 == 0) +lean_object* x_41; uint8_t x_42; +x_41 = lean_ctor_get(x_35, 1); +lean_dec(x_41); +x_42 = !lean_is_exclusive(x_36); +if (x_42 == 0) { -lean_object* x_42; uint8_t x_43; -x_42 = lean_ctor_get(x_35, 0); -lean_dec(x_42); -x_43 = !lean_is_exclusive(x_36); -if (x_43 == 0) +lean_object* x_43; uint8_t x_44; +x_43 = lean_ctor_get(x_36, 0); +lean_dec(x_43); +x_44 = !lean_is_exclusive(x_37); +if (x_44 == 0) { -lean_object* x_44; uint8_t x_45; -x_44 = lean_ctor_get(x_36, 0); -lean_dec(x_44); -x_45 = !lean_is_exclusive(x_37); -if (x_45 == 0) +lean_object* x_45; uint8_t x_46; +x_45 = lean_ctor_get(x_37, 0); +lean_dec(x_45); +x_46 = !lean_is_exclusive(x_38); +if (x_46 == 0) { -lean_object* x_46; uint8_t x_47; -x_46 = lean_ctor_get(x_37, 2); -lean_dec(x_46); -x_47 = !lean_is_exclusive(x_38); -if (x_47 == 0) +lean_object* x_47; uint8_t x_48; +x_47 = lean_ctor_get(x_38, 2); +lean_dec(x_47); +x_48 = !lean_is_exclusive(x_39); +if (x_48 == 0) { -lean_object* x_48; -x_48 = lean_ctor_get(x_38, 2); -lean_dec(x_48); -lean_ctor_set(x_38, 2, x_30); -return x_34; +lean_object* x_49; +x_49 = lean_ctor_get(x_39, 2); +lean_dec(x_49); +lean_ctor_set(x_39, 2, x_30); +return x_35; } else { -lean_object* x_49; lean_object* x_50; lean_object* x_51; -x_49 = lean_ctor_get(x_38, 0); -x_50 = lean_ctor_get(x_38, 1); +lean_object* x_50; lean_object* x_51; lean_object* x_52; +x_50 = lean_ctor_get(x_39, 0); +x_51 = lean_ctor_get(x_39, 1); +lean_inc(x_51); lean_inc(x_50); -lean_inc(x_49); -lean_dec(x_38); -x_51 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_51, 0, x_49); -lean_ctor_set(x_51, 1, x_50); -lean_ctor_set(x_51, 2, x_30); -lean_ctor_set(x_37, 2, x_51); -return x_34; +lean_dec(x_39); +x_52 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_52, 0, x_50); +lean_ctor_set(x_52, 1, x_51); +lean_ctor_set(x_52, 2, x_30); +lean_ctor_set(x_38, 2, x_52); +return x_35; } } else { -lean_object* x_52; lean_object* x_53; lean_object* x_54; lean_object* x_55; lean_object* x_56; lean_object* x_57; lean_object* x_58; lean_object* x_59; lean_object* x_60; lean_object* x_61; -x_52 = lean_ctor_get(x_37, 0); -x_53 = lean_ctor_get(x_37, 1); -x_54 = lean_ctor_get(x_37, 3); -x_55 = lean_ctor_get(x_37, 4); -x_56 = lean_ctor_get(x_37, 5); +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_53 = lean_ctor_get(x_38, 0); +x_54 = lean_ctor_get(x_38, 1); +x_55 = lean_ctor_get(x_38, 3); +x_56 = lean_ctor_get(x_38, 4); +x_57 = lean_ctor_get(x_38, 5); +lean_inc(x_57); lean_inc(x_56); lean_inc(x_55); lean_inc(x_54); lean_inc(x_53); -lean_inc(x_52); -lean_dec(x_37); -x_57 = lean_ctor_get(x_38, 0); -lean_inc(x_57); -x_58 = lean_ctor_get(x_38, 1); +lean_dec(x_38); +x_58 = lean_ctor_get(x_39, 0); lean_inc(x_58); -if (lean_is_exclusive(x_38)) { - lean_ctor_release(x_38, 0); - lean_ctor_release(x_38, 1); - lean_ctor_release(x_38, 2); - x_59 = x_38; +x_59 = lean_ctor_get(x_39, 1); +lean_inc(x_59); +if (lean_is_exclusive(x_39)) { + lean_ctor_release(x_39, 0); + lean_ctor_release(x_39, 1); + lean_ctor_release(x_39, 2); + x_60 = x_39; } else { - lean_dec_ref(x_38); - x_59 = lean_box(0); + lean_dec_ref(x_39); + x_60 = lean_box(0); } -if (lean_is_scalar(x_59)) { - x_60 = lean_alloc_ctor(0, 3, 0); +if (lean_is_scalar(x_60)) { + x_61 = lean_alloc_ctor(0, 3, 0); } else { - x_60 = x_59; + x_61 = x_60; } -lean_ctor_set(x_60, 0, x_57); -lean_ctor_set(x_60, 1, x_58); -lean_ctor_set(x_60, 2, x_30); -x_61 = lean_alloc_ctor(0, 6, 0); -lean_ctor_set(x_61, 0, x_52); -lean_ctor_set(x_61, 1, x_53); -lean_ctor_set(x_61, 2, x_60); -lean_ctor_set(x_61, 3, x_54); -lean_ctor_set(x_61, 4, x_55); -lean_ctor_set(x_61, 5, x_56); -lean_ctor_set(x_36, 0, x_61); -return x_34; +lean_ctor_set(x_61, 0, x_58); +lean_ctor_set(x_61, 1, x_59); +lean_ctor_set(x_61, 2, x_30); +x_62 = lean_alloc_ctor(0, 6, 0); +lean_ctor_set(x_62, 0, x_53); +lean_ctor_set(x_62, 1, x_54); +lean_ctor_set(x_62, 2, x_61); +lean_ctor_set(x_62, 3, x_55); +lean_ctor_set(x_62, 4, x_56); +lean_ctor_set(x_62, 5, x_57); +lean_ctor_set(x_37, 0, x_62); +return x_35; } } else { -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; -x_62 = lean_ctor_get(x_36, 1); -x_63 = lean_ctor_get(x_36, 2); -x_64 = lean_ctor_get(x_36, 3); -x_65 = lean_ctor_get(x_36, 4); -x_66 = lean_ctor_get(x_36, 5); +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; +x_63 = lean_ctor_get(x_37, 1); +x_64 = lean_ctor_get(x_37, 2); +x_65 = lean_ctor_get(x_37, 3); +x_66 = lean_ctor_get(x_37, 4); +x_67 = lean_ctor_get(x_37, 5); +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_dec(x_36); -x_67 = lean_ctor_get(x_37, 0); -lean_inc(x_67); -x_68 = lean_ctor_get(x_37, 1); +lean_dec(x_37); +x_68 = lean_ctor_get(x_38, 0); lean_inc(x_68); -x_69 = lean_ctor_get(x_37, 3); +x_69 = lean_ctor_get(x_38, 1); lean_inc(x_69); -x_70 = lean_ctor_get(x_37, 4); +x_70 = lean_ctor_get(x_38, 3); lean_inc(x_70); -x_71 = lean_ctor_get(x_37, 5); +x_71 = lean_ctor_get(x_38, 4); lean_inc(x_71); -if (lean_is_exclusive(x_37)) { - lean_ctor_release(x_37, 0); - lean_ctor_release(x_37, 1); - lean_ctor_release(x_37, 2); - lean_ctor_release(x_37, 3); - lean_ctor_release(x_37, 4); - lean_ctor_release(x_37, 5); - x_72 = x_37; -} else { - lean_dec_ref(x_37); - x_72 = lean_box(0); -} -x_73 = lean_ctor_get(x_38, 0); -lean_inc(x_73); -x_74 = lean_ctor_get(x_38, 1); -lean_inc(x_74); +x_72 = lean_ctor_get(x_38, 5); +lean_inc(x_72); if (lean_is_exclusive(x_38)) { lean_ctor_release(x_38, 0); lean_ctor_release(x_38, 1); lean_ctor_release(x_38, 2); - x_75 = x_38; + lean_ctor_release(x_38, 3); + lean_ctor_release(x_38, 4); + lean_ctor_release(x_38, 5); + x_73 = x_38; } else { lean_dec_ref(x_38); - x_75 = lean_box(0); + x_73 = lean_box(0); } -if (lean_is_scalar(x_75)) { - x_76 = lean_alloc_ctor(0, 3, 0); +x_74 = lean_ctor_get(x_39, 0); +lean_inc(x_74); +x_75 = lean_ctor_get(x_39, 1); +lean_inc(x_75); +if (lean_is_exclusive(x_39)) { + lean_ctor_release(x_39, 0); + lean_ctor_release(x_39, 1); + lean_ctor_release(x_39, 2); + x_76 = x_39; } else { - x_76 = x_75; + lean_dec_ref(x_39); + x_76 = lean_box(0); } -lean_ctor_set(x_76, 0, x_73); -lean_ctor_set(x_76, 1, x_74); -lean_ctor_set(x_76, 2, x_30); -if (lean_is_scalar(x_72)) { - x_77 = lean_alloc_ctor(0, 6, 0); +if (lean_is_scalar(x_76)) { + x_77 = lean_alloc_ctor(0, 3, 0); } else { - x_77 = x_72; + x_77 = x_76; } -lean_ctor_set(x_77, 0, x_67); -lean_ctor_set(x_77, 1, x_68); -lean_ctor_set(x_77, 2, x_76); -lean_ctor_set(x_77, 3, x_69); -lean_ctor_set(x_77, 4, x_70); -lean_ctor_set(x_77, 5, x_71); -x_78 = lean_alloc_ctor(0, 6, 0); -lean_ctor_set(x_78, 0, x_77); -lean_ctor_set(x_78, 1, x_62); -lean_ctor_set(x_78, 2, x_63); -lean_ctor_set(x_78, 3, x_64); -lean_ctor_set(x_78, 4, x_65); -lean_ctor_set(x_78, 5, x_66); -lean_ctor_set(x_35, 0, x_78); -return x_34; +lean_ctor_set(x_77, 0, x_74); +lean_ctor_set(x_77, 1, x_75); +lean_ctor_set(x_77, 2, x_30); +if (lean_is_scalar(x_73)) { + x_78 = lean_alloc_ctor(0, 6, 0); +} else { + x_78 = x_73; +} +lean_ctor_set(x_78, 0, x_68); +lean_ctor_set(x_78, 1, x_69); +lean_ctor_set(x_78, 2, x_77); +lean_ctor_set(x_78, 3, x_70); +lean_ctor_set(x_78, 4, x_71); +lean_ctor_set(x_78, 5, x_72); +x_79 = lean_alloc_ctor(0, 6, 0); +lean_ctor_set(x_79, 0, x_78); +lean_ctor_set(x_79, 1, x_63); +lean_ctor_set(x_79, 2, x_64); +lean_ctor_set(x_79, 3, x_65); +lean_ctor_set(x_79, 4, x_66); +lean_ctor_set(x_79, 5, x_67); +lean_ctor_set(x_36, 0, x_79); +return x_35; } } else { -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; 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; -x_79 = lean_ctor_get(x_35, 1); -lean_inc(x_79); -lean_dec(x_35); +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; 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_80 = lean_ctor_get(x_36, 1); lean_inc(x_80); -x_81 = lean_ctor_get(x_36, 2); +lean_dec(x_36); +x_81 = lean_ctor_get(x_37, 1); lean_inc(x_81); -x_82 = lean_ctor_get(x_36, 3); +x_82 = lean_ctor_get(x_37, 2); lean_inc(x_82); -x_83 = lean_ctor_get(x_36, 4); +x_83 = lean_ctor_get(x_37, 3); lean_inc(x_83); -x_84 = lean_ctor_get(x_36, 5); +x_84 = lean_ctor_get(x_37, 4); lean_inc(x_84); -if (lean_is_exclusive(x_36)) { - lean_ctor_release(x_36, 0); - lean_ctor_release(x_36, 1); - lean_ctor_release(x_36, 2); - lean_ctor_release(x_36, 3); - lean_ctor_release(x_36, 4); - lean_ctor_release(x_36, 5); - x_85 = x_36; -} else { - lean_dec_ref(x_36); - x_85 = lean_box(0); -} -x_86 = lean_ctor_get(x_37, 0); -lean_inc(x_86); -x_87 = lean_ctor_get(x_37, 1); -lean_inc(x_87); -x_88 = lean_ctor_get(x_37, 3); -lean_inc(x_88); -x_89 = lean_ctor_get(x_37, 4); -lean_inc(x_89); -x_90 = lean_ctor_get(x_37, 5); -lean_inc(x_90); +x_85 = lean_ctor_get(x_37, 5); +lean_inc(x_85); if (lean_is_exclusive(x_37)) { lean_ctor_release(x_37, 0); lean_ctor_release(x_37, 1); @@ -8293,109 +8740,109 @@ if (lean_is_exclusive(x_37)) { lean_ctor_release(x_37, 3); lean_ctor_release(x_37, 4); lean_ctor_release(x_37, 5); - x_91 = x_37; + x_86 = x_37; } else { lean_dec_ref(x_37); - x_91 = lean_box(0); + x_86 = lean_box(0); } -x_92 = lean_ctor_get(x_38, 0); -lean_inc(x_92); -x_93 = lean_ctor_get(x_38, 1); -lean_inc(x_93); +x_87 = lean_ctor_get(x_38, 0); +lean_inc(x_87); +x_88 = lean_ctor_get(x_38, 1); +lean_inc(x_88); +x_89 = lean_ctor_get(x_38, 3); +lean_inc(x_89); +x_90 = lean_ctor_get(x_38, 4); +lean_inc(x_90); +x_91 = lean_ctor_get(x_38, 5); +lean_inc(x_91); if (lean_is_exclusive(x_38)) { lean_ctor_release(x_38, 0); lean_ctor_release(x_38, 1); lean_ctor_release(x_38, 2); - x_94 = x_38; + lean_ctor_release(x_38, 3); + lean_ctor_release(x_38, 4); + lean_ctor_release(x_38, 5); + x_92 = x_38; } else { lean_dec_ref(x_38); - x_94 = lean_box(0); + x_92 = lean_box(0); } -if (lean_is_scalar(x_94)) { - x_95 = lean_alloc_ctor(0, 3, 0); +x_93 = lean_ctor_get(x_39, 0); +lean_inc(x_93); +x_94 = lean_ctor_get(x_39, 1); +lean_inc(x_94); +if (lean_is_exclusive(x_39)) { + lean_ctor_release(x_39, 0); + lean_ctor_release(x_39, 1); + lean_ctor_release(x_39, 2); + x_95 = x_39; } else { - x_95 = x_94; + lean_dec_ref(x_39); + x_95 = lean_box(0); } -lean_ctor_set(x_95, 0, x_92); -lean_ctor_set(x_95, 1, x_93); -lean_ctor_set(x_95, 2, x_30); -if (lean_is_scalar(x_91)) { - x_96 = lean_alloc_ctor(0, 6, 0); +if (lean_is_scalar(x_95)) { + x_96 = lean_alloc_ctor(0, 3, 0); } else { - x_96 = x_91; + x_96 = x_95; } -lean_ctor_set(x_96, 0, x_86); -lean_ctor_set(x_96, 1, x_87); -lean_ctor_set(x_96, 2, x_95); -lean_ctor_set(x_96, 3, x_88); -lean_ctor_set(x_96, 4, x_89); -lean_ctor_set(x_96, 5, x_90); -if (lean_is_scalar(x_85)) { +lean_ctor_set(x_96, 0, x_93); +lean_ctor_set(x_96, 1, x_94); +lean_ctor_set(x_96, 2, x_30); +if (lean_is_scalar(x_92)) { x_97 = lean_alloc_ctor(0, 6, 0); } else { - x_97 = x_85; + x_97 = x_92; +} +lean_ctor_set(x_97, 0, x_87); +lean_ctor_set(x_97, 1, x_88); +lean_ctor_set(x_97, 2, x_96); +lean_ctor_set(x_97, 3, x_89); +lean_ctor_set(x_97, 4, x_90); +lean_ctor_set(x_97, 5, x_91); +if (lean_is_scalar(x_86)) { + x_98 = lean_alloc_ctor(0, 6, 0); +} else { + x_98 = x_86; } -lean_ctor_set(x_97, 0, x_96); -lean_ctor_set(x_97, 1, x_80); -lean_ctor_set(x_97, 2, x_81); -lean_ctor_set(x_97, 3, x_82); -lean_ctor_set(x_97, 4, x_83); -lean_ctor_set(x_97, 5, x_84); -x_98 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_98, 0, x_97); -lean_ctor_set(x_98, 1, x_79); -lean_ctor_set(x_34, 1, x_98); -return x_34; +lean_ctor_set(x_98, 1, x_81); +lean_ctor_set(x_98, 2, x_82); +lean_ctor_set(x_98, 3, x_83); +lean_ctor_set(x_98, 4, x_84); +lean_ctor_set(x_98, 5, x_85); +x_99 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_99, 0, x_98); +lean_ctor_set(x_99, 1, x_80); +lean_ctor_set(x_35, 1, x_99); +return x_35; } } else { -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; -x_99 = lean_ctor_get(x_34, 0); -lean_inc(x_99); -lean_dec(x_34); -x_100 = lean_ctor_get(x_35, 1); +lean_object* x_100; lean_object* x_101; lean_object* x_102; lean_object* x_103; lean_object* x_104; lean_object* x_105; lean_object* x_106; 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; +x_100 = lean_ctor_get(x_35, 0); lean_inc(x_100); -if (lean_is_exclusive(x_35)) { - lean_ctor_release(x_35, 0); - lean_ctor_release(x_35, 1); - x_101 = x_35; -} else { - lean_dec_ref(x_35); - x_101 = lean_box(0); -} -x_102 = lean_ctor_get(x_36, 1); -lean_inc(x_102); -x_103 = lean_ctor_get(x_36, 2); -lean_inc(x_103); -x_104 = lean_ctor_get(x_36, 3); -lean_inc(x_104); -x_105 = lean_ctor_get(x_36, 4); -lean_inc(x_105); -x_106 = lean_ctor_get(x_36, 5); -lean_inc(x_106); +lean_dec(x_35); +x_101 = lean_ctor_get(x_36, 1); +lean_inc(x_101); if (lean_is_exclusive(x_36)) { lean_ctor_release(x_36, 0); lean_ctor_release(x_36, 1); - lean_ctor_release(x_36, 2); - lean_ctor_release(x_36, 3); - lean_ctor_release(x_36, 4); - lean_ctor_release(x_36, 5); - x_107 = x_36; + x_102 = x_36; } else { lean_dec_ref(x_36); - x_107 = lean_box(0); + x_102 = lean_box(0); } -x_108 = lean_ctor_get(x_37, 0); -lean_inc(x_108); -x_109 = lean_ctor_get(x_37, 1); -lean_inc(x_109); -x_110 = lean_ctor_get(x_37, 3); -lean_inc(x_110); -x_111 = lean_ctor_get(x_37, 4); -lean_inc(x_111); -x_112 = lean_ctor_get(x_37, 5); -lean_inc(x_112); +x_103 = lean_ctor_get(x_37, 1); +lean_inc(x_103); +x_104 = lean_ctor_get(x_37, 2); +lean_inc(x_104); +x_105 = lean_ctor_get(x_37, 3); +lean_inc(x_105); +x_106 = lean_ctor_get(x_37, 4); +lean_inc(x_106); +x_107 = lean_ctor_get(x_37, 5); +lean_inc(x_107); if (lean_is_exclusive(x_37)) { lean_ctor_release(x_37, 0); lean_ctor_release(x_37, 1); @@ -8403,492 +8850,493 @@ if (lean_is_exclusive(x_37)) { lean_ctor_release(x_37, 3); lean_ctor_release(x_37, 4); lean_ctor_release(x_37, 5); - x_113 = x_37; + x_108 = x_37; } else { lean_dec_ref(x_37); - x_113 = lean_box(0); + x_108 = lean_box(0); } -x_114 = lean_ctor_get(x_38, 0); -lean_inc(x_114); -x_115 = lean_ctor_get(x_38, 1); -lean_inc(x_115); +x_109 = lean_ctor_get(x_38, 0); +lean_inc(x_109); +x_110 = lean_ctor_get(x_38, 1); +lean_inc(x_110); +x_111 = lean_ctor_get(x_38, 3); +lean_inc(x_111); +x_112 = lean_ctor_get(x_38, 4); +lean_inc(x_112); +x_113 = lean_ctor_get(x_38, 5); +lean_inc(x_113); if (lean_is_exclusive(x_38)) { lean_ctor_release(x_38, 0); lean_ctor_release(x_38, 1); lean_ctor_release(x_38, 2); - x_116 = x_38; + lean_ctor_release(x_38, 3); + lean_ctor_release(x_38, 4); + lean_ctor_release(x_38, 5); + x_114 = x_38; } else { lean_dec_ref(x_38); - x_116 = lean_box(0); + x_114 = lean_box(0); } -if (lean_is_scalar(x_116)) { - x_117 = lean_alloc_ctor(0, 3, 0); +x_115 = lean_ctor_get(x_39, 0); +lean_inc(x_115); +x_116 = lean_ctor_get(x_39, 1); +lean_inc(x_116); +if (lean_is_exclusive(x_39)) { + lean_ctor_release(x_39, 0); + lean_ctor_release(x_39, 1); + lean_ctor_release(x_39, 2); + x_117 = x_39; } else { - x_117 = x_116; + lean_dec_ref(x_39); + x_117 = lean_box(0); } -lean_ctor_set(x_117, 0, x_114); -lean_ctor_set(x_117, 1, x_115); -lean_ctor_set(x_117, 2, x_30); -if (lean_is_scalar(x_113)) { - x_118 = lean_alloc_ctor(0, 6, 0); +if (lean_is_scalar(x_117)) { + x_118 = lean_alloc_ctor(0, 3, 0); } else { - x_118 = x_113; + x_118 = x_117; } -lean_ctor_set(x_118, 0, x_108); -lean_ctor_set(x_118, 1, x_109); -lean_ctor_set(x_118, 2, x_117); -lean_ctor_set(x_118, 3, x_110); -lean_ctor_set(x_118, 4, x_111); -lean_ctor_set(x_118, 5, x_112); -if (lean_is_scalar(x_107)) { +lean_ctor_set(x_118, 0, x_115); +lean_ctor_set(x_118, 1, x_116); +lean_ctor_set(x_118, 2, x_30); +if (lean_is_scalar(x_114)) { x_119 = lean_alloc_ctor(0, 6, 0); } else { - x_119 = x_107; + x_119 = x_114; } -lean_ctor_set(x_119, 0, x_118); -lean_ctor_set(x_119, 1, x_102); -lean_ctor_set(x_119, 2, x_103); -lean_ctor_set(x_119, 3, x_104); -lean_ctor_set(x_119, 4, x_105); -lean_ctor_set(x_119, 5, x_106); -if (lean_is_scalar(x_101)) { - x_120 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_119, 0, x_109); +lean_ctor_set(x_119, 1, x_110); +lean_ctor_set(x_119, 2, x_118); +lean_ctor_set(x_119, 3, x_111); +lean_ctor_set(x_119, 4, x_112); +lean_ctor_set(x_119, 5, x_113); +if (lean_is_scalar(x_108)) { + x_120 = lean_alloc_ctor(0, 6, 0); } else { - x_120 = x_101; + x_120 = x_108; } lean_ctor_set(x_120, 0, x_119); -lean_ctor_set(x_120, 1, x_100); -x_121 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_121, 0, x_99); -lean_ctor_set(x_121, 1, x_120); -return x_121; +lean_ctor_set(x_120, 1, x_103); +lean_ctor_set(x_120, 2, x_104); +lean_ctor_set(x_120, 3, x_105); +lean_ctor_set(x_120, 4, x_106); +lean_ctor_set(x_120, 5, x_107); +if (lean_is_scalar(x_102)) { + x_121 = lean_alloc_ctor(0, 2, 0); +} else { + x_121 = x_102; +} +lean_ctor_set(x_121, 0, x_120); +lean_ctor_set(x_121, 1, x_101); +x_122 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_122, 0, x_100); +lean_ctor_set(x_122, 1, x_121); +return x_122; } } else { -lean_object* x_122; lean_object* x_123; lean_object* x_124; lean_object* x_125; uint8_t x_126; -x_122 = lean_ctor_get(x_34, 1); -lean_inc(x_122); -x_123 = lean_ctor_get(x_122, 0); -lean_inc(x_123); -x_124 = lean_ctor_get(x_123, 0); -lean_inc(x_124); -x_125 = lean_ctor_get(x_124, 2); -lean_inc(x_125); -x_126 = !lean_is_exclusive(x_34); -if (x_126 == 0) +uint8_t x_123; +x_123 = !lean_is_exclusive(x_35); +if (x_123 == 0) { -lean_object* x_127; uint8_t x_128; -x_127 = lean_ctor_get(x_34, 1); -lean_dec(x_127); -x_128 = !lean_is_exclusive(x_122); -if (x_128 == 0) -{ -lean_object* x_129; uint8_t x_130; -x_129 = lean_ctor_get(x_122, 0); -lean_dec(x_129); -x_130 = !lean_is_exclusive(x_123); -if (x_130 == 0) -{ -lean_object* x_131; uint8_t x_132; -x_131 = lean_ctor_get(x_123, 0); -lean_dec(x_131); -x_132 = !lean_is_exclusive(x_124); -if (x_132 == 0) -{ -lean_object* x_133; uint8_t x_134; -x_133 = lean_ctor_get(x_124, 2); -lean_dec(x_133); -x_134 = !lean_is_exclusive(x_125); -if (x_134 == 0) -{ -lean_object* x_135; -x_135 = lean_ctor_get(x_125, 2); -lean_dec(x_135); -lean_ctor_set(x_125, 2, x_30); -return x_34; -} -else -{ -lean_object* x_136; lean_object* x_137; lean_object* x_138; -x_136 = lean_ctor_get(x_125, 0); -x_137 = lean_ctor_get(x_125, 1); -lean_inc(x_137); -lean_inc(x_136); +lean_object* x_124; lean_object* x_125; lean_object* x_126; lean_object* x_127; lean_object* x_128; uint8_t x_129; +x_124 = lean_ctor_get(x_35, 1); +x_125 = l_Lean_Elab_Tactic_restore(x_124, x_34); +lean_dec(x_34); +x_126 = lean_ctor_get(x_125, 0); +lean_inc(x_126); lean_dec(x_125); -x_138 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_138, 0, x_136); +x_127 = lean_ctor_get(x_126, 0); +lean_inc(x_127); +x_128 = lean_ctor_get(x_127, 2); +lean_inc(x_128); +x_129 = !lean_is_exclusive(x_126); +if (x_129 == 0) +{ +lean_object* x_130; uint8_t x_131; +x_130 = lean_ctor_get(x_126, 0); +lean_dec(x_130); +x_131 = !lean_is_exclusive(x_127); +if (x_131 == 0) +{ +lean_object* x_132; uint8_t x_133; +x_132 = lean_ctor_get(x_127, 2); +lean_dec(x_132); +x_133 = !lean_is_exclusive(x_128); +if (x_133 == 0) +{ +lean_object* x_134; uint8_t x_135; +x_134 = lean_ctor_get(x_128, 2); +lean_dec(x_134); +lean_ctor_set(x_128, 2, x_30); +x_135 = !lean_is_exclusive(x_33); +if (x_135 == 0) +{ +lean_object* x_136; +x_136 = lean_ctor_get(x_33, 0); +lean_dec(x_136); +lean_ctor_set(x_33, 0, x_126); +lean_ctor_set(x_35, 1, x_33); +return x_35; +} +else +{ +lean_object* x_137; lean_object* x_138; +x_137 = lean_ctor_get(x_33, 1); +lean_inc(x_137); +lean_dec(x_33); +x_138 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_138, 0, x_126); lean_ctor_set(x_138, 1, x_137); -lean_ctor_set(x_138, 2, x_30); -lean_ctor_set(x_124, 2, x_138); -return x_34; +lean_ctor_set(x_35, 1, x_138); +return x_35; } } else { -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; -x_139 = lean_ctor_get(x_124, 0); -x_140 = lean_ctor_get(x_124, 1); -x_141 = lean_ctor_get(x_124, 3); -x_142 = lean_ctor_get(x_124, 4); -x_143 = lean_ctor_get(x_124, 5); -lean_inc(x_143); -lean_inc(x_142); -lean_inc(x_141); +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_139 = lean_ctor_get(x_128, 0); +x_140 = lean_ctor_get(x_128, 1); lean_inc(x_140); lean_inc(x_139); -lean_dec(x_124); -x_144 = lean_ctor_get(x_125, 0); -lean_inc(x_144); -x_145 = lean_ctor_get(x_125, 1); -lean_inc(x_145); -if (lean_is_exclusive(x_125)) { - lean_ctor_release(x_125, 0); - lean_ctor_release(x_125, 1); - lean_ctor_release(x_125, 2); - x_146 = x_125; +lean_dec(x_128); +x_141 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_141, 0, x_139); +lean_ctor_set(x_141, 1, x_140); +lean_ctor_set(x_141, 2, x_30); +lean_ctor_set(x_127, 2, x_141); +x_142 = lean_ctor_get(x_33, 1); +lean_inc(x_142); +if (lean_is_exclusive(x_33)) { + lean_ctor_release(x_33, 0); + lean_ctor_release(x_33, 1); + x_143 = x_33; } else { - lean_dec_ref(x_125); - x_146 = lean_box(0); + lean_dec_ref(x_33); + x_143 = lean_box(0); } -if (lean_is_scalar(x_146)) { - x_147 = lean_alloc_ctor(0, 3, 0); +if (lean_is_scalar(x_143)) { + x_144 = lean_alloc_ctor(0, 2, 0); } else { - x_147 = x_146; + x_144 = x_143; } -lean_ctor_set(x_147, 0, x_144); -lean_ctor_set(x_147, 1, x_145); -lean_ctor_set(x_147, 2, x_30); -x_148 = lean_alloc_ctor(0, 6, 0); -lean_ctor_set(x_148, 0, x_139); -lean_ctor_set(x_148, 1, x_140); -lean_ctor_set(x_148, 2, x_147); -lean_ctor_set(x_148, 3, x_141); -lean_ctor_set(x_148, 4, x_142); -lean_ctor_set(x_148, 5, x_143); -lean_ctor_set(x_123, 0, x_148); -return x_34; +lean_ctor_set(x_144, 0, x_126); +lean_ctor_set(x_144, 1, x_142); +lean_ctor_set(x_35, 1, x_144); +return x_35; } } else { -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; -x_149 = lean_ctor_get(x_123, 1); -x_150 = lean_ctor_get(x_123, 2); -x_151 = lean_ctor_get(x_123, 3); -x_152 = lean_ctor_get(x_123, 4); -x_153 = lean_ctor_get(x_123, 5); -lean_inc(x_153); -lean_inc(x_152); -lean_inc(x_151); -lean_inc(x_150); +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; +x_145 = lean_ctor_get(x_127, 0); +x_146 = lean_ctor_get(x_127, 1); +x_147 = lean_ctor_get(x_127, 3); +x_148 = lean_ctor_get(x_127, 4); +x_149 = lean_ctor_get(x_127, 5); lean_inc(x_149); -lean_dec(x_123); -x_154 = lean_ctor_get(x_124, 0); -lean_inc(x_154); -x_155 = lean_ctor_get(x_124, 1); +lean_inc(x_148); +lean_inc(x_147); +lean_inc(x_146); +lean_inc(x_145); +lean_dec(x_127); +x_150 = lean_ctor_get(x_128, 0); +lean_inc(x_150); +x_151 = lean_ctor_get(x_128, 1); +lean_inc(x_151); +if (lean_is_exclusive(x_128)) { + lean_ctor_release(x_128, 0); + lean_ctor_release(x_128, 1); + lean_ctor_release(x_128, 2); + x_152 = x_128; +} else { + lean_dec_ref(x_128); + x_152 = lean_box(0); +} +if (lean_is_scalar(x_152)) { + x_153 = lean_alloc_ctor(0, 3, 0); +} else { + x_153 = x_152; +} +lean_ctor_set(x_153, 0, x_150); +lean_ctor_set(x_153, 1, x_151); +lean_ctor_set(x_153, 2, x_30); +x_154 = lean_alloc_ctor(0, 6, 0); +lean_ctor_set(x_154, 0, x_145); +lean_ctor_set(x_154, 1, x_146); +lean_ctor_set(x_154, 2, x_153); +lean_ctor_set(x_154, 3, x_147); +lean_ctor_set(x_154, 4, x_148); +lean_ctor_set(x_154, 5, x_149); +lean_ctor_set(x_126, 0, x_154); +x_155 = lean_ctor_get(x_33, 1); lean_inc(x_155); -x_156 = lean_ctor_get(x_124, 3); -lean_inc(x_156); -x_157 = lean_ctor_get(x_124, 4); -lean_inc(x_157); -x_158 = lean_ctor_get(x_124, 5); -lean_inc(x_158); -if (lean_is_exclusive(x_124)) { - lean_ctor_release(x_124, 0); - lean_ctor_release(x_124, 1); - lean_ctor_release(x_124, 2); - lean_ctor_release(x_124, 3); - lean_ctor_release(x_124, 4); - lean_ctor_release(x_124, 5); - x_159 = x_124; +if (lean_is_exclusive(x_33)) { + lean_ctor_release(x_33, 0); + lean_ctor_release(x_33, 1); + x_156 = x_33; } else { - lean_dec_ref(x_124); - x_159 = lean_box(0); + lean_dec_ref(x_33); + x_156 = lean_box(0); } -x_160 = lean_ctor_get(x_125, 0); -lean_inc(x_160); -x_161 = lean_ctor_get(x_125, 1); +if (lean_is_scalar(x_156)) { + x_157 = lean_alloc_ctor(0, 2, 0); +} else { + x_157 = x_156; +} +lean_ctor_set(x_157, 0, x_126); +lean_ctor_set(x_157, 1, x_155); +lean_ctor_set(x_35, 1, x_157); +return x_35; +} +} +else +{ +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; lean_object* x_174; lean_object* x_175; lean_object* x_176; lean_object* x_177; +x_158 = lean_ctor_get(x_126, 1); +x_159 = lean_ctor_get(x_126, 2); +x_160 = lean_ctor_get(x_126, 3); +x_161 = lean_ctor_get(x_126, 4); +x_162 = lean_ctor_get(x_126, 5); +lean_inc(x_162); lean_inc(x_161); -if (lean_is_exclusive(x_125)) { - lean_ctor_release(x_125, 0); - lean_ctor_release(x_125, 1); - lean_ctor_release(x_125, 2); - x_162 = x_125; -} else { - lean_dec_ref(x_125); - x_162 = lean_box(0); -} -if (lean_is_scalar(x_162)) { - x_163 = lean_alloc_ctor(0, 3, 0); -} else { - x_163 = x_162; -} -lean_ctor_set(x_163, 0, x_160); -lean_ctor_set(x_163, 1, x_161); -lean_ctor_set(x_163, 2, x_30); -if (lean_is_scalar(x_159)) { - x_164 = lean_alloc_ctor(0, 6, 0); -} else { - x_164 = x_159; -} -lean_ctor_set(x_164, 0, x_154); -lean_ctor_set(x_164, 1, x_155); -lean_ctor_set(x_164, 2, x_163); -lean_ctor_set(x_164, 3, x_156); -lean_ctor_set(x_164, 4, x_157); -lean_ctor_set(x_164, 5, x_158); -x_165 = lean_alloc_ctor(0, 6, 0); -lean_ctor_set(x_165, 0, x_164); -lean_ctor_set(x_165, 1, x_149); -lean_ctor_set(x_165, 2, x_150); -lean_ctor_set(x_165, 3, x_151); -lean_ctor_set(x_165, 4, x_152); -lean_ctor_set(x_165, 5, x_153); -lean_ctor_set(x_122, 0, x_165); -return x_34; -} -} -else -{ -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_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; -x_166 = lean_ctor_get(x_122, 1); +lean_inc(x_160); +lean_inc(x_159); +lean_inc(x_158); +lean_dec(x_126); +x_163 = lean_ctor_get(x_127, 0); +lean_inc(x_163); +x_164 = lean_ctor_get(x_127, 1); +lean_inc(x_164); +x_165 = lean_ctor_get(x_127, 3); +lean_inc(x_165); +x_166 = lean_ctor_get(x_127, 4); lean_inc(x_166); -lean_dec(x_122); -x_167 = lean_ctor_get(x_123, 1); +x_167 = lean_ctor_get(x_127, 5); lean_inc(x_167); -x_168 = lean_ctor_get(x_123, 2); -lean_inc(x_168); -x_169 = lean_ctor_get(x_123, 3); +if (lean_is_exclusive(x_127)) { + lean_ctor_release(x_127, 0); + lean_ctor_release(x_127, 1); + lean_ctor_release(x_127, 2); + lean_ctor_release(x_127, 3); + lean_ctor_release(x_127, 4); + lean_ctor_release(x_127, 5); + x_168 = x_127; +} else { + lean_dec_ref(x_127); + x_168 = lean_box(0); +} +x_169 = lean_ctor_get(x_128, 0); lean_inc(x_169); -x_170 = lean_ctor_get(x_123, 4); +x_170 = lean_ctor_get(x_128, 1); lean_inc(x_170); -x_171 = lean_ctor_get(x_123, 5); -lean_inc(x_171); -if (lean_is_exclusive(x_123)) { - lean_ctor_release(x_123, 0); - lean_ctor_release(x_123, 1); - lean_ctor_release(x_123, 2); - lean_ctor_release(x_123, 3); - lean_ctor_release(x_123, 4); - lean_ctor_release(x_123, 5); - x_172 = x_123; +if (lean_is_exclusive(x_128)) { + lean_ctor_release(x_128, 0); + lean_ctor_release(x_128, 1); + lean_ctor_release(x_128, 2); + x_171 = x_128; } else { - lean_dec_ref(x_123); - x_172 = lean_box(0); + lean_dec_ref(x_128); + x_171 = lean_box(0); } -x_173 = lean_ctor_get(x_124, 0); -lean_inc(x_173); -x_174 = lean_ctor_get(x_124, 1); -lean_inc(x_174); -x_175 = lean_ctor_get(x_124, 3); +if (lean_is_scalar(x_171)) { + x_172 = lean_alloc_ctor(0, 3, 0); +} else { + x_172 = x_171; +} +lean_ctor_set(x_172, 0, x_169); +lean_ctor_set(x_172, 1, x_170); +lean_ctor_set(x_172, 2, x_30); +if (lean_is_scalar(x_168)) { + x_173 = lean_alloc_ctor(0, 6, 0); +} else { + x_173 = x_168; +} +lean_ctor_set(x_173, 0, x_163); +lean_ctor_set(x_173, 1, x_164); +lean_ctor_set(x_173, 2, x_172); +lean_ctor_set(x_173, 3, x_165); +lean_ctor_set(x_173, 4, x_166); +lean_ctor_set(x_173, 5, x_167); +x_174 = lean_alloc_ctor(0, 6, 0); +lean_ctor_set(x_174, 0, x_173); +lean_ctor_set(x_174, 1, x_158); +lean_ctor_set(x_174, 2, x_159); +lean_ctor_set(x_174, 3, x_160); +lean_ctor_set(x_174, 4, x_161); +lean_ctor_set(x_174, 5, x_162); +x_175 = lean_ctor_get(x_33, 1); lean_inc(x_175); -x_176 = lean_ctor_get(x_124, 4); -lean_inc(x_176); -x_177 = lean_ctor_get(x_124, 5); -lean_inc(x_177); -if (lean_is_exclusive(x_124)) { - lean_ctor_release(x_124, 0); - lean_ctor_release(x_124, 1); - lean_ctor_release(x_124, 2); - lean_ctor_release(x_124, 3); - lean_ctor_release(x_124, 4); - lean_ctor_release(x_124, 5); - x_178 = x_124; +if (lean_is_exclusive(x_33)) { + lean_ctor_release(x_33, 0); + lean_ctor_release(x_33, 1); + x_176 = x_33; } else { - lean_dec_ref(x_124); - x_178 = lean_box(0); + lean_dec_ref(x_33); + x_176 = lean_box(0); } -x_179 = lean_ctor_get(x_125, 0); -lean_inc(x_179); -x_180 = lean_ctor_get(x_125, 1); -lean_inc(x_180); -if (lean_is_exclusive(x_125)) { - lean_ctor_release(x_125, 0); - lean_ctor_release(x_125, 1); - lean_ctor_release(x_125, 2); - x_181 = x_125; +if (lean_is_scalar(x_176)) { + x_177 = lean_alloc_ctor(0, 2, 0); } else { - lean_dec_ref(x_125); - x_181 = lean_box(0); + x_177 = x_176; } -if (lean_is_scalar(x_181)) { - x_182 = lean_alloc_ctor(0, 3, 0); -} else { - x_182 = x_181; -} -lean_ctor_set(x_182, 0, x_179); -lean_ctor_set(x_182, 1, x_180); -lean_ctor_set(x_182, 2, x_30); -if (lean_is_scalar(x_178)) { - x_183 = lean_alloc_ctor(0, 6, 0); -} else { - x_183 = x_178; -} -lean_ctor_set(x_183, 0, x_173); -lean_ctor_set(x_183, 1, x_174); -lean_ctor_set(x_183, 2, x_182); -lean_ctor_set(x_183, 3, x_175); -lean_ctor_set(x_183, 4, x_176); -lean_ctor_set(x_183, 5, x_177); -if (lean_is_scalar(x_172)) { - x_184 = lean_alloc_ctor(0, 6, 0); -} else { - x_184 = x_172; -} -lean_ctor_set(x_184, 0, x_183); -lean_ctor_set(x_184, 1, x_167); -lean_ctor_set(x_184, 2, x_168); -lean_ctor_set(x_184, 3, x_169); -lean_ctor_set(x_184, 4, x_170); -lean_ctor_set(x_184, 5, x_171); -x_185 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_185, 0, x_184); -lean_ctor_set(x_185, 1, x_166); -lean_ctor_set(x_34, 1, x_185); -return x_34; +lean_ctor_set(x_177, 0, x_174); +lean_ctor_set(x_177, 1, x_175); +lean_ctor_set(x_35, 1, x_177); +return x_35; } } else { -lean_object* x_186; 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_object* x_202; lean_object* x_203; lean_object* x_204; lean_object* x_205; lean_object* x_206; lean_object* x_207; lean_object* x_208; -x_186 = lean_ctor_get(x_34, 0); -lean_inc(x_186); +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; 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_object* x_202; lean_object* x_203; lean_object* x_204; lean_object* x_205; +x_178 = lean_ctor_get(x_35, 0); +x_179 = lean_ctor_get(x_35, 1); +lean_inc(x_179); +lean_inc(x_178); +lean_dec(x_35); +x_180 = l_Lean_Elab_Tactic_restore(x_179, x_34); lean_dec(x_34); -x_187 = lean_ctor_get(x_122, 1); +x_181 = lean_ctor_get(x_180, 0); +lean_inc(x_181); +lean_dec(x_180); +x_182 = lean_ctor_get(x_181, 0); +lean_inc(x_182); +x_183 = lean_ctor_get(x_182, 2); +lean_inc(x_183); +x_184 = lean_ctor_get(x_181, 1); +lean_inc(x_184); +x_185 = lean_ctor_get(x_181, 2); +lean_inc(x_185); +x_186 = lean_ctor_get(x_181, 3); +lean_inc(x_186); +x_187 = lean_ctor_get(x_181, 4); lean_inc(x_187); -if (lean_is_exclusive(x_122)) { - lean_ctor_release(x_122, 0); - lean_ctor_release(x_122, 1); - x_188 = x_122; +x_188 = lean_ctor_get(x_181, 5); +lean_inc(x_188); +if (lean_is_exclusive(x_181)) { + lean_ctor_release(x_181, 0); + lean_ctor_release(x_181, 1); + lean_ctor_release(x_181, 2); + lean_ctor_release(x_181, 3); + lean_ctor_release(x_181, 4); + lean_ctor_release(x_181, 5); + x_189 = x_181; } else { - lean_dec_ref(x_122); - x_188 = lean_box(0); + lean_dec_ref(x_181); + x_189 = lean_box(0); } -x_189 = lean_ctor_get(x_123, 1); -lean_inc(x_189); -x_190 = lean_ctor_get(x_123, 2); +x_190 = lean_ctor_get(x_182, 0); lean_inc(x_190); -x_191 = lean_ctor_get(x_123, 3); +x_191 = lean_ctor_get(x_182, 1); lean_inc(x_191); -x_192 = lean_ctor_get(x_123, 4); +x_192 = lean_ctor_get(x_182, 3); lean_inc(x_192); -x_193 = lean_ctor_get(x_123, 5); +x_193 = lean_ctor_get(x_182, 4); lean_inc(x_193); -if (lean_is_exclusive(x_123)) { - lean_ctor_release(x_123, 0); - lean_ctor_release(x_123, 1); - lean_ctor_release(x_123, 2); - lean_ctor_release(x_123, 3); - lean_ctor_release(x_123, 4); - lean_ctor_release(x_123, 5); - x_194 = x_123; +x_194 = lean_ctor_get(x_182, 5); +lean_inc(x_194); +if (lean_is_exclusive(x_182)) { + lean_ctor_release(x_182, 0); + lean_ctor_release(x_182, 1); + lean_ctor_release(x_182, 2); + lean_ctor_release(x_182, 3); + lean_ctor_release(x_182, 4); + lean_ctor_release(x_182, 5); + x_195 = x_182; } else { - lean_dec_ref(x_123); - x_194 = lean_box(0); + lean_dec_ref(x_182); + x_195 = lean_box(0); } -x_195 = lean_ctor_get(x_124, 0); -lean_inc(x_195); -x_196 = lean_ctor_get(x_124, 1); +x_196 = lean_ctor_get(x_183, 0); lean_inc(x_196); -x_197 = lean_ctor_get(x_124, 3); +x_197 = lean_ctor_get(x_183, 1); lean_inc(x_197); -x_198 = lean_ctor_get(x_124, 4); -lean_inc(x_198); -x_199 = lean_ctor_get(x_124, 5); -lean_inc(x_199); -if (lean_is_exclusive(x_124)) { - lean_ctor_release(x_124, 0); - lean_ctor_release(x_124, 1); - lean_ctor_release(x_124, 2); - lean_ctor_release(x_124, 3); - lean_ctor_release(x_124, 4); - lean_ctor_release(x_124, 5); - x_200 = x_124; +if (lean_is_exclusive(x_183)) { + lean_ctor_release(x_183, 0); + lean_ctor_release(x_183, 1); + lean_ctor_release(x_183, 2); + x_198 = x_183; } else { - lean_dec_ref(x_124); - x_200 = lean_box(0); + lean_dec_ref(x_183); + x_198 = lean_box(0); } -x_201 = lean_ctor_get(x_125, 0); -lean_inc(x_201); -x_202 = lean_ctor_get(x_125, 1); -lean_inc(x_202); -if (lean_is_exclusive(x_125)) { - lean_ctor_release(x_125, 0); - lean_ctor_release(x_125, 1); - lean_ctor_release(x_125, 2); - x_203 = x_125; +if (lean_is_scalar(x_198)) { + x_199 = lean_alloc_ctor(0, 3, 0); } else { - lean_dec_ref(x_125); + x_199 = x_198; +} +lean_ctor_set(x_199, 0, x_196); +lean_ctor_set(x_199, 1, x_197); +lean_ctor_set(x_199, 2, x_30); +if (lean_is_scalar(x_195)) { + x_200 = lean_alloc_ctor(0, 6, 0); +} else { + x_200 = x_195; +} +lean_ctor_set(x_200, 0, x_190); +lean_ctor_set(x_200, 1, x_191); +lean_ctor_set(x_200, 2, x_199); +lean_ctor_set(x_200, 3, x_192); +lean_ctor_set(x_200, 4, x_193); +lean_ctor_set(x_200, 5, x_194); +if (lean_is_scalar(x_189)) { + x_201 = lean_alloc_ctor(0, 6, 0); +} else { + x_201 = x_189; +} +lean_ctor_set(x_201, 0, x_200); +lean_ctor_set(x_201, 1, x_184); +lean_ctor_set(x_201, 2, x_185); +lean_ctor_set(x_201, 3, x_186); +lean_ctor_set(x_201, 4, x_187); +lean_ctor_set(x_201, 5, x_188); +x_202 = lean_ctor_get(x_33, 1); +lean_inc(x_202); +if (lean_is_exclusive(x_33)) { + lean_ctor_release(x_33, 0); + lean_ctor_release(x_33, 1); + x_203 = x_33; +} else { + lean_dec_ref(x_33); x_203 = lean_box(0); } if (lean_is_scalar(x_203)) { - x_204 = lean_alloc_ctor(0, 3, 0); + x_204 = lean_alloc_ctor(0, 2, 0); } else { x_204 = x_203; } lean_ctor_set(x_204, 0, x_201); lean_ctor_set(x_204, 1, x_202); -lean_ctor_set(x_204, 2, x_30); -if (lean_is_scalar(x_200)) { - x_205 = lean_alloc_ctor(0, 6, 0); -} else { - x_205 = x_200; -} -lean_ctor_set(x_205, 0, x_195); -lean_ctor_set(x_205, 1, x_196); -lean_ctor_set(x_205, 2, x_204); -lean_ctor_set(x_205, 3, x_197); -lean_ctor_set(x_205, 4, x_198); -lean_ctor_set(x_205, 5, x_199); -if (lean_is_scalar(x_194)) { - x_206 = lean_alloc_ctor(0, 6, 0); -} else { - x_206 = x_194; -} -lean_ctor_set(x_206, 0, x_205); -lean_ctor_set(x_206, 1, x_189); -lean_ctor_set(x_206, 2, x_190); -lean_ctor_set(x_206, 3, x_191); -lean_ctor_set(x_206, 4, x_192); -lean_ctor_set(x_206, 5, x_193); -if (lean_is_scalar(x_188)) { - x_207 = lean_alloc_ctor(0, 2, 0); -} else { - x_207 = x_188; -} -lean_ctor_set(x_207, 0, x_206); -lean_ctor_set(x_207, 1, x_187); -x_208 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_208, 0, x_186); -lean_ctor_set(x_208, 1, x_207); -return x_208; +x_205 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_205, 0, x_178); +lean_ctor_set(x_205, 1, x_204); +return x_205; } } } else { -uint8_t x_209; +uint8_t x_206; lean_dec(x_30); lean_dec(x_22); lean_dec(x_2); -x_209 = !lean_is_exclusive(x_32); -if (x_209 == 0) +x_206 = !lean_is_exclusive(x_32); +if (x_206 == 0) { return x_32; } else { -lean_object* x_210; lean_object* x_211; lean_object* x_212; -x_210 = lean_ctor_get(x_32, 0); -x_211 = lean_ctor_get(x_32, 1); -lean_inc(x_211); -lean_inc(x_210); +lean_object* x_207; lean_object* x_208; lean_object* x_209; +x_207 = lean_ctor_get(x_32, 0); +x_208 = lean_ctor_get(x_32, 1); +lean_inc(x_208); +lean_inc(x_207); lean_dec(x_32); -x_212 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_212, 0, x_210); -lean_ctor_set(x_212, 1, x_211); -return x_212; +x_209 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_209, 0, x_207); +lean_ctor_set(x_209, 1, x_208); +return x_209; } } } @@ -8896,283 +9344,258 @@ return x_212; } else { -lean_object* x_213; lean_object* x_214; lean_object* x_215; lean_object* x_216; lean_object* x_217; lean_object* x_218; lean_object* x_219; lean_object* x_220; uint8_t x_221; lean_object* x_222; lean_object* x_223; -x_213 = lean_ctor_get(x_7, 0); -x_214 = lean_ctor_get(x_7, 2); -x_215 = lean_ctor_get(x_7, 3); -x_216 = lean_ctor_get(x_7, 4); -lean_inc(x_216); -lean_inc(x_215); -lean_inc(x_214); +lean_object* x_210; lean_object* x_211; lean_object* x_212; lean_object* x_213; lean_object* x_214; lean_object* x_215; lean_object* x_216; lean_object* x_217; uint8_t x_218; lean_object* x_219; lean_object* x_220; +x_210 = lean_ctor_get(x_7, 0); +x_211 = lean_ctor_get(x_7, 2); +x_212 = lean_ctor_get(x_7, 3); +x_213 = lean_ctor_get(x_7, 4); lean_inc(x_213); +lean_inc(x_212); +lean_inc(x_211); +lean_inc(x_210); lean_dec(x_7); -x_217 = lean_ctor_get(x_8, 1); -lean_inc(x_217); -x_218 = lean_ctor_get(x_8, 4); -lean_inc(x_218); -x_219 = lean_array_get_size(x_214); -x_220 = lean_array_get_size(x_218); -x_221 = lean_nat_dec_eq(x_219, x_220); -lean_dec(x_220); -lean_dec(x_219); -lean_inc(x_218); -x_222 = lean_alloc_ctor(0, 5, 0); -lean_ctor_set(x_222, 0, x_213); -lean_ctor_set(x_222, 1, x_217); -lean_ctor_set(x_222, 2, x_218); -lean_ctor_set(x_222, 3, x_215); -lean_ctor_set(x_222, 4, x_216); -lean_ctor_set(x_6, 0, x_222); -x_223 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_223, 0, x_6); -lean_ctor_set(x_223, 1, x_10); -lean_ctor_set(x_223, 2, x_11); -if (x_221 == 0) +x_214 = lean_ctor_get(x_8, 1); +lean_inc(x_214); +x_215 = lean_ctor_get(x_8, 4); +lean_inc(x_215); +x_216 = lean_array_get_size(x_211); +x_217 = lean_array_get_size(x_215); +x_218 = lean_nat_dec_eq(x_216, x_217); +lean_dec(x_217); +lean_dec(x_216); +lean_inc(x_215); +x_219 = lean_alloc_ctor(0, 5, 0); +lean_ctor_set(x_219, 0, x_210); +lean_ctor_set(x_219, 1, x_214); +lean_ctor_set(x_219, 2, x_215); +lean_ctor_set(x_219, 3, x_212); +lean_ctor_set(x_219, 4, x_213); +lean_ctor_set(x_6, 0, x_219); +x_220 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_220, 0, x_6); +lean_ctor_set(x_220, 1, x_10); +lean_ctor_set(x_220, 2, x_11); +if (x_218 == 0) { -lean_object* x_224; -lean_dec(x_218); -lean_dec(x_214); +lean_object* x_221; +lean_dec(x_215); +lean_dec(x_211); lean_dec(x_8); lean_dec(x_3); -x_224 = lean_apply_2(x_2, x_223, x_9); +x_221 = lean_apply_2(x_2, x_220, x_9); +return x_221; +} +else +{ +lean_object* x_222; uint8_t x_223; +x_222 = lean_unsigned_to_nat(0u); +x_223 = l_Array_isEqvAux___main___at_Lean_Elab_Tactic_withMVarContext___spec__1(x_3, x_8, lean_box(0), x_211, x_215, x_222); +lean_dec(x_215); +lean_dec(x_211); +lean_dec(x_8); +lean_dec(x_3); +if (x_223 == 0) +{ +lean_object* x_224; +x_224 = lean_apply_2(x_2, x_220, x_9); return x_224; } else { -lean_object* x_225; uint8_t x_226; -x_225 = lean_unsigned_to_nat(0u); -x_226 = l_Array_isEqvAux___main___at_Lean_Elab_Tactic_withMVarContext___spec__1(x_3, x_8, lean_box(0), x_214, x_218, x_225); -lean_dec(x_218); -lean_dec(x_214); -lean_dec(x_8); -lean_dec(x_3); -if (x_226 == 0) -{ -lean_object* x_227; -x_227 = lean_apply_2(x_2, x_223, x_9); -return x_227; -} -else -{ -lean_object* x_228; lean_object* x_229; lean_object* x_230; lean_object* x_231; lean_object* x_232; lean_object* x_233; -x_228 = lean_ctor_get(x_9, 0); +lean_object* x_225; lean_object* x_226; lean_object* x_227; lean_object* x_228; lean_object* x_229; lean_object* x_230; +x_225 = lean_ctor_get(x_9, 0); +lean_inc(x_225); +x_226 = lean_ctor_get(x_225, 0); +lean_inc(x_226); +lean_dec(x_225); +x_227 = lean_ctor_get(x_226, 2); +lean_inc(x_227); +lean_dec(x_226); +x_228 = lean_ctor_get(x_227, 2); lean_inc(x_228); -x_229 = lean_ctor_get(x_228, 0); -lean_inc(x_229); -lean_dec(x_228); -x_230 = lean_ctor_get(x_229, 2); -lean_inc(x_230); -lean_dec(x_229); -x_231 = lean_ctor_get(x_230, 2); +lean_dec(x_227); +x_229 = l_Lean_Elab_Tactic_resetSynthInstanceCache___closed__1; +lean_inc(x_220); +x_230 = l_Lean_Elab_Tactic_liftTermElabM___rarg(x_229, x_220, x_9); +if (lean_obj_tag(x_230) == 0) +{ +lean_object* x_231; lean_object* x_232; lean_object* x_233; +x_231 = lean_ctor_get(x_230, 1); lean_inc(x_231); lean_dec(x_230); -x_232 = l_Lean_Elab_Tactic_resetSynthInstanceCache___closed__1; -lean_inc(x_223); -x_233 = l_Lean_Elab_Tactic_liftTermElabM___rarg(x_232, x_223, x_9); +x_232 = l_Lean_Elab_Tactic_save(x_231); +lean_inc(x_231); +x_233 = lean_apply_2(x_2, x_220, x_231); if (lean_obj_tag(x_233) == 0) { -lean_object* x_234; lean_object* x_235; +lean_object* x_234; lean_object* x_235; lean_object* x_236; lean_object* x_237; lean_object* x_238; lean_object* x_239; lean_object* x_240; lean_object* x_241; lean_object* x_242; lean_object* x_243; lean_object* x_244; lean_object* x_245; lean_object* x_246; lean_object* x_247; lean_object* x_248; lean_object* x_249; lean_object* x_250; lean_object* x_251; lean_object* x_252; lean_object* x_253; lean_object* x_254; lean_object* x_255; lean_object* x_256; lean_object* x_257; lean_object* x_258; lean_object* x_259; lean_object* x_260; lean_object* x_261; +lean_dec(x_232); +lean_dec(x_231); x_234 = lean_ctor_get(x_233, 1); lean_inc(x_234); -lean_dec(x_233); -x_235 = lean_apply_2(x_2, x_223, x_234); -if (lean_obj_tag(x_235) == 0) -{ -lean_object* x_236; lean_object* x_237; lean_object* x_238; lean_object* x_239; lean_object* x_240; lean_object* x_241; lean_object* x_242; lean_object* x_243; lean_object* x_244; lean_object* x_245; lean_object* x_246; lean_object* x_247; lean_object* x_248; lean_object* x_249; lean_object* x_250; lean_object* x_251; lean_object* x_252; lean_object* x_253; lean_object* x_254; lean_object* x_255; lean_object* x_256; lean_object* x_257; lean_object* x_258; lean_object* x_259; lean_object* x_260; lean_object* x_261; lean_object* x_262; lean_object* x_263; -x_236 = lean_ctor_get(x_235, 1); +x_235 = lean_ctor_get(x_234, 0); +lean_inc(x_235); +x_236 = lean_ctor_get(x_235, 0); lean_inc(x_236); -x_237 = lean_ctor_get(x_236, 0); +x_237 = lean_ctor_get(x_236, 2); lean_inc(x_237); -x_238 = lean_ctor_get(x_237, 0); +x_238 = lean_ctor_get(x_233, 0); lean_inc(x_238); -x_239 = lean_ctor_get(x_238, 2); -lean_inc(x_239); -x_240 = lean_ctor_get(x_235, 0); +if (lean_is_exclusive(x_233)) { + lean_ctor_release(x_233, 0); + lean_ctor_release(x_233, 1); + x_239 = x_233; +} else { + lean_dec_ref(x_233); + x_239 = lean_box(0); +} +x_240 = lean_ctor_get(x_234, 1); lean_inc(x_240); +if (lean_is_exclusive(x_234)) { + lean_ctor_release(x_234, 0); + lean_ctor_release(x_234, 1); + x_241 = x_234; +} else { + lean_dec_ref(x_234); + x_241 = lean_box(0); +} +x_242 = lean_ctor_get(x_235, 1); +lean_inc(x_242); +x_243 = lean_ctor_get(x_235, 2); +lean_inc(x_243); +x_244 = lean_ctor_get(x_235, 3); +lean_inc(x_244); +x_245 = lean_ctor_get(x_235, 4); +lean_inc(x_245); +x_246 = lean_ctor_get(x_235, 5); +lean_inc(x_246); if (lean_is_exclusive(x_235)) { lean_ctor_release(x_235, 0); lean_ctor_release(x_235, 1); - x_241 = x_235; + lean_ctor_release(x_235, 2); + lean_ctor_release(x_235, 3); + lean_ctor_release(x_235, 4); + lean_ctor_release(x_235, 5); + x_247 = x_235; } else { lean_dec_ref(x_235); - x_241 = lean_box(0); + x_247 = lean_box(0); } -x_242 = lean_ctor_get(x_236, 1); -lean_inc(x_242); +x_248 = lean_ctor_get(x_236, 0); +lean_inc(x_248); +x_249 = lean_ctor_get(x_236, 1); +lean_inc(x_249); +x_250 = lean_ctor_get(x_236, 3); +lean_inc(x_250); +x_251 = lean_ctor_get(x_236, 4); +lean_inc(x_251); +x_252 = lean_ctor_get(x_236, 5); +lean_inc(x_252); if (lean_is_exclusive(x_236)) { lean_ctor_release(x_236, 0); lean_ctor_release(x_236, 1); - x_243 = x_236; + lean_ctor_release(x_236, 2); + lean_ctor_release(x_236, 3); + lean_ctor_release(x_236, 4); + lean_ctor_release(x_236, 5); + x_253 = x_236; } else { lean_dec_ref(x_236); - x_243 = lean_box(0); + x_253 = lean_box(0); } -x_244 = lean_ctor_get(x_237, 1); -lean_inc(x_244); -x_245 = lean_ctor_get(x_237, 2); -lean_inc(x_245); -x_246 = lean_ctor_get(x_237, 3); -lean_inc(x_246); -x_247 = lean_ctor_get(x_237, 4); -lean_inc(x_247); -x_248 = lean_ctor_get(x_237, 5); -lean_inc(x_248); +x_254 = lean_ctor_get(x_237, 0); +lean_inc(x_254); +x_255 = lean_ctor_get(x_237, 1); +lean_inc(x_255); if (lean_is_exclusive(x_237)) { lean_ctor_release(x_237, 0); lean_ctor_release(x_237, 1); lean_ctor_release(x_237, 2); - lean_ctor_release(x_237, 3); - lean_ctor_release(x_237, 4); - lean_ctor_release(x_237, 5); - x_249 = x_237; + x_256 = x_237; } else { lean_dec_ref(x_237); - x_249 = lean_box(0); + x_256 = lean_box(0); } -x_250 = lean_ctor_get(x_238, 0); -lean_inc(x_250); -x_251 = lean_ctor_get(x_238, 1); -lean_inc(x_251); -x_252 = lean_ctor_get(x_238, 3); -lean_inc(x_252); -x_253 = lean_ctor_get(x_238, 4); -lean_inc(x_253); -x_254 = lean_ctor_get(x_238, 5); -lean_inc(x_254); -if (lean_is_exclusive(x_238)) { - lean_ctor_release(x_238, 0); - lean_ctor_release(x_238, 1); - lean_ctor_release(x_238, 2); - lean_ctor_release(x_238, 3); - lean_ctor_release(x_238, 4); - lean_ctor_release(x_238, 5); - x_255 = x_238; +if (lean_is_scalar(x_256)) { + x_257 = lean_alloc_ctor(0, 3, 0); } else { - lean_dec_ref(x_238); - x_255 = lean_box(0); + x_257 = x_256; } -x_256 = lean_ctor_get(x_239, 0); -lean_inc(x_256); -x_257 = lean_ctor_get(x_239, 1); -lean_inc(x_257); -if (lean_is_exclusive(x_239)) { - lean_ctor_release(x_239, 0); - lean_ctor_release(x_239, 1); - lean_ctor_release(x_239, 2); - x_258 = x_239; +lean_ctor_set(x_257, 0, x_254); +lean_ctor_set(x_257, 1, x_255); +lean_ctor_set(x_257, 2, x_228); +if (lean_is_scalar(x_253)) { + x_258 = lean_alloc_ctor(0, 6, 0); } else { - lean_dec_ref(x_239); - x_258 = lean_box(0); + x_258 = x_253; } -if (lean_is_scalar(x_258)) { - x_259 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_258, 0, x_248); +lean_ctor_set(x_258, 1, x_249); +lean_ctor_set(x_258, 2, x_257); +lean_ctor_set(x_258, 3, x_250); +lean_ctor_set(x_258, 4, x_251); +lean_ctor_set(x_258, 5, x_252); +if (lean_is_scalar(x_247)) { + x_259 = lean_alloc_ctor(0, 6, 0); } else { - x_259 = x_258; + x_259 = x_247; } -lean_ctor_set(x_259, 0, x_256); -lean_ctor_set(x_259, 1, x_257); -lean_ctor_set(x_259, 2, x_231); -if (lean_is_scalar(x_255)) { - x_260 = lean_alloc_ctor(0, 6, 0); -} else { - x_260 = x_255; -} -lean_ctor_set(x_260, 0, x_250); -lean_ctor_set(x_260, 1, x_251); -lean_ctor_set(x_260, 2, x_259); -lean_ctor_set(x_260, 3, x_252); -lean_ctor_set(x_260, 4, x_253); -lean_ctor_set(x_260, 5, x_254); -if (lean_is_scalar(x_249)) { - x_261 = lean_alloc_ctor(0, 6, 0); -} else { - x_261 = x_249; -} -lean_ctor_set(x_261, 0, x_260); -lean_ctor_set(x_261, 1, x_244); -lean_ctor_set(x_261, 2, x_245); -lean_ctor_set(x_261, 3, x_246); -lean_ctor_set(x_261, 4, x_247); -lean_ctor_set(x_261, 5, x_248); -if (lean_is_scalar(x_243)) { - x_262 = lean_alloc_ctor(0, 2, 0); -} else { - x_262 = x_243; -} -lean_ctor_set(x_262, 0, x_261); -lean_ctor_set(x_262, 1, x_242); +lean_ctor_set(x_259, 0, x_258); +lean_ctor_set(x_259, 1, x_242); +lean_ctor_set(x_259, 2, x_243); +lean_ctor_set(x_259, 3, x_244); +lean_ctor_set(x_259, 4, x_245); +lean_ctor_set(x_259, 5, x_246); if (lean_is_scalar(x_241)) { - x_263 = lean_alloc_ctor(0, 2, 0); + x_260 = lean_alloc_ctor(0, 2, 0); } else { - x_263 = x_241; + x_260 = x_241; } -lean_ctor_set(x_263, 0, x_240); -lean_ctor_set(x_263, 1, x_262); -return x_263; +lean_ctor_set(x_260, 0, x_259); +lean_ctor_set(x_260, 1, x_240); +if (lean_is_scalar(x_239)) { + x_261 = lean_alloc_ctor(0, 2, 0); +} else { + x_261 = x_239; +} +lean_ctor_set(x_261, 0, x_238); +lean_ctor_set(x_261, 1, x_260); +return x_261; } else { -lean_object* x_264; lean_object* x_265; lean_object* x_266; lean_object* x_267; lean_object* x_268; lean_object* x_269; lean_object* x_270; lean_object* x_271; lean_object* x_272; lean_object* x_273; lean_object* x_274; lean_object* x_275; lean_object* x_276; lean_object* x_277; lean_object* x_278; lean_object* x_279; lean_object* x_280; lean_object* x_281; lean_object* x_282; lean_object* x_283; lean_object* x_284; lean_object* x_285; lean_object* x_286; lean_object* x_287; lean_object* x_288; lean_object* x_289; lean_object* x_290; lean_object* x_291; -x_264 = lean_ctor_get(x_235, 1); -lean_inc(x_264); -x_265 = lean_ctor_get(x_264, 0); -lean_inc(x_265); +lean_object* x_262; lean_object* x_263; lean_object* x_264; lean_object* x_265; lean_object* x_266; lean_object* x_267; lean_object* x_268; lean_object* x_269; lean_object* x_270; lean_object* x_271; lean_object* x_272; lean_object* x_273; lean_object* x_274; lean_object* x_275; lean_object* x_276; lean_object* x_277; lean_object* x_278; lean_object* x_279; lean_object* x_280; lean_object* x_281; lean_object* x_282; lean_object* x_283; lean_object* x_284; lean_object* x_285; lean_object* x_286; lean_object* x_287; lean_object* x_288; lean_object* x_289; lean_object* x_290; +x_262 = lean_ctor_get(x_233, 0); +lean_inc(x_262); +x_263 = lean_ctor_get(x_233, 1); +lean_inc(x_263); +if (lean_is_exclusive(x_233)) { + lean_ctor_release(x_233, 0); + lean_ctor_release(x_233, 1); + x_264 = x_233; +} else { + lean_dec_ref(x_233); + x_264 = lean_box(0); +} +x_265 = l_Lean_Elab_Tactic_restore(x_263, x_232); +lean_dec(x_232); x_266 = lean_ctor_get(x_265, 0); lean_inc(x_266); -x_267 = lean_ctor_get(x_266, 2); +lean_dec(x_265); +x_267 = lean_ctor_get(x_266, 0); lean_inc(x_267); -x_268 = lean_ctor_get(x_235, 0); +x_268 = lean_ctor_get(x_267, 2); lean_inc(x_268); -if (lean_is_exclusive(x_235)) { - lean_ctor_release(x_235, 0); - lean_ctor_release(x_235, 1); - x_269 = x_235; -} else { - lean_dec_ref(x_235); - x_269 = lean_box(0); -} -x_270 = lean_ctor_get(x_264, 1); +x_269 = lean_ctor_get(x_266, 1); +lean_inc(x_269); +x_270 = lean_ctor_get(x_266, 2); lean_inc(x_270); -if (lean_is_exclusive(x_264)) { - lean_ctor_release(x_264, 0); - lean_ctor_release(x_264, 1); - x_271 = x_264; -} else { - lean_dec_ref(x_264); - x_271 = lean_box(0); -} -x_272 = lean_ctor_get(x_265, 1); +x_271 = lean_ctor_get(x_266, 3); +lean_inc(x_271); +x_272 = lean_ctor_get(x_266, 4); lean_inc(x_272); -x_273 = lean_ctor_get(x_265, 2); +x_273 = lean_ctor_get(x_266, 5); lean_inc(x_273); -x_274 = lean_ctor_get(x_265, 3); -lean_inc(x_274); -x_275 = lean_ctor_get(x_265, 4); -lean_inc(x_275); -x_276 = lean_ctor_get(x_265, 5); -lean_inc(x_276); -if (lean_is_exclusive(x_265)) { - lean_ctor_release(x_265, 0); - lean_ctor_release(x_265, 1); - lean_ctor_release(x_265, 2); - lean_ctor_release(x_265, 3); - lean_ctor_release(x_265, 4); - lean_ctor_release(x_265, 5); - x_277 = x_265; -} else { - lean_dec_ref(x_265); - x_277 = lean_box(0); -} -x_278 = lean_ctor_get(x_266, 0); -lean_inc(x_278); -x_279 = lean_ctor_get(x_266, 1); -lean_inc(x_279); -x_280 = lean_ctor_get(x_266, 3); -lean_inc(x_280); -x_281 = lean_ctor_get(x_266, 4); -lean_inc(x_281); -x_282 = lean_ctor_get(x_266, 5); -lean_inc(x_282); if (lean_is_exclusive(x_266)) { lean_ctor_release(x_266, 0); lean_ctor_release(x_266, 1); @@ -9180,97 +9603,129 @@ if (lean_is_exclusive(x_266)) { lean_ctor_release(x_266, 3); lean_ctor_release(x_266, 4); lean_ctor_release(x_266, 5); - x_283 = x_266; + x_274 = x_266; } else { lean_dec_ref(x_266); - x_283 = lean_box(0); + x_274 = lean_box(0); } -x_284 = lean_ctor_get(x_267, 0); -lean_inc(x_284); -x_285 = lean_ctor_get(x_267, 1); -lean_inc(x_285); +x_275 = lean_ctor_get(x_267, 0); +lean_inc(x_275); +x_276 = lean_ctor_get(x_267, 1); +lean_inc(x_276); +x_277 = lean_ctor_get(x_267, 3); +lean_inc(x_277); +x_278 = lean_ctor_get(x_267, 4); +lean_inc(x_278); +x_279 = lean_ctor_get(x_267, 5); +lean_inc(x_279); if (lean_is_exclusive(x_267)) { lean_ctor_release(x_267, 0); lean_ctor_release(x_267, 1); lean_ctor_release(x_267, 2); - x_286 = x_267; + lean_ctor_release(x_267, 3); + lean_ctor_release(x_267, 4); + lean_ctor_release(x_267, 5); + x_280 = x_267; } else { lean_dec_ref(x_267); - x_286 = lean_box(0); + x_280 = lean_box(0); } -if (lean_is_scalar(x_286)) { - x_287 = lean_alloc_ctor(0, 3, 0); +x_281 = lean_ctor_get(x_268, 0); +lean_inc(x_281); +x_282 = lean_ctor_get(x_268, 1); +lean_inc(x_282); +if (lean_is_exclusive(x_268)) { + lean_ctor_release(x_268, 0); + lean_ctor_release(x_268, 1); + lean_ctor_release(x_268, 2); + x_283 = x_268; } else { - x_287 = x_286; + lean_dec_ref(x_268); + x_283 = lean_box(0); } -lean_ctor_set(x_287, 0, x_284); -lean_ctor_set(x_287, 1, x_285); -lean_ctor_set(x_287, 2, x_231); if (lean_is_scalar(x_283)) { - x_288 = lean_alloc_ctor(0, 6, 0); + x_284 = lean_alloc_ctor(0, 3, 0); } else { - x_288 = x_283; + x_284 = x_283; } -lean_ctor_set(x_288, 0, x_278); -lean_ctor_set(x_288, 1, x_279); -lean_ctor_set(x_288, 2, x_287); -lean_ctor_set(x_288, 3, x_280); -lean_ctor_set(x_288, 4, x_281); -lean_ctor_set(x_288, 5, x_282); -if (lean_is_scalar(x_277)) { - x_289 = lean_alloc_ctor(0, 6, 0); +lean_ctor_set(x_284, 0, x_281); +lean_ctor_set(x_284, 1, x_282); +lean_ctor_set(x_284, 2, x_228); +if (lean_is_scalar(x_280)) { + x_285 = lean_alloc_ctor(0, 6, 0); } else { - x_289 = x_277; + x_285 = x_280; } -lean_ctor_set(x_289, 0, x_288); -lean_ctor_set(x_289, 1, x_272); -lean_ctor_set(x_289, 2, x_273); -lean_ctor_set(x_289, 3, x_274); -lean_ctor_set(x_289, 4, x_275); -lean_ctor_set(x_289, 5, x_276); -if (lean_is_scalar(x_271)) { - x_290 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_285, 0, x_275); +lean_ctor_set(x_285, 1, x_276); +lean_ctor_set(x_285, 2, x_284); +lean_ctor_set(x_285, 3, x_277); +lean_ctor_set(x_285, 4, x_278); +lean_ctor_set(x_285, 5, x_279); +if (lean_is_scalar(x_274)) { + x_286 = lean_alloc_ctor(0, 6, 0); } else { - x_290 = x_271; + x_286 = x_274; } -lean_ctor_set(x_290, 0, x_289); -lean_ctor_set(x_290, 1, x_270); -if (lean_is_scalar(x_269)) { - x_291 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_286, 0, x_285); +lean_ctor_set(x_286, 1, x_269); +lean_ctor_set(x_286, 2, x_270); +lean_ctor_set(x_286, 3, x_271); +lean_ctor_set(x_286, 4, x_272); +lean_ctor_set(x_286, 5, x_273); +x_287 = lean_ctor_get(x_231, 1); +lean_inc(x_287); +if (lean_is_exclusive(x_231)) { + lean_ctor_release(x_231, 0); + lean_ctor_release(x_231, 1); + x_288 = x_231; } else { - x_291 = x_269; + lean_dec_ref(x_231); + x_288 = lean_box(0); } -lean_ctor_set(x_291, 0, x_268); -lean_ctor_set(x_291, 1, x_290); -return x_291; +if (lean_is_scalar(x_288)) { + x_289 = lean_alloc_ctor(0, 2, 0); +} else { + x_289 = x_288; +} +lean_ctor_set(x_289, 0, x_286); +lean_ctor_set(x_289, 1, x_287); +if (lean_is_scalar(x_264)) { + x_290 = lean_alloc_ctor(1, 2, 0); +} else { + x_290 = x_264; +} +lean_ctor_set(x_290, 0, x_262); +lean_ctor_set(x_290, 1, x_289); +return x_290; } } else { -lean_object* x_292; lean_object* x_293; lean_object* x_294; lean_object* x_295; -lean_dec(x_231); -lean_dec(x_223); +lean_object* x_291; lean_object* x_292; lean_object* x_293; lean_object* x_294; +lean_dec(x_228); +lean_dec(x_220); lean_dec(x_2); -x_292 = lean_ctor_get(x_233, 0); +x_291 = lean_ctor_get(x_230, 0); +lean_inc(x_291); +x_292 = lean_ctor_get(x_230, 1); lean_inc(x_292); -x_293 = lean_ctor_get(x_233, 1); -lean_inc(x_293); -if (lean_is_exclusive(x_233)) { - lean_ctor_release(x_233, 0); - lean_ctor_release(x_233, 1); - x_294 = x_233; +if (lean_is_exclusive(x_230)) { + lean_ctor_release(x_230, 0); + lean_ctor_release(x_230, 1); + x_293 = x_230; } else { - lean_dec_ref(x_233); - x_294 = lean_box(0); + lean_dec_ref(x_230); + x_293 = lean_box(0); } -if (lean_is_scalar(x_294)) { - x_295 = lean_alloc_ctor(1, 2, 0); +if (lean_is_scalar(x_293)) { + x_294 = lean_alloc_ctor(1, 2, 0); } else { - x_295 = x_294; + x_294 = x_293; } -lean_ctor_set(x_295, 0, x_292); -lean_ctor_set(x_295, 1, x_293); -return x_295; +lean_ctor_set(x_294, 0, x_291); +lean_ctor_set(x_294, 1, x_292); +return x_294; } } } @@ -9278,18 +9733,17 @@ return x_295; } else { -lean_object* x_296; lean_object* x_297; lean_object* x_298; lean_object* x_299; lean_object* x_300; lean_object* x_301; lean_object* x_302; lean_object* x_303; lean_object* x_304; uint8_t x_305; lean_object* x_306; lean_object* x_307; lean_object* x_308; lean_object* x_309; lean_object* x_310; lean_object* x_311; lean_object* x_312; lean_object* x_313; lean_object* x_314; uint8_t x_315; lean_object* x_316; lean_object* x_317; lean_object* x_318; -x_296 = lean_ctor_get(x_6, 1); -x_297 = lean_ctor_get(x_6, 2); -x_298 = lean_ctor_get(x_6, 3); -x_299 = lean_ctor_get(x_6, 4); -x_300 = lean_ctor_get(x_6, 5); -x_301 = lean_ctor_get(x_6, 6); -x_302 = lean_ctor_get(x_6, 7); -x_303 = lean_ctor_get(x_6, 8); -x_304 = lean_ctor_get(x_6, 9); -x_305 = lean_ctor_get_uint8(x_6, sizeof(void*)*10); -lean_inc(x_304); +lean_object* x_295; lean_object* x_296; lean_object* x_297; lean_object* x_298; lean_object* x_299; lean_object* x_300; lean_object* x_301; lean_object* x_302; lean_object* x_303; uint8_t x_304; lean_object* x_305; lean_object* x_306; lean_object* x_307; lean_object* x_308; lean_object* x_309; lean_object* x_310; lean_object* x_311; lean_object* x_312; lean_object* x_313; uint8_t x_314; lean_object* x_315; lean_object* x_316; lean_object* x_317; +x_295 = lean_ctor_get(x_6, 1); +x_296 = lean_ctor_get(x_6, 2); +x_297 = lean_ctor_get(x_6, 3); +x_298 = lean_ctor_get(x_6, 4); +x_299 = lean_ctor_get(x_6, 5); +x_300 = lean_ctor_get(x_6, 6); +x_301 = lean_ctor_get(x_6, 7); +x_302 = lean_ctor_get(x_6, 8); +x_303 = lean_ctor_get(x_6, 9); +x_304 = lean_ctor_get_uint8(x_6, sizeof(void*)*10); lean_inc(x_303); lean_inc(x_302); lean_inc(x_301); @@ -9298,114 +9752,119 @@ lean_inc(x_299); lean_inc(x_298); lean_inc(x_297); lean_inc(x_296); +lean_inc(x_295); lean_dec(x_6); -x_306 = lean_ctor_get(x_7, 0); +x_305 = lean_ctor_get(x_7, 0); +lean_inc(x_305); +x_306 = lean_ctor_get(x_7, 2); lean_inc(x_306); -x_307 = lean_ctor_get(x_7, 2); +x_307 = lean_ctor_get(x_7, 3); lean_inc(x_307); -x_308 = lean_ctor_get(x_7, 3); +x_308 = lean_ctor_get(x_7, 4); lean_inc(x_308); -x_309 = lean_ctor_get(x_7, 4); -lean_inc(x_309); if (lean_is_exclusive(x_7)) { lean_ctor_release(x_7, 0); lean_ctor_release(x_7, 1); lean_ctor_release(x_7, 2); lean_ctor_release(x_7, 3); lean_ctor_release(x_7, 4); - x_310 = x_7; + x_309 = x_7; } else { lean_dec_ref(x_7); - x_310 = lean_box(0); + x_309 = lean_box(0); } -x_311 = lean_ctor_get(x_8, 1); +x_310 = lean_ctor_get(x_8, 1); +lean_inc(x_310); +x_311 = lean_ctor_get(x_8, 4); lean_inc(x_311); -x_312 = lean_ctor_get(x_8, 4); -lean_inc(x_312); -x_313 = lean_array_get_size(x_307); -x_314 = lean_array_get_size(x_312); -x_315 = lean_nat_dec_eq(x_313, x_314); -lean_dec(x_314); +x_312 = lean_array_get_size(x_306); +x_313 = lean_array_get_size(x_311); +x_314 = lean_nat_dec_eq(x_312, x_313); lean_dec(x_313); -lean_inc(x_312); -if (lean_is_scalar(x_310)) { - x_316 = lean_alloc_ctor(0, 5, 0); +lean_dec(x_312); +lean_inc(x_311); +if (lean_is_scalar(x_309)) { + x_315 = lean_alloc_ctor(0, 5, 0); } else { - x_316 = x_310; + x_315 = x_309; } -lean_ctor_set(x_316, 0, x_306); -lean_ctor_set(x_316, 1, x_311); -lean_ctor_set(x_316, 2, x_312); -lean_ctor_set(x_316, 3, x_308); -lean_ctor_set(x_316, 4, x_309); -x_317 = lean_alloc_ctor(0, 10, 1); +lean_ctor_set(x_315, 0, x_305); +lean_ctor_set(x_315, 1, x_310); +lean_ctor_set(x_315, 2, x_311); +lean_ctor_set(x_315, 3, x_307); +lean_ctor_set(x_315, 4, x_308); +x_316 = lean_alloc_ctor(0, 10, 1); +lean_ctor_set(x_316, 0, x_315); +lean_ctor_set(x_316, 1, x_295); +lean_ctor_set(x_316, 2, x_296); +lean_ctor_set(x_316, 3, x_297); +lean_ctor_set(x_316, 4, x_298); +lean_ctor_set(x_316, 5, x_299); +lean_ctor_set(x_316, 6, x_300); +lean_ctor_set(x_316, 7, x_301); +lean_ctor_set(x_316, 8, x_302); +lean_ctor_set(x_316, 9, x_303); +lean_ctor_set_uint8(x_316, sizeof(void*)*10, x_304); +x_317 = lean_alloc_ctor(0, 3, 0); lean_ctor_set(x_317, 0, x_316); -lean_ctor_set(x_317, 1, x_296); -lean_ctor_set(x_317, 2, x_297); -lean_ctor_set(x_317, 3, x_298); -lean_ctor_set(x_317, 4, x_299); -lean_ctor_set(x_317, 5, x_300); -lean_ctor_set(x_317, 6, x_301); -lean_ctor_set(x_317, 7, x_302); -lean_ctor_set(x_317, 8, x_303); -lean_ctor_set(x_317, 9, x_304); -lean_ctor_set_uint8(x_317, sizeof(void*)*10, x_305); -x_318 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_318, 0, x_317); -lean_ctor_set(x_318, 1, x_10); -lean_ctor_set(x_318, 2, x_11); -if (x_315 == 0) +lean_ctor_set(x_317, 1, x_10); +lean_ctor_set(x_317, 2, x_11); +if (x_314 == 0) { -lean_object* x_319; -lean_dec(x_312); -lean_dec(x_307); +lean_object* x_318; +lean_dec(x_311); +lean_dec(x_306); lean_dec(x_8); lean_dec(x_3); -x_319 = lean_apply_2(x_2, x_318, x_9); -return x_319; +x_318 = lean_apply_2(x_2, x_317, x_9); +return x_318; } else { -lean_object* x_320; uint8_t x_321; -x_320 = lean_unsigned_to_nat(0u); -x_321 = l_Array_isEqvAux___main___at_Lean_Elab_Tactic_withMVarContext___spec__1(x_3, x_8, lean_box(0), x_307, x_312, x_320); -lean_dec(x_312); -lean_dec(x_307); +lean_object* x_319; uint8_t x_320; +x_319 = lean_unsigned_to_nat(0u); +x_320 = l_Array_isEqvAux___main___at_Lean_Elab_Tactic_withMVarContext___spec__1(x_3, x_8, lean_box(0), x_306, x_311, x_319); +lean_dec(x_311); +lean_dec(x_306); lean_dec(x_8); lean_dec(x_3); -if (x_321 == 0) +if (x_320 == 0) { -lean_object* x_322; -x_322 = lean_apply_2(x_2, x_318, x_9); -return x_322; +lean_object* x_321; +x_321 = lean_apply_2(x_2, x_317, x_9); +return x_321; } else { -lean_object* x_323; lean_object* x_324; lean_object* x_325; lean_object* x_326; lean_object* x_327; lean_object* x_328; -x_323 = lean_ctor_get(x_9, 0); +lean_object* x_322; lean_object* x_323; lean_object* x_324; lean_object* x_325; lean_object* x_326; lean_object* x_327; +x_322 = lean_ctor_get(x_9, 0); +lean_inc(x_322); +x_323 = lean_ctor_get(x_322, 0); lean_inc(x_323); -x_324 = lean_ctor_get(x_323, 0); +lean_dec(x_322); +x_324 = lean_ctor_get(x_323, 2); lean_inc(x_324); lean_dec(x_323); x_325 = lean_ctor_get(x_324, 2); lean_inc(x_325); lean_dec(x_324); -x_326 = lean_ctor_get(x_325, 2); -lean_inc(x_326); -lean_dec(x_325); -x_327 = l_Lean_Elab_Tactic_resetSynthInstanceCache___closed__1; -lean_inc(x_318); -x_328 = l_Lean_Elab_Tactic_liftTermElabM___rarg(x_327, x_318, x_9); -if (lean_obj_tag(x_328) == 0) +x_326 = l_Lean_Elab_Tactic_resetSynthInstanceCache___closed__1; +lean_inc(x_317); +x_327 = l_Lean_Elab_Tactic_liftTermElabM___rarg(x_326, x_317, x_9); +if (lean_obj_tag(x_327) == 0) { -lean_object* x_329; lean_object* x_330; -x_329 = lean_ctor_get(x_328, 1); -lean_inc(x_329); -lean_dec(x_328); -x_330 = lean_apply_2(x_2, x_318, x_329); +lean_object* x_328; lean_object* x_329; lean_object* x_330; +x_328 = lean_ctor_get(x_327, 1); +lean_inc(x_328); +lean_dec(x_327); +x_329 = l_Lean_Elab_Tactic_save(x_328); +lean_inc(x_328); +x_330 = lean_apply_2(x_2, x_317, x_328); if (lean_obj_tag(x_330) == 0) { lean_object* x_331; lean_object* x_332; lean_object* x_333; lean_object* x_334; lean_object* x_335; lean_object* x_336; lean_object* x_337; lean_object* x_338; lean_object* x_339; lean_object* x_340; lean_object* x_341; lean_object* x_342; lean_object* x_343; lean_object* x_344; lean_object* x_345; lean_object* x_346; lean_object* x_347; lean_object* x_348; lean_object* x_349; lean_object* x_350; lean_object* x_351; lean_object* x_352; lean_object* x_353; lean_object* x_354; lean_object* x_355; lean_object* x_356; lean_object* x_357; lean_object* x_358; +lean_dec(x_329); +lean_dec(x_328); x_331 = lean_ctor_get(x_330, 1); lean_inc(x_331); x_332 = lean_ctor_get(x_331, 0); @@ -9498,7 +9957,7 @@ if (lean_is_scalar(x_353)) { } lean_ctor_set(x_354, 0, x_351); lean_ctor_set(x_354, 1, x_352); -lean_ctor_set(x_354, 2, x_326); +lean_ctor_set(x_354, 2, x_325); if (lean_is_scalar(x_350)) { x_355 = lean_alloc_ctor(0, 6, 0); } else { @@ -9539,165 +9998,168 @@ return x_358; } else { -lean_object* x_359; lean_object* x_360; lean_object* x_361; lean_object* x_362; lean_object* x_363; lean_object* x_364; lean_object* x_365; lean_object* x_366; lean_object* x_367; lean_object* x_368; lean_object* x_369; lean_object* x_370; lean_object* x_371; lean_object* x_372; lean_object* x_373; lean_object* x_374; lean_object* x_375; lean_object* x_376; lean_object* x_377; lean_object* x_378; lean_object* x_379; lean_object* x_380; lean_object* x_381; lean_object* x_382; lean_object* x_383; lean_object* x_384; lean_object* x_385; lean_object* x_386; -x_359 = lean_ctor_get(x_330, 1); +lean_object* x_359; lean_object* x_360; lean_object* x_361; lean_object* x_362; lean_object* x_363; lean_object* x_364; lean_object* x_365; lean_object* x_366; lean_object* x_367; lean_object* x_368; lean_object* x_369; lean_object* x_370; lean_object* x_371; lean_object* x_372; lean_object* x_373; lean_object* x_374; lean_object* x_375; lean_object* x_376; lean_object* x_377; lean_object* x_378; lean_object* x_379; lean_object* x_380; lean_object* x_381; lean_object* x_382; lean_object* x_383; lean_object* x_384; lean_object* x_385; lean_object* x_386; lean_object* x_387; +x_359 = lean_ctor_get(x_330, 0); lean_inc(x_359); -x_360 = lean_ctor_get(x_359, 0); +x_360 = lean_ctor_get(x_330, 1); lean_inc(x_360); -x_361 = lean_ctor_get(x_360, 0); -lean_inc(x_361); -x_362 = lean_ctor_get(x_361, 2); -lean_inc(x_362); -x_363 = lean_ctor_get(x_330, 0); -lean_inc(x_363); if (lean_is_exclusive(x_330)) { lean_ctor_release(x_330, 0); lean_ctor_release(x_330, 1); - x_364 = x_330; + x_361 = x_330; } else { lean_dec_ref(x_330); - x_364 = lean_box(0); + x_361 = lean_box(0); } -x_365 = lean_ctor_get(x_359, 1); +x_362 = l_Lean_Elab_Tactic_restore(x_360, x_329); +lean_dec(x_329); +x_363 = lean_ctor_get(x_362, 0); +lean_inc(x_363); +lean_dec(x_362); +x_364 = lean_ctor_get(x_363, 0); +lean_inc(x_364); +x_365 = lean_ctor_get(x_364, 2); lean_inc(x_365); -if (lean_is_exclusive(x_359)) { - lean_ctor_release(x_359, 0); - lean_ctor_release(x_359, 1); - x_366 = x_359; -} else { - lean_dec_ref(x_359); - x_366 = lean_box(0); -} -x_367 = lean_ctor_get(x_360, 1); +x_366 = lean_ctor_get(x_363, 1); +lean_inc(x_366); +x_367 = lean_ctor_get(x_363, 2); lean_inc(x_367); -x_368 = lean_ctor_get(x_360, 2); +x_368 = lean_ctor_get(x_363, 3); lean_inc(x_368); -x_369 = lean_ctor_get(x_360, 3); +x_369 = lean_ctor_get(x_363, 4); lean_inc(x_369); -x_370 = lean_ctor_get(x_360, 4); +x_370 = lean_ctor_get(x_363, 5); lean_inc(x_370); -x_371 = lean_ctor_get(x_360, 5); -lean_inc(x_371); -if (lean_is_exclusive(x_360)) { - lean_ctor_release(x_360, 0); - lean_ctor_release(x_360, 1); - lean_ctor_release(x_360, 2); - lean_ctor_release(x_360, 3); - lean_ctor_release(x_360, 4); - lean_ctor_release(x_360, 5); - x_372 = x_360; +if (lean_is_exclusive(x_363)) { + lean_ctor_release(x_363, 0); + lean_ctor_release(x_363, 1); + lean_ctor_release(x_363, 2); + lean_ctor_release(x_363, 3); + lean_ctor_release(x_363, 4); + lean_ctor_release(x_363, 5); + x_371 = x_363; } else { - lean_dec_ref(x_360); - x_372 = lean_box(0); + lean_dec_ref(x_363); + x_371 = lean_box(0); } -x_373 = lean_ctor_get(x_361, 0); +x_372 = lean_ctor_get(x_364, 0); +lean_inc(x_372); +x_373 = lean_ctor_get(x_364, 1); lean_inc(x_373); -x_374 = lean_ctor_get(x_361, 1); +x_374 = lean_ctor_get(x_364, 3); lean_inc(x_374); -x_375 = lean_ctor_get(x_361, 3); +x_375 = lean_ctor_get(x_364, 4); lean_inc(x_375); -x_376 = lean_ctor_get(x_361, 4); +x_376 = lean_ctor_get(x_364, 5); lean_inc(x_376); -x_377 = lean_ctor_get(x_361, 5); -lean_inc(x_377); -if (lean_is_exclusive(x_361)) { - lean_ctor_release(x_361, 0); - lean_ctor_release(x_361, 1); - lean_ctor_release(x_361, 2); - lean_ctor_release(x_361, 3); - lean_ctor_release(x_361, 4); - lean_ctor_release(x_361, 5); - x_378 = x_361; +if (lean_is_exclusive(x_364)) { + lean_ctor_release(x_364, 0); + lean_ctor_release(x_364, 1); + lean_ctor_release(x_364, 2); + lean_ctor_release(x_364, 3); + lean_ctor_release(x_364, 4); + lean_ctor_release(x_364, 5); + x_377 = x_364; } else { - lean_dec_ref(x_361); - x_378 = lean_box(0); + lean_dec_ref(x_364); + x_377 = lean_box(0); } -x_379 = lean_ctor_get(x_362, 0); +x_378 = lean_ctor_get(x_365, 0); +lean_inc(x_378); +x_379 = lean_ctor_get(x_365, 1); lean_inc(x_379); -x_380 = lean_ctor_get(x_362, 1); -lean_inc(x_380); -if (lean_is_exclusive(x_362)) { - lean_ctor_release(x_362, 0); - lean_ctor_release(x_362, 1); - lean_ctor_release(x_362, 2); - x_381 = x_362; +if (lean_is_exclusive(x_365)) { + lean_ctor_release(x_365, 0); + lean_ctor_release(x_365, 1); + lean_ctor_release(x_365, 2); + x_380 = x_365; } else { - lean_dec_ref(x_362); - x_381 = lean_box(0); + lean_dec_ref(x_365); + x_380 = lean_box(0); } -if (lean_is_scalar(x_381)) { - x_382 = lean_alloc_ctor(0, 3, 0); +if (lean_is_scalar(x_380)) { + x_381 = lean_alloc_ctor(0, 3, 0); } else { - x_382 = x_381; + x_381 = x_380; } -lean_ctor_set(x_382, 0, x_379); -lean_ctor_set(x_382, 1, x_380); -lean_ctor_set(x_382, 2, x_326); -if (lean_is_scalar(x_378)) { +lean_ctor_set(x_381, 0, x_378); +lean_ctor_set(x_381, 1, x_379); +lean_ctor_set(x_381, 2, x_325); +if (lean_is_scalar(x_377)) { + x_382 = lean_alloc_ctor(0, 6, 0); +} else { + x_382 = x_377; +} +lean_ctor_set(x_382, 0, x_372); +lean_ctor_set(x_382, 1, x_373); +lean_ctor_set(x_382, 2, x_381); +lean_ctor_set(x_382, 3, x_374); +lean_ctor_set(x_382, 4, x_375); +lean_ctor_set(x_382, 5, x_376); +if (lean_is_scalar(x_371)) { x_383 = lean_alloc_ctor(0, 6, 0); } else { - x_383 = x_378; + x_383 = x_371; } -lean_ctor_set(x_383, 0, x_373); -lean_ctor_set(x_383, 1, x_374); -lean_ctor_set(x_383, 2, x_382); -lean_ctor_set(x_383, 3, x_375); -lean_ctor_set(x_383, 4, x_376); -lean_ctor_set(x_383, 5, x_377); -if (lean_is_scalar(x_372)) { - x_384 = lean_alloc_ctor(0, 6, 0); +lean_ctor_set(x_383, 0, x_382); +lean_ctor_set(x_383, 1, x_366); +lean_ctor_set(x_383, 2, x_367); +lean_ctor_set(x_383, 3, x_368); +lean_ctor_set(x_383, 4, x_369); +lean_ctor_set(x_383, 5, x_370); +x_384 = lean_ctor_get(x_328, 1); +lean_inc(x_384); +if (lean_is_exclusive(x_328)) { + lean_ctor_release(x_328, 0); + lean_ctor_release(x_328, 1); + x_385 = x_328; } else { - x_384 = x_372; + lean_dec_ref(x_328); + x_385 = lean_box(0); } -lean_ctor_set(x_384, 0, x_383); -lean_ctor_set(x_384, 1, x_367); -lean_ctor_set(x_384, 2, x_368); -lean_ctor_set(x_384, 3, x_369); -lean_ctor_set(x_384, 4, x_370); -lean_ctor_set(x_384, 5, x_371); -if (lean_is_scalar(x_366)) { - x_385 = lean_alloc_ctor(0, 2, 0); +if (lean_is_scalar(x_385)) { + x_386 = lean_alloc_ctor(0, 2, 0); } else { - x_385 = x_366; + x_386 = x_385; } -lean_ctor_set(x_385, 0, x_384); -lean_ctor_set(x_385, 1, x_365); -if (lean_is_scalar(x_364)) { - x_386 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_386, 0, x_383); +lean_ctor_set(x_386, 1, x_384); +if (lean_is_scalar(x_361)) { + x_387 = lean_alloc_ctor(1, 2, 0); } else { - x_386 = x_364; + x_387 = x_361; } -lean_ctor_set(x_386, 0, x_363); -lean_ctor_set(x_386, 1, x_385); -return x_386; +lean_ctor_set(x_387, 0, x_359); +lean_ctor_set(x_387, 1, x_386); +return x_387; } } else { -lean_object* x_387; lean_object* x_388; lean_object* x_389; lean_object* x_390; -lean_dec(x_326); -lean_dec(x_318); +lean_object* x_388; lean_object* x_389; lean_object* x_390; lean_object* x_391; +lean_dec(x_325); +lean_dec(x_317); lean_dec(x_2); -x_387 = lean_ctor_get(x_328, 0); -lean_inc(x_387); -x_388 = lean_ctor_get(x_328, 1); +x_388 = lean_ctor_get(x_327, 0); lean_inc(x_388); -if (lean_is_exclusive(x_328)) { - lean_ctor_release(x_328, 0); - lean_ctor_release(x_328, 1); - x_389 = x_328; +x_389 = lean_ctor_get(x_327, 1); +lean_inc(x_389); +if (lean_is_exclusive(x_327)) { + lean_ctor_release(x_327, 0); + lean_ctor_release(x_327, 1); + x_390 = x_327; } else { - lean_dec_ref(x_328); - x_389 = lean_box(0); + lean_dec_ref(x_327); + x_390 = lean_box(0); } -if (lean_is_scalar(x_389)) { - x_390 = lean_alloc_ctor(1, 2, 0); +if (lean_is_scalar(x_390)) { + x_391 = lean_alloc_ctor(1, 2, 0); } else { - x_390 = x_389; + x_391 = x_390; } -lean_ctor_set(x_390, 0, x_387); -lean_ctor_set(x_390, 1, x_388); -return x_390; +lean_ctor_set(x_391, 0, x_388); +lean_ctor_set(x_391, 1, x_389); +return x_391; } } } @@ -9763,6 +10225,303 @@ lean_dec(x_1); return x_2; } } +lean_object* l_Lean_Elab_Tactic_setGoals(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +uint8_t x_4; +x_4 = !lean_is_exclusive(x_3); +if (x_4 == 0) +{ +lean_object* x_5; lean_object* x_6; lean_object* x_7; +x_5 = lean_ctor_get(x_3, 1); +lean_dec(x_5); +lean_ctor_set(x_3, 1, x_1); +x_6 = lean_box(0); +x_7 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_7, 0, x_6); +lean_ctor_set(x_7, 1, x_3); +return x_7; +} +else +{ +lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; +x_8 = lean_ctor_get(x_3, 0); +lean_inc(x_8); +lean_dec(x_3); +x_9 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_9, 0, x_8); +lean_ctor_set(x_9, 1, x_1); +x_10 = lean_box(0); +x_11 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_11, 0, x_10); +lean_ctor_set(x_11, 1, x_9); +return x_11; +} +} +} +lean_object* l_Lean_Elab_Tactic_setGoals___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; +x_4 = l_Lean_Elab_Tactic_setGoals(x_1, x_2, x_3); +lean_dec(x_2); +return x_4; +} +} +lean_object* l_List_filterAuxM___main___at_Lean_Elab_Tactic_pruneSolvedGoals___spec__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +if (lean_obj_tag(x_1) == 0) +{ +lean_object* x_5; +lean_dec(x_3); +x_5 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_5, 0, x_2); +lean_ctor_set(x_5, 1, x_4); +return x_5; +} +else +{ +uint8_t x_6; +x_6 = !lean_is_exclusive(x_1); +if (x_6 == 0) +{ +lean_object* x_7; lean_object* x_8; lean_object* x_9; +x_7 = lean_ctor_get(x_1, 0); +x_8 = lean_ctor_get(x_1, 1); +lean_inc(x_3); +lean_inc(x_7); +x_9 = l_Lean_Elab_Tactic_isExprMVarAssigned(x_7, x_3, x_4); +if (lean_obj_tag(x_9) == 0) +{ +lean_object* x_10; uint8_t x_11; +x_10 = lean_ctor_get(x_9, 0); +lean_inc(x_10); +x_11 = lean_unbox(x_10); +lean_dec(x_10); +if (x_11 == 0) +{ +lean_object* x_12; +x_12 = lean_ctor_get(x_9, 1); +lean_inc(x_12); +lean_dec(x_9); +lean_ctor_set(x_1, 1, x_2); +{ +lean_object* _tmp_0 = x_8; +lean_object* _tmp_1 = x_1; +lean_object* _tmp_3 = x_12; +x_1 = _tmp_0; +x_2 = _tmp_1; +x_4 = _tmp_3; +} +goto _start; +} +else +{ +lean_object* x_14; +lean_free_object(x_1); +lean_dec(x_7); +x_14 = lean_ctor_get(x_9, 1); +lean_inc(x_14); +lean_dec(x_9); +x_1 = x_8; +x_4 = x_14; +goto _start; +} +} +else +{ +uint8_t x_16; +lean_free_object(x_1); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_3); +lean_dec(x_2); +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; +} +} +} +else +{ +lean_object* x_20; lean_object* x_21; lean_object* x_22; +x_20 = lean_ctor_get(x_1, 0); +x_21 = lean_ctor_get(x_1, 1); +lean_inc(x_21); +lean_inc(x_20); +lean_dec(x_1); +lean_inc(x_3); +lean_inc(x_20); +x_22 = l_Lean_Elab_Tactic_isExprMVarAssigned(x_20, x_3, x_4); +if (lean_obj_tag(x_22) == 0) +{ +lean_object* x_23; uint8_t x_24; +x_23 = lean_ctor_get(x_22, 0); +lean_inc(x_23); +x_24 = lean_unbox(x_23); +lean_dec(x_23); +if (x_24 == 0) +{ +lean_object* x_25; lean_object* x_26; +x_25 = lean_ctor_get(x_22, 1); +lean_inc(x_25); +lean_dec(x_22); +x_26 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_26, 0, x_20); +lean_ctor_set(x_26, 1, x_2); +x_1 = x_21; +x_2 = x_26; +x_4 = x_25; +goto _start; +} +else +{ +lean_object* x_28; +lean_dec(x_20); +x_28 = lean_ctor_get(x_22, 1); +lean_inc(x_28); +lean_dec(x_22); +x_1 = x_21; +x_4 = x_28; +goto _start; +} +} +else +{ +lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; +lean_dec(x_21); +lean_dec(x_20); +lean_dec(x_3); +lean_dec(x_2); +x_30 = lean_ctor_get(x_22, 0); +lean_inc(x_30); +x_31 = lean_ctor_get(x_22, 1); +lean_inc(x_31); +if (lean_is_exclusive(x_22)) { + lean_ctor_release(x_22, 0); + lean_ctor_release(x_22, 1); + x_32 = x_22; +} else { + lean_dec_ref(x_22); + x_32 = lean_box(0); +} +if (lean_is_scalar(x_32)) { + x_33 = lean_alloc_ctor(1, 2, 0); +} else { + x_33 = x_32; +} +lean_ctor_set(x_33, 0, x_30); +lean_ctor_set(x_33, 1, x_31); +return x_33; +} +} +} +} +} +lean_object* l_Lean_Elab_Tactic_pruneSolvedGoals(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; +x_3 = l_Lean_Elab_Tactic_getGoals___rarg(x_2); +x_4 = lean_ctor_get(x_3, 0); +lean_inc(x_4); +x_5 = lean_ctor_get(x_3, 1); +lean_inc(x_5); +lean_dec(x_3); +x_6 = lean_box(0); +lean_inc(x_1); +x_7 = l_List_filterAuxM___main___at_Lean_Elab_Tactic_pruneSolvedGoals___spec__1(x_4, x_6, x_1, x_5); +if (lean_obj_tag(x_7) == 0) +{ +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); +x_10 = l_List_reverse___rarg(x_8); +x_11 = l_Lean_Elab_Tactic_setGoals(x_10, x_1, x_9); +lean_dec(x_1); +return x_11; +} +else +{ +uint8_t x_12; +lean_dec(x_1); +x_12 = !lean_is_exclusive(x_7); +if (x_12 == 0) +{ +return x_7; +} +else +{ +lean_object* x_13; lean_object* x_14; lean_object* x_15; +x_13 = lean_ctor_get(x_7, 0); +x_14 = lean_ctor_get(x_7, 1); +lean_inc(x_14); +lean_inc(x_13); +lean_dec(x_7); +x_15 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_15, 0, x_13); +lean_ctor_set(x_15, 1, x_14); +return x_15; +} +} +} +} +lean_object* l_Lean_Elab_Tactic_getUnsolvedGoals(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = l_Lean_Elab_Tactic_pruneSolvedGoals(x_1, x_2); +if (lean_obj_tag(x_3) == 0) +{ +lean_object* x_4; lean_object* x_5; +x_4 = lean_ctor_get(x_3, 1); +lean_inc(x_4); +lean_dec(x_3); +x_5 = l_Lean_Elab_Tactic_getGoals___rarg(x_4); +return x_5; +} +else +{ +uint8_t x_6; +x_6 = !lean_is_exclusive(x_3); +if (x_6 == 0) +{ +return x_3; +} +else +{ +lean_object* x_7; lean_object* x_8; lean_object* x_9; +x_7 = lean_ctor_get(x_3, 0); +x_8 = lean_ctor_get(x_3, 1); +lean_inc(x_8); +lean_inc(x_7); +lean_dec(x_3); +x_9 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_9, 0, x_7); +lean_ctor_set(x_9, 1, x_8); +return x_9; +} +} +} +} lean_object* _init_l_Lean_Elab_Tactic_getMainGoal___closed__1() { _start: { @@ -9794,8 +10553,12 @@ return x_2; lean_object* l_Lean_Elab_Tactic_getMainGoal(lean_object* x_1, lean_object* x_2, lean_object* x_3) { _start: { -lean_object* x_4; lean_object* x_5; -x_4 = l_Lean_Elab_Tactic_getGoals___rarg(x_3); +lean_object* x_4; +lean_inc(x_2); +x_4 = l_Lean_Elab_Tactic_getUnsolvedGoals(x_2, x_3); +if (lean_obj_tag(x_4) == 0) +{ +lean_object* x_5; x_5 = lean_ctor_get(x_4, 0); lean_inc(x_5); if (lean_obj_tag(x_5) == 0) @@ -9851,49 +10614,31 @@ return x_18; } } } -} -lean_object* l_Lean_Elab_Tactic_updateGoals(lean_object* x_1, lean_object* x_2, lean_object* x_3) { -_start: +else { -uint8_t x_4; -x_4 = !lean_is_exclusive(x_3); -if (x_4 == 0) +uint8_t x_19; +lean_dec(x_2); +lean_dec(x_1); +x_19 = !lean_is_exclusive(x_4); +if (x_19 == 0) { -lean_object* x_5; lean_object* x_6; lean_object* x_7; -x_5 = lean_ctor_get(x_3, 1); -lean_dec(x_5); -lean_ctor_set(x_3, 1, x_1); -x_6 = lean_box(0); -x_7 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_7, 0, x_6); -lean_ctor_set(x_7, 1, x_3); -return x_7; +return x_4; } else { -lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; -x_8 = lean_ctor_get(x_3, 0); -lean_inc(x_8); -lean_dec(x_3); -x_9 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_9, 0, x_8); -lean_ctor_set(x_9, 1, x_1); -x_10 = lean_box(0); -x_11 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_11, 0, x_10); -lean_ctor_set(x_11, 1, x_9); -return x_11; +lean_object* x_20; lean_object* x_21; lean_object* x_22; +x_20 = lean_ctor_get(x_4, 0); +x_21 = lean_ctor_get(x_4, 1); +lean_inc(x_21); +lean_inc(x_20); +lean_dec(x_4); +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_Lean_Elab_Tactic_updateGoals___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { -_start: -{ -lean_object* x_4; -x_4 = l_Lean_Elab_Tactic_updateGoals(x_1, x_2, x_3); -lean_dec(x_2); -return x_4; -} } lean_object* _init_l_Lean_Elab_Tactic_ensureHasNoMVars___closed__1() { _start: @@ -10032,7 +10777,7 @@ _start: { lean_object* x_5; lean_object* x_6; x_5 = l_List_append___rarg(x_2, x_1); -x_6 = l_Lean_Elab_Tactic_updateGoals(x_5, x_3, x_4); +x_6 = l_Lean_Elab_Tactic_setGoals(x_5, x_3, x_4); return x_6; } } @@ -10106,6 +10851,251 @@ lean_dec(x_3); return x_5; } } +lean_object* l_Lean_Elab_Tactic_done(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; +lean_inc(x_2); +x_4 = l_Lean_Elab_Tactic_getUnsolvedGoals(x_2, x_3); +if (lean_obj_tag(x_4) == 0) +{ +uint8_t x_5; +x_5 = !lean_is_exclusive(x_4); +if (x_5 == 0) +{ +lean_object* x_6; lean_object* x_7; uint8_t x_8; +x_6 = lean_ctor_get(x_4, 0); +x_7 = lean_ctor_get(x_4, 1); +x_8 = l_List_isEmpty___rarg(x_6); +if (x_8 == 0) +{ +lean_object* x_9; +lean_free_object(x_4); +x_9 = l_Lean_Elab_Tactic_reportUnsolvedGoals(x_1, x_6, x_2, x_7); +return x_9; +} +else +{ +lean_object* x_10; +lean_dec(x_6); +lean_dec(x_2); +lean_dec(x_1); +x_10 = lean_box(0); +lean_ctor_set(x_4, 0, x_10); +return x_4; +} +} +else +{ +lean_object* x_11; lean_object* x_12; uint8_t x_13; +x_11 = lean_ctor_get(x_4, 0); +x_12 = lean_ctor_get(x_4, 1); +lean_inc(x_12); +lean_inc(x_11); +lean_dec(x_4); +x_13 = l_List_isEmpty___rarg(x_11); +if (x_13 == 0) +{ +lean_object* x_14; +x_14 = l_Lean_Elab_Tactic_reportUnsolvedGoals(x_1, x_11, x_2, x_12); +return x_14; +} +else +{ +lean_object* x_15; lean_object* x_16; +lean_dec(x_11); +lean_dec(x_2); +lean_dec(x_1); +x_15 = lean_box(0); +x_16 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_16, 0, x_15); +lean_ctor_set(x_16, 1, x_12); +return x_16; +} +} +} +else +{ +uint8_t x_17; +lean_dec(x_2); +lean_dec(x_1); +x_17 = !lean_is_exclusive(x_4); +if (x_17 == 0) +{ +return x_4; +} +else +{ +lean_object* x_18; lean_object* x_19; lean_object* x_20; +x_18 = lean_ctor_get(x_4, 0); +x_19 = lean_ctor_get(x_4, 1); +lean_inc(x_19); +lean_inc(x_18); +lean_dec(x_4); +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_Elab_Tactic_focus___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; +lean_inc(x_3); +lean_inc(x_1); +x_5 = l_Lean_Elab_Tactic_getMainGoal(x_1, x_3, x_4); +if (lean_obj_tag(x_5) == 0) +{ +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; +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_ctor_get(x_6, 0); +lean_inc(x_8); +x_9 = lean_ctor_get(x_6, 1); +lean_inc(x_9); +lean_dec(x_6); +x_10 = lean_box(0); +x_11 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_11, 0, x_8); +lean_ctor_set(x_11, 1, x_10); +x_12 = l_Lean_Elab_Tactic_setGoals(x_11, x_3, x_7); +x_13 = lean_ctor_get(x_12, 1); +lean_inc(x_13); +lean_dec(x_12); +lean_inc(x_3); +x_14 = lean_apply_2(x_2, x_3, x_13); +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); +lean_inc(x_3); +x_17 = l_Lean_Elab_Tactic_done(x_1, x_3, x_16); +if (lean_obj_tag(x_17) == 0) +{ +lean_object* x_18; lean_object* x_19; uint8_t x_20; +x_18 = lean_ctor_get(x_17, 1); +lean_inc(x_18); +lean_dec(x_17); +x_19 = l_Lean_Elab_Tactic_setGoals(x_9, x_3, x_18); +lean_dec(x_3); +x_20 = !lean_is_exclusive(x_19); +if (x_20 == 0) +{ +lean_object* x_21; +x_21 = lean_ctor_get(x_19, 0); +lean_dec(x_21); +lean_ctor_set(x_19, 0, x_15); +return x_19; +} +else +{ +lean_object* x_22; lean_object* x_23; +x_22 = lean_ctor_get(x_19, 1); +lean_inc(x_22); +lean_dec(x_19); +x_23 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_23, 0, x_15); +lean_ctor_set(x_23, 1, x_22); +return x_23; +} +} +else +{ +uint8_t x_24; +lean_dec(x_15); +lean_dec(x_9); +lean_dec(x_3); +x_24 = !lean_is_exclusive(x_17); +if (x_24 == 0) +{ +return x_17; +} +else +{ +lean_object* x_25; lean_object* x_26; lean_object* x_27; +x_25 = lean_ctor_get(x_17, 0); +x_26 = lean_ctor_get(x_17, 1); +lean_inc(x_26); +lean_inc(x_25); +lean_dec(x_17); +x_27 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_27, 0, x_25); +lean_ctor_set(x_27, 1, x_26); +return x_27; +} +} +} +else +{ +uint8_t x_28; +lean_dec(x_9); +lean_dec(x_3); +lean_dec(x_1); +x_28 = !lean_is_exclusive(x_14); +if (x_28 == 0) +{ +return x_14; +} +else +{ +lean_object* x_29; lean_object* x_30; lean_object* x_31; +x_29 = lean_ctor_get(x_14, 0); +x_30 = lean_ctor_get(x_14, 1); +lean_inc(x_30); +lean_inc(x_29); +lean_dec(x_14); +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_3); +lean_dec(x_2); +lean_dec(x_1); +x_32 = !lean_is_exclusive(x_5); +if (x_32 == 0) +{ +return x_5; +} +else +{ +lean_object* x_33; lean_object* x_34; lean_object* x_35; +x_33 = lean_ctor_get(x_5, 0); +x_34 = lean_ctor_get(x_5, 1); +lean_inc(x_34); +lean_inc(x_33); +lean_dec(x_5); +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_Elab_Tactic_focus(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_Lean_Elab_Tactic_focus___rarg), 4, 0); +return x_2; +} +} lean_object* l_Lean_Elab_Tactic_evalSeq(lean_object* x_1, lean_object* x_2, lean_object* x_3) { _start: { @@ -11026,7 +12016,7 @@ lean_object* x_18; lean_object* x_19; x_18 = lean_ctor_get(x_17, 1); lean_inc(x_18); lean_dec(x_17); -x_19 = l_Lean_Elab_Tactic_updateGoals(x_13, x_2, x_18); +x_19 = l_Lean_Elab_Tactic_setGoals(x_13, x_2, x_18); lean_dec(x_2); return x_19; } @@ -11130,6 +12120,437 @@ x_5 = l_Lean_Elab_Tactic_addBuiltinTactic(x_2, x_3, x_4, x_1); return x_5; } } +lean_object* l_Lean_Elab_Tactic_evalRefine___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; lean_object* x_9; +x_7 = lean_ctor_get(x_4, 2); +lean_inc(x_7); +x_8 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_8, 0, x_7); +lean_inc(x_5); +lean_inc(x_8); +x_9 = l_Lean_Elab_Tactic_elabTerm(x_1, x_8, x_5, x_6); +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); +lean_inc(x_5); +lean_inc(x_2); +x_12 = l_Lean_Elab_Tactic_ensureHasType(x_2, x_8, x_10, x_5, x_11); +if (lean_obj_tag(x_12) == 0) +{ +lean_object* x_13; lean_object* x_14; lean_object* x_15; +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_5); +lean_inc(x_13); +x_15 = l_Lean_Elab_Tactic_assignExprMVar(x_3, x_13, x_5, x_14); +if (lean_obj_tag(x_15) == 0) +{ +lean_object* x_16; lean_object* x_17; +x_16 = lean_ctor_get(x_15, 1); +lean_inc(x_16); +lean_dec(x_15); +x_17 = l_Lean_Elab_Tactic_collectMVars(x_2, x_13, x_5, x_16); +return x_17; +} +else +{ +uint8_t x_18; +lean_dec(x_13); +lean_dec(x_5); +lean_dec(x_2); +x_18 = !lean_is_exclusive(x_15); +if (x_18 == 0) +{ +return x_15; +} +else +{ +lean_object* x_19; lean_object* x_20; lean_object* x_21; +x_19 = lean_ctor_get(x_15, 0); +x_20 = lean_ctor_get(x_15, 1); +lean_inc(x_20); +lean_inc(x_19); +lean_dec(x_15); +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 +{ +uint8_t x_22; +lean_dec(x_5); +lean_dec(x_3); +lean_dec(x_2); +x_22 = !lean_is_exclusive(x_12); +if (x_22 == 0) +{ +return x_12; +} +else +{ +lean_object* x_23; lean_object* x_24; lean_object* x_25; +x_23 = lean_ctor_get(x_12, 0); +x_24 = lean_ctor_get(x_12, 1); +lean_inc(x_24); +lean_inc(x_23); +lean_dec(x_12); +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 +{ +uint8_t x_26; +lean_dec(x_8); +lean_dec(x_5); +lean_dec(x_3); +lean_dec(x_2); +x_26 = !lean_is_exclusive(x_9); +if (x_26 == 0) +{ +return x_9; +} +else +{ +lean_object* x_27; lean_object* x_28; lean_object* x_29; +x_27 = lean_ctor_get(x_9, 0); +x_28 = lean_ctor_get(x_9, 1); +lean_inc(x_28); +lean_inc(x_27); +lean_dec(x_9); +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* _init_l_Lean_Elab_Tactic_evalRefine___closed__1() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Elab_Tactic_registerBuiltinTacticAttr___lambda__1___closed__3; +x_2 = l_Lean_Parser_Tactic_refine___elambda__1___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* l_Lean_Elab_Tactic_evalRefine(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +uint8_t x_4; lean_object* x_31; uint8_t x_32; +x_31 = l_Lean_Elab_Tactic_evalRefine___closed__1; +lean_inc(x_1); +x_32 = l_Lean_Syntax_isOfKind(x_1, x_31); +if (x_32 == 0) +{ +uint8_t x_33; +x_33 = 0; +x_4 = x_33; +goto block_30; +} +else +{ +lean_object* x_34; lean_object* x_35; lean_object* x_36; uint8_t x_37; +x_34 = l_Lean_Syntax_getArgs(x_1); +x_35 = lean_array_get_size(x_34); +lean_dec(x_34); +x_36 = lean_unsigned_to_nat(2u); +x_37 = lean_nat_dec_eq(x_35, x_36); +lean_dec(x_35); +x_4 = x_37; +goto block_30; +} +block_30: +{ +uint8_t x_5; +x_5 = l_coeDecidableEq(x_4); +if (x_5 == 0) +{ +lean_object* x_6; +lean_dec(x_1); +x_6 = l_Lean_Elab_Tactic_throwUnsupportedSyntax___rarg(x_2, x_3); +return x_6; +} +else +{ +lean_object* x_7; lean_object* x_8; lean_object* x_9; +x_7 = lean_unsigned_to_nat(1u); +x_8 = l_Lean_Syntax_getArg(x_1, x_7); +lean_inc(x_2); +lean_inc(x_1); +x_9 = l_Lean_Elab_Tactic_getMainGoal(x_1, x_2, x_3); +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; lean_object* x_16; lean_object* x_17; +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_ctor_get(x_10, 0); +lean_inc(x_12); +x_13 = lean_ctor_get(x_10, 1); +lean_inc(x_13); +lean_dec(x_10); +lean_inc(x_12); +x_14 = lean_alloc_closure((void*)(l_Lean_Elab_Tactic_getMVarDecl___boxed), 3, 1); +lean_closure_set(x_14, 0, x_12); +lean_inc(x_12); +x_15 = lean_alloc_closure((void*)(l_Lean_Elab_Tactic_evalRefine___lambda__1___boxed), 6, 3); +lean_closure_set(x_15, 0, x_8); +lean_closure_set(x_15, 1, x_1); +lean_closure_set(x_15, 2, x_12); +x_16 = lean_alloc_closure((void*)(l_ReaderT_bind___at_Lean_Elab_Tactic_monadLog___spec__2___rarg), 4, 2); +lean_closure_set(x_16, 0, x_14); +lean_closure_set(x_16, 1, x_15); +lean_inc(x_2); +x_17 = l_Lean_Elab_Tactic_withMVarContext___rarg(x_12, x_16, x_2, x_11); +lean_dec(x_12); +if (lean_obj_tag(x_17) == 0) +{ +lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; +x_18 = lean_ctor_get(x_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_List_append___rarg(x_18, x_13); +x_21 = l_Lean_Elab_Tactic_setGoals(x_20, x_2, x_19); +lean_dec(x_2); +return x_21; +} +else +{ +uint8_t x_22; +lean_dec(x_13); +lean_dec(x_2); +x_22 = !lean_is_exclusive(x_17); +if (x_22 == 0) +{ +return x_17; +} +else +{ +lean_object* x_23; lean_object* x_24; lean_object* x_25; +x_23 = lean_ctor_get(x_17, 0); +x_24 = lean_ctor_get(x_17, 1); +lean_inc(x_24); +lean_inc(x_23); +lean_dec(x_17); +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 +{ +uint8_t x_26; +lean_dec(x_8); +lean_dec(x_2); +lean_dec(x_1); +x_26 = !lean_is_exclusive(x_9); +if (x_26 == 0) +{ +return x_9; +} +else +{ +lean_object* x_27; lean_object* x_28; lean_object* x_29; +x_27 = lean_ctor_get(x_9, 0); +x_28 = lean_ctor_get(x_9, 1); +lean_inc(x_28); +lean_inc(x_27); +lean_dec(x_9); +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_Tactic_evalRefine___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_Elab_Tactic_evalRefine___lambda__1(x_1, x_2, x_3, x_4, x_5, x_6); +lean_dec(x_4); +return x_7; +} +} +lean_object* _init_l___regBuiltinTactic_Lean_Elab_Tactic_evalRefine___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("evalRefine"); +return x_1; +} +} +lean_object* _init_l___regBuiltinTactic_Lean_Elab_Tactic_evalRefine___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Elab_Tactic_declareBuiltinTactic___closed__3; +x_2 = l___regBuiltinTactic_Lean_Elab_Tactic_evalRefine___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* _init_l___regBuiltinTactic_Lean_Elab_Tactic_evalRefine___closed__3() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_Elab_Tactic_evalRefine), 3, 0); +return x_1; +} +} +lean_object* l___regBuiltinTactic_Lean_Elab_Tactic_evalRefine(lean_object* x_1) { +_start: +{ +lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; +x_2 = l_Lean_Elab_Tactic_evalRefine___closed__1; +x_3 = l___regBuiltinTactic_Lean_Elab_Tactic_evalRefine___closed__2; +x_4 = l___regBuiltinTactic_Lean_Elab_Tactic_evalRefine___closed__3; +x_5 = l_Lean_Elab_Tactic_addBuiltinTactic(x_2, x_3, x_4, x_1); +return x_5; +} +} +lean_object* l_Lean_Elab_Tactic_evalNestedTacticBlock(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; +x_4 = lean_unsigned_to_nat(1u); +x_5 = l_Lean_Syntax_getArg(x_1, x_4); +x_6 = lean_alloc_closure((void*)(l_Lean_Elab_Tactic_evalTactic), 3, 1); +lean_closure_set(x_6, 0, x_5); +x_7 = l_Lean_Elab_Tactic_focus___rarg(x_1, x_6, x_2, x_3); +return x_7; +} +} +lean_object* _init_l___regBuiltinTactic_Lean_Elab_Tactic_evalNestedTacticBlock___closed__1() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Elab_Tactic_registerBuiltinTacticAttr___lambda__1___closed__3; +x_2 = l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* _init_l___regBuiltinTactic_Lean_Elab_Tactic_evalNestedTacticBlock___closed__2() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("evalNestedTacticBlock"); +return x_1; +} +} +lean_object* _init_l___regBuiltinTactic_Lean_Elab_Tactic_evalNestedTacticBlock___closed__3() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Elab_Tactic_declareBuiltinTactic___closed__3; +x_2 = l___regBuiltinTactic_Lean_Elab_Tactic_evalNestedTacticBlock___closed__2; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* _init_l___regBuiltinTactic_Lean_Elab_Tactic_evalNestedTacticBlock___closed__4() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_Elab_Tactic_evalNestedTacticBlock), 3, 0); +return x_1; +} +} +lean_object* l___regBuiltinTactic_Lean_Elab_Tactic_evalNestedTacticBlock(lean_object* x_1) { +_start: +{ +lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; +x_2 = l___regBuiltinTactic_Lean_Elab_Tactic_evalNestedTacticBlock___closed__1; +x_3 = l___regBuiltinTactic_Lean_Elab_Tactic_evalNestedTacticBlock___closed__3; +x_4 = l___regBuiltinTactic_Lean_Elab_Tactic_evalNestedTacticBlock___closed__4; +x_5 = l_Lean_Elab_Tactic_addBuiltinTactic(x_2, x_3, x_4, x_1); +return x_5; +} +} +lean_object* l_Lean_Elab_Tactic_evalNestedTacticBlockCurly(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; +x_4 = l_Lean_Elab_Tactic_evalNestedTacticBlock(x_1, x_2, x_3); +return x_4; +} +} +lean_object* _init_l___regBuiltinTactic_Lean_Elab_Tactic_evalNestedTacticBlockCurly___closed__1() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Elab_Tactic_registerBuiltinTacticAttr___lambda__1___closed__3; +x_2 = l_Lean_Parser_Tactic_nestedTacticBlockCurly___elambda__1___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* _init_l___regBuiltinTactic_Lean_Elab_Tactic_evalNestedTacticBlockCurly___closed__2() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("evalNestedTacticBlockCurly"); +return x_1; +} +} +lean_object* _init_l___regBuiltinTactic_Lean_Elab_Tactic_evalNestedTacticBlockCurly___closed__3() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Elab_Tactic_declareBuiltinTactic___closed__3; +x_2 = l___regBuiltinTactic_Lean_Elab_Tactic_evalNestedTacticBlockCurly___closed__2; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* _init_l___regBuiltinTactic_Lean_Elab_Tactic_evalNestedTacticBlockCurly___closed__4() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_Elab_Tactic_evalNestedTacticBlockCurly), 3, 0); +return x_1; +} +} +lean_object* l___regBuiltinTactic_Lean_Elab_Tactic_evalNestedTacticBlockCurly(lean_object* x_1) { +_start: +{ +lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; +x_2 = l___regBuiltinTactic_Lean_Elab_Tactic_evalNestedTacticBlockCurly___closed__1; +x_3 = l___regBuiltinTactic_Lean_Elab_Tactic_evalNestedTacticBlockCurly___closed__3; +x_4 = l___regBuiltinTactic_Lean_Elab_Tactic_evalNestedTacticBlockCurly___closed__4; +x_5 = l_Lean_Elab_Tactic_addBuiltinTactic(x_2, x_3, x_4, x_1); +return x_5; +} +} lean_object* _init_l___private_Init_Lean_Elab_Tactic_Basic_2__regTraceClasses___closed__1() { _start: { @@ -11196,6 +12617,7 @@ return x_13; } } } +lean_object* initialize_Init_Lean_Util_CollectMVars(lean_object*); lean_object* initialize_Init_Lean_Elab_Util(lean_object*); lean_object* initialize_Init_Lean_Elab_Term(lean_object*); lean_object* initialize_Init_Lean_Meta_Tactic_Assumption(lean_object*); @@ -11205,6 +12627,9 @@ lean_object* initialize_Init_Lean_Elab_Tactic_Basic(lean_object* w) { lean_object * res; if (_G_initialized) return lean_mk_io_result(lean_box(0)); _G_initialized = true; +res = initialize_Init_Lean_Util_CollectMVars(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); res = initialize_Init_Lean_Elab_Util(lean_io_mk_world()); if (lean_io_result_is_error(res)) return res; lean_dec_ref(res); @@ -11217,12 +12642,32 @@ lean_dec_ref(res); res = initialize_Init_Lean_Meta_Tactic_Intro(lean_io_mk_world()); if (lean_io_result_is_error(res)) return res; lean_dec_ref(res); +l_Lean_Elab_Term_reportUnsolvedGoals___closed__1 = _init_l_Lean_Elab_Term_reportUnsolvedGoals___closed__1(); +lean_mark_persistent(l_Lean_Elab_Term_reportUnsolvedGoals___closed__1); +l_Lean_Elab_Term_reportUnsolvedGoals___closed__2 = _init_l_Lean_Elab_Term_reportUnsolvedGoals___closed__2(); +lean_mark_persistent(l_Lean_Elab_Term_reportUnsolvedGoals___closed__2); +l_Lean_Elab_Term_reportUnsolvedGoals___closed__3 = _init_l_Lean_Elab_Term_reportUnsolvedGoals___closed__3(); +lean_mark_persistent(l_Lean_Elab_Term_reportUnsolvedGoals___closed__3); +l_Lean_Elab_Term_reportUnsolvedGoals___closed__4 = _init_l_Lean_Elab_Term_reportUnsolvedGoals___closed__4(); +lean_mark_persistent(l_Lean_Elab_Term_reportUnsolvedGoals___closed__4); +l_Lean_Elab_Term_reportUnsolvedGoals___closed__5 = _init_l_Lean_Elab_Term_reportUnsolvedGoals___closed__5(); +lean_mark_persistent(l_Lean_Elab_Term_reportUnsolvedGoals___closed__5); l_Lean_Elab_Tactic_State_inhabited___closed__1 = _init_l_Lean_Elab_Tactic_State_inhabited___closed__1(); lean_mark_persistent(l_Lean_Elab_Tactic_State_inhabited___closed__1); l_Lean_Elab_Tactic_State_inhabited = _init_l_Lean_Elab_Tactic_State_inhabited(); lean_mark_persistent(l_Lean_Elab_Tactic_State_inhabited); +l_Lean_Elab_Tactic_EStateM_Backtrackable___closed__1 = _init_l_Lean_Elab_Tactic_EStateM_Backtrackable___closed__1(); +lean_mark_persistent(l_Lean_Elab_Tactic_EStateM_Backtrackable___closed__1); +l_Lean_Elab_Tactic_EStateM_Backtrackable___closed__2 = _init_l_Lean_Elab_Tactic_EStateM_Backtrackable___closed__2(); +lean_mark_persistent(l_Lean_Elab_Tactic_EStateM_Backtrackable___closed__2); +l_Lean_Elab_Tactic_EStateM_Backtrackable___closed__3 = _init_l_Lean_Elab_Tactic_EStateM_Backtrackable___closed__3(); +lean_mark_persistent(l_Lean_Elab_Tactic_EStateM_Backtrackable___closed__3); +l_Lean_Elab_Tactic_EStateM_Backtrackable = _init_l_Lean_Elab_Tactic_EStateM_Backtrackable(); +lean_mark_persistent(l_Lean_Elab_Tactic_EStateM_Backtrackable); l_Lean_Elab_Tactic_liftTermElabM___rarg___closed__1 = _init_l_Lean_Elab_Tactic_liftTermElabM___rarg___closed__1(); lean_mark_persistent(l_Lean_Elab_Tactic_liftTermElabM___rarg___closed__1); +l_Lean_Elab_Tactic_collectMVars___closed__1 = _init_l_Lean_Elab_Tactic_collectMVars___closed__1(); +lean_mark_persistent(l_Lean_Elab_Tactic_collectMVars___closed__1); l_Lean_Elab_Tactic_monadLog___closed__1 = _init_l_Lean_Elab_Tactic_monadLog___closed__1(); lean_mark_persistent(l_Lean_Elab_Tactic_monadLog___closed__1); l_Lean_Elab_Tactic_monadLog___closed__2 = _init_l_Lean_Elab_Tactic_monadLog___closed__2(); @@ -11394,6 +12839,39 @@ lean_mark_persistent(l___regBuiltinTactic_Lean_Elab_Tactic_evalExact___closed__3 res = l___regBuiltinTactic_Lean_Elab_Tactic_evalExact(lean_io_mk_world()); if (lean_io_result_is_error(res)) return res; lean_dec_ref(res); +l_Lean_Elab_Tactic_evalRefine___closed__1 = _init_l_Lean_Elab_Tactic_evalRefine___closed__1(); +lean_mark_persistent(l_Lean_Elab_Tactic_evalRefine___closed__1); +l___regBuiltinTactic_Lean_Elab_Tactic_evalRefine___closed__1 = _init_l___regBuiltinTactic_Lean_Elab_Tactic_evalRefine___closed__1(); +lean_mark_persistent(l___regBuiltinTactic_Lean_Elab_Tactic_evalRefine___closed__1); +l___regBuiltinTactic_Lean_Elab_Tactic_evalRefine___closed__2 = _init_l___regBuiltinTactic_Lean_Elab_Tactic_evalRefine___closed__2(); +lean_mark_persistent(l___regBuiltinTactic_Lean_Elab_Tactic_evalRefine___closed__2); +l___regBuiltinTactic_Lean_Elab_Tactic_evalRefine___closed__3 = _init_l___regBuiltinTactic_Lean_Elab_Tactic_evalRefine___closed__3(); +lean_mark_persistent(l___regBuiltinTactic_Lean_Elab_Tactic_evalRefine___closed__3); +res = l___regBuiltinTactic_Lean_Elab_Tactic_evalRefine(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); +l___regBuiltinTactic_Lean_Elab_Tactic_evalNestedTacticBlock___closed__1 = _init_l___regBuiltinTactic_Lean_Elab_Tactic_evalNestedTacticBlock___closed__1(); +lean_mark_persistent(l___regBuiltinTactic_Lean_Elab_Tactic_evalNestedTacticBlock___closed__1); +l___regBuiltinTactic_Lean_Elab_Tactic_evalNestedTacticBlock___closed__2 = _init_l___regBuiltinTactic_Lean_Elab_Tactic_evalNestedTacticBlock___closed__2(); +lean_mark_persistent(l___regBuiltinTactic_Lean_Elab_Tactic_evalNestedTacticBlock___closed__2); +l___regBuiltinTactic_Lean_Elab_Tactic_evalNestedTacticBlock___closed__3 = _init_l___regBuiltinTactic_Lean_Elab_Tactic_evalNestedTacticBlock___closed__3(); +lean_mark_persistent(l___regBuiltinTactic_Lean_Elab_Tactic_evalNestedTacticBlock___closed__3); +l___regBuiltinTactic_Lean_Elab_Tactic_evalNestedTacticBlock___closed__4 = _init_l___regBuiltinTactic_Lean_Elab_Tactic_evalNestedTacticBlock___closed__4(); +lean_mark_persistent(l___regBuiltinTactic_Lean_Elab_Tactic_evalNestedTacticBlock___closed__4); +res = l___regBuiltinTactic_Lean_Elab_Tactic_evalNestedTacticBlock(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); +l___regBuiltinTactic_Lean_Elab_Tactic_evalNestedTacticBlockCurly___closed__1 = _init_l___regBuiltinTactic_Lean_Elab_Tactic_evalNestedTacticBlockCurly___closed__1(); +lean_mark_persistent(l___regBuiltinTactic_Lean_Elab_Tactic_evalNestedTacticBlockCurly___closed__1); +l___regBuiltinTactic_Lean_Elab_Tactic_evalNestedTacticBlockCurly___closed__2 = _init_l___regBuiltinTactic_Lean_Elab_Tactic_evalNestedTacticBlockCurly___closed__2(); +lean_mark_persistent(l___regBuiltinTactic_Lean_Elab_Tactic_evalNestedTacticBlockCurly___closed__2); +l___regBuiltinTactic_Lean_Elab_Tactic_evalNestedTacticBlockCurly___closed__3 = _init_l___regBuiltinTactic_Lean_Elab_Tactic_evalNestedTacticBlockCurly___closed__3(); +lean_mark_persistent(l___regBuiltinTactic_Lean_Elab_Tactic_evalNestedTacticBlockCurly___closed__3); +l___regBuiltinTactic_Lean_Elab_Tactic_evalNestedTacticBlockCurly___closed__4 = _init_l___regBuiltinTactic_Lean_Elab_Tactic_evalNestedTacticBlockCurly___closed__4(); +lean_mark_persistent(l___regBuiltinTactic_Lean_Elab_Tactic_evalNestedTacticBlockCurly___closed__4); +res = l___regBuiltinTactic_Lean_Elab_Tactic_evalNestedTacticBlockCurly(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); l___private_Init_Lean_Elab_Tactic_Basic_2__regTraceClasses___closed__1 = _init_l___private_Init_Lean_Elab_Tactic_Basic_2__regTraceClasses___closed__1(); lean_mark_persistent(l___private_Init_Lean_Elab_Tactic_Basic_2__regTraceClasses___closed__1); res = l___private_Init_Lean_Elab_Tactic_Basic_2__regTraceClasses(lean_io_mk_world()); diff --git a/stage0/stdlib/Init/Lean/Elab/Term.c b/stage0/stdlib/Init/Lean/Elab/Term.c index 1ab0e29fdc..ac324c4cdf 100644 --- a/stage0/stdlib/Init/Lean/Elab/Term.c +++ b/stage0/stdlib/Init/Lean/Elab/Term.c @@ -68,6 +68,7 @@ lean_object* l_Lean_Elab_Term_mkTermElabAttribute___closed__3; lean_object* l_Lean_Elab_Term_synthesizeInstMVarCore___closed__2; extern lean_object* l_IO_Prim_fopenFlags___closed__12; lean_object* l_Lean_Elab_Term_resettingSynthInstanceCacheWhen(lean_object*); +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabNamedHole___closed__2; lean_object* l_Lean_Elab_Term_monadLog___closed__3; lean_object* l_Lean_Format_pretty(lean_object*, lean_object*); lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabChar___closed__3; @@ -83,6 +84,7 @@ lean_object* l___private_Init_Lean_Elab_Term_14__mkConsts___boxed(lean_object*, lean_object* l_Lean_Meta_mkAppM(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_levelMVarToParam___closed__1; lean_object* l_Lean_Elab_Term_elabParen(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Syntax_getIdAt(lean_object*, lean_object*); lean_object* l_ReaderT_read___at_Lean_Elab_Term_monadLog___spec__1(lean_object*, lean_object*); lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabNum___closed__2; extern lean_object* l_Lean_maxRecDepthErrorMessage; @@ -100,6 +102,7 @@ extern lean_object* l_Lean_Parser_Term_type___elambda__1___closed__2; uint8_t l_List_elem___main___at_Lean_addAliasEntry___spec__18(lean_object*, lean_object*); extern lean_object* l_Prod_HasRepr___rarg___closed__1; lean_object* l___private_Init_Lean_Elab_Term_4__isCDot___boxed(lean_object*); +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabNamedHole___closed__1; lean_object* l_Lean_Meta_Exception_toMessageData(lean_object*); lean_object* l_Lean_mkMVar(lean_object*); extern lean_object* l_Array_empty___closed__1; @@ -215,6 +218,7 @@ lean_object* l_Lean_Elab_Term_termElabAttribute___closed__2; lean_object* l_Lean_Elab_Term_ensureHasType(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_IO_ofExcept___at_Lean_registerClassAttr___spec__1(lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_getTraceState(lean_object*); +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabNamedHole___closed__3; lean_object* l_Array_foldlStepMAux___main___at_Lean_Syntax_foldSepRevArgsM___spec__1(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_mkFreshTypeMVar(lean_object*, uint8_t, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_elabTermAux___main___closed__1; @@ -352,6 +356,7 @@ lean_object* l___private_Init_Lean_Elab_Term_6__exceptionToSorry___closed__2; lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabListLit___closed__3; lean_object* l_Lean_Elab_Term_expandCDot_x3f___closed__3; lean_object* l_Lean_Elab_Term_logTrace(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +extern lean_object* l_Lean_Parser_Term_namedHole___elambda__1___closed__2; lean_object* l_Lean_Elab_Term_trySynthInstance(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_liftLevelM___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_elabStr___closed__2; @@ -473,6 +478,7 @@ lean_object* l_Lean_Elab_Term_withNode___rarg(lean_object*, lean_object*, lean_o extern lean_object* l_Lean_nullKind___closed__2; lean_object* l_Lean_ParametricAttribute_setParam___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_List_foldlM___main___at___private_Init_Lean_Elab_Term_14__mkConsts___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Term_elabNamedHole___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_termElabAttribute; lean_object* l_Lean_Elab_Term_expandCDot_x3f___closed__1; lean_object* l_fix1___rarg___lambda__1___boxed(lean_object*, lean_object*); @@ -484,6 +490,7 @@ lean_object* l_Lean_Elab_Term_getDeclName_x3f___boxed(lean_object*, lean_object* lean_object* l_Lean_Elab_Term_isDefEq(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_synthesizeInstMVarCore___closed__10; lean_object* l_Lean_ConstantInfo_lparams(lean_object*); +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabNamedHole(lean_object*); lean_object* l_Lean_Elab_Term_mkFreshAnonymousName(lean_object*); lean_object* l_Lean_Elab_Term_withLCtx(lean_object*); lean_object* l_Lean_Elab_Term_withNode(lean_object*); @@ -555,6 +562,7 @@ lean_object* l_PersistentArray_foldlM___at___private_Init_Lean_Elab_Term_3__from lean_object* l_Lean_Elab_Term_decLevel_x3f___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_ensureType___closed__1; lean_object* l_Lean_Elab_log___at_Lean_Elab_Term_logTrace___spec__1(lean_object*, uint8_t, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Term_elabNamedHole(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_getPos___at_Lean_Elab_Term_throwError___spec__2(lean_object*, lean_object*, lean_object*); lean_object* l_Array_umapMAux___main___at_Lean_Elab_Term_expandCDot_x3f___spec__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_elabTerm___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -17362,6 +17370,63 @@ x_5 = l_Lean_Elab_Term_addBuiltinTermElab(x_2, x_3, x_4, x_1); return x_5; } } +lean_object* l_Lean_Elab_Term_elabNamedHole(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; uint8_t x_7; lean_object* x_8; +x_5 = lean_unsigned_to_nat(1u); +x_6 = l_Lean_Syntax_getIdAt(x_1, x_5); +x_7 = 2; +x_8 = l_Lean_Elab_Term_mkFreshExprMVar(x_1, x_2, x_7, x_6, x_3, x_4); +return x_8; +} +} +lean_object* l_Lean_Elab_Term_elabNamedHole___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_Term_elabNamedHole(x_1, x_2, x_3, x_4); +lean_dec(x_1); +return x_5; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabNamedHole___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("elabNamedHole"); +return x_1; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabNamedHole___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Elab_Term_declareBuiltinTermElab___closed__4; +x_2 = l___regBuiltinTermElab_Lean_Elab_Term_elabNamedHole___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabNamedHole___closed__3() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_Elab_Term_elabNamedHole___boxed), 4, 0); +return x_1; +} +} +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabNamedHole(lean_object* x_1) { +_start: +{ +lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; +x_2 = l_Lean_Parser_Term_namedHole___elambda__1___closed__2; +x_3 = l___regBuiltinTermElab_Lean_Elab_Term_elabNamedHole___closed__2; +x_4 = l___regBuiltinTermElab_Lean_Elab_Term_elabNamedHole___closed__3; +x_5 = l_Lean_Elab_Term_addBuiltinTermElab(x_2, x_3, x_4, x_1); +return x_5; +} +} lean_object* _init_l___private_Init_Lean_Elab_Term_9__mkPairsAux___main___closed__1() { _start: { @@ -20802,6 +20867,15 @@ lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabHole___closed__3) res = l___regBuiltinTermElab_Lean_Elab_Term_elabHole(lean_io_mk_world()); if (lean_io_result_is_error(res)) return res; lean_dec_ref(res); +l___regBuiltinTermElab_Lean_Elab_Term_elabNamedHole___closed__1 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabNamedHole___closed__1(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabNamedHole___closed__1); +l___regBuiltinTermElab_Lean_Elab_Term_elabNamedHole___closed__2 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabNamedHole___closed__2(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabNamedHole___closed__2); +l___regBuiltinTermElab_Lean_Elab_Term_elabNamedHole___closed__3 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabNamedHole___closed__3(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabNamedHole___closed__3); +res = l___regBuiltinTermElab_Lean_Elab_Term_elabNamedHole(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); l___private_Init_Lean_Elab_Term_9__mkPairsAux___main___closed__1 = _init_l___private_Init_Lean_Elab_Term_9__mkPairsAux___main___closed__1(); lean_mark_persistent(l___private_Init_Lean_Elab_Term_9__mkPairsAux___main___closed__1); l___private_Init_Lean_Elab_Term_9__mkPairsAux___main___closed__2 = _init_l___private_Init_Lean_Elab_Term_9__mkPairsAux___main___closed__2(); diff --git a/stage0/stdlib/Init/Lean/LocalContext.c b/stage0/stdlib/Init/Lean/LocalContext.c index eea4ab8357..a018046955 100644 --- a/stage0/stdlib/Init/Lean/LocalContext.c +++ b/stage0/stdlib/Init/Lean/LocalContext.c @@ -1,6 +1,6 @@ // Lean compiler output // Module: Init.Lean.LocalContext -// Imports: Init.Data.PersistentArray.Basic Init.Data.PersistentHashMap.Basic Init.Lean.Expr +// Imports: Init.Data.PersistentArray.Basic Init.Data.PersistentHashMap.Basic Init.Lean.Expr Init.Lean.Hygiene #include "runtime/lean.h" #if defined(__clang__) #pragma clang diagnostic ignored "-Wunused-parameter" @@ -19,6 +19,7 @@ lean_object* l_PersistentArray_forM___rarg(lean_object*, lean_object*, lean_obje lean_object* l_PersistentArray_foldlFromMAux___main___at_Lean_LocalContext_foldlFrom___spec__3___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_array_set(lean_object*, lean_object*, lean_object*); uint8_t lean_local_ctx_uses_user_name(lean_object*, lean_object*); +lean_object* l_Lean_extractMacroScopes(lean_object*); lean_object* l_Lean_LocalContext_mkLambda___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_PersistentArray_anyMAux___main___at_Lean_LocalContext_anyM___spec__2___rarg(lean_object*, lean_object*, lean_object*); size_t l_USize_add(size_t, size_t); @@ -99,6 +100,7 @@ lean_object* l_PersistentArray_findM_x3f___rarg(lean_object*, lean_object*, lean size_t l_USize_shiftRight(size_t, size_t); lean_object* l_Array_indexOfAux___main___at_Lean_LocalContext_erase___spec__3(lean_object*, lean_object*, lean_object*); uint8_t l_PersistentArray_anyMAux___main___at_Lean_LocalContext_any___spec__2(lean_object*, lean_object*); +lean_object* l___private_Init_Lean_LocalContext_2__getUnusedNameAux(lean_object*, lean_object*, lean_object*); uint8_t l_Lean_LocalContext_contains(lean_object*, lean_object*); lean_object* l_PersistentArray_anyMAux___main___at_Lean_LocalContext_any___spec__2___boxed(lean_object*, lean_object*); lean_object* l_Array_iterateMAux___main___at_Lean_LocalContext_foldl___spec__4___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -170,7 +172,6 @@ lean_object* l_Nat_foldRevAux___main___at_Lean_LocalContext_mkBinding___spec__1_ lean_object* l_Array_findRevMAux___main___at_Lean_LocalContext_findDeclRev_x3f___spec__5(lean_object*); uint8_t l_PersistentHashMap_isEmpty___at_Lean_LocalContext_isEmpty___spec__1(lean_object*); lean_object* lean_array_fset(lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_LocalContext_getUnusedNameAux___main(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_LocalContext_findDeclM_x3f___rarg___lambda__1(lean_object*, lean_object*, lean_object*); lean_object* l_Array_anyRangeMAux___main___at_Lean_LocalContext_anyM___spec__5___rarg___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_PersistentArray_findM_x3f___at_Lean_LocalContext_findDecl_x3f___spec__2___rarg___boxed(lean_object*, lean_object*); @@ -310,10 +311,10 @@ lean_object* l_Lean_LocalContext_foldlFromM___boxed(lean_object*); lean_object* l_PersistentArray_anyM___at_Lean_LocalContext_anyM___spec__1___boxed(lean_object*); lean_object* l_Lean_mkForall(lean_object*, uint8_t, lean_object*, lean_object*); lean_object* l_PersistentArray_get_x21___at___private_Init_Lean_LocalContext_1__popTailNoneAux___main___spec__1(lean_object*, lean_object*); +lean_object* l___private_Init_Lean_LocalContext_2__getUnusedNameAux___main(lean_object*, lean_object*, lean_object*); lean_object* l_PersistentHashMap_eraseAux___main___at_Lean_LocalContext_erase___spec__2(lean_object*, size_t, lean_object*); lean_object* l_Lean_LocalContext_foldl___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_PersistentArray_foldlFromM___at_Lean_LocalContext_foldlFrom___spec__2(lean_object*); -lean_object* l_Lean_LocalContext_getUnusedNameAux(lean_object*, lean_object*, lean_object*); lean_object* l_Array_anyRangeMAux___main___at_Lean_LocalContext_anyM___spec__5___boxed(lean_object*); uint8_t l_Lean_LocalContext_any(lean_object*, lean_object*); lean_object* l_Lean_LocalContext_get_x21___closed__1; @@ -578,7 +579,7 @@ _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_LocalDecl_value___closed__1; -x_2 = lean_unsigned_to_nat(49u); +x_2 = lean_unsigned_to_nat(50u); x_3 = lean_unsigned_to_nat(21u); x_4 = l_Lean_LocalDecl_value___closed__2; x_5 = l___private_Init_Util_1__mkPanicMessage(x_1, x_2, x_3, x_4); @@ -1626,7 +1627,7 @@ _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_LocalDecl_value___closed__1; -x_2 = lean_unsigned_to_nat(106u); +x_2 = lean_unsigned_to_nat(107u); x_3 = lean_unsigned_to_nat(12u); x_4 = l_Lean_LocalContext_get_x21___closed__1; x_5 = l___private_Init_Util_1__mkPanicMessage(x_1, x_2, x_3, x_4); @@ -3114,7 +3115,7 @@ x_4 = lean_box(x_3); return x_4; } } -lean_object* l_Lean_LocalContext_getUnusedNameAux___main(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +lean_object* l___private_Init_Lean_LocalContext_2__getUnusedNameAux___main(lean_object* x_1, lean_object* x_2, lean_object* x_3) { _start: { lean_object* x_4; uint8_t x_5; @@ -3149,35 +3150,39 @@ goto _start; } } } -lean_object* l_Lean_LocalContext_getUnusedNameAux(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +lean_object* l___private_Init_Lean_LocalContext_2__getUnusedNameAux(lean_object* x_1, lean_object* x_2, lean_object* x_3) { _start: { lean_object* x_4; -x_4 = l_Lean_LocalContext_getUnusedNameAux___main(x_1, x_2, x_3); +x_4 = l___private_Init_Lean_LocalContext_2__getUnusedNameAux___main(x_1, x_2, x_3); return x_4; } } lean_object* lean_local_ctx_get_unused_name(lean_object* x_1, lean_object* x_2) { _start: { -uint8_t x_3; -lean_inc(x_2); +lean_object* x_3; lean_object* x_4; uint8_t x_5; +x_3 = l_Lean_extractMacroScopes(x_2); +x_4 = lean_ctor_get(x_3, 0); +lean_inc(x_4); +lean_dec(x_3); +lean_inc(x_4); lean_inc(x_1); -x_3 = lean_local_ctx_uses_user_name(x_1, x_2); -if (x_3 == 0) +x_5 = lean_local_ctx_uses_user_name(x_1, x_4); +if (x_5 == 0) { lean_dec(x_1); -return x_2; +return x_4; } else { -lean_object* x_4; lean_object* x_5; lean_object* x_6; -x_4 = lean_unsigned_to_nat(1u); -x_5 = l_Lean_LocalContext_getUnusedNameAux___main(x_1, x_2, x_4); -x_6 = lean_ctor_get(x_5, 0); -lean_inc(x_6); -lean_dec(x_5); -return x_6; +lean_object* x_6; lean_object* x_7; lean_object* x_8; +x_6 = lean_unsigned_to_nat(1u); +x_7 = l___private_Init_Lean_LocalContext_2__getUnusedNameAux___main(x_1, x_4, x_6); +x_8 = lean_ctor_get(x_7, 0); +lean_inc(x_8); +lean_dec(x_7); +return x_8; } } } @@ -5178,7 +5183,7 @@ _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_LocalDecl_value___closed__1; -x_2 = lean_unsigned_to_nat(270u); +x_2 = lean_unsigned_to_nat(272u); x_3 = lean_unsigned_to_nat(12u); x_4 = l_Lean_LocalContext_get_x21___closed__1; x_5 = l___private_Init_Util_1__mkPanicMessage(x_1, x_2, x_3, x_4); @@ -7215,6 +7220,7 @@ return x_4; lean_object* initialize_Init_Data_PersistentArray_Basic(lean_object*); lean_object* initialize_Init_Data_PersistentHashMap_Basic(lean_object*); lean_object* initialize_Init_Lean_Expr(lean_object*); +lean_object* initialize_Init_Lean_Hygiene(lean_object*); static bool _G_initialized = false; lean_object* initialize_Init_Lean_LocalContext(lean_object* w) { lean_object * res; @@ -7229,6 +7235,9 @@ lean_dec_ref(res); res = initialize_Init_Lean_Expr(lean_io_mk_world()); if (lean_io_result_is_error(res)) return res; lean_dec_ref(res); +res = initialize_Init_Lean_Hygiene(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); l_Lean_LocalDecl_Inhabited___closed__1 = _init_l_Lean_LocalDecl_Inhabited___closed__1(); lean_mark_persistent(l_Lean_LocalDecl_Inhabited___closed__1); l_Lean_LocalDecl_Inhabited = _init_l_Lean_LocalDecl_Inhabited(); diff --git a/stage0/stdlib/Init/Lean/Meta/Tactic/Intro.c b/stage0/stdlib/Init/Lean/Meta/Tactic/Intro.c index 84ed7dd20a..2869480cd1 100644 --- a/stage0/stdlib/Init/Lean/Meta/Tactic/Intro.c +++ b/stage0/stdlib/Init/Lean/Meta/Tactic/Intro.c @@ -22,7 +22,7 @@ extern lean_object* l_EIO_Monad___closed__1; lean_object* lean_local_ctx_mk_let_decl(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_ReaderT_bind___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); uint8_t l_Array_isEqvAux___main___at_Lean_Meta_introN___spec__5(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Meta_withNewLocalInstances___main___at_Lean_Meta_introN___spec__3___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_withNewLocalInstances___main___at_Lean_Meta_introN___spec__3___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_isClassQuick___main(lean_object*, lean_object*, lean_object*); extern lean_object* l_Array_empty___closed__1; lean_object* l_ReaderT_bind___at_Lean_Meta_isClassExpensive___main___spec__4___rarg(lean_object*, lean_object*, lean_object*, lean_object*); @@ -46,7 +46,7 @@ lean_object* l_Lean_Meta_getMVarType(lean_object*, lean_object*, lean_object*); lean_object* lean_nat_sub(lean_object*, lean_object*); lean_object* lean_array_get(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_introN___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Meta_introNCoreAux___main___rarg___lambda__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_introNCoreAux___main___rarg___lambda__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_introNCoreAux___main___rarg___lambda__1___closed__5; lean_object* lean_name_mk_string(lean_object*, lean_object*); lean_object* l_Lean_Meta_introNCoreAux___main___rarg___lambda__1___closed__3; @@ -66,6 +66,7 @@ lean_object* lean_local_ctx_mk_local_decl(lean_object*, lean_object*, lean_objec lean_object* l_Lean_Meta_throwTacticEx___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_checkNotAssigned(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_introNCoreAux___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_Meta_mkFreshExprMVar(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*); lean_object* l_Lean_Meta_introNCore___at_Lean_Meta_introN___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_withNewLocalInstances___main___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_LocalInstance_hasBeq___closed__1; @@ -77,12 +78,12 @@ extern lean_object* l_Lean_Expr_Inhabited; lean_object* l_Lean_Meta_introNCoreAux___main___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); uint8_t l_Lean_LocalInstance_beq(lean_object*, lean_object*); extern lean_object* l_Lean_Meta_resettingSynthInstanceCache___rarg___closed__1; -lean_object* l_Lean_Meta_mkFreshExprSyntheticOpaqueMVar(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_mkAuxName(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_introNCoreAux___main___at_Lean_Meta_introN___spec__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_getMVarTag___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_introNCore___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_isClassExpensive(lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Meta_withNewLocalInstances___main___at_Lean_Meta_introN___spec__3(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_withNewLocalInstances___main___at_Lean_Meta_introN___spec__3(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_introNCoreAux___main(lean_object*); lean_object* l_Lean_Meta_introNCoreAux(lean_object*); lean_object* l_Lean_Meta_intro1___boxed(lean_object*, lean_object*, lean_object*); @@ -163,150 +164,158 @@ return x_15; } } } -lean_object* l_Lean_Meta_introNCoreAux___main___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* l_Lean_Meta_introNCoreAux___main___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) { _start: { -lean_object* x_6; -lean_inc(x_3); -lean_inc(x_1); -x_6 = l_Lean_Meta_mkLambda(x_1, x_3, x_4, x_5); -if (lean_obj_tag(x_6) == 0) -{ -uint8_t x_7; -x_7 = !lean_is_exclusive(x_6); -if (x_7 == 0) -{ -lean_object* x_8; uint8_t x_9; -x_8 = lean_ctor_get(x_6, 1); -x_9 = !lean_is_exclusive(x_8); -if (x_9 == 0) -{ -lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; -x_10 = lean_ctor_get(x_6, 0); -x_11 = lean_ctor_get(x_8, 1); -x_12 = l_Lean_MetavarContext_assignExpr(x_11, x_2, x_10); -lean_ctor_set(x_8, 1, x_12); -x_13 = l_Lean_Expr_mvarId_x21(x_3); -lean_dec(x_3); -x_14 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_14, 0, x_1); -lean_ctor_set(x_14, 1, x_13); -lean_ctor_set(x_6, 0, x_14); -return x_6; -} -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; lean_object* x_25; -x_15 = lean_ctor_get(x_6, 0); -x_16 = lean_ctor_get(x_8, 0); -x_17 = lean_ctor_get(x_8, 1); -x_18 = lean_ctor_get(x_8, 2); -x_19 = lean_ctor_get(x_8, 3); -x_20 = lean_ctor_get(x_8, 4); -x_21 = lean_ctor_get(x_8, 5); -lean_inc(x_21); -lean_inc(x_20); -lean_inc(x_19); -lean_inc(x_18); -lean_inc(x_17); -lean_inc(x_16); +uint8_t x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; +x_7 = 2; +lean_inc(x_5); +x_8 = l_Lean_Meta_mkFreshExprMVar(x_1, x_4, x_7, x_5, x_6); +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_22 = l_Lean_MetavarContext_assignExpr(x_17, x_2, x_15); -x_23 = lean_alloc_ctor(0, 6, 0); -lean_ctor_set(x_23, 0, x_16); -lean_ctor_set(x_23, 1, x_22); -lean_ctor_set(x_23, 2, x_18); -lean_ctor_set(x_23, 3, x_19); -lean_ctor_set(x_23, 4, x_20); -lean_ctor_set(x_23, 5, x_21); -x_24 = l_Lean_Expr_mvarId_x21(x_3); -lean_dec(x_3); -x_25 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_25, 0, x_1); -lean_ctor_set(x_25, 1, x_24); -lean_ctor_set(x_6, 1, x_23); -lean_ctor_set(x_6, 0, x_25); -return x_6; -} +lean_inc(x_9); +lean_inc(x_2); +x_11 = l_Lean_Meta_mkLambda(x_2, x_9, x_5, x_10); +if (lean_obj_tag(x_11) == 0) +{ +uint8_t x_12; +x_12 = !lean_is_exclusive(x_11); +if (x_12 == 0) +{ +lean_object* x_13; uint8_t x_14; +x_13 = lean_ctor_get(x_11, 1); +x_14 = !lean_is_exclusive(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; +x_15 = lean_ctor_get(x_11, 0); +x_16 = lean_ctor_get(x_13, 1); +x_17 = l_Lean_MetavarContext_assignExpr(x_16, x_3, x_15); +lean_ctor_set(x_13, 1, x_17); +x_18 = l_Lean_Expr_mvarId_x21(x_9); +lean_dec(x_9); +x_19 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_19, 0, x_2); +lean_ctor_set(x_19, 1, x_18); +lean_ctor_set(x_11, 0, x_19); +return x_11; } 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; lean_object* x_38; lean_object* x_39; -x_26 = lean_ctor_get(x_6, 1); -x_27 = lean_ctor_get(x_6, 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; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; +x_20 = lean_ctor_get(x_11, 0); +x_21 = lean_ctor_get(x_13, 0); +x_22 = lean_ctor_get(x_13, 1); +x_23 = lean_ctor_get(x_13, 2); +x_24 = lean_ctor_get(x_13, 3); +x_25 = lean_ctor_get(x_13, 4); +x_26 = lean_ctor_get(x_13, 5); lean_inc(x_26); -lean_inc(x_27); -lean_dec(x_6); -x_28 = lean_ctor_get(x_26, 0); -lean_inc(x_28); -x_29 = lean_ctor_get(x_26, 1); -lean_inc(x_29); -x_30 = lean_ctor_get(x_26, 2); -lean_inc(x_30); -x_31 = lean_ctor_get(x_26, 3); -lean_inc(x_31); -x_32 = lean_ctor_get(x_26, 4); -lean_inc(x_32); -x_33 = lean_ctor_get(x_26, 5); -lean_inc(x_33); -if (lean_is_exclusive(x_26)) { - lean_ctor_release(x_26, 0); - lean_ctor_release(x_26, 1); - lean_ctor_release(x_26, 2); - lean_ctor_release(x_26, 3); - lean_ctor_release(x_26, 4); - lean_ctor_release(x_26, 5); - x_34 = x_26; -} else { - lean_dec_ref(x_26); - x_34 = lean_box(0); -} -x_35 = l_Lean_MetavarContext_assignExpr(x_29, x_2, x_27); -if (lean_is_scalar(x_34)) { - x_36 = lean_alloc_ctor(0, 6, 0); -} else { - x_36 = x_34; -} -lean_ctor_set(x_36, 0, x_28); -lean_ctor_set(x_36, 1, x_35); -lean_ctor_set(x_36, 2, x_30); -lean_ctor_set(x_36, 3, x_31); -lean_ctor_set(x_36, 4, x_32); -lean_ctor_set(x_36, 5, x_33); -x_37 = l_Lean_Expr_mvarId_x21(x_3); -lean_dec(x_3); -x_38 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_38, 0, x_1); -lean_ctor_set(x_38, 1, 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_36); -return x_39; +lean_inc(x_25); +lean_inc(x_24); +lean_inc(x_23); +lean_inc(x_22); +lean_inc(x_21); +lean_dec(x_13); +x_27 = l_Lean_MetavarContext_assignExpr(x_22, x_3, x_20); +x_28 = lean_alloc_ctor(0, 6, 0); +lean_ctor_set(x_28, 0, x_21); +lean_ctor_set(x_28, 1, x_27); +lean_ctor_set(x_28, 2, x_23); +lean_ctor_set(x_28, 3, x_24); +lean_ctor_set(x_28, 4, x_25); +lean_ctor_set(x_28, 5, x_26); +x_29 = l_Lean_Expr_mvarId_x21(x_9); +lean_dec(x_9); +x_30 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_30, 0, x_2); +lean_ctor_set(x_30, 1, x_29); +lean_ctor_set(x_11, 1, x_28); +lean_ctor_set(x_11, 0, x_30); +return x_11; } } else { -uint8_t x_40; +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; +x_31 = lean_ctor_get(x_11, 1); +x_32 = lean_ctor_get(x_11, 0); +lean_inc(x_31); +lean_inc(x_32); +lean_dec(x_11); +x_33 = lean_ctor_get(x_31, 0); +lean_inc(x_33); +x_34 = lean_ctor_get(x_31, 1); +lean_inc(x_34); +x_35 = lean_ctor_get(x_31, 2); +lean_inc(x_35); +x_36 = lean_ctor_get(x_31, 3); +lean_inc(x_36); +x_37 = lean_ctor_get(x_31, 4); +lean_inc(x_37); +x_38 = lean_ctor_get(x_31, 5); +lean_inc(x_38); +if (lean_is_exclusive(x_31)) { + lean_ctor_release(x_31, 0); + lean_ctor_release(x_31, 1); + lean_ctor_release(x_31, 2); + lean_ctor_release(x_31, 3); + lean_ctor_release(x_31, 4); + lean_ctor_release(x_31, 5); + x_39 = x_31; +} else { + lean_dec_ref(x_31); + x_39 = lean_box(0); +} +x_40 = l_Lean_MetavarContext_assignExpr(x_34, x_3, x_32); +if (lean_is_scalar(x_39)) { + x_41 = lean_alloc_ctor(0, 6, 0); +} else { + x_41 = x_39; +} +lean_ctor_set(x_41, 0, x_33); +lean_ctor_set(x_41, 1, x_40); +lean_ctor_set(x_41, 2, x_35); +lean_ctor_set(x_41, 3, x_36); +lean_ctor_set(x_41, 4, x_37); +lean_ctor_set(x_41, 5, x_38); +x_42 = l_Lean_Expr_mvarId_x21(x_9); +lean_dec(x_9); +x_43 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_43, 0, x_2); +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_41); +return x_44; +} +} +else +{ +uint8_t x_45; +lean_dec(x_9); lean_dec(x_3); lean_dec(x_2); -lean_dec(x_1); -x_40 = !lean_is_exclusive(x_6); -if (x_40 == 0) +x_45 = !lean_is_exclusive(x_11); +if (x_45 == 0) { -return x_6; +return x_11; } else { -lean_object* x_41; lean_object* x_42; lean_object* x_43; -x_41 = lean_ctor_get(x_6, 0); -x_42 = lean_ctor_get(x_6, 1); -lean_inc(x_42); -lean_inc(x_41); -lean_dec(x_6); -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; +lean_object* x_46; lean_object* x_47; lean_object* x_48; +x_46 = lean_ctor_get(x_11, 0); +x_47 = lean_ctor_get(x_11, 1); +lean_inc(x_47); +lean_inc(x_46); +lean_dec(x_11); +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; } } } @@ -491,7 +500,7 @@ return x_32; } else { -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; uint8_t x_76; +lean_object* x_69; lean_object* x_70; lean_object* x_71; lean_object* x_72; lean_object* x_73; lean_object* x_74; uint8_t x_75; lean_dec(x_7); lean_dec(x_3); lean_dec(x_2); @@ -499,55 +508,55 @@ x_69 = lean_array_get_size(x_5); x_70 = lean_expr_instantiate_rev_range(x_8, x_6, x_69, x_5); lean_dec(x_69); lean_dec(x_8); -x_71 = lean_box(0); -x_72 = lean_alloc_closure((void*)(l_Lean_Meta_mkFreshExprSyntheticOpaqueMVar), 4, 2); -lean_closure_set(x_72, 0, x_70); -lean_closure_set(x_72, 1, x_71); +lean_inc(x_1); +x_71 = lean_alloc_closure((void*)(l_Lean_Meta_getMVarTag___boxed), 3, 1); +lean_closure_set(x_71, 0, x_1); lean_inc(x_5); -x_73 = lean_alloc_closure((void*)(l_Lean_Meta_introNCoreAux___main___rarg___lambda__2), 5, 2); -lean_closure_set(x_73, 0, x_5); -lean_closure_set(x_73, 1, x_1); -x_74 = l_EIO_Monad___closed__1; -x_75 = lean_alloc_closure((void*)(l_ReaderT_bind___rarg), 6, 5); -lean_closure_set(x_75, 0, x_74); -lean_closure_set(x_75, 1, lean_box(0)); -lean_closure_set(x_75, 2, lean_box(0)); -lean_closure_set(x_75, 3, x_72); -lean_closure_set(x_75, 4, x_73); -x_76 = !lean_is_exclusive(x_9); -if (x_76 == 0) +x_72 = lean_alloc_closure((void*)(l_Lean_Meta_introNCoreAux___main___rarg___lambda__2), 6, 3); +lean_closure_set(x_72, 0, x_70); +lean_closure_set(x_72, 1, x_5); +lean_closure_set(x_72, 2, x_1); +x_73 = l_EIO_Monad___closed__1; +x_74 = lean_alloc_closure((void*)(l_ReaderT_bind___rarg), 6, 5); +lean_closure_set(x_74, 0, x_73); +lean_closure_set(x_74, 1, lean_box(0)); +lean_closure_set(x_74, 2, lean_box(0)); +lean_closure_set(x_74, 3, x_71); +lean_closure_set(x_74, 4, x_72); +x_75 = !lean_is_exclusive(x_9); +if (x_75 == 0) { -lean_object* x_77; lean_object* x_78; lean_object* x_79; -x_77 = lean_ctor_get(x_9, 1); -lean_dec(x_77); +lean_object* x_76; lean_object* x_77; lean_object* x_78; +x_76 = lean_ctor_get(x_9, 1); +lean_dec(x_76); lean_ctor_set(x_9, 1, x_4); -x_78 = l_Lean_Meta_introNCoreAux___main___rarg___closed__1; -x_79 = l_Lean_Meta_withNewLocalInstances___main___rarg(x_78, x_5, x_6, x_75, x_9, x_10); +x_77 = l_Lean_Meta_introNCoreAux___main___rarg___closed__1; +x_78 = l_Lean_Meta_withNewLocalInstances___main___rarg(x_77, x_5, x_6, x_74, x_9, x_10); lean_dec(x_5); -return x_79; +return x_78; } else { -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_80 = lean_ctor_get(x_9, 0); -x_81 = lean_ctor_get(x_9, 2); -x_82 = lean_ctor_get(x_9, 3); -x_83 = lean_ctor_get(x_9, 4); -lean_inc(x_83); +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; +x_79 = lean_ctor_get(x_9, 0); +x_80 = lean_ctor_get(x_9, 2); +x_81 = lean_ctor_get(x_9, 3); +x_82 = lean_ctor_get(x_9, 4); lean_inc(x_82); lean_inc(x_81); lean_inc(x_80); +lean_inc(x_79); lean_dec(x_9); -x_84 = lean_alloc_ctor(0, 5, 0); -lean_ctor_set(x_84, 0, x_80); -lean_ctor_set(x_84, 1, x_4); -lean_ctor_set(x_84, 2, x_81); -lean_ctor_set(x_84, 3, x_82); -lean_ctor_set(x_84, 4, x_83); -x_85 = l_Lean_Meta_introNCoreAux___main___rarg___closed__1; -x_86 = l_Lean_Meta_withNewLocalInstances___main___rarg(x_85, x_5, x_6, x_75, x_84, x_10); +x_83 = lean_alloc_ctor(0, 5, 0); +lean_ctor_set(x_83, 0, x_79); +lean_ctor_set(x_83, 1, x_4); +lean_ctor_set(x_83, 2, x_80); +lean_ctor_set(x_83, 3, x_81); +lean_ctor_set(x_83, 4, x_82); +x_84 = l_Lean_Meta_introNCoreAux___main___rarg___closed__1; +x_85 = l_Lean_Meta_withNewLocalInstances___main___rarg(x_84, x_5, x_6, x_74, x_83, x_10); lean_dec(x_5); -return x_86; +return x_85; } } } @@ -2114,2114 +2123,2146 @@ return x_12; } } } -lean_object* l_Lean_Meta_withNewLocalInstances___main___at_Lean_Meta_introN___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* l_Lean_Meta_withNewLocalInstances___main___at_Lean_Meta_introN___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_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; uint8_t x_15; -x_9 = lean_array_get_size(x_2); -x_10 = lean_expr_instantiate_rev_range(x_4, x_3, x_9, x_2); -lean_dec(x_9); -x_11 = lean_box(0); -x_12 = lean_alloc_closure((void*)(l_Lean_Meta_mkFreshExprSyntheticOpaqueMVar), 4, 2); -lean_closure_set(x_12, 0, x_10); -lean_closure_set(x_12, 1, x_11); +lean_object* x_8; lean_object* x_9; lean_object* x_10; uint8_t x_11; +lean_inc(x_1); +x_8 = lean_alloc_closure((void*)(l_Lean_Meta_getMVarTag___boxed), 3, 1); +lean_closure_set(x_8, 0, x_1); lean_inc(x_1); lean_inc(x_2); -x_13 = lean_alloc_closure((void*)(l_Lean_Meta_introNCoreAux___main___rarg___lambda__2), 5, 2); -lean_closure_set(x_13, 0, x_2); -lean_closure_set(x_13, 1, x_1); -x_14 = lean_array_get_size(x_5); -x_15 = lean_nat_dec_lt(x_6, x_14); -lean_dec(x_14); -if (x_15 == 0) +lean_inc(x_3); +x_9 = lean_alloc_closure((void*)(l_Lean_Meta_introNCoreAux___main___rarg___lambda__2), 6, 3); +lean_closure_set(x_9, 0, x_3); +lean_closure_set(x_9, 1, x_2); +lean_closure_set(x_9, 2, x_1); +x_10 = lean_array_get_size(x_4); +x_11 = lean_nat_dec_lt(x_5, x_10); +lean_dec(x_10); +if (x_11 == 0) { -lean_object* x_16; -lean_dec(x_6); +lean_object* x_12; +lean_dec(x_5); +lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); -x_16 = l_ReaderT_bind___at_Lean_Meta_isClassExpensive___main___spec__4___rarg(x_12, x_13, x_7, x_8); -return x_16; +x_12 = l_ReaderT_bind___at_Lean_Meta_isClassExpensive___main___spec__4___rarg(x_8, x_9, x_6, x_7); +return x_12; } else { -lean_object* x_17; lean_object* x_18; -lean_dec(x_13); -lean_dec(x_12); -x_17 = lean_array_fget(x_5, x_6); -lean_inc(x_7); -x_18 = l_Lean_Meta_getFVarLocalDecl(x_17, x_7, x_8); +lean_object* x_13; lean_object* x_14; +lean_dec(x_9); +lean_dec(x_8); +x_13 = lean_array_fget(x_4, x_5); +lean_inc(x_6); +x_14 = l_Lean_Meta_getFVarLocalDecl(x_13, x_6, x_7); +if (lean_obj_tag(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_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_LocalDecl_type(x_15); +lean_dec(x_15); +lean_inc(x_6); +lean_inc(x_17); +x_18 = l_Lean_Meta_isClassQuick___main(x_17, x_6, 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_19; x_19 = lean_ctor_get(x_18, 0); lean_inc(x_19); +switch (lean_obj_tag(x_19)) { +case 0: +{ +lean_object* x_20; lean_object* x_21; lean_object* x_22; +lean_dec(x_17); +lean_dec(x_13); x_20 = lean_ctor_get(x_18, 1); lean_inc(x_20); lean_dec(x_18); -x_21 = l_Lean_LocalDecl_type(x_19); -lean_dec(x_19); -lean_inc(x_7); -lean_inc(x_21); -x_22 = l_Lean_Meta_isClassQuick___main(x_21, x_7, x_20); -if (lean_obj_tag(x_22) == 0) -{ -lean_object* x_23; -x_23 = lean_ctor_get(x_22, 0); -lean_inc(x_23); -switch (lean_obj_tag(x_23)) { -case 0: -{ -lean_object* x_24; lean_object* x_25; lean_object* x_26; -lean_dec(x_21); -lean_dec(x_17); -x_24 = lean_ctor_get(x_22, 1); -lean_inc(x_24); -lean_dec(x_22); -x_25 = lean_unsigned_to_nat(1u); -x_26 = lean_nat_add(x_6, x_25); -lean_dec(x_6); -x_6 = x_26; -x_8 = x_24; +x_21 = lean_unsigned_to_nat(1u); +x_22 = lean_nat_add(x_5, x_21); +lean_dec(x_5); +x_5 = x_22; +x_7 = x_20; goto _start; } case 1: { -lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; uint8_t x_32; -lean_dec(x_21); -x_28 = lean_ctor_get(x_22, 1); -lean_inc(x_28); -lean_dec(x_22); -x_29 = lean_ctor_get(x_23, 0); -lean_inc(x_29); -lean_dec(x_23); -x_30 = lean_unsigned_to_nat(1u); -x_31 = lean_nat_add(x_6, x_30); -lean_dec(x_6); -x_32 = !lean_is_exclusive(x_28); -if (x_32 == 0) +lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; uint8_t x_28; +lean_dec(x_17); +x_24 = lean_ctor_get(x_18, 1); +lean_inc(x_24); +lean_dec(x_18); +x_25 = lean_ctor_get(x_19, 0); +lean_inc(x_25); +lean_dec(x_19); +x_26 = lean_unsigned_to_nat(1u); +x_27 = lean_nat_add(x_5, x_26); +lean_dec(x_5); +x_28 = !lean_is_exclusive(x_24); +if (x_28 == 0) { -lean_object* x_33; uint8_t x_34; -x_33 = lean_ctor_get(x_28, 2); -x_34 = !lean_is_exclusive(x_33); -if (x_34 == 0) +lean_object* x_29; uint8_t x_30; +x_29 = lean_ctor_get(x_24, 2); +x_30 = !lean_is_exclusive(x_29); +if (x_30 == 0) { -lean_object* x_35; lean_object* x_36; uint8_t x_37; -x_35 = lean_ctor_get(x_33, 2); -x_36 = l_Lean_Meta_resettingSynthInstanceCache___rarg___closed__1; -lean_ctor_set(x_33, 2, x_36); -x_37 = !lean_is_exclusive(x_7); -if (x_37 == 0) +lean_object* x_31; lean_object* x_32; uint8_t x_33; +x_31 = lean_ctor_get(x_29, 2); +x_32 = l_Lean_Meta_resettingSynthInstanceCache___rarg___closed__1; +lean_ctor_set(x_29, 2, x_32); +x_33 = !lean_is_exclusive(x_6); +if (x_33 == 0) { -lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; -x_38 = lean_ctor_get(x_7, 2); -x_39 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_39, 0, x_29); -lean_ctor_set(x_39, 1, x_17); -x_40 = lean_array_push(x_38, x_39); -lean_ctor_set(x_7, 2, x_40); -x_41 = l_Lean_Meta_withNewLocalInstances___main___at_Lean_Meta_introN___spec__3(x_1, x_2, x_3, x_4, x_5, x_31, x_7, x_28); -if (lean_obj_tag(x_41) == 0) +lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; +x_34 = lean_ctor_get(x_6, 2); +x_35 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_35, 0, x_25); +lean_ctor_set(x_35, 1, x_13); +x_36 = lean_array_push(x_34, x_35); +lean_ctor_set(x_6, 2, x_36); +x_37 = l_Lean_Meta_withNewLocalInstances___main___at_Lean_Meta_introN___spec__3(x_1, x_2, x_3, x_4, x_27, x_6, x_24); +if (lean_obj_tag(x_37) == 0) { -lean_object* x_42; lean_object* x_43; uint8_t x_44; -x_42 = lean_ctor_get(x_41, 1); -lean_inc(x_42); -x_43 = lean_ctor_get(x_42, 2); -lean_inc(x_43); -x_44 = !lean_is_exclusive(x_41); +lean_object* x_38; lean_object* x_39; uint8_t x_40; +x_38 = lean_ctor_get(x_37, 1); +lean_inc(x_38); +x_39 = lean_ctor_get(x_38, 2); +lean_inc(x_39); +x_40 = !lean_is_exclusive(x_37); +if (x_40 == 0) +{ +lean_object* x_41; uint8_t x_42; +x_41 = lean_ctor_get(x_37, 1); +lean_dec(x_41); +x_42 = !lean_is_exclusive(x_38); +if (x_42 == 0) +{ +lean_object* x_43; uint8_t x_44; +x_43 = lean_ctor_get(x_38, 2); +lean_dec(x_43); +x_44 = !lean_is_exclusive(x_39); if (x_44 == 0) { -lean_object* x_45; uint8_t x_46; -x_45 = lean_ctor_get(x_41, 1); +lean_object* x_45; +x_45 = lean_ctor_get(x_39, 2); lean_dec(x_45); -x_46 = !lean_is_exclusive(x_42); -if (x_46 == 0) -{ -lean_object* x_47; uint8_t x_48; -x_47 = lean_ctor_get(x_42, 2); -lean_dec(x_47); -x_48 = !lean_is_exclusive(x_43); -if (x_48 == 0) -{ -lean_object* x_49; -x_49 = lean_ctor_get(x_43, 2); -lean_dec(x_49); -lean_ctor_set(x_43, 2, x_35); -return x_41; +lean_ctor_set(x_39, 2, x_31); +return x_37; } else { -lean_object* x_50; lean_object* x_51; lean_object* x_52; -x_50 = lean_ctor_get(x_43, 0); -x_51 = lean_ctor_get(x_43, 1); +lean_object* x_46; lean_object* x_47; lean_object* x_48; +x_46 = lean_ctor_get(x_39, 0); +x_47 = lean_ctor_get(x_39, 1); +lean_inc(x_47); +lean_inc(x_46); +lean_dec(x_39); +x_48 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_48, 0, x_46); +lean_ctor_set(x_48, 1, x_47); +lean_ctor_set(x_48, 2, x_31); +lean_ctor_set(x_38, 2, x_48); +return x_37; +} +} +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_object* x_58; +x_49 = lean_ctor_get(x_38, 0); +x_50 = lean_ctor_get(x_38, 1); +x_51 = lean_ctor_get(x_38, 3); +x_52 = lean_ctor_get(x_38, 4); +x_53 = lean_ctor_get(x_38, 5); +lean_inc(x_53); +lean_inc(x_52); lean_inc(x_51); lean_inc(x_50); -lean_dec(x_43); -x_52 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_52, 0, x_50); -lean_ctor_set(x_52, 1, x_51); -lean_ctor_set(x_52, 2, x_35); -lean_ctor_set(x_42, 2, x_52); -return x_41; -} -} -else -{ -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_53 = lean_ctor_get(x_42, 0); -x_54 = lean_ctor_get(x_42, 1); -x_55 = lean_ctor_get(x_42, 3); -x_56 = lean_ctor_get(x_42, 4); -x_57 = lean_ctor_get(x_42, 5); -lean_inc(x_57); -lean_inc(x_56); -lean_inc(x_55); +lean_inc(x_49); +lean_dec(x_38); +x_54 = lean_ctor_get(x_39, 0); lean_inc(x_54); -lean_inc(x_53); -lean_dec(x_42); -x_58 = lean_ctor_get(x_43, 0); -lean_inc(x_58); -x_59 = lean_ctor_get(x_43, 1); +x_55 = lean_ctor_get(x_39, 1); +lean_inc(x_55); +if (lean_is_exclusive(x_39)) { + lean_ctor_release(x_39, 0); + lean_ctor_release(x_39, 1); + lean_ctor_release(x_39, 2); + x_56 = x_39; +} else { + lean_dec_ref(x_39); + x_56 = lean_box(0); +} +if (lean_is_scalar(x_56)) { + x_57 = lean_alloc_ctor(0, 3, 0); +} else { + x_57 = x_56; +} +lean_ctor_set(x_57, 0, x_54); +lean_ctor_set(x_57, 1, x_55); +lean_ctor_set(x_57, 2, x_31); +x_58 = lean_alloc_ctor(0, 6, 0); +lean_ctor_set(x_58, 0, x_49); +lean_ctor_set(x_58, 1, x_50); +lean_ctor_set(x_58, 2, x_57); +lean_ctor_set(x_58, 3, x_51); +lean_ctor_set(x_58, 4, x_52); +lean_ctor_set(x_58, 5, x_53); +lean_ctor_set(x_37, 1, x_58); +return x_37; +} +} +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; lean_object* x_70; lean_object* x_71; +x_59 = lean_ctor_get(x_37, 0); lean_inc(x_59); -if (lean_is_exclusive(x_43)) { - lean_ctor_release(x_43, 0); - lean_ctor_release(x_43, 1); - lean_ctor_release(x_43, 2); - x_60 = x_43; -} else { - lean_dec_ref(x_43); - x_60 = lean_box(0); -} -if (lean_is_scalar(x_60)) { - x_61 = lean_alloc_ctor(0, 3, 0); -} else { - x_61 = x_60; -} -lean_ctor_set(x_61, 0, x_58); -lean_ctor_set(x_61, 1, x_59); -lean_ctor_set(x_61, 2, x_35); -x_62 = lean_alloc_ctor(0, 6, 0); -lean_ctor_set(x_62, 0, x_53); -lean_ctor_set(x_62, 1, x_54); -lean_ctor_set(x_62, 2, x_61); -lean_ctor_set(x_62, 3, x_55); -lean_ctor_set(x_62, 4, x_56); -lean_ctor_set(x_62, 5, x_57); -lean_ctor_set(x_41, 1, x_62); -return x_41; -} -} -else -{ -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; -x_63 = lean_ctor_get(x_41, 0); +lean_dec(x_37); +x_60 = lean_ctor_get(x_38, 0); +lean_inc(x_60); +x_61 = lean_ctor_get(x_38, 1); +lean_inc(x_61); +x_62 = lean_ctor_get(x_38, 3); +lean_inc(x_62); +x_63 = lean_ctor_get(x_38, 4); lean_inc(x_63); -lean_dec(x_41); -x_64 = lean_ctor_get(x_42, 0); +x_64 = lean_ctor_get(x_38, 5); lean_inc(x_64); -x_65 = lean_ctor_get(x_42, 1); -lean_inc(x_65); -x_66 = lean_ctor_get(x_42, 3); +if (lean_is_exclusive(x_38)) { + lean_ctor_release(x_38, 0); + lean_ctor_release(x_38, 1); + lean_ctor_release(x_38, 2); + lean_ctor_release(x_38, 3); + lean_ctor_release(x_38, 4); + lean_ctor_release(x_38, 5); + x_65 = x_38; +} else { + lean_dec_ref(x_38); + x_65 = lean_box(0); +} +x_66 = lean_ctor_get(x_39, 0); lean_inc(x_66); -x_67 = lean_ctor_get(x_42, 4); +x_67 = lean_ctor_get(x_39, 1); lean_inc(x_67); -x_68 = lean_ctor_get(x_42, 5); -lean_inc(x_68); -if (lean_is_exclusive(x_42)) { - lean_ctor_release(x_42, 0); - lean_ctor_release(x_42, 1); - lean_ctor_release(x_42, 2); - lean_ctor_release(x_42, 3); - lean_ctor_release(x_42, 4); - lean_ctor_release(x_42, 5); - x_69 = x_42; +if (lean_is_exclusive(x_39)) { + lean_ctor_release(x_39, 0); + lean_ctor_release(x_39, 1); + lean_ctor_release(x_39, 2); + x_68 = x_39; } else { - lean_dec_ref(x_42); - x_69 = lean_box(0); + lean_dec_ref(x_39); + x_68 = lean_box(0); } -x_70 = lean_ctor_get(x_43, 0); -lean_inc(x_70); -x_71 = lean_ctor_get(x_43, 1); -lean_inc(x_71); -if (lean_is_exclusive(x_43)) { - lean_ctor_release(x_43, 0); - lean_ctor_release(x_43, 1); - lean_ctor_release(x_43, 2); - x_72 = x_43; +if (lean_is_scalar(x_68)) { + x_69 = lean_alloc_ctor(0, 3, 0); } else { - lean_dec_ref(x_43); - x_72 = lean_box(0); + x_69 = x_68; } -if (lean_is_scalar(x_72)) { - x_73 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_69, 0, x_66); +lean_ctor_set(x_69, 1, x_67); +lean_ctor_set(x_69, 2, x_31); +if (lean_is_scalar(x_65)) { + x_70 = lean_alloc_ctor(0, 6, 0); } else { - x_73 = x_72; + x_70 = x_65; } -lean_ctor_set(x_73, 0, x_70); -lean_ctor_set(x_73, 1, x_71); -lean_ctor_set(x_73, 2, x_35); -if (lean_is_scalar(x_69)) { - x_74 = lean_alloc_ctor(0, 6, 0); -} else { - x_74 = x_69; -} -lean_ctor_set(x_74, 0, x_64); -lean_ctor_set(x_74, 1, x_65); -lean_ctor_set(x_74, 2, x_73); -lean_ctor_set(x_74, 3, x_66); -lean_ctor_set(x_74, 4, x_67); -lean_ctor_set(x_74, 5, x_68); -x_75 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_75, 0, x_63); -lean_ctor_set(x_75, 1, x_74); -return x_75; +lean_ctor_set(x_70, 0, x_60); +lean_ctor_set(x_70, 1, x_61); +lean_ctor_set(x_70, 2, x_69); +lean_ctor_set(x_70, 3, x_62); +lean_ctor_set(x_70, 4, x_63); +lean_ctor_set(x_70, 5, x_64); +x_71 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_71, 0, x_59); +lean_ctor_set(x_71, 1, x_70); +return x_71; } } else { -lean_object* x_76; lean_object* x_77; uint8_t x_78; -x_76 = lean_ctor_get(x_41, 1); -lean_inc(x_76); -x_77 = lean_ctor_get(x_76, 2); -lean_inc(x_77); -x_78 = !lean_is_exclusive(x_41); +lean_object* x_72; lean_object* x_73; uint8_t x_74; +x_72 = lean_ctor_get(x_37, 1); +lean_inc(x_72); +x_73 = lean_ctor_get(x_72, 2); +lean_inc(x_73); +x_74 = !lean_is_exclusive(x_37); +if (x_74 == 0) +{ +lean_object* x_75; uint8_t x_76; +x_75 = lean_ctor_get(x_37, 1); +lean_dec(x_75); +x_76 = !lean_is_exclusive(x_72); +if (x_76 == 0) +{ +lean_object* x_77; uint8_t x_78; +x_77 = lean_ctor_get(x_72, 2); +lean_dec(x_77); +x_78 = !lean_is_exclusive(x_73); if (x_78 == 0) { -lean_object* x_79; uint8_t x_80; -x_79 = lean_ctor_get(x_41, 1); +lean_object* x_79; +x_79 = lean_ctor_get(x_73, 2); lean_dec(x_79); -x_80 = !lean_is_exclusive(x_76); -if (x_80 == 0) -{ -lean_object* x_81; uint8_t x_82; -x_81 = lean_ctor_get(x_76, 2); -lean_dec(x_81); -x_82 = !lean_is_exclusive(x_77); -if (x_82 == 0) -{ -lean_object* x_83; -x_83 = lean_ctor_get(x_77, 2); -lean_dec(x_83); -lean_ctor_set(x_77, 2, x_35); -return x_41; +lean_ctor_set(x_73, 2, x_31); +return x_37; } 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_object* x_80; lean_object* x_81; lean_object* x_82; +x_80 = lean_ctor_get(x_73, 0); +x_81 = lean_ctor_get(x_73, 1); +lean_inc(x_81); +lean_inc(x_80); +lean_dec(x_73); +x_82 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_82, 0, x_80); +lean_ctor_set(x_82, 1, x_81); +lean_ctor_set(x_82, 2, x_31); +lean_ctor_set(x_72, 2, x_82); +return x_37; +} +} +else +{ +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; lean_object* x_92; +x_83 = lean_ctor_get(x_72, 0); +x_84 = lean_ctor_get(x_72, 1); +x_85 = lean_ctor_get(x_72, 3); +x_86 = lean_ctor_get(x_72, 4); +x_87 = lean_ctor_get(x_72, 5); +lean_inc(x_87); +lean_inc(x_86); lean_inc(x_85); lean_inc(x_84); -lean_dec(x_77); -x_86 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_86, 0, x_84); -lean_ctor_set(x_86, 1, x_85); -lean_ctor_set(x_86, 2, x_35); -lean_ctor_set(x_76, 2, x_86); -return x_41; -} -} -else -{ -lean_object* x_87; lean_object* x_88; lean_object* x_89; lean_object* x_90; lean_object* x_91; lean_object* x_92; lean_object* x_93; lean_object* x_94; lean_object* x_95; lean_object* x_96; -x_87 = lean_ctor_get(x_76, 0); -x_88 = lean_ctor_get(x_76, 1); -x_89 = lean_ctor_get(x_76, 3); -x_90 = lean_ctor_get(x_76, 4); -x_91 = lean_ctor_get(x_76, 5); -lean_inc(x_91); -lean_inc(x_90); -lean_inc(x_89); +lean_inc(x_83); +lean_dec(x_72); +x_88 = lean_ctor_get(x_73, 0); lean_inc(x_88); -lean_inc(x_87); -lean_dec(x_76); -x_92 = lean_ctor_get(x_77, 0); -lean_inc(x_92); -x_93 = lean_ctor_get(x_77, 1); +x_89 = lean_ctor_get(x_73, 1); +lean_inc(x_89); +if (lean_is_exclusive(x_73)) { + lean_ctor_release(x_73, 0); + lean_ctor_release(x_73, 1); + lean_ctor_release(x_73, 2); + x_90 = x_73; +} else { + lean_dec_ref(x_73); + x_90 = lean_box(0); +} +if (lean_is_scalar(x_90)) { + x_91 = lean_alloc_ctor(0, 3, 0); +} else { + x_91 = x_90; +} +lean_ctor_set(x_91, 0, x_88); +lean_ctor_set(x_91, 1, x_89); +lean_ctor_set(x_91, 2, x_31); +x_92 = lean_alloc_ctor(0, 6, 0); +lean_ctor_set(x_92, 0, x_83); +lean_ctor_set(x_92, 1, x_84); +lean_ctor_set(x_92, 2, x_91); +lean_ctor_set(x_92, 3, x_85); +lean_ctor_set(x_92, 4, x_86); +lean_ctor_set(x_92, 5, x_87); +lean_ctor_set(x_37, 1, x_92); +return x_37; +} +} +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; +x_93 = lean_ctor_get(x_37, 0); lean_inc(x_93); -if (lean_is_exclusive(x_77)) { - lean_ctor_release(x_77, 0); - lean_ctor_release(x_77, 1); - lean_ctor_release(x_77, 2); - x_94 = x_77; -} else { - lean_dec_ref(x_77); - x_94 = lean_box(0); -} -if (lean_is_scalar(x_94)) { - x_95 = lean_alloc_ctor(0, 3, 0); -} else { - x_95 = x_94; -} -lean_ctor_set(x_95, 0, x_92); -lean_ctor_set(x_95, 1, x_93); -lean_ctor_set(x_95, 2, x_35); -x_96 = lean_alloc_ctor(0, 6, 0); -lean_ctor_set(x_96, 0, x_87); -lean_ctor_set(x_96, 1, x_88); -lean_ctor_set(x_96, 2, x_95); -lean_ctor_set(x_96, 3, x_89); -lean_ctor_set(x_96, 4, x_90); -lean_ctor_set(x_96, 5, x_91); -lean_ctor_set(x_41, 1, x_96); -return x_41; -} -} -else -{ -lean_object* x_97; lean_object* x_98; lean_object* x_99; lean_object* x_100; lean_object* x_101; lean_object* x_102; lean_object* x_103; lean_object* x_104; lean_object* x_105; lean_object* x_106; lean_object* x_107; lean_object* x_108; lean_object* x_109; -x_97 = lean_ctor_get(x_41, 0); +lean_dec(x_37); +x_94 = lean_ctor_get(x_72, 0); +lean_inc(x_94); +x_95 = lean_ctor_get(x_72, 1); +lean_inc(x_95); +x_96 = lean_ctor_get(x_72, 3); +lean_inc(x_96); +x_97 = lean_ctor_get(x_72, 4); lean_inc(x_97); -lean_dec(x_41); -x_98 = lean_ctor_get(x_76, 0); +x_98 = lean_ctor_get(x_72, 5); lean_inc(x_98); -x_99 = lean_ctor_get(x_76, 1); -lean_inc(x_99); -x_100 = lean_ctor_get(x_76, 3); +if (lean_is_exclusive(x_72)) { + lean_ctor_release(x_72, 0); + lean_ctor_release(x_72, 1); + lean_ctor_release(x_72, 2); + lean_ctor_release(x_72, 3); + lean_ctor_release(x_72, 4); + lean_ctor_release(x_72, 5); + x_99 = x_72; +} else { + lean_dec_ref(x_72); + x_99 = lean_box(0); +} +x_100 = lean_ctor_get(x_73, 0); lean_inc(x_100); -x_101 = lean_ctor_get(x_76, 4); +x_101 = lean_ctor_get(x_73, 1); lean_inc(x_101); -x_102 = lean_ctor_get(x_76, 5); -lean_inc(x_102); -if (lean_is_exclusive(x_76)) { - lean_ctor_release(x_76, 0); - lean_ctor_release(x_76, 1); - lean_ctor_release(x_76, 2); - lean_ctor_release(x_76, 3); - lean_ctor_release(x_76, 4); - lean_ctor_release(x_76, 5); - x_103 = x_76; +if (lean_is_exclusive(x_73)) { + lean_ctor_release(x_73, 0); + lean_ctor_release(x_73, 1); + lean_ctor_release(x_73, 2); + x_102 = x_73; } else { - lean_dec_ref(x_76); - x_103 = lean_box(0); + lean_dec_ref(x_73); + x_102 = lean_box(0); } -x_104 = lean_ctor_get(x_77, 0); -lean_inc(x_104); -x_105 = lean_ctor_get(x_77, 1); -lean_inc(x_105); -if (lean_is_exclusive(x_77)) { - lean_ctor_release(x_77, 0); - lean_ctor_release(x_77, 1); - lean_ctor_release(x_77, 2); - x_106 = x_77; +if (lean_is_scalar(x_102)) { + x_103 = lean_alloc_ctor(0, 3, 0); } else { - lean_dec_ref(x_77); - x_106 = lean_box(0); + x_103 = x_102; } -if (lean_is_scalar(x_106)) { - x_107 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_103, 0, x_100); +lean_ctor_set(x_103, 1, x_101); +lean_ctor_set(x_103, 2, x_31); +if (lean_is_scalar(x_99)) { + x_104 = lean_alloc_ctor(0, 6, 0); } else { - x_107 = x_106; + x_104 = x_99; } -lean_ctor_set(x_107, 0, x_104); -lean_ctor_set(x_107, 1, x_105); -lean_ctor_set(x_107, 2, x_35); -if (lean_is_scalar(x_103)) { - x_108 = lean_alloc_ctor(0, 6, 0); -} else { - x_108 = x_103; -} -lean_ctor_set(x_108, 0, x_98); -lean_ctor_set(x_108, 1, x_99); -lean_ctor_set(x_108, 2, x_107); -lean_ctor_set(x_108, 3, x_100); -lean_ctor_set(x_108, 4, x_101); -lean_ctor_set(x_108, 5, x_102); -x_109 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_109, 0, x_97); -lean_ctor_set(x_109, 1, x_108); -return x_109; +lean_ctor_set(x_104, 0, x_94); +lean_ctor_set(x_104, 1, x_95); +lean_ctor_set(x_104, 2, x_103); +lean_ctor_set(x_104, 3, x_96); +lean_ctor_set(x_104, 4, x_97); +lean_ctor_set(x_104, 5, x_98); +x_105 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_105, 0, x_93); +lean_ctor_set(x_105, 1, x_104); +return x_105; } } } else { -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; -x_110 = lean_ctor_get(x_7, 0); -x_111 = lean_ctor_get(x_7, 1); -x_112 = lean_ctor_get(x_7, 2); -x_113 = lean_ctor_get(x_7, 3); -x_114 = lean_ctor_get(x_7, 4); -lean_inc(x_114); -lean_inc(x_113); -lean_inc(x_112); -lean_inc(x_111); +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; +x_106 = lean_ctor_get(x_6, 0); +x_107 = lean_ctor_get(x_6, 1); +x_108 = lean_ctor_get(x_6, 2); +x_109 = lean_ctor_get(x_6, 3); +x_110 = lean_ctor_get(x_6, 4); lean_inc(x_110); -lean_dec(x_7); -x_115 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_115, 0, x_29); -lean_ctor_set(x_115, 1, x_17); -x_116 = lean_array_push(x_112, x_115); -x_117 = lean_alloc_ctor(0, 5, 0); -lean_ctor_set(x_117, 0, x_110); -lean_ctor_set(x_117, 1, x_111); -lean_ctor_set(x_117, 2, x_116); -lean_ctor_set(x_117, 3, x_113); -lean_ctor_set(x_117, 4, x_114); -x_118 = l_Lean_Meta_withNewLocalInstances___main___at_Lean_Meta_introN___spec__3(x_1, x_2, x_3, x_4, x_5, x_31, x_117, x_28); -if (lean_obj_tag(x_118) == 0) +lean_inc(x_109); +lean_inc(x_108); +lean_inc(x_107); +lean_inc(x_106); +lean_dec(x_6); +x_111 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_111, 0, x_25); +lean_ctor_set(x_111, 1, x_13); +x_112 = lean_array_push(x_108, x_111); +x_113 = lean_alloc_ctor(0, 5, 0); +lean_ctor_set(x_113, 0, x_106); +lean_ctor_set(x_113, 1, x_107); +lean_ctor_set(x_113, 2, x_112); +lean_ctor_set(x_113, 3, x_109); +lean_ctor_set(x_113, 4, x_110); +x_114 = l_Lean_Meta_withNewLocalInstances___main___at_Lean_Meta_introN___spec__3(x_1, x_2, x_3, x_4, x_27, x_113, x_24); +if (lean_obj_tag(x_114) == 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; 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; lean_object* x_132; lean_object* x_133; lean_object* x_134; -x_119 = lean_ctor_get(x_118, 1); +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_115 = lean_ctor_get(x_114, 1); +lean_inc(x_115); +x_116 = lean_ctor_get(x_115, 2); +lean_inc(x_116); +x_117 = lean_ctor_get(x_114, 0); +lean_inc(x_117); +if (lean_is_exclusive(x_114)) { + lean_ctor_release(x_114, 0); + lean_ctor_release(x_114, 1); + x_118 = x_114; +} else { + lean_dec_ref(x_114); + x_118 = lean_box(0); +} +x_119 = lean_ctor_get(x_115, 0); lean_inc(x_119); -x_120 = lean_ctor_get(x_119, 2); +x_120 = lean_ctor_get(x_115, 1); lean_inc(x_120); -x_121 = lean_ctor_get(x_118, 0); +x_121 = lean_ctor_get(x_115, 3); lean_inc(x_121); -if (lean_is_exclusive(x_118)) { - lean_ctor_release(x_118, 0); - lean_ctor_release(x_118, 1); - x_122 = x_118; -} else { - lean_dec_ref(x_118); - x_122 = lean_box(0); -} -x_123 = lean_ctor_get(x_119, 0); +x_122 = lean_ctor_get(x_115, 4); +lean_inc(x_122); +x_123 = lean_ctor_get(x_115, 5); lean_inc(x_123); -x_124 = lean_ctor_get(x_119, 1); -lean_inc(x_124); -x_125 = lean_ctor_get(x_119, 3); +if (lean_is_exclusive(x_115)) { + lean_ctor_release(x_115, 0); + lean_ctor_release(x_115, 1); + lean_ctor_release(x_115, 2); + lean_ctor_release(x_115, 3); + lean_ctor_release(x_115, 4); + lean_ctor_release(x_115, 5); + x_124 = x_115; +} else { + lean_dec_ref(x_115); + x_124 = lean_box(0); +} +x_125 = lean_ctor_get(x_116, 0); lean_inc(x_125); -x_126 = lean_ctor_get(x_119, 4); +x_126 = lean_ctor_get(x_116, 1); lean_inc(x_126); -x_127 = lean_ctor_get(x_119, 5); -lean_inc(x_127); -if (lean_is_exclusive(x_119)) { - lean_ctor_release(x_119, 0); - lean_ctor_release(x_119, 1); - lean_ctor_release(x_119, 2); - lean_ctor_release(x_119, 3); - lean_ctor_release(x_119, 4); - lean_ctor_release(x_119, 5); - x_128 = x_119; +if (lean_is_exclusive(x_116)) { + lean_ctor_release(x_116, 0); + lean_ctor_release(x_116, 1); + lean_ctor_release(x_116, 2); + x_127 = x_116; } else { - lean_dec_ref(x_119); - x_128 = lean_box(0); + lean_dec_ref(x_116); + x_127 = lean_box(0); } -x_129 = lean_ctor_get(x_120, 0); -lean_inc(x_129); -x_130 = lean_ctor_get(x_120, 1); -lean_inc(x_130); -if (lean_is_exclusive(x_120)) { - lean_ctor_release(x_120, 0); - lean_ctor_release(x_120, 1); - lean_ctor_release(x_120, 2); - x_131 = x_120; +if (lean_is_scalar(x_127)) { + x_128 = lean_alloc_ctor(0, 3, 0); } else { - lean_dec_ref(x_120); - x_131 = lean_box(0); + x_128 = x_127; } -if (lean_is_scalar(x_131)) { - x_132 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_128, 0, x_125); +lean_ctor_set(x_128, 1, x_126); +lean_ctor_set(x_128, 2, x_31); +if (lean_is_scalar(x_124)) { + x_129 = lean_alloc_ctor(0, 6, 0); } else { - x_132 = x_131; + x_129 = x_124; } -lean_ctor_set(x_132, 0, x_129); -lean_ctor_set(x_132, 1, x_130); -lean_ctor_set(x_132, 2, x_35); -if (lean_is_scalar(x_128)) { - x_133 = lean_alloc_ctor(0, 6, 0); +lean_ctor_set(x_129, 0, x_119); +lean_ctor_set(x_129, 1, x_120); +lean_ctor_set(x_129, 2, x_128); +lean_ctor_set(x_129, 3, x_121); +lean_ctor_set(x_129, 4, x_122); +lean_ctor_set(x_129, 5, x_123); +if (lean_is_scalar(x_118)) { + x_130 = lean_alloc_ctor(0, 2, 0); } else { - x_133 = x_128; + x_130 = x_118; } -lean_ctor_set(x_133, 0, x_123); -lean_ctor_set(x_133, 1, x_124); -lean_ctor_set(x_133, 2, x_132); -lean_ctor_set(x_133, 3, x_125); -lean_ctor_set(x_133, 4, x_126); -lean_ctor_set(x_133, 5, x_127); -if (lean_is_scalar(x_122)) { - x_134 = lean_alloc_ctor(0, 2, 0); -} else { - x_134 = x_122; -} -lean_ctor_set(x_134, 0, x_121); -lean_ctor_set(x_134, 1, x_133); -return x_134; +lean_ctor_set(x_130, 0, x_117); +lean_ctor_set(x_130, 1, x_129); +return x_130; } else { -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_135 = lean_ctor_get(x_118, 1); +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; +x_131 = lean_ctor_get(x_114, 1); +lean_inc(x_131); +x_132 = lean_ctor_get(x_131, 2); +lean_inc(x_132); +x_133 = lean_ctor_get(x_114, 0); +lean_inc(x_133); +if (lean_is_exclusive(x_114)) { + lean_ctor_release(x_114, 0); + lean_ctor_release(x_114, 1); + x_134 = x_114; +} else { + lean_dec_ref(x_114); + x_134 = lean_box(0); +} +x_135 = lean_ctor_get(x_131, 0); lean_inc(x_135); -x_136 = lean_ctor_get(x_135, 2); +x_136 = lean_ctor_get(x_131, 1); lean_inc(x_136); -x_137 = lean_ctor_get(x_118, 0); +x_137 = lean_ctor_get(x_131, 3); lean_inc(x_137); -if (lean_is_exclusive(x_118)) { - lean_ctor_release(x_118, 0); - lean_ctor_release(x_118, 1); - x_138 = x_118; -} else { - lean_dec_ref(x_118); - x_138 = lean_box(0); -} -x_139 = lean_ctor_get(x_135, 0); +x_138 = lean_ctor_get(x_131, 4); +lean_inc(x_138); +x_139 = lean_ctor_get(x_131, 5); lean_inc(x_139); -x_140 = lean_ctor_get(x_135, 1); -lean_inc(x_140); -x_141 = lean_ctor_get(x_135, 3); +if (lean_is_exclusive(x_131)) { + lean_ctor_release(x_131, 0); + lean_ctor_release(x_131, 1); + lean_ctor_release(x_131, 2); + lean_ctor_release(x_131, 3); + lean_ctor_release(x_131, 4); + lean_ctor_release(x_131, 5); + x_140 = x_131; +} else { + lean_dec_ref(x_131); + x_140 = lean_box(0); +} +x_141 = lean_ctor_get(x_132, 0); lean_inc(x_141); -x_142 = lean_ctor_get(x_135, 4); +x_142 = lean_ctor_get(x_132, 1); lean_inc(x_142); -x_143 = lean_ctor_get(x_135, 5); -lean_inc(x_143); -if (lean_is_exclusive(x_135)) { - lean_ctor_release(x_135, 0); - lean_ctor_release(x_135, 1); - lean_ctor_release(x_135, 2); - lean_ctor_release(x_135, 3); - lean_ctor_release(x_135, 4); - lean_ctor_release(x_135, 5); - x_144 = x_135; +if (lean_is_exclusive(x_132)) { + lean_ctor_release(x_132, 0); + lean_ctor_release(x_132, 1); + lean_ctor_release(x_132, 2); + x_143 = x_132; } else { - lean_dec_ref(x_135); - x_144 = lean_box(0); + lean_dec_ref(x_132); + x_143 = lean_box(0); } -x_145 = lean_ctor_get(x_136, 0); -lean_inc(x_145); -x_146 = lean_ctor_get(x_136, 1); -lean_inc(x_146); -if (lean_is_exclusive(x_136)) { - lean_ctor_release(x_136, 0); - lean_ctor_release(x_136, 1); - lean_ctor_release(x_136, 2); - x_147 = x_136; +if (lean_is_scalar(x_143)) { + x_144 = lean_alloc_ctor(0, 3, 0); } else { - lean_dec_ref(x_136); - x_147 = lean_box(0); + x_144 = x_143; } -if (lean_is_scalar(x_147)) { - x_148 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_144, 0, x_141); +lean_ctor_set(x_144, 1, x_142); +lean_ctor_set(x_144, 2, x_31); +if (lean_is_scalar(x_140)) { + x_145 = lean_alloc_ctor(0, 6, 0); } else { - x_148 = x_147; + x_145 = x_140; } -lean_ctor_set(x_148, 0, x_145); -lean_ctor_set(x_148, 1, x_146); -lean_ctor_set(x_148, 2, x_35); -if (lean_is_scalar(x_144)) { - x_149 = lean_alloc_ctor(0, 6, 0); +lean_ctor_set(x_145, 0, x_135); +lean_ctor_set(x_145, 1, x_136); +lean_ctor_set(x_145, 2, x_144); +lean_ctor_set(x_145, 3, x_137); +lean_ctor_set(x_145, 4, x_138); +lean_ctor_set(x_145, 5, x_139); +if (lean_is_scalar(x_134)) { + x_146 = lean_alloc_ctor(1, 2, 0); } else { - x_149 = x_144; + x_146 = x_134; } -lean_ctor_set(x_149, 0, x_139); -lean_ctor_set(x_149, 1, x_140); -lean_ctor_set(x_149, 2, x_148); -lean_ctor_set(x_149, 3, x_141); -lean_ctor_set(x_149, 4, x_142); -lean_ctor_set(x_149, 5, x_143); -if (lean_is_scalar(x_138)) { - x_150 = lean_alloc_ctor(1, 2, 0); -} else { - x_150 = x_138; -} -lean_ctor_set(x_150, 0, x_137); -lean_ctor_set(x_150, 1, x_149); -return x_150; +lean_ctor_set(x_146, 0, x_133); +lean_ctor_set(x_146, 1, x_145); +return x_146; } } } 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; lean_object* x_162; lean_object* x_163; lean_object* x_164; lean_object* x_165; -x_151 = lean_ctor_get(x_33, 0); -x_152 = lean_ctor_get(x_33, 1); -x_153 = lean_ctor_get(x_33, 2); -lean_inc(x_153); +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; +x_147 = lean_ctor_get(x_29, 0); +x_148 = lean_ctor_get(x_29, 1); +x_149 = lean_ctor_get(x_29, 2); +lean_inc(x_149); +lean_inc(x_148); +lean_inc(x_147); +lean_dec(x_29); +x_150 = l_Lean_Meta_resettingSynthInstanceCache___rarg___closed__1; +x_151 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_151, 0, x_147); +lean_ctor_set(x_151, 1, x_148); +lean_ctor_set(x_151, 2, x_150); +lean_ctor_set(x_24, 2, x_151); +x_152 = lean_ctor_get(x_6, 0); lean_inc(x_152); -lean_inc(x_151); -lean_dec(x_33); -x_154 = l_Lean_Meta_resettingSynthInstanceCache___rarg___closed__1; -x_155 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_155, 0, x_151); -lean_ctor_set(x_155, 1, x_152); -lean_ctor_set(x_155, 2, x_154); -lean_ctor_set(x_28, 2, x_155); -x_156 = lean_ctor_get(x_7, 0); +x_153 = lean_ctor_get(x_6, 1); +lean_inc(x_153); +x_154 = lean_ctor_get(x_6, 2); +lean_inc(x_154); +x_155 = lean_ctor_get(x_6, 3); +lean_inc(x_155); +x_156 = lean_ctor_get(x_6, 4); lean_inc(x_156); -x_157 = lean_ctor_get(x_7, 1); -lean_inc(x_157); -x_158 = lean_ctor_get(x_7, 2); -lean_inc(x_158); -x_159 = lean_ctor_get(x_7, 3); -lean_inc(x_159); -x_160 = lean_ctor_get(x_7, 4); -lean_inc(x_160); -if (lean_is_exclusive(x_7)) { - lean_ctor_release(x_7, 0); - lean_ctor_release(x_7, 1); - lean_ctor_release(x_7, 2); - lean_ctor_release(x_7, 3); - lean_ctor_release(x_7, 4); - x_161 = x_7; +if (lean_is_exclusive(x_6)) { + lean_ctor_release(x_6, 0); + lean_ctor_release(x_6, 1); + lean_ctor_release(x_6, 2); + lean_ctor_release(x_6, 3); + lean_ctor_release(x_6, 4); + x_157 = x_6; } else { - lean_dec_ref(x_7); - x_161 = lean_box(0); + lean_dec_ref(x_6); + x_157 = lean_box(0); } -x_162 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_162, 0, x_29); -lean_ctor_set(x_162, 1, x_17); -x_163 = lean_array_push(x_158, x_162); -if (lean_is_scalar(x_161)) { - x_164 = lean_alloc_ctor(0, 5, 0); +x_158 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_158, 0, x_25); +lean_ctor_set(x_158, 1, x_13); +x_159 = lean_array_push(x_154, x_158); +if (lean_is_scalar(x_157)) { + x_160 = lean_alloc_ctor(0, 5, 0); } else { - x_164 = x_161; + x_160 = x_157; } -lean_ctor_set(x_164, 0, x_156); -lean_ctor_set(x_164, 1, x_157); -lean_ctor_set(x_164, 2, x_163); -lean_ctor_set(x_164, 3, x_159); -lean_ctor_set(x_164, 4, x_160); -x_165 = l_Lean_Meta_withNewLocalInstances___main___at_Lean_Meta_introN___spec__3(x_1, x_2, x_3, x_4, x_5, x_31, x_164, x_28); -if (lean_obj_tag(x_165) == 0) +lean_ctor_set(x_160, 0, x_152); +lean_ctor_set(x_160, 1, x_153); +lean_ctor_set(x_160, 2, x_159); +lean_ctor_set(x_160, 3, x_155); +lean_ctor_set(x_160, 4, x_156); +x_161 = l_Lean_Meta_withNewLocalInstances___main___at_Lean_Meta_introN___spec__3(x_1, x_2, x_3, x_4, x_27, x_160, x_24); +if (lean_obj_tag(x_161) == 0) { -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_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; -x_166 = lean_ctor_get(x_165, 1); +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_object* x_175; lean_object* x_176; lean_object* x_177; +x_162 = lean_ctor_get(x_161, 1); +lean_inc(x_162); +x_163 = lean_ctor_get(x_162, 2); +lean_inc(x_163); +x_164 = lean_ctor_get(x_161, 0); +lean_inc(x_164); +if (lean_is_exclusive(x_161)) { + lean_ctor_release(x_161, 0); + lean_ctor_release(x_161, 1); + x_165 = x_161; +} else { + lean_dec_ref(x_161); + x_165 = lean_box(0); +} +x_166 = lean_ctor_get(x_162, 0); lean_inc(x_166); -x_167 = lean_ctor_get(x_166, 2); +x_167 = lean_ctor_get(x_162, 1); lean_inc(x_167); -x_168 = lean_ctor_get(x_165, 0); +x_168 = lean_ctor_get(x_162, 3); lean_inc(x_168); -if (lean_is_exclusive(x_165)) { - lean_ctor_release(x_165, 0); - lean_ctor_release(x_165, 1); - x_169 = x_165; -} else { - lean_dec_ref(x_165); - x_169 = lean_box(0); -} -x_170 = lean_ctor_get(x_166, 0); +x_169 = lean_ctor_get(x_162, 4); +lean_inc(x_169); +x_170 = lean_ctor_get(x_162, 5); lean_inc(x_170); -x_171 = lean_ctor_get(x_166, 1); -lean_inc(x_171); -x_172 = lean_ctor_get(x_166, 3); +if (lean_is_exclusive(x_162)) { + lean_ctor_release(x_162, 0); + lean_ctor_release(x_162, 1); + lean_ctor_release(x_162, 2); + lean_ctor_release(x_162, 3); + lean_ctor_release(x_162, 4); + lean_ctor_release(x_162, 5); + x_171 = x_162; +} else { + lean_dec_ref(x_162); + x_171 = lean_box(0); +} +x_172 = lean_ctor_get(x_163, 0); lean_inc(x_172); -x_173 = lean_ctor_get(x_166, 4); +x_173 = lean_ctor_get(x_163, 1); lean_inc(x_173); -x_174 = lean_ctor_get(x_166, 5); -lean_inc(x_174); -if (lean_is_exclusive(x_166)) { - lean_ctor_release(x_166, 0); - lean_ctor_release(x_166, 1); - lean_ctor_release(x_166, 2); - lean_ctor_release(x_166, 3); - lean_ctor_release(x_166, 4); - lean_ctor_release(x_166, 5); - x_175 = x_166; +if (lean_is_exclusive(x_163)) { + lean_ctor_release(x_163, 0); + lean_ctor_release(x_163, 1); + lean_ctor_release(x_163, 2); + x_174 = x_163; } else { - lean_dec_ref(x_166); - x_175 = lean_box(0); + lean_dec_ref(x_163); + x_174 = lean_box(0); } -x_176 = lean_ctor_get(x_167, 0); -lean_inc(x_176); -x_177 = lean_ctor_get(x_167, 1); -lean_inc(x_177); -if (lean_is_exclusive(x_167)) { - lean_ctor_release(x_167, 0); - lean_ctor_release(x_167, 1); - lean_ctor_release(x_167, 2); - x_178 = x_167; +if (lean_is_scalar(x_174)) { + x_175 = lean_alloc_ctor(0, 3, 0); } else { - lean_dec_ref(x_167); - x_178 = lean_box(0); + x_175 = x_174; } -if (lean_is_scalar(x_178)) { - x_179 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_175, 0, x_172); +lean_ctor_set(x_175, 1, x_173); +lean_ctor_set(x_175, 2, x_149); +if (lean_is_scalar(x_171)) { + x_176 = lean_alloc_ctor(0, 6, 0); } else { - x_179 = x_178; + x_176 = x_171; } -lean_ctor_set(x_179, 0, x_176); -lean_ctor_set(x_179, 1, x_177); -lean_ctor_set(x_179, 2, x_153); -if (lean_is_scalar(x_175)) { - x_180 = lean_alloc_ctor(0, 6, 0); +lean_ctor_set(x_176, 0, x_166); +lean_ctor_set(x_176, 1, x_167); +lean_ctor_set(x_176, 2, x_175); +lean_ctor_set(x_176, 3, x_168); +lean_ctor_set(x_176, 4, x_169); +lean_ctor_set(x_176, 5, x_170); +if (lean_is_scalar(x_165)) { + x_177 = lean_alloc_ctor(0, 2, 0); } else { - x_180 = x_175; + x_177 = x_165; } -lean_ctor_set(x_180, 0, x_170); -lean_ctor_set(x_180, 1, x_171); -lean_ctor_set(x_180, 2, x_179); -lean_ctor_set(x_180, 3, x_172); -lean_ctor_set(x_180, 4, x_173); -lean_ctor_set(x_180, 5, x_174); -if (lean_is_scalar(x_169)) { - x_181 = lean_alloc_ctor(0, 2, 0); -} else { - x_181 = x_169; -} -lean_ctor_set(x_181, 0, x_168); -lean_ctor_set(x_181, 1, x_180); -return x_181; +lean_ctor_set(x_177, 0, x_164); +lean_ctor_set(x_177, 1, x_176); +return x_177; } else { -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; 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; -x_182 = lean_ctor_get(x_165, 1); +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; lean_object* x_191; lean_object* x_192; lean_object* x_193; +x_178 = lean_ctor_get(x_161, 1); +lean_inc(x_178); +x_179 = lean_ctor_get(x_178, 2); +lean_inc(x_179); +x_180 = lean_ctor_get(x_161, 0); +lean_inc(x_180); +if (lean_is_exclusive(x_161)) { + lean_ctor_release(x_161, 0); + lean_ctor_release(x_161, 1); + x_181 = x_161; +} else { + lean_dec_ref(x_161); + x_181 = lean_box(0); +} +x_182 = lean_ctor_get(x_178, 0); lean_inc(x_182); -x_183 = lean_ctor_get(x_182, 2); +x_183 = lean_ctor_get(x_178, 1); lean_inc(x_183); -x_184 = lean_ctor_get(x_165, 0); +x_184 = lean_ctor_get(x_178, 3); lean_inc(x_184); -if (lean_is_exclusive(x_165)) { - lean_ctor_release(x_165, 0); - lean_ctor_release(x_165, 1); - x_185 = x_165; -} else { - lean_dec_ref(x_165); - x_185 = lean_box(0); -} -x_186 = lean_ctor_get(x_182, 0); +x_185 = lean_ctor_get(x_178, 4); +lean_inc(x_185); +x_186 = lean_ctor_get(x_178, 5); lean_inc(x_186); -x_187 = lean_ctor_get(x_182, 1); -lean_inc(x_187); -x_188 = lean_ctor_get(x_182, 3); +if (lean_is_exclusive(x_178)) { + lean_ctor_release(x_178, 0); + lean_ctor_release(x_178, 1); + lean_ctor_release(x_178, 2); + lean_ctor_release(x_178, 3); + lean_ctor_release(x_178, 4); + lean_ctor_release(x_178, 5); + x_187 = x_178; +} else { + lean_dec_ref(x_178); + x_187 = lean_box(0); +} +x_188 = lean_ctor_get(x_179, 0); lean_inc(x_188); -x_189 = lean_ctor_get(x_182, 4); +x_189 = lean_ctor_get(x_179, 1); lean_inc(x_189); -x_190 = lean_ctor_get(x_182, 5); -lean_inc(x_190); -if (lean_is_exclusive(x_182)) { - lean_ctor_release(x_182, 0); - lean_ctor_release(x_182, 1); - lean_ctor_release(x_182, 2); - lean_ctor_release(x_182, 3); - lean_ctor_release(x_182, 4); - lean_ctor_release(x_182, 5); - x_191 = x_182; +if (lean_is_exclusive(x_179)) { + lean_ctor_release(x_179, 0); + lean_ctor_release(x_179, 1); + lean_ctor_release(x_179, 2); + x_190 = x_179; } else { - lean_dec_ref(x_182); - x_191 = lean_box(0); + lean_dec_ref(x_179); + x_190 = lean_box(0); } -x_192 = lean_ctor_get(x_183, 0); -lean_inc(x_192); -x_193 = lean_ctor_get(x_183, 1); -lean_inc(x_193); -if (lean_is_exclusive(x_183)) { - lean_ctor_release(x_183, 0); - lean_ctor_release(x_183, 1); - lean_ctor_release(x_183, 2); - x_194 = x_183; +if (lean_is_scalar(x_190)) { + x_191 = lean_alloc_ctor(0, 3, 0); } else { - lean_dec_ref(x_183); - x_194 = lean_box(0); + x_191 = x_190; } -if (lean_is_scalar(x_194)) { - x_195 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_191, 0, x_188); +lean_ctor_set(x_191, 1, x_189); +lean_ctor_set(x_191, 2, x_149); +if (lean_is_scalar(x_187)) { + x_192 = lean_alloc_ctor(0, 6, 0); } else { - x_195 = x_194; + x_192 = x_187; } -lean_ctor_set(x_195, 0, x_192); -lean_ctor_set(x_195, 1, x_193); -lean_ctor_set(x_195, 2, x_153); -if (lean_is_scalar(x_191)) { - x_196 = lean_alloc_ctor(0, 6, 0); +lean_ctor_set(x_192, 0, x_182); +lean_ctor_set(x_192, 1, x_183); +lean_ctor_set(x_192, 2, x_191); +lean_ctor_set(x_192, 3, x_184); +lean_ctor_set(x_192, 4, x_185); +lean_ctor_set(x_192, 5, x_186); +if (lean_is_scalar(x_181)) { + x_193 = lean_alloc_ctor(1, 2, 0); } else { - x_196 = x_191; + x_193 = x_181; } -lean_ctor_set(x_196, 0, x_186); -lean_ctor_set(x_196, 1, x_187); -lean_ctor_set(x_196, 2, x_195); -lean_ctor_set(x_196, 3, x_188); -lean_ctor_set(x_196, 4, x_189); -lean_ctor_set(x_196, 5, x_190); -if (lean_is_scalar(x_185)) { - x_197 = lean_alloc_ctor(1, 2, 0); -} else { - x_197 = x_185; -} -lean_ctor_set(x_197, 0, x_184); -lean_ctor_set(x_197, 1, x_196); -return x_197; +lean_ctor_set(x_193, 0, x_180); +lean_ctor_set(x_193, 1, x_192); +return x_193; } } } else { -lean_object* x_198; lean_object* x_199; lean_object* x_200; lean_object* x_201; lean_object* x_202; lean_object* x_203; lean_object* x_204; lean_object* x_205; lean_object* x_206; lean_object* x_207; lean_object* x_208; lean_object* x_209; lean_object* x_210; lean_object* x_211; lean_object* x_212; lean_object* x_213; lean_object* x_214; lean_object* x_215; lean_object* x_216; lean_object* x_217; lean_object* x_218; lean_object* x_219; lean_object* x_220; -x_198 = lean_ctor_get(x_28, 2); -x_199 = lean_ctor_get(x_28, 0); -x_200 = lean_ctor_get(x_28, 1); -x_201 = lean_ctor_get(x_28, 3); -x_202 = lean_ctor_get(x_28, 4); -x_203 = lean_ctor_get(x_28, 5); -lean_inc(x_203); -lean_inc(x_202); -lean_inc(x_201); -lean_inc(x_198); -lean_inc(x_200); +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_object* x_202; lean_object* x_203; lean_object* x_204; lean_object* x_205; lean_object* x_206; lean_object* x_207; lean_object* x_208; lean_object* x_209; lean_object* x_210; lean_object* x_211; lean_object* x_212; lean_object* x_213; lean_object* x_214; lean_object* x_215; lean_object* x_216; +x_194 = lean_ctor_get(x_24, 2); +x_195 = lean_ctor_get(x_24, 0); +x_196 = lean_ctor_get(x_24, 1); +x_197 = lean_ctor_get(x_24, 3); +x_198 = lean_ctor_get(x_24, 4); +x_199 = lean_ctor_get(x_24, 5); lean_inc(x_199); -lean_dec(x_28); -x_204 = lean_ctor_get(x_198, 0); -lean_inc(x_204); -x_205 = lean_ctor_get(x_198, 1); -lean_inc(x_205); -x_206 = lean_ctor_get(x_198, 2); -lean_inc(x_206); -if (lean_is_exclusive(x_198)) { - lean_ctor_release(x_198, 0); - lean_ctor_release(x_198, 1); - lean_ctor_release(x_198, 2); - x_207 = x_198; +lean_inc(x_198); +lean_inc(x_197); +lean_inc(x_194); +lean_inc(x_196); +lean_inc(x_195); +lean_dec(x_24); +x_200 = lean_ctor_get(x_194, 0); +lean_inc(x_200); +x_201 = lean_ctor_get(x_194, 1); +lean_inc(x_201); +x_202 = lean_ctor_get(x_194, 2); +lean_inc(x_202); +if (lean_is_exclusive(x_194)) { + lean_ctor_release(x_194, 0); + lean_ctor_release(x_194, 1); + lean_ctor_release(x_194, 2); + x_203 = x_194; } else { - lean_dec_ref(x_198); - x_207 = lean_box(0); + lean_dec_ref(x_194); + x_203 = lean_box(0); } -x_208 = l_Lean_Meta_resettingSynthInstanceCache___rarg___closed__1; -if (lean_is_scalar(x_207)) { - x_209 = lean_alloc_ctor(0, 3, 0); +x_204 = l_Lean_Meta_resettingSynthInstanceCache___rarg___closed__1; +if (lean_is_scalar(x_203)) { + x_205 = lean_alloc_ctor(0, 3, 0); } else { - x_209 = x_207; + x_205 = x_203; } -lean_ctor_set(x_209, 0, x_204); -lean_ctor_set(x_209, 1, x_205); -lean_ctor_set(x_209, 2, x_208); -x_210 = lean_alloc_ctor(0, 6, 0); -lean_ctor_set(x_210, 0, x_199); -lean_ctor_set(x_210, 1, x_200); -lean_ctor_set(x_210, 2, x_209); -lean_ctor_set(x_210, 3, x_201); -lean_ctor_set(x_210, 4, x_202); -lean_ctor_set(x_210, 5, x_203); -x_211 = lean_ctor_get(x_7, 0); +lean_ctor_set(x_205, 0, x_200); +lean_ctor_set(x_205, 1, x_201); +lean_ctor_set(x_205, 2, x_204); +x_206 = lean_alloc_ctor(0, 6, 0); +lean_ctor_set(x_206, 0, x_195); +lean_ctor_set(x_206, 1, x_196); +lean_ctor_set(x_206, 2, x_205); +lean_ctor_set(x_206, 3, x_197); +lean_ctor_set(x_206, 4, x_198); +lean_ctor_set(x_206, 5, x_199); +x_207 = lean_ctor_get(x_6, 0); +lean_inc(x_207); +x_208 = lean_ctor_get(x_6, 1); +lean_inc(x_208); +x_209 = lean_ctor_get(x_6, 2); +lean_inc(x_209); +x_210 = lean_ctor_get(x_6, 3); +lean_inc(x_210); +x_211 = lean_ctor_get(x_6, 4); lean_inc(x_211); -x_212 = lean_ctor_get(x_7, 1); -lean_inc(x_212); -x_213 = lean_ctor_get(x_7, 2); -lean_inc(x_213); -x_214 = lean_ctor_get(x_7, 3); -lean_inc(x_214); -x_215 = lean_ctor_get(x_7, 4); -lean_inc(x_215); -if (lean_is_exclusive(x_7)) { - lean_ctor_release(x_7, 0); - lean_ctor_release(x_7, 1); - lean_ctor_release(x_7, 2); - lean_ctor_release(x_7, 3); - lean_ctor_release(x_7, 4); - x_216 = x_7; +if (lean_is_exclusive(x_6)) { + lean_ctor_release(x_6, 0); + lean_ctor_release(x_6, 1); + lean_ctor_release(x_6, 2); + lean_ctor_release(x_6, 3); + lean_ctor_release(x_6, 4); + x_212 = x_6; } else { - lean_dec_ref(x_7); - x_216 = lean_box(0); + lean_dec_ref(x_6); + x_212 = lean_box(0); } -x_217 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_217, 0, x_29); -lean_ctor_set(x_217, 1, x_17); -x_218 = lean_array_push(x_213, x_217); -if (lean_is_scalar(x_216)) { - x_219 = lean_alloc_ctor(0, 5, 0); +x_213 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_213, 0, x_25); +lean_ctor_set(x_213, 1, x_13); +x_214 = lean_array_push(x_209, x_213); +if (lean_is_scalar(x_212)) { + x_215 = lean_alloc_ctor(0, 5, 0); } else { - x_219 = x_216; + x_215 = x_212; } -lean_ctor_set(x_219, 0, x_211); -lean_ctor_set(x_219, 1, x_212); -lean_ctor_set(x_219, 2, x_218); -lean_ctor_set(x_219, 3, x_214); -lean_ctor_set(x_219, 4, x_215); -x_220 = l_Lean_Meta_withNewLocalInstances___main___at_Lean_Meta_introN___spec__3(x_1, x_2, x_3, x_4, x_5, x_31, x_219, x_210); -if (lean_obj_tag(x_220) == 0) +lean_ctor_set(x_215, 0, x_207); +lean_ctor_set(x_215, 1, x_208); +lean_ctor_set(x_215, 2, x_214); +lean_ctor_set(x_215, 3, x_210); +lean_ctor_set(x_215, 4, x_211); +x_216 = l_Lean_Meta_withNewLocalInstances___main___at_Lean_Meta_introN___spec__3(x_1, x_2, x_3, x_4, x_27, x_215, x_206); +if (lean_obj_tag(x_216) == 0) { -lean_object* x_221; lean_object* x_222; lean_object* x_223; lean_object* x_224; lean_object* x_225; lean_object* x_226; lean_object* x_227; lean_object* x_228; lean_object* x_229; lean_object* x_230; lean_object* x_231; lean_object* x_232; lean_object* x_233; lean_object* x_234; lean_object* x_235; lean_object* x_236; -x_221 = lean_ctor_get(x_220, 1); +lean_object* x_217; lean_object* x_218; lean_object* x_219; lean_object* x_220; lean_object* x_221; lean_object* x_222; lean_object* x_223; lean_object* x_224; lean_object* x_225; lean_object* x_226; lean_object* x_227; lean_object* x_228; lean_object* x_229; lean_object* x_230; lean_object* x_231; lean_object* x_232; +x_217 = lean_ctor_get(x_216, 1); +lean_inc(x_217); +x_218 = lean_ctor_get(x_217, 2); +lean_inc(x_218); +x_219 = lean_ctor_get(x_216, 0); +lean_inc(x_219); +if (lean_is_exclusive(x_216)) { + lean_ctor_release(x_216, 0); + lean_ctor_release(x_216, 1); + x_220 = x_216; +} else { + lean_dec_ref(x_216); + x_220 = lean_box(0); +} +x_221 = lean_ctor_get(x_217, 0); lean_inc(x_221); -x_222 = lean_ctor_get(x_221, 2); +x_222 = lean_ctor_get(x_217, 1); lean_inc(x_222); -x_223 = lean_ctor_get(x_220, 0); +x_223 = lean_ctor_get(x_217, 3); lean_inc(x_223); -if (lean_is_exclusive(x_220)) { - lean_ctor_release(x_220, 0); - lean_ctor_release(x_220, 1); - x_224 = x_220; -} else { - lean_dec_ref(x_220); - x_224 = lean_box(0); -} -x_225 = lean_ctor_get(x_221, 0); +x_224 = lean_ctor_get(x_217, 4); +lean_inc(x_224); +x_225 = lean_ctor_get(x_217, 5); lean_inc(x_225); -x_226 = lean_ctor_get(x_221, 1); -lean_inc(x_226); -x_227 = lean_ctor_get(x_221, 3); +if (lean_is_exclusive(x_217)) { + lean_ctor_release(x_217, 0); + lean_ctor_release(x_217, 1); + lean_ctor_release(x_217, 2); + lean_ctor_release(x_217, 3); + lean_ctor_release(x_217, 4); + lean_ctor_release(x_217, 5); + x_226 = x_217; +} else { + lean_dec_ref(x_217); + x_226 = lean_box(0); +} +x_227 = lean_ctor_get(x_218, 0); lean_inc(x_227); -x_228 = lean_ctor_get(x_221, 4); +x_228 = lean_ctor_get(x_218, 1); lean_inc(x_228); -x_229 = lean_ctor_get(x_221, 5); -lean_inc(x_229); -if (lean_is_exclusive(x_221)) { - lean_ctor_release(x_221, 0); - lean_ctor_release(x_221, 1); - lean_ctor_release(x_221, 2); - lean_ctor_release(x_221, 3); - lean_ctor_release(x_221, 4); - lean_ctor_release(x_221, 5); - x_230 = x_221; +if (lean_is_exclusive(x_218)) { + lean_ctor_release(x_218, 0); + lean_ctor_release(x_218, 1); + lean_ctor_release(x_218, 2); + x_229 = x_218; } else { - lean_dec_ref(x_221); - x_230 = lean_box(0); + lean_dec_ref(x_218); + x_229 = lean_box(0); } -x_231 = lean_ctor_get(x_222, 0); -lean_inc(x_231); -x_232 = lean_ctor_get(x_222, 1); -lean_inc(x_232); -if (lean_is_exclusive(x_222)) { - lean_ctor_release(x_222, 0); - lean_ctor_release(x_222, 1); - lean_ctor_release(x_222, 2); - x_233 = x_222; +if (lean_is_scalar(x_229)) { + x_230 = lean_alloc_ctor(0, 3, 0); } else { - lean_dec_ref(x_222); - x_233 = lean_box(0); + x_230 = x_229; } -if (lean_is_scalar(x_233)) { - x_234 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_230, 0, x_227); +lean_ctor_set(x_230, 1, x_228); +lean_ctor_set(x_230, 2, x_202); +if (lean_is_scalar(x_226)) { + x_231 = lean_alloc_ctor(0, 6, 0); } else { - x_234 = x_233; + x_231 = x_226; } -lean_ctor_set(x_234, 0, x_231); -lean_ctor_set(x_234, 1, x_232); -lean_ctor_set(x_234, 2, x_206); -if (lean_is_scalar(x_230)) { - x_235 = lean_alloc_ctor(0, 6, 0); +lean_ctor_set(x_231, 0, x_221); +lean_ctor_set(x_231, 1, x_222); +lean_ctor_set(x_231, 2, x_230); +lean_ctor_set(x_231, 3, x_223); +lean_ctor_set(x_231, 4, x_224); +lean_ctor_set(x_231, 5, x_225); +if (lean_is_scalar(x_220)) { + x_232 = lean_alloc_ctor(0, 2, 0); } else { - x_235 = x_230; + x_232 = x_220; } -lean_ctor_set(x_235, 0, x_225); -lean_ctor_set(x_235, 1, x_226); -lean_ctor_set(x_235, 2, x_234); -lean_ctor_set(x_235, 3, x_227); -lean_ctor_set(x_235, 4, x_228); -lean_ctor_set(x_235, 5, x_229); -if (lean_is_scalar(x_224)) { - x_236 = lean_alloc_ctor(0, 2, 0); -} else { - x_236 = x_224; -} -lean_ctor_set(x_236, 0, x_223); -lean_ctor_set(x_236, 1, x_235); -return x_236; +lean_ctor_set(x_232, 0, x_219); +lean_ctor_set(x_232, 1, x_231); +return x_232; } else { -lean_object* x_237; lean_object* x_238; lean_object* x_239; lean_object* x_240; lean_object* x_241; lean_object* x_242; lean_object* x_243; lean_object* x_244; lean_object* x_245; lean_object* x_246; lean_object* x_247; lean_object* x_248; lean_object* x_249; lean_object* x_250; lean_object* x_251; lean_object* x_252; -x_237 = lean_ctor_get(x_220, 1); +lean_object* x_233; lean_object* x_234; lean_object* x_235; lean_object* x_236; lean_object* x_237; lean_object* x_238; lean_object* x_239; lean_object* x_240; lean_object* x_241; lean_object* x_242; lean_object* x_243; lean_object* x_244; lean_object* x_245; lean_object* x_246; lean_object* x_247; lean_object* x_248; +x_233 = lean_ctor_get(x_216, 1); +lean_inc(x_233); +x_234 = lean_ctor_get(x_233, 2); +lean_inc(x_234); +x_235 = lean_ctor_get(x_216, 0); +lean_inc(x_235); +if (lean_is_exclusive(x_216)) { + lean_ctor_release(x_216, 0); + lean_ctor_release(x_216, 1); + x_236 = x_216; +} else { + lean_dec_ref(x_216); + x_236 = lean_box(0); +} +x_237 = lean_ctor_get(x_233, 0); lean_inc(x_237); -x_238 = lean_ctor_get(x_237, 2); +x_238 = lean_ctor_get(x_233, 1); lean_inc(x_238); -x_239 = lean_ctor_get(x_220, 0); +x_239 = lean_ctor_get(x_233, 3); lean_inc(x_239); -if (lean_is_exclusive(x_220)) { - lean_ctor_release(x_220, 0); - lean_ctor_release(x_220, 1); - x_240 = x_220; -} else { - lean_dec_ref(x_220); - x_240 = lean_box(0); -} -x_241 = lean_ctor_get(x_237, 0); +x_240 = lean_ctor_get(x_233, 4); +lean_inc(x_240); +x_241 = lean_ctor_get(x_233, 5); lean_inc(x_241); -x_242 = lean_ctor_get(x_237, 1); -lean_inc(x_242); -x_243 = lean_ctor_get(x_237, 3); +if (lean_is_exclusive(x_233)) { + lean_ctor_release(x_233, 0); + lean_ctor_release(x_233, 1); + lean_ctor_release(x_233, 2); + lean_ctor_release(x_233, 3); + lean_ctor_release(x_233, 4); + lean_ctor_release(x_233, 5); + x_242 = x_233; +} else { + lean_dec_ref(x_233); + x_242 = lean_box(0); +} +x_243 = lean_ctor_get(x_234, 0); lean_inc(x_243); -x_244 = lean_ctor_get(x_237, 4); +x_244 = lean_ctor_get(x_234, 1); lean_inc(x_244); -x_245 = lean_ctor_get(x_237, 5); -lean_inc(x_245); -if (lean_is_exclusive(x_237)) { - lean_ctor_release(x_237, 0); - lean_ctor_release(x_237, 1); - lean_ctor_release(x_237, 2); - lean_ctor_release(x_237, 3); - lean_ctor_release(x_237, 4); - lean_ctor_release(x_237, 5); - x_246 = x_237; +if (lean_is_exclusive(x_234)) { + lean_ctor_release(x_234, 0); + lean_ctor_release(x_234, 1); + lean_ctor_release(x_234, 2); + x_245 = x_234; } else { - lean_dec_ref(x_237); - x_246 = lean_box(0); + lean_dec_ref(x_234); + x_245 = lean_box(0); } -x_247 = lean_ctor_get(x_238, 0); -lean_inc(x_247); -x_248 = lean_ctor_get(x_238, 1); -lean_inc(x_248); -if (lean_is_exclusive(x_238)) { - lean_ctor_release(x_238, 0); - lean_ctor_release(x_238, 1); - lean_ctor_release(x_238, 2); - x_249 = x_238; +if (lean_is_scalar(x_245)) { + x_246 = lean_alloc_ctor(0, 3, 0); } else { - lean_dec_ref(x_238); - x_249 = lean_box(0); + x_246 = x_245; } -if (lean_is_scalar(x_249)) { - x_250 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_246, 0, x_243); +lean_ctor_set(x_246, 1, x_244); +lean_ctor_set(x_246, 2, x_202); +if (lean_is_scalar(x_242)) { + x_247 = lean_alloc_ctor(0, 6, 0); } else { - x_250 = x_249; + x_247 = x_242; } -lean_ctor_set(x_250, 0, x_247); -lean_ctor_set(x_250, 1, x_248); -lean_ctor_set(x_250, 2, x_206); -if (lean_is_scalar(x_246)) { - x_251 = lean_alloc_ctor(0, 6, 0); +lean_ctor_set(x_247, 0, x_237); +lean_ctor_set(x_247, 1, x_238); +lean_ctor_set(x_247, 2, x_246); +lean_ctor_set(x_247, 3, x_239); +lean_ctor_set(x_247, 4, x_240); +lean_ctor_set(x_247, 5, x_241); +if (lean_is_scalar(x_236)) { + x_248 = lean_alloc_ctor(1, 2, 0); } else { - x_251 = x_246; + x_248 = x_236; } -lean_ctor_set(x_251, 0, x_241); -lean_ctor_set(x_251, 1, x_242); -lean_ctor_set(x_251, 2, x_250); -lean_ctor_set(x_251, 3, x_243); -lean_ctor_set(x_251, 4, x_244); -lean_ctor_set(x_251, 5, x_245); -if (lean_is_scalar(x_240)) { - x_252 = lean_alloc_ctor(1, 2, 0); -} else { - x_252 = x_240; -} -lean_ctor_set(x_252, 0, x_239); -lean_ctor_set(x_252, 1, x_251); -return x_252; +lean_ctor_set(x_248, 0, x_235); +lean_ctor_set(x_248, 1, x_247); +return x_248; } } } default: { -lean_object* x_253; lean_object* x_254; -x_253 = lean_ctor_get(x_22, 1); -lean_inc(x_253); -lean_dec(x_22); -lean_inc(x_7); -x_254 = l_Lean_Meta_isClassExpensive___main(x_21, x_7, x_253); -if (lean_obj_tag(x_254) == 0) +lean_object* x_249; lean_object* x_250; +x_249 = lean_ctor_get(x_18, 1); +lean_inc(x_249); +lean_dec(x_18); +lean_inc(x_6); +x_250 = l_Lean_Meta_isClassExpensive___main(x_17, x_6, x_249); +if (lean_obj_tag(x_250) == 0) { -lean_object* x_255; -x_255 = lean_ctor_get(x_254, 0); -lean_inc(x_255); -if (lean_obj_tag(x_255) == 0) +lean_object* x_251; +x_251 = lean_ctor_get(x_250, 0); +lean_inc(x_251); +if (lean_obj_tag(x_251) == 0) { -lean_object* x_256; lean_object* x_257; lean_object* x_258; -lean_dec(x_17); -x_256 = lean_ctor_get(x_254, 1); -lean_inc(x_256); -lean_dec(x_254); -x_257 = lean_unsigned_to_nat(1u); -x_258 = lean_nat_add(x_6, x_257); -lean_dec(x_6); -x_6 = x_258; -x_8 = x_256; +lean_object* x_252; lean_object* x_253; lean_object* x_254; +lean_dec(x_13); +x_252 = lean_ctor_get(x_250, 1); +lean_inc(x_252); +lean_dec(x_250); +x_253 = lean_unsigned_to_nat(1u); +x_254 = lean_nat_add(x_5, x_253); +lean_dec(x_5); +x_5 = x_254; +x_7 = x_252; goto _start; } else { -lean_object* x_260; lean_object* x_261; lean_object* x_262; lean_object* x_263; uint8_t x_264; -x_260 = lean_ctor_get(x_254, 1); -lean_inc(x_260); -lean_dec(x_254); -x_261 = lean_ctor_get(x_255, 0); -lean_inc(x_261); -lean_dec(x_255); -x_262 = lean_unsigned_to_nat(1u); -x_263 = lean_nat_add(x_6, x_262); -lean_dec(x_6); -x_264 = !lean_is_exclusive(x_260); -if (x_264 == 0) +lean_object* x_256; lean_object* x_257; lean_object* x_258; lean_object* x_259; uint8_t x_260; +x_256 = lean_ctor_get(x_250, 1); +lean_inc(x_256); +lean_dec(x_250); +x_257 = lean_ctor_get(x_251, 0); +lean_inc(x_257); +lean_dec(x_251); +x_258 = lean_unsigned_to_nat(1u); +x_259 = lean_nat_add(x_5, x_258); +lean_dec(x_5); +x_260 = !lean_is_exclusive(x_256); +if (x_260 == 0) { -lean_object* x_265; uint8_t x_266; -x_265 = lean_ctor_get(x_260, 2); -x_266 = !lean_is_exclusive(x_265); -if (x_266 == 0) +lean_object* x_261; uint8_t x_262; +x_261 = lean_ctor_get(x_256, 2); +x_262 = !lean_is_exclusive(x_261); +if (x_262 == 0) { -lean_object* x_267; lean_object* x_268; uint8_t x_269; -x_267 = lean_ctor_get(x_265, 2); -x_268 = l_Lean_Meta_resettingSynthInstanceCache___rarg___closed__1; -lean_ctor_set(x_265, 2, x_268); -x_269 = !lean_is_exclusive(x_7); -if (x_269 == 0) +lean_object* x_263; lean_object* x_264; uint8_t x_265; +x_263 = lean_ctor_get(x_261, 2); +x_264 = l_Lean_Meta_resettingSynthInstanceCache___rarg___closed__1; +lean_ctor_set(x_261, 2, x_264); +x_265 = !lean_is_exclusive(x_6); +if (x_265 == 0) { -lean_object* x_270; lean_object* x_271; lean_object* x_272; lean_object* x_273; -x_270 = lean_ctor_get(x_7, 2); -x_271 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_271, 0, x_261); -lean_ctor_set(x_271, 1, x_17); -x_272 = lean_array_push(x_270, x_271); -lean_ctor_set(x_7, 2, x_272); -x_273 = l_Lean_Meta_withNewLocalInstances___main___at_Lean_Meta_introN___spec__3(x_1, x_2, x_3, x_4, x_5, x_263, x_7, x_260); -if (lean_obj_tag(x_273) == 0) +lean_object* x_266; lean_object* x_267; lean_object* x_268; lean_object* x_269; +x_266 = lean_ctor_get(x_6, 2); +x_267 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_267, 0, x_257); +lean_ctor_set(x_267, 1, x_13); +x_268 = lean_array_push(x_266, x_267); +lean_ctor_set(x_6, 2, x_268); +x_269 = l_Lean_Meta_withNewLocalInstances___main___at_Lean_Meta_introN___spec__3(x_1, x_2, x_3, x_4, x_259, x_6, x_256); +if (lean_obj_tag(x_269) == 0) { -lean_object* x_274; lean_object* x_275; uint8_t x_276; -x_274 = lean_ctor_get(x_273, 1); -lean_inc(x_274); -x_275 = lean_ctor_get(x_274, 2); -lean_inc(x_275); -x_276 = !lean_is_exclusive(x_273); +lean_object* x_270; lean_object* x_271; uint8_t x_272; +x_270 = lean_ctor_get(x_269, 1); +lean_inc(x_270); +x_271 = lean_ctor_get(x_270, 2); +lean_inc(x_271); +x_272 = !lean_is_exclusive(x_269); +if (x_272 == 0) +{ +lean_object* x_273; uint8_t x_274; +x_273 = lean_ctor_get(x_269, 1); +lean_dec(x_273); +x_274 = !lean_is_exclusive(x_270); +if (x_274 == 0) +{ +lean_object* x_275; uint8_t x_276; +x_275 = lean_ctor_get(x_270, 2); +lean_dec(x_275); +x_276 = !lean_is_exclusive(x_271); if (x_276 == 0) { -lean_object* x_277; uint8_t x_278; -x_277 = lean_ctor_get(x_273, 1); +lean_object* x_277; +x_277 = lean_ctor_get(x_271, 2); lean_dec(x_277); -x_278 = !lean_is_exclusive(x_274); -if (x_278 == 0) -{ -lean_object* x_279; uint8_t x_280; -x_279 = lean_ctor_get(x_274, 2); -lean_dec(x_279); -x_280 = !lean_is_exclusive(x_275); -if (x_280 == 0) -{ -lean_object* x_281; -x_281 = lean_ctor_get(x_275, 2); -lean_dec(x_281); -lean_ctor_set(x_275, 2, x_267); -return x_273; +lean_ctor_set(x_271, 2, x_263); +return x_269; } else { -lean_object* x_282; lean_object* x_283; lean_object* x_284; -x_282 = lean_ctor_get(x_275, 0); -x_283 = lean_ctor_get(x_275, 1); +lean_object* x_278; lean_object* x_279; lean_object* x_280; +x_278 = lean_ctor_get(x_271, 0); +x_279 = lean_ctor_get(x_271, 1); +lean_inc(x_279); +lean_inc(x_278); +lean_dec(x_271); +x_280 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_280, 0, x_278); +lean_ctor_set(x_280, 1, x_279); +lean_ctor_set(x_280, 2, x_263); +lean_ctor_set(x_270, 2, x_280); +return x_269; +} +} +else +{ +lean_object* x_281; lean_object* x_282; lean_object* x_283; lean_object* x_284; lean_object* x_285; lean_object* x_286; lean_object* x_287; lean_object* x_288; lean_object* x_289; lean_object* x_290; +x_281 = lean_ctor_get(x_270, 0); +x_282 = lean_ctor_get(x_270, 1); +x_283 = lean_ctor_get(x_270, 3); +x_284 = lean_ctor_get(x_270, 4); +x_285 = lean_ctor_get(x_270, 5); +lean_inc(x_285); +lean_inc(x_284); lean_inc(x_283); lean_inc(x_282); -lean_dec(x_275); -x_284 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_284, 0, x_282); -lean_ctor_set(x_284, 1, x_283); -lean_ctor_set(x_284, 2, x_267); -lean_ctor_set(x_274, 2, x_284); -return x_273; -} -} -else -{ -lean_object* x_285; lean_object* x_286; lean_object* x_287; lean_object* x_288; lean_object* x_289; lean_object* x_290; lean_object* x_291; lean_object* x_292; lean_object* x_293; lean_object* x_294; -x_285 = lean_ctor_get(x_274, 0); -x_286 = lean_ctor_get(x_274, 1); -x_287 = lean_ctor_get(x_274, 3); -x_288 = lean_ctor_get(x_274, 4); -x_289 = lean_ctor_get(x_274, 5); -lean_inc(x_289); -lean_inc(x_288); -lean_inc(x_287); +lean_inc(x_281); +lean_dec(x_270); +x_286 = lean_ctor_get(x_271, 0); lean_inc(x_286); -lean_inc(x_285); -lean_dec(x_274); -x_290 = lean_ctor_get(x_275, 0); -lean_inc(x_290); -x_291 = lean_ctor_get(x_275, 1); +x_287 = lean_ctor_get(x_271, 1); +lean_inc(x_287); +if (lean_is_exclusive(x_271)) { + lean_ctor_release(x_271, 0); + lean_ctor_release(x_271, 1); + lean_ctor_release(x_271, 2); + x_288 = x_271; +} else { + lean_dec_ref(x_271); + x_288 = lean_box(0); +} +if (lean_is_scalar(x_288)) { + x_289 = lean_alloc_ctor(0, 3, 0); +} else { + x_289 = x_288; +} +lean_ctor_set(x_289, 0, x_286); +lean_ctor_set(x_289, 1, x_287); +lean_ctor_set(x_289, 2, x_263); +x_290 = lean_alloc_ctor(0, 6, 0); +lean_ctor_set(x_290, 0, x_281); +lean_ctor_set(x_290, 1, x_282); +lean_ctor_set(x_290, 2, x_289); +lean_ctor_set(x_290, 3, x_283); +lean_ctor_set(x_290, 4, x_284); +lean_ctor_set(x_290, 5, x_285); +lean_ctor_set(x_269, 1, x_290); +return x_269; +} +} +else +{ +lean_object* x_291; lean_object* x_292; lean_object* x_293; lean_object* x_294; lean_object* x_295; lean_object* x_296; lean_object* x_297; lean_object* x_298; lean_object* x_299; lean_object* x_300; lean_object* x_301; lean_object* x_302; lean_object* x_303; +x_291 = lean_ctor_get(x_269, 0); lean_inc(x_291); -if (lean_is_exclusive(x_275)) { - lean_ctor_release(x_275, 0); - lean_ctor_release(x_275, 1); - lean_ctor_release(x_275, 2); - x_292 = x_275; -} else { - lean_dec_ref(x_275); - x_292 = lean_box(0); -} -if (lean_is_scalar(x_292)) { - x_293 = lean_alloc_ctor(0, 3, 0); -} else { - x_293 = x_292; -} -lean_ctor_set(x_293, 0, x_290); -lean_ctor_set(x_293, 1, x_291); -lean_ctor_set(x_293, 2, x_267); -x_294 = lean_alloc_ctor(0, 6, 0); -lean_ctor_set(x_294, 0, x_285); -lean_ctor_set(x_294, 1, x_286); -lean_ctor_set(x_294, 2, x_293); -lean_ctor_set(x_294, 3, x_287); -lean_ctor_set(x_294, 4, x_288); -lean_ctor_set(x_294, 5, x_289); -lean_ctor_set(x_273, 1, x_294); -return x_273; -} -} -else -{ -lean_object* x_295; lean_object* x_296; lean_object* x_297; lean_object* x_298; lean_object* x_299; lean_object* x_300; lean_object* x_301; lean_object* x_302; lean_object* x_303; lean_object* x_304; lean_object* x_305; lean_object* x_306; lean_object* x_307; -x_295 = lean_ctor_get(x_273, 0); +lean_dec(x_269); +x_292 = lean_ctor_get(x_270, 0); +lean_inc(x_292); +x_293 = lean_ctor_get(x_270, 1); +lean_inc(x_293); +x_294 = lean_ctor_get(x_270, 3); +lean_inc(x_294); +x_295 = lean_ctor_get(x_270, 4); lean_inc(x_295); -lean_dec(x_273); -x_296 = lean_ctor_get(x_274, 0); +x_296 = lean_ctor_get(x_270, 5); lean_inc(x_296); -x_297 = lean_ctor_get(x_274, 1); -lean_inc(x_297); -x_298 = lean_ctor_get(x_274, 3); +if (lean_is_exclusive(x_270)) { + lean_ctor_release(x_270, 0); + lean_ctor_release(x_270, 1); + lean_ctor_release(x_270, 2); + lean_ctor_release(x_270, 3); + lean_ctor_release(x_270, 4); + lean_ctor_release(x_270, 5); + x_297 = x_270; +} else { + lean_dec_ref(x_270); + x_297 = lean_box(0); +} +x_298 = lean_ctor_get(x_271, 0); lean_inc(x_298); -x_299 = lean_ctor_get(x_274, 4); +x_299 = lean_ctor_get(x_271, 1); lean_inc(x_299); -x_300 = lean_ctor_get(x_274, 5); -lean_inc(x_300); -if (lean_is_exclusive(x_274)) { - lean_ctor_release(x_274, 0); - lean_ctor_release(x_274, 1); - lean_ctor_release(x_274, 2); - lean_ctor_release(x_274, 3); - lean_ctor_release(x_274, 4); - lean_ctor_release(x_274, 5); - x_301 = x_274; +if (lean_is_exclusive(x_271)) { + lean_ctor_release(x_271, 0); + lean_ctor_release(x_271, 1); + lean_ctor_release(x_271, 2); + x_300 = x_271; } else { - lean_dec_ref(x_274); - x_301 = lean_box(0); + lean_dec_ref(x_271); + x_300 = lean_box(0); } -x_302 = lean_ctor_get(x_275, 0); -lean_inc(x_302); -x_303 = lean_ctor_get(x_275, 1); -lean_inc(x_303); -if (lean_is_exclusive(x_275)) { - lean_ctor_release(x_275, 0); - lean_ctor_release(x_275, 1); - lean_ctor_release(x_275, 2); - x_304 = x_275; +if (lean_is_scalar(x_300)) { + x_301 = lean_alloc_ctor(0, 3, 0); } else { - lean_dec_ref(x_275); - x_304 = lean_box(0); + x_301 = x_300; } -if (lean_is_scalar(x_304)) { - x_305 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_301, 0, x_298); +lean_ctor_set(x_301, 1, x_299); +lean_ctor_set(x_301, 2, x_263); +if (lean_is_scalar(x_297)) { + x_302 = lean_alloc_ctor(0, 6, 0); } else { - x_305 = x_304; + x_302 = x_297; } -lean_ctor_set(x_305, 0, x_302); -lean_ctor_set(x_305, 1, x_303); -lean_ctor_set(x_305, 2, x_267); -if (lean_is_scalar(x_301)) { - x_306 = lean_alloc_ctor(0, 6, 0); -} else { - x_306 = x_301; -} -lean_ctor_set(x_306, 0, x_296); -lean_ctor_set(x_306, 1, x_297); -lean_ctor_set(x_306, 2, x_305); -lean_ctor_set(x_306, 3, x_298); -lean_ctor_set(x_306, 4, x_299); -lean_ctor_set(x_306, 5, x_300); -x_307 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_307, 0, x_295); -lean_ctor_set(x_307, 1, x_306); -return x_307; +lean_ctor_set(x_302, 0, x_292); +lean_ctor_set(x_302, 1, x_293); +lean_ctor_set(x_302, 2, x_301); +lean_ctor_set(x_302, 3, x_294); +lean_ctor_set(x_302, 4, x_295); +lean_ctor_set(x_302, 5, x_296); +x_303 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_303, 0, x_291); +lean_ctor_set(x_303, 1, x_302); +return x_303; } } else { -lean_object* x_308; lean_object* x_309; uint8_t x_310; -x_308 = lean_ctor_get(x_273, 1); -lean_inc(x_308); -x_309 = lean_ctor_get(x_308, 2); -lean_inc(x_309); -x_310 = !lean_is_exclusive(x_273); +lean_object* x_304; lean_object* x_305; uint8_t x_306; +x_304 = lean_ctor_get(x_269, 1); +lean_inc(x_304); +x_305 = lean_ctor_get(x_304, 2); +lean_inc(x_305); +x_306 = !lean_is_exclusive(x_269); +if (x_306 == 0) +{ +lean_object* x_307; uint8_t x_308; +x_307 = lean_ctor_get(x_269, 1); +lean_dec(x_307); +x_308 = !lean_is_exclusive(x_304); +if (x_308 == 0) +{ +lean_object* x_309; uint8_t x_310; +x_309 = lean_ctor_get(x_304, 2); +lean_dec(x_309); +x_310 = !lean_is_exclusive(x_305); if (x_310 == 0) { -lean_object* x_311; uint8_t x_312; -x_311 = lean_ctor_get(x_273, 1); +lean_object* x_311; +x_311 = lean_ctor_get(x_305, 2); lean_dec(x_311); -x_312 = !lean_is_exclusive(x_308); -if (x_312 == 0) -{ -lean_object* x_313; uint8_t x_314; -x_313 = lean_ctor_get(x_308, 2); -lean_dec(x_313); -x_314 = !lean_is_exclusive(x_309); -if (x_314 == 0) -{ -lean_object* x_315; -x_315 = lean_ctor_get(x_309, 2); -lean_dec(x_315); -lean_ctor_set(x_309, 2, x_267); -return x_273; +lean_ctor_set(x_305, 2, x_263); +return x_269; } else { -lean_object* x_316; lean_object* x_317; lean_object* x_318; -x_316 = lean_ctor_get(x_309, 0); -x_317 = lean_ctor_get(x_309, 1); +lean_object* x_312; lean_object* x_313; lean_object* x_314; +x_312 = lean_ctor_get(x_305, 0); +x_313 = lean_ctor_get(x_305, 1); +lean_inc(x_313); +lean_inc(x_312); +lean_dec(x_305); +x_314 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_314, 0, x_312); +lean_ctor_set(x_314, 1, x_313); +lean_ctor_set(x_314, 2, x_263); +lean_ctor_set(x_304, 2, x_314); +return x_269; +} +} +else +{ +lean_object* x_315; lean_object* x_316; lean_object* x_317; lean_object* x_318; lean_object* x_319; lean_object* x_320; lean_object* x_321; lean_object* x_322; lean_object* x_323; lean_object* x_324; +x_315 = lean_ctor_get(x_304, 0); +x_316 = lean_ctor_get(x_304, 1); +x_317 = lean_ctor_get(x_304, 3); +x_318 = lean_ctor_get(x_304, 4); +x_319 = lean_ctor_get(x_304, 5); +lean_inc(x_319); +lean_inc(x_318); lean_inc(x_317); lean_inc(x_316); -lean_dec(x_309); -x_318 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_318, 0, x_316); -lean_ctor_set(x_318, 1, x_317); -lean_ctor_set(x_318, 2, x_267); -lean_ctor_set(x_308, 2, x_318); -return x_273; -} -} -else -{ -lean_object* x_319; lean_object* x_320; lean_object* x_321; lean_object* x_322; lean_object* x_323; lean_object* x_324; lean_object* x_325; lean_object* x_326; lean_object* x_327; lean_object* x_328; -x_319 = lean_ctor_get(x_308, 0); -x_320 = lean_ctor_get(x_308, 1); -x_321 = lean_ctor_get(x_308, 3); -x_322 = lean_ctor_get(x_308, 4); -x_323 = lean_ctor_get(x_308, 5); -lean_inc(x_323); -lean_inc(x_322); -lean_inc(x_321); +lean_inc(x_315); +lean_dec(x_304); +x_320 = lean_ctor_get(x_305, 0); lean_inc(x_320); -lean_inc(x_319); -lean_dec(x_308); -x_324 = lean_ctor_get(x_309, 0); -lean_inc(x_324); -x_325 = lean_ctor_get(x_309, 1); +x_321 = lean_ctor_get(x_305, 1); +lean_inc(x_321); +if (lean_is_exclusive(x_305)) { + lean_ctor_release(x_305, 0); + lean_ctor_release(x_305, 1); + lean_ctor_release(x_305, 2); + x_322 = x_305; +} else { + lean_dec_ref(x_305); + x_322 = lean_box(0); +} +if (lean_is_scalar(x_322)) { + x_323 = lean_alloc_ctor(0, 3, 0); +} else { + x_323 = x_322; +} +lean_ctor_set(x_323, 0, x_320); +lean_ctor_set(x_323, 1, x_321); +lean_ctor_set(x_323, 2, x_263); +x_324 = lean_alloc_ctor(0, 6, 0); +lean_ctor_set(x_324, 0, x_315); +lean_ctor_set(x_324, 1, x_316); +lean_ctor_set(x_324, 2, x_323); +lean_ctor_set(x_324, 3, x_317); +lean_ctor_set(x_324, 4, x_318); +lean_ctor_set(x_324, 5, x_319); +lean_ctor_set(x_269, 1, x_324); +return x_269; +} +} +else +{ +lean_object* x_325; lean_object* x_326; lean_object* x_327; lean_object* x_328; lean_object* x_329; lean_object* x_330; lean_object* x_331; lean_object* x_332; lean_object* x_333; lean_object* x_334; lean_object* x_335; lean_object* x_336; lean_object* x_337; +x_325 = lean_ctor_get(x_269, 0); lean_inc(x_325); -if (lean_is_exclusive(x_309)) { - lean_ctor_release(x_309, 0); - lean_ctor_release(x_309, 1); - lean_ctor_release(x_309, 2); - x_326 = x_309; -} else { - lean_dec_ref(x_309); - x_326 = lean_box(0); -} -if (lean_is_scalar(x_326)) { - x_327 = lean_alloc_ctor(0, 3, 0); -} else { - x_327 = x_326; -} -lean_ctor_set(x_327, 0, x_324); -lean_ctor_set(x_327, 1, x_325); -lean_ctor_set(x_327, 2, x_267); -x_328 = lean_alloc_ctor(0, 6, 0); -lean_ctor_set(x_328, 0, x_319); -lean_ctor_set(x_328, 1, x_320); -lean_ctor_set(x_328, 2, x_327); -lean_ctor_set(x_328, 3, x_321); -lean_ctor_set(x_328, 4, x_322); -lean_ctor_set(x_328, 5, x_323); -lean_ctor_set(x_273, 1, x_328); -return x_273; -} -} -else -{ -lean_object* x_329; lean_object* x_330; lean_object* x_331; lean_object* x_332; lean_object* x_333; lean_object* x_334; lean_object* x_335; lean_object* x_336; lean_object* x_337; lean_object* x_338; lean_object* x_339; lean_object* x_340; lean_object* x_341; -x_329 = lean_ctor_get(x_273, 0); +lean_dec(x_269); +x_326 = lean_ctor_get(x_304, 0); +lean_inc(x_326); +x_327 = lean_ctor_get(x_304, 1); +lean_inc(x_327); +x_328 = lean_ctor_get(x_304, 3); +lean_inc(x_328); +x_329 = lean_ctor_get(x_304, 4); lean_inc(x_329); -lean_dec(x_273); -x_330 = lean_ctor_get(x_308, 0); +x_330 = lean_ctor_get(x_304, 5); lean_inc(x_330); -x_331 = lean_ctor_get(x_308, 1); -lean_inc(x_331); -x_332 = lean_ctor_get(x_308, 3); +if (lean_is_exclusive(x_304)) { + lean_ctor_release(x_304, 0); + lean_ctor_release(x_304, 1); + lean_ctor_release(x_304, 2); + lean_ctor_release(x_304, 3); + lean_ctor_release(x_304, 4); + lean_ctor_release(x_304, 5); + x_331 = x_304; +} else { + lean_dec_ref(x_304); + x_331 = lean_box(0); +} +x_332 = lean_ctor_get(x_305, 0); lean_inc(x_332); -x_333 = lean_ctor_get(x_308, 4); +x_333 = lean_ctor_get(x_305, 1); lean_inc(x_333); -x_334 = lean_ctor_get(x_308, 5); -lean_inc(x_334); -if (lean_is_exclusive(x_308)) { - lean_ctor_release(x_308, 0); - lean_ctor_release(x_308, 1); - lean_ctor_release(x_308, 2); - lean_ctor_release(x_308, 3); - lean_ctor_release(x_308, 4); - lean_ctor_release(x_308, 5); - x_335 = x_308; +if (lean_is_exclusive(x_305)) { + lean_ctor_release(x_305, 0); + lean_ctor_release(x_305, 1); + lean_ctor_release(x_305, 2); + x_334 = x_305; } else { - lean_dec_ref(x_308); - x_335 = lean_box(0); + lean_dec_ref(x_305); + x_334 = lean_box(0); } -x_336 = lean_ctor_get(x_309, 0); -lean_inc(x_336); -x_337 = lean_ctor_get(x_309, 1); -lean_inc(x_337); -if (lean_is_exclusive(x_309)) { - lean_ctor_release(x_309, 0); - lean_ctor_release(x_309, 1); - lean_ctor_release(x_309, 2); - x_338 = x_309; +if (lean_is_scalar(x_334)) { + x_335 = lean_alloc_ctor(0, 3, 0); } else { - lean_dec_ref(x_309); - x_338 = lean_box(0); + x_335 = x_334; } -if (lean_is_scalar(x_338)) { - x_339 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_335, 0, x_332); +lean_ctor_set(x_335, 1, x_333); +lean_ctor_set(x_335, 2, x_263); +if (lean_is_scalar(x_331)) { + x_336 = lean_alloc_ctor(0, 6, 0); } else { - x_339 = x_338; + x_336 = x_331; } -lean_ctor_set(x_339, 0, x_336); -lean_ctor_set(x_339, 1, x_337); -lean_ctor_set(x_339, 2, x_267); -if (lean_is_scalar(x_335)) { - x_340 = lean_alloc_ctor(0, 6, 0); -} else { - x_340 = x_335; -} -lean_ctor_set(x_340, 0, x_330); -lean_ctor_set(x_340, 1, x_331); -lean_ctor_set(x_340, 2, x_339); -lean_ctor_set(x_340, 3, x_332); -lean_ctor_set(x_340, 4, x_333); -lean_ctor_set(x_340, 5, x_334); -x_341 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_341, 0, x_329); -lean_ctor_set(x_341, 1, x_340); -return x_341; +lean_ctor_set(x_336, 0, x_326); +lean_ctor_set(x_336, 1, x_327); +lean_ctor_set(x_336, 2, x_335); +lean_ctor_set(x_336, 3, x_328); +lean_ctor_set(x_336, 4, x_329); +lean_ctor_set(x_336, 5, x_330); +x_337 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_337, 0, x_325); +lean_ctor_set(x_337, 1, x_336); +return x_337; } } } else { -lean_object* x_342; lean_object* x_343; lean_object* x_344; lean_object* x_345; lean_object* x_346; lean_object* x_347; lean_object* x_348; lean_object* x_349; lean_object* x_350; -x_342 = lean_ctor_get(x_7, 0); -x_343 = lean_ctor_get(x_7, 1); -x_344 = lean_ctor_get(x_7, 2); -x_345 = lean_ctor_get(x_7, 3); -x_346 = lean_ctor_get(x_7, 4); -lean_inc(x_346); -lean_inc(x_345); -lean_inc(x_344); -lean_inc(x_343); +lean_object* x_338; lean_object* x_339; lean_object* x_340; lean_object* x_341; lean_object* x_342; lean_object* x_343; lean_object* x_344; lean_object* x_345; lean_object* x_346; +x_338 = lean_ctor_get(x_6, 0); +x_339 = lean_ctor_get(x_6, 1); +x_340 = lean_ctor_get(x_6, 2); +x_341 = lean_ctor_get(x_6, 3); +x_342 = lean_ctor_get(x_6, 4); lean_inc(x_342); -lean_dec(x_7); -x_347 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_347, 0, x_261); -lean_ctor_set(x_347, 1, x_17); -x_348 = lean_array_push(x_344, x_347); -x_349 = lean_alloc_ctor(0, 5, 0); -lean_ctor_set(x_349, 0, x_342); -lean_ctor_set(x_349, 1, x_343); -lean_ctor_set(x_349, 2, x_348); -lean_ctor_set(x_349, 3, x_345); -lean_ctor_set(x_349, 4, x_346); -x_350 = l_Lean_Meta_withNewLocalInstances___main___at_Lean_Meta_introN___spec__3(x_1, x_2, x_3, x_4, x_5, x_263, x_349, x_260); -if (lean_obj_tag(x_350) == 0) +lean_inc(x_341); +lean_inc(x_340); +lean_inc(x_339); +lean_inc(x_338); +lean_dec(x_6); +x_343 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_343, 0, x_257); +lean_ctor_set(x_343, 1, x_13); +x_344 = lean_array_push(x_340, x_343); +x_345 = lean_alloc_ctor(0, 5, 0); +lean_ctor_set(x_345, 0, x_338); +lean_ctor_set(x_345, 1, x_339); +lean_ctor_set(x_345, 2, x_344); +lean_ctor_set(x_345, 3, x_341); +lean_ctor_set(x_345, 4, x_342); +x_346 = l_Lean_Meta_withNewLocalInstances___main___at_Lean_Meta_introN___spec__3(x_1, x_2, x_3, x_4, x_259, x_345, x_256); +if (lean_obj_tag(x_346) == 0) { -lean_object* x_351; lean_object* x_352; lean_object* x_353; lean_object* x_354; lean_object* x_355; lean_object* x_356; lean_object* x_357; lean_object* x_358; lean_object* x_359; lean_object* x_360; lean_object* x_361; lean_object* x_362; lean_object* x_363; lean_object* x_364; lean_object* x_365; lean_object* x_366; -x_351 = lean_ctor_get(x_350, 1); +lean_object* x_347; lean_object* x_348; lean_object* x_349; lean_object* x_350; lean_object* x_351; lean_object* x_352; lean_object* x_353; lean_object* x_354; lean_object* x_355; lean_object* x_356; lean_object* x_357; lean_object* x_358; lean_object* x_359; lean_object* x_360; lean_object* x_361; lean_object* x_362; +x_347 = lean_ctor_get(x_346, 1); +lean_inc(x_347); +x_348 = lean_ctor_get(x_347, 2); +lean_inc(x_348); +x_349 = lean_ctor_get(x_346, 0); +lean_inc(x_349); +if (lean_is_exclusive(x_346)) { + lean_ctor_release(x_346, 0); + lean_ctor_release(x_346, 1); + x_350 = x_346; +} else { + lean_dec_ref(x_346); + x_350 = lean_box(0); +} +x_351 = lean_ctor_get(x_347, 0); lean_inc(x_351); -x_352 = lean_ctor_get(x_351, 2); +x_352 = lean_ctor_get(x_347, 1); lean_inc(x_352); -x_353 = lean_ctor_get(x_350, 0); +x_353 = lean_ctor_get(x_347, 3); lean_inc(x_353); -if (lean_is_exclusive(x_350)) { - lean_ctor_release(x_350, 0); - lean_ctor_release(x_350, 1); - x_354 = x_350; -} else { - lean_dec_ref(x_350); - x_354 = lean_box(0); -} -x_355 = lean_ctor_get(x_351, 0); +x_354 = lean_ctor_get(x_347, 4); +lean_inc(x_354); +x_355 = lean_ctor_get(x_347, 5); lean_inc(x_355); -x_356 = lean_ctor_get(x_351, 1); -lean_inc(x_356); -x_357 = lean_ctor_get(x_351, 3); +if (lean_is_exclusive(x_347)) { + lean_ctor_release(x_347, 0); + lean_ctor_release(x_347, 1); + lean_ctor_release(x_347, 2); + lean_ctor_release(x_347, 3); + lean_ctor_release(x_347, 4); + lean_ctor_release(x_347, 5); + x_356 = x_347; +} else { + lean_dec_ref(x_347); + x_356 = lean_box(0); +} +x_357 = lean_ctor_get(x_348, 0); lean_inc(x_357); -x_358 = lean_ctor_get(x_351, 4); +x_358 = lean_ctor_get(x_348, 1); lean_inc(x_358); -x_359 = lean_ctor_get(x_351, 5); -lean_inc(x_359); -if (lean_is_exclusive(x_351)) { - lean_ctor_release(x_351, 0); - lean_ctor_release(x_351, 1); - lean_ctor_release(x_351, 2); - lean_ctor_release(x_351, 3); - lean_ctor_release(x_351, 4); - lean_ctor_release(x_351, 5); - x_360 = x_351; +if (lean_is_exclusive(x_348)) { + lean_ctor_release(x_348, 0); + lean_ctor_release(x_348, 1); + lean_ctor_release(x_348, 2); + x_359 = x_348; } else { - lean_dec_ref(x_351); - x_360 = lean_box(0); + lean_dec_ref(x_348); + x_359 = lean_box(0); } -x_361 = lean_ctor_get(x_352, 0); -lean_inc(x_361); -x_362 = lean_ctor_get(x_352, 1); -lean_inc(x_362); -if (lean_is_exclusive(x_352)) { - lean_ctor_release(x_352, 0); - lean_ctor_release(x_352, 1); - lean_ctor_release(x_352, 2); - x_363 = x_352; +if (lean_is_scalar(x_359)) { + x_360 = lean_alloc_ctor(0, 3, 0); } else { - lean_dec_ref(x_352); - x_363 = lean_box(0); + x_360 = x_359; } -if (lean_is_scalar(x_363)) { - x_364 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_360, 0, x_357); +lean_ctor_set(x_360, 1, x_358); +lean_ctor_set(x_360, 2, x_263); +if (lean_is_scalar(x_356)) { + x_361 = lean_alloc_ctor(0, 6, 0); } else { - x_364 = x_363; + x_361 = x_356; } -lean_ctor_set(x_364, 0, x_361); -lean_ctor_set(x_364, 1, x_362); -lean_ctor_set(x_364, 2, x_267); -if (lean_is_scalar(x_360)) { - x_365 = lean_alloc_ctor(0, 6, 0); +lean_ctor_set(x_361, 0, x_351); +lean_ctor_set(x_361, 1, x_352); +lean_ctor_set(x_361, 2, x_360); +lean_ctor_set(x_361, 3, x_353); +lean_ctor_set(x_361, 4, x_354); +lean_ctor_set(x_361, 5, x_355); +if (lean_is_scalar(x_350)) { + x_362 = lean_alloc_ctor(0, 2, 0); } else { - x_365 = x_360; + x_362 = x_350; } -lean_ctor_set(x_365, 0, x_355); -lean_ctor_set(x_365, 1, x_356); -lean_ctor_set(x_365, 2, x_364); -lean_ctor_set(x_365, 3, x_357); -lean_ctor_set(x_365, 4, x_358); -lean_ctor_set(x_365, 5, x_359); -if (lean_is_scalar(x_354)) { - x_366 = lean_alloc_ctor(0, 2, 0); -} else { - x_366 = x_354; -} -lean_ctor_set(x_366, 0, x_353); -lean_ctor_set(x_366, 1, x_365); -return x_366; +lean_ctor_set(x_362, 0, x_349); +lean_ctor_set(x_362, 1, x_361); +return x_362; } else { -lean_object* x_367; lean_object* x_368; lean_object* x_369; lean_object* x_370; lean_object* x_371; lean_object* x_372; lean_object* x_373; lean_object* x_374; lean_object* x_375; lean_object* x_376; lean_object* x_377; lean_object* x_378; lean_object* x_379; lean_object* x_380; lean_object* x_381; lean_object* x_382; -x_367 = lean_ctor_get(x_350, 1); +lean_object* x_363; lean_object* x_364; lean_object* x_365; lean_object* x_366; lean_object* x_367; lean_object* x_368; lean_object* x_369; lean_object* x_370; lean_object* x_371; lean_object* x_372; lean_object* x_373; lean_object* x_374; lean_object* x_375; lean_object* x_376; lean_object* x_377; lean_object* x_378; +x_363 = lean_ctor_get(x_346, 1); +lean_inc(x_363); +x_364 = lean_ctor_get(x_363, 2); +lean_inc(x_364); +x_365 = lean_ctor_get(x_346, 0); +lean_inc(x_365); +if (lean_is_exclusive(x_346)) { + lean_ctor_release(x_346, 0); + lean_ctor_release(x_346, 1); + x_366 = x_346; +} else { + lean_dec_ref(x_346); + x_366 = lean_box(0); +} +x_367 = lean_ctor_get(x_363, 0); lean_inc(x_367); -x_368 = lean_ctor_get(x_367, 2); +x_368 = lean_ctor_get(x_363, 1); lean_inc(x_368); -x_369 = lean_ctor_get(x_350, 0); +x_369 = lean_ctor_get(x_363, 3); lean_inc(x_369); -if (lean_is_exclusive(x_350)) { - lean_ctor_release(x_350, 0); - lean_ctor_release(x_350, 1); - x_370 = x_350; -} else { - lean_dec_ref(x_350); - x_370 = lean_box(0); -} -x_371 = lean_ctor_get(x_367, 0); +x_370 = lean_ctor_get(x_363, 4); +lean_inc(x_370); +x_371 = lean_ctor_get(x_363, 5); lean_inc(x_371); -x_372 = lean_ctor_get(x_367, 1); -lean_inc(x_372); -x_373 = lean_ctor_get(x_367, 3); +if (lean_is_exclusive(x_363)) { + lean_ctor_release(x_363, 0); + lean_ctor_release(x_363, 1); + lean_ctor_release(x_363, 2); + lean_ctor_release(x_363, 3); + lean_ctor_release(x_363, 4); + lean_ctor_release(x_363, 5); + x_372 = x_363; +} else { + lean_dec_ref(x_363); + x_372 = lean_box(0); +} +x_373 = lean_ctor_get(x_364, 0); lean_inc(x_373); -x_374 = lean_ctor_get(x_367, 4); +x_374 = lean_ctor_get(x_364, 1); lean_inc(x_374); -x_375 = lean_ctor_get(x_367, 5); -lean_inc(x_375); -if (lean_is_exclusive(x_367)) { - lean_ctor_release(x_367, 0); - lean_ctor_release(x_367, 1); - lean_ctor_release(x_367, 2); - lean_ctor_release(x_367, 3); - lean_ctor_release(x_367, 4); - lean_ctor_release(x_367, 5); - x_376 = x_367; +if (lean_is_exclusive(x_364)) { + lean_ctor_release(x_364, 0); + lean_ctor_release(x_364, 1); + lean_ctor_release(x_364, 2); + x_375 = x_364; } else { - lean_dec_ref(x_367); - x_376 = lean_box(0); + lean_dec_ref(x_364); + x_375 = lean_box(0); } -x_377 = lean_ctor_get(x_368, 0); -lean_inc(x_377); -x_378 = lean_ctor_get(x_368, 1); -lean_inc(x_378); -if (lean_is_exclusive(x_368)) { - lean_ctor_release(x_368, 0); - lean_ctor_release(x_368, 1); - lean_ctor_release(x_368, 2); - x_379 = x_368; +if (lean_is_scalar(x_375)) { + x_376 = lean_alloc_ctor(0, 3, 0); } else { - lean_dec_ref(x_368); - x_379 = lean_box(0); + x_376 = x_375; } -if (lean_is_scalar(x_379)) { - x_380 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_376, 0, x_373); +lean_ctor_set(x_376, 1, x_374); +lean_ctor_set(x_376, 2, x_263); +if (lean_is_scalar(x_372)) { + x_377 = lean_alloc_ctor(0, 6, 0); } else { - x_380 = x_379; + x_377 = x_372; } -lean_ctor_set(x_380, 0, x_377); -lean_ctor_set(x_380, 1, x_378); -lean_ctor_set(x_380, 2, x_267); -if (lean_is_scalar(x_376)) { - x_381 = lean_alloc_ctor(0, 6, 0); +lean_ctor_set(x_377, 0, x_367); +lean_ctor_set(x_377, 1, x_368); +lean_ctor_set(x_377, 2, x_376); +lean_ctor_set(x_377, 3, x_369); +lean_ctor_set(x_377, 4, x_370); +lean_ctor_set(x_377, 5, x_371); +if (lean_is_scalar(x_366)) { + x_378 = lean_alloc_ctor(1, 2, 0); } else { - x_381 = x_376; + x_378 = x_366; } -lean_ctor_set(x_381, 0, x_371); -lean_ctor_set(x_381, 1, x_372); -lean_ctor_set(x_381, 2, x_380); -lean_ctor_set(x_381, 3, x_373); -lean_ctor_set(x_381, 4, x_374); -lean_ctor_set(x_381, 5, x_375); -if (lean_is_scalar(x_370)) { - x_382 = lean_alloc_ctor(1, 2, 0); -} else { - x_382 = x_370; -} -lean_ctor_set(x_382, 0, x_369); -lean_ctor_set(x_382, 1, x_381); -return x_382; +lean_ctor_set(x_378, 0, x_365); +lean_ctor_set(x_378, 1, x_377); +return x_378; } } } else { -lean_object* x_383; lean_object* x_384; lean_object* x_385; lean_object* x_386; lean_object* x_387; lean_object* x_388; lean_object* x_389; lean_object* x_390; lean_object* x_391; lean_object* x_392; lean_object* x_393; lean_object* x_394; lean_object* x_395; lean_object* x_396; lean_object* x_397; -x_383 = lean_ctor_get(x_265, 0); -x_384 = lean_ctor_get(x_265, 1); -x_385 = lean_ctor_get(x_265, 2); -lean_inc(x_385); +lean_object* x_379; lean_object* x_380; lean_object* x_381; lean_object* x_382; lean_object* x_383; lean_object* x_384; lean_object* x_385; lean_object* x_386; lean_object* x_387; lean_object* x_388; lean_object* x_389; lean_object* x_390; lean_object* x_391; lean_object* x_392; lean_object* x_393; +x_379 = lean_ctor_get(x_261, 0); +x_380 = lean_ctor_get(x_261, 1); +x_381 = lean_ctor_get(x_261, 2); +lean_inc(x_381); +lean_inc(x_380); +lean_inc(x_379); +lean_dec(x_261); +x_382 = l_Lean_Meta_resettingSynthInstanceCache___rarg___closed__1; +x_383 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_383, 0, x_379); +lean_ctor_set(x_383, 1, x_380); +lean_ctor_set(x_383, 2, x_382); +lean_ctor_set(x_256, 2, x_383); +x_384 = lean_ctor_get(x_6, 0); lean_inc(x_384); -lean_inc(x_383); -lean_dec(x_265); -x_386 = l_Lean_Meta_resettingSynthInstanceCache___rarg___closed__1; -x_387 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_387, 0, x_383); -lean_ctor_set(x_387, 1, x_384); -lean_ctor_set(x_387, 2, x_386); -lean_ctor_set(x_260, 2, x_387); -x_388 = lean_ctor_get(x_7, 0); +x_385 = lean_ctor_get(x_6, 1); +lean_inc(x_385); +x_386 = lean_ctor_get(x_6, 2); +lean_inc(x_386); +x_387 = lean_ctor_get(x_6, 3); +lean_inc(x_387); +x_388 = lean_ctor_get(x_6, 4); lean_inc(x_388); -x_389 = lean_ctor_get(x_7, 1); -lean_inc(x_389); -x_390 = lean_ctor_get(x_7, 2); -lean_inc(x_390); -x_391 = lean_ctor_get(x_7, 3); -lean_inc(x_391); -x_392 = lean_ctor_get(x_7, 4); -lean_inc(x_392); -if (lean_is_exclusive(x_7)) { - lean_ctor_release(x_7, 0); - lean_ctor_release(x_7, 1); - lean_ctor_release(x_7, 2); - lean_ctor_release(x_7, 3); - lean_ctor_release(x_7, 4); - x_393 = x_7; +if (lean_is_exclusive(x_6)) { + lean_ctor_release(x_6, 0); + lean_ctor_release(x_6, 1); + lean_ctor_release(x_6, 2); + lean_ctor_release(x_6, 3); + lean_ctor_release(x_6, 4); + x_389 = x_6; } else { - lean_dec_ref(x_7); - x_393 = lean_box(0); + lean_dec_ref(x_6); + x_389 = lean_box(0); } -x_394 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_394, 0, x_261); -lean_ctor_set(x_394, 1, x_17); -x_395 = lean_array_push(x_390, x_394); -if (lean_is_scalar(x_393)) { - x_396 = lean_alloc_ctor(0, 5, 0); +x_390 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_390, 0, x_257); +lean_ctor_set(x_390, 1, x_13); +x_391 = lean_array_push(x_386, x_390); +if (lean_is_scalar(x_389)) { + x_392 = lean_alloc_ctor(0, 5, 0); } else { - x_396 = x_393; + x_392 = x_389; } -lean_ctor_set(x_396, 0, x_388); -lean_ctor_set(x_396, 1, x_389); -lean_ctor_set(x_396, 2, x_395); -lean_ctor_set(x_396, 3, x_391); -lean_ctor_set(x_396, 4, x_392); -x_397 = l_Lean_Meta_withNewLocalInstances___main___at_Lean_Meta_introN___spec__3(x_1, x_2, x_3, x_4, x_5, x_263, x_396, x_260); -if (lean_obj_tag(x_397) == 0) +lean_ctor_set(x_392, 0, x_384); +lean_ctor_set(x_392, 1, x_385); +lean_ctor_set(x_392, 2, x_391); +lean_ctor_set(x_392, 3, x_387); +lean_ctor_set(x_392, 4, x_388); +x_393 = l_Lean_Meta_withNewLocalInstances___main___at_Lean_Meta_introN___spec__3(x_1, x_2, x_3, x_4, x_259, x_392, x_256); +if (lean_obj_tag(x_393) == 0) { -lean_object* x_398; lean_object* x_399; lean_object* x_400; lean_object* x_401; lean_object* x_402; lean_object* x_403; lean_object* x_404; lean_object* x_405; lean_object* x_406; lean_object* x_407; lean_object* x_408; lean_object* x_409; lean_object* x_410; lean_object* x_411; lean_object* x_412; lean_object* x_413; -x_398 = lean_ctor_get(x_397, 1); +lean_object* x_394; lean_object* x_395; lean_object* x_396; lean_object* x_397; lean_object* x_398; lean_object* x_399; lean_object* x_400; lean_object* x_401; lean_object* x_402; lean_object* x_403; lean_object* x_404; lean_object* x_405; lean_object* x_406; lean_object* x_407; lean_object* x_408; lean_object* x_409; +x_394 = lean_ctor_get(x_393, 1); +lean_inc(x_394); +x_395 = lean_ctor_get(x_394, 2); +lean_inc(x_395); +x_396 = lean_ctor_get(x_393, 0); +lean_inc(x_396); +if (lean_is_exclusive(x_393)) { + lean_ctor_release(x_393, 0); + lean_ctor_release(x_393, 1); + x_397 = x_393; +} else { + lean_dec_ref(x_393); + x_397 = lean_box(0); +} +x_398 = lean_ctor_get(x_394, 0); lean_inc(x_398); -x_399 = lean_ctor_get(x_398, 2); +x_399 = lean_ctor_get(x_394, 1); lean_inc(x_399); -x_400 = lean_ctor_get(x_397, 0); +x_400 = lean_ctor_get(x_394, 3); lean_inc(x_400); -if (lean_is_exclusive(x_397)) { - lean_ctor_release(x_397, 0); - lean_ctor_release(x_397, 1); - x_401 = x_397; -} else { - lean_dec_ref(x_397); - x_401 = lean_box(0); -} -x_402 = lean_ctor_get(x_398, 0); +x_401 = lean_ctor_get(x_394, 4); +lean_inc(x_401); +x_402 = lean_ctor_get(x_394, 5); lean_inc(x_402); -x_403 = lean_ctor_get(x_398, 1); -lean_inc(x_403); -x_404 = lean_ctor_get(x_398, 3); +if (lean_is_exclusive(x_394)) { + lean_ctor_release(x_394, 0); + lean_ctor_release(x_394, 1); + lean_ctor_release(x_394, 2); + lean_ctor_release(x_394, 3); + lean_ctor_release(x_394, 4); + lean_ctor_release(x_394, 5); + x_403 = x_394; +} else { + lean_dec_ref(x_394); + x_403 = lean_box(0); +} +x_404 = lean_ctor_get(x_395, 0); lean_inc(x_404); -x_405 = lean_ctor_get(x_398, 4); +x_405 = lean_ctor_get(x_395, 1); lean_inc(x_405); -x_406 = lean_ctor_get(x_398, 5); -lean_inc(x_406); -if (lean_is_exclusive(x_398)) { - lean_ctor_release(x_398, 0); - lean_ctor_release(x_398, 1); - lean_ctor_release(x_398, 2); - lean_ctor_release(x_398, 3); - lean_ctor_release(x_398, 4); - lean_ctor_release(x_398, 5); - x_407 = x_398; +if (lean_is_exclusive(x_395)) { + lean_ctor_release(x_395, 0); + lean_ctor_release(x_395, 1); + lean_ctor_release(x_395, 2); + x_406 = x_395; } else { - lean_dec_ref(x_398); - x_407 = lean_box(0); + lean_dec_ref(x_395); + x_406 = lean_box(0); } -x_408 = lean_ctor_get(x_399, 0); -lean_inc(x_408); -x_409 = lean_ctor_get(x_399, 1); -lean_inc(x_409); -if (lean_is_exclusive(x_399)) { - lean_ctor_release(x_399, 0); - lean_ctor_release(x_399, 1); - lean_ctor_release(x_399, 2); - x_410 = x_399; +if (lean_is_scalar(x_406)) { + x_407 = lean_alloc_ctor(0, 3, 0); } else { - lean_dec_ref(x_399); - x_410 = lean_box(0); + x_407 = x_406; } -if (lean_is_scalar(x_410)) { - x_411 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_407, 0, x_404); +lean_ctor_set(x_407, 1, x_405); +lean_ctor_set(x_407, 2, x_381); +if (lean_is_scalar(x_403)) { + x_408 = lean_alloc_ctor(0, 6, 0); } else { - x_411 = x_410; + x_408 = x_403; } -lean_ctor_set(x_411, 0, x_408); -lean_ctor_set(x_411, 1, x_409); -lean_ctor_set(x_411, 2, x_385); -if (lean_is_scalar(x_407)) { - x_412 = lean_alloc_ctor(0, 6, 0); +lean_ctor_set(x_408, 0, x_398); +lean_ctor_set(x_408, 1, x_399); +lean_ctor_set(x_408, 2, x_407); +lean_ctor_set(x_408, 3, x_400); +lean_ctor_set(x_408, 4, x_401); +lean_ctor_set(x_408, 5, x_402); +if (lean_is_scalar(x_397)) { + x_409 = lean_alloc_ctor(0, 2, 0); } else { - x_412 = x_407; + x_409 = x_397; } -lean_ctor_set(x_412, 0, x_402); -lean_ctor_set(x_412, 1, x_403); -lean_ctor_set(x_412, 2, x_411); -lean_ctor_set(x_412, 3, x_404); -lean_ctor_set(x_412, 4, x_405); -lean_ctor_set(x_412, 5, x_406); -if (lean_is_scalar(x_401)) { - x_413 = lean_alloc_ctor(0, 2, 0); -} else { - x_413 = x_401; -} -lean_ctor_set(x_413, 0, x_400); -lean_ctor_set(x_413, 1, x_412); -return x_413; +lean_ctor_set(x_409, 0, x_396); +lean_ctor_set(x_409, 1, x_408); +return x_409; } else { -lean_object* x_414; lean_object* x_415; lean_object* x_416; lean_object* x_417; lean_object* x_418; lean_object* x_419; lean_object* x_420; lean_object* x_421; lean_object* x_422; lean_object* x_423; lean_object* x_424; lean_object* x_425; lean_object* x_426; lean_object* x_427; lean_object* x_428; lean_object* x_429; -x_414 = lean_ctor_get(x_397, 1); +lean_object* x_410; lean_object* x_411; lean_object* x_412; lean_object* x_413; lean_object* x_414; lean_object* x_415; lean_object* x_416; lean_object* x_417; lean_object* x_418; lean_object* x_419; lean_object* x_420; lean_object* x_421; lean_object* x_422; lean_object* x_423; lean_object* x_424; lean_object* x_425; +x_410 = lean_ctor_get(x_393, 1); +lean_inc(x_410); +x_411 = lean_ctor_get(x_410, 2); +lean_inc(x_411); +x_412 = lean_ctor_get(x_393, 0); +lean_inc(x_412); +if (lean_is_exclusive(x_393)) { + lean_ctor_release(x_393, 0); + lean_ctor_release(x_393, 1); + x_413 = x_393; +} else { + lean_dec_ref(x_393); + x_413 = lean_box(0); +} +x_414 = lean_ctor_get(x_410, 0); lean_inc(x_414); -x_415 = lean_ctor_get(x_414, 2); +x_415 = lean_ctor_get(x_410, 1); lean_inc(x_415); -x_416 = lean_ctor_get(x_397, 0); +x_416 = lean_ctor_get(x_410, 3); lean_inc(x_416); -if (lean_is_exclusive(x_397)) { - lean_ctor_release(x_397, 0); - lean_ctor_release(x_397, 1); - x_417 = x_397; -} else { - lean_dec_ref(x_397); - x_417 = lean_box(0); -} -x_418 = lean_ctor_get(x_414, 0); +x_417 = lean_ctor_get(x_410, 4); +lean_inc(x_417); +x_418 = lean_ctor_get(x_410, 5); lean_inc(x_418); -x_419 = lean_ctor_get(x_414, 1); -lean_inc(x_419); -x_420 = lean_ctor_get(x_414, 3); +if (lean_is_exclusive(x_410)) { + lean_ctor_release(x_410, 0); + lean_ctor_release(x_410, 1); + lean_ctor_release(x_410, 2); + lean_ctor_release(x_410, 3); + lean_ctor_release(x_410, 4); + lean_ctor_release(x_410, 5); + x_419 = x_410; +} else { + lean_dec_ref(x_410); + x_419 = lean_box(0); +} +x_420 = lean_ctor_get(x_411, 0); lean_inc(x_420); -x_421 = lean_ctor_get(x_414, 4); +x_421 = lean_ctor_get(x_411, 1); lean_inc(x_421); -x_422 = lean_ctor_get(x_414, 5); -lean_inc(x_422); -if (lean_is_exclusive(x_414)) { - lean_ctor_release(x_414, 0); - lean_ctor_release(x_414, 1); - lean_ctor_release(x_414, 2); - lean_ctor_release(x_414, 3); - lean_ctor_release(x_414, 4); - lean_ctor_release(x_414, 5); - x_423 = x_414; +if (lean_is_exclusive(x_411)) { + lean_ctor_release(x_411, 0); + lean_ctor_release(x_411, 1); + lean_ctor_release(x_411, 2); + x_422 = x_411; } else { - lean_dec_ref(x_414); - x_423 = lean_box(0); + lean_dec_ref(x_411); + x_422 = lean_box(0); } -x_424 = lean_ctor_get(x_415, 0); -lean_inc(x_424); -x_425 = lean_ctor_get(x_415, 1); -lean_inc(x_425); -if (lean_is_exclusive(x_415)) { - lean_ctor_release(x_415, 0); - lean_ctor_release(x_415, 1); - lean_ctor_release(x_415, 2); - x_426 = x_415; +if (lean_is_scalar(x_422)) { + x_423 = lean_alloc_ctor(0, 3, 0); } else { - lean_dec_ref(x_415); - x_426 = lean_box(0); + x_423 = x_422; } -if (lean_is_scalar(x_426)) { - x_427 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_423, 0, x_420); +lean_ctor_set(x_423, 1, x_421); +lean_ctor_set(x_423, 2, x_381); +if (lean_is_scalar(x_419)) { + x_424 = lean_alloc_ctor(0, 6, 0); } else { - x_427 = x_426; + x_424 = x_419; } -lean_ctor_set(x_427, 0, x_424); -lean_ctor_set(x_427, 1, x_425); -lean_ctor_set(x_427, 2, x_385); -if (lean_is_scalar(x_423)) { - x_428 = lean_alloc_ctor(0, 6, 0); +lean_ctor_set(x_424, 0, x_414); +lean_ctor_set(x_424, 1, x_415); +lean_ctor_set(x_424, 2, x_423); +lean_ctor_set(x_424, 3, x_416); +lean_ctor_set(x_424, 4, x_417); +lean_ctor_set(x_424, 5, x_418); +if (lean_is_scalar(x_413)) { + x_425 = lean_alloc_ctor(1, 2, 0); } else { - x_428 = x_423; + x_425 = x_413; } -lean_ctor_set(x_428, 0, x_418); -lean_ctor_set(x_428, 1, x_419); -lean_ctor_set(x_428, 2, x_427); -lean_ctor_set(x_428, 3, x_420); -lean_ctor_set(x_428, 4, x_421); -lean_ctor_set(x_428, 5, x_422); -if (lean_is_scalar(x_417)) { - x_429 = lean_alloc_ctor(1, 2, 0); -} else { - x_429 = x_417; -} -lean_ctor_set(x_429, 0, x_416); -lean_ctor_set(x_429, 1, x_428); -return x_429; +lean_ctor_set(x_425, 0, x_412); +lean_ctor_set(x_425, 1, x_424); +return x_425; } } } else { -lean_object* x_430; lean_object* x_431; lean_object* x_432; lean_object* x_433; lean_object* x_434; lean_object* x_435; lean_object* x_436; lean_object* x_437; lean_object* x_438; lean_object* x_439; lean_object* x_440; lean_object* x_441; lean_object* x_442; lean_object* x_443; lean_object* x_444; lean_object* x_445; lean_object* x_446; lean_object* x_447; lean_object* x_448; lean_object* x_449; lean_object* x_450; lean_object* x_451; lean_object* x_452; -x_430 = lean_ctor_get(x_260, 2); -x_431 = lean_ctor_get(x_260, 0); -x_432 = lean_ctor_get(x_260, 1); -x_433 = lean_ctor_get(x_260, 3); -x_434 = lean_ctor_get(x_260, 4); -x_435 = lean_ctor_get(x_260, 5); -lean_inc(x_435); -lean_inc(x_434); -lean_inc(x_433); -lean_inc(x_430); -lean_inc(x_432); +lean_object* x_426; lean_object* x_427; lean_object* x_428; lean_object* x_429; lean_object* x_430; lean_object* x_431; lean_object* x_432; lean_object* x_433; lean_object* x_434; lean_object* x_435; lean_object* x_436; lean_object* x_437; lean_object* x_438; lean_object* x_439; lean_object* x_440; lean_object* x_441; lean_object* x_442; lean_object* x_443; lean_object* x_444; lean_object* x_445; lean_object* x_446; lean_object* x_447; lean_object* x_448; +x_426 = lean_ctor_get(x_256, 2); +x_427 = lean_ctor_get(x_256, 0); +x_428 = lean_ctor_get(x_256, 1); +x_429 = lean_ctor_get(x_256, 3); +x_430 = lean_ctor_get(x_256, 4); +x_431 = lean_ctor_get(x_256, 5); lean_inc(x_431); -lean_dec(x_260); -x_436 = lean_ctor_get(x_430, 0); -lean_inc(x_436); -x_437 = lean_ctor_get(x_430, 1); -lean_inc(x_437); -x_438 = lean_ctor_get(x_430, 2); -lean_inc(x_438); -if (lean_is_exclusive(x_430)) { - lean_ctor_release(x_430, 0); - lean_ctor_release(x_430, 1); - lean_ctor_release(x_430, 2); - x_439 = x_430; +lean_inc(x_430); +lean_inc(x_429); +lean_inc(x_426); +lean_inc(x_428); +lean_inc(x_427); +lean_dec(x_256); +x_432 = lean_ctor_get(x_426, 0); +lean_inc(x_432); +x_433 = lean_ctor_get(x_426, 1); +lean_inc(x_433); +x_434 = lean_ctor_get(x_426, 2); +lean_inc(x_434); +if (lean_is_exclusive(x_426)) { + lean_ctor_release(x_426, 0); + lean_ctor_release(x_426, 1); + lean_ctor_release(x_426, 2); + x_435 = x_426; } else { - lean_dec_ref(x_430); - x_439 = lean_box(0); + lean_dec_ref(x_426); + x_435 = lean_box(0); } -x_440 = l_Lean_Meta_resettingSynthInstanceCache___rarg___closed__1; -if (lean_is_scalar(x_439)) { - x_441 = lean_alloc_ctor(0, 3, 0); +x_436 = l_Lean_Meta_resettingSynthInstanceCache___rarg___closed__1; +if (lean_is_scalar(x_435)) { + x_437 = lean_alloc_ctor(0, 3, 0); } else { - x_441 = x_439; + x_437 = x_435; } -lean_ctor_set(x_441, 0, x_436); -lean_ctor_set(x_441, 1, x_437); -lean_ctor_set(x_441, 2, x_440); -x_442 = lean_alloc_ctor(0, 6, 0); -lean_ctor_set(x_442, 0, x_431); -lean_ctor_set(x_442, 1, x_432); -lean_ctor_set(x_442, 2, x_441); -lean_ctor_set(x_442, 3, x_433); -lean_ctor_set(x_442, 4, x_434); -lean_ctor_set(x_442, 5, x_435); -x_443 = lean_ctor_get(x_7, 0); +lean_ctor_set(x_437, 0, x_432); +lean_ctor_set(x_437, 1, x_433); +lean_ctor_set(x_437, 2, x_436); +x_438 = lean_alloc_ctor(0, 6, 0); +lean_ctor_set(x_438, 0, x_427); +lean_ctor_set(x_438, 1, x_428); +lean_ctor_set(x_438, 2, x_437); +lean_ctor_set(x_438, 3, x_429); +lean_ctor_set(x_438, 4, x_430); +lean_ctor_set(x_438, 5, x_431); +x_439 = lean_ctor_get(x_6, 0); +lean_inc(x_439); +x_440 = lean_ctor_get(x_6, 1); +lean_inc(x_440); +x_441 = lean_ctor_get(x_6, 2); +lean_inc(x_441); +x_442 = lean_ctor_get(x_6, 3); +lean_inc(x_442); +x_443 = lean_ctor_get(x_6, 4); lean_inc(x_443); -x_444 = lean_ctor_get(x_7, 1); -lean_inc(x_444); -x_445 = lean_ctor_get(x_7, 2); -lean_inc(x_445); -x_446 = lean_ctor_get(x_7, 3); -lean_inc(x_446); -x_447 = lean_ctor_get(x_7, 4); -lean_inc(x_447); -if (lean_is_exclusive(x_7)) { - lean_ctor_release(x_7, 0); - lean_ctor_release(x_7, 1); - lean_ctor_release(x_7, 2); - lean_ctor_release(x_7, 3); - lean_ctor_release(x_7, 4); - x_448 = x_7; +if (lean_is_exclusive(x_6)) { + lean_ctor_release(x_6, 0); + lean_ctor_release(x_6, 1); + lean_ctor_release(x_6, 2); + lean_ctor_release(x_6, 3); + lean_ctor_release(x_6, 4); + x_444 = x_6; } else { - lean_dec_ref(x_7); - x_448 = lean_box(0); + lean_dec_ref(x_6); + x_444 = lean_box(0); } -x_449 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_449, 0, x_261); -lean_ctor_set(x_449, 1, x_17); -x_450 = lean_array_push(x_445, x_449); -if (lean_is_scalar(x_448)) { - x_451 = lean_alloc_ctor(0, 5, 0); +x_445 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_445, 0, x_257); +lean_ctor_set(x_445, 1, x_13); +x_446 = lean_array_push(x_441, x_445); +if (lean_is_scalar(x_444)) { + x_447 = lean_alloc_ctor(0, 5, 0); } else { - x_451 = x_448; + x_447 = x_444; } -lean_ctor_set(x_451, 0, x_443); -lean_ctor_set(x_451, 1, x_444); -lean_ctor_set(x_451, 2, x_450); -lean_ctor_set(x_451, 3, x_446); -lean_ctor_set(x_451, 4, x_447); -x_452 = l_Lean_Meta_withNewLocalInstances___main___at_Lean_Meta_introN___spec__3(x_1, x_2, x_3, x_4, x_5, x_263, x_451, x_442); -if (lean_obj_tag(x_452) == 0) +lean_ctor_set(x_447, 0, x_439); +lean_ctor_set(x_447, 1, x_440); +lean_ctor_set(x_447, 2, x_446); +lean_ctor_set(x_447, 3, x_442); +lean_ctor_set(x_447, 4, x_443); +x_448 = l_Lean_Meta_withNewLocalInstances___main___at_Lean_Meta_introN___spec__3(x_1, x_2, x_3, x_4, x_259, x_447, x_438); +if (lean_obj_tag(x_448) == 0) { -lean_object* x_453; lean_object* x_454; lean_object* x_455; lean_object* x_456; lean_object* x_457; lean_object* x_458; lean_object* x_459; lean_object* x_460; lean_object* x_461; lean_object* x_462; lean_object* x_463; lean_object* x_464; lean_object* x_465; lean_object* x_466; lean_object* x_467; lean_object* x_468; -x_453 = lean_ctor_get(x_452, 1); +lean_object* x_449; lean_object* x_450; lean_object* x_451; lean_object* x_452; lean_object* x_453; lean_object* x_454; lean_object* x_455; lean_object* x_456; lean_object* x_457; lean_object* x_458; lean_object* x_459; lean_object* x_460; lean_object* x_461; lean_object* x_462; lean_object* x_463; lean_object* x_464; +x_449 = lean_ctor_get(x_448, 1); +lean_inc(x_449); +x_450 = lean_ctor_get(x_449, 2); +lean_inc(x_450); +x_451 = lean_ctor_get(x_448, 0); +lean_inc(x_451); +if (lean_is_exclusive(x_448)) { + lean_ctor_release(x_448, 0); + lean_ctor_release(x_448, 1); + x_452 = x_448; +} else { + lean_dec_ref(x_448); + x_452 = lean_box(0); +} +x_453 = lean_ctor_get(x_449, 0); lean_inc(x_453); -x_454 = lean_ctor_get(x_453, 2); +x_454 = lean_ctor_get(x_449, 1); lean_inc(x_454); -x_455 = lean_ctor_get(x_452, 0); +x_455 = lean_ctor_get(x_449, 3); lean_inc(x_455); -if (lean_is_exclusive(x_452)) { - lean_ctor_release(x_452, 0); - lean_ctor_release(x_452, 1); - x_456 = x_452; -} else { - lean_dec_ref(x_452); - x_456 = lean_box(0); -} -x_457 = lean_ctor_get(x_453, 0); +x_456 = lean_ctor_get(x_449, 4); +lean_inc(x_456); +x_457 = lean_ctor_get(x_449, 5); lean_inc(x_457); -x_458 = lean_ctor_get(x_453, 1); -lean_inc(x_458); -x_459 = lean_ctor_get(x_453, 3); +if (lean_is_exclusive(x_449)) { + lean_ctor_release(x_449, 0); + lean_ctor_release(x_449, 1); + lean_ctor_release(x_449, 2); + lean_ctor_release(x_449, 3); + lean_ctor_release(x_449, 4); + lean_ctor_release(x_449, 5); + x_458 = x_449; +} else { + lean_dec_ref(x_449); + x_458 = lean_box(0); +} +x_459 = lean_ctor_get(x_450, 0); lean_inc(x_459); -x_460 = lean_ctor_get(x_453, 4); +x_460 = lean_ctor_get(x_450, 1); lean_inc(x_460); -x_461 = lean_ctor_get(x_453, 5); -lean_inc(x_461); -if (lean_is_exclusive(x_453)) { - lean_ctor_release(x_453, 0); - lean_ctor_release(x_453, 1); - lean_ctor_release(x_453, 2); - lean_ctor_release(x_453, 3); - lean_ctor_release(x_453, 4); - lean_ctor_release(x_453, 5); - x_462 = x_453; +if (lean_is_exclusive(x_450)) { + lean_ctor_release(x_450, 0); + lean_ctor_release(x_450, 1); + lean_ctor_release(x_450, 2); + x_461 = x_450; } else { - lean_dec_ref(x_453); - x_462 = lean_box(0); + lean_dec_ref(x_450); + x_461 = lean_box(0); } -x_463 = lean_ctor_get(x_454, 0); -lean_inc(x_463); -x_464 = lean_ctor_get(x_454, 1); -lean_inc(x_464); -if (lean_is_exclusive(x_454)) { - lean_ctor_release(x_454, 0); - lean_ctor_release(x_454, 1); - lean_ctor_release(x_454, 2); - x_465 = x_454; +if (lean_is_scalar(x_461)) { + x_462 = lean_alloc_ctor(0, 3, 0); } else { - lean_dec_ref(x_454); - x_465 = lean_box(0); + x_462 = x_461; } -if (lean_is_scalar(x_465)) { - x_466 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_462, 0, x_459); +lean_ctor_set(x_462, 1, x_460); +lean_ctor_set(x_462, 2, x_434); +if (lean_is_scalar(x_458)) { + x_463 = lean_alloc_ctor(0, 6, 0); } else { - x_466 = x_465; + x_463 = x_458; } -lean_ctor_set(x_466, 0, x_463); -lean_ctor_set(x_466, 1, x_464); -lean_ctor_set(x_466, 2, x_438); -if (lean_is_scalar(x_462)) { - x_467 = lean_alloc_ctor(0, 6, 0); +lean_ctor_set(x_463, 0, x_453); +lean_ctor_set(x_463, 1, x_454); +lean_ctor_set(x_463, 2, x_462); +lean_ctor_set(x_463, 3, x_455); +lean_ctor_set(x_463, 4, x_456); +lean_ctor_set(x_463, 5, x_457); +if (lean_is_scalar(x_452)) { + x_464 = lean_alloc_ctor(0, 2, 0); } else { - x_467 = x_462; + x_464 = x_452; } -lean_ctor_set(x_467, 0, x_457); -lean_ctor_set(x_467, 1, x_458); -lean_ctor_set(x_467, 2, x_466); -lean_ctor_set(x_467, 3, x_459); -lean_ctor_set(x_467, 4, x_460); -lean_ctor_set(x_467, 5, x_461); -if (lean_is_scalar(x_456)) { - x_468 = lean_alloc_ctor(0, 2, 0); -} else { - x_468 = x_456; -} -lean_ctor_set(x_468, 0, x_455); -lean_ctor_set(x_468, 1, x_467); -return x_468; +lean_ctor_set(x_464, 0, x_451); +lean_ctor_set(x_464, 1, x_463); +return x_464; } else { -lean_object* x_469; lean_object* x_470; lean_object* x_471; lean_object* x_472; lean_object* x_473; lean_object* x_474; lean_object* x_475; lean_object* x_476; lean_object* x_477; lean_object* x_478; lean_object* x_479; lean_object* x_480; lean_object* x_481; lean_object* x_482; lean_object* x_483; lean_object* x_484; -x_469 = lean_ctor_get(x_452, 1); +lean_object* x_465; lean_object* x_466; lean_object* x_467; lean_object* x_468; lean_object* x_469; lean_object* x_470; lean_object* x_471; lean_object* x_472; lean_object* x_473; lean_object* x_474; lean_object* x_475; lean_object* x_476; lean_object* x_477; lean_object* x_478; lean_object* x_479; lean_object* x_480; +x_465 = lean_ctor_get(x_448, 1); +lean_inc(x_465); +x_466 = lean_ctor_get(x_465, 2); +lean_inc(x_466); +x_467 = lean_ctor_get(x_448, 0); +lean_inc(x_467); +if (lean_is_exclusive(x_448)) { + lean_ctor_release(x_448, 0); + lean_ctor_release(x_448, 1); + x_468 = x_448; +} else { + lean_dec_ref(x_448); + x_468 = lean_box(0); +} +x_469 = lean_ctor_get(x_465, 0); lean_inc(x_469); -x_470 = lean_ctor_get(x_469, 2); +x_470 = lean_ctor_get(x_465, 1); lean_inc(x_470); -x_471 = lean_ctor_get(x_452, 0); +x_471 = lean_ctor_get(x_465, 3); lean_inc(x_471); -if (lean_is_exclusive(x_452)) { - lean_ctor_release(x_452, 0); - lean_ctor_release(x_452, 1); - x_472 = x_452; -} else { - lean_dec_ref(x_452); - x_472 = lean_box(0); -} -x_473 = lean_ctor_get(x_469, 0); +x_472 = lean_ctor_get(x_465, 4); +lean_inc(x_472); +x_473 = lean_ctor_get(x_465, 5); lean_inc(x_473); -x_474 = lean_ctor_get(x_469, 1); -lean_inc(x_474); -x_475 = lean_ctor_get(x_469, 3); +if (lean_is_exclusive(x_465)) { + lean_ctor_release(x_465, 0); + lean_ctor_release(x_465, 1); + lean_ctor_release(x_465, 2); + lean_ctor_release(x_465, 3); + lean_ctor_release(x_465, 4); + lean_ctor_release(x_465, 5); + x_474 = x_465; +} else { + lean_dec_ref(x_465); + x_474 = lean_box(0); +} +x_475 = lean_ctor_get(x_466, 0); lean_inc(x_475); -x_476 = lean_ctor_get(x_469, 4); +x_476 = lean_ctor_get(x_466, 1); lean_inc(x_476); -x_477 = lean_ctor_get(x_469, 5); -lean_inc(x_477); -if (lean_is_exclusive(x_469)) { - lean_ctor_release(x_469, 0); - lean_ctor_release(x_469, 1); - lean_ctor_release(x_469, 2); - lean_ctor_release(x_469, 3); - lean_ctor_release(x_469, 4); - lean_ctor_release(x_469, 5); - x_478 = x_469; +if (lean_is_exclusive(x_466)) { + lean_ctor_release(x_466, 0); + lean_ctor_release(x_466, 1); + lean_ctor_release(x_466, 2); + x_477 = x_466; } else { - lean_dec_ref(x_469); - x_478 = lean_box(0); + lean_dec_ref(x_466); + x_477 = lean_box(0); } -x_479 = lean_ctor_get(x_470, 0); -lean_inc(x_479); -x_480 = lean_ctor_get(x_470, 1); -lean_inc(x_480); -if (lean_is_exclusive(x_470)) { - lean_ctor_release(x_470, 0); - lean_ctor_release(x_470, 1); - lean_ctor_release(x_470, 2); - x_481 = x_470; +if (lean_is_scalar(x_477)) { + x_478 = lean_alloc_ctor(0, 3, 0); } else { - lean_dec_ref(x_470); - x_481 = lean_box(0); + x_478 = x_477; } -if (lean_is_scalar(x_481)) { - x_482 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_478, 0, x_475); +lean_ctor_set(x_478, 1, x_476); +lean_ctor_set(x_478, 2, x_434); +if (lean_is_scalar(x_474)) { + x_479 = lean_alloc_ctor(0, 6, 0); } else { - x_482 = x_481; + x_479 = x_474; } -lean_ctor_set(x_482, 0, x_479); -lean_ctor_set(x_482, 1, x_480); -lean_ctor_set(x_482, 2, x_438); -if (lean_is_scalar(x_478)) { - x_483 = lean_alloc_ctor(0, 6, 0); +lean_ctor_set(x_479, 0, x_469); +lean_ctor_set(x_479, 1, x_470); +lean_ctor_set(x_479, 2, x_478); +lean_ctor_set(x_479, 3, x_471); +lean_ctor_set(x_479, 4, x_472); +lean_ctor_set(x_479, 5, x_473); +if (lean_is_scalar(x_468)) { + x_480 = lean_alloc_ctor(1, 2, 0); } else { - x_483 = x_478; + x_480 = x_468; } -lean_ctor_set(x_483, 0, x_473); -lean_ctor_set(x_483, 1, x_474); -lean_ctor_set(x_483, 2, x_482); -lean_ctor_set(x_483, 3, x_475); -lean_ctor_set(x_483, 4, x_476); -lean_ctor_set(x_483, 5, x_477); -if (lean_is_scalar(x_472)) { - x_484 = lean_alloc_ctor(1, 2, 0); -} else { - x_484 = x_472; +lean_ctor_set(x_480, 0, x_467); +lean_ctor_set(x_480, 1, x_479); +return x_480; } -lean_ctor_set(x_484, 0, x_471); +} +} +} +else +{ +uint8_t x_481; +lean_dec(x_13); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_481 = !lean_is_exclusive(x_250); +if (x_481 == 0) +{ +return x_250; +} +else +{ +lean_object* x_482; lean_object* x_483; lean_object* x_484; +x_482 = lean_ctor_get(x_250, 0); +x_483 = lean_ctor_get(x_250, 1); +lean_inc(x_483); +lean_inc(x_482); +lean_dec(x_250); +x_484 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_484, 0, x_482); lean_ctor_set(x_484, 1, x_483); return x_484; } } } } +} else { uint8_t x_485; lean_dec(x_17); -lean_dec(x_7); +lean_dec(x_13); lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); -x_485 = !lean_is_exclusive(x_254); +x_485 = !lean_is_exclusive(x_18); if (x_485 == 0) { -return x_254; +return x_18; } else { lean_object* x_486; lean_object* x_487; lean_object* x_488; -x_486 = lean_ctor_get(x_254, 0); -x_487 = lean_ctor_get(x_254, 1); +x_486 = lean_ctor_get(x_18, 0); +x_487 = lean_ctor_get(x_18, 1); lean_inc(x_487); lean_inc(x_486); -lean_dec(x_254); +lean_dec(x_18); x_488 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_488, 0, x_486); lean_ctor_set(x_488, 1, x_487); @@ -4229,30 +4270,28 @@ return x_488; } } } -} -} else { uint8_t x_489; -lean_dec(x_21); -lean_dec(x_17); -lean_dec(x_7); +lean_dec(x_13); lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); -x_489 = !lean_is_exclusive(x_22); +x_489 = !lean_is_exclusive(x_14); if (x_489 == 0) { -return x_22; +return x_14; } else { lean_object* x_490; lean_object* x_491; lean_object* x_492; -x_490 = lean_ctor_get(x_22, 0); -x_491 = lean_ctor_get(x_22, 1); +x_490 = lean_ctor_get(x_14, 0); +x_491 = lean_ctor_get(x_14, 1); lean_inc(x_491); lean_inc(x_490); -lean_dec(x_22); +lean_dec(x_14); x_492 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_492, 0, x_490); lean_ctor_set(x_492, 1, x_491); @@ -4260,34 +4299,6 @@ return x_492; } } } -else -{ -uint8_t x_493; -lean_dec(x_17); -lean_dec(x_7); -lean_dec(x_6); -lean_dec(x_2); -lean_dec(x_1); -x_493 = !lean_is_exclusive(x_18); -if (x_493 == 0) -{ -return x_18; -} -else -{ -lean_object* x_494; lean_object* x_495; lean_object* x_496; -x_494 = lean_ctor_get(x_18, 0); -x_495 = lean_ctor_get(x_18, 1); -lean_inc(x_495); -lean_inc(x_494); -lean_dec(x_18); -x_496 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_496, 0, x_494); -lean_ctor_set(x_496, 1, x_495); -return x_496; -} -} -} } } lean_object* l_Lean_Meta_withNewLocalInstances___main___at_Lean_Meta_introN___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* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9) { @@ -6671,49 +6682,47 @@ return x_24; } else { -uint8_t x_61; +lean_object* x_61; lean_object* x_62; uint8_t x_63; lean_dec(x_6); lean_dec(x_2); -x_61 = !lean_is_exclusive(x_8); -if (x_61 == 0) -{ -lean_object* x_62; lean_object* x_63; -x_62 = lean_ctor_get(x_8, 1); -lean_dec(x_62); -lean_ctor_set(x_8, 1, x_3); -lean_inc(x_5); -lean_inc(x_4); -x_63 = l_Lean_Meta_withNewLocalInstances___main___at_Lean_Meta_introN___spec__3(x_1, x_4, x_5, x_7, x_4, x_5, x_8, x_9); +x_61 = lean_array_get_size(x_4); +x_62 = lean_expr_instantiate_rev_range(x_7, x_5, x_61, x_4); +lean_dec(x_61); lean_dec(x_7); -lean_dec(x_5); +x_63 = !lean_is_exclusive(x_8); +if (x_63 == 0) +{ +lean_object* x_64; lean_object* x_65; +x_64 = lean_ctor_get(x_8, 1); +lean_dec(x_64); +lean_ctor_set(x_8, 1, x_3); +lean_inc(x_4); +x_65 = l_Lean_Meta_withNewLocalInstances___main___at_Lean_Meta_introN___spec__3(x_1, x_4, x_62, x_4, x_5, x_8, x_9); lean_dec(x_4); -return x_63; +return x_65; } 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; -x_64 = lean_ctor_get(x_8, 0); -x_65 = lean_ctor_get(x_8, 2); -x_66 = lean_ctor_get(x_8, 3); -x_67 = lean_ctor_get(x_8, 4); +lean_object* x_66; lean_object* x_67; lean_object* x_68; lean_object* x_69; lean_object* x_70; lean_object* x_71; +x_66 = lean_ctor_get(x_8, 0); +x_67 = lean_ctor_get(x_8, 2); +x_68 = lean_ctor_get(x_8, 3); +x_69 = lean_ctor_get(x_8, 4); +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_8); -x_68 = lean_alloc_ctor(0, 5, 0); -lean_ctor_set(x_68, 0, x_64); -lean_ctor_set(x_68, 1, x_3); -lean_ctor_set(x_68, 2, x_65); -lean_ctor_set(x_68, 3, x_66); -lean_ctor_set(x_68, 4, x_67); -lean_inc(x_5); +x_70 = lean_alloc_ctor(0, 5, 0); +lean_ctor_set(x_70, 0, x_66); +lean_ctor_set(x_70, 1, x_3); +lean_ctor_set(x_70, 2, x_67); +lean_ctor_set(x_70, 3, x_68); +lean_ctor_set(x_70, 4, x_69); lean_inc(x_4); -x_69 = l_Lean_Meta_withNewLocalInstances___main___at_Lean_Meta_introN___spec__3(x_1, x_4, x_5, x_7, x_4, x_5, x_68, x_9); -lean_dec(x_7); -lean_dec(x_5); +x_71 = l_Lean_Meta_withNewLocalInstances___main___at_Lean_Meta_introN___spec__3(x_1, x_4, x_62, x_4, x_5, x_70, x_9); lean_dec(x_4); -return x_69; +return x_71; } } } @@ -7803,15 +7812,13 @@ x_6 = l_Lean_Meta_introNCore___at_Lean_Meta_introN___spec__1(x_1, x_2, x_3, x_4, return x_6; } } -lean_object* l_Lean_Meta_withNewLocalInstances___main___at_Lean_Meta_introN___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* l_Lean_Meta_withNewLocalInstances___main___at_Lean_Meta_introN___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_9; -x_9 = l_Lean_Meta_withNewLocalInstances___main___at_Lean_Meta_introN___spec__3(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8); -lean_dec(x_5); +lean_object* x_8; +x_8 = l_Lean_Meta_withNewLocalInstances___main___at_Lean_Meta_introN___spec__3(x_1, x_2, x_3, x_4, x_5, x_6, x_7); lean_dec(x_4); -lean_dec(x_3); -return x_9; +return x_8; } } lean_object* l_Lean_Meta_withNewLocalInstances___main___at_Lean_Meta_introN___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) { diff --git a/stage0/stdlib/Init/Lean/Meta/Tactic/Util.c b/stage0/stdlib/Init/Lean/Meta/Tactic/Util.c index 9528358e68..6d33b44d75 100644 --- a/stage0/stdlib/Init/Lean/Meta/Tactic/Util.c +++ b/stage0/stdlib/Init/Lean/Meta/Tactic/Util.c @@ -18,6 +18,7 @@ lean_object* l_Lean_Meta_throwTacticEx(lean_object*); lean_object* l_Lean_Meta_checkNotAssigned___closed__3; extern lean_object* l___private_Init_Lean_Meta_Basic_10__regTraceClasses___closed__2; lean_object* l_Lean_Meta_checkNotAssigned___closed__1; +lean_object* l_Lean_Meta_getMVarTag(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_checkNotAssigned___closed__2; lean_object* l_Lean_Meta_throwTacticEx___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_checkNotAssigned___boxed(lean_object*, lean_object*, lean_object*, lean_object*); @@ -35,6 +36,76 @@ lean_object* l_Lean_Meta_getMVarDecl(lean_object*, lean_object*, lean_object*); lean_object* l___private_Init_Lean_Meta_Tactic_Util_1__regTraceClasses___closed__1; lean_object* l___private_Init_Lean_Meta_Tactic_Util_1__regTraceClasses___closed__2; lean_object* l_Lean_Meta_mkFreshExprSyntheticOpaqueMVar(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_getMVarTag___boxed(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_getMVarTag(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; +x_4 = l_Lean_Meta_getMVarDecl(x_1, x_2, x_3); +if (lean_obj_tag(x_4) == 0) +{ +uint8_t x_5; +x_5 = !lean_is_exclusive(x_4); +if (x_5 == 0) +{ +lean_object* x_6; lean_object* x_7; +x_6 = lean_ctor_get(x_4, 0); +x_7 = lean_ctor_get(x_6, 0); +lean_inc(x_7); +lean_dec(x_6); +lean_ctor_set(x_4, 0, x_7); +return x_4; +} +else +{ +lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; +x_8 = lean_ctor_get(x_4, 0); +x_9 = lean_ctor_get(x_4, 1); +lean_inc(x_9); +lean_inc(x_8); +lean_dec(x_4); +x_10 = lean_ctor_get(x_8, 0); +lean_inc(x_10); +lean_dec(x_8); +x_11 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_11, 0, x_10); +lean_ctor_set(x_11, 1, x_9); +return x_11; +} +} +else +{ +uint8_t x_12; +x_12 = !lean_is_exclusive(x_4); +if (x_12 == 0) +{ +return x_4; +} +else +{ +lean_object* x_13; lean_object* x_14; lean_object* x_15; +x_13 = lean_ctor_get(x_4, 0); +x_14 = lean_ctor_get(x_4, 1); +lean_inc(x_14); +lean_inc(x_13); +lean_dec(x_4); +x_15 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_15, 0, x_13); +lean_ctor_set(x_15, 1, x_14); +return x_15; +} +} +} +} +lean_object* l_Lean_Meta_getMVarTag___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; +x_4 = l_Lean_Meta_getMVarTag(x_1, x_2, x_3); +lean_dec(x_2); +return x_4; +} +} lean_object* l_Lean_Meta_mkFreshExprSyntheticOpaqueMVar(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { diff --git a/stage0/stdlib/Init/Lean/Parser/Tactic.c b/stage0/stdlib/Init/Lean/Parser/Tactic.c index 04803def45..a2cafcb67c 100644 --- a/stage0/stdlib/Init/Lean/Parser/Tactic.c +++ b/stage0/stdlib/Init/Lean/Parser/Tactic.c @@ -28,6 +28,7 @@ lean_object* l_Lean_Parser_Term_tacticStxQuot___elambda__1___closed__4; extern lean_object* l_Lean_Parser_manyAux___main___closed__1; extern lean_object* l_Lean_Parser_declareLeadingBuiltinParser___closed__1; lean_object* l_Lean_Parser_Term_tacticStxQuot___closed__5; +lean_object* l_Lean_Parser_Tactic_case___closed__6; lean_object* l_Lean_Parser_andthenInfo(lean_object*, lean_object*); extern lean_object* l_Lean_Parser_Term_have___elambda__1___closed__7; lean_object* l_Lean_Parser_Tactic_apply___closed__2; @@ -101,9 +102,11 @@ lean_object* l_Lean_Parser_Tactic_ident_x27___elambda__1(lean_object*, lean_obje lean_object* l_Lean_Parser_Tactic_refine___elambda__1___closed__4; lean_object* l_Lean_Parser_Tactic_intros___closed__3; lean_object* l_Lean_Parser_Tactic_apply___closed__5; +lean_object* l_Lean_Parser_Tactic_case___elambda__1___closed__3; lean_object* l_Lean_Parser_Tactic_assumption___closed__4; lean_object* l_Lean_Parser_Tactic_intros___closed__6; lean_object* l_Lean_Parser_tacticParser(uint8_t, lean_object*); +lean_object* l_Lean_Parser_Tactic_case___closed__4; lean_object* l_Lean_Parser_regBuiltinTacticParserAttr___closed__2; lean_object* l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__13; lean_object* l_Lean_Parser_Tactic_refine___elambda__1___closed__6; @@ -118,6 +121,8 @@ extern lean_object* l_Lean_Parser_Term_structInst___elambda__1___closed__5; lean_object* l_Lean_Parser_Tactic_refine___elambda__1___closed__3; extern lean_object* l_Lean_Parser_identNoAntiquot___closed__1; lean_object* l_Lean_Parser_Tactic_assumption___elambda__1___closed__4; +lean_object* l_Lean_Parser_Tactic_case___elambda__1(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Parser_Tactic_case; uint8_t lean_nat_dec_eq(lean_object*, lean_object*); extern lean_object* l_Lean_Parser_Term_orelse___elambda__1___closed__3; lean_object* l_Lean_Parser_nonReservedSymbolFnAux(lean_object*, lean_object*, lean_object*, lean_object*); @@ -125,9 +130,11 @@ extern lean_object* l_Lean_Name_appendIndexAfter___closed__1; lean_object* l_Lean_Parser_Tactic_refine___closed__3; lean_object* l_Lean_Parser_Tactic_nestedTacticBlock___closed__1; lean_object* l_Lean_Parser_Term_tacticStxQuot___closed__1; +lean_object* l___regBuiltinParser_Lean_Parser_Tactic_case(lean_object*); lean_object* l_Lean_Parser_Tactic_seq___closed__5; lean_object* l_Lean_Parser_Tactic_ident_x27___closed__2; lean_object* l_Lean_Parser_Tactic_refine___elambda__1___closed__5; +lean_object* l_Lean_Parser_Tactic_case___elambda__1___closed__5; lean_object* l_Lean_Parser_nodeInfo(lean_object*, lean_object*); lean_object* l_Lean_Parser_Tactic_seq___closed__3; lean_object* l_Lean_Parser_Tactic_assumption___closed__1; @@ -198,13 +205,16 @@ lean_object* l_Array_back___at___private_Init_Lean_Parser_Parser_6__updateCache_ lean_object* l_Lean_Parser_ParserState_restore(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_tacticStxQuot___elambda__1___closed__7; lean_object* l_Lean_Parser_ParserState_popSyntax(lean_object*); +lean_object* l_Lean_Parser_Tactic_case___elambda__1___closed__1; extern lean_object* l_Lean_Parser_Level_paren___closed__4; lean_object* l___regBuiltinParser_Lean_Parser_Term_tacticStxQuot___closed__1; extern lean_object* l_Lean_Parser_Term_seq___elambda__1___closed__1; lean_object* l_Lean_Parser_Tactic_intros___elambda__1___closed__1; extern lean_object* l_Lean_Parser_Term_explicitUniv___elambda__1___closed__9; +lean_object* l_Lean_Parser_Tactic_case___closed__5; lean_object* l_Lean_Parser_Tactic_orelse___elambda__1___closed__2; lean_object* l_Lean_Parser_Tactic_orelse; +lean_object* l_Lean_Parser_Tactic_case___elambda__1___closed__2; lean_object* l_Lean_Parser_manyAux___main___at_Lean_Parser_Tactic_intros___elambda__1___spec__1(uint8_t, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_categoryParserFn(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Tactic_intros___closed__4; @@ -214,17 +224,20 @@ lean_object* l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Term_tacticStxQuot___elambd lean_object* l_Lean_Parser_Tactic_apply___elambda__1___closed__5; extern lean_object* l_Lean_Parser_regBuiltinTermParserAttr___closed__4; lean_object* l_Lean_Parser_Tactic_underscoreFn(uint8_t, lean_object*); +lean_object* l_Lean_Parser_Tactic_case___elambda__1___closed__4; lean_object* l_Lean_Parser_Tactic_refine___closed__1; lean_object* l_Lean_Parser_Tactic_nestedTacticBlock___closed__2; lean_object* l_Lean_Parser_Tactic_refine___closed__2; lean_object* l___regBuiltinParser_Lean_Parser_Tactic_exact(lean_object*); lean_object* l_Lean_Parser_Tactic_assumption___elambda__1___closed__1; +lean_object* l_Lean_Parser_Tactic_case___closed__3; lean_object* l_Lean_Parser_Tactic_underscoreFn___rarg___closed__3; lean_object* l_Lean_Parser_mergeOrElseErrors(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Tactic_refine___closed__4; lean_object* l_Lean_Parser_categoryParser(uint8_t, lean_object*, lean_object*); lean_object* l_Lean_Parser_Tactic_exact; lean_object* l_Lean_Parser_Tactic_intro___elambda__1___closed__4; +lean_object* l_Lean_Parser_Tactic_case___closed__1; lean_object* l_Lean_Parser_regTacticParserAttribute(lean_object*); lean_object* l_Lean_Parser_symbolInfo(lean_object*, lean_object*); lean_object* l_Lean_Parser_Tactic_underscoreFn___rarg___closed__2; @@ -233,10 +246,12 @@ extern lean_object* l_Lean_Parser_epsilonInfo; lean_object* l_Lean_Parser_Tactic_orelse___elambda__1___closed__1; lean_object* l_Lean_Parser_Tactic_nestedTacticBlockCurly___closed__4; lean_object* l_Lean_Parser_Tactic_assumption___closed__3; +lean_object* l_Lean_Parser_Tactic_case___elambda__1___closed__7; lean_object* l_Lean_Parser_Term_tacticBlock___closed__4; lean_object* l_Lean_Parser_Term_tacticBlock___closed__1; lean_object* l_Lean_Parser_Tactic_nestedTacticBlock___closed__8; lean_object* l_Lean_Parser_Term_tacticBlock; +lean_object* l_Lean_Parser_Tactic_case___closed__2; lean_object* l_Lean_Parser_Tactic_nestedTacticBlock___closed__4; lean_object* l_Lean_Parser_Tactic_intros___elambda__1___closed__6; lean_object* l_Lean_Parser_Tactic_nestedTacticBlockCurly___closed__3; @@ -246,6 +261,7 @@ lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_ lean_object* l_Lean_Parser_Tactic_intros; lean_object* l_Lean_Parser_Tactic_nestedTacticBlockCurly___elambda__1___closed__3; lean_object* l_Lean_Parser_Tactic_nestedTacticBlockCurly___closed__5; +lean_object* l_Lean_Parser_Tactic_case___closed__7; lean_object* l_Lean_Parser_Term_tacticStxQuot___elambda__1(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Tactic_exact___closed__4; lean_object* l_Lean_Parser_Tactic_exact___elambda__1___closed__2; @@ -299,10 +315,12 @@ lean_object* l_Lean_Parser_Tactic_refine; extern lean_object* l_Lean_Parser_Term_orelse___elambda__1___closed__1; lean_object* l_Lean_Parser_Tactic_seq___elambda__1(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Tactic_assumption___elambda__1___closed__3; +extern lean_object* l_Lean_ppGoal___closed__7; lean_object* l___regBuiltinParser_Lean_Parser_Tactic_refine(lean_object*); lean_object* l_Lean_Parser_Tactic_assumption___elambda__1___closed__5; lean_object* l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__2; lean_object* l_Lean_Parser_sepBy1Fn___at_Lean_Parser_Term_tacticStxQuot___elambda__1___spec__1(uint8_t, uint8_t, uint8_t, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Parser_Tactic_case___elambda__1___closed__6; lean_object* l_Lean_Parser_Tactic_seq___closed__4; extern lean_object* l_Lean_Parser_Level_paren___closed__1; uint8_t lean_string_dec_eq(lean_object*, lean_object*); @@ -2676,6 +2694,285 @@ x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); return x_6; } } +lean_object* _init_l_Lean_Parser_Tactic_case___elambda__1___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("case"); +return x_1; +} +} +lean_object* _init_l_Lean_Parser_Tactic_case___elambda__1___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Parser_Tactic_seq___elambda__1___closed__2; +x_2 = l_Lean_Parser_Tactic_case___elambda__1___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* _init_l_Lean_Parser_Tactic_case___elambda__1___closed__3() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Parser_Tactic_case___elambda__1___closed__2; +x_2 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* _init_l_Lean_Parser_Tactic_case___elambda__1___closed__4() { +_start: +{ +uint8_t x_1; lean_object* x_2; lean_object* x_3; uint8_t x_4; lean_object* x_5; +x_1 = 0; +x_2 = l_Lean_Parser_Tactic_case___elambda__1___closed__1; +x_3 = l_Lean_Parser_Tactic_case___elambda__1___closed__3; +x_4 = 1; +x_5 = l_Lean_Parser_mkAntiquot(x_1, x_2, x_3, x_4); +return x_5; +} +} +lean_object* _init_l_Lean_Parser_Tactic_case___elambda__1___closed__5() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_ppGoal___closed__7; +x_2 = l_String_trim(x_1); +return x_2; +} +} +lean_object* _init_l_Lean_Parser_Tactic_case___elambda__1___closed__6() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Char_HasRepr___closed__1; +x_2 = l_Lean_Parser_Tactic_case___elambda__1___closed__5; +x_3 = lean_string_append(x_1, x_2); +return x_3; +} +} +lean_object* _init_l_Lean_Parser_Tactic_case___elambda__1___closed__7() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Parser_Tactic_case___elambda__1___closed__6; +x_2 = l_Char_HasRepr___closed__1; +x_3 = lean_string_append(x_1, x_2); +return x_3; +} +} +lean_object* l_Lean_Parser_Tactic_case___elambda__1(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; +x_4 = l_Lean_Parser_Level_ident___elambda__1___closed__4; +x_5 = lean_ctor_get(x_4, 1); +lean_inc(x_5); +x_6 = l_Lean_Parser_Tactic_case___elambda__1___closed__4; +x_7 = lean_ctor_get(x_6, 1); +lean_inc(x_7); +x_8 = lean_ctor_get(x_3, 0); +lean_inc(x_8); +x_9 = lean_array_get_size(x_8); +lean_dec(x_8); +x_10 = lean_ctor_get(x_3, 1); +lean_inc(x_10); +lean_inc(x_2); +lean_inc(x_1); +x_11 = lean_apply_3(x_7, x_1, x_2, x_3); +x_12 = lean_ctor_get(x_11, 3); +lean_inc(x_12); +if (lean_obj_tag(x_12) == 0) +{ +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_5); +lean_dec(x_2); +lean_dec(x_1); +return x_11; +} +else +{ +lean_object* x_13; lean_object* x_14; uint8_t x_15; +x_13 = lean_ctor_get(x_12, 0); +lean_inc(x_13); +lean_dec(x_12); +x_14 = lean_ctor_get(x_11, 1); +lean_inc(x_14); +x_15 = lean_nat_dec_eq(x_14, x_10); +lean_dec(x_14); +if (x_15 == 0) +{ +lean_dec(x_13); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_5); +lean_dec(x_2); +lean_dec(x_1); +return x_11; +} +else +{ +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_inc(x_10); +x_16 = l_Lean_Parser_ParserState_restore(x_11, x_9, x_10); +lean_dec(x_9); +x_17 = lean_ctor_get(x_16, 0); +lean_inc(x_17); +x_18 = lean_array_get_size(x_17); +lean_dec(x_17); +x_19 = l_Lean_Parser_Tactic_case___elambda__1___closed__5; +x_20 = l_Lean_Parser_Tactic_case___elambda__1___closed__7; +lean_inc(x_2); +x_21 = l_Lean_Parser_nonReservedSymbolFnAux(x_19, x_20, x_2, x_16); +x_22 = lean_ctor_get(x_21, 3); +lean_inc(x_22); +if (lean_obj_tag(x_22) == 0) +{ +lean_object* x_23; lean_object* x_24; +lean_inc(x_2); +x_23 = lean_apply_3(x_5, x_1, x_2, x_21); +x_24 = lean_ctor_get(x_23, 3); +lean_inc(x_24); +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; +x_25 = l_Lean_Parser_regBuiltinTacticParserAttr___closed__4; +x_26 = lean_unsigned_to_nat(0u); +x_27 = l_Lean_Parser_categoryParserFn(x_25, x_26, x_2, x_23); +x_28 = l_Lean_Parser_Tactic_case___elambda__1___closed__2; +x_29 = l_Lean_Parser_ParserState_mkNode(x_27, x_28, x_18); +x_30 = l_Lean_Parser_mergeOrElseErrors(x_29, x_13, x_10); +lean_dec(x_10); +return x_30; +} +else +{ +lean_object* x_31; lean_object* x_32; lean_object* x_33; +lean_dec(x_24); +lean_dec(x_2); +x_31 = l_Lean_Parser_Tactic_case___elambda__1___closed__2; +x_32 = l_Lean_Parser_ParserState_mkNode(x_23, x_31, x_18); +x_33 = l_Lean_Parser_mergeOrElseErrors(x_32, x_13, x_10); +lean_dec(x_10); +return x_33; +} +} +else +{ +lean_object* x_34; lean_object* x_35; lean_object* x_36; +lean_dec(x_22); +lean_dec(x_5); +lean_dec(x_2); +lean_dec(x_1); +x_34 = l_Lean_Parser_Tactic_case___elambda__1___closed__2; +x_35 = l_Lean_Parser_ParserState_mkNode(x_21, x_34, x_18); +x_36 = l_Lean_Parser_mergeOrElseErrors(x_35, x_13, x_10); +lean_dec(x_10); +return x_36; +} +} +} +} +} +lean_object* _init_l_Lean_Parser_Tactic_case___closed__1() { +_start: +{ +lean_object* x_1; uint8_t x_2; lean_object* x_3; +x_1 = l_Lean_Parser_Tactic_case___elambda__1___closed__5; +x_2 = 0; +x_3 = l_Lean_Parser_nonReservedSymbolInfo(x_1, x_2); +return x_3; +} +} +lean_object* _init_l_Lean_Parser_Tactic_case___closed__2() { +_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_Parser_Level_ident___elambda__1___closed__4; +x_2 = lean_ctor_get(x_1, 0); +lean_inc(x_2); +x_3 = l_Lean_Parser_Tactic_seq___closed__1; +x_4 = lean_ctor_get(x_3, 0); +lean_inc(x_4); +x_5 = l_Lean_Parser_andthenInfo(x_2, x_4); +return x_5; +} +} +lean_object* _init_l_Lean_Parser_Tactic_case___closed__3() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Parser_Tactic_case___closed__1; +x_2 = l_Lean_Parser_Tactic_case___closed__2; +x_3 = l_Lean_Parser_andthenInfo(x_1, x_2); +return x_3; +} +} +lean_object* _init_l_Lean_Parser_Tactic_case___closed__4() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Parser_Tactic_case___elambda__1___closed__2; +x_2 = l_Lean_Parser_Tactic_case___closed__3; +x_3 = l_Lean_Parser_nodeInfo(x_1, x_2); +return x_3; +} +} +lean_object* _init_l_Lean_Parser_Tactic_case___closed__5() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; +x_1 = l_Lean_Parser_Tactic_case___elambda__1___closed__4; +x_2 = lean_ctor_get(x_1, 0); +lean_inc(x_2); +x_3 = l_Lean_Parser_Tactic_case___closed__4; +x_4 = l_Lean_Parser_orelseInfo(x_2, x_3); +return x_4; +} +} +lean_object* _init_l_Lean_Parser_Tactic_case___closed__6() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_Parser_Tactic_case___elambda__1), 3, 0); +return x_1; +} +} +lean_object* _init_l_Lean_Parser_Tactic_case___closed__7() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Parser_Tactic_case___closed__5; +x_2 = l_Lean_Parser_Tactic_case___closed__6; +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* _init_l_Lean_Parser_Tactic_case() { +_start: +{ +lean_object* x_1; +x_1 = l_Lean_Parser_Tactic_case___closed__7; +return x_1; +} +} +lean_object* l___regBuiltinParser_Lean_Parser_Tactic_case(lean_object* x_1) { +_start: +{ +uint8_t x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; +x_2 = 0; +x_3 = l_Lean_Parser_regBuiltinTacticParserAttr___closed__4; +x_4 = l_Lean_Parser_Tactic_case___elambda__1___closed__2; +x_5 = l_Lean_Parser_Tactic_case; +x_6 = l_Lean_Parser_addBuiltinParser(x_2, x_3, x_4, x_5, x_1); +return x_6; +} +} lean_object* _init_l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__1() { _start: { @@ -4719,6 +5016,39 @@ lean_mark_persistent(l_Lean_Parser_Tactic_refine); res = l___regBuiltinParser_Lean_Parser_Tactic_refine(lean_io_mk_world()); if (lean_io_result_is_error(res)) return res; lean_dec_ref(res); +l_Lean_Parser_Tactic_case___elambda__1___closed__1 = _init_l_Lean_Parser_Tactic_case___elambda__1___closed__1(); +lean_mark_persistent(l_Lean_Parser_Tactic_case___elambda__1___closed__1); +l_Lean_Parser_Tactic_case___elambda__1___closed__2 = _init_l_Lean_Parser_Tactic_case___elambda__1___closed__2(); +lean_mark_persistent(l_Lean_Parser_Tactic_case___elambda__1___closed__2); +l_Lean_Parser_Tactic_case___elambda__1___closed__3 = _init_l_Lean_Parser_Tactic_case___elambda__1___closed__3(); +lean_mark_persistent(l_Lean_Parser_Tactic_case___elambda__1___closed__3); +l_Lean_Parser_Tactic_case___elambda__1___closed__4 = _init_l_Lean_Parser_Tactic_case___elambda__1___closed__4(); +lean_mark_persistent(l_Lean_Parser_Tactic_case___elambda__1___closed__4); +l_Lean_Parser_Tactic_case___elambda__1___closed__5 = _init_l_Lean_Parser_Tactic_case___elambda__1___closed__5(); +lean_mark_persistent(l_Lean_Parser_Tactic_case___elambda__1___closed__5); +l_Lean_Parser_Tactic_case___elambda__1___closed__6 = _init_l_Lean_Parser_Tactic_case___elambda__1___closed__6(); +lean_mark_persistent(l_Lean_Parser_Tactic_case___elambda__1___closed__6); +l_Lean_Parser_Tactic_case___elambda__1___closed__7 = _init_l_Lean_Parser_Tactic_case___elambda__1___closed__7(); +lean_mark_persistent(l_Lean_Parser_Tactic_case___elambda__1___closed__7); +l_Lean_Parser_Tactic_case___closed__1 = _init_l_Lean_Parser_Tactic_case___closed__1(); +lean_mark_persistent(l_Lean_Parser_Tactic_case___closed__1); +l_Lean_Parser_Tactic_case___closed__2 = _init_l_Lean_Parser_Tactic_case___closed__2(); +lean_mark_persistent(l_Lean_Parser_Tactic_case___closed__2); +l_Lean_Parser_Tactic_case___closed__3 = _init_l_Lean_Parser_Tactic_case___closed__3(); +lean_mark_persistent(l_Lean_Parser_Tactic_case___closed__3); +l_Lean_Parser_Tactic_case___closed__4 = _init_l_Lean_Parser_Tactic_case___closed__4(); +lean_mark_persistent(l_Lean_Parser_Tactic_case___closed__4); +l_Lean_Parser_Tactic_case___closed__5 = _init_l_Lean_Parser_Tactic_case___closed__5(); +lean_mark_persistent(l_Lean_Parser_Tactic_case___closed__5); +l_Lean_Parser_Tactic_case___closed__6 = _init_l_Lean_Parser_Tactic_case___closed__6(); +lean_mark_persistent(l_Lean_Parser_Tactic_case___closed__6); +l_Lean_Parser_Tactic_case___closed__7 = _init_l_Lean_Parser_Tactic_case___closed__7(); +lean_mark_persistent(l_Lean_Parser_Tactic_case___closed__7); +l_Lean_Parser_Tactic_case = _init_l_Lean_Parser_Tactic_case(); +lean_mark_persistent(l_Lean_Parser_Tactic_case); +res = l___regBuiltinParser_Lean_Parser_Tactic_case(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__1 = _init_l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__1(); lean_mark_persistent(l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__1); l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__2 = _init_l_Lean_Parser_Tactic_nestedTacticBlock___elambda__1___closed__2(); diff --git a/stage0/stdlib/Init/Lean/Util/CollectMVars.c b/stage0/stdlib/Init/Lean/Util/CollectMVars.c new file mode 100644 index 0000000000..39ecfc29c3 --- /dev/null +++ b/stage0/stdlib/Init/Lean/Util/CollectMVars.c @@ -0,0 +1,1472 @@ +// Lean compiler output +// Module: Init.Lean.Util.CollectMVars +// Imports: Init.Lean.Expr +#include "runtime/lean.h" +#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_CollectMVars_visit(lean_object*, lean_object*, lean_object*); +lean_object* l_AssocList_foldlM___main___at_Lean_CollectMVars_visit___spec__6(lean_object*, lean_object*); +lean_object* lean_array_uget(lean_object*, size_t); +lean_object* lean_array_uset(lean_object*, size_t, lean_object*); +lean_object* l_HashMapImp_contains___at_Lean_CollectMVars_visit___spec__1___boxed(lean_object*, lean_object*); +lean_object* l_Lean_CollectMVars_main___main(lean_object*, lean_object*); +extern lean_object* l_Array_empty___closed__1; +lean_object* l_mkHashSet___at_Lean_CollectMVars_State_inhabited___spec__1(lean_object*); +lean_object* lean_array_push(lean_object*, lean_object*); +lean_object* lean_array_get_size(lean_object*); +lean_object* lean_nat_add(lean_object*, lean_object*); +lean_object* lean_array_fget(lean_object*, lean_object*); +lean_object* l_mkHashMap___at_Lean_CollectMVars_State_inhabited___spec__2(lean_object*); +lean_object* lean_array_fset(lean_object*, lean_object*, lean_object*); +size_t l_Lean_Expr_hash(lean_object*); +lean_object* l_AssocList_contains___main___at_Lean_CollectMVars_visit___spec__2___boxed(lean_object*, lean_object*); +lean_object* l_Lean_collectMVars(lean_object*, lean_object*); +lean_object* l_Lean_CollectMVars_State_inhabited___closed__2; +size_t lean_usize_modn(size_t, lean_object*); +lean_object* l_Lean_CollectMVars_State_inhabited___closed__1; +lean_object* l_mkHashMapImp___rarg(lean_object*); +lean_object* l_HashMapImp_expand___at_Lean_CollectMVars_visit___spec__4(lean_object*, lean_object*); +uint8_t lean_expr_eqv(lean_object*, lean_object*); +uint8_t lean_nat_dec_le(lean_object*, lean_object*); +uint8_t l_Lean_Expr_hasMVar(lean_object*); +lean_object* lean_nat_mul(lean_object*, lean_object*); +uint8_t l_AssocList_contains___main___at_Lean_CollectMVars_visit___spec__2(lean_object*, lean_object*); +lean_object* lean_mk_array(lean_object*, lean_object*); +uint8_t l_HashMapImp_contains___at_Lean_CollectMVars_visit___spec__1(lean_object*, lean_object*); +lean_object* l_HashMapImp_moveEntries___main___at_Lean_CollectMVars_visit___spec__5(lean_object*, lean_object*, lean_object*); +lean_object* l_AssocList_replace___main___at_Lean_CollectMVars_visit___spec__7(lean_object*, lean_object*, lean_object*); +lean_object* l_HashMapImp_insert___at_Lean_CollectMVars_visit___spec__3(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_CollectMVars_State_inhabited; +uint8_t lean_nat_dec_lt(lean_object*, lean_object*); +lean_object* l_Lean_CollectMVars_main(lean_object*, lean_object*); +lean_object* l_mkHashMap___at_Lean_CollectMVars_State_inhabited___spec__2(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = l_mkHashMapImp___rarg(x_1); +return x_2; +} +} +lean_object* l_mkHashSet___at_Lean_CollectMVars_State_inhabited___spec__1(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = l_mkHashMapImp___rarg(x_1); +return x_2; +} +} +lean_object* _init_l_Lean_CollectMVars_State_inhabited___closed__1() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = lean_unsigned_to_nat(8u); +x_2 = l_mkHashMapImp___rarg(x_1); +return x_2; +} +} +lean_object* _init_l_Lean_CollectMVars_State_inhabited___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_CollectMVars_State_inhabited___closed__1; +x_2 = l_Array_empty___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; +} +} +lean_object* _init_l_Lean_CollectMVars_State_inhabited() { +_start: +{ +lean_object* x_1; +x_1 = l_Lean_CollectMVars_State_inhabited___closed__2; +return x_1; +} +} +uint8_t l_AssocList_contains___main___at_Lean_CollectMVars_visit___spec__2(lean_object* x_1, lean_object* x_2) { +_start: +{ +if (lean_obj_tag(x_2) == 0) +{ +uint8_t x_3; +x_3 = 0; +return x_3; +} +else +{ +lean_object* x_4; lean_object* x_5; uint8_t x_6; +x_4 = lean_ctor_get(x_2, 0); +x_5 = lean_ctor_get(x_2, 2); +x_6 = lean_expr_eqv(x_4, x_1); +if (x_6 == 0) +{ +x_2 = x_5; +goto _start; +} +else +{ +uint8_t x_8; +x_8 = 1; +return x_8; +} +} +} +} +uint8_t l_HashMapImp_contains___at_Lean_CollectMVars_visit___spec__1(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; uint8_t x_8; +x_3 = lean_ctor_get(x_1, 1); +x_4 = lean_array_get_size(x_3); +x_5 = l_Lean_Expr_hash(x_2); +x_6 = lean_usize_modn(x_5, x_4); +lean_dec(x_4); +x_7 = lean_array_uget(x_3, x_6); +x_8 = l_AssocList_contains___main___at_Lean_CollectMVars_visit___spec__2(x_2, x_7); +lean_dec(x_7); +return x_8; +} +} +lean_object* l_AssocList_foldlM___main___at_Lean_CollectMVars_visit___spec__6(lean_object* x_1, lean_object* x_2) { +_start: +{ +if (lean_obj_tag(x_2) == 0) +{ +return x_1; +} +else +{ +uint8_t x_3; +x_3 = !lean_is_exclusive(x_2); +if (x_3 == 0) +{ +lean_object* x_4; lean_object* x_5; lean_object* x_6; size_t x_7; size_t x_8; lean_object* x_9; lean_object* x_10; +x_4 = lean_ctor_get(x_2, 0); +x_5 = lean_ctor_get(x_2, 2); +x_6 = lean_array_get_size(x_1); +x_7 = l_Lean_Expr_hash(x_4); +x_8 = lean_usize_modn(x_7, x_6); +lean_dec(x_6); +x_9 = lean_array_uget(x_1, x_8); +lean_ctor_set(x_2, 2, x_9); +x_10 = lean_array_uset(x_1, x_8, x_2); +x_1 = x_10; +x_2 = x_5; +goto _start; +} +else +{ +lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; size_t x_16; size_t x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; +x_12 = lean_ctor_get(x_2, 0); +x_13 = lean_ctor_get(x_2, 1); +x_14 = lean_ctor_get(x_2, 2); +lean_inc(x_14); +lean_inc(x_13); +lean_inc(x_12); +lean_dec(x_2); +x_15 = lean_array_get_size(x_1); +x_16 = l_Lean_Expr_hash(x_12); +x_17 = lean_usize_modn(x_16, x_15); +lean_dec(x_15); +x_18 = lean_array_uget(x_1, x_17); +x_19 = lean_alloc_ctor(1, 3, 0); +lean_ctor_set(x_19, 0, x_12); +lean_ctor_set(x_19, 1, x_13); +lean_ctor_set(x_19, 2, x_18); +x_20 = lean_array_uset(x_1, x_17, x_19); +x_1 = x_20; +x_2 = x_14; +goto _start; +} +} +} +} +lean_object* l_HashMapImp_moveEntries___main___at_Lean_CollectMVars_visit___spec__5(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_2); +x_5 = lean_nat_dec_lt(x_1, x_4); +lean_dec(x_4); +if (x_5 == 0) +{ +lean_dec(x_2); +lean_dec(x_1); +return x_3; +} +else +{ +lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; +x_6 = lean_array_fget(x_2, x_1); +x_7 = lean_box(0); +x_8 = lean_array_fset(x_2, x_1, x_7); +x_9 = l_AssocList_foldlM___main___at_Lean_CollectMVars_visit___spec__6(x_3, x_6); +x_10 = lean_unsigned_to_nat(1u); +x_11 = lean_nat_add(x_1, x_10); +lean_dec(x_1); +x_1 = x_11; +x_2 = x_8; +x_3 = x_9; +goto _start; +} +} +} +lean_object* l_HashMapImp_expand___at_Lean_CollectMVars_visit___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; +x_3 = lean_array_get_size(x_2); +x_4 = lean_unsigned_to_nat(2u); +x_5 = lean_nat_mul(x_3, x_4); +lean_dec(x_3); +x_6 = lean_box(0); +x_7 = lean_mk_array(x_5, x_6); +x_8 = lean_unsigned_to_nat(0u); +x_9 = l_HashMapImp_moveEntries___main___at_Lean_CollectMVars_visit___spec__5(x_8, x_2, x_7); +x_10 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_10, 0, x_1); +lean_ctor_set(x_10, 1, x_9); +return x_10; +} +} +lean_object* l_AssocList_replace___main___at_Lean_CollectMVars_visit___spec__7(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +if (lean_obj_tag(x_3) == 0) +{ +lean_dec(x_2); +lean_dec(x_1); +return x_3; +} +else +{ +uint8_t x_4; +x_4 = !lean_is_exclusive(x_3); +if (x_4 == 0) +{ +lean_object* x_5; lean_object* x_6; lean_object* x_7; uint8_t x_8; +x_5 = lean_ctor_get(x_3, 0); +x_6 = lean_ctor_get(x_3, 1); +x_7 = lean_ctor_get(x_3, 2); +x_8 = lean_expr_eqv(x_5, x_1); +if (x_8 == 0) +{ +lean_object* x_9; +x_9 = l_AssocList_replace___main___at_Lean_CollectMVars_visit___spec__7(x_1, x_2, x_7); +lean_ctor_set(x_3, 2, x_9); +return x_3; +} +else +{ +lean_dec(x_6); +lean_dec(x_5); +lean_ctor_set(x_3, 1, x_2); +lean_ctor_set(x_3, 0, x_1); +return x_3; +} +} +else +{ +lean_object* x_10; lean_object* x_11; lean_object* x_12; uint8_t x_13; +x_10 = lean_ctor_get(x_3, 0); +x_11 = lean_ctor_get(x_3, 1); +x_12 = lean_ctor_get(x_3, 2); +lean_inc(x_12); +lean_inc(x_11); +lean_inc(x_10); +lean_dec(x_3); +x_13 = lean_expr_eqv(x_10, x_1); +if (x_13 == 0) +{ +lean_object* x_14; lean_object* x_15; +x_14 = l_AssocList_replace___main___at_Lean_CollectMVars_visit___spec__7(x_1, x_2, x_12); +x_15 = lean_alloc_ctor(1, 3, 0); +lean_ctor_set(x_15, 0, x_10); +lean_ctor_set(x_15, 1, x_11); +lean_ctor_set(x_15, 2, x_14); +return x_15; +} +else +{ +lean_object* x_16; +lean_dec(x_11); +lean_dec(x_10); +x_16 = lean_alloc_ctor(1, 3, 0); +lean_ctor_set(x_16, 0, x_1); +lean_ctor_set(x_16, 1, x_2); +lean_ctor_set(x_16, 2, x_12); +return x_16; +} +} +} +} +} +lean_object* l_HashMapImp_insert___at_Lean_CollectMVars_visit___spec__3(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +uint8_t x_4; +x_4 = !lean_is_exclusive(x_1); +if (x_4 == 0) +{ +lean_object* x_5; lean_object* x_6; lean_object* x_7; size_t x_8; size_t x_9; lean_object* x_10; uint8_t x_11; +x_5 = lean_ctor_get(x_1, 0); +x_6 = lean_ctor_get(x_1, 1); +x_7 = lean_array_get_size(x_6); +x_8 = l_Lean_Expr_hash(x_2); +x_9 = lean_usize_modn(x_8, x_7); +x_10 = lean_array_uget(x_6, x_9); +x_11 = l_AssocList_contains___main___at_Lean_CollectMVars_visit___spec__2(x_2, x_10); +if (x_11 == 0) +{ +lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; uint8_t x_16; +x_12 = lean_unsigned_to_nat(1u); +x_13 = lean_nat_add(x_5, x_12); +lean_dec(x_5); +x_14 = lean_alloc_ctor(1, 3, 0); +lean_ctor_set(x_14, 0, x_2); +lean_ctor_set(x_14, 1, x_3); +lean_ctor_set(x_14, 2, x_10); +x_15 = lean_array_uset(x_6, x_9, x_14); +x_16 = lean_nat_dec_le(x_13, x_7); +lean_dec(x_7); +if (x_16 == 0) +{ +lean_object* x_17; +lean_free_object(x_1); +x_17 = l_HashMapImp_expand___at_Lean_CollectMVars_visit___spec__4(x_13, x_15); +return x_17; +} +else +{ +lean_ctor_set(x_1, 1, x_15); +lean_ctor_set(x_1, 0, x_13); +return x_1; +} +} +else +{ +lean_object* x_18; lean_object* x_19; +lean_dec(x_7); +x_18 = l_AssocList_replace___main___at_Lean_CollectMVars_visit___spec__7(x_2, x_3, x_10); +x_19 = lean_array_uset(x_6, x_9, x_18); +lean_ctor_set(x_1, 1, x_19); +return x_1; +} +} +else +{ +lean_object* x_20; lean_object* x_21; lean_object* x_22; size_t x_23; size_t x_24; lean_object* x_25; uint8_t x_26; +x_20 = lean_ctor_get(x_1, 0); +x_21 = lean_ctor_get(x_1, 1); +lean_inc(x_21); +lean_inc(x_20); +lean_dec(x_1); +x_22 = lean_array_get_size(x_21); +x_23 = l_Lean_Expr_hash(x_2); +x_24 = lean_usize_modn(x_23, x_22); +x_25 = lean_array_uget(x_21, x_24); +x_26 = l_AssocList_contains___main___at_Lean_CollectMVars_visit___spec__2(x_2, x_25); +if (x_26 == 0) +{ +lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; uint8_t x_31; +x_27 = lean_unsigned_to_nat(1u); +x_28 = lean_nat_add(x_20, x_27); +lean_dec(x_20); +x_29 = lean_alloc_ctor(1, 3, 0); +lean_ctor_set(x_29, 0, x_2); +lean_ctor_set(x_29, 1, x_3); +lean_ctor_set(x_29, 2, x_25); +x_30 = lean_array_uset(x_21, x_24, x_29); +x_31 = lean_nat_dec_le(x_28, x_22); +lean_dec(x_22); +if (x_31 == 0) +{ +lean_object* x_32; +x_32 = l_HashMapImp_expand___at_Lean_CollectMVars_visit___spec__4(x_28, x_30); +return x_32; +} +else +{ +lean_object* x_33; +x_33 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_33, 0, x_28); +lean_ctor_set(x_33, 1, x_30); +return x_33; +} +} +else +{ +lean_object* x_34; lean_object* x_35; lean_object* x_36; +lean_dec(x_22); +x_34 = l_AssocList_replace___main___at_Lean_CollectMVars_visit___spec__7(x_2, x_3, x_25); +x_35 = lean_array_uset(x_21, x_24, x_34); +x_36 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_36, 0, x_20); +lean_ctor_set(x_36, 1, x_35); +return x_36; +} +} +} +} +lean_object* l_Lean_CollectMVars_visit(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +uint8_t x_4; +x_4 = l_Lean_Expr_hasMVar(x_2); +if (x_4 == 0) +{ +lean_dec(x_2); +lean_dec(x_1); +return x_3; +} +else +{ +lean_object* x_5; lean_object* x_6; uint8_t x_7; +x_5 = lean_ctor_get(x_3, 0); +lean_inc(x_5); +x_6 = lean_ctor_get(x_3, 1); +lean_inc(x_6); +x_7 = l_HashMapImp_contains___at_Lean_CollectMVars_visit___spec__1(x_5, x_2); +if (x_7 == 0) +{ +uint8_t x_8; +x_8 = !lean_is_exclusive(x_3); +if (x_8 == 0) +{ +lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; +x_9 = lean_ctor_get(x_3, 1); +lean_dec(x_9); +x_10 = lean_ctor_get(x_3, 0); +lean_dec(x_10); +x_11 = lean_box(0); +lean_inc(x_2); +x_12 = l_HashMapImp_insert___at_Lean_CollectMVars_visit___spec__3(x_5, x_2, x_11); +lean_ctor_set(x_3, 0, x_12); +x_13 = lean_apply_2(x_1, x_2, x_3); +return x_13; +} +else +{ +lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; +lean_dec(x_3); +x_14 = lean_box(0); +lean_inc(x_2); +x_15 = l_HashMapImp_insert___at_Lean_CollectMVars_visit___spec__3(x_5, x_2, x_14); +x_16 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_16, 0, x_15); +lean_ctor_set(x_16, 1, x_6); +x_17 = lean_apply_2(x_1, x_2, x_16); +return x_17; +} +} +else +{ +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_2); +lean_dec(x_1); +return x_3; +} +} +} +} +lean_object* l_AssocList_contains___main___at_Lean_CollectMVars_visit___spec__2___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +uint8_t x_3; lean_object* x_4; +x_3 = l_AssocList_contains___main___at_Lean_CollectMVars_visit___spec__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_HashMapImp_contains___at_Lean_CollectMVars_visit___spec__1___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +uint8_t x_3; lean_object* x_4; +x_3 = l_HashMapImp_contains___at_Lean_CollectMVars_visit___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_Lean_CollectMVars_main___main(lean_object* x_1, lean_object* x_2) { +_start: +{ +switch (lean_obj_tag(x_1)) { +case 2: +{ +lean_object* x_3; uint8_t x_4; +x_3 = lean_ctor_get(x_1, 0); +lean_inc(x_3); +lean_dec(x_1); +x_4 = !lean_is_exclusive(x_2); +if (x_4 == 0) +{ +lean_object* x_5; lean_object* x_6; +x_5 = lean_ctor_get(x_2, 1); +x_6 = lean_array_push(x_5, x_3); +lean_ctor_set(x_2, 1, x_6); +return x_2; +} +else +{ +lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; +x_7 = lean_ctor_get(x_2, 0); +x_8 = lean_ctor_get(x_2, 1); +lean_inc(x_8); +lean_inc(x_7); +lean_dec(x_2); +x_9 = lean_array_push(x_8, x_3); +x_10 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_10, 0, x_7); +lean_ctor_set(x_10, 1, x_9); +return x_10; +} +} +case 5: +{ +lean_object* x_11; lean_object* x_12; lean_object* x_13; uint8_t x_28; uint8_t x_29; +x_11 = lean_ctor_get(x_1, 0); +lean_inc(x_11); +x_12 = lean_ctor_get(x_1, 1); +lean_inc(x_12); +lean_dec(x_1); +x_28 = l_Lean_Expr_hasMVar(x_11); +x_29 = l_Lean_Expr_hasMVar(x_12); +if (x_28 == 0) +{ +lean_dec(x_11); +if (x_29 == 0) +{ +lean_dec(x_12); +return x_2; +} +else +{ +x_13 = x_2; +goto block_27; +} +} +else +{ +lean_object* x_30; lean_object* x_31; uint8_t x_32; +x_30 = lean_ctor_get(x_2, 0); +lean_inc(x_30); +x_31 = lean_ctor_get(x_2, 1); +lean_inc(x_31); +x_32 = l_HashMapImp_contains___at_Lean_CollectMVars_visit___spec__1(x_30, x_11); +if (x_32 == 0) +{ +uint8_t x_33; +x_33 = !lean_is_exclusive(x_2); +if (x_33 == 0) +{ +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_2, 1); +lean_dec(x_34); +x_35 = lean_ctor_get(x_2, 0); +lean_dec(x_35); +x_36 = lean_box(0); +lean_inc(x_11); +x_37 = l_HashMapImp_insert___at_Lean_CollectMVars_visit___spec__3(x_30, x_11, x_36); +lean_ctor_set(x_2, 0, x_37); +x_38 = l_Lean_CollectMVars_main___main(x_11, x_2); +if (x_29 == 0) +{ +lean_dec(x_12); +return x_38; +} +else +{ +x_13 = x_38; +goto block_27; +} +} +else +{ +lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; +lean_dec(x_2); +x_39 = lean_box(0); +lean_inc(x_11); +x_40 = l_HashMapImp_insert___at_Lean_CollectMVars_visit___spec__3(x_30, x_11, x_39); +x_41 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_41, 0, x_40); +lean_ctor_set(x_41, 1, x_31); +x_42 = l_Lean_CollectMVars_main___main(x_11, x_41); +if (x_29 == 0) +{ +lean_dec(x_12); +return x_42; +} +else +{ +x_13 = x_42; +goto block_27; +} +} +} +else +{ +lean_dec(x_31); +lean_dec(x_30); +lean_dec(x_11); +if (x_29 == 0) +{ +lean_dec(x_12); +return x_2; +} +else +{ +x_13 = x_2; +goto block_27; +} +} +} +block_27: +{ +lean_object* x_14; lean_object* x_15; uint8_t x_16; +x_14 = lean_ctor_get(x_13, 0); +lean_inc(x_14); +x_15 = lean_ctor_get(x_13, 1); +lean_inc(x_15); +x_16 = l_HashMapImp_contains___at_Lean_CollectMVars_visit___spec__1(x_14, x_12); +if (x_16 == 0) +{ +uint8_t x_17; +x_17 = !lean_is_exclusive(x_13); +if (x_17 == 0) +{ +lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; +x_18 = lean_ctor_get(x_13, 1); +lean_dec(x_18); +x_19 = lean_ctor_get(x_13, 0); +lean_dec(x_19); +x_20 = lean_box(0); +lean_inc(x_12); +x_21 = l_HashMapImp_insert___at_Lean_CollectMVars_visit___spec__3(x_14, x_12, x_20); +lean_ctor_set(x_13, 0, x_21); +x_1 = x_12; +x_2 = x_13; +goto _start; +} +else +{ +lean_object* x_23; lean_object* x_24; lean_object* x_25; +lean_dec(x_13); +x_23 = lean_box(0); +lean_inc(x_12); +x_24 = l_HashMapImp_insert___at_Lean_CollectMVars_visit___spec__3(x_14, x_12, 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_15); +x_1 = x_12; +x_2 = x_25; +goto _start; +} +} +else +{ +lean_dec(x_15); +lean_dec(x_14); +lean_dec(x_12); +return x_13; +} +} +} +case 6: +{ +lean_object* x_43; lean_object* x_44; lean_object* x_45; uint8_t x_60; uint8_t x_61; +x_43 = lean_ctor_get(x_1, 1); +lean_inc(x_43); +x_44 = lean_ctor_get(x_1, 2); +lean_inc(x_44); +lean_dec(x_1); +x_60 = l_Lean_Expr_hasMVar(x_43); +x_61 = l_Lean_Expr_hasMVar(x_44); +if (x_60 == 0) +{ +lean_dec(x_43); +if (x_61 == 0) +{ +lean_dec(x_44); +return x_2; +} +else +{ +x_45 = x_2; +goto block_59; +} +} +else +{ +lean_object* x_62; lean_object* x_63; uint8_t x_64; +x_62 = lean_ctor_get(x_2, 0); +lean_inc(x_62); +x_63 = lean_ctor_get(x_2, 1); +lean_inc(x_63); +x_64 = l_HashMapImp_contains___at_Lean_CollectMVars_visit___spec__1(x_62, x_43); +if (x_64 == 0) +{ +uint8_t x_65; +x_65 = !lean_is_exclusive(x_2); +if (x_65 == 0) +{ +lean_object* x_66; lean_object* x_67; lean_object* x_68; lean_object* x_69; lean_object* x_70; +x_66 = lean_ctor_get(x_2, 1); +lean_dec(x_66); +x_67 = lean_ctor_get(x_2, 0); +lean_dec(x_67); +x_68 = lean_box(0); +lean_inc(x_43); +x_69 = l_HashMapImp_insert___at_Lean_CollectMVars_visit___spec__3(x_62, x_43, x_68); +lean_ctor_set(x_2, 0, x_69); +x_70 = l_Lean_CollectMVars_main___main(x_43, x_2); +if (x_61 == 0) +{ +lean_dec(x_44); +return x_70; +} +else +{ +x_45 = x_70; +goto block_59; +} +} +else +{ +lean_object* x_71; lean_object* x_72; lean_object* x_73; lean_object* x_74; +lean_dec(x_2); +x_71 = lean_box(0); +lean_inc(x_43); +x_72 = l_HashMapImp_insert___at_Lean_CollectMVars_visit___spec__3(x_62, x_43, x_71); +x_73 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_73, 0, x_72); +lean_ctor_set(x_73, 1, x_63); +x_74 = l_Lean_CollectMVars_main___main(x_43, x_73); +if (x_61 == 0) +{ +lean_dec(x_44); +return x_74; +} +else +{ +x_45 = x_74; +goto block_59; +} +} +} +else +{ +lean_dec(x_63); +lean_dec(x_62); +lean_dec(x_43); +if (x_61 == 0) +{ +lean_dec(x_44); +return x_2; +} +else +{ +x_45 = x_2; +goto block_59; +} +} +} +block_59: +{ +lean_object* x_46; lean_object* x_47; uint8_t x_48; +x_46 = lean_ctor_get(x_45, 0); +lean_inc(x_46); +x_47 = lean_ctor_get(x_45, 1); +lean_inc(x_47); +x_48 = l_HashMapImp_contains___at_Lean_CollectMVars_visit___spec__1(x_46, x_44); +if (x_48 == 0) +{ +uint8_t x_49; +x_49 = !lean_is_exclusive(x_45); +if (x_49 == 0) +{ +lean_object* x_50; lean_object* x_51; lean_object* x_52; lean_object* x_53; +x_50 = lean_ctor_get(x_45, 1); +lean_dec(x_50); +x_51 = lean_ctor_get(x_45, 0); +lean_dec(x_51); +x_52 = lean_box(0); +lean_inc(x_44); +x_53 = l_HashMapImp_insert___at_Lean_CollectMVars_visit___spec__3(x_46, x_44, x_52); +lean_ctor_set(x_45, 0, x_53); +x_1 = x_44; +x_2 = x_45; +goto _start; +} +else +{ +lean_object* x_55; lean_object* x_56; lean_object* x_57; +lean_dec(x_45); +x_55 = lean_box(0); +lean_inc(x_44); +x_56 = l_HashMapImp_insert___at_Lean_CollectMVars_visit___spec__3(x_46, x_44, x_55); +x_57 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_57, 0, x_56); +lean_ctor_set(x_57, 1, x_47); +x_1 = x_44; +x_2 = x_57; +goto _start; +} +} +else +{ +lean_dec(x_47); +lean_dec(x_46); +lean_dec(x_44); +return x_45; +} +} +} +case 7: +{ +lean_object* x_75; lean_object* x_76; lean_object* x_77; uint8_t x_92; uint8_t x_93; +x_75 = lean_ctor_get(x_1, 1); +lean_inc(x_75); +x_76 = lean_ctor_get(x_1, 2); +lean_inc(x_76); +lean_dec(x_1); +x_92 = l_Lean_Expr_hasMVar(x_75); +x_93 = l_Lean_Expr_hasMVar(x_76); +if (x_92 == 0) +{ +lean_dec(x_75); +if (x_93 == 0) +{ +lean_dec(x_76); +return x_2; +} +else +{ +x_77 = x_2; +goto block_91; +} +} +else +{ +lean_object* x_94; lean_object* x_95; uint8_t x_96; +x_94 = lean_ctor_get(x_2, 0); +lean_inc(x_94); +x_95 = lean_ctor_get(x_2, 1); +lean_inc(x_95); +x_96 = l_HashMapImp_contains___at_Lean_CollectMVars_visit___spec__1(x_94, x_75); +if (x_96 == 0) +{ +uint8_t x_97; +x_97 = !lean_is_exclusive(x_2); +if (x_97 == 0) +{ +lean_object* x_98; lean_object* x_99; lean_object* x_100; lean_object* x_101; lean_object* x_102; +x_98 = lean_ctor_get(x_2, 1); +lean_dec(x_98); +x_99 = lean_ctor_get(x_2, 0); +lean_dec(x_99); +x_100 = lean_box(0); +lean_inc(x_75); +x_101 = l_HashMapImp_insert___at_Lean_CollectMVars_visit___spec__3(x_94, x_75, x_100); +lean_ctor_set(x_2, 0, x_101); +x_102 = l_Lean_CollectMVars_main___main(x_75, x_2); +if (x_93 == 0) +{ +lean_dec(x_76); +return x_102; +} +else +{ +x_77 = x_102; +goto block_91; +} +} +else +{ +lean_object* x_103; lean_object* x_104; lean_object* x_105; lean_object* x_106; +lean_dec(x_2); +x_103 = lean_box(0); +lean_inc(x_75); +x_104 = l_HashMapImp_insert___at_Lean_CollectMVars_visit___spec__3(x_94, x_75, x_103); +x_105 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_105, 0, x_104); +lean_ctor_set(x_105, 1, x_95); +x_106 = l_Lean_CollectMVars_main___main(x_75, x_105); +if (x_93 == 0) +{ +lean_dec(x_76); +return x_106; +} +else +{ +x_77 = x_106; +goto block_91; +} +} +} +else +{ +lean_dec(x_95); +lean_dec(x_94); +lean_dec(x_75); +if (x_93 == 0) +{ +lean_dec(x_76); +return x_2; +} +else +{ +x_77 = x_2; +goto block_91; +} +} +} +block_91: +{ +lean_object* x_78; lean_object* x_79; uint8_t x_80; +x_78 = lean_ctor_get(x_77, 0); +lean_inc(x_78); +x_79 = lean_ctor_get(x_77, 1); +lean_inc(x_79); +x_80 = l_HashMapImp_contains___at_Lean_CollectMVars_visit___spec__1(x_78, x_76); +if (x_80 == 0) +{ +uint8_t x_81; +x_81 = !lean_is_exclusive(x_77); +if (x_81 == 0) +{ +lean_object* x_82; lean_object* x_83; lean_object* x_84; lean_object* x_85; +x_82 = lean_ctor_get(x_77, 1); +lean_dec(x_82); +x_83 = lean_ctor_get(x_77, 0); +lean_dec(x_83); +x_84 = lean_box(0); +lean_inc(x_76); +x_85 = l_HashMapImp_insert___at_Lean_CollectMVars_visit___spec__3(x_78, x_76, x_84); +lean_ctor_set(x_77, 0, x_85); +x_1 = x_76; +x_2 = x_77; +goto _start; +} +else +{ +lean_object* x_87; lean_object* x_88; lean_object* x_89; +lean_dec(x_77); +x_87 = lean_box(0); +lean_inc(x_76); +x_88 = l_HashMapImp_insert___at_Lean_CollectMVars_visit___spec__3(x_78, x_76, x_87); +x_89 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_89, 0, x_88); +lean_ctor_set(x_89, 1, x_79); +x_1 = x_76; +x_2 = x_89; +goto _start; +} +} +else +{ +lean_dec(x_79); +lean_dec(x_78); +lean_dec(x_76); +return x_77; +} +} +} +case 8: +{ +lean_object* x_107; lean_object* x_108; lean_object* x_109; lean_object* x_110; uint8_t x_125; uint8_t x_126; uint8_t x_127; lean_object* x_128; +x_107 = lean_ctor_get(x_1, 1); +lean_inc(x_107); +x_108 = lean_ctor_get(x_1, 2); +lean_inc(x_108); +x_109 = lean_ctor_get(x_1, 3); +lean_inc(x_109); +lean_dec(x_1); +x_125 = l_Lean_Expr_hasMVar(x_107); +x_126 = l_Lean_Expr_hasMVar(x_108); +x_127 = l_Lean_Expr_hasMVar(x_109); +if (x_125 == 0) +{ +lean_dec(x_107); +if (x_126 == 0) +{ +lean_dec(x_108); +if (x_127 == 0) +{ +lean_dec(x_109); +return x_2; +} +else +{ +x_110 = x_2; +goto block_124; +} +} +else +{ +x_128 = x_2; +goto block_142; +} +} +else +{ +lean_object* x_143; lean_object* x_144; uint8_t x_145; +x_143 = lean_ctor_get(x_2, 0); +lean_inc(x_143); +x_144 = lean_ctor_get(x_2, 1); +lean_inc(x_144); +x_145 = l_HashMapImp_contains___at_Lean_CollectMVars_visit___spec__1(x_143, x_107); +if (x_145 == 0) +{ +uint8_t x_146; +x_146 = !lean_is_exclusive(x_2); +if (x_146 == 0) +{ +lean_object* x_147; lean_object* x_148; lean_object* x_149; lean_object* x_150; lean_object* x_151; +x_147 = lean_ctor_get(x_2, 1); +lean_dec(x_147); +x_148 = lean_ctor_get(x_2, 0); +lean_dec(x_148); +x_149 = lean_box(0); +lean_inc(x_107); +x_150 = l_HashMapImp_insert___at_Lean_CollectMVars_visit___spec__3(x_143, x_107, x_149); +lean_ctor_set(x_2, 0, x_150); +x_151 = l_Lean_CollectMVars_main___main(x_107, x_2); +if (x_126 == 0) +{ +lean_dec(x_108); +if (x_127 == 0) +{ +lean_dec(x_109); +return x_151; +} +else +{ +x_110 = x_151; +goto block_124; +} +} +else +{ +x_128 = x_151; +goto block_142; +} +} +else +{ +lean_object* x_152; lean_object* x_153; lean_object* x_154; lean_object* x_155; +lean_dec(x_2); +x_152 = lean_box(0); +lean_inc(x_107); +x_153 = l_HashMapImp_insert___at_Lean_CollectMVars_visit___spec__3(x_143, x_107, x_152); +x_154 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_154, 0, x_153); +lean_ctor_set(x_154, 1, x_144); +x_155 = l_Lean_CollectMVars_main___main(x_107, x_154); +if (x_126 == 0) +{ +lean_dec(x_108); +if (x_127 == 0) +{ +lean_dec(x_109); +return x_155; +} +else +{ +x_110 = x_155; +goto block_124; +} +} +else +{ +x_128 = x_155; +goto block_142; +} +} +} +else +{ +lean_dec(x_144); +lean_dec(x_143); +lean_dec(x_107); +if (x_126 == 0) +{ +lean_dec(x_108); +if (x_127 == 0) +{ +lean_dec(x_109); +return x_2; +} +else +{ +x_110 = x_2; +goto block_124; +} +} +else +{ +x_128 = x_2; +goto block_142; +} +} +} +block_124: +{ +lean_object* x_111; lean_object* x_112; uint8_t x_113; +x_111 = lean_ctor_get(x_110, 0); +lean_inc(x_111); +x_112 = lean_ctor_get(x_110, 1); +lean_inc(x_112); +x_113 = l_HashMapImp_contains___at_Lean_CollectMVars_visit___spec__1(x_111, x_109); +if (x_113 == 0) +{ +uint8_t x_114; +x_114 = !lean_is_exclusive(x_110); +if (x_114 == 0) +{ +lean_object* x_115; lean_object* x_116; lean_object* x_117; lean_object* x_118; +x_115 = lean_ctor_get(x_110, 1); +lean_dec(x_115); +x_116 = lean_ctor_get(x_110, 0); +lean_dec(x_116); +x_117 = lean_box(0); +lean_inc(x_109); +x_118 = l_HashMapImp_insert___at_Lean_CollectMVars_visit___spec__3(x_111, x_109, x_117); +lean_ctor_set(x_110, 0, x_118); +x_1 = x_109; +x_2 = x_110; +goto _start; +} +else +{ +lean_object* x_120; lean_object* x_121; lean_object* x_122; +lean_dec(x_110); +x_120 = lean_box(0); +lean_inc(x_109); +x_121 = l_HashMapImp_insert___at_Lean_CollectMVars_visit___spec__3(x_111, x_109, x_120); +x_122 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_122, 0, x_121); +lean_ctor_set(x_122, 1, x_112); +x_1 = x_109; +x_2 = x_122; +goto _start; +} +} +else +{ +lean_dec(x_112); +lean_dec(x_111); +lean_dec(x_109); +return x_110; +} +} +block_142: +{ +lean_object* x_129; lean_object* x_130; uint8_t x_131; +x_129 = lean_ctor_get(x_128, 0); +lean_inc(x_129); +x_130 = lean_ctor_get(x_128, 1); +lean_inc(x_130); +x_131 = l_HashMapImp_contains___at_Lean_CollectMVars_visit___spec__1(x_129, x_108); +if (x_131 == 0) +{ +uint8_t x_132; +x_132 = !lean_is_exclusive(x_128); +if (x_132 == 0) +{ +lean_object* x_133; lean_object* x_134; lean_object* x_135; lean_object* x_136; lean_object* x_137; +x_133 = lean_ctor_get(x_128, 1); +lean_dec(x_133); +x_134 = lean_ctor_get(x_128, 0); +lean_dec(x_134); +x_135 = lean_box(0); +lean_inc(x_108); +x_136 = l_HashMapImp_insert___at_Lean_CollectMVars_visit___spec__3(x_129, x_108, x_135); +lean_ctor_set(x_128, 0, x_136); +x_137 = l_Lean_CollectMVars_main___main(x_108, x_128); +if (x_127 == 0) +{ +lean_dec(x_109); +return x_137; +} +else +{ +x_110 = x_137; +goto block_124; +} +} +else +{ +lean_object* x_138; lean_object* x_139; lean_object* x_140; lean_object* x_141; +lean_dec(x_128); +x_138 = lean_box(0); +lean_inc(x_108); +x_139 = l_HashMapImp_insert___at_Lean_CollectMVars_visit___spec__3(x_129, x_108, x_138); +x_140 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_140, 0, x_139); +lean_ctor_set(x_140, 1, x_130); +x_141 = l_Lean_CollectMVars_main___main(x_108, x_140); +if (x_127 == 0) +{ +lean_dec(x_109); +return x_141; +} +else +{ +x_110 = x_141; +goto block_124; +} +} +} +else +{ +lean_dec(x_130); +lean_dec(x_129); +lean_dec(x_108); +if (x_127 == 0) +{ +lean_dec(x_109); +return x_128; +} +else +{ +x_110 = x_128; +goto block_124; +} +} +} +} +case 10: +{ +lean_object* x_156; uint8_t x_157; +x_156 = lean_ctor_get(x_1, 1); +lean_inc(x_156); +lean_dec(x_1); +x_157 = l_Lean_Expr_hasMVar(x_156); +if (x_157 == 0) +{ +lean_dec(x_156); +return x_2; +} +else +{ +lean_object* x_158; lean_object* x_159; uint8_t x_160; +x_158 = lean_ctor_get(x_2, 0); +lean_inc(x_158); +x_159 = lean_ctor_get(x_2, 1); +lean_inc(x_159); +x_160 = l_HashMapImp_contains___at_Lean_CollectMVars_visit___spec__1(x_158, x_156); +if (x_160 == 0) +{ +uint8_t x_161; +x_161 = !lean_is_exclusive(x_2); +if (x_161 == 0) +{ +lean_object* x_162; lean_object* x_163; lean_object* x_164; lean_object* x_165; +x_162 = lean_ctor_get(x_2, 1); +lean_dec(x_162); +x_163 = lean_ctor_get(x_2, 0); +lean_dec(x_163); +x_164 = lean_box(0); +lean_inc(x_156); +x_165 = l_HashMapImp_insert___at_Lean_CollectMVars_visit___spec__3(x_158, x_156, x_164); +lean_ctor_set(x_2, 0, x_165); +x_1 = x_156; +goto _start; +} +else +{ +lean_object* x_167; lean_object* x_168; lean_object* x_169; +lean_dec(x_2); +x_167 = lean_box(0); +lean_inc(x_156); +x_168 = l_HashMapImp_insert___at_Lean_CollectMVars_visit___spec__3(x_158, x_156, x_167); +x_169 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_169, 0, x_168); +lean_ctor_set(x_169, 1, x_159); +x_1 = x_156; +x_2 = x_169; +goto _start; +} +} +else +{ +lean_dec(x_159); +lean_dec(x_158); +lean_dec(x_156); +return x_2; +} +} +} +case 11: +{ +lean_object* x_171; uint8_t x_172; +x_171 = lean_ctor_get(x_1, 2); +lean_inc(x_171); +lean_dec(x_1); +x_172 = l_Lean_Expr_hasMVar(x_171); +if (x_172 == 0) +{ +lean_dec(x_171); +return x_2; +} +else +{ +lean_object* x_173; lean_object* x_174; uint8_t x_175; +x_173 = lean_ctor_get(x_2, 0); +lean_inc(x_173); +x_174 = lean_ctor_get(x_2, 1); +lean_inc(x_174); +x_175 = l_HashMapImp_contains___at_Lean_CollectMVars_visit___spec__1(x_173, x_171); +if (x_175 == 0) +{ +uint8_t x_176; +x_176 = !lean_is_exclusive(x_2); +if (x_176 == 0) +{ +lean_object* x_177; lean_object* x_178; lean_object* x_179; lean_object* x_180; +x_177 = lean_ctor_get(x_2, 1); +lean_dec(x_177); +x_178 = lean_ctor_get(x_2, 0); +lean_dec(x_178); +x_179 = lean_box(0); +lean_inc(x_171); +x_180 = l_HashMapImp_insert___at_Lean_CollectMVars_visit___spec__3(x_173, x_171, x_179); +lean_ctor_set(x_2, 0, x_180); +x_1 = x_171; +goto _start; +} +else +{ +lean_object* x_182; lean_object* x_183; lean_object* x_184; +lean_dec(x_2); +x_182 = lean_box(0); +lean_inc(x_171); +x_183 = l_HashMapImp_insert___at_Lean_CollectMVars_visit___spec__3(x_173, x_171, x_182); +x_184 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_184, 0, x_183); +lean_ctor_set(x_184, 1, x_174); +x_1 = x_171; +x_2 = x_184; +goto _start; +} +} +else +{ +lean_dec(x_174); +lean_dec(x_173); +lean_dec(x_171); +return x_2; +} +} +} +default: +{ +lean_dec(x_1); +return x_2; +} +} +} +} +lean_object* l_Lean_CollectMVars_main(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = l_Lean_CollectMVars_main___main(x_1, x_2); +return x_3; +} +} +lean_object* l_Lean_collectMVars(lean_object* x_1, lean_object* x_2) { +_start: +{ +uint8_t x_3; +x_3 = l_Lean_Expr_hasMVar(x_2); +if (x_3 == 0) +{ +lean_dec(x_2); +return x_1; +} +else +{ +lean_object* x_4; lean_object* x_5; uint8_t x_6; +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 = l_HashMapImp_contains___at_Lean_CollectMVars_visit___spec__1(x_4, x_2); +if (x_6 == 0) +{ +uint8_t x_7; +x_7 = !lean_is_exclusive(x_1); +if (x_7 == 0) +{ +lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; +x_8 = lean_ctor_get(x_1, 1); +lean_dec(x_8); +x_9 = lean_ctor_get(x_1, 0); +lean_dec(x_9); +x_10 = lean_box(0); +lean_inc(x_2); +x_11 = l_HashMapImp_insert___at_Lean_CollectMVars_visit___spec__3(x_4, x_2, x_10); +lean_ctor_set(x_1, 0, x_11); +x_12 = l_Lean_CollectMVars_main___main(x_2, x_1); +return x_12; +} +else +{ +lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; +lean_dec(x_1); +x_13 = lean_box(0); +lean_inc(x_2); +x_14 = l_HashMapImp_insert___at_Lean_CollectMVars_visit___spec__3(x_4, x_2, x_13); +x_15 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_15, 0, x_14); +lean_ctor_set(x_15, 1, x_5); +x_16 = l_Lean_CollectMVars_main___main(x_2, x_15); +return x_16; +} +} +else +{ +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_2); +return x_1; +} +} +} +} +lean_object* initialize_Init_Lean_Expr(lean_object*); +static bool _G_initialized = false; +lean_object* initialize_Init_Lean_Util_CollectMVars(lean_object* w) { +lean_object * res; +if (_G_initialized) return lean_mk_io_result(lean_box(0)); +_G_initialized = true; +res = initialize_Init_Lean_Expr(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); +l_Lean_CollectMVars_State_inhabited___closed__1 = _init_l_Lean_CollectMVars_State_inhabited___closed__1(); +lean_mark_persistent(l_Lean_CollectMVars_State_inhabited___closed__1); +l_Lean_CollectMVars_State_inhabited___closed__2 = _init_l_Lean_CollectMVars_State_inhabited___closed__2(); +lean_mark_persistent(l_Lean_CollectMVars_State_inhabited___closed__2); +l_Lean_CollectMVars_State_inhabited = _init_l_Lean_CollectMVars_State_inhabited(); +lean_mark_persistent(l_Lean_CollectMVars_State_inhabited); +return lean_mk_io_result(lean_box(0)); +} +#ifdef __cplusplus +} +#endif diff --git a/stage0/stdlib/Init/Lean/Util/PPGoal.c b/stage0/stdlib/Init/Lean/Util/PPGoal.c index b88bd29fe7..7149d06dd7 100644 --- a/stage0/stdlib/Init/Lean/Util/PPGoal.c +++ b/stage0/stdlib/Init/Lean/Util/PPGoal.c @@ -49,6 +49,8 @@ lean_object* l_Lean_LocalContext_foldlM___at_Lean_ppGoal___spec__2(lean_object*, lean_object* l_Lean_Name_toStringWithSep___main(lean_object*, lean_object*); lean_object* l_Lean_ppGoal___closed__3; lean_object* l_Array_iterateMAux___main___at_Lean_ppGoal___spec__5___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_ppGoal___closed__8; +lean_object* l_Lean_ppGoal___closed__7; lean_object* l_Lean_ppGoal___closed__1; lean_object* l_Lean_Format_joinSep___main___at_Lean_ppGoal___spec__1(lean_object*, lean_object*); uint8_t lean_nat_dec_lt(lean_object*, lean_object*); @@ -3927,6 +3929,24 @@ lean_ctor_set(x_2, 0, x_1); return x_2; } } +lean_object* _init_l_Lean_ppGoal___closed__7() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("case "); +return x_1; +} +} +lean_object* _init_l_Lean_ppGoal___closed__8() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_ppGoal___closed__7; +x_2 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} lean_object* l_Lean_ppGoal(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { _start: { @@ -3945,7 +3965,7 @@ 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; uint8_t 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_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; uint8_t x_16; 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_6, 0); lean_inc(x_8); lean_dec(x_6); @@ -3971,7 +3991,6 @@ lean_dec(x_12); x_16 = l_Lean_Format_isNil(x_15); x_17 = lean_ctor_get(x_8, 2); lean_inc(x_17); -lean_dec(x_8); lean_inc(x_4); lean_inc(x_3); lean_inc(x_2); @@ -3981,235 +4000,250 @@ x_19 = lean_unsigned_to_nat(2u); x_20 = lean_alloc_ctor(3, 2, 0); lean_ctor_set(x_20, 0, x_19); lean_ctor_set(x_20, 1, x_18); +x_21 = lean_ctor_get(x_8, 0); +lean_inc(x_21); +lean_dec(x_8); if (x_16 == 0) { -uint8_t x_61; lean_object* x_62; lean_object* x_63; -x_61 = 0; -x_62 = lean_box(1); -x_63 = lean_alloc_ctor(4, 2, 1); -lean_ctor_set(x_63, 0, x_15); -lean_ctor_set(x_63, 1, x_62); -lean_ctor_set_uint8(x_63, sizeof(void*)*2, x_61); +uint8_t x_60; lean_object* x_61; lean_object* x_62; +x_60 = 0; +x_61 = lean_box(1); +x_62 = lean_alloc_ctor(4, 2, 1); +lean_ctor_set(x_62, 0, x_15); +lean_ctor_set(x_62, 1, x_61); +lean_ctor_set_uint8(x_62, sizeof(void*)*2, x_60); if (lean_obj_tag(x_13) == 0) { -uint8_t x_64; lean_dec(x_14); lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); -x_64 = l_Lean_Format_isNil(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; -x_65 = lean_alloc_ctor(4, 2, 1); -lean_ctor_set(x_65, 0, x_63); -lean_ctor_set(x_65, 1, x_62); -lean_ctor_set_uint8(x_65, sizeof(void*)*2, x_61); -x_66 = l_Lean_ppGoal___closed__6; -x_67 = lean_alloc_ctor(4, 2, 1); -lean_ctor_set(x_67, 0, x_65); -lean_ctor_set(x_67, 1, x_66); -lean_ctor_set_uint8(x_67, sizeof(void*)*2, x_61); -x_68 = l_Lean_Format_flatten___main___closed__1; -x_69 = lean_alloc_ctor(4, 2, 1); -lean_ctor_set(x_69, 0, x_67); -lean_ctor_set(x_69, 1, x_68); -lean_ctor_set_uint8(x_69, sizeof(void*)*2, x_61); -x_70 = lean_alloc_ctor(4, 2, 1); -lean_ctor_set(x_70, 0, x_69); -lean_ctor_set(x_70, 1, x_20); -lean_ctor_set_uint8(x_70, sizeof(void*)*2, x_61); -return x_70; +x_22 = x_62; +goto block_59; } else { -lean_object* x_71; lean_object* x_72; lean_object* x_73; lean_object* x_74; lean_object* x_75; -x_71 = l_Lean_ppGoal___closed__6; -x_72 = lean_alloc_ctor(4, 2, 1); -lean_ctor_set(x_72, 0, x_63); -lean_ctor_set(x_72, 1, x_71); -lean_ctor_set_uint8(x_72, sizeof(void*)*2, x_61); -x_73 = l_Lean_Format_flatten___main___closed__1; -x_74 = lean_alloc_ctor(4, 2, 1); -lean_ctor_set(x_74, 0, x_72); -lean_ctor_set(x_74, 1, x_73); -lean_ctor_set_uint8(x_74, sizeof(void*)*2, x_61); -x_75 = lean_alloc_ctor(4, 2, 1); -lean_ctor_set(x_75, 0, x_74); -lean_ctor_set(x_75, 1, x_20); -lean_ctor_set_uint8(x_75, sizeof(void*)*2, x_61); -return x_75; -} -} -else -{ -x_21 = x_63; -goto block_60; -} -} -else -{ -if (lean_obj_tag(x_13) == 0) -{ -uint8_t x_76; lean_object* x_77; lean_object* x_78; lean_object* x_79; lean_object* x_80; lean_object* x_81; -lean_dec(x_14); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_76 = 0; -x_77 = l_Lean_ppGoal___closed__6; -x_78 = lean_alloc_ctor(4, 2, 1); -lean_ctor_set(x_78, 0, x_15); -lean_ctor_set(x_78, 1, x_77); -lean_ctor_set_uint8(x_78, sizeof(void*)*2, x_76); -x_79 = l_Lean_Format_flatten___main___closed__1; -x_80 = lean_alloc_ctor(4, 2, 1); -lean_ctor_set(x_80, 0, x_78); -lean_ctor_set(x_80, 1, x_79); -lean_ctor_set_uint8(x_80, sizeof(void*)*2, x_76); -x_81 = lean_alloc_ctor(4, 2, 1); -lean_ctor_set(x_81, 0, x_80); -lean_ctor_set(x_81, 1, x_20); -lean_ctor_set_uint8(x_81, sizeof(void*)*2, x_76); -return x_81; -} -else -{ -x_21 = x_15; -goto block_60; -} -} -block_60: -{ if (lean_obj_tag(x_14) == 0) { -uint8_t x_22; lean_dec(x_13); lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); -x_22 = l_Lean_Format_isNil(x_21); -if (x_22 == 0) -{ -uint8_t x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; -x_23 = 0; -x_24 = lean_box(1); -x_25 = lean_alloc_ctor(4, 2, 1); -lean_ctor_set(x_25, 0, x_21); -lean_ctor_set(x_25, 1, x_24); -lean_ctor_set_uint8(x_25, sizeof(void*)*2, x_23); -x_26 = l_Lean_ppGoal___closed__6; -x_27 = lean_alloc_ctor(4, 2, 1); -lean_ctor_set(x_27, 0, x_25); -lean_ctor_set(x_27, 1, x_26); -lean_ctor_set_uint8(x_27, sizeof(void*)*2, x_23); -x_28 = l_Lean_Format_flatten___main___closed__1; -x_29 = lean_alloc_ctor(4, 2, 1); -lean_ctor_set(x_29, 0, x_27); -lean_ctor_set(x_29, 1, x_28); -lean_ctor_set_uint8(x_29, sizeof(void*)*2, x_23); -x_30 = lean_alloc_ctor(4, 2, 1); -lean_ctor_set(x_30, 0, x_29); -lean_ctor_set(x_30, 1, x_20); -lean_ctor_set_uint8(x_30, sizeof(void*)*2, x_23); -return x_30; +x_22 = x_62; +goto block_59; } else { -uint8_t x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; -x_31 = 0; -x_32 = l_Lean_ppGoal___closed__6; -x_33 = lean_alloc_ctor(4, 2, 1); -lean_ctor_set(x_33, 0, x_21); -lean_ctor_set(x_33, 1, x_32); -lean_ctor_set_uint8(x_33, sizeof(void*)*2, x_31); -x_34 = l_Lean_Format_flatten___main___closed__1; -x_35 = lean_alloc_ctor(4, 2, 1); -lean_ctor_set(x_35, 0, x_33); -lean_ctor_set(x_35, 1, x_34); -lean_ctor_set_uint8(x_35, sizeof(void*)*2, x_31); -x_36 = lean_alloc_ctor(4, 2, 1); -lean_ctor_set(x_36, 0, x_35); -lean_ctor_set(x_36, 1, x_20); -lean_ctor_set_uint8(x_36, sizeof(void*)*2, x_31); -return x_36; -} -} -else -{ -lean_object* x_37; lean_object* x_38; lean_object* x_39; uint8_t 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; uint8_t x_50; -x_37 = lean_ctor_get(x_14, 0); -lean_inc(x_37); +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; +x_63 = lean_ctor_get(x_14, 0); +lean_inc(x_63); lean_dec(x_14); -x_38 = l_Lean_Format_flatten___main___closed__1; -x_39 = l_Lean_Format_joinSep___main___at_Lean_ppGoal___spec__1(x_13, x_38); -x_40 = 0; -x_41 = l_Array_iterateMAux___main___at_Lean_ppGoal___spec__6___closed__2; -x_42 = lean_alloc_ctor(4, 2, 1); -lean_ctor_set(x_42, 0, x_39); -lean_ctor_set(x_42, 1, x_41); -lean_ctor_set_uint8(x_42, sizeof(void*)*2, x_40); -x_43 = l_Lean_ppExpr(x_1, x_2, x_3, x_4, x_37); -x_44 = lean_box(1); -x_45 = lean_alloc_ctor(4, 2, 1); -lean_ctor_set(x_45, 0, x_44); -lean_ctor_set(x_45, 1, x_43); -lean_ctor_set_uint8(x_45, sizeof(void*)*2, x_40); -x_46 = lean_alloc_ctor(3, 2, 0); -lean_ctor_set(x_46, 0, x_19); -lean_ctor_set(x_46, 1, x_45); -x_47 = lean_alloc_ctor(4, 2, 1); -lean_ctor_set(x_47, 0, x_42); -lean_ctor_set(x_47, 1, x_46); -lean_ctor_set_uint8(x_47, sizeof(void*)*2, x_40); -x_48 = lean_format_group(x_47); -x_49 = lean_alloc_ctor(4, 2, 1); -lean_ctor_set(x_49, 0, x_21); -lean_ctor_set(x_49, 1, x_48); -lean_ctor_set_uint8(x_49, sizeof(void*)*2, x_40); -x_50 = l_Lean_Format_isNil(x_49); -if (x_50 == 0) -{ -lean_object* x_51; lean_object* x_52; lean_object* x_53; lean_object* x_54; lean_object* x_55; -x_51 = lean_alloc_ctor(4, 2, 1); -lean_ctor_set(x_51, 0, x_49); -lean_ctor_set(x_51, 1, x_44); -lean_ctor_set_uint8(x_51, sizeof(void*)*2, x_40); -x_52 = l_Lean_ppGoal___closed__6; -x_53 = lean_alloc_ctor(4, 2, 1); -lean_ctor_set(x_53, 0, x_51); -lean_ctor_set(x_53, 1, x_52); -lean_ctor_set_uint8(x_53, sizeof(void*)*2, x_40); -x_54 = lean_alloc_ctor(4, 2, 1); -lean_ctor_set(x_54, 0, x_53); -lean_ctor_set(x_54, 1, x_38); -lean_ctor_set_uint8(x_54, sizeof(void*)*2, x_40); -x_55 = lean_alloc_ctor(4, 2, 1); -lean_ctor_set(x_55, 0, x_54); -lean_ctor_set(x_55, 1, x_20); -lean_ctor_set_uint8(x_55, sizeof(void*)*2, x_40); -return x_55; +x_64 = l_Lean_Format_flatten___main___closed__1; +x_65 = l_Lean_Format_joinSep___main___at_Lean_ppGoal___spec__1(x_13, x_64); +x_66 = l_Array_iterateMAux___main___at_Lean_ppGoal___spec__6___closed__2; +x_67 = lean_alloc_ctor(4, 2, 1); +lean_ctor_set(x_67, 0, x_65); +lean_ctor_set(x_67, 1, x_66); +lean_ctor_set_uint8(x_67, sizeof(void*)*2, x_60); +x_68 = l_Lean_ppExpr(x_1, x_2, x_3, x_4, x_63); +x_69 = lean_alloc_ctor(4, 2, 1); +lean_ctor_set(x_69, 0, x_61); +lean_ctor_set(x_69, 1, x_68); +lean_ctor_set_uint8(x_69, sizeof(void*)*2, x_60); +x_70 = lean_alloc_ctor(3, 2, 0); +lean_ctor_set(x_70, 0, x_19); +lean_ctor_set(x_70, 1, x_69); +x_71 = lean_alloc_ctor(4, 2, 1); +lean_ctor_set(x_71, 0, x_67); +lean_ctor_set(x_71, 1, x_70); +lean_ctor_set_uint8(x_71, sizeof(void*)*2, x_60); +x_72 = lean_format_group(x_71); +x_73 = lean_alloc_ctor(4, 2, 1); +lean_ctor_set(x_73, 0, x_62); +lean_ctor_set(x_73, 1, x_72); +lean_ctor_set_uint8(x_73, sizeof(void*)*2, x_60); +x_22 = x_73; +goto block_59; +} +} } else { -lean_object* x_56; lean_object* x_57; lean_object* x_58; lean_object* x_59; -x_56 = l_Lean_ppGoal___closed__6; -x_57 = lean_alloc_ctor(4, 2, 1); -lean_ctor_set(x_57, 0, x_49); -lean_ctor_set(x_57, 1, x_56); -lean_ctor_set_uint8(x_57, sizeof(void*)*2, x_40); -x_58 = lean_alloc_ctor(4, 2, 1); -lean_ctor_set(x_58, 0, x_57); -lean_ctor_set(x_58, 1, x_38); -lean_ctor_set_uint8(x_58, sizeof(void*)*2, x_40); -x_59 = lean_alloc_ctor(4, 2, 1); -lean_ctor_set(x_59, 0, x_58); -lean_ctor_set(x_59, 1, x_20); -lean_ctor_set_uint8(x_59, sizeof(void*)*2, x_40); -return x_59; +if (lean_obj_tag(x_13) == 0) +{ +lean_dec(x_14); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_22 = x_15; +goto block_59; +} +else +{ +if (lean_obj_tag(x_14) == 0) +{ +lean_dec(x_13); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_22 = x_15; +goto block_59; +} +else +{ +lean_object* x_74; lean_object* x_75; lean_object* x_76; uint8_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; +x_74 = lean_ctor_get(x_14, 0); +lean_inc(x_74); +lean_dec(x_14); +x_75 = l_Lean_Format_flatten___main___closed__1; +x_76 = l_Lean_Format_joinSep___main___at_Lean_ppGoal___spec__1(x_13, x_75); +x_77 = 0; +x_78 = l_Array_iterateMAux___main___at_Lean_ppGoal___spec__6___closed__2; +x_79 = lean_alloc_ctor(4, 2, 1); +lean_ctor_set(x_79, 0, x_76); +lean_ctor_set(x_79, 1, x_78); +lean_ctor_set_uint8(x_79, sizeof(void*)*2, x_77); +x_80 = l_Lean_ppExpr(x_1, x_2, x_3, x_4, x_74); +x_81 = lean_box(1); +x_82 = lean_alloc_ctor(4, 2, 1); +lean_ctor_set(x_82, 0, x_81); +lean_ctor_set(x_82, 1, x_80); +lean_ctor_set_uint8(x_82, sizeof(void*)*2, x_77); +x_83 = lean_alloc_ctor(3, 2, 0); +lean_ctor_set(x_83, 0, x_19); +lean_ctor_set(x_83, 1, x_82); +x_84 = lean_alloc_ctor(4, 2, 1); +lean_ctor_set(x_84, 0, x_79); +lean_ctor_set(x_84, 1, x_83); +lean_ctor_set_uint8(x_84, sizeof(void*)*2, x_77); +x_85 = lean_format_group(x_84); +x_86 = lean_alloc_ctor(4, 2, 1); +lean_ctor_set(x_86, 0, x_15); +lean_ctor_set(x_86, 1, x_85); +lean_ctor_set_uint8(x_86, sizeof(void*)*2, x_77); +x_22 = x_86; +goto block_59; +} +} +} +block_59: +{ +uint8_t x_23; +x_23 = l_Lean_Format_isNil(x_22); +if (x_23 == 0) +{ +uint8_t x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; +x_24 = 0; +x_25 = lean_box(1); +x_26 = lean_alloc_ctor(4, 2, 1); +lean_ctor_set(x_26, 0, x_22); +lean_ctor_set(x_26, 1, x_25); +lean_ctor_set_uint8(x_26, sizeof(void*)*2, x_24); +x_27 = l_Lean_ppGoal___closed__6; +x_28 = lean_alloc_ctor(4, 2, 1); +lean_ctor_set(x_28, 0, x_26); +lean_ctor_set(x_28, 1, x_27); +lean_ctor_set_uint8(x_28, sizeof(void*)*2, x_24); +x_29 = l_Lean_Format_flatten___main___closed__1; +x_30 = lean_alloc_ctor(4, 2, 1); +lean_ctor_set(x_30, 0, x_28); +lean_ctor_set(x_30, 1, x_29); +lean_ctor_set_uint8(x_30, sizeof(void*)*2, x_24); +x_31 = lean_alloc_ctor(4, 2, 1); +lean_ctor_set(x_31, 0, x_30); +lean_ctor_set(x_31, 1, x_20); +lean_ctor_set_uint8(x_31, sizeof(void*)*2, x_24); +if (lean_obj_tag(x_21) == 0) +{ +return x_31; +} +else +{ +lean_object* x_41; +x_41 = lean_box(0); +x_32 = x_41; +goto block_40; +} +block_40: +{ +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_dec(x_32); +x_33 = l_Lean_Name_toString___closed__1; +x_34 = l_Lean_Name_toStringWithSep___main(x_33, x_21); +x_35 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_35, 0, x_34); +x_36 = l_Lean_ppGoal___closed__8; +x_37 = lean_alloc_ctor(4, 2, 1); +lean_ctor_set(x_37, 0, x_36); +lean_ctor_set(x_37, 1, x_35); +lean_ctor_set_uint8(x_37, sizeof(void*)*2, x_24); +x_38 = lean_alloc_ctor(4, 2, 1); +lean_ctor_set(x_38, 0, x_37); +lean_ctor_set(x_38, 1, x_25); +lean_ctor_set_uint8(x_38, sizeof(void*)*2, x_24); +x_39 = lean_alloc_ctor(4, 2, 1); +lean_ctor_set(x_39, 0, x_38); +lean_ctor_set(x_39, 1, x_31); +lean_ctor_set_uint8(x_39, sizeof(void*)*2, x_24); +return x_39; +} +} +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; +x_42 = 0; +x_43 = l_Lean_ppGoal___closed__6; +x_44 = lean_alloc_ctor(4, 2, 1); +lean_ctor_set(x_44, 0, x_22); +lean_ctor_set(x_44, 1, x_43); +lean_ctor_set_uint8(x_44, sizeof(void*)*2, x_42); +x_45 = l_Lean_Format_flatten___main___closed__1; +x_46 = lean_alloc_ctor(4, 2, 1); +lean_ctor_set(x_46, 0, x_44); +lean_ctor_set(x_46, 1, x_45); +lean_ctor_set_uint8(x_46, sizeof(void*)*2, x_42); +x_47 = lean_alloc_ctor(4, 2, 1); +lean_ctor_set(x_47, 0, x_46); +lean_ctor_set(x_47, 1, x_20); +lean_ctor_set_uint8(x_47, sizeof(void*)*2, x_42); +if (lean_obj_tag(x_21) == 0) +{ +return x_47; +} +else +{ +lean_object* x_58; +x_58 = lean_box(0); +x_48 = x_58; +goto block_57; +} +block_57: +{ +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_dec(x_48); +x_49 = l_Lean_Name_toString___closed__1; +x_50 = l_Lean_Name_toStringWithSep___main(x_49, x_21); +x_51 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_51, 0, x_50); +x_52 = l_Lean_ppGoal___closed__8; +x_53 = lean_alloc_ctor(4, 2, 1); +lean_ctor_set(x_53, 0, x_52); +lean_ctor_set(x_53, 1, x_51); +lean_ctor_set_uint8(x_53, sizeof(void*)*2, x_42); +x_54 = lean_box(1); +x_55 = lean_alloc_ctor(4, 2, 1); +lean_ctor_set(x_55, 0, x_53); +lean_ctor_set(x_55, 1, x_54); +lean_ctor_set_uint8(x_55, sizeof(void*)*2, x_42); +x_56 = lean_alloc_ctor(4, 2, 1); +lean_ctor_set(x_56, 0, x_55); +lean_ctor_set(x_56, 1, x_47); +lean_ctor_set_uint8(x_56, sizeof(void*)*2, x_42); +return x_56; } } } @@ -4306,6 +4340,10 @@ l_Lean_ppGoal___closed__5 = _init_l_Lean_ppGoal___closed__5(); lean_mark_persistent(l_Lean_ppGoal___closed__5); l_Lean_ppGoal___closed__6 = _init_l_Lean_ppGoal___closed__6(); lean_mark_persistent(l_Lean_ppGoal___closed__6); +l_Lean_ppGoal___closed__7 = _init_l_Lean_ppGoal___closed__7(); +lean_mark_persistent(l_Lean_ppGoal___closed__7); +l_Lean_ppGoal___closed__8 = _init_l_Lean_ppGoal___closed__8(); +lean_mark_persistent(l_Lean_ppGoal___closed__8); return lean_mk_io_result(lean_box(0)); } #ifdef __cplusplus diff --git a/stage0/stdlib/Init/Lean/Util/WHNF.c b/stage0/stdlib/Init/Lean/Util/WHNF.c index b78c804377..f64d7f9a28 100644 --- a/stage0/stdlib/Init/Lean/Util/WHNF.c +++ b/stage0/stdlib/Init/Lean/Util/WHNF.c @@ -98,6 +98,7 @@ lean_object* l___private_Init_Lean_Util_WHNF_4__getRecRuleFor___lambda__1___boxe lean_object* l_Lean_WHNF_whnfCore___main___rarg___lambda__7(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_WHNF_whnfMain(lean_object*); +lean_object* l_Lean_Syntax_mreplace___main___rarg___lambda__1(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_WHNF_whnfCore(lean_object*); uint8_t l_Lean_ConstantInfo_hasValue(lean_object*); lean_object* l_Lean_WHNF_whnfMain___main___boxed(lean_object*); @@ -110,7 +111,6 @@ uint8_t l_Lean_Expr_isConstOf(lean_object*, lean_object*); lean_object* l_Lean_WHNF_unfoldDefinitionAux___rarg___lambda__4___boxed(lean_object*, lean_object*, lean_object*); lean_object* l___private_Init_Lean_Expr_3__getAppArgsAux___main(lean_object*, lean_object*, lean_object*); lean_object* l___private_Init_Lean_Util_WHNF_2__mkNullaryCtor___rarg(lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_WHNF_reduceRec___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*, lean_object*, lean_object*); lean_object* l_Lean_WHNF_whnfCore___main___rarg___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_WHNF_smartUnfoldingSuffix; lean_object* l_Lean_WHNF_reduceQuotRec___boxed(lean_object*, lean_object*); @@ -186,7 +186,7 @@ lean_object* l___private_Init_Lean_Util_WHNF_10__whnfCoreUnstuck___main___rarg(l lean_object* l___private_Init_Lean_Util_WHNF_3__toCtorIfLit___closed__3; lean_object* l_Lean_mkConst(lean_object*, lean_object*); lean_object* l___private_Init_Lean_Util_WHNF_8__deltaDefinition___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_WHNF_reduceRec___rarg___lambda__2(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_WHNF_reduceRec___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*, lean_object*, lean_object*); lean_object* l_Lean_WHNF_reduceQuotRec___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_WHNF_whnfEasyCases___main___rarg___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Init_Lean_Util_WHNF_5__toCtorWhenK___rarg___lambda__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -1165,40 +1165,7 @@ return x_42; } } } -lean_object* l_Lean_WHNF_reduceRec___rarg___lambda__2(lean_object* x_1, lean_object* x_2, lean_object* x_3) { -_start: -{ -if (lean_obj_tag(x_3) == 0) -{ -lean_object* x_4; lean_object* x_5; lean_object* x_6; -x_4 = lean_ctor_get(x_1, 0); -lean_inc(x_4); -lean_dec(x_1); -x_5 = lean_ctor_get(x_4, 1); -lean_inc(x_5); -lean_dec(x_4); -x_6 = lean_apply_2(x_5, lean_box(0), x_2); -return x_6; -} -else -{ -lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; -lean_dec(x_2); -x_7 = lean_ctor_get(x_1, 0); -lean_inc(x_7); -lean_dec(x_1); -x_8 = lean_ctor_get(x_7, 1); -lean_inc(x_8); -lean_dec(x_7); -x_9 = lean_ctor_get(x_3, 0); -lean_inc(x_9); -lean_dec(x_3); -x_10 = lean_apply_2(x_8, lean_box(0), x_9); -return x_10; -} -} -} -lean_object* l_Lean_WHNF_reduceRec___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, lean_object* x_12, lean_object* x_13, lean_object* x_14) { +lean_object* l_Lean_WHNF_reduceRec___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, lean_object* x_12, lean_object* x_13, lean_object* x_14) { _start: { uint8_t x_15; lean_object* x_16; @@ -1236,7 +1203,7 @@ lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_inc(x_14); lean_inc(x_8); x_21 = l___private_Init_Lean_Util_WHNF_5__toCtorWhenK___rarg(x_8, x_10, x_11, x_12, x_13, x_1, x_14); -x_22 = lean_alloc_closure((void*)(l_Lean_WHNF_reduceRec___rarg___lambda__2), 3, 2); +x_22 = lean_alloc_closure((void*)(l_Lean_Syntax_mreplace___main___rarg___lambda__1), 3, 2); lean_closure_set(x_22, 0, x_8); lean_closure_set(x_22, 1, x_14); lean_inc(x_9); @@ -1280,7 +1247,7 @@ lean_inc(x_17); lean_inc(x_3); x_18 = lean_apply_1(x_3, x_16); lean_inc(x_17); -x_19 = lean_alloc_closure((void*)(l_Lean_WHNF_reduceRec___rarg___lambda__3), 14, 13); +x_19 = lean_alloc_closure((void*)(l_Lean_WHNF_reduceRec___rarg___lambda__2), 14, 13); lean_closure_set(x_19, 0, x_6); lean_closure_set(x_19, 1, x_9); lean_closure_set(x_19, 2, x_7);