diff --git a/stage0/src/Lean/Elab/Command.lean b/stage0/src/Lean/Elab/Command.lean index 75ef3fb207..08f28f8872 100644 --- a/stage0/src/Lean/Elab/Command.lean +++ b/stage0/src/Lean/Elab/Command.lean @@ -544,44 +544,58 @@ fun stx => withoutModifyingEnv do let n := `_eval; ctx ← read; env ← getEnv; - let addAndCompile := fun value => do { + let addAndCompile (value : Expr) : TermElabM Unit := do { type ← Term.inferType ref value; let decl := Declaration.defnDecl { name := n, lparams := [], type := type, value := value, hints := ReducibilityHints.opaque, isUnsafe := true }; Term.addDecl ref decl; Term.compileDecl ref decl }; - act ← runTermElabM (some n) fun _ => do { - e ← Term.elabTerm term none; - Term.synthesizeSyntheticMVars false; - if env.contains `Lean.MetaHasEval then do - -- modify `e` to `fun env opts => MetaHasEval.eval (hideUnit := false) env opts e` - e ← Term.withLocalDecl ref `env BinderInfo.default (mkConst `Lean.Environment) fun env => - Term.withLocalDecl ref `opts BinderInfo.default (mkConst `Lean.Options) fun opts => do { - e ← Term.mkAppM ref `Lean.MetaHasEval.eval #[env, opts, e, toExpr false]; - Term.mkLambda ref #[env, opts] e - }; - addAndCompile e; - env ← Term.getEnv; - opts ← Term.getOptions; - match env.evalConst (Environment → Options → IO Unit) n with - | Except.error e => Term.throwError ref e - | Except.ok act => pure $ act env opts - else do - -- fall back to non-meta eval if MetaHasEval hasn't been defined yet - -- modify e to `HasEval.eval (hideUnit := false) e` + let elabMetaEval : CommandElabM Unit := do { + act : IO Environment ← runTermElabM (some n) fun _ => do { + e ← Term.elabTerm term none; + Term.synthesizeSyntheticMVars false; + e ← Term.withLocalDecl ref `env BinderInfo.default (mkConst `Lean.Environment) fun env => + Term.withLocalDecl ref `opts BinderInfo.default (mkConst `Lean.Options) fun opts => do { + e ← Term.mkAppM ref `Lean.MetaHasEval.eval #[env, opts, e, toExpr false]; + Term.mkLambda ref #[env, opts] e + }; + addAndCompile e; + env ← Term.getEnv; + opts ← Term.getOptions; + match env.evalConst (Environment → Options → IO Environment) n with + | Except.error e => Term.throwError ref e + | Except.ok act => pure $ act env opts + }; + (out, res) ← liftIO ref $ IO.Prim.withIsolatedStreams act; + logInfo ref out; + match res with + | Except.error e => throw $ Exception.error $ ioErrorToMessage ctx ref e + | Except.ok env => do setEnv env; pure () + }; + let elabEval : CommandElabM Unit := do { + -- fall back to non-meta eval if MetaHasEval hasn't been defined yet + -- modify e to `HasEval.eval (hideUnit := false) e` + act : IO Unit ← runTermElabM (some n) fun _ => do { + e ← Term.elabTerm term none; + Term.synthesizeSyntheticMVars false; e ← Term.mkAppM ref `Lean.HasEval.eval #[e, toExpr false]; addAndCompile e; env ← Term.getEnv; match env.evalConst (IO Unit) n with | Except.error e => Term.throwError ref e | Except.ok act => pure act + }; + (out, res) ← liftIO ref $ IO.Prim.withIsolatedStreams act; + logInfo ref out; + match res with + | Except.error e => throw $ Exception.error $ ioErrorToMessage ctx ref e + | Except.ok _ => pure () }; - (out, res) ← liftIO ref $ IO.Prim.withIsolatedStreams act; - logInfo ref out; - match res with - | Except.error e => throw $ Exception.error $ ioErrorToMessage ctx ref e - | Except.ok _ => pure () + if env.contains `Lean.MetaHasEval then do + elabMetaEval + else + elabEval @[builtinCommandElab «eval», implementedBy elabEvalUnsafe] constant elabEval : CommandElab := arbitrary _ diff --git a/stage0/src/Lean/Eval.lean b/stage0/src/Lean/Eval.lean index 60c538d1e2..aadb64fc76 100644 --- a/stage0/src/Lean/Eval.lean +++ b/stage0/src/Lean/Eval.lean @@ -13,10 +13,10 @@ universe u The basic `HasEval` class is in the prelude and should not depend on these types. -/ class MetaHasEval (α : Type u) := -(eval : Environment → Options → α → forall (hideUnit : optParam Bool true), IO Unit) +(eval : Environment → Options → α → forall (hideUnit : optParam Bool true), IO Environment) instance metaHasEvalOfHasEval {α : Type u} [HasEval α] : MetaHasEval α := -⟨fun env opts a hideUnit => HasEval.eval a hideUnit⟩ +⟨fun env opts a hideUnit => do HasEval.eval a hideUnit; pure env⟩ abbrev MetaIO := ReaderT (Environment × Options) IO @@ -27,7 +27,9 @@ def MetaIO.getOptions : MetaIO Options := do ctx ← read; pure ctx.2 instance MetaIO.metaHasEval {α} [MetaHasEval α] : MetaHasEval (MetaIO α) := -⟨fun env opts x _ => x (env, opts) >>= MetaHasEval.eval env opts⟩ +⟨fun env opts x _ => do + a ← x (env, opts); + MetaHasEval.eval env opts a⟩ instance MetaIO.monadIO : MonadIO MetaIO := {} diff --git a/stage0/src/Lean/Expr.lean b/stage0/src/Lean/Expr.lean index d8420da3d9..49ec3aa07b 100644 --- a/stage0/src/Lean/Expr.lean +++ b/stage0/src/Lean/Expr.lean @@ -635,6 +635,12 @@ constant abstract (e : @& Expr) (xs : @& Array Expr) : Expr := arbitrary _ @[extern "lean_expr_abstract_range"] constant abstractRange (e : @& Expr) (n : @& Nat) (xs : @& Array Expr) : Expr := arbitrary _ +def replaceFVar (e : Expr) (fvar : Expr) (v : Expr) : Expr := +(e.abstract #[fvar]).instantiate1 v + +def replaceFVarId (e : Expr) (fvarId : FVarId) (v : Expr) : Expr := +replaceFVar e (mkFVar fvarId) v + instance : HasToString Expr := ⟨Expr.dbgToString⟩ diff --git a/stage0/src/Lean/Meta/AppBuilder.lean b/stage0/src/Lean/Meta/AppBuilder.lean index 5d099b9d7a..b76a26f481 100644 --- a/stage0/src/Lean/Meta/AppBuilder.lean +++ b/stage0/src/Lean/Meta/AppBuilder.lean @@ -47,13 +47,16 @@ private def infer (h : Expr) : MetaM Expr := do hType ← inferType h; whnfD hType +private def hasTypeMsg (e type : Expr) : MessageData := +indentExpr e ++ Format.line ++ "has type" ++ indentExpr type + def mkEqSymm (h : Expr) : MetaM Expr := if h.isAppOf `Eq.refl then pure h else do hType ← infer h; match hType.eq? with | some (α, a, b) => do u ← getLevel α; pure $ mkApp4 (mkConst `Eq.symm [u]) α a b h - | none => throwEx $ Exception.appBuilder `Eq.symm "equality proof expected" #[h] + | none => throwEx $ Exception.appBuilder `Eq.symm ("equality proof expected" ++ hasTypeMsg h hType) def mkEqTrans (h₁ h₂ : Expr) : MetaM Expr := if h₁.isAppOf `Eq.refl then pure h₂ @@ -64,7 +67,8 @@ else do match hType₁.eq?, hType₂.eq? with | some (α, a, b), some (_, _, c) => do u ← getLevel α; pure $ mkApp6 (mkConst `Eq.trans [u]) α a b c h₁ h₂ - | _, _ => throwEx $ Exception.appBuilder `Eq.trans "equality proof expected" #[h₁, h₂] + | none, _ => throwEx $ Exception.appBuilder `Eq.trans ("equality proof expected" ++ hasTypeMsg h₁ hType₁) + | _, none => throwEx $ Exception.appBuilder `Eq.trans ("equality proof expected" ++ hasTypeMsg h₂ hType₂) def mkHEqSymm (h : Expr) : MetaM Expr := if h.isAppOf `HEq.refl then pure h @@ -72,7 +76,7 @@ else do hType ← infer h; match hType.heq? with | some (α, a, β, b) => do u ← getLevel α; pure $ mkApp5 (mkConst `HEq.symm [u]) α β a b h - | none => throwEx $ Exception.appBuilder `HEq.symm "heterogeneous equality proof expected" #[h] + | none => throwEx $ Exception.appBuilder `HEq.symm ("heterogeneous equality proof expected" ++ hasTypeMsg h hType) def mkHEqTrans (h₁ h₂ : Expr) : MetaM Expr := if h₁.isAppOf `HEq.refl then pure h₂ @@ -83,17 +87,19 @@ else do match hType₁.heq?, hType₂.heq? with | some (α, a, β, b), some (_, _, γ, c) => do u ← getLevel α; pure $ mkApp8 (mkConst `HEq.trans [u]) α β γ a b c h₁ h₂ - | _, _ => throwEx $ Exception.appBuilder `HEq.trans "heterogeneous equality proof expected" #[h₁, h₂] + | none, _ => throwEx $ Exception.appBuilder `HEq.trans ("heterogeneous equality proof expected" ++ hasTypeMsg h₁ hType₁) + | _, none => throwEx $ Exception.appBuilder `HEq.trans ("heterogeneous equality proof expected" ++ hasTypeMsg h₂ hType₂) def mkEqOfHEq (h : Expr) : MetaM Expr := do hType ← infer h; match hType.heq? with | some (α, a, β, b) => do - unlessM (isDefEq α β) $ throwEx $ Exception.appBuilder `eqOfHEq "heterogeneous equality types are not definitionally equal" #[α, β]; + unlessM (isDefEq α β) $ throwEx $ Exception.appBuilder `eqOfHEq + ("heterogeneous equality types are not definitionally equal" ++ indentExpr α ++ Format.line ++ "is not definitionally equal to" ++ indentExpr β); u ← getLevel α; pure $ mkApp4 (mkConst `eqOfHEq [u]) α a b h | _ => - throwEx $ Exception.appBuilder `HEq.trans "heterogeneous equality proof expected" #[h] + throwEx $ Exception.appBuilder `HEq.trans ("heterogeneous equality proof expected" ++ indentExpr h) def mkCongrArg (f h : Expr) : MetaM Expr := do hType ← infer h; @@ -101,8 +107,8 @@ fType ← infer f; match fType.arrow?, hType.eq? with | some (α, β), some (_, a, b) => do u ← getLevel α; v ← getLevel β; pure $ mkApp6 (mkConst `congrArg [u, v]) α β a b f h -| none, _ => throwEx $ Exception.appBuilder `congrArg "non-dependent function expected" #[f, h] -| _, none => throwEx $ Exception.appBuilder `congrArg "equality proof expected" #[f, h] +| none, _ => throwEx $ Exception.appBuilder `congrArg ("non-dependent function expected" ++ hasTypeMsg f fType) +| _, none => throwEx $ Exception.appBuilder `congrArg ("equality proof expected" ++ hasTypeMsg h hType) def mkCongrFun (h a : Expr) : MetaM Expr := do hType ← infer h; @@ -115,8 +121,8 @@ match hType.eq? with u ← getLevel α; v ← getLevel (mkApp β' a); pure $ mkApp6 (mkConst `congrFun [u, v]) α β' f g h a - | _ => throwEx $ Exception.appBuilder `congrFun "equality proof between functions expected" #[h, a] -| _ => throwEx $ Exception.appBuilder `congrFun "equality proof expected" #[h, a] + | _ => throwEx $ Exception.appBuilder `congrFun ("equality proof between functions expected" ++ hasTypeMsg h hType) +| _ => throwEx $ Exception.appBuilder `congrFun ("equality proof expected" ++ hasTypeMsg h hType) def mkCongr (h₁ h₂ : Expr) : MetaM Expr := do hType₁ ← infer h₁; @@ -129,8 +135,9 @@ match hType₁.eq?, hType₂.eq? with u ← getLevel α; v ← getLevel β; pure $ mkApp8 (mkConst `congr [u, v]) α β f g a b h₁ h₂ - | _ => throwEx $ Exception.appBuilder `congr "non-dependent function expected" #[h₁, h₂] -| _, _ => throwEx $ Exception.appBuilder `congr "equality proof expected" #[h₁, h₂] + | _ => throwEx $ Exception.appBuilder `congr ("non-dependent function expected" ++ hasTypeMsg h₁ hType₁) +| none, _ => throwEx $ Exception.appBuilder `congr ("equality proof expected" ++ hasTypeMsg h₁ hType₁) +| _, none => throwEx $ Exception.appBuilder `congr ("equality proof expected" ++ hasTypeMsg h₂ hType₂) private def mkAppMFinal (methodName : Name) (f : Expr) (args : Array Expr) (instMVars : Array MVarId) : MetaM Expr := do instMVars.forM $ fun mvarId => do { @@ -139,7 +146,7 @@ instMVars.forM $ fun mvarId => do { assignExprMVar mvarId mvarVal }; result ← instantiateMVars (mkAppN f args); -whenM (hasAssignableMVar result) $ throwEx $ Exception.appBuilder methodName "result contains metavariables" #[result]; +whenM (hasAssignableMVar result) $ throwEx $ Exception.appBuilder methodName ("result contains metavariables" ++ indentExpr result); pure result private partial def mkAppMAux (f : Expr) (xs : Array Expr) : Nat → Array Expr → Nat → Array MVarId → Expr → MetaM Expr @@ -165,7 +172,7 @@ private partial def mkAppMAux (f : Expr) (xs : Array Expr) : Nat → Array Expr else if i == xs.size then mkAppMFinal `mkAppM f args instMVars else - throwEx $ Exception.appBuilder `mkAppM "too many explicit arguments provided" (#[f] ++ xs) + throwEx $ Exception.appBuilder `mkAppM ("too many explicit arguments provided to" ++ indentExpr f ++ Format.line ++ "arguments" ++ xs) private def mkFun (constName : Name) : MetaM (Expr × Expr) := do cinfo ← getConstInfo constName; @@ -204,7 +211,7 @@ private partial def mkAppOptMAux (f : Expr) (xs : Array (Option Expr)) : Nat → mkAppMFinal `mkAppOptM f args instMVars else do let xs : Array Expr := xs.foldl (fun r x? => match x? with | none => r | some x => r.push x) #[]; - throwEx $ Exception.appBuilder `mkAppOptM "too many arguments provided" (#[f] ++ xs) + throwEx $ Exception.appBuilder `mkAppOptM ("too many arguments provided to" ++ indentExpr f ++ Format.line ++ "arguments" ++ xs) /-- Similar to `mkAppM`, but it allows us to specify which arguments are provided explicitly using `Option` type. @@ -230,28 +237,28 @@ if h2.isAppOf `Eq.refl then pure h1 else do h2Type ← infer h2; match h2Type.eq? with - | none => throwEx $ Exception.appBuilder `Eq.ndrec "equality proof expected" #[h2] + | none => throwEx $ Exception.appBuilder `Eq.ndrec ("equality proof expected" ++ hasTypeMsg h2 h2Type) | some (α, a, b) => do u2 ← getLevel α; motiveType ← infer motive; match motiveType with | Expr.forallE _ _ (Expr.sort u1 _) _ => pure $ mkAppN (mkConst `Eq.ndrec [u1, u2]) #[α, a, motive, h1, b, h2] - | _ => throwEx $ Exception.appBuilder `Eq.ndrec "invalid motive" #[motive] + | _ => throwEx $ Exception.appBuilder `Eq.ndrec ("invalid motive" ++ indentExpr motive) def mkEqRec (motive h1 h2 : Expr) : MetaM Expr := if h2.isAppOf `Eq.refl then pure h1 else do h2Type ← infer h2; match h2Type.eq? with - | none => throwEx $ Exception.appBuilder `Eq.rec "equality proof expected" #[h2] + | none => throwEx $ Exception.appBuilder `Eq.rec ("equality proof expected" ++ indentExpr h2) | some (α, a, b) => do u2 ← getLevel α; motiveType ← infer motive; match motiveType with | Expr.forallE _ _ (Expr.forallE _ _ (Expr.sort u1 _) _) _ => pure $ mkAppN (mkConst `Eq.rec [u1, u2]) #[α, a, motive, h1, b, h2] - | _ => throwEx $ Exception.appBuilder `Eq.rec "invalid motive" #[motive] + | _ => throwEx $ Exception.appBuilder `Eq.rec ("invalid motive" ++ indentExpr motive) def mkEqMP (eqProof pr : Expr) : MetaM Expr := mkAppM `Eq.mp #[eqProof, pr] @@ -263,17 +270,17 @@ def mkNoConfusion (target : Expr) (h : Expr) : MetaM Expr := do type ← inferType h; type ← whnf type; match type.eq? with -| none => throwEx $ Exception.appBuilder `noConfusion "equality expected" #[h] +| none => throwEx $ Exception.appBuilder `noConfusion ("equality expected" ++ hasTypeMsg h type) | some (α, a, b) => do α ← whnf α; env ← getEnv; let f := α.getAppFn; - matchConst env f (fun _ => throwEx $ Exception.appBuilder `noConfusion "inductive type expected" #[α]) $ fun cinfo us => + matchConst env f (fun _ => throwEx $ Exception.appBuilder `noConfusion ("inductive type expected" ++ indentExpr α)) $ fun cinfo us => match cinfo with | ConstantInfo.inductInfo v => do u ← getLevel target; pure $ mkAppN (mkConst (mkNameStr v.name "noConfusion") (u :: us)) (α.getAppArgs ++ #[target, a, b, h]) - | _ => throwEx $ Exception.appBuilder `noConfusion "inductive type expected" #[α] + | _ => throwEx $ Exception.appBuilder `noConfusion ("inductive type expected" ++ indentExpr α) def mkPure (m : Expr) (e : Expr) : MetaM Expr := do mkAppOptM `HasPure.pure #[m, none, none, e] @@ -288,7 +295,7 @@ partial def mkProjection : Expr → Name → MetaM Expr match type.getAppFn with | Expr.const structName us _ => do env ← getEnv; - unless (isStructureLike env structName) $ throwEx $ Exception.appBuilder `mkProjectionn "structure expected" #[s]; + unless (isStructureLike env structName) $ throwEx $ Exception.appBuilder `mkProjectionn ("structure expected" ++ hasTypeMsg s type); match getProjFnForField? env structName fieldName with | some projFn => let params := type.getAppArgs; @@ -306,8 +313,32 @@ partial def mkProjection : Expr → Name → MetaM Expr }; match r? with | some r => pure r - | none => throwEx $ Exception.appBuilder `mkProjectionn ("invalid field name '" ++ toString fieldName ++ "'") #[s] - | _ => throwEx $ Exception.appBuilder `mkProjectionn "structure expected" #[s] + | none => throwEx $ Exception.appBuilder `mkProjectionn ("invalid field name '" ++ toString fieldName ++ "' for" ++ hasTypeMsg s type) + | _ => throwEx $ Exception.appBuilder `mkProjectionn ("structure expected" ++ hasTypeMsg s type) + +private def mkListLitAux (nil : Expr) (cons : Expr) : List Expr → Expr +| [] => nil +| x::xs => mkApp (mkApp cons x) (mkListLitAux xs) + +private def getDecLevel (methodName : Name) (type : Expr) : MetaM Level := do +u ← getLevel type; +match u.dec with +| none => throwEx $ Exception.appBuilder methodName ("invalid universe level, " ++ toString u ++ " is not greater than 0" ++ indentExpr type) +| some u => pure u + +def mkListLit (type : Expr) (xs : List Expr) : MetaM Expr := do +u ← getDecLevel `mkListLit type; +let nil := mkApp (mkConst `List.nil [u]) type; +match xs with +| [] => pure nil +| _ => + let cons := mkApp (mkConst `List.cons [u]) type; + pure $ mkListLitAux nil cons xs + +def mkArrayLit (type : Expr) (xs : List Expr) : MetaM Expr := do +u ← getDecLevel `mkArrayLit type; +listLit ← mkListLit type xs; +pure (mkApp (mkApp (mkConst `List.toArray [u]) type) listLit) end Meta end Lean diff --git a/stage0/src/Lean/Meta/Basic.lean b/stage0/src/Lean/Meta/Basic.lean index f365f5fcf0..9dfe5d8475 100644 --- a/stage0/src/Lean/Meta/Basic.lean +++ b/stage0/src/Lean/Meta/Basic.lean @@ -783,6 +783,23 @@ let fvar := mkFVar fvarId; adaptReader (fun (ctx : Context) => { ctx with lctx := lctx }) $ withNewFVar fvar type k +def withExistingLocalDecls {α} (decls : List LocalDecl) (k : MetaM α) : MetaM α := do +ctx ← read; +let numLocalInstances := ctx.localInstances.size; +let lctx := decls.foldl (fun (lctx : LocalContext) decl => lctx.addDecl decl) ctx.lctx; +adaptReader (fun (ctx : Context) => { ctx with lctx := lctx }) do + newLocalInsts ← decls.foldlM + (fun (newlocalInsts : Array LocalInstance) (decl : LocalDecl) => do + c? ← isClass decl.type; + match c? with + | none => pure newlocalInsts + | some c => pure $ newlocalInsts.push { className := c, fvar := decl.toExpr }) + ctx.localInstances; + if newLocalInsts.size == numLocalInstances then + k + else + resettingSynthInstanceCache $ adaptReader (fun (ctx : Context) => { ctx with localInstances := newLocalInsts }) k + /-- Save cache and `MetavarContext`, bump the `MetavarContext` depth, execute `x`, and restore saved data. -/ diff --git a/stage0/src/Lean/Meta/Exception.lean b/stage0/src/Lean/Meta/Exception.lean index efdcc5fbf6..47ad40443c 100644 --- a/stage0/src/Lean/Meta/Exception.lean +++ b/stage0/src/Lean/Meta/Exception.lean @@ -33,13 +33,13 @@ inductive Exception | letTypeMismatch (fvarId : FVarId) (ctx : ExceptionContext) | appTypeMismatch (f a : Expr) (ctx : ExceptionContext) | notInstance (e : Expr) (ctx : ExceptionContext) -| appBuilder (op : Name) (msg : String) (args : Array Expr) (ctx : ExceptionContext) +| appBuilder (op : Name) (msg : MessageData) (ctx : ExceptionContext) | synthInstance (inst : Expr) (ctx : ExceptionContext) | tactic (tacticName : Name) (mvarId : MVarId) (msg : MessageData) (ctx : ExceptionContext) | generalizeTelescope (es : Array Expr) (ctx : ExceptionContext) | kernel (ex : KernelException) (opts : Options) | bug (b : Bug) (ctx : ExceptionContext) -| other (msg : String) +| other (msg : MessageData) namespace Exception instance : Inhabited Exception := ⟨other ""⟩ @@ -62,13 +62,13 @@ def toStr : Exception → String | letTypeMismatch _ _ => "type mismatch at let-expression" | appTypeMismatch _ _ _ => "application type mismatch" | notInstance _ _ => "type class instance expected" -| appBuilder _ _ _ _ => "application builder failure" +| appBuilder _ _ _ => "application builder failure" | synthInstance _ _ => "type class instance synthesis failed" | tactic tacName _ _ _ => "tactic '" ++ toString tacName ++ "' failed" | generalizeTelescope _ _ => "generalize telescope" | kernel _ _ => "kernel exception" | bug _ _ => "bug" -| other s => s +| other s => toString $ fmt s instance : HasToString Exception := ⟨toStr⟩ @@ -93,7 +93,7 @@ def toTraceMessageData : Exception → MessageData | letTypeMismatch fvarId ctx => mkCtx ctx $ `letTypeMismatch ++ " " ++ mkFVar fvarId | appTypeMismatch f a ctx => mkCtx ctx $ `appTypeMismatch ++ " " ++ mkApp f a | notInstance i ctx => mkCtx ctx $ `notInstance ++ " " ++ i -| appBuilder op msg args ctx => mkCtx ctx $ `appBuilder ++ " " ++ op ++ " " ++ args ++ " " ++ msg +| appBuilder op msg ctx => mkCtx ctx $ `appBuilder ++ " " ++ op ++ " " ++ msg | synthInstance inst ctx => mkCtx ctx $ `synthInstance ++ " " ++ inst | tactic tacName mvarId msg ctx => mkCtx ctx $ `tacticFailure ++ " " ++ tacName ++ " " ++ msg | generalizeTelescope es ctx => mkCtx ctx $ `generalizeTelescope ++ " " ++ es diff --git a/stage0/src/Lean/Meta/Message.lean b/stage0/src/Lean/Meta/Message.lean index 074dc03e2f..a6f2e9c5ad 100644 --- a/stage0/src/Lean/Meta/Message.lean +++ b/stage0/src/Lean/Meta/Message.lean @@ -71,7 +71,7 @@ def toMessageData : Exception → MessageData | letTypeMismatch fvarId ctx => mkLetTypeMismatchMessage fvarId ctx | appTypeMismatch f a ctx => mkAppTypeMismatchMessage f a ctx | notInstance i ctx => mkCtx ctx $ "not a type class instance " ++ i -| appBuilder op msg args ctx => mkCtx ctx $ "application builder failure " ++ op ++ " " ++ args ++ " " ++ msg +| appBuilder op msg ctx => mkCtx ctx $ "application builder failure " ++ op ++ " " ++ msg | synthInstance inst ctx => mkCtx ctx $ "failed to synthesize" ++ indentExpr inst | tactic tacName mvarId msg ctx => mkCtx ctx $ "tactic '" ++ tacName ++ "' failed, " ++ msg ++ Format.line ++ MessageData.ofGoal mvarId | generalizeTelescope es ctx => mkCtx ctx $ "failed to create telescope generalizing " ++ es diff --git a/stage0/src/Lean/Meta/Tactic/Subst.lean b/stage0/src/Lean/Meta/Tactic/Subst.lean index 5919d7650f..1b96253852 100644 --- a/stage0/src/Lean/Meta/Tactic/Subst.lean +++ b/stage0/src/Lean/Meta/Tactic/Subst.lean @@ -66,9 +66,9 @@ withMVarContext mvarId $ do pure (fvarSubst, mvarId) }; if depElim then do - let newType := (type.abstract #[a]).instantiate1 b; + let newType := type.replaceFVar a b; reflB ← mkEqRefl b; - let newType := (newType.abstract #[h]).instantiate1 reflB; + let newType := newType.replaceFVar h reflB; if symm then do motive ← mkLambda #[a, h] type; continue motive newType @@ -82,13 +82,13 @@ withMVarContext mvarId $ do motive ← withLocalDecl `_h hAuxType BinderInfo.default $ fun hAux => do { hAuxSymm ← mkEqSymm hAux; /- replace h in type with hAuxSymm -/ - let newType := (type.abstract #[h]).instantiate1 hAuxSymm; + let newType := type.replaceFVar h hAuxSymm; mkLambda #[a, hAux] newType }; continue motive newType else do motive ← mkLambda #[a] type; - let newType := (type.abstract #[a]).instantiate1 b; + let newType := type.replaceFVar a b; continue motive newType | _ => throwTacticEx `subst mvarId $ diff --git a/stage0/src/Lean/Util/CollectLevelParams.lean b/stage0/src/Lean/Util/CollectLevelParams.lean index 810ee32bfd..2b417436fc 100644 --- a/stage0/src/Lean/Util/CollectLevelParams.lean +++ b/stage0/src/Lean/Util/CollectLevelParams.lean @@ -47,6 +47,15 @@ partial def main : Expr → Visitor | Expr.sort u _ => visitLevel collect u | _ => id +private partial def getUnusedLevelParamAux (s : CollectLevelParams.State) (pre : Name) : Nat → Level +| i => + let v := mkLevelParam (pre.appendIndexAfter i); + if s.visitedLevel.contains v then getUnusedLevelParamAux (i+1) else v + +def State.getUnusedLevelParam (s : CollectLevelParams.State) (pre : Name := `v) : Level := +let v := mkLevelParam pre; +if s.visitedLevel.contains v then getUnusedLevelParamAux s pre 1 else v + end CollectLevelParams def collectLevelParams (s : CollectLevelParams.State) (e : Expr) : CollectLevelParams.State := diff --git a/stage0/src/frontends/lean/builtin_cmds.cpp b/stage0/src/frontends/lean/builtin_cmds.cpp index 371cd9b343..4619072314 100644 --- a/stage0/src/frontends/lean/builtin_cmds.cpp +++ b/stage0/src/frontends/lean/builtin_cmds.cpp @@ -411,8 +411,12 @@ static environment eval_cmd(parser & p) { msg << string_to_std(str); msg.report(); dec_ref(str); + return p.env(); + } else if (meta_eval_instance) { + return environment(io_result_get_value(r.raw()), true); + } else { + return p.env(); } - return p.env(); } environment compact_tst_cmd(parser & p) { diff --git a/stage0/stdlib/Lean/Delaborator.c b/stage0/stdlib/Lean/Delaborator.c index b3edc42c88..ed4a5ba499 100644 --- a/stage0/stdlib/Lean/Delaborator.c +++ b/stage0/stdlib/Lean/Delaborator.c @@ -53,6 +53,7 @@ lean_object* l_Lean_Expr_bindingDomain_x21(lean_object*); extern lean_object* l_Lean_Parser_Term_explicit___elambda__1___closed__1; uint8_t l_Lean_getPPCoercions(lean_object*); lean_object* l_Array_umapMAux___main___at_Lean_Delaborator_delabLam___spec__1(lean_object*, lean_object*); +lean_object* l_Lean_Delaborator_delab___closed__3; lean_object* l___regBuiltin_Lean_Delaborator_delabCoeFun(lean_object*); lean_object* l_Lean_Delaborator_delab(lean_object*, lean_object*, lean_object*); uint8_t lean_name_eq(lean_object*, lean_object*); @@ -106,7 +107,6 @@ lean_object* lean_array_push(lean_object*, lean_object*); lean_object* l_Lean_Delaborator_getExprKind___closed__21; lean_object* lean_array_get_size(lean_object*); extern lean_object* l_Lean_Parser_Term_depArrow___elambda__1___closed__2; -lean_object* lean_string_append(lean_object*, lean_object*); lean_object* l_Lean_Delaborator_getExprKind___closed__8; lean_object* l_Lean_Level_quote___main___closed__3; lean_object* l_Lean_Delaborator_getExprKind___closed__17; @@ -198,6 +198,7 @@ extern lean_object* l_Lean_Parser_Term_instBinder___elambda__1___closed__2; lean_object* l_Lean_Level_quote___main___closed__1; lean_object* l_Lean_Delaborator_mkDelabAttribute___closed__5; lean_object* l_Lean_Level_quote___main___lambda__4___closed__1; +lean_object* l_Lean_Delaborator_delab___closed__2; lean_object* l_Lean_Delaborator_delabOfNat___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Delaborator_whenPPOption(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___regBuiltin_Lean_Delaborator_delabAppExplicit(lean_object*); @@ -211,6 +212,7 @@ lean_object* l_Lean_Expr_fvarId_x21(lean_object*); lean_object* l_Lean_Delaborator_delabAppImplicit___lambda__3___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_array_fset(lean_object*, lean_object*, lean_object*); lean_object* l_Std_mkHashMapImp___rarg(lean_object*); +extern lean_object* l_Lean_Elab_Term_mkConst___closed__4; lean_object* l_Lean_Delaborator_delabSort___closed__5; lean_object* l___regBuiltin_Lean_Delaborator_delabProjectionApp___closed__1; extern lean_object* l_Lean_Unhygienic_MonadQuotation___closed__4; @@ -229,7 +231,6 @@ lean_object* l_Lean_Delaborator_delabAppImplicit___closed__5; extern lean_object* l_Std_PersistentArray_Stats_toString___closed__4; size_t l_Lean_Name_hash(lean_object*); lean_object* l_Nat_repr(lean_object*); -extern lean_object* l_Char_HasRepr___closed__1; uint8_t l_Lean_LocalDecl_binderInfo(lean_object*); extern lean_object* l_Lean_Level_LevelToFormat_Result_format___main___closed__5; extern lean_object* l_Lean_Elab_Term_expandCDot_x3f___closed__3; @@ -7684,10 +7685,30 @@ x_1 = lean_mk_string("don't know how to delaborate '"); return x_1; } } +lean_object* _init_l_Lean_Delaborator_delab___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Delaborator_delab___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_Delaborator_delab___closed__3() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Delaborator_delab___closed__2; +x_2 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} lean_object* l_Lean_Delaborator_delab(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; lean_object* x_13; lean_object* x_14; lean_object* x_15; +lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; x_4 = l_Lean_Delaborator_getExprKind(x_1, x_2, x_3); x_5 = lean_ctor_get(x_4, 0); lean_inc(x_5); @@ -7700,120 +7721,127 @@ lean_dec(x_5); x_8 = l_Lean_Name_toString___closed__1; lean_inc(x_7); x_9 = l_Lean_Name_toStringWithSep___main(x_8, x_7); -x_10 = l_Lean_Delaborator_delab___closed__1; -x_11 = lean_string_append(x_10, x_9); -lean_dec(x_9); -x_12 = l_Char_HasRepr___closed__1; -x_13 = lean_string_append(x_11, x_12); -x_14 = lean_alloc_ctor(22, 1, 0); -lean_ctor_set(x_14, 0, x_13); -x_15 = l_Lean_Delaborator_delabFor___main(x_7, x_1, x_2, x_6); -if (lean_obj_tag(x_15) == 0) -{ -lean_object* x_16; -x_16 = lean_ctor_get(x_15, 0); -lean_inc(x_16); -if (lean_obj_tag(x_16) == 0) -{ -uint8_t x_17; -x_17 = !lean_is_exclusive(x_15); -if (x_17 == 0) +x_10 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_10, 0, x_9); +x_11 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_11, 0, x_10); +x_12 = l_Lean_Delaborator_delab___closed__3; +x_13 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_13, 0, x_12); +lean_ctor_set(x_13, 1, x_11); +x_14 = l_Lean_Elab_Term_mkConst___closed__4; +x_15 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_15, 0, x_13); +lean_ctor_set(x_15, 1, x_14); +x_16 = lean_alloc_ctor(22, 1, 0); +lean_ctor_set(x_16, 0, x_15); +x_17 = l_Lean_Delaborator_delabFor___main(x_7, x_1, x_2, x_6); +if (lean_obj_tag(x_17) == 0) { lean_object* x_18; -x_18 = lean_ctor_get(x_15, 0); -lean_dec(x_18); -lean_ctor_set_tag(x_15, 1); -lean_ctor_set(x_15, 0, x_14); -return x_15; +x_18 = lean_ctor_get(x_17, 0); +lean_inc(x_18); +if (lean_obj_tag(x_18) == 0) +{ +uint8_t x_19; +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); +lean_ctor_set_tag(x_17, 1); +lean_ctor_set(x_17, 0, x_16); +return x_17; } else { -lean_object* x_19; lean_object* x_20; -x_19 = lean_ctor_get(x_15, 1); -lean_inc(x_19); -lean_dec(x_15); -x_20 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_20, 0, x_14); -lean_ctor_set(x_20, 1, x_19); -return x_20; +lean_object* x_21; lean_object* x_22; +x_21 = lean_ctor_get(x_17, 1); +lean_inc(x_21); +lean_dec(x_17); +x_22 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_22, 0, x_16); +lean_ctor_set(x_22, 1, x_21); +return x_22; } } else { -uint8_t x_21; -lean_dec(x_14); -x_21 = !lean_is_exclusive(x_15); -if (x_21 == 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); +uint8_t x_23; +lean_dec(x_16); +x_23 = !lean_is_exclusive(x_17); if (x_23 == 0) { -return x_15; +lean_object* x_24; uint8_t x_25; +x_24 = lean_ctor_get(x_17, 0); +lean_dec(x_24); +x_25 = !lean_is_exclusive(x_18); +if (x_25 == 0) +{ +return x_17; } else { -lean_object* x_24; lean_object* x_25; -x_24 = lean_ctor_get(x_16, 0); -lean_inc(x_24); -lean_dec(x_16); -x_25 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_25, 0, x_24); -lean_ctor_set(x_15, 0, x_25); -return x_15; -} -} -else -{ -lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; -x_26 = lean_ctor_get(x_15, 1); +lean_object* x_26; lean_object* x_27; +x_26 = lean_ctor_get(x_18, 0); lean_inc(x_26); -lean_dec(x_15); -x_27 = lean_ctor_get(x_16, 0); -lean_inc(x_27); -if (lean_is_exclusive(x_16)) { - lean_ctor_release(x_16, 0); - x_28 = x_16; -} else { - lean_dec_ref(x_16); - x_28 = lean_box(0); +lean_dec(x_18); +x_27 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_27, 0, x_26); +lean_ctor_set(x_17, 0, x_27); +return x_17; } -if (lean_is_scalar(x_28)) { - x_29 = lean_alloc_ctor(1, 1, 0); -} else { - x_29 = x_28; } -lean_ctor_set(x_29, 0, x_27); -x_30 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_30, 0, x_29); -lean_ctor_set(x_30, 1, x_26); -return x_30; +else +{ +lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; +x_28 = lean_ctor_get(x_17, 1); +lean_inc(x_28); +lean_dec(x_17); +x_29 = lean_ctor_get(x_18, 0); +lean_inc(x_29); +if (lean_is_exclusive(x_18)) { + lean_ctor_release(x_18, 0); + x_30 = x_18; +} else { + lean_dec_ref(x_18); + x_30 = lean_box(0); +} +if (lean_is_scalar(x_30)) { + x_31 = lean_alloc_ctor(1, 1, 0); +} else { + x_31 = x_30; +} +lean_ctor_set(x_31, 0, x_29); +x_32 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_32, 0, x_31); +lean_ctor_set(x_32, 1, x_28); +return x_32; } } } else { -uint8_t x_31; -lean_dec(x_14); -x_31 = !lean_is_exclusive(x_15); -if (x_31 == 0) +uint8_t x_33; +lean_dec(x_16); +x_33 = !lean_is_exclusive(x_17); +if (x_33 == 0) { -return x_15; +return x_17; } else { -lean_object* x_32; lean_object* x_33; lean_object* x_34; -x_32 = lean_ctor_get(x_15, 0); -x_33 = lean_ctor_get(x_15, 1); -lean_inc(x_33); -lean_inc(x_32); -lean_dec(x_15); -x_34 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_34, 0, x_32); -lean_ctor_set(x_34, 1, x_33); -return x_34; +lean_object* x_34; lean_object* x_35; lean_object* x_36; +x_34 = lean_ctor_get(x_17, 0); +x_35 = lean_ctor_get(x_17, 1); +lean_inc(x_35); +lean_inc(x_34); +lean_dec(x_17); +x_36 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_36, 0, x_34); +lean_ctor_set(x_36, 1, x_35); +return x_36; } } } @@ -18830,6 +18858,10 @@ l_Lean_Delaborator_getPPOption___closed__1 = _init_l_Lean_Delaborator_getPPOptio lean_mark_persistent(l_Lean_Delaborator_getPPOption___closed__1); l_Lean_Delaborator_delab___closed__1 = _init_l_Lean_Delaborator_delab___closed__1(); lean_mark_persistent(l_Lean_Delaborator_delab___closed__1); +l_Lean_Delaborator_delab___closed__2 = _init_l_Lean_Delaborator_delab___closed__2(); +lean_mark_persistent(l_Lean_Delaborator_delab___closed__2); +l_Lean_Delaborator_delab___closed__3 = _init_l_Lean_Delaborator_delab___closed__3(); +lean_mark_persistent(l_Lean_Delaborator_delab___closed__3); l___regBuiltin_Lean_Delaborator_delabFVar___closed__1 = _init_l___regBuiltin_Lean_Delaborator_delabFVar___closed__1(); lean_mark_persistent(l___regBuiltin_Lean_Delaborator_delabFVar___closed__1); res = l___regBuiltin_Lean_Delaborator_delabFVar(lean_io_mk_world()); diff --git a/stage0/stdlib/Lean/Elab/Command.c b/stage0/stdlib/Lean/Elab/Command.c index 0497268d58..6ada23adcc 100644 --- a/stage0/stdlib/Lean/Elab/Command.c +++ b/stage0/stdlib/Lean/Elab/Command.c @@ -110,7 +110,7 @@ lean_object* l_Lean_Elab_Command_liftTermElabM(lean_object*); lean_object* l___regBuiltin_Lean_Elab_Command_elabSection(lean_object*); lean_object* l_Lean_Elab_Command_getCurrMacroScope___boxed(lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_compileDecl(lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Elab_Command_elabEvalUnsafe___lambda__3___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Command_elabEvalUnsafe___lambda__3___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); uint8_t l___private_Lean_Elab_Command_13__checkEndHeader___main(lean_object*, lean_object*); lean_object* l_Lean_Elab_Command_addInstance(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Elab_Command_3__setState(lean_object*, lean_object*, lean_object*); @@ -130,6 +130,7 @@ lean_object* l_Lean_Elab_Command_elabEvalUnsafe___lambda__2___closed__1; lean_object* l_Lean_Elab_Command_elabUniverse___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Command_elabSynth___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Parser_Command_init__quot___elambda__1___closed__2; +lean_object* l_Lean_Elab_Command_elabEvalUnsafe___lambda__4(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_getMaxRecDepth___closed__1; lean_object* l_Lean_Elab_Command_CommandElabM_monadLog___closed__11; lean_object* l_Lean_SMap_empty___at_Lean_Elab_Command_commandElabAttribute___spec__1___closed__2; @@ -209,9 +210,7 @@ lean_object* l_Lean_Elab_Command_CommandElabM_inhabited(lean_object*); lean_object* l_Lean_Elab_Command_Lean_Elab_MonadMacroAdapter___closed__2; lean_object* l_Lean_Elab_Command_addOpenDecl(lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Elab_Command_5__elabCommandUsing___main(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -extern lean_object* l_Lean_Elab_Term_withIncRecDepth___rarg___closed__2; lean_object* l_Lean_Elab_Command_CommandElabM_monadLog___closed__9; -lean_object* l_Lean_Elab_Command_elabEvalUnsafe___lambda__3___closed__10; lean_object* lean_array_fget(lean_object*, lean_object*); lean_object* l_Lean_Elab_Command_elabSynth___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_mkMessage___at_Lean_Elab_Command_throwError___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -227,14 +226,14 @@ extern lean_object* l_List_Monad; lean_object* l_Lean_Elab_Command_CommandElabM_monadLog___closed__1; lean_object* l_Lean_Elab_Command_CommandElabM_monadLog___closed__3; lean_object* l_Lean_Elab_Command_CommandElabM_monadLog___lambda__3___boxed(lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Elab_Command_elabEvalUnsafe___lambda__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Command_elabEvalUnsafe___lambda__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_EnvExtension_Inhabited___rarg___closed__1; lean_object* l_Lean_Elab_logAt___at_Lean_Elab_Command_logTrace___spec__2(lean_object*, uint8_t, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_getOptionDecl(lean_object*, lean_object*); lean_object* l_Lean_Elab_mkMessage___at_Lean_Elab_Command_throwError___spec__1(lean_object*, uint8_t, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Command_CommandElabM_monadLog___closed__2; extern lean_object* l_Lean_numLitKind; -lean_object* l_Lean_Elab_Command_elabEvalUnsafe___lambda__3(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Command_elabEvalUnsafe___lambda__3(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Command_elabExport___closed__3; lean_object* l_Lean_Elab_Command_dbgTrace(lean_object*); lean_object* lean_nat_sub(lean_object*, lean_object*); @@ -251,7 +250,6 @@ lean_object* l_Lean_Elab_Command_elabEvalUnsafe___lambda__1___closed__1; extern lean_object* l_Lean_Parser_Command_set__option___elambda__1___closed__2; lean_object* l_Lean_Syntax_isStrLit_x3f(lean_object*); lean_object* l_Lean_Elab_Command_elabEvalUnsafe___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Elab_Command_elabEvalUnsafe___lambda__3___closed__7; lean_object* l_Lean_Name_append___main(lean_object*, lean_object*); extern lean_object* l_Lean_PersistentEnvExtension_inhabited___rarg___closed__2; lean_object* l_Array_shrink___main___rarg(lean_object*, lean_object*); @@ -279,7 +277,6 @@ lean_object* l_Std_mkHashMapImp___rarg(lean_object*); lean_object* l_List_lengthAux___main___rarg(lean_object*, lean_object*); lean_object* l_Lean_Elab_Command_resolveNamespace(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Command_mkState(lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Elab_Command_elabEvalUnsafe___lambda__3___closed__6; lean_object* l_Lean_Elab_Command_dbgTrace___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_qsortAux___main___at_Lean_Elab_Command_sortDeclLevelParams___spec__3___boxed(lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Parser_Command_namespace___elambda__1___closed__2; @@ -321,6 +318,7 @@ lean_object* l___regBuiltin_Lean_Elab_Command_elabExport(lean_object*); lean_object* l_Lean_Elab_Command_getScopes(lean_object*, lean_object*); lean_object* l_Lean_Elab_Command_modifyEnv(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_withLocalDecl___rarg(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*); +extern lean_object* l_Lean_Meta_withIncRecDepth___rarg___closed__2; lean_object* l_Lean_Elab_Command_elbChoice(lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Parser_Command_docComment___elambda__1___closed__2; lean_object* l_Lean_Elab_Command_elabExport(lean_object*, lean_object*, lean_object*); @@ -404,6 +402,8 @@ lean_object* l_Lean_Elab_Command_addUnivLevel(lean_object*, lean_object*, lean_o lean_object* l_Lean_Elab_Command_CommandElabCoreM_monadState___closed__4; extern lean_object* l_Lean_Parser_Command_universe___elambda__1___closed__2; lean_object* l_Lean_Elab_Command_failIfSucceeds___closed__1; +lean_object* l_Lean_Elab_Command_elabEvalUnsafe___lambda__1___closed__3; +lean_object* l_Lean_Elab_Command_elabEvalUnsafe___lambda__4___closed__4; lean_object* l_Lean_Elab_Command_failIfSucceeds___boxed(lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Bool_HasRepr___closed__1; extern lean_object* l_Lean_Syntax_inhabited; @@ -458,6 +458,7 @@ extern lean_object* l_Std_PersistentHashMap_mkCollisionNode___rarg___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*); extern lean_object* l_Lean_Elab_Term_elabUsingElabFns___closed__3; extern lean_object* l_Lean_EnvExtension_setState___closed__1; +lean_object* l_Lean_Elab_Command_elabEvalUnsafe___closed__4; lean_object* l_Lean_Syntax_getOptionalIdent_x3f(lean_object*); lean_object* l_Array_filterAux___main___at_Lean_Elab_Command_sortDeclLevelParams___spec__2(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Command_mkCommandElabAttribute___closed__2; @@ -492,8 +493,10 @@ lean_object* l___regBuiltin_Lean_Elab_Command_elabNamespace(lean_object*); 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*); +lean_object* l_Lean_Elab_Command_elabEvalUnsafe___lambda__4___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_mkOptionalNode___closed__1; lean_object* l_Lean_Elab_Command_getLevelNames(lean_object*, lean_object*); +lean_object* l_Lean_Elab_Command_elabEvalUnsafe___lambda__4___closed__3; lean_object* l_Lean_Elab_Command_mkCommandElabAttribute___closed__3; lean_object* l_Lean_SMap_find_x3f___at_Lean_Elab_Command_elabCommand___main___spec__1(lean_object*, lean_object*); lean_object* l_Lean_Elab_Command_throwAlreadyDeclaredUniverseLevel___rarg(lean_object*, lean_object*, lean_object*, lean_object*); @@ -503,6 +506,7 @@ lean_object* l_Array_toList___rarg(lean_object*); lean_object* l_Lean_Elab_Command_CommandElabM_monadLog___lambda__3(lean_object*, lean_object*, lean_object*); lean_object* l_Std_PersistentHashMap_empty___at_Lean_Elab_Command_commandElabAttribute___spec__3; lean_object* l_Std_PersistentHashMap_find_x3f___at_Lean_Elab_Command_elabCommand___main___spec__2(lean_object*, lean_object*); +lean_object* l_Lean_Elab_Command_elabEvalUnsafe___lambda__4___closed__1; lean_object* l_Lean_Elab_Command_setOption___closed__3; uint8_t l_Lean_Syntax_isOfKind(lean_object*, lean_object*); lean_object* l_Lean_PersistentEnvExtension_getState___rarg(lean_object*, lean_object*); @@ -513,7 +517,6 @@ lean_object* l_Lean_Elab_Command_elabVariable___lambda__1___boxed(lean_object*, lean_object* l_Lean_Elab_Command_Lean_Elab_MonadMacroAdapter___closed__7; uint8_t l_Lean_DataValue_sameCtor(lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_elabBinders___rarg(lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Elab_Command_elabEvalUnsafe___lambda__3___closed__9; lean_object* l_Array_qsortAux___main___at_Lean_Elab_Command_sortDeclLevelParams___spec__3(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Command_setEnv(lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Parser_Command_openSimple___elambda__1___closed__2; @@ -528,13 +531,13 @@ lean_object* l_Lean_Elab_Command_mkCommandElabAttribute(lean_object*); lean_object* l_Lean_Elab_Command_CommandElabM_monadLog___closed__10; lean_object* l_Lean_Elab_Command_modifyScope___at_Lean_Elab_Command_withDeclId___spec__3(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Syntax_getArg(lean_object*, lean_object*); +lean_object* l_Lean_Elab_Command_elabEvalUnsafe___lambda__4___closed__2; lean_object* l_Array_foldlStepMAux___main___at_Lean_Elab_Command_elabOpenRenaming___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_MetavarContext_Inhabited___closed__1; lean_object* l_ReaderT_bind___at_Lean_Elab_Command_CommandElabM_monadLog___spec__2___rarg(lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_mkOptionalNode___closed__2; lean_object* l_Lean_Elab_Command_elabChoiceAux(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Command_CommandElabM_monadLog___lambda__4(lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Elab_Command_elabEvalUnsafe___lambda__3___closed__8; lean_object* l_Lean_Elab_Command_elabVariable___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Unhygienic_run___rarg___closed__1; lean_object* l_Lean_Elab_Command_elabEvalUnsafe___closed__3; @@ -585,7 +588,6 @@ lean_object* l_Lean_Elab_Command_failIfSucceeds___closed__6; extern lean_object* l_Lean_Parser_regBuiltinCommandParserAttr___closed__3; lean_object* l_Lean_Elab_Command_elabInitQuot___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Command_CommandElabM_MonadQuotation; -lean_object* l_Lean_Elab_Command_elabEvalUnsafe___lambda__3___closed__11; lean_object* l_Lean_Elab_Command_throwError___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_resolveNamespace(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_iterateMAux___main___at_Lean_Elab_Command_elabOpenOnly___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -3404,7 +3406,7 @@ lean_dec(x_10); lean_dec(x_9); lean_dec(x_8); lean_dec(x_2); -x_32 = l_Lean_Elab_Term_withIncRecDepth___rarg___closed__2; +x_32 = l_Lean_Meta_withIncRecDepth___rarg___closed__2; x_33 = l_Lean_Elab_Command_throwError___rarg(x_1, x_32, x_3, x_7); x_34 = !lean_is_exclusive(x_33); if (x_34 == 0) @@ -6728,7 +6730,7 @@ lean_dec(x_10); lean_dec(x_9); lean_dec(x_8); lean_dec(x_7); -x_471 = l_Lean_Elab_Term_withIncRecDepth___rarg___closed__2; +x_471 = l_Lean_Meta_withIncRecDepth___rarg___closed__2; x_472 = l_Lean_Elab_Command_throwError___rarg(x_1, x_471, x_2, x_6); lean_dec(x_1); x_473 = !lean_is_exclusive(x_472); @@ -21350,6 +21352,14 @@ return x_5; lean_object* _init_l_Lean_Elab_Command_elabEvalUnsafe___lambda__1___closed__1() { _start: { +lean_object* x_1; +x_1 = lean_mk_string("MetaHasEval"); +return x_1; +} +} +lean_object* _init_l_Lean_Elab_Command_elabEvalUnsafe___lambda__1___closed__2() { +_start: +{ lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = lean_box(0); x_2 = l_Lean_Expr_isSyntheticSorry___closed__1; @@ -21357,11 +21367,11 @@ x_3 = lean_name_mk_string(x_1, x_2); return x_3; } } -lean_object* _init_l_Lean_Elab_Command_elabEvalUnsafe___lambda__1___closed__2() { +lean_object* _init_l_Lean_Elab_Command_elabEvalUnsafe___lambda__1___closed__3() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Elab_Command_elabEvalUnsafe___lambda__1___closed__1; +x_1 = l_Lean_Elab_Command_elabEvalUnsafe___lambda__1___closed__2; x_2 = l_Bool_HasRepr___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; @@ -21370,58 +21380,60 @@ return x_3; lean_object* l_Lean_Elab_Command_elabEvalUnsafe___lambda__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { _start: { -lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; -x_9 = l_Lean_Parser_Command_eval___elambda__1___closed__1; +lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; +x_9 = l_Lean_Elab_Command_elabEvalUnsafe___lambda__1___closed__1; x_10 = lean_name_mk_string(x_1, x_9); -x_11 = l_Lean_Elab_Command_elabEvalUnsafe___lambda__1___closed__2; -x_12 = l_Lean_mkConst(x_11, x_2); -x_13 = l_Std_PersistentHashMap_mkCollisionNode___rarg___closed__1; +x_11 = l_Lean_Parser_Command_eval___elambda__1___closed__1; +x_12 = lean_name_mk_string(x_10, x_11); +x_13 = l_Lean_Elab_Command_elabEvalUnsafe___lambda__1___closed__3; +x_14 = l_Lean_mkConst(x_13, x_2); +x_15 = l_Std_PersistentHashMap_mkCollisionNode___rarg___closed__1; lean_inc(x_3); -x_14 = lean_array_push(x_13, x_3); +x_16 = lean_array_push(x_15, x_3); lean_inc(x_6); -x_15 = lean_array_push(x_14, x_6); -x_16 = lean_array_push(x_15, x_4); -x_17 = lean_array_push(x_16, x_12); +x_17 = lean_array_push(x_16, x_6); +x_18 = lean_array_push(x_17, x_4); +x_19 = lean_array_push(x_18, x_14); lean_inc(x_7); -x_18 = l_Lean_Elab_Term_mkAppM(x_5, x_10, x_17, x_7, x_8); -lean_dec(x_17); -if (lean_obj_tag(x_18) == 0) +x_20 = l_Lean_Elab_Term_mkAppM(x_5, x_12, x_19, x_7, x_8); +lean_dec(x_19); +if (lean_obj_tag(x_20) == 0) { -lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; -x_19 = lean_ctor_get(x_18, 0); -lean_inc(x_19); -x_20 = lean_ctor_get(x_18, 1); -lean_inc(x_20); -lean_dec(x_18); -x_21 = l_Lean_mkAppStx___closed__9; -x_22 = lean_array_push(x_21, x_3); -x_23 = lean_array_push(x_22, x_6); -x_24 = l_Lean_Elab_Term_mkLambda(x_5, x_23, x_19, x_7, x_20); -return x_24; +lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; +x_21 = lean_ctor_get(x_20, 0); +lean_inc(x_21); +x_22 = lean_ctor_get(x_20, 1); +lean_inc(x_22); +lean_dec(x_20); +x_23 = l_Lean_mkAppStx___closed__9; +x_24 = lean_array_push(x_23, x_3); +x_25 = lean_array_push(x_24, x_6); +x_26 = l_Lean_Elab_Term_mkLambda(x_5, x_25, x_21, x_7, x_22); +return x_26; } else { -uint8_t x_25; +uint8_t x_27; lean_dec(x_7); lean_dec(x_6); lean_dec(x_3); -x_25 = !lean_is_exclusive(x_18); -if (x_25 == 0) +x_27 = !lean_is_exclusive(x_20); +if (x_27 == 0) { -return x_18; +return x_20; } else { -lean_object* x_26; lean_object* x_27; lean_object* x_28; -x_26 = lean_ctor_get(x_18, 0); -x_27 = lean_ctor_get(x_18, 1); -lean_inc(x_27); -lean_inc(x_26); -lean_dec(x_18); -x_28 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_28, 0, x_26); -lean_ctor_set(x_28, 1, x_27); -return x_28; +lean_object* x_28; lean_object* x_29; lean_object* x_30; +x_28 = lean_ctor_get(x_20, 0); +x_29 = lean_ctor_get(x_20, 1); +lean_inc(x_29); +lean_inc(x_28); +lean_dec(x_20); +x_30 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_30, 0, x_28); +lean_ctor_set(x_30, 1, x_29); +return x_30; } } } @@ -21452,33 +21464,34 @@ x_1 = lean_mk_string("Options"); return x_1; } } -lean_object* l_Lean_Elab_Command_elabEvalUnsafe___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* l_Lean_Elab_Command_elabEvalUnsafe___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) { _start: { -lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; uint8_t x_14; lean_object* x_15; -x_9 = l_Lean_Elab_Command_elabEvalUnsafe___lambda__2___closed__3; -x_10 = lean_name_mk_string(x_1, x_9); +lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; uint8_t x_13; lean_object* x_14; +x_8 = l_Lean_Elab_Command_elabEvalUnsafe___lambda__2___closed__3; +lean_inc(x_1); +x_9 = lean_name_mk_string(x_1, x_8); lean_inc(x_2); -x_11 = l_Lean_mkConst(x_10, x_2); -lean_inc(x_5); -x_12 = lean_alloc_closure((void*)(l_Lean_Elab_Command_elabEvalUnsafe___lambda__1___boxed), 8, 5); -lean_closure_set(x_12, 0, x_3); -lean_closure_set(x_12, 1, x_2); -lean_closure_set(x_12, 2, x_6); -lean_closure_set(x_12, 3, x_4); -lean_closure_set(x_12, 4, x_5); -x_13 = l_Lean_Elab_Command_elabEvalUnsafe___lambda__2___closed__2; -x_14 = 0; -x_15 = l_Lean_Elab_Term_withLocalDecl___rarg(x_5, x_13, x_14, x_11, x_12, x_7, x_8); -lean_dec(x_5); -return x_15; +x_10 = l_Lean_mkConst(x_9, x_2); +lean_inc(x_4); +x_11 = lean_alloc_closure((void*)(l_Lean_Elab_Command_elabEvalUnsafe___lambda__1___boxed), 8, 5); +lean_closure_set(x_11, 0, x_1); +lean_closure_set(x_11, 1, x_2); +lean_closure_set(x_11, 2, x_5); +lean_closure_set(x_11, 3, x_3); +lean_closure_set(x_11, 4, x_4); +x_12 = l_Lean_Elab_Command_elabEvalUnsafe___lambda__2___closed__2; +x_13 = 0; +x_14 = l_Lean_Elab_Term_withLocalDecl___rarg(x_4, x_12, x_13, x_10, x_11, x_6, x_7); +lean_dec(x_4); +return x_14; } } lean_object* _init_l_Lean_Elab_Command_elabEvalUnsafe___lambda__3___closed__1() { _start: { lean_object* x_1; -x_1 = lean_mk_string("MetaHasEval"); +x_1 = lean_mk_string("env"); return x_1; } } @@ -21486,7 +21499,7 @@ lean_object* _init_l_Lean_Elab_Command_elabEvalUnsafe___lambda__3___closed__2() _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_mkAppStx___closed__2; +x_1 = lean_box(0); x_2 = l_Lean_Elab_Command_elabEvalUnsafe___lambda__3___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; @@ -21496,7 +21509,7 @@ lean_object* _init_l_Lean_Elab_Command_elabEvalUnsafe___lambda__3___closed__3() _start: { lean_object* x_1; -x_1 = lean_mk_string("HasEval"); +x_1 = lean_mk_string("Environment"); return x_1; } } @@ -21514,330 +21527,183 @@ lean_object* _init_l_Lean_Elab_Command_elabEvalUnsafe___lambda__3___closed__5() _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Elab_Command_elabEvalUnsafe___lambda__3___closed__4; -x_2 = l_Lean_Parser_Command_eval___elambda__1___closed__1; -x_3 = lean_name_mk_string(x_1, x_2); -return x_3; -} -} -lean_object* _init_l_Lean_Elab_Command_elabEvalUnsafe___lambda__3___closed__6() { -_start: -{ -lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = lean_box(0); -x_2 = l_Lean_Elab_Command_elabEvalUnsafe___lambda__1___closed__2; +x_2 = l_Lean_Elab_Command_elabEvalUnsafe___lambda__3___closed__4; x_3 = l_Lean_mkConst(x_2, x_1); return x_3; } } -lean_object* _init_l_Lean_Elab_Command_elabEvalUnsafe___lambda__3___closed__7() { +lean_object* l_Lean_Elab_Command_elabEvalUnsafe___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) { _start: { -lean_object* x_1; -x_1 = lean_mk_string("env"); -return x_1; -} -} -lean_object* _init_l_Lean_Elab_Command_elabEvalUnsafe___lambda__3___closed__8() { -_start: +lean_object* x_7; uint8_t x_8; lean_object* x_9; +x_7 = lean_box(0); +x_8 = 1; +lean_inc(x_5); +x_9 = l_Lean_Elab_Term_elabTermAux___main(x_7, x_8, x_8, x_1, x_5, x_6); +if (lean_obj_tag(x_9) == 0) { -lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = lean_box(0); -x_2 = l_Lean_Elab_Command_elabEvalUnsafe___lambda__3___closed__7; -x_3 = lean_name_mk_string(x_1, x_2); -return x_3; -} -} -lean_object* _init_l_Lean_Elab_Command_elabEvalUnsafe___lambda__3___closed__9() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string("Environment"); -return x_1; -} -} -lean_object* _init_l_Lean_Elab_Command_elabEvalUnsafe___lambda__3___closed__10() { -_start: -{ -lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_mkAppStx___closed__2; -x_2 = l_Lean_Elab_Command_elabEvalUnsafe___lambda__3___closed__9; -x_3 = lean_name_mk_string(x_1, x_2); -return x_3; -} -} -lean_object* _init_l_Lean_Elab_Command_elabEvalUnsafe___lambda__3___closed__11() { -_start: -{ -lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = lean_box(0); -x_2 = l_Lean_Elab_Command_elabEvalUnsafe___lambda__3___closed__10; -x_3 = l_Lean_mkConst(x_2, x_1); -return x_3; -} -} -lean_object* l_Lean_Elab_Command_elabEvalUnsafe___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) { -_start: -{ -lean_object* x_8; uint8_t x_9; lean_object* x_10; -x_8 = lean_box(0); -x_9 = 1; -lean_inc(x_6); -x_10 = l_Lean_Elab_Term_elabTermAux___main(x_8, x_9, x_9, x_1, x_6, x_7); -if (lean_obj_tag(x_10) == 0) -{ -lean_object* x_11; lean_object* x_12; lean_object* x_13; uint8_t x_14; uint8_t x_15; lean_object* x_16; uint8_t x_133; lean_object* x_134; lean_object* x_135; -x_11 = lean_ctor_get(x_10, 0); +lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; uint8_t 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); -x_12 = lean_ctor_get(x_10, 1); -lean_inc(x_12); -lean_dec(x_10); -x_13 = l_Lean_Elab_Command_elabEvalUnsafe___lambda__3___closed__2; -x_14 = l_Lean_Environment_contains(x_2, x_13); -x_133 = 0; -x_134 = lean_box(0); -lean_inc(x_6); -x_135 = l___private_Lean_Elab_SyntheticMVars_11__synthesizeSyntheticMVarsAux___main(x_133, x_134, x_6, x_12); -if (x_14 == 0) +lean_dec(x_9); +x_12 = lean_box(0); +x_13 = l_Lean_mkAppStx___closed__2; +lean_inc(x_2); +x_14 = lean_alloc_closure((void*)(l_Lean_Elab_Command_elabEvalUnsafe___lambda__2), 7, 4); +lean_closure_set(x_14, 0, x_13); +lean_closure_set(x_14, 1, x_12); +lean_closure_set(x_14, 2, x_10); +lean_closure_set(x_14, 3, x_2); +x_15 = 0; +x_16 = lean_box(0); +lean_inc(x_5); +x_17 = l___private_Lean_Elab_SyntheticMVars_11__synthesizeSyntheticMVarsAux___main(x_15, x_16, x_5, x_11); +if (lean_obj_tag(x_17) == 0) { -if (lean_obj_tag(x_135) == 0) +lean_object* x_18; lean_object* x_19; uint8_t x_20; lean_object* x_21; lean_object* x_22; +x_18 = lean_ctor_get(x_17, 1); +lean_inc(x_18); +lean_dec(x_17); +x_19 = l_Lean_Elab_Command_elabEvalUnsafe___lambda__3___closed__2; +x_20 = 0; +x_21 = l_Lean_Elab_Command_elabEvalUnsafe___lambda__3___closed__5; +lean_inc(x_5); +x_22 = l_Lean_Elab_Term_withLocalDecl___rarg(x_2, x_19, x_20, x_21, x_14, x_5, x_18); +if (lean_obj_tag(x_22) == 0) { -lean_object* x_136; -x_136 = lean_ctor_get(x_135, 1); -lean_inc(x_136); -lean_dec(x_135); -x_15 = x_133; -x_16 = x_136; -goto block_132; -} -else -{ -uint8_t x_137; -lean_dec(x_11); -lean_dec(x_6); -lean_dec(x_4); -lean_dec(x_3); -x_137 = !lean_is_exclusive(x_135); -if (x_137 == 0) -{ -return x_135; -} -else -{ -lean_object* x_138; lean_object* x_139; lean_object* x_140; -x_138 = lean_ctor_get(x_135, 0); -x_139 = lean_ctor_get(x_135, 1); -lean_inc(x_139); -lean_inc(x_138); -lean_dec(x_135); -x_140 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_140, 0, x_138); -lean_ctor_set(x_140, 1, x_139); -return x_140; -} -} -} -else -{ -if (lean_obj_tag(x_135) == 0) -{ -lean_object* x_141; -x_141 = lean_ctor_get(x_135, 1); -lean_inc(x_141); -lean_dec(x_135); -x_15 = x_9; -x_16 = x_141; -goto block_132; -} -else -{ -uint8_t x_142; -lean_dec(x_11); -lean_dec(x_6); -lean_dec(x_4); -lean_dec(x_3); -x_142 = !lean_is_exclusive(x_135); -if (x_142 == 0) -{ -return x_135; -} -else -{ -lean_object* x_143; lean_object* x_144; lean_object* x_145; -x_143 = lean_ctor_get(x_135, 0); -x_144 = lean_ctor_get(x_135, 1); -lean_inc(x_144); -lean_inc(x_143); -lean_dec(x_135); -x_145 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_145, 0, x_143); -lean_ctor_set(x_145, 1, x_144); -return x_145; -} -} -} -block_132: -{ -if (x_15 == 0) -{ -lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; -x_17 = lean_box(0); -x_18 = l_Lean_mkAppStx___closed__9; -x_19 = lean_array_push(x_18, x_11); -x_20 = l_Lean_Elab_Command_elabEvalUnsafe___lambda__3___closed__6; -x_21 = lean_array_push(x_19, x_20); -x_22 = l_Lean_Elab_Command_elabEvalUnsafe___lambda__3___closed__5; -lean_inc(x_6); -x_23 = l_Lean_Elab_Term_mkAppM(x_3, x_22, x_21, x_6, x_16); -lean_dec(x_21); -if (lean_obj_tag(x_23) == 0) -{ -lean_object* x_24; lean_object* x_25; lean_object* x_26; -x_24 = lean_ctor_get(x_23, 0); +lean_object* x_23; lean_object* x_24; lean_object* x_25; +x_23 = lean_ctor_get(x_22, 0); +lean_inc(x_23); +x_24 = lean_ctor_get(x_22, 1); lean_inc(x_24); -x_25 = lean_ctor_get(x_23, 1); -lean_inc(x_25); -lean_dec(x_23); -lean_inc(x_6); -lean_inc(x_24); -x_26 = l_Lean_Elab_Term_inferType(x_3, x_24, x_6, x_25); -if (lean_obj_tag(x_26) == 0) +lean_dec(x_22); +lean_inc(x_5); +lean_inc(x_23); +x_25 = l_Lean_Elab_Term_inferType(x_2, x_23, x_5, x_24); +if (lean_obj_tag(x_25) == 0) { -lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; -x_27 = lean_ctor_get(x_26, 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; +x_26 = lean_ctor_get(x_25, 0); +lean_inc(x_26); +x_27 = lean_ctor_get(x_25, 1); lean_inc(x_27); -x_28 = lean_ctor_get(x_26, 1); -lean_inc(x_28); -lean_dec(x_26); -lean_inc(x_4); -x_29 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_29, 0, x_4); -lean_ctor_set(x_29, 1, x_17); -lean_ctor_set(x_29, 2, x_27); -x_30 = lean_box(0); -x_31 = lean_alloc_ctor(0, 3, 1); -lean_ctor_set(x_31, 0, x_29); -lean_ctor_set(x_31, 1, x_24); -lean_ctor_set(x_31, 2, x_30); -lean_ctor_set_uint8(x_31, sizeof(void*)*3, x_9); -x_32 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_32, 0, x_31); -lean_inc(x_6); -x_33 = l_Lean_Elab_Term_addDecl(x_3, x_32, x_6, x_28); -if (lean_obj_tag(x_33) == 0) +lean_dec(x_25); +lean_inc(x_3); +x_28 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_28, 0, x_3); +lean_ctor_set(x_28, 1, x_12); +lean_ctor_set(x_28, 2, x_26); +x_29 = lean_box(0); +x_30 = lean_alloc_ctor(0, 3, 1); +lean_ctor_set(x_30, 0, x_28); +lean_ctor_set(x_30, 1, x_23); +lean_ctor_set(x_30, 2, x_29); +lean_ctor_set_uint8(x_30, sizeof(void*)*3, x_8); +x_31 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_31, 0, x_30); +lean_inc(x_5); +x_32 = l_Lean_Elab_Term_addDecl(x_2, x_31, x_5, x_27); +if (lean_obj_tag(x_32) == 0) { -lean_object* x_34; lean_object* x_35; -x_34 = lean_ctor_get(x_33, 1); -lean_inc(x_34); -lean_dec(x_33); -lean_inc(x_6); -x_35 = l_Lean_Elab_Term_compileDecl(x_3, x_32, x_6, x_34); +lean_object* x_33; lean_object* x_34; +x_33 = lean_ctor_get(x_32, 1); +lean_inc(x_33); lean_dec(x_32); -if (lean_obj_tag(x_35) == 0) +lean_inc(x_5); +x_34 = l_Lean_Elab_Term_compileDecl(x_2, x_31, x_5, x_33); +lean_dec(x_31); +if (lean_obj_tag(x_34) == 0) { -lean_object* x_36; lean_object* x_37; uint8_t x_38; -x_36 = lean_ctor_get(x_35, 1); -lean_inc(x_36); -lean_dec(x_35); -x_37 = l_Lean_Elab_Term_getEnv___rarg(x_36); -x_38 = !lean_is_exclusive(x_37); -if (x_38 == 0) +lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; uint8_t x_40; +x_35 = lean_ctor_get(x_34, 1); +lean_inc(x_35); +lean_dec(x_34); +x_36 = l_Lean_Elab_Term_getEnv___rarg(x_35); +x_37 = lean_ctor_get(x_36, 0); +lean_inc(x_37); +x_38 = lean_ctor_get(x_36, 1); +lean_inc(x_38); +lean_dec(x_36); +x_39 = l_Lean_Elab_Term_getOptions(x_5, x_38); +x_40 = !lean_is_exclusive(x_39); +if (x_40 == 0) { -lean_object* x_39; lean_object* x_40; lean_object* x_41; -x_39 = lean_ctor_get(x_37, 0); -x_40 = lean_ctor_get(x_37, 1); -x_41 = lean_eval_const(x_39, x_4); -lean_dec(x_4); -lean_dec(x_39); -if (lean_obj_tag(x_41) == 0) -{ -lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; -lean_free_object(x_37); -x_42 = lean_ctor_get(x_41, 0); -lean_inc(x_42); -lean_dec(x_41); -x_43 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_43, 0, x_42); -x_44 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_44, 0, x_43); -x_45 = l_Lean_Elab_Term_throwError___rarg(x_3, x_44, x_6, x_40); +lean_object* x_41; lean_object* x_42; lean_object* x_43; +x_41 = lean_ctor_get(x_39, 0); +x_42 = lean_ctor_get(x_39, 1); +x_43 = lean_eval_const(x_37, x_3); lean_dec(x_3); -return x_45; -} -else +if (lean_obj_tag(x_43) == 0) { -lean_object* x_46; -lean_dec(x_6); -lean_dec(x_3); -x_46 = lean_ctor_get(x_41, 0); -lean_inc(x_46); +lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; +lean_free_object(x_39); lean_dec(x_41); -lean_ctor_set(x_37, 0, x_46); -return x_37; -} -} -else -{ -lean_object* x_47; lean_object* x_48; lean_object* x_49; -x_47 = lean_ctor_get(x_37, 0); -x_48 = lean_ctor_get(x_37, 1); -lean_inc(x_48); -lean_inc(x_47); lean_dec(x_37); -x_49 = lean_eval_const(x_47, x_4); -lean_dec(x_4); -lean_dec(x_47); -if (lean_obj_tag(x_49) == 0) +x_44 = lean_ctor_get(x_43, 0); +lean_inc(x_44); +lean_dec(x_43); +x_45 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_45, 0, x_44); +x_46 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_46, 0, x_45); +x_47 = l_Lean_Elab_Term_throwError___rarg(x_2, x_46, x_5, x_42); +lean_dec(x_2); +return x_47; +} +else { -lean_object* x_50; lean_object* x_51; lean_object* x_52; lean_object* x_53; -x_50 = lean_ctor_get(x_49, 0); +lean_object* x_48; lean_object* x_49; +lean_dec(x_5); +lean_dec(x_2); +x_48 = lean_ctor_get(x_43, 0); +lean_inc(x_48); +lean_dec(x_43); +x_49 = lean_apply_2(x_48, x_37, x_41); +lean_ctor_set(x_39, 0, x_49); +return x_39; +} +} +else +{ +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_dec(x_49); -x_51 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_51, 0, x_50); -x_52 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_52, 0, x_51); -x_53 = l_Lean_Elab_Term_throwError___rarg(x_3, x_52, x_6, x_48); +lean_dec(x_39); +x_52 = lean_eval_const(x_37, x_3); lean_dec(x_3); -return x_53; -} -else +if (lean_obj_tag(x_52) == 0) { -lean_object* x_54; lean_object* x_55; -lean_dec(x_6); -lean_dec(x_3); -x_54 = lean_ctor_get(x_49, 0); -lean_inc(x_54); -lean_dec(x_49); -x_55 = lean_alloc_ctor(0, 2, 0); +lean_object* x_53; lean_object* x_54; lean_object* x_55; lean_object* x_56; +lean_dec(x_50); +lean_dec(x_37); +x_53 = lean_ctor_get(x_52, 0); +lean_inc(x_53); +lean_dec(x_52); +x_54 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_54, 0, x_53); +x_55 = lean_alloc_ctor(0, 1, 0); lean_ctor_set(x_55, 0, x_54); -lean_ctor_set(x_55, 1, x_48); -return x_55; -} -} -} -else -{ -uint8_t x_56; -lean_dec(x_6); -lean_dec(x_4); -lean_dec(x_3); -x_56 = !lean_is_exclusive(x_35); -if (x_56 == 0) -{ -return x_35; +x_56 = l_Lean_Elab_Term_throwError___rarg(x_2, x_55, x_5, x_51); +lean_dec(x_2); +return x_56; } else { lean_object* x_57; lean_object* x_58; lean_object* x_59; -x_57 = lean_ctor_get(x_35, 0); -x_58 = lean_ctor_get(x_35, 1); -lean_inc(x_58); +lean_dec(x_5); +lean_dec(x_2); +x_57 = lean_ctor_get(x_52, 0); lean_inc(x_57); -lean_dec(x_35); -x_59 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_59, 0, x_57); -lean_ctor_set(x_59, 1, x_58); +lean_dec(x_52); +x_58 = lean_apply_2(x_57, x_37, x_50); +x_59 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_59, 0, x_58); +lean_ctor_set(x_59, 1, x_51); return x_59; } } @@ -21845,23 +21711,22 @@ return x_59; else { uint8_t x_60; -lean_dec(x_32); -lean_dec(x_6); -lean_dec(x_4); +lean_dec(x_5); lean_dec(x_3); -x_60 = !lean_is_exclusive(x_33); +lean_dec(x_2); +x_60 = !lean_is_exclusive(x_34); if (x_60 == 0) { -return x_33; +return x_34; } else { lean_object* x_61; lean_object* x_62; lean_object* x_63; -x_61 = lean_ctor_get(x_33, 0); -x_62 = lean_ctor_get(x_33, 1); +x_61 = lean_ctor_get(x_34, 0); +x_62 = lean_ctor_get(x_34, 1); lean_inc(x_62); lean_inc(x_61); -lean_dec(x_33); +lean_dec(x_34); x_63 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_63, 0, x_61); lean_ctor_set(x_63, 1, x_62); @@ -21872,23 +21737,23 @@ return x_63; else { uint8_t x_64; -lean_dec(x_24); -lean_dec(x_6); -lean_dec(x_4); +lean_dec(x_31); +lean_dec(x_5); lean_dec(x_3); -x_64 = !lean_is_exclusive(x_26); +lean_dec(x_2); +x_64 = !lean_is_exclusive(x_32); if (x_64 == 0) { -return x_26; +return x_32; } else { lean_object* x_65; lean_object* x_66; lean_object* x_67; -x_65 = lean_ctor_get(x_26, 0); -x_66 = lean_ctor_get(x_26, 1); +x_65 = lean_ctor_get(x_32, 0); +x_66 = lean_ctor_get(x_32, 1); lean_inc(x_66); lean_inc(x_65); -lean_dec(x_26); +lean_dec(x_32); x_67 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_67, 0, x_65); lean_ctor_set(x_67, 1, x_66); @@ -21899,22 +21764,23 @@ return x_67; else { uint8_t x_68; -lean_dec(x_6); -lean_dec(x_4); +lean_dec(x_23); +lean_dec(x_5); lean_dec(x_3); -x_68 = !lean_is_exclusive(x_23); +lean_dec(x_2); +x_68 = !lean_is_exclusive(x_25); if (x_68 == 0) { -return x_23; +return x_25; } else { lean_object* x_69; lean_object* x_70; lean_object* x_71; -x_69 = lean_ctor_get(x_23, 0); -x_70 = lean_ctor_get(x_23, 1); +x_69 = lean_ctor_get(x_25, 0); +x_70 = lean_ctor_get(x_25, 1); lean_inc(x_70); lean_inc(x_69); -lean_dec(x_23); +lean_dec(x_25); x_71 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_71, 0, x_69); lean_ctor_set(x_71, 1, x_70); @@ -21924,289 +21790,429 @@ return x_71; } else { -lean_object* x_72; lean_object* x_73; lean_object* x_74; lean_object* x_75; uint8_t x_76; lean_object* x_77; lean_object* x_78; -x_72 = lean_box(0); -x_73 = l_Lean_mkAppStx___closed__2; -lean_inc(x_3); -x_74 = lean_alloc_closure((void*)(l_Lean_Elab_Command_elabEvalUnsafe___lambda__2), 8, 5); -lean_closure_set(x_74, 0, x_73); -lean_closure_set(x_74, 1, x_72); -lean_closure_set(x_74, 2, x_13); -lean_closure_set(x_74, 3, x_11); -lean_closure_set(x_74, 4, x_3); -x_75 = l_Lean_Elab_Command_elabEvalUnsafe___lambda__3___closed__8; -x_76 = 0; -x_77 = l_Lean_Elab_Command_elabEvalUnsafe___lambda__3___closed__11; -lean_inc(x_6); -x_78 = l_Lean_Elab_Term_withLocalDecl___rarg(x_3, x_75, x_76, x_77, x_74, x_6, x_16); -if (lean_obj_tag(x_78) == 0) -{ -lean_object* x_79; lean_object* x_80; lean_object* x_81; -x_79 = lean_ctor_get(x_78, 0); -lean_inc(x_79); -x_80 = lean_ctor_get(x_78, 1); -lean_inc(x_80); -lean_dec(x_78); -lean_inc(x_6); -lean_inc(x_79); -x_81 = l_Lean_Elab_Term_inferType(x_3, x_79, x_6, x_80); -if (lean_obj_tag(x_81) == 0) -{ -lean_object* x_82; lean_object* x_83; lean_object* x_84; lean_object* x_85; lean_object* x_86; lean_object* x_87; lean_object* x_88; -x_82 = lean_ctor_get(x_81, 0); -lean_inc(x_82); -x_83 = lean_ctor_get(x_81, 1); -lean_inc(x_83); -lean_dec(x_81); -lean_inc(x_4); -x_84 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_84, 0, x_4); -lean_ctor_set(x_84, 1, x_72); -lean_ctor_set(x_84, 2, x_82); -x_85 = lean_box(0); -x_86 = lean_alloc_ctor(0, 3, 1); -lean_ctor_set(x_86, 0, x_84); -lean_ctor_set(x_86, 1, x_79); -lean_ctor_set(x_86, 2, x_85); -lean_ctor_set_uint8(x_86, sizeof(void*)*3, x_9); -x_87 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_87, 0, x_86); -lean_inc(x_6); -x_88 = l_Lean_Elab_Term_addDecl(x_3, x_87, x_6, x_83); -if (lean_obj_tag(x_88) == 0) -{ -lean_object* x_89; lean_object* x_90; -x_89 = lean_ctor_get(x_88, 1); -lean_inc(x_89); -lean_dec(x_88); -lean_inc(x_6); -x_90 = l_Lean_Elab_Term_compileDecl(x_3, x_87, x_6, x_89); -lean_dec(x_87); -if (lean_obj_tag(x_90) == 0) -{ -lean_object* x_91; lean_object* x_92; lean_object* x_93; lean_object* x_94; lean_object* x_95; uint8_t x_96; -x_91 = lean_ctor_get(x_90, 1); -lean_inc(x_91); -lean_dec(x_90); -x_92 = l_Lean_Elab_Term_getEnv___rarg(x_91); -x_93 = lean_ctor_get(x_92, 0); -lean_inc(x_93); -x_94 = lean_ctor_get(x_92, 1); -lean_inc(x_94); -lean_dec(x_92); -x_95 = l_Lean_Elab_Term_getOptions(x_6, x_94); -x_96 = !lean_is_exclusive(x_95); -if (x_96 == 0) -{ -lean_object* x_97; lean_object* x_98; lean_object* x_99; -x_97 = lean_ctor_get(x_95, 0); -x_98 = lean_ctor_get(x_95, 1); -x_99 = lean_eval_const(x_93, x_4); -lean_dec(x_4); -if (lean_obj_tag(x_99) == 0) -{ -lean_object* x_100; lean_object* x_101; lean_object* x_102; lean_object* x_103; -lean_free_object(x_95); -lean_dec(x_97); -lean_dec(x_93); -x_100 = lean_ctor_get(x_99, 0); -lean_inc(x_100); -lean_dec(x_99); -x_101 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_101, 0, x_100); -x_102 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_102, 0, x_101); -x_103 = l_Lean_Elab_Term_throwError___rarg(x_3, x_102, x_6, x_98); -lean_dec(x_3); -return x_103; -} -else -{ -lean_object* x_104; lean_object* x_105; -lean_dec(x_6); -lean_dec(x_3); -x_104 = lean_ctor_get(x_99, 0); -lean_inc(x_104); -lean_dec(x_99); -x_105 = lean_apply_2(x_104, x_93, x_97); -lean_ctor_set(x_95, 0, x_105); -return x_95; -} -} -else -{ -lean_object* x_106; lean_object* x_107; lean_object* x_108; -x_106 = lean_ctor_get(x_95, 0); -x_107 = lean_ctor_get(x_95, 1); -lean_inc(x_107); -lean_inc(x_106); -lean_dec(x_95); -x_108 = lean_eval_const(x_93, x_4); -lean_dec(x_4); -if (lean_obj_tag(x_108) == 0) -{ -lean_object* x_109; lean_object* x_110; lean_object* x_111; lean_object* x_112; -lean_dec(x_106); -lean_dec(x_93); -x_109 = lean_ctor_get(x_108, 0); -lean_inc(x_109); -lean_dec(x_108); -x_110 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_110, 0, x_109); -x_111 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_111, 0, x_110); -x_112 = l_Lean_Elab_Term_throwError___rarg(x_3, x_111, x_6, x_107); -lean_dec(x_3); -return x_112; -} -else -{ -lean_object* x_113; lean_object* x_114; lean_object* x_115; -lean_dec(x_6); -lean_dec(x_3); -x_113 = lean_ctor_get(x_108, 0); -lean_inc(x_113); -lean_dec(x_108); -x_114 = lean_apply_2(x_113, x_93, x_106); -x_115 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_115, 0, x_114); -lean_ctor_set(x_115, 1, x_107); -return x_115; -} -} -} -else -{ -uint8_t x_116; -lean_dec(x_6); -lean_dec(x_4); -lean_dec(x_3); -x_116 = !lean_is_exclusive(x_90); -if (x_116 == 0) -{ -return x_90; -} -else -{ -lean_object* x_117; lean_object* x_118; lean_object* x_119; -x_117 = lean_ctor_get(x_90, 0); -x_118 = lean_ctor_get(x_90, 1); -lean_inc(x_118); -lean_inc(x_117); -lean_dec(x_90); -x_119 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_119, 0, x_117); -lean_ctor_set(x_119, 1, x_118); -return x_119; -} -} -} -else -{ -uint8_t x_120; -lean_dec(x_87); -lean_dec(x_6); -lean_dec(x_4); -lean_dec(x_3); -x_120 = !lean_is_exclusive(x_88); -if (x_120 == 0) -{ -return x_88; -} -else -{ -lean_object* x_121; lean_object* x_122; lean_object* x_123; -x_121 = lean_ctor_get(x_88, 0); -x_122 = lean_ctor_get(x_88, 1); -lean_inc(x_122); -lean_inc(x_121); -lean_dec(x_88); -x_123 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_123, 0, x_121); -lean_ctor_set(x_123, 1, x_122); -return x_123; -} -} -} -else -{ -uint8_t x_124; -lean_dec(x_79); -lean_dec(x_6); -lean_dec(x_4); -lean_dec(x_3); -x_124 = !lean_is_exclusive(x_81); -if (x_124 == 0) -{ -return x_81; -} -else -{ -lean_object* x_125; lean_object* x_126; lean_object* x_127; -x_125 = lean_ctor_get(x_81, 0); -x_126 = lean_ctor_get(x_81, 1); -lean_inc(x_126); -lean_inc(x_125); -lean_dec(x_81); -x_127 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_127, 0, x_125); -lean_ctor_set(x_127, 1, x_126); -return x_127; -} -} -} -else -{ -uint8_t x_128; -lean_dec(x_6); -lean_dec(x_4); -lean_dec(x_3); -x_128 = !lean_is_exclusive(x_78); -if (x_128 == 0) -{ -return x_78; -} -else -{ -lean_object* x_129; lean_object* x_130; lean_object* x_131; -x_129 = lean_ctor_get(x_78, 0); -x_130 = lean_ctor_get(x_78, 1); -lean_inc(x_130); -lean_inc(x_129); -lean_dec(x_78); -x_131 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_131, 0, x_129); -lean_ctor_set(x_131, 1, x_130); -return x_131; -} -} -} -} -} -else -{ -uint8_t x_146; -lean_dec(x_6); -lean_dec(x_4); +uint8_t x_72; +lean_dec(x_5); lean_dec(x_3); lean_dec(x_2); -x_146 = !lean_is_exclusive(x_10); -if (x_146 == 0) +x_72 = !lean_is_exclusive(x_22); +if (x_72 == 0) { -return x_10; +return x_22; } else { -lean_object* x_147; lean_object* x_148; lean_object* x_149; -x_147 = lean_ctor_get(x_10, 0); -x_148 = lean_ctor_get(x_10, 1); -lean_inc(x_148); -lean_inc(x_147); -lean_dec(x_10); -x_149 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_149, 0, x_147); -lean_ctor_set(x_149, 1, x_148); -return x_149; +lean_object* x_73; lean_object* x_74; lean_object* x_75; +x_73 = lean_ctor_get(x_22, 0); +x_74 = lean_ctor_get(x_22, 1); +lean_inc(x_74); +lean_inc(x_73); +lean_dec(x_22); +x_75 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_75, 0, x_73); +lean_ctor_set(x_75, 1, x_74); +return x_75; +} +} +} +else +{ +uint8_t x_76; +lean_dec(x_14); +lean_dec(x_5); +lean_dec(x_3); +lean_dec(x_2); +x_76 = !lean_is_exclusive(x_17); +if (x_76 == 0) +{ +return x_17; +} +else +{ +lean_object* x_77; lean_object* x_78; lean_object* x_79; +x_77 = lean_ctor_get(x_17, 0); +x_78 = lean_ctor_get(x_17, 1); +lean_inc(x_78); +lean_inc(x_77); +lean_dec(x_17); +x_79 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_79, 0, x_77); +lean_ctor_set(x_79, 1, x_78); +return x_79; +} +} +} +else +{ +uint8_t x_80; +lean_dec(x_5); +lean_dec(x_3); +lean_dec(x_2); +x_80 = !lean_is_exclusive(x_9); +if (x_80 == 0) +{ +return x_9; +} +else +{ +lean_object* x_81; lean_object* x_82; lean_object* x_83; +x_81 = lean_ctor_get(x_9, 0); +x_82 = lean_ctor_get(x_9, 1); +lean_inc(x_82); +lean_inc(x_81); +lean_dec(x_9); +x_83 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_83, 0, x_81); +lean_ctor_set(x_83, 1, x_82); +return x_83; +} +} +} +} +lean_object* _init_l_Lean_Elab_Command_elabEvalUnsafe___lambda__4___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("HasEval"); +return x_1; +} +} +lean_object* _init_l_Lean_Elab_Command_elabEvalUnsafe___lambda__4___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_mkAppStx___closed__2; +x_2 = l_Lean_Elab_Command_elabEvalUnsafe___lambda__4___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* _init_l_Lean_Elab_Command_elabEvalUnsafe___lambda__4___closed__3() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Elab_Command_elabEvalUnsafe___lambda__4___closed__2; +x_2 = l_Lean_Parser_Command_eval___elambda__1___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* _init_l_Lean_Elab_Command_elabEvalUnsafe___lambda__4___closed__4() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l_Lean_Elab_Command_elabEvalUnsafe___lambda__1___closed__3; +x_3 = l_Lean_mkConst(x_2, x_1); +return x_3; +} +} +lean_object* l_Lean_Elab_Command_elabEvalUnsafe___lambda__4(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { +_start: +{ +lean_object* x_7; uint8_t x_8; lean_object* x_9; +x_7 = lean_box(0); +x_8 = 1; +lean_inc(x_5); +x_9 = l_Lean_Elab_Term_elabTermAux___main(x_7, x_8, x_8, x_1, x_5, x_6); +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; uint8_t x_17; lean_object* x_18; lean_object* x_19; +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_box(0); +x_13 = l_Lean_mkAppStx___closed__9; +x_14 = lean_array_push(x_13, x_10); +x_15 = l_Lean_Elab_Command_elabEvalUnsafe___lambda__4___closed__4; +x_16 = lean_array_push(x_14, x_15); +x_17 = 0; +x_18 = lean_box(0); +lean_inc(x_5); +x_19 = l___private_Lean_Elab_SyntheticMVars_11__synthesizeSyntheticMVarsAux___main(x_17, x_18, x_5, x_11); +if (lean_obj_tag(x_19) == 0) +{ +lean_object* x_20; lean_object* x_21; lean_object* x_22; +x_20 = lean_ctor_get(x_19, 1); +lean_inc(x_20); +lean_dec(x_19); +x_21 = l_Lean_Elab_Command_elabEvalUnsafe___lambda__4___closed__3; +lean_inc(x_5); +x_22 = l_Lean_Elab_Term_mkAppM(x_2, x_21, x_16, x_5, x_20); +lean_dec(x_16); +if (lean_obj_tag(x_22) == 0) +{ +lean_object* x_23; lean_object* x_24; lean_object* x_25; +x_23 = lean_ctor_get(x_22, 0); +lean_inc(x_23); +x_24 = lean_ctor_get(x_22, 1); +lean_inc(x_24); +lean_dec(x_22); +lean_inc(x_5); +lean_inc(x_23); +x_25 = l_Lean_Elab_Term_inferType(x_2, x_23, x_5, x_24); +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; +x_26 = lean_ctor_get(x_25, 0); +lean_inc(x_26); +x_27 = lean_ctor_get(x_25, 1); +lean_inc(x_27); +lean_dec(x_25); +lean_inc(x_3); +x_28 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_28, 0, x_3); +lean_ctor_set(x_28, 1, x_12); +lean_ctor_set(x_28, 2, x_26); +x_29 = lean_box(0); +x_30 = lean_alloc_ctor(0, 3, 1); +lean_ctor_set(x_30, 0, x_28); +lean_ctor_set(x_30, 1, x_23); +lean_ctor_set(x_30, 2, x_29); +lean_ctor_set_uint8(x_30, sizeof(void*)*3, x_8); +x_31 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_31, 0, x_30); +lean_inc(x_5); +x_32 = l_Lean_Elab_Term_addDecl(x_2, x_31, x_5, x_27); +if (lean_obj_tag(x_32) == 0) +{ +lean_object* x_33; lean_object* x_34; +x_33 = lean_ctor_get(x_32, 1); +lean_inc(x_33); +lean_dec(x_32); +lean_inc(x_5); +x_34 = l_Lean_Elab_Term_compileDecl(x_2, x_31, x_5, x_33); +lean_dec(x_31); +if (lean_obj_tag(x_34) == 0) +{ +lean_object* x_35; lean_object* x_36; uint8_t x_37; +x_35 = lean_ctor_get(x_34, 1); +lean_inc(x_35); +lean_dec(x_34); +x_36 = l_Lean_Elab_Term_getEnv___rarg(x_35); +x_37 = !lean_is_exclusive(x_36); +if (x_37 == 0) +{ +lean_object* x_38; lean_object* x_39; lean_object* x_40; +x_38 = lean_ctor_get(x_36, 0); +x_39 = lean_ctor_get(x_36, 1); +x_40 = lean_eval_const(x_38, x_3); +lean_dec(x_3); +lean_dec(x_38); +if (lean_obj_tag(x_40) == 0) +{ +lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; +lean_free_object(x_36); +x_41 = lean_ctor_get(x_40, 0); +lean_inc(x_41); +lean_dec(x_40); +x_42 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_42, 0, x_41); +x_43 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_43, 0, x_42); +x_44 = l_Lean_Elab_Term_throwError___rarg(x_2, x_43, x_5, x_39); +return x_44; +} +else +{ +lean_object* x_45; +lean_dec(x_5); +x_45 = lean_ctor_get(x_40, 0); +lean_inc(x_45); +lean_dec(x_40); +lean_ctor_set(x_36, 0, x_45); +return x_36; +} +} +else +{ +lean_object* x_46; lean_object* x_47; lean_object* x_48; +x_46 = lean_ctor_get(x_36, 0); +x_47 = lean_ctor_get(x_36, 1); +lean_inc(x_47); +lean_inc(x_46); +lean_dec(x_36); +x_48 = lean_eval_const(x_46, x_3); +lean_dec(x_3); +lean_dec(x_46); +if (lean_obj_tag(x_48) == 0) +{ +lean_object* x_49; lean_object* x_50; lean_object* x_51; lean_object* x_52; +x_49 = lean_ctor_get(x_48, 0); +lean_inc(x_49); +lean_dec(x_48); +x_50 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_50, 0, x_49); +x_51 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_51, 0, x_50); +x_52 = l_Lean_Elab_Term_throwError___rarg(x_2, x_51, x_5, x_47); +return x_52; +} +else +{ +lean_object* x_53; lean_object* x_54; +lean_dec(x_5); +x_53 = lean_ctor_get(x_48, 0); +lean_inc(x_53); +lean_dec(x_48); +x_54 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_54, 0, x_53); +lean_ctor_set(x_54, 1, x_47); +return x_54; +} +} +} +else +{ +uint8_t x_55; +lean_dec(x_5); +lean_dec(x_3); +x_55 = !lean_is_exclusive(x_34); +if (x_55 == 0) +{ +return x_34; +} +else +{ +lean_object* x_56; lean_object* x_57; lean_object* x_58; +x_56 = lean_ctor_get(x_34, 0); +x_57 = lean_ctor_get(x_34, 1); +lean_inc(x_57); +lean_inc(x_56); +lean_dec(x_34); +x_58 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_58, 0, x_56); +lean_ctor_set(x_58, 1, x_57); +return x_58; +} +} +} +else +{ +uint8_t x_59; +lean_dec(x_31); +lean_dec(x_5); +lean_dec(x_3); +x_59 = !lean_is_exclusive(x_32); +if (x_59 == 0) +{ +return x_32; +} +else +{ +lean_object* x_60; lean_object* x_61; lean_object* x_62; +x_60 = lean_ctor_get(x_32, 0); +x_61 = lean_ctor_get(x_32, 1); +lean_inc(x_61); +lean_inc(x_60); +lean_dec(x_32); +x_62 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_62, 0, x_60); +lean_ctor_set(x_62, 1, x_61); +return x_62; +} +} +} +else +{ +uint8_t x_63; +lean_dec(x_23); +lean_dec(x_5); +lean_dec(x_3); +x_63 = !lean_is_exclusive(x_25); +if (x_63 == 0) +{ +return x_25; +} +else +{ +lean_object* x_64; lean_object* x_65; lean_object* x_66; +x_64 = lean_ctor_get(x_25, 0); +x_65 = lean_ctor_get(x_25, 1); +lean_inc(x_65); +lean_inc(x_64); +lean_dec(x_25); +x_66 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_66, 0, x_64); +lean_ctor_set(x_66, 1, x_65); +return x_66; +} +} +} +else +{ +uint8_t x_67; +lean_dec(x_5); +lean_dec(x_3); +x_67 = !lean_is_exclusive(x_22); +if (x_67 == 0) +{ +return x_22; +} +else +{ +lean_object* x_68; lean_object* x_69; lean_object* x_70; +x_68 = lean_ctor_get(x_22, 0); +x_69 = lean_ctor_get(x_22, 1); +lean_inc(x_69); +lean_inc(x_68); +lean_dec(x_22); +x_70 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_70, 0, x_68); +lean_ctor_set(x_70, 1, x_69); +return x_70; +} +} +} +else +{ +uint8_t x_71; +lean_dec(x_16); +lean_dec(x_5); +lean_dec(x_3); +x_71 = !lean_is_exclusive(x_19); +if (x_71 == 0) +{ +return x_19; +} +else +{ +lean_object* x_72; lean_object* x_73; lean_object* x_74; +x_72 = lean_ctor_get(x_19, 0); +x_73 = lean_ctor_get(x_19, 1); +lean_inc(x_73); +lean_inc(x_72); +lean_dec(x_19); +x_74 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_74, 0, x_72); +lean_ctor_set(x_74, 1, x_73); +return x_74; +} +} +} +else +{ +uint8_t x_75; +lean_dec(x_5); +lean_dec(x_3); +x_75 = !lean_is_exclusive(x_9); +if (x_75 == 0) +{ +return x_9; +} +else +{ +lean_object* x_76; lean_object* x_77; lean_object* x_78; +x_76 = lean_ctor_get(x_9, 0); +x_77 = lean_ctor_get(x_9, 1); +lean_inc(x_77); +lean_inc(x_76); +lean_dec(x_9); +x_78 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_78, 0, x_76); +lean_ctor_set(x_78, 1, x_77); +return x_78; } } } @@ -22239,6 +22245,16 @@ lean_ctor_set(x_2, 0, x_1); return x_2; } } +lean_object* _init_l_Lean_Elab_Command_elabEvalUnsafe___closed__4() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_mkAppStx___closed__2; +x_2 = l_Lean_Elab_Command_elabEvalUnsafe___lambda__1___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} lean_object* l_Lean_Elab_Command_elabEvalUnsafe(lean_object* x_1, lean_object* x_2, lean_object* x_3) { _start: { @@ -22249,399 +22265,818 @@ lean_inc(x_2); x_6 = l_Lean_Elab_Command_getEnv(x_2, x_3); if (lean_obj_tag(x_6) == 0) { -lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_21; lean_object* x_22; lean_object* x_55; +lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_21; lean_object* x_22; lean_object* x_33; lean_object* x_34; lean_object* x_57; lean_object* x_58; lean_object* x_86; x_7 = lean_ctor_get(x_6, 0); lean_inc(x_7); x_8 = lean_ctor_get(x_6, 1); lean_inc(x_8); lean_dec(x_6); lean_inc(x_2); -x_55 = l_Lean_Elab_Command_getEnv(x_2, x_8); -if (lean_obj_tag(x_55) == 0) +x_86 = l_Lean_Elab_Command_getEnv(x_2, x_8); +if (lean_obj_tag(x_86) == 0) { -lean_object* x_56; lean_object* x_57; lean_object* x_58; lean_object* x_59; lean_object* x_60; -x_56 = lean_ctor_get(x_55, 0); -lean_inc(x_56); -x_57 = lean_ctor_get(x_55, 1); -lean_inc(x_57); -lean_dec(x_55); -x_58 = l_Lean_Elab_Command_elabEvalUnsafe___closed__2; -lean_inc(x_1); -x_59 = lean_alloc_closure((void*)(l_Lean_Elab_Command_elabEvalUnsafe___lambda__3___boxed), 7, 4); -lean_closure_set(x_59, 0, x_5); -lean_closure_set(x_59, 1, x_56); -lean_closure_set(x_59, 2, x_1); -lean_closure_set(x_59, 3, x_58); -lean_inc(x_2); -x_60 = l___private_Lean_Elab_Command_2__getState(x_2, x_57); -if (lean_obj_tag(x_60) == 0) -{ -lean_object* x_61; lean_object* x_62; lean_object* x_63; lean_object* x_64; -x_61 = lean_ctor_get(x_60, 0); -lean_inc(x_61); -x_62 = lean_ctor_get(x_60, 1); -lean_inc(x_62); -lean_dec(x_60); -x_63 = l___private_Lean_Elab_Command_8__getVarDecls(x_61); -lean_dec(x_61); -lean_inc(x_2); -x_64 = l___private_Lean_Elab_Command_2__getState(x_2, x_62); -if (lean_obj_tag(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_ctor_get(x_64, 0); -lean_inc(x_65); -x_66 = lean_ctor_get(x_64, 1); -lean_inc(x_66); -lean_dec(x_64); -x_67 = l_Lean_Elab_Command_elabEvalUnsafe___closed__3; -x_68 = l___private_Lean_Elab_Command_6__mkTermContext(x_2, x_65, x_67); -x_69 = l___private_Lean_Elab_Command_7__mkTermState(x_65); -lean_dec(x_65); -x_70 = l_Lean_Elab_Term_elabBinders___rarg(x_63, x_59, x_68, x_69); -lean_dec(x_63); -if (lean_obj_tag(x_70) == 0) -{ -lean_object* x_71; lean_object* x_72; lean_object* x_73; -x_71 = lean_ctor_get(x_70, 0); -lean_inc(x_71); -x_72 = lean_ctor_get(x_70, 1); -lean_inc(x_72); -lean_dec(x_70); -lean_inc(x_2); -x_73 = l___private_Lean_Elab_Command_2__getState(x_2, x_66); -if (lean_obj_tag(x_73) == 0) -{ -lean_object* x_74; lean_object* x_75; lean_object* x_76; lean_object* x_77; lean_object* x_78; lean_object* x_79; uint8_t x_80; -x_74 = lean_ctor_get(x_72, 0); -lean_inc(x_74); -x_75 = lean_ctor_get(x_73, 0); -lean_inc(x_75); -x_76 = lean_ctor_get(x_73, 1); -lean_inc(x_76); -lean_dec(x_73); -x_77 = lean_ctor_get(x_74, 0); -lean_inc(x_77); -x_78 = lean_ctor_get(x_74, 3); -lean_inc(x_78); -lean_dec(x_74); -x_79 = lean_ctor_get(x_72, 2); -lean_inc(x_79); -lean_dec(x_72); -x_80 = !lean_is_exclusive(x_75); -if (x_80 == 0) -{ -lean_object* x_81; lean_object* x_82; lean_object* x_83; lean_object* x_84; -x_81 = lean_ctor_get(x_75, 5); -lean_dec(x_81); -x_82 = lean_ctor_get(x_75, 1); -lean_dec(x_82); -x_83 = lean_ctor_get(x_75, 0); -lean_dec(x_83); -lean_ctor_set(x_75, 5, x_78); -lean_ctor_set(x_75, 1, x_79); -lean_ctor_set(x_75, 0, x_77); -lean_inc(x_2); -x_84 = l___private_Lean_Elab_Command_3__setState(x_75, x_2, x_76); -if (lean_obj_tag(x_84) == 0) -{ -lean_object* x_85; -x_85 = lean_ctor_get(x_84, 1); -lean_inc(x_85); -lean_dec(x_84); -x_21 = x_71; -x_22 = x_85; -goto block_54; -} -else -{ -lean_object* x_86; lean_object* x_87; -lean_dec(x_71); -lean_dec(x_1); -x_86 = lean_ctor_get(x_84, 0); -lean_inc(x_86); -x_87 = lean_ctor_get(x_84, 1); +lean_object* x_87; lean_object* x_88; lean_object* x_89; lean_object* x_90; lean_object* x_91; lean_object* x_92; uint8_t x_93; +x_87 = lean_ctor_get(x_86, 0); lean_inc(x_87); -lean_dec(x_84); -x_9 = x_86; -x_10 = x_87; -goto block_20; -} -} -else -{ -lean_object* x_88; lean_object* x_89; lean_object* x_90; lean_object* x_91; lean_object* x_92; -x_88 = lean_ctor_get(x_75, 2); -x_89 = lean_ctor_get(x_75, 3); -x_90 = lean_ctor_get(x_75, 4); -lean_inc(x_90); -lean_inc(x_89); +x_88 = lean_ctor_get(x_86, 1); lean_inc(x_88); -lean_dec(x_75); -x_91 = lean_alloc_ctor(0, 6, 0); -lean_ctor_set(x_91, 0, x_77); -lean_ctor_set(x_91, 1, x_79); -lean_ctor_set(x_91, 2, x_88); -lean_ctor_set(x_91, 3, x_89); -lean_ctor_set(x_91, 4, x_90); -lean_ctor_set(x_91, 5, x_78); +lean_dec(x_86); +x_89 = l_Lean_Elab_Command_elabEvalUnsafe___closed__2; +lean_inc(x_1); +lean_inc(x_5); +x_90 = lean_alloc_closure((void*)(l_Lean_Elab_Command_elabEvalUnsafe___lambda__3___boxed), 6, 3); +lean_closure_set(x_90, 0, x_5); +lean_closure_set(x_90, 1, x_1); +lean_closure_set(x_90, 2, x_89); +lean_inc(x_1); +x_91 = lean_alloc_closure((void*)(l_Lean_Elab_Command_elabEvalUnsafe___lambda__4___boxed), 6, 3); +lean_closure_set(x_91, 0, x_5); +lean_closure_set(x_91, 1, x_1); +lean_closure_set(x_91, 2, x_89); +x_92 = l_Lean_Elab_Command_elabEvalUnsafe___closed__4; +x_93 = l_Lean_Environment_contains(x_87, x_92); +if (x_93 == 0) +{ +lean_object* x_94; +lean_dec(x_90); lean_inc(x_2); -x_92 = l___private_Lean_Elab_Command_3__setState(x_91, x_2, x_76); -if (lean_obj_tag(x_92) == 0) +x_94 = l___private_Lean_Elab_Command_2__getState(x_2, x_88); +if (lean_obj_tag(x_94) == 0) { -lean_object* x_93; -x_93 = lean_ctor_get(x_92, 1); -lean_inc(x_93); -lean_dec(x_92); -x_21 = x_71; -x_22 = x_93; -goto block_54; -} -else -{ -lean_object* x_94; lean_object* x_95; -lean_dec(x_71); -lean_dec(x_1); -x_94 = lean_ctor_get(x_92, 0); -lean_inc(x_94); -x_95 = lean_ctor_get(x_92, 1); +lean_object* x_95; lean_object* x_96; lean_object* x_97; lean_object* x_98; +x_95 = lean_ctor_get(x_94, 0); lean_inc(x_95); -lean_dec(x_92); -x_9 = x_94; -x_10 = x_95; -goto block_20; -} -} -} -else -{ -lean_object* x_96; lean_object* x_97; -lean_dec(x_72); -lean_dec(x_71); -lean_dec(x_1); -x_96 = lean_ctor_get(x_73, 0); +x_96 = lean_ctor_get(x_94, 1); lean_inc(x_96); -x_97 = lean_ctor_get(x_73, 1); -lean_inc(x_97); -lean_dec(x_73); -x_9 = x_96; -x_10 = x_97; -goto block_20; -} -} -else -{ -lean_object* x_98; -x_98 = lean_ctor_get(x_70, 0); -lean_inc(x_98); +lean_dec(x_94); +x_97 = l___private_Lean_Elab_Command_8__getVarDecls(x_95); +lean_dec(x_95); +lean_inc(x_2); +x_98 = l___private_Lean_Elab_Command_2__getState(x_2, x_96); if (lean_obj_tag(x_98) == 0) { -lean_object* x_99; lean_object* x_100; lean_object* x_101; -lean_dec(x_1); -x_99 = lean_ctor_get(x_70, 1); +lean_object* x_99; lean_object* x_100; lean_object* x_101; lean_object* x_102; lean_object* x_103; lean_object* x_104; +x_99 = lean_ctor_get(x_98, 0); lean_inc(x_99); -lean_dec(x_70); -x_100 = lean_ctor_get(x_98, 0); +x_100 = lean_ctor_get(x_98, 1); lean_inc(x_100); lean_dec(x_98); -lean_inc(x_2); -x_101 = l___private_Lean_Elab_Command_2__getState(x_2, x_66); -if (lean_obj_tag(x_101) == 0) +x_101 = l_Lean_Elab_Command_elabEvalUnsafe___closed__3; +x_102 = l___private_Lean_Elab_Command_6__mkTermContext(x_2, x_99, x_101); +x_103 = l___private_Lean_Elab_Command_7__mkTermState(x_99); +lean_dec(x_99); +x_104 = l_Lean_Elab_Term_elabBinders___rarg(x_97, x_91, x_102, x_103); +lean_dec(x_97); +if (lean_obj_tag(x_104) == 0) { -lean_object* x_102; lean_object* x_103; lean_object* x_104; lean_object* x_105; lean_object* x_106; lean_object* x_107; uint8_t x_108; -x_102 = lean_ctor_get(x_99, 0); -lean_inc(x_102); -x_103 = lean_ctor_get(x_101, 0); -lean_inc(x_103); -x_104 = lean_ctor_get(x_101, 1); -lean_inc(x_104); -lean_dec(x_101); -x_105 = lean_ctor_get(x_102, 0); +lean_object* x_105; lean_object* x_106; lean_object* x_107; +x_105 = lean_ctor_get(x_104, 0); lean_inc(x_105); -x_106 = lean_ctor_get(x_102, 3); +x_106 = lean_ctor_get(x_104, 1); lean_inc(x_106); -lean_dec(x_102); -x_107 = lean_ctor_get(x_99, 2); -lean_inc(x_107); -lean_dec(x_99); -x_108 = !lean_is_exclusive(x_103); -if (x_108 == 0) -{ -lean_object* x_109; lean_object* x_110; lean_object* x_111; lean_object* x_112; -x_109 = lean_ctor_get(x_103, 5); -lean_dec(x_109); -x_110 = lean_ctor_get(x_103, 1); -lean_dec(x_110); -x_111 = lean_ctor_get(x_103, 0); -lean_dec(x_111); -lean_ctor_set(x_103, 5, x_106); -lean_ctor_set(x_103, 1, x_107); -lean_ctor_set(x_103, 0, x_105); +lean_dec(x_104); lean_inc(x_2); -x_112 = l___private_Lean_Elab_Command_3__setState(x_103, x_2, x_104); -if (lean_obj_tag(x_112) == 0) +x_107 = l___private_Lean_Elab_Command_2__getState(x_2, x_100); +if (lean_obj_tag(x_107) == 0) { -lean_object* x_113; -x_113 = lean_ctor_get(x_112, 1); +lean_object* x_108; lean_object* x_109; lean_object* x_110; lean_object* x_111; lean_object* x_112; lean_object* x_113; uint8_t x_114; +x_108 = lean_ctor_get(x_106, 0); +lean_inc(x_108); +x_109 = lean_ctor_get(x_107, 0); +lean_inc(x_109); +x_110 = lean_ctor_get(x_107, 1); +lean_inc(x_110); +lean_dec(x_107); +x_111 = lean_ctor_get(x_108, 0); +lean_inc(x_111); +x_112 = lean_ctor_get(x_108, 3); +lean_inc(x_112); +lean_dec(x_108); +x_113 = lean_ctor_get(x_106, 2); lean_inc(x_113); -lean_dec(x_112); -x_9 = x_100; -x_10 = x_113; -goto block_20; -} -else +lean_dec(x_106); +x_114 = !lean_is_exclusive(x_109); +if (x_114 == 0) { -lean_object* x_114; lean_object* x_115; -lean_dec(x_100); -x_114 = lean_ctor_get(x_112, 0); -lean_inc(x_114); -x_115 = lean_ctor_get(x_112, 1); -lean_inc(x_115); -lean_dec(x_112); -x_9 = x_114; -x_10 = x_115; -goto block_20; -} -} -else -{ -lean_object* x_116; lean_object* x_117; lean_object* x_118; lean_object* x_119; lean_object* x_120; -x_116 = lean_ctor_get(x_103, 2); -x_117 = lean_ctor_get(x_103, 3); -x_118 = lean_ctor_get(x_103, 4); -lean_inc(x_118); -lean_inc(x_117); -lean_inc(x_116); -lean_dec(x_103); -x_119 = lean_alloc_ctor(0, 6, 0); -lean_ctor_set(x_119, 0, x_105); -lean_ctor_set(x_119, 1, x_107); -lean_ctor_set(x_119, 2, x_116); -lean_ctor_set(x_119, 3, x_117); -lean_ctor_set(x_119, 4, x_118); -lean_ctor_set(x_119, 5, x_106); +lean_object* x_115; lean_object* x_116; lean_object* x_117; lean_object* x_118; +x_115 = lean_ctor_get(x_109, 5); +lean_dec(x_115); +x_116 = lean_ctor_get(x_109, 1); +lean_dec(x_116); +x_117 = lean_ctor_get(x_109, 0); +lean_dec(x_117); +lean_ctor_set(x_109, 5, x_112); +lean_ctor_set(x_109, 1, x_113); +lean_ctor_set(x_109, 0, x_111); lean_inc(x_2); -x_120 = l___private_Lean_Elab_Command_3__setState(x_119, x_2, x_104); -if (lean_obj_tag(x_120) == 0) +x_118 = l___private_Lean_Elab_Command_3__setState(x_109, x_2, x_110); +if (lean_obj_tag(x_118) == 0) { -lean_object* x_121; -x_121 = lean_ctor_get(x_120, 1); +lean_object* x_119; +x_119 = lean_ctor_get(x_118, 1); +lean_inc(x_119); +lean_dec(x_118); +x_33 = x_105; +x_34 = x_119; +goto block_56; +} +else +{ +lean_object* x_120; lean_object* x_121; +lean_dec(x_105); +lean_dec(x_1); +x_120 = lean_ctor_get(x_118, 0); +lean_inc(x_120); +x_121 = lean_ctor_get(x_118, 1); lean_inc(x_121); -lean_dec(x_120); -x_9 = x_100; -x_10 = x_121; -goto block_20; -} -else -{ -lean_object* x_122; lean_object* x_123; -lean_dec(x_100); -x_122 = lean_ctor_get(x_120, 0); -lean_inc(x_122); -x_123 = lean_ctor_get(x_120, 1); -lean_inc(x_123); -lean_dec(x_120); -x_9 = x_122; -x_10 = x_123; -goto block_20; -} +lean_dec(x_118); +x_21 = x_120; +x_22 = x_121; +goto block_32; } } else { -lean_object* x_124; lean_object* x_125; -lean_dec(x_100); -lean_dec(x_99); -x_124 = lean_ctor_get(x_101, 0); +lean_object* x_122; lean_object* x_123; lean_object* x_124; lean_object* x_125; lean_object* x_126; +x_122 = lean_ctor_get(x_109, 2); +x_123 = lean_ctor_get(x_109, 3); +x_124 = lean_ctor_get(x_109, 4); lean_inc(x_124); -x_125 = lean_ctor_get(x_101, 1); -lean_inc(x_125); -lean_dec(x_101); -x_9 = x_124; -x_10 = x_125; -goto block_20; -} -} -else -{ -lean_object* x_126; lean_object* x_127; lean_object* x_128; -lean_dec(x_70); -x_126 = l_Lean_Elab_Command_liftTermElabM___rarg___closed__1; -x_127 = l_unreachable_x21___rarg(x_126); +lean_inc(x_123); +lean_inc(x_122); +lean_dec(x_109); +x_125 = lean_alloc_ctor(0, 6, 0); +lean_ctor_set(x_125, 0, x_111); +lean_ctor_set(x_125, 1, x_113); +lean_ctor_set(x_125, 2, x_122); +lean_ctor_set(x_125, 3, x_123); +lean_ctor_set(x_125, 4, x_124); +lean_ctor_set(x_125, 5, x_112); lean_inc(x_2); -x_128 = lean_apply_2(x_127, x_2, x_66); -if (lean_obj_tag(x_128) == 0) +x_126 = l___private_Lean_Elab_Command_3__setState(x_125, x_2, x_110); +if (lean_obj_tag(x_126) == 0) { -lean_object* x_129; lean_object* x_130; -x_129 = lean_ctor_get(x_128, 0); +lean_object* x_127; +x_127 = lean_ctor_get(x_126, 1); +lean_inc(x_127); +lean_dec(x_126); +x_33 = x_105; +x_34 = x_127; +goto block_56; +} +else +{ +lean_object* x_128; lean_object* x_129; +lean_dec(x_105); +lean_dec(x_1); +x_128 = lean_ctor_get(x_126, 0); +lean_inc(x_128); +x_129 = lean_ctor_get(x_126, 1); lean_inc(x_129); -x_130 = lean_ctor_get(x_128, 1); +lean_dec(x_126); +x_21 = x_128; +x_22 = x_129; +goto block_32; +} +} +} +else +{ +lean_object* x_130; lean_object* x_131; +lean_dec(x_106); +lean_dec(x_105); +lean_dec(x_1); +x_130 = lean_ctor_get(x_107, 0); lean_inc(x_130); -lean_dec(x_128); -x_21 = x_129; -x_22 = x_130; -goto block_54; -} -else -{ -lean_object* x_131; lean_object* x_132; -lean_dec(x_1); -x_131 = lean_ctor_get(x_128, 0); +x_131 = lean_ctor_get(x_107, 1); lean_inc(x_131); -x_132 = lean_ctor_get(x_128, 1); +lean_dec(x_107); +x_21 = x_130; +x_22 = x_131; +goto block_32; +} +} +else +{ +lean_object* x_132; +x_132 = lean_ctor_get(x_104, 0); lean_inc(x_132); -lean_dec(x_128); -x_9 = x_131; -x_10 = x_132; -goto block_20; -} -} -} -} -else +if (lean_obj_tag(x_132) == 0) { -lean_object* x_133; lean_object* x_134; -lean_dec(x_63); -lean_dec(x_59); +lean_object* x_133; lean_object* x_134; lean_object* x_135; lean_dec(x_1); -x_133 = lean_ctor_get(x_64, 0); +x_133 = lean_ctor_get(x_104, 1); lean_inc(x_133); -x_134 = lean_ctor_get(x_64, 1); +lean_dec(x_104); +x_134 = lean_ctor_get(x_132, 0); lean_inc(x_134); -lean_dec(x_64); -x_9 = x_133; -x_10 = x_134; -goto block_20; -} -} -else +lean_dec(x_132); +lean_inc(x_2); +x_135 = l___private_Lean_Elab_Command_2__getState(x_2, x_100); +if (lean_obj_tag(x_135) == 0) { -lean_object* x_135; lean_object* x_136; -lean_dec(x_59); -lean_dec(x_1); -x_135 = lean_ctor_get(x_60, 0); -lean_inc(x_135); -x_136 = lean_ctor_get(x_60, 1); +lean_object* x_136; lean_object* x_137; lean_object* x_138; lean_object* x_139; lean_object* x_140; lean_object* x_141; uint8_t x_142; +x_136 = lean_ctor_get(x_133, 0); lean_inc(x_136); -lean_dec(x_60); -x_9 = x_135; -x_10 = x_136; -goto block_20; +x_137 = lean_ctor_get(x_135, 0); +lean_inc(x_137); +x_138 = lean_ctor_get(x_135, 1); +lean_inc(x_138); +lean_dec(x_135); +x_139 = lean_ctor_get(x_136, 0); +lean_inc(x_139); +x_140 = lean_ctor_get(x_136, 3); +lean_inc(x_140); +lean_dec(x_136); +x_141 = lean_ctor_get(x_133, 2); +lean_inc(x_141); +lean_dec(x_133); +x_142 = !lean_is_exclusive(x_137); +if (x_142 == 0) +{ +lean_object* x_143; lean_object* x_144; lean_object* x_145; lean_object* x_146; +x_143 = lean_ctor_get(x_137, 5); +lean_dec(x_143); +x_144 = lean_ctor_get(x_137, 1); +lean_dec(x_144); +x_145 = lean_ctor_get(x_137, 0); +lean_dec(x_145); +lean_ctor_set(x_137, 5, x_140); +lean_ctor_set(x_137, 1, x_141); +lean_ctor_set(x_137, 0, x_139); +lean_inc(x_2); +x_146 = l___private_Lean_Elab_Command_3__setState(x_137, x_2, x_138); +if (lean_obj_tag(x_146) == 0) +{ +lean_object* x_147; +x_147 = lean_ctor_get(x_146, 1); +lean_inc(x_147); +lean_dec(x_146); +x_21 = x_134; +x_22 = x_147; +goto block_32; +} +else +{ +lean_object* x_148; lean_object* x_149; +lean_dec(x_134); +x_148 = lean_ctor_get(x_146, 0); +lean_inc(x_148); +x_149 = lean_ctor_get(x_146, 1); +lean_inc(x_149); +lean_dec(x_146); +x_21 = x_148; +x_22 = x_149; +goto block_32; } } else { -lean_object* x_137; lean_object* x_138; +lean_object* x_150; lean_object* x_151; lean_object* x_152; lean_object* x_153; lean_object* x_154; +x_150 = lean_ctor_get(x_137, 2); +x_151 = lean_ctor_get(x_137, 3); +x_152 = lean_ctor_get(x_137, 4); +lean_inc(x_152); +lean_inc(x_151); +lean_inc(x_150); +lean_dec(x_137); +x_153 = lean_alloc_ctor(0, 6, 0); +lean_ctor_set(x_153, 0, x_139); +lean_ctor_set(x_153, 1, x_141); +lean_ctor_set(x_153, 2, x_150); +lean_ctor_set(x_153, 3, x_151); +lean_ctor_set(x_153, 4, x_152); +lean_ctor_set(x_153, 5, x_140); +lean_inc(x_2); +x_154 = l___private_Lean_Elab_Command_3__setState(x_153, x_2, x_138); +if (lean_obj_tag(x_154) == 0) +{ +lean_object* x_155; +x_155 = lean_ctor_get(x_154, 1); +lean_inc(x_155); +lean_dec(x_154); +x_21 = x_134; +x_22 = x_155; +goto block_32; +} +else +{ +lean_object* x_156; lean_object* x_157; +lean_dec(x_134); +x_156 = lean_ctor_get(x_154, 0); +lean_inc(x_156); +x_157 = lean_ctor_get(x_154, 1); +lean_inc(x_157); +lean_dec(x_154); +x_21 = x_156; +x_22 = x_157; +goto block_32; +} +} +} +else +{ +lean_object* x_158; lean_object* x_159; +lean_dec(x_134); +lean_dec(x_133); +x_158 = lean_ctor_get(x_135, 0); +lean_inc(x_158); +x_159 = lean_ctor_get(x_135, 1); +lean_inc(x_159); +lean_dec(x_135); +x_21 = x_158; +x_22 = x_159; +goto block_32; +} +} +else +{ +lean_object* x_160; lean_object* x_161; lean_object* x_162; +lean_dec(x_104); +x_160 = l_Lean_Elab_Command_liftTermElabM___rarg___closed__1; +x_161 = l_unreachable_x21___rarg(x_160); +lean_inc(x_2); +x_162 = lean_apply_2(x_161, x_2, x_100); +if (lean_obj_tag(x_162) == 0) +{ +lean_object* x_163; lean_object* x_164; +x_163 = lean_ctor_get(x_162, 0); +lean_inc(x_163); +x_164 = lean_ctor_get(x_162, 1); +lean_inc(x_164); +lean_dec(x_162); +x_33 = x_163; +x_34 = x_164; +goto block_56; +} +else +{ +lean_object* x_165; lean_object* x_166; +lean_dec(x_1); +x_165 = lean_ctor_get(x_162, 0); +lean_inc(x_165); +x_166 = lean_ctor_get(x_162, 1); +lean_inc(x_166); +lean_dec(x_162); +x_21 = x_165; +x_22 = x_166; +goto block_32; +} +} +} +} +else +{ +lean_object* x_167; lean_object* x_168; +lean_dec(x_97); +lean_dec(x_91); +lean_dec(x_1); +x_167 = lean_ctor_get(x_98, 0); +lean_inc(x_167); +x_168 = lean_ctor_get(x_98, 1); +lean_inc(x_168); +lean_dec(x_98); +x_21 = x_167; +x_22 = x_168; +goto block_32; +} +} +else +{ +lean_object* x_169; lean_object* x_170; +lean_dec(x_91); +lean_dec(x_1); +x_169 = lean_ctor_get(x_94, 0); +lean_inc(x_169); +x_170 = lean_ctor_get(x_94, 1); +lean_inc(x_170); +lean_dec(x_94); +x_21 = x_169; +x_22 = x_170; +goto block_32; +} +} +else +{ +lean_object* x_171; +lean_dec(x_91); +lean_inc(x_2); +x_171 = l___private_Lean_Elab_Command_2__getState(x_2, x_88); +if (lean_obj_tag(x_171) == 0) +{ +lean_object* x_172; lean_object* x_173; lean_object* x_174; lean_object* x_175; +x_172 = lean_ctor_get(x_171, 0); +lean_inc(x_172); +x_173 = lean_ctor_get(x_171, 1); +lean_inc(x_173); +lean_dec(x_171); +x_174 = l___private_Lean_Elab_Command_8__getVarDecls(x_172); +lean_dec(x_172); +lean_inc(x_2); +x_175 = l___private_Lean_Elab_Command_2__getState(x_2, x_173); +if (lean_obj_tag(x_175) == 0) +{ +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_176 = lean_ctor_get(x_175, 0); +lean_inc(x_176); +x_177 = lean_ctor_get(x_175, 1); +lean_inc(x_177); +lean_dec(x_175); +x_178 = l_Lean_Elab_Command_elabEvalUnsafe___closed__3; +x_179 = l___private_Lean_Elab_Command_6__mkTermContext(x_2, x_176, x_178); +x_180 = l___private_Lean_Elab_Command_7__mkTermState(x_176); +lean_dec(x_176); +x_181 = l_Lean_Elab_Term_elabBinders___rarg(x_174, x_90, x_179, x_180); +lean_dec(x_174); +if (lean_obj_tag(x_181) == 0) +{ +lean_object* x_182; lean_object* x_183; lean_object* x_184; +x_182 = lean_ctor_get(x_181, 0); +lean_inc(x_182); +x_183 = lean_ctor_get(x_181, 1); +lean_inc(x_183); +lean_dec(x_181); +lean_inc(x_2); +x_184 = l___private_Lean_Elab_Command_2__getState(x_2, x_177); +if (lean_obj_tag(x_184) == 0) +{ +lean_object* x_185; lean_object* x_186; lean_object* x_187; lean_object* x_188; lean_object* x_189; lean_object* x_190; uint8_t x_191; +x_185 = lean_ctor_get(x_183, 0); +lean_inc(x_185); +x_186 = lean_ctor_get(x_184, 0); +lean_inc(x_186); +x_187 = lean_ctor_get(x_184, 1); +lean_inc(x_187); +lean_dec(x_184); +x_188 = lean_ctor_get(x_185, 0); +lean_inc(x_188); +x_189 = lean_ctor_get(x_185, 3); +lean_inc(x_189); +lean_dec(x_185); +x_190 = lean_ctor_get(x_183, 2); +lean_inc(x_190); +lean_dec(x_183); +x_191 = !lean_is_exclusive(x_186); +if (x_191 == 0) +{ +lean_object* x_192; lean_object* x_193; lean_object* x_194; lean_object* x_195; +x_192 = lean_ctor_get(x_186, 5); +lean_dec(x_192); +x_193 = lean_ctor_get(x_186, 1); +lean_dec(x_193); +x_194 = lean_ctor_get(x_186, 0); +lean_dec(x_194); +lean_ctor_set(x_186, 5, x_189); +lean_ctor_set(x_186, 1, x_190); +lean_ctor_set(x_186, 0, x_188); +lean_inc(x_2); +x_195 = l___private_Lean_Elab_Command_3__setState(x_186, x_2, x_187); +if (lean_obj_tag(x_195) == 0) +{ +lean_object* x_196; +x_196 = lean_ctor_get(x_195, 1); +lean_inc(x_196); +lean_dec(x_195); +x_57 = x_182; +x_58 = x_196; +goto block_85; +} +else +{ +lean_object* x_197; lean_object* x_198; +lean_dec(x_182); +lean_dec(x_1); +x_197 = lean_ctor_get(x_195, 0); +lean_inc(x_197); +x_198 = lean_ctor_get(x_195, 1); +lean_inc(x_198); +lean_dec(x_195); +x_21 = x_197; +x_22 = x_198; +goto block_32; +} +} +else +{ +lean_object* x_199; lean_object* x_200; lean_object* x_201; lean_object* x_202; lean_object* x_203; +x_199 = lean_ctor_get(x_186, 2); +x_200 = lean_ctor_get(x_186, 3); +x_201 = lean_ctor_get(x_186, 4); +lean_inc(x_201); +lean_inc(x_200); +lean_inc(x_199); +lean_dec(x_186); +x_202 = lean_alloc_ctor(0, 6, 0); +lean_ctor_set(x_202, 0, x_188); +lean_ctor_set(x_202, 1, x_190); +lean_ctor_set(x_202, 2, x_199); +lean_ctor_set(x_202, 3, x_200); +lean_ctor_set(x_202, 4, x_201); +lean_ctor_set(x_202, 5, x_189); +lean_inc(x_2); +x_203 = l___private_Lean_Elab_Command_3__setState(x_202, x_2, x_187); +if (lean_obj_tag(x_203) == 0) +{ +lean_object* x_204; +x_204 = lean_ctor_get(x_203, 1); +lean_inc(x_204); +lean_dec(x_203); +x_57 = x_182; +x_58 = x_204; +goto block_85; +} +else +{ +lean_object* x_205; lean_object* x_206; +lean_dec(x_182); +lean_dec(x_1); +x_205 = lean_ctor_get(x_203, 0); +lean_inc(x_205); +x_206 = lean_ctor_get(x_203, 1); +lean_inc(x_206); +lean_dec(x_203); +x_21 = x_205; +x_22 = x_206; +goto block_32; +} +} +} +else +{ +lean_object* x_207; lean_object* x_208; +lean_dec(x_183); +lean_dec(x_182); +lean_dec(x_1); +x_207 = lean_ctor_get(x_184, 0); +lean_inc(x_207); +x_208 = lean_ctor_get(x_184, 1); +lean_inc(x_208); +lean_dec(x_184); +x_21 = x_207; +x_22 = x_208; +goto block_32; +} +} +else +{ +lean_object* x_209; +x_209 = lean_ctor_get(x_181, 0); +lean_inc(x_209); +if (lean_obj_tag(x_209) == 0) +{ +lean_object* x_210; lean_object* x_211; lean_object* x_212; +lean_dec(x_1); +x_210 = lean_ctor_get(x_181, 1); +lean_inc(x_210); +lean_dec(x_181); +x_211 = lean_ctor_get(x_209, 0); +lean_inc(x_211); +lean_dec(x_209); +lean_inc(x_2); +x_212 = l___private_Lean_Elab_Command_2__getState(x_2, x_177); +if (lean_obj_tag(x_212) == 0) +{ +lean_object* x_213; lean_object* x_214; lean_object* x_215; lean_object* x_216; lean_object* x_217; lean_object* x_218; uint8_t x_219; +x_213 = lean_ctor_get(x_210, 0); +lean_inc(x_213); +x_214 = lean_ctor_get(x_212, 0); +lean_inc(x_214); +x_215 = lean_ctor_get(x_212, 1); +lean_inc(x_215); +lean_dec(x_212); +x_216 = lean_ctor_get(x_213, 0); +lean_inc(x_216); +x_217 = lean_ctor_get(x_213, 3); +lean_inc(x_217); +lean_dec(x_213); +x_218 = lean_ctor_get(x_210, 2); +lean_inc(x_218); +lean_dec(x_210); +x_219 = !lean_is_exclusive(x_214); +if (x_219 == 0) +{ +lean_object* x_220; lean_object* x_221; lean_object* x_222; lean_object* x_223; +x_220 = lean_ctor_get(x_214, 5); +lean_dec(x_220); +x_221 = lean_ctor_get(x_214, 1); +lean_dec(x_221); +x_222 = lean_ctor_get(x_214, 0); +lean_dec(x_222); +lean_ctor_set(x_214, 5, x_217); +lean_ctor_set(x_214, 1, x_218); +lean_ctor_set(x_214, 0, x_216); +lean_inc(x_2); +x_223 = l___private_Lean_Elab_Command_3__setState(x_214, x_2, x_215); +if (lean_obj_tag(x_223) == 0) +{ +lean_object* x_224; +x_224 = lean_ctor_get(x_223, 1); +lean_inc(x_224); +lean_dec(x_223); +x_21 = x_211; +x_22 = x_224; +goto block_32; +} +else +{ +lean_object* x_225; lean_object* x_226; +lean_dec(x_211); +x_225 = lean_ctor_get(x_223, 0); +lean_inc(x_225); +x_226 = lean_ctor_get(x_223, 1); +lean_inc(x_226); +lean_dec(x_223); +x_21 = x_225; +x_22 = x_226; +goto block_32; +} +} +else +{ +lean_object* x_227; lean_object* x_228; lean_object* x_229; lean_object* x_230; lean_object* x_231; +x_227 = lean_ctor_get(x_214, 2); +x_228 = lean_ctor_get(x_214, 3); +x_229 = lean_ctor_get(x_214, 4); +lean_inc(x_229); +lean_inc(x_228); +lean_inc(x_227); +lean_dec(x_214); +x_230 = lean_alloc_ctor(0, 6, 0); +lean_ctor_set(x_230, 0, x_216); +lean_ctor_set(x_230, 1, x_218); +lean_ctor_set(x_230, 2, x_227); +lean_ctor_set(x_230, 3, x_228); +lean_ctor_set(x_230, 4, x_229); +lean_ctor_set(x_230, 5, x_217); +lean_inc(x_2); +x_231 = l___private_Lean_Elab_Command_3__setState(x_230, x_2, x_215); +if (lean_obj_tag(x_231) == 0) +{ +lean_object* x_232; +x_232 = lean_ctor_get(x_231, 1); +lean_inc(x_232); +lean_dec(x_231); +x_21 = x_211; +x_22 = x_232; +goto block_32; +} +else +{ +lean_object* x_233; lean_object* x_234; +lean_dec(x_211); +x_233 = lean_ctor_get(x_231, 0); +lean_inc(x_233); +x_234 = lean_ctor_get(x_231, 1); +lean_inc(x_234); +lean_dec(x_231); +x_21 = x_233; +x_22 = x_234; +goto block_32; +} +} +} +else +{ +lean_object* x_235; lean_object* x_236; +lean_dec(x_211); +lean_dec(x_210); +x_235 = lean_ctor_get(x_212, 0); +lean_inc(x_235); +x_236 = lean_ctor_get(x_212, 1); +lean_inc(x_236); +lean_dec(x_212); +x_21 = x_235; +x_22 = x_236; +goto block_32; +} +} +else +{ +lean_object* x_237; lean_object* x_238; lean_object* x_239; +lean_dec(x_181); +x_237 = l_Lean_Elab_Command_liftTermElabM___rarg___closed__1; +x_238 = l_unreachable_x21___rarg(x_237); +lean_inc(x_2); +x_239 = lean_apply_2(x_238, x_2, x_177); +if (lean_obj_tag(x_239) == 0) +{ +lean_object* x_240; lean_object* x_241; +x_240 = lean_ctor_get(x_239, 0); +lean_inc(x_240); +x_241 = lean_ctor_get(x_239, 1); +lean_inc(x_241); +lean_dec(x_239); +x_57 = x_240; +x_58 = x_241; +goto block_85; +} +else +{ +lean_object* x_242; lean_object* x_243; +lean_dec(x_1); +x_242 = lean_ctor_get(x_239, 0); +lean_inc(x_242); +x_243 = lean_ctor_get(x_239, 1); +lean_inc(x_243); +lean_dec(x_239); +x_21 = x_242; +x_22 = x_243; +goto block_32; +} +} +} +} +else +{ +lean_object* x_244; lean_object* x_245; +lean_dec(x_174); +lean_dec(x_90); +lean_dec(x_1); +x_244 = lean_ctor_get(x_175, 0); +lean_inc(x_244); +x_245 = lean_ctor_get(x_175, 1); +lean_inc(x_245); +lean_dec(x_175); +x_21 = x_244; +x_22 = x_245; +goto block_32; +} +} +else +{ +lean_object* x_246; lean_object* x_247; +lean_dec(x_90); +lean_dec(x_1); +x_246 = lean_ctor_get(x_171, 0); +lean_inc(x_246); +x_247 = lean_ctor_get(x_171, 1); +lean_inc(x_247); +lean_dec(x_171); +x_21 = x_246; +x_22 = x_247; +goto block_32; +} +} +} +else +{ +lean_object* x_248; lean_object* x_249; lean_object* x_250; lean_dec(x_5); lean_dec(x_1); -x_137 = lean_ctor_get(x_55, 0); -lean_inc(x_137); -x_138 = lean_ctor_get(x_55, 1); -lean_inc(x_138); -lean_dec(x_55); -x_9 = x_137; -x_10 = x_138; -goto block_20; +x_248 = lean_ctor_get(x_86, 0); +lean_inc(x_248); +x_249 = lean_ctor_get(x_86, 1); +lean_inc(x_249); +lean_dec(x_86); +x_250 = l_Lean_Elab_Command_setEnv(x_7, x_2, x_249); +if (lean_obj_tag(x_250) == 0) +{ +uint8_t x_251; +x_251 = !lean_is_exclusive(x_250); +if (x_251 == 0) +{ +lean_object* x_252; +x_252 = lean_ctor_get(x_250, 0); +lean_dec(x_252); +lean_ctor_set_tag(x_250, 1); +lean_ctor_set(x_250, 0, x_248); +return x_250; +} +else +{ +lean_object* x_253; lean_object* x_254; +x_253 = lean_ctor_get(x_250, 1); +lean_inc(x_253); +lean_dec(x_250); +x_254 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_254, 0, x_248); +lean_ctor_set(x_254, 1, x_253); +return x_254; +} +} +else +{ +uint8_t x_255; +lean_dec(x_248); +x_255 = !lean_is_exclusive(x_250); +if (x_255 == 0) +{ +return x_250; +} +else +{ +lean_object* x_256; lean_object* x_257; lean_object* x_258; +x_256 = lean_ctor_get(x_250, 0); +x_257 = lean_ctor_get(x_250, 1); +lean_inc(x_257); +lean_inc(x_256); +lean_dec(x_250); +x_258 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_258, 0, x_256); +lean_ctor_set(x_258, 1, x_257); +return x_258; +} +} } block_20: { @@ -22656,7 +23091,6 @@ if (x_12 == 0) lean_object* x_13; x_13 = lean_ctor_get(x_11, 0); lean_dec(x_13); -lean_ctor_set_tag(x_11, 1); lean_ctor_set(x_11, 0, x_9); return x_11; } @@ -22666,7 +23100,7 @@ lean_object* x_14; lean_object* x_15; x_14 = lean_ctor_get(x_11, 1); lean_inc(x_14); lean_dec(x_11); -x_15 = lean_alloc_ctor(1, 2, 0); +x_15 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_15, 0, x_9); lean_ctor_set(x_15, 1, x_14); return x_15; @@ -22696,166 +23130,288 @@ return x_19; } } } -block_54: +block_32: { lean_object* x_23; -x_23 = lean_with_isolated_streams(x_21, x_22); +x_23 = l_Lean_Elab_Command_setEnv(x_7, x_2, x_22); if (lean_obj_tag(x_23) == 0) { -lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; uint8_t x_30; lean_object* x_31; -x_24 = lean_ctor_get(x_23, 0); -lean_inc(x_24); -x_25 = lean_ctor_get(x_23, 1); -lean_inc(x_25); -lean_dec(x_23); -x_26 = lean_ctor_get(x_24, 0); +uint8_t x_24; +x_24 = !lean_is_exclusive(x_23); +if (x_24 == 0) +{ +lean_object* x_25; +x_25 = lean_ctor_get(x_23, 0); +lean_dec(x_25); +lean_ctor_set_tag(x_23, 1); +lean_ctor_set(x_23, 0, x_21); +return x_23; +} +else +{ +lean_object* x_26; lean_object* x_27; +x_26 = lean_ctor_get(x_23, 1); lean_inc(x_26); -x_27 = lean_ctor_get(x_24, 1); -lean_inc(x_27); -lean_dec(x_24); -x_28 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_28, 0, x_26); -x_29 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_29, 0, x_28); -x_30 = 0; -lean_inc(x_2); -x_31 = l_Lean_Elab_log___at_Lean_Elab_Command_logTrace___spec__1(x_1, x_30, x_29, x_2, x_25); -if (lean_obj_tag(x_31) == 0) -{ -if (lean_obj_tag(x_27) == 0) -{ -lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; -x_32 = lean_ctor_get(x_31, 1); -lean_inc(x_32); -lean_dec(x_31); -x_33 = lean_ctor_get(x_27, 0); -lean_inc(x_33); -lean_dec(x_27); -lean_inc(x_2); -x_34 = l___private_Lean_Elab_Command_1__ioErrorToMessage(x_2, x_1, x_33); -lean_dec(x_1); -x_35 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_35, 0, x_34); -x_9 = x_35; -x_10 = x_32; -goto block_20; +lean_dec(x_23); +x_27 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_27, 0, x_21); +lean_ctor_set(x_27, 1, x_26); +return x_27; +} } else { -lean_object* x_36; lean_object* x_37; -lean_dec(x_27); -lean_dec(x_1); -x_36 = lean_ctor_get(x_31, 1); +uint8_t x_28; +lean_dec(x_21); +x_28 = !lean_is_exclusive(x_23); +if (x_28 == 0) +{ +return x_23; +} +else +{ +lean_object* x_29; lean_object* x_30; lean_object* x_31; +x_29 = lean_ctor_get(x_23, 0); +x_30 = lean_ctor_get(x_23, 1); +lean_inc(x_30); +lean_inc(x_29); +lean_dec(x_23); +x_31 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_31, 0, x_29); +lean_ctor_set(x_31, 1, x_30); +return x_31; +} +} +} +block_56: +{ +lean_object* x_35; +x_35 = lean_with_isolated_streams(x_33, x_34); +if (lean_obj_tag(x_35) == 0) +{ +lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; uint8_t x_42; lean_object* x_43; +x_36 = lean_ctor_get(x_35, 0); lean_inc(x_36); -lean_dec(x_31); -x_37 = l_Lean_Elab_Command_setEnv(x_7, x_2, x_36); -if (lean_obj_tag(x_37) == 0) +x_37 = lean_ctor_get(x_35, 1); +lean_inc(x_37); +lean_dec(x_35); +x_38 = lean_ctor_get(x_36, 0); +lean_inc(x_38); +x_39 = lean_ctor_get(x_36, 1); +lean_inc(x_39); +lean_dec(x_36); +x_40 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_40, 0, x_38); +x_41 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_41, 0, x_40); +x_42 = 0; +lean_inc(x_2); +x_43 = l_Lean_Elab_log___at_Lean_Elab_Command_logTrace___spec__1(x_1, x_42, x_41, x_2, x_37); +if (lean_obj_tag(x_43) == 0) { -uint8_t x_38; -x_38 = !lean_is_exclusive(x_37); -if (x_38 == 0) +if (lean_obj_tag(x_39) == 0) { -lean_object* x_39; lean_object* x_40; -x_39 = lean_ctor_get(x_37, 0); -lean_dec(x_39); -x_40 = lean_box(0); -lean_ctor_set(x_37, 0, x_40); -return x_37; -} -else -{ -lean_object* x_41; lean_object* x_42; lean_object* x_43; -x_41 = lean_ctor_get(x_37, 1); -lean_inc(x_41); -lean_dec(x_37); -x_42 = lean_box(0); -x_43 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_43, 0, x_42); -lean_ctor_set(x_43, 1, x_41); -return x_43; -} -} -else -{ -uint8_t x_44; -x_44 = !lean_is_exclusive(x_37); -if (x_44 == 0) -{ -return x_37; -} -else -{ -lean_object* x_45; lean_object* x_46; lean_object* x_47; -x_45 = lean_ctor_get(x_37, 0); -x_46 = lean_ctor_get(x_37, 1); -lean_inc(x_46); +lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; +x_44 = lean_ctor_get(x_43, 1); +lean_inc(x_44); +lean_dec(x_43); +x_45 = lean_ctor_get(x_39, 0); lean_inc(x_45); -lean_dec(x_37); -x_47 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_47, 0, x_45); -lean_ctor_set(x_47, 1, x_46); -return x_47; -} -} -} +lean_dec(x_39); +lean_inc(x_2); +x_46 = l___private_Lean_Elab_Command_1__ioErrorToMessage(x_2, x_1, x_45); +lean_dec(x_1); +x_47 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_47, 0, x_46); +x_21 = x_47; +x_22 = x_44; +goto block_32; } else { lean_object* x_48; lean_object* x_49; -lean_dec(x_27); +lean_dec(x_39); lean_dec(x_1); -x_48 = lean_ctor_get(x_31, 0); +x_48 = lean_ctor_get(x_43, 1); lean_inc(x_48); -x_49 = lean_ctor_get(x_31, 1); -lean_inc(x_49); -lean_dec(x_31); -x_9 = x_48; -x_10 = x_49; +lean_dec(x_43); +x_49 = lean_box(0); +x_9 = x_49; +x_10 = x_48; goto block_20; } } else { -lean_object* x_50; lean_object* x_51; lean_object* x_52; lean_object* x_53; -x_50 = lean_ctor_get(x_23, 0); -lean_inc(x_50); -x_51 = lean_ctor_get(x_23, 1); -lean_inc(x_51); -lean_dec(x_23); -lean_inc(x_2); -x_52 = l___private_Lean_Elab_Command_1__ioErrorToMessage(x_2, x_1, x_50); +lean_object* x_50; lean_object* x_51; +lean_dec(x_39); lean_dec(x_1); -x_53 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_53, 0, x_52); -x_9 = x_53; -x_10 = x_51; +x_50 = lean_ctor_get(x_43, 0); +lean_inc(x_50); +x_51 = lean_ctor_get(x_43, 1); +lean_inc(x_51); +lean_dec(x_43); +x_21 = x_50; +x_22 = x_51; +goto block_32; +} +} +else +{ +lean_object* x_52; lean_object* x_53; lean_object* x_54; lean_object* x_55; +x_52 = lean_ctor_get(x_35, 0); +lean_inc(x_52); +x_53 = lean_ctor_get(x_35, 1); +lean_inc(x_53); +lean_dec(x_35); +lean_inc(x_2); +x_54 = l___private_Lean_Elab_Command_1__ioErrorToMessage(x_2, x_1, x_52); +lean_dec(x_1); +x_55 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_55, 0, x_54); +x_21 = x_55; +x_22 = x_53; +goto block_32; +} +} +block_85: +{ +lean_object* x_59; +x_59 = lean_with_isolated_streams(x_57, x_58); +if (lean_obj_tag(x_59) == 0) +{ +lean_object* x_60; lean_object* x_61; lean_object* x_62; lean_object* x_63; lean_object* x_64; lean_object* x_65; uint8_t x_66; lean_object* x_67; +x_60 = lean_ctor_get(x_59, 0); +lean_inc(x_60); +x_61 = lean_ctor_get(x_59, 1); +lean_inc(x_61); +lean_dec(x_59); +x_62 = lean_ctor_get(x_60, 0); +lean_inc(x_62); +x_63 = lean_ctor_get(x_60, 1); +lean_inc(x_63); +lean_dec(x_60); +x_64 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_64, 0, x_62); +x_65 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_65, 0, x_64); +x_66 = 0; +lean_inc(x_2); +x_67 = l_Lean_Elab_log___at_Lean_Elab_Command_logTrace___spec__1(x_1, x_66, x_65, x_2, x_61); +if (lean_obj_tag(x_67) == 0) +{ +if (lean_obj_tag(x_63) == 0) +{ +lean_object* x_68; lean_object* x_69; lean_object* x_70; lean_object* x_71; +x_68 = lean_ctor_get(x_67, 1); +lean_inc(x_68); +lean_dec(x_67); +x_69 = lean_ctor_get(x_63, 0); +lean_inc(x_69); +lean_dec(x_63); +lean_inc(x_2); +x_70 = l___private_Lean_Elab_Command_1__ioErrorToMessage(x_2, x_1, x_69); +lean_dec(x_1); +x_71 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_71, 0, x_70); +x_21 = x_71; +x_22 = x_68; +goto block_32; +} +else +{ +lean_object* x_72; lean_object* x_73; lean_object* x_74; +lean_dec(x_1); +x_72 = lean_ctor_get(x_67, 1); +lean_inc(x_72); +lean_dec(x_67); +x_73 = lean_ctor_get(x_63, 0); +lean_inc(x_73); +lean_dec(x_63); +lean_inc(x_2); +x_74 = l_Lean_Elab_Command_setEnv(x_73, x_2, x_72); +if (lean_obj_tag(x_74) == 0) +{ +lean_object* x_75; lean_object* x_76; +x_75 = lean_ctor_get(x_74, 1); +lean_inc(x_75); +lean_dec(x_74); +x_76 = lean_box(0); +x_9 = x_76; +x_10 = x_75; goto block_20; } +else +{ +lean_object* x_77; lean_object* x_78; +x_77 = lean_ctor_get(x_74, 0); +lean_inc(x_77); +x_78 = lean_ctor_get(x_74, 1); +lean_inc(x_78); +lean_dec(x_74); +x_21 = x_77; +x_22 = x_78; +goto block_32; +} } } else { -uint8_t x_139; +lean_object* x_79; lean_object* x_80; +lean_dec(x_63); +lean_dec(x_1); +x_79 = lean_ctor_get(x_67, 0); +lean_inc(x_79); +x_80 = lean_ctor_get(x_67, 1); +lean_inc(x_80); +lean_dec(x_67); +x_21 = x_79; +x_22 = x_80; +goto block_32; +} +} +else +{ +lean_object* x_81; lean_object* x_82; lean_object* x_83; lean_object* x_84; +x_81 = lean_ctor_get(x_59, 0); +lean_inc(x_81); +x_82 = lean_ctor_get(x_59, 1); +lean_inc(x_82); +lean_dec(x_59); +lean_inc(x_2); +x_83 = l___private_Lean_Elab_Command_1__ioErrorToMessage(x_2, x_1, x_81); +lean_dec(x_1); +x_84 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_84, 0, x_83); +x_21 = x_84; +x_22 = x_82; +goto block_32; +} +} +} +else +{ +uint8_t x_259; lean_dec(x_5); lean_dec(x_2); lean_dec(x_1); -x_139 = !lean_is_exclusive(x_6); -if (x_139 == 0) +x_259 = !lean_is_exclusive(x_6); +if (x_259 == 0) { return x_6; } else { -lean_object* x_140; lean_object* x_141; lean_object* x_142; -x_140 = lean_ctor_get(x_6, 0); -x_141 = lean_ctor_get(x_6, 1); -lean_inc(x_141); -lean_inc(x_140); +lean_object* x_260; lean_object* x_261; lean_object* x_262; +x_260 = lean_ctor_get(x_6, 0); +x_261 = lean_ctor_get(x_6, 1); +lean_inc(x_261); +lean_inc(x_260); lean_dec(x_6); -x_142 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_142, 0, x_140); -lean_ctor_set(x_142, 1, x_141); -return x_142; +x_262 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_262, 0, x_260); +lean_ctor_set(x_262, 1, x_261); +return x_262; } } } @@ -22869,13 +23425,23 @@ lean_dec(x_5); return x_9; } } -lean_object* l_Lean_Elab_Command_elabEvalUnsafe___lambda__3___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { +lean_object* l_Lean_Elab_Command_elabEvalUnsafe___lambda__3___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { _start: { -lean_object* x_8; -x_8 = l_Lean_Elab_Command_elabEvalUnsafe___lambda__3(x_1, x_2, x_3, x_4, x_5, x_6, x_7); -lean_dec(x_5); -return x_8; +lean_object* x_7; +x_7 = l_Lean_Elab_Command_elabEvalUnsafe___lambda__3(x_1, x_2, x_3, x_4, x_5, x_6); +lean_dec(x_4); +return x_7; +} +} +lean_object* l_Lean_Elab_Command_elabEvalUnsafe___lambda__4___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { +_start: +{ +lean_object* x_7; +x_7 = l_Lean_Elab_Command_elabEvalUnsafe___lambda__4(x_1, x_2, x_3, x_4, x_5, x_6); +lean_dec(x_4); +lean_dec(x_2); +return x_7; } } lean_object* l_Lean_Elab_Command_elabEval___rarg(lean_object* x_1) { @@ -28466,6 +29032,8 @@ l_Lean_Elab_Command_elabEvalUnsafe___lambda__1___closed__1 = _init_l_Lean_Elab_C lean_mark_persistent(l_Lean_Elab_Command_elabEvalUnsafe___lambda__1___closed__1); l_Lean_Elab_Command_elabEvalUnsafe___lambda__1___closed__2 = _init_l_Lean_Elab_Command_elabEvalUnsafe___lambda__1___closed__2(); lean_mark_persistent(l_Lean_Elab_Command_elabEvalUnsafe___lambda__1___closed__2); +l_Lean_Elab_Command_elabEvalUnsafe___lambda__1___closed__3 = _init_l_Lean_Elab_Command_elabEvalUnsafe___lambda__1___closed__3(); +lean_mark_persistent(l_Lean_Elab_Command_elabEvalUnsafe___lambda__1___closed__3); l_Lean_Elab_Command_elabEvalUnsafe___lambda__2___closed__1 = _init_l_Lean_Elab_Command_elabEvalUnsafe___lambda__2___closed__1(); lean_mark_persistent(l_Lean_Elab_Command_elabEvalUnsafe___lambda__2___closed__1); l_Lean_Elab_Command_elabEvalUnsafe___lambda__2___closed__2 = _init_l_Lean_Elab_Command_elabEvalUnsafe___lambda__2___closed__2(); @@ -28482,24 +29050,22 @@ l_Lean_Elab_Command_elabEvalUnsafe___lambda__3___closed__4 = _init_l_Lean_Elab_C lean_mark_persistent(l_Lean_Elab_Command_elabEvalUnsafe___lambda__3___closed__4); l_Lean_Elab_Command_elabEvalUnsafe___lambda__3___closed__5 = _init_l_Lean_Elab_Command_elabEvalUnsafe___lambda__3___closed__5(); lean_mark_persistent(l_Lean_Elab_Command_elabEvalUnsafe___lambda__3___closed__5); -l_Lean_Elab_Command_elabEvalUnsafe___lambda__3___closed__6 = _init_l_Lean_Elab_Command_elabEvalUnsafe___lambda__3___closed__6(); -lean_mark_persistent(l_Lean_Elab_Command_elabEvalUnsafe___lambda__3___closed__6); -l_Lean_Elab_Command_elabEvalUnsafe___lambda__3___closed__7 = _init_l_Lean_Elab_Command_elabEvalUnsafe___lambda__3___closed__7(); -lean_mark_persistent(l_Lean_Elab_Command_elabEvalUnsafe___lambda__3___closed__7); -l_Lean_Elab_Command_elabEvalUnsafe___lambda__3___closed__8 = _init_l_Lean_Elab_Command_elabEvalUnsafe___lambda__3___closed__8(); -lean_mark_persistent(l_Lean_Elab_Command_elabEvalUnsafe___lambda__3___closed__8); -l_Lean_Elab_Command_elabEvalUnsafe___lambda__3___closed__9 = _init_l_Lean_Elab_Command_elabEvalUnsafe___lambda__3___closed__9(); -lean_mark_persistent(l_Lean_Elab_Command_elabEvalUnsafe___lambda__3___closed__9); -l_Lean_Elab_Command_elabEvalUnsafe___lambda__3___closed__10 = _init_l_Lean_Elab_Command_elabEvalUnsafe___lambda__3___closed__10(); -lean_mark_persistent(l_Lean_Elab_Command_elabEvalUnsafe___lambda__3___closed__10); -l_Lean_Elab_Command_elabEvalUnsafe___lambda__3___closed__11 = _init_l_Lean_Elab_Command_elabEvalUnsafe___lambda__3___closed__11(); -lean_mark_persistent(l_Lean_Elab_Command_elabEvalUnsafe___lambda__3___closed__11); +l_Lean_Elab_Command_elabEvalUnsafe___lambda__4___closed__1 = _init_l_Lean_Elab_Command_elabEvalUnsafe___lambda__4___closed__1(); +lean_mark_persistent(l_Lean_Elab_Command_elabEvalUnsafe___lambda__4___closed__1); +l_Lean_Elab_Command_elabEvalUnsafe___lambda__4___closed__2 = _init_l_Lean_Elab_Command_elabEvalUnsafe___lambda__4___closed__2(); +lean_mark_persistent(l_Lean_Elab_Command_elabEvalUnsafe___lambda__4___closed__2); +l_Lean_Elab_Command_elabEvalUnsafe___lambda__4___closed__3 = _init_l_Lean_Elab_Command_elabEvalUnsafe___lambda__4___closed__3(); +lean_mark_persistent(l_Lean_Elab_Command_elabEvalUnsafe___lambda__4___closed__3); +l_Lean_Elab_Command_elabEvalUnsafe___lambda__4___closed__4 = _init_l_Lean_Elab_Command_elabEvalUnsafe___lambda__4___closed__4(); +lean_mark_persistent(l_Lean_Elab_Command_elabEvalUnsafe___lambda__4___closed__4); l_Lean_Elab_Command_elabEvalUnsafe___closed__1 = _init_l_Lean_Elab_Command_elabEvalUnsafe___closed__1(); lean_mark_persistent(l_Lean_Elab_Command_elabEvalUnsafe___closed__1); l_Lean_Elab_Command_elabEvalUnsafe___closed__2 = _init_l_Lean_Elab_Command_elabEvalUnsafe___closed__2(); lean_mark_persistent(l_Lean_Elab_Command_elabEvalUnsafe___closed__2); l_Lean_Elab_Command_elabEvalUnsafe___closed__3 = _init_l_Lean_Elab_Command_elabEvalUnsafe___closed__3(); lean_mark_persistent(l_Lean_Elab_Command_elabEvalUnsafe___closed__3); +l_Lean_Elab_Command_elabEvalUnsafe___closed__4 = _init_l_Lean_Elab_Command_elabEvalUnsafe___closed__4(); +lean_mark_persistent(l_Lean_Elab_Command_elabEvalUnsafe___closed__4); l___regBuiltin_Lean_Elab_Command_elabEval___closed__1 = _init_l___regBuiltin_Lean_Elab_Command_elabEval___closed__1(); lean_mark_persistent(l___regBuiltin_Lean_Elab_Command_elabEval___closed__1); res = l___regBuiltin_Lean_Elab_Command_elabEval(lean_io_mk_world()); diff --git a/stage0/stdlib/Lean/Elab/Print.c b/stage0/stdlib/Lean/Elab/Print.c index 438d0dd560..a499d24474 100644 --- a/stage0/stdlib/Lean/Elab/Print.c +++ b/stage0/stdlib/Lean/Elab/Print.c @@ -37,11 +37,11 @@ lean_object* lean_private_to_user_name(lean_object*); lean_object* l___private_Lean_Elab_Print_1__throwUnknownId___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___regBuiltin_Lean_Elab_Command_elabPrint(lean_object*); lean_object* l___private_Lean_Elab_Command_3__setState(lean_object*, lean_object*, lean_object*); -extern lean_object* l_Lean_Meta_assumption___closed__1; extern lean_object* l_Lean_Parser_Command_print___elambda__1___closed__2; extern lean_object* l_Lean_Parser_Term_explicitUniv___elambda__1___closed__5; lean_object* l_List_map___main___at___private_Lean_Elab_Print_9__printId___spec__2(lean_object*); lean_object* l_Lean_Elab_Command_elabPrint___closed__4; +extern lean_object* l_Lean_Meta_Exception_Inhabited___closed__1; lean_object* l___private_Lean_Elab_Print_5__printAxiomLike___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Elab_Print_4__printDefLike___closed__1; lean_object* l___private_Lean_Elab_Print_4__printDefLike___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -218,7 +218,7 @@ _start: if (lean_obj_tag(x_1) == 0) { lean_object* x_2; -x_2 = l_Lean_Meta_assumption___closed__1; +x_2 = l_Lean_Meta_Exception_Inhabited___closed__1; return x_2; } else @@ -335,7 +335,7 @@ lean_inc(x_80); x_81 = lean_ctor_get(x_79, 1); lean_inc(x_81); lean_dec(x_79); -x_82 = l_Lean_Meta_assumption___closed__1; +x_82 = l_Lean_Meta_Exception_Inhabited___closed__1; x_8 = x_82; x_9 = x_80; x_10 = x_81; diff --git a/stage0/stdlib/Lean/Elab/Structure.c b/stage0/stdlib/Lean/Elab/Structure.c index 894a36a550..bb6d345435 100644 --- a/stage0/stdlib/Lean/Elab/Structure.c +++ b/stage0/stdlib/Lean/Elab/Structure.c @@ -91,7 +91,6 @@ lean_object* l___private_Lean_Elab_Structure_4__validStructType___boxed(lean_obj lean_object* l___private_Lean_Elab_Structure_10__withFields___main___rarg___closed__8; lean_object* l___private_Lean_Elab_Term_3__fromMetaState(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_nat_add(lean_object*, lean_object*); -lean_object* l_Array_iterateMAux___main___at___private_Lean_Elab_Structure_3__expandFields___spec__1___closed__4; lean_object* l_Lean_Elab_Term_ensureHasType(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Elab_Structure_5__checkParentIsStructure___closed__4; lean_object* l___private_Lean_Elab_Structure_22__collectLevelParamsInStructure(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -311,6 +310,7 @@ lean_object* l___private_Lean_Elab_Structure_8__processSubfields___main(lean_obj lean_object* l___private_Lean_Elab_Structure_23__addCtorFields___main___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_elabBinders___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Command_setEnv(lean_object*, lean_object*, lean_object*); +extern lean_object* l_Lean_Meta_mkProjection___main___closed__7; lean_object* l_List_forM___main___at_Lean_Elab_Command_elabStructure___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Elab_Structure_10__withFields___main___rarg___closed__12; lean_object* l_Array_forMAux___main___at___private_Lean_Elab_Structure_29__addDefaults___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -365,7 +365,6 @@ lean_object* l_Array_findMAux___main___at___private_Lean_Elab_Structure_6__findF extern lean_object* l_Lean_Parser_Command_classTk___elambda__1___closed__2; lean_object* l_Lean_Elab_Command_checkValidFieldModifier___closed__6; lean_object* l_Lean_Elab_Term_getMCtx___rarg(lean_object*); -lean_object* l_Array_iterateMAux___main___at___private_Lean_Elab_Structure_3__expandFields___spec__1___closed__5; uint8_t lean_is_class(lean_object*, lean_object*); lean_object* l___private_Lean_Elab_Structure_18__collectUniversesFromFields___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Command_elabStructure___lambda__3___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -374,7 +373,6 @@ uint8_t l_Lean_isStructure(lean_object*, lean_object*); lean_object* l___private_Lean_Elab_Structure_28__mkAuxConstructions(lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Elab_Structure_18__collectUniversesFromFields(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); uint8_t lean_nat_dec_lt(lean_object*, lean_object*); -extern lean_object* l_Lean_Meta_mkProjection___main___closed__3; lean_object* _init_l_Lean_Elab_Command_StructFieldInfo_inhabited___closed__1() { _start: { @@ -1346,11 +1344,9 @@ return x_5; lean_object* _init_l_Array_iterateMAux___main___at___private_Lean_Elab_Structure_3__expandFields___spec__1___closed__1() { _start: { -lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Meta_mkProjection___main___closed__3; -x_2 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_2, 0, x_1); -return x_2; +lean_object* x_1; +x_1 = lean_mk_string("', identifiers starting with '_' are reserved to the system"); +return x_1; } } lean_object* _init_l_Array_iterateMAux___main___at___private_Lean_Elab_Structure_3__expandFields___spec__1___closed__2() { @@ -1358,7 +1354,7 @@ _start: { lean_object* x_1; lean_object* x_2; x_1 = l_Array_iterateMAux___main___at___private_Lean_Elab_Structure_3__expandFields___spec__1___closed__1; -x_2 = lean_alloc_ctor(0, 1, 0); +x_2 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } @@ -1366,26 +1362,8 @@ return x_2; lean_object* _init_l_Array_iterateMAux___main___at___private_Lean_Elab_Structure_3__expandFields___spec__1___closed__3() { _start: { -lean_object* x_1; -x_1 = lean_mk_string("', identifiers starting with '_' are reserved to the system"); -return x_1; -} -} -lean_object* _init_l_Array_iterateMAux___main___at___private_Lean_Elab_Structure_3__expandFields___spec__1___closed__4() { -_start: -{ lean_object* x_1; lean_object* x_2; -x_1 = l_Array_iterateMAux___main___at___private_Lean_Elab_Structure_3__expandFields___spec__1___closed__3; -x_2 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_2, 0, x_1); -return x_2; -} -} -lean_object* _init_l_Array_iterateMAux___main___at___private_Lean_Elab_Structure_3__expandFields___spec__1___closed__5() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = l_Array_iterateMAux___main___at___private_Lean_Elab_Structure_3__expandFields___spec__1___closed__4; +x_1 = l_Array_iterateMAux___main___at___private_Lean_Elab_Structure_3__expandFields___spec__1___closed__2; x_2 = lean_alloc_ctor(0, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; @@ -1501,11 +1479,11 @@ lean_dec(x_6); lean_dec(x_4); x_34 = lean_alloc_ctor(4, 1, 0); lean_ctor_set(x_34, 0, x_20); -x_35 = l_Array_iterateMAux___main___at___private_Lean_Elab_Structure_3__expandFields___spec__1___closed__2; +x_35 = l_Lean_Meta_mkProjection___main___closed__7; x_36 = lean_alloc_ctor(9, 2, 0); lean_ctor_set(x_36, 0, x_35); lean_ctor_set(x_36, 1, x_34); -x_37 = l_Array_iterateMAux___main___at___private_Lean_Elab_Structure_3__expandFields___spec__1___closed__5; +x_37 = l_Array_iterateMAux___main___at___private_Lean_Elab_Structure_3__expandFields___spec__1___closed__3; x_38 = lean_alloc_ctor(9, 2, 0); lean_ctor_set(x_38, 0, x_36); lean_ctor_set(x_38, 1, x_37); @@ -11588,10 +11566,6 @@ l_Array_iterateMAux___main___at___private_Lean_Elab_Structure_3__expandFields___ lean_mark_persistent(l_Array_iterateMAux___main___at___private_Lean_Elab_Structure_3__expandFields___spec__1___closed__2); l_Array_iterateMAux___main___at___private_Lean_Elab_Structure_3__expandFields___spec__1___closed__3 = _init_l_Array_iterateMAux___main___at___private_Lean_Elab_Structure_3__expandFields___spec__1___closed__3(); lean_mark_persistent(l_Array_iterateMAux___main___at___private_Lean_Elab_Structure_3__expandFields___spec__1___closed__3); -l_Array_iterateMAux___main___at___private_Lean_Elab_Structure_3__expandFields___spec__1___closed__4 = _init_l_Array_iterateMAux___main___at___private_Lean_Elab_Structure_3__expandFields___spec__1___closed__4(); -lean_mark_persistent(l_Array_iterateMAux___main___at___private_Lean_Elab_Structure_3__expandFields___spec__1___closed__4); -l_Array_iterateMAux___main___at___private_Lean_Elab_Structure_3__expandFields___spec__1___closed__5 = _init_l_Array_iterateMAux___main___at___private_Lean_Elab_Structure_3__expandFields___spec__1___closed__5(); -lean_mark_persistent(l_Array_iterateMAux___main___at___private_Lean_Elab_Structure_3__expandFields___spec__1___closed__5); l_Array_iterateMAux___main___at___private_Lean_Elab_Structure_3__expandFields___spec__2___closed__1 = _init_l_Array_iterateMAux___main___at___private_Lean_Elab_Structure_3__expandFields___spec__2___closed__1(); lean_mark_persistent(l_Array_iterateMAux___main___at___private_Lean_Elab_Structure_3__expandFields___spec__2___closed__1); l_Array_iterateMAux___main___at___private_Lean_Elab_Structure_3__expandFields___spec__2___closed__2 = _init_l_Array_iterateMAux___main___at___private_Lean_Elab_Structure_3__expandFields___spec__2___closed__2(); diff --git a/stage0/stdlib/Lean/Elab/Syntax.c b/stage0/stdlib/Lean/Elab/Syntax.c index b917c170a7..f2b1015e86 100644 --- a/stage0/stdlib/Lean/Elab/Syntax.c +++ b/stage0/stdlib/Lean/Elab/Syntax.c @@ -469,6 +469,7 @@ lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__126; uint8_t l_Lean_Name_hasMacroScopes___main(lean_object*); lean_object* l_Lean_Parser_registerParserCategory(lean_object*, lean_object*, lean_object*, uint8_t, lean_object*); lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__63; +extern lean_object* l_Lean_Elab_Command_elabEvalUnsafe___lambda__1___closed__3; lean_object* l_Lean_Elab_Command_elabSyntax___closed__9; lean_object* l___private_Lean_Elab_Syntax_6__declareSyntaxCatQuotParser___closed__51; extern lean_object* l_Bool_HasRepr___closed__1; @@ -716,7 +717,6 @@ extern lean_object* l_Lean_Parser_mkParserOfConstantUnsafe___closed__5; lean_object* l_Array_umapMAux___main___at___private_Lean_Elab_Syntax_9__expandNotationAux___spec__3(lean_object*, lean_object*); lean_object* l_Lean_Elab_Command_elabMacroRulesAux___closed__2; lean_object* l_Lean_Elab_Term_toParserDescrAux___main___closed__44; -extern lean_object* l_Lean_Elab_Command_elabEvalUnsafe___lambda__1___closed__2; lean_object* l___private_Lean_Elab_Syntax_1__mkParserSeq___boxed(lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Parser_Command_syntax___elambda__1___closed__1; lean_object* l_Lean_Elab_Command_expandNotationItemIntoSyntaxItem(lean_object*, lean_object*, lean_object*); @@ -3365,7 +3365,7 @@ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = lean_box(0); -x_2 = l_Lean_Elab_Command_elabEvalUnsafe___lambda__1___closed__2; +x_2 = l_Lean_Elab_Command_elabEvalUnsafe___lambda__1___closed__3; x_3 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_3, 0, x_2); lean_ctor_set(x_3, 1, x_1); diff --git a/stage0/stdlib/Lean/Elab/SyntheticMVars.c b/stage0/stdlib/Lean/Elab/SyntheticMVars.c index 806463fd1c..30a9e24d39 100644 --- a/stage0/stdlib/Lean/Elab/SyntheticMVars.c +++ b/stage0/stdlib/Lean/Elab/SyntheticMVars.c @@ -60,7 +60,6 @@ lean_object* l_List_filterAuxM___main___at___private_Lean_Elab_SyntheticMVars_7_ lean_object* l_List_filterAuxM___main___at___private_Lean_Elab_SyntheticMVars_7__synthesizeSyntheticMVarsStep___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Elab_SyntheticMVars_1__resumeElabTerm(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*); lean_object* l_List_forM___main___at___private_Lean_Elab_SyntheticMVars_9__reportStuckSyntheticMVars___spec__1___lambda__1___closed__2; -extern lean_object* l_Lean_Elab_Term_withIncRecDepth___rarg___closed__2; lean_object* l_Lean_Elab_Term_ensureAssignmentHasNoMVars___closed__3; uint8_t lean_nat_dec_eq(lean_object*, lean_object*); lean_object* l___private_Lean_Elab_SyntheticMVars_11__synthesizeSyntheticMVarsAux___boxed(lean_object*, lean_object*, lean_object*, lean_object*); @@ -86,6 +85,7 @@ lean_object* l___private_Lean_Elab_SyntheticMVars_3__synthesizePendingInstMVar__ lean_object* l_Lean_Elab_Term_synthesizeSyntheticMVars___boxed(lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Elab_SyntheticMVars_8__synthesizeUsingDefault(lean_object*, lean_object*); lean_object* l___private_Lean_Elab_SyntheticMVars_4__synthesizePendingCoeInstMVar___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +extern lean_object* l_Lean_Meta_withIncRecDepth___rarg___closed__2; lean_object* l___private_Lean_Elab_SyntheticMVars_5__checkWithDefault(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_List_filterAuxM___main___at___private_Lean_Elab_SyntheticMVars_8__synthesizeUsingDefault___spec__1___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Elab_SyntheticMVars_11__synthesizeSyntheticMVarsAux___main___boxed(lean_object*, lean_object*, lean_object*, lean_object*); @@ -4334,7 +4334,7 @@ lean_dec(x_11); lean_dec(x_10); lean_dec(x_9); lean_dec(x_6); -x_184 = l_Lean_Elab_Term_withIncRecDepth___rarg___closed__2; +x_184 = l_Lean_Meta_withIncRecDepth___rarg___closed__2; x_185 = l_Lean_Elab_Term_throwError___rarg(x_7, x_184, x_3, x_8); lean_dec(x_7); x_186 = !lean_is_exclusive(x_185); diff --git a/stage0/stdlib/Lean/Elab/Tactic/Basic.c b/stage0/stdlib/Lean/Elab/Tactic/Basic.c index 86b2d37538..7c59aee292 100644 --- a/stage0/stdlib/Lean/Elab/Tactic/Basic.c +++ b/stage0/stdlib/Lean/Elab/Tactic/Basic.c @@ -148,7 +148,6 @@ lean_object* l_List_findM_x3f___main___at_Lean_Elab_Tactic_evalCase___spec__1(le lean_object* l_Std_PersistentHashMap_find_x3f___at_Lean_Elab_Tactic_evalTactic___main___spec__2___boxed(lean_object*, lean_object*); lean_object* l_Lean_Elab_Tactic_evalTactic___main___closed__2; lean_object* l___private_Lean_Elab_Tactic_Basic_4__regTraceClasses(lean_object*); -extern lean_object* l_Lean_Elab_Term_withIncRecDepth___rarg___closed__2; lean_object* l___regBuiltin_Lean_Elab_Tactic_evalSkip___closed__1; lean_object* l_Lean_Elab_Tactic_evalCase(lean_object*, lean_object*, lean_object*); lean_object* l___regBuiltin_Lean_Elab_Tactic_evalClear___closed__1; @@ -226,6 +225,7 @@ lean_object* l_Lean_Elab_Tactic_State_inhabited___closed__1; lean_object* l_Lean_collectMVars(lean_object*, lean_object*); lean_object* l_Lean_Elab_Tactic_evalParen___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Tactic_monadLog___lambda__2___boxed(lean_object*, lean_object*, lean_object*); +extern lean_object* l_Lean_Meta_withIncRecDepth___rarg___closed__2; lean_object* l_Lean_Elab_Term_throwUnsupportedSyntax___boxed(lean_object*, lean_object*); lean_object* l_Lean_Elab_Tactic_getMainGoal(lean_object*, lean_object*, lean_object*); lean_object* l___regBuiltin_Lean_Elab_Tactic_evalSubst(lean_object*); @@ -2135,7 +2135,7 @@ goto block_43; else { lean_object* x_44; lean_object* x_45; -x_44 = l_Lean_Elab_Term_withIncRecDepth___rarg___closed__2; +x_44 = l_Lean_Meta_withIncRecDepth___rarg___closed__2; x_45 = l_Lean_Elab_Tactic_throwError___rarg(x_1, x_44, x_3, x_4); if (lean_obj_tag(x_45) == 0) { @@ -5114,7 +5114,7 @@ goto block_249; else { lean_object* x_250; lean_object* x_251; -x_250 = l_Lean_Elab_Term_withIncRecDepth___rarg___closed__2; +x_250 = l_Lean_Meta_withIncRecDepth___rarg___closed__2; lean_inc(x_1); x_251 = l_Lean_Elab_Tactic_throwError___rarg(x_1, x_250, x_2, x_3); if (lean_obj_tag(x_251) == 0) diff --git a/stage0/stdlib/Lean/Elab/Tactic/Generalize.c b/stage0/stdlib/Lean/Elab/Tactic/Generalize.c index bda9e63d6c..29611021fc 100644 --- a/stage0/stdlib/Lean/Elab/Tactic/Generalize.c +++ b/stage0/stdlib/Lean/Elab/Tactic/Generalize.c @@ -29,6 +29,7 @@ lean_object* l___private_Lean_Elab_Tactic_Generalize_4__evalGeneralizeWithEq___l lean_object* lean_expr_lift_loose_bvars(lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Elab_Tactic_Generalize_3__evalGeneralizeFinalize(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_KeyedDeclsAttribute_addBuiltin___rarg(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Elab_Tactic_Generalize_4__evalGeneralizeWithEq___lambda__1___closed__4; extern lean_object* l_Lean_Elab_Tactic_liftMetaTactic___closed__1; lean_object* l___private_Lean_Elab_Tactic_Generalize_5__evalGeneralizeFallback(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Elab_Tactic_Generalize_2__getVarName___boxed(lean_object*); @@ -64,6 +65,7 @@ lean_object* l___regBuiltin_Lean_Elab_Tactic_evalGeneralize___closed__1; lean_object* l___private_Lean_Elab_Tactic_Generalize_2__getVarName(lean_object*); lean_object* l_Lean_mkAppB(lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Elab_Tactic_Generalize_1__getAuxHypothesisName(lean_object*); +lean_object* l___private_Lean_Elab_Tactic_Generalize_4__evalGeneralizeWithEq___lambda__1___closed__3; lean_object* l_Lean_mkConst(lean_object*, lean_object*); lean_object* l_Lean_Elab_Tactic_liftMetaTacticAux___rarg___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_mkApp3(lean_object*, lean_object*, lean_object*, lean_object*); @@ -371,6 +373,26 @@ _start: { lean_object* x_1; lean_object* x_2; x_1 = l___private_Lean_Elab_Tactic_Generalize_4__evalGeneralizeWithEq___lambda__1___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___private_Lean_Elab_Tactic_Generalize_4__evalGeneralizeWithEq___lambda__1___closed__3() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l___private_Lean_Elab_Tactic_Generalize_4__evalGeneralizeWithEq___lambda__1___closed__2; +x_2 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* _init_l___private_Lean_Elab_Tactic_Generalize_4__evalGeneralizeWithEq___lambda__1___closed__4() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l___private_Lean_Elab_Tactic_Generalize_4__evalGeneralizeWithEq___lambda__1___closed__3; x_2 = lean_alloc_ctor(22, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; @@ -548,7 +570,7 @@ if (x_48 == 0) lean_object* x_49; lean_object* x_50; x_49 = lean_ctor_get(x_7, 0); lean_dec(x_49); -x_50 = l___private_Lean_Elab_Tactic_Generalize_4__evalGeneralizeWithEq___lambda__1___closed__2; +x_50 = l___private_Lean_Elab_Tactic_Generalize_4__evalGeneralizeWithEq___lambda__1___closed__4; lean_ctor_set_tag(x_7, 1); lean_ctor_set(x_7, 0, x_50); return x_7; @@ -559,7 +581,7 @@ lean_object* x_51; lean_object* x_52; lean_object* x_53; x_51 = lean_ctor_get(x_7, 1); lean_inc(x_51); lean_dec(x_7); -x_52 = l___private_Lean_Elab_Tactic_Generalize_4__evalGeneralizeWithEq___lambda__1___closed__2; +x_52 = l___private_Lean_Elab_Tactic_Generalize_4__evalGeneralizeWithEq___lambda__1___closed__4; x_53 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_53, 0, x_52); lean_ctor_set(x_53, 1, x_51); @@ -1184,6 +1206,10 @@ l___private_Lean_Elab_Tactic_Generalize_4__evalGeneralizeWithEq___lambda__1___cl lean_mark_persistent(l___private_Lean_Elab_Tactic_Generalize_4__evalGeneralizeWithEq___lambda__1___closed__1); l___private_Lean_Elab_Tactic_Generalize_4__evalGeneralizeWithEq___lambda__1___closed__2 = _init_l___private_Lean_Elab_Tactic_Generalize_4__evalGeneralizeWithEq___lambda__1___closed__2(); lean_mark_persistent(l___private_Lean_Elab_Tactic_Generalize_4__evalGeneralizeWithEq___lambda__1___closed__2); +l___private_Lean_Elab_Tactic_Generalize_4__evalGeneralizeWithEq___lambda__1___closed__3 = _init_l___private_Lean_Elab_Tactic_Generalize_4__evalGeneralizeWithEq___lambda__1___closed__3(); +lean_mark_persistent(l___private_Lean_Elab_Tactic_Generalize_4__evalGeneralizeWithEq___lambda__1___closed__3); +l___private_Lean_Elab_Tactic_Generalize_4__evalGeneralizeWithEq___lambda__1___closed__4 = _init_l___private_Lean_Elab_Tactic_Generalize_4__evalGeneralizeWithEq___lambda__1___closed__4(); +lean_mark_persistent(l___private_Lean_Elab_Tactic_Generalize_4__evalGeneralizeWithEq___lambda__1___closed__4); l___regBuiltin_Lean_Elab_Tactic_evalGeneralize___closed__1 = _init_l___regBuiltin_Lean_Elab_Tactic_evalGeneralize___closed__1(); lean_mark_persistent(l___regBuiltin_Lean_Elab_Tactic_evalGeneralize___closed__1); res = l___regBuiltin_Lean_Elab_Tactic_evalGeneralize(lean_io_mk_world()); diff --git a/stage0/stdlib/Lean/Elab/Tactic/Induction.c b/stage0/stdlib/Lean/Elab/Tactic/Induction.c index 5a9b7ee9a6..09e483e20f 100644 --- a/stage0/stdlib/Lean/Elab/Tactic/Induction.c +++ b/stage0/stdlib/Lean/Elab/Tactic/Induction.c @@ -88,7 +88,6 @@ lean_object* l_Nat_foldMAux___main___at___private_Lean_Elab_Tactic_Induction_16_ lean_object* l___private_Lean_Elab_Tactic_Induction_15__isTermRHS___boxed(lean_object*); lean_object* l___regBuiltin_Lean_Elab_Tactic_evalInduction(lean_object*); lean_object* l___private_Lean_Elab_Tactic_Induction_11__checkAltCtorNames(lean_object*, lean_object*, lean_object*, lean_object*); -extern lean_object* l_Lean_Elab_Term_withIncRecDepth___rarg___closed__2; lean_object* lean_array_fget(lean_object*, lean_object*); uint8_t lean_nat_dec_eq(lean_object*, lean_object*); lean_object* l_List_toString___at_Lean_Elab_OpenDecl_HasToString___spec__2(lean_object*); @@ -124,6 +123,7 @@ lean_object* l_Lean_Meta_revert___boxed(lean_object*, lean_object*, lean_object* lean_object* l_Nat_foldMAux___main___at___private_Lean_Elab_Tactic_Induction_16__processResult___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Tactic_getRecFromUsing(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Nat_foldMAux___main___at___private_Lean_Elab_Tactic_Induction_16__processResult___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +extern lean_object* l_Lean_Meta_withIncRecDepth___rarg___closed__2; lean_object* l_Lean_Elab_Tactic_getMainGoal(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Tactic_getInductiveValFromMajor___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_mkRecFor___closed__1; @@ -1974,7 +1974,7 @@ goto block_58; else { lean_object* x_59; lean_object* x_60; -x_59 = l_Lean_Elab_Term_withIncRecDepth___rarg___closed__2; +x_59 = l_Lean_Meta_withIncRecDepth___rarg___closed__2; lean_inc(x_1); x_60 = l_Lean_Elab_Tactic_throwError___rarg(x_1, x_59, x_4, x_20); if (lean_obj_tag(x_60) == 0) @@ -2253,7 +2253,7 @@ goto block_118; else { lean_object* x_119; lean_object* x_120; -x_119 = l_Lean_Elab_Term_withIncRecDepth___rarg___closed__2; +x_119 = l_Lean_Meta_withIncRecDepth___rarg___closed__2; lean_inc(x_1); x_120 = l_Lean_Elab_Tactic_throwError___rarg(x_1, x_119, x_4, x_80); if (lean_obj_tag(x_120) == 0) @@ -2532,7 +2532,7 @@ goto block_178; else { lean_object* x_179; lean_object* x_180; -x_179 = l_Lean_Elab_Term_withIncRecDepth___rarg___closed__2; +x_179 = l_Lean_Meta_withIncRecDepth___rarg___closed__2; lean_inc(x_1); x_180 = l_Lean_Elab_Tactic_throwError___rarg(x_1, x_179, x_4, x_140); if (lean_obj_tag(x_180) == 0) @@ -2811,7 +2811,7 @@ goto block_238; else { lean_object* x_239; lean_object* x_240; -x_239 = l_Lean_Elab_Term_withIncRecDepth___rarg___closed__2; +x_239 = l_Lean_Meta_withIncRecDepth___rarg___closed__2; lean_inc(x_1); x_240 = l_Lean_Elab_Tactic_throwError___rarg(x_1, x_239, x_4, x_200); if (lean_obj_tag(x_240) == 0) @@ -3107,7 +3107,7 @@ goto block_304; else { lean_object* x_305; lean_object* x_306; -x_305 = l_Lean_Elab_Term_withIncRecDepth___rarg___closed__2; +x_305 = l_Lean_Meta_withIncRecDepth___rarg___closed__2; lean_inc(x_1); x_306 = l_Lean_Elab_Tactic_throwError___rarg(x_1, x_305, x_4, x_266); if (lean_obj_tag(x_306) == 0) @@ -3450,7 +3450,7 @@ goto block_367; else { lean_object* x_368; lean_object* x_369; -x_368 = l_Lean_Elab_Term_withIncRecDepth___rarg___closed__2; +x_368 = l_Lean_Meta_withIncRecDepth___rarg___closed__2; lean_inc(x_1); x_369 = l_Lean_Elab_Tactic_throwError___rarg(x_1, x_368, x_4, x_329); if (lean_obj_tag(x_369) == 0) @@ -3731,7 +3731,7 @@ goto block_440; else { lean_object* x_441; lean_object* x_442; -x_441 = l_Lean_Elab_Term_withIncRecDepth___rarg___closed__2; +x_441 = l_Lean_Meta_withIncRecDepth___rarg___closed__2; lean_inc(x_1); x_442 = l_Lean_Elab_Tactic_throwError___rarg(x_1, x_441, x_4, x_402); if (lean_obj_tag(x_442) == 0) @@ -4010,7 +4010,7 @@ goto block_500; else { lean_object* x_501; lean_object* x_502; -x_501 = l_Lean_Elab_Term_withIncRecDepth___rarg___closed__2; +x_501 = l_Lean_Meta_withIncRecDepth___rarg___closed__2; lean_inc(x_1); x_502 = l_Lean_Elab_Tactic_throwError___rarg(x_1, x_501, x_4, x_462); if (lean_obj_tag(x_502) == 0) @@ -4289,7 +4289,7 @@ goto block_560; else { lean_object* x_561; lean_object* x_562; -x_561 = l_Lean_Elab_Term_withIncRecDepth___rarg___closed__2; +x_561 = l_Lean_Meta_withIncRecDepth___rarg___closed__2; lean_inc(x_1); x_562 = l_Lean_Elab_Tactic_throwError___rarg(x_1, x_561, x_4, x_522); if (lean_obj_tag(x_562) == 0) @@ -4568,7 +4568,7 @@ goto block_620; else { lean_object* x_621; lean_object* x_622; -x_621 = l_Lean_Elab_Term_withIncRecDepth___rarg___closed__2; +x_621 = l_Lean_Meta_withIncRecDepth___rarg___closed__2; lean_inc(x_1); x_622 = l_Lean_Elab_Tactic_throwError___rarg(x_1, x_621, x_4, x_582); if (lean_obj_tag(x_622) == 0) @@ -4847,7 +4847,7 @@ goto block_680; else { lean_object* x_681; lean_object* x_682; -x_681 = l_Lean_Elab_Term_withIncRecDepth___rarg___closed__2; +x_681 = l_Lean_Meta_withIncRecDepth___rarg___closed__2; lean_inc(x_1); x_682 = l_Lean_Elab_Tactic_throwError___rarg(x_1, x_681, x_4, x_642); if (lean_obj_tag(x_682) == 0) @@ -5126,7 +5126,7 @@ goto block_740; else { lean_object* x_741; lean_object* x_742; -x_741 = l_Lean_Elab_Term_withIncRecDepth___rarg___closed__2; +x_741 = l_Lean_Meta_withIncRecDepth___rarg___closed__2; lean_inc(x_1); x_742 = l_Lean_Elab_Tactic_throwError___rarg(x_1, x_741, x_4, x_702); if (lean_obj_tag(x_742) == 0) @@ -5405,7 +5405,7 @@ goto block_800; else { lean_object* x_801; lean_object* x_802; -x_801 = l_Lean_Elab_Term_withIncRecDepth___rarg___closed__2; +x_801 = l_Lean_Meta_withIncRecDepth___rarg___closed__2; lean_inc(x_1); x_802 = l_Lean_Elab_Tactic_throwError___rarg(x_1, x_801, x_4, x_762); if (lean_obj_tag(x_802) == 0) @@ -5684,7 +5684,7 @@ goto block_860; else { lean_object* x_861; lean_object* x_862; -x_861 = l_Lean_Elab_Term_withIncRecDepth___rarg___closed__2; +x_861 = l_Lean_Meta_withIncRecDepth___rarg___closed__2; lean_inc(x_1); x_862 = l_Lean_Elab_Tactic_throwError___rarg(x_1, x_861, x_4, x_822); if (lean_obj_tag(x_862) == 0) diff --git a/stage0/stdlib/Lean/Elab/Term.c b/stage0/stdlib/Lean/Elab/Term.c index 1c37e6aa2e..574fc73018 100644 --- a/stage0/stdlib/Lean/Elab/Term.c +++ b/stage0/stdlib/Lean/Elab/Term.c @@ -93,7 +93,6 @@ 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___regBuiltin_Lean_Elab_Term_elabQuotedName___closed__1; lean_object* lean_local_ctx_mk_let_decl(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -extern lean_object* l_Lean_maxRecDepthErrorMessage; lean_object* l_Lean_Elab_Term_getLocalInsts___boxed(lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_resettingSynthInstanceCacheWhen___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_getPos___at_Lean_Elab_Term_throwError___spec__2___boxed(lean_object*, lean_object*, lean_object*); @@ -132,6 +131,7 @@ lean_object* l_List_append___rarg(lean_object*, lean_object*); lean_object* l_Lean_Meta_Exception_mkAppTypeMismatchMessage(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_throwUnsupportedSyntax___rarg___closed__1; lean_object* l_Lean_Elab_Term_unfoldDefinition_x3f(lean_object*, lean_object*, lean_object*, lean_object*); +extern lean_object* l___private_Lean_Meta_AppBuilder_8__getDecLevel___closed__6; lean_object* l_Lean_Elab_Term_mkForallUsedOnly___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Parser_declareBuiltinParser___closed__5; lean_object* l_Lean_Elab_Term_synthesizeInstMVarCore___closed__6; @@ -275,7 +275,6 @@ lean_object* l_Lean_Meta_isClass(lean_object*, lean_object*, lean_object*); lean_object* l___regBuiltin_Lean_Elab_Term_elabHole(lean_object*); lean_object* l_Lean_Elab_Term_withTransparency(lean_object*); extern lean_object* l_Lean_Parser_Term_byTactic___elambda__1___closed__2; -lean_object* l_Lean_Elab_Term_withIncRecDepth___rarg___closed__1; extern lean_object* l_Lean_Meta_run___rarg___closed__5; lean_object* l___private_Lean_Elab_Term_7__isMonad_x3f___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_Lean_Elab_MonadMacroAdapter___lambda__2(lean_object*, lean_object*, lean_object*); @@ -293,7 +292,6 @@ lean_object* l___private_Lean_Elab_Term_17__elabOptLevel___boxed(lean_object*, l lean_object* l___private_Lean_Elab_Term_18__mkPairsAux___main___closed__3; lean_object* l_Lean_Elab_Term_tryPostponeIfNoneOrMVar(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_elabParen___closed__4; -lean_object* l_Lean_Elab_Term_withIncRecDepth___rarg___closed__2; lean_object* l_Lean_Elab_Term_elabLevel(lean_object*, lean_object*, lean_object*); lean_object* l___regBuiltin_Lean_Elab_Term_elabNamedHole(lean_object*); lean_object* l_Lean_Elab_Term_Lean_Elab_MonadMacroAdapter___lambda__1(lean_object*, lean_object*, lean_object*); @@ -305,6 +303,7 @@ lean_object* lean_array_fget(lean_object*, lean_object*); lean_object* l_Std_PersistentArray_foldlM___at___private_Lean_Elab_Term_3__fromMetaState___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_synthesizeInstMVarCore___closed__5; lean_object* l_Lean_Elab_Term_elabRawCharLit(lean_object*, lean_object*, lean_object*, lean_object*); +extern lean_object* l___private_Lean_Meta_AppBuilder_8__getDecLevel___closed__3; lean_object* l_Std_PersistentArray_foldlMAux___main___at___private_Lean_Elab_Term_3__fromMetaState___spec__2(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_mkFreshAnonymousName___rarg(lean_object*); lean_object* l_Lean_Elab_Term_MetaHasEval___rarg___closed__2; @@ -472,6 +471,7 @@ lean_object* l_Lean_Elab_Term_applyResult___boxed(lean_object*, lean_object*, le lean_object* l_Lean_Elab_Term_monadQuotation___closed__4; lean_object* l_Lean_Elab_Term_withLocalDecl___rarg(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_getMainModule(lean_object*); +extern lean_object* l_Lean_Meta_withIncRecDepth___rarg___closed__2; lean_object* l___private_Lean_Elab_Term_18__mkPairsAux___main___closed__4; lean_object* l_Lean_Elab_Term_throwUnsupportedSyntax___boxed(lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_mkTermElabAttribute(lean_object*); @@ -609,7 +609,6 @@ lean_object* l_Lean_Elab_Term_traceAtCmdPos(lean_object*, lean_object*, lean_obj lean_object* lean_environment_main_module(lean_object*); lean_object* l_Lean_Elab_Term_elabTacticBlock___closed__3; extern lean_object* l_Std_PersistentArray_empty___closed__3; -lean_object* l_Lean_Elab_Term_decLevel___closed__5; lean_object* l_Lean_Elab_Term_withReducible(lean_object*); lean_object* l_Lean_Elab_Term_elabUsingElabFns___closed__5; lean_object* l_Lean_Elab_Term_TermElabM_inhabited___rarg(lean_object*); @@ -636,7 +635,6 @@ lean_object* l___regBuiltin_Lean_Elab_Term_elabSort___closed__1; lean_object* l___private_Lean_Elab_Term_4__hasCDot___boxed(lean_object*); lean_object* l_ReaderT_bind___at_Lean_Elab_Term_monadLog___spec__2(lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_synthesizeInstMVarCore(lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Elab_Term_decLevel___closed__3; lean_object* l_Lean_Elab_Term_withTransparency___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Parser_Term_paren___elambda__1___closed__1; lean_object* l_Lean_Meta_isLevelDefEq(lean_object*, lean_object*, lean_object*, lean_object*); @@ -727,7 +725,6 @@ extern lean_object* l_Lean_prodToExpr___rarg___lambda__1___closed__3; lean_object* l_Lean_Elab_Term_logDbgTrace(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Syntax_isNameLit_x3f(lean_object*); lean_object* l_Lean_Elab_Term_getMainModule___boxed(lean_object*); -lean_object* l_Lean_Elab_Term_decLevel___closed__4; lean_object* l_Lean_Elab_Term_synthesizeInstMVarCore___closed__12; lean_object* l_Lean_Meta_mkLambda(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_Lean_Elab_MonadMacroAdapter___closed__3; @@ -811,9 +808,7 @@ lean_object* l_Lean_MetavarContext_getDecl(lean_object*, lean_object*); lean_object* l_Lean_Syntax_formatStxAux___main(lean_object*, uint8_t, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_resetSynthInstanceCache___boxed(lean_object*); uint8_t l_Std_PersistentArray_anyM___at_Lean_MessageLog_hasErrors___spec__1(lean_object*); -lean_object* l_Lean_Elab_Term_decLevel___closed__2; lean_object* l___private_Lean_Elab_Term_3__fromMetaState___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Elab_Term_decLevel___closed__1; lean_object* l___private_Lean_Elab_Term_12__isExplicit___boxed(lean_object*); lean_object* l_Lean_Elab_Term_Lean_Elab_MonadMacroAdapter___lambda__2___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_Lean_Elab_MonadMacroAdapter___closed__1; @@ -914,7 +909,6 @@ uint8_t lean_nat_dec_lt(lean_object*, lean_object*); lean_object* l_IO_println___at_IO_runMeta___spec__1(lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_Lean_Elab_MonadMacroAdapter___closed__6; lean_object* l_Lean_Elab_Term_tryLiftAndCoe___closed__3; -lean_object* l_Lean_Elab_Term_decLevel___closed__6; lean_object* lean_add_decl(lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_tryCoe___closed__3; lean_object* _init_l_Lean_Elab_Term_State_inhabited___closed__1() { @@ -2576,26 +2570,6 @@ lean_dec(x_2); return x_3; } } -lean_object* _init_l_Lean_Elab_Term_withIncRecDepth___rarg___closed__1() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_maxRecDepthErrorMessage; -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_withIncRecDepth___rarg___closed__2() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Elab_Term_withIncRecDepth___rarg___closed__1; -x_2 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_2, 0, x_1); -return x_2; -} -} lean_object* l_Lean_Elab_Term_withIncRecDepth___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { @@ -2650,7 +2624,7 @@ lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); lean_dec(x_2); -x_38 = l_Lean_Elab_Term_withIncRecDepth___rarg___closed__2; +x_38 = l_Lean_Meta_withIncRecDepth___rarg___closed__2; x_39 = l_Lean_Elab_Term_throwError___rarg(x_1, x_38, x_3, x_4); x_40 = !lean_is_exclusive(x_39); if (x_40 == 0) @@ -9501,62 +9475,6 @@ lean_dec(x_1); return x_5; } } -lean_object* _init_l_Lean_Elab_Term_decLevel___closed__1() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string("invalid universe level, "); -return x_1; -} -} -lean_object* _init_l_Lean_Elab_Term_decLevel___closed__2() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Elab_Term_decLevel___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_decLevel___closed__3() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Elab_Term_decLevel___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_decLevel___closed__4() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string(" is not greater than 0"); -return x_1; -} -} -lean_object* _init_l_Lean_Elab_Term_decLevel___closed__5() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Elab_Term_decLevel___closed__4; -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_decLevel___closed__6() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Elab_Term_decLevel___closed__5; -x_2 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_2, 0, x_1); -return x_2; -} -} lean_object* l_Lean_Elab_Term_decLevel(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { @@ -9577,11 +9495,11 @@ lean_inc(x_7); lean_dec(x_5); x_8 = lean_alloc_ctor(3, 1, 0); lean_ctor_set(x_8, 0, x_2); -x_9 = l_Lean_Elab_Term_decLevel___closed__3; +x_9 = l___private_Lean_Meta_AppBuilder_8__getDecLevel___closed__3; x_10 = lean_alloc_ctor(9, 2, 0); lean_ctor_set(x_10, 0, x_9); lean_ctor_set(x_10, 1, x_8); -x_11 = l_Lean_Elab_Term_decLevel___closed__6; +x_11 = l___private_Lean_Meta_AppBuilder_8__getDecLevel___closed__6; x_12 = lean_alloc_ctor(9, 2, 0); lean_ctor_set(x_12, 0, x_10); lean_ctor_set(x_12, 1, x_11); @@ -20043,7 +19961,7 @@ lean_dec(x_13); lean_dec(x_12); lean_dec(x_8); lean_dec(x_1); -x_208 = l_Lean_Elab_Term_withIncRecDepth___rarg___closed__2; +x_208 = l_Lean_Meta_withIncRecDepth___rarg___closed__2; x_209 = l_Lean_Elab_Term_throwError___rarg(x_4, x_208, x_5, x_6); lean_dec(x_4); x_210 = !lean_is_exclusive(x_209); @@ -20920,7 +20838,7 @@ lean_dec(x_215); lean_dec(x_214); lean_dec(x_8); lean_dec(x_1); -x_318 = l_Lean_Elab_Term_withIncRecDepth___rarg___closed__2; +x_318 = l_Lean_Meta_withIncRecDepth___rarg___closed__2; x_319 = l_Lean_Elab_Term_throwError___rarg(x_4, x_318, x_226, x_6); lean_dec(x_4); x_320 = lean_ctor_get(x_319, 0); @@ -21460,7 +21378,7 @@ lean_dec(x_334); lean_dec(x_333); lean_dec(x_329); lean_dec(x_1); -x_438 = l_Lean_Elab_Term_withIncRecDepth___rarg___closed__2; +x_438 = l_Lean_Meta_withIncRecDepth___rarg___closed__2; x_439 = l_Lean_Elab_Term_throwError___rarg(x_4, x_438, x_346, x_332); lean_dec(x_4); x_440 = lean_ctor_get(x_439, 0); @@ -31224,10 +31142,6 @@ l_Lean_Elab_Term_monadLog = _init_l_Lean_Elab_Term_monadLog(); lean_mark_persistent(l_Lean_Elab_Term_monadLog); l_Lean_Elab_Term_throwUnsupportedSyntax___rarg___closed__1 = _init_l_Lean_Elab_Term_throwUnsupportedSyntax___rarg___closed__1(); lean_mark_persistent(l_Lean_Elab_Term_throwUnsupportedSyntax___rarg___closed__1); -l_Lean_Elab_Term_withIncRecDepth___rarg___closed__1 = _init_l_Lean_Elab_Term_withIncRecDepth___rarg___closed__1(); -lean_mark_persistent(l_Lean_Elab_Term_withIncRecDepth___rarg___closed__1); -l_Lean_Elab_Term_withIncRecDepth___rarg___closed__2 = _init_l_Lean_Elab_Term_withIncRecDepth___rarg___closed__2(); -lean_mark_persistent(l_Lean_Elab_Term_withIncRecDepth___rarg___closed__2); l_Lean_Elab_Term_monadQuotation___closed__1 = _init_l_Lean_Elab_Term_monadQuotation___closed__1(); lean_mark_persistent(l_Lean_Elab_Term_monadQuotation___closed__1); l_Lean_Elab_Term_monadQuotation___closed__2 = _init_l_Lean_Elab_Term_monadQuotation___closed__2(); @@ -31287,18 +31201,6 @@ l_Lean_Elab_Term_throwErrorIfErrors___closed__2 = _init_l_Lean_Elab_Term_throwEr lean_mark_persistent(l_Lean_Elab_Term_throwErrorIfErrors___closed__2); l_Lean_Elab_Term_throwErrorIfErrors___closed__3 = _init_l_Lean_Elab_Term_throwErrorIfErrors___closed__3(); lean_mark_persistent(l_Lean_Elab_Term_throwErrorIfErrors___closed__3); -l_Lean_Elab_Term_decLevel___closed__1 = _init_l_Lean_Elab_Term_decLevel___closed__1(); -lean_mark_persistent(l_Lean_Elab_Term_decLevel___closed__1); -l_Lean_Elab_Term_decLevel___closed__2 = _init_l_Lean_Elab_Term_decLevel___closed__2(); -lean_mark_persistent(l_Lean_Elab_Term_decLevel___closed__2); -l_Lean_Elab_Term_decLevel___closed__3 = _init_l_Lean_Elab_Term_decLevel___closed__3(); -lean_mark_persistent(l_Lean_Elab_Term_decLevel___closed__3); -l_Lean_Elab_Term_decLevel___closed__4 = _init_l_Lean_Elab_Term_decLevel___closed__4(); -lean_mark_persistent(l_Lean_Elab_Term_decLevel___closed__4); -l_Lean_Elab_Term_decLevel___closed__5 = _init_l_Lean_Elab_Term_decLevel___closed__5(); -lean_mark_persistent(l_Lean_Elab_Term_decLevel___closed__5); -l_Lean_Elab_Term_decLevel___closed__6 = _init_l_Lean_Elab_Term_decLevel___closed__6(); -lean_mark_persistent(l_Lean_Elab_Term_decLevel___closed__6); l_Lean_Elab_Term_mkExplicitBinder___closed__1 = _init_l_Lean_Elab_Term_mkExplicitBinder___closed__1(); lean_mark_persistent(l_Lean_Elab_Term_mkExplicitBinder___closed__1); l_Lean_Elab_Term_mkExplicitBinder___closed__2 = _init_l_Lean_Elab_Term_mkExplicitBinder___closed__2(); diff --git a/stage0/stdlib/Lean/Eval.c b/stage0/stdlib/Lean/Eval.c index 2498ed44f5..f6565bb344 100644 --- a/stage0/stdlib/Lean/Eval.c +++ b/stage0/stdlib/Lean/Eval.c @@ -35,8 +35,54 @@ _start: lean_object* x_7; lean_object* x_8; x_7 = lean_box(x_5); x_8 = lean_apply_3(x_1, x_4, x_7, x_6); +if (lean_obj_tag(x_8) == 0) +{ +uint8_t x_9; +x_9 = !lean_is_exclusive(x_8); +if (x_9 == 0) +{ +lean_object* x_10; +x_10 = lean_ctor_get(x_8, 0); +lean_dec(x_10); +lean_ctor_set(x_8, 0, x_2); return x_8; } +else +{ +lean_object* x_11; lean_object* x_12; +x_11 = lean_ctor_get(x_8, 1); +lean_inc(x_11); +lean_dec(x_8); +x_12 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_12, 0, x_2); +lean_ctor_set(x_12, 1, x_11); +return x_12; +} +} +else +{ +uint8_t x_13; +lean_dec(x_2); +x_13 = !lean_is_exclusive(x_8); +if (x_13 == 0) +{ +return x_8; +} +else +{ +lean_object* x_14; lean_object* x_15; lean_object* x_16; +x_14 = lean_ctor_get(x_8, 0); +x_15 = lean_ctor_get(x_8, 1); +lean_inc(x_15); +lean_inc(x_14); +lean_dec(x_8); +x_16 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_16, 0, x_14); +lean_ctor_set(x_16, 1, x_15); +return x_16; +} +} +} } lean_object* l_Lean_metaHasEvalOfHasEval(lean_object* x_1) { _start: @@ -54,7 +100,6 @@ x_7 = lean_unbox(x_5); lean_dec(x_5); x_8 = l_Lean_metaHasEvalOfHasEval___rarg(x_1, x_2, x_3, x_4, x_7, x_6); lean_dec(x_3); -lean_dec(x_2); return x_8; } } diff --git a/stage0/stdlib/Lean/Expr.c b/stage0/stdlib/Lean/Expr.c index 21e8a211b4..f25d24cb31 100644 --- a/stage0/stdlib/Lean/Expr.c +++ b/stage0/stdlib/Lean/Expr.c @@ -29,6 +29,7 @@ lean_object* l_Lean_Expr_bindingDomain_x21___boxed(lean_object*); lean_object* l_Lean_Expr_letName_x21(lean_object*); uint8_t l_Lean_Expr_isNatLit(lean_object*); lean_object* l_Lean_Name_eraseMacroScopes(lean_object*); +lean_object* l_Lean_Expr_replaceFVar___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Expr_updateLambda___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Expr_getAppNumArgs___boxed(lean_object*); lean_object* lean_mk_empty_array_with_capacity(lean_object*); @@ -56,6 +57,7 @@ lean_object* l_Lean_mkDecIsFalse___closed__1; lean_object* l___private_Lean_Expr_10__hasAnyFVarAux(lean_object*, lean_object*); lean_object* l_Lean_ExprStructEq_Hashable___closed__1; lean_object* l_Lean_mkLocalEx___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Expr_replaceFVarId___boxed(lean_object*, lean_object*, lean_object*); lean_object* lean_expr_update_mdata(lean_object*, lean_object*); lean_object* l_Lean_Expr_bindingDomain_x21(lean_object*); lean_object* l_Lean_Expr_getAppArgs(lean_object*); @@ -225,6 +227,7 @@ uint8_t l_Lean_KVMap_getBool(lean_object*, lean_object*, uint8_t); lean_object* l_List_map___main___at_Lean_Expr_instantiateLevelParamsArray___spec__4(lean_object*, lean_object*, lean_object*); uint8_t l_Lean_Literal_beq(lean_object*, lean_object*); lean_object* l_Lean_Level_instantiateParams___main___at_Lean_Expr_instantiateLevelParams___spec__3___boxed(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Expr_replaceFVar(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Expr_headBeta(lean_object*); lean_object* l_Lean_BinderInfo_hasBeq___closed__1; uint8_t lean_expr_binder_info(lean_object*); @@ -329,6 +332,7 @@ lean_object* l_Lean_Expr_getAutoParamTactic_x3f___closed__2; lean_object* l_Lean_Level_instantiateParams___main(lean_object*, lean_object*); uint8_t l_Lean_Expr_isLambda(lean_object*); lean_object* l_Lean_Expr_updateSort_x21___closed__2; +lean_object* l_Lean_Expr_replaceFVarId(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_mkApp9(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Expr_data___boxed(lean_object*); lean_object* lean_expr_update_proj(lean_object*, lean_object*); @@ -502,6 +506,7 @@ lean_object* l_Lean_mkDecIsFalse___closed__3; lean_object* l_Lean_Expr_isHeadBetaTarget___boxed(lean_object*); lean_object* l___private_Lean_Expr_6__mkAppRevRangeAux___main___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Expr_Data_nonDepLet___boxed(lean_object*); +extern lean_object* l_Lean_mkOptionalNode___closed__2; lean_object* l___private_Lean_Expr_7__betaRevAux___main___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Expr_inferImplicit___main(lean_object*, lean_object*, uint8_t); lean_object* l_Lean_mkNatLit(lean_object*); @@ -6854,6 +6859,48 @@ lean_dec(x_1); return x_4; } } +lean_object* l_Lean_Expr_replaceFVar(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 = l_Lean_mkOptionalNode___closed__2; +x_5 = lean_array_push(x_4, x_2); +x_6 = lean_expr_abstract(x_1, x_5); +lean_dec(x_5); +x_7 = lean_expr_instantiate1(x_6, x_3); +lean_dec(x_6); +return x_7; +} +} +lean_object* l_Lean_Expr_replaceFVar___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; +x_4 = l_Lean_Expr_replaceFVar(x_1, x_2, x_3); +lean_dec(x_3); +lean_dec(x_1); +return x_4; +} +} +lean_object* l_Lean_Expr_replaceFVarId(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_mkFVar(x_2); +x_5 = l_Lean_Expr_replaceFVar(x_1, x_4, x_3); +return x_5; +} +} +lean_object* l_Lean_Expr_replaceFVarId___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; +x_4 = l_Lean_Expr_replaceFVarId(x_1, x_2, x_3); +lean_dec(x_3); +lean_dec(x_1); +return x_4; +} +} lean_object* _init_l_Lean_Expr_HasToString___closed__1() { _start: { @@ -8041,7 +8088,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___private_Lean_Expr_1__Expr_mkDataCore___closed__1; -x_2 = lean_unsigned_to_nat(823u); +x_2 = lean_unsigned_to_nat(829u); x_3 = lean_unsigned_to_nat(18u); x_4 = l_Lean_Expr_appFn_x21___closed__1; x_5 = l___private_Init_Util_1__mkPanicMessage(x_1, x_2, x_3, x_4); @@ -8083,7 +8130,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___private_Lean_Expr_1__Expr_mkDataCore___closed__1; -x_2 = lean_unsigned_to_nat(832u); +x_2 = lean_unsigned_to_nat(838u); x_3 = lean_unsigned_to_nat(18u); x_4 = l_Lean_Expr_constName_x21___closed__1; x_5 = l___private_Init_Util_1__mkPanicMessage(x_1, x_2, x_3, x_4); @@ -8132,7 +8179,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___private_Lean_Expr_1__Expr_mkDataCore___closed__1; -x_2 = lean_unsigned_to_nat(841u); +x_2 = lean_unsigned_to_nat(847u); x_3 = lean_unsigned_to_nat(14u); x_4 = l_Lean_Expr_updateSort_x21___closed__1; x_5 = l___private_Init_Util_1__mkPanicMessage(x_1, x_2, x_3, x_4); @@ -8189,7 +8236,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___private_Lean_Expr_1__Expr_mkDataCore___closed__1; -x_2 = lean_unsigned_to_nat(858u); +x_2 = lean_unsigned_to_nat(864u); x_3 = lean_unsigned_to_nat(17u); x_4 = l_Lean_Expr_updateMData_x21___closed__1; x_5 = l___private_Init_Util_1__mkPanicMessage(x_1, x_2, x_3, x_4); @@ -8230,7 +8277,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___private_Lean_Expr_1__Expr_mkDataCore___closed__1; -x_2 = lean_unsigned_to_nat(863u); +x_2 = lean_unsigned_to_nat(869u); x_3 = lean_unsigned_to_nat(18u); x_4 = l_Lean_Expr_updateProj_x21___closed__1; x_5 = l___private_Init_Util_1__mkPanicMessage(x_1, x_2, x_3, x_4); @@ -8281,7 +8328,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___private_Lean_Expr_1__Expr_mkDataCore___closed__1; -x_2 = lean_unsigned_to_nat(872u); +x_2 = lean_unsigned_to_nat(878u); x_3 = lean_unsigned_to_nat(21u); x_4 = l_Lean_Expr_updateForall_x21___closed__1; x_5 = l___private_Init_Util_1__mkPanicMessage(x_1, x_2, x_3, x_4); @@ -8325,7 +8372,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___private_Lean_Expr_1__Expr_mkDataCore___closed__1; -x_2 = lean_unsigned_to_nat(877u); +x_2 = lean_unsigned_to_nat(883u); x_3 = lean_unsigned_to_nat(21u); x_4 = l_Lean_Expr_updateForall_x21___closed__1; x_5 = l___private_Init_Util_1__mkPanicMessage(x_1, x_2, x_3, x_4); @@ -8379,7 +8426,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___private_Lean_Expr_1__Expr_mkDataCore___closed__1; -x_2 = lean_unsigned_to_nat(886u); +x_2 = lean_unsigned_to_nat(892u); x_3 = lean_unsigned_to_nat(17u); x_4 = l_Lean_Expr_updateLambda_x21___closed__1; x_5 = l___private_Init_Util_1__mkPanicMessage(x_1, x_2, x_3, x_4); @@ -8423,7 +8470,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___private_Lean_Expr_1__Expr_mkDataCore___closed__1; -x_2 = lean_unsigned_to_nat(891u); +x_2 = lean_unsigned_to_nat(897u); x_3 = lean_unsigned_to_nat(17u); x_4 = l_Lean_Expr_updateLambda_x21___closed__1; x_5 = l___private_Init_Util_1__mkPanicMessage(x_1, x_2, x_3, x_4); @@ -8467,7 +8514,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___private_Lean_Expr_1__Expr_mkDataCore___closed__1; -x_2 = lean_unsigned_to_nat(900u); +x_2 = lean_unsigned_to_nat(906u); x_3 = lean_unsigned_to_nat(20u); x_4 = l_Lean_Expr_letName_x21___closed__1; x_5 = l___private_Init_Util_1__mkPanicMessage(x_1, x_2, x_3, x_4); diff --git a/stage0/stdlib/Lean/Meta/AppBuilder.c b/stage0/stdlib/Lean/Meta/AppBuilder.c index e4d754ea14..592e5a29af 100644 --- a/stage0/stdlib/Lean/Meta/AppBuilder.c +++ b/stage0/stdlib/Lean/Meta/AppBuilder.c @@ -19,169 +19,231 @@ extern lean_object* l_Lean_Expr_eq_x3f___closed__2; lean_object* l_Lean_Expr_mvarId_x21(lean_object*); lean_object* l_Lean_Meta_mkHEqSymm___closed__2; lean_object* lean_mk_empty_array_with_capacity(lean_object*); +lean_object* l___private_Lean_Meta_AppBuilder_4__mkAppMAux___main___closed__5; lean_object* l_Lean_Meta_mkCongr___closed__1; +lean_object* l_Array_forMAux___main___at___private_Lean_Meta_AppBuilder_3__mkAppMFinal___spec__1(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_AppBuilder_4__mkAppMAux___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_mkApp6(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Expr_3__getAppArgsAux___main(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_mkHEqSymm___closed__1; lean_object* l_Lean_Meta_mkEqSymm___closed__1; +extern lean_object* l_Lean_MessageData_ofList___closed__3; +lean_object* l_Lean_Format_pretty(lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_AppBuilder_4__mkAppMAux___main___closed__3; +lean_object* l_Lean_Meta_mkProjection___main___closed__6; lean_object* l_Lean_Meta_mkAppM(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_mkPure___closed__2; +lean_object* l_Lean_Meta_mkHEqSymm___closed__4; lean_object* l_Lean_Meta_mkCongr___closed__2; lean_object* l_Lean_Meta_mkPure___closed__4; extern lean_object* l_Array_empty___closed__1; lean_object* lean_environment_find(lean_object*, lean_object*); -lean_object* l___private_Lean_Meta_AppBuilder_2__mkAppMFinal(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Meta_AppBuilder_3__mkAppMAux___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_mkEqOfHEq___closed__4; lean_object* l_Lean_Meta_mkPure___closed__1; lean_object* l_Lean_Meta_mkCongr(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_MessageData_arrayExpr_toMessageData___main(lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_AppBuilder_8__getDecLevel___closed__6; lean_object* l_Lean_Meta_mkCongrFun(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Level_dec___main(lean_object*); lean_object* l_Lean_Meta_mkEqRec(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_mkEqOfHEq___closed__8; lean_object* l_Lean_Expr_appFn_x21(lean_object*); uint8_t l_Lean_Expr_isAppOf(lean_object*, lean_object*); lean_object* l___private_Lean_Meta_AppBuilder_1__infer(lean_object*, lean_object*, lean_object*); extern lean_object* l___private_Lean_Meta_Basic_11__regTraceClasses___closed__2; lean_object* lean_array_push(lean_object*, lean_object*); lean_object* lean_array_get_size(lean_object*); -lean_object* lean_string_append(lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_AppBuilder_4__mkAppMAux___main___closed__4; lean_object* l_Lean_Expr_getAppFn___main(lean_object*); +lean_object* l_Lean_Meta_mkEqNDRec___closed__5; extern lean_object* l_Lean_Expr_getAppArgs___closed__1; lean_object* l_Lean_Meta_mkId___closed__1; +lean_object* l___private_Lean_Meta_AppBuilder_3__mkAppMFinal(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_mkEqMP(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Expr_appArg_x21(lean_object*); +lean_object* l___private_Lean_Meta_AppBuilder_4__mkAppMAux___main___closed__8; lean_object* l_Lean_getProjFnForField_x3f(lean_object*, lean_object*, lean_object*); -lean_object* l_List_mapM___main___at___private_Lean_Meta_AppBuilder_4__mkFun___spec__1(lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_mkTermIdFromIdent___closed__1; +extern lean_object* l_Lean_listToExpr___rarg___closed__4; lean_object* l_Lean_Meta_mkCongrArg___closed__2; lean_object* l_Lean_Meta_mkAppOptM(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_mkHEqSymm___closed__3; +lean_object* l___private_Lean_Meta_AppBuilder_4__mkAppMAux___main___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_mkEqNDRec___closed__3; lean_object* lean_nat_add(lean_object*, lean_object*); -lean_object* l___private_Lean_Meta_AppBuilder_5__mkAppOptMAux___main___closed__3; +lean_object* l_Lean_Meta_mkCongrArg___closed__4; lean_object* l_Lean_Meta_mkEqRefl(lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_AppBuilder_8__getDecLevel___closed__5; lean_object* l_Lean_Meta_mkPure___closed__3; lean_object* l___private_Lean_Util_Trace_2__addNode___at___private_Lean_Meta_LevelDefEq_10__processPostponedStep___spec__7(lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Meta_AppBuilder_2__mkAppMFinal___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Meta_AppBuilder_3__mkAppMAux___main___closed__2; -lean_object* l___private_Lean_Meta_AppBuilder_3__mkAppMAux___main(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Expr_getAppNumArgsAux___main(lean_object*, lean_object*); extern lean_object* l_Lean_Meta_Exception_toTraceMessageData___closed__68; lean_object* l_Lean_Meta_mkAppM___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_mkProjection___main___closed__9; lean_object* lean_array_fget(lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_AppBuilder_6__mkAppOptMAux___main(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_AppBuilder_8__getDecLevel___closed__3; lean_object* lean_expr_instantiate_rev_range(lean_object*, lean_object*, lean_object*, lean_object*); uint8_t lean_nat_dec_eq(lean_object*, lean_object*); lean_object* l_Lean_Meta_mkCongrArg___closed__1; +lean_object* l_Lean_Meta_mkProjection___main___closed__8; lean_object* l_Lean_Meta_mkEqSymm___closed__2; lean_object* lean_nat_sub(lean_object*, lean_object*); lean_object* l_Lean_Meta_mkEqMP___closed__1; lean_object* l_Lean_Meta_mkEqMP___closed__2; -lean_object* l_Array_forMAux___main___at___private_Lean_Meta_AppBuilder_2__mkAppMFinal___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_forMAux___main___at___private_Lean_Meta_AppBuilder_3__mkAppMFinal___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_mkProjection___main___closed__4; lean_object* l_Lean_Meta_mkNoConfusion___closed__3; lean_object* l_Lean_Meta_mkEqSymm(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_mkCongrArg___closed__3; -lean_object* l___private_Lean_Meta_AppBuilder_3__mkAppMAux(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Expr_heq_x3f___closed__2; +lean_object* l_Lean_Meta_mkEqNDRec___closed__6; lean_object* l_Lean_Meta_mkNoConfusion___closed__1; +lean_object* l___private_Lean_Meta_AppBuilder_8__getDecLevel(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_mkAppOptM___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_mkProjection___main___closed__1; +lean_object* l___private_Lean_Meta_AppBuilder_4__mkAppMAux___main___closed__6; lean_object* l_Lean_Meta_mkProjection___main___closed__2; lean_object* l_Lean_Meta_mkNoConfusion___closed__4; +lean_object* l___private_Lean_Meta_AppBuilder_4__mkAppMAux(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_mkNoConfusion___closed__2; lean_object* lean_instantiate_type_lparams(lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_AppBuilder_8__getDecLevel___closed__4; lean_object* l___private_Lean_Util_Trace_3__getResetTraces___at___private_Lean_Meta_LevelDefEq_10__processPostponedStep___spec__6___rarg(lean_object*); +lean_object* l_Lean_Meta_mkNoConfusion___closed__8; lean_object* l_Lean_Meta_mkId(lean_object*, lean_object*, lean_object*); -extern lean_object* l_Char_HasRepr___closed__1; -lean_object* l___private_Lean_Meta_AppBuilder_3__mkAppMAux___main___closed__3; +lean_object* l_Lean_Meta_mkListLit___closed__2; +extern lean_object* l_Lean_MessageData_coeOfArrayExpr___closed__2; lean_object* l_Lean_Meta_mkHEqRefl___closed__1; +lean_object* l_Lean_Meta_mkArrayLit(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_mkEqTrans___closed__1; lean_object* l_Lean_Meta_mkEqRec___closed__1; lean_object* lean_name_mk_string(lean_object*, lean_object*); -lean_object* l___private_Lean_Meta_AppBuilder_2__mkAppMFinal___closed__1; lean_object* l_Lean_getStructureFields(lean_object*, lean_object*); lean_object* l_Lean_Meta_mkEqNDRec(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_mkListLit___closed__1; +extern lean_object* l_Lean_Options_empty; extern lean_object* l_Lean_mkRecFor___closed__1; -lean_object* l_Array_iterateMAux___main___at___private_Lean_Meta_AppBuilder_5__mkAppOptMAux___main___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_AppBuilder_8__getDecLevel___closed__2; +lean_object* l_Lean_Meta_mkEqSymm___closed__5; lean_object* l_Lean_Meta_mkEqTrans___closed__2; lean_object* l_Lean_Meta_mkCongrFun___closed__1; lean_object* l_Array_findSomeMAux___main___at_Lean_Meta_mkProjection___main___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_mkArrayLit___closed__2; lean_object* l_Lean_mkLambda(lean_object*, uint8_t, lean_object*, lean_object*); lean_object* l_Lean_Meta_mkCongrFun___closed__2; lean_object* l_Lean_Meta_mkEqMPR___closed__2; lean_object* l_Lean_Meta_mkEqSymm___closed__3; +lean_object* l___private_Lean_Meta_AppBuilder_3__mkAppMFinal___closed__3; +lean_object* l___private_Lean_Meta_AppBuilder_7__mkListLitAux___main(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_mkEqNDRec___closed__4; uint8_t l_Lean_Expr_isForall(lean_object*); lean_object* l_Lean_Meta_mkEqRefl___closed__1; lean_object* l_Lean_Meta_whnf(lean_object*, lean_object*, lean_object*); lean_object* l_Array_iterateMAux___main___at_Array_append___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_mkArrayLit___closed__1; uint8_t l_Lean_Expr_isAppOfArity___main(lean_object*, lean_object*, lean_object*); uint8_t l_Lean_Expr_Data_binderInfo(uint64_t); lean_object* l_Lean_Meta_mkPure(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_mkEqOfHEq___closed__1; +lean_object* l_Array_iterateMAux___main___at___private_Lean_Meta_AppBuilder_6__mkAppOptMAux___main___spec__1(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_mkCongrFun___closed__4; lean_object* l_Lean_Meta_mkEqOfHEq___closed__2; lean_object* l_Lean_Meta_mkEqRefl___closed__2; +lean_object* l___private_Lean_Meta_AppBuilder_2__hasTypeMsg(lean_object*, lean_object*); lean_object* l_Lean_Meta_mkProjection(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_mkCongrArg___closed__5; lean_object* l_Lean_Meta_mkEqNDRec___closed__1; +lean_object* l___private_Lean_Meta_AppBuilder_6__mkAppOptMAux___main___closed__2; lean_object* l_Lean_ConstantInfo_lparams(lean_object*); lean_object* l_Lean_Meta_assignExprMVar(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_AppBuilder_6__mkAppOptMAux___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_AppBuilder_6__mkAppOptMAux___main___closed__4; +lean_object* l___private_Lean_Meta_AppBuilder_7__mkListLitAux___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_synthInstance(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_mkNoConfusion___closed__5; lean_object* l_Lean_Meta_hasAssignableMVar(lean_object*, lean_object*, lean_object*); -lean_object* l_Array_iterateMAux___main___at___private_Lean_Meta_AppBuilder_5__mkAppOptMAux___main___spec__1(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_AppBuilder_4__mkAppMAux___main___closed__7; +lean_object* l___private_Lean_Meta_AppBuilder_5__mkFun(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_mkEqNDRec___closed__2; -lean_object* l___private_Lean_Meta_AppBuilder_4__mkFun(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_mkEqSymm___closed__4; +lean_object* l___private_Lean_Meta_AppBuilder_4__mkAppMAux___main(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_List_mapM___main___at___private_Lean_Meta_AppBuilder_5__mkFun___spec__1___boxed(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_mkApp(lean_object*, lean_object*); lean_object* l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_Meta_isLevelDefEqAux___main___spec__2(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_mkHEqSymm(lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_AppBuilder_6__mkAppOptMAux___main___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_findSomeMAux___main___at_Lean_Meta_mkProjection___main___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_mkNoConfusion___closed__6; lean_object* l_Lean_mkApp5(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_mkAppM___closed__1; extern lean_object* l_Std_PersistentHashMap_mkCollisionNode___rarg___closed__1; +lean_object* l_List_mapM___main___at___private_Lean_Meta_AppBuilder_5__mkFun___spec__1(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_MetavarContext_incDepth(lean_object*); -lean_object* l___private_Lean_Meta_AppBuilder_3__mkAppMAux___main___closed__1; lean_object* l_Lean_Meta_mkEqMPR(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_mkEqTrans(lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Meta_AppBuilder_3__mkAppMAux___main___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_AppBuilder_7__mkListLitAux___main___boxed(lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_AppBuilder_8__getDecLevel___closed__1; lean_object* l_Lean_Meta_mkHEqTrans(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_AppBuilder_5__mkFun___boxed(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_mkEqOfHEq___closed__7; lean_object* l_Lean_mkApp4(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_getLevel(lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_AppBuilder_4__mkAppMAux___main___closed__1; lean_object* l_Lean_Meta_mkCongrArg(lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Meta_AppBuilder_5__mkAppOptMAux___main(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_AppBuilder_4__mkAppMAux___main___closed__2; +lean_object* l___private_Lean_Meta_AppBuilder_3__mkAppMFinal___closed__1; extern lean_object* l_Lean_mkAppStx___closed__9; +lean_object* l___private_Lean_Meta_AppBuilder_6__mkAppOptMAux___main___closed__5; lean_object* l_Lean_Meta_mkEqOfHEq___closed__3; +lean_object* l___private_Lean_Meta_AppBuilder_3__mkAppMFinal___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_mkEqMPR___closed__1; lean_object* l_Lean_Meta_inferType(lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_AppBuilder_6__mkAppOptMAux___main___closed__3; lean_object* l_Lean_Meta_isExprDefEq(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_getConstInfo(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_mkNoConfusion(lean_object*, lean_object*, lean_object*, lean_object*); uint8_t l_Lean_Expr_hasLooseBVars(lean_object*); lean_object* l_Lean_Meta_getMVarDecl(lean_object*, lean_object*, lean_object*); +extern lean_object* l_Lean_KernelException_toMessageData___closed__12; lean_object* l_Lean_Meta_instantiateMVars(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_isSubobjectField_x3f(lean_object*, lean_object*, lean_object*); lean_object* lean_mk_array(lean_object*, lean_object*); -lean_object* l_List_mapM___main___at___private_Lean_Meta_AppBuilder_4__mkFun___spec__1___boxed(lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_AppBuilder_6__mkAppOptMAux___main___closed__1; +lean_object* l_Lean_Meta_mkProjection___main___closed__7; lean_object* l_Lean_Meta_mkExpectedTypeHint(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_whnfD(lean_object*, lean_object*, lean_object*); +extern lean_object* l_Lean_arrayToExpr___rarg___lambda__1___closed__2; lean_object* l_Lean_Meta_mkFreshLevelMVar___rarg(lean_object*); -extern lean_object* l_Lean_mkOptionalNode___closed__2; +lean_object* l___private_Lean_Meta_AppBuilder_7__mkListLitAux(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_mkHEq(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_mkEqOfHEq___closed__5; lean_object* l_Lean_Meta_mkHEqTrans___closed__1; lean_object* l_Array_iterateMAux___main___at_Lean_mkAppN___spec__1(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Name_toStringWithSep___main(lean_object*, lean_object*); -lean_object* l___private_Lean_Meta_AppBuilder_4__mkFun___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_mkHEqRefl(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_mkProjection___main(lean_object*, lean_object*, lean_object*, lean_object*); uint8_t l_Lean_isStructureLike(lean_object*, lean_object*); lean_object* l_Lean_Meta_mkEq(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_mkAppB(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_mkProjection___main___closed__10; lean_object* l_Lean_mkApp8(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Array_forMAux___main___at___private_Lean_Meta_AppBuilder_2__mkAppMFinal___spec__1(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_indentExpr(lean_object*); +lean_object* l_Lean_Meta_mkListLit(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Level_format(lean_object*); lean_object* l_Lean_mkConst(lean_object*, lean_object*); +lean_object* l_Lean_Meta_mkProjection___main___closed__5; lean_object* l_Lean_Meta_mkEqOfHEq(lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Meta_AppBuilder_5__mkAppOptMAux___main___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Meta_AppBuilder_5__mkAppOptMAux___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Meta_AppBuilder_5__mkAppOptMAux___main___closed__2; -lean_object* l___private_Lean_Meta_AppBuilder_5__mkAppOptMAux(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Lean_Meta_AppBuilder_5__mkAppOptMAux___main___closed__1; +lean_object* l_Lean_Meta_mkCongrFun___closed__5; +lean_object* l_Lean_Meta_mkNoConfusion___closed__7; +lean_object* l___private_Lean_Meta_AppBuilder_6__mkAppOptMAux(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_mkCongrFun___closed__3; +extern lean_object* l_Lean_listToExpr___rarg___closed__6; lean_object* l_Lean_mkApp3(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_mkEqOfHEq___closed__6; +lean_object* l_Array_iterateMAux___main___at___private_Lean_Meta_AppBuilder_6__mkAppOptMAux___main___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_AppBuilder_3__mkAppMFinal___closed__2; uint8_t lean_nat_dec_lt(lean_object*, lean_object*); lean_object* l_Lean_Meta_mkProjection___main___closed__3; lean_object* _init_l_Lean_Meta_mkId___closed__1() { @@ -913,6 +975,30 @@ return x_11; } } } +lean_object* l___private_Lean_Meta_AppBuilder_2__hasTypeMsg(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; +x_3 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_3, 0, x_1); +x_4 = l_Lean_indentExpr(x_3); +x_5 = l_Lean_MessageData_ofList___closed__3; +x_6 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_6, 0, x_4); +lean_ctor_set(x_6, 1, x_5); +x_7 = l_Lean_KernelException_toMessageData___closed__12; +x_8 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_8, 0, x_6); +lean_ctor_set(x_8, 1, x_7); +x_9 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_9, 0, x_2); +x_10 = l_Lean_indentExpr(x_9); +x_11 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_11, 0, x_8); +lean_ctor_set(x_11, 1, x_10); +return x_11; +} +} lean_object* _init_l_Lean_Meta_mkEqSymm___closed__1() { _start: { @@ -939,6 +1025,26 @@ x_1 = lean_mk_string("equality proof expected"); return x_1; } } +lean_object* _init_l_Lean_Meta_mkEqSymm___closed__4() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Meta_mkEqSymm___closed__3; +x_2 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* _init_l_Lean_Meta_mkEqSymm___closed__5() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Meta_mkEqSymm___closed__4; +x_2 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} lean_object* l_Lean_Meta_mkEqSymm(lean_object* x_1, lean_object* x_2, lean_object* x_3) { _start: { @@ -966,7 +1072,6 @@ x_12 = l_Lean_Expr_isAppOfArity___main(x_8, x_10, x_11); if (x_12 == 0) { lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; -lean_dec(x_8); x_13 = lean_ctor_get(x_9, 0); lean_inc(x_13); x_14 = lean_ctor_get(x_9, 1); @@ -984,15 +1089,16 @@ lean_ctor_set(x_18, 0, x_13); lean_ctor_set(x_18, 1, x_14); lean_ctor_set(x_18, 2, x_15); lean_ctor_set(x_18, 3, x_17); -x_19 = l_Lean_mkOptionalNode___closed__2; -x_20 = lean_array_push(x_19, x_1); -x_21 = l_Lean_Meta_mkEqSymm___closed__2; -x_22 = l_Lean_Meta_mkEqSymm___closed__3; -x_23 = lean_alloc_ctor(16, 4, 0); -lean_ctor_set(x_23, 0, x_21); -lean_ctor_set(x_23, 1, x_22); -lean_ctor_set(x_23, 2, x_20); -lean_ctor_set(x_23, 3, x_18); +x_19 = l___private_Lean_Meta_AppBuilder_2__hasTypeMsg(x_1, x_8); +x_20 = l_Lean_Meta_mkEqSymm___closed__5; +x_21 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_21, 0, x_20); +lean_ctor_set(x_21, 1, x_19); +x_22 = l_Lean_Meta_mkEqSymm___closed__2; +x_23 = lean_alloc_ctor(16, 3, 0); +lean_ctor_set(x_23, 0, x_22); +lean_ctor_set(x_23, 1, x_21); +lean_ctor_set(x_23, 2, x_18); lean_ctor_set_tag(x_6, 1); lean_ctor_set(x_6, 0, x_23); return x_6; @@ -1092,7 +1198,6 @@ x_53 = l_Lean_Expr_isAppOfArity___main(x_49, x_51, x_52); if (x_53 == 0) { lean_object* x_54; lean_object* x_55; lean_object* x_56; lean_object* x_57; lean_object* x_58; lean_object* x_59; lean_object* x_60; lean_object* x_61; lean_object* x_62; lean_object* x_63; lean_object* x_64; lean_object* x_65; -lean_dec(x_49); x_54 = lean_ctor_get(x_50, 0); lean_inc(x_54); x_55 = lean_ctor_get(x_50, 1); @@ -1110,15 +1215,16 @@ lean_ctor_set(x_59, 0, x_54); lean_ctor_set(x_59, 1, x_55); lean_ctor_set(x_59, 2, x_56); lean_ctor_set(x_59, 3, x_58); -x_60 = l_Lean_mkOptionalNode___closed__2; -x_61 = lean_array_push(x_60, x_1); -x_62 = l_Lean_Meta_mkEqSymm___closed__2; -x_63 = l_Lean_Meta_mkEqSymm___closed__3; -x_64 = lean_alloc_ctor(16, 4, 0); -lean_ctor_set(x_64, 0, x_62); -lean_ctor_set(x_64, 1, x_63); -lean_ctor_set(x_64, 2, x_61); -lean_ctor_set(x_64, 3, x_59); +x_60 = l___private_Lean_Meta_AppBuilder_2__hasTypeMsg(x_1, x_49); +x_61 = l_Lean_Meta_mkEqSymm___closed__5; +x_62 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_62, 0, x_61); +lean_ctor_set(x_62, 1, x_60); +x_63 = l_Lean_Meta_mkEqSymm___closed__2; +x_64 = lean_alloc_ctor(16, 3, 0); +lean_ctor_set(x_64, 0, x_63); +lean_ctor_set(x_64, 1, x_62); +lean_ctor_set(x_64, 2, x_59); x_65 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_65, 0, x_64); lean_ctor_set(x_65, 1, x_50); @@ -1289,7 +1395,7 @@ lean_inc(x_2); x_12 = l___private_Lean_Meta_AppBuilder_1__infer(x_2, x_3, x_10); if (lean_obj_tag(x_12) == 0) { -lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_59; lean_object* x_92; lean_object* x_93; uint8_t x_94; uint8_t x_95; +lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_58; lean_object* x_90; lean_object* x_91; uint8_t x_92; uint8_t x_93; x_13 = lean_ctor_get(x_12, 0); lean_inc(x_13); x_14 = lean_ctor_get(x_12, 1); @@ -1302,105 +1408,105 @@ if (lean_is_exclusive(x_12)) { lean_dec_ref(x_12); x_15 = lean_box(0); } -x_92 = l_Lean_Expr_eq_x3f___closed__2; -x_93 = lean_unsigned_to_nat(3u); -x_94 = l_Lean_Expr_isAppOfArity___main(x_9, x_92, x_93); -x_95 = l_Lean_Expr_isAppOfArity___main(x_13, x_92, x_93); -if (x_94 == 0) +x_90 = l_Lean_Expr_eq_x3f___closed__2; +x_91 = lean_unsigned_to_nat(3u); +x_92 = l_Lean_Expr_isAppOfArity___main(x_9, x_90, x_91); +x_93 = l_Lean_Expr_isAppOfArity___main(x_13, x_90, x_91); +if (x_92 == 0) { -lean_dec(x_9); -if (x_95 == 0) +if (x_93 == 0) { -lean_object* x_96; lean_object* x_97; lean_object* x_98; lean_object* x_99; lean_object* x_100; lean_object* x_101; lean_object* x_102; lean_object* x_103; lean_object* x_104; lean_object* x_105; lean_object* x_106; lean_object* x_107; lean_object* x_108; +lean_object* x_94; lean_object* x_95; lean_object* x_96; lean_object* x_97; lean_object* x_98; lean_object* x_99; lean_object* x_100; lean_object* x_101; lean_object* x_102; lean_object* x_103; lean_object* x_104; lean_object* x_105; lean_dec(x_15); lean_dec(x_13); lean_dec(x_11); -x_96 = lean_ctor_get(x_14, 0); +lean_dec(x_2); +x_94 = lean_ctor_get(x_14, 0); +lean_inc(x_94); +x_95 = lean_ctor_get(x_14, 1); +lean_inc(x_95); +x_96 = lean_ctor_get(x_3, 1); lean_inc(x_96); -x_97 = lean_ctor_get(x_14, 1); +x_97 = lean_ctor_get(x_3, 0); lean_inc(x_97); -x_98 = lean_ctor_get(x_3, 1); -lean_inc(x_98); -x_99 = lean_ctor_get(x_3, 0); -lean_inc(x_99); lean_dec(x_3); -x_100 = lean_ctor_get(x_99, 0); -lean_inc(x_100); -lean_dec(x_99); -x_101 = lean_alloc_ctor(0, 4, 0); -lean_ctor_set(x_101, 0, x_96); -lean_ctor_set(x_101, 1, x_97); -lean_ctor_set(x_101, 2, x_98); -lean_ctor_set(x_101, 3, x_100); -x_102 = l_Lean_mkAppStx___closed__9; -x_103 = lean_array_push(x_102, x_1); -x_104 = lean_array_push(x_103, x_2); -x_105 = l_Lean_Meta_mkEqTrans___closed__2; -x_106 = l_Lean_Meta_mkEqSymm___closed__3; -x_107 = lean_alloc_ctor(16, 4, 0); -lean_ctor_set(x_107, 0, x_105); -lean_ctor_set(x_107, 1, x_106); -lean_ctor_set(x_107, 2, x_104); -lean_ctor_set(x_107, 3, x_101); -x_108 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_108, 0, x_107); -lean_ctor_set(x_108, 1, x_14); -return x_108; +x_98 = lean_ctor_get(x_97, 0); +lean_inc(x_98); +lean_dec(x_97); +x_99 = lean_alloc_ctor(0, 4, 0); +lean_ctor_set(x_99, 0, x_94); +lean_ctor_set(x_99, 1, x_95); +lean_ctor_set(x_99, 2, x_96); +lean_ctor_set(x_99, 3, x_98); +x_100 = l___private_Lean_Meta_AppBuilder_2__hasTypeMsg(x_1, x_9); +x_101 = l_Lean_Meta_mkEqSymm___closed__5; +x_102 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_102, 0, x_101); +lean_ctor_set(x_102, 1, x_100); +x_103 = l_Lean_Meta_mkEqTrans___closed__2; +x_104 = lean_alloc_ctor(16, 3, 0); +lean_ctor_set(x_104, 0, x_103); +lean_ctor_set(x_104, 1, x_102); +lean_ctor_set(x_104, 2, x_99); +x_105 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_105, 0, x_104); +lean_ctor_set(x_105, 1, x_14); +return x_105; } else { -lean_object* x_109; -x_109 = lean_box(0); -x_59 = x_109; -goto block_91; +lean_object* x_106; +x_106 = lean_box(0); +x_58 = x_106; +goto block_89; } } 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; -x_110 = l_Lean_Expr_appFn_x21(x_9); -x_111 = l_Lean_Expr_appFn_x21(x_110); -x_112 = l_Lean_Expr_appArg_x21(x_111); -lean_dec(x_111); -x_113 = l_Lean_Expr_appArg_x21(x_110); -lean_dec(x_110); -x_114 = l_Lean_Expr_appArg_x21(x_9); -lean_dec(x_9); -x_115 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_115, 0, x_113); -lean_ctor_set(x_115, 1, x_114); -x_116 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_116, 0, x_112); -lean_ctor_set(x_116, 1, x_115); -if (x_95 == 0) +lean_object* x_107; lean_object* x_108; lean_object* x_109; lean_object* x_110; lean_object* x_111; lean_object* x_112; lean_object* x_113; +x_107 = l_Lean_Expr_appFn_x21(x_9); +x_108 = l_Lean_Expr_appFn_x21(x_107); +x_109 = l_Lean_Expr_appArg_x21(x_108); +lean_dec(x_108); +x_110 = l_Lean_Expr_appArg_x21(x_107); +lean_dec(x_107); +x_111 = l_Lean_Expr_appArg_x21(x_9); +x_112 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_112, 0, x_110); +lean_ctor_set(x_112, 1, x_111); +x_113 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_113, 0, x_109); +lean_ctor_set(x_113, 1, x_112); +if (x_93 == 0) { -lean_object* x_117; -lean_dec(x_13); +lean_object* x_114; lean_dec(x_11); -x_117 = lean_box(0); -x_16 = x_117; -x_17 = x_116; -goto block_58; +lean_dec(x_9); +x_114 = lean_box(0); +x_16 = x_114; +x_17 = x_113; +goto block_57; } else { -lean_object* x_118; -x_118 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_118, 0, x_116); -x_59 = x_118; -goto block_91; +lean_object* x_115; +x_115 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_115, 0, x_113); +x_58 = x_115; +goto block_89; } } -block_58: +block_57: { lean_object* x_18; x_18 = lean_ctor_get(x_17, 1); lean_inc(x_18); if (lean_obj_tag(x_16) == 0) { -lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; +lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_dec(x_18); lean_dec(x_17); +lean_dec(x_1); x_19 = lean_ctor_get(x_14, 0); lean_inc(x_19); x_20 = lean_ctor_get(x_14, 1); @@ -1418,293 +1524,294 @@ lean_ctor_set(x_24, 0, x_19); lean_ctor_set(x_24, 1, x_20); lean_ctor_set(x_24, 2, x_21); lean_ctor_set(x_24, 3, x_23); -x_25 = l_Lean_mkAppStx___closed__9; -x_26 = lean_array_push(x_25, x_1); -x_27 = lean_array_push(x_26, x_2); +x_25 = l___private_Lean_Meta_AppBuilder_2__hasTypeMsg(x_2, x_13); +x_26 = l_Lean_Meta_mkEqSymm___closed__5; +x_27 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_27, 0, x_26); +lean_ctor_set(x_27, 1, x_25); x_28 = l_Lean_Meta_mkEqTrans___closed__2; -x_29 = l_Lean_Meta_mkEqSymm___closed__3; -x_30 = lean_alloc_ctor(16, 4, 0); -lean_ctor_set(x_30, 0, x_28); -lean_ctor_set(x_30, 1, x_29); -lean_ctor_set(x_30, 2, x_27); -lean_ctor_set(x_30, 3, x_24); +x_29 = lean_alloc_ctor(16, 3, 0); +lean_ctor_set(x_29, 0, x_28); +lean_ctor_set(x_29, 1, x_27); +lean_ctor_set(x_29, 2, x_24); if (lean_is_scalar(x_15)) { - x_31 = lean_alloc_ctor(1, 2, 0); + x_30 = lean_alloc_ctor(1, 2, 0); } else { - x_31 = x_15; - lean_ctor_set_tag(x_31, 1); + x_30 = x_15; + lean_ctor_set_tag(x_30, 1); } -lean_ctor_set(x_31, 0, x_30); -lean_ctor_set(x_31, 1, x_14); -return x_31; +lean_ctor_set(x_30, 0, x_29); +lean_ctor_set(x_30, 1, x_14); +return x_30; } else { -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_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_dec(x_15); -x_32 = lean_ctor_get(x_16, 0); -lean_inc(x_32); +lean_dec(x_13); +x_31 = lean_ctor_get(x_16, 0); +lean_inc(x_31); lean_dec(x_16); -x_33 = lean_ctor_get(x_32, 1); +x_32 = lean_ctor_get(x_31, 1); +lean_inc(x_32); +lean_dec(x_31); +x_33 = lean_ctor_get(x_17, 0); lean_inc(x_33); -lean_dec(x_32); -x_34 = lean_ctor_get(x_17, 0); -lean_inc(x_34); lean_dec(x_17); -x_35 = lean_ctor_get(x_18, 0); -lean_inc(x_35); -x_36 = lean_ctor_get(x_18, 1); -lean_inc(x_36); -lean_dec(x_18); -x_37 = lean_ctor_get(x_33, 1); -lean_inc(x_37); -lean_dec(x_33); +x_34 = lean_ctor_get(x_18, 0); lean_inc(x_34); -x_38 = l_Lean_Meta_getLevel(x_34, x_3, x_14); -if (lean_obj_tag(x_38) == 0) +x_35 = lean_ctor_get(x_18, 1); +lean_inc(x_35); +lean_dec(x_18); +x_36 = lean_ctor_get(x_32, 1); +lean_inc(x_36); +lean_dec(x_32); +lean_inc(x_33); +x_37 = l_Lean_Meta_getLevel(x_33, x_3, x_14); +if (lean_obj_tag(x_37) == 0) { -uint8_t x_39; -x_39 = !lean_is_exclusive(x_38); -if (x_39 == 0) +uint8_t x_38; +x_38 = !lean_is_exclusive(x_37); +if (x_38 == 0) { -lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; -x_40 = lean_ctor_get(x_38, 0); -x_41 = lean_box(0); -x_42 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_42, 0, x_40); -lean_ctor_set(x_42, 1, x_41); -x_43 = l_Lean_Meta_mkEqTrans___closed__2; -x_44 = l_Lean_mkConst(x_43, x_42); -x_45 = l_Lean_mkApp6(x_44, x_34, x_35, x_36, x_37, x_1, x_2); -lean_ctor_set(x_38, 0, x_45); -return 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_39 = lean_ctor_get(x_37, 0); +x_40 = lean_box(0); +x_41 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_41, 0, x_39); +lean_ctor_set(x_41, 1, x_40); +x_42 = l_Lean_Meta_mkEqTrans___closed__2; +x_43 = l_Lean_mkConst(x_42, x_41); +x_44 = l_Lean_mkApp6(x_43, x_33, x_34, x_35, x_36, x_1, x_2); +lean_ctor_set(x_37, 0, x_44); +return x_37; } else { -lean_object* x_46; lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_object* x_51; lean_object* x_52; lean_object* x_53; -x_46 = lean_ctor_get(x_38, 0); -x_47 = lean_ctor_get(x_38, 1); -lean_inc(x_47); +lean_object* x_45; lean_object* x_46; lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_object* x_51; lean_object* x_52; +x_45 = lean_ctor_get(x_37, 0); +x_46 = lean_ctor_get(x_37, 1); lean_inc(x_46); -lean_dec(x_38); -x_48 = lean_box(0); -x_49 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_49, 0, x_46); -lean_ctor_set(x_49, 1, x_48); -x_50 = l_Lean_Meta_mkEqTrans___closed__2; -x_51 = l_Lean_mkConst(x_50, x_49); -x_52 = l_Lean_mkApp6(x_51, x_34, x_35, x_36, x_37, x_1, x_2); -x_53 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_53, 0, x_52); -lean_ctor_set(x_53, 1, x_47); -return x_53; +lean_inc(x_45); +lean_dec(x_37); +x_47 = lean_box(0); +x_48 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_48, 0, x_45); +lean_ctor_set(x_48, 1, x_47); +x_49 = l_Lean_Meta_mkEqTrans___closed__2; +x_50 = l_Lean_mkConst(x_49, x_48); +x_51 = l_Lean_mkApp6(x_50, x_33, x_34, x_35, x_36, x_1, x_2); +x_52 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_52, 0, x_51); +lean_ctor_set(x_52, 1, x_46); +return x_52; } } else { -uint8_t x_54; -lean_dec(x_37); +uint8_t x_53; lean_dec(x_36); lean_dec(x_35); lean_dec(x_34); +lean_dec(x_33); lean_dec(x_2); lean_dec(x_1); -x_54 = !lean_is_exclusive(x_38); -if (x_54 == 0) +x_53 = !lean_is_exclusive(x_37); +if (x_53 == 0) { -return x_38; +return x_37; } else { -lean_object* x_55; lean_object* x_56; lean_object* x_57; -x_55 = lean_ctor_get(x_38, 0); -x_56 = lean_ctor_get(x_38, 1); -lean_inc(x_56); +lean_object* x_54; lean_object* x_55; lean_object* x_56; +x_54 = lean_ctor_get(x_37, 0); +x_55 = lean_ctor_get(x_37, 1); lean_inc(x_55); -lean_dec(x_38); -x_57 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_57, 0, x_55); -lean_ctor_set(x_57, 1, x_56); -return x_57; +lean_inc(x_54); +lean_dec(x_37); +x_56 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_56, 0, x_54); +lean_ctor_set(x_56, 1, x_55); +return x_56; } } } } -block_91: +block_89: { -if (lean_obj_tag(x_59) == 0) +if (lean_obj_tag(x_58) == 0) { -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_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_dec(x_15); lean_dec(x_13); -x_60 = lean_ctor_get(x_14, 0); +lean_dec(x_2); +x_59 = lean_ctor_get(x_14, 0); +lean_inc(x_59); +x_60 = lean_ctor_get(x_14, 1); lean_inc(x_60); -x_61 = lean_ctor_get(x_14, 1); +x_61 = lean_ctor_get(x_3, 1); lean_inc(x_61); -x_62 = lean_ctor_get(x_3, 1); +x_62 = lean_ctor_get(x_3, 0); lean_inc(x_62); -x_63 = lean_ctor_get(x_3, 0); -lean_inc(x_63); lean_dec(x_3); -x_64 = lean_ctor_get(x_63, 0); -lean_inc(x_64); -lean_dec(x_63); -x_65 = lean_alloc_ctor(0, 4, 0); -lean_ctor_set(x_65, 0, x_60); -lean_ctor_set(x_65, 1, x_61); -lean_ctor_set(x_65, 2, x_62); -lean_ctor_set(x_65, 3, x_64); -x_66 = l_Lean_mkAppStx___closed__9; -x_67 = lean_array_push(x_66, x_1); -x_68 = lean_array_push(x_67, x_2); -x_69 = l_Lean_Meta_mkEqTrans___closed__2; -x_70 = l_Lean_Meta_mkEqSymm___closed__3; -x_71 = lean_alloc_ctor(16, 4, 0); -lean_ctor_set(x_71, 0, x_69); -lean_ctor_set(x_71, 1, x_70); -lean_ctor_set(x_71, 2, x_68); -lean_ctor_set(x_71, 3, x_65); +x_63 = lean_ctor_get(x_62, 0); +lean_inc(x_63); +lean_dec(x_62); +x_64 = lean_alloc_ctor(0, 4, 0); +lean_ctor_set(x_64, 0, x_59); +lean_ctor_set(x_64, 1, x_60); +lean_ctor_set(x_64, 2, x_61); +lean_ctor_set(x_64, 3, x_63); +x_65 = l___private_Lean_Meta_AppBuilder_2__hasTypeMsg(x_1, x_9); +x_66 = l_Lean_Meta_mkEqSymm___closed__5; +x_67 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_67, 0, x_66); +lean_ctor_set(x_67, 1, x_65); +x_68 = l_Lean_Meta_mkEqTrans___closed__2; +x_69 = lean_alloc_ctor(16, 3, 0); +lean_ctor_set(x_69, 0, x_68); +lean_ctor_set(x_69, 1, x_67); +lean_ctor_set(x_69, 2, x_64); if (lean_is_scalar(x_11)) { - x_72 = lean_alloc_ctor(1, 2, 0); + x_70 = lean_alloc_ctor(1, 2, 0); } else { - x_72 = x_11; - lean_ctor_set_tag(x_72, 1); + x_70 = x_11; + lean_ctor_set_tag(x_70, 1); } -lean_ctor_set(x_72, 0, x_71); -lean_ctor_set(x_72, 1, x_14); -return x_72; +lean_ctor_set(x_70, 0, x_69); +lean_ctor_set(x_70, 1, x_14); +return x_70; } else { -uint8_t x_73; +uint8_t x_71; lean_dec(x_11); -x_73 = !lean_is_exclusive(x_59); -if (x_73 == 0) +lean_dec(x_9); +x_71 = !lean_is_exclusive(x_58); +if (x_71 == 0) { -lean_object* x_74; lean_object* x_75; lean_object* x_76; lean_object* x_77; lean_object* x_78; lean_object* x_79; lean_object* x_80; lean_object* x_81; -x_74 = lean_ctor_get(x_59, 0); -x_75 = l_Lean_Expr_appFn_x21(x_13); -x_76 = l_Lean_Expr_appFn_x21(x_75); -x_77 = l_Lean_Expr_appArg_x21(x_76); -lean_dec(x_76); -x_78 = l_Lean_Expr_appArg_x21(x_75); -lean_dec(x_75); -x_79 = l_Lean_Expr_appArg_x21(x_13); -lean_dec(x_13); -x_80 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_80, 0, x_78); -lean_ctor_set(x_80, 1, x_79); -x_81 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_81, 0, x_77); -lean_ctor_set(x_81, 1, x_80); -lean_ctor_set(x_59, 0, x_81); -x_16 = x_59; -x_17 = x_74; -goto block_58; +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_72 = lean_ctor_get(x_58, 0); +x_73 = l_Lean_Expr_appFn_x21(x_13); +x_74 = l_Lean_Expr_appFn_x21(x_73); +x_75 = l_Lean_Expr_appArg_x21(x_74); +lean_dec(x_74); +x_76 = l_Lean_Expr_appArg_x21(x_73); +lean_dec(x_73); +x_77 = l_Lean_Expr_appArg_x21(x_13); +x_78 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_78, 0, x_76); +lean_ctor_set(x_78, 1, x_77); +x_79 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_79, 0, x_75); +lean_ctor_set(x_79, 1, x_78); +lean_ctor_set(x_58, 0, x_79); +x_16 = x_58; +x_17 = x_72; +goto block_57; } else { -lean_object* x_82; lean_object* x_83; lean_object* x_84; lean_object* x_85; lean_object* x_86; lean_object* x_87; lean_object* x_88; lean_object* x_89; lean_object* x_90; -x_82 = lean_ctor_get(x_59, 0); -lean_inc(x_82); -lean_dec(x_59); -x_83 = l_Lean_Expr_appFn_x21(x_13); -x_84 = l_Lean_Expr_appFn_x21(x_83); -x_85 = l_Lean_Expr_appArg_x21(x_84); -lean_dec(x_84); -x_86 = l_Lean_Expr_appArg_x21(x_83); -lean_dec(x_83); -x_87 = l_Lean_Expr_appArg_x21(x_13); -lean_dec(x_13); -x_88 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_88, 0, x_86); -lean_ctor_set(x_88, 1, x_87); -x_89 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_89, 0, x_85); -lean_ctor_set(x_89, 1, x_88); -x_90 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_90, 0, x_89); -x_16 = x_90; -x_17 = x_82; -goto block_58; +lean_object* x_80; lean_object* x_81; lean_object* x_82; lean_object* x_83; lean_object* x_84; lean_object* x_85; lean_object* x_86; lean_object* x_87; lean_object* x_88; +x_80 = lean_ctor_get(x_58, 0); +lean_inc(x_80); +lean_dec(x_58); +x_81 = l_Lean_Expr_appFn_x21(x_13); +x_82 = l_Lean_Expr_appFn_x21(x_81); +x_83 = l_Lean_Expr_appArg_x21(x_82); +lean_dec(x_82); +x_84 = l_Lean_Expr_appArg_x21(x_81); +lean_dec(x_81); +x_85 = l_Lean_Expr_appArg_x21(x_13); +x_86 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_86, 0, x_84); +lean_ctor_set(x_86, 1, x_85); +x_87 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_87, 0, x_83); +lean_ctor_set(x_87, 1, x_86); +x_88 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_88, 0, x_87); +x_16 = x_88; +x_17 = x_80; +goto block_57; } } } } else { -uint8_t x_119; +uint8_t x_116; lean_dec(x_11); lean_dec(x_9); lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); -x_119 = !lean_is_exclusive(x_12); -if (x_119 == 0) +x_116 = !lean_is_exclusive(x_12); +if (x_116 == 0) { return x_12; } else { -lean_object* x_120; lean_object* x_121; lean_object* x_122; -x_120 = lean_ctor_get(x_12, 0); -x_121 = lean_ctor_get(x_12, 1); -lean_inc(x_121); -lean_inc(x_120); +lean_object* x_117; lean_object* x_118; lean_object* x_119; +x_117 = lean_ctor_get(x_12, 0); +x_118 = lean_ctor_get(x_12, 1); +lean_inc(x_118); +lean_inc(x_117); lean_dec(x_12); -x_122 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_122, 0, x_120); -lean_ctor_set(x_122, 1, x_121); -return x_122; +x_119 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_119, 0, x_117); +lean_ctor_set(x_119, 1, x_118); +return x_119; } } } else { -uint8_t x_123; +uint8_t x_120; lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); -x_123 = !lean_is_exclusive(x_8); -if (x_123 == 0) +x_120 = !lean_is_exclusive(x_8); +if (x_120 == 0) { return x_8; } else { -lean_object* x_124; lean_object* x_125; lean_object* x_126; -x_124 = lean_ctor_get(x_8, 0); -x_125 = lean_ctor_get(x_8, 1); -lean_inc(x_125); -lean_inc(x_124); +lean_object* x_121; lean_object* x_122; lean_object* x_123; +x_121 = lean_ctor_get(x_8, 0); +x_122 = lean_ctor_get(x_8, 1); +lean_inc(x_122); +lean_inc(x_121); lean_dec(x_8); -x_126 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_126, 0, x_124); -lean_ctor_set(x_126, 1, x_125); -return x_126; +x_123 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_123, 0, x_121); +lean_ctor_set(x_123, 1, x_122); +return x_123; } } } else { -lean_object* x_127; +lean_object* x_124; lean_dec(x_3); lean_dec(x_2); -x_127 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_127, 0, x_1); -lean_ctor_set(x_127, 1, x_4); -return x_127; +x_124 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_124, 0, x_1); +lean_ctor_set(x_124, 1, x_4); +return x_124; } } else { -lean_object* x_128; +lean_object* x_125; lean_dec(x_3); lean_dec(x_1); -x_128 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_128, 0, x_2); -lean_ctor_set(x_128, 1, x_4); -return x_128; +x_125 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_125, 0, x_2); +lean_ctor_set(x_125, 1, x_4); +return x_125; } } } @@ -1726,6 +1833,26 @@ x_1 = lean_mk_string("heterogeneous equality proof expected"); return x_1; } } +lean_object* _init_l_Lean_Meta_mkHEqSymm___closed__3() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Meta_mkHEqSymm___closed__2; +x_2 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* _init_l_Lean_Meta_mkHEqSymm___closed__4() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Meta_mkHEqSymm___closed__3; +x_2 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} lean_object* l_Lean_Meta_mkHEqSymm(lean_object* x_1, lean_object* x_2, lean_object* x_3) { _start: { @@ -1753,7 +1880,6 @@ x_12 = l_Lean_Expr_isAppOfArity___main(x_8, x_10, x_11); if (x_12 == 0) { lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; -lean_dec(x_8); x_13 = lean_ctor_get(x_9, 0); lean_inc(x_13); x_14 = lean_ctor_get(x_9, 1); @@ -1771,15 +1897,16 @@ lean_ctor_set(x_18, 0, x_13); lean_ctor_set(x_18, 1, x_14); lean_ctor_set(x_18, 2, x_15); lean_ctor_set(x_18, 3, x_17); -x_19 = l_Lean_mkOptionalNode___closed__2; -x_20 = lean_array_push(x_19, x_1); -x_21 = l_Lean_Meta_mkHEqSymm___closed__1; -x_22 = l_Lean_Meta_mkHEqSymm___closed__2; -x_23 = lean_alloc_ctor(16, 4, 0); -lean_ctor_set(x_23, 0, x_21); -lean_ctor_set(x_23, 1, x_22); -lean_ctor_set(x_23, 2, x_20); -lean_ctor_set(x_23, 3, x_18); +x_19 = l___private_Lean_Meta_AppBuilder_2__hasTypeMsg(x_1, x_8); +x_20 = l_Lean_Meta_mkHEqSymm___closed__4; +x_21 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_21, 0, x_20); +lean_ctor_set(x_21, 1, x_19); +x_22 = l_Lean_Meta_mkHEqSymm___closed__1; +x_23 = lean_alloc_ctor(16, 3, 0); +lean_ctor_set(x_23, 0, x_22); +lean_ctor_set(x_23, 1, x_21); +lean_ctor_set(x_23, 2, x_18); lean_ctor_set_tag(x_6, 1); lean_ctor_set(x_6, 0, x_23); return x_6; @@ -1883,7 +2010,6 @@ x_55 = l_Lean_Expr_isAppOfArity___main(x_51, x_53, x_54); if (x_55 == 0) { 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_dec(x_51); x_56 = lean_ctor_get(x_52, 0); lean_inc(x_56); x_57 = lean_ctor_get(x_52, 1); @@ -1901,15 +2027,16 @@ lean_ctor_set(x_61, 0, x_56); lean_ctor_set(x_61, 1, x_57); lean_ctor_set(x_61, 2, x_58); lean_ctor_set(x_61, 3, x_60); -x_62 = l_Lean_mkOptionalNode___closed__2; -x_63 = lean_array_push(x_62, x_1); -x_64 = l_Lean_Meta_mkHEqSymm___closed__1; -x_65 = l_Lean_Meta_mkHEqSymm___closed__2; -x_66 = lean_alloc_ctor(16, 4, 0); -lean_ctor_set(x_66, 0, x_64); -lean_ctor_set(x_66, 1, x_65); -lean_ctor_set(x_66, 2, x_63); -lean_ctor_set(x_66, 3, x_61); +x_62 = l___private_Lean_Meta_AppBuilder_2__hasTypeMsg(x_1, x_51); +x_63 = l_Lean_Meta_mkHEqSymm___closed__4; +x_64 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_64, 0, x_63); +lean_ctor_set(x_64, 1, x_62); +x_65 = l_Lean_Meta_mkHEqSymm___closed__1; +x_66 = lean_alloc_ctor(16, 3, 0); +lean_ctor_set(x_66, 0, x_65); +lean_ctor_set(x_66, 1, x_64); +lean_ctor_set(x_66, 2, x_61); x_67 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_67, 0, x_66); lean_ctor_set(x_67, 1, x_52); @@ -2076,7 +2203,7 @@ lean_inc(x_2); x_12 = l___private_Lean_Meta_AppBuilder_1__infer(x_2, x_3, x_10); if (lean_obj_tag(x_12) == 0) { -lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_63; lean_object* x_102; lean_object* x_103; uint8_t x_104; uint8_t x_105; +lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_62; lean_object* x_100; lean_object* x_101; uint8_t x_102; uint8_t x_103; x_13 = lean_ctor_get(x_12, 0); lean_inc(x_13); x_14 = lean_ctor_get(x_12, 1); @@ -2089,102 +2216,101 @@ if (lean_is_exclusive(x_12)) { lean_dec_ref(x_12); x_15 = lean_box(0); } -x_102 = l_Lean_Expr_heq_x3f___closed__2; -x_103 = lean_unsigned_to_nat(4u); -x_104 = l_Lean_Expr_isAppOfArity___main(x_9, x_102, x_103); -x_105 = l_Lean_Expr_isAppOfArity___main(x_13, x_102, x_103); -if (x_104 == 0) +x_100 = l_Lean_Expr_heq_x3f___closed__2; +x_101 = lean_unsigned_to_nat(4u); +x_102 = l_Lean_Expr_isAppOfArity___main(x_9, x_100, x_101); +x_103 = l_Lean_Expr_isAppOfArity___main(x_13, x_100, x_101); +if (x_102 == 0) { -lean_dec(x_9); -if (x_105 == 0) +if (x_103 == 0) { -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_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_dec(x_15); lean_dec(x_13); lean_dec(x_11); -x_106 = lean_ctor_get(x_14, 0); +lean_dec(x_2); +x_104 = lean_ctor_get(x_14, 0); +lean_inc(x_104); +x_105 = lean_ctor_get(x_14, 1); +lean_inc(x_105); +x_106 = lean_ctor_get(x_3, 1); lean_inc(x_106); -x_107 = lean_ctor_get(x_14, 1); +x_107 = lean_ctor_get(x_3, 0); lean_inc(x_107); -x_108 = lean_ctor_get(x_3, 1); -lean_inc(x_108); -x_109 = lean_ctor_get(x_3, 0); -lean_inc(x_109); lean_dec(x_3); -x_110 = lean_ctor_get(x_109, 0); -lean_inc(x_110); -lean_dec(x_109); -x_111 = lean_alloc_ctor(0, 4, 0); -lean_ctor_set(x_111, 0, x_106); -lean_ctor_set(x_111, 1, x_107); -lean_ctor_set(x_111, 2, x_108); -lean_ctor_set(x_111, 3, x_110); -x_112 = l_Lean_mkAppStx___closed__9; -x_113 = lean_array_push(x_112, x_1); -x_114 = lean_array_push(x_113, x_2); -x_115 = l_Lean_Meta_mkHEqTrans___closed__1; -x_116 = l_Lean_Meta_mkHEqSymm___closed__2; -x_117 = lean_alloc_ctor(16, 4, 0); -lean_ctor_set(x_117, 0, x_115); -lean_ctor_set(x_117, 1, x_116); -lean_ctor_set(x_117, 2, x_114); -lean_ctor_set(x_117, 3, x_111); -x_118 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_118, 0, x_117); -lean_ctor_set(x_118, 1, x_14); -return x_118; +x_108 = lean_ctor_get(x_107, 0); +lean_inc(x_108); +lean_dec(x_107); +x_109 = lean_alloc_ctor(0, 4, 0); +lean_ctor_set(x_109, 0, x_104); +lean_ctor_set(x_109, 1, x_105); +lean_ctor_set(x_109, 2, x_106); +lean_ctor_set(x_109, 3, x_108); +x_110 = l___private_Lean_Meta_AppBuilder_2__hasTypeMsg(x_1, x_9); +x_111 = l_Lean_Meta_mkHEqSymm___closed__4; +x_112 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_112, 0, x_111); +lean_ctor_set(x_112, 1, x_110); +x_113 = l_Lean_Meta_mkHEqTrans___closed__1; +x_114 = lean_alloc_ctor(16, 3, 0); +lean_ctor_set(x_114, 0, x_113); +lean_ctor_set(x_114, 1, x_112); +lean_ctor_set(x_114, 2, x_109); +x_115 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_115, 0, x_114); +lean_ctor_set(x_115, 1, x_14); +return x_115; } else { -lean_object* x_119; -x_119 = lean_box(0); -x_63 = x_119; -goto block_101; +lean_object* x_116; +x_116 = lean_box(0); +x_62 = x_116; +goto block_99; } } else { -lean_object* x_120; lean_object* x_121; lean_object* x_122; lean_object* x_123; lean_object* x_124; lean_object* x_125; lean_object* x_126; lean_object* x_127; lean_object* x_128; lean_object* x_129; -x_120 = l_Lean_Expr_appFn_x21(x_9); -x_121 = l_Lean_Expr_appFn_x21(x_120); -x_122 = l_Lean_Expr_appFn_x21(x_121); -x_123 = l_Lean_Expr_appArg_x21(x_122); -lean_dec(x_122); -x_124 = l_Lean_Expr_appArg_x21(x_121); -lean_dec(x_121); -x_125 = l_Lean_Expr_appArg_x21(x_120); -lean_dec(x_120); -x_126 = l_Lean_Expr_appArg_x21(x_9); -lean_dec(x_9); -x_127 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_127, 0, x_125); -lean_ctor_set(x_127, 1, x_126); -x_128 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_128, 0, x_124); -lean_ctor_set(x_128, 1, x_127); -x_129 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_129, 0, x_123); -lean_ctor_set(x_129, 1, x_128); -if (x_105 == 0) +lean_object* x_117; lean_object* x_118; lean_object* x_119; lean_object* x_120; lean_object* x_121; lean_object* x_122; lean_object* x_123; lean_object* x_124; lean_object* x_125; lean_object* x_126; +x_117 = l_Lean_Expr_appFn_x21(x_9); +x_118 = l_Lean_Expr_appFn_x21(x_117); +x_119 = l_Lean_Expr_appFn_x21(x_118); +x_120 = l_Lean_Expr_appArg_x21(x_119); +lean_dec(x_119); +x_121 = l_Lean_Expr_appArg_x21(x_118); +lean_dec(x_118); +x_122 = l_Lean_Expr_appArg_x21(x_117); +lean_dec(x_117); +x_123 = l_Lean_Expr_appArg_x21(x_9); +x_124 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_124, 0, x_122); +lean_ctor_set(x_124, 1, x_123); +x_125 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_125, 0, x_121); +lean_ctor_set(x_125, 1, x_124); +x_126 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_126, 0, x_120); +lean_ctor_set(x_126, 1, x_125); +if (x_103 == 0) { -lean_object* x_130; -lean_dec(x_13); +lean_object* x_127; lean_dec(x_11); -x_130 = lean_box(0); -x_16 = x_130; -x_17 = x_129; -goto block_62; +lean_dec(x_9); +x_127 = lean_box(0); +x_16 = x_127; +x_17 = x_126; +goto block_61; } else { -lean_object* x_131; -x_131 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_131, 0, x_129); -x_63 = x_131; -goto block_101; +lean_object* x_128; +x_128 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_128, 0, x_126); +x_62 = x_128; +goto block_99; } } -block_62: +block_61: { lean_object* x_18; lean_object* x_19; x_18 = lean_ctor_get(x_17, 1); @@ -2193,10 +2319,11 @@ x_19 = lean_ctor_get(x_18, 1); lean_inc(x_19); if (lean_obj_tag(x_16) == 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; lean_object* x_31; lean_object* x_32; +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_dec(x_19); lean_dec(x_18); lean_dec(x_17); +lean_dec(x_1); x_20 = lean_ctor_get(x_14, 0); lean_inc(x_20); x_21 = lean_ctor_get(x_14, 1); @@ -2214,315 +2341,316 @@ lean_ctor_set(x_25, 0, x_20); lean_ctor_set(x_25, 1, x_21); lean_ctor_set(x_25, 2, x_22); lean_ctor_set(x_25, 3, x_24); -x_26 = l_Lean_mkAppStx___closed__9; -x_27 = lean_array_push(x_26, x_1); -x_28 = lean_array_push(x_27, x_2); +x_26 = l___private_Lean_Meta_AppBuilder_2__hasTypeMsg(x_2, x_13); +x_27 = l_Lean_Meta_mkHEqSymm___closed__4; +x_28 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_28, 0, x_27); +lean_ctor_set(x_28, 1, x_26); x_29 = l_Lean_Meta_mkHEqTrans___closed__1; -x_30 = l_Lean_Meta_mkHEqSymm___closed__2; -x_31 = lean_alloc_ctor(16, 4, 0); -lean_ctor_set(x_31, 0, x_29); -lean_ctor_set(x_31, 1, x_30); -lean_ctor_set(x_31, 2, x_28); -lean_ctor_set(x_31, 3, x_25); +x_30 = lean_alloc_ctor(16, 3, 0); +lean_ctor_set(x_30, 0, x_29); +lean_ctor_set(x_30, 1, x_28); +lean_ctor_set(x_30, 2, x_25); if (lean_is_scalar(x_15)) { - x_32 = lean_alloc_ctor(1, 2, 0); + x_31 = lean_alloc_ctor(1, 2, 0); } else { - x_32 = x_15; - lean_ctor_set_tag(x_32, 1); + x_31 = x_15; + lean_ctor_set_tag(x_31, 1); } -lean_ctor_set(x_32, 0, x_31); -lean_ctor_set(x_32, 1, x_14); -return x_32; +lean_ctor_set(x_31, 0, x_30); +lean_ctor_set(x_31, 1, x_14); +return x_31; } else { -lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; +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_dec(x_15); -x_33 = lean_ctor_get(x_16, 0); -lean_inc(x_33); +lean_dec(x_13); +x_32 = lean_ctor_get(x_16, 0); +lean_inc(x_32); lean_dec(x_16); +x_33 = lean_ctor_get(x_32, 1); +lean_inc(x_33); +lean_dec(x_32); x_34 = lean_ctor_get(x_33, 1); lean_inc(x_34); lean_dec(x_33); -x_35 = lean_ctor_get(x_34, 1); +x_35 = lean_ctor_get(x_17, 0); lean_inc(x_35); -lean_dec(x_34); -x_36 = lean_ctor_get(x_17, 0); -lean_inc(x_36); lean_dec(x_17); -x_37 = lean_ctor_get(x_18, 0); -lean_inc(x_37); -lean_dec(x_18); -x_38 = lean_ctor_get(x_19, 0); -lean_inc(x_38); -x_39 = lean_ctor_get(x_19, 1); -lean_inc(x_39); -lean_dec(x_19); -x_40 = lean_ctor_get(x_35, 0); -lean_inc(x_40); -x_41 = lean_ctor_get(x_35, 1); -lean_inc(x_41); -lean_dec(x_35); +x_36 = lean_ctor_get(x_18, 0); lean_inc(x_36); -x_42 = l_Lean_Meta_getLevel(x_36, x_3, x_14); -if (lean_obj_tag(x_42) == 0) +lean_dec(x_18); +x_37 = lean_ctor_get(x_19, 0); +lean_inc(x_37); +x_38 = lean_ctor_get(x_19, 1); +lean_inc(x_38); +lean_dec(x_19); +x_39 = lean_ctor_get(x_34, 0); +lean_inc(x_39); +x_40 = lean_ctor_get(x_34, 1); +lean_inc(x_40); +lean_dec(x_34); +lean_inc(x_35); +x_41 = l_Lean_Meta_getLevel(x_35, x_3, x_14); +if (lean_obj_tag(x_41) == 0) { -uint8_t x_43; -x_43 = !lean_is_exclusive(x_42); -if (x_43 == 0) +uint8_t x_42; +x_42 = !lean_is_exclusive(x_41); +if (x_42 == 0) { -lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; lean_object* x_48; lean_object* x_49; -x_44 = lean_ctor_get(x_42, 0); -x_45 = lean_box(0); -x_46 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_46, 0, x_44); -lean_ctor_set(x_46, 1, x_45); -x_47 = l_Lean_Meta_mkHEqTrans___closed__1; -x_48 = l_Lean_mkConst(x_47, x_46); -x_49 = l_Lean_mkApp8(x_48, x_36, x_38, x_40, x_37, x_39, x_41, x_1, x_2); -lean_ctor_set(x_42, 0, x_49); -return 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_43 = lean_ctor_get(x_41, 0); +x_44 = lean_box(0); +x_45 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_45, 0, x_43); +lean_ctor_set(x_45, 1, x_44); +x_46 = l_Lean_Meta_mkHEqTrans___closed__1; +x_47 = l_Lean_mkConst(x_46, x_45); +x_48 = l_Lean_mkApp8(x_47, x_35, x_37, x_39, x_36, x_38, x_40, x_1, x_2); +lean_ctor_set(x_41, 0, x_48); +return x_41; } else { -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_50 = lean_ctor_get(x_42, 0); -x_51 = lean_ctor_get(x_42, 1); -lean_inc(x_51); +lean_object* x_49; lean_object* x_50; lean_object* x_51; lean_object* x_52; lean_object* x_53; lean_object* x_54; lean_object* x_55; lean_object* x_56; +x_49 = lean_ctor_get(x_41, 0); +x_50 = lean_ctor_get(x_41, 1); lean_inc(x_50); -lean_dec(x_42); -x_52 = lean_box(0); -x_53 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_53, 0, x_50); -lean_ctor_set(x_53, 1, x_52); -x_54 = l_Lean_Meta_mkHEqTrans___closed__1; -x_55 = l_Lean_mkConst(x_54, x_53); -x_56 = l_Lean_mkApp8(x_55, x_36, x_38, x_40, x_37, x_39, x_41, x_1, x_2); -x_57 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_57, 0, x_56); -lean_ctor_set(x_57, 1, x_51); -return x_57; +lean_inc(x_49); +lean_dec(x_41); +x_51 = lean_box(0); +x_52 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_52, 0, x_49); +lean_ctor_set(x_52, 1, x_51); +x_53 = l_Lean_Meta_mkHEqTrans___closed__1; +x_54 = l_Lean_mkConst(x_53, x_52); +x_55 = l_Lean_mkApp8(x_54, x_35, x_37, x_39, x_36, x_38, x_40, x_1, x_2); +x_56 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_56, 0, x_55); +lean_ctor_set(x_56, 1, x_50); +return x_56; } } else { -uint8_t x_58; -lean_dec(x_41); +uint8_t x_57; lean_dec(x_40); lean_dec(x_39); lean_dec(x_38); lean_dec(x_37); lean_dec(x_36); +lean_dec(x_35); lean_dec(x_2); lean_dec(x_1); -x_58 = !lean_is_exclusive(x_42); -if (x_58 == 0) +x_57 = !lean_is_exclusive(x_41); +if (x_57 == 0) { -return x_42; +return x_41; } else { -lean_object* x_59; lean_object* x_60; lean_object* x_61; -x_59 = lean_ctor_get(x_42, 0); -x_60 = lean_ctor_get(x_42, 1); -lean_inc(x_60); +lean_object* x_58; lean_object* x_59; lean_object* x_60; +x_58 = lean_ctor_get(x_41, 0); +x_59 = lean_ctor_get(x_41, 1); lean_inc(x_59); -lean_dec(x_42); -x_61 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_61, 0, x_59); -lean_ctor_set(x_61, 1, x_60); -return x_61; +lean_inc(x_58); +lean_dec(x_41); +x_60 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_60, 0, x_58); +lean_ctor_set(x_60, 1, x_59); +return x_60; } } } } -block_101: +block_99: { -if (lean_obj_tag(x_63) == 0) +if (lean_obj_tag(x_62) == 0) { -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_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_dec(x_15); lean_dec(x_13); -x_64 = lean_ctor_get(x_14, 0); +lean_dec(x_2); +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, 1); +x_65 = lean_ctor_get(x_3, 1); lean_inc(x_65); -x_66 = lean_ctor_get(x_3, 1); +x_66 = lean_ctor_get(x_3, 0); lean_inc(x_66); -x_67 = lean_ctor_get(x_3, 0); -lean_inc(x_67); lean_dec(x_3); -x_68 = lean_ctor_get(x_67, 0); -lean_inc(x_68); -lean_dec(x_67); -x_69 = lean_alloc_ctor(0, 4, 0); -lean_ctor_set(x_69, 0, x_64); -lean_ctor_set(x_69, 1, x_65); -lean_ctor_set(x_69, 2, x_66); -lean_ctor_set(x_69, 3, x_68); -x_70 = l_Lean_mkAppStx___closed__9; -x_71 = lean_array_push(x_70, x_1); -x_72 = lean_array_push(x_71, x_2); -x_73 = l_Lean_Meta_mkHEqTrans___closed__1; -x_74 = l_Lean_Meta_mkHEqSymm___closed__2; -x_75 = lean_alloc_ctor(16, 4, 0); -lean_ctor_set(x_75, 0, x_73); -lean_ctor_set(x_75, 1, x_74); -lean_ctor_set(x_75, 2, x_72); -lean_ctor_set(x_75, 3, x_69); +x_67 = lean_ctor_get(x_66, 0); +lean_inc(x_67); +lean_dec(x_66); +x_68 = lean_alloc_ctor(0, 4, 0); +lean_ctor_set(x_68, 0, x_63); +lean_ctor_set(x_68, 1, x_64); +lean_ctor_set(x_68, 2, x_65); +lean_ctor_set(x_68, 3, x_67); +x_69 = l___private_Lean_Meta_AppBuilder_2__hasTypeMsg(x_1, x_9); +x_70 = l_Lean_Meta_mkHEqSymm___closed__4; +x_71 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_71, 0, x_70); +lean_ctor_set(x_71, 1, x_69); +x_72 = l_Lean_Meta_mkHEqTrans___closed__1; +x_73 = lean_alloc_ctor(16, 3, 0); +lean_ctor_set(x_73, 0, x_72); +lean_ctor_set(x_73, 1, x_71); +lean_ctor_set(x_73, 2, x_68); if (lean_is_scalar(x_11)) { - x_76 = lean_alloc_ctor(1, 2, 0); + x_74 = lean_alloc_ctor(1, 2, 0); } else { - x_76 = x_11; - lean_ctor_set_tag(x_76, 1); + x_74 = x_11; + lean_ctor_set_tag(x_74, 1); } -lean_ctor_set(x_76, 0, x_75); -lean_ctor_set(x_76, 1, x_14); -return x_76; +lean_ctor_set(x_74, 0, x_73); +lean_ctor_set(x_74, 1, x_14); +return x_74; } else { -uint8_t x_77; +uint8_t x_75; lean_dec(x_11); -x_77 = !lean_is_exclusive(x_63); -if (x_77 == 0) +lean_dec(x_9); +x_75 = !lean_is_exclusive(x_62); +if (x_75 == 0) { -lean_object* x_78; lean_object* x_79; lean_object* x_80; lean_object* x_81; lean_object* x_82; lean_object* x_83; lean_object* x_84; lean_object* x_85; lean_object* x_86; lean_object* x_87; lean_object* x_88; -x_78 = lean_ctor_get(x_63, 0); -x_79 = l_Lean_Expr_appFn_x21(x_13); -x_80 = l_Lean_Expr_appFn_x21(x_79); -x_81 = l_Lean_Expr_appFn_x21(x_80); -x_82 = l_Lean_Expr_appArg_x21(x_81); -lean_dec(x_81); -x_83 = l_Lean_Expr_appArg_x21(x_80); -lean_dec(x_80); -x_84 = l_Lean_Expr_appArg_x21(x_79); +lean_object* x_76; lean_object* x_77; lean_object* x_78; lean_object* x_79; lean_object* x_80; lean_object* x_81; lean_object* x_82; lean_object* x_83; lean_object* x_84; lean_object* x_85; lean_object* x_86; +x_76 = lean_ctor_get(x_62, 0); +x_77 = l_Lean_Expr_appFn_x21(x_13); +x_78 = l_Lean_Expr_appFn_x21(x_77); +x_79 = l_Lean_Expr_appFn_x21(x_78); +x_80 = l_Lean_Expr_appArg_x21(x_79); lean_dec(x_79); -x_85 = l_Lean_Expr_appArg_x21(x_13); -lean_dec(x_13); +x_81 = l_Lean_Expr_appArg_x21(x_78); +lean_dec(x_78); +x_82 = l_Lean_Expr_appArg_x21(x_77); +lean_dec(x_77); +x_83 = l_Lean_Expr_appArg_x21(x_13); +x_84 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_84, 0, x_82); +lean_ctor_set(x_84, 1, x_83); +x_85 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_85, 0, x_81); +lean_ctor_set(x_85, 1, x_84); x_86 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_86, 0, x_84); +lean_ctor_set(x_86, 0, x_80); lean_ctor_set(x_86, 1, x_85); -x_87 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_87, 0, x_83); -lean_ctor_set(x_87, 1, x_86); -x_88 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_88, 0, x_82); -lean_ctor_set(x_88, 1, x_87); -lean_ctor_set(x_63, 0, x_88); -x_16 = x_63; -x_17 = x_78; -goto block_62; +lean_ctor_set(x_62, 0, x_86); +x_16 = x_62; +x_17 = x_76; +goto block_61; } else { -lean_object* x_89; lean_object* x_90; lean_object* x_91; lean_object* x_92; lean_object* x_93; lean_object* x_94; lean_object* x_95; lean_object* x_96; lean_object* x_97; lean_object* x_98; lean_object* x_99; lean_object* x_100; -x_89 = lean_ctor_get(x_63, 0); -lean_inc(x_89); -lean_dec(x_63); -x_90 = l_Lean_Expr_appFn_x21(x_13); -x_91 = l_Lean_Expr_appFn_x21(x_90); -x_92 = l_Lean_Expr_appFn_x21(x_91); -x_93 = l_Lean_Expr_appArg_x21(x_92); -lean_dec(x_92); -x_94 = l_Lean_Expr_appArg_x21(x_91); -lean_dec(x_91); -x_95 = l_Lean_Expr_appArg_x21(x_90); +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_87 = lean_ctor_get(x_62, 0); +lean_inc(x_87); +lean_dec(x_62); +x_88 = l_Lean_Expr_appFn_x21(x_13); +x_89 = l_Lean_Expr_appFn_x21(x_88); +x_90 = l_Lean_Expr_appFn_x21(x_89); +x_91 = l_Lean_Expr_appArg_x21(x_90); lean_dec(x_90); -x_96 = l_Lean_Expr_appArg_x21(x_13); -lean_dec(x_13); +x_92 = l_Lean_Expr_appArg_x21(x_89); +lean_dec(x_89); +x_93 = l_Lean_Expr_appArg_x21(x_88); +lean_dec(x_88); +x_94 = l_Lean_Expr_appArg_x21(x_13); +x_95 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_95, 0, x_93); +lean_ctor_set(x_95, 1, x_94); +x_96 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_96, 0, x_92); +lean_ctor_set(x_96, 1, x_95); x_97 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_97, 0, x_95); +lean_ctor_set(x_97, 0, x_91); lean_ctor_set(x_97, 1, x_96); -x_98 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_98, 0, x_94); -lean_ctor_set(x_98, 1, x_97); -x_99 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_99, 0, x_93); -lean_ctor_set(x_99, 1, x_98); -x_100 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_100, 0, x_99); -x_16 = x_100; -x_17 = x_89; -goto block_62; +x_98 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_98, 0, x_97); +x_16 = x_98; +x_17 = x_87; +goto block_61; } } } } else { -uint8_t x_132; +uint8_t x_129; lean_dec(x_11); lean_dec(x_9); lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); -x_132 = !lean_is_exclusive(x_12); -if (x_132 == 0) +x_129 = !lean_is_exclusive(x_12); +if (x_129 == 0) { return x_12; } else { -lean_object* x_133; lean_object* x_134; lean_object* x_135; -x_133 = lean_ctor_get(x_12, 0); -x_134 = lean_ctor_get(x_12, 1); -lean_inc(x_134); -lean_inc(x_133); +lean_object* x_130; lean_object* x_131; lean_object* x_132; +x_130 = lean_ctor_get(x_12, 0); +x_131 = lean_ctor_get(x_12, 1); +lean_inc(x_131); +lean_inc(x_130); lean_dec(x_12); -x_135 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_135, 0, x_133); -lean_ctor_set(x_135, 1, x_134); -return x_135; +x_132 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_132, 0, x_130); +lean_ctor_set(x_132, 1, x_131); +return x_132; } } } else { -uint8_t x_136; +uint8_t x_133; lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); -x_136 = !lean_is_exclusive(x_8); -if (x_136 == 0) +x_133 = !lean_is_exclusive(x_8); +if (x_133 == 0) { return x_8; } else { -lean_object* x_137; lean_object* x_138; lean_object* x_139; -x_137 = lean_ctor_get(x_8, 0); -x_138 = lean_ctor_get(x_8, 1); -lean_inc(x_138); -lean_inc(x_137); +lean_object* x_134; lean_object* x_135; lean_object* x_136; +x_134 = lean_ctor_get(x_8, 0); +x_135 = lean_ctor_get(x_8, 1); +lean_inc(x_135); +lean_inc(x_134); lean_dec(x_8); -x_139 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_139, 0, x_137); -lean_ctor_set(x_139, 1, x_138); -return x_139; +x_136 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_136, 0, x_134); +lean_ctor_set(x_136, 1, x_135); +return x_136; } } } else { -lean_object* x_140; +lean_object* x_137; lean_dec(x_3); lean_dec(x_2); -x_140 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_140, 0, x_1); -lean_ctor_set(x_140, 1, x_4); -return x_140; +x_137 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_137, 0, x_1); +lean_ctor_set(x_137, 1, x_4); +return x_137; } } else { -lean_object* x_141; +lean_object* x_138; lean_dec(x_3); lean_dec(x_1); -x_141 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_141, 0, x_2); -lean_ctor_set(x_141, 1, x_4); -return x_141; +x_138 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_138, 0, x_2); +lean_ctor_set(x_138, 1, x_4); +return x_138; } } } @@ -2552,6 +2680,54 @@ x_1 = lean_mk_string("heterogeneous equality types are not definitionally equal" return x_1; } } +lean_object* _init_l_Lean_Meta_mkEqOfHEq___closed__4() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Meta_mkEqOfHEq___closed__3; +x_2 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* _init_l_Lean_Meta_mkEqOfHEq___closed__5() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Meta_mkEqOfHEq___closed__4; +x_2 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* _init_l_Lean_Meta_mkEqOfHEq___closed__6() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("is not definitionally equal to"); +return x_1; +} +} +lean_object* _init_l_Lean_Meta_mkEqOfHEq___closed__7() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Meta_mkEqOfHEq___closed__6; +x_2 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* _init_l_Lean_Meta_mkEqOfHEq___closed__8() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Meta_mkEqOfHEq___closed__7; +x_2 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} lean_object* l_Lean_Meta_mkEqOfHEq(lean_object* x_1, lean_object* x_2, lean_object* x_3) { _start: { @@ -2573,7 +2749,7 @@ x_9 = lean_unsigned_to_nat(4u); x_10 = l_Lean_Expr_isAppOfArity___main(x_6, x_8, x_9); if (x_10 == 0) { -lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; +lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_dec(x_6); x_11 = lean_ctor_get(x_7, 0); lean_inc(x_11); @@ -2592,483 +2768,537 @@ lean_ctor_set(x_16, 0, x_11); lean_ctor_set(x_16, 1, x_12); lean_ctor_set(x_16, 2, x_13); lean_ctor_set(x_16, 3, x_15); -x_17 = l_Lean_mkOptionalNode___closed__2; -x_18 = lean_array_push(x_17, x_1); -x_19 = l_Lean_Meta_mkHEqTrans___closed__1; -x_20 = l_Lean_Meta_mkHEqSymm___closed__2; -x_21 = lean_alloc_ctor(16, 4, 0); -lean_ctor_set(x_21, 0, x_19); -lean_ctor_set(x_21, 1, x_20); -lean_ctor_set(x_21, 2, x_18); -lean_ctor_set(x_21, 3, x_16); +x_17 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_17, 0, x_1); +x_18 = l_Lean_indentExpr(x_17); +x_19 = l_Lean_Meta_mkHEqSymm___closed__4; +x_20 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_20, 0, x_19); +lean_ctor_set(x_20, 1, x_18); +x_21 = l_Lean_Meta_mkHEqTrans___closed__1; +x_22 = lean_alloc_ctor(16, 3, 0); +lean_ctor_set(x_22, 0, x_21); +lean_ctor_set(x_22, 1, x_20); +lean_ctor_set(x_22, 2, x_16); lean_ctor_set_tag(x_4, 1); -lean_ctor_set(x_4, 0, x_21); +lean_ctor_set(x_4, 0, x_22); return x_4; } else { -lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; +lean_object* x_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_free_object(x_4); -x_22 = l_Lean_Expr_appFn_x21(x_6); -x_23 = l_Lean_Expr_appFn_x21(x_22); +x_23 = l_Lean_Expr_appFn_x21(x_6); x_24 = l_Lean_Expr_appFn_x21(x_23); -x_25 = l_Lean_Expr_appArg_x21(x_24); +x_25 = l_Lean_Expr_appFn_x21(x_24); +x_26 = l_Lean_Expr_appArg_x21(x_25); +lean_dec(x_25); +x_27 = l_Lean_Expr_appArg_x21(x_24); lean_dec(x_24); -x_26 = l_Lean_Expr_appArg_x21(x_23); +x_28 = l_Lean_Expr_appArg_x21(x_23); lean_dec(x_23); -x_27 = l_Lean_Expr_appArg_x21(x_22); -lean_dec(x_22); -x_28 = l_Lean_Expr_appArg_x21(x_6); +x_29 = l_Lean_Expr_appArg_x21(x_6); lean_dec(x_6); lean_inc(x_2); -lean_inc(x_27); -lean_inc(x_25); -x_29 = l_Lean_Meta_isExprDefEq(x_25, x_27, x_2, x_7); -if (lean_obj_tag(x_29) == 0) +lean_inc(x_28); +lean_inc(x_26); +x_30 = l_Lean_Meta_isExprDefEq(x_26, x_28, x_2, x_7); +if (lean_obj_tag(x_30) == 0) { -lean_object* x_30; uint8_t x_31; -x_30 = lean_ctor_get(x_29, 0); -lean_inc(x_30); -x_31 = lean_unbox(x_30); -lean_dec(x_30); -if (x_31 == 0) -{ -uint8_t x_32; -lean_dec(x_28); -lean_dec(x_26); -lean_dec(x_1); -x_32 = !lean_is_exclusive(x_29); +lean_object* x_31; uint8_t x_32; +x_31 = lean_ctor_get(x_30, 0); +lean_inc(x_31); +x_32 = lean_unbox(x_31); +lean_dec(x_31); if (x_32 == 0) { -lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; -x_33 = lean_ctor_get(x_29, 1); -x_34 = lean_ctor_get(x_29, 0); -lean_dec(x_34); -x_35 = lean_ctor_get(x_33, 0); -lean_inc(x_35); -x_36 = lean_ctor_get(x_33, 1); -lean_inc(x_36); -x_37 = lean_ctor_get(x_2, 1); -lean_inc(x_37); -x_38 = lean_ctor_get(x_2, 0); -lean_inc(x_38); -lean_dec(x_2); -x_39 = lean_ctor_get(x_38, 0); -lean_inc(x_39); -lean_dec(x_38); -x_40 = lean_alloc_ctor(0, 4, 0); -lean_ctor_set(x_40, 0, x_35); -lean_ctor_set(x_40, 1, x_36); -lean_ctor_set(x_40, 2, x_37); -lean_ctor_set(x_40, 3, x_39); -x_41 = l_Lean_mkAppStx___closed__9; -x_42 = lean_array_push(x_41, x_25); -x_43 = lean_array_push(x_42, x_27); -x_44 = l_Lean_Meta_mkEqOfHEq___closed__2; -x_45 = l_Lean_Meta_mkEqOfHEq___closed__3; -x_46 = lean_alloc_ctor(16, 4, 0); -lean_ctor_set(x_46, 0, x_44); -lean_ctor_set(x_46, 1, x_45); -lean_ctor_set(x_46, 2, x_43); -lean_ctor_set(x_46, 3, x_40); -lean_ctor_set_tag(x_29, 1); -lean_ctor_set(x_29, 0, x_46); -return x_29; -} -else -{ -lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_object* x_51; lean_object* x_52; lean_object* x_53; lean_object* x_54; lean_object* x_55; lean_object* x_56; lean_object* x_57; lean_object* x_58; lean_object* x_59; lean_object* x_60; -x_47 = lean_ctor_get(x_29, 1); -lean_inc(x_47); +uint8_t x_33; lean_dec(x_29); -x_48 = lean_ctor_get(x_47, 0); -lean_inc(x_48); -x_49 = lean_ctor_get(x_47, 1); -lean_inc(x_49); -x_50 = lean_ctor_get(x_2, 1); -lean_inc(x_50); -x_51 = lean_ctor_get(x_2, 0); -lean_inc(x_51); -lean_dec(x_2); -x_52 = lean_ctor_get(x_51, 0); -lean_inc(x_52); -lean_dec(x_51); -x_53 = lean_alloc_ctor(0, 4, 0); -lean_ctor_set(x_53, 0, x_48); -lean_ctor_set(x_53, 1, x_49); -lean_ctor_set(x_53, 2, x_50); -lean_ctor_set(x_53, 3, x_52); -x_54 = l_Lean_mkAppStx___closed__9; -x_55 = lean_array_push(x_54, x_25); -x_56 = lean_array_push(x_55, x_27); -x_57 = l_Lean_Meta_mkEqOfHEq___closed__2; -x_58 = l_Lean_Meta_mkEqOfHEq___closed__3; -x_59 = lean_alloc_ctor(16, 4, 0); -lean_ctor_set(x_59, 0, x_57); -lean_ctor_set(x_59, 1, x_58); -lean_ctor_set(x_59, 2, x_56); -lean_ctor_set(x_59, 3, x_53); -x_60 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_60, 0, x_59); -lean_ctor_set(x_60, 1, x_47); -return x_60; -} -} -else -{ -lean_object* x_61; lean_object* x_62; lean_dec(x_27); -x_61 = lean_ctor_get(x_29, 1); -lean_inc(x_61); -lean_dec(x_29); -lean_inc(x_25); -x_62 = l_Lean_Meta_getLevel(x_25, x_2, x_61); -if (lean_obj_tag(x_62) == 0) +lean_dec(x_1); +x_33 = !lean_is_exclusive(x_30); +if (x_33 == 0) { -uint8_t x_63; -x_63 = !lean_is_exclusive(x_62); -if (x_63 == 0) -{ -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_62, 0); -x_65 = lean_box(0); -x_66 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_66, 0, x_64); -lean_ctor_set(x_66, 1, x_65); -x_67 = l_Lean_Meta_mkEqOfHEq___closed__2; -x_68 = l_Lean_mkConst(x_67, x_66); -x_69 = l_Lean_mkApp4(x_68, x_25, x_26, x_28, x_1); -lean_ctor_set(x_62, 0, x_69); -return x_62; +lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_object* x_51; lean_object* x_52; lean_object* x_53; lean_object* x_54; +x_34 = lean_ctor_get(x_30, 1); +x_35 = lean_ctor_get(x_30, 0); +lean_dec(x_35); +x_36 = lean_ctor_get(x_34, 0); +lean_inc(x_36); +x_37 = lean_ctor_get(x_34, 1); +lean_inc(x_37); +x_38 = lean_ctor_get(x_2, 1); +lean_inc(x_38); +x_39 = lean_ctor_get(x_2, 0); +lean_inc(x_39); +lean_dec(x_2); +x_40 = lean_ctor_get(x_39, 0); +lean_inc(x_40); +lean_dec(x_39); +x_41 = lean_alloc_ctor(0, 4, 0); +lean_ctor_set(x_41, 0, x_36); +lean_ctor_set(x_41, 1, x_37); +lean_ctor_set(x_41, 2, x_38); +lean_ctor_set(x_41, 3, x_40); +x_42 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_42, 0, x_26); +x_43 = l_Lean_indentExpr(x_42); +x_44 = l_Lean_Meta_mkEqOfHEq___closed__5; +x_45 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_45, 0, x_44); +lean_ctor_set(x_45, 1, x_43); +x_46 = l_Lean_MessageData_ofList___closed__3; +x_47 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_47, 0, x_45); +lean_ctor_set(x_47, 1, x_46); +x_48 = l_Lean_Meta_mkEqOfHEq___closed__8; +x_49 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_49, 0, x_47); +lean_ctor_set(x_49, 1, x_48); +x_50 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_50, 0, x_28); +x_51 = l_Lean_indentExpr(x_50); +x_52 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_52, 0, x_49); +lean_ctor_set(x_52, 1, x_51); +x_53 = l_Lean_Meta_mkEqOfHEq___closed__2; +x_54 = lean_alloc_ctor(16, 3, 0); +lean_ctor_set(x_54, 0, x_53); +lean_ctor_set(x_54, 1, x_52); +lean_ctor_set(x_54, 2, x_41); +lean_ctor_set_tag(x_30, 1); +lean_ctor_set(x_30, 0, x_54); +return x_30; } else { -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_70 = lean_ctor_get(x_62, 0); -x_71 = lean_ctor_get(x_62, 1); -lean_inc(x_71); -lean_inc(x_70); -lean_dec(x_62); -x_72 = lean_box(0); -x_73 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_73, 0, x_70); -lean_ctor_set(x_73, 1, x_72); -x_74 = l_Lean_Meta_mkEqOfHEq___closed__2; -x_75 = l_Lean_mkConst(x_74, x_73); -x_76 = l_Lean_mkApp4(x_75, x_25, x_26, x_28, x_1); -x_77 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_77, 0, x_76); -lean_ctor_set(x_77, 1, x_71); -return x_77; +lean_object* x_55; lean_object* x_56; lean_object* x_57; lean_object* x_58; lean_object* x_59; lean_object* x_60; lean_object* x_61; lean_object* x_62; lean_object* x_63; lean_object* x_64; lean_object* x_65; lean_object* x_66; lean_object* x_67; lean_object* x_68; lean_object* x_69; lean_object* x_70; lean_object* x_71; lean_object* x_72; lean_object* x_73; lean_object* x_74; lean_object* x_75; +x_55 = lean_ctor_get(x_30, 1); +lean_inc(x_55); +lean_dec(x_30); +x_56 = lean_ctor_get(x_55, 0); +lean_inc(x_56); +x_57 = lean_ctor_get(x_55, 1); +lean_inc(x_57); +x_58 = lean_ctor_get(x_2, 1); +lean_inc(x_58); +x_59 = lean_ctor_get(x_2, 0); +lean_inc(x_59); +lean_dec(x_2); +x_60 = lean_ctor_get(x_59, 0); +lean_inc(x_60); +lean_dec(x_59); +x_61 = lean_alloc_ctor(0, 4, 0); +lean_ctor_set(x_61, 0, x_56); +lean_ctor_set(x_61, 1, x_57); +lean_ctor_set(x_61, 2, x_58); +lean_ctor_set(x_61, 3, x_60); +x_62 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_62, 0, x_26); +x_63 = l_Lean_indentExpr(x_62); +x_64 = l_Lean_Meta_mkEqOfHEq___closed__5; +x_65 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_65, 0, x_64); +lean_ctor_set(x_65, 1, x_63); +x_66 = l_Lean_MessageData_ofList___closed__3; +x_67 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_67, 0, x_65); +lean_ctor_set(x_67, 1, x_66); +x_68 = l_Lean_Meta_mkEqOfHEq___closed__8; +x_69 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_69, 0, x_67); +lean_ctor_set(x_69, 1, x_68); +x_70 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_70, 0, x_28); +x_71 = l_Lean_indentExpr(x_70); +x_72 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_72, 0, x_69); +lean_ctor_set(x_72, 1, x_71); +x_73 = l_Lean_Meta_mkEqOfHEq___closed__2; +x_74 = lean_alloc_ctor(16, 3, 0); +lean_ctor_set(x_74, 0, x_73); +lean_ctor_set(x_74, 1, x_72); +lean_ctor_set(x_74, 2, x_61); +x_75 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_75, 0, x_74); +lean_ctor_set(x_75, 1, x_55); +return x_75; } } else { +lean_object* x_76; lean_object* x_77; +lean_dec(x_28); +x_76 = lean_ctor_get(x_30, 1); +lean_inc(x_76); +lean_dec(x_30); +lean_inc(x_26); +x_77 = l_Lean_Meta_getLevel(x_26, x_2, x_76); +if (lean_obj_tag(x_77) == 0) +{ uint8_t x_78; -lean_dec(x_28); -lean_dec(x_26); -lean_dec(x_25); -lean_dec(x_1); -x_78 = !lean_is_exclusive(x_62); +x_78 = !lean_is_exclusive(x_77); if (x_78 == 0) { -return x_62; -} -else -{ -lean_object* x_79; lean_object* x_80; lean_object* x_81; -x_79 = lean_ctor_get(x_62, 0); -x_80 = lean_ctor_get(x_62, 1); -lean_inc(x_80); -lean_inc(x_79); -lean_dec(x_62); +lean_object* x_79; lean_object* x_80; lean_object* x_81; lean_object* x_82; lean_object* x_83; lean_object* x_84; +x_79 = lean_ctor_get(x_77, 0); +x_80 = lean_box(0); x_81 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_81, 0, x_79); lean_ctor_set(x_81, 1, x_80); -return x_81; +x_82 = l_Lean_Meta_mkEqOfHEq___closed__2; +x_83 = l_Lean_mkConst(x_82, x_81); +x_84 = l_Lean_mkApp4(x_83, x_26, x_27, x_29, x_1); +lean_ctor_set(x_77, 0, x_84); +return x_77; +} +else +{ +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_85 = lean_ctor_get(x_77, 0); +x_86 = lean_ctor_get(x_77, 1); +lean_inc(x_86); +lean_inc(x_85); +lean_dec(x_77); +x_87 = lean_box(0); +x_88 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_88, 0, x_85); +lean_ctor_set(x_88, 1, x_87); +x_89 = l_Lean_Meta_mkEqOfHEq___closed__2; +x_90 = l_Lean_mkConst(x_89, x_88); +x_91 = l_Lean_mkApp4(x_90, x_26, x_27, x_29, x_1); +x_92 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_92, 0, x_91); +lean_ctor_set(x_92, 1, x_86); +return x_92; +} +} +else +{ +uint8_t x_93; +lean_dec(x_29); +lean_dec(x_27); +lean_dec(x_26); +lean_dec(x_1); +x_93 = !lean_is_exclusive(x_77); +if (x_93 == 0) +{ +return x_77; +} +else +{ +lean_object* x_94; lean_object* x_95; lean_object* x_96; +x_94 = lean_ctor_get(x_77, 0); +x_95 = lean_ctor_get(x_77, 1); +lean_inc(x_95); +lean_inc(x_94); +lean_dec(x_77); +x_96 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_96, 0, x_94); +lean_ctor_set(x_96, 1, x_95); +return x_96; } } } } else { -uint8_t x_82; +uint8_t x_97; +lean_dec(x_29); lean_dec(x_28); lean_dec(x_27); lean_dec(x_26); -lean_dec(x_25); lean_dec(x_2); lean_dec(x_1); -x_82 = !lean_is_exclusive(x_29); -if (x_82 == 0) +x_97 = !lean_is_exclusive(x_30); +if (x_97 == 0) { -return x_29; +return x_30; } else { -lean_object* x_83; lean_object* x_84; lean_object* x_85; -x_83 = lean_ctor_get(x_29, 0); -x_84 = lean_ctor_get(x_29, 1); -lean_inc(x_84); -lean_inc(x_83); -lean_dec(x_29); -x_85 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_85, 0, x_83); -lean_ctor_set(x_85, 1, x_84); -return x_85; +lean_object* x_98; lean_object* x_99; lean_object* x_100; +x_98 = lean_ctor_get(x_30, 0); +x_99 = lean_ctor_get(x_30, 1); +lean_inc(x_99); +lean_inc(x_98); +lean_dec(x_30); +x_100 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_100, 0, x_98); +lean_ctor_set(x_100, 1, x_99); +return x_100; } } } } else { -lean_object* x_86; lean_object* x_87; lean_object* x_88; lean_object* x_89; uint8_t x_90; -x_86 = lean_ctor_get(x_4, 0); -x_87 = lean_ctor_get(x_4, 1); -lean_inc(x_87); -lean_inc(x_86); +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_4, 0); +x_102 = lean_ctor_get(x_4, 1); +lean_inc(x_102); +lean_inc(x_101); lean_dec(x_4); -x_88 = l_Lean_Expr_heq_x3f___closed__2; -x_89 = lean_unsigned_to_nat(4u); -x_90 = l_Lean_Expr_isAppOfArity___main(x_86, x_88, x_89); -if (x_90 == 0) +x_103 = l_Lean_Expr_heq_x3f___closed__2; +x_104 = lean_unsigned_to_nat(4u); +x_105 = l_Lean_Expr_isAppOfArity___main(x_101, x_103, x_104); +if (x_105 == 0) { -lean_object* x_91; lean_object* x_92; lean_object* x_93; lean_object* x_94; lean_object* x_95; lean_object* x_96; lean_object* x_97; lean_object* x_98; lean_object* x_99; lean_object* x_100; lean_object* x_101; lean_object* x_102; -lean_dec(x_86); -x_91 = lean_ctor_get(x_87, 0); -lean_inc(x_91); -x_92 = lean_ctor_get(x_87, 1); -lean_inc(x_92); -x_93 = lean_ctor_get(x_2, 1); -lean_inc(x_93); -x_94 = lean_ctor_get(x_2, 0); -lean_inc(x_94); -lean_dec(x_2); -x_95 = lean_ctor_get(x_94, 0); -lean_inc(x_95); -lean_dec(x_94); -x_96 = lean_alloc_ctor(0, 4, 0); -lean_ctor_set(x_96, 0, x_91); -lean_ctor_set(x_96, 1, x_92); -lean_ctor_set(x_96, 2, x_93); -lean_ctor_set(x_96, 3, x_95); -x_97 = l_Lean_mkOptionalNode___closed__2; -x_98 = lean_array_push(x_97, x_1); -x_99 = l_Lean_Meta_mkHEqTrans___closed__1; -x_100 = l_Lean_Meta_mkHEqSymm___closed__2; -x_101 = lean_alloc_ctor(16, 4, 0); -lean_ctor_set(x_101, 0, x_99); -lean_ctor_set(x_101, 1, x_100); -lean_ctor_set(x_101, 2, x_98); -lean_ctor_set(x_101, 3, x_96); -x_102 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_102, 0, x_101); -lean_ctor_set(x_102, 1, x_87); -return x_102; -} -else -{ -lean_object* x_103; lean_object* x_104; lean_object* x_105; lean_object* x_106; lean_object* x_107; lean_object* x_108; lean_object* x_109; lean_object* x_110; -x_103 = l_Lean_Expr_appFn_x21(x_86); -x_104 = l_Lean_Expr_appFn_x21(x_103); -x_105 = l_Lean_Expr_appFn_x21(x_104); -x_106 = l_Lean_Expr_appArg_x21(x_105); -lean_dec(x_105); -x_107 = l_Lean_Expr_appArg_x21(x_104); -lean_dec(x_104); -x_108 = l_Lean_Expr_appArg_x21(x_103); -lean_dec(x_103); -x_109 = l_Lean_Expr_appArg_x21(x_86); -lean_dec(x_86); -lean_inc(x_2); +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_dec(x_101); +x_106 = lean_ctor_get(x_102, 0); +lean_inc(x_106); +x_107 = lean_ctor_get(x_102, 1); +lean_inc(x_107); +x_108 = lean_ctor_get(x_2, 1); lean_inc(x_108); -lean_inc(x_106); -x_110 = l_Lean_Meta_isExprDefEq(x_106, x_108, x_2, x_87); -if (lean_obj_tag(x_110) == 0) -{ -lean_object* x_111; uint8_t x_112; -x_111 = lean_ctor_get(x_110, 0); -lean_inc(x_111); -x_112 = lean_unbox(x_111); -lean_dec(x_111); -if (x_112 == 0) -{ -lean_object* x_113; lean_object* x_114; lean_object* x_115; lean_object* x_116; lean_object* x_117; lean_object* x_118; lean_object* x_119; lean_object* x_120; lean_object* x_121; lean_object* x_122; lean_object* x_123; lean_object* x_124; lean_object* x_125; lean_object* x_126; lean_object* x_127; -lean_dec(x_109); -lean_dec(x_107); -lean_dec(x_1); -x_113 = lean_ctor_get(x_110, 1); -lean_inc(x_113); -if (lean_is_exclusive(x_110)) { - lean_ctor_release(x_110, 0); - lean_ctor_release(x_110, 1); - x_114 = x_110; -} else { - lean_dec_ref(x_110); - x_114 = lean_box(0); -} -x_115 = lean_ctor_get(x_113, 0); -lean_inc(x_115); -x_116 = lean_ctor_get(x_113, 1); -lean_inc(x_116); -x_117 = lean_ctor_get(x_2, 1); -lean_inc(x_117); -x_118 = lean_ctor_get(x_2, 0); -lean_inc(x_118); +x_109 = lean_ctor_get(x_2, 0); +lean_inc(x_109); lean_dec(x_2); -x_119 = lean_ctor_get(x_118, 0); -lean_inc(x_119); -lean_dec(x_118); -x_120 = lean_alloc_ctor(0, 4, 0); -lean_ctor_set(x_120, 0, x_115); -lean_ctor_set(x_120, 1, x_116); -lean_ctor_set(x_120, 2, x_117); -lean_ctor_set(x_120, 3, x_119); -x_121 = l_Lean_mkAppStx___closed__9; -x_122 = lean_array_push(x_121, x_106); -x_123 = lean_array_push(x_122, x_108); -x_124 = l_Lean_Meta_mkEqOfHEq___closed__2; -x_125 = l_Lean_Meta_mkEqOfHEq___closed__3; -x_126 = lean_alloc_ctor(16, 4, 0); -lean_ctor_set(x_126, 0, x_124); -lean_ctor_set(x_126, 1, x_125); -lean_ctor_set(x_126, 2, x_123); -lean_ctor_set(x_126, 3, x_120); -if (lean_is_scalar(x_114)) { - x_127 = lean_alloc_ctor(1, 2, 0); -} else { - x_127 = x_114; - lean_ctor_set_tag(x_127, 1); -} -lean_ctor_set(x_127, 0, x_126); -lean_ctor_set(x_127, 1, x_113); -return x_127; +x_110 = lean_ctor_get(x_109, 0); +lean_inc(x_110); +lean_dec(x_109); +x_111 = lean_alloc_ctor(0, 4, 0); +lean_ctor_set(x_111, 0, x_106); +lean_ctor_set(x_111, 1, x_107); +lean_ctor_set(x_111, 2, x_108); +lean_ctor_set(x_111, 3, x_110); +x_112 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_112, 0, x_1); +x_113 = l_Lean_indentExpr(x_112); +x_114 = l_Lean_Meta_mkHEqSymm___closed__4; +x_115 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_115, 0, x_114); +lean_ctor_set(x_115, 1, x_113); +x_116 = l_Lean_Meta_mkHEqTrans___closed__1; +x_117 = lean_alloc_ctor(16, 3, 0); +lean_ctor_set(x_117, 0, x_116); +lean_ctor_set(x_117, 1, x_115); +lean_ctor_set(x_117, 2, x_111); +x_118 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_118, 0, x_117); +lean_ctor_set(x_118, 1, x_102); +return x_118; } else { -lean_object* x_128; lean_object* x_129; -lean_dec(x_108); -x_128 = lean_ctor_get(x_110, 1); -lean_inc(x_128); -lean_dec(x_110); -lean_inc(x_106); -x_129 = l_Lean_Meta_getLevel(x_106, x_2, x_128); -if (lean_obj_tag(x_129) == 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; +x_119 = l_Lean_Expr_appFn_x21(x_101); +x_120 = l_Lean_Expr_appFn_x21(x_119); +x_121 = l_Lean_Expr_appFn_x21(x_120); +x_122 = l_Lean_Expr_appArg_x21(x_121); +lean_dec(x_121); +x_123 = l_Lean_Expr_appArg_x21(x_120); +lean_dec(x_120); +x_124 = l_Lean_Expr_appArg_x21(x_119); +lean_dec(x_119); +x_125 = l_Lean_Expr_appArg_x21(x_101); +lean_dec(x_101); +lean_inc(x_2); +lean_inc(x_124); +lean_inc(x_122); +x_126 = l_Lean_Meta_isExprDefEq(x_122, x_124, x_2, x_102); +if (lean_obj_tag(x_126) == 0) { -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; -x_130 = lean_ctor_get(x_129, 0); -lean_inc(x_130); -x_131 = lean_ctor_get(x_129, 1); +lean_object* x_127; uint8_t x_128; +x_127 = lean_ctor_get(x_126, 0); +lean_inc(x_127); +x_128 = lean_unbox(x_127); +lean_dec(x_127); +if (x_128 == 0) +{ +lean_object* x_129; lean_object* x_130; lean_object* x_131; lean_object* x_132; lean_object* x_133; lean_object* x_134; lean_object* x_135; lean_object* x_136; lean_object* x_137; lean_object* x_138; lean_object* x_139; lean_object* x_140; lean_object* x_141; lean_object* x_142; lean_object* x_143; lean_object* x_144; lean_object* x_145; lean_object* x_146; lean_object* x_147; lean_object* x_148; lean_object* x_149; lean_object* x_150; +lean_dec(x_125); +lean_dec(x_123); +lean_dec(x_1); +x_129 = lean_ctor_get(x_126, 1); +lean_inc(x_129); +if (lean_is_exclusive(x_126)) { + lean_ctor_release(x_126, 0); + lean_ctor_release(x_126, 1); + x_130 = x_126; +} else { + lean_dec_ref(x_126); + x_130 = lean_box(0); +} +x_131 = lean_ctor_get(x_129, 0); lean_inc(x_131); -if (lean_is_exclusive(x_129)) { - lean_ctor_release(x_129, 0); - lean_ctor_release(x_129, 1); - x_132 = x_129; +x_132 = lean_ctor_get(x_129, 1); +lean_inc(x_132); +x_133 = lean_ctor_get(x_2, 1); +lean_inc(x_133); +x_134 = lean_ctor_get(x_2, 0); +lean_inc(x_134); +lean_dec(x_2); +x_135 = lean_ctor_get(x_134, 0); +lean_inc(x_135); +lean_dec(x_134); +x_136 = lean_alloc_ctor(0, 4, 0); +lean_ctor_set(x_136, 0, x_131); +lean_ctor_set(x_136, 1, x_132); +lean_ctor_set(x_136, 2, x_133); +lean_ctor_set(x_136, 3, x_135); +x_137 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_137, 0, x_122); +x_138 = l_Lean_indentExpr(x_137); +x_139 = l_Lean_Meta_mkEqOfHEq___closed__5; +x_140 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_140, 0, x_139); +lean_ctor_set(x_140, 1, x_138); +x_141 = l_Lean_MessageData_ofList___closed__3; +x_142 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_142, 0, x_140); +lean_ctor_set(x_142, 1, x_141); +x_143 = l_Lean_Meta_mkEqOfHEq___closed__8; +x_144 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_144, 0, x_142); +lean_ctor_set(x_144, 1, x_143); +x_145 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_145, 0, x_124); +x_146 = l_Lean_indentExpr(x_145); +x_147 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_147, 0, x_144); +lean_ctor_set(x_147, 1, x_146); +x_148 = l_Lean_Meta_mkEqOfHEq___closed__2; +x_149 = lean_alloc_ctor(16, 3, 0); +lean_ctor_set(x_149, 0, x_148); +lean_ctor_set(x_149, 1, x_147); +lean_ctor_set(x_149, 2, x_136); +if (lean_is_scalar(x_130)) { + x_150 = lean_alloc_ctor(1, 2, 0); } else { - lean_dec_ref(x_129); - x_132 = lean_box(0); + x_150 = x_130; + lean_ctor_set_tag(x_150, 1); } -x_133 = lean_box(0); -x_134 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_134, 0, x_130); -lean_ctor_set(x_134, 1, x_133); -x_135 = l_Lean_Meta_mkEqOfHEq___closed__2; -x_136 = l_Lean_mkConst(x_135, x_134); -x_137 = l_Lean_mkApp4(x_136, x_106, x_107, x_109, x_1); -if (lean_is_scalar(x_132)) { - x_138 = lean_alloc_ctor(0, 2, 0); -} else { - x_138 = x_132; -} -lean_ctor_set(x_138, 0, x_137); -lean_ctor_set(x_138, 1, x_131); -return x_138; +lean_ctor_set(x_150, 0, x_149); +lean_ctor_set(x_150, 1, x_129); +return x_150; } else { -lean_object* x_139; lean_object* x_140; lean_object* x_141; lean_object* x_142; -lean_dec(x_109); -lean_dec(x_107); -lean_dec(x_106); +lean_object* x_151; lean_object* x_152; +lean_dec(x_124); +x_151 = lean_ctor_get(x_126, 1); +lean_inc(x_151); +lean_dec(x_126); +lean_inc(x_122); +x_152 = l_Lean_Meta_getLevel(x_122, x_2, x_151); +if (lean_obj_tag(x_152) == 0) +{ +lean_object* x_153; lean_object* x_154; lean_object* x_155; lean_object* x_156; lean_object* x_157; lean_object* x_158; lean_object* x_159; lean_object* x_160; lean_object* x_161; +x_153 = lean_ctor_get(x_152, 0); +lean_inc(x_153); +x_154 = lean_ctor_get(x_152, 1); +lean_inc(x_154); +if (lean_is_exclusive(x_152)) { + lean_ctor_release(x_152, 0); + lean_ctor_release(x_152, 1); + x_155 = x_152; +} else { + lean_dec_ref(x_152); + x_155 = lean_box(0); +} +x_156 = lean_box(0); +x_157 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_157, 0, x_153); +lean_ctor_set(x_157, 1, x_156); +x_158 = l_Lean_Meta_mkEqOfHEq___closed__2; +x_159 = l_Lean_mkConst(x_158, x_157); +x_160 = l_Lean_mkApp4(x_159, x_122, x_123, x_125, x_1); +if (lean_is_scalar(x_155)) { + x_161 = lean_alloc_ctor(0, 2, 0); +} else { + x_161 = x_155; +} +lean_ctor_set(x_161, 0, x_160); +lean_ctor_set(x_161, 1, x_154); +return x_161; +} +else +{ +lean_object* x_162; lean_object* x_163; lean_object* x_164; lean_object* x_165; +lean_dec(x_125); +lean_dec(x_123); +lean_dec(x_122); lean_dec(x_1); -x_139 = lean_ctor_get(x_129, 0); -lean_inc(x_139); -x_140 = lean_ctor_get(x_129, 1); -lean_inc(x_140); -if (lean_is_exclusive(x_129)) { - lean_ctor_release(x_129, 0); - lean_ctor_release(x_129, 1); - x_141 = x_129; +x_162 = lean_ctor_get(x_152, 0); +lean_inc(x_162); +x_163 = lean_ctor_get(x_152, 1); +lean_inc(x_163); +if (lean_is_exclusive(x_152)) { + lean_ctor_release(x_152, 0); + lean_ctor_release(x_152, 1); + x_164 = x_152; } else { - lean_dec_ref(x_129); - x_141 = lean_box(0); + lean_dec_ref(x_152); + x_164 = lean_box(0); } -if (lean_is_scalar(x_141)) { - x_142 = lean_alloc_ctor(1, 2, 0); +if (lean_is_scalar(x_164)) { + x_165 = lean_alloc_ctor(1, 2, 0); } else { - x_142 = x_141; + x_165 = x_164; } -lean_ctor_set(x_142, 0, x_139); -lean_ctor_set(x_142, 1, x_140); -return x_142; +lean_ctor_set(x_165, 0, x_162); +lean_ctor_set(x_165, 1, x_163); +return x_165; } } } else { -lean_object* x_143; lean_object* x_144; lean_object* x_145; lean_object* x_146; -lean_dec(x_109); -lean_dec(x_108); -lean_dec(x_107); -lean_dec(x_106); +lean_object* x_166; lean_object* x_167; lean_object* x_168; lean_object* x_169; +lean_dec(x_125); +lean_dec(x_124); +lean_dec(x_123); +lean_dec(x_122); lean_dec(x_2); lean_dec(x_1); -x_143 = lean_ctor_get(x_110, 0); -lean_inc(x_143); -x_144 = lean_ctor_get(x_110, 1); -lean_inc(x_144); -if (lean_is_exclusive(x_110)) { - lean_ctor_release(x_110, 0); - lean_ctor_release(x_110, 1); - x_145 = x_110; +x_166 = lean_ctor_get(x_126, 0); +lean_inc(x_166); +x_167 = lean_ctor_get(x_126, 1); +lean_inc(x_167); +if (lean_is_exclusive(x_126)) { + lean_ctor_release(x_126, 0); + lean_ctor_release(x_126, 1); + x_168 = x_126; } else { - lean_dec_ref(x_110); - x_145 = lean_box(0); + lean_dec_ref(x_126); + x_168 = lean_box(0); } -if (lean_is_scalar(x_145)) { - x_146 = lean_alloc_ctor(1, 2, 0); +if (lean_is_scalar(x_168)) { + x_169 = lean_alloc_ctor(1, 2, 0); } else { - x_146 = x_145; + x_169 = x_168; } -lean_ctor_set(x_146, 0, x_143); -lean_ctor_set(x_146, 1, x_144); -return x_146; +lean_ctor_set(x_169, 0, x_166); +lean_ctor_set(x_169, 1, x_167); +return x_169; } } } } else { -uint8_t x_147; +uint8_t x_170; lean_dec(x_2); lean_dec(x_1); -x_147 = !lean_is_exclusive(x_4); -if (x_147 == 0) +x_170 = !lean_is_exclusive(x_4); +if (x_170 == 0) { return x_4; } else { -lean_object* x_148; lean_object* x_149; lean_object* x_150; -x_148 = lean_ctor_get(x_4, 0); -x_149 = lean_ctor_get(x_4, 1); -lean_inc(x_149); -lean_inc(x_148); +lean_object* x_171; lean_object* x_172; lean_object* x_173; +x_171 = lean_ctor_get(x_4, 0); +x_172 = lean_ctor_get(x_4, 1); +lean_inc(x_172); +lean_inc(x_171); lean_dec(x_4); -x_150 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_150, 0, x_148); -lean_ctor_set(x_150, 1, x_149); -return x_150; +x_173 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_173, 0, x_171); +lean_ctor_set(x_173, 1, x_172); +return x_173; } } } @@ -3099,6 +3329,26 @@ x_1 = lean_mk_string("non-dependent function expected"); return x_1; } } +lean_object* _init_l_Lean_Meta_mkCongrArg___closed__4() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Meta_mkCongrArg___closed__3; +x_2 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* _init_l_Lean_Meta_mkCongrArg___closed__5() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Meta_mkCongrArg___closed__4; +x_2 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} lean_object* l_Lean_Meta_mkCongrArg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { @@ -3126,7 +3376,7 @@ lean_inc(x_1); x_9 = l___private_Lean_Meta_AppBuilder_1__infer(x_1, x_3, x_7); if (lean_obj_tag(x_9) == 0) { -lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_64; lean_object* x_81; lean_object* x_114; lean_object* x_115; uint8_t x_116; +lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_63; lean_object* x_79; lean_object* x_111; lean_object* x_112; uint8_t x_113; x_10 = lean_ctor_get(x_9, 0); lean_inc(x_10); x_11 = lean_ctor_get(x_9, 1); @@ -3139,83 +3389,79 @@ if (lean_is_exclusive(x_9)) { lean_dec_ref(x_9); x_12 = lean_box(0); } -x_114 = l_Lean_Expr_eq_x3f___closed__2; -x_115 = lean_unsigned_to_nat(3u); -x_116 = l_Lean_Expr_isAppOfArity___main(x_6, x_114, x_115); +x_111 = l_Lean_Expr_eq_x3f___closed__2; +x_112 = lean_unsigned_to_nat(3u); +x_113 = l_Lean_Expr_isAppOfArity___main(x_6, x_111, x_112); if (lean_obj_tag(x_10) == 7) { -lean_object* x_117; lean_object* x_118; uint8_t x_119; -x_117 = lean_ctor_get(x_10, 1); -lean_inc(x_117); -x_118 = lean_ctor_get(x_10, 2); -lean_inc(x_118); -lean_dec(x_10); -x_119 = l_Lean_Expr_hasLooseBVars(x_118); -if (x_119 == 0) -{ -lean_object* x_120; lean_object* x_121; -x_120 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_120, 0, x_117); -lean_ctor_set(x_120, 1, x_118); -x_121 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_121, 0, x_120); +lean_object* x_114; lean_object* x_115; uint8_t x_116; +x_114 = lean_ctor_get(x_10, 1); +lean_inc(x_114); +x_115 = lean_ctor_get(x_10, 2); +lean_inc(x_115); +x_116 = l_Lean_Expr_hasLooseBVars(x_115); if (x_116 == 0) { -lean_dec(x_6); -x_64 = x_121; -goto block_80; +lean_object* x_117; lean_object* x_118; +x_117 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_117, 0, x_114); +lean_ctor_set(x_117, 1, x_115); +x_118 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_118, 0, x_117); +if (x_113 == 0) +{ +x_63 = x_118; +goto block_78; } else { lean_dec(x_8); -x_81 = x_121; -goto block_113; +x_79 = x_118; +goto block_110; } } else { -lean_object* x_122; -lean_dec(x_118); -lean_dec(x_117); -x_122 = lean_box(0); -if (x_116 == 0) +lean_object* x_119; +lean_dec(x_115); +lean_dec(x_114); +x_119 = lean_box(0); +if (x_113 == 0) { -lean_dec(x_6); -x_64 = x_122; -goto block_80; +x_63 = x_119; +goto block_78; } else { lean_dec(x_8); -x_81 = x_122; -goto block_113; +x_79 = x_119; +goto block_110; } } } else { -lean_object* x_123; -lean_dec(x_10); -x_123 = lean_box(0); -if (x_116 == 0) +lean_object* x_120; +x_120 = lean_box(0); +if (x_113 == 0) { -lean_dec(x_6); -x_64 = x_123; -goto block_80; +x_63 = x_120; +goto block_78; } else { lean_dec(x_8); -x_81 = x_123; -goto block_113; +x_79 = x_120; +goto block_110; } } -block_63: +block_62: { if (lean_obj_tag(x_13) == 0) { -lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; +lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_dec(x_14); +lean_dec(x_1); x_15 = lean_ctor_get(x_11, 0); lean_inc(x_15); x_16 = lean_ctor_get(x_11, 1); @@ -3233,367 +3479,371 @@ lean_ctor_set(x_20, 0, x_15); lean_ctor_set(x_20, 1, x_16); lean_ctor_set(x_20, 2, x_17); lean_ctor_set(x_20, 3, x_19); -x_21 = l_Lean_mkAppStx___closed__9; -x_22 = lean_array_push(x_21, x_1); -x_23 = lean_array_push(x_22, x_2); +x_21 = l___private_Lean_Meta_AppBuilder_2__hasTypeMsg(x_2, x_6); +x_22 = l_Lean_Meta_mkEqSymm___closed__5; +x_23 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_23, 0, x_22); +lean_ctor_set(x_23, 1, x_21); x_24 = l_Lean_Meta_mkCongrArg___closed__2; -x_25 = l_Lean_Meta_mkEqSymm___closed__3; -x_26 = lean_alloc_ctor(16, 4, 0); -lean_ctor_set(x_26, 0, x_24); -lean_ctor_set(x_26, 1, x_25); -lean_ctor_set(x_26, 2, x_23); -lean_ctor_set(x_26, 3, x_20); +x_25 = lean_alloc_ctor(16, 3, 0); +lean_ctor_set(x_25, 0, x_24); +lean_ctor_set(x_25, 1, x_23); +lean_ctor_set(x_25, 2, x_20); if (lean_is_scalar(x_12)) { - x_27 = lean_alloc_ctor(1, 2, 0); + x_26 = lean_alloc_ctor(1, 2, 0); } else { - x_27 = x_12; - lean_ctor_set_tag(x_27, 1); + x_26 = x_12; + lean_ctor_set_tag(x_26, 1); } -lean_ctor_set(x_27, 0, x_26); -lean_ctor_set(x_27, 1, x_11); -return x_27; +lean_ctor_set(x_26, 0, x_25); +lean_ctor_set(x_26, 1, x_11); +return x_26; } else { -lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; +lean_object* x_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_12); -x_28 = lean_ctor_get(x_13, 0); -lean_inc(x_28); +lean_dec(x_6); +x_27 = lean_ctor_get(x_13, 0); +lean_inc(x_27); lean_dec(x_13); -x_29 = lean_ctor_get(x_28, 1); +x_28 = lean_ctor_get(x_27, 1); +lean_inc(x_28); +lean_dec(x_27); +x_29 = lean_ctor_get(x_14, 0); lean_inc(x_29); -lean_dec(x_28); -x_30 = lean_ctor_get(x_14, 0); +x_30 = lean_ctor_get(x_14, 1); lean_inc(x_30); -x_31 = lean_ctor_get(x_14, 1); -lean_inc(x_31); lean_dec(x_14); -x_32 = lean_ctor_get(x_29, 0); -lean_inc(x_32); -x_33 = lean_ctor_get(x_29, 1); -lean_inc(x_33); -lean_dec(x_29); -lean_inc(x_3); -lean_inc(x_30); -x_34 = l_Lean_Meta_getLevel(x_30, x_3, x_11); -if (lean_obj_tag(x_34) == 0) -{ -lean_object* x_35; lean_object* x_36; lean_object* x_37; -x_35 = lean_ctor_get(x_34, 0); -lean_inc(x_35); -x_36 = lean_ctor_get(x_34, 1); -lean_inc(x_36); -lean_dec(x_34); +x_31 = lean_ctor_get(x_28, 0); lean_inc(x_31); -x_37 = l_Lean_Meta_getLevel(x_31, x_3, x_36); -if (lean_obj_tag(x_37) == 0) +x_32 = lean_ctor_get(x_28, 1); +lean_inc(x_32); +lean_dec(x_28); +lean_inc(x_3); +lean_inc(x_29); +x_33 = l_Lean_Meta_getLevel(x_29, x_3, x_11); +if (lean_obj_tag(x_33) == 0) { -uint8_t x_38; -x_38 = !lean_is_exclusive(x_37); -if (x_38 == 0) +lean_object* x_34; lean_object* x_35; lean_object* x_36; +x_34 = lean_ctor_get(x_33, 0); +lean_inc(x_34); +x_35 = lean_ctor_get(x_33, 1); +lean_inc(x_35); +lean_dec(x_33); +lean_inc(x_30); +x_36 = l_Lean_Meta_getLevel(x_30, x_3, x_35); +if (lean_obj_tag(x_36) == 0) { -lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; -x_39 = lean_ctor_get(x_37, 0); -x_40 = lean_box(0); +uint8_t x_37; +x_37 = !lean_is_exclusive(x_36); +if (x_37 == 0) +{ +lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; +x_38 = lean_ctor_get(x_36, 0); +x_39 = lean_box(0); +x_40 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_40, 0, x_38); +lean_ctor_set(x_40, 1, x_39); x_41 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_41, 0, x_39); +lean_ctor_set(x_41, 0, x_34); lean_ctor_set(x_41, 1, x_40); -x_42 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_42, 0, x_35); -lean_ctor_set(x_42, 1, x_41); -x_43 = l_Lean_Meta_mkCongrArg___closed__2; -x_44 = l_Lean_mkConst(x_43, x_42); -x_45 = l_Lean_mkApp6(x_44, x_30, x_31, x_32, x_33, x_1, x_2); -lean_ctor_set(x_37, 0, x_45); -return x_37; +x_42 = l_Lean_Meta_mkCongrArg___closed__2; +x_43 = l_Lean_mkConst(x_42, x_41); +x_44 = l_Lean_mkApp6(x_43, x_29, x_30, x_31, x_32, x_1, x_2); +lean_ctor_set(x_36, 0, x_44); +return x_36; } else { -lean_object* x_46; lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_object* x_51; lean_object* x_52; lean_object* x_53; lean_object* x_54; -x_46 = lean_ctor_get(x_37, 0); -x_47 = lean_ctor_get(x_37, 1); -lean_inc(x_47); +lean_object* x_45; lean_object* x_46; lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_object* x_51; lean_object* x_52; lean_object* x_53; +x_45 = lean_ctor_get(x_36, 0); +x_46 = lean_ctor_get(x_36, 1); lean_inc(x_46); -lean_dec(x_37); -x_48 = lean_box(0); +lean_inc(x_45); +lean_dec(x_36); +x_47 = lean_box(0); +x_48 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_48, 0, x_45); +lean_ctor_set(x_48, 1, x_47); x_49 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_49, 0, x_46); +lean_ctor_set(x_49, 0, x_34); lean_ctor_set(x_49, 1, x_48); -x_50 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_50, 0, x_35); -lean_ctor_set(x_50, 1, x_49); -x_51 = l_Lean_Meta_mkCongrArg___closed__2; -x_52 = l_Lean_mkConst(x_51, x_50); -x_53 = l_Lean_mkApp6(x_52, x_30, x_31, x_32, x_33, x_1, x_2); -x_54 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_54, 0, x_53); -lean_ctor_set(x_54, 1, x_47); -return x_54; +x_50 = l_Lean_Meta_mkCongrArg___closed__2; +x_51 = l_Lean_mkConst(x_50, x_49); +x_52 = l_Lean_mkApp6(x_51, x_29, x_30, x_31, x_32, x_1, x_2); +x_53 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_53, 0, x_52); +lean_ctor_set(x_53, 1, x_46); +return x_53; } } else { -uint8_t x_55; -lean_dec(x_35); -lean_dec(x_33); -lean_dec(x_32); -lean_dec(x_31); -lean_dec(x_30); -lean_dec(x_2); -lean_dec(x_1); -x_55 = !lean_is_exclusive(x_37); -if (x_55 == 0) -{ -return x_37; -} -else -{ -lean_object* x_56; lean_object* x_57; lean_object* x_58; -x_56 = lean_ctor_get(x_37, 0); -x_57 = lean_ctor_get(x_37, 1); -lean_inc(x_57); -lean_inc(x_56); -lean_dec(x_37); -x_58 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_58, 0, x_56); -lean_ctor_set(x_58, 1, x_57); -return x_58; -} -} -} -else -{ -uint8_t x_59; -lean_dec(x_33); -lean_dec(x_32); -lean_dec(x_31); -lean_dec(x_30); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_59 = !lean_is_exclusive(x_34); -if (x_59 == 0) -{ -return x_34; -} -else -{ -lean_object* x_60; lean_object* x_61; lean_object* x_62; -x_60 = lean_ctor_get(x_34, 0); -x_61 = lean_ctor_get(x_34, 1); -lean_inc(x_61); -lean_inc(x_60); +uint8_t x_54; lean_dec(x_34); -x_62 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_62, 0, x_60); -lean_ctor_set(x_62, 1, x_61); -return x_62; -} -} -} -} -block_80: +lean_dec(x_32); +lean_dec(x_31); +lean_dec(x_30); +lean_dec(x_29); +lean_dec(x_2); +lean_dec(x_1); +x_54 = !lean_is_exclusive(x_36); +if (x_54 == 0) { -if (lean_obj_tag(x_64) == 0) +return x_36; +} +else { -lean_object* x_65; lean_object* x_66; lean_object* x_67; lean_object* x_68; lean_object* x_69; lean_object* x_70; lean_object* x_71; lean_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_55; lean_object* x_56; lean_object* x_57; +x_55 = lean_ctor_get(x_36, 0); +x_56 = lean_ctor_get(x_36, 1); +lean_inc(x_56); +lean_inc(x_55); +lean_dec(x_36); +x_57 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_57, 0, x_55); +lean_ctor_set(x_57, 1, x_56); +return x_57; +} +} +} +else +{ +uint8_t x_58; +lean_dec(x_32); +lean_dec(x_31); +lean_dec(x_30); +lean_dec(x_29); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_58 = !lean_is_exclusive(x_33); +if (x_58 == 0) +{ +return x_33; +} +else +{ +lean_object* x_59; lean_object* x_60; lean_object* x_61; +x_59 = lean_ctor_get(x_33, 0); +x_60 = lean_ctor_get(x_33, 1); +lean_inc(x_60); +lean_inc(x_59); +lean_dec(x_33); +x_61 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_61, 0, x_59); +lean_ctor_set(x_61, 1, x_60); +return x_61; +} +} +} +} +block_78: +{ +if (lean_obj_tag(x_63) == 0) +{ +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_dec(x_12); -x_65 = lean_ctor_get(x_11, 0); +lean_dec(x_6); +lean_dec(x_2); +x_64 = lean_ctor_get(x_11, 0); +lean_inc(x_64); +x_65 = lean_ctor_get(x_11, 1); lean_inc(x_65); -x_66 = lean_ctor_get(x_11, 1); +x_66 = lean_ctor_get(x_3, 1); lean_inc(x_66); -x_67 = lean_ctor_get(x_3, 1); +x_67 = lean_ctor_get(x_3, 0); lean_inc(x_67); -x_68 = lean_ctor_get(x_3, 0); -lean_inc(x_68); lean_dec(x_3); -x_69 = lean_ctor_get(x_68, 0); -lean_inc(x_69); -lean_dec(x_68); -x_70 = lean_alloc_ctor(0, 4, 0); -lean_ctor_set(x_70, 0, x_65); -lean_ctor_set(x_70, 1, x_66); -lean_ctor_set(x_70, 2, x_67); -lean_ctor_set(x_70, 3, x_69); -x_71 = l_Lean_mkAppStx___closed__9; -x_72 = lean_array_push(x_71, x_1); -x_73 = lean_array_push(x_72, x_2); -x_74 = l_Lean_Meta_mkCongrArg___closed__2; -x_75 = l_Lean_Meta_mkCongrArg___closed__3; -x_76 = lean_alloc_ctor(16, 4, 0); -lean_ctor_set(x_76, 0, x_74); -lean_ctor_set(x_76, 1, x_75); -lean_ctor_set(x_76, 2, x_73); -lean_ctor_set(x_76, 3, x_70); +x_68 = lean_ctor_get(x_67, 0); +lean_inc(x_68); +lean_dec(x_67); +x_69 = lean_alloc_ctor(0, 4, 0); +lean_ctor_set(x_69, 0, x_64); +lean_ctor_set(x_69, 1, x_65); +lean_ctor_set(x_69, 2, x_66); +lean_ctor_set(x_69, 3, x_68); +x_70 = l___private_Lean_Meta_AppBuilder_2__hasTypeMsg(x_1, x_10); +x_71 = l_Lean_Meta_mkCongrArg___closed__5; +x_72 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_72, 0, x_71); +lean_ctor_set(x_72, 1, x_70); +x_73 = l_Lean_Meta_mkCongrArg___closed__2; +x_74 = lean_alloc_ctor(16, 3, 0); +lean_ctor_set(x_74, 0, x_73); +lean_ctor_set(x_74, 1, x_72); +lean_ctor_set(x_74, 2, x_69); if (lean_is_scalar(x_8)) { - x_77 = lean_alloc_ctor(1, 2, 0); + x_75 = lean_alloc_ctor(1, 2, 0); } else { - x_77 = x_8; - lean_ctor_set_tag(x_77, 1); + x_75 = x_8; + lean_ctor_set_tag(x_75, 1); } -lean_ctor_set(x_77, 0, x_76); -lean_ctor_set(x_77, 1, x_11); -return x_77; +lean_ctor_set(x_75, 0, x_74); +lean_ctor_set(x_75, 1, x_11); +return x_75; } else { -lean_object* x_78; lean_object* x_79; +lean_object* x_76; lean_object* x_77; +lean_dec(x_10); lean_dec(x_8); -x_78 = lean_ctor_get(x_64, 0); -lean_inc(x_78); -lean_dec(x_64); -x_79 = lean_box(0); -x_13 = x_79; -x_14 = x_78; -goto block_63; +x_76 = lean_ctor_get(x_63, 0); +lean_inc(x_76); +lean_dec(x_63); +x_77 = lean_box(0); +x_13 = x_77; +x_14 = x_76; +goto block_62; } } -block_113: +block_110: { -if (lean_obj_tag(x_81) == 0) +if (lean_obj_tag(x_79) == 0) { -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_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_dec(x_12); lean_dec(x_6); -x_82 = lean_ctor_get(x_11, 0); +lean_dec(x_2); +x_80 = lean_ctor_get(x_11, 0); +lean_inc(x_80); +x_81 = lean_ctor_get(x_11, 1); +lean_inc(x_81); +x_82 = lean_ctor_get(x_3, 1); lean_inc(x_82); -x_83 = lean_ctor_get(x_11, 1); +x_83 = lean_ctor_get(x_3, 0); lean_inc(x_83); -x_84 = lean_ctor_get(x_3, 1); -lean_inc(x_84); -x_85 = lean_ctor_get(x_3, 0); -lean_inc(x_85); lean_dec(x_3); -x_86 = lean_ctor_get(x_85, 0); -lean_inc(x_86); -lean_dec(x_85); -x_87 = lean_alloc_ctor(0, 4, 0); -lean_ctor_set(x_87, 0, x_82); -lean_ctor_set(x_87, 1, x_83); -lean_ctor_set(x_87, 2, x_84); -lean_ctor_set(x_87, 3, x_86); -x_88 = l_Lean_mkAppStx___closed__9; -x_89 = lean_array_push(x_88, x_1); -x_90 = lean_array_push(x_89, x_2); -x_91 = l_Lean_Meta_mkCongrArg___closed__2; -x_92 = l_Lean_Meta_mkCongrArg___closed__3; -x_93 = lean_alloc_ctor(16, 4, 0); -lean_ctor_set(x_93, 0, x_91); -lean_ctor_set(x_93, 1, x_92); -lean_ctor_set(x_93, 2, x_90); -lean_ctor_set(x_93, 3, x_87); -x_94 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_94, 0, x_93); -lean_ctor_set(x_94, 1, x_11); -return x_94; +x_84 = lean_ctor_get(x_83, 0); +lean_inc(x_84); +lean_dec(x_83); +x_85 = lean_alloc_ctor(0, 4, 0); +lean_ctor_set(x_85, 0, x_80); +lean_ctor_set(x_85, 1, x_81); +lean_ctor_set(x_85, 2, x_82); +lean_ctor_set(x_85, 3, x_84); +x_86 = l___private_Lean_Meta_AppBuilder_2__hasTypeMsg(x_1, x_10); +x_87 = l_Lean_Meta_mkCongrArg___closed__5; +x_88 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_88, 0, x_87); +lean_ctor_set(x_88, 1, x_86); +x_89 = l_Lean_Meta_mkCongrArg___closed__2; +x_90 = lean_alloc_ctor(16, 3, 0); +lean_ctor_set(x_90, 0, x_89); +lean_ctor_set(x_90, 1, x_88); +lean_ctor_set(x_90, 2, x_85); +x_91 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_91, 0, x_90); +lean_ctor_set(x_91, 1, x_11); +return x_91; } else { -uint8_t x_95; -x_95 = !lean_is_exclusive(x_81); -if (x_95 == 0) +uint8_t x_92; +lean_dec(x_10); +x_92 = !lean_is_exclusive(x_79); +if (x_92 == 0) { -lean_object* x_96; lean_object* x_97; lean_object* x_98; lean_object* x_99; lean_object* x_100; lean_object* x_101; lean_object* x_102; lean_object* x_103; -x_96 = lean_ctor_get(x_81, 0); -x_97 = l_Lean_Expr_appFn_x21(x_6); -x_98 = l_Lean_Expr_appFn_x21(x_97); -x_99 = l_Lean_Expr_appArg_x21(x_98); -lean_dec(x_98); -x_100 = l_Lean_Expr_appArg_x21(x_97); -lean_dec(x_97); -x_101 = l_Lean_Expr_appArg_x21(x_6); -lean_dec(x_6); -x_102 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_102, 0, x_100); -lean_ctor_set(x_102, 1, x_101); -x_103 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_103, 0, x_99); -lean_ctor_set(x_103, 1, x_102); -lean_ctor_set(x_81, 0, x_103); -x_13 = x_81; -x_14 = x_96; -goto block_63; +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_93 = lean_ctor_get(x_79, 0); +x_94 = l_Lean_Expr_appFn_x21(x_6); +x_95 = l_Lean_Expr_appFn_x21(x_94); +x_96 = l_Lean_Expr_appArg_x21(x_95); +lean_dec(x_95); +x_97 = l_Lean_Expr_appArg_x21(x_94); +lean_dec(x_94); +x_98 = l_Lean_Expr_appArg_x21(x_6); +x_99 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_99, 0, x_97); +lean_ctor_set(x_99, 1, x_98); +x_100 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_100, 0, x_96); +lean_ctor_set(x_100, 1, x_99); +lean_ctor_set(x_79, 0, x_100); +x_13 = x_79; +x_14 = x_93; +goto block_62; } else { -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; -x_104 = lean_ctor_get(x_81, 0); -lean_inc(x_104); -lean_dec(x_81); -x_105 = l_Lean_Expr_appFn_x21(x_6); -x_106 = l_Lean_Expr_appFn_x21(x_105); -x_107 = l_Lean_Expr_appArg_x21(x_106); -lean_dec(x_106); -x_108 = l_Lean_Expr_appArg_x21(x_105); -lean_dec(x_105); -x_109 = l_Lean_Expr_appArg_x21(x_6); -lean_dec(x_6); -x_110 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_110, 0, x_108); -lean_ctor_set(x_110, 1, x_109); -x_111 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_111, 0, x_107); -lean_ctor_set(x_111, 1, x_110); -x_112 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_112, 0, x_111); -x_13 = x_112; -x_14 = x_104; -goto block_63; +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_101 = lean_ctor_get(x_79, 0); +lean_inc(x_101); +lean_dec(x_79); +x_102 = l_Lean_Expr_appFn_x21(x_6); +x_103 = l_Lean_Expr_appFn_x21(x_102); +x_104 = l_Lean_Expr_appArg_x21(x_103); +lean_dec(x_103); +x_105 = l_Lean_Expr_appArg_x21(x_102); +lean_dec(x_102); +x_106 = l_Lean_Expr_appArg_x21(x_6); +x_107 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_107, 0, x_105); +lean_ctor_set(x_107, 1, x_106); +x_108 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_108, 0, x_104); +lean_ctor_set(x_108, 1, x_107); +x_109 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_109, 0, x_108); +x_13 = x_109; +x_14 = x_101; +goto block_62; } } } } else { -uint8_t x_124; +uint8_t x_121; lean_dec(x_8); lean_dec(x_6); lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); -x_124 = !lean_is_exclusive(x_9); -if (x_124 == 0) +x_121 = !lean_is_exclusive(x_9); +if (x_121 == 0) { return x_9; } else { -lean_object* x_125; lean_object* x_126; lean_object* x_127; -x_125 = lean_ctor_get(x_9, 0); -x_126 = lean_ctor_get(x_9, 1); -lean_inc(x_126); -lean_inc(x_125); +lean_object* x_122; lean_object* x_123; lean_object* x_124; +x_122 = lean_ctor_get(x_9, 0); +x_123 = lean_ctor_get(x_9, 1); +lean_inc(x_123); +lean_inc(x_122); lean_dec(x_9); -x_127 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_127, 0, x_125); -lean_ctor_set(x_127, 1, x_126); -return x_127; +x_124 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_124, 0, x_122); +lean_ctor_set(x_124, 1, x_123); +return x_124; } } } else { -uint8_t x_128; +uint8_t x_125; lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); -x_128 = !lean_is_exclusive(x_5); -if (x_128 == 0) +x_125 = !lean_is_exclusive(x_5); +if (x_125 == 0) { return x_5; } else { -lean_object* x_129; lean_object* x_130; lean_object* x_131; -x_129 = lean_ctor_get(x_5, 0); -x_130 = lean_ctor_get(x_5, 1); -lean_inc(x_130); -lean_inc(x_129); +lean_object* x_126; lean_object* x_127; lean_object* x_128; +x_126 = lean_ctor_get(x_5, 0); +x_127 = lean_ctor_get(x_5, 1); +lean_inc(x_127); +lean_inc(x_126); lean_dec(x_5); -x_131 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_131, 0, x_129); -lean_ctor_set(x_131, 1, x_130); -return x_131; +x_128 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_128, 0, x_126); +lean_ctor_set(x_128, 1, x_127); +return x_128; } } } @@ -3624,6 +3874,26 @@ x_1 = lean_mk_string("equality proof between functions expected"); return x_1; } } +lean_object* _init_l_Lean_Meta_mkCongrFun___closed__4() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Meta_mkCongrFun___closed__3; +x_2 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* _init_l_Lean_Meta_mkCongrFun___closed__5() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Meta_mkCongrFun___closed__4; +x_2 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} lean_object* l_Lean_Meta_mkCongrFun(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { @@ -3645,8 +3915,8 @@ x_10 = lean_unsigned_to_nat(3u); x_11 = l_Lean_Expr_isAppOfArity___main(x_7, x_9, x_10); if (x_11 == 0) { -lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; -lean_dec(x_7); +lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; +lean_dec(x_2); x_12 = lean_ctor_get(x_8, 0); lean_inc(x_12); x_13 = lean_ctor_get(x_8, 1); @@ -3664,424 +3934,458 @@ lean_ctor_set(x_17, 0, x_12); lean_ctor_set(x_17, 1, x_13); lean_ctor_set(x_17, 2, x_14); lean_ctor_set(x_17, 3, x_16); -x_18 = l_Lean_mkAppStx___closed__9; -x_19 = lean_array_push(x_18, x_1); -x_20 = lean_array_push(x_19, x_2); +x_18 = l___private_Lean_Meta_AppBuilder_2__hasTypeMsg(x_1, x_7); +x_19 = l_Lean_Meta_mkEqSymm___closed__5; +x_20 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_20, 0, x_19); +lean_ctor_set(x_20, 1, x_18); x_21 = l_Lean_Meta_mkCongrFun___closed__2; -x_22 = l_Lean_Meta_mkEqSymm___closed__3; -x_23 = lean_alloc_ctor(16, 4, 0); -lean_ctor_set(x_23, 0, x_21); -lean_ctor_set(x_23, 1, x_22); -lean_ctor_set(x_23, 2, x_20); -lean_ctor_set(x_23, 3, x_17); +x_22 = lean_alloc_ctor(16, 3, 0); +lean_ctor_set(x_22, 0, x_21); +lean_ctor_set(x_22, 1, x_20); +lean_ctor_set(x_22, 2, x_17); lean_ctor_set_tag(x_5, 1); -lean_ctor_set(x_5, 0, x_23); +lean_ctor_set(x_5, 0, x_22); return x_5; } else { -lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; +lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_free_object(x_5); -x_24 = l_Lean_Expr_appFn_x21(x_7); -x_25 = l_Lean_Expr_appFn_x21(x_24); -x_26 = l_Lean_Expr_appArg_x21(x_25); -lean_dec(x_25); -x_27 = l_Lean_Expr_appArg_x21(x_24); +x_23 = l_Lean_Expr_appFn_x21(x_7); +x_24 = l_Lean_Expr_appFn_x21(x_23); +x_25 = l_Lean_Expr_appArg_x21(x_24); lean_dec(x_24); -x_28 = l_Lean_Expr_appArg_x21(x_7); -lean_dec(x_7); +x_26 = l_Lean_Expr_appArg_x21(x_23); +lean_dec(x_23); +x_27 = l_Lean_Expr_appArg_x21(x_7); lean_inc(x_3); -x_29 = l_Lean_Meta_whnfD(x_26, x_3, x_8); -if (lean_obj_tag(x_29) == 0) +x_28 = l_Lean_Meta_whnfD(x_25, x_3, x_8); +if (lean_obj_tag(x_28) == 0) { -lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; -x_30 = lean_ctor_get(x_29, 0); +lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; +x_29 = lean_ctor_get(x_28, 0); +lean_inc(x_29); +x_30 = lean_ctor_get(x_28, 1); lean_inc(x_30); -x_31 = lean_ctor_get(x_29, 1); -lean_inc(x_31); -if (lean_is_exclusive(x_29)) { - lean_ctor_release(x_29, 0); - lean_ctor_release(x_29, 1); - x_32 = x_29; +if (lean_is_exclusive(x_28)) { + lean_ctor_release(x_28, 0); + lean_ctor_release(x_28, 1); + x_31 = x_28; } else { - lean_dec_ref(x_29); - x_32 = lean_box(0); + lean_dec_ref(x_28); + x_31 = lean_box(0); } -if (lean_obj_tag(x_30) == 7) +if (lean_obj_tag(x_29) == 7) { -lean_object* x_48; lean_object* x_49; lean_object* x_50; uint8_t x_51; lean_object* x_52; lean_object* x_53; -lean_dec(x_32); -x_48 = lean_ctor_get(x_30, 0); +lean_object* x_46; lean_object* x_47; lean_object* x_48; uint8_t x_49; lean_object* x_50; lean_object* x_51; +lean_dec(x_31); +lean_dec(x_7); +x_46 = lean_ctor_get(x_29, 0); +lean_inc(x_46); +x_47 = lean_ctor_get(x_29, 1); +lean_inc(x_47); +x_48 = lean_ctor_get(x_29, 2); lean_inc(x_48); -x_49 = lean_ctor_get(x_30, 1); -lean_inc(x_49); -x_50 = lean_ctor_get(x_30, 2); -lean_inc(x_50); -lean_dec(x_30); -x_51 = 0; -lean_inc(x_49); -x_52 = l_Lean_mkLambda(x_48, x_51, x_49, x_50); -lean_dec(x_48); -lean_inc(x_3); -lean_inc(x_49); -x_53 = l_Lean_Meta_getLevel(x_49, x_3, x_31); -if (lean_obj_tag(x_53) == 0) -{ -lean_object* x_54; lean_object* x_55; lean_object* x_56; lean_object* x_57; -x_54 = lean_ctor_get(x_53, 0); -lean_inc(x_54); -x_55 = lean_ctor_get(x_53, 1); -lean_inc(x_55); -lean_dec(x_53); -lean_inc(x_2); -lean_inc(x_52); -x_56 = l_Lean_mkApp(x_52, x_2); -x_57 = l_Lean_Meta_getLevel(x_56, x_3, x_55); -if (lean_obj_tag(x_57) == 0) -{ -uint8_t x_58; -x_58 = !lean_is_exclusive(x_57); -if (x_58 == 0) -{ -lean_object* x_59; lean_object* x_60; lean_object* x_61; lean_object* x_62; lean_object* x_63; lean_object* x_64; lean_object* x_65; -x_59 = lean_ctor_get(x_57, 0); -x_60 = lean_box(0); -x_61 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_61, 0, x_59); -lean_ctor_set(x_61, 1, x_60); -x_62 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_62, 0, x_54); -lean_ctor_set(x_62, 1, x_61); -x_63 = l_Lean_Meta_mkCongrFun___closed__2; -x_64 = l_Lean_mkConst(x_63, x_62); -x_65 = l_Lean_mkApp6(x_64, x_49, x_52, x_27, x_28, x_1, x_2); -lean_ctor_set(x_57, 0, x_65); -return x_57; -} -else -{ -lean_object* x_66; lean_object* x_67; lean_object* x_68; lean_object* x_69; lean_object* x_70; lean_object* x_71; lean_object* x_72; lean_object* x_73; lean_object* x_74; -x_66 = lean_ctor_get(x_57, 0); -x_67 = lean_ctor_get(x_57, 1); -lean_inc(x_67); -lean_inc(x_66); -lean_dec(x_57); -x_68 = lean_box(0); -x_69 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_69, 0, x_66); -lean_ctor_set(x_69, 1, x_68); -x_70 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_70, 0, x_54); -lean_ctor_set(x_70, 1, x_69); -x_71 = l_Lean_Meta_mkCongrFun___closed__2; -x_72 = l_Lean_mkConst(x_71, x_70); -x_73 = l_Lean_mkApp6(x_72, x_49, x_52, x_27, x_28, x_1, x_2); -x_74 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_74, 0, x_73); -lean_ctor_set(x_74, 1, x_67); -return x_74; -} -} -else -{ -uint8_t x_75; -lean_dec(x_54); -lean_dec(x_52); -lean_dec(x_49); -lean_dec(x_28); -lean_dec(x_27); -lean_dec(x_2); -lean_dec(x_1); -x_75 = !lean_is_exclusive(x_57); -if (x_75 == 0) -{ -return x_57; -} -else -{ -lean_object* x_76; lean_object* x_77; lean_object* x_78; -x_76 = lean_ctor_get(x_57, 0); -x_77 = lean_ctor_get(x_57, 1); -lean_inc(x_77); -lean_inc(x_76); -lean_dec(x_57); -x_78 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_78, 0, x_76); -lean_ctor_set(x_78, 1, x_77); -return x_78; -} -} -} -else -{ -uint8_t x_79; -lean_dec(x_52); -lean_dec(x_49); -lean_dec(x_28); -lean_dec(x_27); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_79 = !lean_is_exclusive(x_53); -if (x_79 == 0) -{ -return x_53; -} -else -{ -lean_object* x_80; lean_object* x_81; lean_object* x_82; -x_80 = lean_ctor_get(x_53, 0); -x_81 = lean_ctor_get(x_53, 1); -lean_inc(x_81); -lean_inc(x_80); -lean_dec(x_53); -x_82 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_82, 0, x_80); -lean_ctor_set(x_82, 1, x_81); -return x_82; -} -} -} -else -{ -lean_object* x_83; -lean_dec(x_30); -lean_dec(x_28); -lean_dec(x_27); -x_83 = lean_box(0); -x_33 = x_83; -goto block_47; -} -block_47: -{ -lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; -lean_dec(x_33); -x_34 = lean_ctor_get(x_31, 0); -lean_inc(x_34); -x_35 = lean_ctor_get(x_31, 1); -lean_inc(x_35); -x_36 = lean_ctor_get(x_3, 1); -lean_inc(x_36); -x_37 = lean_ctor_get(x_3, 0); -lean_inc(x_37); -lean_dec(x_3); -x_38 = lean_ctor_get(x_37, 0); -lean_inc(x_38); -lean_dec(x_37); -x_39 = lean_alloc_ctor(0, 4, 0); -lean_ctor_set(x_39, 0, x_34); -lean_ctor_set(x_39, 1, x_35); -lean_ctor_set(x_39, 2, x_36); -lean_ctor_set(x_39, 3, x_38); -x_40 = l_Lean_mkAppStx___closed__9; -x_41 = lean_array_push(x_40, x_1); -x_42 = lean_array_push(x_41, x_2); -x_43 = l_Lean_Meta_mkCongrFun___closed__2; -x_44 = l_Lean_Meta_mkCongrFun___closed__3; -x_45 = lean_alloc_ctor(16, 4, 0); -lean_ctor_set(x_45, 0, x_43); -lean_ctor_set(x_45, 1, x_44); -lean_ctor_set(x_45, 2, x_42); -lean_ctor_set(x_45, 3, x_39); -if (lean_is_scalar(x_32)) { - x_46 = lean_alloc_ctor(1, 2, 0); -} else { - x_46 = x_32; - lean_ctor_set_tag(x_46, 1); -} -lean_ctor_set(x_46, 0, x_45); -lean_ctor_set(x_46, 1, x_31); -return x_46; -} -} -else -{ -uint8_t x_84; -lean_dec(x_28); -lean_dec(x_27); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_84 = !lean_is_exclusive(x_29); -if (x_84 == 0) -{ -return x_29; -} -else -{ -lean_object* x_85; lean_object* x_86; lean_object* x_87; -x_85 = lean_ctor_get(x_29, 0); -x_86 = lean_ctor_get(x_29, 1); -lean_inc(x_86); -lean_inc(x_85); lean_dec(x_29); -x_87 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_87, 0, x_85); -lean_ctor_set(x_87, 1, x_86); -return x_87; +x_49 = 0; +lean_inc(x_47); +x_50 = l_Lean_mkLambda(x_46, x_49, x_47, x_48); +lean_dec(x_46); +lean_inc(x_3); +lean_inc(x_47); +x_51 = l_Lean_Meta_getLevel(x_47, x_3, x_30); +if (lean_obj_tag(x_51) == 0) +{ +lean_object* x_52; lean_object* x_53; lean_object* x_54; lean_object* x_55; +x_52 = lean_ctor_get(x_51, 0); +lean_inc(x_52); +x_53 = lean_ctor_get(x_51, 1); +lean_inc(x_53); +lean_dec(x_51); +lean_inc(x_2); +lean_inc(x_50); +x_54 = l_Lean_mkApp(x_50, x_2); +x_55 = l_Lean_Meta_getLevel(x_54, x_3, x_53); +if (lean_obj_tag(x_55) == 0) +{ +uint8_t x_56; +x_56 = !lean_is_exclusive(x_55); +if (x_56 == 0) +{ +lean_object* x_57; lean_object* x_58; lean_object* x_59; lean_object* x_60; lean_object* x_61; lean_object* x_62; lean_object* x_63; +x_57 = lean_ctor_get(x_55, 0); +x_58 = lean_box(0); +x_59 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_59, 0, x_57); +lean_ctor_set(x_59, 1, x_58); +x_60 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_60, 0, x_52); +lean_ctor_set(x_60, 1, x_59); +x_61 = l_Lean_Meta_mkCongrFun___closed__2; +x_62 = l_Lean_mkConst(x_61, x_60); +x_63 = l_Lean_mkApp6(x_62, x_47, x_50, x_26, x_27, x_1, x_2); +lean_ctor_set(x_55, 0, x_63); +return x_55; } +else +{ +lean_object* x_64; lean_object* x_65; lean_object* x_66; lean_object* x_67; lean_object* x_68; lean_object* x_69; lean_object* x_70; lean_object* x_71; lean_object* x_72; +x_64 = lean_ctor_get(x_55, 0); +x_65 = lean_ctor_get(x_55, 1); +lean_inc(x_65); +lean_inc(x_64); +lean_dec(x_55); +x_66 = lean_box(0); +x_67 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_67, 0, x_64); +lean_ctor_set(x_67, 1, x_66); +x_68 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_68, 0, x_52); +lean_ctor_set(x_68, 1, x_67); +x_69 = l_Lean_Meta_mkCongrFun___closed__2; +x_70 = l_Lean_mkConst(x_69, x_68); +x_71 = l_Lean_mkApp6(x_70, x_47, x_50, x_26, x_27, x_1, x_2); +x_72 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_72, 0, x_71); +lean_ctor_set(x_72, 1, x_65); +return x_72; +} +} +else +{ +uint8_t x_73; +lean_dec(x_52); +lean_dec(x_50); +lean_dec(x_47); +lean_dec(x_27); +lean_dec(x_26); +lean_dec(x_2); +lean_dec(x_1); +x_73 = !lean_is_exclusive(x_55); +if (x_73 == 0) +{ +return x_55; +} +else +{ +lean_object* x_74; lean_object* x_75; lean_object* x_76; +x_74 = lean_ctor_get(x_55, 0); +x_75 = lean_ctor_get(x_55, 1); +lean_inc(x_75); +lean_inc(x_74); +lean_dec(x_55); +x_76 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_76, 0, x_74); +lean_ctor_set(x_76, 1, x_75); +return x_76; } } } else { -lean_object* x_88; lean_object* x_89; lean_object* x_90; lean_object* x_91; uint8_t x_92; -x_88 = lean_ctor_get(x_5, 0); -x_89 = lean_ctor_get(x_5, 1); -lean_inc(x_89); -lean_inc(x_88); -lean_dec(x_5); -x_90 = l_Lean_Expr_eq_x3f___closed__2; -x_91 = lean_unsigned_to_nat(3u); -x_92 = l_Lean_Expr_isAppOfArity___main(x_88, x_90, x_91); -if (x_92 == 0) -{ -lean_object* x_93; lean_object* x_94; lean_object* x_95; lean_object* x_96; lean_object* x_97; lean_object* x_98; lean_object* x_99; lean_object* x_100; lean_object* x_101; lean_object* x_102; lean_object* x_103; lean_object* x_104; lean_object* x_105; -lean_dec(x_88); -x_93 = lean_ctor_get(x_89, 0); -lean_inc(x_93); -x_94 = lean_ctor_get(x_89, 1); -lean_inc(x_94); -x_95 = lean_ctor_get(x_3, 1); -lean_inc(x_95); -x_96 = lean_ctor_get(x_3, 0); -lean_inc(x_96); +uint8_t x_77; +lean_dec(x_50); +lean_dec(x_47); +lean_dec(x_27); +lean_dec(x_26); lean_dec(x_3); -x_97 = lean_ctor_get(x_96, 0); -lean_inc(x_97); -lean_dec(x_96); -x_98 = lean_alloc_ctor(0, 4, 0); -lean_ctor_set(x_98, 0, x_93); -lean_ctor_set(x_98, 1, x_94); -lean_ctor_set(x_98, 2, x_95); -lean_ctor_set(x_98, 3, x_97); -x_99 = l_Lean_mkAppStx___closed__9; -x_100 = lean_array_push(x_99, x_1); -x_101 = lean_array_push(x_100, x_2); -x_102 = l_Lean_Meta_mkCongrFun___closed__2; -x_103 = l_Lean_Meta_mkEqSymm___closed__3; -x_104 = lean_alloc_ctor(16, 4, 0); -lean_ctor_set(x_104, 0, x_102); -lean_ctor_set(x_104, 1, x_103); -lean_ctor_set(x_104, 2, x_101); -lean_ctor_set(x_104, 3, x_98); -x_105 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_105, 0, x_104); -lean_ctor_set(x_105, 1, x_89); -return x_105; +lean_dec(x_2); +lean_dec(x_1); +x_77 = !lean_is_exclusive(x_51); +if (x_77 == 0) +{ +return x_51; } else { -lean_object* x_106; lean_object* x_107; lean_object* x_108; lean_object* x_109; lean_object* x_110; lean_object* x_111; -x_106 = l_Lean_Expr_appFn_x21(x_88); -x_107 = l_Lean_Expr_appFn_x21(x_106); -x_108 = l_Lean_Expr_appArg_x21(x_107); -lean_dec(x_107); -x_109 = l_Lean_Expr_appArg_x21(x_106); -lean_dec(x_106); -x_110 = l_Lean_Expr_appArg_x21(x_88); -lean_dec(x_88); -lean_inc(x_3); -x_111 = l_Lean_Meta_whnfD(x_108, x_3, x_89); -if (lean_obj_tag(x_111) == 0) -{ -lean_object* x_112; lean_object* x_113; lean_object* x_114; lean_object* x_115; -x_112 = lean_ctor_get(x_111, 0); -lean_inc(x_112); -x_113 = lean_ctor_get(x_111, 1); -lean_inc(x_113); -if (lean_is_exclusive(x_111)) { - lean_ctor_release(x_111, 0); - lean_ctor_release(x_111, 1); - x_114 = x_111; -} else { - lean_dec_ref(x_111); - x_114 = lean_box(0); +lean_object* x_78; lean_object* x_79; lean_object* x_80; +x_78 = lean_ctor_get(x_51, 0); +x_79 = lean_ctor_get(x_51, 1); +lean_inc(x_79); +lean_inc(x_78); +lean_dec(x_51); +x_80 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_80, 0, x_78); +lean_ctor_set(x_80, 1, x_79); +return x_80; } -if (lean_obj_tag(x_112) == 7) +} +} +else { -lean_object* x_130; lean_object* x_131; lean_object* x_132; uint8_t x_133; lean_object* x_134; lean_object* x_135; -lean_dec(x_114); -x_130 = lean_ctor_get(x_112, 0); -lean_inc(x_130); -x_131 = lean_ctor_get(x_112, 1); -lean_inc(x_131); -x_132 = lean_ctor_get(x_112, 2); -lean_inc(x_132); -lean_dec(x_112); -x_133 = 0; -lean_inc(x_131); -x_134 = l_Lean_mkLambda(x_130, x_133, x_131, x_132); -lean_dec(x_130); +lean_object* x_81; +lean_dec(x_29); +lean_dec(x_27); +lean_dec(x_26); +lean_dec(x_2); +x_81 = lean_box(0); +x_32 = x_81; +goto block_45; +} +block_45: +{ +lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; +lean_dec(x_32); +x_33 = lean_ctor_get(x_30, 0); +lean_inc(x_33); +x_34 = lean_ctor_get(x_30, 1); +lean_inc(x_34); +x_35 = lean_ctor_get(x_3, 1); +lean_inc(x_35); +x_36 = lean_ctor_get(x_3, 0); +lean_inc(x_36); +lean_dec(x_3); +x_37 = lean_ctor_get(x_36, 0); +lean_inc(x_37); +lean_dec(x_36); +x_38 = lean_alloc_ctor(0, 4, 0); +lean_ctor_set(x_38, 0, x_33); +lean_ctor_set(x_38, 1, x_34); +lean_ctor_set(x_38, 2, x_35); +lean_ctor_set(x_38, 3, x_37); +x_39 = l___private_Lean_Meta_AppBuilder_2__hasTypeMsg(x_1, x_7); +x_40 = l_Lean_Meta_mkCongrFun___closed__5; +x_41 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_41, 0, x_40); +lean_ctor_set(x_41, 1, x_39); +x_42 = l_Lean_Meta_mkCongrFun___closed__2; +x_43 = lean_alloc_ctor(16, 3, 0); +lean_ctor_set(x_43, 0, x_42); +lean_ctor_set(x_43, 1, x_41); +lean_ctor_set(x_43, 2, x_38); +if (lean_is_scalar(x_31)) { + x_44 = lean_alloc_ctor(1, 2, 0); +} else { + x_44 = x_31; + lean_ctor_set_tag(x_44, 1); +} +lean_ctor_set(x_44, 0, x_43); +lean_ctor_set(x_44, 1, x_30); +return x_44; +} +} +else +{ +uint8_t x_82; +lean_dec(x_27); +lean_dec(x_26); +lean_dec(x_7); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_82 = !lean_is_exclusive(x_28); +if (x_82 == 0) +{ +return x_28; +} +else +{ +lean_object* x_83; lean_object* x_84; lean_object* x_85; +x_83 = lean_ctor_get(x_28, 0); +x_84 = lean_ctor_get(x_28, 1); +lean_inc(x_84); +lean_inc(x_83); +lean_dec(x_28); +x_85 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_85, 0, x_83); +lean_ctor_set(x_85, 1, x_84); +return x_85; +} +} +} +} +else +{ +lean_object* x_86; lean_object* x_87; lean_object* x_88; lean_object* x_89; uint8_t x_90; +x_86 = lean_ctor_get(x_5, 0); +x_87 = lean_ctor_get(x_5, 1); +lean_inc(x_87); +lean_inc(x_86); +lean_dec(x_5); +x_88 = l_Lean_Expr_eq_x3f___closed__2; +x_89 = lean_unsigned_to_nat(3u); +x_90 = l_Lean_Expr_isAppOfArity___main(x_86, x_88, x_89); +if (x_90 == 0) +{ +lean_object* x_91; lean_object* x_92; lean_object* x_93; lean_object* x_94; lean_object* x_95; lean_object* x_96; lean_object* x_97; lean_object* x_98; lean_object* x_99; lean_object* x_100; lean_object* x_101; lean_object* x_102; +lean_dec(x_2); +x_91 = lean_ctor_get(x_87, 0); +lean_inc(x_91); +x_92 = lean_ctor_get(x_87, 1); +lean_inc(x_92); +x_93 = lean_ctor_get(x_3, 1); +lean_inc(x_93); +x_94 = lean_ctor_get(x_3, 0); +lean_inc(x_94); +lean_dec(x_3); +x_95 = lean_ctor_get(x_94, 0); +lean_inc(x_95); +lean_dec(x_94); +x_96 = lean_alloc_ctor(0, 4, 0); +lean_ctor_set(x_96, 0, x_91); +lean_ctor_set(x_96, 1, x_92); +lean_ctor_set(x_96, 2, x_93); +lean_ctor_set(x_96, 3, x_95); +x_97 = l___private_Lean_Meta_AppBuilder_2__hasTypeMsg(x_1, x_86); +x_98 = l_Lean_Meta_mkEqSymm___closed__5; +x_99 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_99, 0, x_98); +lean_ctor_set(x_99, 1, x_97); +x_100 = l_Lean_Meta_mkCongrFun___closed__2; +x_101 = lean_alloc_ctor(16, 3, 0); +lean_ctor_set(x_101, 0, x_100); +lean_ctor_set(x_101, 1, x_99); +lean_ctor_set(x_101, 2, x_96); +x_102 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_102, 0, x_101); +lean_ctor_set(x_102, 1, x_87); +return x_102; +} +else +{ +lean_object* x_103; lean_object* x_104; lean_object* x_105; lean_object* x_106; lean_object* x_107; lean_object* x_108; +x_103 = l_Lean_Expr_appFn_x21(x_86); +x_104 = l_Lean_Expr_appFn_x21(x_103); +x_105 = l_Lean_Expr_appArg_x21(x_104); +lean_dec(x_104); +x_106 = l_Lean_Expr_appArg_x21(x_103); +lean_dec(x_103); +x_107 = l_Lean_Expr_appArg_x21(x_86); lean_inc(x_3); -lean_inc(x_131); -x_135 = l_Lean_Meta_getLevel(x_131, x_3, x_113); +x_108 = l_Lean_Meta_whnfD(x_105, x_3, x_87); +if (lean_obj_tag(x_108) == 0) +{ +lean_object* x_109; lean_object* x_110; lean_object* x_111; lean_object* x_112; +x_109 = lean_ctor_get(x_108, 0); +lean_inc(x_109); +x_110 = lean_ctor_get(x_108, 1); +lean_inc(x_110); +if (lean_is_exclusive(x_108)) { + lean_ctor_release(x_108, 0); + lean_ctor_release(x_108, 1); + x_111 = x_108; +} else { + lean_dec_ref(x_108); + x_111 = lean_box(0); +} +if (lean_obj_tag(x_109) == 7) +{ +lean_object* x_126; lean_object* x_127; lean_object* x_128; uint8_t x_129; lean_object* x_130; lean_object* x_131; +lean_dec(x_111); +lean_dec(x_86); +x_126 = lean_ctor_get(x_109, 0); +lean_inc(x_126); +x_127 = lean_ctor_get(x_109, 1); +lean_inc(x_127); +x_128 = lean_ctor_get(x_109, 2); +lean_inc(x_128); +lean_dec(x_109); +x_129 = 0; +lean_inc(x_127); +x_130 = l_Lean_mkLambda(x_126, x_129, x_127, x_128); +lean_dec(x_126); +lean_inc(x_3); +lean_inc(x_127); +x_131 = l_Lean_Meta_getLevel(x_127, x_3, x_110); +if (lean_obj_tag(x_131) == 0) +{ +lean_object* x_132; lean_object* x_133; lean_object* x_134; lean_object* x_135; +x_132 = lean_ctor_get(x_131, 0); +lean_inc(x_132); +x_133 = lean_ctor_get(x_131, 1); +lean_inc(x_133); +lean_dec(x_131); +lean_inc(x_2); +lean_inc(x_130); +x_134 = l_Lean_mkApp(x_130, x_2); +x_135 = l_Lean_Meta_getLevel(x_134, x_3, x_133); if (lean_obj_tag(x_135) == 0) { -lean_object* x_136; lean_object* x_137; lean_object* x_138; lean_object* x_139; +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; x_136 = lean_ctor_get(x_135, 0); lean_inc(x_136); x_137 = lean_ctor_get(x_135, 1); lean_inc(x_137); -lean_dec(x_135); -lean_inc(x_2); -lean_inc(x_134); -x_138 = l_Lean_mkApp(x_134, x_2); -x_139 = l_Lean_Meta_getLevel(x_138, x_3, x_137); -if (lean_obj_tag(x_139) == 0) +if (lean_is_exclusive(x_135)) { + lean_ctor_release(x_135, 0); + lean_ctor_release(x_135, 1); + x_138 = x_135; +} else { + lean_dec_ref(x_135); + x_138 = lean_box(0); +} +x_139 = lean_box(0); +x_140 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_140, 0, x_136); +lean_ctor_set(x_140, 1, x_139); +x_141 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_141, 0, x_132); +lean_ctor_set(x_141, 1, x_140); +x_142 = l_Lean_Meta_mkCongrFun___closed__2; +x_143 = l_Lean_mkConst(x_142, x_141); +x_144 = l_Lean_mkApp6(x_143, x_127, x_130, x_106, x_107, x_1, x_2); +if (lean_is_scalar(x_138)) { + x_145 = lean_alloc_ctor(0, 2, 0); +} else { + x_145 = x_138; +} +lean_ctor_set(x_145, 0, x_144); +lean_ctor_set(x_145, 1, x_137); +return x_145; +} +else { -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; -x_140 = lean_ctor_get(x_139, 0); -lean_inc(x_140); -x_141 = lean_ctor_get(x_139, 1); -lean_inc(x_141); -if (lean_is_exclusive(x_139)) { - lean_ctor_release(x_139, 0); - lean_ctor_release(x_139, 1); - x_142 = x_139; +lean_object* x_146; lean_object* x_147; lean_object* x_148; lean_object* x_149; +lean_dec(x_132); +lean_dec(x_130); +lean_dec(x_127); +lean_dec(x_107); +lean_dec(x_106); +lean_dec(x_2); +lean_dec(x_1); +x_146 = lean_ctor_get(x_135, 0); +lean_inc(x_146); +x_147 = lean_ctor_get(x_135, 1); +lean_inc(x_147); +if (lean_is_exclusive(x_135)) { + lean_ctor_release(x_135, 0); + lean_ctor_release(x_135, 1); + x_148 = x_135; } else { - lean_dec_ref(x_139); - x_142 = lean_box(0); + lean_dec_ref(x_135); + x_148 = lean_box(0); } -x_143 = lean_box(0); -x_144 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_144, 0, x_140); -lean_ctor_set(x_144, 1, x_143); -x_145 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_145, 0, x_136); -lean_ctor_set(x_145, 1, x_144); -x_146 = l_Lean_Meta_mkCongrFun___closed__2; -x_147 = l_Lean_mkConst(x_146, x_145); -x_148 = l_Lean_mkApp6(x_147, x_131, x_134, x_109, x_110, x_1, x_2); -if (lean_is_scalar(x_142)) { - x_149 = lean_alloc_ctor(0, 2, 0); +if (lean_is_scalar(x_148)) { + x_149 = lean_alloc_ctor(1, 2, 0); } else { - x_149 = x_142; + x_149 = x_148; } -lean_ctor_set(x_149, 0, x_148); -lean_ctor_set(x_149, 1, x_141); +lean_ctor_set(x_149, 0, x_146); +lean_ctor_set(x_149, 1, x_147); return x_149; } +} else { lean_object* x_150; lean_object* x_151; lean_object* x_152; lean_object* x_153; -lean_dec(x_136); -lean_dec(x_134); -lean_dec(x_131); -lean_dec(x_110); -lean_dec(x_109); +lean_dec(x_130); +lean_dec(x_127); +lean_dec(x_107); +lean_dec(x_106); +lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); -x_150 = lean_ctor_get(x_139, 0); +x_150 = lean_ctor_get(x_131, 0); lean_inc(x_150); -x_151 = lean_ctor_get(x_139, 1); +x_151 = lean_ctor_get(x_131, 1); lean_inc(x_151); -if (lean_is_exclusive(x_139)) { - lean_ctor_release(x_139, 0); - lean_ctor_release(x_139, 1); - x_152 = x_139; +if (lean_is_exclusive(x_131)) { + lean_ctor_release(x_131, 0); + lean_ctor_release(x_131, 1); + x_152 = x_131; } else { - lean_dec_ref(x_139); + lean_dec_ref(x_131); x_152 = lean_box(0); } if (lean_is_scalar(x_152)) { @@ -4096,143 +4400,113 @@ return x_153; } else { -lean_object* x_154; lean_object* x_155; lean_object* x_156; lean_object* x_157; -lean_dec(x_134); -lean_dec(x_131); -lean_dec(x_110); +lean_object* x_154; lean_dec(x_109); -lean_dec(x_3); +lean_dec(x_107); +lean_dec(x_106); lean_dec(x_2); -lean_dec(x_1); -x_154 = lean_ctor_get(x_135, 0); -lean_inc(x_154); -x_155 = lean_ctor_get(x_135, 1); -lean_inc(x_155); -if (lean_is_exclusive(x_135)) { - lean_ctor_release(x_135, 0); - lean_ctor_release(x_135, 1); - x_156 = x_135; -} else { - lean_dec_ref(x_135); - x_156 = lean_box(0); +x_154 = lean_box(0); +x_112 = x_154; +goto block_125; } -if (lean_is_scalar(x_156)) { - x_157 = lean_alloc_ctor(1, 2, 0); -} else { - x_157 = x_156; -} -lean_ctor_set(x_157, 0, x_154); -lean_ctor_set(x_157, 1, x_155); -return x_157; -} -} -else +block_125: { -lean_object* x_158; +lean_object* x_113; lean_object* x_114; lean_object* x_115; lean_object* x_116; lean_object* x_117; lean_object* x_118; lean_object* x_119; lean_object* x_120; lean_object* x_121; lean_object* x_122; lean_object* x_123; lean_object* x_124; lean_dec(x_112); -lean_dec(x_110); -lean_dec(x_109); -x_158 = lean_box(0); -x_115 = x_158; -goto block_129; -} -block_129: -{ -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_dec(x_115); -x_116 = lean_ctor_get(x_113, 0); +x_113 = lean_ctor_get(x_110, 0); +lean_inc(x_113); +x_114 = lean_ctor_get(x_110, 1); +lean_inc(x_114); +x_115 = lean_ctor_get(x_3, 1); +lean_inc(x_115); +x_116 = lean_ctor_get(x_3, 0); lean_inc(x_116); -x_117 = lean_ctor_get(x_113, 1); +lean_dec(x_3); +x_117 = lean_ctor_get(x_116, 0); lean_inc(x_117); -x_118 = lean_ctor_get(x_3, 1); -lean_inc(x_118); -x_119 = lean_ctor_get(x_3, 0); -lean_inc(x_119); -lean_dec(x_3); -x_120 = lean_ctor_get(x_119, 0); -lean_inc(x_120); -lean_dec(x_119); -x_121 = lean_alloc_ctor(0, 4, 0); -lean_ctor_set(x_121, 0, x_116); -lean_ctor_set(x_121, 1, x_117); -lean_ctor_set(x_121, 2, x_118); -lean_ctor_set(x_121, 3, x_120); -x_122 = l_Lean_mkAppStx___closed__9; -x_123 = lean_array_push(x_122, x_1); -x_124 = lean_array_push(x_123, x_2); -x_125 = l_Lean_Meta_mkCongrFun___closed__2; -x_126 = l_Lean_Meta_mkCongrFun___closed__3; -x_127 = lean_alloc_ctor(16, 4, 0); -lean_ctor_set(x_127, 0, x_125); -lean_ctor_set(x_127, 1, x_126); -lean_ctor_set(x_127, 2, x_124); -lean_ctor_set(x_127, 3, x_121); -if (lean_is_scalar(x_114)) { - x_128 = lean_alloc_ctor(1, 2, 0); +lean_dec(x_116); +x_118 = lean_alloc_ctor(0, 4, 0); +lean_ctor_set(x_118, 0, x_113); +lean_ctor_set(x_118, 1, x_114); +lean_ctor_set(x_118, 2, x_115); +lean_ctor_set(x_118, 3, x_117); +x_119 = l___private_Lean_Meta_AppBuilder_2__hasTypeMsg(x_1, x_86); +x_120 = l_Lean_Meta_mkCongrFun___closed__5; +x_121 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_121, 0, x_120); +lean_ctor_set(x_121, 1, x_119); +x_122 = l_Lean_Meta_mkCongrFun___closed__2; +x_123 = lean_alloc_ctor(16, 3, 0); +lean_ctor_set(x_123, 0, x_122); +lean_ctor_set(x_123, 1, x_121); +lean_ctor_set(x_123, 2, x_118); +if (lean_is_scalar(x_111)) { + x_124 = lean_alloc_ctor(1, 2, 0); } else { - x_128 = x_114; - lean_ctor_set_tag(x_128, 1); + x_124 = x_111; + lean_ctor_set_tag(x_124, 1); } -lean_ctor_set(x_128, 0, x_127); -lean_ctor_set(x_128, 1, x_113); -return x_128; +lean_ctor_set(x_124, 0, x_123); +lean_ctor_set(x_124, 1, x_110); +return x_124; } } else { -lean_object* x_159; lean_object* x_160; lean_object* x_161; lean_object* x_162; -lean_dec(x_110); -lean_dec(x_109); +lean_object* x_155; lean_object* x_156; lean_object* x_157; lean_object* x_158; +lean_dec(x_107); +lean_dec(x_106); +lean_dec(x_86); lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); -x_159 = lean_ctor_get(x_111, 0); -lean_inc(x_159); -x_160 = lean_ctor_get(x_111, 1); -lean_inc(x_160); -if (lean_is_exclusive(x_111)) { - lean_ctor_release(x_111, 0); - lean_ctor_release(x_111, 1); - x_161 = x_111; +x_155 = lean_ctor_get(x_108, 0); +lean_inc(x_155); +x_156 = lean_ctor_get(x_108, 1); +lean_inc(x_156); +if (lean_is_exclusive(x_108)) { + lean_ctor_release(x_108, 0); + lean_ctor_release(x_108, 1); + x_157 = x_108; } else { - lean_dec_ref(x_111); - x_161 = lean_box(0); + lean_dec_ref(x_108); + x_157 = lean_box(0); } -if (lean_is_scalar(x_161)) { - x_162 = lean_alloc_ctor(1, 2, 0); +if (lean_is_scalar(x_157)) { + x_158 = lean_alloc_ctor(1, 2, 0); } else { - x_162 = x_161; + x_158 = x_157; } -lean_ctor_set(x_162, 0, x_159); -lean_ctor_set(x_162, 1, x_160); -return x_162; +lean_ctor_set(x_158, 0, x_155); +lean_ctor_set(x_158, 1, x_156); +return x_158; } } } } else { -uint8_t x_163; +uint8_t x_159; lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); -x_163 = !lean_is_exclusive(x_5); -if (x_163 == 0) +x_159 = !lean_is_exclusive(x_5); +if (x_159 == 0) { return x_5; } else { -lean_object* x_164; lean_object* x_165; lean_object* x_166; -x_164 = lean_ctor_get(x_5, 0); -x_165 = lean_ctor_get(x_5, 1); -lean_inc(x_165); -lean_inc(x_164); +lean_object* x_160; lean_object* x_161; lean_object* x_162; +x_160 = lean_ctor_get(x_5, 0); +x_161 = lean_ctor_get(x_5, 1); +lean_inc(x_161); +lean_inc(x_160); lean_dec(x_5); -x_166 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_166, 0, x_164); -lean_ctor_set(x_166, 1, x_165); -return x_166; +x_162 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_162, 0, x_160); +lean_ctor_set(x_162, 1, x_161); +return x_162; } } } @@ -4264,157 +4538,191 @@ lean_inc(x_1); x_5 = l___private_Lean_Meta_AppBuilder_1__infer(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_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; 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); +if (lean_is_exclusive(x_5)) { + lean_ctor_release(x_5, 0); + lean_ctor_release(x_5, 1); + x_8 = x_5; +} else { + lean_dec_ref(x_5); + x_8 = lean_box(0); +} lean_inc(x_3); lean_inc(x_2); -x_8 = l___private_Lean_Meta_AppBuilder_1__infer(x_2, x_3, x_7); -if (lean_obj_tag(x_8) == 0) +x_9 = l___private_Lean_Meta_AppBuilder_1__infer(x_2, x_3, x_7); +if (lean_obj_tag(x_9) == 0) { -lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_27; lean_object* x_28; lean_object* x_96; lean_object* x_97; uint8_t x_98; uint8_t x_99; -x_9 = lean_ctor_get(x_8, 0); -lean_inc(x_9); -x_10 = lean_ctor_get(x_8, 1); +lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_92; lean_object* x_124; lean_object* x_125; uint8_t x_126; uint8_t x_127; +x_10 = lean_ctor_get(x_9, 0); lean_inc(x_10); -if (lean_is_exclusive(x_8)) { - lean_ctor_release(x_8, 0); - lean_ctor_release(x_8, 1); - x_11 = x_8; +x_11 = lean_ctor_get(x_9, 1); +lean_inc(x_11); +if (lean_is_exclusive(x_9)) { + lean_ctor_release(x_9, 0); + lean_ctor_release(x_9, 1); + x_12 = x_9; } else { - lean_dec_ref(x_8); - x_11 = lean_box(0); + lean_dec_ref(x_9); + x_12 = lean_box(0); } -x_96 = l_Lean_Expr_eq_x3f___closed__2; -x_97 = lean_unsigned_to_nat(3u); -x_98 = l_Lean_Expr_isAppOfArity___main(x_6, x_96, x_97); -x_99 = l_Lean_Expr_isAppOfArity___main(x_9, x_96, x_97); -if (x_98 == 0) +x_124 = l_Lean_Expr_eq_x3f___closed__2; +x_125 = lean_unsigned_to_nat(3u); +x_126 = l_Lean_Expr_isAppOfArity___main(x_6, x_124, x_125); +x_127 = l_Lean_Expr_isAppOfArity___main(x_10, x_124, x_125); +if (x_126 == 0) { -lean_object* x_100; -lean_dec(x_9); -lean_dec(x_6); -x_100 = lean_box(0); -x_12 = x_100; -goto block_26; -} -else +if (x_127 == 0) { -lean_object* x_101; lean_object* x_102; lean_object* x_103; lean_object* x_104; lean_object* x_105; lean_object* x_106; lean_object* x_107; -x_101 = l_Lean_Expr_appFn_x21(x_6); -x_102 = l_Lean_Expr_appFn_x21(x_101); -x_103 = l_Lean_Expr_appArg_x21(x_102); -lean_dec(x_102); -x_104 = l_Lean_Expr_appArg_x21(x_101); -lean_dec(x_101); -x_105 = l_Lean_Expr_appArg_x21(x_6); -lean_dec(x_6); -x_106 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_106, 0, x_104); -lean_ctor_set(x_106, 1, x_105); -x_107 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_107, 0, x_103); -lean_ctor_set(x_107, 1, x_106); -if (x_99 == 0) -{ -lean_object* x_108; -lean_dec(x_9); -x_108 = lean_box(0); -x_27 = x_108; -x_28 = x_107; -goto block_95; -} -else -{ -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; -x_109 = l_Lean_Expr_appFn_x21(x_9); -x_110 = l_Lean_Expr_appFn_x21(x_109); -x_111 = l_Lean_Expr_appArg_x21(x_110); -lean_dec(x_110); -x_112 = l_Lean_Expr_appArg_x21(x_109); -lean_dec(x_109); -x_113 = l_Lean_Expr_appArg_x21(x_9); -lean_dec(x_9); -x_114 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_114, 0, x_112); -lean_ctor_set(x_114, 1, x_113); -x_115 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_115, 0, x_111); -lean_ctor_set(x_115, 1, x_114); -x_116 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_116, 0, x_115); -x_27 = x_116; -x_28 = x_107; -goto block_95; -} -} -block_26: -{ -lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; +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_dec(x_12); -x_13 = lean_ctor_get(x_10, 0); -lean_inc(x_13); -x_14 = lean_ctor_get(x_10, 1); -lean_inc(x_14); -x_15 = lean_ctor_get(x_3, 1); -lean_inc(x_15); -x_16 = lean_ctor_get(x_3, 0); -lean_inc(x_16); +lean_dec(x_10); +lean_dec(x_8); +lean_dec(x_2); +x_128 = lean_ctor_get(x_11, 0); +lean_inc(x_128); +x_129 = lean_ctor_get(x_11, 1); +lean_inc(x_129); +x_130 = lean_ctor_get(x_3, 1); +lean_inc(x_130); +x_131 = lean_ctor_get(x_3, 0); +lean_inc(x_131); lean_dec(x_3); -x_17 = lean_ctor_get(x_16, 0); -lean_inc(x_17); -lean_dec(x_16); -x_18 = lean_alloc_ctor(0, 4, 0); -lean_ctor_set(x_18, 0, x_13); -lean_ctor_set(x_18, 1, x_14); -lean_ctor_set(x_18, 2, x_15); -lean_ctor_set(x_18, 3, x_17); -x_19 = l_Lean_mkAppStx___closed__9; -x_20 = lean_array_push(x_19, x_1); -x_21 = lean_array_push(x_20, x_2); -x_22 = l_Lean_Meta_mkCongr___closed__2; -x_23 = l_Lean_Meta_mkEqSymm___closed__3; -x_24 = lean_alloc_ctor(16, 4, 0); -lean_ctor_set(x_24, 0, x_22); -lean_ctor_set(x_24, 1, x_23); -lean_ctor_set(x_24, 2, x_21); -lean_ctor_set(x_24, 3, x_18); -if (lean_is_scalar(x_11)) { - x_25 = lean_alloc_ctor(1, 2, 0); -} else { - x_25 = x_11; - lean_ctor_set_tag(x_25, 1); +x_132 = lean_ctor_get(x_131, 0); +lean_inc(x_132); +lean_dec(x_131); +x_133 = lean_alloc_ctor(0, 4, 0); +lean_ctor_set(x_133, 0, x_128); +lean_ctor_set(x_133, 1, x_129); +lean_ctor_set(x_133, 2, x_130); +lean_ctor_set(x_133, 3, x_132); +x_134 = l___private_Lean_Meta_AppBuilder_2__hasTypeMsg(x_1, x_6); +x_135 = l_Lean_Meta_mkEqSymm___closed__5; +x_136 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_136, 0, x_135); +lean_ctor_set(x_136, 1, x_134); +x_137 = l_Lean_Meta_mkCongr___closed__2; +x_138 = lean_alloc_ctor(16, 3, 0); +lean_ctor_set(x_138, 0, x_137); +lean_ctor_set(x_138, 1, x_136); +lean_ctor_set(x_138, 2, x_133); +x_139 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_139, 0, x_138); +lean_ctor_set(x_139, 1, x_11); +return x_139; } -lean_ctor_set(x_25, 0, x_24); -lean_ctor_set(x_25, 1, x_10); -return x_25; -} -block_95: +else { -lean_object* x_29; +lean_object* x_140; +x_140 = lean_box(0); +x_92 = x_140; +goto block_123; +} +} +else +{ +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; +x_141 = l_Lean_Expr_appFn_x21(x_6); +x_142 = l_Lean_Expr_appFn_x21(x_141); +x_143 = l_Lean_Expr_appArg_x21(x_142); +lean_dec(x_142); +x_144 = l_Lean_Expr_appArg_x21(x_141); +lean_dec(x_141); +x_145 = l_Lean_Expr_appArg_x21(x_6); +x_146 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_146, 0, x_144); +lean_ctor_set(x_146, 1, x_145); +x_147 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_147, 0, x_143); +lean_ctor_set(x_147, 1, x_146); +if (x_127 == 0) +{ +lean_object* x_148; +lean_dec(x_8); +x_148 = lean_box(0); +x_13 = x_148; +x_14 = x_147; +goto block_91; +} +else +{ +lean_object* x_149; +x_149 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_149, 0, x_147); +x_92 = x_149; +goto block_123; +} +} +block_91: +{ +lean_object* x_15; +x_15 = lean_ctor_get(x_14, 1); +lean_inc(x_15); +if (lean_obj_tag(x_13) == 0) +{ +lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; +lean_dec(x_15); +lean_dec(x_14); +lean_dec(x_6); +lean_dec(x_1); +x_16 = lean_ctor_get(x_11, 0); +lean_inc(x_16); +x_17 = lean_ctor_get(x_11, 1); +lean_inc(x_17); +x_18 = lean_ctor_get(x_3, 1); +lean_inc(x_18); +x_19 = lean_ctor_get(x_3, 0); +lean_inc(x_19); +lean_dec(x_3); +x_20 = lean_ctor_get(x_19, 0); +lean_inc(x_20); +lean_dec(x_19); +x_21 = lean_alloc_ctor(0, 4, 0); +lean_ctor_set(x_21, 0, x_16); +lean_ctor_set(x_21, 1, x_17); +lean_ctor_set(x_21, 2, x_18); +lean_ctor_set(x_21, 3, x_20); +x_22 = l___private_Lean_Meta_AppBuilder_2__hasTypeMsg(x_2, x_10); +x_23 = l_Lean_Meta_mkEqSymm___closed__5; +x_24 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_24, 0, x_23); +lean_ctor_set(x_24, 1, x_22); +x_25 = l_Lean_Meta_mkCongr___closed__2; +x_26 = lean_alloc_ctor(16, 3, 0); +lean_ctor_set(x_26, 0, x_25); +lean_ctor_set(x_26, 1, x_24); +lean_ctor_set(x_26, 2, x_21); +if (lean_is_scalar(x_12)) { + x_27 = lean_alloc_ctor(1, 2, 0); +} else { + x_27 = x_12; + lean_ctor_set_tag(x_27, 1); +} +lean_ctor_set(x_27, 0, x_26); +lean_ctor_set(x_27, 1, x_11); +return x_27; +} +else +{ +lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; +lean_dec(x_12); +lean_dec(x_10); +x_28 = lean_ctor_get(x_13, 0); +lean_inc(x_28); +lean_dec(x_13); x_29 = lean_ctor_get(x_28, 1); lean_inc(x_29); -if (lean_obj_tag(x_27) == 0) -{ -lean_object* x_30; -lean_dec(x_29); -lean_dec(x_28); -x_30 = lean_box(0); -x_12 = x_30; -goto block_26; -} -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_dec(x_11); -x_31 = lean_ctor_get(x_27, 0); +x_30 = lean_ctor_get(x_14, 0); +lean_inc(x_30); +lean_dec(x_14); +x_31 = lean_ctor_get(x_15, 0); lean_inc(x_31); -lean_dec(x_27); -x_32 = lean_ctor_get(x_31, 1); +x_32 = lean_ctor_get(x_15, 1); lean_inc(x_32); +lean_dec(x_15); x_33 = lean_ctor_get(x_28, 0); lean_inc(x_33); lean_dec(x_28); @@ -4423,125 +4731,150 @@ lean_inc(x_34); x_35 = lean_ctor_get(x_29, 1); lean_inc(x_35); lean_dec(x_29); -x_36 = lean_ctor_get(x_31, 0); -lean_inc(x_36); -lean_dec(x_31); -x_37 = lean_ctor_get(x_32, 0); +lean_inc(x_3); +x_36 = l_Lean_Meta_whnfD(x_30, x_3, x_11); +if (lean_obj_tag(x_36) == 0) +{ +lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; +x_37 = lean_ctor_get(x_36, 0); lean_inc(x_37); -x_38 = lean_ctor_get(x_32, 1); +x_38 = lean_ctor_get(x_36, 1); lean_inc(x_38); -lean_dec(x_32); -lean_inc(x_3); -x_39 = l_Lean_Meta_whnfD(x_33, x_3, x_10); -if (lean_obj_tag(x_39) == 0) -{ -lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; -x_40 = lean_ctor_get(x_39, 0); -lean_inc(x_40); -x_41 = lean_ctor_get(x_39, 1); -lean_inc(x_41); -if (lean_is_exclusive(x_39)) { - lean_ctor_release(x_39, 0); - lean_ctor_release(x_39, 1); - x_42 = x_39; +if (lean_is_exclusive(x_36)) { + lean_ctor_release(x_36, 0); + lean_ctor_release(x_36, 1); + x_39 = x_36; } else { - lean_dec_ref(x_39); - x_42 = lean_box(0); + lean_dec_ref(x_36); + x_39 = lean_box(0); } -if (lean_obj_tag(x_40) == 7) +if (lean_obj_tag(x_37) == 7) { -lean_object* x_58; uint8_t x_59; -x_58 = lean_ctor_get(x_40, 2); -lean_inc(x_58); -lean_dec(x_40); -x_59 = l_Lean_Expr_hasLooseBVars(x_58); -if (x_59 == 0) +lean_object* x_54; uint8_t x_55; +x_54 = lean_ctor_get(x_37, 2); +lean_inc(x_54); +lean_dec(x_37); +x_55 = l_Lean_Expr_hasLooseBVars(x_54); +if (x_55 == 0) { -lean_object* x_60; -lean_dec(x_42); +lean_object* x_56; +lean_dec(x_39); +lean_dec(x_6); lean_inc(x_3); -lean_inc(x_36); -x_60 = l_Lean_Meta_getLevel(x_36, x_3, x_41); -if (lean_obj_tag(x_60) == 0) +lean_inc(x_33); +x_56 = l_Lean_Meta_getLevel(x_33, x_3, x_38); +if (lean_obj_tag(x_56) == 0) { -lean_object* x_61; lean_object* x_62; lean_object* x_63; -x_61 = lean_ctor_get(x_60, 0); -lean_inc(x_61); -x_62 = lean_ctor_get(x_60, 1); -lean_inc(x_62); -lean_dec(x_60); +lean_object* x_57; lean_object* x_58; lean_object* x_59; +x_57 = lean_ctor_get(x_56, 0); +lean_inc(x_57); +x_58 = lean_ctor_get(x_56, 1); lean_inc(x_58); -x_63 = l_Lean_Meta_getLevel(x_58, x_3, x_62); -if (lean_obj_tag(x_63) == 0) +lean_dec(x_56); +lean_inc(x_54); +x_59 = l_Lean_Meta_getLevel(x_54, x_3, x_58); +if (lean_obj_tag(x_59) == 0) { -uint8_t x_64; -x_64 = !lean_is_exclusive(x_63); -if (x_64 == 0) +uint8_t x_60; +x_60 = !lean_is_exclusive(x_59); +if (x_60 == 0) { -lean_object* x_65; lean_object* x_66; lean_object* x_67; lean_object* x_68; lean_object* x_69; lean_object* x_70; lean_object* x_71; -x_65 = lean_ctor_get(x_63, 0); -x_66 = lean_box(0); -x_67 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_67, 0, x_65); -lean_ctor_set(x_67, 1, x_66); -x_68 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_68, 0, x_61); -lean_ctor_set(x_68, 1, x_67); -x_69 = l_Lean_Meta_mkCongr___closed__2; -x_70 = l_Lean_mkConst(x_69, x_68); -x_71 = l_Lean_mkApp8(x_70, x_36, x_58, x_34, x_35, x_37, x_38, x_1, x_2); -lean_ctor_set(x_63, 0, x_71); -return x_63; +lean_object* x_61; lean_object* x_62; lean_object* x_63; lean_object* x_64; lean_object* x_65; lean_object* x_66; lean_object* x_67; +x_61 = lean_ctor_get(x_59, 0); +x_62 = lean_box(0); +x_63 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_63, 0, x_61); +lean_ctor_set(x_63, 1, x_62); +x_64 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_64, 0, x_57); +lean_ctor_set(x_64, 1, x_63); +x_65 = l_Lean_Meta_mkCongr___closed__2; +x_66 = l_Lean_mkConst(x_65, x_64); +x_67 = l_Lean_mkApp8(x_66, x_33, x_54, x_31, x_32, x_34, x_35, x_1, x_2); +lean_ctor_set(x_59, 0, x_67); +return x_59; } else { -lean_object* x_72; lean_object* x_73; lean_object* x_74; lean_object* x_75; lean_object* x_76; lean_object* x_77; lean_object* x_78; lean_object* x_79; lean_object* x_80; -x_72 = lean_ctor_get(x_63, 0); -x_73 = lean_ctor_get(x_63, 1); -lean_inc(x_73); -lean_inc(x_72); -lean_dec(x_63); -x_74 = lean_box(0); -x_75 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_75, 0, x_72); -lean_ctor_set(x_75, 1, x_74); -x_76 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_76, 0, x_61); -lean_ctor_set(x_76, 1, x_75); -x_77 = l_Lean_Meta_mkCongr___closed__2; -x_78 = l_Lean_mkConst(x_77, x_76); -x_79 = l_Lean_mkApp8(x_78, x_36, x_58, x_34, x_35, x_37, x_38, x_1, x_2); -x_80 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_80, 0, x_79); -lean_ctor_set(x_80, 1, x_73); +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_68 = lean_ctor_get(x_59, 0); +x_69 = lean_ctor_get(x_59, 1); +lean_inc(x_69); +lean_inc(x_68); +lean_dec(x_59); +x_70 = lean_box(0); +x_71 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_71, 0, x_68); +lean_ctor_set(x_71, 1, x_70); +x_72 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_72, 0, x_57); +lean_ctor_set(x_72, 1, x_71); +x_73 = l_Lean_Meta_mkCongr___closed__2; +x_74 = l_Lean_mkConst(x_73, x_72); +x_75 = l_Lean_mkApp8(x_74, x_33, x_54, x_31, x_32, x_34, x_35, x_1, x_2); +x_76 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_76, 0, x_75); +lean_ctor_set(x_76, 1, x_69); +return x_76; +} +} +else +{ +uint8_t x_77; +lean_dec(x_57); +lean_dec(x_54); +lean_dec(x_35); +lean_dec(x_34); +lean_dec(x_33); +lean_dec(x_32); +lean_dec(x_31); +lean_dec(x_2); +lean_dec(x_1); +x_77 = !lean_is_exclusive(x_59); +if (x_77 == 0) +{ +return x_59; +} +else +{ +lean_object* x_78; lean_object* x_79; lean_object* x_80; +x_78 = lean_ctor_get(x_59, 0); +x_79 = lean_ctor_get(x_59, 1); +lean_inc(x_79); +lean_inc(x_78); +lean_dec(x_59); +x_80 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_80, 0, x_78); +lean_ctor_set(x_80, 1, x_79); return x_80; } } +} else { uint8_t x_81; -lean_dec(x_61); -lean_dec(x_58); -lean_dec(x_38); -lean_dec(x_37); -lean_dec(x_36); +lean_dec(x_54); lean_dec(x_35); lean_dec(x_34); +lean_dec(x_33); +lean_dec(x_32); +lean_dec(x_31); +lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); -x_81 = !lean_is_exclusive(x_63); +x_81 = !lean_is_exclusive(x_56); if (x_81 == 0) { -return x_63; +return x_56; } else { lean_object* x_82; lean_object* x_83; lean_object* x_84; -x_82 = lean_ctor_get(x_63, 0); -x_83 = lean_ctor_get(x_63, 1); +x_82 = lean_ctor_get(x_56, 0); +x_83 = lean_ctor_get(x_56, 1); lean_inc(x_83); lean_inc(x_82); -lean_dec(x_63); +lean_dec(x_56); x_84 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_84, 0, x_82); lean_ctor_set(x_84, 1, x_83); @@ -4551,193 +4884,264 @@ return x_84; } else { -uint8_t x_85; -lean_dec(x_58); -lean_dec(x_38); -lean_dec(x_37); -lean_dec(x_36); +lean_object* x_85; +lean_dec(x_54); lean_dec(x_35); lean_dec(x_34); -lean_dec(x_3); +lean_dec(x_33); +lean_dec(x_32); +lean_dec(x_31); lean_dec(x_2); -lean_dec(x_1); -x_85 = !lean_is_exclusive(x_60); -if (x_85 == 0) -{ -return x_60; -} -else -{ -lean_object* x_86; lean_object* x_87; lean_object* x_88; -x_86 = lean_ctor_get(x_60, 0); -x_87 = lean_ctor_get(x_60, 1); -lean_inc(x_87); -lean_inc(x_86); -lean_dec(x_60); -x_88 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_88, 0, x_86); -lean_ctor_set(x_88, 1, x_87); -return x_88; -} +x_85 = lean_box(0); +x_40 = x_85; +goto block_53; } } else { -lean_object* x_89; -lean_dec(x_58); -lean_dec(x_38); +lean_object* x_86; lean_dec(x_37); -lean_dec(x_36); lean_dec(x_35); lean_dec(x_34); -x_89 = lean_box(0); -x_43 = x_89; -goto block_57; +lean_dec(x_33); +lean_dec(x_32); +lean_dec(x_31); +lean_dec(x_2); +x_86 = lean_box(0); +x_40 = x_86; +goto block_53; } -} -else +block_53: { -lean_object* x_90; +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_dec(x_40); -lean_dec(x_38); -lean_dec(x_37); -lean_dec(x_36); -lean_dec(x_35); -lean_dec(x_34); -x_90 = lean_box(0); -x_43 = x_90; -goto block_57; -} -block_57: -{ -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_dec(x_43); -x_44 = lean_ctor_get(x_41, 0); +x_41 = lean_ctor_get(x_38, 0); +lean_inc(x_41); +x_42 = lean_ctor_get(x_38, 1); +lean_inc(x_42); +x_43 = lean_ctor_get(x_3, 1); +lean_inc(x_43); +x_44 = lean_ctor_get(x_3, 0); lean_inc(x_44); -x_45 = lean_ctor_get(x_41, 1); -lean_inc(x_45); -x_46 = lean_ctor_get(x_3, 1); -lean_inc(x_46); -x_47 = lean_ctor_get(x_3, 0); -lean_inc(x_47); lean_dec(x_3); -x_48 = lean_ctor_get(x_47, 0); -lean_inc(x_48); -lean_dec(x_47); -x_49 = lean_alloc_ctor(0, 4, 0); -lean_ctor_set(x_49, 0, x_44); -lean_ctor_set(x_49, 1, x_45); -lean_ctor_set(x_49, 2, x_46); -lean_ctor_set(x_49, 3, x_48); -x_50 = l_Lean_mkAppStx___closed__9; -x_51 = lean_array_push(x_50, x_1); -x_52 = lean_array_push(x_51, x_2); -x_53 = l_Lean_Meta_mkCongr___closed__2; -x_54 = l_Lean_Meta_mkCongrArg___closed__3; -x_55 = lean_alloc_ctor(16, 4, 0); -lean_ctor_set(x_55, 0, x_53); -lean_ctor_set(x_55, 1, x_54); -lean_ctor_set(x_55, 2, x_52); -lean_ctor_set(x_55, 3, x_49); -if (lean_is_scalar(x_42)) { - x_56 = lean_alloc_ctor(1, 2, 0); +x_45 = lean_ctor_get(x_44, 0); +lean_inc(x_45); +lean_dec(x_44); +x_46 = lean_alloc_ctor(0, 4, 0); +lean_ctor_set(x_46, 0, x_41); +lean_ctor_set(x_46, 1, x_42); +lean_ctor_set(x_46, 2, x_43); +lean_ctor_set(x_46, 3, x_45); +x_47 = l___private_Lean_Meta_AppBuilder_2__hasTypeMsg(x_1, x_6); +x_48 = l_Lean_Meta_mkCongrArg___closed__5; +x_49 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_49, 0, x_48); +lean_ctor_set(x_49, 1, x_47); +x_50 = l_Lean_Meta_mkCongr___closed__2; +x_51 = lean_alloc_ctor(16, 3, 0); +lean_ctor_set(x_51, 0, x_50); +lean_ctor_set(x_51, 1, x_49); +lean_ctor_set(x_51, 2, x_46); +if (lean_is_scalar(x_39)) { + x_52 = lean_alloc_ctor(1, 2, 0); } else { - x_56 = x_42; - lean_ctor_set_tag(x_56, 1); + x_52 = x_39; + lean_ctor_set_tag(x_52, 1); } -lean_ctor_set(x_56, 0, x_55); -lean_ctor_set(x_56, 1, x_41); -return x_56; +lean_ctor_set(x_52, 0, x_51); +lean_ctor_set(x_52, 1, x_38); +return x_52; } } else { -uint8_t x_91; -lean_dec(x_38); -lean_dec(x_37); -lean_dec(x_36); +uint8_t x_87; lean_dec(x_35); lean_dec(x_34); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_91 = !lean_is_exclusive(x_39); -if (x_91 == 0) -{ -return x_39; -} -else -{ -lean_object* x_92; lean_object* x_93; lean_object* x_94; -x_92 = lean_ctor_get(x_39, 0); -x_93 = lean_ctor_get(x_39, 1); -lean_inc(x_93); -lean_inc(x_92); -lean_dec(x_39); -x_94 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_94, 0, x_92); -lean_ctor_set(x_94, 1, x_93); -return x_94; -} -} -} -} -} -else -{ -uint8_t x_117; +lean_dec(x_33); +lean_dec(x_32); +lean_dec(x_31); lean_dec(x_6); lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); -x_117 = !lean_is_exclusive(x_8); -if (x_117 == 0) +x_87 = !lean_is_exclusive(x_36); +if (x_87 == 0) { -return x_8; +return x_36; } else { -lean_object* x_118; lean_object* x_119; lean_object* x_120; -x_118 = lean_ctor_get(x_8, 0); -x_119 = lean_ctor_get(x_8, 1); -lean_inc(x_119); -lean_inc(x_118); +lean_object* x_88; lean_object* x_89; lean_object* x_90; +x_88 = lean_ctor_get(x_36, 0); +x_89 = lean_ctor_get(x_36, 1); +lean_inc(x_89); +lean_inc(x_88); +lean_dec(x_36); +x_90 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_90, 0, x_88); +lean_ctor_set(x_90, 1, x_89); +return x_90; +} +} +} +} +block_123: +{ +if (lean_obj_tag(x_92) == 0) +{ +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_dec(x_12); +lean_dec(x_10); +lean_dec(x_2); +x_93 = lean_ctor_get(x_11, 0); +lean_inc(x_93); +x_94 = lean_ctor_get(x_11, 1); +lean_inc(x_94); +x_95 = lean_ctor_get(x_3, 1); +lean_inc(x_95); +x_96 = lean_ctor_get(x_3, 0); +lean_inc(x_96); +lean_dec(x_3); +x_97 = lean_ctor_get(x_96, 0); +lean_inc(x_97); +lean_dec(x_96); +x_98 = lean_alloc_ctor(0, 4, 0); +lean_ctor_set(x_98, 0, x_93); +lean_ctor_set(x_98, 1, x_94); +lean_ctor_set(x_98, 2, x_95); +lean_ctor_set(x_98, 3, x_97); +x_99 = l___private_Lean_Meta_AppBuilder_2__hasTypeMsg(x_1, x_6); +x_100 = l_Lean_Meta_mkEqSymm___closed__5; +x_101 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_101, 0, x_100); +lean_ctor_set(x_101, 1, x_99); +x_102 = l_Lean_Meta_mkCongr___closed__2; +x_103 = lean_alloc_ctor(16, 3, 0); +lean_ctor_set(x_103, 0, x_102); +lean_ctor_set(x_103, 1, x_101); +lean_ctor_set(x_103, 2, x_98); +if (lean_is_scalar(x_8)) { + x_104 = lean_alloc_ctor(1, 2, 0); +} else { + x_104 = x_8; + lean_ctor_set_tag(x_104, 1); +} +lean_ctor_set(x_104, 0, x_103); +lean_ctor_set(x_104, 1, x_11); +return x_104; +} +else +{ +uint8_t x_105; lean_dec(x_8); -x_120 = lean_alloc_ctor(1, 2, 0); +x_105 = !lean_is_exclusive(x_92); +if (x_105 == 0) +{ +lean_object* x_106; lean_object* x_107; lean_object* x_108; lean_object* x_109; lean_object* x_110; lean_object* x_111; lean_object* x_112; lean_object* x_113; +x_106 = lean_ctor_get(x_92, 0); +x_107 = l_Lean_Expr_appFn_x21(x_10); +x_108 = l_Lean_Expr_appFn_x21(x_107); +x_109 = l_Lean_Expr_appArg_x21(x_108); +lean_dec(x_108); +x_110 = l_Lean_Expr_appArg_x21(x_107); +lean_dec(x_107); +x_111 = l_Lean_Expr_appArg_x21(x_10); +x_112 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_112, 0, x_110); +lean_ctor_set(x_112, 1, x_111); +x_113 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_113, 0, x_109); +lean_ctor_set(x_113, 1, x_112); +lean_ctor_set(x_92, 0, x_113); +x_13 = x_92; +x_14 = x_106; +goto block_91; +} +else +{ +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_114 = lean_ctor_get(x_92, 0); +lean_inc(x_114); +lean_dec(x_92); +x_115 = l_Lean_Expr_appFn_x21(x_10); +x_116 = l_Lean_Expr_appFn_x21(x_115); +x_117 = l_Lean_Expr_appArg_x21(x_116); +lean_dec(x_116); +x_118 = l_Lean_Expr_appArg_x21(x_115); +lean_dec(x_115); +x_119 = l_Lean_Expr_appArg_x21(x_10); +x_120 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_120, 0, x_118); lean_ctor_set(x_120, 1, x_119); -return x_120; +x_121 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_121, 0, x_117); +lean_ctor_set(x_121, 1, x_120); +x_122 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_122, 0, x_121); +x_13 = x_122; +x_14 = x_114; +goto block_91; +} } } } else { -uint8_t x_121; +uint8_t x_150; +lean_dec(x_8); +lean_dec(x_6); lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); -x_121 = !lean_is_exclusive(x_5); -if (x_121 == 0) +x_150 = !lean_is_exclusive(x_9); +if (x_150 == 0) +{ +return x_9; +} +else +{ +lean_object* x_151; lean_object* x_152; lean_object* x_153; +x_151 = lean_ctor_get(x_9, 0); +x_152 = lean_ctor_get(x_9, 1); +lean_inc(x_152); +lean_inc(x_151); +lean_dec(x_9); +x_153 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_153, 0, x_151); +lean_ctor_set(x_153, 1, x_152); +return x_153; +} +} +} +else +{ +uint8_t x_154; +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_154 = !lean_is_exclusive(x_5); +if (x_154 == 0) { return x_5; } else { -lean_object* x_122; lean_object* x_123; lean_object* x_124; -x_122 = lean_ctor_get(x_5, 0); -x_123 = lean_ctor_get(x_5, 1); -lean_inc(x_123); -lean_inc(x_122); +lean_object* x_155; lean_object* x_156; lean_object* x_157; +x_155 = lean_ctor_get(x_5, 0); +x_156 = lean_ctor_get(x_5, 1); +lean_inc(x_156); +lean_inc(x_155); lean_dec(x_5); -x_124 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_124, 0, x_122); -lean_ctor_set(x_124, 1, x_123); -return x_124; +x_157 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_157, 0, x_155); +lean_ctor_set(x_157, 1, x_156); +return x_157; } } } } -lean_object* l_Array_forMAux___main___at___private_Lean_Meta_AppBuilder_2__mkAppMFinal___spec__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +lean_object* l_Array_forMAux___main___at___private_Lean_Meta_AppBuilder_3__mkAppMFinal___spec__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { lean_object* x_5; uint8_t x_6; @@ -4875,7 +5279,7 @@ return x_33; } } } -lean_object* _init_l___private_Lean_Meta_AppBuilder_2__mkAppMFinal___closed__1() { +lean_object* _init_l___private_Lean_Meta_AppBuilder_3__mkAppMFinal___closed__1() { _start: { lean_object* x_1; @@ -4883,14 +5287,34 @@ x_1 = lean_mk_string("result contains metavariables"); return x_1; } } -lean_object* l___private_Lean_Meta_AppBuilder_2__mkAppMFinal(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { +lean_object* _init_l___private_Lean_Meta_AppBuilder_3__mkAppMFinal___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l___private_Lean_Meta_AppBuilder_3__mkAppMFinal___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___private_Lean_Meta_AppBuilder_3__mkAppMFinal___closed__3() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l___private_Lean_Meta_AppBuilder_3__mkAppMFinal___closed__2; +x_2 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* l___private_Lean_Meta_AppBuilder_3__mkAppMFinal(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_unsigned_to_nat(0u); x_8 = l_Array_iterateMAux___main___at_Lean_mkAppN___spec__1(x_3, x_3, x_7, x_2); lean_inc(x_5); -x_9 = l_Array_forMAux___main___at___private_Lean_Meta_AppBuilder_2__mkAppMFinal___spec__1(x_4, x_7, x_5, x_6); +x_9 = l_Array_forMAux___main___at___private_Lean_Meta_AppBuilder_3__mkAppMFinal___spec__1(x_4, x_7, x_5, x_6); 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; uint8_t x_16; @@ -4940,7 +5364,7 @@ uint8_t x_21; x_21 = !lean_is_exclusive(x_14); if (x_21 == 0) { -lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; 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_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; x_22 = lean_ctor_get(x_14, 1); x_23 = lean_ctor_get(x_14, 0); lean_dec(x_23); @@ -4961,103 +5385,109 @@ lean_ctor_set(x_29, 0, x_24); lean_ctor_set(x_29, 1, x_25); lean_ctor_set(x_29, 2, x_26); lean_ctor_set(x_29, 3, x_28); -x_30 = l_Lean_mkOptionalNode___closed__2; -x_31 = lean_array_push(x_30, x_12); -x_32 = l___private_Lean_Meta_AppBuilder_2__mkAppMFinal___closed__1; -x_33 = lean_alloc_ctor(16, 4, 0); -lean_ctor_set(x_33, 0, x_1); -lean_ctor_set(x_33, 1, x_32); -lean_ctor_set(x_33, 2, x_31); -lean_ctor_set(x_33, 3, x_29); +x_30 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_30, 0, x_12); +x_31 = l_Lean_indentExpr(x_30); +x_32 = l___private_Lean_Meta_AppBuilder_3__mkAppMFinal___closed__3; +x_33 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_33, 0, x_32); +lean_ctor_set(x_33, 1, x_31); +x_34 = lean_alloc_ctor(16, 3, 0); +lean_ctor_set(x_34, 0, x_1); +lean_ctor_set(x_34, 1, x_33); +lean_ctor_set(x_34, 2, x_29); lean_ctor_set_tag(x_14, 1); -lean_ctor_set(x_14, 0, x_33); +lean_ctor_set(x_14, 0, x_34); return x_14; } else { -lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; -x_34 = lean_ctor_get(x_14, 1); -lean_inc(x_34); -lean_dec(x_14); -x_35 = lean_ctor_get(x_34, 0); +lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; +x_35 = lean_ctor_get(x_14, 1); lean_inc(x_35); -x_36 = lean_ctor_get(x_34, 1); +lean_dec(x_14); +x_36 = lean_ctor_get(x_35, 0); lean_inc(x_36); -x_37 = lean_ctor_get(x_5, 1); +x_37 = lean_ctor_get(x_35, 1); lean_inc(x_37); -x_38 = lean_ctor_get(x_5, 0); +x_38 = lean_ctor_get(x_5, 1); lean_inc(x_38); -lean_dec(x_5); -x_39 = lean_ctor_get(x_38, 0); +x_39 = lean_ctor_get(x_5, 0); lean_inc(x_39); -lean_dec(x_38); -x_40 = lean_alloc_ctor(0, 4, 0); -lean_ctor_set(x_40, 0, x_35); -lean_ctor_set(x_40, 1, x_36); -lean_ctor_set(x_40, 2, x_37); -lean_ctor_set(x_40, 3, x_39); -x_41 = l_Lean_mkOptionalNode___closed__2; -x_42 = lean_array_push(x_41, x_12); -x_43 = l___private_Lean_Meta_AppBuilder_2__mkAppMFinal___closed__1; -x_44 = lean_alloc_ctor(16, 4, 0); -lean_ctor_set(x_44, 0, x_1); -lean_ctor_set(x_44, 1, x_43); -lean_ctor_set(x_44, 2, x_42); -lean_ctor_set(x_44, 3, x_40); -x_45 = lean_alloc_ctor(1, 2, 0); +lean_dec(x_5); +x_40 = lean_ctor_get(x_39, 0); +lean_inc(x_40); +lean_dec(x_39); +x_41 = lean_alloc_ctor(0, 4, 0); +lean_ctor_set(x_41, 0, x_36); +lean_ctor_set(x_41, 1, x_37); +lean_ctor_set(x_41, 2, x_38); +lean_ctor_set(x_41, 3, x_40); +x_42 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_42, 0, x_12); +x_43 = l_Lean_indentExpr(x_42); +x_44 = l___private_Lean_Meta_AppBuilder_3__mkAppMFinal___closed__3; +x_45 = lean_alloc_ctor(9, 2, 0); lean_ctor_set(x_45, 0, x_44); -lean_ctor_set(x_45, 1, x_34); -return x_45; +lean_ctor_set(x_45, 1, x_43); +x_46 = lean_alloc_ctor(16, 3, 0); +lean_ctor_set(x_46, 0, x_1); +lean_ctor_set(x_46, 1, x_45); +lean_ctor_set(x_46, 2, x_41); +x_47 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_47, 0, x_46); +lean_ctor_set(x_47, 1, x_35); +return x_47; } } } else { -uint8_t x_46; +uint8_t x_48; lean_dec(x_8); lean_dec(x_5); lean_dec(x_1); -x_46 = !lean_is_exclusive(x_9); -if (x_46 == 0) +x_48 = !lean_is_exclusive(x_9); +if (x_48 == 0) { return x_9; } else { -lean_object* x_47; lean_object* x_48; lean_object* x_49; -x_47 = lean_ctor_get(x_9, 0); -x_48 = lean_ctor_get(x_9, 1); -lean_inc(x_48); -lean_inc(x_47); +lean_object* x_49; lean_object* x_50; lean_object* x_51; +x_49 = lean_ctor_get(x_9, 0); +x_50 = lean_ctor_get(x_9, 1); +lean_inc(x_50); +lean_inc(x_49); lean_dec(x_9); -x_49 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_49, 0, x_47); -lean_ctor_set(x_49, 1, x_48); -return x_49; +x_51 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_51, 0, x_49); +lean_ctor_set(x_51, 1, x_50); +return x_51; } } } } -lean_object* l_Array_forMAux___main___at___private_Lean_Meta_AppBuilder_2__mkAppMFinal___spec__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +lean_object* l_Array_forMAux___main___at___private_Lean_Meta_AppBuilder_3__mkAppMFinal___spec__1___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_Array_forMAux___main___at___private_Lean_Meta_AppBuilder_2__mkAppMFinal___spec__1(x_1, x_2, x_3, x_4); +x_5 = l_Array_forMAux___main___at___private_Lean_Meta_AppBuilder_3__mkAppMFinal___spec__1(x_1, x_2, x_3, x_4); lean_dec(x_1); return x_5; } } -lean_object* l___private_Lean_Meta_AppBuilder_2__mkAppMFinal___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { +lean_object* l___private_Lean_Meta_AppBuilder_3__mkAppMFinal___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { _start: { lean_object* x_7; -x_7 = l___private_Lean_Meta_AppBuilder_2__mkAppMFinal(x_1, x_2, x_3, x_4, x_5, x_6); +x_7 = l___private_Lean_Meta_AppBuilder_3__mkAppMFinal(x_1, x_2, x_3, x_4, x_5, x_6); lean_dec(x_4); lean_dec(x_3); return x_7; } } -lean_object* _init_l___private_Lean_Meta_AppBuilder_3__mkAppMAux___main___closed__1() { +lean_object* _init_l___private_Lean_Meta_AppBuilder_4__mkAppMAux___main___closed__1() { _start: { lean_object* x_1; @@ -5065,294 +5495,342 @@ x_1 = lean_mk_string("mkAppM"); return x_1; } } -lean_object* _init_l___private_Lean_Meta_AppBuilder_3__mkAppMAux___main___closed__2() { +lean_object* _init_l___private_Lean_Meta_AppBuilder_4__mkAppMAux___main___closed__2() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = lean_box(0); -x_2 = l___private_Lean_Meta_AppBuilder_3__mkAppMAux___main___closed__1; +x_2 = l___private_Lean_Meta_AppBuilder_4__mkAppMAux___main___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; } } -lean_object* _init_l___private_Lean_Meta_AppBuilder_3__mkAppMAux___main___closed__3() { +lean_object* _init_l___private_Lean_Meta_AppBuilder_4__mkAppMAux___main___closed__3() { _start: { lean_object* x_1; -x_1 = lean_mk_string("too many explicit arguments provided"); +x_1 = lean_mk_string("too many explicit arguments provided to"); return x_1; } } -lean_object* l___private_Lean_Meta_AppBuilder_3__mkAppMAux___main(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9) { +lean_object* _init_l___private_Lean_Meta_AppBuilder_4__mkAppMAux___main___closed__4() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l___private_Lean_Meta_AppBuilder_4__mkAppMAux___main___closed__3; +x_2 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* _init_l___private_Lean_Meta_AppBuilder_4__mkAppMAux___main___closed__5() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l___private_Lean_Meta_AppBuilder_4__mkAppMAux___main___closed__4; +x_2 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* _init_l___private_Lean_Meta_AppBuilder_4__mkAppMAux___main___closed__6() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("arguments"); +return x_1; +} +} +lean_object* _init_l___private_Lean_Meta_AppBuilder_4__mkAppMAux___main___closed__7() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l___private_Lean_Meta_AppBuilder_4__mkAppMAux___main___closed__6; +x_2 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* _init_l___private_Lean_Meta_AppBuilder_4__mkAppMAux___main___closed__8() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l___private_Lean_Meta_AppBuilder_4__mkAppMAux___main___closed__7; +x_2 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* l___private_Lean_Meta_AppBuilder_4__mkAppMAux___main(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9) { _start: { lean_object* x_10; if (lean_obj_tag(x_7) == 7) { -lean_object* x_63; lean_object* x_64; lean_object* x_65; uint64_t x_66; lean_object* x_67; lean_object* x_68; lean_object* x_69; uint8_t x_118; lean_object* x_119; -x_63 = lean_ctor_get(x_7, 0); -lean_inc(x_63); -x_64 = lean_ctor_get(x_7, 1); -lean_inc(x_64); -x_65 = lean_ctor_get(x_7, 2); -lean_inc(x_65); -x_66 = lean_ctor_get_uint64(x_7, sizeof(void*)*3); +lean_object* x_77; lean_object* x_78; lean_object* x_79; uint64_t x_80; lean_object* x_81; lean_object* x_82; lean_object* x_83; uint8_t x_132; lean_object* x_133; +x_77 = lean_ctor_get(x_7, 0); +lean_inc(x_77); +x_78 = lean_ctor_get(x_7, 1); +lean_inc(x_78); +x_79 = lean_ctor_get(x_7, 2); +lean_inc(x_79); +x_80 = lean_ctor_get_uint64(x_7, sizeof(void*)*3); lean_dec(x_7); -x_67 = lean_array_get_size(x_4); -x_68 = lean_expr_instantiate_rev_range(x_64, x_5, x_67, x_4); -lean_dec(x_67); -lean_dec(x_64); -x_118 = (uint8_t)((x_66 << 24) >> 61); -x_119 = lean_box(x_118); -switch (lean_obj_tag(x_119)) { +x_81 = lean_array_get_size(x_4); +x_82 = lean_expr_instantiate_rev_range(x_78, x_5, x_81, x_4); +lean_dec(x_81); +lean_dec(x_78); +x_132 = (uint8_t)((x_80 << 24) >> 61); +x_133 = lean_box(x_132); +switch (lean_obj_tag(x_133)) { case 1: { -uint8_t x_120; lean_object* x_121; lean_object* x_122; lean_object* x_123; lean_object* x_124; -x_120 = 0; +uint8_t x_134; lean_object* x_135; lean_object* x_136; lean_object* x_137; lean_object* x_138; +x_134 = 0; lean_inc(x_8); -x_121 = l_Lean_Meta_mkFreshExprMVar(x_68, x_63, x_120, x_8, x_9); -x_122 = lean_ctor_get(x_121, 0); -lean_inc(x_122); -x_123 = lean_ctor_get(x_121, 1); -lean_inc(x_123); -lean_dec(x_121); -x_124 = lean_array_push(x_4, x_122); -x_4 = x_124; -x_7 = x_65; -x_9 = x_123; +x_135 = l_Lean_Meta_mkFreshExprMVar(x_82, x_77, x_134, x_8, x_9); +x_136 = lean_ctor_get(x_135, 0); +lean_inc(x_136); +x_137 = lean_ctor_get(x_135, 1); +lean_inc(x_137); +lean_dec(x_135); +x_138 = lean_array_push(x_4, x_136); +x_4 = x_138; +x_7 = x_79; +x_9 = x_137; goto _start; } case 3: { -uint8_t 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; -x_126 = 1; +uint8_t 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_140 = 1; lean_inc(x_8); -x_127 = l_Lean_Meta_mkFreshExprMVar(x_68, x_63, x_126, x_8, x_9); -x_128 = lean_ctor_get(x_127, 0); -lean_inc(x_128); -x_129 = lean_ctor_get(x_127, 1); -lean_inc(x_129); -lean_dec(x_127); -lean_inc(x_128); -x_130 = lean_array_push(x_4, x_128); -x_131 = l_Lean_Expr_mvarId_x21(x_128); -lean_dec(x_128); -x_132 = lean_array_push(x_6, x_131); -x_4 = x_130; -x_6 = x_132; -x_7 = x_65; -x_9 = x_129; +x_141 = l_Lean_Meta_mkFreshExprMVar(x_82, x_77, x_140, x_8, x_9); +x_142 = lean_ctor_get(x_141, 0); +lean_inc(x_142); +x_143 = lean_ctor_get(x_141, 1); +lean_inc(x_143); +lean_dec(x_141); +lean_inc(x_142); +x_144 = lean_array_push(x_4, x_142); +x_145 = l_Lean_Expr_mvarId_x21(x_142); +lean_dec(x_142); +x_146 = lean_array_push(x_6, x_145); +x_4 = x_144; +x_6 = x_146; +x_7 = x_79; +x_9 = x_143; goto _start; } default: { -lean_object* x_134; -lean_dec(x_119); -lean_dec(x_63); -x_134 = lean_box(0); -x_69 = x_134; -goto block_117; +lean_object* x_148; +lean_dec(x_133); +lean_dec(x_77); +x_148 = lean_box(0); +x_83 = x_148; +goto block_131; } } -block_117: +block_131: { -lean_object* x_70; uint8_t x_71; -lean_dec(x_69); -x_70 = lean_array_get_size(x_2); -x_71 = lean_nat_dec_lt(x_3, x_70); -lean_dec(x_70); -if (x_71 == 0) -{ -lean_object* x_72; lean_object* x_73; -lean_dec(x_68); -lean_dec(x_65); -lean_dec(x_5); -lean_dec(x_3); -x_72 = l___private_Lean_Meta_AppBuilder_3__mkAppMAux___main___closed__2; -x_73 = l___private_Lean_Meta_AppBuilder_2__mkAppMFinal(x_72, x_1, x_4, x_6, x_8, x_9); -lean_dec(x_6); -lean_dec(x_4); -return x_73; -} -else -{ -lean_object* x_74; lean_object* x_75; -x_74 = lean_array_fget(x_2, x_3); -lean_inc(x_8); -lean_inc(x_74); -x_75 = l_Lean_Meta_inferType(x_74, x_8, x_9); -if (lean_obj_tag(x_75) == 0) -{ -lean_object* x_76; lean_object* x_77; lean_object* x_78; -x_76 = lean_ctor_get(x_75, 0); -lean_inc(x_76); -x_77 = lean_ctor_get(x_75, 1); -lean_inc(x_77); -lean_dec(x_75); -lean_inc(x_8); -x_78 = l_Lean_Meta_isExprDefEq(x_68, x_76, x_8, x_77); -if (lean_obj_tag(x_78) == 0) -{ -lean_object* x_79; uint8_t x_80; -x_79 = lean_ctor_get(x_78, 0); -lean_inc(x_79); -x_80 = lean_unbox(x_79); -lean_dec(x_79); -if (x_80 == 0) -{ -uint8_t x_81; -lean_dec(x_65); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_3); -x_81 = !lean_is_exclusive(x_78); -if (x_81 == 0) -{ -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; -x_82 = lean_ctor_get(x_78, 1); -x_83 = lean_ctor_get(x_78, 0); +lean_object* x_84; uint8_t x_85; lean_dec(x_83); -x_84 = lean_ctor_get(x_82, 0); -lean_inc(x_84); -x_85 = lean_ctor_get(x_82, 1); -lean_inc(x_85); -x_86 = lean_ctor_get(x_8, 1); -lean_inc(x_86); -x_87 = lean_ctor_get(x_8, 0); -lean_inc(x_87); -lean_dec(x_8); -x_88 = lean_ctor_get(x_87, 0); -lean_inc(x_88); -lean_dec(x_87); -x_89 = lean_alloc_ctor(0, 4, 0); -lean_ctor_set(x_89, 0, x_84); -lean_ctor_set(x_89, 1, x_85); -lean_ctor_set(x_89, 2, x_86); -lean_ctor_set(x_89, 3, x_88); -x_90 = lean_unsigned_to_nat(0u); -x_91 = l_Array_iterateMAux___main___at_Lean_mkAppN___spec__1(x_4, x_4, x_90, x_1); -lean_dec(x_4); -x_92 = lean_alloc_ctor(14, 3, 0); -lean_ctor_set(x_92, 0, x_91); -lean_ctor_set(x_92, 1, x_74); -lean_ctor_set(x_92, 2, x_89); -lean_ctor_set_tag(x_78, 1); -lean_ctor_set(x_78, 0, x_92); -return x_78; -} -else +x_84 = lean_array_get_size(x_2); +x_85 = lean_nat_dec_lt(x_3, x_84); +lean_dec(x_84); +if (x_85 == 0) { -lean_object* x_93; lean_object* x_94; lean_object* x_95; lean_object* x_96; lean_object* x_97; lean_object* x_98; lean_object* x_99; lean_object* x_100; lean_object* x_101; lean_object* x_102; lean_object* x_103; -x_93 = lean_ctor_get(x_78, 1); -lean_inc(x_93); -lean_dec(x_78); -x_94 = lean_ctor_get(x_93, 0); -lean_inc(x_94); -x_95 = lean_ctor_get(x_93, 1); -lean_inc(x_95); -x_96 = lean_ctor_get(x_8, 1); -lean_inc(x_96); -x_97 = lean_ctor_get(x_8, 0); -lean_inc(x_97); -lean_dec(x_8); -x_98 = lean_ctor_get(x_97, 0); -lean_inc(x_98); -lean_dec(x_97); -x_99 = lean_alloc_ctor(0, 4, 0); -lean_ctor_set(x_99, 0, x_94); -lean_ctor_set(x_99, 1, x_95); -lean_ctor_set(x_99, 2, x_96); -lean_ctor_set(x_99, 3, x_98); -x_100 = lean_unsigned_to_nat(0u); -x_101 = l_Array_iterateMAux___main___at_Lean_mkAppN___spec__1(x_4, x_4, x_100, x_1); -lean_dec(x_4); -x_102 = lean_alloc_ctor(14, 3, 0); -lean_ctor_set(x_102, 0, x_101); -lean_ctor_set(x_102, 1, x_74); -lean_ctor_set(x_102, 2, x_99); -x_103 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_103, 0, x_102); -lean_ctor_set(x_103, 1, x_93); -return x_103; -} -} -else -{ -lean_object* x_104; lean_object* x_105; lean_object* x_106; lean_object* x_107; -x_104 = lean_ctor_get(x_78, 1); -lean_inc(x_104); -lean_dec(x_78); -x_105 = lean_unsigned_to_nat(1u); -x_106 = lean_nat_add(x_3, x_105); +lean_object* x_86; lean_object* x_87; +lean_dec(x_82); +lean_dec(x_79); +lean_dec(x_5); lean_dec(x_3); -x_107 = lean_array_push(x_4, x_74); -x_3 = x_106; -x_4 = x_107; -x_7 = x_65; -x_9 = x_104; +x_86 = l___private_Lean_Meta_AppBuilder_4__mkAppMAux___main___closed__2; +x_87 = l___private_Lean_Meta_AppBuilder_3__mkAppMFinal(x_86, x_1, x_4, x_6, x_8, x_9); +lean_dec(x_6); +lean_dec(x_4); +return x_87; +} +else +{ +lean_object* x_88; lean_object* x_89; +x_88 = lean_array_fget(x_2, x_3); +lean_inc(x_8); +lean_inc(x_88); +x_89 = l_Lean_Meta_inferType(x_88, x_8, x_9); +if (lean_obj_tag(x_89) == 0) +{ +lean_object* x_90; lean_object* x_91; lean_object* x_92; +x_90 = lean_ctor_get(x_89, 0); +lean_inc(x_90); +x_91 = lean_ctor_get(x_89, 1); +lean_inc(x_91); +lean_dec(x_89); +lean_inc(x_8); +x_92 = l_Lean_Meta_isExprDefEq(x_82, x_90, x_8, x_91); +if (lean_obj_tag(x_92) == 0) +{ +lean_object* x_93; uint8_t x_94; +x_93 = lean_ctor_get(x_92, 0); +lean_inc(x_93); +x_94 = lean_unbox(x_93); +lean_dec(x_93); +if (x_94 == 0) +{ +uint8_t x_95; +lean_dec(x_79); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_3); +x_95 = !lean_is_exclusive(x_92); +if (x_95 == 0) +{ +lean_object* x_96; lean_object* x_97; lean_object* x_98; lean_object* x_99; lean_object* x_100; lean_object* x_101; lean_object* x_102; lean_object* x_103; lean_object* x_104; lean_object* x_105; lean_object* x_106; +x_96 = lean_ctor_get(x_92, 1); +x_97 = lean_ctor_get(x_92, 0); +lean_dec(x_97); +x_98 = lean_ctor_get(x_96, 0); +lean_inc(x_98); +x_99 = lean_ctor_get(x_96, 1); +lean_inc(x_99); +x_100 = lean_ctor_get(x_8, 1); +lean_inc(x_100); +x_101 = lean_ctor_get(x_8, 0); +lean_inc(x_101); +lean_dec(x_8); +x_102 = lean_ctor_get(x_101, 0); +lean_inc(x_102); +lean_dec(x_101); +x_103 = lean_alloc_ctor(0, 4, 0); +lean_ctor_set(x_103, 0, x_98); +lean_ctor_set(x_103, 1, x_99); +lean_ctor_set(x_103, 2, x_100); +lean_ctor_set(x_103, 3, x_102); +x_104 = lean_unsigned_to_nat(0u); +x_105 = l_Array_iterateMAux___main___at_Lean_mkAppN___spec__1(x_4, x_4, x_104, x_1); +lean_dec(x_4); +x_106 = lean_alloc_ctor(14, 3, 0); +lean_ctor_set(x_106, 0, x_105); +lean_ctor_set(x_106, 1, x_88); +lean_ctor_set(x_106, 2, x_103); +lean_ctor_set_tag(x_92, 1); +lean_ctor_set(x_92, 0, x_106); +return x_92; +} +else +{ +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; +x_107 = lean_ctor_get(x_92, 1); +lean_inc(x_107); +lean_dec(x_92); +x_108 = lean_ctor_get(x_107, 0); +lean_inc(x_108); +x_109 = lean_ctor_get(x_107, 1); +lean_inc(x_109); +x_110 = lean_ctor_get(x_8, 1); +lean_inc(x_110); +x_111 = lean_ctor_get(x_8, 0); +lean_inc(x_111); +lean_dec(x_8); +x_112 = lean_ctor_get(x_111, 0); +lean_inc(x_112); +lean_dec(x_111); +x_113 = lean_alloc_ctor(0, 4, 0); +lean_ctor_set(x_113, 0, x_108); +lean_ctor_set(x_113, 1, x_109); +lean_ctor_set(x_113, 2, x_110); +lean_ctor_set(x_113, 3, x_112); +x_114 = lean_unsigned_to_nat(0u); +x_115 = l_Array_iterateMAux___main___at_Lean_mkAppN___spec__1(x_4, x_4, x_114, x_1); +lean_dec(x_4); +x_116 = lean_alloc_ctor(14, 3, 0); +lean_ctor_set(x_116, 0, x_115); +lean_ctor_set(x_116, 1, x_88); +lean_ctor_set(x_116, 2, x_113); +x_117 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_117, 0, x_116); +lean_ctor_set(x_117, 1, x_107); +return x_117; +} +} +else +{ +lean_object* x_118; lean_object* x_119; lean_object* x_120; lean_object* x_121; +x_118 = lean_ctor_get(x_92, 1); +lean_inc(x_118); +lean_dec(x_92); +x_119 = lean_unsigned_to_nat(1u); +x_120 = lean_nat_add(x_3, x_119); +lean_dec(x_3); +x_121 = lean_array_push(x_4, x_88); +x_3 = x_120; +x_4 = x_121; +x_7 = x_79; +x_9 = x_118; goto _start; } } else { -uint8_t x_109; -lean_dec(x_74); -lean_dec(x_65); +uint8_t x_123; +lean_dec(x_88); +lean_dec(x_79); lean_dec(x_8); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_3); lean_dec(x_1); -x_109 = !lean_is_exclusive(x_78); -if (x_109 == 0) +x_123 = !lean_is_exclusive(x_92); +if (x_123 == 0) { -return x_78; +return x_92; } else { -lean_object* x_110; lean_object* x_111; lean_object* x_112; -x_110 = lean_ctor_get(x_78, 0); -x_111 = lean_ctor_get(x_78, 1); -lean_inc(x_111); -lean_inc(x_110); -lean_dec(x_78); -x_112 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_112, 0, x_110); -lean_ctor_set(x_112, 1, x_111); -return x_112; +lean_object* x_124; lean_object* x_125; lean_object* x_126; +x_124 = lean_ctor_get(x_92, 0); +x_125 = lean_ctor_get(x_92, 1); +lean_inc(x_125); +lean_inc(x_124); +lean_dec(x_92); +x_126 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_126, 0, x_124); +lean_ctor_set(x_126, 1, x_125); +return x_126; } } } else { -uint8_t x_113; -lean_dec(x_74); -lean_dec(x_68); -lean_dec(x_65); +uint8_t x_127; +lean_dec(x_88); +lean_dec(x_82); +lean_dec(x_79); lean_dec(x_8); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_3); lean_dec(x_1); -x_113 = !lean_is_exclusive(x_75); -if (x_113 == 0) +x_127 = !lean_is_exclusive(x_89); +if (x_127 == 0) { -return x_75; +return x_89; } else { -lean_object* x_114; lean_object* x_115; lean_object* x_116; -x_114 = lean_ctor_get(x_75, 0); -x_115 = lean_ctor_get(x_75, 1); -lean_inc(x_115); -lean_inc(x_114); -lean_dec(x_75); -x_116 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_116, 0, x_114); -lean_ctor_set(x_116, 1, x_115); -return x_116; +lean_object* x_128; lean_object* x_129; lean_object* x_130; +x_128 = lean_ctor_get(x_89, 0); +x_129 = lean_ctor_get(x_89, 1); +lean_inc(x_129); +lean_inc(x_128); +lean_dec(x_89); +x_130 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_130, 0, x_128); +lean_ctor_set(x_130, 1, x_129); +return x_130; } } } @@ -5360,12 +5838,12 @@ return x_116; } else { -lean_object* x_135; -x_135 = lean_box(0); -x_10 = x_135; -goto block_62; +lean_object* x_149; +x_149 = lean_box(0); +x_10 = x_149; +goto block_76; } -block_62: +block_76: { lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_dec(x_10); @@ -5396,7 +5874,7 @@ lean_dec(x_18); lean_dec(x_3); if (x_19 == 0) { -lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; 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_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_dec(x_6); lean_dec(x_4); x_20 = lean_ctor_get(x_16, 0); @@ -5416,30 +5894,45 @@ lean_ctor_set(x_25, 0, x_20); lean_ctor_set(x_25, 1, x_21); lean_ctor_set(x_25, 2, x_22); lean_ctor_set(x_25, 3, x_24); -x_26 = l_Lean_mkOptionalNode___closed__2; -x_27 = lean_array_push(x_26, x_1); -x_28 = lean_unsigned_to_nat(0u); -x_29 = l_Array_iterateMAux___main___at_Array_append___spec__1___rarg(x_2, x_2, x_28, x_27); -x_30 = l___private_Lean_Meta_AppBuilder_3__mkAppMAux___main___closed__2; -x_31 = l___private_Lean_Meta_AppBuilder_3__mkAppMAux___main___closed__3; -x_32 = lean_alloc_ctor(16, 4, 0); -lean_ctor_set(x_32, 0, x_30); -lean_ctor_set(x_32, 1, x_31); -lean_ctor_set(x_32, 2, x_29); -lean_ctor_set(x_32, 3, x_25); +x_26 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_26, 0, x_1); +x_27 = l_Lean_indentExpr(x_26); +x_28 = l___private_Lean_Meta_AppBuilder_4__mkAppMAux___main___closed__5; +x_29 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_29, 0, x_28); +lean_ctor_set(x_29, 1, x_27); +x_30 = l_Lean_MessageData_ofList___closed__3; +x_31 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_31, 0, x_29); +lean_ctor_set(x_31, 1, x_30); +x_32 = l___private_Lean_Meta_AppBuilder_4__mkAppMAux___main___closed__8; +x_33 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_33, 0, x_31); +lean_ctor_set(x_33, 1, x_32); +x_34 = lean_unsigned_to_nat(0u); +x_35 = l_Lean_MessageData_coeOfArrayExpr___closed__2; +x_36 = l_Lean_MessageData_arrayExpr_toMessageData___main(x_2, x_34, x_35); +x_37 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_37, 0, x_33); +lean_ctor_set(x_37, 1, x_36); +x_38 = l___private_Lean_Meta_AppBuilder_4__mkAppMAux___main___closed__2; +x_39 = lean_alloc_ctor(16, 3, 0); +lean_ctor_set(x_39, 0, x_38); +lean_ctor_set(x_39, 1, x_37); +lean_ctor_set(x_39, 2, x_25); lean_ctor_set_tag(x_13, 1); -lean_ctor_set(x_13, 0, x_32); +lean_ctor_set(x_13, 0, x_39); return x_13; } else { -lean_object* x_33; lean_object* x_34; +lean_object* x_40; lean_object* x_41; lean_free_object(x_13); -x_33 = l___private_Lean_Meta_AppBuilder_3__mkAppMAux___main___closed__2; -x_34 = l___private_Lean_Meta_AppBuilder_2__mkAppMFinal(x_33, x_1, x_4, x_6, x_8, x_16); +x_40 = l___private_Lean_Meta_AppBuilder_4__mkAppMAux___main___closed__2; +x_41 = l___private_Lean_Meta_AppBuilder_3__mkAppMFinal(x_40, x_1, x_4, x_6, x_8, x_16); lean_dec(x_6); lean_dec(x_4); -return x_34; +return x_41; } } else @@ -5453,137 +5946,152 @@ goto _start; } else { -lean_object* x_36; lean_object* x_37; uint8_t x_38; -x_36 = lean_ctor_get(x_13, 0); -x_37 = lean_ctor_get(x_13, 1); -lean_inc(x_37); -lean_inc(x_36); +lean_object* x_43; lean_object* x_44; uint8_t x_45; +x_43 = lean_ctor_get(x_13, 0); +x_44 = lean_ctor_get(x_13, 1); +lean_inc(x_44); +lean_inc(x_43); lean_dec(x_13); -x_38 = l_Lean_Expr_isForall(x_36); -if (x_38 == 0) +x_45 = l_Lean_Expr_isForall(x_43); +if (x_45 == 0) { -lean_object* x_39; uint8_t x_40; -lean_dec(x_36); +lean_object* x_46; uint8_t x_47; +lean_dec(x_43); lean_dec(x_11); -x_39 = lean_array_get_size(x_2); -x_40 = lean_nat_dec_eq(x_3, x_39); -lean_dec(x_39); +x_46 = lean_array_get_size(x_2); +x_47 = lean_nat_dec_eq(x_3, x_46); +lean_dec(x_46); lean_dec(x_3); -if (x_40 == 0) +if (x_47 == 0) { -lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; lean_object* x_48; 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_48; lean_object* x_49; lean_object* x_50; lean_object* x_51; lean_object* x_52; lean_object* x_53; lean_object* x_54; lean_object* x_55; lean_object* x_56; lean_object* x_57; lean_object* x_58; lean_object* x_59; lean_object* x_60; lean_object* x_61; lean_object* x_62; lean_object* x_63; lean_object* x_64; lean_object* x_65; lean_object* x_66; lean_object* x_67; lean_object* x_68; lean_dec(x_6); lean_dec(x_4); -x_41 = lean_ctor_get(x_37, 0); -lean_inc(x_41); -x_42 = lean_ctor_get(x_37, 1); -lean_inc(x_42); -x_43 = lean_ctor_get(x_8, 1); -lean_inc(x_43); -x_44 = lean_ctor_get(x_8, 0); -lean_inc(x_44); +x_48 = lean_ctor_get(x_44, 0); +lean_inc(x_48); +x_49 = lean_ctor_get(x_44, 1); +lean_inc(x_49); +x_50 = lean_ctor_get(x_8, 1); +lean_inc(x_50); +x_51 = lean_ctor_get(x_8, 0); +lean_inc(x_51); lean_dec(x_8); -x_45 = lean_ctor_get(x_44, 0); -lean_inc(x_45); -lean_dec(x_44); -x_46 = lean_alloc_ctor(0, 4, 0); -lean_ctor_set(x_46, 0, x_41); -lean_ctor_set(x_46, 1, x_42); -lean_ctor_set(x_46, 2, x_43); -lean_ctor_set(x_46, 3, x_45); -x_47 = l_Lean_mkOptionalNode___closed__2; -x_48 = lean_array_push(x_47, x_1); -x_49 = lean_unsigned_to_nat(0u); -x_50 = l_Array_iterateMAux___main___at_Array_append___spec__1___rarg(x_2, x_2, x_49, x_48); -x_51 = l___private_Lean_Meta_AppBuilder_3__mkAppMAux___main___closed__2; -x_52 = l___private_Lean_Meta_AppBuilder_3__mkAppMAux___main___closed__3; -x_53 = lean_alloc_ctor(16, 4, 0); -lean_ctor_set(x_53, 0, x_51); -lean_ctor_set(x_53, 1, x_52); +x_52 = lean_ctor_get(x_51, 0); +lean_inc(x_52); +lean_dec(x_51); +x_53 = lean_alloc_ctor(0, 4, 0); +lean_ctor_set(x_53, 0, x_48); +lean_ctor_set(x_53, 1, x_49); lean_ctor_set(x_53, 2, x_50); -lean_ctor_set(x_53, 3, x_46); -x_54 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_54, 0, x_53); -lean_ctor_set(x_54, 1, x_37); -return x_54; +lean_ctor_set(x_53, 3, x_52); +x_54 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_54, 0, x_1); +x_55 = l_Lean_indentExpr(x_54); +x_56 = l___private_Lean_Meta_AppBuilder_4__mkAppMAux___main___closed__5; +x_57 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_57, 0, x_56); +lean_ctor_set(x_57, 1, x_55); +x_58 = l_Lean_MessageData_ofList___closed__3; +x_59 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_59, 0, x_57); +lean_ctor_set(x_59, 1, x_58); +x_60 = l___private_Lean_Meta_AppBuilder_4__mkAppMAux___main___closed__8; +x_61 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_61, 0, x_59); +lean_ctor_set(x_61, 1, x_60); +x_62 = lean_unsigned_to_nat(0u); +x_63 = l_Lean_MessageData_coeOfArrayExpr___closed__2; +x_64 = l_Lean_MessageData_arrayExpr_toMessageData___main(x_2, x_62, x_63); +x_65 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_65, 0, x_61); +lean_ctor_set(x_65, 1, x_64); +x_66 = l___private_Lean_Meta_AppBuilder_4__mkAppMAux___main___closed__2; +x_67 = lean_alloc_ctor(16, 3, 0); +lean_ctor_set(x_67, 0, x_66); +lean_ctor_set(x_67, 1, x_65); +lean_ctor_set(x_67, 2, x_53); +x_68 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_68, 0, x_67); +lean_ctor_set(x_68, 1, x_44); +return x_68; } else { -lean_object* x_55; lean_object* x_56; -x_55 = l___private_Lean_Meta_AppBuilder_3__mkAppMAux___main___closed__2; -x_56 = l___private_Lean_Meta_AppBuilder_2__mkAppMFinal(x_55, x_1, x_4, x_6, x_8, x_37); +lean_object* x_69; lean_object* x_70; +x_69 = l___private_Lean_Meta_AppBuilder_4__mkAppMAux___main___closed__2; +x_70 = l___private_Lean_Meta_AppBuilder_3__mkAppMFinal(x_69, x_1, x_4, x_6, x_8, x_44); lean_dec(x_6); lean_dec(x_4); -return x_56; +return x_70; } } else { x_5 = x_11; -x_7 = x_36; -x_9 = x_37; +x_7 = x_43; +x_9 = x_44; goto _start; } } } else { -uint8_t x_58; +uint8_t x_72; lean_dec(x_11); lean_dec(x_8); lean_dec(x_6); lean_dec(x_4); lean_dec(x_3); lean_dec(x_1); -x_58 = !lean_is_exclusive(x_13); -if (x_58 == 0) +x_72 = !lean_is_exclusive(x_13); +if (x_72 == 0) { return x_13; } else { -lean_object* x_59; lean_object* x_60; lean_object* x_61; -x_59 = lean_ctor_get(x_13, 0); -x_60 = lean_ctor_get(x_13, 1); -lean_inc(x_60); -lean_inc(x_59); +lean_object* x_73; lean_object* x_74; lean_object* x_75; +x_73 = lean_ctor_get(x_13, 0); +x_74 = lean_ctor_get(x_13, 1); +lean_inc(x_74); +lean_inc(x_73); lean_dec(x_13); -x_61 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_61, 0, x_59); -lean_ctor_set(x_61, 1, x_60); -return x_61; +x_75 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_75, 0, x_73); +lean_ctor_set(x_75, 1, x_74); +return x_75; } } } } } -lean_object* l___private_Lean_Meta_AppBuilder_3__mkAppMAux___main___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9) { +lean_object* l___private_Lean_Meta_AppBuilder_4__mkAppMAux___main___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9) { _start: { lean_object* x_10; -x_10 = l___private_Lean_Meta_AppBuilder_3__mkAppMAux___main(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9); +x_10 = l___private_Lean_Meta_AppBuilder_4__mkAppMAux___main(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9); lean_dec(x_2); return x_10; } } -lean_object* l___private_Lean_Meta_AppBuilder_3__mkAppMAux(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9) { +lean_object* l___private_Lean_Meta_AppBuilder_4__mkAppMAux(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9) { _start: { lean_object* x_10; -x_10 = l___private_Lean_Meta_AppBuilder_3__mkAppMAux___main(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9); +x_10 = l___private_Lean_Meta_AppBuilder_4__mkAppMAux___main(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9); return x_10; } } -lean_object* l___private_Lean_Meta_AppBuilder_3__mkAppMAux___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9) { +lean_object* l___private_Lean_Meta_AppBuilder_4__mkAppMAux___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9) { _start: { lean_object* x_10; -x_10 = l___private_Lean_Meta_AppBuilder_3__mkAppMAux(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9); +x_10 = l___private_Lean_Meta_AppBuilder_4__mkAppMAux(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9); lean_dec(x_2); return x_10; } } -lean_object* l_List_mapM___main___at___private_Lean_Meta_AppBuilder_4__mkFun___spec__1(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +lean_object* l_List_mapM___main___at___private_Lean_Meta_AppBuilder_5__mkFun___spec__1(lean_object* x_1, lean_object* x_2, lean_object* x_3) { _start: { if (lean_obj_tag(x_1) == 0) @@ -5611,7 +6119,7 @@ lean_inc(x_10); x_11 = lean_ctor_get(x_9, 1); lean_inc(x_11); lean_dec(x_9); -x_12 = l_List_mapM___main___at___private_Lean_Meta_AppBuilder_4__mkFun___spec__1(x_7, x_2, x_11); +x_12 = l_List_mapM___main___at___private_Lean_Meta_AppBuilder_5__mkFun___spec__1(x_7, x_2, x_11); x_13 = !lean_is_exclusive(x_12); if (x_13 == 0) { @@ -5650,7 +6158,7 @@ lean_inc(x_20); x_21 = lean_ctor_get(x_19, 1); lean_inc(x_21); lean_dec(x_19); -x_22 = l_List_mapM___main___at___private_Lean_Meta_AppBuilder_4__mkFun___spec__1(x_18, x_2, x_21); +x_22 = l_List_mapM___main___at___private_Lean_Meta_AppBuilder_5__mkFun___spec__1(x_18, x_2, x_21); x_23 = lean_ctor_get(x_22, 0); lean_inc(x_23); x_24 = lean_ctor_get(x_22, 1); @@ -5678,7 +6186,7 @@ return x_27; } } } -lean_object* l___private_Lean_Meta_AppBuilder_4__mkFun(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +lean_object* l___private_Lean_Meta_AppBuilder_5__mkFun(lean_object* x_1, lean_object* x_2, lean_object* x_3) { _start: { lean_object* x_4; @@ -5693,7 +6201,7 @@ x_6 = lean_ctor_get(x_4, 1); lean_inc(x_6); lean_dec(x_4); x_7 = l_Lean_ConstantInfo_lparams(x_5); -x_8 = l_List_mapM___main___at___private_Lean_Meta_AppBuilder_4__mkFun___spec__1(x_7, x_2, x_6); +x_8 = l_List_mapM___main___at___private_Lean_Meta_AppBuilder_5__mkFun___spec__1(x_7, x_2, x_6); x_9 = !lean_is_exclusive(x_8); if (x_9 == 0) { @@ -5757,20 +6265,20 @@ return x_23; } } } -lean_object* l_List_mapM___main___at___private_Lean_Meta_AppBuilder_4__mkFun___spec__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +lean_object* l_List_mapM___main___at___private_Lean_Meta_AppBuilder_5__mkFun___spec__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { _start: { lean_object* x_4; -x_4 = l_List_mapM___main___at___private_Lean_Meta_AppBuilder_4__mkFun___spec__1(x_1, x_2, x_3); +x_4 = l_List_mapM___main___at___private_Lean_Meta_AppBuilder_5__mkFun___spec__1(x_1, x_2, x_3); lean_dec(x_2); return x_4; } } -lean_object* l___private_Lean_Meta_AppBuilder_4__mkFun___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +lean_object* l___private_Lean_Meta_AppBuilder_5__mkFun___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { _start: { lean_object* x_4; -x_4 = l___private_Lean_Meta_AppBuilder_4__mkFun(x_1, x_2, x_3); +x_4 = l___private_Lean_Meta_AppBuilder_5__mkFun(x_1, x_2, x_3); lean_dec(x_2); return x_4; } @@ -5838,7 +6346,7 @@ lean_ctor_set_uint8(x_8, sizeof(void*)*1, x_12); lean_inc(x_10); x_13 = l_Lean_MetavarContext_incDepth(x_10); lean_ctor_set(x_6, 1, x_13); -x_14 = l___private_Lean_Meta_AppBuilder_4__mkFun(x_1, x_3, x_6); +x_14 = l___private_Lean_Meta_AppBuilder_5__mkFun(x_1, x_3, x_6); if (lean_obj_tag(x_14) == 0) { lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; @@ -5854,7 +6362,7 @@ lean_inc(x_18); lean_dec(x_15); x_19 = lean_unsigned_to_nat(0u); x_20 = l_Array_empty___closed__1; -x_21 = l___private_Lean_Meta_AppBuilder_3__mkAppMAux___main(x_17, x_2, x_19, x_20, x_19, x_20, x_18, x_3, x_16); +x_21 = l___private_Lean_Meta_AppBuilder_4__mkAppMAux___main(x_17, x_2, x_19, x_20, x_19, x_20, x_18, x_3, x_16); if (lean_obj_tag(x_21) == 0) { lean_object* x_22; lean_object* x_23; uint8_t x_24; @@ -6294,7 +6802,7 @@ lean_inc(x_109); x_114 = l_Lean_MetavarContext_incDepth(x_109); lean_ctor_set(x_6, 4, x_113); lean_ctor_set(x_6, 1, x_114); -x_115 = l___private_Lean_Meta_AppBuilder_4__mkFun(x_1, x_3, x_6); +x_115 = l___private_Lean_Meta_AppBuilder_5__mkFun(x_1, x_3, x_6); if (lean_obj_tag(x_115) == 0) { 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; @@ -6310,7 +6818,7 @@ lean_inc(x_119); lean_dec(x_116); x_120 = lean_unsigned_to_nat(0u); x_121 = l_Array_empty___closed__1; -x_122 = l___private_Lean_Meta_AppBuilder_3__mkAppMAux___main(x_118, x_2, x_120, x_121, x_120, x_121, x_119, x_3, x_117); +x_122 = l___private_Lean_Meta_AppBuilder_4__mkAppMAux___main(x_118, x_2, x_120, x_121, x_120, x_121, x_119, x_3, x_117); if (lean_obj_tag(x_122) == 0) { 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; lean_object* x_135; lean_object* x_136; @@ -6577,7 +7085,7 @@ lean_ctor_set(x_177, 2, x_168); lean_ctor_set(x_177, 3, x_169); lean_ctor_set(x_177, 4, x_175); lean_ctor_set(x_177, 5, x_170); -x_178 = l___private_Lean_Meta_AppBuilder_4__mkFun(x_1, x_3, x_177); +x_178 = l___private_Lean_Meta_AppBuilder_5__mkFun(x_1, x_3, x_177); if (lean_obj_tag(x_178) == 0) { 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; @@ -6593,7 +7101,7 @@ lean_inc(x_182); lean_dec(x_179); x_183 = lean_unsigned_to_nat(0u); x_184 = l_Array_empty___closed__1; -x_185 = l___private_Lean_Meta_AppBuilder_3__mkAppMAux___main(x_181, x_2, x_183, x_184, x_183, x_184, x_182, x_3, x_180); +x_185 = l___private_Lean_Meta_AppBuilder_4__mkAppMAux___main(x_181, x_2, x_183, x_184, x_183, x_184, x_182, x_3, x_180); if (lean_obj_tag(x_185) == 0) { 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; @@ -6834,7 +7342,7 @@ x_232 = lean_ctor_get(x_229, 1); lean_inc(x_232); x_233 = l_Lean_MetavarContext_incDepth(x_232); lean_ctor_set(x_229, 1, x_233); -x_234 = l___private_Lean_Meta_AppBuilder_4__mkFun(x_1, x_3, x_229); +x_234 = l___private_Lean_Meta_AppBuilder_5__mkFun(x_1, x_3, x_229); if (lean_obj_tag(x_234) == 0) { 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; @@ -6851,7 +7359,7 @@ lean_dec(x_235); x_239 = lean_unsigned_to_nat(0u); x_240 = l_Array_empty___closed__1; lean_inc(x_3); -x_241 = l___private_Lean_Meta_AppBuilder_3__mkAppMAux___main(x_237, x_2, x_239, x_240, x_239, x_240, x_238, x_3, x_236); +x_241 = l___private_Lean_Meta_AppBuilder_4__mkAppMAux___main(x_237, x_2, x_239, x_240, x_239, x_240, x_238, x_3, x_236); if (lean_obj_tag(x_241) == 0) { lean_object* x_242; lean_object* x_243; uint8_t x_244; @@ -7132,7 +7640,7 @@ lean_ctor_set(x_312, 2, x_307); lean_ctor_set(x_312, 3, x_308); lean_ctor_set(x_312, 4, x_309); lean_ctor_set(x_312, 5, x_310); -x_313 = l___private_Lean_Meta_AppBuilder_4__mkFun(x_1, x_3, x_312); +x_313 = l___private_Lean_Meta_AppBuilder_5__mkFun(x_1, x_3, x_312); if (lean_obj_tag(x_313) == 0) { lean_object* x_314; lean_object* x_315; lean_object* x_316; lean_object* x_317; lean_object* x_318; lean_object* x_319; lean_object* x_320; @@ -7149,7 +7657,7 @@ lean_dec(x_314); x_318 = lean_unsigned_to_nat(0u); x_319 = l_Array_empty___closed__1; lean_inc(x_3); -x_320 = l___private_Lean_Meta_AppBuilder_3__mkAppMAux___main(x_316, x_2, x_318, x_319, x_318, x_319, x_317, x_3, x_315); +x_320 = l___private_Lean_Meta_AppBuilder_4__mkAppMAux___main(x_316, x_2, x_318, x_319, x_318, x_319, x_317, x_3, x_315); if (lean_obj_tag(x_320) == 0) { 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; lean_object* x_329; lean_object* x_330; lean_object* x_331; lean_object* x_332; lean_object* x_333; lean_object* x_334; @@ -7356,7 +7864,7 @@ lean_dec(x_2); return x_5; } } -lean_object* l_Array_iterateMAux___main___at___private_Lean_Meta_AppBuilder_5__mkAppOptMAux___main___spec__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +lean_object* l_Array_iterateMAux___main___at___private_Lean_Meta_AppBuilder_6__mkAppOptMAux___main___spec__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { lean_object* x_5; uint8_t x_6; @@ -7394,7 +7902,7 @@ goto _start; } } } -lean_object* _init_l___private_Lean_Meta_AppBuilder_5__mkAppOptMAux___main___closed__1() { +lean_object* _init_l___private_Lean_Meta_AppBuilder_6__mkAppOptMAux___main___closed__1() { _start: { lean_object* x_1; @@ -7402,300 +7910,320 @@ x_1 = lean_mk_string("mkAppOptM"); return x_1; } } -lean_object* _init_l___private_Lean_Meta_AppBuilder_5__mkAppOptMAux___main___closed__2() { +lean_object* _init_l___private_Lean_Meta_AppBuilder_6__mkAppOptMAux___main___closed__2() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = lean_box(0); -x_2 = l___private_Lean_Meta_AppBuilder_5__mkAppOptMAux___main___closed__1; +x_2 = l___private_Lean_Meta_AppBuilder_6__mkAppOptMAux___main___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; } } -lean_object* _init_l___private_Lean_Meta_AppBuilder_5__mkAppOptMAux___main___closed__3() { +lean_object* _init_l___private_Lean_Meta_AppBuilder_6__mkAppOptMAux___main___closed__3() { _start: { lean_object* x_1; -x_1 = lean_mk_string("too many arguments provided"); +x_1 = lean_mk_string("too many arguments provided to"); return x_1; } } -lean_object* l___private_Lean_Meta_AppBuilder_5__mkAppOptMAux___main(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9) { +lean_object* _init_l___private_Lean_Meta_AppBuilder_6__mkAppOptMAux___main___closed__4() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l___private_Lean_Meta_AppBuilder_6__mkAppOptMAux___main___closed__3; +x_2 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* _init_l___private_Lean_Meta_AppBuilder_6__mkAppOptMAux___main___closed__5() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l___private_Lean_Meta_AppBuilder_6__mkAppOptMAux___main___closed__4; +x_2 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* l___private_Lean_Meta_AppBuilder_6__mkAppOptMAux___main(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9) { _start: { lean_object* x_10; if (lean_obj_tag(x_7) == 7) { -lean_object* x_67; lean_object* x_68; lean_object* x_69; uint64_t x_70; lean_object* x_71; lean_object* x_72; lean_object* x_73; uint8_t x_74; -x_67 = lean_ctor_get(x_7, 0); -lean_inc(x_67); -x_68 = lean_ctor_get(x_7, 1); -lean_inc(x_68); -x_69 = lean_ctor_get(x_7, 2); -lean_inc(x_69); -x_70 = lean_ctor_get_uint64(x_7, sizeof(void*)*3); -lean_dec(x_7); -x_71 = lean_array_get_size(x_4); -x_72 = lean_expr_instantiate_rev_range(x_68, x_5, x_71, x_4); -lean_dec(x_71); -lean_dec(x_68); -x_73 = lean_array_get_size(x_2); -x_74 = lean_nat_dec_lt(x_3, x_73); -lean_dec(x_73); -if (x_74 == 0) -{ -lean_object* x_75; lean_object* x_76; -lean_dec(x_72); -lean_dec(x_69); -lean_dec(x_67); -lean_dec(x_5); -lean_dec(x_3); -x_75 = l___private_Lean_Meta_AppBuilder_5__mkAppOptMAux___main___closed__2; -x_76 = l___private_Lean_Meta_AppBuilder_2__mkAppMFinal(x_75, x_1, x_4, x_6, x_8, x_9); -lean_dec(x_6); -lean_dec(x_4); -return x_76; -} -else -{ -lean_object* x_77; -x_77 = lean_array_fget(x_2, x_3); -if (lean_obj_tag(x_77) == 0) -{ -uint8_t x_78; lean_object* x_79; -x_78 = (uint8_t)((x_70 << 24) >> 61); -x_79 = lean_box(x_78); -if (lean_obj_tag(x_79) == 3) -{ -uint8_t x_80; lean_object* x_81; lean_object* x_82; lean_object* x_83; lean_object* x_84; lean_object* x_85; lean_object* x_86; lean_object* x_87; lean_object* x_88; -x_80 = 1; -lean_inc(x_8); -x_81 = l_Lean_Meta_mkFreshExprMVar(x_72, x_67, x_80, x_8, x_9); -x_82 = lean_ctor_get(x_81, 0); +lean_object* x_81; lean_object* x_82; lean_object* x_83; uint64_t x_84; lean_object* x_85; lean_object* x_86; lean_object* x_87; uint8_t x_88; +x_81 = lean_ctor_get(x_7, 0); +lean_inc(x_81); +x_82 = lean_ctor_get(x_7, 1); lean_inc(x_82); -x_83 = lean_ctor_get(x_81, 1); +x_83 = lean_ctor_get(x_7, 2); lean_inc(x_83); -lean_dec(x_81); -x_84 = lean_unsigned_to_nat(1u); -x_85 = lean_nat_add(x_3, x_84); -lean_dec(x_3); -lean_inc(x_82); -x_86 = lean_array_push(x_4, x_82); -x_87 = l_Lean_Expr_mvarId_x21(x_82); +x_84 = lean_ctor_get_uint64(x_7, sizeof(void*)*3); +lean_dec(x_7); +x_85 = lean_array_get_size(x_4); +x_86 = lean_expr_instantiate_rev_range(x_82, x_5, x_85, x_4); +lean_dec(x_85); lean_dec(x_82); -x_88 = lean_array_push(x_6, x_87); -x_3 = x_85; -x_4 = x_86; -x_6 = x_88; -x_7 = x_69; -x_9 = x_83; -goto _start; -} -else +x_87 = lean_array_get_size(x_2); +x_88 = lean_nat_dec_lt(x_3, x_87); +lean_dec(x_87); +if (x_88 == 0) { -uint8_t 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_dec(x_79); -x_90 = 0; -lean_inc(x_8); -x_91 = l_Lean_Meta_mkFreshExprMVar(x_72, x_67, x_90, x_8, x_9); -x_92 = lean_ctor_get(x_91, 0); -lean_inc(x_92); -x_93 = lean_ctor_get(x_91, 1); -lean_inc(x_93); -lean_dec(x_91); -x_94 = lean_unsigned_to_nat(1u); -x_95 = lean_nat_add(x_3, x_94); -lean_dec(x_3); -x_96 = lean_array_push(x_4, x_92); -x_3 = x_95; -x_4 = x_96; -x_7 = x_69; -x_9 = x_93; -goto _start; -} -} -else -{ -lean_object* x_98; lean_object* x_99; -lean_dec(x_67); -x_98 = lean_ctor_get(x_77, 0); -lean_inc(x_98); -lean_dec(x_77); -lean_inc(x_8); -lean_inc(x_98); -x_99 = l_Lean_Meta_inferType(x_98, x_8, x_9); -if (lean_obj_tag(x_99) == 0) -{ -lean_object* x_100; lean_object* x_101; lean_object* x_102; -x_100 = lean_ctor_get(x_99, 0); -lean_inc(x_100); -x_101 = lean_ctor_get(x_99, 1); -lean_inc(x_101); -lean_dec(x_99); -lean_inc(x_8); -x_102 = l_Lean_Meta_isExprDefEq(x_72, x_100, x_8, x_101); -if (lean_obj_tag(x_102) == 0) -{ -lean_object* x_103; uint8_t x_104; -x_103 = lean_ctor_get(x_102, 0); -lean_inc(x_103); -x_104 = lean_unbox(x_103); -lean_dec(x_103); -if (x_104 == 0) -{ -uint8_t x_105; -lean_dec(x_69); -lean_dec(x_6); +lean_object* x_89; lean_object* x_90; +lean_dec(x_86); +lean_dec(x_83); +lean_dec(x_81); lean_dec(x_5); lean_dec(x_3); -x_105 = !lean_is_exclusive(x_102); -if (x_105 == 0) +x_89 = l___private_Lean_Meta_AppBuilder_6__mkAppOptMAux___main___closed__2; +x_90 = l___private_Lean_Meta_AppBuilder_3__mkAppMFinal(x_89, x_1, x_4, x_6, x_8, x_9); +lean_dec(x_6); +lean_dec(x_4); +return x_90; +} +else { -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; -x_106 = lean_ctor_get(x_102, 1); -x_107 = lean_ctor_get(x_102, 0); -lean_dec(x_107); -x_108 = lean_ctor_get(x_106, 0); -lean_inc(x_108); -x_109 = lean_ctor_get(x_106, 1); -lean_inc(x_109); -x_110 = lean_ctor_get(x_8, 1); -lean_inc(x_110); -x_111 = lean_ctor_get(x_8, 0); -lean_inc(x_111); -lean_dec(x_8); -x_112 = lean_ctor_get(x_111, 0); +lean_object* x_91; +x_91 = lean_array_fget(x_2, x_3); +if (lean_obj_tag(x_91) == 0) +{ +uint8_t x_92; lean_object* x_93; +x_92 = (uint8_t)((x_84 << 24) >> 61); +x_93 = lean_box(x_92); +if (lean_obj_tag(x_93) == 3) +{ +uint8_t x_94; lean_object* x_95; lean_object* x_96; lean_object* x_97; lean_object* x_98; lean_object* x_99; lean_object* x_100; lean_object* x_101; lean_object* x_102; +x_94 = 1; +lean_inc(x_8); +x_95 = l_Lean_Meta_mkFreshExprMVar(x_86, x_81, x_94, x_8, x_9); +x_96 = lean_ctor_get(x_95, 0); +lean_inc(x_96); +x_97 = lean_ctor_get(x_95, 1); +lean_inc(x_97); +lean_dec(x_95); +x_98 = lean_unsigned_to_nat(1u); +x_99 = lean_nat_add(x_3, x_98); +lean_dec(x_3); +lean_inc(x_96); +x_100 = lean_array_push(x_4, x_96); +x_101 = l_Lean_Expr_mvarId_x21(x_96); +lean_dec(x_96); +x_102 = lean_array_push(x_6, x_101); +x_3 = x_99; +x_4 = x_100; +x_6 = x_102; +x_7 = x_83; +x_9 = x_97; +goto _start; +} +else +{ +uint8_t 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_dec(x_93); +x_104 = 0; +lean_inc(x_8); +x_105 = l_Lean_Meta_mkFreshExprMVar(x_86, x_81, x_104, x_8, x_9); +x_106 = lean_ctor_get(x_105, 0); +lean_inc(x_106); +x_107 = lean_ctor_get(x_105, 1); +lean_inc(x_107); +lean_dec(x_105); +x_108 = lean_unsigned_to_nat(1u); +x_109 = lean_nat_add(x_3, x_108); +lean_dec(x_3); +x_110 = lean_array_push(x_4, x_106); +x_3 = x_109; +x_4 = x_110; +x_7 = x_83; +x_9 = x_107; +goto _start; +} +} +else +{ +lean_object* x_112; lean_object* x_113; +lean_dec(x_81); +x_112 = lean_ctor_get(x_91, 0); lean_inc(x_112); -lean_dec(x_111); -x_113 = lean_alloc_ctor(0, 4, 0); -lean_ctor_set(x_113, 0, x_108); -lean_ctor_set(x_113, 1, x_109); -lean_ctor_set(x_113, 2, x_110); -lean_ctor_set(x_113, 3, x_112); -x_114 = lean_unsigned_to_nat(0u); -x_115 = l_Array_iterateMAux___main___at_Lean_mkAppN___spec__1(x_4, x_4, x_114, x_1); -lean_dec(x_4); -x_116 = lean_alloc_ctor(14, 3, 0); -lean_ctor_set(x_116, 0, x_115); -lean_ctor_set(x_116, 1, x_98); -lean_ctor_set(x_116, 2, x_113); -lean_ctor_set_tag(x_102, 1); -lean_ctor_set(x_102, 0, x_116); -return x_102; -} -else +lean_dec(x_91); +lean_inc(x_8); +lean_inc(x_112); +x_113 = l_Lean_Meta_inferType(x_112, x_8, x_9); +if (lean_obj_tag(x_113) == 0) { -lean_object* x_117; lean_object* x_118; lean_object* x_119; lean_object* x_120; lean_object* x_121; lean_object* x_122; lean_object* x_123; lean_object* x_124; lean_object* x_125; lean_object* x_126; lean_object* x_127; -x_117 = lean_ctor_get(x_102, 1); +lean_object* x_114; lean_object* x_115; lean_object* x_116; +x_114 = lean_ctor_get(x_113, 0); +lean_inc(x_114); +x_115 = lean_ctor_get(x_113, 1); +lean_inc(x_115); +lean_dec(x_113); +lean_inc(x_8); +x_116 = l_Lean_Meta_isExprDefEq(x_86, x_114, x_8, x_115); +if (lean_obj_tag(x_116) == 0) +{ +lean_object* x_117; uint8_t x_118; +x_117 = lean_ctor_get(x_116, 0); lean_inc(x_117); -lean_dec(x_102); -x_118 = lean_ctor_get(x_117, 0); -lean_inc(x_118); -x_119 = lean_ctor_get(x_117, 1); -lean_inc(x_119); -x_120 = lean_ctor_get(x_8, 1); -lean_inc(x_120); -x_121 = lean_ctor_get(x_8, 0); -lean_inc(x_121); -lean_dec(x_8); -x_122 = lean_ctor_get(x_121, 0); -lean_inc(x_122); +x_118 = lean_unbox(x_117); +lean_dec(x_117); +if (x_118 == 0) +{ +uint8_t x_119; +lean_dec(x_83); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_3); +x_119 = !lean_is_exclusive(x_116); +if (x_119 == 0) +{ +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_120 = lean_ctor_get(x_116, 1); +x_121 = lean_ctor_get(x_116, 0); lean_dec(x_121); -x_123 = lean_alloc_ctor(0, 4, 0); -lean_ctor_set(x_123, 0, x_118); -lean_ctor_set(x_123, 1, x_119); -lean_ctor_set(x_123, 2, x_120); -lean_ctor_set(x_123, 3, x_122); -x_124 = lean_unsigned_to_nat(0u); -x_125 = l_Array_iterateMAux___main___at_Lean_mkAppN___spec__1(x_4, x_4, x_124, x_1); +x_122 = lean_ctor_get(x_120, 0); +lean_inc(x_122); +x_123 = lean_ctor_get(x_120, 1); +lean_inc(x_123); +x_124 = lean_ctor_get(x_8, 1); +lean_inc(x_124); +x_125 = lean_ctor_get(x_8, 0); +lean_inc(x_125); +lean_dec(x_8); +x_126 = lean_ctor_get(x_125, 0); +lean_inc(x_126); +lean_dec(x_125); +x_127 = lean_alloc_ctor(0, 4, 0); +lean_ctor_set(x_127, 0, x_122); +lean_ctor_set(x_127, 1, x_123); +lean_ctor_set(x_127, 2, x_124); +lean_ctor_set(x_127, 3, x_126); +x_128 = lean_unsigned_to_nat(0u); +x_129 = l_Array_iterateMAux___main___at_Lean_mkAppN___spec__1(x_4, x_4, x_128, x_1); lean_dec(x_4); -x_126 = lean_alloc_ctor(14, 3, 0); -lean_ctor_set(x_126, 0, x_125); -lean_ctor_set(x_126, 1, x_98); -lean_ctor_set(x_126, 2, x_123); -x_127 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_127, 0, x_126); -lean_ctor_set(x_127, 1, x_117); -return x_127; +x_130 = lean_alloc_ctor(14, 3, 0); +lean_ctor_set(x_130, 0, x_129); +lean_ctor_set(x_130, 1, x_112); +lean_ctor_set(x_130, 2, x_127); +lean_ctor_set_tag(x_116, 1); +lean_ctor_set(x_116, 0, x_130); +return x_116; +} +else +{ +lean_object* x_131; lean_object* x_132; lean_object* x_133; lean_object* x_134; lean_object* x_135; lean_object* x_136; lean_object* x_137; lean_object* x_138; lean_object* x_139; lean_object* x_140; lean_object* x_141; +x_131 = lean_ctor_get(x_116, 1); +lean_inc(x_131); +lean_dec(x_116); +x_132 = lean_ctor_get(x_131, 0); +lean_inc(x_132); +x_133 = lean_ctor_get(x_131, 1); +lean_inc(x_133); +x_134 = lean_ctor_get(x_8, 1); +lean_inc(x_134); +x_135 = lean_ctor_get(x_8, 0); +lean_inc(x_135); +lean_dec(x_8); +x_136 = lean_ctor_get(x_135, 0); +lean_inc(x_136); +lean_dec(x_135); +x_137 = lean_alloc_ctor(0, 4, 0); +lean_ctor_set(x_137, 0, x_132); +lean_ctor_set(x_137, 1, x_133); +lean_ctor_set(x_137, 2, x_134); +lean_ctor_set(x_137, 3, x_136); +x_138 = lean_unsigned_to_nat(0u); +x_139 = l_Array_iterateMAux___main___at_Lean_mkAppN___spec__1(x_4, x_4, x_138, x_1); +lean_dec(x_4); +x_140 = lean_alloc_ctor(14, 3, 0); +lean_ctor_set(x_140, 0, x_139); +lean_ctor_set(x_140, 1, x_112); +lean_ctor_set(x_140, 2, x_137); +x_141 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_141, 0, x_140); +lean_ctor_set(x_141, 1, x_131); +return x_141; } } else { -lean_object* x_128; lean_object* x_129; lean_object* x_130; lean_object* x_131; -x_128 = lean_ctor_get(x_102, 1); -lean_inc(x_128); -lean_dec(x_102); -x_129 = lean_unsigned_to_nat(1u); -x_130 = lean_nat_add(x_3, x_129); +lean_object* x_142; lean_object* x_143; lean_object* x_144; lean_object* x_145; +x_142 = lean_ctor_get(x_116, 1); +lean_inc(x_142); +lean_dec(x_116); +x_143 = lean_unsigned_to_nat(1u); +x_144 = lean_nat_add(x_3, x_143); lean_dec(x_3); -x_131 = lean_array_push(x_4, x_98); -x_3 = x_130; -x_4 = x_131; -x_7 = x_69; -x_9 = x_128; +x_145 = lean_array_push(x_4, x_112); +x_3 = x_144; +x_4 = x_145; +x_7 = x_83; +x_9 = x_142; goto _start; } } else { -uint8_t x_133; -lean_dec(x_98); -lean_dec(x_69); +uint8_t x_147; +lean_dec(x_112); +lean_dec(x_83); lean_dec(x_8); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_3); lean_dec(x_1); -x_133 = !lean_is_exclusive(x_102); -if (x_133 == 0) +x_147 = !lean_is_exclusive(x_116); +if (x_147 == 0) { -return x_102; +return x_116; } else { -lean_object* x_134; lean_object* x_135; lean_object* x_136; -x_134 = lean_ctor_get(x_102, 0); -x_135 = lean_ctor_get(x_102, 1); -lean_inc(x_135); -lean_inc(x_134); -lean_dec(x_102); -x_136 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_136, 0, x_134); -lean_ctor_set(x_136, 1, x_135); -return x_136; +lean_object* x_148; lean_object* x_149; lean_object* x_150; +x_148 = lean_ctor_get(x_116, 0); +x_149 = lean_ctor_get(x_116, 1); +lean_inc(x_149); +lean_inc(x_148); +lean_dec(x_116); +x_150 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_150, 0, x_148); +lean_ctor_set(x_150, 1, x_149); +return x_150; } } } else { -uint8_t x_137; -lean_dec(x_98); -lean_dec(x_72); -lean_dec(x_69); +uint8_t x_151; +lean_dec(x_112); +lean_dec(x_86); +lean_dec(x_83); lean_dec(x_8); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_3); lean_dec(x_1); -x_137 = !lean_is_exclusive(x_99); -if (x_137 == 0) +x_151 = !lean_is_exclusive(x_113); +if (x_151 == 0) { -return x_99; +return x_113; } else { -lean_object* x_138; lean_object* x_139; lean_object* x_140; -x_138 = lean_ctor_get(x_99, 0); -x_139 = lean_ctor_get(x_99, 1); -lean_inc(x_139); -lean_inc(x_138); -lean_dec(x_99); -x_140 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_140, 0, x_138); -lean_ctor_set(x_140, 1, x_139); -return x_140; +lean_object* x_152; lean_object* x_153; lean_object* x_154; +x_152 = lean_ctor_get(x_113, 0); +x_153 = lean_ctor_get(x_113, 1); +lean_inc(x_153); +lean_inc(x_152); +lean_dec(x_113); +x_154 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_154, 0, x_152); +lean_ctor_set(x_154, 1, x_153); +return x_154; } } } @@ -7703,12 +8231,12 @@ return x_140; } else { -lean_object* x_141; -x_141 = lean_box(0); -x_10 = x_141; -goto block_66; +lean_object* x_155; +x_155 = lean_box(0); +x_10 = x_155; +goto block_80; } -block_66: +block_80: { lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_dec(x_10); @@ -7739,12 +8267,12 @@ lean_dec(x_18); lean_dec(x_3); if (x_19 == 0) { -lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; 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_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_dec(x_6); lean_dec(x_4); x_20 = lean_unsigned_to_nat(0u); x_21 = l_Array_empty___closed__1; -x_22 = l_Array_iterateMAux___main___at___private_Lean_Meta_AppBuilder_5__mkAppOptMAux___main___spec__1(x_2, x_2, x_20, x_21); +x_22 = l_Array_iterateMAux___main___at___private_Lean_Meta_AppBuilder_6__mkAppOptMAux___main___spec__1(x_2, x_2, x_20, x_21); x_23 = lean_ctor_get(x_16, 0); lean_inc(x_23); x_24 = lean_ctor_get(x_16, 1); @@ -7762,30 +8290,45 @@ lean_ctor_set(x_28, 0, x_23); lean_ctor_set(x_28, 1, x_24); lean_ctor_set(x_28, 2, x_25); lean_ctor_set(x_28, 3, x_27); -x_29 = l_Lean_mkOptionalNode___closed__2; -x_30 = lean_array_push(x_29, x_1); -x_31 = l_Array_iterateMAux___main___at_Array_append___spec__1___rarg(x_22, x_22, x_20, x_30); -lean_dec(x_22); -x_32 = l___private_Lean_Meta_AppBuilder_5__mkAppOptMAux___main___closed__2; -x_33 = l___private_Lean_Meta_AppBuilder_5__mkAppOptMAux___main___closed__3; -x_34 = lean_alloc_ctor(16, 4, 0); +x_29 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_29, 0, x_1); +x_30 = l_Lean_indentExpr(x_29); +x_31 = l___private_Lean_Meta_AppBuilder_6__mkAppOptMAux___main___closed__5; +x_32 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_32, 0, x_31); +lean_ctor_set(x_32, 1, x_30); +x_33 = l_Lean_MessageData_ofList___closed__3; +x_34 = lean_alloc_ctor(9, 2, 0); lean_ctor_set(x_34, 0, x_32); lean_ctor_set(x_34, 1, x_33); -lean_ctor_set(x_34, 2, x_31); -lean_ctor_set(x_34, 3, x_28); +x_35 = l___private_Lean_Meta_AppBuilder_4__mkAppMAux___main___closed__8; +x_36 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_36, 0, x_34); +lean_ctor_set(x_36, 1, x_35); +x_37 = l_Lean_MessageData_coeOfArrayExpr___closed__2; +x_38 = l_Lean_MessageData_arrayExpr_toMessageData___main(x_22, x_20, x_37); +lean_dec(x_22); +x_39 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_39, 0, x_36); +lean_ctor_set(x_39, 1, x_38); +x_40 = l___private_Lean_Meta_AppBuilder_6__mkAppOptMAux___main___closed__2; +x_41 = lean_alloc_ctor(16, 3, 0); +lean_ctor_set(x_41, 0, x_40); +lean_ctor_set(x_41, 1, x_39); +lean_ctor_set(x_41, 2, x_28); lean_ctor_set_tag(x_13, 1); -lean_ctor_set(x_13, 0, x_34); +lean_ctor_set(x_13, 0, x_41); return x_13; } else { -lean_object* x_35; lean_object* x_36; +lean_object* x_42; lean_object* x_43; lean_free_object(x_13); -x_35 = l___private_Lean_Meta_AppBuilder_5__mkAppOptMAux___main___closed__2; -x_36 = l___private_Lean_Meta_AppBuilder_2__mkAppMFinal(x_35, x_1, x_4, x_6, x_8, x_16); +x_42 = l___private_Lean_Meta_AppBuilder_6__mkAppOptMAux___main___closed__2; +x_43 = l___private_Lean_Meta_AppBuilder_3__mkAppMFinal(x_42, x_1, x_4, x_6, x_8, x_16); lean_dec(x_6); lean_dec(x_4); -return x_36; +return x_43; } } else @@ -7799,145 +8342,160 @@ goto _start; } else { -lean_object* x_38; lean_object* x_39; uint8_t x_40; -x_38 = lean_ctor_get(x_13, 0); -x_39 = lean_ctor_get(x_13, 1); -lean_inc(x_39); -lean_inc(x_38); +lean_object* x_45; lean_object* x_46; uint8_t x_47; +x_45 = lean_ctor_get(x_13, 0); +x_46 = lean_ctor_get(x_13, 1); +lean_inc(x_46); +lean_inc(x_45); lean_dec(x_13); -x_40 = l_Lean_Expr_isForall(x_38); -if (x_40 == 0) +x_47 = l_Lean_Expr_isForall(x_45); +if (x_47 == 0) { -lean_object* x_41; uint8_t x_42; -lean_dec(x_38); +lean_object* x_48; uint8_t x_49; +lean_dec(x_45); lean_dec(x_11); -x_41 = lean_array_get_size(x_2); -x_42 = lean_nat_dec_eq(x_3, x_41); -lean_dec(x_41); +x_48 = lean_array_get_size(x_2); +x_49 = lean_nat_dec_eq(x_3, x_48); +lean_dec(x_48); lean_dec(x_3); -if (x_42 == 0) +if (x_49 == 0) { -lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_object* x_51; lean_object* x_52; lean_object* x_53; lean_object* x_54; lean_object* x_55; lean_object* x_56; lean_object* x_57; lean_object* x_58; +lean_object* x_50; lean_object* x_51; lean_object* x_52; lean_object* x_53; lean_object* x_54; lean_object* x_55; lean_object* x_56; lean_object* x_57; lean_object* x_58; lean_object* x_59; lean_object* x_60; lean_object* x_61; lean_object* x_62; lean_object* x_63; lean_object* x_64; 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_dec(x_6); lean_dec(x_4); -x_43 = lean_unsigned_to_nat(0u); -x_44 = l_Array_empty___closed__1; -x_45 = l_Array_iterateMAux___main___at___private_Lean_Meta_AppBuilder_5__mkAppOptMAux___main___spec__1(x_2, x_2, x_43, x_44); -x_46 = lean_ctor_get(x_39, 0); -lean_inc(x_46); -x_47 = lean_ctor_get(x_39, 1); -lean_inc(x_47); -x_48 = lean_ctor_get(x_8, 1); -lean_inc(x_48); -x_49 = lean_ctor_get(x_8, 0); -lean_inc(x_49); +x_50 = lean_unsigned_to_nat(0u); +x_51 = l_Array_empty___closed__1; +x_52 = l_Array_iterateMAux___main___at___private_Lean_Meta_AppBuilder_6__mkAppOptMAux___main___spec__1(x_2, x_2, x_50, x_51); +x_53 = lean_ctor_get(x_46, 0); +lean_inc(x_53); +x_54 = lean_ctor_get(x_46, 1); +lean_inc(x_54); +x_55 = lean_ctor_get(x_8, 1); +lean_inc(x_55); +x_56 = lean_ctor_get(x_8, 0); +lean_inc(x_56); lean_dec(x_8); -x_50 = lean_ctor_get(x_49, 0); -lean_inc(x_50); -lean_dec(x_49); -x_51 = lean_alloc_ctor(0, 4, 0); -lean_ctor_set(x_51, 0, x_46); -lean_ctor_set(x_51, 1, x_47); -lean_ctor_set(x_51, 2, x_48); -lean_ctor_set(x_51, 3, x_50); -x_52 = l_Lean_mkOptionalNode___closed__2; -x_53 = lean_array_push(x_52, x_1); -x_54 = l_Array_iterateMAux___main___at_Array_append___spec__1___rarg(x_45, x_45, x_43, x_53); -lean_dec(x_45); -x_55 = l___private_Lean_Meta_AppBuilder_5__mkAppOptMAux___main___closed__2; -x_56 = l___private_Lean_Meta_AppBuilder_5__mkAppOptMAux___main___closed__3; -x_57 = lean_alloc_ctor(16, 4, 0); -lean_ctor_set(x_57, 0, x_55); -lean_ctor_set(x_57, 1, x_56); -lean_ctor_set(x_57, 2, x_54); -lean_ctor_set(x_57, 3, x_51); -x_58 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_58, 0, x_57); -lean_ctor_set(x_58, 1, x_39); -return x_58; +x_57 = lean_ctor_get(x_56, 0); +lean_inc(x_57); +lean_dec(x_56); +x_58 = lean_alloc_ctor(0, 4, 0); +lean_ctor_set(x_58, 0, x_53); +lean_ctor_set(x_58, 1, x_54); +lean_ctor_set(x_58, 2, x_55); +lean_ctor_set(x_58, 3, x_57); +x_59 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_59, 0, x_1); +x_60 = l_Lean_indentExpr(x_59); +x_61 = l___private_Lean_Meta_AppBuilder_6__mkAppOptMAux___main___closed__5; +x_62 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_62, 0, x_61); +lean_ctor_set(x_62, 1, x_60); +x_63 = l_Lean_MessageData_ofList___closed__3; +x_64 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_64, 0, x_62); +lean_ctor_set(x_64, 1, x_63); +x_65 = l___private_Lean_Meta_AppBuilder_4__mkAppMAux___main___closed__8; +x_66 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_66, 0, x_64); +lean_ctor_set(x_66, 1, x_65); +x_67 = l_Lean_MessageData_coeOfArrayExpr___closed__2; +x_68 = l_Lean_MessageData_arrayExpr_toMessageData___main(x_52, x_50, x_67); +lean_dec(x_52); +x_69 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_69, 0, x_66); +lean_ctor_set(x_69, 1, x_68); +x_70 = l___private_Lean_Meta_AppBuilder_6__mkAppOptMAux___main___closed__2; +x_71 = lean_alloc_ctor(16, 3, 0); +lean_ctor_set(x_71, 0, x_70); +lean_ctor_set(x_71, 1, x_69); +lean_ctor_set(x_71, 2, x_58); +x_72 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_72, 0, x_71); +lean_ctor_set(x_72, 1, x_46); +return x_72; } else { -lean_object* x_59; lean_object* x_60; -x_59 = l___private_Lean_Meta_AppBuilder_5__mkAppOptMAux___main___closed__2; -x_60 = l___private_Lean_Meta_AppBuilder_2__mkAppMFinal(x_59, x_1, x_4, x_6, x_8, x_39); +lean_object* x_73; lean_object* x_74; +x_73 = l___private_Lean_Meta_AppBuilder_6__mkAppOptMAux___main___closed__2; +x_74 = l___private_Lean_Meta_AppBuilder_3__mkAppMFinal(x_73, x_1, x_4, x_6, x_8, x_46); lean_dec(x_6); lean_dec(x_4); -return x_60; +return x_74; } } else { x_5 = x_11; -x_7 = x_38; -x_9 = x_39; +x_7 = x_45; +x_9 = x_46; goto _start; } } } else { -uint8_t x_62; +uint8_t x_76; lean_dec(x_11); lean_dec(x_8); lean_dec(x_6); lean_dec(x_4); lean_dec(x_3); lean_dec(x_1); -x_62 = !lean_is_exclusive(x_13); -if (x_62 == 0) +x_76 = !lean_is_exclusive(x_13); +if (x_76 == 0) { return x_13; } else { -lean_object* x_63; lean_object* x_64; lean_object* x_65; -x_63 = lean_ctor_get(x_13, 0); -x_64 = lean_ctor_get(x_13, 1); -lean_inc(x_64); -lean_inc(x_63); +lean_object* x_77; lean_object* x_78; lean_object* x_79; +x_77 = lean_ctor_get(x_13, 0); +x_78 = lean_ctor_get(x_13, 1); +lean_inc(x_78); +lean_inc(x_77); lean_dec(x_13); -x_65 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_65, 0, x_63); -lean_ctor_set(x_65, 1, x_64); -return x_65; +x_79 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_79, 0, x_77); +lean_ctor_set(x_79, 1, x_78); +return x_79; } } } } } -lean_object* l_Array_iterateMAux___main___at___private_Lean_Meta_AppBuilder_5__mkAppOptMAux___main___spec__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +lean_object* l_Array_iterateMAux___main___at___private_Lean_Meta_AppBuilder_6__mkAppOptMAux___main___spec__1___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_Array_iterateMAux___main___at___private_Lean_Meta_AppBuilder_5__mkAppOptMAux___main___spec__1(x_1, x_2, x_3, x_4); +x_5 = l_Array_iterateMAux___main___at___private_Lean_Meta_AppBuilder_6__mkAppOptMAux___main___spec__1(x_1, x_2, x_3, x_4); lean_dec(x_2); lean_dec(x_1); return x_5; } } -lean_object* l___private_Lean_Meta_AppBuilder_5__mkAppOptMAux___main___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9) { +lean_object* l___private_Lean_Meta_AppBuilder_6__mkAppOptMAux___main___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9) { _start: { lean_object* x_10; -x_10 = l___private_Lean_Meta_AppBuilder_5__mkAppOptMAux___main(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9); +x_10 = l___private_Lean_Meta_AppBuilder_6__mkAppOptMAux___main(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9); lean_dec(x_2); return x_10; } } -lean_object* l___private_Lean_Meta_AppBuilder_5__mkAppOptMAux(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9) { +lean_object* l___private_Lean_Meta_AppBuilder_6__mkAppOptMAux(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9) { _start: { lean_object* x_10; -x_10 = l___private_Lean_Meta_AppBuilder_5__mkAppOptMAux___main(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9); +x_10 = l___private_Lean_Meta_AppBuilder_6__mkAppOptMAux___main(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9); return x_10; } } -lean_object* l___private_Lean_Meta_AppBuilder_5__mkAppOptMAux___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9) { +lean_object* l___private_Lean_Meta_AppBuilder_6__mkAppOptMAux___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9) { _start: { lean_object* x_10; -x_10 = l___private_Lean_Meta_AppBuilder_5__mkAppOptMAux(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9); +x_10 = l___private_Lean_Meta_AppBuilder_6__mkAppOptMAux(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9); lean_dec(x_2); return x_10; } @@ -7995,7 +8553,7 @@ lean_ctor_set_uint8(x_8, sizeof(void*)*1, x_12); lean_inc(x_10); x_13 = l_Lean_MetavarContext_incDepth(x_10); lean_ctor_set(x_6, 1, x_13); -x_14 = l___private_Lean_Meta_AppBuilder_4__mkFun(x_1, x_3, x_6); +x_14 = l___private_Lean_Meta_AppBuilder_5__mkFun(x_1, x_3, x_6); if (lean_obj_tag(x_14) == 0) { lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; @@ -8011,7 +8569,7 @@ lean_inc(x_18); lean_dec(x_15); x_19 = lean_unsigned_to_nat(0u); x_20 = l_Array_empty___closed__1; -x_21 = l___private_Lean_Meta_AppBuilder_5__mkAppOptMAux___main(x_17, x_2, x_19, x_20, x_19, x_20, x_18, x_3, x_16); +x_21 = l___private_Lean_Meta_AppBuilder_6__mkAppOptMAux___main(x_17, x_2, x_19, x_20, x_19, x_20, x_18, x_3, x_16); if (lean_obj_tag(x_21) == 0) { lean_object* x_22; lean_object* x_23; uint8_t x_24; @@ -8451,7 +9009,7 @@ lean_inc(x_109); x_114 = l_Lean_MetavarContext_incDepth(x_109); lean_ctor_set(x_6, 4, x_113); lean_ctor_set(x_6, 1, x_114); -x_115 = l___private_Lean_Meta_AppBuilder_4__mkFun(x_1, x_3, x_6); +x_115 = l___private_Lean_Meta_AppBuilder_5__mkFun(x_1, x_3, x_6); if (lean_obj_tag(x_115) == 0) { 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; @@ -8467,7 +9025,7 @@ lean_inc(x_119); lean_dec(x_116); x_120 = lean_unsigned_to_nat(0u); x_121 = l_Array_empty___closed__1; -x_122 = l___private_Lean_Meta_AppBuilder_5__mkAppOptMAux___main(x_118, x_2, x_120, x_121, x_120, x_121, x_119, x_3, x_117); +x_122 = l___private_Lean_Meta_AppBuilder_6__mkAppOptMAux___main(x_118, x_2, x_120, x_121, x_120, x_121, x_119, x_3, x_117); if (lean_obj_tag(x_122) == 0) { 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; lean_object* x_135; lean_object* x_136; @@ -8734,7 +9292,7 @@ lean_ctor_set(x_177, 2, x_168); lean_ctor_set(x_177, 3, x_169); lean_ctor_set(x_177, 4, x_175); lean_ctor_set(x_177, 5, x_170); -x_178 = l___private_Lean_Meta_AppBuilder_4__mkFun(x_1, x_3, x_177); +x_178 = l___private_Lean_Meta_AppBuilder_5__mkFun(x_1, x_3, x_177); if (lean_obj_tag(x_178) == 0) { 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; @@ -8750,7 +9308,7 @@ lean_inc(x_182); lean_dec(x_179); x_183 = lean_unsigned_to_nat(0u); x_184 = l_Array_empty___closed__1; -x_185 = l___private_Lean_Meta_AppBuilder_5__mkAppOptMAux___main(x_181, x_2, x_183, x_184, x_183, x_184, x_182, x_3, x_180); +x_185 = l___private_Lean_Meta_AppBuilder_6__mkAppOptMAux___main(x_181, x_2, x_183, x_184, x_183, x_184, x_182, x_3, x_180); if (lean_obj_tag(x_185) == 0) { 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; @@ -8991,7 +9549,7 @@ x_232 = lean_ctor_get(x_229, 1); lean_inc(x_232); x_233 = l_Lean_MetavarContext_incDepth(x_232); lean_ctor_set(x_229, 1, x_233); -x_234 = l___private_Lean_Meta_AppBuilder_4__mkFun(x_1, x_3, x_229); +x_234 = l___private_Lean_Meta_AppBuilder_5__mkFun(x_1, x_3, x_229); if (lean_obj_tag(x_234) == 0) { 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; @@ -9008,7 +9566,7 @@ lean_dec(x_235); x_239 = lean_unsigned_to_nat(0u); x_240 = l_Array_empty___closed__1; lean_inc(x_3); -x_241 = l___private_Lean_Meta_AppBuilder_5__mkAppOptMAux___main(x_237, x_2, x_239, x_240, x_239, x_240, x_238, x_3, x_236); +x_241 = l___private_Lean_Meta_AppBuilder_6__mkAppOptMAux___main(x_237, x_2, x_239, x_240, x_239, x_240, x_238, x_3, x_236); if (lean_obj_tag(x_241) == 0) { lean_object* x_242; lean_object* x_243; uint8_t x_244; @@ -9289,7 +9847,7 @@ lean_ctor_set(x_312, 2, x_307); lean_ctor_set(x_312, 3, x_308); lean_ctor_set(x_312, 4, x_309); lean_ctor_set(x_312, 5, x_310); -x_313 = l___private_Lean_Meta_AppBuilder_4__mkFun(x_1, x_3, x_312); +x_313 = l___private_Lean_Meta_AppBuilder_5__mkFun(x_1, x_3, x_312); if (lean_obj_tag(x_313) == 0) { lean_object* x_314; lean_object* x_315; lean_object* x_316; lean_object* x_317; lean_object* x_318; lean_object* x_319; lean_object* x_320; @@ -9306,7 +9864,7 @@ lean_dec(x_314); x_318 = lean_unsigned_to_nat(0u); x_319 = l_Array_empty___closed__1; lean_inc(x_3); -x_320 = l___private_Lean_Meta_AppBuilder_5__mkAppOptMAux___main(x_316, x_2, x_318, x_319, x_318, x_319, x_317, x_3, x_315); +x_320 = l___private_Lean_Meta_AppBuilder_6__mkAppOptMAux___main(x_316, x_2, x_318, x_319, x_318, x_319, x_317, x_3, x_315); if (lean_obj_tag(x_320) == 0) { 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; lean_object* x_329; lean_object* x_330; lean_object* x_331; lean_object* x_332; lean_object* x_333; lean_object* x_334; @@ -9543,6 +10101,26 @@ lean_object* _init_l_Lean_Meta_mkEqNDRec___closed__4() { _start: { lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Meta_mkEqNDRec___closed__3; +x_2 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* _init_l_Lean_Meta_mkEqNDRec___closed__5() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Meta_mkEqNDRec___closed__4; +x_2 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* _init_l_Lean_Meta_mkEqNDRec___closed__6() { +_start: +{ +lean_object* x_1; lean_object* x_2; x_1 = lean_unsigned_to_nat(6u); x_2 = lean_mk_empty_array_with_capacity(x_1); return x_2; @@ -9575,7 +10153,6 @@ x_14 = l_Lean_Expr_isAppOfArity___main(x_10, x_12, x_13); if (x_14 == 0) { lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; -lean_dec(x_10); lean_dec(x_2); lean_dec(x_1); x_15 = lean_ctor_get(x_11, 0); @@ -9595,15 +10172,16 @@ lean_ctor_set(x_20, 0, x_15); lean_ctor_set(x_20, 1, x_16); lean_ctor_set(x_20, 2, x_17); lean_ctor_set(x_20, 3, x_19); -x_21 = l_Lean_mkOptionalNode___closed__2; -x_22 = lean_array_push(x_21, x_3); -x_23 = l_Lean_Meta_mkEqNDRec___closed__2; -x_24 = l_Lean_Meta_mkEqSymm___closed__3; -x_25 = lean_alloc_ctor(16, 4, 0); -lean_ctor_set(x_25, 0, x_23); -lean_ctor_set(x_25, 1, x_24); -lean_ctor_set(x_25, 2, x_22); -lean_ctor_set(x_25, 3, x_20); +x_21 = l___private_Lean_Meta_AppBuilder_2__hasTypeMsg(x_3, x_10); +x_22 = l_Lean_Meta_mkEqSymm___closed__5; +x_23 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_23, 0, x_22); +lean_ctor_set(x_23, 1, x_21); +x_24 = l_Lean_Meta_mkEqNDRec___closed__2; +x_25 = lean_alloc_ctor(16, 3, 0); +lean_ctor_set(x_25, 0, x_24); +lean_ctor_set(x_25, 1, x_23); +lean_ctor_set(x_25, 2, x_20); lean_ctor_set_tag(x_8, 1); lean_ctor_set(x_8, 0, x_25); return x_8; @@ -9652,61 +10230,45 @@ if (lean_is_exclusive(x_35)) { } if (lean_obj_tag(x_36) == 7) { -lean_object* x_53; -x_53 = lean_ctor_get(x_36, 2); -lean_inc(x_53); +lean_object* x_54; +x_54 = lean_ctor_get(x_36, 2); +lean_inc(x_54); lean_dec(x_36); -if (lean_obj_tag(x_53) == 3) +if (lean_obj_tag(x_54) == 3) { -lean_object* x_54; lean_object* x_55; lean_object* x_56; lean_object* x_57; lean_object* x_58; lean_object* x_59; lean_object* x_60; lean_object* x_61; lean_object* x_62; lean_object* x_63; lean_object* x_64; lean_object* x_65; lean_object* x_66; lean_object* x_67; lean_object* x_68; +lean_object* x_55; lean_object* x_56; lean_object* x_57; lean_object* x_58; lean_object* x_59; lean_object* x_60; lean_object* x_61; lean_object* x_62; lean_object* x_63; lean_object* x_64; lean_object* x_65; lean_object* x_66; lean_object* x_67; lean_object* x_68; lean_object* x_69; lean_dec(x_38); lean_dec(x_4); -x_54 = lean_ctor_get(x_53, 0); -lean_inc(x_54); -lean_dec(x_53); -x_55 = lean_box(0); -x_56 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_56, 0, x_33); -lean_ctor_set(x_56, 1, x_55); +x_55 = lean_ctor_get(x_54, 0); +lean_inc(x_55); +lean_dec(x_54); +x_56 = lean_box(0); x_57 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_57, 0, x_54); +lean_ctor_set(x_57, 0, x_33); lean_ctor_set(x_57, 1, x_56); -x_58 = l_Lean_Meta_mkEqNDRec___closed__2; -x_59 = l_Lean_mkConst(x_58, x_57); -x_60 = l_Lean_Meta_mkEqNDRec___closed__4; -x_61 = lean_array_push(x_60, x_28); -x_62 = lean_array_push(x_61, x_29); -x_63 = lean_array_push(x_62, x_1); -x_64 = lean_array_push(x_63, x_2); -x_65 = lean_array_push(x_64, x_30); -x_66 = lean_array_push(x_65, x_3); -x_67 = lean_unsigned_to_nat(0u); -x_68 = l_Array_iterateMAux___main___at_Lean_mkAppN___spec__1(x_66, x_66, x_67, x_59); -lean_dec(x_66); +x_58 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_58, 0, x_55); +lean_ctor_set(x_58, 1, x_57); +x_59 = l_Lean_Meta_mkEqNDRec___closed__2; +x_60 = l_Lean_mkConst(x_59, x_58); +x_61 = l_Lean_Meta_mkEqNDRec___closed__6; +x_62 = lean_array_push(x_61, x_28); +x_63 = lean_array_push(x_62, x_29); +x_64 = lean_array_push(x_63, x_1); +x_65 = lean_array_push(x_64, x_2); +x_66 = lean_array_push(x_65, x_30); +x_67 = lean_array_push(x_66, x_3); +x_68 = lean_unsigned_to_nat(0u); +x_69 = l_Array_iterateMAux___main___at_Lean_mkAppN___spec__1(x_67, x_67, x_68, x_60); +lean_dec(x_67); lean_ctor_set(x_31, 1, x_37); -lean_ctor_set(x_31, 0, x_68); +lean_ctor_set(x_31, 0, x_69); return x_31; } else { -lean_object* x_69; -lean_dec(x_53); -lean_free_object(x_31); -lean_dec(x_33); -lean_dec(x_30); -lean_dec(x_29); -lean_dec(x_28); -lean_dec(x_3); -lean_dec(x_2); -x_69 = lean_box(0); -x_39 = x_69; -goto block_52; -} -} -else -{ lean_object* x_70; -lean_dec(x_36); +lean_dec(x_54); lean_free_object(x_31); lean_dec(x_33); lean_dec(x_30); @@ -9716,11 +10278,27 @@ lean_dec(x_3); lean_dec(x_2); x_70 = lean_box(0); x_39 = x_70; -goto block_52; +goto block_53; } -block_52: +} +else { -lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; 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_71; +lean_dec(x_36); +lean_free_object(x_31); +lean_dec(x_33); +lean_dec(x_30); +lean_dec(x_29); +lean_dec(x_28); +lean_dec(x_3); +lean_dec(x_2); +x_71 = lean_box(0); +x_39 = x_71; +goto block_53; +} +block_53: +{ +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_dec(x_39); x_40 = lean_ctor_get(x_37, 0); lean_inc(x_40); @@ -9739,29 +10317,32 @@ lean_ctor_set(x_45, 0, x_40); lean_ctor_set(x_45, 1, x_41); lean_ctor_set(x_45, 2, x_42); lean_ctor_set(x_45, 3, x_44); -x_46 = l_Lean_mkOptionalNode___closed__2; -x_47 = lean_array_push(x_46, x_1); -x_48 = l_Lean_Meta_mkEqNDRec___closed__2; -x_49 = l_Lean_Meta_mkEqNDRec___closed__3; -x_50 = lean_alloc_ctor(16, 4, 0); -lean_ctor_set(x_50, 0, x_48); -lean_ctor_set(x_50, 1, x_49); -lean_ctor_set(x_50, 2, x_47); -lean_ctor_set(x_50, 3, x_45); -if (lean_is_scalar(x_38)) { - x_51 = lean_alloc_ctor(1, 2, 0); -} else { - x_51 = x_38; - lean_ctor_set_tag(x_51, 1); -} +x_46 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_46, 0, x_1); +x_47 = l_Lean_indentExpr(x_46); +x_48 = l_Lean_Meta_mkEqNDRec___closed__5; +x_49 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_49, 0, x_48); +lean_ctor_set(x_49, 1, x_47); +x_50 = l_Lean_Meta_mkEqNDRec___closed__2; +x_51 = lean_alloc_ctor(16, 3, 0); lean_ctor_set(x_51, 0, x_50); -lean_ctor_set(x_51, 1, x_37); -return x_51; +lean_ctor_set(x_51, 1, x_49); +lean_ctor_set(x_51, 2, x_45); +if (lean_is_scalar(x_38)) { + x_52 = lean_alloc_ctor(1, 2, 0); +} else { + x_52 = x_38; + lean_ctor_set_tag(x_52, 1); +} +lean_ctor_set(x_52, 0, x_51); +lean_ctor_set(x_52, 1, x_37); +return x_52; } } else { -uint8_t x_71; +uint8_t x_72; lean_free_object(x_31); lean_dec(x_33); lean_dec(x_30); @@ -9771,164 +10352,167 @@ lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); -x_71 = !lean_is_exclusive(x_35); -if (x_71 == 0) +x_72 = !lean_is_exclusive(x_35); +if (x_72 == 0) { return x_35; } else { -lean_object* x_72; lean_object* x_73; lean_object* x_74; -x_72 = lean_ctor_get(x_35, 0); -x_73 = lean_ctor_get(x_35, 1); +lean_object* x_73; lean_object* x_74; lean_object* x_75; +x_73 = lean_ctor_get(x_35, 0); +x_74 = lean_ctor_get(x_35, 1); +lean_inc(x_74); lean_inc(x_73); -lean_inc(x_72); lean_dec(x_35); -x_74 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_74, 0, x_72); -lean_ctor_set(x_74, 1, x_73); -return x_74; +x_75 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_75, 0, x_73); +lean_ctor_set(x_75, 1, x_74); +return x_75; } } } else { -lean_object* x_75; lean_object* x_76; lean_object* x_77; -x_75 = lean_ctor_get(x_31, 0); -x_76 = lean_ctor_get(x_31, 1); +lean_object* x_76; lean_object* x_77; lean_object* x_78; +x_76 = lean_ctor_get(x_31, 0); +x_77 = lean_ctor_get(x_31, 1); +lean_inc(x_77); lean_inc(x_76); -lean_inc(x_75); lean_dec(x_31); lean_inc(x_4); lean_inc(x_1); -x_77 = l___private_Lean_Meta_AppBuilder_1__infer(x_1, x_4, x_76); -if (lean_obj_tag(x_77) == 0) +x_78 = l___private_Lean_Meta_AppBuilder_1__infer(x_1, x_4, x_77); +if (lean_obj_tag(x_78) == 0) { -lean_object* x_78; lean_object* x_79; lean_object* x_80; lean_object* x_81; -x_78 = lean_ctor_get(x_77, 0); -lean_inc(x_78); -x_79 = lean_ctor_get(x_77, 1); +lean_object* x_79; lean_object* x_80; lean_object* x_81; lean_object* x_82; +x_79 = lean_ctor_get(x_78, 0); lean_inc(x_79); -if (lean_is_exclusive(x_77)) { - lean_ctor_release(x_77, 0); - lean_ctor_release(x_77, 1); - x_80 = x_77; +x_80 = lean_ctor_get(x_78, 1); +lean_inc(x_80); +if (lean_is_exclusive(x_78)) { + lean_ctor_release(x_78, 0); + lean_ctor_release(x_78, 1); + x_81 = x_78; } else { - lean_dec_ref(x_77); - x_80 = lean_box(0); + lean_dec_ref(x_78); + x_81 = lean_box(0); } -if (lean_obj_tag(x_78) == 7) +if (lean_obj_tag(x_79) == 7) { -lean_object* x_95; -x_95 = lean_ctor_get(x_78, 2); -lean_inc(x_95); -lean_dec(x_78); -if (lean_obj_tag(x_95) == 3) +lean_object* x_97; +x_97 = lean_ctor_get(x_79, 2); +lean_inc(x_97); +lean_dec(x_79); +if (lean_obj_tag(x_97) == 3) { -lean_object* x_96; lean_object* x_97; lean_object* x_98; lean_object* x_99; lean_object* x_100; lean_object* x_101; lean_object* x_102; lean_object* x_103; lean_object* x_104; lean_object* x_105; lean_object* x_106; lean_object* x_107; lean_object* x_108; lean_object* x_109; lean_object* x_110; lean_object* x_111; -lean_dec(x_80); -lean_dec(x_4); -x_96 = lean_ctor_get(x_95, 0); -lean_inc(x_96); -lean_dec(x_95); -x_97 = lean_box(0); -x_98 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_98, 0, x_75); -lean_ctor_set(x_98, 1, x_97); -x_99 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_99, 0, x_96); -lean_ctor_set(x_99, 1, x_98); -x_100 = l_Lean_Meta_mkEqNDRec___closed__2; -x_101 = l_Lean_mkConst(x_100, x_99); -x_102 = l_Lean_Meta_mkEqNDRec___closed__4; -x_103 = lean_array_push(x_102, x_28); -x_104 = lean_array_push(x_103, x_29); -x_105 = lean_array_push(x_104, x_1); -x_106 = lean_array_push(x_105, x_2); -x_107 = lean_array_push(x_106, x_30); -x_108 = lean_array_push(x_107, x_3); -x_109 = lean_unsigned_to_nat(0u); -x_110 = l_Array_iterateMAux___main___at_Lean_mkAppN___spec__1(x_108, x_108, x_109, x_101); -lean_dec(x_108); -x_111 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_111, 0, x_110); -lean_ctor_set(x_111, 1, x_79); -return x_111; -} -else -{ -lean_object* x_112; -lean_dec(x_95); -lean_dec(x_75); -lean_dec(x_30); -lean_dec(x_29); -lean_dec(x_28); -lean_dec(x_3); -lean_dec(x_2); -x_112 = lean_box(0); -x_81 = x_112; -goto block_94; -} -} -else -{ -lean_object* x_113; -lean_dec(x_78); -lean_dec(x_75); -lean_dec(x_30); -lean_dec(x_29); -lean_dec(x_28); -lean_dec(x_3); -lean_dec(x_2); -x_113 = lean_box(0); -x_81 = x_113; -goto block_94; -} -block_94: -{ -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_98; lean_object* x_99; lean_object* x_100; lean_object* x_101; lean_object* x_102; lean_object* x_103; lean_object* x_104; lean_object* x_105; lean_object* x_106; lean_object* x_107; lean_object* x_108; lean_object* x_109; lean_object* x_110; lean_object* x_111; lean_object* x_112; lean_object* x_113; lean_dec(x_81); -x_82 = lean_ctor_get(x_79, 0); -lean_inc(x_82); -x_83 = lean_ctor_get(x_79, 1); +lean_dec(x_4); +x_98 = lean_ctor_get(x_97, 0); +lean_inc(x_98); +lean_dec(x_97); +x_99 = lean_box(0); +x_100 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_100, 0, x_76); +lean_ctor_set(x_100, 1, x_99); +x_101 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_101, 0, x_98); +lean_ctor_set(x_101, 1, x_100); +x_102 = l_Lean_Meta_mkEqNDRec___closed__2; +x_103 = l_Lean_mkConst(x_102, x_101); +x_104 = l_Lean_Meta_mkEqNDRec___closed__6; +x_105 = lean_array_push(x_104, x_28); +x_106 = lean_array_push(x_105, x_29); +x_107 = lean_array_push(x_106, x_1); +x_108 = lean_array_push(x_107, x_2); +x_109 = lean_array_push(x_108, x_30); +x_110 = lean_array_push(x_109, x_3); +x_111 = lean_unsigned_to_nat(0u); +x_112 = l_Array_iterateMAux___main___at_Lean_mkAppN___spec__1(x_110, x_110, x_111, x_103); +lean_dec(x_110); +x_113 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_113, 0, x_112); +lean_ctor_set(x_113, 1, x_80); +return x_113; +} +else +{ +lean_object* x_114; +lean_dec(x_97); +lean_dec(x_76); +lean_dec(x_30); +lean_dec(x_29); +lean_dec(x_28); +lean_dec(x_3); +lean_dec(x_2); +x_114 = lean_box(0); +x_82 = x_114; +goto block_96; +} +} +else +{ +lean_object* x_115; +lean_dec(x_79); +lean_dec(x_76); +lean_dec(x_30); +lean_dec(x_29); +lean_dec(x_28); +lean_dec(x_3); +lean_dec(x_2); +x_115 = lean_box(0); +x_82 = x_115; +goto block_96; +} +block_96: +{ +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_dec(x_82); +x_83 = lean_ctor_get(x_80, 0); lean_inc(x_83); -x_84 = lean_ctor_get(x_4, 1); +x_84 = lean_ctor_get(x_80, 1); lean_inc(x_84); -x_85 = lean_ctor_get(x_4, 0); +x_85 = lean_ctor_get(x_4, 1); lean_inc(x_85); -lean_dec(x_4); -x_86 = lean_ctor_get(x_85, 0); +x_86 = lean_ctor_get(x_4, 0); lean_inc(x_86); -lean_dec(x_85); -x_87 = lean_alloc_ctor(0, 4, 0); -lean_ctor_set(x_87, 0, x_82); -lean_ctor_set(x_87, 1, x_83); -lean_ctor_set(x_87, 2, x_84); -lean_ctor_set(x_87, 3, x_86); -x_88 = l_Lean_mkOptionalNode___closed__2; -x_89 = lean_array_push(x_88, x_1); -x_90 = l_Lean_Meta_mkEqNDRec___closed__2; -x_91 = l_Lean_Meta_mkEqNDRec___closed__3; -x_92 = lean_alloc_ctor(16, 4, 0); -lean_ctor_set(x_92, 0, x_90); -lean_ctor_set(x_92, 1, x_91); -lean_ctor_set(x_92, 2, x_89); -lean_ctor_set(x_92, 3, x_87); -if (lean_is_scalar(x_80)) { - x_93 = lean_alloc_ctor(1, 2, 0); +lean_dec(x_4); +x_87 = lean_ctor_get(x_86, 0); +lean_inc(x_87); +lean_dec(x_86); +x_88 = lean_alloc_ctor(0, 4, 0); +lean_ctor_set(x_88, 0, x_83); +lean_ctor_set(x_88, 1, x_84); +lean_ctor_set(x_88, 2, x_85); +lean_ctor_set(x_88, 3, x_87); +x_89 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_89, 0, x_1); +x_90 = l_Lean_indentExpr(x_89); +x_91 = l_Lean_Meta_mkEqNDRec___closed__5; +x_92 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_92, 0, x_91); +lean_ctor_set(x_92, 1, x_90); +x_93 = l_Lean_Meta_mkEqNDRec___closed__2; +x_94 = lean_alloc_ctor(16, 3, 0); +lean_ctor_set(x_94, 0, x_93); +lean_ctor_set(x_94, 1, x_92); +lean_ctor_set(x_94, 2, x_88); +if (lean_is_scalar(x_81)) { + x_95 = lean_alloc_ctor(1, 2, 0); } else { - x_93 = x_80; - lean_ctor_set_tag(x_93, 1); + x_95 = x_81; + lean_ctor_set_tag(x_95, 1); } -lean_ctor_set(x_93, 0, x_92); -lean_ctor_set(x_93, 1, x_79); -return x_93; +lean_ctor_set(x_95, 0, x_94); +lean_ctor_set(x_95, 1, x_80); +return x_95; } } else { -lean_object* x_114; lean_object* x_115; lean_object* x_116; lean_object* x_117; -lean_dec(x_75); +lean_object* x_116; lean_object* x_117; lean_object* x_118; lean_object* x_119; +lean_dec(x_76); lean_dec(x_30); lean_dec(x_29); lean_dec(x_28); @@ -9936,32 +10520,32 @@ lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); -x_114 = lean_ctor_get(x_77, 0); -lean_inc(x_114); -x_115 = lean_ctor_get(x_77, 1); -lean_inc(x_115); -if (lean_is_exclusive(x_77)) { - lean_ctor_release(x_77, 0); - lean_ctor_release(x_77, 1); - x_116 = x_77; +x_116 = lean_ctor_get(x_78, 0); +lean_inc(x_116); +x_117 = lean_ctor_get(x_78, 1); +lean_inc(x_117); +if (lean_is_exclusive(x_78)) { + lean_ctor_release(x_78, 0); + lean_ctor_release(x_78, 1); + x_118 = x_78; } else { - lean_dec_ref(x_77); - x_116 = lean_box(0); + lean_dec_ref(x_78); + x_118 = lean_box(0); } -if (lean_is_scalar(x_116)) { - x_117 = lean_alloc_ctor(1, 2, 0); +if (lean_is_scalar(x_118)) { + x_119 = lean_alloc_ctor(1, 2, 0); } else { - x_117 = x_116; + x_119 = x_118; } -lean_ctor_set(x_117, 0, x_114); -lean_ctor_set(x_117, 1, x_115); -return x_117; +lean_ctor_set(x_119, 0, x_116); +lean_ctor_set(x_119, 1, x_117); +return x_119; } } } else { -uint8_t x_118; +uint8_t x_120; lean_dec(x_30); lean_dec(x_29); lean_dec(x_28); @@ -9969,341 +10553,344 @@ lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); -x_118 = !lean_is_exclusive(x_31); -if (x_118 == 0) +x_120 = !lean_is_exclusive(x_31); +if (x_120 == 0) { return x_31; } else { -lean_object* x_119; lean_object* x_120; lean_object* x_121; -x_119 = lean_ctor_get(x_31, 0); -x_120 = lean_ctor_get(x_31, 1); -lean_inc(x_120); -lean_inc(x_119); +lean_object* x_121; lean_object* x_122; lean_object* x_123; +x_121 = lean_ctor_get(x_31, 0); +x_122 = lean_ctor_get(x_31, 1); +lean_inc(x_122); +lean_inc(x_121); lean_dec(x_31); -x_121 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_121, 0, x_119); -lean_ctor_set(x_121, 1, x_120); -return x_121; +x_123 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_123, 0, x_121); +lean_ctor_set(x_123, 1, x_122); +return x_123; } } } } 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_8, 0); -x_123 = lean_ctor_get(x_8, 1); -lean_inc(x_123); -lean_inc(x_122); +lean_object* x_124; lean_object* x_125; lean_object* x_126; lean_object* x_127; uint8_t x_128; +x_124 = lean_ctor_get(x_8, 0); +x_125 = lean_ctor_get(x_8, 1); +lean_inc(x_125); +lean_inc(x_124); lean_dec(x_8); -x_124 = l_Lean_Expr_eq_x3f___closed__2; -x_125 = lean_unsigned_to_nat(3u); -x_126 = l_Lean_Expr_isAppOfArity___main(x_122, x_124, x_125); -if (x_126 == 0) +x_126 = l_Lean_Expr_eq_x3f___closed__2; +x_127 = lean_unsigned_to_nat(3u); +x_128 = l_Lean_Expr_isAppOfArity___main(x_124, x_126, x_127); +if (x_128 == 0) { -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_dec(x_122); +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_dec(x_2); lean_dec(x_1); -x_127 = lean_ctor_get(x_123, 0); -lean_inc(x_127); -x_128 = lean_ctor_get(x_123, 1); -lean_inc(x_128); -x_129 = lean_ctor_get(x_4, 1); +x_129 = lean_ctor_get(x_125, 0); lean_inc(x_129); -x_130 = lean_ctor_get(x_4, 0); +x_130 = lean_ctor_get(x_125, 1); lean_inc(x_130); -lean_dec(x_4); -x_131 = lean_ctor_get(x_130, 0); +x_131 = lean_ctor_get(x_4, 1); lean_inc(x_131); -lean_dec(x_130); -x_132 = lean_alloc_ctor(0, 4, 0); -lean_ctor_set(x_132, 0, x_127); -lean_ctor_set(x_132, 1, x_128); -lean_ctor_set(x_132, 2, x_129); -lean_ctor_set(x_132, 3, x_131); -x_133 = l_Lean_mkOptionalNode___closed__2; -x_134 = lean_array_push(x_133, x_3); -x_135 = l_Lean_Meta_mkEqNDRec___closed__2; -x_136 = l_Lean_Meta_mkEqSymm___closed__3; -x_137 = lean_alloc_ctor(16, 4, 0); -lean_ctor_set(x_137, 0, x_135); -lean_ctor_set(x_137, 1, x_136); -lean_ctor_set(x_137, 2, x_134); -lean_ctor_set(x_137, 3, x_132); -x_138 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_138, 0, x_137); -lean_ctor_set(x_138, 1, x_123); -return x_138; +x_132 = lean_ctor_get(x_4, 0); +lean_inc(x_132); +lean_dec(x_4); +x_133 = lean_ctor_get(x_132, 0); +lean_inc(x_133); +lean_dec(x_132); +x_134 = lean_alloc_ctor(0, 4, 0); +lean_ctor_set(x_134, 0, x_129); +lean_ctor_set(x_134, 1, x_130); +lean_ctor_set(x_134, 2, x_131); +lean_ctor_set(x_134, 3, x_133); +x_135 = l___private_Lean_Meta_AppBuilder_2__hasTypeMsg(x_3, x_124); +x_136 = l_Lean_Meta_mkEqSymm___closed__5; +x_137 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_137, 0, x_136); +lean_ctor_set(x_137, 1, x_135); +x_138 = l_Lean_Meta_mkEqNDRec___closed__2; +x_139 = lean_alloc_ctor(16, 3, 0); +lean_ctor_set(x_139, 0, x_138); +lean_ctor_set(x_139, 1, x_137); +lean_ctor_set(x_139, 2, x_134); +x_140 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_140, 0, x_139); +lean_ctor_set(x_140, 1, x_125); +return x_140; } 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; -x_139 = l_Lean_Expr_appFn_x21(x_122); -x_140 = l_Lean_Expr_appFn_x21(x_139); -x_141 = l_Lean_Expr_appArg_x21(x_140); -lean_dec(x_140); -x_142 = l_Lean_Expr_appArg_x21(x_139); -lean_dec(x_139); -x_143 = l_Lean_Expr_appArg_x21(x_122); -lean_dec(x_122); +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_141 = l_Lean_Expr_appFn_x21(x_124); +x_142 = l_Lean_Expr_appFn_x21(x_141); +x_143 = l_Lean_Expr_appArg_x21(x_142); +lean_dec(x_142); +x_144 = l_Lean_Expr_appArg_x21(x_141); +lean_dec(x_141); +x_145 = l_Lean_Expr_appArg_x21(x_124); +lean_dec(x_124); lean_inc(x_4); -lean_inc(x_141); -x_144 = l_Lean_Meta_getLevel(x_141, x_4, x_123); -if (lean_obj_tag(x_144) == 0) +lean_inc(x_143); +x_146 = l_Lean_Meta_getLevel(x_143, x_4, x_125); +if (lean_obj_tag(x_146) == 0) { -lean_object* x_145; lean_object* x_146; lean_object* x_147; lean_object* x_148; -x_145 = lean_ctor_get(x_144, 0); -lean_inc(x_145); -x_146 = lean_ctor_get(x_144, 1); -lean_inc(x_146); -if (lean_is_exclusive(x_144)) { - lean_ctor_release(x_144, 0); - lean_ctor_release(x_144, 1); - x_147 = x_144; +lean_object* x_147; lean_object* x_148; lean_object* x_149; lean_object* x_150; +x_147 = lean_ctor_get(x_146, 0); +lean_inc(x_147); +x_148 = lean_ctor_get(x_146, 1); +lean_inc(x_148); +if (lean_is_exclusive(x_146)) { + lean_ctor_release(x_146, 0); + lean_ctor_release(x_146, 1); + x_149 = x_146; } else { - lean_dec_ref(x_144); - x_147 = lean_box(0); + lean_dec_ref(x_146); + x_149 = lean_box(0); } lean_inc(x_4); lean_inc(x_1); -x_148 = l___private_Lean_Meta_AppBuilder_1__infer(x_1, x_4, x_146); -if (lean_obj_tag(x_148) == 0) +x_150 = l___private_Lean_Meta_AppBuilder_1__infer(x_1, x_4, x_148); +if (lean_obj_tag(x_150) == 0) { -lean_object* x_149; lean_object* x_150; lean_object* x_151; lean_object* x_152; -x_149 = lean_ctor_get(x_148, 0); -lean_inc(x_149); -x_150 = lean_ctor_get(x_148, 1); -lean_inc(x_150); -if (lean_is_exclusive(x_148)) { - lean_ctor_release(x_148, 0); - lean_ctor_release(x_148, 1); - x_151 = x_148; +lean_object* x_151; lean_object* x_152; lean_object* x_153; lean_object* x_154; +x_151 = lean_ctor_get(x_150, 0); +lean_inc(x_151); +x_152 = lean_ctor_get(x_150, 1); +lean_inc(x_152); +if (lean_is_exclusive(x_150)) { + lean_ctor_release(x_150, 0); + lean_ctor_release(x_150, 1); + x_153 = x_150; } else { - lean_dec_ref(x_148); - x_151 = lean_box(0); + lean_dec_ref(x_150); + x_153 = lean_box(0); } -if (lean_obj_tag(x_149) == 7) +if (lean_obj_tag(x_151) == 7) { -lean_object* x_166; -x_166 = lean_ctor_get(x_149, 2); -lean_inc(x_166); -lean_dec(x_149); -if (lean_obj_tag(x_166) == 3) -{ -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_169; +x_169 = lean_ctor_get(x_151, 2); +lean_inc(x_169); lean_dec(x_151); +if (lean_obj_tag(x_169) == 3) +{ +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_dec(x_153); lean_dec(x_4); -x_167 = lean_ctor_get(x_166, 0); -lean_inc(x_167); -lean_dec(x_166); -x_168 = lean_box(0); -x_169 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_169, 0, x_145); -lean_ctor_set(x_169, 1, x_168); -x_170 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_170, 0, x_167); -lean_ctor_set(x_170, 1, x_169); -x_171 = l_Lean_Meta_mkEqNDRec___closed__2; -x_172 = l_Lean_mkConst(x_171, x_170); -x_173 = l_Lean_Meta_mkEqNDRec___closed__4; -x_174 = lean_array_push(x_173, x_141); -x_175 = lean_array_push(x_174, x_142); -x_176 = lean_array_push(x_175, x_1); -x_177 = lean_array_push(x_176, x_2); -x_178 = lean_array_push(x_177, x_143); -x_179 = lean_array_push(x_178, x_3); -x_180 = lean_unsigned_to_nat(0u); -x_181 = l_Array_iterateMAux___main___at_Lean_mkAppN___spec__1(x_179, x_179, x_180, x_172); -lean_dec(x_179); -if (lean_is_scalar(x_147)) { - x_182 = lean_alloc_ctor(0, 2, 0); +x_170 = lean_ctor_get(x_169, 0); +lean_inc(x_170); +lean_dec(x_169); +x_171 = lean_box(0); +x_172 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_172, 0, x_147); +lean_ctor_set(x_172, 1, x_171); +x_173 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_173, 0, x_170); +lean_ctor_set(x_173, 1, x_172); +x_174 = l_Lean_Meta_mkEqNDRec___closed__2; +x_175 = l_Lean_mkConst(x_174, x_173); +x_176 = l_Lean_Meta_mkEqNDRec___closed__6; +x_177 = lean_array_push(x_176, x_143); +x_178 = lean_array_push(x_177, x_144); +x_179 = lean_array_push(x_178, x_1); +x_180 = lean_array_push(x_179, x_2); +x_181 = lean_array_push(x_180, x_145); +x_182 = lean_array_push(x_181, x_3); +x_183 = lean_unsigned_to_nat(0u); +x_184 = l_Array_iterateMAux___main___at_Lean_mkAppN___spec__1(x_182, x_182, x_183, x_175); +lean_dec(x_182); +if (lean_is_scalar(x_149)) { + x_185 = lean_alloc_ctor(0, 2, 0); } else { - x_182 = x_147; + x_185 = x_149; } -lean_ctor_set(x_182, 0, x_181); -lean_ctor_set(x_182, 1, x_150); -return x_182; +lean_ctor_set(x_185, 0, x_184); +lean_ctor_set(x_185, 1, x_152); +return x_185; } else { -lean_object* x_183; -lean_dec(x_166); -lean_dec(x_147); -lean_dec(x_145); -lean_dec(x_143); -lean_dec(x_142); -lean_dec(x_141); -lean_dec(x_3); -lean_dec(x_2); -x_183 = lean_box(0); -x_152 = x_183; -goto block_165; -} -} -else -{ -lean_object* x_184; +lean_object* x_186; +lean_dec(x_169); lean_dec(x_149); lean_dec(x_147); lean_dec(x_145); +lean_dec(x_144); lean_dec(x_143); -lean_dec(x_142); -lean_dec(x_141); lean_dec(x_3); lean_dec(x_2); -x_184 = lean_box(0); -x_152 = x_184; -goto block_165; -} -block_165: -{ -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_dec(x_152); -x_153 = lean_ctor_get(x_150, 0); -lean_inc(x_153); -x_154 = lean_ctor_get(x_150, 1); -lean_inc(x_154); -x_155 = lean_ctor_get(x_4, 1); -lean_inc(x_155); -x_156 = lean_ctor_get(x_4, 0); -lean_inc(x_156); -lean_dec(x_4); -x_157 = lean_ctor_get(x_156, 0); -lean_inc(x_157); -lean_dec(x_156); -x_158 = lean_alloc_ctor(0, 4, 0); -lean_ctor_set(x_158, 0, x_153); -lean_ctor_set(x_158, 1, x_154); -lean_ctor_set(x_158, 2, x_155); -lean_ctor_set(x_158, 3, x_157); -x_159 = l_Lean_mkOptionalNode___closed__2; -x_160 = lean_array_push(x_159, x_1); -x_161 = l_Lean_Meta_mkEqNDRec___closed__2; -x_162 = l_Lean_Meta_mkEqNDRec___closed__3; -x_163 = lean_alloc_ctor(16, 4, 0); -lean_ctor_set(x_163, 0, x_161); -lean_ctor_set(x_163, 1, x_162); -lean_ctor_set(x_163, 2, x_160); -lean_ctor_set(x_163, 3, x_158); -if (lean_is_scalar(x_151)) { - x_164 = lean_alloc_ctor(1, 2, 0); -} else { - x_164 = x_151; - lean_ctor_set_tag(x_164, 1); -} -lean_ctor_set(x_164, 0, x_163); -lean_ctor_set(x_164, 1, x_150); -return x_164; +x_186 = lean_box(0); +x_154 = x_186; +goto block_168; } } else { -lean_object* x_185; lean_object* x_186; lean_object* x_187; lean_object* x_188; +lean_object* x_187; +lean_dec(x_151); +lean_dec(x_149); lean_dec(x_147); lean_dec(x_145); +lean_dec(x_144); lean_dec(x_143); -lean_dec(x_142); -lean_dec(x_141); -lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); -lean_dec(x_1); -x_185 = lean_ctor_get(x_148, 0); -lean_inc(x_185); -x_186 = lean_ctor_get(x_148, 1); -lean_inc(x_186); -if (lean_is_exclusive(x_148)) { - lean_ctor_release(x_148, 0); - lean_ctor_release(x_148, 1); - x_187 = x_148; -} else { - lean_dec_ref(x_148); - x_187 = lean_box(0); +x_187 = lean_box(0); +x_154 = x_187; +goto block_168; } -if (lean_is_scalar(x_187)) { - x_188 = lean_alloc_ctor(1, 2, 0); +block_168: +{ +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_dec(x_154); +x_155 = lean_ctor_get(x_152, 0); +lean_inc(x_155); +x_156 = lean_ctor_get(x_152, 1); +lean_inc(x_156); +x_157 = lean_ctor_get(x_4, 1); +lean_inc(x_157); +x_158 = lean_ctor_get(x_4, 0); +lean_inc(x_158); +lean_dec(x_4); +x_159 = lean_ctor_get(x_158, 0); +lean_inc(x_159); +lean_dec(x_158); +x_160 = lean_alloc_ctor(0, 4, 0); +lean_ctor_set(x_160, 0, x_155); +lean_ctor_set(x_160, 1, x_156); +lean_ctor_set(x_160, 2, x_157); +lean_ctor_set(x_160, 3, x_159); +x_161 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_161, 0, x_1); +x_162 = l_Lean_indentExpr(x_161); +x_163 = l_Lean_Meta_mkEqNDRec___closed__5; +x_164 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_164, 0, x_163); +lean_ctor_set(x_164, 1, x_162); +x_165 = l_Lean_Meta_mkEqNDRec___closed__2; +x_166 = lean_alloc_ctor(16, 3, 0); +lean_ctor_set(x_166, 0, x_165); +lean_ctor_set(x_166, 1, x_164); +lean_ctor_set(x_166, 2, x_160); +if (lean_is_scalar(x_153)) { + x_167 = lean_alloc_ctor(1, 2, 0); } else { - x_188 = x_187; + x_167 = x_153; + lean_ctor_set_tag(x_167, 1); } -lean_ctor_set(x_188, 0, x_185); -lean_ctor_set(x_188, 1, x_186); -return x_188; +lean_ctor_set(x_167, 0, x_166); +lean_ctor_set(x_167, 1, x_152); +return x_167; } } else { -lean_object* x_189; lean_object* x_190; lean_object* x_191; lean_object* x_192; +lean_object* x_188; lean_object* x_189; lean_object* x_190; lean_object* x_191; +lean_dec(x_149); +lean_dec(x_147); +lean_dec(x_145); +lean_dec(x_144); lean_dec(x_143); -lean_dec(x_142); -lean_dec(x_141); lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); -x_189 = lean_ctor_get(x_144, 0); +x_188 = lean_ctor_get(x_150, 0); +lean_inc(x_188); +x_189 = lean_ctor_get(x_150, 1); lean_inc(x_189); -x_190 = lean_ctor_get(x_144, 1); -lean_inc(x_190); -if (lean_is_exclusive(x_144)) { - lean_ctor_release(x_144, 0); - lean_ctor_release(x_144, 1); - x_191 = x_144; +if (lean_is_exclusive(x_150)) { + lean_ctor_release(x_150, 0); + lean_ctor_release(x_150, 1); + x_190 = x_150; } else { - lean_dec_ref(x_144); - x_191 = lean_box(0); + lean_dec_ref(x_150); + x_190 = lean_box(0); } -if (lean_is_scalar(x_191)) { - x_192 = lean_alloc_ctor(1, 2, 0); +if (lean_is_scalar(x_190)) { + x_191 = lean_alloc_ctor(1, 2, 0); } else { - x_192 = x_191; + x_191 = x_190; } -lean_ctor_set(x_192, 0, x_189); -lean_ctor_set(x_192, 1, x_190); -return x_192; +lean_ctor_set(x_191, 0, x_188); +lean_ctor_set(x_191, 1, x_189); +return x_191; +} +} +else +{ +lean_object* x_192; lean_object* x_193; lean_object* x_194; lean_object* x_195; +lean_dec(x_145); +lean_dec(x_144); +lean_dec(x_143); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_192 = lean_ctor_get(x_146, 0); +lean_inc(x_192); +x_193 = lean_ctor_get(x_146, 1); +lean_inc(x_193); +if (lean_is_exclusive(x_146)) { + lean_ctor_release(x_146, 0); + lean_ctor_release(x_146, 1); + x_194 = x_146; +} else { + lean_dec_ref(x_146); + x_194 = lean_box(0); +} +if (lean_is_scalar(x_194)) { + x_195 = lean_alloc_ctor(1, 2, 0); +} else { + x_195 = x_194; +} +lean_ctor_set(x_195, 0, x_192); +lean_ctor_set(x_195, 1, x_193); +return x_195; } } } } else { -uint8_t x_193; +uint8_t x_196; lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); -x_193 = !lean_is_exclusive(x_8); -if (x_193 == 0) +x_196 = !lean_is_exclusive(x_8); +if (x_196 == 0) { return x_8; } else { -lean_object* x_194; lean_object* x_195; lean_object* x_196; -x_194 = lean_ctor_get(x_8, 0); -x_195 = lean_ctor_get(x_8, 1); -lean_inc(x_195); -lean_inc(x_194); +lean_object* x_197; lean_object* x_198; lean_object* x_199; +x_197 = lean_ctor_get(x_8, 0); +x_198 = lean_ctor_get(x_8, 1); +lean_inc(x_198); +lean_inc(x_197); lean_dec(x_8); -x_196 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_196, 0, x_194); -lean_ctor_set(x_196, 1, x_195); -return x_196; +x_199 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_199, 0, x_197); +lean_ctor_set(x_199, 1, x_198); +return x_199; } } } else { -lean_object* x_197; +lean_object* x_200; lean_dec(x_4); lean_dec(x_3); lean_dec(x_1); -x_197 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_197, 0, x_2); -lean_ctor_set(x_197, 1, x_5); -return x_197; +x_200 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_200, 0, x_2); +lean_ctor_set(x_200, 1, x_5); +return x_200; } } } @@ -10343,7 +10930,7 @@ x_13 = lean_unsigned_to_nat(3u); x_14 = l_Lean_Expr_isAppOfArity___main(x_10, x_12, x_13); if (x_14 == 0) { -lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; +lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_dec(x_10); lean_dec(x_2); lean_dec(x_1); @@ -10364,524 +10951,518 @@ lean_ctor_set(x_20, 0, x_15); lean_ctor_set(x_20, 1, x_16); lean_ctor_set(x_20, 2, x_17); lean_ctor_set(x_20, 3, x_19); -x_21 = l_Lean_mkOptionalNode___closed__2; -x_22 = lean_array_push(x_21, x_3); -x_23 = l_Lean_Meta_mkEqRec___closed__1; -x_24 = l_Lean_Meta_mkEqSymm___closed__3; -x_25 = lean_alloc_ctor(16, 4, 0); -lean_ctor_set(x_25, 0, x_23); -lean_ctor_set(x_25, 1, x_24); -lean_ctor_set(x_25, 2, x_22); -lean_ctor_set(x_25, 3, x_20); +x_21 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_21, 0, x_3); +x_22 = l_Lean_indentExpr(x_21); +x_23 = l_Lean_Meta_mkEqSymm___closed__5; +x_24 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_24, 0, x_23); +lean_ctor_set(x_24, 1, x_22); +x_25 = l_Lean_Meta_mkEqRec___closed__1; +x_26 = lean_alloc_ctor(16, 3, 0); +lean_ctor_set(x_26, 0, x_25); +lean_ctor_set(x_26, 1, x_24); +lean_ctor_set(x_26, 2, x_20); lean_ctor_set_tag(x_8, 1); -lean_ctor_set(x_8, 0, x_25); +lean_ctor_set(x_8, 0, x_26); return x_8; } 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_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_free_object(x_8); -x_26 = l_Lean_Expr_appFn_x21(x_10); -x_27 = l_Lean_Expr_appFn_x21(x_26); -x_28 = l_Lean_Expr_appArg_x21(x_27); +x_27 = l_Lean_Expr_appFn_x21(x_10); +x_28 = l_Lean_Expr_appFn_x21(x_27); +x_29 = l_Lean_Expr_appArg_x21(x_28); +lean_dec(x_28); +x_30 = l_Lean_Expr_appArg_x21(x_27); lean_dec(x_27); -x_29 = l_Lean_Expr_appArg_x21(x_26); -lean_dec(x_26); -x_30 = l_Lean_Expr_appArg_x21(x_10); +x_31 = l_Lean_Expr_appArg_x21(x_10); lean_dec(x_10); lean_inc(x_4); -lean_inc(x_28); -x_31 = l_Lean_Meta_getLevel(x_28, x_4, x_11); -if (lean_obj_tag(x_31) == 0) +lean_inc(x_29); +x_32 = l_Lean_Meta_getLevel(x_29, x_4, x_11); +if (lean_obj_tag(x_32) == 0) { -uint8_t x_32; -x_32 = !lean_is_exclusive(x_31); -if (x_32 == 0) +uint8_t x_33; +x_33 = !lean_is_exclusive(x_32); +if (x_33 == 0) { -lean_object* x_33; lean_object* x_34; lean_object* x_35; -x_33 = lean_ctor_get(x_31, 0); -x_34 = lean_ctor_get(x_31, 1); +lean_object* x_34; lean_object* x_35; lean_object* x_36; +x_34 = lean_ctor_get(x_32, 0); +x_35 = lean_ctor_get(x_32, 1); lean_inc(x_4); lean_inc(x_1); -x_35 = l___private_Lean_Meta_AppBuilder_1__infer(x_1, x_4, x_34); -if (lean_obj_tag(x_35) == 0) +x_36 = l___private_Lean_Meta_AppBuilder_1__infer(x_1, x_4, x_35); +if (lean_obj_tag(x_36) == 0) { -lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; -x_36 = lean_ctor_get(x_35, 0); -lean_inc(x_36); -x_37 = lean_ctor_get(x_35, 1); +lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; +x_37 = lean_ctor_get(x_36, 0); lean_inc(x_37); -if (lean_is_exclusive(x_35)) { - lean_ctor_release(x_35, 0); - lean_ctor_release(x_35, 1); - x_38 = x_35; +x_38 = lean_ctor_get(x_36, 1); +lean_inc(x_38); +if (lean_is_exclusive(x_36)) { + lean_ctor_release(x_36, 0); + lean_ctor_release(x_36, 1); + x_39 = x_36; } else { - lean_dec_ref(x_35); - x_38 = lean_box(0); + lean_dec_ref(x_36); + x_39 = lean_box(0); } -if (lean_obj_tag(x_36) == 7) +if (lean_obj_tag(x_37) == 7) { -lean_object* x_53; -x_53 = lean_ctor_get(x_36, 2); -lean_inc(x_53); -lean_dec(x_36); -if (lean_obj_tag(x_53) == 7) -{ -lean_object* x_54; -x_54 = lean_ctor_get(x_53, 2); -lean_inc(x_54); -lean_dec(x_53); -if (lean_obj_tag(x_54) == 3) -{ -lean_object* x_55; lean_object* x_56; lean_object* x_57; lean_object* x_58; lean_object* x_59; lean_object* x_60; lean_object* x_61; lean_object* x_62; lean_object* x_63; lean_object* x_64; lean_object* x_65; lean_object* x_66; lean_object* x_67; lean_object* x_68; lean_object* x_69; -lean_dec(x_38); -lean_dec(x_4); -x_55 = lean_ctor_get(x_54, 0); +lean_object* x_55; +x_55 = lean_ctor_get(x_37, 2); lean_inc(x_55); -lean_dec(x_54); -x_56 = lean_box(0); -x_57 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_57, 0, x_33); -lean_ctor_set(x_57, 1, x_56); -x_58 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_58, 0, x_55); -lean_ctor_set(x_58, 1, x_57); -x_59 = l_Lean_Meta_mkEqRec___closed__1; -x_60 = l_Lean_mkConst(x_59, x_58); -x_61 = l_Lean_Meta_mkEqNDRec___closed__4; -x_62 = lean_array_push(x_61, x_28); -x_63 = lean_array_push(x_62, x_29); -x_64 = lean_array_push(x_63, x_1); -x_65 = lean_array_push(x_64, x_2); -x_66 = lean_array_push(x_65, x_30); -x_67 = lean_array_push(x_66, x_3); -x_68 = lean_unsigned_to_nat(0u); -x_69 = l_Array_iterateMAux___main___at_Lean_mkAppN___spec__1(x_67, x_67, x_68, x_60); -lean_dec(x_67); -lean_ctor_set(x_31, 1, x_37); -lean_ctor_set(x_31, 0, x_69); -return x_31; -} -else +lean_dec(x_37); +if (lean_obj_tag(x_55) == 7) { -lean_object* x_70; -lean_dec(x_54); -lean_free_object(x_31); -lean_dec(x_33); -lean_dec(x_30); -lean_dec(x_29); -lean_dec(x_28); -lean_dec(x_3); -lean_dec(x_2); -x_70 = lean_box(0); -x_39 = x_70; -goto block_52; -} -} -else +lean_object* x_56; +x_56 = lean_ctor_get(x_55, 2); +lean_inc(x_56); +lean_dec(x_55); +if (lean_obj_tag(x_56) == 3) { -lean_object* x_71; -lean_dec(x_53); -lean_free_object(x_31); -lean_dec(x_33); -lean_dec(x_30); -lean_dec(x_29); -lean_dec(x_28); -lean_dec(x_3); -lean_dec(x_2); -x_71 = lean_box(0); -x_39 = x_71; -goto block_52; -} +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_dec(x_39); +lean_dec(x_4); +x_57 = lean_ctor_get(x_56, 0); +lean_inc(x_57); +lean_dec(x_56); +x_58 = lean_box(0); +x_59 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_59, 0, x_34); +lean_ctor_set(x_59, 1, x_58); +x_60 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_60, 0, x_57); +lean_ctor_set(x_60, 1, x_59); +x_61 = l_Lean_Meta_mkEqRec___closed__1; +x_62 = l_Lean_mkConst(x_61, x_60); +x_63 = l_Lean_Meta_mkEqNDRec___closed__6; +x_64 = lean_array_push(x_63, x_29); +x_65 = lean_array_push(x_64, x_30); +x_66 = lean_array_push(x_65, x_1); +x_67 = lean_array_push(x_66, x_2); +x_68 = lean_array_push(x_67, x_31); +x_69 = lean_array_push(x_68, x_3); +x_70 = lean_unsigned_to_nat(0u); +x_71 = l_Array_iterateMAux___main___at_Lean_mkAppN___spec__1(x_69, x_69, x_70, x_62); +lean_dec(x_69); +lean_ctor_set(x_32, 1, x_38); +lean_ctor_set(x_32, 0, x_71); +return x_32; } else { lean_object* x_72; -lean_dec(x_36); -lean_free_object(x_31); -lean_dec(x_33); +lean_dec(x_56); +lean_free_object(x_32); +lean_dec(x_34); +lean_dec(x_31); lean_dec(x_30); lean_dec(x_29); -lean_dec(x_28); lean_dec(x_3); lean_dec(x_2); x_72 = lean_box(0); -x_39 = x_72; -goto block_52; -} -block_52: -{ -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_dec(x_39); -x_40 = lean_ctor_get(x_37, 0); -lean_inc(x_40); -x_41 = lean_ctor_get(x_37, 1); -lean_inc(x_41); -x_42 = lean_ctor_get(x_4, 1); -lean_inc(x_42); -x_43 = lean_ctor_get(x_4, 0); -lean_inc(x_43); -lean_dec(x_4); -x_44 = lean_ctor_get(x_43, 0); -lean_inc(x_44); -lean_dec(x_43); -x_45 = lean_alloc_ctor(0, 4, 0); -lean_ctor_set(x_45, 0, x_40); -lean_ctor_set(x_45, 1, x_41); -lean_ctor_set(x_45, 2, x_42); -lean_ctor_set(x_45, 3, x_44); -x_46 = l_Lean_mkOptionalNode___closed__2; -x_47 = lean_array_push(x_46, x_1); -x_48 = l_Lean_Meta_mkEqRec___closed__1; -x_49 = l_Lean_Meta_mkEqNDRec___closed__3; -x_50 = lean_alloc_ctor(16, 4, 0); -lean_ctor_set(x_50, 0, x_48); -lean_ctor_set(x_50, 1, x_49); -lean_ctor_set(x_50, 2, x_47); -lean_ctor_set(x_50, 3, x_45); -if (lean_is_scalar(x_38)) { - x_51 = lean_alloc_ctor(1, 2, 0); -} else { - x_51 = x_38; - lean_ctor_set_tag(x_51, 1); -} -lean_ctor_set(x_51, 0, x_50); -lean_ctor_set(x_51, 1, x_37); -return x_51; +x_40 = x_72; +goto block_54; } } else { -uint8_t x_73; -lean_free_object(x_31); -lean_dec(x_33); +lean_object* x_73; +lean_dec(x_55); +lean_free_object(x_32); +lean_dec(x_34); +lean_dec(x_31); +lean_dec(x_30); +lean_dec(x_29); +lean_dec(x_3); +lean_dec(x_2); +x_73 = lean_box(0); +x_40 = x_73; +goto block_54; +} +} +else +{ +lean_object* x_74; +lean_dec(x_37); +lean_free_object(x_32); +lean_dec(x_34); +lean_dec(x_31); +lean_dec(x_30); +lean_dec(x_29); +lean_dec(x_3); +lean_dec(x_2); +x_74 = lean_box(0); +x_40 = x_74; +goto block_54; +} +block_54: +{ +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_dec(x_40); +x_41 = lean_ctor_get(x_38, 0); +lean_inc(x_41); +x_42 = lean_ctor_get(x_38, 1); +lean_inc(x_42); +x_43 = lean_ctor_get(x_4, 1); +lean_inc(x_43); +x_44 = lean_ctor_get(x_4, 0); +lean_inc(x_44); +lean_dec(x_4); +x_45 = lean_ctor_get(x_44, 0); +lean_inc(x_45); +lean_dec(x_44); +x_46 = lean_alloc_ctor(0, 4, 0); +lean_ctor_set(x_46, 0, x_41); +lean_ctor_set(x_46, 1, x_42); +lean_ctor_set(x_46, 2, x_43); +lean_ctor_set(x_46, 3, x_45); +x_47 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_47, 0, x_1); +x_48 = l_Lean_indentExpr(x_47); +x_49 = l_Lean_Meta_mkEqNDRec___closed__5; +x_50 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_50, 0, x_49); +lean_ctor_set(x_50, 1, x_48); +x_51 = l_Lean_Meta_mkEqRec___closed__1; +x_52 = lean_alloc_ctor(16, 3, 0); +lean_ctor_set(x_52, 0, x_51); +lean_ctor_set(x_52, 1, x_50); +lean_ctor_set(x_52, 2, x_46); +if (lean_is_scalar(x_39)) { + x_53 = lean_alloc_ctor(1, 2, 0); +} else { + x_53 = x_39; + lean_ctor_set_tag(x_53, 1); +} +lean_ctor_set(x_53, 0, x_52); +lean_ctor_set(x_53, 1, x_38); +return x_53; +} +} +else +{ +uint8_t x_75; +lean_free_object(x_32); +lean_dec(x_34); +lean_dec(x_31); lean_dec(x_30); lean_dec(x_29); -lean_dec(x_28); lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); -x_73 = !lean_is_exclusive(x_35); -if (x_73 == 0) +x_75 = !lean_is_exclusive(x_36); +if (x_75 == 0) { -return x_35; +return x_36; } else { -lean_object* x_74; lean_object* x_75; lean_object* x_76; -x_74 = lean_ctor_get(x_35, 0); -x_75 = lean_ctor_get(x_35, 1); -lean_inc(x_75); -lean_inc(x_74); -lean_dec(x_35); -x_76 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_76, 0, x_74); -lean_ctor_set(x_76, 1, x_75); -return x_76; -} -} -} -else -{ -lean_object* x_77; lean_object* x_78; lean_object* x_79; -x_77 = lean_ctor_get(x_31, 0); -x_78 = lean_ctor_get(x_31, 1); -lean_inc(x_78); +lean_object* x_76; lean_object* x_77; lean_object* x_78; +x_76 = lean_ctor_get(x_36, 0); +x_77 = lean_ctor_get(x_36, 1); lean_inc(x_77); -lean_dec(x_31); +lean_inc(x_76); +lean_dec(x_36); +x_78 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_78, 0, x_76); +lean_ctor_set(x_78, 1, x_77); +return x_78; +} +} +} +else +{ +lean_object* x_79; lean_object* x_80; lean_object* x_81; +x_79 = lean_ctor_get(x_32, 0); +x_80 = lean_ctor_get(x_32, 1); +lean_inc(x_80); +lean_inc(x_79); +lean_dec(x_32); lean_inc(x_4); lean_inc(x_1); -x_79 = l___private_Lean_Meta_AppBuilder_1__infer(x_1, x_4, x_78); -if (lean_obj_tag(x_79) == 0) +x_81 = l___private_Lean_Meta_AppBuilder_1__infer(x_1, x_4, x_80); +if (lean_obj_tag(x_81) == 0) { -lean_object* x_80; lean_object* x_81; lean_object* x_82; lean_object* x_83; -x_80 = lean_ctor_get(x_79, 0); -lean_inc(x_80); -x_81 = lean_ctor_get(x_79, 1); -lean_inc(x_81); -if (lean_is_exclusive(x_79)) { - lean_ctor_release(x_79, 0); - lean_ctor_release(x_79, 1); - x_82 = x_79; +lean_object* x_82; lean_object* x_83; lean_object* x_84; lean_object* x_85; +x_82 = lean_ctor_get(x_81, 0); +lean_inc(x_82); +x_83 = lean_ctor_get(x_81, 1); +lean_inc(x_83); +if (lean_is_exclusive(x_81)) { + lean_ctor_release(x_81, 0); + lean_ctor_release(x_81, 1); + x_84 = x_81; } else { - lean_dec_ref(x_79); - x_82 = lean_box(0); + lean_dec_ref(x_81); + x_84 = lean_box(0); } -if (lean_obj_tag(x_80) == 7) +if (lean_obj_tag(x_82) == 7) { -lean_object* x_97; -x_97 = lean_ctor_get(x_80, 2); -lean_inc(x_97); -lean_dec(x_80); -if (lean_obj_tag(x_97) == 7) -{ -lean_object* x_98; -x_98 = lean_ctor_get(x_97, 2); -lean_inc(x_98); -lean_dec(x_97); -if (lean_obj_tag(x_98) == 3) -{ -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_100; +x_100 = lean_ctor_get(x_82, 2); +lean_inc(x_100); lean_dec(x_82); +if (lean_obj_tag(x_100) == 7) +{ +lean_object* x_101; +x_101 = lean_ctor_get(x_100, 2); +lean_inc(x_101); +lean_dec(x_100); +if (lean_obj_tag(x_101) == 3) +{ +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_dec(x_84); lean_dec(x_4); -x_99 = lean_ctor_get(x_98, 0); -lean_inc(x_99); -lean_dec(x_98); -x_100 = lean_box(0); -x_101 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_101, 0, x_77); -lean_ctor_set(x_101, 1, x_100); -x_102 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_102, 0, x_99); -lean_ctor_set(x_102, 1, x_101); -x_103 = l_Lean_Meta_mkEqRec___closed__1; -x_104 = l_Lean_mkConst(x_103, x_102); -x_105 = l_Lean_Meta_mkEqNDRec___closed__4; -x_106 = lean_array_push(x_105, x_28); -x_107 = lean_array_push(x_106, x_29); -x_108 = lean_array_push(x_107, x_1); -x_109 = lean_array_push(x_108, x_2); +x_102 = lean_ctor_get(x_101, 0); +lean_inc(x_102); +lean_dec(x_101); +x_103 = lean_box(0); +x_104 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_104, 0, x_79); +lean_ctor_set(x_104, 1, x_103); +x_105 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_105, 0, x_102); +lean_ctor_set(x_105, 1, x_104); +x_106 = l_Lean_Meta_mkEqRec___closed__1; +x_107 = l_Lean_mkConst(x_106, x_105); +x_108 = l_Lean_Meta_mkEqNDRec___closed__6; +x_109 = lean_array_push(x_108, x_29); x_110 = lean_array_push(x_109, x_30); -x_111 = lean_array_push(x_110, x_3); -x_112 = lean_unsigned_to_nat(0u); -x_113 = l_Array_iterateMAux___main___at_Lean_mkAppN___spec__1(x_111, x_111, x_112, x_104); -lean_dec(x_111); -x_114 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_114, 0, x_113); -lean_ctor_set(x_114, 1, x_81); -return x_114; +x_111 = lean_array_push(x_110, x_1); +x_112 = lean_array_push(x_111, x_2); +x_113 = lean_array_push(x_112, x_31); +x_114 = lean_array_push(x_113, x_3); +x_115 = lean_unsigned_to_nat(0u); +x_116 = l_Array_iterateMAux___main___at_Lean_mkAppN___spec__1(x_114, x_114, x_115, x_107); +lean_dec(x_114); +x_117 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_117, 0, x_116); +lean_ctor_set(x_117, 1, x_83); +return x_117; } else { -lean_object* x_115; -lean_dec(x_98); -lean_dec(x_77); -lean_dec(x_30); -lean_dec(x_29); -lean_dec(x_28); -lean_dec(x_3); -lean_dec(x_2); -x_115 = lean_box(0); -x_83 = x_115; -goto block_96; -} -} -else -{ -lean_object* x_116; -lean_dec(x_97); -lean_dec(x_77); -lean_dec(x_30); -lean_dec(x_29); -lean_dec(x_28); -lean_dec(x_3); -lean_dec(x_2); -x_116 = lean_box(0); -x_83 = x_116; -goto block_96; -} -} -else -{ -lean_object* x_117; -lean_dec(x_80); -lean_dec(x_77); -lean_dec(x_30); -lean_dec(x_29); -lean_dec(x_28); -lean_dec(x_3); -lean_dec(x_2); -x_117 = lean_box(0); -x_83 = x_117; -goto block_96; -} -block_96: -{ -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_dec(x_83); -x_84 = lean_ctor_get(x_81, 0); -lean_inc(x_84); -x_85 = lean_ctor_get(x_81, 1); -lean_inc(x_85); -x_86 = lean_ctor_get(x_4, 1); -lean_inc(x_86); -x_87 = lean_ctor_get(x_4, 0); -lean_inc(x_87); -lean_dec(x_4); -x_88 = lean_ctor_get(x_87, 0); -lean_inc(x_88); -lean_dec(x_87); -x_89 = lean_alloc_ctor(0, 4, 0); -lean_ctor_set(x_89, 0, x_84); -lean_ctor_set(x_89, 1, x_85); -lean_ctor_set(x_89, 2, x_86); -lean_ctor_set(x_89, 3, x_88); -x_90 = l_Lean_mkOptionalNode___closed__2; -x_91 = lean_array_push(x_90, x_1); -x_92 = l_Lean_Meta_mkEqRec___closed__1; -x_93 = l_Lean_Meta_mkEqNDRec___closed__3; -x_94 = lean_alloc_ctor(16, 4, 0); -lean_ctor_set(x_94, 0, x_92); -lean_ctor_set(x_94, 1, x_93); -lean_ctor_set(x_94, 2, x_91); -lean_ctor_set(x_94, 3, x_89); -if (lean_is_scalar(x_82)) { - x_95 = lean_alloc_ctor(1, 2, 0); -} else { - x_95 = x_82; - lean_ctor_set_tag(x_95, 1); -} -lean_ctor_set(x_95, 0, x_94); -lean_ctor_set(x_95, 1, x_81); -return x_95; -} -} -else -{ -lean_object* x_118; lean_object* x_119; lean_object* x_120; lean_object* x_121; -lean_dec(x_77); -lean_dec(x_30); -lean_dec(x_29); -lean_dec(x_28); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_118 = lean_ctor_get(x_79, 0); -lean_inc(x_118); -x_119 = lean_ctor_get(x_79, 1); -lean_inc(x_119); -if (lean_is_exclusive(x_79)) { - lean_ctor_release(x_79, 0); - lean_ctor_release(x_79, 1); - x_120 = x_79; -} else { - lean_dec_ref(x_79); - x_120 = lean_box(0); -} -if (lean_is_scalar(x_120)) { - x_121 = lean_alloc_ctor(1, 2, 0); -} else { - x_121 = x_120; -} -lean_ctor_set(x_121, 0, x_118); -lean_ctor_set(x_121, 1, x_119); -return x_121; -} -} -} -else -{ -uint8_t x_122; -lean_dec(x_30); -lean_dec(x_29); -lean_dec(x_28); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_122 = !lean_is_exclusive(x_31); -if (x_122 == 0) -{ -return x_31; -} -else -{ -lean_object* x_123; lean_object* x_124; lean_object* x_125; -x_123 = lean_ctor_get(x_31, 0); -x_124 = lean_ctor_get(x_31, 1); -lean_inc(x_124); -lean_inc(x_123); +lean_object* x_118; +lean_dec(x_101); +lean_dec(x_79); lean_dec(x_31); -x_125 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_125, 0, x_123); -lean_ctor_set(x_125, 1, x_124); -return x_125; +lean_dec(x_30); +lean_dec(x_29); +lean_dec(x_3); +lean_dec(x_2); +x_118 = lean_box(0); +x_85 = x_118; +goto block_99; } } +else +{ +lean_object* x_119; +lean_dec(x_100); +lean_dec(x_79); +lean_dec(x_31); +lean_dec(x_30); +lean_dec(x_29); +lean_dec(x_3); +lean_dec(x_2); +x_119 = lean_box(0); +x_85 = x_119; +goto block_99; +} +} +else +{ +lean_object* x_120; +lean_dec(x_82); +lean_dec(x_79); +lean_dec(x_31); +lean_dec(x_30); +lean_dec(x_29); +lean_dec(x_3); +lean_dec(x_2); +x_120 = lean_box(0); +x_85 = x_120; +goto block_99; +} +block_99: +{ +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_dec(x_85); +x_86 = lean_ctor_get(x_83, 0); +lean_inc(x_86); +x_87 = lean_ctor_get(x_83, 1); +lean_inc(x_87); +x_88 = lean_ctor_get(x_4, 1); +lean_inc(x_88); +x_89 = lean_ctor_get(x_4, 0); +lean_inc(x_89); +lean_dec(x_4); +x_90 = lean_ctor_get(x_89, 0); +lean_inc(x_90); +lean_dec(x_89); +x_91 = lean_alloc_ctor(0, 4, 0); +lean_ctor_set(x_91, 0, x_86); +lean_ctor_set(x_91, 1, x_87); +lean_ctor_set(x_91, 2, x_88); +lean_ctor_set(x_91, 3, x_90); +x_92 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_92, 0, x_1); +x_93 = l_Lean_indentExpr(x_92); +x_94 = l_Lean_Meta_mkEqNDRec___closed__5; +x_95 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_95, 0, x_94); +lean_ctor_set(x_95, 1, x_93); +x_96 = l_Lean_Meta_mkEqRec___closed__1; +x_97 = lean_alloc_ctor(16, 3, 0); +lean_ctor_set(x_97, 0, x_96); +lean_ctor_set(x_97, 1, x_95); +lean_ctor_set(x_97, 2, x_91); +if (lean_is_scalar(x_84)) { + x_98 = lean_alloc_ctor(1, 2, 0); +} else { + x_98 = x_84; + lean_ctor_set_tag(x_98, 1); +} +lean_ctor_set(x_98, 0, x_97); +lean_ctor_set(x_98, 1, x_83); +return x_98; +} +} +else +{ +lean_object* x_121; lean_object* x_122; lean_object* x_123; lean_object* x_124; +lean_dec(x_79); +lean_dec(x_31); +lean_dec(x_30); +lean_dec(x_29); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_121 = lean_ctor_get(x_81, 0); +lean_inc(x_121); +x_122 = lean_ctor_get(x_81, 1); +lean_inc(x_122); +if (lean_is_exclusive(x_81)) { + lean_ctor_release(x_81, 0); + lean_ctor_release(x_81, 1); + x_123 = x_81; +} else { + lean_dec_ref(x_81); + x_123 = lean_box(0); +} +if (lean_is_scalar(x_123)) { + x_124 = lean_alloc_ctor(1, 2, 0); +} else { + x_124 = x_123; +} +lean_ctor_set(x_124, 0, x_121); +lean_ctor_set(x_124, 1, x_122); +return x_124; +} } } else { -lean_object* x_126; lean_object* x_127; lean_object* x_128; lean_object* x_129; uint8_t x_130; -x_126 = lean_ctor_get(x_8, 0); -x_127 = lean_ctor_get(x_8, 1); +uint8_t x_125; +lean_dec(x_31); +lean_dec(x_30); +lean_dec(x_29); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_125 = !lean_is_exclusive(x_32); +if (x_125 == 0) +{ +return x_32; +} +else +{ +lean_object* x_126; lean_object* x_127; lean_object* x_128; +x_126 = lean_ctor_get(x_32, 0); +x_127 = lean_ctor_get(x_32, 1); lean_inc(x_127); lean_inc(x_126); -lean_dec(x_8); -x_128 = l_Lean_Expr_eq_x3f___closed__2; -x_129 = lean_unsigned_to_nat(3u); -x_130 = l_Lean_Expr_isAppOfArity___main(x_126, x_128, x_129); -if (x_130 == 0) -{ -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_dec(x_126); -lean_dec(x_2); -lean_dec(x_1); -x_131 = lean_ctor_get(x_127, 0); -lean_inc(x_131); -x_132 = lean_ctor_get(x_127, 1); -lean_inc(x_132); -x_133 = lean_ctor_get(x_4, 1); -lean_inc(x_133); -x_134 = lean_ctor_get(x_4, 0); -lean_inc(x_134); -lean_dec(x_4); -x_135 = lean_ctor_get(x_134, 0); -lean_inc(x_135); -lean_dec(x_134); -x_136 = lean_alloc_ctor(0, 4, 0); -lean_ctor_set(x_136, 0, x_131); -lean_ctor_set(x_136, 1, x_132); -lean_ctor_set(x_136, 2, x_133); -lean_ctor_set(x_136, 3, x_135); -x_137 = l_Lean_mkOptionalNode___closed__2; -x_138 = lean_array_push(x_137, x_3); -x_139 = l_Lean_Meta_mkEqRec___closed__1; -x_140 = l_Lean_Meta_mkEqSymm___closed__3; -x_141 = lean_alloc_ctor(16, 4, 0); -lean_ctor_set(x_141, 0, x_139); -lean_ctor_set(x_141, 1, x_140); -lean_ctor_set(x_141, 2, x_138); -lean_ctor_set(x_141, 3, x_136); -x_142 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_142, 0, x_141); -lean_ctor_set(x_142, 1, x_127); -return x_142; +lean_dec(x_32); +x_128 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_128, 0, x_126); +lean_ctor_set(x_128, 1, x_127); +return x_128; +} +} +} } 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; -x_143 = l_Lean_Expr_appFn_x21(x_126); -x_144 = l_Lean_Expr_appFn_x21(x_143); -x_145 = l_Lean_Expr_appArg_x21(x_144); -lean_dec(x_144); -x_146 = l_Lean_Expr_appArg_x21(x_143); -lean_dec(x_143); -x_147 = l_Lean_Expr_appArg_x21(x_126); -lean_dec(x_126); -lean_inc(x_4); -lean_inc(x_145); -x_148 = l_Lean_Meta_getLevel(x_145, x_4, x_127); -if (lean_obj_tag(x_148) == 0) +lean_object* x_129; lean_object* x_130; lean_object* x_131; lean_object* x_132; uint8_t x_133; +x_129 = lean_ctor_get(x_8, 0); +x_130 = lean_ctor_get(x_8, 1); +lean_inc(x_130); +lean_inc(x_129); +lean_dec(x_8); +x_131 = l_Lean_Expr_eq_x3f___closed__2; +x_132 = lean_unsigned_to_nat(3u); +x_133 = l_Lean_Expr_isAppOfArity___main(x_129, x_131, x_132); +if (x_133 == 0) { -lean_object* x_149; lean_object* x_150; lean_object* x_151; lean_object* x_152; -x_149 = lean_ctor_get(x_148, 0); -lean_inc(x_149); -x_150 = lean_ctor_get(x_148, 1); -lean_inc(x_150); -if (lean_is_exclusive(x_148)) { - lean_ctor_release(x_148, 0); - lean_ctor_release(x_148, 1); - x_151 = x_148; -} else { - lean_dec_ref(x_148); - x_151 = lean_box(0); +lean_object* x_134; lean_object* x_135; lean_object* x_136; lean_object* x_137; lean_object* x_138; lean_object* x_139; lean_object* x_140; lean_object* x_141; lean_object* x_142; lean_object* x_143; lean_object* x_144; lean_object* x_145; lean_object* x_146; +lean_dec(x_129); +lean_dec(x_2); +lean_dec(x_1); +x_134 = lean_ctor_get(x_130, 0); +lean_inc(x_134); +x_135 = lean_ctor_get(x_130, 1); +lean_inc(x_135); +x_136 = lean_ctor_get(x_4, 1); +lean_inc(x_136); +x_137 = lean_ctor_get(x_4, 0); +lean_inc(x_137); +lean_dec(x_4); +x_138 = lean_ctor_get(x_137, 0); +lean_inc(x_138); +lean_dec(x_137); +x_139 = lean_alloc_ctor(0, 4, 0); +lean_ctor_set(x_139, 0, x_134); +lean_ctor_set(x_139, 1, x_135); +lean_ctor_set(x_139, 2, x_136); +lean_ctor_set(x_139, 3, x_138); +x_140 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_140, 0, x_3); +x_141 = l_Lean_indentExpr(x_140); +x_142 = l_Lean_Meta_mkEqSymm___closed__5; +x_143 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_143, 0, x_142); +lean_ctor_set(x_143, 1, x_141); +x_144 = l_Lean_Meta_mkEqRec___closed__1; +x_145 = lean_alloc_ctor(16, 3, 0); +lean_ctor_set(x_145, 0, x_144); +lean_ctor_set(x_145, 1, x_143); +lean_ctor_set(x_145, 2, x_139); +x_146 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_146, 0, x_145); +lean_ctor_set(x_146, 1, x_130); +return x_146; } +else +{ +lean_object* x_147; lean_object* x_148; lean_object* x_149; lean_object* x_150; lean_object* x_151; lean_object* x_152; +x_147 = l_Lean_Expr_appFn_x21(x_129); +x_148 = l_Lean_Expr_appFn_x21(x_147); +x_149 = l_Lean_Expr_appArg_x21(x_148); +lean_dec(x_148); +x_150 = l_Lean_Expr_appArg_x21(x_147); +lean_dec(x_147); +x_151 = l_Lean_Expr_appArg_x21(x_129); +lean_dec(x_129); lean_inc(x_4); -lean_inc(x_1); -x_152 = l___private_Lean_Meta_AppBuilder_1__infer(x_1, x_4, x_150); +lean_inc(x_149); +x_152 = l_Lean_Meta_getLevel(x_149, x_4, x_130); if (lean_obj_tag(x_152) == 0) { lean_object* x_153; lean_object* x_154; lean_object* x_155; lean_object* x_156; @@ -10897,247 +11478,268 @@ if (lean_is_exclusive(x_152)) { lean_dec_ref(x_152); x_155 = lean_box(0); } -if (lean_obj_tag(x_153) == 7) +lean_inc(x_4); +lean_inc(x_1); +x_156 = l___private_Lean_Meta_AppBuilder_1__infer(x_1, x_4, x_154); +if (lean_obj_tag(x_156) == 0) { -lean_object* x_170; -x_170 = lean_ctor_get(x_153, 2); -lean_inc(x_170); -lean_dec(x_153); -if (lean_obj_tag(x_170) == 7) -{ -lean_object* x_171; -x_171 = lean_ctor_get(x_170, 2); -lean_inc(x_171); -lean_dec(x_170); -if (lean_obj_tag(x_171) == 3) -{ -lean_object* x_172; lean_object* x_173; lean_object* x_174; lean_object* x_175; lean_object* x_176; lean_object* x_177; lean_object* x_178; lean_object* x_179; lean_object* x_180; lean_object* x_181; lean_object* x_182; lean_object* x_183; lean_object* x_184; lean_object* x_185; lean_object* x_186; lean_object* x_187; -lean_dec(x_155); -lean_dec(x_4); -x_172 = lean_ctor_get(x_171, 0); -lean_inc(x_172); -lean_dec(x_171); -x_173 = lean_box(0); -x_174 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_174, 0, x_149); -lean_ctor_set(x_174, 1, x_173); -x_175 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_175, 0, x_172); -lean_ctor_set(x_175, 1, x_174); -x_176 = l_Lean_Meta_mkEqRec___closed__1; -x_177 = l_Lean_mkConst(x_176, x_175); -x_178 = l_Lean_Meta_mkEqNDRec___closed__4; -x_179 = lean_array_push(x_178, x_145); -x_180 = lean_array_push(x_179, x_146); -x_181 = lean_array_push(x_180, x_1); -x_182 = lean_array_push(x_181, x_2); -x_183 = lean_array_push(x_182, x_147); -x_184 = lean_array_push(x_183, x_3); -x_185 = lean_unsigned_to_nat(0u); -x_186 = l_Array_iterateMAux___main___at_Lean_mkAppN___spec__1(x_184, x_184, x_185, x_177); -lean_dec(x_184); -if (lean_is_scalar(x_151)) { - x_187 = lean_alloc_ctor(0, 2, 0); -} else { - x_187 = x_151; -} -lean_ctor_set(x_187, 0, x_186); -lean_ctor_set(x_187, 1, x_154); -return x_187; -} -else -{ -lean_object* x_188; -lean_dec(x_171); -lean_dec(x_151); -lean_dec(x_149); -lean_dec(x_147); -lean_dec(x_146); -lean_dec(x_145); -lean_dec(x_3); -lean_dec(x_2); -x_188 = lean_box(0); -x_156 = x_188; -goto block_169; -} -} -else -{ -lean_object* x_189; -lean_dec(x_170); -lean_dec(x_151); -lean_dec(x_149); -lean_dec(x_147); -lean_dec(x_146); -lean_dec(x_145); -lean_dec(x_3); -lean_dec(x_2); -x_189 = lean_box(0); -x_156 = x_189; -goto block_169; -} -} -else -{ -lean_object* x_190; -lean_dec(x_153); -lean_dec(x_151); -lean_dec(x_149); -lean_dec(x_147); -lean_dec(x_146); -lean_dec(x_145); -lean_dec(x_3); -lean_dec(x_2); -x_190 = lean_box(0); -x_156 = x_190; -goto block_169; -} -block_169: -{ -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_dec(x_156); -x_157 = lean_ctor_get(x_154, 0); +lean_object* x_157; lean_object* x_158; lean_object* x_159; lean_object* x_160; +x_157 = lean_ctor_get(x_156, 0); lean_inc(x_157); -x_158 = lean_ctor_get(x_154, 1); +x_158 = lean_ctor_get(x_156, 1); lean_inc(x_158); -x_159 = lean_ctor_get(x_4, 1); -lean_inc(x_159); -x_160 = lean_ctor_get(x_4, 0); -lean_inc(x_160); -lean_dec(x_4); -x_161 = lean_ctor_get(x_160, 0); -lean_inc(x_161); -lean_dec(x_160); -x_162 = lean_alloc_ctor(0, 4, 0); -lean_ctor_set(x_162, 0, x_157); -lean_ctor_set(x_162, 1, x_158); -lean_ctor_set(x_162, 2, x_159); -lean_ctor_set(x_162, 3, x_161); -x_163 = l_Lean_mkOptionalNode___closed__2; -x_164 = lean_array_push(x_163, x_1); -x_165 = l_Lean_Meta_mkEqRec___closed__1; -x_166 = l_Lean_Meta_mkEqNDRec___closed__3; -x_167 = lean_alloc_ctor(16, 4, 0); -lean_ctor_set(x_167, 0, x_165); -lean_ctor_set(x_167, 1, x_166); -lean_ctor_set(x_167, 2, x_164); -lean_ctor_set(x_167, 3, x_162); -if (lean_is_scalar(x_155)) { - x_168 = lean_alloc_ctor(1, 2, 0); +if (lean_is_exclusive(x_156)) { + lean_ctor_release(x_156, 0); + lean_ctor_release(x_156, 1); + x_159 = x_156; } else { - x_168 = x_155; - lean_ctor_set_tag(x_168, 1); + lean_dec_ref(x_156); + x_159 = lean_box(0); } -lean_ctor_set(x_168, 0, x_167); -lean_ctor_set(x_168, 1, x_154); -return x_168; +if (lean_obj_tag(x_157) == 7) +{ +lean_object* x_175; +x_175 = lean_ctor_get(x_157, 2); +lean_inc(x_175); +lean_dec(x_157); +if (lean_obj_tag(x_175) == 7) +{ +lean_object* x_176; +x_176 = lean_ctor_get(x_175, 2); +lean_inc(x_176); +lean_dec(x_175); +if (lean_obj_tag(x_176) == 3) +{ +lean_object* x_177; lean_object* x_178; lean_object* x_179; lean_object* x_180; lean_object* x_181; lean_object* x_182; lean_object* x_183; lean_object* x_184; lean_object* x_185; lean_object* x_186; lean_object* x_187; lean_object* x_188; lean_object* x_189; lean_object* x_190; lean_object* x_191; lean_object* x_192; +lean_dec(x_159); +lean_dec(x_4); +x_177 = lean_ctor_get(x_176, 0); +lean_inc(x_177); +lean_dec(x_176); +x_178 = lean_box(0); +x_179 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_179, 0, x_153); +lean_ctor_set(x_179, 1, x_178); +x_180 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_180, 0, x_177); +lean_ctor_set(x_180, 1, x_179); +x_181 = l_Lean_Meta_mkEqRec___closed__1; +x_182 = l_Lean_mkConst(x_181, x_180); +x_183 = l_Lean_Meta_mkEqNDRec___closed__6; +x_184 = lean_array_push(x_183, x_149); +x_185 = lean_array_push(x_184, x_150); +x_186 = lean_array_push(x_185, x_1); +x_187 = lean_array_push(x_186, x_2); +x_188 = lean_array_push(x_187, x_151); +x_189 = lean_array_push(x_188, x_3); +x_190 = lean_unsigned_to_nat(0u); +x_191 = l_Array_iterateMAux___main___at_Lean_mkAppN___spec__1(x_189, x_189, x_190, x_182); +lean_dec(x_189); +if (lean_is_scalar(x_155)) { + x_192 = lean_alloc_ctor(0, 2, 0); +} else { + x_192 = x_155; +} +lean_ctor_set(x_192, 0, x_191); +lean_ctor_set(x_192, 1, x_158); +return x_192; +} +else +{ +lean_object* x_193; +lean_dec(x_176); +lean_dec(x_155); +lean_dec(x_153); +lean_dec(x_151); +lean_dec(x_150); +lean_dec(x_149); +lean_dec(x_3); +lean_dec(x_2); +x_193 = lean_box(0); +x_160 = x_193; +goto block_174; } } else { -lean_object* x_191; lean_object* x_192; lean_object* x_193; lean_object* x_194; +lean_object* x_194; +lean_dec(x_175); +lean_dec(x_155); +lean_dec(x_153); lean_dec(x_151); +lean_dec(x_150); +lean_dec(x_149); +lean_dec(x_3); +lean_dec(x_2); +x_194 = lean_box(0); +x_160 = x_194; +goto block_174; +} +} +else +{ +lean_object* x_195; +lean_dec(x_157); +lean_dec(x_155); +lean_dec(x_153); +lean_dec(x_151); +lean_dec(x_150); +lean_dec(x_149); +lean_dec(x_3); +lean_dec(x_2); +x_195 = lean_box(0); +x_160 = x_195; +goto block_174; +} +block_174: +{ +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_dec(x_160); +x_161 = lean_ctor_get(x_158, 0); +lean_inc(x_161); +x_162 = lean_ctor_get(x_158, 1); +lean_inc(x_162); +x_163 = lean_ctor_get(x_4, 1); +lean_inc(x_163); +x_164 = lean_ctor_get(x_4, 0); +lean_inc(x_164); +lean_dec(x_4); +x_165 = lean_ctor_get(x_164, 0); +lean_inc(x_165); +lean_dec(x_164); +x_166 = lean_alloc_ctor(0, 4, 0); +lean_ctor_set(x_166, 0, x_161); +lean_ctor_set(x_166, 1, x_162); +lean_ctor_set(x_166, 2, x_163); +lean_ctor_set(x_166, 3, x_165); +x_167 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_167, 0, x_1); +x_168 = l_Lean_indentExpr(x_167); +x_169 = l_Lean_Meta_mkEqNDRec___closed__5; +x_170 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_170, 0, x_169); +lean_ctor_set(x_170, 1, x_168); +x_171 = l_Lean_Meta_mkEqRec___closed__1; +x_172 = lean_alloc_ctor(16, 3, 0); +lean_ctor_set(x_172, 0, x_171); +lean_ctor_set(x_172, 1, x_170); +lean_ctor_set(x_172, 2, x_166); +if (lean_is_scalar(x_159)) { + x_173 = lean_alloc_ctor(1, 2, 0); +} else { + x_173 = x_159; + lean_ctor_set_tag(x_173, 1); +} +lean_ctor_set(x_173, 0, x_172); +lean_ctor_set(x_173, 1, x_158); +return x_173; +} +} +else +{ +lean_object* x_196; lean_object* x_197; lean_object* x_198; lean_object* x_199; +lean_dec(x_155); +lean_dec(x_153); +lean_dec(x_151); +lean_dec(x_150); lean_dec(x_149); -lean_dec(x_147); -lean_dec(x_146); -lean_dec(x_145); lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); -x_191 = lean_ctor_get(x_152, 0); -lean_inc(x_191); -x_192 = lean_ctor_get(x_152, 1); -lean_inc(x_192); +x_196 = lean_ctor_get(x_156, 0); +lean_inc(x_196); +x_197 = lean_ctor_get(x_156, 1); +lean_inc(x_197); +if (lean_is_exclusive(x_156)) { + lean_ctor_release(x_156, 0); + lean_ctor_release(x_156, 1); + x_198 = x_156; +} else { + lean_dec_ref(x_156); + x_198 = lean_box(0); +} +if (lean_is_scalar(x_198)) { + x_199 = lean_alloc_ctor(1, 2, 0); +} else { + x_199 = x_198; +} +lean_ctor_set(x_199, 0, x_196); +lean_ctor_set(x_199, 1, x_197); +return x_199; +} +} +else +{ +lean_object* x_200; lean_object* x_201; lean_object* x_202; lean_object* x_203; +lean_dec(x_151); +lean_dec(x_150); +lean_dec(x_149); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_200 = lean_ctor_get(x_152, 0); +lean_inc(x_200); +x_201 = lean_ctor_get(x_152, 1); +lean_inc(x_201); if (lean_is_exclusive(x_152)) { lean_ctor_release(x_152, 0); lean_ctor_release(x_152, 1); - x_193 = x_152; + x_202 = x_152; } else { lean_dec_ref(x_152); - x_193 = lean_box(0); + x_202 = lean_box(0); } -if (lean_is_scalar(x_193)) { - x_194 = lean_alloc_ctor(1, 2, 0); +if (lean_is_scalar(x_202)) { + x_203 = lean_alloc_ctor(1, 2, 0); } else { - x_194 = x_193; + x_203 = x_202; } -lean_ctor_set(x_194, 0, x_191); -lean_ctor_set(x_194, 1, x_192); -return x_194; -} -} -else -{ -lean_object* x_195; lean_object* x_196; lean_object* x_197; lean_object* x_198; -lean_dec(x_147); -lean_dec(x_146); -lean_dec(x_145); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_195 = lean_ctor_get(x_148, 0); -lean_inc(x_195); -x_196 = lean_ctor_get(x_148, 1); -lean_inc(x_196); -if (lean_is_exclusive(x_148)) { - lean_ctor_release(x_148, 0); - lean_ctor_release(x_148, 1); - x_197 = x_148; -} else { - lean_dec_ref(x_148); - x_197 = lean_box(0); -} -if (lean_is_scalar(x_197)) { - x_198 = lean_alloc_ctor(1, 2, 0); -} else { - x_198 = x_197; -} -lean_ctor_set(x_198, 0, x_195); -lean_ctor_set(x_198, 1, x_196); -return x_198; +lean_ctor_set(x_203, 0, x_200); +lean_ctor_set(x_203, 1, x_201); +return x_203; } } } } else { -uint8_t x_199; +uint8_t x_204; lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); -x_199 = !lean_is_exclusive(x_8); -if (x_199 == 0) +x_204 = !lean_is_exclusive(x_8); +if (x_204 == 0) { return x_8; } else { -lean_object* x_200; lean_object* x_201; lean_object* x_202; -x_200 = lean_ctor_get(x_8, 0); -x_201 = lean_ctor_get(x_8, 1); -lean_inc(x_201); -lean_inc(x_200); +lean_object* x_205; lean_object* x_206; lean_object* x_207; +x_205 = lean_ctor_get(x_8, 0); +x_206 = lean_ctor_get(x_8, 1); +lean_inc(x_206); +lean_inc(x_205); lean_dec(x_8); -x_202 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_202, 0, x_200); -lean_ctor_set(x_202, 1, x_201); -return x_202; +x_207 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_207, 0, x_205); +lean_ctor_set(x_207, 1, x_206); +return x_207; } } } else { -lean_object* x_203; +lean_object* x_208; lean_dec(x_4); lean_dec(x_3); lean_dec(x_1); -x_203 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_203, 0, x_2); -lean_ctor_set(x_203, 1, x_5); -return x_203; +x_208 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_208, 0, x_2); +lean_ctor_set(x_208, 1, x_5); +return x_208; } } } @@ -11232,11 +11834,51 @@ return x_1; lean_object* _init_l_Lean_Meta_mkNoConfusion___closed__4() { _start: { +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Meta_mkNoConfusion___closed__3; +x_2 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* _init_l_Lean_Meta_mkNoConfusion___closed__5() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Meta_mkNoConfusion___closed__4; +x_2 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* _init_l_Lean_Meta_mkNoConfusion___closed__6() { +_start: +{ lean_object* x_1; x_1 = lean_mk_string("inductive type expected"); return x_1; } } +lean_object* _init_l_Lean_Meta_mkNoConfusion___closed__7() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Meta_mkNoConfusion___closed__6; +x_2 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* _init_l_Lean_Meta_mkNoConfusion___closed__8() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Meta_mkNoConfusion___closed__7; +x_2 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} lean_object* l_Lean_Meta_mkNoConfusion(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { @@ -11269,7 +11911,6 @@ x_14 = l_Lean_Expr_isAppOfArity___main(x_10, x_12, x_13); if (x_14 == 0) { lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; -lean_dec(x_10); lean_dec(x_1); x_15 = lean_ctor_get(x_11, 0); lean_inc(x_15); @@ -11288,15 +11929,16 @@ lean_ctor_set(x_20, 0, x_15); lean_ctor_set(x_20, 1, x_16); lean_ctor_set(x_20, 2, x_17); lean_ctor_set(x_20, 3, x_19); -x_21 = l_Lean_mkOptionalNode___closed__2; -x_22 = lean_array_push(x_21, x_2); -x_23 = l_Lean_Meta_mkNoConfusion___closed__2; -x_24 = l_Lean_Meta_mkNoConfusion___closed__3; -x_25 = lean_alloc_ctor(16, 4, 0); -lean_ctor_set(x_25, 0, x_23); -lean_ctor_set(x_25, 1, x_24); -lean_ctor_set(x_25, 2, x_22); -lean_ctor_set(x_25, 3, x_20); +x_21 = l___private_Lean_Meta_AppBuilder_2__hasTypeMsg(x_2, x_10); +x_22 = l_Lean_Meta_mkNoConfusion___closed__5; +x_23 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_23, 0, x_22); +lean_ctor_set(x_23, 1, x_21); +x_24 = l_Lean_Meta_mkNoConfusion___closed__2; +x_25 = lean_alloc_ctor(16, 3, 0); +lean_ctor_set(x_25, 0, x_24); +lean_ctor_set(x_25, 1, x_23); +lean_ctor_set(x_25, 2, x_20); lean_ctor_set_tag(x_8, 1); lean_ctor_set(x_8, 0, x_25); return x_8; @@ -11317,7 +11959,7 @@ lean_inc(x_3); x_31 = l_Lean_Meta_whnf(x_28, x_3, x_11); if (lean_obj_tag(x_31) == 0) { -lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_49; lean_object* x_50; +lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_50; lean_object* x_51; x_32 = lean_ctor_get(x_31, 0); lean_inc(x_32); x_33 = lean_ctor_get(x_31, 1); @@ -11330,191 +11972,191 @@ if (lean_is_exclusive(x_31)) { lean_dec_ref(x_31); x_34 = lean_box(0); } -x_49 = lean_ctor_get(x_33, 0); -lean_inc(x_49); -x_50 = l_Lean_Expr_getAppFn___main(x_32); -if (lean_obj_tag(x_50) == 4) +x_50 = lean_ctor_get(x_33, 0); +lean_inc(x_50); +x_51 = l_Lean_Expr_getAppFn___main(x_32); +if (lean_obj_tag(x_51) == 4) { -lean_object* x_51; lean_object* x_52; lean_object* x_53; -x_51 = lean_ctor_get(x_50, 0); -lean_inc(x_51); -x_52 = lean_ctor_get(x_50, 1); +lean_object* x_52; lean_object* x_53; lean_object* x_54; +x_52 = lean_ctor_get(x_51, 0); lean_inc(x_52); -lean_dec(x_50); -x_53 = lean_environment_find(x_49, x_51); -if (lean_obj_tag(x_53) == 0) +x_53 = lean_ctor_get(x_51, 1); +lean_inc(x_53); +lean_dec(x_51); +x_54 = lean_environment_find(x_50, x_52); +if (lean_obj_tag(x_54) == 0) { -lean_object* x_54; -lean_dec(x_52); +lean_object* x_55; +lean_dec(x_53); lean_dec(x_30); lean_dec(x_29); lean_dec(x_2); lean_dec(x_1); -x_54 = lean_box(0); -x_35 = x_54; -goto block_48; +x_55 = lean_box(0); +x_35 = x_55; +goto block_49; } else { -lean_object* x_55; -x_55 = lean_ctor_get(x_53, 0); -lean_inc(x_55); -lean_dec(x_53); -if (lean_obj_tag(x_55) == 5) -{ -lean_object* x_56; lean_object* x_57; -lean_dec(x_34); -x_56 = lean_ctor_get(x_55, 0); +lean_object* x_56; +x_56 = lean_ctor_get(x_54, 0); lean_inc(x_56); -lean_dec(x_55); +lean_dec(x_54); +if (lean_obj_tag(x_56) == 5) +{ +lean_object* x_57; lean_object* x_58; +lean_dec(x_34); +x_57 = lean_ctor_get(x_56, 0); +lean_inc(x_57); +lean_dec(x_56); lean_inc(x_1); -x_57 = l_Lean_Meta_getLevel(x_1, x_3, x_33); -if (lean_obj_tag(x_57) == 0) +x_58 = l_Lean_Meta_getLevel(x_1, x_3, x_33); +if (lean_obj_tag(x_58) == 0) { -uint8_t x_58; -x_58 = !lean_is_exclusive(x_57); -if (x_58 == 0) +uint8_t x_59; +x_59 = !lean_is_exclusive(x_58); +if (x_59 == 0) { -lean_object* x_59; lean_object* x_60; lean_object* x_61; lean_object* x_62; lean_object* x_63; lean_object* x_64; lean_object* x_65; lean_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_59 = lean_ctor_get(x_57, 0); -x_60 = lean_ctor_get(x_56, 0); -lean_inc(x_60); -lean_dec(x_56); -x_61 = lean_ctor_get(x_60, 0); +lean_object* x_60; lean_object* x_61; lean_object* x_62; lean_object* x_63; lean_object* x_64; lean_object* x_65; lean_object* x_66; lean_object* x_67; lean_object* x_68; lean_object* x_69; lean_object* x_70; lean_object* x_71; lean_object* x_72; lean_object* x_73; lean_object* x_74; lean_object* x_75; lean_object* x_76; lean_object* x_77; lean_object* x_78; lean_object* x_79; lean_object* x_80; +x_60 = lean_ctor_get(x_58, 0); +x_61 = lean_ctor_get(x_57, 0); lean_inc(x_61); -lean_dec(x_60); -x_62 = l_Lean_Meta_mkNoConfusion___closed__1; -x_63 = lean_name_mk_string(x_61, x_62); -x_64 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_64, 0, x_59); -lean_ctor_set(x_64, 1, x_52); -x_65 = l_Lean_mkConst(x_63, x_64); -x_66 = lean_unsigned_to_nat(0u); -x_67 = l_Lean_Expr_getAppNumArgsAux___main(x_32, x_66); -x_68 = l_Lean_Expr_getAppArgs___closed__1; -lean_inc(x_67); -x_69 = lean_mk_array(x_67, x_68); -x_70 = lean_unsigned_to_nat(1u); -x_71 = lean_nat_sub(x_67, x_70); -lean_dec(x_67); -x_72 = l___private_Lean_Expr_3__getAppArgsAux___main(x_32, x_69, x_71); -x_73 = l_Std_PersistentHashMap_mkCollisionNode___rarg___closed__1; -x_74 = lean_array_push(x_73, x_1); -x_75 = lean_array_push(x_74, x_29); -x_76 = lean_array_push(x_75, x_30); -x_77 = lean_array_push(x_76, x_2); -x_78 = l_Array_iterateMAux___main___at_Array_append___spec__1___rarg(x_77, x_77, x_66, x_72); -lean_dec(x_77); -x_79 = l_Array_iterateMAux___main___at_Lean_mkAppN___spec__1(x_78, x_78, x_66, x_65); -lean_dec(x_78); -lean_ctor_set(x_57, 0, x_79); -return x_57; -} -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; 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; lean_object* x_102; -x_80 = lean_ctor_get(x_57, 0); -x_81 = lean_ctor_get(x_57, 1); -lean_inc(x_81); -lean_inc(x_80); lean_dec(x_57); -x_82 = lean_ctor_get(x_56, 0); +x_62 = lean_ctor_get(x_61, 0); +lean_inc(x_62); +lean_dec(x_61); +x_63 = l_Lean_Meta_mkNoConfusion___closed__1; +x_64 = lean_name_mk_string(x_62, x_63); +x_65 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_65, 0, x_60); +lean_ctor_set(x_65, 1, x_53); +x_66 = l_Lean_mkConst(x_64, x_65); +x_67 = lean_unsigned_to_nat(0u); +x_68 = l_Lean_Expr_getAppNumArgsAux___main(x_32, x_67); +x_69 = l_Lean_Expr_getAppArgs___closed__1; +lean_inc(x_68); +x_70 = lean_mk_array(x_68, x_69); +x_71 = lean_unsigned_to_nat(1u); +x_72 = lean_nat_sub(x_68, x_71); +lean_dec(x_68); +x_73 = l___private_Lean_Expr_3__getAppArgsAux___main(x_32, x_70, x_72); +x_74 = l_Std_PersistentHashMap_mkCollisionNode___rarg___closed__1; +x_75 = lean_array_push(x_74, x_1); +x_76 = lean_array_push(x_75, x_29); +x_77 = lean_array_push(x_76, x_30); +x_78 = lean_array_push(x_77, x_2); +x_79 = l_Array_iterateMAux___main___at_Array_append___spec__1___rarg(x_78, x_78, x_67, x_73); +lean_dec(x_78); +x_80 = l_Array_iterateMAux___main___at_Lean_mkAppN___spec__1(x_79, x_79, x_67, x_66); +lean_dec(x_79); +lean_ctor_set(x_58, 0, x_80); +return x_58; +} +else +{ +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; lean_object* x_102; lean_object* x_103; +x_81 = lean_ctor_get(x_58, 0); +x_82 = lean_ctor_get(x_58, 1); lean_inc(x_82); -lean_dec(x_56); -x_83 = lean_ctor_get(x_82, 0); +lean_inc(x_81); +lean_dec(x_58); +x_83 = lean_ctor_get(x_57, 0); lean_inc(x_83); -lean_dec(x_82); -x_84 = l_Lean_Meta_mkNoConfusion___closed__1; -x_85 = lean_name_mk_string(x_83, x_84); -x_86 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_86, 0, x_80); -lean_ctor_set(x_86, 1, x_52); -x_87 = l_Lean_mkConst(x_85, x_86); -x_88 = lean_unsigned_to_nat(0u); -x_89 = l_Lean_Expr_getAppNumArgsAux___main(x_32, x_88); -x_90 = l_Lean_Expr_getAppArgs___closed__1; -lean_inc(x_89); -x_91 = lean_mk_array(x_89, x_90); -x_92 = lean_unsigned_to_nat(1u); -x_93 = lean_nat_sub(x_89, x_92); -lean_dec(x_89); -x_94 = l___private_Lean_Expr_3__getAppArgsAux___main(x_32, x_91, x_93); -x_95 = l_Std_PersistentHashMap_mkCollisionNode___rarg___closed__1; -x_96 = lean_array_push(x_95, x_1); -x_97 = lean_array_push(x_96, x_29); -x_98 = lean_array_push(x_97, x_30); -x_99 = lean_array_push(x_98, x_2); -x_100 = l_Array_iterateMAux___main___at_Array_append___spec__1___rarg(x_99, x_99, x_88, x_94); -lean_dec(x_99); -x_101 = l_Array_iterateMAux___main___at_Lean_mkAppN___spec__1(x_100, x_100, x_88, x_87); +lean_dec(x_57); +x_84 = lean_ctor_get(x_83, 0); +lean_inc(x_84); +lean_dec(x_83); +x_85 = l_Lean_Meta_mkNoConfusion___closed__1; +x_86 = lean_name_mk_string(x_84, x_85); +x_87 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_87, 0, x_81); +lean_ctor_set(x_87, 1, x_53); +x_88 = l_Lean_mkConst(x_86, x_87); +x_89 = lean_unsigned_to_nat(0u); +x_90 = l_Lean_Expr_getAppNumArgsAux___main(x_32, x_89); +x_91 = l_Lean_Expr_getAppArgs___closed__1; +lean_inc(x_90); +x_92 = lean_mk_array(x_90, x_91); +x_93 = lean_unsigned_to_nat(1u); +x_94 = lean_nat_sub(x_90, x_93); +lean_dec(x_90); +x_95 = l___private_Lean_Expr_3__getAppArgsAux___main(x_32, x_92, x_94); +x_96 = l_Std_PersistentHashMap_mkCollisionNode___rarg___closed__1; +x_97 = lean_array_push(x_96, x_1); +x_98 = lean_array_push(x_97, x_29); +x_99 = lean_array_push(x_98, x_30); +x_100 = lean_array_push(x_99, x_2); +x_101 = l_Array_iterateMAux___main___at_Array_append___spec__1___rarg(x_100, x_100, x_89, x_95); lean_dec(x_100); -x_102 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_102, 0, x_101); -lean_ctor_set(x_102, 1, x_81); -return x_102; +x_102 = l_Array_iterateMAux___main___at_Lean_mkAppN___spec__1(x_101, x_101, x_89, x_88); +lean_dec(x_101); +x_103 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_103, 0, x_102); +lean_ctor_set(x_103, 1, x_82); +return x_103; } } else { -uint8_t x_103; -lean_dec(x_56); -lean_dec(x_52); +uint8_t x_104; +lean_dec(x_57); +lean_dec(x_53); lean_dec(x_32); lean_dec(x_30); lean_dec(x_29); lean_dec(x_2); lean_dec(x_1); -x_103 = !lean_is_exclusive(x_57); -if (x_103 == 0) +x_104 = !lean_is_exclusive(x_58); +if (x_104 == 0) { -return x_57; +return x_58; } else { -lean_object* x_104; lean_object* x_105; lean_object* x_106; -x_104 = lean_ctor_get(x_57, 0); -x_105 = lean_ctor_get(x_57, 1); +lean_object* x_105; lean_object* x_106; lean_object* x_107; +x_105 = lean_ctor_get(x_58, 0); +x_106 = lean_ctor_get(x_58, 1); +lean_inc(x_106); lean_inc(x_105); -lean_inc(x_104); -lean_dec(x_57); -x_106 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_106, 0, x_104); -lean_ctor_set(x_106, 1, x_105); -return x_106; -} -} -} -else -{ -lean_object* x_107; -lean_dec(x_55); -lean_dec(x_52); -lean_dec(x_30); -lean_dec(x_29); -lean_dec(x_2); -lean_dec(x_1); -x_107 = lean_box(0); -x_35 = x_107; -goto block_48; +lean_dec(x_58); +x_107 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_107, 0, x_105); +lean_ctor_set(x_107, 1, x_106); +return x_107; } } } else { lean_object* x_108; -lean_dec(x_50); -lean_dec(x_49); +lean_dec(x_56); +lean_dec(x_53); lean_dec(x_30); lean_dec(x_29); lean_dec(x_2); lean_dec(x_1); x_108 = lean_box(0); x_35 = x_108; -goto block_48; +goto block_49; } -block_48: +} +} +else { -lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; +lean_object* x_109; +lean_dec(x_51); +lean_dec(x_50); +lean_dec(x_30); +lean_dec(x_29); +lean_dec(x_2); +lean_dec(x_1); +x_109 = lean_box(0); +x_35 = x_109; +goto block_49; +} +block_49: +{ +lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; lean_object* x_48; lean_dec(x_35); x_36 = lean_ctor_get(x_33, 0); lean_inc(x_36); @@ -11533,405 +12175,411 @@ lean_ctor_set(x_41, 0, x_36); lean_ctor_set(x_41, 1, x_37); lean_ctor_set(x_41, 2, x_38); lean_ctor_set(x_41, 3, x_40); -x_42 = l_Lean_mkOptionalNode___closed__2; -x_43 = lean_array_push(x_42, x_32); -x_44 = l_Lean_Meta_mkNoConfusion___closed__2; -x_45 = l_Lean_Meta_mkNoConfusion___closed__4; -x_46 = lean_alloc_ctor(16, 4, 0); -lean_ctor_set(x_46, 0, x_44); -lean_ctor_set(x_46, 1, x_45); -lean_ctor_set(x_46, 2, x_43); -lean_ctor_set(x_46, 3, x_41); -if (lean_is_scalar(x_34)) { - x_47 = lean_alloc_ctor(1, 2, 0); -} else { - x_47 = x_34; - lean_ctor_set_tag(x_47, 1); -} +x_42 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_42, 0, x_32); +x_43 = l_Lean_indentExpr(x_42); +x_44 = l_Lean_Meta_mkNoConfusion___closed__8; +x_45 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_45, 0, x_44); +lean_ctor_set(x_45, 1, x_43); +x_46 = l_Lean_Meta_mkNoConfusion___closed__2; +x_47 = lean_alloc_ctor(16, 3, 0); lean_ctor_set(x_47, 0, x_46); -lean_ctor_set(x_47, 1, x_33); -return x_47; +lean_ctor_set(x_47, 1, x_45); +lean_ctor_set(x_47, 2, x_41); +if (lean_is_scalar(x_34)) { + x_48 = lean_alloc_ctor(1, 2, 0); +} else { + x_48 = x_34; + lean_ctor_set_tag(x_48, 1); +} +lean_ctor_set(x_48, 0, x_47); +lean_ctor_set(x_48, 1, x_33); +return x_48; } } else { -uint8_t x_109; +uint8_t x_110; lean_dec(x_30); lean_dec(x_29); lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); -x_109 = !lean_is_exclusive(x_31); -if (x_109 == 0) +x_110 = !lean_is_exclusive(x_31); +if (x_110 == 0) { return x_31; } else { -lean_object* x_110; lean_object* x_111; lean_object* x_112; -x_110 = lean_ctor_get(x_31, 0); -x_111 = lean_ctor_get(x_31, 1); +lean_object* x_111; lean_object* x_112; lean_object* x_113; +x_111 = lean_ctor_get(x_31, 0); +x_112 = lean_ctor_get(x_31, 1); +lean_inc(x_112); lean_inc(x_111); -lean_inc(x_110); lean_dec(x_31); -x_112 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_112, 0, x_110); -lean_ctor_set(x_112, 1, x_111); -return x_112; +x_113 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_113, 0, x_111); +lean_ctor_set(x_113, 1, x_112); +return x_113; } } } } else { -lean_object* x_113; lean_object* x_114; lean_object* x_115; lean_object* x_116; uint8_t x_117; -x_113 = lean_ctor_get(x_8, 0); -x_114 = lean_ctor_get(x_8, 1); +lean_object* x_114; lean_object* x_115; lean_object* x_116; lean_object* x_117; uint8_t x_118; +x_114 = lean_ctor_get(x_8, 0); +x_115 = lean_ctor_get(x_8, 1); +lean_inc(x_115); lean_inc(x_114); -lean_inc(x_113); lean_dec(x_8); -x_115 = l_Lean_Expr_eq_x3f___closed__2; -x_116 = lean_unsigned_to_nat(3u); -x_117 = l_Lean_Expr_isAppOfArity___main(x_113, x_115, x_116); -if (x_117 == 0) +x_116 = l_Lean_Expr_eq_x3f___closed__2; +x_117 = lean_unsigned_to_nat(3u); +x_118 = l_Lean_Expr_isAppOfArity___main(x_114, x_116, x_117); +if (x_118 == 0) { -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_dec(x_113); +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_dec(x_1); -x_118 = lean_ctor_get(x_114, 0); -lean_inc(x_118); -x_119 = lean_ctor_get(x_114, 1); +x_119 = lean_ctor_get(x_115, 0); lean_inc(x_119); -x_120 = lean_ctor_get(x_3, 1); +x_120 = lean_ctor_get(x_115, 1); lean_inc(x_120); -x_121 = lean_ctor_get(x_3, 0); +x_121 = lean_ctor_get(x_3, 1); lean_inc(x_121); -lean_dec(x_3); -x_122 = lean_ctor_get(x_121, 0); +x_122 = lean_ctor_get(x_3, 0); lean_inc(x_122); -lean_dec(x_121); -x_123 = lean_alloc_ctor(0, 4, 0); -lean_ctor_set(x_123, 0, x_118); -lean_ctor_set(x_123, 1, x_119); -lean_ctor_set(x_123, 2, x_120); -lean_ctor_set(x_123, 3, x_122); -x_124 = l_Lean_mkOptionalNode___closed__2; -x_125 = lean_array_push(x_124, x_2); -x_126 = l_Lean_Meta_mkNoConfusion___closed__2; -x_127 = l_Lean_Meta_mkNoConfusion___closed__3; -x_128 = lean_alloc_ctor(16, 4, 0); -lean_ctor_set(x_128, 0, x_126); -lean_ctor_set(x_128, 1, x_127); -lean_ctor_set(x_128, 2, x_125); -lean_ctor_set(x_128, 3, x_123); -x_129 = lean_alloc_ctor(1, 2, 0); +lean_dec(x_3); +x_123 = lean_ctor_get(x_122, 0); +lean_inc(x_123); +lean_dec(x_122); +x_124 = lean_alloc_ctor(0, 4, 0); +lean_ctor_set(x_124, 0, x_119); +lean_ctor_set(x_124, 1, x_120); +lean_ctor_set(x_124, 2, x_121); +lean_ctor_set(x_124, 3, x_123); +x_125 = l___private_Lean_Meta_AppBuilder_2__hasTypeMsg(x_2, x_114); +x_126 = l_Lean_Meta_mkNoConfusion___closed__5; +x_127 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_127, 0, x_126); +lean_ctor_set(x_127, 1, x_125); +x_128 = l_Lean_Meta_mkNoConfusion___closed__2; +x_129 = lean_alloc_ctor(16, 3, 0); lean_ctor_set(x_129, 0, x_128); -lean_ctor_set(x_129, 1, x_114); -return x_129; +lean_ctor_set(x_129, 1, x_127); +lean_ctor_set(x_129, 2, x_124); +x_130 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_130, 0, x_129); +lean_ctor_set(x_130, 1, x_115); +return x_130; } else { -lean_object* x_130; lean_object* x_131; lean_object* x_132; lean_object* x_133; lean_object* x_134; lean_object* x_135; -x_130 = l_Lean_Expr_appFn_x21(x_113); -x_131 = l_Lean_Expr_appFn_x21(x_130); -x_132 = l_Lean_Expr_appArg_x21(x_131); +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_131 = l_Lean_Expr_appFn_x21(x_114); +x_132 = l_Lean_Expr_appFn_x21(x_131); +x_133 = l_Lean_Expr_appArg_x21(x_132); +lean_dec(x_132); +x_134 = l_Lean_Expr_appArg_x21(x_131); lean_dec(x_131); -x_133 = l_Lean_Expr_appArg_x21(x_130); -lean_dec(x_130); -x_134 = l_Lean_Expr_appArg_x21(x_113); -lean_dec(x_113); +x_135 = l_Lean_Expr_appArg_x21(x_114); +lean_dec(x_114); lean_inc(x_3); -x_135 = l_Lean_Meta_whnf(x_132, x_3, x_114); -if (lean_obj_tag(x_135) == 0) +x_136 = l_Lean_Meta_whnf(x_133, x_3, x_115); +if (lean_obj_tag(x_136) == 0) { -lean_object* x_136; lean_object* x_137; lean_object* x_138; lean_object* x_139; lean_object* x_153; lean_object* x_154; -x_136 = lean_ctor_get(x_135, 0); -lean_inc(x_136); -x_137 = lean_ctor_get(x_135, 1); +lean_object* x_137; lean_object* x_138; lean_object* x_139; lean_object* x_140; lean_object* x_155; lean_object* x_156; +x_137 = lean_ctor_get(x_136, 0); lean_inc(x_137); -if (lean_is_exclusive(x_135)) { - lean_ctor_release(x_135, 0); - lean_ctor_release(x_135, 1); - x_138 = x_135; +x_138 = lean_ctor_get(x_136, 1); +lean_inc(x_138); +if (lean_is_exclusive(x_136)) { + lean_ctor_release(x_136, 0); + lean_ctor_release(x_136, 1); + x_139 = x_136; } else { - lean_dec_ref(x_135); - x_138 = lean_box(0); + lean_dec_ref(x_136); + x_139 = lean_box(0); } -x_153 = lean_ctor_get(x_137, 0); -lean_inc(x_153); -x_154 = l_Lean_Expr_getAppFn___main(x_136); -if (lean_obj_tag(x_154) == 4) -{ -lean_object* x_155; lean_object* x_156; lean_object* x_157; -x_155 = lean_ctor_get(x_154, 0); +x_155 = lean_ctor_get(x_138, 0); lean_inc(x_155); -x_156 = lean_ctor_get(x_154, 1); -lean_inc(x_156); -lean_dec(x_154); -x_157 = lean_environment_find(x_153, x_155); -if (lean_obj_tag(x_157) == 0) +x_156 = l_Lean_Expr_getAppFn___main(x_137); +if (lean_obj_tag(x_156) == 4) { -lean_object* x_158; +lean_object* x_157; lean_object* x_158; lean_object* x_159; +x_157 = lean_ctor_get(x_156, 0); +lean_inc(x_157); +x_158 = lean_ctor_get(x_156, 1); +lean_inc(x_158); lean_dec(x_156); +x_159 = lean_environment_find(x_155, x_157); +if (lean_obj_tag(x_159) == 0) +{ +lean_object* x_160; +lean_dec(x_158); +lean_dec(x_135); lean_dec(x_134); -lean_dec(x_133); lean_dec(x_2); lean_dec(x_1); -x_158 = lean_box(0); -x_139 = x_158; -goto block_152; +x_160 = lean_box(0); +x_140 = x_160; +goto block_154; } else { -lean_object* x_159; -x_159 = lean_ctor_get(x_157, 0); -lean_inc(x_159); -lean_dec(x_157); -if (lean_obj_tag(x_159) == 5) -{ -lean_object* x_160; lean_object* x_161; -lean_dec(x_138); -x_160 = lean_ctor_get(x_159, 0); -lean_inc(x_160); +lean_object* x_161; +x_161 = lean_ctor_get(x_159, 0); +lean_inc(x_161); lean_dec(x_159); -lean_inc(x_1); -x_161 = l_Lean_Meta_getLevel(x_1, x_3, x_137); -if (lean_obj_tag(x_161) == 0) +if (lean_obj_tag(x_161) == 5) { -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; lean_object* x_185; +lean_object* x_162; lean_object* x_163; +lean_dec(x_139); x_162 = lean_ctor_get(x_161, 0); lean_inc(x_162); -x_163 = lean_ctor_get(x_161, 1); -lean_inc(x_163); -if (lean_is_exclusive(x_161)) { - lean_ctor_release(x_161, 0); - lean_ctor_release(x_161, 1); - x_164 = x_161; -} else { - lean_dec_ref(x_161); - x_164 = lean_box(0); -} -x_165 = lean_ctor_get(x_160, 0); +lean_dec(x_161); +lean_inc(x_1); +x_163 = l_Lean_Meta_getLevel(x_1, x_3, x_138); +if (lean_obj_tag(x_163) == 0) +{ +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; lean_object* x_186; lean_object* x_187; +x_164 = lean_ctor_get(x_163, 0); +lean_inc(x_164); +x_165 = lean_ctor_get(x_163, 1); lean_inc(x_165); -lean_dec(x_160); -x_166 = lean_ctor_get(x_165, 0); -lean_inc(x_166); -lean_dec(x_165); -x_167 = l_Lean_Meta_mkNoConfusion___closed__1; -x_168 = lean_name_mk_string(x_166, x_167); -x_169 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_169, 0, x_162); -lean_ctor_set(x_169, 1, x_156); -x_170 = l_Lean_mkConst(x_168, x_169); -x_171 = lean_unsigned_to_nat(0u); -x_172 = l_Lean_Expr_getAppNumArgsAux___main(x_136, x_171); -x_173 = l_Lean_Expr_getAppArgs___closed__1; -lean_inc(x_172); -x_174 = lean_mk_array(x_172, x_173); -x_175 = lean_unsigned_to_nat(1u); -x_176 = lean_nat_sub(x_172, x_175); -lean_dec(x_172); -x_177 = l___private_Lean_Expr_3__getAppArgsAux___main(x_136, x_174, x_176); -x_178 = l_Std_PersistentHashMap_mkCollisionNode___rarg___closed__1; -x_179 = lean_array_push(x_178, x_1); -x_180 = lean_array_push(x_179, x_133); -x_181 = lean_array_push(x_180, x_134); -x_182 = lean_array_push(x_181, x_2); -x_183 = l_Array_iterateMAux___main___at_Array_append___spec__1___rarg(x_182, x_182, x_171, x_177); -lean_dec(x_182); -x_184 = l_Array_iterateMAux___main___at_Lean_mkAppN___spec__1(x_183, x_183, x_171, x_170); -lean_dec(x_183); -if (lean_is_scalar(x_164)) { - x_185 = lean_alloc_ctor(0, 2, 0); +if (lean_is_exclusive(x_163)) { + lean_ctor_release(x_163, 0); + lean_ctor_release(x_163, 1); + x_166 = x_163; } else { - x_185 = x_164; + lean_dec_ref(x_163); + x_166 = lean_box(0); } -lean_ctor_set(x_185, 0, x_184); -lean_ctor_set(x_185, 1, x_163); -return x_185; +x_167 = lean_ctor_get(x_162, 0); +lean_inc(x_167); +lean_dec(x_162); +x_168 = lean_ctor_get(x_167, 0); +lean_inc(x_168); +lean_dec(x_167); +x_169 = l_Lean_Meta_mkNoConfusion___closed__1; +x_170 = lean_name_mk_string(x_168, x_169); +x_171 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_171, 0, x_164); +lean_ctor_set(x_171, 1, x_158); +x_172 = l_Lean_mkConst(x_170, x_171); +x_173 = lean_unsigned_to_nat(0u); +x_174 = l_Lean_Expr_getAppNumArgsAux___main(x_137, x_173); +x_175 = l_Lean_Expr_getAppArgs___closed__1; +lean_inc(x_174); +x_176 = lean_mk_array(x_174, x_175); +x_177 = lean_unsigned_to_nat(1u); +x_178 = lean_nat_sub(x_174, x_177); +lean_dec(x_174); +x_179 = l___private_Lean_Expr_3__getAppArgsAux___main(x_137, x_176, x_178); +x_180 = l_Std_PersistentHashMap_mkCollisionNode___rarg___closed__1; +x_181 = lean_array_push(x_180, x_1); +x_182 = lean_array_push(x_181, x_134); +x_183 = lean_array_push(x_182, x_135); +x_184 = lean_array_push(x_183, x_2); +x_185 = l_Array_iterateMAux___main___at_Array_append___spec__1___rarg(x_184, x_184, x_173, x_179); +lean_dec(x_184); +x_186 = l_Array_iterateMAux___main___at_Lean_mkAppN___spec__1(x_185, x_185, x_173, x_172); +lean_dec(x_185); +if (lean_is_scalar(x_166)) { + x_187 = lean_alloc_ctor(0, 2, 0); +} else { + x_187 = x_166; +} +lean_ctor_set(x_187, 0, x_186); +lean_ctor_set(x_187, 1, x_165); +return x_187; } else { -lean_object* x_186; lean_object* x_187; lean_object* x_188; lean_object* x_189; -lean_dec(x_160); +lean_object* x_188; lean_object* x_189; lean_object* x_190; lean_object* x_191; +lean_dec(x_162); +lean_dec(x_158); +lean_dec(x_137); +lean_dec(x_135); +lean_dec(x_134); +lean_dec(x_2); +lean_dec(x_1); +x_188 = lean_ctor_get(x_163, 0); +lean_inc(x_188); +x_189 = lean_ctor_get(x_163, 1); +lean_inc(x_189); +if (lean_is_exclusive(x_163)) { + lean_ctor_release(x_163, 0); + lean_ctor_release(x_163, 1); + x_190 = x_163; +} else { + lean_dec_ref(x_163); + x_190 = lean_box(0); +} +if (lean_is_scalar(x_190)) { + x_191 = lean_alloc_ctor(1, 2, 0); +} else { + x_191 = x_190; +} +lean_ctor_set(x_191, 0, x_188); +lean_ctor_set(x_191, 1, x_189); +return x_191; +} +} +else +{ +lean_object* x_192; +lean_dec(x_161); +lean_dec(x_158); +lean_dec(x_135); +lean_dec(x_134); +lean_dec(x_2); +lean_dec(x_1); +x_192 = lean_box(0); +x_140 = x_192; +goto block_154; +} +} +} +else +{ +lean_object* x_193; lean_dec(x_156); -lean_dec(x_136); +lean_dec(x_155); +lean_dec(x_135); lean_dec(x_134); -lean_dec(x_133); lean_dec(x_2); lean_dec(x_1); -x_186 = lean_ctor_get(x_161, 0); -lean_inc(x_186); -x_187 = lean_ctor_get(x_161, 1); -lean_inc(x_187); -if (lean_is_exclusive(x_161)) { - lean_ctor_release(x_161, 0); - lean_ctor_release(x_161, 1); - x_188 = x_161; -} else { - lean_dec_ref(x_161); - x_188 = lean_box(0); +x_193 = lean_box(0); +x_140 = x_193; +goto block_154; } -if (lean_is_scalar(x_188)) { - x_189 = lean_alloc_ctor(1, 2, 0); -} else { - x_189 = x_188; -} -lean_ctor_set(x_189, 0, x_186); -lean_ctor_set(x_189, 1, x_187); -return x_189; -} -} -else +block_154: { -lean_object* x_190; -lean_dec(x_159); -lean_dec(x_156); -lean_dec(x_134); -lean_dec(x_133); -lean_dec(x_2); -lean_dec(x_1); -x_190 = lean_box(0); -x_139 = x_190; -goto block_152; -} -} -} -else -{ -lean_object* x_191; -lean_dec(x_154); -lean_dec(x_153); -lean_dec(x_134); -lean_dec(x_133); -lean_dec(x_2); -lean_dec(x_1); -x_191 = lean_box(0); -x_139 = x_191; -goto block_152; -} -block_152: -{ -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_dec(x_139); -x_140 = lean_ctor_get(x_137, 0); -lean_inc(x_140); -x_141 = lean_ctor_get(x_137, 1); +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_dec(x_140); +x_141 = lean_ctor_get(x_138, 0); lean_inc(x_141); -x_142 = lean_ctor_get(x_3, 1); +x_142 = lean_ctor_get(x_138, 1); lean_inc(x_142); -x_143 = lean_ctor_get(x_3, 0); +x_143 = lean_ctor_get(x_3, 1); lean_inc(x_143); -lean_dec(x_3); -x_144 = lean_ctor_get(x_143, 0); +x_144 = lean_ctor_get(x_3, 0); lean_inc(x_144); -lean_dec(x_143); -x_145 = lean_alloc_ctor(0, 4, 0); -lean_ctor_set(x_145, 0, x_140); -lean_ctor_set(x_145, 1, x_141); -lean_ctor_set(x_145, 2, x_142); -lean_ctor_set(x_145, 3, x_144); -x_146 = l_Lean_mkOptionalNode___closed__2; -x_147 = lean_array_push(x_146, x_136); -x_148 = l_Lean_Meta_mkNoConfusion___closed__2; -x_149 = l_Lean_Meta_mkNoConfusion___closed__4; -x_150 = lean_alloc_ctor(16, 4, 0); -lean_ctor_set(x_150, 0, x_148); -lean_ctor_set(x_150, 1, x_149); -lean_ctor_set(x_150, 2, x_147); -lean_ctor_set(x_150, 3, x_145); -if (lean_is_scalar(x_138)) { - x_151 = lean_alloc_ctor(1, 2, 0); +lean_dec(x_3); +x_145 = lean_ctor_get(x_144, 0); +lean_inc(x_145); +lean_dec(x_144); +x_146 = lean_alloc_ctor(0, 4, 0); +lean_ctor_set(x_146, 0, x_141); +lean_ctor_set(x_146, 1, x_142); +lean_ctor_set(x_146, 2, x_143); +lean_ctor_set(x_146, 3, x_145); +x_147 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_147, 0, x_137); +x_148 = l_Lean_indentExpr(x_147); +x_149 = l_Lean_Meta_mkNoConfusion___closed__8; +x_150 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_150, 0, x_149); +lean_ctor_set(x_150, 1, x_148); +x_151 = l_Lean_Meta_mkNoConfusion___closed__2; +x_152 = lean_alloc_ctor(16, 3, 0); +lean_ctor_set(x_152, 0, x_151); +lean_ctor_set(x_152, 1, x_150); +lean_ctor_set(x_152, 2, x_146); +if (lean_is_scalar(x_139)) { + x_153 = lean_alloc_ctor(1, 2, 0); } else { - x_151 = x_138; - lean_ctor_set_tag(x_151, 1); + x_153 = x_139; + lean_ctor_set_tag(x_153, 1); } -lean_ctor_set(x_151, 0, x_150); -lean_ctor_set(x_151, 1, x_137); -return x_151; +lean_ctor_set(x_153, 0, x_152); +lean_ctor_set(x_153, 1, x_138); +return x_153; } } else { -lean_object* x_192; lean_object* x_193; lean_object* x_194; lean_object* x_195; +lean_object* x_194; lean_object* x_195; lean_object* x_196; lean_object* x_197; +lean_dec(x_135); lean_dec(x_134); -lean_dec(x_133); lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); -x_192 = lean_ctor_get(x_135, 0); -lean_inc(x_192); -x_193 = lean_ctor_get(x_135, 1); -lean_inc(x_193); -if (lean_is_exclusive(x_135)) { - lean_ctor_release(x_135, 0); - lean_ctor_release(x_135, 1); - x_194 = x_135; +x_194 = lean_ctor_get(x_136, 0); +lean_inc(x_194); +x_195 = lean_ctor_get(x_136, 1); +lean_inc(x_195); +if (lean_is_exclusive(x_136)) { + lean_ctor_release(x_136, 0); + lean_ctor_release(x_136, 1); + x_196 = x_136; } else { - lean_dec_ref(x_135); - x_194 = lean_box(0); + lean_dec_ref(x_136); + x_196 = lean_box(0); } -if (lean_is_scalar(x_194)) { - x_195 = lean_alloc_ctor(1, 2, 0); +if (lean_is_scalar(x_196)) { + x_197 = lean_alloc_ctor(1, 2, 0); } else { - x_195 = x_194; + x_197 = x_196; } -lean_ctor_set(x_195, 0, x_192); -lean_ctor_set(x_195, 1, x_193); -return x_195; +lean_ctor_set(x_197, 0, x_194); +lean_ctor_set(x_197, 1, x_195); +return x_197; } } } } else { -uint8_t x_196; +uint8_t x_198; lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); -x_196 = !lean_is_exclusive(x_8); -if (x_196 == 0) +x_198 = !lean_is_exclusive(x_8); +if (x_198 == 0) { return x_8; } else { -lean_object* x_197; lean_object* x_198; lean_object* x_199; -x_197 = lean_ctor_get(x_8, 0); -x_198 = lean_ctor_get(x_8, 1); -lean_inc(x_198); -lean_inc(x_197); +lean_object* x_199; lean_object* x_200; lean_object* x_201; +x_199 = lean_ctor_get(x_8, 0); +x_200 = lean_ctor_get(x_8, 1); +lean_inc(x_200); +lean_inc(x_199); lean_dec(x_8); -x_199 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_199, 0, x_197); -lean_ctor_set(x_199, 1, x_198); -return x_199; +x_201 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_201, 0, x_199); +lean_ctor_set(x_201, 1, x_200); +return x_201; } } } else { -uint8_t x_200; +uint8_t x_202; lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); -x_200 = !lean_is_exclusive(x_5); -if (x_200 == 0) +x_202 = !lean_is_exclusive(x_5); +if (x_202 == 0) { return x_5; } else { -lean_object* x_201; lean_object* x_202; lean_object* x_203; -x_201 = lean_ctor_get(x_5, 0); -x_202 = lean_ctor_get(x_5, 1); -lean_inc(x_202); -lean_inc(x_201); +lean_object* x_203; lean_object* x_204; lean_object* x_205; +x_203 = lean_ctor_get(x_5, 0); +x_204 = lean_ctor_get(x_5, 1); +lean_inc(x_204); +lean_inc(x_203); lean_dec(x_5); -x_203 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_203, 0, x_201); -lean_ctor_set(x_203, 1, x_202); -return x_203; +x_205 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_205, 0, x_203); +lean_ctor_set(x_205, 1, x_204); +return x_205; } } } @@ -12253,11 +12901,79 @@ return x_3; lean_object* _init_l_Lean_Meta_mkProjection___main___closed__3() { _start: { +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_getStructureCtor___closed__2; +x_2 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* _init_l_Lean_Meta_mkProjection___main___closed__4() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Meta_mkProjection___main___closed__3; +x_2 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* _init_l_Lean_Meta_mkProjection___main___closed__5() { +_start: +{ lean_object* x_1; x_1 = lean_mk_string("invalid field name '"); return x_1; } } +lean_object* _init_l_Lean_Meta_mkProjection___main___closed__6() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Meta_mkProjection___main___closed__5; +x_2 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* _init_l_Lean_Meta_mkProjection___main___closed__7() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Meta_mkProjection___main___closed__6; +x_2 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* _init_l_Lean_Meta_mkProjection___main___closed__8() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("' for"); +return x_1; +} +} +lean_object* _init_l_Lean_Meta_mkProjection___main___closed__9() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Meta_mkProjection___main___closed__8; +x_2 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* _init_l_Lean_Meta_mkProjection___main___closed__10() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Meta_mkProjection___main___closed__9; +x_2 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} lean_object* l_Lean_Meta_mkProjection___main(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { @@ -12313,7 +13029,6 @@ if (x_32 == 0) lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_dec(x_29); lean_dec(x_28); -lean_dec(x_10); lean_dec(x_2); x_33 = lean_ctor_get(x_3, 1); lean_inc(x_33); @@ -12328,15 +13043,16 @@ lean_ctor_set(x_36, 0, x_30); lean_ctor_set(x_36, 1, x_31); lean_ctor_set(x_36, 2, x_33); lean_ctor_set(x_36, 3, x_35); -x_37 = l_Lean_mkOptionalNode___closed__2; -x_38 = lean_array_push(x_37, x_1); -x_39 = l_Lean_Meta_mkProjection___main___closed__2; -x_40 = l_Lean_getStructureCtor___closed__2; -x_41 = lean_alloc_ctor(16, 4, 0); -lean_ctor_set(x_41, 0, x_39); -lean_ctor_set(x_41, 1, x_40); -lean_ctor_set(x_41, 2, x_38); -lean_ctor_set(x_41, 3, x_36); +x_37 = l___private_Lean_Meta_AppBuilder_2__hasTypeMsg(x_1, x_10); +x_38 = l_Lean_Meta_mkProjection___main___closed__4; +x_39 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_39, 0, x_38); +lean_ctor_set(x_39, 1, x_37); +x_40 = l_Lean_Meta_mkProjection___main___closed__2; +x_41 = lean_alloc_ctor(16, 3, 0); +lean_ctor_set(x_41, 0, x_40); +lean_ctor_set(x_41, 1, x_39); +lean_ctor_set(x_41, 2, x_36); lean_ctor_set_tag(x_5, 1); lean_ctor_set(x_5, 1, x_11); lean_ctor_set(x_5, 0, x_41); @@ -12354,7 +13070,6 @@ if (lean_obj_tag(x_42) == 0) { lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_dec(x_29); -lean_dec(x_10); lean_free_object(x_5); lean_inc(x_28); lean_inc(x_30); @@ -12376,7 +13091,7 @@ uint8_t x_47; x_47 = !lean_is_exclusive(x_45); if (x_47 == 0) { -lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_object* x_51; lean_object* x_52; lean_object* x_53; lean_object* x_54; lean_object* x_55; lean_object* x_56; lean_object* x_57; lean_object* x_58; lean_object* x_59; lean_object* x_60; lean_object* x_61; lean_object* x_62; lean_object* x_63; lean_object* x_64; lean_object* x_65; +lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_object* x_51; lean_object* x_52; lean_object* x_53; lean_object* x_54; lean_object* x_55; lean_object* x_56; lean_object* x_57; lean_object* x_58; lean_object* x_59; lean_object* x_60; lean_object* x_61; lean_object* x_62; lean_object* x_63; lean_object* x_64; lean_object* x_65; lean_object* x_66; lean_object* x_67; x_48 = lean_ctor_get(x_45, 1); x_49 = lean_ctor_get(x_45, 0); lean_dec(x_49); @@ -12399,165 +13114,182 @@ lean_ctor_set(x_55, 2, x_52); lean_ctor_set(x_55, 3, x_54); x_56 = l_Lean_Name_toString___closed__1; x_57 = l_Lean_Name_toStringWithSep___main(x_56, x_2); -x_58 = l_Lean_Meta_mkProjection___main___closed__3; -x_59 = lean_string_append(x_58, x_57); -lean_dec(x_57); -x_60 = l_Char_HasRepr___closed__1; -x_61 = lean_string_append(x_59, x_60); -x_62 = l_Lean_mkOptionalNode___closed__2; -x_63 = lean_array_push(x_62, x_1); -x_64 = l_Lean_Meta_mkProjection___main___closed__2; -x_65 = lean_alloc_ctor(16, 4, 0); -lean_ctor_set(x_65, 0, x_64); -lean_ctor_set(x_65, 1, x_61); -lean_ctor_set(x_65, 2, x_63); -lean_ctor_set(x_65, 3, x_55); +x_58 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_58, 0, x_57); +x_59 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_59, 0, x_58); +x_60 = l_Lean_Meta_mkProjection___main___closed__7; +x_61 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_61, 0, x_60); +lean_ctor_set(x_61, 1, x_59); +x_62 = l_Lean_Meta_mkProjection___main___closed__10; +x_63 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_63, 0, x_61); +lean_ctor_set(x_63, 1, x_62); +x_64 = l___private_Lean_Meta_AppBuilder_2__hasTypeMsg(x_1, x_10); +x_65 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_65, 0, x_63); +lean_ctor_set(x_65, 1, x_64); +x_66 = l_Lean_Meta_mkProjection___main___closed__2; +x_67 = lean_alloc_ctor(16, 3, 0); +lean_ctor_set(x_67, 0, x_66); +lean_ctor_set(x_67, 1, x_65); +lean_ctor_set(x_67, 2, x_55); lean_ctor_set_tag(x_45, 1); -lean_ctor_set(x_45, 0, x_65); +lean_ctor_set(x_45, 0, x_67); return x_45; } else { -lean_object* x_66; lean_object* x_67; lean_object* x_68; lean_object* x_69; lean_object* x_70; lean_object* x_71; lean_object* x_72; lean_object* x_73; lean_object* x_74; lean_object* x_75; 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; -x_66 = lean_ctor_get(x_45, 1); -lean_inc(x_66); -lean_dec(x_45); -x_67 = lean_ctor_get(x_66, 0); -lean_inc(x_67); -x_68 = lean_ctor_get(x_66, 1); +lean_object* x_68; lean_object* x_69; lean_object* x_70; lean_object* x_71; lean_object* x_72; lean_object* x_73; lean_object* x_74; lean_object* x_75; lean_object* x_76; lean_object* x_77; lean_object* x_78; lean_object* x_79; lean_object* x_80; lean_object* x_81; lean_object* x_82; lean_object* x_83; lean_object* x_84; lean_object* x_85; lean_object* x_86; lean_object* x_87; +x_68 = lean_ctor_get(x_45, 1); lean_inc(x_68); -x_69 = lean_ctor_get(x_3, 1); -lean_inc(x_69); -x_70 = lean_ctor_get(x_3, 0); -lean_inc(x_70); -lean_dec(x_3); -x_71 = lean_ctor_get(x_70, 0); -lean_inc(x_71); -lean_dec(x_70); -x_72 = lean_alloc_ctor(0, 4, 0); -lean_ctor_set(x_72, 0, x_67); -lean_ctor_set(x_72, 1, x_68); -lean_ctor_set(x_72, 2, x_69); -lean_ctor_set(x_72, 3, x_71); -x_73 = l_Lean_Name_toString___closed__1; -x_74 = l_Lean_Name_toStringWithSep___main(x_73, x_2); -x_75 = l_Lean_Meta_mkProjection___main___closed__3; -x_76 = lean_string_append(x_75, x_74); -lean_dec(x_74); -x_77 = l_Char_HasRepr___closed__1; -x_78 = lean_string_append(x_76, x_77); -x_79 = l_Lean_mkOptionalNode___closed__2; -x_80 = lean_array_push(x_79, x_1); -x_81 = l_Lean_Meta_mkProjection___main___closed__2; -x_82 = lean_alloc_ctor(16, 4, 0); -lean_ctor_set(x_82, 0, x_81); -lean_ctor_set(x_82, 1, x_78); -lean_ctor_set(x_82, 2, x_80); -lean_ctor_set(x_82, 3, x_72); -x_83 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_83, 0, x_82); -lean_ctor_set(x_83, 1, x_66); -return x_83; -} -} -else -{ -uint8_t x_84; -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_84 = !lean_is_exclusive(x_45); -if (x_84 == 0) -{ -lean_object* x_85; lean_object* x_86; -x_85 = lean_ctor_get(x_45, 0); -lean_dec(x_85); -x_86 = lean_ctor_get(x_46, 0); -lean_inc(x_86); -lean_dec(x_46); -lean_ctor_set(x_45, 0, x_86); -return x_45; -} -else -{ -lean_object* x_87; lean_object* x_88; lean_object* x_89; -x_87 = lean_ctor_get(x_45, 1); -lean_inc(x_87); lean_dec(x_45); -x_88 = lean_ctor_get(x_46, 0); -lean_inc(x_88); -lean_dec(x_46); -x_89 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_89, 0, x_88); -lean_ctor_set(x_89, 1, x_87); -return x_89; -} +x_69 = lean_ctor_get(x_68, 0); +lean_inc(x_69); +x_70 = lean_ctor_get(x_68, 1); +lean_inc(x_70); +x_71 = lean_ctor_get(x_3, 1); +lean_inc(x_71); +x_72 = lean_ctor_get(x_3, 0); +lean_inc(x_72); +lean_dec(x_3); +x_73 = lean_ctor_get(x_72, 0); +lean_inc(x_73); +lean_dec(x_72); +x_74 = lean_alloc_ctor(0, 4, 0); +lean_ctor_set(x_74, 0, x_69); +lean_ctor_set(x_74, 1, x_70); +lean_ctor_set(x_74, 2, x_71); +lean_ctor_set(x_74, 3, x_73); +x_75 = l_Lean_Name_toString___closed__1; +x_76 = l_Lean_Name_toStringWithSep___main(x_75, x_2); +x_77 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_77, 0, x_76); +x_78 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_78, 0, x_77); +x_79 = l_Lean_Meta_mkProjection___main___closed__7; +x_80 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_80, 0, x_79); +lean_ctor_set(x_80, 1, x_78); +x_81 = l_Lean_Meta_mkProjection___main___closed__10; +x_82 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_82, 0, x_80); +lean_ctor_set(x_82, 1, x_81); +x_83 = l___private_Lean_Meta_AppBuilder_2__hasTypeMsg(x_1, x_10); +x_84 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_84, 0, x_82); +lean_ctor_set(x_84, 1, x_83); +x_85 = l_Lean_Meta_mkProjection___main___closed__2; +x_86 = lean_alloc_ctor(16, 3, 0); +lean_ctor_set(x_86, 0, x_85); +lean_ctor_set(x_86, 1, x_84); +lean_ctor_set(x_86, 2, x_74); +x_87 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_87, 0, x_86); +lean_ctor_set(x_87, 1, x_68); +return x_87; } } else { -uint8_t x_90; +uint8_t x_88; +lean_dec(x_10); lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); -x_90 = !lean_is_exclusive(x_45); -if (x_90 == 0) +x_88 = !lean_is_exclusive(x_45); +if (x_88 == 0) { +lean_object* x_89; lean_object* x_90; +x_89 = lean_ctor_get(x_45, 0); +lean_dec(x_89); +x_90 = lean_ctor_get(x_46, 0); +lean_inc(x_90); +lean_dec(x_46); +lean_ctor_set(x_45, 0, x_90); return x_45; } else { lean_object* x_91; lean_object* x_92; lean_object* x_93; -x_91 = lean_ctor_get(x_45, 0); -x_92 = lean_ctor_get(x_45, 1); -lean_inc(x_92); +x_91 = lean_ctor_get(x_45, 1); lean_inc(x_91); lean_dec(x_45); -x_93 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_93, 0, x_91); -lean_ctor_set(x_93, 1, x_92); +x_92 = lean_ctor_get(x_46, 0); +lean_inc(x_92); +lean_dec(x_46); +x_93 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_93, 0, x_92); +lean_ctor_set(x_93, 1, x_91); return x_93; } } } else { -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; +uint8_t x_94; +lean_dec(x_10); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_94 = !lean_is_exclusive(x_45); +if (x_94 == 0) +{ +return x_45; +} +else +{ +lean_object* x_95; lean_object* x_96; lean_object* x_97; +x_95 = lean_ctor_get(x_45, 0); +x_96 = lean_ctor_get(x_45, 1); +lean_inc(x_96); +lean_inc(x_95); +lean_dec(x_45); +x_97 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_97, 0, x_95); +lean_ctor_set(x_97, 1, x_96); +return x_97; +} +} +} +else +{ +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_dec(x_30); lean_dec(x_28); lean_dec(x_3); lean_dec(x_2); -x_94 = lean_ctor_get(x_42, 0); -lean_inc(x_94); +x_98 = lean_ctor_get(x_42, 0); +lean_inc(x_98); lean_dec(x_42); -x_95 = lean_unsigned_to_nat(0u); -x_96 = l_Lean_Expr_getAppNumArgsAux___main(x_10, x_95); -x_97 = l_Lean_Expr_getAppArgs___closed__1; -lean_inc(x_96); -x_98 = lean_mk_array(x_96, x_97); -x_99 = lean_unsigned_to_nat(1u); -x_100 = lean_nat_sub(x_96, x_99); -lean_dec(x_96); -x_101 = l___private_Lean_Expr_3__getAppArgsAux___main(x_10, x_98, x_100); -x_102 = l_Lean_mkConst(x_94, x_29); -x_103 = l_Array_iterateMAux___main___at_Lean_mkAppN___spec__1(x_101, x_101, x_95, x_102); -lean_dec(x_101); -x_104 = l_Lean_mkApp(x_103, x_1); +x_99 = lean_unsigned_to_nat(0u); +x_100 = l_Lean_Expr_getAppNumArgsAux___main(x_10, x_99); +x_101 = l_Lean_Expr_getAppArgs___closed__1; +lean_inc(x_100); +x_102 = lean_mk_array(x_100, x_101); +x_103 = lean_unsigned_to_nat(1u); +x_104 = lean_nat_sub(x_100, x_103); +lean_dec(x_100); +x_105 = l___private_Lean_Expr_3__getAppArgsAux___main(x_10, x_102, x_104); +x_106 = l_Lean_mkConst(x_98, x_29); +x_107 = l_Array_iterateMAux___main___at_Lean_mkAppN___spec__1(x_105, x_105, x_99, x_106); +lean_dec(x_105); +x_108 = l_Lean_mkApp(x_107, x_1); lean_ctor_set(x_5, 1, x_11); -lean_ctor_set(x_5, 0, x_104); +lean_ctor_set(x_5, 0, x_108); return x_5; } } } else { -lean_object* x_105; +lean_object* x_109; lean_dec(x_27); -lean_dec(x_10); lean_free_object(x_5); lean_dec(x_2); -x_105 = lean_box(0); -x_13 = x_105; +x_109 = lean_box(0); +x_13 = x_109; goto block_26; } block_26: @@ -12581,15 +13313,16 @@ lean_ctor_set(x_19, 0, x_14); lean_ctor_set(x_19, 1, x_15); lean_ctor_set(x_19, 2, x_16); lean_ctor_set(x_19, 3, x_18); -x_20 = l_Lean_mkOptionalNode___closed__2; -x_21 = lean_array_push(x_20, x_1); -x_22 = l_Lean_Meta_mkProjection___main___closed__2; -x_23 = l_Lean_getStructureCtor___closed__2; -x_24 = lean_alloc_ctor(16, 4, 0); -lean_ctor_set(x_24, 0, x_22); -lean_ctor_set(x_24, 1, x_23); -lean_ctor_set(x_24, 2, x_21); -lean_ctor_set(x_24, 3, x_19); +x_20 = l___private_Lean_Meta_AppBuilder_2__hasTypeMsg(x_1, x_10); +x_21 = l_Lean_Meta_mkProjection___main___closed__4; +x_22 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_22, 0, x_21); +lean_ctor_set(x_22, 1, x_20); +x_23 = l_Lean_Meta_mkProjection___main___closed__2; +x_24 = lean_alloc_ctor(16, 3, 0); +lean_ctor_set(x_24, 0, x_23); +lean_ctor_set(x_24, 1, x_22); +lean_ctor_set(x_24, 2, x_19); if (lean_is_scalar(x_12)) { x_25 = lean_alloc_ctor(1, 2, 0); } else { @@ -12603,379 +13336,388 @@ return x_25; } else { -uint8_t x_106; +uint8_t x_110; lean_free_object(x_5); lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); -x_106 = !lean_is_exclusive(x_9); -if (x_106 == 0) +x_110 = !lean_is_exclusive(x_9); +if (x_110 == 0) { return x_9; } else { -lean_object* x_107; lean_object* x_108; lean_object* x_109; -x_107 = lean_ctor_get(x_9, 0); -x_108 = lean_ctor_get(x_9, 1); -lean_inc(x_108); -lean_inc(x_107); +lean_object* x_111; lean_object* x_112; lean_object* x_113; +x_111 = lean_ctor_get(x_9, 0); +x_112 = lean_ctor_get(x_9, 1); +lean_inc(x_112); +lean_inc(x_111); lean_dec(x_9); -x_109 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_109, 0, x_107); -lean_ctor_set(x_109, 1, x_108); -return x_109; +x_113 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_113, 0, x_111); +lean_ctor_set(x_113, 1, x_112); +return x_113; } } } else { -lean_object* x_110; lean_object* x_111; lean_object* x_112; -x_110 = lean_ctor_get(x_5, 0); -x_111 = lean_ctor_get(x_5, 1); -lean_inc(x_111); -lean_inc(x_110); +lean_object* x_114; lean_object* x_115; lean_object* x_116; +x_114 = lean_ctor_get(x_5, 0); +x_115 = lean_ctor_get(x_5, 1); +lean_inc(x_115); +lean_inc(x_114); lean_dec(x_5); lean_inc(x_3); -x_112 = l_Lean_Meta_whnf(x_110, x_3, x_111); -if (lean_obj_tag(x_112) == 0) +x_116 = l_Lean_Meta_whnf(x_114, x_3, x_115); +if (lean_obj_tag(x_116) == 0) { -lean_object* x_113; lean_object* x_114; lean_object* x_115; lean_object* x_116; lean_object* x_130; -x_113 = lean_ctor_get(x_112, 0); -lean_inc(x_113); -x_114 = lean_ctor_get(x_112, 1); -lean_inc(x_114); -if (lean_is_exclusive(x_112)) { - lean_ctor_release(x_112, 0); - lean_ctor_release(x_112, 1); - x_115 = x_112; +lean_object* x_117; lean_object* x_118; lean_object* x_119; lean_object* x_120; lean_object* x_134; +x_117 = lean_ctor_get(x_116, 0); +lean_inc(x_117); +x_118 = lean_ctor_get(x_116, 1); +lean_inc(x_118); +if (lean_is_exclusive(x_116)) { + lean_ctor_release(x_116, 0); + lean_ctor_release(x_116, 1); + x_119 = x_116; } else { - lean_dec_ref(x_112); - x_115 = lean_box(0); + lean_dec_ref(x_116); + x_119 = lean_box(0); } -x_130 = l_Lean_Expr_getAppFn___main(x_113); -if (lean_obj_tag(x_130) == 4) +x_134 = l_Lean_Expr_getAppFn___main(x_117); +if (lean_obj_tag(x_134) == 4) { -lean_object* x_131; lean_object* x_132; lean_object* x_133; lean_object* x_134; uint8_t x_135; -lean_dec(x_115); -x_131 = lean_ctor_get(x_130, 0); -lean_inc(x_131); -x_132 = lean_ctor_get(x_130, 1); -lean_inc(x_132); -lean_dec(x_130); -x_133 = lean_ctor_get(x_114, 0); -lean_inc(x_133); -x_134 = lean_ctor_get(x_114, 1); -lean_inc(x_134); -lean_inc(x_131); -lean_inc(x_133); -x_135 = l_Lean_isStructureLike(x_133, x_131); -if (x_135 == 0) -{ -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_dec(x_132); -lean_dec(x_131); -lean_dec(x_113); -lean_dec(x_2); -x_136 = lean_ctor_get(x_3, 1); +lean_object* x_135; lean_object* x_136; lean_object* x_137; lean_object* x_138; uint8_t x_139; +lean_dec(x_119); +x_135 = lean_ctor_get(x_134, 0); +lean_inc(x_135); +x_136 = lean_ctor_get(x_134, 1); lean_inc(x_136); -x_137 = lean_ctor_get(x_3, 0); +lean_dec(x_134); +x_137 = lean_ctor_get(x_118, 0); lean_inc(x_137); -lean_dec(x_3); -x_138 = lean_ctor_get(x_137, 0); +x_138 = lean_ctor_get(x_118, 1); lean_inc(x_138); -lean_dec(x_137); -x_139 = lean_alloc_ctor(0, 4, 0); -lean_ctor_set(x_139, 0, x_133); -lean_ctor_set(x_139, 1, x_134); -lean_ctor_set(x_139, 2, x_136); -lean_ctor_set(x_139, 3, x_138); -x_140 = l_Lean_mkOptionalNode___closed__2; -x_141 = lean_array_push(x_140, x_1); -x_142 = l_Lean_Meta_mkProjection___main___closed__2; -x_143 = l_Lean_getStructureCtor___closed__2; -x_144 = lean_alloc_ctor(16, 4, 0); -lean_ctor_set(x_144, 0, x_142); -lean_ctor_set(x_144, 1, x_143); -lean_ctor_set(x_144, 2, x_141); -lean_ctor_set(x_144, 3, x_139); -x_145 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_145, 0, x_144); -lean_ctor_set(x_145, 1, x_114); -return x_145; +lean_inc(x_135); +lean_inc(x_137); +x_139 = l_Lean_isStructureLike(x_137, x_135); +if (x_139 == 0) +{ +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_dec(x_136); +lean_dec(x_135); +lean_dec(x_2); +x_140 = lean_ctor_get(x_3, 1); +lean_inc(x_140); +x_141 = lean_ctor_get(x_3, 0); +lean_inc(x_141); +lean_dec(x_3); +x_142 = lean_ctor_get(x_141, 0); +lean_inc(x_142); +lean_dec(x_141); +x_143 = lean_alloc_ctor(0, 4, 0); +lean_ctor_set(x_143, 0, x_137); +lean_ctor_set(x_143, 1, x_138); +lean_ctor_set(x_143, 2, x_140); +lean_ctor_set(x_143, 3, x_142); +x_144 = l___private_Lean_Meta_AppBuilder_2__hasTypeMsg(x_1, x_117); +x_145 = l_Lean_Meta_mkProjection___main___closed__4; +x_146 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_146, 0, x_145); +lean_ctor_set(x_146, 1, x_144); +x_147 = l_Lean_Meta_mkProjection___main___closed__2; +x_148 = lean_alloc_ctor(16, 3, 0); +lean_ctor_set(x_148, 0, x_147); +lean_ctor_set(x_148, 1, x_146); +lean_ctor_set(x_148, 2, x_143); +x_149 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_149, 0, x_148); +lean_ctor_set(x_149, 1, x_118); +return x_149; } else { -lean_object* x_146; -lean_dec(x_134); +lean_object* x_150; +lean_dec(x_138); lean_inc(x_2); -lean_inc(x_131); -lean_inc(x_133); -x_146 = l_Lean_getProjFnForField_x3f(x_133, x_131, x_2); -if (lean_obj_tag(x_146) == 0) +lean_inc(x_135); +lean_inc(x_137); +x_150 = l_Lean_getProjFnForField_x3f(x_137, x_135, x_2); +if (lean_obj_tag(x_150) == 0) { -lean_object* x_147; lean_object* x_148; lean_object* x_149; -lean_dec(x_132); -lean_dec(x_113); -lean_inc(x_131); -lean_inc(x_133); -x_147 = l_Lean_getStructureFields(x_133, x_131); -x_148 = lean_unsigned_to_nat(0u); +lean_object* x_151; lean_object* x_152; lean_object* x_153; +lean_dec(x_136); +lean_inc(x_135); +lean_inc(x_137); +x_151 = l_Lean_getStructureFields(x_137, x_135); +x_152 = lean_unsigned_to_nat(0u); lean_inc(x_3); lean_inc(x_2); lean_inc(x_1); -x_149 = l_Array_findSomeMAux___main___at_Lean_Meta_mkProjection___main___spec__1(x_1, x_2, x_131, x_133, x_147, x_148, x_3, x_114); -lean_dec(x_147); -if (lean_obj_tag(x_149) == 0) +x_153 = l_Array_findSomeMAux___main___at_Lean_Meta_mkProjection___main___spec__1(x_1, x_2, x_135, x_137, x_151, x_152, x_3, x_118); +lean_dec(x_151); +if (lean_obj_tag(x_153) == 0) { -lean_object* x_150; -x_150 = lean_ctor_get(x_149, 0); -lean_inc(x_150); -if (lean_obj_tag(x_150) == 0) -{ -lean_object* x_151; lean_object* x_152; lean_object* x_153; lean_object* x_154; lean_object* x_155; lean_object* x_156; lean_object* x_157; lean_object* x_158; lean_object* x_159; lean_object* x_160; lean_object* x_161; lean_object* x_162; lean_object* x_163; lean_object* x_164; lean_object* x_165; lean_object* x_166; lean_object* x_167; lean_object* x_168; lean_object* x_169; -x_151 = lean_ctor_get(x_149, 1); -lean_inc(x_151); -if (lean_is_exclusive(x_149)) { - lean_ctor_release(x_149, 0); - lean_ctor_release(x_149, 1); - x_152 = x_149; -} else { - lean_dec_ref(x_149); - x_152 = lean_box(0); -} -x_153 = lean_ctor_get(x_151, 0); -lean_inc(x_153); -x_154 = lean_ctor_get(x_151, 1); +lean_object* x_154; +x_154 = lean_ctor_get(x_153, 0); lean_inc(x_154); -x_155 = lean_ctor_get(x_3, 1); +if (lean_obj_tag(x_154) == 0) +{ +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; +x_155 = lean_ctor_get(x_153, 1); lean_inc(x_155); -x_156 = lean_ctor_get(x_3, 0); -lean_inc(x_156); -lean_dec(x_3); -x_157 = lean_ctor_get(x_156, 0); +if (lean_is_exclusive(x_153)) { + lean_ctor_release(x_153, 0); + lean_ctor_release(x_153, 1); + x_156 = x_153; +} else { + lean_dec_ref(x_153); + x_156 = lean_box(0); +} +x_157 = lean_ctor_get(x_155, 0); lean_inc(x_157); -lean_dec(x_156); -x_158 = lean_alloc_ctor(0, 4, 0); -lean_ctor_set(x_158, 0, x_153); -lean_ctor_set(x_158, 1, x_154); -lean_ctor_set(x_158, 2, x_155); -lean_ctor_set(x_158, 3, x_157); -x_159 = l_Lean_Name_toString___closed__1; -x_160 = l_Lean_Name_toStringWithSep___main(x_159, x_2); -x_161 = l_Lean_Meta_mkProjection___main___closed__3; -x_162 = lean_string_append(x_161, x_160); +x_158 = lean_ctor_get(x_155, 1); +lean_inc(x_158); +x_159 = lean_ctor_get(x_3, 1); +lean_inc(x_159); +x_160 = lean_ctor_get(x_3, 0); +lean_inc(x_160); +lean_dec(x_3); +x_161 = lean_ctor_get(x_160, 0); +lean_inc(x_161); lean_dec(x_160); -x_163 = l_Char_HasRepr___closed__1; -x_164 = lean_string_append(x_162, x_163); -x_165 = l_Lean_mkOptionalNode___closed__2; -x_166 = lean_array_push(x_165, x_1); -x_167 = l_Lean_Meta_mkProjection___main___closed__2; -x_168 = lean_alloc_ctor(16, 4, 0); +x_162 = lean_alloc_ctor(0, 4, 0); +lean_ctor_set(x_162, 0, x_157); +lean_ctor_set(x_162, 1, x_158); +lean_ctor_set(x_162, 2, x_159); +lean_ctor_set(x_162, 3, x_161); +x_163 = l_Lean_Name_toString___closed__1; +x_164 = l_Lean_Name_toStringWithSep___main(x_163, x_2); +x_165 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_165, 0, x_164); +x_166 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_166, 0, x_165); +x_167 = l_Lean_Meta_mkProjection___main___closed__7; +x_168 = lean_alloc_ctor(9, 2, 0); lean_ctor_set(x_168, 0, x_167); -lean_ctor_set(x_168, 1, x_164); -lean_ctor_set(x_168, 2, x_166); -lean_ctor_set(x_168, 3, x_158); -if (lean_is_scalar(x_152)) { - x_169 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_168, 1, x_166); +x_169 = l_Lean_Meta_mkProjection___main___closed__10; +x_170 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_170, 0, x_168); +lean_ctor_set(x_170, 1, x_169); +x_171 = l___private_Lean_Meta_AppBuilder_2__hasTypeMsg(x_1, x_117); +x_172 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_172, 0, x_170); +lean_ctor_set(x_172, 1, x_171); +x_173 = l_Lean_Meta_mkProjection___main___closed__2; +x_174 = lean_alloc_ctor(16, 3, 0); +lean_ctor_set(x_174, 0, x_173); +lean_ctor_set(x_174, 1, x_172); +lean_ctor_set(x_174, 2, x_162); +if (lean_is_scalar(x_156)) { + x_175 = lean_alloc_ctor(1, 2, 0); } else { - x_169 = x_152; - lean_ctor_set_tag(x_169, 1); + x_175 = x_156; + lean_ctor_set_tag(x_175, 1); } -lean_ctor_set(x_169, 0, x_168); -lean_ctor_set(x_169, 1, x_151); -return x_169; +lean_ctor_set(x_175, 0, x_174); +lean_ctor_set(x_175, 1, x_155); +return x_175; } else { -lean_object* x_170; lean_object* x_171; lean_object* x_172; lean_object* x_173; +lean_object* x_176; lean_object* x_177; lean_object* x_178; lean_object* x_179; +lean_dec(x_117); lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); -x_170 = lean_ctor_get(x_149, 1); -lean_inc(x_170); -if (lean_is_exclusive(x_149)) { - lean_ctor_release(x_149, 0); - lean_ctor_release(x_149, 1); - x_171 = x_149; +x_176 = lean_ctor_get(x_153, 1); +lean_inc(x_176); +if (lean_is_exclusive(x_153)) { + lean_ctor_release(x_153, 0); + lean_ctor_release(x_153, 1); + x_177 = x_153; } else { - lean_dec_ref(x_149); - x_171 = lean_box(0); + lean_dec_ref(x_153); + x_177 = lean_box(0); } -x_172 = lean_ctor_get(x_150, 0); -lean_inc(x_172); -lean_dec(x_150); -if (lean_is_scalar(x_171)) { - x_173 = lean_alloc_ctor(0, 2, 0); -} else { - x_173 = x_171; -} -lean_ctor_set(x_173, 0, x_172); -lean_ctor_set(x_173, 1, x_170); -return x_173; -} -} -else -{ -lean_object* x_174; lean_object* x_175; lean_object* x_176; lean_object* x_177; -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_174 = lean_ctor_get(x_149, 0); -lean_inc(x_174); -x_175 = lean_ctor_get(x_149, 1); -lean_inc(x_175); -if (lean_is_exclusive(x_149)) { - lean_ctor_release(x_149, 0); - lean_ctor_release(x_149, 1); - x_176 = x_149; -} else { - lean_dec_ref(x_149); - x_176 = lean_box(0); -} -if (lean_is_scalar(x_176)) { - x_177 = lean_alloc_ctor(1, 2, 0); -} else { - x_177 = x_176; -} -lean_ctor_set(x_177, 0, x_174); -lean_ctor_set(x_177, 1, x_175); -return x_177; -} -} -else -{ -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_dec(x_133); -lean_dec(x_131); -lean_dec(x_3); -lean_dec(x_2); -x_178 = lean_ctor_get(x_146, 0); +x_178 = lean_ctor_get(x_154, 0); lean_inc(x_178); -lean_dec(x_146); -x_179 = lean_unsigned_to_nat(0u); -x_180 = l_Lean_Expr_getAppNumArgsAux___main(x_113, x_179); -x_181 = l_Lean_Expr_getAppArgs___closed__1; +lean_dec(x_154); +if (lean_is_scalar(x_177)) { + x_179 = lean_alloc_ctor(0, 2, 0); +} else { + x_179 = x_177; +} +lean_ctor_set(x_179, 0, x_178); +lean_ctor_set(x_179, 1, x_176); +return x_179; +} +} +else +{ +lean_object* x_180; lean_object* x_181; lean_object* x_182; lean_object* x_183; +lean_dec(x_117); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_180 = lean_ctor_get(x_153, 0); lean_inc(x_180); -x_182 = lean_mk_array(x_180, x_181); -x_183 = lean_unsigned_to_nat(1u); -x_184 = lean_nat_sub(x_180, x_183); -lean_dec(x_180); -x_185 = l___private_Lean_Expr_3__getAppArgsAux___main(x_113, x_182, x_184); -x_186 = l_Lean_mkConst(x_178, x_132); -x_187 = l_Array_iterateMAux___main___at_Lean_mkAppN___spec__1(x_185, x_185, x_179, x_186); -lean_dec(x_185); -x_188 = l_Lean_mkApp(x_187, x_1); -x_189 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_189, 0, x_188); -lean_ctor_set(x_189, 1, x_114); -return x_189; +x_181 = lean_ctor_get(x_153, 1); +lean_inc(x_181); +if (lean_is_exclusive(x_153)) { + lean_ctor_release(x_153, 0); + lean_ctor_release(x_153, 1); + x_182 = x_153; +} else { + lean_dec_ref(x_153); + x_182 = lean_box(0); +} +if (lean_is_scalar(x_182)) { + x_183 = lean_alloc_ctor(1, 2, 0); +} else { + x_183 = x_182; +} +lean_ctor_set(x_183, 0, x_180); +lean_ctor_set(x_183, 1, x_181); +return x_183; +} +} +else +{ +lean_object* x_184; lean_object* x_185; lean_object* x_186; lean_object* x_187; lean_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_dec(x_137); +lean_dec(x_135); +lean_dec(x_3); +lean_dec(x_2); +x_184 = lean_ctor_get(x_150, 0); +lean_inc(x_184); +lean_dec(x_150); +x_185 = lean_unsigned_to_nat(0u); +x_186 = l_Lean_Expr_getAppNumArgsAux___main(x_117, x_185); +x_187 = l_Lean_Expr_getAppArgs___closed__1; +lean_inc(x_186); +x_188 = lean_mk_array(x_186, x_187); +x_189 = lean_unsigned_to_nat(1u); +x_190 = lean_nat_sub(x_186, x_189); +lean_dec(x_186); +x_191 = l___private_Lean_Expr_3__getAppArgsAux___main(x_117, x_188, x_190); +x_192 = l_Lean_mkConst(x_184, x_136); +x_193 = l_Array_iterateMAux___main___at_Lean_mkAppN___spec__1(x_191, x_191, x_185, x_192); +lean_dec(x_191); +x_194 = l_Lean_mkApp(x_193, x_1); +x_195 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_195, 0, x_194); +lean_ctor_set(x_195, 1, x_118); +return x_195; } } } else { -lean_object* x_190; -lean_dec(x_130); -lean_dec(x_113); +lean_object* x_196; +lean_dec(x_134); lean_dec(x_2); -x_190 = lean_box(0); -x_116 = x_190; -goto block_129; +x_196 = lean_box(0); +x_120 = x_196; +goto block_133; } -block_129: +block_133: { -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_dec(x_116); -x_117 = lean_ctor_get(x_114, 0); -lean_inc(x_117); -x_118 = lean_ctor_get(x_114, 1); -lean_inc(x_118); -x_119 = lean_ctor_get(x_3, 1); -lean_inc(x_119); -x_120 = lean_ctor_get(x_3, 0); -lean_inc(x_120); -lean_dec(x_3); -x_121 = lean_ctor_get(x_120, 0); -lean_inc(x_121); +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_dec(x_120); -x_122 = lean_alloc_ctor(0, 4, 0); -lean_ctor_set(x_122, 0, x_117); -lean_ctor_set(x_122, 1, x_118); -lean_ctor_set(x_122, 2, x_119); -lean_ctor_set(x_122, 3, x_121); -x_123 = l_Lean_mkOptionalNode___closed__2; -x_124 = lean_array_push(x_123, x_1); -x_125 = l_Lean_Meta_mkProjection___main___closed__2; -x_126 = l_Lean_getStructureCtor___closed__2; -x_127 = lean_alloc_ctor(16, 4, 0); -lean_ctor_set(x_127, 0, x_125); -lean_ctor_set(x_127, 1, x_126); -lean_ctor_set(x_127, 2, x_124); -lean_ctor_set(x_127, 3, x_122); -if (lean_is_scalar(x_115)) { - x_128 = lean_alloc_ctor(1, 2, 0); +x_121 = lean_ctor_get(x_118, 0); +lean_inc(x_121); +x_122 = lean_ctor_get(x_118, 1); +lean_inc(x_122); +x_123 = lean_ctor_get(x_3, 1); +lean_inc(x_123); +x_124 = lean_ctor_get(x_3, 0); +lean_inc(x_124); +lean_dec(x_3); +x_125 = lean_ctor_get(x_124, 0); +lean_inc(x_125); +lean_dec(x_124); +x_126 = lean_alloc_ctor(0, 4, 0); +lean_ctor_set(x_126, 0, x_121); +lean_ctor_set(x_126, 1, x_122); +lean_ctor_set(x_126, 2, x_123); +lean_ctor_set(x_126, 3, x_125); +x_127 = l___private_Lean_Meta_AppBuilder_2__hasTypeMsg(x_1, x_117); +x_128 = l_Lean_Meta_mkProjection___main___closed__4; +x_129 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_129, 0, x_128); +lean_ctor_set(x_129, 1, x_127); +x_130 = l_Lean_Meta_mkProjection___main___closed__2; +x_131 = lean_alloc_ctor(16, 3, 0); +lean_ctor_set(x_131, 0, x_130); +lean_ctor_set(x_131, 1, x_129); +lean_ctor_set(x_131, 2, x_126); +if (lean_is_scalar(x_119)) { + x_132 = lean_alloc_ctor(1, 2, 0); } else { - x_128 = x_115; - lean_ctor_set_tag(x_128, 1); + x_132 = x_119; + lean_ctor_set_tag(x_132, 1); } -lean_ctor_set(x_128, 0, x_127); -lean_ctor_set(x_128, 1, x_114); -return x_128; +lean_ctor_set(x_132, 0, x_131); +lean_ctor_set(x_132, 1, x_118); +return x_132; } } else { -lean_object* x_191; lean_object* x_192; lean_object* x_193; lean_object* x_194; +lean_object* x_197; lean_object* x_198; lean_object* x_199; lean_object* x_200; lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); -x_191 = lean_ctor_get(x_112, 0); -lean_inc(x_191); -x_192 = lean_ctor_get(x_112, 1); -lean_inc(x_192); -if (lean_is_exclusive(x_112)) { - lean_ctor_release(x_112, 0); - lean_ctor_release(x_112, 1); - x_193 = x_112; +x_197 = lean_ctor_get(x_116, 0); +lean_inc(x_197); +x_198 = lean_ctor_get(x_116, 1); +lean_inc(x_198); +if (lean_is_exclusive(x_116)) { + lean_ctor_release(x_116, 0); + lean_ctor_release(x_116, 1); + x_199 = x_116; } else { - lean_dec_ref(x_112); - x_193 = lean_box(0); + lean_dec_ref(x_116); + x_199 = lean_box(0); } -if (lean_is_scalar(x_193)) { - x_194 = lean_alloc_ctor(1, 2, 0); +if (lean_is_scalar(x_199)) { + x_200 = lean_alloc_ctor(1, 2, 0); } else { - x_194 = x_193; + x_200 = x_199; } -lean_ctor_set(x_194, 0, x_191); -lean_ctor_set(x_194, 1, x_192); -return x_194; +lean_ctor_set(x_200, 0, x_197); +lean_ctor_set(x_200, 1, x_198); +return x_200; } } } else { -uint8_t x_195; +uint8_t x_201; lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); -x_195 = !lean_is_exclusive(x_5); -if (x_195 == 0) +x_201 = !lean_is_exclusive(x_5); +if (x_201 == 0) { return x_5; } else { -lean_object* x_196; lean_object* x_197; lean_object* x_198; -x_196 = lean_ctor_get(x_5, 0); -x_197 = lean_ctor_get(x_5, 1); -lean_inc(x_197); -lean_inc(x_196); +lean_object* x_202; lean_object* x_203; lean_object* x_204; +x_202 = lean_ctor_get(x_5, 0); +x_203 = lean_ctor_get(x_5, 1); +lean_inc(x_203); +lean_inc(x_202); lean_dec(x_5); -x_198 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_198, 0, x_196); -lean_ctor_set(x_198, 1, x_197); -return x_198; +x_204 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_204, 0, x_202); +lean_ctor_set(x_204, 1, x_203); +return x_204; } } } @@ -12997,6 +13739,554 @@ x_5 = l_Lean_Meta_mkProjection___main(x_1, x_2, x_3, x_4); return x_5; } } +lean_object* l___private_Lean_Meta_AppBuilder_7__mkListLitAux___main(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_inc(x_1); +return x_1; +} +else +{ +lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; +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); +lean_inc(x_2); +x_6 = l_Lean_mkApp(x_2, x_4); +x_7 = l___private_Lean_Meta_AppBuilder_7__mkListLitAux___main(x_1, x_2, x_5); +x_8 = l_Lean_mkApp(x_6, x_7); +return x_8; +} +} +} +lean_object* l___private_Lean_Meta_AppBuilder_7__mkListLitAux___main___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; +x_4 = l___private_Lean_Meta_AppBuilder_7__mkListLitAux___main(x_1, x_2, x_3); +lean_dec(x_1); +return x_4; +} +} +lean_object* l___private_Lean_Meta_AppBuilder_7__mkListLitAux(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; +x_4 = l___private_Lean_Meta_AppBuilder_7__mkListLitAux___main(x_1, x_2, x_3); +return x_4; +} +} +lean_object* l___private_Lean_Meta_AppBuilder_7__mkListLitAux___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; +x_4 = l___private_Lean_Meta_AppBuilder_7__mkListLitAux(x_1, x_2, x_3); +lean_dec(x_1); +return x_4; +} +} +lean_object* _init_l___private_Lean_Meta_AppBuilder_8__getDecLevel___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("invalid universe level, "); +return x_1; +} +} +lean_object* _init_l___private_Lean_Meta_AppBuilder_8__getDecLevel___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l___private_Lean_Meta_AppBuilder_8__getDecLevel___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___private_Lean_Meta_AppBuilder_8__getDecLevel___closed__3() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l___private_Lean_Meta_AppBuilder_8__getDecLevel___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___private_Lean_Meta_AppBuilder_8__getDecLevel___closed__4() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string(" is not greater than 0"); +return x_1; +} +} +lean_object* _init_l___private_Lean_Meta_AppBuilder_8__getDecLevel___closed__5() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l___private_Lean_Meta_AppBuilder_8__getDecLevel___closed__4; +x_2 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* _init_l___private_Lean_Meta_AppBuilder_8__getDecLevel___closed__6() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l___private_Lean_Meta_AppBuilder_8__getDecLevel___closed__5; +x_2 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* l___private_Lean_Meta_AppBuilder_8__getDecLevel(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_2); +x_5 = l_Lean_Meta_getLevel(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; +x_7 = lean_ctor_get(x_5, 0); +x_8 = lean_ctor_get(x_5, 1); +x_9 = l_Lean_Level_dec___main(x_7); +if (lean_obj_tag(x_9) == 0) +{ +lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; +x_10 = lean_ctor_get(x_8, 0); +lean_inc(x_10); +x_11 = lean_ctor_get(x_8, 1); +lean_inc(x_11); +x_12 = lean_ctor_get(x_3, 1); +lean_inc(x_12); +x_13 = lean_ctor_get(x_3, 0); +lean_inc(x_13); +lean_dec(x_3); +x_14 = lean_ctor_get(x_13, 0); +lean_inc(x_14); +lean_dec(x_13); +x_15 = lean_alloc_ctor(0, 4, 0); +lean_ctor_set(x_15, 0, x_10); +lean_ctor_set(x_15, 1, x_11); +lean_ctor_set(x_15, 2, x_12); +lean_ctor_set(x_15, 3, x_14); +x_16 = l_Lean_Level_format(x_7); +x_17 = l_Lean_Options_empty; +x_18 = l_Lean_Format_pretty(x_16, x_17); +x_19 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_19, 0, x_18); +x_20 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_20, 0, x_19); +x_21 = l___private_Lean_Meta_AppBuilder_8__getDecLevel___closed__3; +x_22 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_22, 0, x_21); +lean_ctor_set(x_22, 1, x_20); +x_23 = l___private_Lean_Meta_AppBuilder_8__getDecLevel___closed__6; +x_24 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_24, 0, x_22); +lean_ctor_set(x_24, 1, x_23); +x_25 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_25, 0, x_2); +x_26 = l_Lean_indentExpr(x_25); +x_27 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_27, 0, x_24); +lean_ctor_set(x_27, 1, x_26); +x_28 = lean_alloc_ctor(16, 3, 0); +lean_ctor_set(x_28, 0, x_1); +lean_ctor_set(x_28, 1, x_27); +lean_ctor_set(x_28, 2, x_15); +lean_ctor_set_tag(x_5, 1); +lean_ctor_set(x_5, 0, x_28); +return x_5; +} +else +{ +lean_object* x_29; +lean_dec(x_7); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_29 = lean_ctor_get(x_9, 0); +lean_inc(x_29); +lean_dec(x_9); +lean_ctor_set(x_5, 0, x_29); +return x_5; +} +} +else +{ +lean_object* x_30; lean_object* x_31; lean_object* x_32; +x_30 = lean_ctor_get(x_5, 0); +x_31 = lean_ctor_get(x_5, 1); +lean_inc(x_31); +lean_inc(x_30); +lean_dec(x_5); +x_32 = l_Lean_Level_dec___main(x_30); +if (lean_obj_tag(x_32) == 0) +{ +lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_object* x_51; lean_object* x_52; +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_3, 1); +lean_inc(x_35); +x_36 = lean_ctor_get(x_3, 0); +lean_inc(x_36); +lean_dec(x_3); +x_37 = lean_ctor_get(x_36, 0); +lean_inc(x_37); +lean_dec(x_36); +x_38 = lean_alloc_ctor(0, 4, 0); +lean_ctor_set(x_38, 0, x_33); +lean_ctor_set(x_38, 1, x_34); +lean_ctor_set(x_38, 2, x_35); +lean_ctor_set(x_38, 3, x_37); +x_39 = l_Lean_Level_format(x_30); +x_40 = l_Lean_Options_empty; +x_41 = l_Lean_Format_pretty(x_39, x_40); +x_42 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_42, 0, x_41); +x_43 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_43, 0, x_42); +x_44 = l___private_Lean_Meta_AppBuilder_8__getDecLevel___closed__3; +x_45 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_45, 0, x_44); +lean_ctor_set(x_45, 1, x_43); +x_46 = l___private_Lean_Meta_AppBuilder_8__getDecLevel___closed__6; +x_47 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_47, 0, x_45); +lean_ctor_set(x_47, 1, x_46); +x_48 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_48, 0, x_2); +x_49 = l_Lean_indentExpr(x_48); +x_50 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_50, 0, x_47); +lean_ctor_set(x_50, 1, x_49); +x_51 = lean_alloc_ctor(16, 3, 0); +lean_ctor_set(x_51, 0, x_1); +lean_ctor_set(x_51, 1, x_50); +lean_ctor_set(x_51, 2, x_38); +x_52 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_52, 0, x_51); +lean_ctor_set(x_52, 1, x_31); +return x_52; +} +else +{ +lean_object* x_53; lean_object* x_54; +lean_dec(x_30); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_53 = lean_ctor_get(x_32, 0); +lean_inc(x_53); +lean_dec(x_32); +x_54 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_54, 0, x_53); +lean_ctor_set(x_54, 1, x_31); +return x_54; +} +} +} +else +{ +uint8_t x_55; +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_55 = !lean_is_exclusive(x_5); +if (x_55 == 0) +{ +return x_5; +} +else +{ +lean_object* x_56; lean_object* x_57; lean_object* x_58; +x_56 = lean_ctor_get(x_5, 0); +x_57 = lean_ctor_get(x_5, 1); +lean_inc(x_57); +lean_inc(x_56); +lean_dec(x_5); +x_58 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_58, 0, x_56); +lean_ctor_set(x_58, 1, x_57); +return x_58; +} +} +} +} +lean_object* _init_l_Lean_Meta_mkListLit___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("mkListLit"); +return x_1; +} +} +lean_object* _init_l_Lean_Meta_mkListLit___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l_Lean_Meta_mkListLit___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* l_Lean_Meta_mkListLit(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 = l_Lean_Meta_mkListLit___closed__2; +lean_inc(x_1); +x_6 = l___private_Lean_Meta_AppBuilder_8__getDecLevel(x_5, x_1, x_3, x_4); +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; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; +x_8 = lean_ctor_get(x_6, 0); +x_9 = lean_box(0); +x_10 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_10, 0, x_8); +lean_ctor_set(x_10, 1, x_9); +x_11 = l_Lean_listToExpr___rarg___closed__4; +lean_inc(x_10); +x_12 = l_Lean_mkConst(x_11, x_10); +lean_inc(x_1); +x_13 = l_Lean_mkApp(x_12, x_1); +if (lean_obj_tag(x_2) == 0) +{ +lean_dec(x_10); +lean_dec(x_1); +lean_ctor_set(x_6, 0, x_13); +return x_6; +} +else +{ +lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; +x_14 = l_Lean_listToExpr___rarg___closed__6; +x_15 = l_Lean_mkConst(x_14, x_10); +x_16 = l_Lean_mkApp(x_15, x_1); +x_17 = l___private_Lean_Meta_AppBuilder_7__mkListLitAux___main(x_13, x_16, x_2); +lean_dec(x_13); +lean_ctor_set(x_6, 0, x_17); +return x_6; +} +} +else +{ +lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; +x_18 = lean_ctor_get(x_6, 0); +x_19 = lean_ctor_get(x_6, 1); +lean_inc(x_19); +lean_inc(x_18); +lean_dec(x_6); +x_20 = lean_box(0); +x_21 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_21, 0, x_18); +lean_ctor_set(x_21, 1, x_20); +x_22 = l_Lean_listToExpr___rarg___closed__4; +lean_inc(x_21); +x_23 = l_Lean_mkConst(x_22, x_21); +lean_inc(x_1); +x_24 = l_Lean_mkApp(x_23, x_1); +if (lean_obj_tag(x_2) == 0) +{ +lean_object* x_25; +lean_dec(x_21); +lean_dec(x_1); +x_25 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_25, 0, x_24); +lean_ctor_set(x_25, 1, x_19); +return x_25; +} +else +{ +lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; +x_26 = l_Lean_listToExpr___rarg___closed__6; +x_27 = l_Lean_mkConst(x_26, x_21); +x_28 = l_Lean_mkApp(x_27, x_1); +x_29 = l___private_Lean_Meta_AppBuilder_7__mkListLitAux___main(x_24, x_28, x_2); +lean_dec(x_24); +x_30 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_30, 0, x_29); +lean_ctor_set(x_30, 1, x_19); +return x_30; +} +} +} +else +{ +uint8_t x_31; +lean_dec(x_2); +lean_dec(x_1); +x_31 = !lean_is_exclusive(x_6); +if (x_31 == 0) +{ +return x_6; +} +else +{ +lean_object* x_32; lean_object* x_33; lean_object* x_34; +x_32 = lean_ctor_get(x_6, 0); +x_33 = lean_ctor_get(x_6, 1); +lean_inc(x_33); +lean_inc(x_32); +lean_dec(x_6); +x_34 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_34, 0, x_32); +lean_ctor_set(x_34, 1, x_33); +return x_34; +} +} +} +} +lean_object* _init_l_Lean_Meta_mkArrayLit___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("mkArrayLit"); +return x_1; +} +} +lean_object* _init_l_Lean_Meta_mkArrayLit___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l_Lean_Meta_mkArrayLit___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* l_Lean_Meta_mkArrayLit(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 = l_Lean_Meta_mkArrayLit___closed__2; +lean_inc(x_3); +lean_inc(x_1); +x_6 = l___private_Lean_Meta_AppBuilder_8__getDecLevel(x_5, x_1, x_3, x_4); +if (lean_obj_tag(x_6) == 0) +{ +lean_object* x_7; lean_object* x_8; lean_object* x_9; +x_7 = lean_ctor_get(x_6, 0); +lean_inc(x_7); +x_8 = lean_ctor_get(x_6, 1); +lean_inc(x_8); +lean_dec(x_6); +lean_inc(x_1); +x_9 = l_Lean_Meta_mkListLit(x_1, x_2, x_3, x_8); +if (lean_obj_tag(x_9) == 0) +{ +uint8_t x_10; +x_10 = !lean_is_exclusive(x_9); +if (x_10 == 0) +{ +lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; +x_11 = lean_ctor_get(x_9, 0); +x_12 = lean_box(0); +x_13 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_13, 0, x_7); +lean_ctor_set(x_13, 1, x_12); +x_14 = l_Lean_arrayToExpr___rarg___lambda__1___closed__2; +x_15 = l_Lean_mkConst(x_14, x_13); +x_16 = l_Lean_mkApp(x_15, x_1); +x_17 = l_Lean_mkApp(x_16, x_11); +lean_ctor_set(x_9, 0, x_17); +return x_9; +} +else +{ +lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; +x_18 = lean_ctor_get(x_9, 0); +x_19 = lean_ctor_get(x_9, 1); +lean_inc(x_19); +lean_inc(x_18); +lean_dec(x_9); +x_20 = lean_box(0); +x_21 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_21, 0, x_7); +lean_ctor_set(x_21, 1, x_20); +x_22 = l_Lean_arrayToExpr___rarg___lambda__1___closed__2; +x_23 = l_Lean_mkConst(x_22, x_21); +x_24 = l_Lean_mkApp(x_23, x_1); +x_25 = l_Lean_mkApp(x_24, x_18); +x_26 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_26, 0, x_25); +lean_ctor_set(x_26, 1, x_19); +return x_26; +} +} +else +{ +uint8_t x_27; +lean_dec(x_7); +lean_dec(x_1); +x_27 = !lean_is_exclusive(x_9); +if (x_27 == 0) +{ +return x_9; +} +else +{ +lean_object* x_28; lean_object* x_29; lean_object* x_30; +x_28 = lean_ctor_get(x_9, 0); +x_29 = lean_ctor_get(x_9, 1); +lean_inc(x_29); +lean_inc(x_28); +lean_dec(x_9); +x_30 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_30, 0, x_28); +lean_ctor_set(x_30, 1, x_29); +return x_30; +} +} +} +else +{ +uint8_t x_31; +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_31 = !lean_is_exclusive(x_6); +if (x_31 == 0) +{ +return x_6; +} +else +{ +lean_object* x_32; lean_object* x_33; lean_object* x_34; +x_32 = lean_ctor_get(x_6, 0); +x_33 = lean_ctor_get(x_6, 1); +lean_inc(x_33); +lean_inc(x_32); +lean_dec(x_6); +x_34 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_34, 0, x_32); +lean_ctor_set(x_34, 1, x_33); +return x_34; +} +} +} +} lean_object* initialize_Init(lean_object*); lean_object* initialize_Lean_Structure(lean_object*); lean_object* initialize_Lean_Util_Recognizers(lean_object*); @@ -13032,6 +14322,10 @@ l_Lean_Meta_mkEqSymm___closed__2 = _init_l_Lean_Meta_mkEqSymm___closed__2(); lean_mark_persistent(l_Lean_Meta_mkEqSymm___closed__2); l_Lean_Meta_mkEqSymm___closed__3 = _init_l_Lean_Meta_mkEqSymm___closed__3(); lean_mark_persistent(l_Lean_Meta_mkEqSymm___closed__3); +l_Lean_Meta_mkEqSymm___closed__4 = _init_l_Lean_Meta_mkEqSymm___closed__4(); +lean_mark_persistent(l_Lean_Meta_mkEqSymm___closed__4); +l_Lean_Meta_mkEqSymm___closed__5 = _init_l_Lean_Meta_mkEqSymm___closed__5(); +lean_mark_persistent(l_Lean_Meta_mkEqSymm___closed__5); l_Lean_Meta_mkEqTrans___closed__1 = _init_l_Lean_Meta_mkEqTrans___closed__1(); lean_mark_persistent(l_Lean_Meta_mkEqTrans___closed__1); l_Lean_Meta_mkEqTrans___closed__2 = _init_l_Lean_Meta_mkEqTrans___closed__2(); @@ -13040,6 +14334,10 @@ l_Lean_Meta_mkHEqSymm___closed__1 = _init_l_Lean_Meta_mkHEqSymm___closed__1(); lean_mark_persistent(l_Lean_Meta_mkHEqSymm___closed__1); l_Lean_Meta_mkHEqSymm___closed__2 = _init_l_Lean_Meta_mkHEqSymm___closed__2(); lean_mark_persistent(l_Lean_Meta_mkHEqSymm___closed__2); +l_Lean_Meta_mkHEqSymm___closed__3 = _init_l_Lean_Meta_mkHEqSymm___closed__3(); +lean_mark_persistent(l_Lean_Meta_mkHEqSymm___closed__3); +l_Lean_Meta_mkHEqSymm___closed__4 = _init_l_Lean_Meta_mkHEqSymm___closed__4(); +lean_mark_persistent(l_Lean_Meta_mkHEqSymm___closed__4); l_Lean_Meta_mkHEqTrans___closed__1 = _init_l_Lean_Meta_mkHEqTrans___closed__1(); lean_mark_persistent(l_Lean_Meta_mkHEqTrans___closed__1); l_Lean_Meta_mkEqOfHEq___closed__1 = _init_l_Lean_Meta_mkEqOfHEq___closed__1(); @@ -13048,38 +14346,74 @@ l_Lean_Meta_mkEqOfHEq___closed__2 = _init_l_Lean_Meta_mkEqOfHEq___closed__2(); lean_mark_persistent(l_Lean_Meta_mkEqOfHEq___closed__2); l_Lean_Meta_mkEqOfHEq___closed__3 = _init_l_Lean_Meta_mkEqOfHEq___closed__3(); lean_mark_persistent(l_Lean_Meta_mkEqOfHEq___closed__3); +l_Lean_Meta_mkEqOfHEq___closed__4 = _init_l_Lean_Meta_mkEqOfHEq___closed__4(); +lean_mark_persistent(l_Lean_Meta_mkEqOfHEq___closed__4); +l_Lean_Meta_mkEqOfHEq___closed__5 = _init_l_Lean_Meta_mkEqOfHEq___closed__5(); +lean_mark_persistent(l_Lean_Meta_mkEqOfHEq___closed__5); +l_Lean_Meta_mkEqOfHEq___closed__6 = _init_l_Lean_Meta_mkEqOfHEq___closed__6(); +lean_mark_persistent(l_Lean_Meta_mkEqOfHEq___closed__6); +l_Lean_Meta_mkEqOfHEq___closed__7 = _init_l_Lean_Meta_mkEqOfHEq___closed__7(); +lean_mark_persistent(l_Lean_Meta_mkEqOfHEq___closed__7); +l_Lean_Meta_mkEqOfHEq___closed__8 = _init_l_Lean_Meta_mkEqOfHEq___closed__8(); +lean_mark_persistent(l_Lean_Meta_mkEqOfHEq___closed__8); l_Lean_Meta_mkCongrArg___closed__1 = _init_l_Lean_Meta_mkCongrArg___closed__1(); lean_mark_persistent(l_Lean_Meta_mkCongrArg___closed__1); l_Lean_Meta_mkCongrArg___closed__2 = _init_l_Lean_Meta_mkCongrArg___closed__2(); lean_mark_persistent(l_Lean_Meta_mkCongrArg___closed__2); l_Lean_Meta_mkCongrArg___closed__3 = _init_l_Lean_Meta_mkCongrArg___closed__3(); lean_mark_persistent(l_Lean_Meta_mkCongrArg___closed__3); +l_Lean_Meta_mkCongrArg___closed__4 = _init_l_Lean_Meta_mkCongrArg___closed__4(); +lean_mark_persistent(l_Lean_Meta_mkCongrArg___closed__4); +l_Lean_Meta_mkCongrArg___closed__5 = _init_l_Lean_Meta_mkCongrArg___closed__5(); +lean_mark_persistent(l_Lean_Meta_mkCongrArg___closed__5); l_Lean_Meta_mkCongrFun___closed__1 = _init_l_Lean_Meta_mkCongrFun___closed__1(); lean_mark_persistent(l_Lean_Meta_mkCongrFun___closed__1); l_Lean_Meta_mkCongrFun___closed__2 = _init_l_Lean_Meta_mkCongrFun___closed__2(); lean_mark_persistent(l_Lean_Meta_mkCongrFun___closed__2); l_Lean_Meta_mkCongrFun___closed__3 = _init_l_Lean_Meta_mkCongrFun___closed__3(); lean_mark_persistent(l_Lean_Meta_mkCongrFun___closed__3); +l_Lean_Meta_mkCongrFun___closed__4 = _init_l_Lean_Meta_mkCongrFun___closed__4(); +lean_mark_persistent(l_Lean_Meta_mkCongrFun___closed__4); +l_Lean_Meta_mkCongrFun___closed__5 = _init_l_Lean_Meta_mkCongrFun___closed__5(); +lean_mark_persistent(l_Lean_Meta_mkCongrFun___closed__5); l_Lean_Meta_mkCongr___closed__1 = _init_l_Lean_Meta_mkCongr___closed__1(); lean_mark_persistent(l_Lean_Meta_mkCongr___closed__1); l_Lean_Meta_mkCongr___closed__2 = _init_l_Lean_Meta_mkCongr___closed__2(); lean_mark_persistent(l_Lean_Meta_mkCongr___closed__2); -l___private_Lean_Meta_AppBuilder_2__mkAppMFinal___closed__1 = _init_l___private_Lean_Meta_AppBuilder_2__mkAppMFinal___closed__1(); -lean_mark_persistent(l___private_Lean_Meta_AppBuilder_2__mkAppMFinal___closed__1); -l___private_Lean_Meta_AppBuilder_3__mkAppMAux___main___closed__1 = _init_l___private_Lean_Meta_AppBuilder_3__mkAppMAux___main___closed__1(); -lean_mark_persistent(l___private_Lean_Meta_AppBuilder_3__mkAppMAux___main___closed__1); -l___private_Lean_Meta_AppBuilder_3__mkAppMAux___main___closed__2 = _init_l___private_Lean_Meta_AppBuilder_3__mkAppMAux___main___closed__2(); -lean_mark_persistent(l___private_Lean_Meta_AppBuilder_3__mkAppMAux___main___closed__2); -l___private_Lean_Meta_AppBuilder_3__mkAppMAux___main___closed__3 = _init_l___private_Lean_Meta_AppBuilder_3__mkAppMAux___main___closed__3(); -lean_mark_persistent(l___private_Lean_Meta_AppBuilder_3__mkAppMAux___main___closed__3); +l___private_Lean_Meta_AppBuilder_3__mkAppMFinal___closed__1 = _init_l___private_Lean_Meta_AppBuilder_3__mkAppMFinal___closed__1(); +lean_mark_persistent(l___private_Lean_Meta_AppBuilder_3__mkAppMFinal___closed__1); +l___private_Lean_Meta_AppBuilder_3__mkAppMFinal___closed__2 = _init_l___private_Lean_Meta_AppBuilder_3__mkAppMFinal___closed__2(); +lean_mark_persistent(l___private_Lean_Meta_AppBuilder_3__mkAppMFinal___closed__2); +l___private_Lean_Meta_AppBuilder_3__mkAppMFinal___closed__3 = _init_l___private_Lean_Meta_AppBuilder_3__mkAppMFinal___closed__3(); +lean_mark_persistent(l___private_Lean_Meta_AppBuilder_3__mkAppMFinal___closed__3); +l___private_Lean_Meta_AppBuilder_4__mkAppMAux___main___closed__1 = _init_l___private_Lean_Meta_AppBuilder_4__mkAppMAux___main___closed__1(); +lean_mark_persistent(l___private_Lean_Meta_AppBuilder_4__mkAppMAux___main___closed__1); +l___private_Lean_Meta_AppBuilder_4__mkAppMAux___main___closed__2 = _init_l___private_Lean_Meta_AppBuilder_4__mkAppMAux___main___closed__2(); +lean_mark_persistent(l___private_Lean_Meta_AppBuilder_4__mkAppMAux___main___closed__2); +l___private_Lean_Meta_AppBuilder_4__mkAppMAux___main___closed__3 = _init_l___private_Lean_Meta_AppBuilder_4__mkAppMAux___main___closed__3(); +lean_mark_persistent(l___private_Lean_Meta_AppBuilder_4__mkAppMAux___main___closed__3); +l___private_Lean_Meta_AppBuilder_4__mkAppMAux___main___closed__4 = _init_l___private_Lean_Meta_AppBuilder_4__mkAppMAux___main___closed__4(); +lean_mark_persistent(l___private_Lean_Meta_AppBuilder_4__mkAppMAux___main___closed__4); +l___private_Lean_Meta_AppBuilder_4__mkAppMAux___main___closed__5 = _init_l___private_Lean_Meta_AppBuilder_4__mkAppMAux___main___closed__5(); +lean_mark_persistent(l___private_Lean_Meta_AppBuilder_4__mkAppMAux___main___closed__5); +l___private_Lean_Meta_AppBuilder_4__mkAppMAux___main___closed__6 = _init_l___private_Lean_Meta_AppBuilder_4__mkAppMAux___main___closed__6(); +lean_mark_persistent(l___private_Lean_Meta_AppBuilder_4__mkAppMAux___main___closed__6); +l___private_Lean_Meta_AppBuilder_4__mkAppMAux___main___closed__7 = _init_l___private_Lean_Meta_AppBuilder_4__mkAppMAux___main___closed__7(); +lean_mark_persistent(l___private_Lean_Meta_AppBuilder_4__mkAppMAux___main___closed__7); +l___private_Lean_Meta_AppBuilder_4__mkAppMAux___main___closed__8 = _init_l___private_Lean_Meta_AppBuilder_4__mkAppMAux___main___closed__8(); +lean_mark_persistent(l___private_Lean_Meta_AppBuilder_4__mkAppMAux___main___closed__8); l_Lean_Meta_mkAppM___closed__1 = _init_l_Lean_Meta_mkAppM___closed__1(); lean_mark_persistent(l_Lean_Meta_mkAppM___closed__1); -l___private_Lean_Meta_AppBuilder_5__mkAppOptMAux___main___closed__1 = _init_l___private_Lean_Meta_AppBuilder_5__mkAppOptMAux___main___closed__1(); -lean_mark_persistent(l___private_Lean_Meta_AppBuilder_5__mkAppOptMAux___main___closed__1); -l___private_Lean_Meta_AppBuilder_5__mkAppOptMAux___main___closed__2 = _init_l___private_Lean_Meta_AppBuilder_5__mkAppOptMAux___main___closed__2(); -lean_mark_persistent(l___private_Lean_Meta_AppBuilder_5__mkAppOptMAux___main___closed__2); -l___private_Lean_Meta_AppBuilder_5__mkAppOptMAux___main___closed__3 = _init_l___private_Lean_Meta_AppBuilder_5__mkAppOptMAux___main___closed__3(); -lean_mark_persistent(l___private_Lean_Meta_AppBuilder_5__mkAppOptMAux___main___closed__3); +l___private_Lean_Meta_AppBuilder_6__mkAppOptMAux___main___closed__1 = _init_l___private_Lean_Meta_AppBuilder_6__mkAppOptMAux___main___closed__1(); +lean_mark_persistent(l___private_Lean_Meta_AppBuilder_6__mkAppOptMAux___main___closed__1); +l___private_Lean_Meta_AppBuilder_6__mkAppOptMAux___main___closed__2 = _init_l___private_Lean_Meta_AppBuilder_6__mkAppOptMAux___main___closed__2(); +lean_mark_persistent(l___private_Lean_Meta_AppBuilder_6__mkAppOptMAux___main___closed__2); +l___private_Lean_Meta_AppBuilder_6__mkAppOptMAux___main___closed__3 = _init_l___private_Lean_Meta_AppBuilder_6__mkAppOptMAux___main___closed__3(); +lean_mark_persistent(l___private_Lean_Meta_AppBuilder_6__mkAppOptMAux___main___closed__3); +l___private_Lean_Meta_AppBuilder_6__mkAppOptMAux___main___closed__4 = _init_l___private_Lean_Meta_AppBuilder_6__mkAppOptMAux___main___closed__4(); +lean_mark_persistent(l___private_Lean_Meta_AppBuilder_6__mkAppOptMAux___main___closed__4); +l___private_Lean_Meta_AppBuilder_6__mkAppOptMAux___main___closed__5 = _init_l___private_Lean_Meta_AppBuilder_6__mkAppOptMAux___main___closed__5(); +lean_mark_persistent(l___private_Lean_Meta_AppBuilder_6__mkAppOptMAux___main___closed__5); l_Lean_Meta_mkEqNDRec___closed__1 = _init_l_Lean_Meta_mkEqNDRec___closed__1(); lean_mark_persistent(l_Lean_Meta_mkEqNDRec___closed__1); l_Lean_Meta_mkEqNDRec___closed__2 = _init_l_Lean_Meta_mkEqNDRec___closed__2(); @@ -13088,6 +14422,10 @@ l_Lean_Meta_mkEqNDRec___closed__3 = _init_l_Lean_Meta_mkEqNDRec___closed__3(); lean_mark_persistent(l_Lean_Meta_mkEqNDRec___closed__3); l_Lean_Meta_mkEqNDRec___closed__4 = _init_l_Lean_Meta_mkEqNDRec___closed__4(); lean_mark_persistent(l_Lean_Meta_mkEqNDRec___closed__4); +l_Lean_Meta_mkEqNDRec___closed__5 = _init_l_Lean_Meta_mkEqNDRec___closed__5(); +lean_mark_persistent(l_Lean_Meta_mkEqNDRec___closed__5); +l_Lean_Meta_mkEqNDRec___closed__6 = _init_l_Lean_Meta_mkEqNDRec___closed__6(); +lean_mark_persistent(l_Lean_Meta_mkEqNDRec___closed__6); l_Lean_Meta_mkEqRec___closed__1 = _init_l_Lean_Meta_mkEqRec___closed__1(); lean_mark_persistent(l_Lean_Meta_mkEqRec___closed__1); l_Lean_Meta_mkEqMP___closed__1 = _init_l_Lean_Meta_mkEqMP___closed__1(); @@ -13106,6 +14444,14 @@ l_Lean_Meta_mkNoConfusion___closed__3 = _init_l_Lean_Meta_mkNoConfusion___closed lean_mark_persistent(l_Lean_Meta_mkNoConfusion___closed__3); l_Lean_Meta_mkNoConfusion___closed__4 = _init_l_Lean_Meta_mkNoConfusion___closed__4(); lean_mark_persistent(l_Lean_Meta_mkNoConfusion___closed__4); +l_Lean_Meta_mkNoConfusion___closed__5 = _init_l_Lean_Meta_mkNoConfusion___closed__5(); +lean_mark_persistent(l_Lean_Meta_mkNoConfusion___closed__5); +l_Lean_Meta_mkNoConfusion___closed__6 = _init_l_Lean_Meta_mkNoConfusion___closed__6(); +lean_mark_persistent(l_Lean_Meta_mkNoConfusion___closed__6); +l_Lean_Meta_mkNoConfusion___closed__7 = _init_l_Lean_Meta_mkNoConfusion___closed__7(); +lean_mark_persistent(l_Lean_Meta_mkNoConfusion___closed__7); +l_Lean_Meta_mkNoConfusion___closed__8 = _init_l_Lean_Meta_mkNoConfusion___closed__8(); +lean_mark_persistent(l_Lean_Meta_mkNoConfusion___closed__8); l_Lean_Meta_mkPure___closed__1 = _init_l_Lean_Meta_mkPure___closed__1(); lean_mark_persistent(l_Lean_Meta_mkPure___closed__1); l_Lean_Meta_mkPure___closed__2 = _init_l_Lean_Meta_mkPure___closed__2(); @@ -13120,6 +14466,40 @@ l_Lean_Meta_mkProjection___main___closed__2 = _init_l_Lean_Meta_mkProjection___m lean_mark_persistent(l_Lean_Meta_mkProjection___main___closed__2); l_Lean_Meta_mkProjection___main___closed__3 = _init_l_Lean_Meta_mkProjection___main___closed__3(); lean_mark_persistent(l_Lean_Meta_mkProjection___main___closed__3); +l_Lean_Meta_mkProjection___main___closed__4 = _init_l_Lean_Meta_mkProjection___main___closed__4(); +lean_mark_persistent(l_Lean_Meta_mkProjection___main___closed__4); +l_Lean_Meta_mkProjection___main___closed__5 = _init_l_Lean_Meta_mkProjection___main___closed__5(); +lean_mark_persistent(l_Lean_Meta_mkProjection___main___closed__5); +l_Lean_Meta_mkProjection___main___closed__6 = _init_l_Lean_Meta_mkProjection___main___closed__6(); +lean_mark_persistent(l_Lean_Meta_mkProjection___main___closed__6); +l_Lean_Meta_mkProjection___main___closed__7 = _init_l_Lean_Meta_mkProjection___main___closed__7(); +lean_mark_persistent(l_Lean_Meta_mkProjection___main___closed__7); +l_Lean_Meta_mkProjection___main___closed__8 = _init_l_Lean_Meta_mkProjection___main___closed__8(); +lean_mark_persistent(l_Lean_Meta_mkProjection___main___closed__8); +l_Lean_Meta_mkProjection___main___closed__9 = _init_l_Lean_Meta_mkProjection___main___closed__9(); +lean_mark_persistent(l_Lean_Meta_mkProjection___main___closed__9); +l_Lean_Meta_mkProjection___main___closed__10 = _init_l_Lean_Meta_mkProjection___main___closed__10(); +lean_mark_persistent(l_Lean_Meta_mkProjection___main___closed__10); +l___private_Lean_Meta_AppBuilder_8__getDecLevel___closed__1 = _init_l___private_Lean_Meta_AppBuilder_8__getDecLevel___closed__1(); +lean_mark_persistent(l___private_Lean_Meta_AppBuilder_8__getDecLevel___closed__1); +l___private_Lean_Meta_AppBuilder_8__getDecLevel___closed__2 = _init_l___private_Lean_Meta_AppBuilder_8__getDecLevel___closed__2(); +lean_mark_persistent(l___private_Lean_Meta_AppBuilder_8__getDecLevel___closed__2); +l___private_Lean_Meta_AppBuilder_8__getDecLevel___closed__3 = _init_l___private_Lean_Meta_AppBuilder_8__getDecLevel___closed__3(); +lean_mark_persistent(l___private_Lean_Meta_AppBuilder_8__getDecLevel___closed__3); +l___private_Lean_Meta_AppBuilder_8__getDecLevel___closed__4 = _init_l___private_Lean_Meta_AppBuilder_8__getDecLevel___closed__4(); +lean_mark_persistent(l___private_Lean_Meta_AppBuilder_8__getDecLevel___closed__4); +l___private_Lean_Meta_AppBuilder_8__getDecLevel___closed__5 = _init_l___private_Lean_Meta_AppBuilder_8__getDecLevel___closed__5(); +lean_mark_persistent(l___private_Lean_Meta_AppBuilder_8__getDecLevel___closed__5); +l___private_Lean_Meta_AppBuilder_8__getDecLevel___closed__6 = _init_l___private_Lean_Meta_AppBuilder_8__getDecLevel___closed__6(); +lean_mark_persistent(l___private_Lean_Meta_AppBuilder_8__getDecLevel___closed__6); +l_Lean_Meta_mkListLit___closed__1 = _init_l_Lean_Meta_mkListLit___closed__1(); +lean_mark_persistent(l_Lean_Meta_mkListLit___closed__1); +l_Lean_Meta_mkListLit___closed__2 = _init_l_Lean_Meta_mkListLit___closed__2(); +lean_mark_persistent(l_Lean_Meta_mkListLit___closed__2); +l_Lean_Meta_mkArrayLit___closed__1 = _init_l_Lean_Meta_mkArrayLit___closed__1(); +lean_mark_persistent(l_Lean_Meta_mkArrayLit___closed__1); +l_Lean_Meta_mkArrayLit___closed__2 = _init_l_Lean_Meta_mkArrayLit___closed__2(); +lean_mark_persistent(l_Lean_Meta_mkArrayLit___closed__2); return lean_mk_io_result(lean_box(0)); } #ifdef __cplusplus diff --git a/stage0/stdlib/Lean/Meta/Basic.c b/stage0/stdlib/Lean/Meta/Basic.c index ffe9d6685a..814a0b78e8 100644 --- a/stage0/stdlib/Lean/Meta/Basic.c +++ b/stage0/stdlib/Lean/Meta/Basic.c @@ -19,6 +19,7 @@ lean_object* l_Lean_Meta_MetaM_inhabited(lean_object*, lean_object*); size_t l_Lean_Meta_InfoCacheKey_Hashable(lean_object*); lean_object* l_Lean_Meta_getLCtx___boxed(lean_object*, lean_object*); lean_object* l_Lean_Meta_MetaExtState_inhabited___closed__4; +lean_object* l_List_foldlM___main___at_Lean_Meta_withExistingLocalDecls___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_withLocalDecl(lean_object*); extern lean_object* l_Std_PersistentHashMap_empty___rarg___closed__2; lean_object* l_Lean_Meta_withNewLocalInstances___main___at_Lean_Meta_isClassExpensive___main___spec__5___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -48,6 +49,8 @@ lean_object* l_Lean_MetavarContext_instantiateMVars(lean_object*, lean_object*); lean_object* l_Lean_Meta_dbgTrace___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_InfoCacheKey_Inhabited; lean_object* l_Lean_Meta_getEnv(lean_object*); +lean_object* l_Lean_Meta_withIncRecDepth___rarg___closed__3; +lean_object* l_Lean_Meta_mkInferTypeRef___lambda__1___closed__4; lean_object* l_Lean_Meta_withNewLocalInstances___main___at_Lean_Meta_forallTelescope___spec__2___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_isReadOnlyExprMVar___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_MetavarContext_addLevelMVarDecl(lean_object*, lean_object*); @@ -74,6 +77,7 @@ lean_object* l_Lean_mkMVar(lean_object*); lean_object* l_Lean_Meta_isClassQuick___main(lean_object*, lean_object*, lean_object*); uint8_t lean_metavar_ctx_is_delayed_assigned(lean_object*, lean_object*); extern lean_object* l_Array_empty___closed__1; +lean_object* l_Lean_Meta_withExistingLocalDecls___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_environment_find(lean_object*, lean_object*); lean_object* l_Lean_Meta_isExprDefEqAux(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_withNewLocalInstances___main___at_Lean_Meta_forallTelescopeReducing___spec__5___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -109,13 +113,13 @@ lean_object* l_Lean_Meta_instantiateLevelMVars___boxed(lean_object*, lean_object lean_object* l_Lean_Meta_forallTelescope___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_withNewLocalInstances___main___at_Lean_Meta_isClassExpensive___main___spec__3(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_withNewLocalInstances___main___at___private_Lean_Meta_Basic_6__lambdaTelescopeAux___main___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_mkInferTypeRef___lambda__1___closed__3; lean_object* l_Lean_Expr_getAppFn___main(lean_object*); lean_object* l_Lean_Meta_MetaExtState_inhabited___lambda__2(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_fullApproxDefEq___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_withNewLocalInstances___main___at_Lean_Meta_forallBoundedTelescope___spec__4___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_getConst(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_MetavarContext_renameMVar(lean_object*, lean_object*, lean_object*); -extern lean_object* l_Lean_Meta_Exception_Inhabited___closed__1; lean_object* l_Lean_Meta_throwBug___rarg(lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Meta_Basic_4__forallTelescopeReducingAuxAux___main___at_Lean_Meta_isClassExpensive___main___spec__2(uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_withNewLocalInstances___main___at_Lean_Meta_forallTelescope___spec__3___rarg___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -125,6 +129,7 @@ lean_object* l_Lean_Meta_isReadOnlyLevelMVar___boxed(lean_object*, lean_object*, lean_object* l___private_Lean_Meta_Basic_11__regTraceClasses___closed__4; uint8_t l_Lean_isReducible(lean_object*, lean_object*); lean_object* l_Lean_Meta_mkAuxDefinitionFor(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_Basic_10__instantiateForallAux___main___closed__4; lean_object* l___private_Lean_Meta_Basic_5__forallTelescopeReducingAux___at_Lean_Meta_forallBoundedTelescope___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_InfoCacheKey_Hashable___boxed(lean_object*); lean_object* l_Lean_Meta_getConstNoEx(lean_object*, lean_object*, lean_object*); @@ -164,12 +169,14 @@ lean_object* l_Lean_Meta_throwEx___rarg(lean_object*, lean_object*, lean_object* lean_object* l_Lean_Meta_dbgTrace___rarg___closed__1; lean_object* l_Lean_Meta_mkMetaExtension(lean_object*); lean_object* l___private_Lean_Meta_Basic_6__lambdaTelescopeAux___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_mkIsExprDefEqAuxRef___lambda__1___closed__3; lean_object* lean_array_fget(lean_object*, lean_object*); lean_object* l_Lean_Meta_InfoCacheKey_Inhabited___closed__1; lean_object* l_Lean_Meta_withNewLocalInstances___main___at_Lean_Meta_forallBoundedTelescope___spec__5___rarg___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_forallTelescope___spec__4___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_expr_instantiate_rev_range(lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Expr_Inhabited___closed__1; +lean_object* l_List_foldlM___main___at_Lean_Meta_withExistingLocalDecls___spec__2(lean_object*, lean_object*, lean_object*, lean_object*); uint8_t lean_nat_dec_eq(lean_object*, lean_object*); lean_object* l___private_Lean_Meta_Basic_5__forallTelescopeReducingAux___at_Lean_Meta_isClassExpensive___main___spec__1(lean_object*, lean_object*, lean_object*, lean_object*); size_t l_Option_hash___at_Lean_Meta_InfoCacheKey_Hashable___spec__1(lean_object*); @@ -247,6 +254,7 @@ lean_object* l_Lean_Meta_addContext(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_mkSynthPendingRef___closed__1; lean_object* l_Lean_MetavarContext_assignExpr(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_TransparencyMode_HasBeq___closed__1; +lean_object* l_Lean_Meta_withIncRecDepth___rarg___closed__2; lean_object* l_Std_PersistentArray_forM___at_IO_runMeta___spec__3___boxed(lean_object*, lean_object*); lean_object* l_Lean_Meta_withNewLocalInstances(lean_object*); lean_object* l_Lean_Meta_withNewLocalInstances___main(lean_object*); @@ -265,6 +273,7 @@ lean_object* l_Lean_Meta_withNewLocalInstances___rarg___boxed(lean_object*, lean lean_object* l_Lean_Meta_assignLevelMVar(lean_object*, lean_object*, lean_object*, lean_object*); uint8_t l_Array_isEmpty___rarg(lean_object*); lean_object* l___private_Lean_Meta_Basic_4__forallTelescopeReducingAuxAux___rarg(lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_LocalDecl_toExpr(lean_object*); lean_object* l_Lean_Meta_getLocalInstances(lean_object*, lean_object*); lean_object* l_Lean_Meta_withNewLocalInstances___main___at_Lean_Meta_forallTelescopeReducing___spec__4___rarg___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_withNewLocalInstances___main___at_Lean_Meta_forallBoundedTelescope___spec__4___rarg___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -304,9 +313,11 @@ lean_object* l_IO_runMeta(lean_object*); lean_object* l_Lean_Meta_withNewLocalInstances___main___at_Lean_Meta_forallBoundedTelescope___spec__5___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l___private_Lean_Environment_5__envExtensionsRef; lean_object* l_Lean_Meta_forallMetaTelescopeReducing(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_Basic_10__instantiateForallAux___main___closed__3; lean_object* l_Lean_Meta_isDelayedAssigned___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_approxDefEq(lean_object*); lean_object* l_Lean_Meta_shouldReduceReducibleOnly___boxed(lean_object*, lean_object*); +lean_object* l_Lean_Meta_withExistingLocalDecls(lean_object*); lean_object* l_Lean_Meta_mkIsExprDefEqAuxRef(lean_object*); lean_object* l_Lean_Meta_mkFreshExprMVarAt(lean_object*, lean_object*, lean_object*, lean_object*, uint8_t, lean_object*, lean_object*); lean_object* l_Lean_LocalDecl_type(lean_object*); @@ -328,6 +339,7 @@ lean_object* l_Lean_Meta_mkIsExprDefEqAuxRef___lambda__1___closed__2; lean_object* l_Lean_Meta_withNewLocalInstances___main___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_ParamInfo_inhabited; lean_object* l_Lean_Meta_setMVarKind___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_List_foldl___main___at_Lean_Meta_withExistingLocalDecls___spec__1(lean_object*, lean_object*); lean_object* l_Lean_Meta_getParamNames___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_getExprMVarAssignment_x3f(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_metaExt; @@ -336,12 +348,14 @@ uint8_t lean_expr_eqv(lean_object*, lean_object*); extern lean_object* l_Std_PersistentArray_empty___closed__3; lean_object* l_Lean_Meta_liftStateMCtx___rarg___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_tracer___lambda__1(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_mkWHNFRef___lambda__1___closed__4; lean_object* l___private_Lean_Meta_Basic_4__forallTelescopeReducingAuxAux(lean_object*); lean_object* l_Lean_Meta_resettingSynthInstanceCache(lean_object*); lean_object* l_Lean_Meta_mkFreshExprMVar(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*); uint8_t l_Lean_Expr_hasMVar(lean_object*); lean_object* l_Lean_Meta_tracer___closed__2; lean_object* l___private_Lean_Meta_Basic_7__forallMetaTelescopeReducingAux(uint8_t, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_mkIsExprDefEqAuxRef___lambda__1___closed__4; lean_object* l_Lean_Meta_withAtLeastTransparency___rarg(uint8_t, lean_object*, lean_object*, lean_object*); lean_object* lean_metavar_ctx_mk_decl(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, uint8_t); lean_object* l___private_Lean_Meta_Basic_4__forallTelescopeReducingAuxAux___main___rarg(lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -357,6 +371,7 @@ lean_object* l_Lean_Meta_withNewLocalInstances___main___at___private_Lean_Meta_B lean_object* l_Lean_Meta_whnfRef; lean_object* l_Lean_Meta_synthPending(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_MetaExtState_inhabited___closed__3; +lean_object* l_Lean_LocalContext_addDecl(lean_object*, lean_object*); lean_object* l_Array_isEqvAux___main___at_Lean_Meta_withLocalContext___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_isExprDefEqAuxRef; lean_object* l_Lean_Meta_TransparencyMode_HasBeq; @@ -403,6 +418,7 @@ lean_object* l_Lean_Meta_mkInferTypeRef(lean_object*); lean_object* l_Lean_Meta_isDelayedAssigned(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_getConstInfo(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_mkLambda(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Meta_mkWHNFRef___lambda__1___closed__3; lean_object* l_Lean_Meta_getMVarDecl(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_MetavarContext_MkBinding_mkBinding(uint8_t, lean_object*, lean_object*, lean_object*, uint8_t, uint8_t, lean_object*); lean_object* l___private_Lean_Meta_Basic_10__instantiateForallAux___main___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -427,6 +443,7 @@ lean_object* l___private_Lean_Meta_Basic_8__lambdaMetaTelescopeAux___main___boxe lean_object* l_Lean_Meta_withNewMCtxDepth(lean_object*); lean_object* l_Lean_Meta_shouldReduceReducibleOnly(lean_object*, lean_object*); lean_object* l_Lean_Meta_getMCtx___rarg(lean_object*); +extern lean_object* l_Lean_Meta_Exception_Inhabited___closed__2; lean_object* l_IO_print___at_IO_runMeta___spec__2(lean_object*, lean_object*); lean_object* l_Lean_Meta_withNewLocalInstances___main___at_Lean_Meta_forallBoundedTelescope___spec__4___rarg(lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_whnfD(lean_object*, lean_object*, lean_object*); @@ -885,7 +902,7 @@ lean_object* l_Lean_Meta_MetaM_inhabited___rarg(lean_object* x_1) { _start: { lean_object* x_2; lean_object* x_3; -x_2 = l_Lean_Meta_Exception_Inhabited___closed__1; +x_2 = l_Lean_Meta_Exception_Inhabited___closed__2; x_3 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_3, 0, x_2); lean_ctor_set(x_3, 1, x_1); @@ -914,6 +931,26 @@ _start: { lean_object* x_1; lean_object* x_2; x_1 = l_Lean_maxRecDepthErrorMessage; +x_2 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* _init_l_Lean_Meta_withIncRecDepth___rarg___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Meta_withIncRecDepth___rarg___closed__1; +x_2 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* _init_l_Lean_Meta_withIncRecDepth___rarg___closed__3() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Meta_withIncRecDepth___rarg___closed__2; x_2 = lean_alloc_ctor(22, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; @@ -953,7 +990,7 @@ lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); lean_dec(x_1); -x_14 = l_Lean_Meta_withIncRecDepth___rarg___closed__1; +x_14 = l_Lean_Meta_withIncRecDepth___rarg___closed__3; x_15 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_15, 0, x_14); lean_ctor_set(x_15, 1, x_3); @@ -999,7 +1036,7 @@ lean_dec(x_18); lean_dec(x_17); lean_dec(x_16); lean_dec(x_1); -x_26 = l_Lean_Meta_withIncRecDepth___rarg___closed__1; +x_26 = l_Lean_Meta_withIncRecDepth___rarg___closed__3; x_27 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_27, 0, x_26); lean_ctor_set(x_27, 1, x_3); @@ -1205,6 +1242,26 @@ _start: { lean_object* x_1; lean_object* x_2; x_1 = l_Lean_Meta_mkWHNFRef___lambda__1___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_Meta_mkWHNFRef___lambda__1___closed__3() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Meta_mkWHNFRef___lambda__1___closed__2; +x_2 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* _init_l_Lean_Meta_mkWHNFRef___lambda__1___closed__4() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Meta_mkWHNFRef___lambda__1___closed__3; x_2 = lean_alloc_ctor(22, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; @@ -1214,7 +1271,7 @@ lean_object* l_Lean_Meta_mkWHNFRef___lambda__1(lean_object* x_1, lean_object* x_ _start: { lean_object* x_4; lean_object* x_5; -x_4 = l_Lean_Meta_mkWHNFRef___lambda__1___closed__2; +x_4 = l_Lean_Meta_mkWHNFRef___lambda__1___closed__4; x_5 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_5, 0, x_4); lean_ctor_set(x_5, 1, x_3); @@ -1261,6 +1318,26 @@ _start: { lean_object* x_1; lean_object* x_2; x_1 = l_Lean_Meta_mkInferTypeRef___lambda__1___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_Meta_mkInferTypeRef___lambda__1___closed__3() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Meta_mkInferTypeRef___lambda__1___closed__2; +x_2 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* _init_l_Lean_Meta_mkInferTypeRef___lambda__1___closed__4() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Meta_mkInferTypeRef___lambda__1___closed__3; x_2 = lean_alloc_ctor(22, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; @@ -1270,7 +1347,7 @@ lean_object* l_Lean_Meta_mkInferTypeRef___lambda__1(lean_object* x_1, lean_objec _start: { lean_object* x_4; lean_object* x_5; -x_4 = l_Lean_Meta_mkInferTypeRef___lambda__1___closed__2; +x_4 = l_Lean_Meta_mkInferTypeRef___lambda__1___closed__4; x_5 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_5, 0, x_4); lean_ctor_set(x_5, 1, x_3); @@ -1317,6 +1394,26 @@ _start: { lean_object* x_1; lean_object* x_2; x_1 = l_Lean_Meta_mkIsExprDefEqAuxRef___lambda__1___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_Meta_mkIsExprDefEqAuxRef___lambda__1___closed__3() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Meta_mkIsExprDefEqAuxRef___lambda__1___closed__2; +x_2 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* _init_l_Lean_Meta_mkIsExprDefEqAuxRef___lambda__1___closed__4() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Meta_mkIsExprDefEqAuxRef___lambda__1___closed__3; x_2 = lean_alloc_ctor(22, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; @@ -1326,7 +1423,7 @@ lean_object* l_Lean_Meta_mkIsExprDefEqAuxRef___lambda__1(lean_object* x_1, lean_ _start: { lean_object* x_5; lean_object* x_6; -x_5 = l_Lean_Meta_mkIsExprDefEqAuxRef___lambda__1___closed__2; +x_5 = l_Lean_Meta_mkIsExprDefEqAuxRef___lambda__1___closed__4; x_6 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_6, 0, x_5); lean_ctor_set(x_6, 1, x_4); @@ -1422,7 +1519,7 @@ lean_object* l_Lean_Meta_MetaExtState_inhabited___lambda__1(lean_object* x_1, le _start: { lean_object* x_5; lean_object* x_6; -x_5 = l_Lean_Meta_Exception_Inhabited___closed__1; +x_5 = l_Lean_Meta_Exception_Inhabited___closed__2; x_6 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_6, 0, x_5); lean_ctor_set(x_6, 1, x_4); @@ -1433,7 +1530,7 @@ lean_object* l_Lean_Meta_MetaExtState_inhabited___lambda__2(lean_object* x_1, le _start: { lean_object* x_4; lean_object* x_5; -x_4 = l_Lean_Meta_Exception_Inhabited___closed__1; +x_4 = l_Lean_Meta_Exception_Inhabited___closed__2; x_5 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_5, 0, x_4); lean_ctor_set(x_5, 1, x_3); @@ -2022,7 +2119,7 @@ lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); lean_dec(x_1); -x_18 = l_Lean_Meta_withIncRecDepth___rarg___closed__1; +x_18 = l_Lean_Meta_withIncRecDepth___rarg___closed__3; x_19 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_19, 0, x_18); lean_ctor_set(x_19, 1, x_3); @@ -2076,7 +2173,7 @@ lean_dec(x_22); lean_dec(x_21); lean_dec(x_20); lean_dec(x_1); -x_34 = l_Lean_Meta_withIncRecDepth___rarg___closed__1; +x_34 = l_Lean_Meta_withIncRecDepth___rarg___closed__3; x_35 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_35, 0, x_34); lean_ctor_set(x_35, 1, x_3); @@ -2208,7 +2305,7 @@ lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); lean_dec(x_1); -x_18 = l_Lean_Meta_withIncRecDepth___rarg___closed__1; +x_18 = l_Lean_Meta_withIncRecDepth___rarg___closed__3; x_19 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_19, 0, x_18); lean_ctor_set(x_19, 1, x_3); @@ -2262,7 +2359,7 @@ lean_dec(x_22); lean_dec(x_21); lean_dec(x_20); lean_dec(x_1); -x_34 = l_Lean_Meta_withIncRecDepth___rarg___closed__1; +x_34 = l_Lean_Meta_withIncRecDepth___rarg___closed__3; x_35 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_35, 0, x_34); lean_ctor_set(x_35, 1, x_3); @@ -2314,7 +2411,7 @@ lean_dec(x_7); lean_dec(x_6); lean_dec(x_2); lean_dec(x_1); -x_19 = l_Lean_Meta_withIncRecDepth___rarg___closed__1; +x_19 = l_Lean_Meta_withIncRecDepth___rarg___closed__3; x_20 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_20, 0, x_19); lean_ctor_set(x_20, 1, x_4); @@ -2369,7 +2466,7 @@ lean_dec(x_22); lean_dec(x_21); lean_dec(x_2); lean_dec(x_1); -x_35 = l_Lean_Meta_withIncRecDepth___rarg___closed__1; +x_35 = l_Lean_Meta_withIncRecDepth___rarg___closed__3; x_36 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_36, 0, x_35); lean_ctor_set(x_36, 1, x_4); @@ -2420,7 +2517,7 @@ lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); lean_dec(x_1); -x_18 = l_Lean_Meta_withIncRecDepth___rarg___closed__1; +x_18 = l_Lean_Meta_withIncRecDepth___rarg___closed__3; x_19 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_19, 0, x_18); lean_ctor_set(x_19, 1, x_3); @@ -2474,7 +2571,7 @@ lean_dec(x_22); lean_dec(x_21); lean_dec(x_20); lean_dec(x_1); -x_34 = l_Lean_Meta_withIncRecDepth___rarg___closed__1; +x_34 = l_Lean_Meta_withIncRecDepth___rarg___closed__3; x_35 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_35, 0, x_34); lean_ctor_set(x_35, 1, x_3); @@ -42594,6 +42691,1302 @@ x_2 = lean_alloc_closure((void*)(l_Lean_Meta_withLetDecl___rarg), 6, 0); return x_2; } } +lean_object* l_List_foldl___main___at_Lean_Meta_withExistingLocalDecls___spec__1(lean_object* x_1, lean_object* x_2) { +_start: +{ +if (lean_obj_tag(x_2) == 0) +{ +return x_1; +} +else +{ +lean_object* x_3; lean_object* x_4; lean_object* x_5; +x_3 = lean_ctor_get(x_2, 0); +lean_inc(x_3); +x_4 = lean_ctor_get(x_2, 1); +lean_inc(x_4); +lean_dec(x_2); +x_5 = l_Lean_LocalContext_addDecl(x_1, x_3); +x_1 = x_5; +x_2 = x_4; +goto _start; +} +} +} +lean_object* l_List_foldlM___main___at_Lean_Meta_withExistingLocalDecls___spec__2(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +if (lean_obj_tag(x_2) == 0) +{ +lean_object* x_5; +lean_dec(x_3); +x_5 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_5, 0, x_1); +lean_ctor_set(x_5, 1, x_4); +return x_5; +} +else +{ +lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; +x_6 = lean_ctor_get(x_2, 0); +x_7 = lean_ctor_get(x_2, 1); +x_8 = l_Lean_LocalDecl_type(x_6); +lean_inc(x_3); +x_9 = l_Lean_Meta_isClass(x_8, x_3, x_4); +if (lean_obj_tag(x_9) == 0) +{ +lean_object* x_10; +x_10 = lean_ctor_get(x_9, 0); +lean_inc(x_10); +if (lean_obj_tag(x_10) == 0) +{ +lean_object* x_11; +x_11 = lean_ctor_get(x_9, 1); +lean_inc(x_11); +lean_dec(x_9); +x_2 = x_7; +x_4 = x_11; +goto _start; +} +else +{ +lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; +x_13 = lean_ctor_get(x_9, 1); +lean_inc(x_13); +lean_dec(x_9); +x_14 = lean_ctor_get(x_10, 0); +lean_inc(x_14); +lean_dec(x_10); +x_15 = l_Lean_LocalDecl_toExpr(x_6); +x_16 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_16, 0, x_14); +lean_ctor_set(x_16, 1, x_15); +x_17 = lean_array_push(x_1, x_16); +x_1 = x_17; +x_2 = x_7; +x_4 = x_13; +goto _start; +} +} +else +{ +uint8_t x_19; +lean_dec(x_3); +lean_dec(x_1); +x_19 = !lean_is_exclusive(x_9); +if (x_19 == 0) +{ +return x_9; +} +else +{ +lean_object* x_20; lean_object* x_21; lean_object* x_22; +x_20 = lean_ctor_get(x_9, 0); +x_21 = lean_ctor_get(x_9, 1); +lean_inc(x_21); +lean_inc(x_20); +lean_dec(x_9); +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_Meta_withExistingLocalDecls___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +uint8_t x_5; +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; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; +x_6 = lean_ctor_get(x_3, 0); +x_7 = lean_ctor_get(x_3, 1); +x_8 = lean_ctor_get(x_3, 2); +x_9 = lean_ctor_get(x_3, 3); +x_10 = lean_ctor_get(x_3, 4); +x_11 = lean_array_get_size(x_8); +lean_inc(x_1); +x_12 = l_List_foldl___main___at_Lean_Meta_withExistingLocalDecls___spec__1(x_7, x_1); +lean_inc(x_10); +lean_inc(x_9); +lean_inc(x_8); +lean_inc(x_12); +lean_inc(x_6); +lean_ctor_set(x_3, 1, x_12); +lean_inc(x_3); +x_13 = l_List_foldlM___main___at_Lean_Meta_withExistingLocalDecls___spec__2(x_8, x_1, x_3, x_4); +lean_dec(x_1); +if (lean_obj_tag(x_13) == 0) +{ +lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; uint8_t x_18; +x_14 = lean_ctor_get(x_13, 0); +lean_inc(x_14); +x_15 = lean_ctor_get(x_13, 1); +lean_inc(x_15); +if (lean_is_exclusive(x_13)) { + lean_ctor_release(x_13, 0); + lean_ctor_release(x_13, 1); + x_16 = x_13; +} else { + lean_dec_ref(x_13); + x_16 = lean_box(0); +} +x_17 = lean_array_get_size(x_14); +x_18 = lean_nat_dec_eq(x_17, x_11); +lean_dec(x_11); +lean_dec(x_17); +if (x_18 == 0) +{ +uint8_t x_19; +lean_dec(x_3); +x_19 = !lean_is_exclusive(x_15); +if (x_19 == 0) +{ +lean_object* x_20; uint8_t x_21; +x_20 = lean_ctor_get(x_15, 2); +x_21 = !lean_is_exclusive(x_20); +if (x_21 == 0) +{ +lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_74; lean_object* x_75; lean_object* x_76; +x_22 = lean_ctor_get(x_20, 2); +x_74 = l_Lean_Meta_resettingSynthInstanceCache___rarg___closed__1; +lean_ctor_set(x_20, 2, x_74); +x_75 = lean_alloc_ctor(0, 5, 0); +lean_ctor_set(x_75, 0, x_6); +lean_ctor_set(x_75, 1, x_12); +lean_ctor_set(x_75, 2, x_14); +lean_ctor_set(x_75, 3, x_9); +lean_ctor_set(x_75, 4, x_10); +x_76 = lean_apply_2(x_2, x_75, x_15); +if (lean_obj_tag(x_76) == 0) +{ +lean_object* x_77; lean_object* x_78; lean_object* x_79; +x_77 = lean_ctor_get(x_76, 0); +lean_inc(x_77); +x_78 = lean_ctor_get(x_76, 1); +lean_inc(x_78); +lean_dec(x_76); +x_79 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_79, 0, x_77); +x_23 = x_79; +x_24 = x_78; +goto block_73; +} +else +{ +lean_object* x_80; lean_object* x_81; lean_object* x_82; +x_80 = lean_ctor_get(x_76, 0); +lean_inc(x_80); +x_81 = lean_ctor_get(x_76, 1); +lean_inc(x_81); +lean_dec(x_76); +x_82 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_82, 0, x_80); +x_23 = x_82; +x_24 = x_81; +goto block_73; +} +block_73: +{ +if (lean_obj_tag(x_23) == 0) +{ +lean_object* x_25; lean_object* x_26; uint8_t x_27; +x_25 = lean_ctor_get(x_24, 2); +lean_inc(x_25); +x_26 = lean_ctor_get(x_23, 0); +lean_inc(x_26); +lean_dec(x_23); +x_27 = !lean_is_exclusive(x_24); +if (x_27 == 0) +{ +lean_object* x_28; uint8_t x_29; +x_28 = lean_ctor_get(x_24, 2); +lean_dec(x_28); +x_29 = !lean_is_exclusive(x_25); +if (x_29 == 0) +{ +lean_object* x_30; lean_object* x_31; +x_30 = lean_ctor_get(x_25, 2); +lean_dec(x_30); +lean_ctor_set(x_25, 2, x_22); +if (lean_is_scalar(x_16)) { + x_31 = lean_alloc_ctor(1, 2, 0); +} else { + x_31 = x_16; + lean_ctor_set_tag(x_31, 1); +} +lean_ctor_set(x_31, 0, x_26); +lean_ctor_set(x_31, 1, x_24); +return x_31; +} +else +{ +lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; +x_32 = lean_ctor_get(x_25, 0); +x_33 = lean_ctor_get(x_25, 1); +x_34 = lean_ctor_get(x_25, 3); +lean_inc(x_34); +lean_inc(x_33); +lean_inc(x_32); +lean_dec(x_25); +x_35 = lean_alloc_ctor(0, 4, 0); +lean_ctor_set(x_35, 0, x_32); +lean_ctor_set(x_35, 1, x_33); +lean_ctor_set(x_35, 2, x_22); +lean_ctor_set(x_35, 3, x_34); +lean_ctor_set(x_24, 2, x_35); +if (lean_is_scalar(x_16)) { + x_36 = lean_alloc_ctor(1, 2, 0); +} else { + x_36 = x_16; + lean_ctor_set_tag(x_36, 1); +} +lean_ctor_set(x_36, 0, x_26); +lean_ctor_set(x_36, 1, x_24); +return x_36; +} +} +else +{ +lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; lean_object* x_48; +x_37 = lean_ctor_get(x_24, 0); +x_38 = lean_ctor_get(x_24, 1); +x_39 = lean_ctor_get(x_24, 3); +x_40 = lean_ctor_get(x_24, 4); +x_41 = lean_ctor_get(x_24, 5); +lean_inc(x_41); +lean_inc(x_40); +lean_inc(x_39); +lean_inc(x_38); +lean_inc(x_37); +lean_dec(x_24); +x_42 = lean_ctor_get(x_25, 0); +lean_inc(x_42); +x_43 = lean_ctor_get(x_25, 1); +lean_inc(x_43); +x_44 = lean_ctor_get(x_25, 3); +lean_inc(x_44); +if (lean_is_exclusive(x_25)) { + lean_ctor_release(x_25, 0); + lean_ctor_release(x_25, 1); + lean_ctor_release(x_25, 2); + lean_ctor_release(x_25, 3); + x_45 = x_25; +} else { + lean_dec_ref(x_25); + x_45 = lean_box(0); +} +if (lean_is_scalar(x_45)) { + x_46 = lean_alloc_ctor(0, 4, 0); +} else { + x_46 = x_45; +} +lean_ctor_set(x_46, 0, x_42); +lean_ctor_set(x_46, 1, x_43); +lean_ctor_set(x_46, 2, x_22); +lean_ctor_set(x_46, 3, x_44); +x_47 = lean_alloc_ctor(0, 6, 0); +lean_ctor_set(x_47, 0, x_37); +lean_ctor_set(x_47, 1, x_38); +lean_ctor_set(x_47, 2, x_46); +lean_ctor_set(x_47, 3, x_39); +lean_ctor_set(x_47, 4, x_40); +lean_ctor_set(x_47, 5, x_41); +if (lean_is_scalar(x_16)) { + x_48 = lean_alloc_ctor(1, 2, 0); +} else { + x_48 = x_16; + lean_ctor_set_tag(x_48, 1); +} +lean_ctor_set(x_48, 0, x_26); +lean_ctor_set(x_48, 1, x_47); +return x_48; +} +} +else +{ +lean_object* x_49; lean_object* x_50; uint8_t x_51; +x_49 = lean_ctor_get(x_24, 2); +lean_inc(x_49); +x_50 = lean_ctor_get(x_23, 0); +lean_inc(x_50); +lean_dec(x_23); +x_51 = !lean_is_exclusive(x_24); +if (x_51 == 0) +{ +lean_object* x_52; uint8_t x_53; +x_52 = lean_ctor_get(x_24, 2); +lean_dec(x_52); +x_53 = !lean_is_exclusive(x_49); +if (x_53 == 0) +{ +lean_object* x_54; lean_object* x_55; +x_54 = lean_ctor_get(x_49, 2); +lean_dec(x_54); +lean_ctor_set(x_49, 2, x_22); +if (lean_is_scalar(x_16)) { + x_55 = lean_alloc_ctor(0, 2, 0); +} else { + x_55 = x_16; +} +lean_ctor_set(x_55, 0, x_50); +lean_ctor_set(x_55, 1, x_24); +return x_55; +} +else +{ +lean_object* x_56; lean_object* x_57; lean_object* x_58; lean_object* x_59; lean_object* x_60; +x_56 = lean_ctor_get(x_49, 0); +x_57 = lean_ctor_get(x_49, 1); +x_58 = lean_ctor_get(x_49, 3); +lean_inc(x_58); +lean_inc(x_57); +lean_inc(x_56); +lean_dec(x_49); +x_59 = lean_alloc_ctor(0, 4, 0); +lean_ctor_set(x_59, 0, x_56); +lean_ctor_set(x_59, 1, x_57); +lean_ctor_set(x_59, 2, x_22); +lean_ctor_set(x_59, 3, x_58); +lean_ctor_set(x_24, 2, x_59); +if (lean_is_scalar(x_16)) { + x_60 = lean_alloc_ctor(0, 2, 0); +} else { + x_60 = x_16; +} +lean_ctor_set(x_60, 0, x_50); +lean_ctor_set(x_60, 1, x_24); +return x_60; +} +} +else +{ +lean_object* x_61; lean_object* x_62; lean_object* x_63; lean_object* x_64; lean_object* x_65; lean_object* x_66; lean_object* x_67; lean_object* x_68; lean_object* x_69; lean_object* x_70; lean_object* x_71; lean_object* x_72; +x_61 = lean_ctor_get(x_24, 0); +x_62 = lean_ctor_get(x_24, 1); +x_63 = lean_ctor_get(x_24, 3); +x_64 = lean_ctor_get(x_24, 4); +x_65 = lean_ctor_get(x_24, 5); +lean_inc(x_65); +lean_inc(x_64); +lean_inc(x_63); +lean_inc(x_62); +lean_inc(x_61); +lean_dec(x_24); +x_66 = lean_ctor_get(x_49, 0); +lean_inc(x_66); +x_67 = lean_ctor_get(x_49, 1); +lean_inc(x_67); +x_68 = lean_ctor_get(x_49, 3); +lean_inc(x_68); +if (lean_is_exclusive(x_49)) { + lean_ctor_release(x_49, 0); + lean_ctor_release(x_49, 1); + lean_ctor_release(x_49, 2); + lean_ctor_release(x_49, 3); + x_69 = x_49; +} else { + lean_dec_ref(x_49); + x_69 = lean_box(0); +} +if (lean_is_scalar(x_69)) { + x_70 = lean_alloc_ctor(0, 4, 0); +} else { + x_70 = x_69; +} +lean_ctor_set(x_70, 0, x_66); +lean_ctor_set(x_70, 1, x_67); +lean_ctor_set(x_70, 2, x_22); +lean_ctor_set(x_70, 3, x_68); +x_71 = lean_alloc_ctor(0, 6, 0); +lean_ctor_set(x_71, 0, x_61); +lean_ctor_set(x_71, 1, x_62); +lean_ctor_set(x_71, 2, x_70); +lean_ctor_set(x_71, 3, x_63); +lean_ctor_set(x_71, 4, x_64); +lean_ctor_set(x_71, 5, x_65); +if (lean_is_scalar(x_16)) { + x_72 = lean_alloc_ctor(0, 2, 0); +} else { + x_72 = x_16; +} +lean_ctor_set(x_72, 0, x_50); +lean_ctor_set(x_72, 1, x_71); +return x_72; +} +} +} +} +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_120; lean_object* x_121; lean_object* x_122; lean_object* x_123; +x_83 = lean_ctor_get(x_20, 0); +x_84 = lean_ctor_get(x_20, 1); +x_85 = lean_ctor_get(x_20, 2); +x_86 = lean_ctor_get(x_20, 3); +lean_inc(x_86); +lean_inc(x_85); +lean_inc(x_84); +lean_inc(x_83); +lean_dec(x_20); +x_120 = l_Lean_Meta_resettingSynthInstanceCache___rarg___closed__1; +x_121 = lean_alloc_ctor(0, 4, 0); +lean_ctor_set(x_121, 0, x_83); +lean_ctor_set(x_121, 1, x_84); +lean_ctor_set(x_121, 2, x_120); +lean_ctor_set(x_121, 3, x_86); +lean_ctor_set(x_15, 2, x_121); +x_122 = lean_alloc_ctor(0, 5, 0); +lean_ctor_set(x_122, 0, x_6); +lean_ctor_set(x_122, 1, x_12); +lean_ctor_set(x_122, 2, x_14); +lean_ctor_set(x_122, 3, x_9); +lean_ctor_set(x_122, 4, x_10); +x_123 = lean_apply_2(x_2, x_122, x_15); +if (lean_obj_tag(x_123) == 0) +{ +lean_object* x_124; lean_object* x_125; lean_object* x_126; +x_124 = lean_ctor_get(x_123, 0); +lean_inc(x_124); +x_125 = lean_ctor_get(x_123, 1); +lean_inc(x_125); +lean_dec(x_123); +x_126 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_126, 0, x_124); +x_87 = x_126; +x_88 = x_125; +goto block_119; +} +else +{ +lean_object* x_127; lean_object* x_128; lean_object* x_129; +x_127 = lean_ctor_get(x_123, 0); +lean_inc(x_127); +x_128 = lean_ctor_get(x_123, 1); +lean_inc(x_128); +lean_dec(x_123); +x_129 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_129, 0, x_127); +x_87 = x_129; +x_88 = x_128; +goto block_119; +} +block_119: +{ +if (lean_obj_tag(x_87) == 0) +{ +lean_object* x_89; lean_object* x_90; lean_object* x_91; lean_object* x_92; lean_object* x_93; lean_object* x_94; lean_object* x_95; lean_object* x_96; lean_object* x_97; lean_object* x_98; lean_object* x_99; lean_object* x_100; lean_object* x_101; lean_object* x_102; lean_object* x_103; +x_89 = lean_ctor_get(x_88, 2); +lean_inc(x_89); +x_90 = lean_ctor_get(x_87, 0); +lean_inc(x_90); +lean_dec(x_87); +x_91 = lean_ctor_get(x_88, 0); +lean_inc(x_91); +x_92 = lean_ctor_get(x_88, 1); +lean_inc(x_92); +x_93 = lean_ctor_get(x_88, 3); +lean_inc(x_93); +x_94 = lean_ctor_get(x_88, 4); +lean_inc(x_94); +x_95 = lean_ctor_get(x_88, 5); +lean_inc(x_95); +if (lean_is_exclusive(x_88)) { + lean_ctor_release(x_88, 0); + lean_ctor_release(x_88, 1); + lean_ctor_release(x_88, 2); + lean_ctor_release(x_88, 3); + lean_ctor_release(x_88, 4); + lean_ctor_release(x_88, 5); + x_96 = x_88; +} else { + lean_dec_ref(x_88); + x_96 = lean_box(0); +} +x_97 = lean_ctor_get(x_89, 0); +lean_inc(x_97); +x_98 = lean_ctor_get(x_89, 1); +lean_inc(x_98); +x_99 = lean_ctor_get(x_89, 3); +lean_inc(x_99); +if (lean_is_exclusive(x_89)) { + lean_ctor_release(x_89, 0); + lean_ctor_release(x_89, 1); + lean_ctor_release(x_89, 2); + lean_ctor_release(x_89, 3); + x_100 = x_89; +} else { + lean_dec_ref(x_89); + x_100 = lean_box(0); +} +if (lean_is_scalar(x_100)) { + x_101 = lean_alloc_ctor(0, 4, 0); +} else { + x_101 = x_100; +} +lean_ctor_set(x_101, 0, x_97); +lean_ctor_set(x_101, 1, x_98); +lean_ctor_set(x_101, 2, x_85); +lean_ctor_set(x_101, 3, x_99); +if (lean_is_scalar(x_96)) { + x_102 = lean_alloc_ctor(0, 6, 0); +} else { + x_102 = x_96; +} +lean_ctor_set(x_102, 0, x_91); +lean_ctor_set(x_102, 1, x_92); +lean_ctor_set(x_102, 2, x_101); +lean_ctor_set(x_102, 3, x_93); +lean_ctor_set(x_102, 4, x_94); +lean_ctor_set(x_102, 5, x_95); +if (lean_is_scalar(x_16)) { + x_103 = lean_alloc_ctor(1, 2, 0); +} else { + x_103 = x_16; + lean_ctor_set_tag(x_103, 1); +} +lean_ctor_set(x_103, 0, x_90); +lean_ctor_set(x_103, 1, x_102); +return x_103; +} +else +{ +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; +x_104 = lean_ctor_get(x_88, 2); +lean_inc(x_104); +x_105 = lean_ctor_get(x_87, 0); +lean_inc(x_105); +lean_dec(x_87); +x_106 = lean_ctor_get(x_88, 0); +lean_inc(x_106); +x_107 = lean_ctor_get(x_88, 1); +lean_inc(x_107); +x_108 = lean_ctor_get(x_88, 3); +lean_inc(x_108); +x_109 = lean_ctor_get(x_88, 4); +lean_inc(x_109); +x_110 = lean_ctor_get(x_88, 5); +lean_inc(x_110); +if (lean_is_exclusive(x_88)) { + lean_ctor_release(x_88, 0); + lean_ctor_release(x_88, 1); + lean_ctor_release(x_88, 2); + lean_ctor_release(x_88, 3); + lean_ctor_release(x_88, 4); + lean_ctor_release(x_88, 5); + x_111 = x_88; +} else { + lean_dec_ref(x_88); + x_111 = lean_box(0); +} +x_112 = lean_ctor_get(x_104, 0); +lean_inc(x_112); +x_113 = lean_ctor_get(x_104, 1); +lean_inc(x_113); +x_114 = lean_ctor_get(x_104, 3); +lean_inc(x_114); +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); + x_115 = x_104; +} else { + lean_dec_ref(x_104); + x_115 = lean_box(0); +} +if (lean_is_scalar(x_115)) { + x_116 = lean_alloc_ctor(0, 4, 0); +} else { + x_116 = x_115; +} +lean_ctor_set(x_116, 0, x_112); +lean_ctor_set(x_116, 1, x_113); +lean_ctor_set(x_116, 2, x_85); +lean_ctor_set(x_116, 3, x_114); +if (lean_is_scalar(x_111)) { + x_117 = lean_alloc_ctor(0, 6, 0); +} else { + x_117 = x_111; +} +lean_ctor_set(x_117, 0, x_106); +lean_ctor_set(x_117, 1, x_107); +lean_ctor_set(x_117, 2, x_116); +lean_ctor_set(x_117, 3, x_108); +lean_ctor_set(x_117, 4, x_109); +lean_ctor_set(x_117, 5, x_110); +if (lean_is_scalar(x_16)) { + x_118 = lean_alloc_ctor(0, 2, 0); +} else { + x_118 = x_16; +} +lean_ctor_set(x_118, 0, x_105); +lean_ctor_set(x_118, 1, x_117); +return x_118; +} +} +} +} +else +{ +lean_object* x_130; lean_object* x_131; lean_object* x_132; lean_object* x_133; lean_object* x_134; lean_object* x_135; lean_object* x_136; lean_object* x_137; lean_object* x_138; lean_object* x_139; lean_object* x_140; lean_object* x_141; lean_object* x_142; lean_object* x_174; lean_object* x_175; lean_object* x_176; lean_object* x_177; lean_object* x_178; +x_130 = lean_ctor_get(x_15, 2); +x_131 = lean_ctor_get(x_15, 0); +x_132 = lean_ctor_get(x_15, 1); +x_133 = lean_ctor_get(x_15, 3); +x_134 = lean_ctor_get(x_15, 4); +x_135 = lean_ctor_get(x_15, 5); +lean_inc(x_135); +lean_inc(x_134); +lean_inc(x_133); +lean_inc(x_130); +lean_inc(x_132); +lean_inc(x_131); +lean_dec(x_15); +x_136 = lean_ctor_get(x_130, 0); +lean_inc(x_136); +x_137 = lean_ctor_get(x_130, 1); +lean_inc(x_137); +x_138 = lean_ctor_get(x_130, 2); +lean_inc(x_138); +x_139 = lean_ctor_get(x_130, 3); +lean_inc(x_139); +if (lean_is_exclusive(x_130)) { + lean_ctor_release(x_130, 0); + lean_ctor_release(x_130, 1); + lean_ctor_release(x_130, 2); + lean_ctor_release(x_130, 3); + x_140 = x_130; +} else { + lean_dec_ref(x_130); + x_140 = lean_box(0); +} +x_174 = l_Lean_Meta_resettingSynthInstanceCache___rarg___closed__1; +if (lean_is_scalar(x_140)) { + x_175 = lean_alloc_ctor(0, 4, 0); +} else { + x_175 = x_140; +} +lean_ctor_set(x_175, 0, x_136); +lean_ctor_set(x_175, 1, x_137); +lean_ctor_set(x_175, 2, x_174); +lean_ctor_set(x_175, 3, x_139); +x_176 = lean_alloc_ctor(0, 6, 0); +lean_ctor_set(x_176, 0, x_131); +lean_ctor_set(x_176, 1, x_132); +lean_ctor_set(x_176, 2, x_175); +lean_ctor_set(x_176, 3, x_133); +lean_ctor_set(x_176, 4, x_134); +lean_ctor_set(x_176, 5, x_135); +x_177 = lean_alloc_ctor(0, 5, 0); +lean_ctor_set(x_177, 0, x_6); +lean_ctor_set(x_177, 1, x_12); +lean_ctor_set(x_177, 2, x_14); +lean_ctor_set(x_177, 3, x_9); +lean_ctor_set(x_177, 4, x_10); +x_178 = lean_apply_2(x_2, x_177, x_176); +if (lean_obj_tag(x_178) == 0) +{ +lean_object* x_179; lean_object* x_180; lean_object* x_181; +x_179 = lean_ctor_get(x_178, 0); +lean_inc(x_179); +x_180 = lean_ctor_get(x_178, 1); +lean_inc(x_180); +lean_dec(x_178); +x_181 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_181, 0, x_179); +x_141 = x_181; +x_142 = x_180; +goto block_173; +} +else +{ +lean_object* x_182; lean_object* x_183; lean_object* x_184; +x_182 = lean_ctor_get(x_178, 0); +lean_inc(x_182); +x_183 = lean_ctor_get(x_178, 1); +lean_inc(x_183); +lean_dec(x_178); +x_184 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_184, 0, x_182); +x_141 = x_184; +x_142 = x_183; +goto block_173; +} +block_173: +{ +if (lean_obj_tag(x_141) == 0) +{ +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; +x_143 = lean_ctor_get(x_142, 2); +lean_inc(x_143); +x_144 = lean_ctor_get(x_141, 0); +lean_inc(x_144); +lean_dec(x_141); +x_145 = lean_ctor_get(x_142, 0); +lean_inc(x_145); +x_146 = lean_ctor_get(x_142, 1); +lean_inc(x_146); +x_147 = lean_ctor_get(x_142, 3); +lean_inc(x_147); +x_148 = lean_ctor_get(x_142, 4); +lean_inc(x_148); +x_149 = lean_ctor_get(x_142, 5); +lean_inc(x_149); +if (lean_is_exclusive(x_142)) { + lean_ctor_release(x_142, 0); + lean_ctor_release(x_142, 1); + lean_ctor_release(x_142, 2); + lean_ctor_release(x_142, 3); + lean_ctor_release(x_142, 4); + lean_ctor_release(x_142, 5); + x_150 = x_142; +} else { + lean_dec_ref(x_142); + x_150 = lean_box(0); +} +x_151 = lean_ctor_get(x_143, 0); +lean_inc(x_151); +x_152 = lean_ctor_get(x_143, 1); +lean_inc(x_152); +x_153 = lean_ctor_get(x_143, 3); +lean_inc(x_153); +if (lean_is_exclusive(x_143)) { + lean_ctor_release(x_143, 0); + lean_ctor_release(x_143, 1); + lean_ctor_release(x_143, 2); + lean_ctor_release(x_143, 3); + x_154 = x_143; +} else { + lean_dec_ref(x_143); + x_154 = lean_box(0); +} +if (lean_is_scalar(x_154)) { + x_155 = lean_alloc_ctor(0, 4, 0); +} else { + x_155 = x_154; +} +lean_ctor_set(x_155, 0, x_151); +lean_ctor_set(x_155, 1, x_152); +lean_ctor_set(x_155, 2, x_138); +lean_ctor_set(x_155, 3, x_153); +if (lean_is_scalar(x_150)) { + x_156 = lean_alloc_ctor(0, 6, 0); +} else { + x_156 = x_150; +} +lean_ctor_set(x_156, 0, x_145); +lean_ctor_set(x_156, 1, x_146); +lean_ctor_set(x_156, 2, x_155); +lean_ctor_set(x_156, 3, x_147); +lean_ctor_set(x_156, 4, x_148); +lean_ctor_set(x_156, 5, x_149); +if (lean_is_scalar(x_16)) { + x_157 = lean_alloc_ctor(1, 2, 0); +} else { + x_157 = x_16; + lean_ctor_set_tag(x_157, 1); +} +lean_ctor_set(x_157, 0, x_144); +lean_ctor_set(x_157, 1, x_156); +return x_157; +} +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; +x_158 = lean_ctor_get(x_142, 2); +lean_inc(x_158); +x_159 = lean_ctor_get(x_141, 0); +lean_inc(x_159); +lean_dec(x_141); +x_160 = lean_ctor_get(x_142, 0); +lean_inc(x_160); +x_161 = lean_ctor_get(x_142, 1); +lean_inc(x_161); +x_162 = lean_ctor_get(x_142, 3); +lean_inc(x_162); +x_163 = lean_ctor_get(x_142, 4); +lean_inc(x_163); +x_164 = lean_ctor_get(x_142, 5); +lean_inc(x_164); +if (lean_is_exclusive(x_142)) { + lean_ctor_release(x_142, 0); + lean_ctor_release(x_142, 1); + lean_ctor_release(x_142, 2); + lean_ctor_release(x_142, 3); + lean_ctor_release(x_142, 4); + lean_ctor_release(x_142, 5); + x_165 = x_142; +} else { + lean_dec_ref(x_142); + x_165 = lean_box(0); +} +x_166 = lean_ctor_get(x_158, 0); +lean_inc(x_166); +x_167 = lean_ctor_get(x_158, 1); +lean_inc(x_167); +x_168 = lean_ctor_get(x_158, 3); +lean_inc(x_168); +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); + x_169 = x_158; +} else { + lean_dec_ref(x_158); + x_169 = lean_box(0); +} +if (lean_is_scalar(x_169)) { + x_170 = lean_alloc_ctor(0, 4, 0); +} else { + x_170 = x_169; +} +lean_ctor_set(x_170, 0, x_166); +lean_ctor_set(x_170, 1, x_167); +lean_ctor_set(x_170, 2, x_138); +lean_ctor_set(x_170, 3, x_168); +if (lean_is_scalar(x_165)) { + x_171 = lean_alloc_ctor(0, 6, 0); +} else { + x_171 = x_165; +} +lean_ctor_set(x_171, 0, x_160); +lean_ctor_set(x_171, 1, x_161); +lean_ctor_set(x_171, 2, x_170); +lean_ctor_set(x_171, 3, x_162); +lean_ctor_set(x_171, 4, x_163); +lean_ctor_set(x_171, 5, x_164); +if (lean_is_scalar(x_16)) { + x_172 = lean_alloc_ctor(0, 2, 0); +} else { + x_172 = x_16; +} +lean_ctor_set(x_172, 0, x_159); +lean_ctor_set(x_172, 1, x_171); +return x_172; +} +} +} +} +else +{ +lean_object* x_185; +lean_dec(x_16); +lean_dec(x_14); +lean_dec(x_12); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_6); +x_185 = lean_apply_2(x_2, x_3, x_15); +return x_185; +} +} +else +{ +uint8_t x_186; +lean_dec(x_3); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_6); +lean_dec(x_2); +x_186 = !lean_is_exclusive(x_13); +if (x_186 == 0) +{ +return x_13; +} +else +{ +lean_object* x_187; lean_object* x_188; lean_object* x_189; +x_187 = lean_ctor_get(x_13, 0); +x_188 = lean_ctor_get(x_13, 1); +lean_inc(x_188); +lean_inc(x_187); +lean_dec(x_13); +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; +} +} +} +else +{ +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; +x_190 = lean_ctor_get(x_3, 0); +x_191 = lean_ctor_get(x_3, 1); +x_192 = lean_ctor_get(x_3, 2); +x_193 = lean_ctor_get(x_3, 3); +x_194 = lean_ctor_get(x_3, 4); +lean_inc(x_194); +lean_inc(x_193); +lean_inc(x_192); +lean_inc(x_191); +lean_inc(x_190); +lean_dec(x_3); +x_195 = lean_array_get_size(x_192); +lean_inc(x_1); +x_196 = l_List_foldl___main___at_Lean_Meta_withExistingLocalDecls___spec__1(x_191, x_1); +lean_inc(x_194); +lean_inc(x_193); +lean_inc(x_192); +lean_inc(x_196); +lean_inc(x_190); +x_197 = lean_alloc_ctor(0, 5, 0); +lean_ctor_set(x_197, 0, x_190); +lean_ctor_set(x_197, 1, x_196); +lean_ctor_set(x_197, 2, x_192); +lean_ctor_set(x_197, 3, x_193); +lean_ctor_set(x_197, 4, x_194); +lean_inc(x_197); +x_198 = l_List_foldlM___main___at_Lean_Meta_withExistingLocalDecls___spec__2(x_192, x_1, x_197, x_4); +lean_dec(x_1); +if (lean_obj_tag(x_198) == 0) +{ +lean_object* x_199; lean_object* x_200; lean_object* x_201; lean_object* x_202; uint8_t x_203; +x_199 = lean_ctor_get(x_198, 0); +lean_inc(x_199); +x_200 = lean_ctor_get(x_198, 1); +lean_inc(x_200); +if (lean_is_exclusive(x_198)) { + lean_ctor_release(x_198, 0); + lean_ctor_release(x_198, 1); + x_201 = x_198; +} else { + lean_dec_ref(x_198); + x_201 = lean_box(0); +} +x_202 = lean_array_get_size(x_199); +x_203 = lean_nat_dec_eq(x_202, x_195); +lean_dec(x_195); +lean_dec(x_202); +if (x_203 == 0) +{ +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_249; lean_object* x_250; lean_object* x_251; lean_object* x_252; lean_object* x_253; +lean_dec(x_197); +x_204 = lean_ctor_get(x_200, 2); +lean_inc(x_204); +x_205 = lean_ctor_get(x_200, 0); +lean_inc(x_205); +x_206 = lean_ctor_get(x_200, 1); +lean_inc(x_206); +x_207 = lean_ctor_get(x_200, 3); +lean_inc(x_207); +x_208 = lean_ctor_get(x_200, 4); +lean_inc(x_208); +x_209 = lean_ctor_get(x_200, 5); +lean_inc(x_209); +if (lean_is_exclusive(x_200)) { + lean_ctor_release(x_200, 0); + lean_ctor_release(x_200, 1); + lean_ctor_release(x_200, 2); + lean_ctor_release(x_200, 3); + lean_ctor_release(x_200, 4); + lean_ctor_release(x_200, 5); + x_210 = x_200; +} else { + lean_dec_ref(x_200); + x_210 = lean_box(0); +} +x_211 = lean_ctor_get(x_204, 0); +lean_inc(x_211); +x_212 = lean_ctor_get(x_204, 1); +lean_inc(x_212); +x_213 = lean_ctor_get(x_204, 2); +lean_inc(x_213); +x_214 = lean_ctor_get(x_204, 3); +lean_inc(x_214); +if (lean_is_exclusive(x_204)) { + lean_ctor_release(x_204, 0); + lean_ctor_release(x_204, 1); + lean_ctor_release(x_204, 2); + lean_ctor_release(x_204, 3); + x_215 = x_204; +} else { + lean_dec_ref(x_204); + x_215 = lean_box(0); +} +x_249 = l_Lean_Meta_resettingSynthInstanceCache___rarg___closed__1; +if (lean_is_scalar(x_215)) { + x_250 = lean_alloc_ctor(0, 4, 0); +} else { + x_250 = x_215; +} +lean_ctor_set(x_250, 0, x_211); +lean_ctor_set(x_250, 1, x_212); +lean_ctor_set(x_250, 2, x_249); +lean_ctor_set(x_250, 3, x_214); +if (lean_is_scalar(x_210)) { + x_251 = lean_alloc_ctor(0, 6, 0); +} else { + x_251 = x_210; +} +lean_ctor_set(x_251, 0, x_205); +lean_ctor_set(x_251, 1, x_206); +lean_ctor_set(x_251, 2, x_250); +lean_ctor_set(x_251, 3, x_207); +lean_ctor_set(x_251, 4, x_208); +lean_ctor_set(x_251, 5, x_209); +x_252 = lean_alloc_ctor(0, 5, 0); +lean_ctor_set(x_252, 0, x_190); +lean_ctor_set(x_252, 1, x_196); +lean_ctor_set(x_252, 2, x_199); +lean_ctor_set(x_252, 3, x_193); +lean_ctor_set(x_252, 4, x_194); +x_253 = lean_apply_2(x_2, x_252, x_251); +if (lean_obj_tag(x_253) == 0) +{ +lean_object* x_254; lean_object* x_255; lean_object* x_256; +x_254 = lean_ctor_get(x_253, 0); +lean_inc(x_254); +x_255 = lean_ctor_get(x_253, 1); +lean_inc(x_255); +lean_dec(x_253); +x_256 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_256, 0, x_254); +x_216 = x_256; +x_217 = x_255; +goto block_248; +} +else +{ +lean_object* x_257; lean_object* x_258; lean_object* x_259; +x_257 = lean_ctor_get(x_253, 0); +lean_inc(x_257); +x_258 = lean_ctor_get(x_253, 1); +lean_inc(x_258); +lean_dec(x_253); +x_259 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_259, 0, x_257); +x_216 = x_259; +x_217 = x_258; +goto block_248; +} +block_248: +{ +if (lean_obj_tag(x_216) == 0) +{ +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_218 = lean_ctor_get(x_217, 2); +lean_inc(x_218); +x_219 = lean_ctor_get(x_216, 0); +lean_inc(x_219); +lean_dec(x_216); +x_220 = lean_ctor_get(x_217, 0); +lean_inc(x_220); +x_221 = lean_ctor_get(x_217, 1); +lean_inc(x_221); +x_222 = lean_ctor_get(x_217, 3); +lean_inc(x_222); +x_223 = lean_ctor_get(x_217, 4); +lean_inc(x_223); +x_224 = lean_ctor_get(x_217, 5); +lean_inc(x_224); +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_225 = x_217; +} else { + lean_dec_ref(x_217); + x_225 = lean_box(0); +} +x_226 = lean_ctor_get(x_218, 0); +lean_inc(x_226); +x_227 = lean_ctor_get(x_218, 1); +lean_inc(x_227); +x_228 = lean_ctor_get(x_218, 3); +lean_inc(x_228); +if (lean_is_exclusive(x_218)) { + lean_ctor_release(x_218, 0); + lean_ctor_release(x_218, 1); + lean_ctor_release(x_218, 2); + lean_ctor_release(x_218, 3); + x_229 = x_218; +} else { + lean_dec_ref(x_218); + x_229 = lean_box(0); +} +if (lean_is_scalar(x_229)) { + x_230 = lean_alloc_ctor(0, 4, 0); +} else { + x_230 = x_229; +} +lean_ctor_set(x_230, 0, x_226); +lean_ctor_set(x_230, 1, x_227); +lean_ctor_set(x_230, 2, x_213); +lean_ctor_set(x_230, 3, x_228); +if (lean_is_scalar(x_225)) { + x_231 = lean_alloc_ctor(0, 6, 0); +} else { + x_231 = x_225; +} +lean_ctor_set(x_231, 0, x_220); +lean_ctor_set(x_231, 1, x_221); +lean_ctor_set(x_231, 2, x_230); +lean_ctor_set(x_231, 3, x_222); +lean_ctor_set(x_231, 4, x_223); +lean_ctor_set(x_231, 5, x_224); +if (lean_is_scalar(x_201)) { + x_232 = lean_alloc_ctor(1, 2, 0); +} else { + x_232 = x_201; + lean_ctor_set_tag(x_232, 1); +} +lean_ctor_set(x_232, 0, x_219); +lean_ctor_set(x_232, 1, x_231); +return x_232; +} +else +{ +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; +x_233 = lean_ctor_get(x_217, 2); +lean_inc(x_233); +x_234 = lean_ctor_get(x_216, 0); +lean_inc(x_234); +lean_dec(x_216); +x_235 = lean_ctor_get(x_217, 0); +lean_inc(x_235); +x_236 = lean_ctor_get(x_217, 1); +lean_inc(x_236); +x_237 = lean_ctor_get(x_217, 3); +lean_inc(x_237); +x_238 = lean_ctor_get(x_217, 4); +lean_inc(x_238); +x_239 = lean_ctor_get(x_217, 5); +lean_inc(x_239); +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_240 = x_217; +} else { + lean_dec_ref(x_217); + x_240 = lean_box(0); +} +x_241 = lean_ctor_get(x_233, 0); +lean_inc(x_241); +x_242 = lean_ctor_get(x_233, 1); +lean_inc(x_242); +x_243 = lean_ctor_get(x_233, 3); +lean_inc(x_243); +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); + x_244 = x_233; +} else { + lean_dec_ref(x_233); + x_244 = lean_box(0); +} +if (lean_is_scalar(x_244)) { + x_245 = lean_alloc_ctor(0, 4, 0); +} else { + x_245 = x_244; +} +lean_ctor_set(x_245, 0, x_241); +lean_ctor_set(x_245, 1, x_242); +lean_ctor_set(x_245, 2, x_213); +lean_ctor_set(x_245, 3, x_243); +if (lean_is_scalar(x_240)) { + x_246 = lean_alloc_ctor(0, 6, 0); +} else { + x_246 = x_240; +} +lean_ctor_set(x_246, 0, x_235); +lean_ctor_set(x_246, 1, x_236); +lean_ctor_set(x_246, 2, x_245); +lean_ctor_set(x_246, 3, x_237); +lean_ctor_set(x_246, 4, x_238); +lean_ctor_set(x_246, 5, x_239); +if (lean_is_scalar(x_201)) { + x_247 = lean_alloc_ctor(0, 2, 0); +} else { + x_247 = x_201; +} +lean_ctor_set(x_247, 0, x_234); +lean_ctor_set(x_247, 1, x_246); +return x_247; +} +} +} +else +{ +lean_object* x_260; +lean_dec(x_201); +lean_dec(x_199); +lean_dec(x_196); +lean_dec(x_194); +lean_dec(x_193); +lean_dec(x_190); +x_260 = lean_apply_2(x_2, x_197, x_200); +return x_260; +} +} +else +{ +lean_object* x_261; lean_object* x_262; lean_object* x_263; lean_object* x_264; +lean_dec(x_197); +lean_dec(x_196); +lean_dec(x_195); +lean_dec(x_194); +lean_dec(x_193); +lean_dec(x_190); +lean_dec(x_2); +x_261 = lean_ctor_get(x_198, 0); +lean_inc(x_261); +x_262 = lean_ctor_get(x_198, 1); +lean_inc(x_262); +if (lean_is_exclusive(x_198)) { + lean_ctor_release(x_198, 0); + lean_ctor_release(x_198, 1); + x_263 = x_198; +} else { + lean_dec_ref(x_198); + x_263 = lean_box(0); +} +if (lean_is_scalar(x_263)) { + x_264 = lean_alloc_ctor(1, 2, 0); +} else { + x_264 = x_263; +} +lean_ctor_set(x_264, 0, x_261); +lean_ctor_set(x_264, 1, x_262); +return x_264; +} +} +} +} +lean_object* l_Lean_Meta_withExistingLocalDecls(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_Lean_Meta_withExistingLocalDecls___rarg), 4, 0); +return x_2; +} +} +lean_object* l_List_foldlM___main___at_Lean_Meta_withExistingLocalDecls___spec__2___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; +x_5 = l_List_foldlM___main___at_Lean_Meta_withExistingLocalDecls___spec__2(x_1, x_2, x_3, x_4); +lean_dec(x_2); +return x_5; +} +} lean_object* l_Lean_Meta_withNewMCtxDepth___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3) { _start: { @@ -44301,6 +45694,26 @@ _start: { lean_object* x_1; lean_object* x_2; x_1 = l___private_Lean_Meta_Basic_10__instantiateForallAux___main___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___private_Lean_Meta_Basic_10__instantiateForallAux___main___closed__3() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l___private_Lean_Meta_Basic_10__instantiateForallAux___main___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___private_Lean_Meta_Basic_10__instantiateForallAux___main___closed__4() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l___private_Lean_Meta_Basic_10__instantiateForallAux___main___closed__3; x_2 = lean_alloc_ctor(22, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; @@ -44367,7 +45780,7 @@ if (x_18 == 0) lean_object* x_19; lean_object* x_20; x_19 = lean_ctor_get(x_10, 0); lean_dec(x_19); -x_20 = l___private_Lean_Meta_Basic_10__instantiateForallAux___main___closed__2; +x_20 = l___private_Lean_Meta_Basic_10__instantiateForallAux___main___closed__4; lean_ctor_set_tag(x_10, 1); lean_ctor_set(x_10, 0, x_20); return x_10; @@ -44378,7 +45791,7 @@ lean_object* x_21; lean_object* x_22; lean_object* x_23; x_21 = lean_ctor_get(x_10, 1); lean_inc(x_21); lean_dec(x_10); -x_22 = l___private_Lean_Meta_Basic_10__instantiateForallAux___main___closed__2; +x_22 = l___private_Lean_Meta_Basic_10__instantiateForallAux___main___closed__4; x_23 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_23, 0, x_22); lean_ctor_set(x_23, 1, x_21); @@ -45422,10 +46835,18 @@ l_Lean_Meta_InfoCacheKey_Inhabited = _init_l_Lean_Meta_InfoCacheKey_Inhabited(); lean_mark_persistent(l_Lean_Meta_InfoCacheKey_Inhabited); l_Lean_Meta_withIncRecDepth___rarg___closed__1 = _init_l_Lean_Meta_withIncRecDepth___rarg___closed__1(); lean_mark_persistent(l_Lean_Meta_withIncRecDepth___rarg___closed__1); +l_Lean_Meta_withIncRecDepth___rarg___closed__2 = _init_l_Lean_Meta_withIncRecDepth___rarg___closed__2(); +lean_mark_persistent(l_Lean_Meta_withIncRecDepth___rarg___closed__2); +l_Lean_Meta_withIncRecDepth___rarg___closed__3 = _init_l_Lean_Meta_withIncRecDepth___rarg___closed__3(); +lean_mark_persistent(l_Lean_Meta_withIncRecDepth___rarg___closed__3); l_Lean_Meta_mkWHNFRef___lambda__1___closed__1 = _init_l_Lean_Meta_mkWHNFRef___lambda__1___closed__1(); lean_mark_persistent(l_Lean_Meta_mkWHNFRef___lambda__1___closed__1); l_Lean_Meta_mkWHNFRef___lambda__1___closed__2 = _init_l_Lean_Meta_mkWHNFRef___lambda__1___closed__2(); lean_mark_persistent(l_Lean_Meta_mkWHNFRef___lambda__1___closed__2); +l_Lean_Meta_mkWHNFRef___lambda__1___closed__3 = _init_l_Lean_Meta_mkWHNFRef___lambda__1___closed__3(); +lean_mark_persistent(l_Lean_Meta_mkWHNFRef___lambda__1___closed__3); +l_Lean_Meta_mkWHNFRef___lambda__1___closed__4 = _init_l_Lean_Meta_mkWHNFRef___lambda__1___closed__4(); +lean_mark_persistent(l_Lean_Meta_mkWHNFRef___lambda__1___closed__4); l_Lean_Meta_mkWHNFRef___closed__1 = _init_l_Lean_Meta_mkWHNFRef___closed__1(); lean_mark_persistent(l_Lean_Meta_mkWHNFRef___closed__1); res = l_Lean_Meta_mkWHNFRef(lean_io_mk_world()); @@ -45437,6 +46858,10 @@ l_Lean_Meta_mkInferTypeRef___lambda__1___closed__1 = _init_l_Lean_Meta_mkInferTy lean_mark_persistent(l_Lean_Meta_mkInferTypeRef___lambda__1___closed__1); l_Lean_Meta_mkInferTypeRef___lambda__1___closed__2 = _init_l_Lean_Meta_mkInferTypeRef___lambda__1___closed__2(); lean_mark_persistent(l_Lean_Meta_mkInferTypeRef___lambda__1___closed__2); +l_Lean_Meta_mkInferTypeRef___lambda__1___closed__3 = _init_l_Lean_Meta_mkInferTypeRef___lambda__1___closed__3(); +lean_mark_persistent(l_Lean_Meta_mkInferTypeRef___lambda__1___closed__3); +l_Lean_Meta_mkInferTypeRef___lambda__1___closed__4 = _init_l_Lean_Meta_mkInferTypeRef___lambda__1___closed__4(); +lean_mark_persistent(l_Lean_Meta_mkInferTypeRef___lambda__1___closed__4); l_Lean_Meta_mkInferTypeRef___closed__1 = _init_l_Lean_Meta_mkInferTypeRef___closed__1(); lean_mark_persistent(l_Lean_Meta_mkInferTypeRef___closed__1); res = l_Lean_Meta_mkInferTypeRef(lean_io_mk_world()); @@ -45448,6 +46873,10 @@ l_Lean_Meta_mkIsExprDefEqAuxRef___lambda__1___closed__1 = _init_l_Lean_Meta_mkIs lean_mark_persistent(l_Lean_Meta_mkIsExprDefEqAuxRef___lambda__1___closed__1); l_Lean_Meta_mkIsExprDefEqAuxRef___lambda__1___closed__2 = _init_l_Lean_Meta_mkIsExprDefEqAuxRef___lambda__1___closed__2(); lean_mark_persistent(l_Lean_Meta_mkIsExprDefEqAuxRef___lambda__1___closed__2); +l_Lean_Meta_mkIsExprDefEqAuxRef___lambda__1___closed__3 = _init_l_Lean_Meta_mkIsExprDefEqAuxRef___lambda__1___closed__3(); +lean_mark_persistent(l_Lean_Meta_mkIsExprDefEqAuxRef___lambda__1___closed__3); +l_Lean_Meta_mkIsExprDefEqAuxRef___lambda__1___closed__4 = _init_l_Lean_Meta_mkIsExprDefEqAuxRef___lambda__1___closed__4(); +lean_mark_persistent(l_Lean_Meta_mkIsExprDefEqAuxRef___lambda__1___closed__4); l_Lean_Meta_mkIsExprDefEqAuxRef___closed__1 = _init_l_Lean_Meta_mkIsExprDefEqAuxRef___closed__1(); lean_mark_persistent(l_Lean_Meta_mkIsExprDefEqAuxRef___closed__1); res = l_Lean_Meta_mkIsExprDefEqAuxRef(lean_io_mk_world()); @@ -45515,6 +46944,10 @@ l___private_Lean_Meta_Basic_10__instantiateForallAux___main___closed__1 = _init_ lean_mark_persistent(l___private_Lean_Meta_Basic_10__instantiateForallAux___main___closed__1); l___private_Lean_Meta_Basic_10__instantiateForallAux___main___closed__2 = _init_l___private_Lean_Meta_Basic_10__instantiateForallAux___main___closed__2(); lean_mark_persistent(l___private_Lean_Meta_Basic_10__instantiateForallAux___main___closed__2); +l___private_Lean_Meta_Basic_10__instantiateForallAux___main___closed__3 = _init_l___private_Lean_Meta_Basic_10__instantiateForallAux___main___closed__3(); +lean_mark_persistent(l___private_Lean_Meta_Basic_10__instantiateForallAux___main___closed__3); +l___private_Lean_Meta_Basic_10__instantiateForallAux___main___closed__4 = _init_l___private_Lean_Meta_Basic_10__instantiateForallAux___main___closed__4(); +lean_mark_persistent(l___private_Lean_Meta_Basic_10__instantiateForallAux___main___closed__4); l___private_Lean_Meta_Basic_11__regTraceClasses___closed__1 = _init_l___private_Lean_Meta_Basic_11__regTraceClasses___closed__1(); lean_mark_persistent(l___private_Lean_Meta_Basic_11__regTraceClasses___closed__1); l___private_Lean_Meta_Basic_11__regTraceClasses___closed__2 = _init_l___private_Lean_Meta_Basic_11__regTraceClasses___closed__2(); diff --git a/stage0/stdlib/Lean/Meta/Exception.c b/stage0/stdlib/Lean/Meta/Exception.c index 71f2b98131..73a8307fb9 100644 --- a/stage0/stdlib/Lean/Meta/Exception.c +++ b/stage0/stdlib/Lean/Meta/Exception.c @@ -69,6 +69,7 @@ lean_object* l_Lean_KernelException_toMessageData(lean_object*, lean_object*); lean_object* l_Lean_Meta_Exception_toTraceMessageData___closed__17; lean_object* l_Lean_Meta_Exception_toTraceMessageData___closed__43; lean_object* l_Lean_Meta_Exception_toTraceMessageData___closed__79; +extern lean_object* l_Lean_Format_join___closed__1; lean_object* l_Lean_Meta_Exception_toStr___closed__19; lean_object* l_Lean_Meta_Exception_toTraceMessageData___closed__81; lean_object* l_Lean_Meta_Exception_toTraceMessageData___closed__44; @@ -106,6 +107,7 @@ lean_object* l_Lean_Meta_Exception_toTraceMessageData___closed__76; lean_object* l_Lean_Meta_Exception_toTraceMessageData___closed__75; lean_object* l_Lean_Meta_Exception_toTraceMessageData___closed__26; lean_object* l_Lean_Meta_Exception_toTraceMessageData___closed__58; +lean_object* l_Lean_fmt___at_Lean_Message_toString___spec__1(lean_object*); lean_object* l_List_toStringAux___main___at_Lean_Meta_Exception_toStr___spec__2___boxed(lean_object*, lean_object*); lean_object* l_Lean_Meta_Exception_toTraceMessageData___closed__14; lean_object* l_Lean_Meta_Exception_toTraceMessageData___closed__28; @@ -128,6 +130,7 @@ lean_object* l_Lean_Meta_Exception_toStr(lean_object*); lean_object* l_Lean_Meta_Exception_HasToString___closed__1; lean_object* l_Lean_Meta_Exception_toTraceMessageData___closed__2; lean_object* l_Lean_Meta_Exception_mkCtx(lean_object*, lean_object*); +lean_object* l_Lean_Meta_Exception_Inhabited___closed__2; lean_object* l_Lean_Meta_Exception_toTraceMessageData___closed__48; lean_object* l_Lean_Meta_Exception_toStr___closed__6; lean_object* l_Lean_Meta_Exception_toTraceMessageData___closed__13; @@ -161,7 +164,17 @@ lean_object* _init_l_Lean_Meta_Exception_Inhabited___closed__1() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_String_splitAux___main___closed__1; +x_1 = l_Lean_Format_join___closed__1; +x_2 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* _init_l_Lean_Meta_Exception_Inhabited___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Meta_Exception_Inhabited___closed__1; x_2 = lean_alloc_ctor(22, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; @@ -171,7 +184,7 @@ lean_object* _init_l_Lean_Meta_Exception_Inhabited() { _start: { lean_object* x_1; -x_1 = l_Lean_Meta_Exception_Inhabited___closed__1; +x_1 = l_Lean_Meta_Exception_Inhabited___closed__2; return x_1; } } @@ -637,18 +650,21 @@ return x_63; } case 22: { -lean_object* x_64; +lean_object* x_64; lean_object* x_65; lean_object* x_66; lean_object* x_67; x_64 = lean_ctor_get(x_1, 0); lean_inc(x_64); lean_dec(x_1); -return x_64; +x_65 = l_Lean_fmt___at_Lean_Message_toString___spec__1(x_64); +x_66 = l_Lean_Options_empty; +x_67 = l_Lean_Format_pretty(x_65, x_66); +return x_67; } default: { -lean_object* x_65; +lean_object* x_68; lean_dec(x_1); -x_65 = l_Lean_Meta_Exception_toStr___closed__13; -return x_65; +x_68 = l_Lean_Meta_Exception_toStr___closed__13; +return x_68; } } } @@ -1882,145 +1898,125 @@ return x_116; } case 16: { -lean_object* x_117; lean_object* x_118; lean_object* x_119; lean_object* x_120; lean_object* x_121; lean_object* x_122; lean_object* x_123; lean_object* x_124; lean_object* x_125; lean_object* x_126; lean_object* x_127; lean_object* x_128; lean_object* x_129; lean_object* x_130; lean_object* x_131; lean_object* x_132; lean_object* x_133; lean_object* x_134; +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; x_117 = lean_ctor_get(x_1, 0); lean_inc(x_117); x_118 = lean_ctor_get(x_1, 1); lean_inc(x_118); x_119 = lean_ctor_get(x_1, 2); lean_inc(x_119); -x_120 = lean_ctor_get(x_1, 3); -lean_inc(x_120); lean_dec(x_1); -x_121 = lean_alloc_ctor(4, 1, 0); -lean_ctor_set(x_121, 0, x_117); -x_122 = l_Lean_Meta_Exception_toTraceMessageData___closed__71; -x_123 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_123, 0, x_122); -lean_ctor_set(x_123, 1, x_121); -x_124 = l_Lean_Meta_Exception_toTraceMessageData___closed__4; +x_120 = lean_alloc_ctor(4, 1, 0); +lean_ctor_set(x_120, 0, x_117); +x_121 = l_Lean_Meta_Exception_toTraceMessageData___closed__71; +x_122 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_122, 0, x_121); +lean_ctor_set(x_122, 1, x_120); +x_123 = l_Lean_Meta_Exception_toTraceMessageData___closed__4; +x_124 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_124, 0, x_122); +lean_ctor_set(x_124, 1, x_123); x_125 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_125, 0, x_123); -lean_ctor_set(x_125, 1, x_124); -x_126 = lean_unsigned_to_nat(0u); -x_127 = l_Lean_MessageData_coeOfArrayExpr___closed__2; -x_128 = l_Lean_MessageData_arrayExpr_toMessageData___main(x_119, x_126, x_127); -lean_dec(x_119); -x_129 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_129, 0, x_125); -lean_ctor_set(x_129, 1, x_128); -x_130 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_130, 0, x_129); -lean_ctor_set(x_130, 1, x_124); -x_131 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_131, 0, x_118); -x_132 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_132, 0, x_131); -x_133 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_133, 0, x_130); -lean_ctor_set(x_133, 1, x_132); -x_134 = lean_alloc_ctor(6, 2, 0); -lean_ctor_set(x_134, 0, x_120); -lean_ctor_set(x_134, 1, x_133); -return x_134; +lean_ctor_set(x_125, 0, x_124); +lean_ctor_set(x_125, 1, x_118); +x_126 = lean_alloc_ctor(6, 2, 0); +lean_ctor_set(x_126, 0, x_119); +lean_ctor_set(x_126, 1, x_125); +return x_126; } case 17: { -lean_object* x_135; lean_object* x_136; lean_object* x_137; lean_object* x_138; lean_object* x_139; lean_object* x_140; -x_135 = lean_ctor_get(x_1, 0); -lean_inc(x_135); -x_136 = lean_ctor_get(x_1, 1); -lean_inc(x_136); +lean_object* x_127; lean_object* x_128; lean_object* x_129; lean_object* x_130; lean_object* x_131; lean_object* x_132; +x_127 = lean_ctor_get(x_1, 0); +lean_inc(x_127); +x_128 = lean_ctor_get(x_1, 1); +lean_inc(x_128); lean_dec(x_1); -x_137 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_137, 0, x_135); -x_138 = l_Lean_Meta_Exception_toTraceMessageData___closed__75; -x_139 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_139, 0, x_138); -lean_ctor_set(x_139, 1, x_137); -x_140 = lean_alloc_ctor(6, 2, 0); -lean_ctor_set(x_140, 0, x_136); -lean_ctor_set(x_140, 1, x_139); -return x_140; +x_129 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_129, 0, x_127); +x_130 = l_Lean_Meta_Exception_toTraceMessageData___closed__75; +x_131 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_131, 0, x_130); +lean_ctor_set(x_131, 1, x_129); +x_132 = lean_alloc_ctor(6, 2, 0); +lean_ctor_set(x_132, 0, x_128); +lean_ctor_set(x_132, 1, x_131); +return x_132; } case 18: { -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_141 = lean_ctor_get(x_1, 0); -lean_inc(x_141); -x_142 = lean_ctor_get(x_1, 2); -lean_inc(x_142); -x_143 = lean_ctor_get(x_1, 3); -lean_inc(x_143); +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_133 = lean_ctor_get(x_1, 0); +lean_inc(x_133); +x_134 = lean_ctor_get(x_1, 2); +lean_inc(x_134); +x_135 = lean_ctor_get(x_1, 3); +lean_inc(x_135); lean_dec(x_1); -x_144 = lean_alloc_ctor(4, 1, 0); -lean_ctor_set(x_144, 0, x_141); -x_145 = l_Lean_Meta_Exception_toTraceMessageData___closed__79; -x_146 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_146, 0, x_145); -lean_ctor_set(x_146, 1, x_144); -x_147 = l_Lean_Meta_Exception_toTraceMessageData___closed__4; -x_148 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_148, 0, x_146); -lean_ctor_set(x_148, 1, x_147); -x_149 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_149, 0, x_148); -lean_ctor_set(x_149, 1, x_142); -x_150 = lean_alloc_ctor(6, 2, 0); -lean_ctor_set(x_150, 0, x_143); -lean_ctor_set(x_150, 1, x_149); -return x_150; +x_136 = lean_alloc_ctor(4, 1, 0); +lean_ctor_set(x_136, 0, x_133); +x_137 = l_Lean_Meta_Exception_toTraceMessageData___closed__79; +x_138 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_138, 0, x_137); +lean_ctor_set(x_138, 1, x_136); +x_139 = l_Lean_Meta_Exception_toTraceMessageData___closed__4; +x_140 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_140, 0, x_138); +lean_ctor_set(x_140, 1, x_139); +x_141 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_141, 0, x_140); +lean_ctor_set(x_141, 1, x_134); +x_142 = lean_alloc_ctor(6, 2, 0); +lean_ctor_set(x_142, 0, x_135); +lean_ctor_set(x_142, 1, x_141); +return x_142; } case 19: { -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_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_143 = lean_ctor_get(x_1, 0); +lean_inc(x_143); +x_144 = lean_ctor_get(x_1, 1); +lean_inc(x_144); +lean_dec(x_1); +x_145 = lean_unsigned_to_nat(0u); +x_146 = l_Lean_MessageData_coeOfArrayExpr___closed__2; +x_147 = l_Lean_MessageData_arrayExpr_toMessageData___main(x_143, x_145, x_146); +lean_dec(x_143); +x_148 = l_Lean_Meta_Exception_toTraceMessageData___closed__83; +x_149 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_149, 0, x_148); +lean_ctor_set(x_149, 1, x_147); +x_150 = lean_alloc_ctor(6, 2, 0); +lean_ctor_set(x_150, 0, x_144); +lean_ctor_set(x_150, 1, x_149); +return x_150; +} +case 20: +{ +lean_object* x_151; lean_object* x_152; lean_object* x_153; x_151 = lean_ctor_get(x_1, 0); lean_inc(x_151); x_152 = lean_ctor_get(x_1, 1); lean_inc(x_152); lean_dec(x_1); -x_153 = lean_unsigned_to_nat(0u); -x_154 = l_Lean_MessageData_coeOfArrayExpr___closed__2; -x_155 = l_Lean_MessageData_arrayExpr_toMessageData___main(x_151, x_153, x_154); -lean_dec(x_151); -x_156 = l_Lean_Meta_Exception_toTraceMessageData___closed__83; -x_157 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_157, 0, x_156); -lean_ctor_set(x_157, 1, x_155); -x_158 = lean_alloc_ctor(6, 2, 0); -lean_ctor_set(x_158, 0, x_152); -lean_ctor_set(x_158, 1, x_157); -return x_158; -} -case 20: -{ -lean_object* x_159; lean_object* x_160; lean_object* x_161; -x_159 = lean_ctor_get(x_1, 0); -lean_inc(x_159); -x_160 = lean_ctor_get(x_1, 1); -lean_inc(x_160); -lean_dec(x_1); -x_161 = l_Lean_KernelException_toMessageData(x_159, x_160); -return x_161; +x_153 = l_Lean_KernelException_toMessageData(x_151, x_152); +return x_153; } case 21: { -lean_object* x_162; +lean_object* x_154; lean_dec(x_1); -x_162 = l_Lean_Meta_Exception_toTraceMessageData___closed__86; -return x_162; +x_154 = l_Lean_Meta_Exception_toTraceMessageData___closed__86; +return x_154; } default: { -lean_object* x_163; lean_object* x_164; lean_object* x_165; -x_163 = lean_ctor_get(x_1, 0); -lean_inc(x_163); +lean_object* x_155; +x_155 = lean_ctor_get(x_1, 0); +lean_inc(x_155); lean_dec(x_1); -x_164 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_164, 0, x_163); -x_165 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_165, 0, x_164); -return x_165; +return x_155; } } } @@ -2052,6 +2048,8 @@ if (lean_io_result_is_error(res)) return res; lean_dec_ref(res); l_Lean_Meta_Exception_Inhabited___closed__1 = _init_l_Lean_Meta_Exception_Inhabited___closed__1(); lean_mark_persistent(l_Lean_Meta_Exception_Inhabited___closed__1); +l_Lean_Meta_Exception_Inhabited___closed__2 = _init_l_Lean_Meta_Exception_Inhabited___closed__2(); +lean_mark_persistent(l_Lean_Meta_Exception_Inhabited___closed__2); l_Lean_Meta_Exception_Inhabited = _init_l_Lean_Meta_Exception_Inhabited(); lean_mark_persistent(l_Lean_Meta_Exception_Inhabited); l_Lean_Meta_Exception_toStr___closed__1 = _init_l_Lean_Meta_Exception_toStr___closed__1(); diff --git a/stage0/stdlib/Lean/Meta/Message.c b/stage0/stdlib/Lean/Meta/Message.c index 271228c44f..05d60eb50a 100644 --- a/stage0/stdlib/Lean/Meta/Message.c +++ b/stage0/stdlib/Lean/Meta/Message.c @@ -84,6 +84,7 @@ lean_object* l_Lean_Meta_Exception_toMessageData___closed__47; extern lean_object* l_Lean_Options_empty; lean_object* l___private_Lean_Meta_Message_4__whnf_x3f(lean_object*, lean_object*); lean_object* l_Lean_Meta_Exception_toMessageData___closed__33; +lean_object* l___private_Lean_Meta_Message_3__inferDomain_x3f___lambda__1___closed__3; lean_object* l_Lean_Meta_Exception_mkLetTypeMismatchMessage___closed__5; lean_object* l_Lean_Meta_Exception_toMessageData___closed__46; lean_object* l_Lean_Meta_Exception_mkLetTypeMismatchMessage___closed__6; @@ -154,6 +155,7 @@ lean_object* l_Lean_Meta_Exception_toMessageData___closed__20; uint8_t lean_nat_dec_lt(lean_object*, lean_object*); lean_object* l_IO_println___at_IO_runMeta___spec__1(lean_object*, lean_object*); extern lean_object* l_Lean_KernelException_toMessageData___closed__39; +lean_object* l___private_Lean_Meta_Message_3__inferDomain_x3f___lambda__1___closed__4; lean_object* _init_l___private_Lean_Meta_Message_1__run_x3f___rarg___closed__1() { _start: { @@ -285,6 +287,26 @@ _start: { lean_object* x_1; lean_object* x_2; x_1 = l___private_Lean_Meta_Message_3__inferDomain_x3f___lambda__1___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___private_Lean_Meta_Message_3__inferDomain_x3f___lambda__1___closed__3() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l___private_Lean_Meta_Message_3__inferDomain_x3f___lambda__1___closed__2; +x_2 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* _init_l___private_Lean_Meta_Message_3__inferDomain_x3f___lambda__1___closed__4() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l___private_Lean_Meta_Message_3__inferDomain_x3f___lambda__1___closed__3; x_2 = lean_alloc_ctor(22, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; @@ -340,7 +362,7 @@ if (x_12 == 0) lean_object* x_13; lean_object* x_14; x_13 = lean_ctor_get(x_4, 0); lean_dec(x_13); -x_14 = l___private_Lean_Meta_Message_3__inferDomain_x3f___lambda__1___closed__2; +x_14 = l___private_Lean_Meta_Message_3__inferDomain_x3f___lambda__1___closed__4; lean_ctor_set_tag(x_4, 1); lean_ctor_set(x_4, 0, x_14); return x_4; @@ -351,7 +373,7 @@ lean_object* x_15; lean_object* x_16; lean_object* x_17; x_15 = lean_ctor_get(x_4, 1); lean_inc(x_15); lean_dec(x_4); -x_16 = l___private_Lean_Meta_Message_3__inferDomain_x3f___lambda__1___closed__2; +x_16 = l___private_Lean_Meta_Message_3__inferDomain_x3f___lambda__1___closed__4; x_17 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_17, 0, x_16); lean_ctor_set(x_17, 1, x_15); @@ -1624,157 +1646,137 @@ return x_107; } case 16: { -lean_object* x_108; lean_object* x_109; lean_object* x_110; lean_object* x_111; lean_object* x_112; lean_object* x_113; lean_object* x_114; lean_object* x_115; lean_object* x_116; lean_object* x_117; lean_object* x_118; lean_object* x_119; lean_object* x_120; lean_object* x_121; lean_object* x_122; lean_object* x_123; lean_object* x_124; lean_object* x_125; +lean_object* x_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; x_108 = lean_ctor_get(x_1, 0); lean_inc(x_108); x_109 = lean_ctor_get(x_1, 1); lean_inc(x_109); x_110 = lean_ctor_get(x_1, 2); lean_inc(x_110); -x_111 = lean_ctor_get(x_1, 3); -lean_inc(x_111); lean_dec(x_1); -x_112 = lean_alloc_ctor(4, 1, 0); -lean_ctor_set(x_112, 0, x_108); -x_113 = l_Lean_Meta_Exception_toMessageData___closed__43; -x_114 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_114, 0, x_113); -lean_ctor_set(x_114, 1, x_112); -x_115 = l_Lean_Meta_Exception_toTraceMessageData___closed__4; +x_111 = lean_alloc_ctor(4, 1, 0); +lean_ctor_set(x_111, 0, x_108); +x_112 = l_Lean_Meta_Exception_toMessageData___closed__43; +x_113 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_113, 0, x_112); +lean_ctor_set(x_113, 1, x_111); +x_114 = l_Lean_Meta_Exception_toTraceMessageData___closed__4; +x_115 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_115, 0, x_113); +lean_ctor_set(x_115, 1, x_114); x_116 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_116, 0, x_114); -lean_ctor_set(x_116, 1, x_115); -x_117 = lean_unsigned_to_nat(0u); -x_118 = l_Lean_MessageData_coeOfArrayExpr___closed__2; -x_119 = l_Lean_MessageData_arrayExpr_toMessageData___main(x_110, x_117, x_118); -lean_dec(x_110); -x_120 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_120, 0, x_116); -lean_ctor_set(x_120, 1, x_119); -x_121 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_121, 0, x_120); -lean_ctor_set(x_121, 1, x_115); -x_122 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_122, 0, x_109); -x_123 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_123, 0, x_122); -x_124 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_124, 0, x_121); -lean_ctor_set(x_124, 1, x_123); -x_125 = lean_alloc_ctor(6, 2, 0); -lean_ctor_set(x_125, 0, x_111); -lean_ctor_set(x_125, 1, x_124); -return x_125; +lean_ctor_set(x_116, 0, x_115); +lean_ctor_set(x_116, 1, x_109); +x_117 = lean_alloc_ctor(6, 2, 0); +lean_ctor_set(x_117, 0, x_110); +lean_ctor_set(x_117, 1, x_116); +return x_117; } case 17: { -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; -x_126 = lean_ctor_get(x_1, 0); -lean_inc(x_126); -x_127 = lean_ctor_get(x_1, 1); -lean_inc(x_127); +lean_object* x_118; lean_object* x_119; lean_object* x_120; lean_object* x_121; lean_object* x_122; lean_object* x_123; lean_object* x_124; +x_118 = lean_ctor_get(x_1, 0); +lean_inc(x_118); +x_119 = lean_ctor_get(x_1, 1); +lean_inc(x_119); lean_dec(x_1); -x_128 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_128, 0, x_126); -x_129 = l_Lean_indentExpr(x_128); -x_130 = l_Lean_Meta_Exception_toMessageData___closed__46; -x_131 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_131, 0, x_130); -lean_ctor_set(x_131, 1, x_129); -x_132 = lean_alloc_ctor(6, 2, 0); -lean_ctor_set(x_132, 0, x_127); -lean_ctor_set(x_132, 1, x_131); -return x_132; +x_120 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_120, 0, x_118); +x_121 = l_Lean_indentExpr(x_120); +x_122 = l_Lean_Meta_Exception_toMessageData___closed__46; +x_123 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_123, 0, x_122); +lean_ctor_set(x_123, 1, x_121); +x_124 = lean_alloc_ctor(6, 2, 0); +lean_ctor_set(x_124, 0, x_119); +lean_ctor_set(x_124, 1, x_123); +return x_124; } case 18: { -lean_object* x_133; lean_object* x_134; lean_object* x_135; lean_object* x_136; lean_object* x_137; lean_object* x_138; lean_object* x_139; lean_object* x_140; lean_object* x_141; lean_object* x_142; lean_object* x_143; lean_object* x_144; lean_object* x_145; lean_object* x_146; lean_object* x_147; -x_133 = lean_ctor_get(x_1, 0); -lean_inc(x_133); -x_134 = lean_ctor_get(x_1, 1); -lean_inc(x_134); -x_135 = lean_ctor_get(x_1, 2); -lean_inc(x_135); -x_136 = lean_ctor_get(x_1, 3); -lean_inc(x_136); +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; lean_object* x_137; lean_object* x_138; lean_object* x_139; +x_125 = lean_ctor_get(x_1, 0); +lean_inc(x_125); +x_126 = lean_ctor_get(x_1, 1); +lean_inc(x_126); +x_127 = lean_ctor_get(x_1, 2); +lean_inc(x_127); +x_128 = lean_ctor_get(x_1, 3); +lean_inc(x_128); lean_dec(x_1); -x_137 = lean_alloc_ctor(4, 1, 0); -lean_ctor_set(x_137, 0, x_133); -x_138 = l_Lean_Meta_Exception_toMessageData___closed__48; -x_139 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_139, 0, x_138); -lean_ctor_set(x_139, 1, x_137); -x_140 = l_Lean_Meta_Exception_toMessageData___closed__51; -x_141 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_141, 0, x_139); -lean_ctor_set(x_141, 1, x_140); -x_142 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_142, 0, x_141); -lean_ctor_set(x_142, 1, x_135); -x_143 = l_Lean_MessageData_ofList___closed__3; -x_144 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_144, 0, x_142); -lean_ctor_set(x_144, 1, x_143); -x_145 = lean_alloc_ctor(5, 1, 0); -lean_ctor_set(x_145, 0, x_134); -x_146 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_146, 0, x_144); -lean_ctor_set(x_146, 1, x_145); -x_147 = lean_alloc_ctor(6, 2, 0); -lean_ctor_set(x_147, 0, x_136); -lean_ctor_set(x_147, 1, x_146); -return x_147; +x_129 = lean_alloc_ctor(4, 1, 0); +lean_ctor_set(x_129, 0, x_125); +x_130 = l_Lean_Meta_Exception_toMessageData___closed__48; +x_131 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_131, 0, x_130); +lean_ctor_set(x_131, 1, x_129); +x_132 = l_Lean_Meta_Exception_toMessageData___closed__51; +x_133 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_133, 0, x_131); +lean_ctor_set(x_133, 1, x_132); +x_134 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_134, 0, x_133); +lean_ctor_set(x_134, 1, x_127); +x_135 = l_Lean_MessageData_ofList___closed__3; +x_136 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_136, 0, x_134); +lean_ctor_set(x_136, 1, x_135); +x_137 = lean_alloc_ctor(5, 1, 0); +lean_ctor_set(x_137, 0, x_126); +x_138 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_138, 0, x_136); +lean_ctor_set(x_138, 1, x_137); +x_139 = lean_alloc_ctor(6, 2, 0); +lean_ctor_set(x_139, 0, x_128); +lean_ctor_set(x_139, 1, x_138); +return x_139; } case 19: { -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_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; +x_140 = lean_ctor_get(x_1, 0); +lean_inc(x_140); +x_141 = lean_ctor_get(x_1, 1); +lean_inc(x_141); +lean_dec(x_1); +x_142 = lean_unsigned_to_nat(0u); +x_143 = l_Lean_MessageData_coeOfArrayExpr___closed__2; +x_144 = l_Lean_MessageData_arrayExpr_toMessageData___main(x_140, x_142, x_143); +lean_dec(x_140); +x_145 = l_Lean_Meta_Exception_toMessageData___closed__54; +x_146 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_146, 0, x_145); +lean_ctor_set(x_146, 1, x_144); +x_147 = lean_alloc_ctor(6, 2, 0); +lean_ctor_set(x_147, 0, x_141); +lean_ctor_set(x_147, 1, x_146); +return x_147; +} +case 20: +{ +lean_object* x_148; lean_object* x_149; lean_object* x_150; x_148 = lean_ctor_get(x_1, 0); lean_inc(x_148); x_149 = lean_ctor_get(x_1, 1); lean_inc(x_149); lean_dec(x_1); -x_150 = lean_unsigned_to_nat(0u); -x_151 = l_Lean_MessageData_coeOfArrayExpr___closed__2; -x_152 = l_Lean_MessageData_arrayExpr_toMessageData___main(x_148, x_150, x_151); -lean_dec(x_148); -x_153 = l_Lean_Meta_Exception_toMessageData___closed__54; -x_154 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_154, 0, x_153); -lean_ctor_set(x_154, 1, x_152); -x_155 = lean_alloc_ctor(6, 2, 0); -lean_ctor_set(x_155, 0, x_149); -lean_ctor_set(x_155, 1, x_154); -return x_155; -} -case 20: -{ -lean_object* x_156; lean_object* x_157; lean_object* x_158; -x_156 = lean_ctor_get(x_1, 0); -lean_inc(x_156); -x_157 = lean_ctor_get(x_1, 1); -lean_inc(x_157); -lean_dec(x_1); -x_158 = l_Lean_KernelException_toMessageData(x_156, x_157); -return x_158; +x_150 = l_Lean_KernelException_toMessageData(x_148, x_149); +return x_150; } case 21: { -lean_object* x_159; +lean_object* x_151; lean_dec(x_1); -x_159 = l_Lean_Meta_Exception_toTraceMessageData___closed__86; -return x_159; +x_151 = l_Lean_Meta_Exception_toTraceMessageData___closed__86; +return x_151; } default: { -lean_object* x_160; lean_object* x_161; lean_object* x_162; -x_160 = lean_ctor_get(x_1, 0); -lean_inc(x_160); +lean_object* x_152; +x_152 = lean_ctor_get(x_1, 0); +lean_inc(x_152); lean_dec(x_1); -x_161 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_161, 0, x_160); -x_162 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_162, 0, x_161); -return x_162; +return x_152; } } } @@ -2214,6 +2216,10 @@ l___private_Lean_Meta_Message_3__inferDomain_x3f___lambda__1___closed__1 = _init lean_mark_persistent(l___private_Lean_Meta_Message_3__inferDomain_x3f___lambda__1___closed__1); l___private_Lean_Meta_Message_3__inferDomain_x3f___lambda__1___closed__2 = _init_l___private_Lean_Meta_Message_3__inferDomain_x3f___lambda__1___closed__2(); lean_mark_persistent(l___private_Lean_Meta_Message_3__inferDomain_x3f___lambda__1___closed__2); +l___private_Lean_Meta_Message_3__inferDomain_x3f___lambda__1___closed__3 = _init_l___private_Lean_Meta_Message_3__inferDomain_x3f___lambda__1___closed__3(); +lean_mark_persistent(l___private_Lean_Meta_Message_3__inferDomain_x3f___lambda__1___closed__3); +l___private_Lean_Meta_Message_3__inferDomain_x3f___lambda__1___closed__4 = _init_l___private_Lean_Meta_Message_3__inferDomain_x3f___lambda__1___closed__4(); +lean_mark_persistent(l___private_Lean_Meta_Message_3__inferDomain_x3f___lambda__1___closed__4); l___private_Lean_Meta_Message_3__inferDomain_x3f___closed__1 = _init_l___private_Lean_Meta_Message_3__inferDomain_x3f___closed__1(); lean_mark_persistent(l___private_Lean_Meta_Message_3__inferDomain_x3f___closed__1); l_Lean_Meta_Exception_mkAppTypeMismatchMessage___closed__1 = _init_l_Lean_Meta_Exception_mkAppTypeMismatchMessage___closed__1(); diff --git a/stage0/stdlib/Lean/Meta/RecursorInfo.c b/stage0/stdlib/Lean/Meta/RecursorInfo.c index b6f5a4da25..c8e5cee647 100644 --- a/stage0/stdlib/Lean/Meta/RecursorInfo.c +++ b/stage0/stdlib/Lean/Meta/RecursorInfo.c @@ -23,10 +23,12 @@ lean_object* l_Lean_Meta_brecOnSuffix___closed__1; lean_object* lean_array_set(lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Meta_RecursorInfo_2__getMajorPosIfAuxRecursor_x3f___closed__1; extern lean_object* l_Option_HasRepr___rarg___closed__2; +lean_object* l_Nat_foldMAux___main___at___private_Lean_Meta_RecursorInfo_6__getParamsPos___spec__2___closed__3; lean_object* l_List_map___main___at___private_Lean_Meta_RecursorInfo_1__mkRecursorInfoForKernelRec___spec__1(lean_object*); lean_object* l_Lean_Syntax_isNatLitAux(lean_object*, lean_object*); lean_object* l_Lean_Meta_mkRecursorAttr(lean_object*); lean_object* lean_mk_empty_array_with_capacity(lean_object*); +lean_object* l_Nat_foldMAux___main___at___private_Lean_Meta_RecursorInfo_6__getParamsPos___spec__2___closed__2; lean_object* lean_nat_div(lean_object*, lean_object*); lean_object* l_Lean_PersistentEnvExtension_getModuleEntries___rarg(lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__1; @@ -51,11 +53,14 @@ lean_object* l___private_Lean_Meta_RecursorInfo_11__checkMotiveResultType(lean_o lean_object* lean_array_uset(lean_object*, size_t, lean_object*); lean_object* l_Std_RBNode_find___main___at_Lean_Meta_getMajorPos_x3f___spec__2___boxed(lean_object*, lean_object*); lean_object* l_Lean_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___spec__1___lambda__1___boxed(lean_object**); +lean_object* l_List_foldlM___main___at___private_Lean_Meta_RecursorInfo_9__getUnivLevelPos___spec__2___closed__3; +lean_object* l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__6; lean_object* l_List_foldlM___main___at___private_Lean_Meta_RecursorInfo_9__getUnivLevelPos___spec__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_mkRecursorAttr___closed__4; lean_object* l_Array_findIdxAux___main___at___private_Lean_Meta_RecursorInfo_9__getUnivLevelPos___spec__1___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_List_toString___at_Lean_Meta_RecursorInfo_HasToString___spec__7(lean_object*); extern lean_object* l_Array_empty___closed__1; +lean_object* l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__13; lean_object* lean_io_ref_get(lean_object*, lean_object*); lean_object* l_Lean_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___spec__1___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); uint8_t l_Lean_Meta_RecursorInfo_isMinor(lean_object*, lean_object*); @@ -67,10 +72,12 @@ lean_object* l_Nat_foldMAux___main___at___private_Lean_Meta_RecursorInfo_6__getP lean_object* l___private_Init_Data_Array_QSort_1__partitionAux___main___at_Lean_Meta_mkRecursorAttr___spec__4(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_array_push(lean_object*, lean_object*); lean_object* lean_array_get_size(lean_object*); +lean_object* l_Nat_foldMAux___main___at___private_Lean_Meta_RecursorInfo_7__getIndicesPos___spec__2___closed__3; lean_object* lean_string_append(lean_object*, lean_object*); lean_object* l_Std_RBNode_find___main___at_Lean_Meta_getMajorPos_x3f___spec__2(lean_object*, lean_object*); lean_object* l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__2; lean_object* l_List_range(lean_object*); +lean_object* l___private_Lean_Meta_RecursorInfo_11__checkMotiveResultType___closed__6; extern lean_object* l_Lean_Name_inhabited; extern lean_object* l_String_splitAux___main___closed__1; lean_object* l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -81,14 +88,18 @@ extern lean_object* l_List_repr___rarg___closed__3; lean_object* l___private_Lean_Meta_RecursorInfo_11__checkMotiveResultType___closed__2; lean_object* l_Array_binSearchAux___main___at_Lean_Meta_getMajorPos_x3f___spec__3___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Meta_RecursorInfo_13__syntaxToMajorPos___closed__1; +lean_object* l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__23; uint8_t l_Array_contains___at_Lean_Meta_CheckAssignment_check___main___spec__2(lean_object*, lean_object*); lean_object* l_List_toStringAux___main___at_Lean_Meta_RecursorInfo_HasToString___spec__2___boxed(lean_object*, lean_object*); lean_object* l___private_Lean_Meta_RecursorInfo_11__checkMotiveResultType___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__21; extern lean_object* l_Lean_auxRecExt; lean_object* l_Lean_Meta_mkRecursorAttr___closed__3; +lean_object* l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__9; lean_object* l___private_Lean_Meta_RecursorInfo_13__syntaxToMajorPos___closed__2; lean_object* lean_nat_add(lean_object*, lean_object*); lean_object* l_Lean_Meta_RecursorInfo_HasToString___closed__2; +lean_object* l_Lean_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___spec__1___closed__3; extern lean_object* l___private_Lean_Environment_8__persistentEnvExtensionsRef; extern lean_object* l_Lean_ParametricAttribute_Inhabited___closed__3; lean_object* l_Lean_Meta_RecursorInfo_HasToString___closed__6; @@ -96,18 +107,21 @@ lean_object* l_Lean_Meta_RecursorInfo_HasToString___closed__8; lean_object* l___private_Lean_Meta_RecursorInfo_1__mkRecursorInfoForKernelRec___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Meta_RecursorInfo_1__mkRecursorInfoForKernelRec___closed__1; lean_object* l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__22; lean_object* l_Lean_Meta_RecursorInfo_HasToString___closed__4; lean_object* l___private_Lean_Meta_RecursorInfo_1__mkRecursorInfoForKernelRec___closed__2; extern lean_object* l_IO_FS_Handle_putStrLn___rarg___closed__1; lean_object* l_Lean_Expr_getAppNumArgsAux___main(lean_object*, lean_object*); lean_object* l_List_replicate___rarg(lean_object*, lean_object*); lean_object* l_Lean_Meta_casesOnSuffix; +lean_object* l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__10; lean_object* l_List_map___main___at___private_Lean_Meta_RecursorInfo_1__mkRecursorInfoForKernelRec___spec__3___boxed(lean_object*, lean_object*); lean_object* l_Lean_Meta_RecursorInfo_numParams___boxed(lean_object*); lean_object* l_Array_binSearchAux___main___at_Lean_Meta_getMajorPos_x3f___spec__3(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_findIdxAux___main___at___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___spec__2(lean_object*, lean_object*, lean_object*); lean_object* l_Array_findIdxAux___main___at___private_Lean_Meta_RecursorInfo_9__getUnivLevelPos___spec__1(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_RecursorInfo_HasToString___closed__13; +lean_object* l___private_Lean_Meta_RecursorInfo_2__getMajorPosIfAuxRecursor_x3f___closed__4; lean_object* l_Lean_RecursorVal_getMajorIdx(lean_object*); lean_object* l_Array_findIdxMAux___main___at___private_Lean_Meta_RecursorInfo_7__getIndicesPos___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_brecOnSuffix; @@ -130,9 +144,12 @@ lean_object* l___private_Lean_Meta_RecursorInfo_4__getNumParams___boxed(lean_obj uint8_t l_Array_anyRangeMAux___main___at___private_Lean_Meta_RecursorInfo_3__checkMotive___spec__1(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_List_map___main___at___private_Lean_Meta_RecursorInfo_1__mkRecursorInfoForKernelRec___spec__2(lean_object*); lean_object* lean_nat_sub(lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__16; +lean_object* l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__7; lean_object* l_Lean_Meta_RecursorInfo_HasToString___closed__1; lean_object* lean_array_swap(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__5; lean_object* l___private_Lean_Meta_RecursorInfo_1__mkRecursorInfoForKernelRec(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Meta_RecursorInfo_14__mkRecursorInfoCore(lean_object*, lean_object*, lean_object*, lean_object*); @@ -140,14 +157,18 @@ lean_object* l_Lean_Meta_RecursorUnivLevelPos_hasToString(lean_object*); lean_object* l_List_toStringAux___main___at_Lean_Meta_RecursorInfo_HasToString___spec__2(uint8_t, lean_object*); lean_object* l_Array_getIdx_x3f___at___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___spec__1(lean_object*, lean_object*); lean_object* l_Array_anyRangeMAux___main___at_Lean_Meta_mkRecursorAttr___spec__6___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_List_foldlM___main___at___private_Lean_Meta_RecursorInfo_9__getUnivLevelPos___spec__2___closed__2; lean_object* lean_array_get(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Expr_fvarId_x21(lean_object*); lean_object* l_Lean_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Meta_RecursorInfo_10__getProduceMotiveAndRecursive___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_registerParametricAttribute___rarg___lambda__5___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_List_lengthAux___main___rarg(lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_RecursorInfo_11__checkMotiveResultType___closed__8; lean_object* l_List_foldlM___main___at___private_Lean_Meta_RecursorInfo_9__getUnivLevelPos___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_List_foldlM___main___at___private_Lean_Meta_RecursorInfo_9__getUnivLevelPos___spec__2___closed__1; +lean_object* l___private_Lean_Meta_RecursorInfo_11__checkMotiveResultType___closed__9; +lean_object* l_Lean_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___spec__2___closed__2; lean_object* l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__6; lean_object* l_Lean_ConstantInfo_name(lean_object*); lean_object* l___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -158,8 +179,10 @@ extern lean_object* l_Char_HasRepr___closed__1; lean_object* l___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); uint8_t l_Lean_LocalDecl_binderInfo(lean_object*); lean_object* l_Lean_Meta_mkRecursorAttr___lambda__1___boxed(lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__14; lean_object* l_Lean_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo_10__getProduceMotiveAndRecursive___spec__3(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Meta_RecursorInfo_2__getMajorPosIfAuxRecursor_x3f___closed__2; +lean_object* l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__15; lean_object* l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__3; lean_object* l_List_toStringAux___main___at_Lean_Meta_RecursorInfo_HasToString___spec__6___boxed(lean_object*, lean_object*); lean_object* l_Lean_Meta_RecursorInfo_numMinors___boxed(lean_object*); @@ -171,11 +194,13 @@ lean_object* l_List_toString___at_Lean_Meta_RecursorInfo_HasToString___spec__7__ lean_object* l_Array_back___at___private_Lean_Meta_ExprDefEq_14__processAssignmentFOApproxAux___spec__1(lean_object*); extern lean_object* l_List_reprAux___main___rarg___closed__1; lean_object* l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__3; +lean_object* l___private_Lean_Meta_RecursorInfo_11__checkMotiveResultType___closed__4; lean_object* l_Lean_Meta_RecursorInfo_HasToString(lean_object*); lean_object* l_List_toStringAux___main___at_Lean_Meta_RecursorInfo_HasToString___spec__8___closed__1; lean_object* l___private_Lean_Meta_RecursorInfo_10__getProduceMotiveAndRecursive___closed__1; lean_object* l_Lean_Meta_RecursorInfo_motivePos___boxed(lean_object*); lean_object* l_Array_anyRangeMAux___main___at___private_Lean_Meta_RecursorInfo_3__checkMotive___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__18; lean_object* l_addParenHeuristic(lean_object*); lean_object* l_List_toStringAux___main___at_Lean_Meta_RecursorInfo_HasToString___spec__8___boxed(lean_object*, lean_object*); lean_object* l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__5; @@ -195,19 +220,24 @@ lean_object* l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_Meta_mkRecurs lean_object* l_Lean_ParametricAttribute_getParam___at_Lean_Meta_getMajorPos_x3f___spec__1(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_RecursorInfo_firstIndexPos(lean_object*); lean_object* l___private_Lean_Meta_RecursorInfo_4__getNumParams(lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_RecursorInfo_11__checkMotiveResultType___closed__5; uint8_t l_Lean_BinderInfo_isInstImplicit(uint8_t); lean_object* l___private_Lean_Meta_RecursorInfo_8__getMotiveLevel___boxed(lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_registerParametricAttribute___rarg___closed__4; lean_object* l_Lean_Meta_getMajorPos_x3f___boxed(lean_object*, lean_object*); lean_object* l_Lean_Meta_RecursorInfo_numIndices(lean_object*); +lean_object* l___private_Lean_Meta_RecursorInfo_8__getMotiveLevel___closed__3; lean_object* l_Lean_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___spec__2___closed__1; lean_object* l_Lean_ConstantInfo_type(lean_object*); lean_object* l_Array_qsortAux___main___at_Lean_Meta_mkRecursorAttr___spec__3(lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_RecursorInfo_1__mkRecursorInfoForKernelRec___closed__3; extern lean_object* l___private_Lean_Environment_5__envExtensionsRef; lean_object* l_Lean_Meta_mkRecursorInfo(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Init_Data_Array_QSort_1__partitionAux___main___at_Lean_Meta_mkRecursorAttr___spec__4___closed__1; size_t l_USize_mod(size_t, size_t); +lean_object* l_Lean_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___spec__2___closed__3; lean_object* l_Lean_Meta_mkBRecOnFor(lean_object*); +lean_object* l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__12; lean_object* l_Lean_RecursorVal_getInduct(lean_object*); extern lean_object* l_Lean_registerPersistentEnvExtensionUnsafe___rarg___closed__3; lean_object* l_Lean_ConstantInfo_lparams(lean_object*); @@ -219,6 +249,7 @@ lean_object* l_List_toString___at_Lean_Meta_RecursorInfo_HasToString___spec__1(l extern lean_object* l_Bool_HasRepr___closed__1; extern lean_object* l_Lean_Syntax_inhabited; size_t lean_ptr_addr(lean_object*); +lean_object* l___private_Lean_Meta_RecursorInfo_8__getMotiveLevel___closed__2; extern lean_object* l_Lean_registerPersistentEnvExtensionUnsafe___rarg___closed__1; lean_object* l_Lean_Meta_getLocalDecl(lean_object*, lean_object*, lean_object*); uint8_t lean_expr_eqv(lean_object*, lean_object*); @@ -226,10 +257,12 @@ uint8_t lean_nat_dec_le(lean_object*, lean_object*); extern lean_object* l_Bool_HasRepr___closed__2; lean_object* l_Array_findIdxMAux___main___at___private_Lean_Meta_RecursorInfo_6__getParamsPos___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Meta_RecursorInfo_8__getMotiveLevel___closed__1; +lean_object* l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__20; lean_object* l_Lean_registerParametricAttribute___at_Lean_Meta_mkRecursorAttr___spec__1___lambda__1___boxed(lean_object*); lean_object* l___private_Lean_Meta_RecursorInfo_6__getParamsPos___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_RecursorInfo_firstIndexPos___boxed(lean_object*); lean_object* l_Array_getIdx_x3f___at___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___spec__1___boxed(lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_RecursorInfo_2__getMajorPosIfAuxRecursor_x3f___closed__3; lean_object* l___private_Lean_Meta_RecursorInfo_3__checkMotive(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_registerParametricAttribute___rarg___closed__3; lean_object* l___private_Lean_Meta_RecursorInfo_4__getNumParams___main(lean_object*, lean_object*, lean_object*); @@ -238,6 +271,7 @@ lean_object* l___private_Lean_Meta_RecursorInfo_7__getIndicesPos(lean_object*, l lean_object* l_Lean_Meta_RecursorInfo_HasToString___closed__12; lean_object* lean_io_ref_reset(lean_object*, lean_object*); extern lean_object* l_Lean_registerEnvExtensionUnsafe___rarg___closed__2; +lean_object* l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__17; lean_object* l_Lean_registerParametricAttribute___at_Lean_Meta_mkRecursorAttr___spec__1___closed__1; lean_object* l_Lean_registerParametricAttribute___at_Lean_Meta_mkRecursorAttr___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___spec__1___closed__1; @@ -248,6 +282,7 @@ lean_object* l___private_Lean_Meta_RecursorInfo_11__checkMotiveResultType___clos uint8_t l_Lean_Expr_isFVar(lean_object*); lean_object* l___private_Lean_Meta_RecursorInfo_3__checkMotive___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_mkRecursorAttr___lambda__2(lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__8; lean_object* l_List_toStringAux___main___at_Lean_Meta_RecursorInfo_HasToString___spec__4___closed__1; lean_object* l_Lean_Environment_getModuleIdxFor_x3f(lean_object*, lean_object*); lean_object* l_List_toStringAux___main___at_Lean_Meta_RecursorInfo_HasToString___spec__4___boxed(lean_object*, lean_object*); @@ -255,6 +290,7 @@ lean_object* l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__2; lean_object* l_Lean_Meta_inferType(lean_object*, lean_object*, lean_object*); lean_object* lean_io_ref_set(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_isExprDefEq(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__8; extern lean_object* l_Lean_registerEnvExtensionUnsafe___at_Lean_registerParametricAttribute___spec__9___rarg___closed__1; lean_object* l_Lean_Meta_getConstInfo(lean_object*, lean_object*, lean_object*); lean_object* l_Array_qsortAux___main___at_Lean_Meta_mkRecursorAttr___spec__3___boxed(lean_object*, lean_object*, lean_object*); @@ -267,6 +303,7 @@ lean_object* l_List_toStringAux___main___at_Lean_Meta_RecursorInfo_HasToString__ lean_object* l_Lean_Meta_Exception_toStr(lean_object*); lean_object* l_Lean_PersistentEnvExtension_getState___rarg(lean_object*, lean_object*); lean_object* l_Lean_Expr_FindImpl_findM_x3f___main___at___private_Lean_Meta_RecursorInfo_10__getProduceMotiveAndRecursive___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__4; lean_object* l_Array_findIdxMAux___main___at___private_Lean_Meta_RecursorInfo_6__getParamsPos___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Meta_RecursorInfo_10__getProduceMotiveAndRecursive(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_io_initializing(lean_object*); @@ -275,7 +312,10 @@ lean_object* l_Lean_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo lean_object* l_Array_findIdxMAux___main___at___private_Lean_Meta_RecursorInfo_7__getIndicesPos___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__4; lean_object* l_Nat_foldMAux___main___at___private_Lean_Meta_RecursorInfo_10__getProduceMotiveAndRecursive___spec__4___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__9; lean_object* l_Lean_Meta_RecursorInfo_HasToString___closed__10; +lean_object* l___private_Lean_Meta_RecursorInfo_11__checkMotiveResultType___closed__7; +lean_object* l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__19; lean_object* l_Lean_ParametricAttribute_getParam___at_Lean_Meta_getMajorPos_x3f___spec__1___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_List_toArrayAux___main___rarg(lean_object*, lean_object*); extern lean_object* l_Nat_Inhabited; @@ -296,16 +336,20 @@ lean_object* l_Nat_foldMAux___main___at___private_Lean_Meta_RecursorInfo_7__getI lean_object* l_Lean_Meta_RecursorInfo_HasToString___closed__15; lean_object* l_Lean_Meta_RecursorInfo_HasToString___closed__3; lean_object* l_Lean_Meta_mkRecursorAttr___closed__2; +lean_object* l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__11; +lean_object* l_Lean_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___spec__1___closed__2; uint8_t l_Array_anyRangeMAux___main___at_Lean_Meta_mkRecursorAttr___spec__6(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_recOnSuffix___closed__1; lean_object* l_Lean_registerParametricAttribute___at_Lean_Meta_mkRecursorAttr___spec__1___lambda__1(lean_object*); lean_object* l___private_Lean_Meta_RecursorInfo_9__getUnivLevelPos___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_mkRecursorAttr___closed__1; +lean_object* l___private_Lean_Meta_RecursorInfo_1__mkRecursorInfoForKernelRec___closed__4; lean_object* l_Lean_Meta_forallTelescopeReducing___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_mkRecursorAttr___lambda__1(lean_object*, lean_object*, lean_object*); uint8_t l_Lean_Expr_isSort(lean_object*); lean_object* l_Lean_Meta_RecursorInfo_numIndices___boxed(lean_object*); uint8_t lean_string_dec_eq(lean_object*, lean_object*); +lean_object* l_Nat_foldMAux___main___at___private_Lean_Meta_RecursorInfo_7__getIndicesPos___spec__2___closed__2; uint8_t lean_nat_dec_lt(lean_object*, lean_object*); lean_object* _init_l_Lean_Meta_casesOnSuffix___closed__1() { _start: @@ -1491,6 +1535,26 @@ _start: { lean_object* x_1; lean_object* x_2; x_1 = l___private_Lean_Meta_RecursorInfo_1__mkRecursorInfoForKernelRec___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___private_Lean_Meta_RecursorInfo_1__mkRecursorInfoForKernelRec___closed__3() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l___private_Lean_Meta_RecursorInfo_1__mkRecursorInfoForKernelRec___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___private_Lean_Meta_RecursorInfo_1__mkRecursorInfoForKernelRec___closed__4() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l___private_Lean_Meta_RecursorInfo_1__mkRecursorInfoForKernelRec___closed__3; x_2 = lean_alloc_ctor(22, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; @@ -1735,7 +1799,7 @@ if (x_79 == 0) lean_object* x_80; lean_object* x_81; x_80 = lean_ctor_get(x_6, 0); lean_dec(x_80); -x_81 = l___private_Lean_Meta_RecursorInfo_1__mkRecursorInfoForKernelRec___closed__2; +x_81 = l___private_Lean_Meta_RecursorInfo_1__mkRecursorInfoForKernelRec___closed__4; lean_ctor_set_tag(x_6, 1); lean_ctor_set(x_6, 0, x_81); return x_6; @@ -1746,7 +1810,7 @@ lean_object* x_82; lean_object* x_83; lean_object* x_84; x_82 = lean_ctor_get(x_6, 1); lean_inc(x_82); lean_dec(x_6); -x_83 = l___private_Lean_Meta_RecursorInfo_1__mkRecursorInfoForKernelRec___closed__2; +x_83 = l___private_Lean_Meta_RecursorInfo_1__mkRecursorInfoForKernelRec___closed__4; x_84 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_84, 0, x_83); lean_ctor_set(x_84, 1, x_82); @@ -1812,6 +1876,26 @@ _start: { lean_object* x_1; lean_object* x_2; x_1 = l___private_Lean_Meta_RecursorInfo_2__getMajorPosIfAuxRecursor_x3f___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___private_Lean_Meta_RecursorInfo_2__getMajorPosIfAuxRecursor_x3f___closed__3() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l___private_Lean_Meta_RecursorInfo_2__getMajorPosIfAuxRecursor_x3f___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___private_Lean_Meta_RecursorInfo_2__getMajorPosIfAuxRecursor_x3f___closed__4() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l___private_Lean_Meta_RecursorInfo_2__getMajorPosIfAuxRecursor_x3f___closed__3; x_2 = lean_alloc_ctor(22, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; @@ -2017,7 +2101,7 @@ if (x_46 == 0) lean_object* x_47; lean_object* x_48; x_47 = lean_ctor_get(x_15, 0); lean_dec(x_47); -x_48 = l___private_Lean_Meta_RecursorInfo_2__getMajorPosIfAuxRecursor_x3f___closed__2; +x_48 = l___private_Lean_Meta_RecursorInfo_2__getMajorPosIfAuxRecursor_x3f___closed__4; lean_ctor_set_tag(x_15, 1); lean_ctor_set(x_15, 0, x_48); return x_15; @@ -2028,7 +2112,7 @@ lean_object* x_49; lean_object* x_50; lean_object* x_51; x_49 = lean_ctor_get(x_15, 1); lean_inc(x_49); lean_dec(x_15); -x_50 = l___private_Lean_Meta_RecursorInfo_2__getMajorPosIfAuxRecursor_x3f___closed__2; +x_50 = l___private_Lean_Meta_RecursorInfo_2__getMajorPosIfAuxRecursor_x3f___closed__4; x_51 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_51, 0, x_50); lean_ctor_set(x_51, 1, x_49); @@ -2141,19 +2225,79 @@ return x_1; lean_object* _init_l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__2() { _start: { -lean_object* x_1; -x_1 = lean_mk_string("', result type must be of the form (C t), "); -return x_1; +lean_object* x_1; lean_object* x_2; +x_1 = l___private_Lean_Meta_RecursorInfo_3__checkMotive___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___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__3() { _start: { +lean_object* x_1; lean_object* x_2; +x_1 = l___private_Lean_Meta_RecursorInfo_3__checkMotive___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___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__4() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("', result type must be of the form (C t), "); +return x_1; +} +} +lean_object* _init_l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__5() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__4; +x_2 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* _init_l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__6() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__5; +x_2 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* _init_l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__7() { +_start: +{ lean_object* x_1; x_1 = lean_mk_string("where C is a bound variable, and t is a (possibly empty) sequence of bound variables"); return x_1; } } +lean_object* _init_l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__8() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__7; +x_2 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* _init_l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__9() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__8; +x_2 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} lean_object* l___private_Lean_Meta_RecursorInfo_3__checkMotive(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { _start: { @@ -2161,58 +2305,76 @@ uint8_t x_6; x_6 = l_Lean_Expr_isFVar(x_2); if (x_6 == 0) { -lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; +lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; x_7 = l_Lean_Name_toString___closed__1; x_8 = l_Lean_Name_toStringWithSep___main(x_7, x_1); -x_9 = l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__1; -x_10 = lean_string_append(x_9, x_8); -lean_dec(x_8); -x_11 = l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__2; -x_12 = lean_string_append(x_10, x_11); -x_13 = l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__3; -x_14 = lean_string_append(x_12, x_13); -x_15 = lean_alloc_ctor(22, 1, 0); -lean_ctor_set(x_15, 0, x_14); -x_16 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_16, 0, x_15); -lean_ctor_set(x_16, 1, x_5); -return x_16; +x_9 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_9, 0, x_8); +x_10 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_10, 0, x_9); +x_11 = l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__3; +x_12 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_12, 0, x_11); +lean_ctor_set(x_12, 1, x_10); +x_13 = l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__6; +x_14 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_14, 0, x_12); +lean_ctor_set(x_14, 1, x_13); +x_15 = l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__9; +x_16 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_16, 0, x_14); +lean_ctor_set(x_16, 1, x_15); +x_17 = lean_alloc_ctor(22, 1, 0); +lean_ctor_set(x_17, 0, x_16); +x_18 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_18, 0, x_17); +lean_ctor_set(x_18, 1, x_5); +return x_18; } else { -lean_object* x_17; lean_object* x_18; uint8_t x_19; -x_17 = lean_array_get_size(x_3); -x_18 = lean_unsigned_to_nat(0u); -x_19 = l_Array_anyRangeMAux___main___at___private_Lean_Meta_RecursorInfo_3__checkMotive___spec__1(x_3, x_3, x_17, x_18); -lean_dec(x_17); -if (x_19 == 0) +lean_object* x_19; lean_object* x_20; uint8_t x_21; +x_19 = lean_array_get_size(x_3); +x_20 = lean_unsigned_to_nat(0u); +x_21 = l_Array_anyRangeMAux___main___at___private_Lean_Meta_RecursorInfo_3__checkMotive___spec__1(x_3, x_3, x_19, x_20); +lean_dec(x_19); +if (x_21 == 0) { -lean_object* x_20; lean_object* x_21; +lean_object* x_22; lean_object* x_23; lean_dec(x_1); -x_20 = lean_box(0); -x_21 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_21, 0, x_20); -lean_ctor_set(x_21, 1, x_5); -return x_21; +x_22 = lean_box(0); +x_23 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_23, 0, x_22); +lean_ctor_set(x_23, 1, x_5); +return x_23; } else { -lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; -x_22 = l_Lean_Name_toString___closed__1; -x_23 = l_Lean_Name_toStringWithSep___main(x_22, x_1); -x_24 = l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__1; -x_25 = lean_string_append(x_24, x_23); -lean_dec(x_23); -x_26 = l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__2; -x_27 = lean_string_append(x_25, x_26); +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_24 = l_Lean_Name_toString___closed__1; +x_25 = l_Lean_Name_toStringWithSep___main(x_24, x_1); +x_26 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_26, 0, x_25); +x_27 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_27, 0, x_26); x_28 = l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__3; -x_29 = lean_string_append(x_27, x_28); -x_30 = lean_alloc_ctor(22, 1, 0); -lean_ctor_set(x_30, 0, x_29); -x_31 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_31, 0, x_30); -lean_ctor_set(x_31, 1, x_5); -return x_31; +x_29 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_29, 0, x_28); +lean_ctor_set(x_29, 1, x_27); +x_30 = l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__6; +x_31 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_31, 0, x_29); +lean_ctor_set(x_31, 1, x_30); +x_32 = l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__9; +x_33 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_33, 0, x_31); +lean_ctor_set(x_33, 1, x_32); +x_34 = lean_alloc_ctor(22, 1, 0); +lean_ctor_set(x_34, 0, x_33); +x_35 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_35, 0, x_34); +lean_ctor_set(x_35, 1, x_5); +return x_35; } } } @@ -2360,12 +2522,72 @@ return x_1; lean_object* _init_l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__2() { _start: { +lean_object* x_1; lean_object* x_2; +x_1 = l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___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___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__3() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___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___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__4() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Char_HasRepr___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___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__5() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__4; +x_2 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* _init_l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__6() { +_start: +{ lean_object* x_1; x_1 = lean_mk_string("invalid user defined recursor, '"); return x_1; } } -lean_object* _init_l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__3() { +lean_object* _init_l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__7() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__6; +x_2 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* _init_l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__8() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__7; +x_2 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* _init_l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__9() { _start: { lean_object* x_1; @@ -2373,7 +2595,27 @@ x_1 = lean_mk_string("' does not support dependent elimination, "); return x_1; } } -lean_object* _init_l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__4() { +lean_object* _init_l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__10() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__9; +x_2 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* _init_l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__11() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__10; +x_2 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* _init_l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__12() { _start: { lean_object* x_1; @@ -2381,7 +2623,27 @@ x_1 = lean_mk_string("and position of the major premise was not specified "); return x_1; } } -lean_object* _init_l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__5() { +lean_object* _init_l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__13() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__12; +x_2 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* _init_l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__14() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__13; +x_2 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* _init_l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__15() { _start: { lean_object* x_1; @@ -2389,7 +2651,27 @@ x_1 = lean_mk_string("(solution: set attribute '[recursor ]', where i return x_1; } } -lean_object* _init_l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__6() { +lean_object* _init_l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__16() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__15; +x_2 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* _init_l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__17() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__16; +x_2 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* _init_l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__18() { _start: { lean_object* x_1; @@ -2397,7 +2679,27 @@ x_1 = lean_mk_string("invalid major premise position for user defined recursor, return x_1; } } -lean_object* _init_l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__7() { +lean_object* _init_l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__19() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__18; +x_2 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* _init_l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__20() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__19; +x_2 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* _init_l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__21() { _start: { lean_object* x_1; @@ -2405,121 +2707,184 @@ x_1 = lean_mk_string(" arguments"); return x_1; } } +lean_object* _init_l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__22() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__21; +x_2 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* _init_l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__23() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__22; +x_2 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} lean_object* l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { _start: { if (lean_obj_tag(x_2) == 0) { -uint8_t x_8; +uint8_t x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; uint8_t x_12; x_8 = l_Array_isEmpty___rarg(x_5); -if (x_8 == 0) -{ -lean_object* x_9; lean_object* x_10; lean_object* x_11; x_9 = l_Array_back___at___private_Lean_Meta_ExprDefEq_14__processAssignmentFOApproxAux___spec__1(x_5); x_10 = lean_unsigned_to_nat(0u); x_11 = l_Array_findIdxAux___main___at___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___spec__2(x_9, x_3, x_10); +if (x_8 == 0) +{ +uint8_t x_44; +x_44 = 0; +x_12 = x_44; +goto block_43; +} +else +{ +uint8_t x_45; +x_45 = 1; +x_12 = x_45; +goto block_43; +} +block_43: +{ +if (x_12 == 0) +{ if (lean_obj_tag(x_11) == 0) { -lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; +lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_dec(x_9); -x_12 = l_Lean_Name_toString___closed__1; -x_13 = l_Lean_Name_toStringWithSep___main(x_12, x_1); -x_14 = l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__1; -x_15 = lean_string_append(x_14, x_13); -lean_dec(x_13); -x_16 = l_Char_HasRepr___closed__1; -x_17 = lean_string_append(x_15, x_16); -x_18 = lean_alloc_ctor(22, 1, 0); +x_13 = l_Lean_Name_toString___closed__1; +x_14 = l_Lean_Name_toStringWithSep___main(x_13, x_1); +x_15 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_15, 0, x_14); +x_16 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_16, 0, x_15); +x_17 = l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__3; +x_18 = lean_alloc_ctor(9, 2, 0); lean_ctor_set(x_18, 0, x_17); -x_19 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_19, 0, x_18); -lean_ctor_set(x_19, 1, x_7); -return x_19; +lean_ctor_set(x_18, 1, x_16); +x_19 = l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__5; +x_20 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_20, 0, x_18); +lean_ctor_set(x_20, 1, x_19); +x_21 = lean_alloc_ctor(22, 1, 0); +lean_ctor_set(x_21, 0, x_20); +x_22 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_22, 0, x_21); +lean_ctor_set(x_22, 1, x_7); +return x_22; } else { -lean_object* x_20; uint8_t x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; +lean_object* x_23; uint8_t x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_dec(x_1); -x_20 = lean_ctor_get(x_11, 0); -lean_inc(x_20); +x_23 = lean_ctor_get(x_11, 0); +lean_inc(x_23); lean_dec(x_11); -x_21 = 1; -x_22 = lean_box(x_21); -x_23 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_23, 0, x_20); -lean_ctor_set(x_23, 1, x_22); -x_24 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_24, 0, x_9); -lean_ctor_set(x_24, 1, x_23); -x_25 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_25, 0, x_24); -lean_ctor_set(x_25, 1, x_7); -return x_25; +x_24 = 1; +x_25 = lean_box(x_24); +x_26 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_26, 0, x_23); +lean_ctor_set(x_26, 1, x_25); +x_27 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_27, 0, x_9); +lean_ctor_set(x_27, 1, x_26); +x_28 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_28, 0, x_27); +lean_ctor_set(x_28, 1, x_7); +return x_28; } } 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; -x_26 = l_Lean_Name_toString___closed__1; -x_27 = l_Lean_Name_toStringWithSep___main(x_26, x_1); -x_28 = l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__2; -x_29 = lean_string_append(x_28, x_27); -lean_dec(x_27); -x_30 = l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__3; -x_31 = lean_string_append(x_29, x_30); -x_32 = l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__4; -x_33 = lean_string_append(x_31, x_32); -x_34 = l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__5; -x_35 = lean_string_append(x_33, x_34); -x_36 = lean_alloc_ctor(22, 1, 0); -lean_ctor_set(x_36, 0, x_35); -x_37 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_37, 0, x_36); -lean_ctor_set(x_37, 1, x_7); -return x_37; +lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; +lean_dec(x_11); +lean_dec(x_9); +x_29 = l_Lean_Name_toString___closed__1; +x_30 = l_Lean_Name_toStringWithSep___main(x_29, x_1); +x_31 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_31, 0, x_30); +x_32 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_32, 0, x_31); +x_33 = l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__8; +x_34 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_34, 0, x_33); +lean_ctor_set(x_34, 1, x_32); +x_35 = l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__11; +x_36 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_36, 0, x_34); +lean_ctor_set(x_36, 1, x_35); +x_37 = l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__14; +x_38 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_38, 0, x_36); +lean_ctor_set(x_38, 1, x_37); +x_39 = l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__17; +x_40 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_40, 0, x_38); +lean_ctor_set(x_40, 1, x_39); +x_41 = lean_alloc_ctor(22, 1, 0); +lean_ctor_set(x_41, 0, x_40); +x_42 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_42, 0, x_41); +lean_ctor_set(x_42, 1, x_7); +return x_42; +} } } else { -lean_object* x_38; lean_object* x_39; uint8_t x_40; +lean_object* x_46; lean_object* x_47; uint8_t x_48; lean_dec(x_1); -x_38 = lean_ctor_get(x_2, 0); -x_39 = lean_array_get_size(x_3); -x_40 = lean_nat_dec_lt(x_38, x_39); -if (x_40 == 0) +x_46 = lean_ctor_get(x_2, 0); +x_47 = lean_array_get_size(x_3); +x_48 = lean_nat_dec_lt(x_46, x_47); +if (x_48 == 0) { -lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; -x_41 = l_Nat_repr(x_39); -x_42 = l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__6; -x_43 = lean_string_append(x_42, x_41); -lean_dec(x_41); -x_44 = l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__7; -x_45 = lean_string_append(x_43, x_44); -x_46 = lean_alloc_ctor(22, 1, 0); -lean_ctor_set(x_46, 0, x_45); -x_47 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_47, 0, x_46); -lean_ctor_set(x_47, 1, x_7); -return x_47; +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_49 = l_Nat_repr(x_47); +x_50 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_50, 0, x_49); +x_51 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_51, 0, x_50); +x_52 = l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__20; +x_53 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_53, 0, x_52); +lean_ctor_set(x_53, 1, x_51); +x_54 = l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__23; +x_55 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_55, 0, x_53); +lean_ctor_set(x_55, 1, x_54); +x_56 = lean_alloc_ctor(22, 1, 0); +lean_ctor_set(x_56, 0, x_55); +x_57 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_57, 0, x_56); +lean_ctor_set(x_57, 1, x_7); +return x_57; } else { -lean_object* x_48; uint8_t x_49; lean_object* x_50; lean_object* x_51; lean_object* x_52; lean_object* x_53; -lean_dec(x_39); -x_48 = lean_array_fget(x_3, x_38); -x_49 = l_Array_contains___at_Lean_Meta_CheckAssignment_check___main___spec__2(x_5, x_48); -x_50 = lean_box(x_49); -lean_inc(x_38); -x_51 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_51, 0, x_38); -lean_ctor_set(x_51, 1, x_50); -x_52 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_52, 0, x_48); -lean_ctor_set(x_52, 1, x_51); -x_53 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_53, 0, x_52); -lean_ctor_set(x_53, 1, x_7); -return x_53; +lean_object* x_58; uint8_t x_59; lean_object* x_60; lean_object* x_61; lean_object* x_62; lean_object* x_63; +lean_dec(x_47); +x_58 = lean_array_fget(x_3, x_46); +x_59 = l_Array_contains___at_Lean_Meta_CheckAssignment_check___main___spec__2(x_5, x_58); +x_60 = lean_box(x_59); +lean_inc(x_46); +x_61 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_61, 0, x_46); +lean_ctor_set(x_61, 1, x_60); +x_62 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_62, 0, x_58); +lean_ctor_set(x_62, 1, x_61); +x_63 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_63, 0, x_62); +lean_ctor_set(x_63, 1, x_7); +return x_63; } } } @@ -2670,6 +3035,26 @@ x_1 = lean_mk_string("' , type of the major premise does not contain the recurso return x_1; } } +lean_object* _init_l_Nat_foldMAux___main___at___private_Lean_Meta_RecursorInfo_6__getParamsPos___spec__2___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Nat_foldMAux___main___at___private_Lean_Meta_RecursorInfo_6__getParamsPos___spec__2___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_Nat_foldMAux___main___at___private_Lean_Meta_RecursorInfo_6__getParamsPos___spec__2___closed__3() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Nat_foldMAux___main___at___private_Lean_Meta_RecursorInfo_6__getParamsPos___spec__2___closed__2; +x_2 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} lean_object* l_Nat_foldMAux___main___at___private_Lean_Meta_RecursorInfo_6__getParamsPos___spec__2(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { _start: { @@ -2720,155 +3105,169 @@ lean_dec(x_23); x_26 = l_Lean_BinderInfo_isInstImplicit(x_25); if (x_26 == 0) { -lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; +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_dec(x_12); lean_dec(x_7); lean_dec(x_6); x_27 = l_Lean_Name_toString___closed__1; x_28 = l_Lean_Name_toStringWithSep___main(x_27, x_1); -x_29 = l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__1; -x_30 = lean_string_append(x_29, x_28); -lean_dec(x_28); -x_31 = l_Nat_foldMAux___main___at___private_Lean_Meta_RecursorInfo_6__getParamsPos___spec__2___closed__1; -x_32 = lean_string_append(x_30, x_31); -x_33 = lean_alloc_ctor(22, 1, 0); -lean_ctor_set(x_33, 0, x_32); +x_29 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_29, 0, x_28); +x_30 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_30, 0, x_29); +x_31 = l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__3; +x_32 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_32, 0, x_31); +lean_ctor_set(x_32, 1, x_30); +x_33 = l_Nat_foldMAux___main___at___private_Lean_Meta_RecursorInfo_6__getParamsPos___spec__2___closed__3; +x_34 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_34, 0, x_32); +lean_ctor_set(x_34, 1, x_33); +x_35 = lean_alloc_ctor(22, 1, 0); +lean_ctor_set(x_35, 0, x_34); lean_ctor_set_tag(x_21, 1); -lean_ctor_set(x_21, 0, x_33); +lean_ctor_set(x_21, 0, x_35); return x_21; } else { -lean_object* x_34; +lean_object* x_36; lean_free_object(x_21); -x_34 = lean_array_push(x_6, x_18); +x_36 = lean_array_push(x_6, x_18); x_5 = x_12; -x_6 = x_34; +x_6 = x_36; x_8 = x_24; goto _start; } } else { -lean_object* x_36; lean_object* x_37; uint8_t x_38; uint8_t x_39; -x_36 = lean_ctor_get(x_21, 0); -x_37 = lean_ctor_get(x_21, 1); -lean_inc(x_37); -lean_inc(x_36); +lean_object* x_38; lean_object* x_39; uint8_t x_40; uint8_t x_41; +x_38 = lean_ctor_get(x_21, 0); +x_39 = lean_ctor_get(x_21, 1); +lean_inc(x_39); +lean_inc(x_38); lean_dec(x_21); -x_38 = l_Lean_LocalDecl_binderInfo(x_36); -lean_dec(x_36); -x_39 = l_Lean_BinderInfo_isInstImplicit(x_38); -if (x_39 == 0) +x_40 = l_Lean_LocalDecl_binderInfo(x_38); +lean_dec(x_38); +x_41 = l_Lean_BinderInfo_isInstImplicit(x_40); +if (x_41 == 0) { -lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; +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_dec(x_12); lean_dec(x_7); lean_dec(x_6); -x_40 = l_Lean_Name_toString___closed__1; -x_41 = l_Lean_Name_toStringWithSep___main(x_40, x_1); -x_42 = l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__1; -x_43 = lean_string_append(x_42, x_41); -lean_dec(x_41); -x_44 = l_Nat_foldMAux___main___at___private_Lean_Meta_RecursorInfo_6__getParamsPos___spec__2___closed__1; -x_45 = lean_string_append(x_43, x_44); -x_46 = lean_alloc_ctor(22, 1, 0); -lean_ctor_set(x_46, 0, x_45); -x_47 = lean_alloc_ctor(1, 2, 0); +x_42 = l_Lean_Name_toString___closed__1; +x_43 = l_Lean_Name_toStringWithSep___main(x_42, x_1); +x_44 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_44, 0, x_43); +x_45 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_45, 0, x_44); +x_46 = l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__3; +x_47 = lean_alloc_ctor(9, 2, 0); lean_ctor_set(x_47, 0, x_46); -lean_ctor_set(x_47, 1, x_37); -return x_47; +lean_ctor_set(x_47, 1, x_45); +x_48 = l_Nat_foldMAux___main___at___private_Lean_Meta_RecursorInfo_6__getParamsPos___spec__2___closed__3; +x_49 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_49, 0, x_47); +lean_ctor_set(x_49, 1, x_48); +x_50 = lean_alloc_ctor(22, 1, 0); +lean_ctor_set(x_50, 0, x_49); +x_51 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_51, 0, x_50); +lean_ctor_set(x_51, 1, x_39); +return x_51; } else { -lean_object* x_48; -x_48 = lean_array_push(x_6, x_18); +lean_object* x_52; +x_52 = lean_array_push(x_6, x_18); x_5 = x_12; -x_6 = x_48; -x_8 = x_37; +x_6 = x_52; +x_8 = x_39; goto _start; } } } else { -uint8_t x_50; +uint8_t x_54; lean_dec(x_12); lean_dec(x_7); lean_dec(x_6); lean_dec(x_1); -x_50 = !lean_is_exclusive(x_21); -if (x_50 == 0) +x_54 = !lean_is_exclusive(x_21); +if (x_54 == 0) { return x_21; } else { -lean_object* x_51; lean_object* x_52; lean_object* x_53; -x_51 = lean_ctor_get(x_21, 0); -x_52 = lean_ctor_get(x_21, 1); -lean_inc(x_52); -lean_inc(x_51); +lean_object* x_55; lean_object* x_56; lean_object* x_57; +x_55 = lean_ctor_get(x_21, 0); +x_56 = lean_ctor_get(x_21, 1); +lean_inc(x_56); +lean_inc(x_55); lean_dec(x_21); -x_53 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_53, 0, x_51); -lean_ctor_set(x_53, 1, x_52); -return x_53; +x_57 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_57, 0, x_55); +lean_ctor_set(x_57, 1, x_56); +return x_57; } } } else { -lean_object* x_54; lean_object* x_55; +lean_object* x_58; lean_object* x_59; lean_dec(x_16); -x_54 = lean_ctor_get(x_17, 1); -lean_inc(x_54); +x_58 = lean_ctor_get(x_17, 1); +lean_inc(x_58); lean_dec(x_17); -x_55 = lean_array_push(x_6, x_18); +x_59 = lean_array_push(x_6, x_18); x_5 = x_12; -x_6 = x_55; -x_8 = x_54; +x_6 = x_59; +x_8 = x_58; goto _start; } } else { -uint8_t x_57; +uint8_t x_61; lean_dec(x_16); lean_dec(x_12); lean_dec(x_7); lean_dec(x_6); lean_dec(x_1); -x_57 = !lean_is_exclusive(x_17); -if (x_57 == 0) +x_61 = !lean_is_exclusive(x_17); +if (x_61 == 0) { return x_17; } else { -lean_object* x_58; lean_object* x_59; lean_object* x_60; -x_58 = lean_ctor_get(x_17, 0); -x_59 = lean_ctor_get(x_17, 1); -lean_inc(x_59); -lean_inc(x_58); +lean_object* x_62; lean_object* x_63; lean_object* x_64; +x_62 = lean_ctor_get(x_17, 0); +x_63 = lean_ctor_get(x_17, 1); +lean_inc(x_63); +lean_inc(x_62); lean_dec(x_17); -x_60 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_60, 0, x_58); -lean_ctor_set(x_60, 1, x_59); -return x_60; +x_64 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_64, 0, x_62); +lean_ctor_set(x_64, 1, x_63); +return x_64; } } } else { -lean_object* x_61; +lean_object* x_65; lean_dec(x_7); lean_dec(x_5); lean_dec(x_1); -x_61 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_61, 0, x_6); -lean_ctor_set(x_61, 1, x_8); -return x_61; +x_65 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_65, 0, x_6); +lean_ctor_set(x_65, 1, x_8); +return x_65; } } } @@ -3076,6 +3475,26 @@ x_1 = lean_mk_string("' , type of the major premise does not contain the recurso return x_1; } } +lean_object* _init_l_Nat_foldMAux___main___at___private_Lean_Meta_RecursorInfo_7__getIndicesPos___spec__2___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Nat_foldMAux___main___at___private_Lean_Meta_RecursorInfo_7__getIndicesPos___spec__2___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_Nat_foldMAux___main___at___private_Lean_Meta_RecursorInfo_7__getIndicesPos___spec__2___closed__3() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Nat_foldMAux___main___at___private_Lean_Meta_RecursorInfo_7__getIndicesPos___spec__2___closed__2; +x_2 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} lean_object* l_Nat_foldMAux___main___at___private_Lean_Meta_RecursorInfo_7__getIndicesPos___spec__2(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10) { _start: { @@ -3114,96 +3533,110 @@ lean_dec(x_8); x_23 = !lean_is_exclusive(x_21); if (x_23 == 0) { -lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; +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; x_24 = lean_ctor_get(x_21, 0); lean_dec(x_24); x_25 = l_Lean_Name_toString___closed__1; x_26 = l_Lean_Name_toStringWithSep___main(x_25, x_1); -x_27 = l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__1; -x_28 = lean_string_append(x_27, x_26); -lean_dec(x_26); -x_29 = l_Nat_foldMAux___main___at___private_Lean_Meta_RecursorInfo_7__getIndicesPos___spec__2___closed__1; -x_30 = lean_string_append(x_28, x_29); -x_31 = lean_alloc_ctor(22, 1, 0); -lean_ctor_set(x_31, 0, x_30); +x_27 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_27, 0, x_26); +x_28 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_28, 0, x_27); +x_29 = l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__3; +x_30 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_30, 0, x_29); +lean_ctor_set(x_30, 1, x_28); +x_31 = l_Nat_foldMAux___main___at___private_Lean_Meta_RecursorInfo_7__getIndicesPos___spec__2___closed__3; +x_32 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_32, 0, x_30); +lean_ctor_set(x_32, 1, x_31); +x_33 = lean_alloc_ctor(22, 1, 0); +lean_ctor_set(x_33, 0, x_32); lean_ctor_set_tag(x_21, 1); -lean_ctor_set(x_21, 0, x_31); +lean_ctor_set(x_21, 0, x_33); return x_21; } else { -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_32 = lean_ctor_get(x_21, 1); -lean_inc(x_32); +lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; +x_34 = lean_ctor_get(x_21, 1); +lean_inc(x_34); lean_dec(x_21); -x_33 = l_Lean_Name_toString___closed__1; -x_34 = l_Lean_Name_toStringWithSep___main(x_33, x_1); -x_35 = l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__1; -x_36 = lean_string_append(x_35, x_34); -lean_dec(x_34); -x_37 = l_Nat_foldMAux___main___at___private_Lean_Meta_RecursorInfo_7__getIndicesPos___spec__2___closed__1; -x_38 = lean_string_append(x_36, x_37); -x_39 = lean_alloc_ctor(22, 1, 0); -lean_ctor_set(x_39, 0, x_38); -x_40 = lean_alloc_ctor(1, 2, 0); +x_35 = l_Lean_Name_toString___closed__1; +x_36 = l_Lean_Name_toStringWithSep___main(x_35, x_1); +x_37 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_37, 0, x_36); +x_38 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_38, 0, x_37); +x_39 = l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__3; +x_40 = lean_alloc_ctor(9, 2, 0); lean_ctor_set(x_40, 0, x_39); -lean_ctor_set(x_40, 1, x_32); -return x_40; +lean_ctor_set(x_40, 1, x_38); +x_41 = l_Nat_foldMAux___main___at___private_Lean_Meta_RecursorInfo_7__getIndicesPos___spec__2___closed__3; +x_42 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_42, 0, x_40); +lean_ctor_set(x_42, 1, x_41); +x_43 = lean_alloc_ctor(22, 1, 0); +lean_ctor_set(x_43, 0, x_42); +x_44 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_44, 0, x_43); +lean_ctor_set(x_44, 1, x_34); +return x_44; } } else { -lean_object* x_41; lean_object* x_42; lean_object* x_43; -x_41 = lean_ctor_get(x_21, 1); -lean_inc(x_41); +lean_object* x_45; lean_object* x_46; lean_object* x_47; +x_45 = lean_ctor_get(x_21, 1); +lean_inc(x_45); lean_dec(x_21); -x_42 = lean_ctor_get(x_22, 0); -lean_inc(x_42); +x_46 = lean_ctor_get(x_22, 0); +lean_inc(x_46); lean_dec(x_22); -x_43 = lean_array_push(x_8, x_42); +x_47 = lean_array_push(x_8, x_46); x_7 = x_14; -x_8 = x_43; -x_10 = x_41; +x_8 = x_47; +x_10 = x_45; goto _start; } } else { -uint8_t x_45; +uint8_t x_49; lean_dec(x_14); lean_dec(x_9); lean_dec(x_8); lean_dec(x_1); -x_45 = !lean_is_exclusive(x_21); -if (x_45 == 0) +x_49 = !lean_is_exclusive(x_21); +if (x_49 == 0) { return x_21; } else { -lean_object* x_46; lean_object* x_47; lean_object* x_48; -x_46 = lean_ctor_get(x_21, 0); -x_47 = lean_ctor_get(x_21, 1); -lean_inc(x_47); -lean_inc(x_46); +lean_object* x_50; lean_object* x_51; lean_object* x_52; +x_50 = lean_ctor_get(x_21, 0); +x_51 = lean_ctor_get(x_21, 1); +lean_inc(x_51); +lean_inc(x_50); lean_dec(x_21); -x_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; +x_52 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_52, 0, x_50); +lean_ctor_set(x_52, 1, x_51); +return x_52; } } } else { -lean_object* x_49; +lean_object* x_53; lean_dec(x_9); lean_dec(x_7); lean_dec(x_1); -x_49 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_49, 0, x_8); -lean_ctor_set(x_49, 1, x_10); -return x_49; +x_53 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_53, 0, x_8); +lean_ctor_set(x_53, 1, x_10); +return x_53; } } } @@ -3309,68 +3742,95 @@ x_1 = lean_mk_string("' , motive result sort must be Prop or (Sort u) where u is return x_1; } } +lean_object* _init_l___private_Lean_Meta_RecursorInfo_8__getMotiveLevel___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l___private_Lean_Meta_RecursorInfo_8__getMotiveLevel___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___private_Lean_Meta_RecursorInfo_8__getMotiveLevel___closed__3() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l___private_Lean_Meta_RecursorInfo_8__getMotiveLevel___closed__2; +x_2 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} lean_object* l___private_Lean_Meta_RecursorInfo_8__getMotiveLevel(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { lean_object* x_5; if (lean_obj_tag(x_2) == 3) { -lean_object* x_15; -x_15 = lean_ctor_get(x_2, 0); -switch (lean_obj_tag(x_15)) { +lean_object* x_17; +x_17 = lean_ctor_get(x_2, 0); +switch (lean_obj_tag(x_17)) { case 0: { -lean_object* x_16; +lean_object* x_18; lean_dec(x_1); -lean_inc(x_15); -x_16 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_16, 0, x_15); -lean_ctor_set(x_16, 1, x_4); -return x_16; +lean_inc(x_17); +x_18 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_18, 0, x_17); +lean_ctor_set(x_18, 1, x_4); +return x_18; } case 4: { -lean_object* x_17; +lean_object* x_19; lean_dec(x_1); -lean_inc(x_15); -x_17 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_17, 0, x_15); -lean_ctor_set(x_17, 1, x_4); -return x_17; +lean_inc(x_17); +x_19 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_19, 0, x_17); +lean_ctor_set(x_19, 1, x_4); +return x_19; } default: { -lean_object* x_18; -x_18 = lean_box(0); -x_5 = x_18; -goto block_14; +lean_object* x_20; +x_20 = lean_box(0); +x_5 = x_20; +goto block_16; } } } else { -lean_object* x_19; -x_19 = lean_box(0); -x_5 = x_19; -goto block_14; +lean_object* x_21; +x_21 = lean_box(0); +x_5 = x_21; +goto block_16; } -block_14: +block_16: { -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_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_dec(x_5); x_6 = l_Lean_Name_toString___closed__1; x_7 = l_Lean_Name_toStringWithSep___main(x_6, x_1); -x_8 = l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__1; -x_9 = lean_string_append(x_8, x_7); -lean_dec(x_7); -x_10 = l___private_Lean_Meta_RecursorInfo_8__getMotiveLevel___closed__1; -x_11 = lean_string_append(x_9, x_10); -x_12 = lean_alloc_ctor(22, 1, 0); -lean_ctor_set(x_12, 0, x_11); -x_13 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_13, 0, x_12); -lean_ctor_set(x_13, 1, x_4); -return x_13; +x_8 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_8, 0, x_7); +x_9 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_9, 0, x_8); +x_10 = l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__3; +x_11 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_11, 0, x_10); +lean_ctor_set(x_11, 1, x_9); +x_12 = l___private_Lean_Meta_RecursorInfo_8__getMotiveLevel___closed__3; +x_13 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_13, 0, x_11); +lean_ctor_set(x_13, 1, x_12); +x_14 = lean_alloc_ctor(22, 1, 0); +lean_ctor_set(x_14, 0, x_13); +x_15 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_15, 0, x_14); +lean_ctor_set(x_15, 1, x_4); +return x_15; } } } @@ -3431,6 +3891,26 @@ x_1 = lean_mk_string("' , major premise type does not contain universe level par return x_1; } } +lean_object* _init_l_List_foldlM___main___at___private_Lean_Meta_RecursorInfo_9__getUnivLevelPos___spec__2___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_List_foldlM___main___at___private_Lean_Meta_RecursorInfo_9__getUnivLevelPos___spec__2___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_List_foldlM___main___at___private_Lean_Meta_RecursorInfo_9__getUnivLevelPos___spec__2___closed__3() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_List_foldlM___main___at___private_Lean_Meta_RecursorInfo_9__getUnivLevelPos___spec__2___closed__2; +x_2 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} lean_object* l_List_foldlM___main___at___private_Lean_Meta_RecursorInfo_9__getUnivLevelPos___spec__2(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { _start: { @@ -3462,51 +3942,65 @@ x_14 = l_Array_findIdxAux___main___at___private_Lean_Meta_RecursorInfo_9__getUni lean_dec(x_11); if (lean_obj_tag(x_14) == 0) { -lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; +lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_dec(x_10); lean_dec(x_4); x_15 = l_Lean_Name_toString___closed__1; x_16 = l_Lean_Name_toStringWithSep___main(x_15, x_1); -x_17 = l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__1; -x_18 = lean_string_append(x_17, x_16); -lean_dec(x_16); -x_19 = l_List_foldlM___main___at___private_Lean_Meta_RecursorInfo_9__getUnivLevelPos___spec__2___closed__1; -x_20 = lean_string_append(x_18, x_19); -x_21 = l_Lean_Name_toStringWithSep___main(x_15, x_9); -x_22 = lean_string_append(x_20, x_21); -lean_dec(x_21); -x_23 = l_Char_HasRepr___closed__1; -x_24 = lean_string_append(x_22, x_23); -x_25 = lean_alloc_ctor(22, 1, 0); +x_17 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_17, 0, x_16); +x_18 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_18, 0, x_17); +x_19 = l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__3; +x_20 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_20, 0, x_19); +lean_ctor_set(x_20, 1, x_18); +x_21 = l_List_foldlM___main___at___private_Lean_Meta_RecursorInfo_9__getUnivLevelPos___spec__2___closed__3; +x_22 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_22, 0, x_20); +lean_ctor_set(x_22, 1, x_21); +x_23 = l_Lean_Name_toStringWithSep___main(x_15, x_9); +x_24 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_24, 0, x_23); +x_25 = lean_alloc_ctor(0, 1, 0); lean_ctor_set(x_25, 0, x_24); -x_26 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_26, 0, x_25); -lean_ctor_set(x_26, 1, x_7); -return x_26; +x_26 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_26, 0, x_22); +lean_ctor_set(x_26, 1, x_25); +x_27 = l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__5; +x_28 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_28, 0, x_26); +lean_ctor_set(x_28, 1, x_27); +x_29 = lean_alloc_ctor(22, 1, 0); +lean_ctor_set(x_29, 0, x_28); +x_30 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_30, 0, x_29); +lean_ctor_set(x_30, 1, x_7); +return x_30; } else { -lean_object* x_27; lean_object* x_28; lean_object* x_29; +lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_dec(x_9); -x_27 = lean_ctor_get(x_14, 0); -lean_inc(x_27); +x_31 = lean_ctor_get(x_14, 0); +lean_inc(x_31); lean_dec(x_14); -x_28 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_28, 0, x_27); -x_29 = lean_array_push(x_4, x_28); -x_4 = x_29; +x_32 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_32, 0, x_31); +x_33 = lean_array_push(x_4, x_32); +x_4 = x_33; x_5 = x_10; goto _start; } } else { -lean_object* x_31; lean_object* x_32; +lean_object* x_35; lean_object* x_36; lean_dec(x_11); lean_dec(x_9); -x_31 = lean_box(0); -x_32 = lean_array_push(x_4, x_31); -x_4 = x_32; +x_35 = lean_box(0); +x_36 = lean_array_push(x_4, x_35); +x_4 = x_36; x_5 = x_10; goto _start; } @@ -4687,19 +5181,79 @@ return x_1; lean_object* _init_l___private_Lean_Meta_RecursorInfo_11__checkMotiveResultType___closed__2() { _start: { -lean_object* x_1; -x_1 = lean_mk_string("(C : Pi (i : B A), I A i -> Type), where A is (possibly empty) sequence of variables (aka parameters), "); -return x_1; +lean_object* x_1; lean_object* x_2; +x_1 = l___private_Lean_Meta_RecursorInfo_11__checkMotiveResultType___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___private_Lean_Meta_RecursorInfo_11__checkMotiveResultType___closed__3() { _start: { +lean_object* x_1; lean_object* x_2; +x_1 = l___private_Lean_Meta_RecursorInfo_11__checkMotiveResultType___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___private_Lean_Meta_RecursorInfo_11__checkMotiveResultType___closed__4() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("(C : Pi (i : B A), I A i -> Type), where A is (possibly empty) sequence of variables (aka parameters), "); +return x_1; +} +} +lean_object* _init_l___private_Lean_Meta_RecursorInfo_11__checkMotiveResultType___closed__5() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l___private_Lean_Meta_RecursorInfo_11__checkMotiveResultType___closed__4; +x_2 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* _init_l___private_Lean_Meta_RecursorInfo_11__checkMotiveResultType___closed__6() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l___private_Lean_Meta_RecursorInfo_11__checkMotiveResultType___closed__5; +x_2 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* _init_l___private_Lean_Meta_RecursorInfo_11__checkMotiveResultType___closed__7() { +_start: +{ lean_object* x_1; x_1 = lean_mk_string("(i : B A) is a (possibly empty) telescope (aka indices), and I is a constant"); return x_1; } } +lean_object* _init_l___private_Lean_Meta_RecursorInfo_11__checkMotiveResultType___closed__8() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l___private_Lean_Meta_RecursorInfo_11__checkMotiveResultType___closed__7; +x_2 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* _init_l___private_Lean_Meta_RecursorInfo_11__checkMotiveResultType___closed__9() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l___private_Lean_Meta_RecursorInfo_11__checkMotiveResultType___closed__8; +x_2 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} lean_object* l___private_Lean_Meta_RecursorInfo_11__checkMotiveResultType(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: { @@ -4707,63 +5261,85 @@ uint8_t x_7; x_7 = l_Lean_Expr_isSort(x_3); if (x_7 == 0) { -lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; +lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; x_8 = l_Lean_Name_toString___closed__1; x_9 = l_Lean_Name_toStringWithSep___main(x_8, x_1); -x_10 = l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__1; -x_11 = lean_string_append(x_10, x_9); -lean_dec(x_9); -x_12 = l___private_Lean_Meta_RecursorInfo_11__checkMotiveResultType___closed__1; -x_13 = lean_string_append(x_11, x_12); -x_14 = l___private_Lean_Meta_RecursorInfo_11__checkMotiveResultType___closed__2; -x_15 = lean_string_append(x_13, x_14); -x_16 = l___private_Lean_Meta_RecursorInfo_11__checkMotiveResultType___closed__3; -x_17 = lean_string_append(x_15, x_16); -x_18 = lean_alloc_ctor(22, 1, 0); -lean_ctor_set(x_18, 0, x_17); -x_19 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_19, 0, x_18); -lean_ctor_set(x_19, 1, x_6); -return x_19; +x_10 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_10, 0, x_9); +x_11 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_11, 0, x_10); +x_12 = l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__3; +x_13 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_13, 0, x_12); +lean_ctor_set(x_13, 1, x_11); +x_14 = l___private_Lean_Meta_RecursorInfo_11__checkMotiveResultType___closed__3; +x_15 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_15, 0, x_13); +lean_ctor_set(x_15, 1, x_14); +x_16 = l___private_Lean_Meta_RecursorInfo_11__checkMotiveResultType___closed__6; +x_17 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_17, 0, x_15); +lean_ctor_set(x_17, 1, x_16); +x_18 = l___private_Lean_Meta_RecursorInfo_11__checkMotiveResultType___closed__9; +x_19 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_19, 0, x_17); +lean_ctor_set(x_19, 1, x_18); +x_20 = lean_alloc_ctor(22, 1, 0); +lean_ctor_set(x_20, 0, x_19); +x_21 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_21, 0, x_20); +lean_ctor_set(x_21, 1, x_6); +return x_21; } else { -lean_object* x_20; lean_object* x_21; uint8_t x_22; -x_20 = lean_array_get_size(x_2); -x_21 = lean_array_get_size(x_4); -x_22 = lean_nat_dec_eq(x_20, x_21); -lean_dec(x_21); -lean_dec(x_20); -if (x_22 == 0) +lean_object* x_22; lean_object* x_23; uint8_t x_24; +x_22 = lean_array_get_size(x_2); +x_23 = lean_array_get_size(x_4); +x_24 = lean_nat_dec_eq(x_22, x_23); +lean_dec(x_23); +lean_dec(x_22); +if (x_24 == 0) { -lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; -x_23 = l_Lean_Name_toString___closed__1; -x_24 = l_Lean_Name_toStringWithSep___main(x_23, x_1); -x_25 = l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__1; -x_26 = lean_string_append(x_25, x_24); -lean_dec(x_24); -x_27 = l___private_Lean_Meta_RecursorInfo_11__checkMotiveResultType___closed__1; -x_28 = lean_string_append(x_26, x_27); -x_29 = l___private_Lean_Meta_RecursorInfo_11__checkMotiveResultType___closed__2; -x_30 = lean_string_append(x_28, x_29); +lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; +x_25 = l_Lean_Name_toString___closed__1; +x_26 = l_Lean_Name_toStringWithSep___main(x_25, x_1); +x_27 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_27, 0, x_26); +x_28 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_28, 0, x_27); +x_29 = l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__3; +x_30 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_30, 0, x_29); +lean_ctor_set(x_30, 1, x_28); x_31 = l___private_Lean_Meta_RecursorInfo_11__checkMotiveResultType___closed__3; -x_32 = lean_string_append(x_30, x_31); -x_33 = lean_alloc_ctor(22, 1, 0); -lean_ctor_set(x_33, 0, x_32); -x_34 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_34, 0, x_33); -lean_ctor_set(x_34, 1, x_6); -return x_34; +x_32 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_32, 0, x_30); +lean_ctor_set(x_32, 1, x_31); +x_33 = l___private_Lean_Meta_RecursorInfo_11__checkMotiveResultType___closed__6; +x_34 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_34, 0, x_32); +lean_ctor_set(x_34, 1, x_33); +x_35 = l___private_Lean_Meta_RecursorInfo_11__checkMotiveResultType___closed__9; +x_36 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_36, 0, x_34); +lean_ctor_set(x_36, 1, x_35); +x_37 = lean_alloc_ctor(22, 1, 0); +lean_ctor_set(x_37, 0, x_36); +x_38 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_38, 0, x_37); +lean_ctor_set(x_38, 1, x_6); +return x_38; } else { -lean_object* x_35; lean_object* x_36; +lean_object* x_39; lean_object* x_40; lean_dec(x_1); -x_35 = lean_box(0); -x_36 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_36, 0, x_35); -lean_ctor_set(x_36, 1, x_6); -return x_36; +x_39 = lean_box(0); +x_40 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_40, 0, x_39); +lean_ctor_set(x_40, 1, x_6); +return x_40; } } } @@ -5008,6 +5584,26 @@ x_1 = lean_mk_string("', type of the major premise must be of the form (I ...), return x_1; } } +lean_object* _init_l_Lean_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___spec__1___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___spec__1___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_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___spec__1___closed__3() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___spec__1___closed__2; +x_2 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} lean_object* l_Lean_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___spec__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, uint8_t x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11, lean_object* x_12, lean_object* x_13, lean_object* x_14) { _start: { @@ -5200,7 +5796,7 @@ goto _start; } default: { -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_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_dec(x_13); lean_dec(x_12); lean_dec(x_11); @@ -5214,17 +5810,24 @@ lean_dec(x_3); lean_dec(x_1); x_47 = l_Lean_Name_toString___closed__1; x_48 = l_Lean_Name_toStringWithSep___main(x_47, x_2); -x_49 = l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__1; -x_50 = lean_string_append(x_49, x_48); -lean_dec(x_48); -x_51 = l_Lean_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___spec__1___closed__1; -x_52 = lean_string_append(x_50, x_51); -x_53 = lean_alloc_ctor(22, 1, 0); -lean_ctor_set(x_53, 0, x_52); -x_54 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_54, 0, x_53); -lean_ctor_set(x_54, 1, x_14); -return x_54; +x_49 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_49, 0, x_48); +x_50 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_50, 0, x_49); +x_51 = l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__3; +x_52 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_52, 0, x_51); +lean_ctor_set(x_52, 1, x_50); +x_53 = l_Lean_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___spec__1___closed__3; +x_54 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_54, 0, x_52); +lean_ctor_set(x_54, 1, x_53); +x_55 = lean_alloc_ctor(22, 1, 0); +lean_ctor_set(x_55, 0, x_54); +x_56 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_56, 0, x_55); +lean_ctor_set(x_56, 1, x_14); +return x_56; } } } @@ -5237,6 +5840,26 @@ x_1 = lean_mk_string("', indices must occur before major premise"); return x_1; } } +lean_object* _init_l_Lean_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___spec__2___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___spec__2___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_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___spec__2___closed__3() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___spec__2___closed__2; +x_2 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} lean_object* l_Lean_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___spec__2(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9) { _start: { @@ -5259,7 +5882,7 @@ lean_inc(x_2); x_14 = l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim(x_2, x_3, x_4, x_5, x_6, x_8, x_13); if (lean_obj_tag(x_14) == 0) { -lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; uint8_t x_47; +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; uint8_t x_49; x_15 = lean_ctor_get(x_14, 0); lean_inc(x_15); x_16 = lean_ctor_get(x_15, 1); @@ -5282,25 +5905,25 @@ lean_inc(x_20); x_21 = lean_ctor_get(x_16, 1); lean_inc(x_21); lean_dec(x_16); -x_47 = lean_unbox(x_21); -if (x_47 == 0) +x_49 = lean_unbox(x_21); +if (x_49 == 0) { -lean_object* x_48; -x_48 = lean_array_get_size(x_6); -x_22 = x_48; -goto block_46; +lean_object* x_50; +x_50 = lean_array_get_size(x_6); +x_22 = x_50; +goto block_48; } else { -lean_object* x_49; lean_object* x_50; lean_object* x_51; -x_49 = lean_array_get_size(x_6); -x_50 = lean_unsigned_to_nat(1u); -x_51 = lean_nat_sub(x_49, x_50); -lean_dec(x_49); -x_22 = x_51; -goto block_46; +lean_object* x_51; lean_object* x_52; lean_object* x_53; +x_51 = lean_array_get_size(x_6); +x_52 = lean_unsigned_to_nat(1u); +x_53 = lean_nat_sub(x_51, x_52); +lean_dec(x_51); +x_22 = x_53; +goto block_48; } -block_46: +block_48: { uint8_t x_23; x_23 = lean_nat_dec_lt(x_20, x_22); @@ -5365,7 +5988,7 @@ return x_37; } else { -lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; +lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; lean_dec(x_22); lean_dec(x_21); lean_dec(x_20); @@ -5378,28 +6001,35 @@ lean_dec(x_4); lean_dec(x_1); x_38 = l_Lean_Name_toString___closed__1; x_39 = l_Lean_Name_toStringWithSep___main(x_38, x_2); -x_40 = l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__1; -x_41 = lean_string_append(x_40, x_39); -lean_dec(x_39); -x_42 = l_Lean_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___spec__2___closed__1; -x_43 = lean_string_append(x_41, x_42); -x_44 = lean_alloc_ctor(22, 1, 0); -lean_ctor_set(x_44, 0, x_43); +x_40 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_40, 0, x_39); +x_41 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_41, 0, x_40); +x_42 = l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__3; +x_43 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_43, 0, x_42); +lean_ctor_set(x_43, 1, x_41); +x_44 = l_Lean_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___spec__2___closed__3; +x_45 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_45, 0, x_43); +lean_ctor_set(x_45, 1, x_44); +x_46 = lean_alloc_ctor(22, 1, 0); +lean_ctor_set(x_46, 0, x_45); if (lean_is_scalar(x_18)) { - x_45 = lean_alloc_ctor(1, 2, 0); + x_47 = lean_alloc_ctor(1, 2, 0); } else { - x_45 = x_18; - lean_ctor_set_tag(x_45, 1); + x_47 = x_18; + lean_ctor_set_tag(x_47, 1); } -lean_ctor_set(x_45, 0, x_44); -lean_ctor_set(x_45, 1, x_17); -return x_45; +lean_ctor_set(x_47, 0, x_46); +lean_ctor_set(x_47, 1, x_17); +return x_47; } } } else { -uint8_t x_52; +uint8_t x_54; lean_dec(x_11); lean_dec(x_8); lean_dec(x_6); @@ -5407,29 +6037,29 @@ lean_dec(x_5); lean_dec(x_4); lean_dec(x_2); lean_dec(x_1); -x_52 = !lean_is_exclusive(x_14); -if (x_52 == 0) +x_54 = !lean_is_exclusive(x_14); +if (x_54 == 0) { return x_14; } else { -lean_object* x_53; lean_object* x_54; lean_object* x_55; -x_53 = lean_ctor_get(x_14, 0); -x_54 = lean_ctor_get(x_14, 1); -lean_inc(x_54); -lean_inc(x_53); +lean_object* x_55; lean_object* x_56; lean_object* x_57; +x_55 = lean_ctor_get(x_14, 0); +x_56 = lean_ctor_get(x_14, 1); +lean_inc(x_56); +lean_inc(x_55); lean_dec(x_14); -x_55 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_55, 0, x_53); -lean_ctor_set(x_55, 1, x_54); -return x_55; +x_57 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_57, 0, x_55); +lean_ctor_set(x_57, 1, x_56); +return x_57; } } } else { -uint8_t x_56; +uint8_t x_58; lean_dec(x_11); lean_dec(x_8); lean_dec(x_6); @@ -5437,235 +6067,212 @@ lean_dec(x_5); lean_dec(x_4); lean_dec(x_2); lean_dec(x_1); -x_56 = !lean_is_exclusive(x_12); -if (x_56 == 0) +x_58 = !lean_is_exclusive(x_12); +if (x_58 == 0) { return x_12; } else { -lean_object* x_57; lean_object* x_58; lean_object* x_59; -x_57 = lean_ctor_get(x_12, 0); -x_58 = lean_ctor_get(x_12, 1); -lean_inc(x_58); -lean_inc(x_57); +lean_object* x_59; lean_object* x_60; lean_object* x_61; +x_59 = lean_ctor_get(x_12, 0); +x_60 = lean_ctor_get(x_12, 1); +lean_inc(x_60); +lean_inc(x_59); lean_dec(x_12); -x_59 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_59, 0, x_57); -lean_ctor_set(x_59, 1, x_58); -return x_59; +x_61 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_61, 0, x_59); +lean_ctor_set(x_61, 1, x_60); +return x_61; } } } case 1: { -lean_object* x_60; lean_object* x_61; lean_object* x_62; +lean_object* x_62; lean_object* x_63; lean_object* x_64; lean_dec(x_7); -x_60 = lean_unsigned_to_nat(0u); -x_61 = l___private_Lean_Meta_RecursorInfo_4__getNumParams___main(x_4, x_5, x_60); +x_62 = lean_unsigned_to_nat(0u); +x_63 = l___private_Lean_Meta_RecursorInfo_4__getNumParams___main(x_4, x_5, x_62); lean_inc(x_2); -x_62 = l___private_Lean_Meta_RecursorInfo_3__checkMotive(x_2, x_5, x_6, x_8, x_9); -if (lean_obj_tag(x_62) == 0) -{ -lean_object* x_63; lean_object* x_64; -x_63 = lean_ctor_get(x_62, 1); -lean_inc(x_63); -lean_dec(x_62); -lean_inc(x_2); -x_64 = l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim(x_2, x_3, x_4, x_5, x_6, x_8, x_63); +x_64 = l___private_Lean_Meta_RecursorInfo_3__checkMotive(x_2, x_5, x_6, x_8, x_9); if (lean_obj_tag(x_64) == 0) { -lean_object* x_65; lean_object* x_66; lean_object* x_67; lean_object* x_68; lean_object* x_69; lean_object* x_70; lean_object* x_71; lean_object* x_72; uint8_t x_97; -x_65 = lean_ctor_get(x_64, 0); +lean_object* x_65; lean_object* x_66; +x_65 = lean_ctor_get(x_64, 1); lean_inc(x_65); -x_66 = lean_ctor_get(x_65, 1); -lean_inc(x_66); -x_67 = lean_ctor_get(x_64, 1); +lean_dec(x_64); +lean_inc(x_2); +x_66 = l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim(x_2, x_3, x_4, x_5, x_6, x_8, x_65); +if (lean_obj_tag(x_66) == 0) +{ +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; uint8_t x_101; +x_67 = lean_ctor_get(x_66, 0); lean_inc(x_67); -if (lean_is_exclusive(x_64)) { - lean_ctor_release(x_64, 0); - lean_ctor_release(x_64, 1); - x_68 = x_64; -} else { - lean_dec_ref(x_64); - x_68 = lean_box(0); -} -x_69 = lean_ctor_get(x_65, 0); +x_68 = lean_ctor_get(x_67, 1); +lean_inc(x_68); +x_69 = lean_ctor_get(x_66, 1); lean_inc(x_69); -lean_dec(x_65); -x_70 = lean_ctor_get(x_66, 0); -lean_inc(x_70); -x_71 = lean_ctor_get(x_66, 1); -lean_inc(x_71); -lean_dec(x_66); -x_97 = lean_unbox(x_71); -if (x_97 == 0) -{ -lean_object* x_98; -x_98 = lean_array_get_size(x_6); -x_72 = x_98; -goto block_96; -} -else -{ -lean_object* x_99; lean_object* x_100; lean_object* x_101; -x_99 = lean_array_get_size(x_6); -x_100 = lean_unsigned_to_nat(1u); -x_101 = lean_nat_sub(x_99, x_100); -lean_dec(x_99); -x_72 = x_101; -goto block_96; -} -block_96: -{ -uint8_t x_73; -x_73 = lean_nat_dec_lt(x_70, x_72); -if (x_73 == 0) -{ -lean_object* x_74; -lean_dec(x_68); -lean_inc(x_8); -x_74 = l_Lean_Meta_inferType(x_69, x_8, x_67); -if (lean_obj_tag(x_74) == 0) -{ -lean_object* x_75; lean_object* x_76; lean_object* x_77; lean_object* x_78; lean_object* x_79; lean_object* x_80; lean_object* x_81; uint8_t x_82; lean_object* x_83; -x_75 = lean_ctor_get(x_74, 0); -lean_inc(x_75); -x_76 = lean_ctor_get(x_74, 1); -lean_inc(x_76); -lean_dec(x_74); -x_77 = l_Lean_Expr_getAppNumArgsAux___main(x_75, x_60); -x_78 = l_Lean_Expr_getAppArgs___closed__1; -lean_inc(x_77); -x_79 = lean_mk_array(x_77, x_78); -x_80 = lean_unsigned_to_nat(1u); -x_81 = lean_nat_sub(x_77, x_80); -lean_dec(x_77); -x_82 = lean_unbox(x_71); -lean_dec(x_71); -x_83 = l_Lean_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___spec__1(x_1, x_2, x_4, x_5, x_6, x_61, x_70, x_82, x_72, x_75, x_79, x_81, x_8, x_76); -return x_83; -} -else -{ -uint8_t x_84; -lean_dec(x_72); -lean_dec(x_71); -lean_dec(x_70); -lean_dec(x_61); -lean_dec(x_8); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_2); -lean_dec(x_1); -x_84 = !lean_is_exclusive(x_74); -if (x_84 == 0) -{ -return x_74; -} -else -{ -lean_object* x_85; lean_object* x_86; lean_object* x_87; -x_85 = lean_ctor_get(x_74, 0); -x_86 = lean_ctor_get(x_74, 1); -lean_inc(x_86); -lean_inc(x_85); -lean_dec(x_74); -x_87 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_87, 0, x_85); -lean_ctor_set(x_87, 1, x_86); -return x_87; -} -} -} -else -{ -lean_object* x_88; lean_object* x_89; lean_object* x_90; lean_object* x_91; lean_object* x_92; lean_object* x_93; lean_object* x_94; lean_object* x_95; -lean_dec(x_72); -lean_dec(x_71); -lean_dec(x_70); -lean_dec(x_69); -lean_dec(x_61); -lean_dec(x_8); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_1); -x_88 = l_Lean_Name_toString___closed__1; -x_89 = l_Lean_Name_toStringWithSep___main(x_88, x_2); -x_90 = l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__1; -x_91 = lean_string_append(x_90, x_89); -lean_dec(x_89); -x_92 = l_Lean_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___spec__2___closed__1; -x_93 = lean_string_append(x_91, x_92); -x_94 = lean_alloc_ctor(22, 1, 0); -lean_ctor_set(x_94, 0, x_93); -if (lean_is_scalar(x_68)) { - x_95 = lean_alloc_ctor(1, 2, 0); +if (lean_is_exclusive(x_66)) { + lean_ctor_release(x_66, 0); + lean_ctor_release(x_66, 1); + x_70 = x_66; } else { - x_95 = x_68; - lean_ctor_set_tag(x_95, 1); + lean_dec_ref(x_66); + x_70 = lean_box(0); } -lean_ctor_set(x_95, 0, x_94); -lean_ctor_set(x_95, 1, x_67); -return x_95; -} -} -} -else +x_71 = lean_ctor_get(x_67, 0); +lean_inc(x_71); +lean_dec(x_67); +x_72 = lean_ctor_get(x_68, 0); +lean_inc(x_72); +x_73 = lean_ctor_get(x_68, 1); +lean_inc(x_73); +lean_dec(x_68); +x_101 = lean_unbox(x_73); +if (x_101 == 0) { -uint8_t x_102; -lean_dec(x_61); -lean_dec(x_8); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_2); -lean_dec(x_1); -x_102 = !lean_is_exclusive(x_64); -if (x_102 == 0) -{ -return x_64; +lean_object* x_102; +x_102 = lean_array_get_size(x_6); +x_74 = x_102; +goto block_100; } else { lean_object* x_103; lean_object* x_104; lean_object* x_105; -x_103 = lean_ctor_get(x_64, 0); -x_104 = lean_ctor_get(x_64, 1); -lean_inc(x_104); -lean_inc(x_103); -lean_dec(x_64); -x_105 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_105, 0, x_103); -lean_ctor_set(x_105, 1, x_104); -return x_105; +x_103 = lean_array_get_size(x_6); +x_104 = lean_unsigned_to_nat(1u); +x_105 = lean_nat_sub(x_103, x_104); +lean_dec(x_103); +x_74 = x_105; +goto block_100; +} +block_100: +{ +uint8_t x_75; +x_75 = lean_nat_dec_lt(x_72, x_74); +if (x_75 == 0) +{ +lean_object* x_76; +lean_dec(x_70); +lean_inc(x_8); +x_76 = l_Lean_Meta_inferType(x_71, x_8, x_69); +if (lean_obj_tag(x_76) == 0) +{ +lean_object* x_77; lean_object* x_78; lean_object* x_79; lean_object* x_80; lean_object* x_81; lean_object* x_82; lean_object* x_83; uint8_t x_84; lean_object* x_85; +x_77 = lean_ctor_get(x_76, 0); +lean_inc(x_77); +x_78 = lean_ctor_get(x_76, 1); +lean_inc(x_78); +lean_dec(x_76); +x_79 = l_Lean_Expr_getAppNumArgsAux___main(x_77, x_62); +x_80 = l_Lean_Expr_getAppArgs___closed__1; +lean_inc(x_79); +x_81 = lean_mk_array(x_79, x_80); +x_82 = lean_unsigned_to_nat(1u); +x_83 = lean_nat_sub(x_79, x_82); +lean_dec(x_79); +x_84 = lean_unbox(x_73); +lean_dec(x_73); +x_85 = l_Lean_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___spec__1(x_1, x_2, x_4, x_5, x_6, x_63, x_72, x_84, x_74, x_77, x_81, x_83, x_8, x_78); +return x_85; +} +else +{ +uint8_t x_86; +lean_dec(x_74); +lean_dec(x_73); +lean_dec(x_72); +lean_dec(x_63); +lean_dec(x_8); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_2); +lean_dec(x_1); +x_86 = !lean_is_exclusive(x_76); +if (x_86 == 0) +{ +return x_76; +} +else +{ +lean_object* x_87; lean_object* x_88; lean_object* x_89; +x_87 = lean_ctor_get(x_76, 0); +x_88 = lean_ctor_get(x_76, 1); +lean_inc(x_88); +lean_inc(x_87); +lean_dec(x_76); +x_89 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_89, 0, x_87); +lean_ctor_set(x_89, 1, x_88); +return x_89; +} +} +} +else +{ +lean_object* x_90; lean_object* x_91; lean_object* x_92; lean_object* x_93; lean_object* x_94; lean_object* x_95; lean_object* x_96; lean_object* x_97; lean_object* x_98; lean_object* x_99; +lean_dec(x_74); +lean_dec(x_73); +lean_dec(x_72); +lean_dec(x_71); +lean_dec(x_63); +lean_dec(x_8); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_1); +x_90 = l_Lean_Name_toString___closed__1; +x_91 = l_Lean_Name_toStringWithSep___main(x_90, x_2); +x_92 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_92, 0, x_91); +x_93 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_93, 0, x_92); +x_94 = l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__3; +x_95 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_95, 0, x_94); +lean_ctor_set(x_95, 1, x_93); +x_96 = l_Lean_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___spec__2___closed__3; +x_97 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_97, 0, x_95); +lean_ctor_set(x_97, 1, x_96); +x_98 = lean_alloc_ctor(22, 1, 0); +lean_ctor_set(x_98, 0, x_97); +if (lean_is_scalar(x_70)) { + x_99 = lean_alloc_ctor(1, 2, 0); +} else { + x_99 = x_70; + lean_ctor_set_tag(x_99, 1); +} +lean_ctor_set(x_99, 0, x_98); +lean_ctor_set(x_99, 1, x_69); +return x_99; } } } else { uint8_t x_106; -lean_dec(x_61); +lean_dec(x_63); lean_dec(x_8); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_2); lean_dec(x_1); -x_106 = !lean_is_exclusive(x_62); +x_106 = !lean_is_exclusive(x_66); if (x_106 == 0) { -return x_62; +return x_66; } else { lean_object* x_107; lean_object* x_108; lean_object* x_109; -x_107 = lean_ctor_get(x_62, 0); -x_108 = lean_ctor_get(x_62, 1); +x_107 = lean_ctor_get(x_66, 0); +x_108 = lean_ctor_get(x_66, 1); lean_inc(x_108); lean_inc(x_107); -lean_dec(x_62); +lean_dec(x_66); x_109 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_109, 0, x_107); lean_ctor_set(x_109, 1, x_108); @@ -5673,1714 +6280,1729 @@ return x_109; } } } +else +{ +uint8_t x_110; +lean_dec(x_63); +lean_dec(x_8); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_2); +lean_dec(x_1); +x_110 = !lean_is_exclusive(x_64); +if (x_110 == 0) +{ +return x_64; +} +else +{ +lean_object* x_111; lean_object* x_112; lean_object* x_113; +x_111 = lean_ctor_get(x_64, 0); +x_112 = lean_ctor_get(x_64, 1); +lean_inc(x_112); +lean_inc(x_111); +lean_dec(x_64); +x_113 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_113, 0, x_111); +lean_ctor_set(x_113, 1, x_112); +return x_113; +} +} +} case 2: { -lean_object* x_110; lean_object* x_111; lean_object* x_112; +lean_object* x_114; lean_object* x_115; lean_object* x_116; lean_dec(x_7); -x_110 = lean_unsigned_to_nat(0u); -x_111 = l___private_Lean_Meta_RecursorInfo_4__getNumParams___main(x_4, x_5, x_110); +x_114 = lean_unsigned_to_nat(0u); +x_115 = l___private_Lean_Meta_RecursorInfo_4__getNumParams___main(x_4, x_5, x_114); lean_inc(x_2); -x_112 = l___private_Lean_Meta_RecursorInfo_3__checkMotive(x_2, x_5, x_6, x_8, x_9); -if (lean_obj_tag(x_112) == 0) +x_116 = l___private_Lean_Meta_RecursorInfo_3__checkMotive(x_2, x_5, x_6, x_8, x_9); +if (lean_obj_tag(x_116) == 0) { -lean_object* x_113; lean_object* x_114; -x_113 = lean_ctor_get(x_112, 1); -lean_inc(x_113); -lean_dec(x_112); -lean_inc(x_2); -x_114 = l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim(x_2, x_3, x_4, x_5, x_6, x_8, x_113); -if (lean_obj_tag(x_114) == 0) -{ -lean_object* x_115; lean_object* x_116; lean_object* x_117; lean_object* x_118; lean_object* x_119; lean_object* x_120; lean_object* x_121; lean_object* x_122; uint8_t x_147; -x_115 = lean_ctor_get(x_114, 0); -lean_inc(x_115); -x_116 = lean_ctor_get(x_115, 1); -lean_inc(x_116); -x_117 = lean_ctor_get(x_114, 1); +lean_object* x_117; lean_object* x_118; +x_117 = lean_ctor_get(x_116, 1); 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); -lean_dec(x_115); -x_120 = lean_ctor_get(x_116, 0); -lean_inc(x_120); -x_121 = lean_ctor_get(x_116, 1); -lean_inc(x_121); lean_dec(x_116); -x_147 = lean_unbox(x_121); -if (x_147 == 0) +lean_inc(x_2); +x_118 = l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim(x_2, x_3, x_4, x_5, x_6, x_8, x_117); +if (lean_obj_tag(x_118) == 0) { -lean_object* x_148; -x_148 = lean_array_get_size(x_6); -x_122 = x_148; -goto block_146; +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; uint8_t x_153; +x_119 = lean_ctor_get(x_118, 0); +lean_inc(x_119); +x_120 = lean_ctor_get(x_119, 1); +lean_inc(x_120); +x_121 = lean_ctor_get(x_118, 1); +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); } -else -{ -lean_object* x_149; lean_object* x_150; lean_object* x_151; -x_149 = lean_array_get_size(x_6); -x_150 = lean_unsigned_to_nat(1u); -x_151 = lean_nat_sub(x_149, x_150); -lean_dec(x_149); -x_122 = x_151; -goto block_146; -} -block_146: -{ -uint8_t x_123; -x_123 = lean_nat_dec_lt(x_120, x_122); -if (x_123 == 0) -{ -lean_object* x_124; -lean_dec(x_118); -lean_inc(x_8); -x_124 = l_Lean_Meta_inferType(x_119, x_8, x_117); -if (lean_obj_tag(x_124) == 0) -{ -lean_object* x_125; lean_object* x_126; lean_object* x_127; lean_object* x_128; lean_object* x_129; lean_object* x_130; lean_object* x_131; uint8_t x_132; lean_object* x_133; -x_125 = lean_ctor_get(x_124, 0); +x_123 = lean_ctor_get(x_119, 0); +lean_inc(x_123); +lean_dec(x_119); +x_124 = lean_ctor_get(x_120, 0); +lean_inc(x_124); +x_125 = lean_ctor_get(x_120, 1); lean_inc(x_125); -x_126 = lean_ctor_get(x_124, 1); -lean_inc(x_126); -lean_dec(x_124); -x_127 = l_Lean_Expr_getAppNumArgsAux___main(x_125, x_110); -x_128 = l_Lean_Expr_getAppArgs___closed__1; -lean_inc(x_127); -x_129 = lean_mk_array(x_127, x_128); -x_130 = lean_unsigned_to_nat(1u); -x_131 = lean_nat_sub(x_127, x_130); -lean_dec(x_127); -x_132 = lean_unbox(x_121); -lean_dec(x_121); -x_133 = l_Lean_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___spec__1(x_1, x_2, x_4, x_5, x_6, x_111, x_120, x_132, x_122, x_125, x_129, x_131, x_8, x_126); -return x_133; -} -else -{ -uint8_t x_134; -lean_dec(x_122); -lean_dec(x_121); lean_dec(x_120); -lean_dec(x_111); -lean_dec(x_8); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_2); -lean_dec(x_1); -x_134 = !lean_is_exclusive(x_124); -if (x_134 == 0) +x_153 = lean_unbox(x_125); +if (x_153 == 0) { -return x_124; +lean_object* x_154; +x_154 = lean_array_get_size(x_6); +x_126 = x_154; +goto block_152; } else { -lean_object* x_135; lean_object* x_136; lean_object* x_137; -x_135 = lean_ctor_get(x_124, 0); -x_136 = lean_ctor_get(x_124, 1); -lean_inc(x_136); -lean_inc(x_135); -lean_dec(x_124); -x_137 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_137, 0, x_135); -lean_ctor_set(x_137, 1, x_136); +lean_object* x_155; lean_object* x_156; lean_object* x_157; +x_155 = lean_array_get_size(x_6); +x_156 = lean_unsigned_to_nat(1u); +x_157 = lean_nat_sub(x_155, x_156); +lean_dec(x_155); +x_126 = x_157; +goto block_152; +} +block_152: +{ +uint8_t x_127; +x_127 = lean_nat_dec_lt(x_124, x_126); +if (x_127 == 0) +{ +lean_object* x_128; +lean_dec(x_122); +lean_inc(x_8); +x_128 = l_Lean_Meta_inferType(x_123, x_8, x_121); +if (lean_obj_tag(x_128) == 0) +{ +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; uint8_t x_136; lean_object* x_137; +x_129 = lean_ctor_get(x_128, 0); +lean_inc(x_129); +x_130 = lean_ctor_get(x_128, 1); +lean_inc(x_130); +lean_dec(x_128); +x_131 = l_Lean_Expr_getAppNumArgsAux___main(x_129, x_114); +x_132 = l_Lean_Expr_getAppArgs___closed__1; +lean_inc(x_131); +x_133 = lean_mk_array(x_131, x_132); +x_134 = lean_unsigned_to_nat(1u); +x_135 = lean_nat_sub(x_131, x_134); +lean_dec(x_131); +x_136 = lean_unbox(x_125); +lean_dec(x_125); +x_137 = l_Lean_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___spec__1(x_1, x_2, x_4, x_5, x_6, x_115, x_124, x_136, x_126, x_129, x_133, x_135, x_8, x_130); return x_137; } +else +{ +uint8_t x_138; +lean_dec(x_126); +lean_dec(x_125); +lean_dec(x_124); +lean_dec(x_115); +lean_dec(x_8); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_2); +lean_dec(x_1); +x_138 = !lean_is_exclusive(x_128); +if (x_138 == 0) +{ +return x_128; +} +else +{ +lean_object* x_139; lean_object* x_140; lean_object* x_141; +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_128); +x_141 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_141, 0, x_139); +lean_ctor_set(x_141, 1, x_140); +return x_141; +} } } else { -lean_object* x_138; lean_object* x_139; lean_object* x_140; lean_object* x_141; lean_object* x_142; lean_object* x_143; lean_object* x_144; lean_object* x_145; -lean_dec(x_122); -lean_dec(x_121); -lean_dec(x_120); -lean_dec(x_119); -lean_dec(x_111); +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_dec(x_126); +lean_dec(x_125); +lean_dec(x_124); +lean_dec(x_123); +lean_dec(x_115); lean_dec(x_8); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_1); -x_138 = l_Lean_Name_toString___closed__1; -x_139 = l_Lean_Name_toStringWithSep___main(x_138, x_2); -x_140 = l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__1; -x_141 = lean_string_append(x_140, x_139); -lean_dec(x_139); -x_142 = l_Lean_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___spec__2___closed__1; -x_143 = lean_string_append(x_141, x_142); -x_144 = lean_alloc_ctor(22, 1, 0); +x_142 = l_Lean_Name_toString___closed__1; +x_143 = l_Lean_Name_toStringWithSep___main(x_142, x_2); +x_144 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_144, 0, x_143); -if (lean_is_scalar(x_118)) { - x_145 = lean_alloc_ctor(1, 2, 0); -} else { - x_145 = x_118; - lean_ctor_set_tag(x_145, 1); -} +x_145 = lean_alloc_ctor(0, 1, 0); lean_ctor_set(x_145, 0, x_144); -lean_ctor_set(x_145, 1, x_117); -return x_145; +x_146 = l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__3; +x_147 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_147, 0, x_146); +lean_ctor_set(x_147, 1, x_145); +x_148 = l_Lean_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___spec__2___closed__3; +x_149 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_149, 0, x_147); +lean_ctor_set(x_149, 1, x_148); +x_150 = lean_alloc_ctor(22, 1, 0); +lean_ctor_set(x_150, 0, x_149); +if (lean_is_scalar(x_122)) { + x_151 = lean_alloc_ctor(1, 2, 0); +} else { + x_151 = x_122; + lean_ctor_set_tag(x_151, 1); +} +lean_ctor_set(x_151, 0, x_150); +lean_ctor_set(x_151, 1, x_121); +return x_151; } } } else { -uint8_t x_152; -lean_dec(x_111); +uint8_t x_158; +lean_dec(x_115); lean_dec(x_8); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_2); lean_dec(x_1); -x_152 = !lean_is_exclusive(x_114); -if (x_152 == 0) +x_158 = !lean_is_exclusive(x_118); +if (x_158 == 0) { -return x_114; +return x_118; } else { -lean_object* x_153; lean_object* x_154; lean_object* x_155; -x_153 = lean_ctor_get(x_114, 0); -x_154 = lean_ctor_get(x_114, 1); -lean_inc(x_154); -lean_inc(x_153); -lean_dec(x_114); -x_155 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_155, 0, x_153); -lean_ctor_set(x_155, 1, x_154); -return x_155; +lean_object* x_159; lean_object* x_160; lean_object* x_161; +x_159 = lean_ctor_get(x_118, 0); +x_160 = lean_ctor_get(x_118, 1); +lean_inc(x_160); +lean_inc(x_159); +lean_dec(x_118); +x_161 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_161, 0, x_159); +lean_ctor_set(x_161, 1, x_160); +return x_161; } } } else { -uint8_t x_156; -lean_dec(x_111); +uint8_t x_162; +lean_dec(x_115); lean_dec(x_8); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_2); lean_dec(x_1); -x_156 = !lean_is_exclusive(x_112); -if (x_156 == 0) +x_162 = !lean_is_exclusive(x_116); +if (x_162 == 0) { -return x_112; +return x_116; } else { -lean_object* x_157; lean_object* x_158; lean_object* x_159; -x_157 = lean_ctor_get(x_112, 0); -x_158 = lean_ctor_get(x_112, 1); -lean_inc(x_158); -lean_inc(x_157); -lean_dec(x_112); -x_159 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_159, 0, x_157); -lean_ctor_set(x_159, 1, x_158); -return x_159; +lean_object* x_163; lean_object* x_164; lean_object* x_165; +x_163 = lean_ctor_get(x_116, 0); +x_164 = lean_ctor_get(x_116, 1); +lean_inc(x_164); +lean_inc(x_163); +lean_dec(x_116); +x_165 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_165, 0, x_163); +lean_ctor_set(x_165, 1, x_164); +return x_165; } } } case 3: { -lean_object* x_160; lean_object* x_161; lean_object* x_162; +lean_object* x_166; lean_object* x_167; lean_object* x_168; lean_dec(x_7); -x_160 = lean_unsigned_to_nat(0u); -x_161 = l___private_Lean_Meta_RecursorInfo_4__getNumParams___main(x_4, x_5, x_160); +x_166 = lean_unsigned_to_nat(0u); +x_167 = l___private_Lean_Meta_RecursorInfo_4__getNumParams___main(x_4, x_5, x_166); lean_inc(x_2); -x_162 = l___private_Lean_Meta_RecursorInfo_3__checkMotive(x_2, x_5, x_6, x_8, x_9); -if (lean_obj_tag(x_162) == 0) +x_168 = l___private_Lean_Meta_RecursorInfo_3__checkMotive(x_2, x_5, x_6, x_8, x_9); +if (lean_obj_tag(x_168) == 0) { -lean_object* x_163; lean_object* x_164; -x_163 = lean_ctor_get(x_162, 1); -lean_inc(x_163); -lean_dec(x_162); -lean_inc(x_2); -x_164 = l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim(x_2, x_3, x_4, x_5, x_6, x_8, x_163); -if (lean_obj_tag(x_164) == 0) -{ -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; uint8_t x_197; -x_165 = lean_ctor_get(x_164, 0); -lean_inc(x_165); -x_166 = lean_ctor_get(x_165, 1); -lean_inc(x_166); -x_167 = lean_ctor_get(x_164, 1); -lean_inc(x_167); -if (lean_is_exclusive(x_164)) { - lean_ctor_release(x_164, 0); - lean_ctor_release(x_164, 1); - x_168 = x_164; -} else { - lean_dec_ref(x_164); - x_168 = lean_box(0); -} -x_169 = lean_ctor_get(x_165, 0); +lean_object* x_169; lean_object* x_170; +x_169 = lean_ctor_get(x_168, 1); lean_inc(x_169); -lean_dec(x_165); -x_170 = lean_ctor_get(x_166, 0); -lean_inc(x_170); -x_171 = lean_ctor_get(x_166, 1); -lean_inc(x_171); -lean_dec(x_166); -x_197 = lean_unbox(x_171); -if (x_197 == 0) -{ -lean_object* x_198; -x_198 = lean_array_get_size(x_6); -x_172 = x_198; -goto block_196; -} -else -{ -lean_object* x_199; lean_object* x_200; lean_object* x_201; -x_199 = lean_array_get_size(x_6); -x_200 = lean_unsigned_to_nat(1u); -x_201 = lean_nat_sub(x_199, x_200); -lean_dec(x_199); -x_172 = x_201; -goto block_196; -} -block_196: -{ -uint8_t x_173; -x_173 = lean_nat_dec_lt(x_170, x_172); -if (x_173 == 0) -{ -lean_object* x_174; lean_dec(x_168); -lean_inc(x_8); -x_174 = l_Lean_Meta_inferType(x_169, x_8, x_167); -if (lean_obj_tag(x_174) == 0) +lean_inc(x_2); +x_170 = l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim(x_2, x_3, x_4, x_5, x_6, x_8, x_169); +if (lean_obj_tag(x_170) == 0) { -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; uint8_t x_182; lean_object* x_183; -x_175 = lean_ctor_get(x_174, 0); -lean_inc(x_175); -x_176 = lean_ctor_get(x_174, 1); -lean_inc(x_176); -lean_dec(x_174); -x_177 = l_Lean_Expr_getAppNumArgsAux___main(x_175, x_160); -x_178 = l_Lean_Expr_getAppArgs___closed__1; -lean_inc(x_177); -x_179 = lean_mk_array(x_177, x_178); -x_180 = lean_unsigned_to_nat(1u); -x_181 = lean_nat_sub(x_177, x_180); -lean_dec(x_177); -x_182 = lean_unbox(x_171); -lean_dec(x_171); -x_183 = l_Lean_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___spec__1(x_1, x_2, x_4, x_5, x_6, x_161, x_170, x_182, x_172, x_175, x_179, x_181, x_8, x_176); -return x_183; -} -else -{ -uint8_t x_184; -lean_dec(x_172); -lean_dec(x_171); -lean_dec(x_170); -lean_dec(x_161); -lean_dec(x_8); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_2); -lean_dec(x_1); -x_184 = !lean_is_exclusive(x_174); -if (x_184 == 0) -{ -return x_174; -} -else -{ -lean_object* x_185; lean_object* x_186; lean_object* x_187; -x_185 = lean_ctor_get(x_174, 0); -x_186 = lean_ctor_get(x_174, 1); -lean_inc(x_186); -lean_inc(x_185); -lean_dec(x_174); -x_187 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_187, 0, x_185); -lean_ctor_set(x_187, 1, x_186); -return x_187; -} -} -} -else -{ -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_dec(x_172); -lean_dec(x_171); -lean_dec(x_170); -lean_dec(x_169); -lean_dec(x_161); -lean_dec(x_8); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_1); -x_188 = l_Lean_Name_toString___closed__1; -x_189 = l_Lean_Name_toStringWithSep___main(x_188, x_2); -x_190 = l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__1; -x_191 = lean_string_append(x_190, x_189); -lean_dec(x_189); -x_192 = l_Lean_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___spec__2___closed__1; -x_193 = lean_string_append(x_191, x_192); -x_194 = lean_alloc_ctor(22, 1, 0); -lean_ctor_set(x_194, 0, x_193); -if (lean_is_scalar(x_168)) { - x_195 = lean_alloc_ctor(1, 2, 0); +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; uint8_t x_205; +x_171 = lean_ctor_get(x_170, 0); +lean_inc(x_171); +x_172 = lean_ctor_get(x_171, 1); +lean_inc(x_172); +x_173 = lean_ctor_get(x_170, 1); +lean_inc(x_173); +if (lean_is_exclusive(x_170)) { + lean_ctor_release(x_170, 0); + lean_ctor_release(x_170, 1); + x_174 = x_170; } else { - x_195 = x_168; - lean_ctor_set_tag(x_195, 1); + lean_dec_ref(x_170); + x_174 = lean_box(0); } -lean_ctor_set(x_195, 0, x_194); -lean_ctor_set(x_195, 1, x_167); -return x_195; -} -} -} -else +x_175 = lean_ctor_get(x_171, 0); +lean_inc(x_175); +lean_dec(x_171); +x_176 = lean_ctor_get(x_172, 0); +lean_inc(x_176); +x_177 = lean_ctor_get(x_172, 1); +lean_inc(x_177); +lean_dec(x_172); +x_205 = lean_unbox(x_177); +if (x_205 == 0) { -uint8_t x_202; -lean_dec(x_161); -lean_dec(x_8); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_2); -lean_dec(x_1); -x_202 = !lean_is_exclusive(x_164); -if (x_202 == 0) -{ -return x_164; -} -else -{ -lean_object* x_203; lean_object* x_204; lean_object* x_205; -x_203 = lean_ctor_get(x_164, 0); -x_204 = lean_ctor_get(x_164, 1); -lean_inc(x_204); -lean_inc(x_203); -lean_dec(x_164); -x_205 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_205, 0, x_203); -lean_ctor_set(x_205, 1, x_204); -return x_205; -} -} -} -else -{ -uint8_t x_206; -lean_dec(x_161); -lean_dec(x_8); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_2); -lean_dec(x_1); -x_206 = !lean_is_exclusive(x_162); -if (x_206 == 0) -{ -return x_162; +lean_object* x_206; +x_206 = lean_array_get_size(x_6); +x_178 = x_206; +goto block_204; } else { lean_object* x_207; lean_object* x_208; lean_object* x_209; -x_207 = lean_ctor_get(x_162, 0); -x_208 = lean_ctor_get(x_162, 1); -lean_inc(x_208); -lean_inc(x_207); -lean_dec(x_162); -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; +x_207 = lean_array_get_size(x_6); +x_208 = lean_unsigned_to_nat(1u); +x_209 = lean_nat_sub(x_207, x_208); +lean_dec(x_207); +x_178 = x_209; +goto block_204; +} +block_204: +{ +uint8_t x_179; +x_179 = lean_nat_dec_lt(x_176, x_178); +if (x_179 == 0) +{ +lean_object* x_180; +lean_dec(x_174); +lean_inc(x_8); +x_180 = l_Lean_Meta_inferType(x_175, x_8, x_173); +if (lean_obj_tag(x_180) == 0) +{ +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; uint8_t x_188; lean_object* x_189; +x_181 = lean_ctor_get(x_180, 0); +lean_inc(x_181); +x_182 = lean_ctor_get(x_180, 1); +lean_inc(x_182); +lean_dec(x_180); +x_183 = l_Lean_Expr_getAppNumArgsAux___main(x_181, x_166); +x_184 = l_Lean_Expr_getAppArgs___closed__1; +lean_inc(x_183); +x_185 = lean_mk_array(x_183, x_184); +x_186 = lean_unsigned_to_nat(1u); +x_187 = lean_nat_sub(x_183, x_186); +lean_dec(x_183); +x_188 = lean_unbox(x_177); +lean_dec(x_177); +x_189 = l_Lean_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___spec__1(x_1, x_2, x_4, x_5, x_6, x_167, x_176, x_188, x_178, x_181, x_185, x_187, x_8, x_182); +return x_189; +} +else +{ +uint8_t x_190; +lean_dec(x_178); +lean_dec(x_177); +lean_dec(x_176); +lean_dec(x_167); +lean_dec(x_8); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_2); +lean_dec(x_1); +x_190 = !lean_is_exclusive(x_180); +if (x_190 == 0) +{ +return x_180; +} +else +{ +lean_object* x_191; lean_object* x_192; lean_object* x_193; +x_191 = lean_ctor_get(x_180, 0); +x_192 = lean_ctor_get(x_180, 1); +lean_inc(x_192); +lean_inc(x_191); +lean_dec(x_180); +x_193 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_193, 0, x_191); +lean_ctor_set(x_193, 1, x_192); +return x_193; +} +} +} +else +{ +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_dec(x_178); +lean_dec(x_177); +lean_dec(x_176); +lean_dec(x_175); +lean_dec(x_167); +lean_dec(x_8); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_1); +x_194 = l_Lean_Name_toString___closed__1; +x_195 = l_Lean_Name_toStringWithSep___main(x_194, x_2); +x_196 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_196, 0, x_195); +x_197 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_197, 0, x_196); +x_198 = l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__3; +x_199 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_199, 0, x_198); +lean_ctor_set(x_199, 1, x_197); +x_200 = l_Lean_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___spec__2___closed__3; +x_201 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_201, 0, x_199); +lean_ctor_set(x_201, 1, x_200); +x_202 = lean_alloc_ctor(22, 1, 0); +lean_ctor_set(x_202, 0, x_201); +if (lean_is_scalar(x_174)) { + x_203 = lean_alloc_ctor(1, 2, 0); +} else { + x_203 = x_174; + lean_ctor_set_tag(x_203, 1); +} +lean_ctor_set(x_203, 0, x_202); +lean_ctor_set(x_203, 1, x_173); +return x_203; +} +} +} +else +{ +uint8_t x_210; +lean_dec(x_167); +lean_dec(x_8); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_2); +lean_dec(x_1); +x_210 = !lean_is_exclusive(x_170); +if (x_210 == 0) +{ +return x_170; +} +else +{ +lean_object* x_211; lean_object* x_212; lean_object* x_213; +x_211 = lean_ctor_get(x_170, 0); +x_212 = lean_ctor_get(x_170, 1); +lean_inc(x_212); +lean_inc(x_211); +lean_dec(x_170); +x_213 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_213, 0, x_211); +lean_ctor_set(x_213, 1, x_212); +return x_213; +} +} +} +else +{ +uint8_t x_214; +lean_dec(x_167); +lean_dec(x_8); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_2); +lean_dec(x_1); +x_214 = !lean_is_exclusive(x_168); +if (x_214 == 0) +{ +return x_168; +} +else +{ +lean_object* x_215; lean_object* x_216; lean_object* x_217; +x_215 = lean_ctor_get(x_168, 0); +x_216 = lean_ctor_get(x_168, 1); +lean_inc(x_216); +lean_inc(x_215); +lean_dec(x_168); +x_217 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_217, 0, x_215); +lean_ctor_set(x_217, 1, x_216); +return x_217; } } } case 4: { -lean_object* x_210; lean_object* x_211; lean_object* x_212; +lean_object* x_218; lean_object* x_219; lean_object* x_220; lean_dec(x_7); -x_210 = lean_unsigned_to_nat(0u); -x_211 = l___private_Lean_Meta_RecursorInfo_4__getNumParams___main(x_4, x_5, x_210); +x_218 = lean_unsigned_to_nat(0u); +x_219 = l___private_Lean_Meta_RecursorInfo_4__getNumParams___main(x_4, x_5, x_218); lean_inc(x_2); -x_212 = l___private_Lean_Meta_RecursorInfo_3__checkMotive(x_2, x_5, x_6, x_8, x_9); -if (lean_obj_tag(x_212) == 0) +x_220 = l___private_Lean_Meta_RecursorInfo_3__checkMotive(x_2, x_5, x_6, x_8, x_9); +if (lean_obj_tag(x_220) == 0) { -lean_object* x_213; lean_object* x_214; -x_213 = lean_ctor_get(x_212, 1); -lean_inc(x_213); -lean_dec(x_212); -lean_inc(x_2); -x_214 = l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim(x_2, x_3, x_4, x_5, x_6, x_8, x_213); -if (lean_obj_tag(x_214) == 0) -{ -lean_object* x_215; lean_object* x_216; lean_object* x_217; lean_object* x_218; lean_object* x_219; lean_object* x_220; lean_object* x_221; lean_object* x_222; uint8_t x_247; -x_215 = lean_ctor_get(x_214, 0); -lean_inc(x_215); -x_216 = lean_ctor_get(x_215, 1); -lean_inc(x_216); -x_217 = lean_ctor_get(x_214, 1); -lean_inc(x_217); -if (lean_is_exclusive(x_214)) { - lean_ctor_release(x_214, 0); - lean_ctor_release(x_214, 1); - x_218 = x_214; -} else { - lean_dec_ref(x_214); - x_218 = lean_box(0); -} -x_219 = lean_ctor_get(x_215, 0); -lean_inc(x_219); -lean_dec(x_215); -x_220 = lean_ctor_get(x_216, 0); -lean_inc(x_220); -x_221 = lean_ctor_get(x_216, 1); +lean_object* x_221; lean_object* x_222; +x_221 = lean_ctor_get(x_220, 1); lean_inc(x_221); -lean_dec(x_216); -x_247 = lean_unbox(x_221); -if (x_247 == 0) -{ -lean_object* x_248; -x_248 = lean_array_get_size(x_6); -x_222 = x_248; -goto block_246; -} -else -{ -lean_object* x_249; lean_object* x_250; lean_object* x_251; -x_249 = lean_array_get_size(x_6); -x_250 = lean_unsigned_to_nat(1u); -x_251 = lean_nat_sub(x_249, x_250); -lean_dec(x_249); -x_222 = x_251; -goto block_246; -} -block_246: -{ -uint8_t x_223; -x_223 = lean_nat_dec_lt(x_220, x_222); -if (x_223 == 0) -{ -lean_object* x_224; -lean_dec(x_218); -lean_inc(x_8); -x_224 = l_Lean_Meta_inferType(x_219, x_8, x_217); -if (lean_obj_tag(x_224) == 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; lean_object* x_231; uint8_t x_232; lean_object* x_233; -x_225 = lean_ctor_get(x_224, 0); -lean_inc(x_225); -x_226 = lean_ctor_get(x_224, 1); -lean_inc(x_226); -lean_dec(x_224); -x_227 = l_Lean_Expr_getAppNumArgsAux___main(x_225, x_210); -x_228 = l_Lean_Expr_getAppArgs___closed__1; -lean_inc(x_227); -x_229 = lean_mk_array(x_227, x_228); -x_230 = lean_unsigned_to_nat(1u); -x_231 = lean_nat_sub(x_227, x_230); -lean_dec(x_227); -x_232 = lean_unbox(x_221); -lean_dec(x_221); -x_233 = l_Lean_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___spec__1(x_1, x_2, x_4, x_5, x_6, x_211, x_220, x_232, x_222, x_225, x_229, x_231, x_8, x_226); -return x_233; -} -else -{ -uint8_t x_234; -lean_dec(x_222); -lean_dec(x_221); lean_dec(x_220); -lean_dec(x_211); +lean_inc(x_2); +x_222 = l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim(x_2, x_3, x_4, x_5, x_6, x_8, x_221); +if (lean_obj_tag(x_222) == 0) +{ +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; uint8_t x_257; +x_223 = lean_ctor_get(x_222, 0); +lean_inc(x_223); +x_224 = lean_ctor_get(x_223, 1); +lean_inc(x_224); +x_225 = lean_ctor_get(x_222, 1); +lean_inc(x_225); +if (lean_is_exclusive(x_222)) { + lean_ctor_release(x_222, 0); + lean_ctor_release(x_222, 1); + x_226 = x_222; +} else { + lean_dec_ref(x_222); + x_226 = lean_box(0); +} +x_227 = lean_ctor_get(x_223, 0); +lean_inc(x_227); +lean_dec(x_223); +x_228 = lean_ctor_get(x_224, 0); +lean_inc(x_228); +x_229 = lean_ctor_get(x_224, 1); +lean_inc(x_229); +lean_dec(x_224); +x_257 = lean_unbox(x_229); +if (x_257 == 0) +{ +lean_object* x_258; +x_258 = lean_array_get_size(x_6); +x_230 = x_258; +goto block_256; +} +else +{ +lean_object* x_259; lean_object* x_260; lean_object* x_261; +x_259 = lean_array_get_size(x_6); +x_260 = lean_unsigned_to_nat(1u); +x_261 = lean_nat_sub(x_259, x_260); +lean_dec(x_259); +x_230 = x_261; +goto block_256; +} +block_256: +{ +uint8_t x_231; +x_231 = lean_nat_dec_lt(x_228, x_230); +if (x_231 == 0) +{ +lean_object* x_232; +lean_dec(x_226); +lean_inc(x_8); +x_232 = l_Lean_Meta_inferType(x_227, x_8, x_225); +if (lean_obj_tag(x_232) == 0) +{ +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; uint8_t x_240; lean_object* x_241; +x_233 = lean_ctor_get(x_232, 0); +lean_inc(x_233); +x_234 = lean_ctor_get(x_232, 1); +lean_inc(x_234); +lean_dec(x_232); +x_235 = l_Lean_Expr_getAppNumArgsAux___main(x_233, x_218); +x_236 = l_Lean_Expr_getAppArgs___closed__1; +lean_inc(x_235); +x_237 = lean_mk_array(x_235, x_236); +x_238 = lean_unsigned_to_nat(1u); +x_239 = lean_nat_sub(x_235, x_238); +lean_dec(x_235); +x_240 = lean_unbox(x_229); +lean_dec(x_229); +x_241 = l_Lean_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___spec__1(x_1, x_2, x_4, x_5, x_6, x_219, x_228, x_240, x_230, x_233, x_237, x_239, x_8, x_234); +return x_241; +} +else +{ +uint8_t x_242; +lean_dec(x_230); +lean_dec(x_229); +lean_dec(x_228); +lean_dec(x_219); lean_dec(x_8); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_2); lean_dec(x_1); -x_234 = !lean_is_exclusive(x_224); -if (x_234 == 0) +x_242 = !lean_is_exclusive(x_232); +if (x_242 == 0) { -return x_224; +return x_232; } else { -lean_object* x_235; lean_object* x_236; lean_object* x_237; -x_235 = lean_ctor_get(x_224, 0); -x_236 = lean_ctor_get(x_224, 1); -lean_inc(x_236); -lean_inc(x_235); -lean_dec(x_224); -x_237 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_237, 0, x_235); -lean_ctor_set(x_237, 1, x_236); -return x_237; -} -} -} -else -{ -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_dec(x_222); -lean_dec(x_221); -lean_dec(x_220); -lean_dec(x_219); -lean_dec(x_211); -lean_dec(x_8); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_1); -x_238 = l_Lean_Name_toString___closed__1; -x_239 = l_Lean_Name_toStringWithSep___main(x_238, x_2); -x_240 = l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__1; -x_241 = lean_string_append(x_240, x_239); -lean_dec(x_239); -x_242 = l_Lean_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___spec__2___closed__1; -x_243 = lean_string_append(x_241, x_242); -x_244 = lean_alloc_ctor(22, 1, 0); -lean_ctor_set(x_244, 0, x_243); -if (lean_is_scalar(x_218)) { - x_245 = lean_alloc_ctor(1, 2, 0); -} else { - x_245 = x_218; - lean_ctor_set_tag(x_245, 1); -} -lean_ctor_set(x_245, 0, x_244); -lean_ctor_set(x_245, 1, x_217); +lean_object* x_243; lean_object* x_244; lean_object* x_245; +x_243 = lean_ctor_get(x_232, 0); +x_244 = lean_ctor_get(x_232, 1); +lean_inc(x_244); +lean_inc(x_243); +lean_dec(x_232); +x_245 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_245, 0, x_243); +lean_ctor_set(x_245, 1, x_244); return x_245; } } } else { -uint8_t x_252; -lean_dec(x_211); +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_dec(x_230); +lean_dec(x_229); +lean_dec(x_228); +lean_dec(x_227); +lean_dec(x_219); lean_dec(x_8); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); -lean_dec(x_2); lean_dec(x_1); -x_252 = !lean_is_exclusive(x_214); -if (x_252 == 0) -{ -return x_214; +x_246 = l_Lean_Name_toString___closed__1; +x_247 = l_Lean_Name_toStringWithSep___main(x_246, x_2); +x_248 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_248, 0, x_247); +x_249 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_249, 0, x_248); +x_250 = l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__3; +x_251 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_251, 0, x_250); +lean_ctor_set(x_251, 1, x_249); +x_252 = l_Lean_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___spec__2___closed__3; +x_253 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_253, 0, x_251); +lean_ctor_set(x_253, 1, x_252); +x_254 = lean_alloc_ctor(22, 1, 0); +lean_ctor_set(x_254, 0, x_253); +if (lean_is_scalar(x_226)) { + x_255 = lean_alloc_ctor(1, 2, 0); +} else { + x_255 = x_226; + lean_ctor_set_tag(x_255, 1); } -else -{ -lean_object* x_253; lean_object* x_254; lean_object* x_255; -x_253 = lean_ctor_get(x_214, 0); -x_254 = lean_ctor_get(x_214, 1); -lean_inc(x_254); -lean_inc(x_253); -lean_dec(x_214); -x_255 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_255, 0, x_253); -lean_ctor_set(x_255, 1, x_254); +lean_ctor_set(x_255, 0, x_254); +lean_ctor_set(x_255, 1, x_225); return x_255; } } } else { -uint8_t x_256; -lean_dec(x_211); +uint8_t x_262; +lean_dec(x_219); lean_dec(x_8); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_2); lean_dec(x_1); -x_256 = !lean_is_exclusive(x_212); -if (x_256 == 0) +x_262 = !lean_is_exclusive(x_222); +if (x_262 == 0) { -return x_212; +return x_222; } else { -lean_object* x_257; lean_object* x_258; lean_object* x_259; -x_257 = lean_ctor_get(x_212, 0); -x_258 = lean_ctor_get(x_212, 1); -lean_inc(x_258); -lean_inc(x_257); -lean_dec(x_212); -x_259 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_259, 0, x_257); -lean_ctor_set(x_259, 1, x_258); -return x_259; +lean_object* x_263; lean_object* x_264; lean_object* x_265; +x_263 = lean_ctor_get(x_222, 0); +x_264 = lean_ctor_get(x_222, 1); +lean_inc(x_264); +lean_inc(x_263); +lean_dec(x_222); +x_265 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_265, 0, x_263); +lean_ctor_set(x_265, 1, x_264); +return x_265; +} +} +} +else +{ +uint8_t x_266; +lean_dec(x_219); +lean_dec(x_8); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_2); +lean_dec(x_1); +x_266 = !lean_is_exclusive(x_220); +if (x_266 == 0) +{ +return x_220; +} +else +{ +lean_object* x_267; lean_object* x_268; lean_object* x_269; +x_267 = lean_ctor_get(x_220, 0); +x_268 = lean_ctor_get(x_220, 1); +lean_inc(x_268); +lean_inc(x_267); +lean_dec(x_220); +x_269 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_269, 0, x_267); +lean_ctor_set(x_269, 1, x_268); +return x_269; } } } case 5: { -lean_object* x_260; lean_object* x_261; lean_object* x_262; lean_object* x_263; lean_object* x_264; -x_260 = lean_ctor_get(x_5, 0); -lean_inc(x_260); -x_261 = lean_ctor_get(x_5, 1); -lean_inc(x_261); +lean_object* x_270; lean_object* x_271; lean_object* x_272; lean_object* x_273; lean_object* x_274; +x_270 = lean_ctor_get(x_5, 0); +lean_inc(x_270); +x_271 = lean_ctor_get(x_5, 1); +lean_inc(x_271); lean_dec(x_5); -x_262 = lean_array_set(x_6, x_7, x_261); -x_263 = lean_unsigned_to_nat(1u); -x_264 = lean_nat_sub(x_7, x_263); +x_272 = lean_array_set(x_6, x_7, x_271); +x_273 = lean_unsigned_to_nat(1u); +x_274 = lean_nat_sub(x_7, x_273); lean_dec(x_7); -x_5 = x_260; -x_6 = x_262; -x_7 = x_264; +x_5 = x_270; +x_6 = x_272; +x_7 = x_274; goto _start; } case 6: { -lean_object* x_266; lean_object* x_267; lean_object* x_268; +lean_object* x_276; lean_object* x_277; lean_object* x_278; lean_dec(x_7); -x_266 = lean_unsigned_to_nat(0u); -x_267 = l___private_Lean_Meta_RecursorInfo_4__getNumParams___main(x_4, x_5, x_266); +x_276 = lean_unsigned_to_nat(0u); +x_277 = l___private_Lean_Meta_RecursorInfo_4__getNumParams___main(x_4, x_5, x_276); lean_inc(x_2); -x_268 = l___private_Lean_Meta_RecursorInfo_3__checkMotive(x_2, x_5, x_6, x_8, x_9); -if (lean_obj_tag(x_268) == 0) +x_278 = l___private_Lean_Meta_RecursorInfo_3__checkMotive(x_2, x_5, x_6, x_8, x_9); +if (lean_obj_tag(x_278) == 0) { -lean_object* x_269; lean_object* x_270; -x_269 = lean_ctor_get(x_268, 1); -lean_inc(x_269); -lean_dec(x_268); +lean_object* x_279; lean_object* x_280; +x_279 = lean_ctor_get(x_278, 1); +lean_inc(x_279); +lean_dec(x_278); lean_inc(x_2); -x_270 = l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim(x_2, x_3, x_4, x_5, x_6, x_8, x_269); -if (lean_obj_tag(x_270) == 0) -{ -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; uint8_t x_303; -x_271 = lean_ctor_get(x_270, 0); -lean_inc(x_271); -x_272 = lean_ctor_get(x_271, 1); -lean_inc(x_272); -x_273 = lean_ctor_get(x_270, 1); -lean_inc(x_273); -if (lean_is_exclusive(x_270)) { - lean_ctor_release(x_270, 0); - lean_ctor_release(x_270, 1); - x_274 = x_270; -} else { - lean_dec_ref(x_270); - x_274 = lean_box(0); -} -x_275 = lean_ctor_get(x_271, 0); -lean_inc(x_275); -lean_dec(x_271); -x_276 = lean_ctor_get(x_272, 0); -lean_inc(x_276); -x_277 = lean_ctor_get(x_272, 1); -lean_inc(x_277); -lean_dec(x_272); -x_303 = lean_unbox(x_277); -if (x_303 == 0) -{ -lean_object* x_304; -x_304 = lean_array_get_size(x_6); -x_278 = x_304; -goto block_302; -} -else -{ -lean_object* x_305; lean_object* x_306; lean_object* x_307; -x_305 = lean_array_get_size(x_6); -x_306 = lean_unsigned_to_nat(1u); -x_307 = lean_nat_sub(x_305, x_306); -lean_dec(x_305); -x_278 = x_307; -goto block_302; -} -block_302: -{ -uint8_t x_279; -x_279 = lean_nat_dec_lt(x_276, x_278); -if (x_279 == 0) -{ -lean_object* x_280; -lean_dec(x_274); -lean_inc(x_8); -x_280 = l_Lean_Meta_inferType(x_275, x_8, x_273); +x_280 = l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim(x_2, x_3, x_4, x_5, x_6, x_8, x_279); if (lean_obj_tag(x_280) == 0) { -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; uint8_t x_288; lean_object* x_289; +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; uint8_t x_315; x_281 = lean_ctor_get(x_280, 0); lean_inc(x_281); -x_282 = lean_ctor_get(x_280, 1); +x_282 = lean_ctor_get(x_281, 1); lean_inc(x_282); -lean_dec(x_280); -x_283 = l_Lean_Expr_getAppNumArgsAux___main(x_281, x_266); -x_284 = l_Lean_Expr_getAppArgs___closed__1; +x_283 = lean_ctor_get(x_280, 1); lean_inc(x_283); -x_285 = lean_mk_array(x_283, x_284); -x_286 = lean_unsigned_to_nat(1u); -x_287 = lean_nat_sub(x_283, x_286); -lean_dec(x_283); -x_288 = lean_unbox(x_277); -lean_dec(x_277); -x_289 = l_Lean_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___spec__1(x_1, x_2, x_4, x_5, x_6, x_267, x_276, x_288, x_278, x_281, x_285, x_287, x_8, x_282); -return x_289; +if (lean_is_exclusive(x_280)) { + lean_ctor_release(x_280, 0); + lean_ctor_release(x_280, 1); + x_284 = x_280; +} else { + lean_dec_ref(x_280); + x_284 = lean_box(0); +} +x_285 = lean_ctor_get(x_281, 0); +lean_inc(x_285); +lean_dec(x_281); +x_286 = lean_ctor_get(x_282, 0); +lean_inc(x_286); +x_287 = lean_ctor_get(x_282, 1); +lean_inc(x_287); +lean_dec(x_282); +x_315 = lean_unbox(x_287); +if (x_315 == 0) +{ +lean_object* x_316; +x_316 = lean_array_get_size(x_6); +x_288 = x_316; +goto block_314; } else { -uint8_t x_290; -lean_dec(x_278); +lean_object* x_317; lean_object* x_318; lean_object* x_319; +x_317 = lean_array_get_size(x_6); +x_318 = lean_unsigned_to_nat(1u); +x_319 = lean_nat_sub(x_317, x_318); +lean_dec(x_317); +x_288 = x_319; +goto block_314; +} +block_314: +{ +uint8_t x_289; +x_289 = lean_nat_dec_lt(x_286, x_288); +if (x_289 == 0) +{ +lean_object* x_290; +lean_dec(x_284); +lean_inc(x_8); +x_290 = l_Lean_Meta_inferType(x_285, x_8, x_283); +if (lean_obj_tag(x_290) == 0) +{ +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; uint8_t x_298; lean_object* x_299; +x_291 = lean_ctor_get(x_290, 0); +lean_inc(x_291); +x_292 = lean_ctor_get(x_290, 1); +lean_inc(x_292); +lean_dec(x_290); +x_293 = l_Lean_Expr_getAppNumArgsAux___main(x_291, x_276); +x_294 = l_Lean_Expr_getAppArgs___closed__1; +lean_inc(x_293); +x_295 = lean_mk_array(x_293, x_294); +x_296 = lean_unsigned_to_nat(1u); +x_297 = lean_nat_sub(x_293, x_296); +lean_dec(x_293); +x_298 = lean_unbox(x_287); +lean_dec(x_287); +x_299 = l_Lean_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___spec__1(x_1, x_2, x_4, x_5, x_6, x_277, x_286, x_298, x_288, x_291, x_295, x_297, x_8, x_292); +return x_299; +} +else +{ +uint8_t x_300; +lean_dec(x_288); +lean_dec(x_287); +lean_dec(x_286); lean_dec(x_277); -lean_dec(x_276); -lean_dec(x_267); lean_dec(x_8); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_2); lean_dec(x_1); -x_290 = !lean_is_exclusive(x_280); -if (x_290 == 0) +x_300 = !lean_is_exclusive(x_290); +if (x_300 == 0) +{ +return x_290; +} +else +{ +lean_object* x_301; lean_object* x_302; lean_object* x_303; +x_301 = lean_ctor_get(x_290, 0); +x_302 = lean_ctor_get(x_290, 1); +lean_inc(x_302); +lean_inc(x_301); +lean_dec(x_290); +x_303 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_303, 0, x_301); +lean_ctor_set(x_303, 1, x_302); +return x_303; +} +} +} +else +{ +lean_object* x_304; lean_object* x_305; lean_object* x_306; lean_object* x_307; lean_object* x_308; lean_object* x_309; lean_object* x_310; lean_object* x_311; lean_object* x_312; lean_object* x_313; +lean_dec(x_288); +lean_dec(x_287); +lean_dec(x_286); +lean_dec(x_285); +lean_dec(x_277); +lean_dec(x_8); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_1); +x_304 = l_Lean_Name_toString___closed__1; +x_305 = l_Lean_Name_toStringWithSep___main(x_304, x_2); +x_306 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_306, 0, x_305); +x_307 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_307, 0, x_306); +x_308 = l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__3; +x_309 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_309, 0, x_308); +lean_ctor_set(x_309, 1, x_307); +x_310 = l_Lean_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___spec__2___closed__3; +x_311 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_311, 0, x_309); +lean_ctor_set(x_311, 1, x_310); +x_312 = lean_alloc_ctor(22, 1, 0); +lean_ctor_set(x_312, 0, x_311); +if (lean_is_scalar(x_284)) { + x_313 = lean_alloc_ctor(1, 2, 0); +} else { + x_313 = x_284; + lean_ctor_set_tag(x_313, 1); +} +lean_ctor_set(x_313, 0, x_312); +lean_ctor_set(x_313, 1, x_283); +return x_313; +} +} +} +else +{ +uint8_t x_320; +lean_dec(x_277); +lean_dec(x_8); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_2); +lean_dec(x_1); +x_320 = !lean_is_exclusive(x_280); +if (x_320 == 0) { return x_280; } else { -lean_object* x_291; lean_object* x_292; lean_object* x_293; -x_291 = lean_ctor_get(x_280, 0); -x_292 = lean_ctor_get(x_280, 1); -lean_inc(x_292); -lean_inc(x_291); +lean_object* x_321; lean_object* x_322; lean_object* x_323; +x_321 = lean_ctor_get(x_280, 0); +x_322 = lean_ctor_get(x_280, 1); +lean_inc(x_322); +lean_inc(x_321); lean_dec(x_280); -x_293 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_293, 0, x_291); -lean_ctor_set(x_293, 1, x_292); -return x_293; +x_323 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_323, 0, x_321); +lean_ctor_set(x_323, 1, x_322); +return x_323; } } } else { -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_dec(x_278); +uint8_t x_324; lean_dec(x_277); -lean_dec(x_276); -lean_dec(x_275); -lean_dec(x_267); -lean_dec(x_8); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_1); -x_294 = l_Lean_Name_toString___closed__1; -x_295 = l_Lean_Name_toStringWithSep___main(x_294, x_2); -x_296 = l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__1; -x_297 = lean_string_append(x_296, x_295); -lean_dec(x_295); -x_298 = l_Lean_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___spec__2___closed__1; -x_299 = lean_string_append(x_297, x_298); -x_300 = lean_alloc_ctor(22, 1, 0); -lean_ctor_set(x_300, 0, x_299); -if (lean_is_scalar(x_274)) { - x_301 = lean_alloc_ctor(1, 2, 0); -} else { - x_301 = x_274; - lean_ctor_set_tag(x_301, 1); -} -lean_ctor_set(x_301, 0, x_300); -lean_ctor_set(x_301, 1, x_273); -return x_301; -} -} -} -else -{ -uint8_t x_308; -lean_dec(x_267); lean_dec(x_8); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_2); lean_dec(x_1); -x_308 = !lean_is_exclusive(x_270); -if (x_308 == 0) +x_324 = !lean_is_exclusive(x_278); +if (x_324 == 0) { -return x_270; +return x_278; } else { -lean_object* x_309; lean_object* x_310; lean_object* x_311; -x_309 = lean_ctor_get(x_270, 0); -x_310 = lean_ctor_get(x_270, 1); -lean_inc(x_310); -lean_inc(x_309); -lean_dec(x_270); -x_311 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_311, 0, x_309); -lean_ctor_set(x_311, 1, x_310); -return x_311; -} -} -} -else -{ -uint8_t x_312; -lean_dec(x_267); -lean_dec(x_8); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_2); -lean_dec(x_1); -x_312 = !lean_is_exclusive(x_268); -if (x_312 == 0) -{ -return x_268; -} -else -{ -lean_object* x_313; lean_object* x_314; lean_object* x_315; -x_313 = lean_ctor_get(x_268, 0); -x_314 = lean_ctor_get(x_268, 1); -lean_inc(x_314); -lean_inc(x_313); -lean_dec(x_268); -x_315 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_315, 0, x_313); -lean_ctor_set(x_315, 1, x_314); -return x_315; +lean_object* x_325; lean_object* x_326; lean_object* x_327; +x_325 = lean_ctor_get(x_278, 0); +x_326 = lean_ctor_get(x_278, 1); +lean_inc(x_326); +lean_inc(x_325); +lean_dec(x_278); +x_327 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_327, 0, x_325); +lean_ctor_set(x_327, 1, x_326); +return x_327; } } } case 7: { -lean_object* x_316; lean_object* x_317; lean_object* x_318; +lean_object* x_328; lean_object* x_329; lean_object* x_330; lean_dec(x_7); -x_316 = lean_unsigned_to_nat(0u); -x_317 = l___private_Lean_Meta_RecursorInfo_4__getNumParams___main(x_4, x_5, x_316); +x_328 = lean_unsigned_to_nat(0u); +x_329 = l___private_Lean_Meta_RecursorInfo_4__getNumParams___main(x_4, x_5, x_328); lean_inc(x_2); -x_318 = l___private_Lean_Meta_RecursorInfo_3__checkMotive(x_2, x_5, x_6, x_8, x_9); -if (lean_obj_tag(x_318) == 0) -{ -lean_object* x_319; lean_object* x_320; -x_319 = lean_ctor_get(x_318, 1); -lean_inc(x_319); -lean_dec(x_318); -lean_inc(x_2); -x_320 = l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim(x_2, x_3, x_4, x_5, x_6, x_8, x_319); -if (lean_obj_tag(x_320) == 0) -{ -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; uint8_t x_353; -x_321 = lean_ctor_get(x_320, 0); -lean_inc(x_321); -x_322 = lean_ctor_get(x_321, 1); -lean_inc(x_322); -x_323 = lean_ctor_get(x_320, 1); -lean_inc(x_323); -if (lean_is_exclusive(x_320)) { - lean_ctor_release(x_320, 0); - lean_ctor_release(x_320, 1); - x_324 = x_320; -} else { - lean_dec_ref(x_320); - x_324 = lean_box(0); -} -x_325 = lean_ctor_get(x_321, 0); -lean_inc(x_325); -lean_dec(x_321); -x_326 = lean_ctor_get(x_322, 0); -lean_inc(x_326); -x_327 = lean_ctor_get(x_322, 1); -lean_inc(x_327); -lean_dec(x_322); -x_353 = lean_unbox(x_327); -if (x_353 == 0) -{ -lean_object* x_354; -x_354 = lean_array_get_size(x_6); -x_328 = x_354; -goto block_352; -} -else -{ -lean_object* x_355; lean_object* x_356; lean_object* x_357; -x_355 = lean_array_get_size(x_6); -x_356 = lean_unsigned_to_nat(1u); -x_357 = lean_nat_sub(x_355, x_356); -lean_dec(x_355); -x_328 = x_357; -goto block_352; -} -block_352: -{ -uint8_t x_329; -x_329 = lean_nat_dec_lt(x_326, x_328); -if (x_329 == 0) -{ -lean_object* x_330; -lean_dec(x_324); -lean_inc(x_8); -x_330 = l_Lean_Meta_inferType(x_325, x_8, x_323); +x_330 = l___private_Lean_Meta_RecursorInfo_3__checkMotive(x_2, x_5, x_6, x_8, x_9); 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; uint8_t x_338; lean_object* x_339; -x_331 = lean_ctor_get(x_330, 0); +lean_object* x_331; lean_object* x_332; +x_331 = lean_ctor_get(x_330, 1); lean_inc(x_331); -x_332 = lean_ctor_get(x_330, 1); -lean_inc(x_332); lean_dec(x_330); -x_333 = l_Lean_Expr_getAppNumArgsAux___main(x_331, x_316); -x_334 = l_Lean_Expr_getAppArgs___closed__1; +lean_inc(x_2); +x_332 = l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim(x_2, x_3, x_4, x_5, x_6, x_8, x_331); +if (lean_obj_tag(x_332) == 0) +{ +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; uint8_t x_367; +x_333 = lean_ctor_get(x_332, 0); lean_inc(x_333); -x_335 = lean_mk_array(x_333, x_334); -x_336 = lean_unsigned_to_nat(1u); -x_337 = lean_nat_sub(x_333, x_336); +x_334 = lean_ctor_get(x_333, 1); +lean_inc(x_334); +x_335 = lean_ctor_get(x_332, 1); +lean_inc(x_335); +if (lean_is_exclusive(x_332)) { + lean_ctor_release(x_332, 0); + lean_ctor_release(x_332, 1); + x_336 = x_332; +} else { + lean_dec_ref(x_332); + x_336 = lean_box(0); +} +x_337 = lean_ctor_get(x_333, 0); +lean_inc(x_337); lean_dec(x_333); -x_338 = lean_unbox(x_327); -lean_dec(x_327); -x_339 = l_Lean_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___spec__1(x_1, x_2, x_4, x_5, x_6, x_317, x_326, x_338, x_328, x_331, x_335, x_337, x_8, x_332); -return x_339; +x_338 = lean_ctor_get(x_334, 0); +lean_inc(x_338); +x_339 = lean_ctor_get(x_334, 1); +lean_inc(x_339); +lean_dec(x_334); +x_367 = lean_unbox(x_339); +if (x_367 == 0) +{ +lean_object* x_368; +x_368 = lean_array_get_size(x_6); +x_340 = x_368; +goto block_366; } else { -uint8_t x_340; -lean_dec(x_328); -lean_dec(x_327); -lean_dec(x_326); -lean_dec(x_317); +lean_object* x_369; lean_object* x_370; lean_object* x_371; +x_369 = lean_array_get_size(x_6); +x_370 = lean_unsigned_to_nat(1u); +x_371 = lean_nat_sub(x_369, x_370); +lean_dec(x_369); +x_340 = x_371; +goto block_366; +} +block_366: +{ +uint8_t x_341; +x_341 = lean_nat_dec_lt(x_338, x_340); +if (x_341 == 0) +{ +lean_object* x_342; +lean_dec(x_336); +lean_inc(x_8); +x_342 = l_Lean_Meta_inferType(x_337, x_8, x_335); +if (lean_obj_tag(x_342) == 0) +{ +lean_object* x_343; lean_object* x_344; lean_object* x_345; lean_object* x_346; lean_object* x_347; lean_object* x_348; lean_object* x_349; uint8_t x_350; lean_object* x_351; +x_343 = lean_ctor_get(x_342, 0); +lean_inc(x_343); +x_344 = lean_ctor_get(x_342, 1); +lean_inc(x_344); +lean_dec(x_342); +x_345 = l_Lean_Expr_getAppNumArgsAux___main(x_343, x_328); +x_346 = l_Lean_Expr_getAppArgs___closed__1; +lean_inc(x_345); +x_347 = lean_mk_array(x_345, x_346); +x_348 = lean_unsigned_to_nat(1u); +x_349 = lean_nat_sub(x_345, x_348); +lean_dec(x_345); +x_350 = lean_unbox(x_339); +lean_dec(x_339); +x_351 = l_Lean_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___spec__1(x_1, x_2, x_4, x_5, x_6, x_329, x_338, x_350, x_340, x_343, x_347, x_349, x_8, x_344); +return x_351; +} +else +{ +uint8_t x_352; +lean_dec(x_340); +lean_dec(x_339); +lean_dec(x_338); +lean_dec(x_329); lean_dec(x_8); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_2); lean_dec(x_1); -x_340 = !lean_is_exclusive(x_330); -if (x_340 == 0) +x_352 = !lean_is_exclusive(x_342); +if (x_352 == 0) +{ +return x_342; +} +else +{ +lean_object* x_353; lean_object* x_354; lean_object* x_355; +x_353 = lean_ctor_get(x_342, 0); +x_354 = lean_ctor_get(x_342, 1); +lean_inc(x_354); +lean_inc(x_353); +lean_dec(x_342); +x_355 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_355, 0, x_353); +lean_ctor_set(x_355, 1, x_354); +return x_355; +} +} +} +else +{ +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_dec(x_340); +lean_dec(x_339); +lean_dec(x_338); +lean_dec(x_337); +lean_dec(x_329); +lean_dec(x_8); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_1); +x_356 = l_Lean_Name_toString___closed__1; +x_357 = l_Lean_Name_toStringWithSep___main(x_356, x_2); +x_358 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_358, 0, x_357); +x_359 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_359, 0, x_358); +x_360 = l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__3; +x_361 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_361, 0, x_360); +lean_ctor_set(x_361, 1, x_359); +x_362 = l_Lean_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___spec__2___closed__3; +x_363 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_363, 0, x_361); +lean_ctor_set(x_363, 1, x_362); +x_364 = lean_alloc_ctor(22, 1, 0); +lean_ctor_set(x_364, 0, x_363); +if (lean_is_scalar(x_336)) { + x_365 = lean_alloc_ctor(1, 2, 0); +} else { + x_365 = x_336; + lean_ctor_set_tag(x_365, 1); +} +lean_ctor_set(x_365, 0, x_364); +lean_ctor_set(x_365, 1, x_335); +return x_365; +} +} +} +else +{ +uint8_t x_372; +lean_dec(x_329); +lean_dec(x_8); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_2); +lean_dec(x_1); +x_372 = !lean_is_exclusive(x_332); +if (x_372 == 0) +{ +return x_332; +} +else +{ +lean_object* x_373; lean_object* x_374; lean_object* x_375; +x_373 = lean_ctor_get(x_332, 0); +x_374 = lean_ctor_get(x_332, 1); +lean_inc(x_374); +lean_inc(x_373); +lean_dec(x_332); +x_375 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_375, 0, x_373); +lean_ctor_set(x_375, 1, x_374); +return x_375; +} +} +} +else +{ +uint8_t x_376; +lean_dec(x_329); +lean_dec(x_8); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_2); +lean_dec(x_1); +x_376 = !lean_is_exclusive(x_330); +if (x_376 == 0) { return x_330; } else { -lean_object* x_341; lean_object* x_342; lean_object* x_343; -x_341 = lean_ctor_get(x_330, 0); -x_342 = lean_ctor_get(x_330, 1); -lean_inc(x_342); -lean_inc(x_341); +lean_object* x_377; lean_object* x_378; lean_object* x_379; +x_377 = lean_ctor_get(x_330, 0); +x_378 = lean_ctor_get(x_330, 1); +lean_inc(x_378); +lean_inc(x_377); lean_dec(x_330); -x_343 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_343, 0, x_341); -lean_ctor_set(x_343, 1, x_342); -return x_343; -} -} -} -else -{ -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_dec(x_328); -lean_dec(x_327); -lean_dec(x_326); -lean_dec(x_325); -lean_dec(x_317); -lean_dec(x_8); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_1); -x_344 = l_Lean_Name_toString___closed__1; -x_345 = l_Lean_Name_toStringWithSep___main(x_344, x_2); -x_346 = l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__1; -x_347 = lean_string_append(x_346, x_345); -lean_dec(x_345); -x_348 = l_Lean_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___spec__2___closed__1; -x_349 = lean_string_append(x_347, x_348); -x_350 = lean_alloc_ctor(22, 1, 0); -lean_ctor_set(x_350, 0, x_349); -if (lean_is_scalar(x_324)) { - x_351 = lean_alloc_ctor(1, 2, 0); -} else { - x_351 = x_324; - lean_ctor_set_tag(x_351, 1); -} -lean_ctor_set(x_351, 0, x_350); -lean_ctor_set(x_351, 1, x_323); -return x_351; -} -} -} -else -{ -uint8_t x_358; -lean_dec(x_317); -lean_dec(x_8); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_2); -lean_dec(x_1); -x_358 = !lean_is_exclusive(x_320); -if (x_358 == 0) -{ -return x_320; -} -else -{ -lean_object* x_359; lean_object* x_360; lean_object* x_361; -x_359 = lean_ctor_get(x_320, 0); -x_360 = lean_ctor_get(x_320, 1); -lean_inc(x_360); -lean_inc(x_359); -lean_dec(x_320); -x_361 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_361, 0, x_359); -lean_ctor_set(x_361, 1, x_360); -return x_361; -} -} -} -else -{ -uint8_t x_362; -lean_dec(x_317); -lean_dec(x_8); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_2); -lean_dec(x_1); -x_362 = !lean_is_exclusive(x_318); -if (x_362 == 0) -{ -return x_318; -} -else -{ -lean_object* x_363; lean_object* x_364; lean_object* x_365; -x_363 = lean_ctor_get(x_318, 0); -x_364 = lean_ctor_get(x_318, 1); -lean_inc(x_364); -lean_inc(x_363); -lean_dec(x_318); -x_365 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_365, 0, x_363); -lean_ctor_set(x_365, 1, x_364); -return x_365; +x_379 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_379, 0, x_377); +lean_ctor_set(x_379, 1, x_378); +return x_379; } } } case 8: { -lean_object* x_366; lean_object* x_367; lean_object* x_368; +lean_object* x_380; lean_object* x_381; lean_object* x_382; lean_dec(x_7); -x_366 = lean_unsigned_to_nat(0u); -x_367 = l___private_Lean_Meta_RecursorInfo_4__getNumParams___main(x_4, x_5, x_366); +x_380 = lean_unsigned_to_nat(0u); +x_381 = l___private_Lean_Meta_RecursorInfo_4__getNumParams___main(x_4, x_5, x_380); lean_inc(x_2); -x_368 = l___private_Lean_Meta_RecursorInfo_3__checkMotive(x_2, x_5, x_6, x_8, x_9); -if (lean_obj_tag(x_368) == 0) +x_382 = l___private_Lean_Meta_RecursorInfo_3__checkMotive(x_2, x_5, x_6, x_8, x_9); +if (lean_obj_tag(x_382) == 0) { -lean_object* x_369; lean_object* x_370; -x_369 = lean_ctor_get(x_368, 1); -lean_inc(x_369); -lean_dec(x_368); +lean_object* x_383; lean_object* x_384; +x_383 = lean_ctor_get(x_382, 1); +lean_inc(x_383); +lean_dec(x_382); lean_inc(x_2); -x_370 = l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim(x_2, x_3, x_4, x_5, x_6, x_8, x_369); -if (lean_obj_tag(x_370) == 0) +x_384 = l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim(x_2, x_3, x_4, x_5, x_6, x_8, x_383); +if (lean_obj_tag(x_384) == 0) { -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; uint8_t x_403; -x_371 = lean_ctor_get(x_370, 0); -lean_inc(x_371); -x_372 = lean_ctor_get(x_371, 1); -lean_inc(x_372); -x_373 = lean_ctor_get(x_370, 1); -lean_inc(x_373); -if (lean_is_exclusive(x_370)) { - lean_ctor_release(x_370, 0); - lean_ctor_release(x_370, 1); - x_374 = x_370; +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; uint8_t x_419; +x_385 = lean_ctor_get(x_384, 0); +lean_inc(x_385); +x_386 = lean_ctor_get(x_385, 1); +lean_inc(x_386); +x_387 = lean_ctor_get(x_384, 1); +lean_inc(x_387); +if (lean_is_exclusive(x_384)) { + lean_ctor_release(x_384, 0); + lean_ctor_release(x_384, 1); + x_388 = x_384; } else { - lean_dec_ref(x_370); - x_374 = lean_box(0); + lean_dec_ref(x_384); + x_388 = lean_box(0); } -x_375 = lean_ctor_get(x_371, 0); -lean_inc(x_375); -lean_dec(x_371); -x_376 = lean_ctor_get(x_372, 0); -lean_inc(x_376); -x_377 = lean_ctor_get(x_372, 1); -lean_inc(x_377); -lean_dec(x_372); -x_403 = lean_unbox(x_377); -if (x_403 == 0) +x_389 = lean_ctor_get(x_385, 0); +lean_inc(x_389); +lean_dec(x_385); +x_390 = lean_ctor_get(x_386, 0); +lean_inc(x_390); +x_391 = lean_ctor_get(x_386, 1); +lean_inc(x_391); +lean_dec(x_386); +x_419 = lean_unbox(x_391); +if (x_419 == 0) { -lean_object* x_404; -x_404 = lean_array_get_size(x_6); -x_378 = x_404; -goto block_402; +lean_object* x_420; +x_420 = lean_array_get_size(x_6); +x_392 = x_420; +goto block_418; +} +else +{ +lean_object* x_421; lean_object* x_422; lean_object* x_423; +x_421 = lean_array_get_size(x_6); +x_422 = lean_unsigned_to_nat(1u); +x_423 = lean_nat_sub(x_421, x_422); +lean_dec(x_421); +x_392 = x_423; +goto block_418; +} +block_418: +{ +uint8_t x_393; +x_393 = lean_nat_dec_lt(x_390, x_392); +if (x_393 == 0) +{ +lean_object* x_394; +lean_dec(x_388); +lean_inc(x_8); +x_394 = l_Lean_Meta_inferType(x_389, x_8, x_387); +if (lean_obj_tag(x_394) == 0) +{ +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; uint8_t x_402; lean_object* x_403; +x_395 = lean_ctor_get(x_394, 0); +lean_inc(x_395); +x_396 = lean_ctor_get(x_394, 1); +lean_inc(x_396); +lean_dec(x_394); +x_397 = l_Lean_Expr_getAppNumArgsAux___main(x_395, x_380); +x_398 = l_Lean_Expr_getAppArgs___closed__1; +lean_inc(x_397); +x_399 = lean_mk_array(x_397, x_398); +x_400 = lean_unsigned_to_nat(1u); +x_401 = lean_nat_sub(x_397, x_400); +lean_dec(x_397); +x_402 = lean_unbox(x_391); +lean_dec(x_391); +x_403 = l_Lean_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___spec__1(x_1, x_2, x_4, x_5, x_6, x_381, x_390, x_402, x_392, x_395, x_399, x_401, x_8, x_396); +return x_403; +} +else +{ +uint8_t x_404; +lean_dec(x_392); +lean_dec(x_391); +lean_dec(x_390); +lean_dec(x_381); +lean_dec(x_8); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_2); +lean_dec(x_1); +x_404 = !lean_is_exclusive(x_394); +if (x_404 == 0) +{ +return x_394; } else { lean_object* x_405; lean_object* x_406; lean_object* x_407; -x_405 = lean_array_get_size(x_6); -x_406 = lean_unsigned_to_nat(1u); -x_407 = lean_nat_sub(x_405, x_406); -lean_dec(x_405); -x_378 = x_407; -goto block_402; -} -block_402: -{ -uint8_t x_379; -x_379 = lean_nat_dec_lt(x_376, x_378); -if (x_379 == 0) -{ -lean_object* x_380; -lean_dec(x_374); -lean_inc(x_8); -x_380 = l_Lean_Meta_inferType(x_375, x_8, x_373); -if (lean_obj_tag(x_380) == 0) -{ -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; uint8_t x_388; lean_object* x_389; -x_381 = lean_ctor_get(x_380, 0); -lean_inc(x_381); -x_382 = lean_ctor_get(x_380, 1); -lean_inc(x_382); -lean_dec(x_380); -x_383 = l_Lean_Expr_getAppNumArgsAux___main(x_381, x_366); -x_384 = l_Lean_Expr_getAppArgs___closed__1; -lean_inc(x_383); -x_385 = lean_mk_array(x_383, x_384); -x_386 = lean_unsigned_to_nat(1u); -x_387 = lean_nat_sub(x_383, x_386); -lean_dec(x_383); -x_388 = lean_unbox(x_377); -lean_dec(x_377); -x_389 = l_Lean_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___spec__1(x_1, x_2, x_4, x_5, x_6, x_367, x_376, x_388, x_378, x_381, x_385, x_387, x_8, x_382); -return x_389; -} -else -{ -uint8_t x_390; -lean_dec(x_378); -lean_dec(x_377); -lean_dec(x_376); -lean_dec(x_367); -lean_dec(x_8); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_2); -lean_dec(x_1); -x_390 = !lean_is_exclusive(x_380); -if (x_390 == 0) -{ -return x_380; -} -else -{ -lean_object* x_391; lean_object* x_392; lean_object* x_393; -x_391 = lean_ctor_get(x_380, 0); -x_392 = lean_ctor_get(x_380, 1); -lean_inc(x_392); -lean_inc(x_391); -lean_dec(x_380); -x_393 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_393, 0, x_391); -lean_ctor_set(x_393, 1, x_392); -return x_393; +x_405 = lean_ctor_get(x_394, 0); +x_406 = lean_ctor_get(x_394, 1); +lean_inc(x_406); +lean_inc(x_405); +lean_dec(x_394); +x_407 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_407, 0, x_405); +lean_ctor_set(x_407, 1, x_406); +return x_407; } } } else { -lean_object* x_394; lean_object* x_395; lean_object* x_396; lean_object* x_397; lean_object* x_398; lean_object* x_399; lean_object* x_400; lean_object* x_401; -lean_dec(x_378); -lean_dec(x_377); -lean_dec(x_376); -lean_dec(x_375); -lean_dec(x_367); +lean_object* x_408; lean_object* x_409; lean_object* x_410; lean_object* x_411; lean_object* x_412; lean_object* x_413; lean_object* x_414; lean_object* x_415; lean_object* x_416; lean_object* x_417; +lean_dec(x_392); +lean_dec(x_391); +lean_dec(x_390); +lean_dec(x_389); +lean_dec(x_381); lean_dec(x_8); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_1); -x_394 = l_Lean_Name_toString___closed__1; -x_395 = l_Lean_Name_toStringWithSep___main(x_394, x_2); -x_396 = l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__1; -x_397 = lean_string_append(x_396, x_395); -lean_dec(x_395); -x_398 = l_Lean_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___spec__2___closed__1; -x_399 = lean_string_append(x_397, x_398); -x_400 = lean_alloc_ctor(22, 1, 0); -lean_ctor_set(x_400, 0, x_399); -if (lean_is_scalar(x_374)) { - x_401 = lean_alloc_ctor(1, 2, 0); -} else { - x_401 = x_374; - lean_ctor_set_tag(x_401, 1); -} -lean_ctor_set(x_401, 0, x_400); -lean_ctor_set(x_401, 1, x_373); -return x_401; -} -} -} -else -{ -uint8_t x_408; -lean_dec(x_367); -lean_dec(x_8); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_2); -lean_dec(x_1); -x_408 = !lean_is_exclusive(x_370); -if (x_408 == 0) -{ -return x_370; -} -else -{ -lean_object* x_409; lean_object* x_410; lean_object* x_411; -x_409 = lean_ctor_get(x_370, 0); -x_410 = lean_ctor_get(x_370, 1); -lean_inc(x_410); -lean_inc(x_409); -lean_dec(x_370); -x_411 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_411, 0, x_409); -lean_ctor_set(x_411, 1, x_410); -return x_411; -} -} -} -else -{ -uint8_t x_412; -lean_dec(x_367); -lean_dec(x_8); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_2); -lean_dec(x_1); -x_412 = !lean_is_exclusive(x_368); -if (x_412 == 0) -{ -return x_368; -} -else -{ -lean_object* x_413; lean_object* x_414; lean_object* x_415; -x_413 = lean_ctor_get(x_368, 0); -x_414 = lean_ctor_get(x_368, 1); -lean_inc(x_414); -lean_inc(x_413); -lean_dec(x_368); -x_415 = lean_alloc_ctor(1, 2, 0); +x_408 = l_Lean_Name_toString___closed__1; +x_409 = l_Lean_Name_toStringWithSep___main(x_408, x_2); +x_410 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_410, 0, x_409); +x_411 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_411, 0, x_410); +x_412 = l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__3; +x_413 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_413, 0, x_412); +lean_ctor_set(x_413, 1, x_411); +x_414 = l_Lean_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___spec__2___closed__3; +x_415 = lean_alloc_ctor(9, 2, 0); lean_ctor_set(x_415, 0, x_413); lean_ctor_set(x_415, 1, x_414); -return x_415; +x_416 = lean_alloc_ctor(22, 1, 0); +lean_ctor_set(x_416, 0, x_415); +if (lean_is_scalar(x_388)) { + x_417 = lean_alloc_ctor(1, 2, 0); +} else { + x_417 = x_388; + lean_ctor_set_tag(x_417, 1); +} +lean_ctor_set(x_417, 0, x_416); +lean_ctor_set(x_417, 1, x_387); +return x_417; +} +} +} +else +{ +uint8_t x_424; +lean_dec(x_381); +lean_dec(x_8); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_2); +lean_dec(x_1); +x_424 = !lean_is_exclusive(x_384); +if (x_424 == 0) +{ +return x_384; +} +else +{ +lean_object* x_425; lean_object* x_426; lean_object* x_427; +x_425 = lean_ctor_get(x_384, 0); +x_426 = lean_ctor_get(x_384, 1); +lean_inc(x_426); +lean_inc(x_425); +lean_dec(x_384); +x_427 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_427, 0, x_425); +lean_ctor_set(x_427, 1, x_426); +return x_427; +} +} +} +else +{ +uint8_t x_428; +lean_dec(x_381); +lean_dec(x_8); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_2); +lean_dec(x_1); +x_428 = !lean_is_exclusive(x_382); +if (x_428 == 0) +{ +return x_382; +} +else +{ +lean_object* x_429; lean_object* x_430; lean_object* x_431; +x_429 = lean_ctor_get(x_382, 0); +x_430 = lean_ctor_get(x_382, 1); +lean_inc(x_430); +lean_inc(x_429); +lean_dec(x_382); +x_431 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_431, 0, x_429); +lean_ctor_set(x_431, 1, x_430); +return x_431; } } } case 9: { -lean_object* x_416; lean_object* x_417; lean_object* x_418; +lean_object* x_432; lean_object* x_433; lean_object* x_434; lean_dec(x_7); -x_416 = lean_unsigned_to_nat(0u); -x_417 = l___private_Lean_Meta_RecursorInfo_4__getNumParams___main(x_4, x_5, x_416); +x_432 = lean_unsigned_to_nat(0u); +x_433 = l___private_Lean_Meta_RecursorInfo_4__getNumParams___main(x_4, x_5, x_432); lean_inc(x_2); -x_418 = l___private_Lean_Meta_RecursorInfo_3__checkMotive(x_2, x_5, x_6, x_8, x_9); -if (lean_obj_tag(x_418) == 0) +x_434 = l___private_Lean_Meta_RecursorInfo_3__checkMotive(x_2, x_5, x_6, x_8, x_9); +if (lean_obj_tag(x_434) == 0) { -lean_object* x_419; lean_object* x_420; -x_419 = lean_ctor_get(x_418, 1); -lean_inc(x_419); -lean_dec(x_418); +lean_object* x_435; lean_object* x_436; +x_435 = lean_ctor_get(x_434, 1); +lean_inc(x_435); +lean_dec(x_434); lean_inc(x_2); -x_420 = l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim(x_2, x_3, x_4, x_5, x_6, x_8, x_419); -if (lean_obj_tag(x_420) == 0) +x_436 = l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim(x_2, x_3, x_4, x_5, x_6, x_8, x_435); +if (lean_obj_tag(x_436) == 0) { -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; uint8_t x_453; -x_421 = lean_ctor_get(x_420, 0); -lean_inc(x_421); -x_422 = lean_ctor_get(x_421, 1); -lean_inc(x_422); -x_423 = lean_ctor_get(x_420, 1); -lean_inc(x_423); -if (lean_is_exclusive(x_420)) { - lean_ctor_release(x_420, 0); - lean_ctor_release(x_420, 1); - x_424 = x_420; +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; uint8_t x_471; +x_437 = lean_ctor_get(x_436, 0); +lean_inc(x_437); +x_438 = lean_ctor_get(x_437, 1); +lean_inc(x_438); +x_439 = lean_ctor_get(x_436, 1); +lean_inc(x_439); +if (lean_is_exclusive(x_436)) { + lean_ctor_release(x_436, 0); + lean_ctor_release(x_436, 1); + x_440 = x_436; } else { - lean_dec_ref(x_420); - x_424 = lean_box(0); + lean_dec_ref(x_436); + x_440 = lean_box(0); } -x_425 = lean_ctor_get(x_421, 0); -lean_inc(x_425); -lean_dec(x_421); -x_426 = lean_ctor_get(x_422, 0); -lean_inc(x_426); -x_427 = lean_ctor_get(x_422, 1); -lean_inc(x_427); -lean_dec(x_422); -x_453 = lean_unbox(x_427); -if (x_453 == 0) -{ -lean_object* x_454; -x_454 = lean_array_get_size(x_6); -x_428 = x_454; -goto block_452; -} -else -{ -lean_object* x_455; lean_object* x_456; lean_object* x_457; -x_455 = lean_array_get_size(x_6); -x_456 = lean_unsigned_to_nat(1u); -x_457 = lean_nat_sub(x_455, x_456); -lean_dec(x_455); -x_428 = x_457; -goto block_452; -} -block_452: -{ -uint8_t x_429; -x_429 = lean_nat_dec_lt(x_426, x_428); -if (x_429 == 0) -{ -lean_object* x_430; -lean_dec(x_424); -lean_inc(x_8); -x_430 = l_Lean_Meta_inferType(x_425, x_8, x_423); -if (lean_obj_tag(x_430) == 0) -{ -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; uint8_t x_438; lean_object* x_439; -x_431 = lean_ctor_get(x_430, 0); -lean_inc(x_431); -x_432 = lean_ctor_get(x_430, 1); -lean_inc(x_432); -lean_dec(x_430); -x_433 = l_Lean_Expr_getAppNumArgsAux___main(x_431, x_416); -x_434 = l_Lean_Expr_getAppArgs___closed__1; -lean_inc(x_433); -x_435 = lean_mk_array(x_433, x_434); -x_436 = lean_unsigned_to_nat(1u); -x_437 = lean_nat_sub(x_433, x_436); -lean_dec(x_433); -x_438 = lean_unbox(x_427); -lean_dec(x_427); -x_439 = l_Lean_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___spec__1(x_1, x_2, x_4, x_5, x_6, x_417, x_426, x_438, x_428, x_431, x_435, x_437, x_8, x_432); -return x_439; -} -else -{ -uint8_t x_440; -lean_dec(x_428); -lean_dec(x_427); -lean_dec(x_426); -lean_dec(x_417); -lean_dec(x_8); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_2); -lean_dec(x_1); -x_440 = !lean_is_exclusive(x_430); -if (x_440 == 0) -{ -return x_430; -} -else -{ -lean_object* x_441; lean_object* x_442; lean_object* x_443; -x_441 = lean_ctor_get(x_430, 0); -x_442 = lean_ctor_get(x_430, 1); -lean_inc(x_442); +x_441 = lean_ctor_get(x_437, 0); lean_inc(x_441); -lean_dec(x_430); -x_443 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_443, 0, x_441); -lean_ctor_set(x_443, 1, x_442); -return x_443; +lean_dec(x_437); +x_442 = lean_ctor_get(x_438, 0); +lean_inc(x_442); +x_443 = lean_ctor_get(x_438, 1); +lean_inc(x_443); +lean_dec(x_438); +x_471 = lean_unbox(x_443); +if (x_471 == 0) +{ +lean_object* x_472; +x_472 = lean_array_get_size(x_6); +x_444 = x_472; +goto block_470; +} +else +{ +lean_object* x_473; lean_object* x_474; lean_object* x_475; +x_473 = lean_array_get_size(x_6); +x_474 = lean_unsigned_to_nat(1u); +x_475 = lean_nat_sub(x_473, x_474); +lean_dec(x_473); +x_444 = x_475; +goto block_470; +} +block_470: +{ +uint8_t x_445; +x_445 = lean_nat_dec_lt(x_442, x_444); +if (x_445 == 0) +{ +lean_object* x_446; +lean_dec(x_440); +lean_inc(x_8); +x_446 = l_Lean_Meta_inferType(x_441, x_8, x_439); +if (lean_obj_tag(x_446) == 0) +{ +lean_object* x_447; lean_object* x_448; lean_object* x_449; lean_object* x_450; lean_object* x_451; lean_object* x_452; lean_object* x_453; uint8_t x_454; lean_object* x_455; +x_447 = lean_ctor_get(x_446, 0); +lean_inc(x_447); +x_448 = lean_ctor_get(x_446, 1); +lean_inc(x_448); +lean_dec(x_446); +x_449 = l_Lean_Expr_getAppNumArgsAux___main(x_447, x_432); +x_450 = l_Lean_Expr_getAppArgs___closed__1; +lean_inc(x_449); +x_451 = lean_mk_array(x_449, x_450); +x_452 = lean_unsigned_to_nat(1u); +x_453 = lean_nat_sub(x_449, x_452); +lean_dec(x_449); +x_454 = lean_unbox(x_443); +lean_dec(x_443); +x_455 = l_Lean_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___spec__1(x_1, x_2, x_4, x_5, x_6, x_433, x_442, x_454, x_444, x_447, x_451, x_453, x_8, x_448); +return x_455; +} +else +{ +uint8_t x_456; +lean_dec(x_444); +lean_dec(x_443); +lean_dec(x_442); +lean_dec(x_433); +lean_dec(x_8); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_2); +lean_dec(x_1); +x_456 = !lean_is_exclusive(x_446); +if (x_456 == 0) +{ +return x_446; +} +else +{ +lean_object* x_457; lean_object* x_458; lean_object* x_459; +x_457 = lean_ctor_get(x_446, 0); +x_458 = lean_ctor_get(x_446, 1); +lean_inc(x_458); +lean_inc(x_457); +lean_dec(x_446); +x_459 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_459, 0, x_457); +lean_ctor_set(x_459, 1, x_458); +return x_459; } } } else { -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_dec(x_428); -lean_dec(x_427); -lean_dec(x_426); -lean_dec(x_425); -lean_dec(x_417); +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; lean_object* x_469; +lean_dec(x_444); +lean_dec(x_443); +lean_dec(x_442); +lean_dec(x_441); +lean_dec(x_433); lean_dec(x_8); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_1); -x_444 = l_Lean_Name_toString___closed__1; -x_445 = l_Lean_Name_toStringWithSep___main(x_444, x_2); -x_446 = l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__1; -x_447 = lean_string_append(x_446, x_445); -lean_dec(x_445); -x_448 = l_Lean_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___spec__2___closed__1; -x_449 = lean_string_append(x_447, x_448); -x_450 = lean_alloc_ctor(22, 1, 0); -lean_ctor_set(x_450, 0, x_449); -if (lean_is_scalar(x_424)) { - x_451 = lean_alloc_ctor(1, 2, 0); +x_460 = l_Lean_Name_toString___closed__1; +x_461 = l_Lean_Name_toStringWithSep___main(x_460, x_2); +x_462 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_462, 0, x_461); +x_463 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_463, 0, x_462); +x_464 = l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__3; +x_465 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_465, 0, x_464); +lean_ctor_set(x_465, 1, x_463); +x_466 = l_Lean_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___spec__2___closed__3; +x_467 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_467, 0, x_465); +lean_ctor_set(x_467, 1, x_466); +x_468 = lean_alloc_ctor(22, 1, 0); +lean_ctor_set(x_468, 0, x_467); +if (lean_is_scalar(x_440)) { + x_469 = lean_alloc_ctor(1, 2, 0); } else { - x_451 = x_424; - lean_ctor_set_tag(x_451, 1); + x_469 = x_440; + lean_ctor_set_tag(x_469, 1); } -lean_ctor_set(x_451, 0, x_450); -lean_ctor_set(x_451, 1, x_423); -return x_451; +lean_ctor_set(x_469, 0, x_468); +lean_ctor_set(x_469, 1, x_439); +return x_469; } } } else { -uint8_t x_458; -lean_dec(x_417); +uint8_t x_476; +lean_dec(x_433); lean_dec(x_8); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_2); lean_dec(x_1); -x_458 = !lean_is_exclusive(x_420); -if (x_458 == 0) +x_476 = !lean_is_exclusive(x_436); +if (x_476 == 0) { -return x_420; +return x_436; } else { -lean_object* x_459; lean_object* x_460; lean_object* x_461; -x_459 = lean_ctor_get(x_420, 0); -x_460 = lean_ctor_get(x_420, 1); -lean_inc(x_460); -lean_inc(x_459); -lean_dec(x_420); -x_461 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_461, 0, x_459); -lean_ctor_set(x_461, 1, x_460); -return x_461; +lean_object* x_477; lean_object* x_478; lean_object* x_479; +x_477 = lean_ctor_get(x_436, 0); +x_478 = lean_ctor_get(x_436, 1); +lean_inc(x_478); +lean_inc(x_477); +lean_dec(x_436); +x_479 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_479, 0, x_477); +lean_ctor_set(x_479, 1, x_478); +return x_479; } } } else { -uint8_t x_462; -lean_dec(x_417); +uint8_t x_480; +lean_dec(x_433); lean_dec(x_8); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_2); lean_dec(x_1); -x_462 = !lean_is_exclusive(x_418); -if (x_462 == 0) +x_480 = !lean_is_exclusive(x_434); +if (x_480 == 0) { -return x_418; +return x_434; } else { -lean_object* x_463; lean_object* x_464; lean_object* x_465; -x_463 = lean_ctor_get(x_418, 0); -x_464 = lean_ctor_get(x_418, 1); -lean_inc(x_464); -lean_inc(x_463); -lean_dec(x_418); -x_465 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_465, 0, x_463); -lean_ctor_set(x_465, 1, x_464); -return x_465; +lean_object* x_481; lean_object* x_482; lean_object* x_483; +x_481 = lean_ctor_get(x_434, 0); +x_482 = lean_ctor_get(x_434, 1); +lean_inc(x_482); +lean_inc(x_481); +lean_dec(x_434); +x_483 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_483, 0, x_481); +lean_ctor_set(x_483, 1, x_482); +return x_483; } } } case 10: { -lean_object* x_466; lean_object* x_467; lean_object* x_468; +lean_object* x_484; lean_object* x_485; lean_object* x_486; lean_dec(x_7); -x_466 = lean_unsigned_to_nat(0u); -x_467 = l___private_Lean_Meta_RecursorInfo_4__getNumParams___main(x_4, x_5, x_466); +x_484 = lean_unsigned_to_nat(0u); +x_485 = l___private_Lean_Meta_RecursorInfo_4__getNumParams___main(x_4, x_5, x_484); lean_inc(x_2); -x_468 = l___private_Lean_Meta_RecursorInfo_3__checkMotive(x_2, x_5, x_6, x_8, x_9); -if (lean_obj_tag(x_468) == 0) +x_486 = l___private_Lean_Meta_RecursorInfo_3__checkMotive(x_2, x_5, x_6, x_8, x_9); +if (lean_obj_tag(x_486) == 0) { -lean_object* x_469; lean_object* x_470; -x_469 = lean_ctor_get(x_468, 1); -lean_inc(x_469); -lean_dec(x_468); +lean_object* x_487; lean_object* x_488; +x_487 = lean_ctor_get(x_486, 1); +lean_inc(x_487); +lean_dec(x_486); lean_inc(x_2); -x_470 = l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim(x_2, x_3, x_4, x_5, x_6, x_8, x_469); -if (lean_obj_tag(x_470) == 0) +x_488 = l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim(x_2, x_3, x_4, x_5, x_6, x_8, x_487); +if (lean_obj_tag(x_488) == 0) { -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; uint8_t x_503; -x_471 = lean_ctor_get(x_470, 0); -lean_inc(x_471); -x_472 = lean_ctor_get(x_471, 1); -lean_inc(x_472); -x_473 = lean_ctor_get(x_470, 1); -lean_inc(x_473); -if (lean_is_exclusive(x_470)) { - lean_ctor_release(x_470, 0); - lean_ctor_release(x_470, 1); - x_474 = x_470; -} else { - lean_dec_ref(x_470); - x_474 = lean_box(0); -} -x_475 = lean_ctor_get(x_471, 0); -lean_inc(x_475); -lean_dec(x_471); -x_476 = lean_ctor_get(x_472, 0); -lean_inc(x_476); -x_477 = lean_ctor_get(x_472, 1); -lean_inc(x_477); -lean_dec(x_472); -x_503 = lean_unbox(x_477); -if (x_503 == 0) -{ -lean_object* x_504; -x_504 = lean_array_get_size(x_6); -x_478 = x_504; -goto block_502; -} -else -{ -lean_object* x_505; lean_object* x_506; lean_object* x_507; -x_505 = lean_array_get_size(x_6); -x_506 = lean_unsigned_to_nat(1u); -x_507 = lean_nat_sub(x_505, x_506); -lean_dec(x_505); -x_478 = x_507; -goto block_502; -} -block_502: -{ -uint8_t x_479; -x_479 = lean_nat_dec_lt(x_476, x_478); -if (x_479 == 0) -{ -lean_object* x_480; -lean_dec(x_474); -lean_inc(x_8); -x_480 = l_Lean_Meta_inferType(x_475, x_8, x_473); -if (lean_obj_tag(x_480) == 0) -{ -lean_object* x_481; lean_object* x_482; lean_object* x_483; lean_object* x_484; lean_object* x_485; lean_object* x_486; lean_object* x_487; uint8_t x_488; lean_object* x_489; -x_481 = lean_ctor_get(x_480, 0); -lean_inc(x_481); -x_482 = lean_ctor_get(x_480, 1); -lean_inc(x_482); -lean_dec(x_480); -x_483 = l_Lean_Expr_getAppNumArgsAux___main(x_481, x_466); -x_484 = l_Lean_Expr_getAppArgs___closed__1; -lean_inc(x_483); -x_485 = lean_mk_array(x_483, x_484); -x_486 = lean_unsigned_to_nat(1u); -x_487 = lean_nat_sub(x_483, x_486); -lean_dec(x_483); -x_488 = lean_unbox(x_477); -lean_dec(x_477); -x_489 = l_Lean_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___spec__1(x_1, x_2, x_4, x_5, x_6, x_467, x_476, x_488, x_478, x_481, x_485, x_487, x_8, x_482); -return x_489; -} -else -{ -uint8_t x_490; -lean_dec(x_478); -lean_dec(x_477); -lean_dec(x_476); -lean_dec(x_467); -lean_dec(x_8); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_2); -lean_dec(x_1); -x_490 = !lean_is_exclusive(x_480); -if (x_490 == 0) -{ -return x_480; -} -else -{ -lean_object* x_491; lean_object* x_492; lean_object* x_493; -x_491 = lean_ctor_get(x_480, 0); -x_492 = lean_ctor_get(x_480, 1); -lean_inc(x_492); +lean_object* x_489; lean_object* x_490; lean_object* x_491; lean_object* x_492; lean_object* x_493; lean_object* x_494; lean_object* x_495; lean_object* x_496; uint8_t x_523; +x_489 = lean_ctor_get(x_488, 0); +lean_inc(x_489); +x_490 = lean_ctor_get(x_489, 1); +lean_inc(x_490); +x_491 = lean_ctor_get(x_488, 1); lean_inc(x_491); -lean_dec(x_480); -x_493 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_493, 0, x_491); -lean_ctor_set(x_493, 1, x_492); -return x_493; -} +if (lean_is_exclusive(x_488)) { + lean_ctor_release(x_488, 0); + lean_ctor_release(x_488, 1); + x_492 = x_488; +} else { + lean_dec_ref(x_488); + x_492 = lean_box(0); } +x_493 = lean_ctor_get(x_489, 0); +lean_inc(x_493); +lean_dec(x_489); +x_494 = lean_ctor_get(x_490, 0); +lean_inc(x_494); +x_495 = lean_ctor_get(x_490, 1); +lean_inc(x_495); +lean_dec(x_490); +x_523 = lean_unbox(x_495); +if (x_523 == 0) +{ +lean_object* x_524; +x_524 = lean_array_get_size(x_6); +x_496 = x_524; +goto block_522; } else { -lean_object* x_494; lean_object* x_495; lean_object* x_496; lean_object* x_497; lean_object* x_498; lean_object* x_499; lean_object* x_500; lean_object* x_501; -lean_dec(x_478); -lean_dec(x_477); -lean_dec(x_476); -lean_dec(x_475); -lean_dec(x_467); -lean_dec(x_8); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_1); -x_494 = l_Lean_Name_toString___closed__1; -x_495 = l_Lean_Name_toStringWithSep___main(x_494, x_2); -x_496 = l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__1; -x_497 = lean_string_append(x_496, x_495); +lean_object* x_525; lean_object* x_526; lean_object* x_527; +x_525 = lean_array_get_size(x_6); +x_526 = lean_unsigned_to_nat(1u); +x_527 = lean_nat_sub(x_525, x_526); +lean_dec(x_525); +x_496 = x_527; +goto block_522; +} +block_522: +{ +uint8_t x_497; +x_497 = lean_nat_dec_lt(x_494, x_496); +if (x_497 == 0) +{ +lean_object* x_498; +lean_dec(x_492); +lean_inc(x_8); +x_498 = l_Lean_Meta_inferType(x_493, x_8, x_491); +if (lean_obj_tag(x_498) == 0) +{ +lean_object* x_499; lean_object* x_500; lean_object* x_501; lean_object* x_502; lean_object* x_503; lean_object* x_504; lean_object* x_505; uint8_t x_506; lean_object* x_507; +x_499 = lean_ctor_get(x_498, 0); +lean_inc(x_499); +x_500 = lean_ctor_get(x_498, 1); +lean_inc(x_500); +lean_dec(x_498); +x_501 = l_Lean_Expr_getAppNumArgsAux___main(x_499, x_484); +x_502 = l_Lean_Expr_getAppArgs___closed__1; +lean_inc(x_501); +x_503 = lean_mk_array(x_501, x_502); +x_504 = lean_unsigned_to_nat(1u); +x_505 = lean_nat_sub(x_501, x_504); +lean_dec(x_501); +x_506 = lean_unbox(x_495); lean_dec(x_495); -x_498 = l_Lean_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___spec__2___closed__1; -x_499 = lean_string_append(x_497, x_498); -x_500 = lean_alloc_ctor(22, 1, 0); -lean_ctor_set(x_500, 0, x_499); -if (lean_is_scalar(x_474)) { - x_501 = lean_alloc_ctor(1, 2, 0); -} else { - x_501 = x_474; - lean_ctor_set_tag(x_501, 1); -} -lean_ctor_set(x_501, 0, x_500); -lean_ctor_set(x_501, 1, x_473); -return x_501; -} -} +x_507 = l_Lean_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___spec__1(x_1, x_2, x_4, x_5, x_6, x_485, x_494, x_506, x_496, x_499, x_503, x_505, x_8, x_500); +return x_507; } else { uint8_t x_508; -lean_dec(x_467); +lean_dec(x_496); +lean_dec(x_495); +lean_dec(x_494); +lean_dec(x_485); lean_dec(x_8); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_2); lean_dec(x_1); -x_508 = !lean_is_exclusive(x_470); +x_508 = !lean_is_exclusive(x_498); if (x_508 == 0) { -return x_470; +return x_498; } else { lean_object* x_509; lean_object* x_510; lean_object* x_511; -x_509 = lean_ctor_get(x_470, 0); -x_510 = lean_ctor_get(x_470, 1); +x_509 = lean_ctor_get(x_498, 0); +x_510 = lean_ctor_get(x_498, 1); lean_inc(x_510); lean_inc(x_509); -lean_dec(x_470); +lean_dec(x_498); x_511 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_511, 0, x_509); lean_ctor_set(x_511, 1, x_510); @@ -7390,459 +8012,443 @@ return x_511; } else { -uint8_t x_512; -lean_dec(x_467); +lean_object* x_512; lean_object* x_513; lean_object* x_514; lean_object* x_515; lean_object* x_516; lean_object* x_517; lean_object* x_518; lean_object* x_519; lean_object* x_520; lean_object* x_521; +lean_dec(x_496); +lean_dec(x_495); +lean_dec(x_494); +lean_dec(x_493); +lean_dec(x_485); +lean_dec(x_8); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_1); +x_512 = l_Lean_Name_toString___closed__1; +x_513 = l_Lean_Name_toStringWithSep___main(x_512, x_2); +x_514 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_514, 0, x_513); +x_515 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_515, 0, x_514); +x_516 = l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__3; +x_517 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_517, 0, x_516); +lean_ctor_set(x_517, 1, x_515); +x_518 = l_Lean_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___spec__2___closed__3; +x_519 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_519, 0, x_517); +lean_ctor_set(x_519, 1, x_518); +x_520 = lean_alloc_ctor(22, 1, 0); +lean_ctor_set(x_520, 0, x_519); +if (lean_is_scalar(x_492)) { + x_521 = lean_alloc_ctor(1, 2, 0); +} else { + x_521 = x_492; + lean_ctor_set_tag(x_521, 1); +} +lean_ctor_set(x_521, 0, x_520); +lean_ctor_set(x_521, 1, x_491); +return x_521; +} +} +} +else +{ +uint8_t x_528; +lean_dec(x_485); lean_dec(x_8); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_2); lean_dec(x_1); -x_512 = !lean_is_exclusive(x_468); -if (x_512 == 0) +x_528 = !lean_is_exclusive(x_488); +if (x_528 == 0) { -return x_468; +return x_488; } else { -lean_object* x_513; lean_object* x_514; lean_object* x_515; -x_513 = lean_ctor_get(x_468, 0); -x_514 = lean_ctor_get(x_468, 1); -lean_inc(x_514); -lean_inc(x_513); -lean_dec(x_468); -x_515 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_515, 0, x_513); -lean_ctor_set(x_515, 1, x_514); -return x_515; +lean_object* x_529; lean_object* x_530; lean_object* x_531; +x_529 = lean_ctor_get(x_488, 0); +x_530 = lean_ctor_get(x_488, 1); +lean_inc(x_530); +lean_inc(x_529); +lean_dec(x_488); +x_531 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_531, 0, x_529); +lean_ctor_set(x_531, 1, x_530); +return x_531; +} +} +} +else +{ +uint8_t x_532; +lean_dec(x_485); +lean_dec(x_8); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_2); +lean_dec(x_1); +x_532 = !lean_is_exclusive(x_486); +if (x_532 == 0) +{ +return x_486; +} +else +{ +lean_object* x_533; lean_object* x_534; lean_object* x_535; +x_533 = lean_ctor_get(x_486, 0); +x_534 = lean_ctor_get(x_486, 1); +lean_inc(x_534); +lean_inc(x_533); +lean_dec(x_486); +x_535 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_535, 0, x_533); +lean_ctor_set(x_535, 1, x_534); +return x_535; } } } case 11: { -lean_object* x_516; lean_object* x_517; lean_object* x_518; +lean_object* x_536; lean_object* x_537; lean_object* x_538; lean_dec(x_7); -x_516 = lean_unsigned_to_nat(0u); -x_517 = l___private_Lean_Meta_RecursorInfo_4__getNumParams___main(x_4, x_5, x_516); +x_536 = lean_unsigned_to_nat(0u); +x_537 = l___private_Lean_Meta_RecursorInfo_4__getNumParams___main(x_4, x_5, x_536); lean_inc(x_2); -x_518 = l___private_Lean_Meta_RecursorInfo_3__checkMotive(x_2, x_5, x_6, x_8, x_9); -if (lean_obj_tag(x_518) == 0) +x_538 = l___private_Lean_Meta_RecursorInfo_3__checkMotive(x_2, x_5, x_6, x_8, x_9); +if (lean_obj_tag(x_538) == 0) { -lean_object* x_519; lean_object* x_520; -x_519 = lean_ctor_get(x_518, 1); -lean_inc(x_519); -lean_dec(x_518); +lean_object* x_539; lean_object* x_540; +x_539 = lean_ctor_get(x_538, 1); +lean_inc(x_539); +lean_dec(x_538); lean_inc(x_2); -x_520 = l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim(x_2, x_3, x_4, x_5, x_6, x_8, x_519); -if (lean_obj_tag(x_520) == 0) +x_540 = l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim(x_2, x_3, x_4, x_5, x_6, x_8, x_539); +if (lean_obj_tag(x_540) == 0) { -lean_object* x_521; lean_object* x_522; lean_object* x_523; lean_object* x_524; lean_object* x_525; lean_object* x_526; lean_object* x_527; lean_object* x_528; uint8_t x_553; -x_521 = lean_ctor_get(x_520, 0); -lean_inc(x_521); -x_522 = lean_ctor_get(x_521, 1); -lean_inc(x_522); -x_523 = lean_ctor_get(x_520, 1); -lean_inc(x_523); -if (lean_is_exclusive(x_520)) { - lean_ctor_release(x_520, 0); - lean_ctor_release(x_520, 1); - x_524 = x_520; -} else { - lean_dec_ref(x_520); - x_524 = lean_box(0); -} -x_525 = lean_ctor_get(x_521, 0); -lean_inc(x_525); -lean_dec(x_521); -x_526 = lean_ctor_get(x_522, 0); -lean_inc(x_526); -x_527 = lean_ctor_get(x_522, 1); -lean_inc(x_527); -lean_dec(x_522); -x_553 = lean_unbox(x_527); -if (x_553 == 0) -{ -lean_object* x_554; -x_554 = lean_array_get_size(x_6); -x_528 = x_554; -goto block_552; -} -else -{ -lean_object* x_555; lean_object* x_556; lean_object* x_557; -x_555 = lean_array_get_size(x_6); -x_556 = lean_unsigned_to_nat(1u); -x_557 = lean_nat_sub(x_555, x_556); -lean_dec(x_555); -x_528 = x_557; -goto block_552; -} -block_552: -{ -uint8_t x_529; -x_529 = lean_nat_dec_lt(x_526, x_528); -if (x_529 == 0) -{ -lean_object* x_530; -lean_dec(x_524); -lean_inc(x_8); -x_530 = l_Lean_Meta_inferType(x_525, x_8, x_523); -if (lean_obj_tag(x_530) == 0) -{ -lean_object* x_531; lean_object* x_532; lean_object* x_533; lean_object* x_534; lean_object* x_535; lean_object* x_536; lean_object* x_537; uint8_t x_538; lean_object* x_539; -x_531 = lean_ctor_get(x_530, 0); -lean_inc(x_531); -x_532 = lean_ctor_get(x_530, 1); -lean_inc(x_532); -lean_dec(x_530); -x_533 = l_Lean_Expr_getAppNumArgsAux___main(x_531, x_516); -x_534 = l_Lean_Expr_getAppArgs___closed__1; -lean_inc(x_533); -x_535 = lean_mk_array(x_533, x_534); -x_536 = lean_unsigned_to_nat(1u); -x_537 = lean_nat_sub(x_533, x_536); -lean_dec(x_533); -x_538 = lean_unbox(x_527); -lean_dec(x_527); -x_539 = l_Lean_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___spec__1(x_1, x_2, x_4, x_5, x_6, x_517, x_526, x_538, x_528, x_531, x_535, x_537, x_8, x_532); -return x_539; -} -else -{ -uint8_t x_540; -lean_dec(x_528); -lean_dec(x_527); -lean_dec(x_526); -lean_dec(x_517); -lean_dec(x_8); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_2); -lean_dec(x_1); -x_540 = !lean_is_exclusive(x_530); -if (x_540 == 0) -{ -return x_530; -} -else -{ -lean_object* x_541; lean_object* x_542; lean_object* x_543; -x_541 = lean_ctor_get(x_530, 0); -x_542 = lean_ctor_get(x_530, 1); -lean_inc(x_542); +lean_object* x_541; lean_object* x_542; lean_object* x_543; lean_object* x_544; lean_object* x_545; lean_object* x_546; lean_object* x_547; lean_object* x_548; uint8_t x_575; +x_541 = lean_ctor_get(x_540, 0); lean_inc(x_541); -lean_dec(x_530); -x_543 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_543, 0, x_541); -lean_ctor_set(x_543, 1, x_542); -return x_543; -} -} -} -else -{ -lean_object* x_544; lean_object* x_545; lean_object* x_546; lean_object* x_547; lean_object* x_548; lean_object* x_549; lean_object* x_550; lean_object* x_551; -lean_dec(x_528); -lean_dec(x_527); -lean_dec(x_526); -lean_dec(x_525); -lean_dec(x_517); -lean_dec(x_8); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_1); -x_544 = l_Lean_Name_toString___closed__1; -x_545 = l_Lean_Name_toStringWithSep___main(x_544, x_2); -x_546 = l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__1; -x_547 = lean_string_append(x_546, x_545); -lean_dec(x_545); -x_548 = l_Lean_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___spec__2___closed__1; -x_549 = lean_string_append(x_547, x_548); -x_550 = lean_alloc_ctor(22, 1, 0); -lean_ctor_set(x_550, 0, x_549); -if (lean_is_scalar(x_524)) { - x_551 = lean_alloc_ctor(1, 2, 0); +x_542 = lean_ctor_get(x_541, 1); +lean_inc(x_542); +x_543 = lean_ctor_get(x_540, 1); +lean_inc(x_543); +if (lean_is_exclusive(x_540)) { + lean_ctor_release(x_540, 0); + lean_ctor_release(x_540, 1); + x_544 = x_540; } else { - x_551 = x_524; - lean_ctor_set_tag(x_551, 1); -} -lean_ctor_set(x_551, 0, x_550); -lean_ctor_set(x_551, 1, x_523); -return x_551; -} + lean_dec_ref(x_540); + x_544 = lean_box(0); } +x_545 = lean_ctor_get(x_541, 0); +lean_inc(x_545); +lean_dec(x_541); +x_546 = lean_ctor_get(x_542, 0); +lean_inc(x_546); +x_547 = lean_ctor_get(x_542, 1); +lean_inc(x_547); +lean_dec(x_542); +x_575 = lean_unbox(x_547); +if (x_575 == 0) +{ +lean_object* x_576; +x_576 = lean_array_get_size(x_6); +x_548 = x_576; +goto block_574; } else { -uint8_t x_558; -lean_dec(x_517); +lean_object* x_577; lean_object* x_578; lean_object* x_579; +x_577 = lean_array_get_size(x_6); +x_578 = lean_unsigned_to_nat(1u); +x_579 = lean_nat_sub(x_577, x_578); +lean_dec(x_577); +x_548 = x_579; +goto block_574; +} +block_574: +{ +uint8_t x_549; +x_549 = lean_nat_dec_lt(x_546, x_548); +if (x_549 == 0) +{ +lean_object* x_550; +lean_dec(x_544); +lean_inc(x_8); +x_550 = l_Lean_Meta_inferType(x_545, x_8, x_543); +if (lean_obj_tag(x_550) == 0) +{ +lean_object* x_551; lean_object* x_552; lean_object* x_553; lean_object* x_554; lean_object* x_555; lean_object* x_556; lean_object* x_557; uint8_t x_558; lean_object* x_559; +x_551 = lean_ctor_get(x_550, 0); +lean_inc(x_551); +x_552 = lean_ctor_get(x_550, 1); +lean_inc(x_552); +lean_dec(x_550); +x_553 = l_Lean_Expr_getAppNumArgsAux___main(x_551, x_536); +x_554 = l_Lean_Expr_getAppArgs___closed__1; +lean_inc(x_553); +x_555 = lean_mk_array(x_553, x_554); +x_556 = lean_unsigned_to_nat(1u); +x_557 = lean_nat_sub(x_553, x_556); +lean_dec(x_553); +x_558 = lean_unbox(x_547); +lean_dec(x_547); +x_559 = l_Lean_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___spec__1(x_1, x_2, x_4, x_5, x_6, x_537, x_546, x_558, x_548, x_551, x_555, x_557, x_8, x_552); +return x_559; +} +else +{ +uint8_t x_560; +lean_dec(x_548); +lean_dec(x_547); +lean_dec(x_546); +lean_dec(x_537); lean_dec(x_8); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_2); lean_dec(x_1); -x_558 = !lean_is_exclusive(x_520); -if (x_558 == 0) +x_560 = !lean_is_exclusive(x_550); +if (x_560 == 0) { -return x_520; +return x_550; } else { -lean_object* x_559; lean_object* x_560; lean_object* x_561; -x_559 = lean_ctor_get(x_520, 0); -x_560 = lean_ctor_get(x_520, 1); -lean_inc(x_560); -lean_inc(x_559); -lean_dec(x_520); -x_561 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_561, 0, x_559); -lean_ctor_set(x_561, 1, x_560); -return x_561; +lean_object* x_561; lean_object* x_562; lean_object* x_563; +x_561 = lean_ctor_get(x_550, 0); +x_562 = lean_ctor_get(x_550, 1); +lean_inc(x_562); +lean_inc(x_561); +lean_dec(x_550); +x_563 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_563, 0, x_561); +lean_ctor_set(x_563, 1, x_562); +return x_563; } } } else { -uint8_t x_562; -lean_dec(x_517); +lean_object* x_564; lean_object* x_565; lean_object* x_566; lean_object* x_567; lean_object* x_568; lean_object* x_569; lean_object* x_570; lean_object* x_571; lean_object* x_572; lean_object* x_573; +lean_dec(x_548); +lean_dec(x_547); +lean_dec(x_546); +lean_dec(x_545); +lean_dec(x_537); +lean_dec(x_8); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_1); +x_564 = l_Lean_Name_toString___closed__1; +x_565 = l_Lean_Name_toStringWithSep___main(x_564, x_2); +x_566 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_566, 0, x_565); +x_567 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_567, 0, x_566); +x_568 = l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__3; +x_569 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_569, 0, x_568); +lean_ctor_set(x_569, 1, x_567); +x_570 = l_Lean_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___spec__2___closed__3; +x_571 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_571, 0, x_569); +lean_ctor_set(x_571, 1, x_570); +x_572 = lean_alloc_ctor(22, 1, 0); +lean_ctor_set(x_572, 0, x_571); +if (lean_is_scalar(x_544)) { + x_573 = lean_alloc_ctor(1, 2, 0); +} else { + x_573 = x_544; + lean_ctor_set_tag(x_573, 1); +} +lean_ctor_set(x_573, 0, x_572); +lean_ctor_set(x_573, 1, x_543); +return x_573; +} +} +} +else +{ +uint8_t x_580; +lean_dec(x_537); lean_dec(x_8); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_2); lean_dec(x_1); -x_562 = !lean_is_exclusive(x_518); -if (x_562 == 0) +x_580 = !lean_is_exclusive(x_540); +if (x_580 == 0) { -return x_518; +return x_540; } else { -lean_object* x_563; lean_object* x_564; lean_object* x_565; -x_563 = lean_ctor_get(x_518, 0); -x_564 = lean_ctor_get(x_518, 1); -lean_inc(x_564); -lean_inc(x_563); -lean_dec(x_518); -x_565 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_565, 0, x_563); -lean_ctor_set(x_565, 1, x_564); -return x_565; +lean_object* x_581; lean_object* x_582; lean_object* x_583; +x_581 = lean_ctor_get(x_540, 0); +x_582 = lean_ctor_get(x_540, 1); +lean_inc(x_582); +lean_inc(x_581); +lean_dec(x_540); +x_583 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_583, 0, x_581); +lean_ctor_set(x_583, 1, x_582); +return x_583; +} +} +} +else +{ +uint8_t x_584; +lean_dec(x_537); +lean_dec(x_8); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_2); +lean_dec(x_1); +x_584 = !lean_is_exclusive(x_538); +if (x_584 == 0) +{ +return x_538; +} +else +{ +lean_object* x_585; lean_object* x_586; lean_object* x_587; +x_585 = lean_ctor_get(x_538, 0); +x_586 = lean_ctor_get(x_538, 1); +lean_inc(x_586); +lean_inc(x_585); +lean_dec(x_538); +x_587 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_587, 0, x_585); +lean_ctor_set(x_587, 1, x_586); +return x_587; } } } default: { -lean_object* x_566; lean_object* x_567; lean_object* x_568; +lean_object* x_588; lean_object* x_589; lean_object* x_590; lean_dec(x_7); -x_566 = lean_unsigned_to_nat(0u); -x_567 = l___private_Lean_Meta_RecursorInfo_4__getNumParams___main(x_4, x_5, x_566); +x_588 = lean_unsigned_to_nat(0u); +x_589 = l___private_Lean_Meta_RecursorInfo_4__getNumParams___main(x_4, x_5, x_588); lean_inc(x_2); -x_568 = l___private_Lean_Meta_RecursorInfo_3__checkMotive(x_2, x_5, x_6, x_8, x_9); -if (lean_obj_tag(x_568) == 0) +x_590 = l___private_Lean_Meta_RecursorInfo_3__checkMotive(x_2, x_5, x_6, x_8, x_9); +if (lean_obj_tag(x_590) == 0) { -lean_object* x_569; lean_object* x_570; -x_569 = lean_ctor_get(x_568, 1); -lean_inc(x_569); -lean_dec(x_568); -lean_inc(x_2); -x_570 = l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim(x_2, x_3, x_4, x_5, x_6, x_8, x_569); -if (lean_obj_tag(x_570) == 0) -{ -lean_object* x_571; lean_object* x_572; lean_object* x_573; lean_object* x_574; lean_object* x_575; lean_object* x_576; lean_object* x_577; lean_object* x_578; uint8_t x_603; -x_571 = lean_ctor_get(x_570, 0); -lean_inc(x_571); -x_572 = lean_ctor_get(x_571, 1); -lean_inc(x_572); -x_573 = lean_ctor_get(x_570, 1); -lean_inc(x_573); -if (lean_is_exclusive(x_570)) { - lean_ctor_release(x_570, 0); - lean_ctor_release(x_570, 1); - x_574 = x_570; -} else { - lean_dec_ref(x_570); - x_574 = lean_box(0); -} -x_575 = lean_ctor_get(x_571, 0); -lean_inc(x_575); -lean_dec(x_571); -x_576 = lean_ctor_get(x_572, 0); -lean_inc(x_576); -x_577 = lean_ctor_get(x_572, 1); -lean_inc(x_577); -lean_dec(x_572); -x_603 = lean_unbox(x_577); -if (x_603 == 0) -{ -lean_object* x_604; -x_604 = lean_array_get_size(x_6); -x_578 = x_604; -goto block_602; -} -else -{ -lean_object* x_605; lean_object* x_606; lean_object* x_607; -x_605 = lean_array_get_size(x_6); -x_606 = lean_unsigned_to_nat(1u); -x_607 = lean_nat_sub(x_605, x_606); -lean_dec(x_605); -x_578 = x_607; -goto block_602; -} -block_602: -{ -uint8_t x_579; -x_579 = lean_nat_dec_lt(x_576, x_578); -if (x_579 == 0) -{ -lean_object* x_580; -lean_dec(x_574); -lean_inc(x_8); -x_580 = l_Lean_Meta_inferType(x_575, x_8, x_573); -if (lean_obj_tag(x_580) == 0) -{ -lean_object* x_581; lean_object* x_582; lean_object* x_583; lean_object* x_584; lean_object* x_585; lean_object* x_586; lean_object* x_587; uint8_t x_588; lean_object* x_589; -x_581 = lean_ctor_get(x_580, 0); -lean_inc(x_581); -x_582 = lean_ctor_get(x_580, 1); -lean_inc(x_582); -lean_dec(x_580); -x_583 = l_Lean_Expr_getAppNumArgsAux___main(x_581, x_566); -x_584 = l_Lean_Expr_getAppArgs___closed__1; -lean_inc(x_583); -x_585 = lean_mk_array(x_583, x_584); -x_586 = lean_unsigned_to_nat(1u); -x_587 = lean_nat_sub(x_583, x_586); -lean_dec(x_583); -x_588 = lean_unbox(x_577); -lean_dec(x_577); -x_589 = l_Lean_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___spec__1(x_1, x_2, x_4, x_5, x_6, x_567, x_576, x_588, x_578, x_581, x_585, x_587, x_8, x_582); -return x_589; -} -else -{ -uint8_t x_590; -lean_dec(x_578); -lean_dec(x_577); -lean_dec(x_576); -lean_dec(x_567); -lean_dec(x_8); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_2); -lean_dec(x_1); -x_590 = !lean_is_exclusive(x_580); -if (x_590 == 0) -{ -return x_580; -} -else -{ -lean_object* x_591; lean_object* x_592; lean_object* x_593; -x_591 = lean_ctor_get(x_580, 0); -x_592 = lean_ctor_get(x_580, 1); -lean_inc(x_592); +lean_object* x_591; lean_object* x_592; +x_591 = lean_ctor_get(x_590, 1); lean_inc(x_591); -lean_dec(x_580); -x_593 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_593, 0, x_591); -lean_ctor_set(x_593, 1, x_592); -return x_593; -} -} -} -else +lean_dec(x_590); +lean_inc(x_2); +x_592 = l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim(x_2, x_3, x_4, x_5, x_6, x_8, x_591); +if (lean_obj_tag(x_592) == 0) { -lean_object* x_594; lean_object* x_595; lean_object* x_596; lean_object* x_597; lean_object* x_598; lean_object* x_599; lean_object* x_600; lean_object* x_601; -lean_dec(x_578); -lean_dec(x_577); -lean_dec(x_576); -lean_dec(x_575); -lean_dec(x_567); -lean_dec(x_8); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_1); -x_594 = l_Lean_Name_toString___closed__1; -x_595 = l_Lean_Name_toStringWithSep___main(x_594, x_2); -x_596 = l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__1; -x_597 = lean_string_append(x_596, x_595); -lean_dec(x_595); -x_598 = l_Lean_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___spec__2___closed__1; -x_599 = lean_string_append(x_597, x_598); -x_600 = lean_alloc_ctor(22, 1, 0); -lean_ctor_set(x_600, 0, x_599); -if (lean_is_scalar(x_574)) { - x_601 = lean_alloc_ctor(1, 2, 0); +lean_object* x_593; lean_object* x_594; lean_object* x_595; lean_object* x_596; lean_object* x_597; lean_object* x_598; lean_object* x_599; lean_object* x_600; uint8_t x_627; +x_593 = lean_ctor_get(x_592, 0); +lean_inc(x_593); +x_594 = lean_ctor_get(x_593, 1); +lean_inc(x_594); +x_595 = lean_ctor_get(x_592, 1); +lean_inc(x_595); +if (lean_is_exclusive(x_592)) { + lean_ctor_release(x_592, 0); + lean_ctor_release(x_592, 1); + x_596 = x_592; } else { - x_601 = x_574; - lean_ctor_set_tag(x_601, 1); -} -lean_ctor_set(x_601, 0, x_600); -lean_ctor_set(x_601, 1, x_573); -return x_601; -} + lean_dec_ref(x_592); + x_596 = lean_box(0); } +x_597 = lean_ctor_get(x_593, 0); +lean_inc(x_597); +lean_dec(x_593); +x_598 = lean_ctor_get(x_594, 0); +lean_inc(x_598); +x_599 = lean_ctor_get(x_594, 1); +lean_inc(x_599); +lean_dec(x_594); +x_627 = lean_unbox(x_599); +if (x_627 == 0) +{ +lean_object* x_628; +x_628 = lean_array_get_size(x_6); +x_600 = x_628; +goto block_626; } else { -uint8_t x_608; -lean_dec(x_567); -lean_dec(x_8); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_2); -lean_dec(x_1); -x_608 = !lean_is_exclusive(x_570); -if (x_608 == 0) -{ -return x_570; +lean_object* x_629; lean_object* x_630; lean_object* x_631; +x_629 = lean_array_get_size(x_6); +x_630 = lean_unsigned_to_nat(1u); +x_631 = lean_nat_sub(x_629, x_630); +lean_dec(x_629); +x_600 = x_631; +goto block_626; } -else +block_626: { -lean_object* x_609; lean_object* x_610; lean_object* x_611; -x_609 = lean_ctor_get(x_570, 0); -x_610 = lean_ctor_get(x_570, 1); -lean_inc(x_610); -lean_inc(x_609); -lean_dec(x_570); -x_611 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_611, 0, x_609); -lean_ctor_set(x_611, 1, x_610); +uint8_t x_601; +x_601 = lean_nat_dec_lt(x_598, x_600); +if (x_601 == 0) +{ +lean_object* x_602; +lean_dec(x_596); +lean_inc(x_8); +x_602 = l_Lean_Meta_inferType(x_597, x_8, x_595); +if (lean_obj_tag(x_602) == 0) +{ +lean_object* x_603; lean_object* x_604; lean_object* x_605; lean_object* x_606; lean_object* x_607; lean_object* x_608; lean_object* x_609; uint8_t x_610; lean_object* x_611; +x_603 = lean_ctor_get(x_602, 0); +lean_inc(x_603); +x_604 = lean_ctor_get(x_602, 1); +lean_inc(x_604); +lean_dec(x_602); +x_605 = l_Lean_Expr_getAppNumArgsAux___main(x_603, x_588); +x_606 = l_Lean_Expr_getAppArgs___closed__1; +lean_inc(x_605); +x_607 = lean_mk_array(x_605, x_606); +x_608 = lean_unsigned_to_nat(1u); +x_609 = lean_nat_sub(x_605, x_608); +lean_dec(x_605); +x_610 = lean_unbox(x_599); +lean_dec(x_599); +x_611 = l_Lean_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___spec__1(x_1, x_2, x_4, x_5, x_6, x_589, x_598, x_610, x_600, x_603, x_607, x_609, x_8, x_604); return x_611; } -} -} else { uint8_t x_612; -lean_dec(x_567); +lean_dec(x_600); +lean_dec(x_599); +lean_dec(x_598); +lean_dec(x_589); lean_dec(x_8); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_2); lean_dec(x_1); -x_612 = !lean_is_exclusive(x_568); +x_612 = !lean_is_exclusive(x_602); if (x_612 == 0) { -return x_568; +return x_602; } else { lean_object* x_613; lean_object* x_614; lean_object* x_615; -x_613 = lean_ctor_get(x_568, 0); -x_614 = lean_ctor_get(x_568, 1); +x_613 = lean_ctor_get(x_602, 0); +x_614 = lean_ctor_get(x_602, 1); lean_inc(x_614); lean_inc(x_613); -lean_dec(x_568); +lean_dec(x_602); x_615 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_615, 0, x_613); lean_ctor_set(x_615, 1, x_614); @@ -7850,6 +8456,107 @@ return x_615; } } } +else +{ +lean_object* x_616; lean_object* x_617; lean_object* x_618; lean_object* x_619; lean_object* x_620; lean_object* x_621; lean_object* x_622; lean_object* x_623; lean_object* x_624; lean_object* x_625; +lean_dec(x_600); +lean_dec(x_599); +lean_dec(x_598); +lean_dec(x_597); +lean_dec(x_589); +lean_dec(x_8); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_1); +x_616 = l_Lean_Name_toString___closed__1; +x_617 = l_Lean_Name_toStringWithSep___main(x_616, x_2); +x_618 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_618, 0, x_617); +x_619 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_619, 0, x_618); +x_620 = l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__3; +x_621 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_621, 0, x_620); +lean_ctor_set(x_621, 1, x_619); +x_622 = l_Lean_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___spec__2___closed__3; +x_623 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_623, 0, x_621); +lean_ctor_set(x_623, 1, x_622); +x_624 = lean_alloc_ctor(22, 1, 0); +lean_ctor_set(x_624, 0, x_623); +if (lean_is_scalar(x_596)) { + x_625 = lean_alloc_ctor(1, 2, 0); +} else { + x_625 = x_596; + lean_ctor_set_tag(x_625, 1); +} +lean_ctor_set(x_625, 0, x_624); +lean_ctor_set(x_625, 1, x_595); +return x_625; +} +} +} +else +{ +uint8_t x_632; +lean_dec(x_589); +lean_dec(x_8); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_2); +lean_dec(x_1); +x_632 = !lean_is_exclusive(x_592); +if (x_632 == 0) +{ +return x_592; +} +else +{ +lean_object* x_633; lean_object* x_634; lean_object* x_635; +x_633 = lean_ctor_get(x_592, 0); +x_634 = lean_ctor_get(x_592, 1); +lean_inc(x_634); +lean_inc(x_633); +lean_dec(x_592); +x_635 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_635, 0, x_633); +lean_ctor_set(x_635, 1, x_634); +return x_635; +} +} +} +else +{ +uint8_t x_636; +lean_dec(x_589); +lean_dec(x_8); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_2); +lean_dec(x_1); +x_636 = !lean_is_exclusive(x_590); +if (x_636 == 0) +{ +return x_590; +} +else +{ +lean_object* x_637; lean_object* x_638; lean_object* x_639; +x_637 = lean_ctor_get(x_590, 0); +x_638 = lean_ctor_get(x_590, 1); +lean_inc(x_638); +lean_inc(x_637); +lean_dec(x_590); +x_639 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_639, 0, x_637); +lean_ctor_set(x_639, 1, x_638); +return x_639; +} +} +} } } } @@ -9889,16 +10596,36 @@ l___private_Lean_Meta_RecursorInfo_1__mkRecursorInfoForKernelRec___closed__1 = _ lean_mark_persistent(l___private_Lean_Meta_RecursorInfo_1__mkRecursorInfoForKernelRec___closed__1); l___private_Lean_Meta_RecursorInfo_1__mkRecursorInfoForKernelRec___closed__2 = _init_l___private_Lean_Meta_RecursorInfo_1__mkRecursorInfoForKernelRec___closed__2(); lean_mark_persistent(l___private_Lean_Meta_RecursorInfo_1__mkRecursorInfoForKernelRec___closed__2); +l___private_Lean_Meta_RecursorInfo_1__mkRecursorInfoForKernelRec___closed__3 = _init_l___private_Lean_Meta_RecursorInfo_1__mkRecursorInfoForKernelRec___closed__3(); +lean_mark_persistent(l___private_Lean_Meta_RecursorInfo_1__mkRecursorInfoForKernelRec___closed__3); +l___private_Lean_Meta_RecursorInfo_1__mkRecursorInfoForKernelRec___closed__4 = _init_l___private_Lean_Meta_RecursorInfo_1__mkRecursorInfoForKernelRec___closed__4(); +lean_mark_persistent(l___private_Lean_Meta_RecursorInfo_1__mkRecursorInfoForKernelRec___closed__4); l___private_Lean_Meta_RecursorInfo_2__getMajorPosIfAuxRecursor_x3f___closed__1 = _init_l___private_Lean_Meta_RecursorInfo_2__getMajorPosIfAuxRecursor_x3f___closed__1(); lean_mark_persistent(l___private_Lean_Meta_RecursorInfo_2__getMajorPosIfAuxRecursor_x3f___closed__1); l___private_Lean_Meta_RecursorInfo_2__getMajorPosIfAuxRecursor_x3f___closed__2 = _init_l___private_Lean_Meta_RecursorInfo_2__getMajorPosIfAuxRecursor_x3f___closed__2(); lean_mark_persistent(l___private_Lean_Meta_RecursorInfo_2__getMajorPosIfAuxRecursor_x3f___closed__2); +l___private_Lean_Meta_RecursorInfo_2__getMajorPosIfAuxRecursor_x3f___closed__3 = _init_l___private_Lean_Meta_RecursorInfo_2__getMajorPosIfAuxRecursor_x3f___closed__3(); +lean_mark_persistent(l___private_Lean_Meta_RecursorInfo_2__getMajorPosIfAuxRecursor_x3f___closed__3); +l___private_Lean_Meta_RecursorInfo_2__getMajorPosIfAuxRecursor_x3f___closed__4 = _init_l___private_Lean_Meta_RecursorInfo_2__getMajorPosIfAuxRecursor_x3f___closed__4(); +lean_mark_persistent(l___private_Lean_Meta_RecursorInfo_2__getMajorPosIfAuxRecursor_x3f___closed__4); l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__1 = _init_l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__1(); lean_mark_persistent(l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__1); l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__2 = _init_l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__2(); lean_mark_persistent(l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__2); l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__3 = _init_l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__3(); lean_mark_persistent(l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__3); +l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__4 = _init_l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__4(); +lean_mark_persistent(l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__4); +l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__5 = _init_l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__5(); +lean_mark_persistent(l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__5); +l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__6 = _init_l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__6(); +lean_mark_persistent(l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__6); +l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__7 = _init_l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__7(); +lean_mark_persistent(l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__7); +l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__8 = _init_l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__8(); +lean_mark_persistent(l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__8); +l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__9 = _init_l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__9(); +lean_mark_persistent(l___private_Lean_Meta_RecursorInfo_3__checkMotive___closed__9); l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__1 = _init_l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__1(); lean_mark_persistent(l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__1); l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__2 = _init_l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__2(); @@ -9913,14 +10640,62 @@ l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__6 = _init_l__ lean_mark_persistent(l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__6); l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__7 = _init_l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__7(); lean_mark_persistent(l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__7); +l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__8 = _init_l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__8(); +lean_mark_persistent(l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__8); +l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__9 = _init_l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__9(); +lean_mark_persistent(l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__9); +l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__10 = _init_l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__10(); +lean_mark_persistent(l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__10); +l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__11 = _init_l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__11(); +lean_mark_persistent(l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__11); +l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__12 = _init_l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__12(); +lean_mark_persistent(l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__12); +l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__13 = _init_l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__13(); +lean_mark_persistent(l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__13); +l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__14 = _init_l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__14(); +lean_mark_persistent(l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__14); +l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__15 = _init_l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__15(); +lean_mark_persistent(l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__15); +l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__16 = _init_l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__16(); +lean_mark_persistent(l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__16); +l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__17 = _init_l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__17(); +lean_mark_persistent(l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__17); +l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__18 = _init_l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__18(); +lean_mark_persistent(l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__18); +l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__19 = _init_l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__19(); +lean_mark_persistent(l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__19); +l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__20 = _init_l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__20(); +lean_mark_persistent(l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__20); +l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__21 = _init_l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__21(); +lean_mark_persistent(l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__21); +l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__22 = _init_l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__22(); +lean_mark_persistent(l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__22); +l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__23 = _init_l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__23(); +lean_mark_persistent(l___private_Lean_Meta_RecursorInfo_5__getMajorPosDepElim___closed__23); l_Nat_foldMAux___main___at___private_Lean_Meta_RecursorInfo_6__getParamsPos___spec__2___closed__1 = _init_l_Nat_foldMAux___main___at___private_Lean_Meta_RecursorInfo_6__getParamsPos___spec__2___closed__1(); lean_mark_persistent(l_Nat_foldMAux___main___at___private_Lean_Meta_RecursorInfo_6__getParamsPos___spec__2___closed__1); +l_Nat_foldMAux___main___at___private_Lean_Meta_RecursorInfo_6__getParamsPos___spec__2___closed__2 = _init_l_Nat_foldMAux___main___at___private_Lean_Meta_RecursorInfo_6__getParamsPos___spec__2___closed__2(); +lean_mark_persistent(l_Nat_foldMAux___main___at___private_Lean_Meta_RecursorInfo_6__getParamsPos___spec__2___closed__2); +l_Nat_foldMAux___main___at___private_Lean_Meta_RecursorInfo_6__getParamsPos___spec__2___closed__3 = _init_l_Nat_foldMAux___main___at___private_Lean_Meta_RecursorInfo_6__getParamsPos___spec__2___closed__3(); +lean_mark_persistent(l_Nat_foldMAux___main___at___private_Lean_Meta_RecursorInfo_6__getParamsPos___spec__2___closed__3); l_Nat_foldMAux___main___at___private_Lean_Meta_RecursorInfo_7__getIndicesPos___spec__2___closed__1 = _init_l_Nat_foldMAux___main___at___private_Lean_Meta_RecursorInfo_7__getIndicesPos___spec__2___closed__1(); lean_mark_persistent(l_Nat_foldMAux___main___at___private_Lean_Meta_RecursorInfo_7__getIndicesPos___spec__2___closed__1); +l_Nat_foldMAux___main___at___private_Lean_Meta_RecursorInfo_7__getIndicesPos___spec__2___closed__2 = _init_l_Nat_foldMAux___main___at___private_Lean_Meta_RecursorInfo_7__getIndicesPos___spec__2___closed__2(); +lean_mark_persistent(l_Nat_foldMAux___main___at___private_Lean_Meta_RecursorInfo_7__getIndicesPos___spec__2___closed__2); +l_Nat_foldMAux___main___at___private_Lean_Meta_RecursorInfo_7__getIndicesPos___spec__2___closed__3 = _init_l_Nat_foldMAux___main___at___private_Lean_Meta_RecursorInfo_7__getIndicesPos___spec__2___closed__3(); +lean_mark_persistent(l_Nat_foldMAux___main___at___private_Lean_Meta_RecursorInfo_7__getIndicesPos___spec__2___closed__3); l___private_Lean_Meta_RecursorInfo_8__getMotiveLevel___closed__1 = _init_l___private_Lean_Meta_RecursorInfo_8__getMotiveLevel___closed__1(); lean_mark_persistent(l___private_Lean_Meta_RecursorInfo_8__getMotiveLevel___closed__1); +l___private_Lean_Meta_RecursorInfo_8__getMotiveLevel___closed__2 = _init_l___private_Lean_Meta_RecursorInfo_8__getMotiveLevel___closed__2(); +lean_mark_persistent(l___private_Lean_Meta_RecursorInfo_8__getMotiveLevel___closed__2); +l___private_Lean_Meta_RecursorInfo_8__getMotiveLevel___closed__3 = _init_l___private_Lean_Meta_RecursorInfo_8__getMotiveLevel___closed__3(); +lean_mark_persistent(l___private_Lean_Meta_RecursorInfo_8__getMotiveLevel___closed__3); l_List_foldlM___main___at___private_Lean_Meta_RecursorInfo_9__getUnivLevelPos___spec__2___closed__1 = _init_l_List_foldlM___main___at___private_Lean_Meta_RecursorInfo_9__getUnivLevelPos___spec__2___closed__1(); lean_mark_persistent(l_List_foldlM___main___at___private_Lean_Meta_RecursorInfo_9__getUnivLevelPos___spec__2___closed__1); +l_List_foldlM___main___at___private_Lean_Meta_RecursorInfo_9__getUnivLevelPos___spec__2___closed__2 = _init_l_List_foldlM___main___at___private_Lean_Meta_RecursorInfo_9__getUnivLevelPos___spec__2___closed__2(); +lean_mark_persistent(l_List_foldlM___main___at___private_Lean_Meta_RecursorInfo_9__getUnivLevelPos___spec__2___closed__2); +l_List_foldlM___main___at___private_Lean_Meta_RecursorInfo_9__getUnivLevelPos___spec__2___closed__3 = _init_l_List_foldlM___main___at___private_Lean_Meta_RecursorInfo_9__getUnivLevelPos___spec__2___closed__3(); +lean_mark_persistent(l_List_foldlM___main___at___private_Lean_Meta_RecursorInfo_9__getUnivLevelPos___spec__2___closed__3); l___private_Lean_Meta_RecursorInfo_10__getProduceMotiveAndRecursive___closed__1 = _init_l___private_Lean_Meta_RecursorInfo_10__getProduceMotiveAndRecursive___closed__1(); lean_mark_persistent(l___private_Lean_Meta_RecursorInfo_10__getProduceMotiveAndRecursive___closed__1); l___private_Lean_Meta_RecursorInfo_11__checkMotiveResultType___closed__1 = _init_l___private_Lean_Meta_RecursorInfo_11__checkMotiveResultType___closed__1(); @@ -9929,10 +10704,30 @@ l___private_Lean_Meta_RecursorInfo_11__checkMotiveResultType___closed__2 = _init lean_mark_persistent(l___private_Lean_Meta_RecursorInfo_11__checkMotiveResultType___closed__2); l___private_Lean_Meta_RecursorInfo_11__checkMotiveResultType___closed__3 = _init_l___private_Lean_Meta_RecursorInfo_11__checkMotiveResultType___closed__3(); lean_mark_persistent(l___private_Lean_Meta_RecursorInfo_11__checkMotiveResultType___closed__3); +l___private_Lean_Meta_RecursorInfo_11__checkMotiveResultType___closed__4 = _init_l___private_Lean_Meta_RecursorInfo_11__checkMotiveResultType___closed__4(); +lean_mark_persistent(l___private_Lean_Meta_RecursorInfo_11__checkMotiveResultType___closed__4); +l___private_Lean_Meta_RecursorInfo_11__checkMotiveResultType___closed__5 = _init_l___private_Lean_Meta_RecursorInfo_11__checkMotiveResultType___closed__5(); +lean_mark_persistent(l___private_Lean_Meta_RecursorInfo_11__checkMotiveResultType___closed__5); +l___private_Lean_Meta_RecursorInfo_11__checkMotiveResultType___closed__6 = _init_l___private_Lean_Meta_RecursorInfo_11__checkMotiveResultType___closed__6(); +lean_mark_persistent(l___private_Lean_Meta_RecursorInfo_11__checkMotiveResultType___closed__6); +l___private_Lean_Meta_RecursorInfo_11__checkMotiveResultType___closed__7 = _init_l___private_Lean_Meta_RecursorInfo_11__checkMotiveResultType___closed__7(); +lean_mark_persistent(l___private_Lean_Meta_RecursorInfo_11__checkMotiveResultType___closed__7); +l___private_Lean_Meta_RecursorInfo_11__checkMotiveResultType___closed__8 = _init_l___private_Lean_Meta_RecursorInfo_11__checkMotiveResultType___closed__8(); +lean_mark_persistent(l___private_Lean_Meta_RecursorInfo_11__checkMotiveResultType___closed__8); +l___private_Lean_Meta_RecursorInfo_11__checkMotiveResultType___closed__9 = _init_l___private_Lean_Meta_RecursorInfo_11__checkMotiveResultType___closed__9(); +lean_mark_persistent(l___private_Lean_Meta_RecursorInfo_11__checkMotiveResultType___closed__9); l_Lean_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___spec__1___closed__1 = _init_l_Lean_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___spec__1___closed__1(); lean_mark_persistent(l_Lean_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___spec__1___closed__1); +l_Lean_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___spec__1___closed__2 = _init_l_Lean_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___spec__1___closed__2(); +lean_mark_persistent(l_Lean_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___spec__1___closed__2); +l_Lean_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___spec__1___closed__3 = _init_l_Lean_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___spec__1___closed__3(); +lean_mark_persistent(l_Lean_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___spec__1___closed__3); l_Lean_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___spec__2___closed__1 = _init_l_Lean_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___spec__2___closed__1(); lean_mark_persistent(l_Lean_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___spec__2___closed__1); +l_Lean_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___spec__2___closed__2 = _init_l_Lean_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___spec__2___closed__2(); +lean_mark_persistent(l_Lean_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___spec__2___closed__2); +l_Lean_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___spec__2___closed__3 = _init_l_Lean_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___spec__2___closed__3(); +lean_mark_persistent(l_Lean_Expr_withAppAux___main___at___private_Lean_Meta_RecursorInfo_12__mkRecursorInfoAux___spec__2___closed__3); l___private_Lean_Meta_RecursorInfo_13__syntaxToMajorPos___closed__1 = _init_l___private_Lean_Meta_RecursorInfo_13__syntaxToMajorPos___closed__1(); lean_mark_persistent(l___private_Lean_Meta_RecursorInfo_13__syntaxToMajorPos___closed__1); l___private_Lean_Meta_RecursorInfo_13__syntaxToMajorPos___closed__2 = _init_l___private_Lean_Meta_RecursorInfo_13__syntaxToMajorPos___closed__2(); diff --git a/stage0/stdlib/Lean/Meta/SynthInstance.c b/stage0/stdlib/Lean/Meta/SynthInstance.c index b982fe67d3..d0ca6bc45d 100644 --- a/stage0/stdlib/Lean/Meta/SynthInstance.c +++ b/stage0/stdlib/Lean/Meta/SynthInstance.c @@ -94,7 +94,6 @@ lean_object* l_Std_HashMapImp_moveEntries___main___at_Lean_Meta_SynthInstance_Mk extern lean_object* l_String_splitAux___main___closed__1; extern lean_object* l_Lean_Expr_getAppArgs___closed__1; lean_object* l_Lean_Meta_SynthInstance_tryResolveCore___lambda__1___closed__5; -extern lean_object* l_Lean_Meta_Exception_Inhabited___closed__1; size_t l_USize_shiftRight(size_t, size_t); lean_object* l_Lean_Meta_SynthInstance_findEntry_x3f(lean_object*, lean_object*, lean_object*); lean_object* l_Std_HashMapImp_moveEntries___main___at_Lean_Meta_SynthInstance_newSubgoal___spec__4(lean_object*, lean_object*, lean_object*); @@ -187,6 +186,7 @@ lean_object* l_Array_back___at_Lean_Meta_SynthInstance_getNextToResume___spec__1 lean_object* l_Std_mkHashMap___at_Lean_Meta_SynthInstance_mkTableKey___spec__2(lean_object*); lean_object* l_Lean_Meta_getGlobalInstances___rarg(lean_object*); lean_object* l_Lean_Meta_SynthInstance_getOptions___boxed(lean_object*, lean_object*); +lean_object* l___private_Lean_Meta_SynthInstance_4__preprocessArgs___main___closed__4; lean_object* l_Lean_Meta_SynthInstance_synth___main___closed__4; extern size_t l_Std_PersistentHashMap_insertAux___main___rarg___closed__2; lean_object* l_Array_back___at_Lean_Meta_SynthInstance_getNextToResume___spec__1___closed__1; @@ -303,6 +303,7 @@ lean_object* l_Lean_Meta_SynthInstance_isNewAnswer___boxed(lean_object*, lean_ob uint8_t l_Lean_MetavarContext_isLevelAssignable(lean_object*, lean_object*); lean_object* l_Lean_Meta_synthInstance_x3f___closed__9; lean_object* l_Lean_Meta_SynthInstance_inferTCGoalsLRAttr; +lean_object* l___private_Lean_Meta_SynthInstance_4__preprocessArgs___main___closed__3; lean_object* l_Lean_Meta_SynthInstance_Consumernode_inhabited; extern lean_object* l_Lean_Meta_isLevelDefEq___closed__9; lean_object* lean_expr_update_lambda(lean_object*, uint8_t, lean_object*, lean_object*); @@ -340,6 +341,7 @@ lean_object* l_Lean_Meta_SynthInstance_mkInferTCGoalsLRAttr___closed__1; lean_object* l_Lean_Meta_maxStepsOption___closed__2; lean_object* l_Lean_Meta_SynthInstance_getInstances___closed__1; lean_object* l___private_Lean_Util_Trace_3__getResetTraces___at_Lean_Meta_SynthInstance_tryResolve___spec__1___boxed(lean_object*); +extern lean_object* l_Lean_Meta_Exception_Inhabited___closed__2; uint8_t l_Lean_MetavarContext_isExprAssignable(lean_object*, lean_object*); lean_object* l_Lean_MonadTracerAdapter_addTrace___at_Lean_Meta_isLevelDefEqAux___main___spec__1(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_SynthInstance_Answer_inhabited___closed__1; @@ -2205,7 +2207,7 @@ lean_object* _init_l_Lean_Meta_SynthInstance_SynthM_inhabited___closed__1() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Meta_Exception_Inhabited___closed__1; +x_1 = l_Lean_Meta_Exception_Inhabited___closed__2; x_2 = lean_alloc_closure((void*)(l_Lean_Meta_SynthInstance_SynthM_inhabited___lambda__1___boxed), 3, 1); lean_closure_set(x_2, 0, x_1); return x_2; @@ -21210,6 +21212,26 @@ _start: { lean_object* x_1; lean_object* x_2; x_1 = l___private_Lean_Meta_SynthInstance_4__preprocessArgs___main___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___private_Lean_Meta_SynthInstance_4__preprocessArgs___main___closed__3() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l___private_Lean_Meta_SynthInstance_4__preprocessArgs___main___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___private_Lean_Meta_SynthInstance_4__preprocessArgs___main___closed__4() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l___private_Lean_Meta_SynthInstance_4__preprocessArgs___main___closed__3; x_2 = lean_alloc_ctor(22, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; @@ -21316,7 +21338,7 @@ if (x_31 == 0) lean_object* x_32; lean_object* x_33; x_32 = lean_ctor_get(x_9, 0); lean_dec(x_32); -x_33 = l___private_Lean_Meta_SynthInstance_4__preprocessArgs___main___closed__2; +x_33 = l___private_Lean_Meta_SynthInstance_4__preprocessArgs___main___closed__4; lean_ctor_set_tag(x_9, 1); lean_ctor_set(x_9, 0, x_33); return x_9; @@ -21327,7 +21349,7 @@ lean_object* x_34; lean_object* x_35; lean_object* x_36; x_34 = lean_ctor_get(x_9, 1); lean_inc(x_34); lean_dec(x_9); -x_35 = l___private_Lean_Meta_SynthInstance_4__preprocessArgs___main___closed__2; +x_35 = l___private_Lean_Meta_SynthInstance_4__preprocessArgs___main___closed__4; x_36 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_36, 0, x_35); lean_ctor_set(x_36, 1, x_34); @@ -26045,6 +26067,10 @@ l___private_Lean_Meta_SynthInstance_4__preprocessArgs___main___closed__1 = _init lean_mark_persistent(l___private_Lean_Meta_SynthInstance_4__preprocessArgs___main___closed__1); l___private_Lean_Meta_SynthInstance_4__preprocessArgs___main___closed__2 = _init_l___private_Lean_Meta_SynthInstance_4__preprocessArgs___main___closed__2(); lean_mark_persistent(l___private_Lean_Meta_SynthInstance_4__preprocessArgs___main___closed__2); +l___private_Lean_Meta_SynthInstance_4__preprocessArgs___main___closed__3 = _init_l___private_Lean_Meta_SynthInstance_4__preprocessArgs___main___closed__3(); +lean_mark_persistent(l___private_Lean_Meta_SynthInstance_4__preprocessArgs___main___closed__3); +l___private_Lean_Meta_SynthInstance_4__preprocessArgs___main___closed__4 = _init_l___private_Lean_Meta_SynthInstance_4__preprocessArgs___main___closed__4(); +lean_mark_persistent(l___private_Lean_Meta_SynthInstance_4__preprocessArgs___main___closed__4); l_Lean_Meta_maxStepsOption___closed__1 = _init_l_Lean_Meta_maxStepsOption___closed__1(); lean_mark_persistent(l_Lean_Meta_maxStepsOption___closed__1); l_Lean_Meta_maxStepsOption___closed__2 = _init_l_Lean_Meta_maxStepsOption___closed__2(); diff --git a/stage0/stdlib/Lean/Meta/Tactic/Assumption.c b/stage0/stdlib/Lean/Meta/Tactic/Assumption.c index 984730c114..82f23cf9e3 100644 --- a/stage0/stdlib/Lean/Meta/Tactic/Assumption.c +++ b/stage0/stdlib/Lean/Meta/Tactic/Assumption.c @@ -18,13 +18,12 @@ lean_object* l_Lean_Meta_withLocalContext___rarg(lean_object*, lean_object*, lea lean_object* l_Array_findSomeRevMAux___main___at_Lean_Meta_assumptionAux___spec__3(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_assumption___boxed(lean_object*, lean_object*, lean_object*); lean_object* lean_array_get_size(lean_object*); -lean_object* l_Lean_Meta_assumption___closed__1; +extern lean_object* l_Lean_Meta_Exception_Inhabited___closed__1; lean_object* l_Lean_Meta_assumptionAux(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_assumptionAux___closed__2; lean_object* lean_array_fget(lean_object*, lean_object*); lean_object* l_Lean_Meta_getMVarType(lean_object*, lean_object*, lean_object*); lean_object* lean_nat_sub(lean_object*, lean_object*); -extern lean_object* l_Lean_Format_join___closed__1; lean_object* lean_name_mk_string(lean_object*, lean_object*); lean_object* l_Array_findSomeRevMAux___main___at_Lean_Meta_assumptionAux___spec__3___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_LocalDecl_toExpr(lean_object*); @@ -1021,16 +1020,6 @@ lean_dec(x_2); return x_4; } } -lean_object* _init_l_Lean_Meta_assumption___closed__1() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Format_join___closed__1; -x_2 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_2, 0, x_1); -return x_2; -} -} lean_object* l_Lean_Meta_assumption(lean_object* x_1, lean_object* x_2, lean_object* x_3) { _start: { @@ -1051,7 +1040,7 @@ x_7 = lean_ctor_get(x_4, 1); lean_inc(x_7); lean_dec(x_4); x_8 = l_Lean_Meta_assumptionAux___closed__2; -x_9 = l_Lean_Meta_assumption___closed__1; +x_9 = l_Lean_Meta_Exception_Inhabited___closed__1; x_10 = l_Lean_Meta_throwTacticEx___rarg(x_8, x_1, x_9, x_2, x_7); return x_10; } @@ -1138,8 +1127,6 @@ l_Lean_Meta_assumptionAux___closed__1 = _init_l_Lean_Meta_assumptionAux___closed lean_mark_persistent(l_Lean_Meta_assumptionAux___closed__1); l_Lean_Meta_assumptionAux___closed__2 = _init_l_Lean_Meta_assumptionAux___closed__2(); lean_mark_persistent(l_Lean_Meta_assumptionAux___closed__2); -l_Lean_Meta_assumption___closed__1 = _init_l_Lean_Meta_assumption___closed__1(); -lean_mark_persistent(l_Lean_Meta_assumption___closed__1); return lean_mk_io_result(lean_box(0)); } #ifdef __cplusplus diff --git a/stage0/stdlib/Lean/Meta/Tactic/Cases.c b/stage0/stdlib/Lean/Meta/Tactic/Cases.c index a4d247bfc6..8c51b3a66d 100644 --- a/stage0/stdlib/Lean/Meta/Tactic/Cases.c +++ b/stage0/stdlib/Lean/Meta/Tactic/Cases.c @@ -14,7 +14,6 @@ extern "C" { #endif lean_object* l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_Meta_check___spec__3(lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Expr_withAppAux___main___at_Lean_Meta_generalizeIndices___spec__1___closed__7; lean_object* l_Lean_Meta_getLCtx___boxed(lean_object*, lean_object*); uint8_t l_Array_anyRangeMAux___main___at___private_Lean_Meta_Tactic_Cases_5__hasIndepIndices___spec__35(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_assert(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -152,8 +151,8 @@ uint8_t l_Array_anyRangeMAux___main___at___private_Lean_Meta_Tactic_Cases_5__has lean_object* l_List_lengthAux___main___rarg(lean_object*, lean_object*); lean_object* l_Lean_Meta_clear(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_generalizeIndices(lean_object*, lean_object*, lean_object*, lean_object*); -extern lean_object* l_Lean_Meta_mkNoConfusion___closed__4; lean_object* l_Lean_Meta_cases(lean_object*, lean_object*, lean_object*, uint8_t, lean_object*, lean_object*); +extern lean_object* l_Lean_Meta_mkNoConfusion___closed__8; lean_object* l_Nat_repr(lean_object*); uint8_t l_Array_anyRangeMAux___main___at___private_Lean_Meta_Tactic_Cases_5__hasIndepIndices___spec__46(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Meta_Tactic_Cases_2__withNewIndexEqsAux___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -195,7 +194,6 @@ lean_object* l_Lean_mkFVar(lean_object*); uint8_t l_Lean_Expr_isAppOfArity___main(lean_object*, lean_object*, lean_object*); lean_object* l_Array_iterateMAux___main___at___private_Lean_Meta_Tactic_Cases_9__unifyEqs___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); uint8_t l_Std_PersistentArray_anyMAux___main___at___private_Lean_Meta_Tactic_Cases_5__hasIndepIndices___spec__32(lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Expr_withAppAux___main___at_Lean_Meta_generalizeIndices___spec__1___closed__8; uint8_t l_Std_PersistentArray_anyM___at___private_Lean_Meta_Tactic_Cases_5__hasIndepIndices___spec__37(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Expr_withAppAux___main___at_Lean_Meta_generalizeIndices___spec__1___lambda__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); uint8_t l_Array_anyRangeMAux___main___at___private_Lean_Meta_Tactic_Cases_5__hasIndepIndices___spec__41(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -220,6 +218,7 @@ lean_object* l_Array_umapMAux___main___at___private_Lean_Meta_Tactic_Cases_8__un lean_object* l_Lean_Expr_withAppAux___main___at_Lean_Meta_generalizeIndices___spec__1___lambda__3(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_withLocalDecl___rarg(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_Cases_cases(lean_object*, lean_object*, lean_object*, uint8_t, lean_object*, lean_object*); +extern lean_object* l_Lean_Meta_mkNoConfusion___closed__5; uint8_t l_Nat_anyAux___main___at___private_Lean_Meta_Tactic_Cases_5__hasIndepIndices___spec__3(lean_object*, lean_object*, lean_object*); lean_object* l_Std_PersistentArray_anyM___at___private_Lean_Meta_Tactic_Cases_5__hasIndepIndices___spec__37___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_umapMAux___main___at___private_Lean_Meta_Tactic_Cases_8__unifyEqsAux___main___spec__3(lean_object*, lean_object*, lean_object*); @@ -292,7 +291,6 @@ lean_object* l_unsafeCast(lean_object*, lean_object*, lean_object*); lean_object* l_Array_iterateMAux___main___at_Lean_mkAppN___spec__1(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_anyRangeMAux___main___at___private_Lean_Meta_Tactic_Cases_5__hasIndepIndices___spec__41___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Expr_withAppAux___main___at_Lean_Meta_generalizeIndices___spec__1___lambda__4___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -extern lean_object* l_Lean_Meta_injectionCore___lambda__1___closed__2; lean_object* l_Std_PersistentArray_anyM___at___private_Lean_Meta_Tactic_Cases_5__hasIndepIndices___spec__7___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_mkEq(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_mkAppB(lean_object*, lean_object*, lean_object*); @@ -1242,11 +1240,9 @@ return x_16; lean_object* _init_l_Lean_Expr_withAppAux___main___at_Lean_Meta_generalizeIndices___spec__1___closed__1() { _start: { -lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Meta_mkNoConfusion___closed__4; -x_2 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_2, 0, x_1); -return x_2; +lean_object* x_1; +x_1 = lean_mk_string("indexed inductive type expected"); +return x_1; } } lean_object* _init_l_Lean_Expr_withAppAux___main___at_Lean_Meta_generalizeIndices___spec__1___closed__2() { @@ -1254,7 +1250,7 @@ _start: { lean_object* x_1; lean_object* x_2; x_1 = l_Lean_Expr_withAppAux___main___at_Lean_Meta_generalizeIndices___spec__1___closed__1; -x_2 = lean_alloc_ctor(0, 1, 0); +x_2 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } @@ -1262,32 +1258,14 @@ return x_2; lean_object* _init_l_Lean_Expr_withAppAux___main___at_Lean_Meta_generalizeIndices___spec__1___closed__3() { _start: { -lean_object* x_1; -x_1 = lean_mk_string("indexed inductive type expected"); -return x_1; -} -} -lean_object* _init_l_Lean_Expr_withAppAux___main___at_Lean_Meta_generalizeIndices___spec__1___closed__4() { -_start: -{ lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Expr_withAppAux___main___at_Lean_Meta_generalizeIndices___spec__1___closed__3; -x_2 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_2, 0, x_1); -return x_2; -} -} -lean_object* _init_l_Lean_Expr_withAppAux___main___at_Lean_Meta_generalizeIndices___spec__1___closed__5() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Expr_withAppAux___main___at_Lean_Meta_generalizeIndices___spec__1___closed__4; +x_1 = l_Lean_Expr_withAppAux___main___at_Lean_Meta_generalizeIndices___spec__1___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_Expr_withAppAux___main___at_Lean_Meta_generalizeIndices___spec__1___closed__6() { +lean_object* _init_l_Lean_Expr_withAppAux___main___at_Lean_Meta_generalizeIndices___spec__1___closed__4() { _start: { lean_object* x_1; @@ -1295,21 +1273,21 @@ x_1 = lean_mk_string("ill-formed inductive datatype"); return x_1; } } -lean_object* _init_l_Lean_Expr_withAppAux___main___at_Lean_Meta_generalizeIndices___spec__1___closed__7() { +lean_object* _init_l_Lean_Expr_withAppAux___main___at_Lean_Meta_generalizeIndices___spec__1___closed__5() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Expr_withAppAux___main___at_Lean_Meta_generalizeIndices___spec__1___closed__6; +x_1 = l_Lean_Expr_withAppAux___main___at_Lean_Meta_generalizeIndices___spec__1___closed__4; x_2 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -lean_object* _init_l_Lean_Expr_withAppAux___main___at_Lean_Meta_generalizeIndices___spec__1___closed__8() { +lean_object* _init_l_Lean_Expr_withAppAux___main___at_Lean_Meta_generalizeIndices___spec__1___closed__6() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Expr_withAppAux___main___at_Lean_Meta_generalizeIndices___spec__1___closed__7; +x_1 = l_Lean_Expr_withAppAux___main___at_Lean_Meta_generalizeIndices___spec__1___closed__5; x_2 = lean_alloc_ctor(0, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; @@ -1334,7 +1312,7 @@ lean_dec(x_7); lean_dec(x_6); lean_dec(x_3); lean_dec(x_2); -x_14 = l_Lean_Expr_withAppAux___main___at_Lean_Meta_generalizeIndices___spec__1___closed__2; +x_14 = l_Lean_Meta_mkNoConfusion___closed__8; x_15 = l_Lean_Meta_throwTacticEx___rarg(x_5, x_1, x_14, x_10, x_11); lean_dec(x_10); return x_15; @@ -1396,7 +1374,7 @@ lean_dec(x_26); lean_dec(x_6); lean_dec(x_3); lean_dec(x_2); -x_41 = l_Lean_Expr_withAppAux___main___at_Lean_Meta_generalizeIndices___spec__1___closed__5; +x_41 = l_Lean_Expr_withAppAux___main___at_Lean_Meta_generalizeIndices___spec__1___closed__3; x_42 = l_Lean_Meta_throwTacticEx___rarg(x_5, x_1, x_41, x_10, x_11); lean_dec(x_10); x_43 = !lean_is_exclusive(x_42); @@ -1428,7 +1406,7 @@ lean_dec(x_26); lean_dec(x_6); lean_dec(x_3); lean_dec(x_2); -x_47 = l_Lean_Expr_withAppAux___main___at_Lean_Meta_generalizeIndices___spec__1___closed__8; +x_47 = l_Lean_Expr_withAppAux___main___at_Lean_Meta_generalizeIndices___spec__1___closed__6; x_48 = l_Lean_Meta_throwTacticEx___rarg(x_5, x_1, x_47, x_10, x_11); lean_dec(x_10); x_49 = !lean_is_exclusive(x_48); @@ -1522,7 +1500,7 @@ lean_dec(x_7); lean_dec(x_6); lean_dec(x_3); lean_dec(x_2); -x_56 = l_Lean_Expr_withAppAux___main___at_Lean_Meta_generalizeIndices___spec__1___closed__2; +x_56 = l_Lean_Meta_mkNoConfusion___closed__8; x_57 = l_Lean_Meta_throwTacticEx___rarg(x_5, x_1, x_56, x_10, x_11); lean_dec(x_10); return x_57; @@ -1556,7 +1534,7 @@ lean_dec(x_6); lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); -x_64 = l_Lean_Expr_withAppAux___main___at_Lean_Meta_generalizeIndices___spec__1___closed__2; +x_64 = l_Lean_Meta_mkNoConfusion___closed__8; x_65 = l_Lean_Meta_throwTacticEx___rarg(x_5, x_1, x_64, x_10, x_11); lean_dec(x_10); return x_65; @@ -11168,7 +11146,7 @@ lean_dec(x_5); lean_dec(x_4); lean_dec(x_2); x_16 = l___private_Lean_Meta_Tactic_Cases_8__unifyEqsAux___main___lambda__1___closed__2; -x_17 = l_Lean_Meta_injectionCore___lambda__1___closed__2; +x_17 = l_Lean_Meta_mkNoConfusion___closed__5; x_18 = l_Lean_Meta_throwTacticEx___rarg(x_16, x_1, x_17, x_7, x_8); lean_dec(x_7); return x_18; @@ -13997,10 +13975,6 @@ l_Lean_Expr_withAppAux___main___at_Lean_Meta_generalizeIndices___spec__1___close lean_mark_persistent(l_Lean_Expr_withAppAux___main___at_Lean_Meta_generalizeIndices___spec__1___closed__5); l_Lean_Expr_withAppAux___main___at_Lean_Meta_generalizeIndices___spec__1___closed__6 = _init_l_Lean_Expr_withAppAux___main___at_Lean_Meta_generalizeIndices___spec__1___closed__6(); lean_mark_persistent(l_Lean_Expr_withAppAux___main___at_Lean_Meta_generalizeIndices___spec__1___closed__6); -l_Lean_Expr_withAppAux___main___at_Lean_Meta_generalizeIndices___spec__1___closed__7 = _init_l_Lean_Expr_withAppAux___main___at_Lean_Meta_generalizeIndices___spec__1___closed__7(); -lean_mark_persistent(l_Lean_Expr_withAppAux___main___at_Lean_Meta_generalizeIndices___spec__1___closed__7); -l_Lean_Expr_withAppAux___main___at_Lean_Meta_generalizeIndices___spec__1___closed__8 = _init_l_Lean_Expr_withAppAux___main___at_Lean_Meta_generalizeIndices___spec__1___closed__8(); -lean_mark_persistent(l_Lean_Expr_withAppAux___main___at_Lean_Meta_generalizeIndices___spec__1___closed__8); l_Lean_Meta_generalizeIndices___lambda__1___closed__1 = _init_l_Lean_Meta_generalizeIndices___lambda__1___closed__1(); lean_mark_persistent(l_Lean_Meta_generalizeIndices___lambda__1___closed__1); l_Lean_Meta_generalizeIndices___lambda__1___closed__2 = _init_l_Lean_Meta_generalizeIndices___lambda__1___closed__2(); diff --git a/stage0/stdlib/Lean/Meta/Tactic/Injection.c b/stage0/stdlib/Lean/Meta/Tactic/Injection.c index 28121df56f..2e44684a8d 100644 --- a/stage0/stdlib/Lean/Meta/Tactic/Injection.c +++ b/stage0/stdlib/Lean/Meta/Tactic/Injection.c @@ -40,7 +40,6 @@ uint8_t lean_nat_dec_eq(lean_object*, lean_object*); lean_object* l_Lean_Meta_getMVarType(lean_object*, lean_object*, lean_object*); lean_object* lean_nat_sub(lean_object*, lean_object*); lean_object* l___private_Lean_Meta_Tactic_Injection_1__getConstructorVal___boxed(lean_object*, lean_object*, lean_object*, lean_object*); -extern lean_object* l_Lean_Meta_mkNoConfusion___closed__3; lean_object* l_Lean_Meta_tryClear(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Expr_headBeta(lean_object*); extern lean_object* l_Lean_Expr_heq_x3f___closed__2; @@ -59,13 +58,13 @@ lean_object* l_Lean_LocalDecl_type(lean_object*); lean_object* l_Lean_Meta_throwTacticEx___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_injectionCore___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_assignExprMVar(lean_object*, lean_object*, lean_object*, lean_object*); +extern lean_object* l_Lean_Meta_mkNoConfusion___closed__5; lean_object* l_Lean_Meta_checkNotAssigned(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_getLocalDecl(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_injection___boxed(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_mkApp(lean_object*, lean_object*); lean_object* l_Lean_Meta_injectionCore___boxed(lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Lean_Meta_injectionCore___lambda__1___closed__7; lean_object* l_Lean_Meta_inferType(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_mkNoConfusion(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_intro1(lean_object*, uint8_t, lean_object*, lean_object*); @@ -82,7 +81,6 @@ lean_object* l_Lean_Meta_mkEq(lean_object*, lean_object*, lean_object*, lean_obj lean_object* l_Lean_Meta_injectionCore___lambda__1___closed__1; lean_object* l_Lean_Meta_mkEqOfHEq(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_injectionCore___lambda__1___closed__4; -lean_object* l_Lean_Meta_injectionCore___lambda__1___closed__8; lean_object* l_Lean_Meta_injectionCore___closed__2; lean_object* l___private_Lean_Meta_Tactic_Injection_1__getConstructorVal(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: @@ -321,11 +319,9 @@ return x_4; lean_object* _init_l_Lean_Meta_injectionCore___lambda__1___closed__1() { _start: { -lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Meta_mkNoConfusion___closed__3; -x_2 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_2, 0, x_1); -return x_2; +lean_object* x_1; +x_1 = lean_mk_string("equality of constructor applications expected"); +return x_1; } } lean_object* _init_l_Lean_Meta_injectionCore___lambda__1___closed__2() { @@ -333,7 +329,7 @@ _start: { lean_object* x_1; lean_object* x_2; x_1 = l_Lean_Meta_injectionCore___lambda__1___closed__1; -x_2 = lean_alloc_ctor(0, 1, 0); +x_2 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } @@ -341,32 +337,14 @@ return x_2; lean_object* _init_l_Lean_Meta_injectionCore___lambda__1___closed__3() { _start: { -lean_object* x_1; -x_1 = lean_mk_string("equality of constructor applications expected"); -return x_1; -} -} -lean_object* _init_l_Lean_Meta_injectionCore___lambda__1___closed__4() { -_start: -{ lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Meta_injectionCore___lambda__1___closed__3; -x_2 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_2, 0, x_1); -return x_2; -} -} -lean_object* _init_l_Lean_Meta_injectionCore___lambda__1___closed__5() { -_start: -{ -lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Meta_injectionCore___lambda__1___closed__4; +x_1 = l_Lean_Meta_injectionCore___lambda__1___closed__2; x_2 = lean_alloc_ctor(0, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -lean_object* _init_l_Lean_Meta_injectionCore___lambda__1___closed__6() { +lean_object* _init_l_Lean_Meta_injectionCore___lambda__1___closed__4() { _start: { lean_object* x_1; @@ -374,21 +352,21 @@ x_1 = lean_mk_string("ill-formed noConfusion auxiliary construction"); return x_1; } } -lean_object* _init_l_Lean_Meta_injectionCore___lambda__1___closed__7() { +lean_object* _init_l_Lean_Meta_injectionCore___lambda__1___closed__5() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Meta_injectionCore___lambda__1___closed__6; +x_1 = l_Lean_Meta_injectionCore___lambda__1___closed__4; x_2 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -lean_object* _init_l_Lean_Meta_injectionCore___lambda__1___closed__8() { +lean_object* _init_l_Lean_Meta_injectionCore___lambda__1___closed__6() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_Meta_injectionCore___lambda__1___closed__7; +x_1 = l_Lean_Meta_injectionCore___lambda__1___closed__5; x_2 = lean_alloc_ctor(0, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; @@ -438,7 +416,7 @@ if (x_17 == 0) lean_object* x_18; lean_object* x_19; lean_dec(x_13); lean_dec(x_3); -x_18 = l_Lean_Meta_injectionCore___lambda__1___closed__2; +x_18 = l_Lean_Meta_mkNoConfusion___closed__5; x_19 = l_Lean_Meta_throwTacticEx___rarg(x_2, x_1, x_18, x_4, x_14); lean_dec(x_4); return x_19; @@ -498,7 +476,7 @@ lean_dec(x_3); x_36 = lean_ctor_get(x_35, 1); lean_inc(x_36); lean_dec(x_35); -x_37 = l_Lean_Meta_injectionCore___lambda__1___closed__5; +x_37 = l_Lean_Meta_injectionCore___lambda__1___closed__3; x_38 = l_Lean_Meta_throwTacticEx___rarg(x_2, x_1, x_37, x_4, x_36); lean_dec(x_4); return x_38; @@ -517,7 +495,7 @@ lean_dec(x_3); x_40 = lean_ctor_get(x_35, 1); lean_inc(x_40); lean_dec(x_35); -x_41 = l_Lean_Meta_injectionCore___lambda__1___closed__5; +x_41 = l_Lean_Meta_injectionCore___lambda__1___closed__3; x_42 = l_Lean_Meta_throwTacticEx___rarg(x_2, x_1, x_41, x_4, x_40); lean_dec(x_4); return x_42; @@ -807,7 +785,7 @@ lean_dec(x_3); x_107 = lean_ctor_get(x_69, 1); lean_inc(x_107); lean_dec(x_69); -x_108 = l_Lean_Meta_injectionCore___lambda__1___closed__8; +x_108 = l_Lean_Meta_injectionCore___lambda__1___closed__6; x_109 = l_Lean_Meta_throwTacticEx___rarg(x_2, x_1, x_108, x_4, x_107); lean_dec(x_4); return x_109; @@ -2092,10 +2070,6 @@ l_Lean_Meta_injectionCore___lambda__1___closed__5 = _init_l_Lean_Meta_injectionC lean_mark_persistent(l_Lean_Meta_injectionCore___lambda__1___closed__5); l_Lean_Meta_injectionCore___lambda__1___closed__6 = _init_l_Lean_Meta_injectionCore___lambda__1___closed__6(); lean_mark_persistent(l_Lean_Meta_injectionCore___lambda__1___closed__6); -l_Lean_Meta_injectionCore___lambda__1___closed__7 = _init_l_Lean_Meta_injectionCore___lambda__1___closed__7(); -lean_mark_persistent(l_Lean_Meta_injectionCore___lambda__1___closed__7); -l_Lean_Meta_injectionCore___lambda__1___closed__8 = _init_l_Lean_Meta_injectionCore___lambda__1___closed__8(); -lean_mark_persistent(l_Lean_Meta_injectionCore___lambda__1___closed__8); l_Lean_Meta_injectionCore___closed__1 = _init_l_Lean_Meta_injectionCore___closed__1(); lean_mark_persistent(l_Lean_Meta_injectionCore___closed__1); l_Lean_Meta_injectionCore___closed__2 = _init_l_Lean_Meta_injectionCore___closed__2(); diff --git a/stage0/stdlib/Lean/Meta/Tactic/Subst.c b/stage0/stdlib/Lean/Meta/Tactic/Subst.c index 1d49bdd03e..7444f73c45 100644 --- a/stage0/stdlib/Lean/Meta/Tactic/Subst.c +++ b/stage0/stdlib/Lean/Meta/Tactic/Subst.c @@ -37,7 +37,6 @@ lean_object* l_Lean_Meta_substCore___lambda__2___boxed(lean_object*, lean_object lean_object* l_Lean_Meta_mkEqRec(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_subst(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Expr_appFn_x21(lean_object*); -lean_object* lean_expr_instantiate1(lean_object*, lean_object*); lean_object* lean_array_push(lean_object*, lean_object*); lean_object* l_Lean_Meta_substCore___lambda__3___closed__6; lean_object* lean_array_get_size(lean_object*); @@ -59,6 +58,7 @@ lean_object* l_Array_findSomeMAux___main___at_Lean_Meta_subst___spec__5___boxed( lean_object* lean_nat_sub(lean_object*, lean_object*); lean_object* l_Lean_Meta_substCore___lambda__2___closed__2; lean_object* l_Lean_Meta_mkEqSymm(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Expr_replaceFVar(lean_object*, lean_object*, lean_object*); lean_object* l_Nat_foldMAux___main___at_Lean_Meta_substCore___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_array_get(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Expr_fvarId_x21(lean_object*); @@ -110,7 +110,6 @@ lean_object* l_Lean_Meta_substCore___lambda__3___closed__5; lean_object* l_Lean_Meta_mkLambda(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_getMVarDecl(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_substCore___lambda__3___closed__14; -lean_object* lean_expr_abstract(lean_object*, lean_object*); lean_object* l_Array_findSomeMAux___main___at_Lean_Meta_subst___spec__5(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l___private_Lean_Meta_Tactic_Util_1__regTraceClasses___closed__2; lean_object* l___private_Lean_Meta_Tactic_Subst_1__regTraceClasses(lean_object*); @@ -241,45 +240,44 @@ lean_inc(x_5); x_8 = l_Lean_Meta_mkEqSymm(x_5, x_6, x_7); if (lean_obj_tag(x_8) == 0) { -lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; +lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; x_9 = lean_ctor_get(x_8, 0); lean_inc(x_9); x_10 = lean_ctor_get(x_8, 1); lean_inc(x_10); lean_dec(x_8); -x_11 = lean_expr_abstract(x_1, x_2); -x_12 = lean_expr_instantiate1(x_11, x_9); +x_11 = l_Lean_Expr_replaceFVar(x_1, x_2, x_9); lean_dec(x_9); -lean_dec(x_11); -x_13 = lean_array_push(x_3, x_4); -x_14 = lean_array_push(x_13, x_5); -x_15 = l_Lean_Meta_mkLambda(x_14, x_12, x_6, x_10); -return x_15; +x_12 = lean_array_push(x_3, x_4); +x_13 = lean_array_push(x_12, x_5); +x_14 = l_Lean_Meta_mkLambda(x_13, x_11, x_6, x_10); +return x_14; } else { -uint8_t x_16; +uint8_t x_15; lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_3); -x_16 = !lean_is_exclusive(x_8); -if (x_16 == 0) +lean_dec(x_2); +x_15 = !lean_is_exclusive(x_8); +if (x_15 == 0) { return x_8; } else { -lean_object* x_17; lean_object* x_18; lean_object* x_19; -x_17 = lean_ctor_get(x_8, 0); -x_18 = lean_ctor_get(x_8, 1); -lean_inc(x_18); +lean_object* x_16; lean_object* x_17; lean_object* x_18; +x_16 = lean_ctor_get(x_8, 0); +x_17 = lean_ctor_get(x_8, 1); lean_inc(x_17); +lean_inc(x_16); lean_dec(x_8); -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; +x_18 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_18, 0, x_16); +lean_ctor_set(x_18, 1, x_17); +return x_18; } } } @@ -314,20 +312,20 @@ lean_inc(x_1); x_16 = l_Lean_Meta_getLocalDecl(x_1, x_13, x_14); if (lean_obj_tag(x_16) == 0) { -lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_281; lean_object* x_282; uint8_t x_283; +lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_275; lean_object* x_276; uint8_t x_277; x_17 = lean_ctor_get(x_16, 0); lean_inc(x_17); x_18 = lean_ctor_get(x_16, 1); lean_inc(x_18); lean_dec(x_16); -x_281 = l_Lean_LocalDecl_type(x_17); +x_275 = l_Lean_LocalDecl_type(x_17); lean_dec(x_17); -x_282 = lean_unsigned_to_nat(3u); -x_283 = l_Lean_Expr_isAppOfArity___main(x_281, x_11, x_282); -if (x_283 == 0) +x_276 = lean_unsigned_to_nat(3u); +x_277 = l_Lean_Expr_isAppOfArity___main(x_275, x_11, x_276); +if (x_277 == 0) { -lean_object* x_284; lean_object* x_285; lean_object* x_286; -lean_dec(x_281); +lean_object* x_278; lean_object* x_279; lean_object* x_280; +lean_dec(x_275); lean_dec(x_15); lean_dec(x_10); lean_dec(x_9); @@ -337,33 +335,33 @@ lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); -x_284 = l_Lean_Meta_isClassQuick___main___closed__1; -x_285 = l_unreachable_x21___rarg(x_284); -x_286 = lean_apply_2(x_285, x_13, x_18); -return x_286; +x_278 = l_Lean_Meta_isClassQuick___main___closed__1; +x_279 = l_unreachable_x21___rarg(x_278); +x_280 = lean_apply_2(x_279, x_13, x_18); +return x_280; } else { if (x_8 == 0) { -lean_object* x_287; -x_287 = l_Lean_Expr_appArg_x21(x_281); -lean_dec(x_281); -x_19 = x_287; -goto block_280; +lean_object* x_281; +x_281 = l_Lean_Expr_appArg_x21(x_275); +lean_dec(x_275); +x_19 = x_281; +goto block_274; } else { -lean_object* x_288; lean_object* x_289; -x_288 = l_Lean_Expr_appFn_x21(x_281); -lean_dec(x_281); -x_289 = l_Lean_Expr_appArg_x21(x_288); -lean_dec(x_288); -x_19 = x_289; -goto block_280; +lean_object* x_282; lean_object* x_283; +x_282 = l_Lean_Expr_appFn_x21(x_275); +lean_dec(x_275); +x_283 = l_Lean_Expr_appArg_x21(x_282); +lean_dec(x_282); +x_19 = x_283; +goto block_274; } } -block_280: +block_274: { lean_object* x_20; lean_object* x_21; uint8_t x_22; x_20 = lean_ctor_get(x_18, 1); @@ -377,46 +375,43 @@ if (x_22 == 0) lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_dec(x_10); x_23 = l_Lean_mkOptionalNode___closed__2; +lean_inc(x_2); x_24 = lean_array_push(x_23, x_2); lean_inc(x_13); lean_inc(x_15); -lean_inc(x_24); x_25 = l_Lean_Meta_mkLambda(x_24, x_15, x_13, x_18); 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_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; x_26 = lean_ctor_get(x_25, 0); lean_inc(x_26); x_27 = lean_ctor_get(x_25, 1); lean_inc(x_27); lean_dec(x_25); -x_28 = lean_expr_abstract(x_15, x_24); -lean_dec(x_24); -lean_dec(x_15); -x_29 = lean_expr_instantiate1(x_28, x_19); +x_28 = l_Lean_Expr_replaceFVar(x_15, x_2, x_19); lean_dec(x_19); -lean_dec(x_28); +lean_dec(x_15); if (x_8 == 0) { -lean_object* x_96; +lean_object* x_95; lean_inc(x_13); -x_96 = l_Lean_Meta_mkEqSymm(x_9, x_13, x_27); -if (lean_obj_tag(x_96) == 0) +x_95 = l_Lean_Meta_mkEqSymm(x_9, x_13, x_27); +if (lean_obj_tag(x_95) == 0) { -lean_object* x_97; lean_object* x_98; -x_97 = lean_ctor_get(x_96, 0); +lean_object* x_96; lean_object* x_97; +x_96 = lean_ctor_get(x_95, 0); +lean_inc(x_96); +x_97 = lean_ctor_get(x_95, 1); lean_inc(x_97); -x_98 = lean_ctor_get(x_96, 1); -lean_inc(x_98); -lean_dec(x_96); +lean_dec(x_95); +x_29 = x_96; x_30 = x_97; -x_31 = x_98; -goto block_95; +goto block_94; } else { -uint8_t x_99; -lean_dec(x_29); +uint8_t x_98; +lean_dec(x_28); lean_dec(x_26); lean_dec(x_13); lean_dec(x_7); @@ -424,308 +419,307 @@ lean_dec(x_5); lean_dec(x_4); lean_dec(x_3); lean_dec(x_1); -x_99 = !lean_is_exclusive(x_96); -if (x_99 == 0) +x_98 = !lean_is_exclusive(x_95); +if (x_98 == 0) { -return x_96; +return x_95; } else { -lean_object* x_100; lean_object* x_101; lean_object* x_102; -x_100 = lean_ctor_get(x_96, 0); -x_101 = lean_ctor_get(x_96, 1); -lean_inc(x_101); +lean_object* x_99; lean_object* x_100; lean_object* x_101; +x_99 = lean_ctor_get(x_95, 0); +x_100 = lean_ctor_get(x_95, 1); lean_inc(x_100); -lean_dec(x_96); -x_102 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_102, 0, x_100); -lean_ctor_set(x_102, 1, x_101); -return x_102; +lean_inc(x_99); +lean_dec(x_95); +x_101 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_101, 0, x_99); +lean_ctor_set(x_101, 1, x_100); +return x_101; } } } else { -x_30 = x_9; -x_31 = x_27; -goto block_95; +x_29 = x_9; +x_30 = x_27; +goto block_94; } -block_95: +block_94: { -uint8_t x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; -x_32 = 2; +uint8_t x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; +x_31 = 2; lean_inc(x_13); -x_33 = l_Lean_Meta_mkFreshExprMVar(x_29, x_3, x_32, x_13, x_31); -x_34 = lean_ctor_get(x_33, 0); +x_32 = l_Lean_Meta_mkFreshExprMVar(x_28, x_3, x_31, x_13, x_30); +x_33 = lean_ctor_get(x_32, 0); +lean_inc(x_33); +x_34 = lean_ctor_get(x_32, 1); lean_inc(x_34); -x_35 = lean_ctor_get(x_33, 1); -lean_inc(x_35); -lean_dec(x_33); +lean_dec(x_32); lean_inc(x_13); -lean_inc(x_34); -x_36 = l_Lean_Meta_mkEqNDRec(x_26, x_34, x_30, x_13, x_35); -if (lean_obj_tag(x_36) == 0) +lean_inc(x_33); +x_35 = l_Lean_Meta_mkEqNDRec(x_26, x_33, x_29, x_13, x_34); +if (lean_obj_tag(x_35) == 0) { -lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; -x_37 = lean_ctor_get(x_36, 0); +lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; +x_36 = lean_ctor_get(x_35, 0); +lean_inc(x_36); +x_37 = lean_ctor_get(x_35, 1); lean_inc(x_37); -x_38 = lean_ctor_get(x_36, 1); -lean_inc(x_38); -lean_dec(x_36); -x_39 = l_Lean_Expr_mvarId_x21(x_34); -lean_dec(x_34); -x_40 = l_Lean_Meta_assignExprMVar(x_4, x_37, x_13, x_38); -if (lean_obj_tag(x_40) == 0) +lean_dec(x_35); +x_38 = l_Lean_Expr_mvarId_x21(x_33); +lean_dec(x_33); +x_39 = l_Lean_Meta_assignExprMVar(x_4, x_36, x_13, x_37); +if (lean_obj_tag(x_39) == 0) { -lean_object* x_41; lean_object* x_42; -x_41 = lean_ctor_get(x_40, 1); -lean_inc(x_41); -lean_dec(x_40); -x_42 = l_Lean_Meta_clear(x_39, x_1, x_13, x_41); -if (lean_obj_tag(x_42) == 0) +lean_object* x_40; lean_object* x_41; +x_40 = lean_ctor_get(x_39, 1); +lean_inc(x_40); +lean_dec(x_39); +x_41 = l_Lean_Meta_clear(x_38, x_1, x_13, x_40); +if (lean_obj_tag(x_41) == 0) { -lean_object* x_43; lean_object* x_44; lean_object* x_45; -x_43 = lean_ctor_get(x_42, 0); +lean_object* x_42; lean_object* x_43; lean_object* x_44; +x_42 = lean_ctor_get(x_41, 0); +lean_inc(x_42); +x_43 = lean_ctor_get(x_41, 1); lean_inc(x_43); -x_44 = lean_ctor_get(x_42, 1); -lean_inc(x_44); -lean_dec(x_42); -x_45 = l_Lean_Meta_clear(x_43, x_5, x_13, x_44); -if (lean_obj_tag(x_45) == 0) +lean_dec(x_41); +x_44 = l_Lean_Meta_clear(x_42, x_5, x_13, x_43); +if (lean_obj_tag(x_44) == 0) { -lean_object* x_46; lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; uint8_t x_51; lean_object* x_52; -x_46 = lean_ctor_get(x_45, 0); +lean_object* x_45; lean_object* x_46; lean_object* x_47; lean_object* x_48; lean_object* x_49; uint8_t x_50; lean_object* x_51; +x_45 = lean_ctor_get(x_44, 0); +lean_inc(x_45); +x_46 = lean_ctor_get(x_44, 1); lean_inc(x_46); -x_47 = lean_ctor_get(x_45, 1); -lean_inc(x_47); -lean_dec(x_45); -x_48 = lean_array_get_size(x_6); -x_49 = lean_unsigned_to_nat(2u); -x_50 = lean_nat_sub(x_48, x_49); -lean_dec(x_48); -x_51 = 0; -x_52 = l_Lean_Meta_introNCore___at_Lean_Meta_introN___spec__1(x_51, x_46, x_50, x_7, x_13, x_47); -if (lean_obj_tag(x_52) == 0) +lean_dec(x_44); +x_47 = lean_array_get_size(x_6); +x_48 = lean_unsigned_to_nat(2u); +x_49 = lean_nat_sub(x_47, x_48); +lean_dec(x_47); +x_50 = 0; +x_51 = l_Lean_Meta_introNCore___at_Lean_Meta_introN___spec__1(x_50, x_45, x_49, x_7, x_13, x_46); +if (lean_obj_tag(x_51) == 0) { -lean_object* x_53; lean_object* x_54; uint8_t x_55; -x_53 = lean_ctor_get(x_52, 0); +lean_object* x_52; lean_object* x_53; uint8_t x_54; +x_52 = lean_ctor_get(x_51, 0); +lean_inc(x_52); +x_53 = lean_ctor_get(x_51, 1); lean_inc(x_53); -x_54 = lean_ctor_get(x_52, 1); -lean_inc(x_54); -lean_dec(x_52); -x_55 = !lean_is_exclusive(x_53); -if (x_55 == 0) +lean_dec(x_51); +x_54 = !lean_is_exclusive(x_52); +if (x_54 == 0) { -lean_object* x_56; lean_object* x_57; lean_object* x_58; lean_object* x_59; uint8_t x_60; -x_56 = lean_ctor_get(x_53, 0); -x_57 = lean_array_get_size(x_56); -x_58 = l_Lean_Meta_FVarSubst_empty; -lean_inc(x_57); -x_59 = l_Nat_foldMAux___main___at_Lean_Meta_substCore___spec__1(x_6, x_56, x_57, x_57, x_58, x_13, x_54); +lean_object* x_55; lean_object* x_56; lean_object* x_57; lean_object* x_58; uint8_t x_59; +x_55 = lean_ctor_get(x_52, 0); +x_56 = lean_array_get_size(x_55); +x_57 = l_Lean_Meta_FVarSubst_empty; +lean_inc(x_56); +x_58 = l_Nat_foldMAux___main___at_Lean_Meta_substCore___spec__1(x_6, x_55, x_56, x_56, x_57, x_13, x_53); lean_dec(x_13); -lean_dec(x_57); lean_dec(x_56); -x_60 = !lean_is_exclusive(x_59); -if (x_60 == 0) +lean_dec(x_55); +x_59 = !lean_is_exclusive(x_58); +if (x_59 == 0) { -lean_object* x_61; -x_61 = lean_ctor_get(x_59, 0); -lean_ctor_set(x_53, 0, x_61); -lean_ctor_set(x_59, 0, x_53); -return x_59; +lean_object* x_60; +x_60 = lean_ctor_get(x_58, 0); +lean_ctor_set(x_52, 0, x_60); +lean_ctor_set(x_58, 0, x_52); +return x_58; } else { -lean_object* x_62; lean_object* x_63; lean_object* x_64; -x_62 = lean_ctor_get(x_59, 0); -x_63 = lean_ctor_get(x_59, 1); -lean_inc(x_63); +lean_object* x_61; lean_object* x_62; lean_object* x_63; +x_61 = lean_ctor_get(x_58, 0); +x_62 = lean_ctor_get(x_58, 1); lean_inc(x_62); -lean_dec(x_59); -lean_ctor_set(x_53, 0, x_62); -x_64 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_64, 0, x_53); -lean_ctor_set(x_64, 1, x_63); -return x_64; +lean_inc(x_61); +lean_dec(x_58); +lean_ctor_set(x_52, 0, x_61); +x_63 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_63, 0, x_52); +lean_ctor_set(x_63, 1, x_62); +return x_63; } } else { -lean_object* x_65; lean_object* x_66; lean_object* x_67; lean_object* x_68; lean_object* x_69; lean_object* x_70; lean_object* x_71; lean_object* x_72; lean_object* x_73; lean_object* x_74; -x_65 = lean_ctor_get(x_53, 0); -x_66 = lean_ctor_get(x_53, 1); -lean_inc(x_66); +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_64 = lean_ctor_get(x_52, 0); +x_65 = lean_ctor_get(x_52, 1); lean_inc(x_65); -lean_dec(x_53); -x_67 = lean_array_get_size(x_65); -x_68 = l_Lean_Meta_FVarSubst_empty; -lean_inc(x_67); -x_69 = l_Nat_foldMAux___main___at_Lean_Meta_substCore___spec__1(x_6, x_65, x_67, x_67, x_68, x_13, x_54); -lean_dec(x_13); -lean_dec(x_67); -lean_dec(x_65); -x_70 = lean_ctor_get(x_69, 0); -lean_inc(x_70); -x_71 = lean_ctor_get(x_69, 1); -lean_inc(x_71); -if (lean_is_exclusive(x_69)) { - lean_ctor_release(x_69, 0); - lean_ctor_release(x_69, 1); - x_72 = x_69; -} else { - lean_dec_ref(x_69); - x_72 = lean_box(0); -} -x_73 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_73, 0, x_70); -lean_ctor_set(x_73, 1, x_66); -if (lean_is_scalar(x_72)) { - x_74 = lean_alloc_ctor(0, 2, 0); -} else { - x_74 = x_72; -} -lean_ctor_set(x_74, 0, x_73); -lean_ctor_set(x_74, 1, x_71); -return x_74; -} -} -else -{ -uint8_t x_75; -lean_dec(x_13); -x_75 = !lean_is_exclusive(x_52); -if (x_75 == 0) -{ -return x_52; -} -else -{ -lean_object* x_76; lean_object* x_77; lean_object* x_78; -x_76 = lean_ctor_get(x_52, 0); -x_77 = lean_ctor_get(x_52, 1); -lean_inc(x_77); -lean_inc(x_76); +lean_inc(x_64); lean_dec(x_52); -x_78 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_78, 0, x_76); -lean_ctor_set(x_78, 1, x_77); -return x_78; +x_66 = lean_array_get_size(x_64); +x_67 = l_Lean_Meta_FVarSubst_empty; +lean_inc(x_66); +x_68 = l_Nat_foldMAux___main___at_Lean_Meta_substCore___spec__1(x_6, x_64, x_66, x_66, x_67, x_13, x_53); +lean_dec(x_13); +lean_dec(x_66); +lean_dec(x_64); +x_69 = lean_ctor_get(x_68, 0); +lean_inc(x_69); +x_70 = lean_ctor_get(x_68, 1); +lean_inc(x_70); +if (lean_is_exclusive(x_68)) { + lean_ctor_release(x_68, 0); + lean_ctor_release(x_68, 1); + x_71 = x_68; +} else { + lean_dec_ref(x_68); + x_71 = lean_box(0); +} +x_72 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_72, 0, x_69); +lean_ctor_set(x_72, 1, x_65); +if (lean_is_scalar(x_71)) { + x_73 = lean_alloc_ctor(0, 2, 0); +} else { + x_73 = x_71; +} +lean_ctor_set(x_73, 0, x_72); +lean_ctor_set(x_73, 1, x_70); +return x_73; +} +} +else +{ +uint8_t x_74; +lean_dec(x_13); +x_74 = !lean_is_exclusive(x_51); +if (x_74 == 0) +{ +return x_51; +} +else +{ +lean_object* x_75; lean_object* x_76; lean_object* x_77; +x_75 = lean_ctor_get(x_51, 0); +x_76 = lean_ctor_get(x_51, 1); +lean_inc(x_76); +lean_inc(x_75); +lean_dec(x_51); +x_77 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_77, 0, x_75); +lean_ctor_set(x_77, 1, x_76); +return x_77; } } } else { -uint8_t x_79; +uint8_t x_78; lean_dec(x_13); lean_dec(x_7); -x_79 = !lean_is_exclusive(x_45); -if (x_79 == 0) +x_78 = !lean_is_exclusive(x_44); +if (x_78 == 0) { -return x_45; +return x_44; } else { -lean_object* x_80; lean_object* x_81; lean_object* x_82; -x_80 = lean_ctor_get(x_45, 0); -x_81 = lean_ctor_get(x_45, 1); -lean_inc(x_81); +lean_object* x_79; lean_object* x_80; lean_object* x_81; +x_79 = lean_ctor_get(x_44, 0); +x_80 = lean_ctor_get(x_44, 1); lean_inc(x_80); -lean_dec(x_45); -x_82 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_82, 0, x_80); -lean_ctor_set(x_82, 1, x_81); -return x_82; +lean_inc(x_79); +lean_dec(x_44); +x_81 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_81, 0, x_79); +lean_ctor_set(x_81, 1, x_80); +return x_81; } } } else { -uint8_t x_83; +uint8_t x_82; lean_dec(x_13); lean_dec(x_7); lean_dec(x_5); -x_83 = !lean_is_exclusive(x_42); -if (x_83 == 0) +x_82 = !lean_is_exclusive(x_41); +if (x_82 == 0) { -return x_42; +return x_41; } else { -lean_object* x_84; lean_object* x_85; lean_object* x_86; -x_84 = lean_ctor_get(x_42, 0); -x_85 = lean_ctor_get(x_42, 1); -lean_inc(x_85); +lean_object* x_83; lean_object* x_84; lean_object* x_85; +x_83 = lean_ctor_get(x_41, 0); +x_84 = lean_ctor_get(x_41, 1); lean_inc(x_84); -lean_dec(x_42); -x_86 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_86, 0, x_84); -lean_ctor_set(x_86, 1, x_85); -return x_86; +lean_inc(x_83); +lean_dec(x_41); +x_85 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_85, 0, x_83); +lean_ctor_set(x_85, 1, x_84); +return x_85; } } } else { -uint8_t x_87; -lean_dec(x_39); +uint8_t x_86; +lean_dec(x_38); lean_dec(x_13); lean_dec(x_7); lean_dec(x_5); lean_dec(x_1); -x_87 = !lean_is_exclusive(x_40); -if (x_87 == 0) +x_86 = !lean_is_exclusive(x_39); +if (x_86 == 0) { -return x_40; +return x_39; } else { -lean_object* x_88; lean_object* x_89; lean_object* x_90; -x_88 = lean_ctor_get(x_40, 0); -x_89 = lean_ctor_get(x_40, 1); -lean_inc(x_89); +lean_object* x_87; lean_object* x_88; lean_object* x_89; +x_87 = lean_ctor_get(x_39, 0); +x_88 = lean_ctor_get(x_39, 1); lean_inc(x_88); -lean_dec(x_40); -x_90 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_90, 0, x_88); -lean_ctor_set(x_90, 1, x_89); -return x_90; +lean_inc(x_87); +lean_dec(x_39); +x_89 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_89, 0, x_87); +lean_ctor_set(x_89, 1, x_88); +return x_89; } } } else { -uint8_t x_91; -lean_dec(x_34); +uint8_t x_90; +lean_dec(x_33); lean_dec(x_13); lean_dec(x_7); lean_dec(x_5); lean_dec(x_4); lean_dec(x_1); -x_91 = !lean_is_exclusive(x_36); -if (x_91 == 0) +x_90 = !lean_is_exclusive(x_35); +if (x_90 == 0) { -return x_36; +return x_35; } else { -lean_object* x_92; lean_object* x_93; lean_object* x_94; -x_92 = lean_ctor_get(x_36, 0); -x_93 = lean_ctor_get(x_36, 1); -lean_inc(x_93); +lean_object* x_91; lean_object* x_92; lean_object* x_93; +x_91 = lean_ctor_get(x_35, 0); +x_92 = lean_ctor_get(x_35, 1); lean_inc(x_92); -lean_dec(x_36); -x_94 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_94, 0, x_92); -lean_ctor_set(x_94, 1, x_93); -return x_94; +lean_inc(x_91); +lean_dec(x_35); +x_93 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_93, 0, x_91); +lean_ctor_set(x_93, 1, x_92); +return x_93; } } } } else { -uint8_t x_103; -lean_dec(x_24); +uint8_t x_102; lean_dec(x_19); lean_dec(x_15); lean_dec(x_13); @@ -734,399 +728,393 @@ lean_dec(x_7); lean_dec(x_5); lean_dec(x_4); lean_dec(x_3); +lean_dec(x_2); lean_dec(x_1); -x_103 = !lean_is_exclusive(x_25); -if (x_103 == 0) +x_102 = !lean_is_exclusive(x_25); +if (x_102 == 0) { return x_25; } else { -lean_object* x_104; lean_object* x_105; lean_object* x_106; -x_104 = lean_ctor_get(x_25, 0); -x_105 = lean_ctor_get(x_25, 1); -lean_inc(x_105); +lean_object* x_103; lean_object* x_104; lean_object* x_105; +x_103 = lean_ctor_get(x_25, 0); +x_104 = lean_ctor_get(x_25, 1); lean_inc(x_104); +lean_inc(x_103); lean_dec(x_25); -x_106 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_106, 0, x_104); -lean_ctor_set(x_106, 1, x_105); -return x_106; +x_105 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_105, 0, x_103); +lean_ctor_set(x_105, 1, x_104); +return x_105; } } } else { -lean_object* x_107; lean_object* x_108; lean_object* x_109; lean_object* x_110; lean_object* x_111; -x_107 = l_Lean_mkOptionalNode___closed__2; +lean_object* x_106; lean_object* x_107; lean_inc(x_2); -x_108 = lean_array_push(x_107, x_2); -x_109 = lean_expr_abstract(x_15, x_108); -lean_dec(x_108); -x_110 = lean_expr_instantiate1(x_109, x_19); -lean_dec(x_109); +x_106 = l_Lean_Expr_replaceFVar(x_15, x_2, x_19); lean_inc(x_13); lean_inc(x_19); -x_111 = l_Lean_Meta_mkEqRefl(x_19, x_13, x_18); +x_107 = l_Lean_Meta_mkEqRefl(x_19, x_13, x_18); +if (lean_obj_tag(x_107) == 0) +{ +lean_object* x_108; lean_object* x_109; lean_object* x_110; +x_108 = lean_ctor_get(x_107, 0); +lean_inc(x_108); +x_109 = lean_ctor_get(x_107, 1); +lean_inc(x_109); +lean_dec(x_107); +lean_inc(x_9); +x_110 = l_Lean_Expr_replaceFVar(x_106, x_9, x_108); +lean_dec(x_108); +lean_dec(x_106); +if (x_8 == 0) +{ +lean_object* x_111; +lean_inc(x_13); +lean_inc(x_2); +x_111 = l_Lean_Meta_mkEq(x_19, x_2, x_13, x_109); if (lean_obj_tag(x_111) == 0) { -lean_object* x_112; lean_object* x_113; lean_object* x_114; lean_object* x_115; lean_object* x_116; +lean_object* x_112; lean_object* x_113; lean_object* x_114; lean_object* x_115; uint8_t x_116; lean_object* x_117; x_112 = lean_ctor_get(x_111, 0); lean_inc(x_112); x_113 = lean_ctor_get(x_111, 1); lean_inc(x_113); lean_dec(x_111); lean_inc(x_9); -x_114 = lean_array_push(x_107, x_9); -x_115 = lean_expr_abstract(x_110, x_114); -lean_dec(x_110); -x_116 = lean_expr_instantiate1(x_115, x_112); -lean_dec(x_112); -lean_dec(x_115); -if (x_8 == 0) -{ -lean_object* x_117; +x_114 = lean_alloc_closure((void*)(l_Lean_Meta_substCore___lambda__1___boxed), 7, 4); +lean_closure_set(x_114, 0, x_15); +lean_closure_set(x_114, 1, x_9); +lean_closure_set(x_114, 2, x_10); +lean_closure_set(x_114, 3, x_2); +x_115 = l_Lean_Meta_substCore___lambda__2___closed__2; +x_116 = 0; lean_inc(x_13); -lean_inc(x_2); -x_117 = l_Lean_Meta_mkEq(x_19, x_2, x_13, x_113); +x_117 = l_Lean_Meta_withLocalDecl___rarg(x_115, x_112, x_116, x_114, x_13, x_113); if (lean_obj_tag(x_117) == 0) { -lean_object* x_118; lean_object* x_119; lean_object* x_120; lean_object* x_121; uint8_t x_122; lean_object* x_123; +lean_object* x_118; lean_object* x_119; lean_object* x_120; x_118 = lean_ctor_get(x_117, 0); lean_inc(x_118); x_119 = lean_ctor_get(x_117, 1); lean_inc(x_119); lean_dec(x_117); -x_120 = lean_alloc_closure((void*)(l_Lean_Meta_substCore___lambda__1___boxed), 7, 4); -lean_closure_set(x_120, 0, x_15); -lean_closure_set(x_120, 1, x_114); -lean_closure_set(x_120, 2, x_10); -lean_closure_set(x_120, 3, x_2); -x_121 = l_Lean_Meta_substCore___lambda__2___closed__2; -x_122 = 0; lean_inc(x_13); -x_123 = l_Lean_Meta_withLocalDecl___rarg(x_121, x_118, x_122, x_120, x_13, x_119); -if (lean_obj_tag(x_123) == 0) +x_120 = l_Lean_Meta_mkEqSymm(x_9, x_13, x_119); +if (lean_obj_tag(x_120) == 0) { -lean_object* x_124; lean_object* x_125; lean_object* x_126; -x_124 = lean_ctor_get(x_123, 0); -lean_inc(x_124); -x_125 = lean_ctor_get(x_123, 1); +lean_object* x_121; lean_object* x_122; uint8_t x_123; lean_object* x_124; lean_object* x_125; lean_object* x_126; lean_object* x_127; +x_121 = lean_ctor_get(x_120, 0); +lean_inc(x_121); +x_122 = lean_ctor_get(x_120, 1); +lean_inc(x_122); +lean_dec(x_120); +x_123 = 2; +lean_inc(x_13); +x_124 = l_Lean_Meta_mkFreshExprMVar(x_110, x_3, x_123, x_13, x_122); +x_125 = lean_ctor_get(x_124, 0); lean_inc(x_125); -lean_dec(x_123); +x_126 = lean_ctor_get(x_124, 1); +lean_inc(x_126); +lean_dec(x_124); lean_inc(x_13); -x_126 = l_Lean_Meta_mkEqSymm(x_9, x_13, x_125); -if (lean_obj_tag(x_126) == 0) +lean_inc(x_125); +x_127 = l_Lean_Meta_mkEqRec(x_118, x_125, x_121, x_13, x_126); +if (lean_obj_tag(x_127) == 0) { -lean_object* x_127; lean_object* x_128; uint8_t x_129; lean_object* x_130; lean_object* x_131; lean_object* x_132; lean_object* x_133; -x_127 = lean_ctor_get(x_126, 0); -lean_inc(x_127); -x_128 = lean_ctor_get(x_126, 1); +lean_object* x_128; lean_object* x_129; lean_object* x_130; lean_object* x_131; +x_128 = lean_ctor_get(x_127, 0); lean_inc(x_128); -lean_dec(x_126); -x_129 = 2; -lean_inc(x_13); -x_130 = l_Lean_Meta_mkFreshExprMVar(x_116, x_3, x_129, x_13, x_128); -x_131 = lean_ctor_get(x_130, 0); -lean_inc(x_131); -x_132 = lean_ctor_get(x_130, 1); +x_129 = lean_ctor_get(x_127, 1); +lean_inc(x_129); +lean_dec(x_127); +x_130 = l_Lean_Expr_mvarId_x21(x_125); +lean_dec(x_125); +x_131 = l_Lean_Meta_assignExprMVar(x_4, x_128, x_13, x_129); +if (lean_obj_tag(x_131) == 0) +{ +lean_object* x_132; lean_object* x_133; +x_132 = lean_ctor_get(x_131, 1); lean_inc(x_132); -lean_dec(x_130); -lean_inc(x_13); -lean_inc(x_131); -x_133 = l_Lean_Meta_mkEqRec(x_124, x_131, x_127, x_13, x_132); +lean_dec(x_131); +x_133 = l_Lean_Meta_clear(x_130, x_1, x_13, x_132); if (lean_obj_tag(x_133) == 0) { -lean_object* x_134; lean_object* x_135; lean_object* x_136; lean_object* x_137; +lean_object* x_134; lean_object* x_135; lean_object* x_136; x_134 = lean_ctor_get(x_133, 0); lean_inc(x_134); x_135 = lean_ctor_get(x_133, 1); lean_inc(x_135); lean_dec(x_133); -x_136 = l_Lean_Expr_mvarId_x21(x_131); -lean_dec(x_131); -x_137 = l_Lean_Meta_assignExprMVar(x_4, x_134, x_13, x_135); -if (lean_obj_tag(x_137) == 0) +x_136 = l_Lean_Meta_clear(x_134, x_5, x_13, x_135); +if (lean_obj_tag(x_136) == 0) { -lean_object* x_138; lean_object* x_139; -x_138 = lean_ctor_get(x_137, 1); +lean_object* x_137; lean_object* x_138; lean_object* x_139; lean_object* x_140; lean_object* x_141; uint8_t x_142; lean_object* x_143; +x_137 = lean_ctor_get(x_136, 0); +lean_inc(x_137); +x_138 = lean_ctor_get(x_136, 1); lean_inc(x_138); -lean_dec(x_137); -x_139 = l_Lean_Meta_clear(x_136, x_1, x_13, x_138); -if (lean_obj_tag(x_139) == 0) -{ -lean_object* x_140; lean_object* x_141; lean_object* x_142; -x_140 = lean_ctor_get(x_139, 0); -lean_inc(x_140); -x_141 = lean_ctor_get(x_139, 1); -lean_inc(x_141); -lean_dec(x_139); -x_142 = l_Lean_Meta_clear(x_140, x_5, x_13, x_141); -if (lean_obj_tag(x_142) == 0) -{ -lean_object* x_143; lean_object* x_144; lean_object* x_145; lean_object* x_146; lean_object* x_147; uint8_t x_148; lean_object* x_149; -x_143 = lean_ctor_get(x_142, 0); -lean_inc(x_143); -x_144 = lean_ctor_get(x_142, 1); -lean_inc(x_144); -lean_dec(x_142); -x_145 = lean_array_get_size(x_6); -x_146 = lean_unsigned_to_nat(2u); -x_147 = lean_nat_sub(x_145, x_146); -lean_dec(x_145); -x_148 = 0; -x_149 = l_Lean_Meta_introNCore___at_Lean_Meta_introN___spec__1(x_148, x_143, x_147, x_7, x_13, x_144); -if (lean_obj_tag(x_149) == 0) -{ -lean_object* x_150; lean_object* x_151; uint8_t x_152; -x_150 = lean_ctor_get(x_149, 0); -lean_inc(x_150); -x_151 = lean_ctor_get(x_149, 1); -lean_inc(x_151); -lean_dec(x_149); -x_152 = !lean_is_exclusive(x_150); -if (x_152 == 0) -{ -lean_object* x_153; lean_object* x_154; lean_object* x_155; lean_object* x_156; uint8_t x_157; -x_153 = lean_ctor_get(x_150, 0); -x_154 = lean_array_get_size(x_153); -x_155 = l_Lean_Meta_FVarSubst_empty; -lean_inc(x_154); -x_156 = l_Nat_foldMAux___main___at_Lean_Meta_substCore___spec__2(x_6, x_153, x_154, x_154, x_155, x_13, x_151); -lean_dec(x_13); -lean_dec(x_154); -lean_dec(x_153); -x_157 = !lean_is_exclusive(x_156); -if (x_157 == 0) -{ -lean_object* x_158; -x_158 = lean_ctor_get(x_156, 0); -lean_ctor_set(x_150, 0, x_158); -lean_ctor_set(x_156, 0, x_150); -return x_156; -} -else -{ -lean_object* x_159; lean_object* x_160; lean_object* x_161; -x_159 = lean_ctor_get(x_156, 0); -x_160 = lean_ctor_get(x_156, 1); -lean_inc(x_160); -lean_inc(x_159); -lean_dec(x_156); -lean_ctor_set(x_150, 0, x_159); -x_161 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_161, 0, x_150); -lean_ctor_set(x_161, 1, x_160); -return x_161; -} -} -else -{ -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; -x_162 = lean_ctor_get(x_150, 0); -x_163 = lean_ctor_get(x_150, 1); -lean_inc(x_163); -lean_inc(x_162); -lean_dec(x_150); -x_164 = lean_array_get_size(x_162); -x_165 = l_Lean_Meta_FVarSubst_empty; -lean_inc(x_164); -x_166 = l_Nat_foldMAux___main___at_Lean_Meta_substCore___spec__2(x_6, x_162, x_164, x_164, x_165, x_13, x_151); -lean_dec(x_13); -lean_dec(x_164); -lean_dec(x_162); -x_167 = lean_ctor_get(x_166, 0); -lean_inc(x_167); -x_168 = lean_ctor_get(x_166, 1); -lean_inc(x_168); -if (lean_is_exclusive(x_166)) { - lean_ctor_release(x_166, 0); - lean_ctor_release(x_166, 1); - x_169 = x_166; -} else { - lean_dec_ref(x_166); - x_169 = lean_box(0); -} -x_170 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_170, 0, x_167); -lean_ctor_set(x_170, 1, x_163); -if (lean_is_scalar(x_169)) { - x_171 = lean_alloc_ctor(0, 2, 0); -} else { - x_171 = x_169; -} -lean_ctor_set(x_171, 0, x_170); -lean_ctor_set(x_171, 1, x_168); -return x_171; -} -} -else -{ -uint8_t x_172; -lean_dec(x_13); -x_172 = !lean_is_exclusive(x_149); -if (x_172 == 0) -{ -return x_149; -} -else -{ -lean_object* x_173; lean_object* x_174; lean_object* x_175; -x_173 = lean_ctor_get(x_149, 0); -x_174 = lean_ctor_get(x_149, 1); -lean_inc(x_174); -lean_inc(x_173); -lean_dec(x_149); -x_175 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_175, 0, x_173); -lean_ctor_set(x_175, 1, x_174); -return x_175; -} -} -} -else -{ -uint8_t x_176; -lean_dec(x_13); -lean_dec(x_7); -x_176 = !lean_is_exclusive(x_142); -if (x_176 == 0) -{ -return x_142; -} -else -{ -lean_object* x_177; lean_object* x_178; lean_object* x_179; -x_177 = lean_ctor_get(x_142, 0); -x_178 = lean_ctor_get(x_142, 1); -lean_inc(x_178); -lean_inc(x_177); -lean_dec(x_142); -x_179 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_179, 0, x_177); -lean_ctor_set(x_179, 1, x_178); -return x_179; -} -} -} -else -{ -uint8_t x_180; -lean_dec(x_13); -lean_dec(x_7); -lean_dec(x_5); -x_180 = !lean_is_exclusive(x_139); -if (x_180 == 0) -{ -return x_139; -} -else -{ -lean_object* x_181; lean_object* x_182; lean_object* x_183; -x_181 = lean_ctor_get(x_139, 0); -x_182 = lean_ctor_get(x_139, 1); -lean_inc(x_182); -lean_inc(x_181); -lean_dec(x_139); -x_183 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_183, 0, x_181); -lean_ctor_set(x_183, 1, x_182); -return x_183; -} -} -} -else -{ -uint8_t x_184; lean_dec(x_136); -lean_dec(x_13); -lean_dec(x_7); -lean_dec(x_5); -lean_dec(x_1); -x_184 = !lean_is_exclusive(x_137); -if (x_184 == 0) +x_139 = lean_array_get_size(x_6); +x_140 = lean_unsigned_to_nat(2u); +x_141 = lean_nat_sub(x_139, x_140); +lean_dec(x_139); +x_142 = 0; +x_143 = l_Lean_Meta_introNCore___at_Lean_Meta_introN___spec__1(x_142, x_137, x_141, x_7, x_13, x_138); +if (lean_obj_tag(x_143) == 0) { -return x_137; +lean_object* x_144; lean_object* x_145; uint8_t x_146; +x_144 = lean_ctor_get(x_143, 0); +lean_inc(x_144); +x_145 = lean_ctor_get(x_143, 1); +lean_inc(x_145); +lean_dec(x_143); +x_146 = !lean_is_exclusive(x_144); +if (x_146 == 0) +{ +lean_object* x_147; lean_object* x_148; lean_object* x_149; lean_object* x_150; uint8_t x_151; +x_147 = lean_ctor_get(x_144, 0); +x_148 = lean_array_get_size(x_147); +x_149 = l_Lean_Meta_FVarSubst_empty; +lean_inc(x_148); +x_150 = l_Nat_foldMAux___main___at_Lean_Meta_substCore___spec__2(x_6, x_147, x_148, x_148, x_149, x_13, x_145); +lean_dec(x_13); +lean_dec(x_148); +lean_dec(x_147); +x_151 = !lean_is_exclusive(x_150); +if (x_151 == 0) +{ +lean_object* x_152; +x_152 = lean_ctor_get(x_150, 0); +lean_ctor_set(x_144, 0, x_152); +lean_ctor_set(x_150, 0, x_144); +return x_150; } else { -lean_object* x_185; lean_object* x_186; lean_object* x_187; -x_185 = lean_ctor_get(x_137, 0); -x_186 = lean_ctor_get(x_137, 1); -lean_inc(x_186); -lean_inc(x_185); -lean_dec(x_137); -x_187 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_187, 0, x_185); -lean_ctor_set(x_187, 1, x_186); -return x_187; +lean_object* x_153; lean_object* x_154; lean_object* x_155; +x_153 = lean_ctor_get(x_150, 0); +x_154 = lean_ctor_get(x_150, 1); +lean_inc(x_154); +lean_inc(x_153); +lean_dec(x_150); +lean_ctor_set(x_144, 0, x_153); +x_155 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_155, 0, x_144); +lean_ctor_set(x_155, 1, x_154); +return x_155; +} +} +else +{ +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_156 = lean_ctor_get(x_144, 0); +x_157 = lean_ctor_get(x_144, 1); +lean_inc(x_157); +lean_inc(x_156); +lean_dec(x_144); +x_158 = lean_array_get_size(x_156); +x_159 = l_Lean_Meta_FVarSubst_empty; +lean_inc(x_158); +x_160 = l_Nat_foldMAux___main___at_Lean_Meta_substCore___spec__2(x_6, x_156, x_158, x_158, x_159, x_13, x_145); +lean_dec(x_13); +lean_dec(x_158); +lean_dec(x_156); +x_161 = lean_ctor_get(x_160, 0); +lean_inc(x_161); +x_162 = lean_ctor_get(x_160, 1); +lean_inc(x_162); +if (lean_is_exclusive(x_160)) { + lean_ctor_release(x_160, 0); + lean_ctor_release(x_160, 1); + x_163 = x_160; +} else { + lean_dec_ref(x_160); + x_163 = lean_box(0); +} +x_164 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_164, 0, x_161); +lean_ctor_set(x_164, 1, x_157); +if (lean_is_scalar(x_163)) { + x_165 = lean_alloc_ctor(0, 2, 0); +} else { + x_165 = x_163; +} +lean_ctor_set(x_165, 0, x_164); +lean_ctor_set(x_165, 1, x_162); +return x_165; +} +} +else +{ +uint8_t x_166; +lean_dec(x_13); +x_166 = !lean_is_exclusive(x_143); +if (x_166 == 0) +{ +return x_143; +} +else +{ +lean_object* x_167; lean_object* x_168; lean_object* x_169; +x_167 = lean_ctor_get(x_143, 0); +x_168 = lean_ctor_get(x_143, 1); +lean_inc(x_168); +lean_inc(x_167); +lean_dec(x_143); +x_169 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_169, 0, x_167); +lean_ctor_set(x_169, 1, x_168); +return x_169; } } } else { -uint8_t x_188; -lean_dec(x_131); +uint8_t x_170; +lean_dec(x_13); +lean_dec(x_7); +x_170 = !lean_is_exclusive(x_136); +if (x_170 == 0) +{ +return x_136; +} +else +{ +lean_object* x_171; lean_object* x_172; lean_object* x_173; +x_171 = lean_ctor_get(x_136, 0); +x_172 = lean_ctor_get(x_136, 1); +lean_inc(x_172); +lean_inc(x_171); +lean_dec(x_136); +x_173 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_173, 0, x_171); +lean_ctor_set(x_173, 1, x_172); +return x_173; +} +} +} +else +{ +uint8_t x_174; lean_dec(x_13); lean_dec(x_7); lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_1); -x_188 = !lean_is_exclusive(x_133); -if (x_188 == 0) +x_174 = !lean_is_exclusive(x_133); +if (x_174 == 0) { return x_133; } else { -lean_object* x_189; lean_object* x_190; lean_object* x_191; -x_189 = lean_ctor_get(x_133, 0); -x_190 = lean_ctor_get(x_133, 1); -lean_inc(x_190); -lean_inc(x_189); +lean_object* x_175; lean_object* x_176; lean_object* x_177; +x_175 = lean_ctor_get(x_133, 0); +x_176 = lean_ctor_get(x_133, 1); +lean_inc(x_176); +lean_inc(x_175); lean_dec(x_133); -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_177 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_177, 0, x_175); +lean_ctor_set(x_177, 1, x_176); +return x_177; } } } else { -uint8_t x_192; -lean_dec(x_124); -lean_dec(x_116); +uint8_t x_178; +lean_dec(x_130); +lean_dec(x_13); +lean_dec(x_7); +lean_dec(x_5); +lean_dec(x_1); +x_178 = !lean_is_exclusive(x_131); +if (x_178 == 0) +{ +return x_131; +} +else +{ +lean_object* x_179; lean_object* x_180; lean_object* x_181; +x_179 = lean_ctor_get(x_131, 0); +x_180 = lean_ctor_get(x_131, 1); +lean_inc(x_180); +lean_inc(x_179); +lean_dec(x_131); +x_181 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_181, 0, x_179); +lean_ctor_set(x_181, 1, x_180); +return x_181; +} +} +} +else +{ +uint8_t x_182; +lean_dec(x_125); +lean_dec(x_13); +lean_dec(x_7); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_1); +x_182 = !lean_is_exclusive(x_127); +if (x_182 == 0) +{ +return x_127; +} +else +{ +lean_object* x_183; lean_object* x_184; lean_object* x_185; +x_183 = lean_ctor_get(x_127, 0); +x_184 = lean_ctor_get(x_127, 1); +lean_inc(x_184); +lean_inc(x_183); +lean_dec(x_127); +x_185 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_185, 0, x_183); +lean_ctor_set(x_185, 1, x_184); +return x_185; +} +} +} +else +{ +uint8_t x_186; +lean_dec(x_118); +lean_dec(x_110); lean_dec(x_13); lean_dec(x_7); lean_dec(x_5); lean_dec(x_4); lean_dec(x_3); lean_dec(x_1); -x_192 = !lean_is_exclusive(x_126); -if (x_192 == 0) +x_186 = !lean_is_exclusive(x_120); +if (x_186 == 0) { -return x_126; +return x_120; } else { -lean_object* x_193; lean_object* x_194; lean_object* x_195; -x_193 = lean_ctor_get(x_126, 0); -x_194 = lean_ctor_get(x_126, 1); -lean_inc(x_194); -lean_inc(x_193); -lean_dec(x_126); -x_195 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_195, 0, x_193); -lean_ctor_set(x_195, 1, x_194); -return x_195; +lean_object* x_187; lean_object* x_188; lean_object* x_189; +x_187 = lean_ctor_get(x_120, 0); +x_188 = lean_ctor_get(x_120, 1); +lean_inc(x_188); +lean_inc(x_187); +lean_dec(x_120); +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; } } } else { -uint8_t x_196; -lean_dec(x_116); +uint8_t x_190; +lean_dec(x_110); lean_dec(x_13); lean_dec(x_9); lean_dec(x_7); @@ -1134,384 +1122,30 @@ lean_dec(x_5); lean_dec(x_4); lean_dec(x_3); lean_dec(x_1); -x_196 = !lean_is_exclusive(x_123); -if (x_196 == 0) -{ -return x_123; -} -else -{ -lean_object* x_197; lean_object* x_198; lean_object* x_199; -x_197 = lean_ctor_get(x_123, 0); -x_198 = lean_ctor_get(x_123, 1); -lean_inc(x_198); -lean_inc(x_197); -lean_dec(x_123); -x_199 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_199, 0, x_197); -lean_ctor_set(x_199, 1, x_198); -return x_199; -} -} -} -else -{ -uint8_t x_200; -lean_dec(x_116); -lean_dec(x_114); -lean_dec(x_15); -lean_dec(x_13); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_7); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_200 = !lean_is_exclusive(x_117); -if (x_200 == 0) +x_190 = !lean_is_exclusive(x_117); +if (x_190 == 0) { return x_117; } else { -lean_object* x_201; lean_object* x_202; lean_object* x_203; -x_201 = lean_ctor_get(x_117, 0); -x_202 = lean_ctor_get(x_117, 1); -lean_inc(x_202); -lean_inc(x_201); +lean_object* x_191; lean_object* x_192; lean_object* x_193; +x_191 = lean_ctor_get(x_117, 0); +x_192 = lean_ctor_get(x_117, 1); +lean_inc(x_192); +lean_inc(x_191); lean_dec(x_117); -x_203 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_203, 0, x_201); -lean_ctor_set(x_203, 1, x_202); -return x_203; +x_193 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_193, 0, x_191); +lean_ctor_set(x_193, 1, x_192); +return x_193; } } } else { -lean_object* x_204; lean_object* x_205; lean_object* x_206; -lean_dec(x_114); -lean_dec(x_19); -x_204 = lean_array_push(x_10, x_2); -lean_inc(x_9); -x_205 = lean_array_push(x_204, x_9); -lean_inc(x_13); -x_206 = l_Lean_Meta_mkLambda(x_205, x_15, x_13, x_113); -if (lean_obj_tag(x_206) == 0) -{ -lean_object* x_207; lean_object* x_208; uint8_t x_209; lean_object* x_210; lean_object* x_211; lean_object* x_212; lean_object* x_213; -x_207 = lean_ctor_get(x_206, 0); -lean_inc(x_207); -x_208 = lean_ctor_get(x_206, 1); -lean_inc(x_208); -lean_dec(x_206); -x_209 = 2; -lean_inc(x_13); -x_210 = l_Lean_Meta_mkFreshExprMVar(x_116, x_3, x_209, x_13, x_208); -x_211 = lean_ctor_get(x_210, 0); -lean_inc(x_211); -x_212 = lean_ctor_get(x_210, 1); -lean_inc(x_212); -lean_dec(x_210); -lean_inc(x_13); -lean_inc(x_211); -x_213 = l_Lean_Meta_mkEqRec(x_207, x_211, x_9, x_13, x_212); -if (lean_obj_tag(x_213) == 0) -{ -lean_object* x_214; lean_object* x_215; lean_object* x_216; lean_object* x_217; -x_214 = lean_ctor_get(x_213, 0); -lean_inc(x_214); -x_215 = lean_ctor_get(x_213, 1); -lean_inc(x_215); -lean_dec(x_213); -x_216 = l_Lean_Expr_mvarId_x21(x_211); -lean_dec(x_211); -x_217 = l_Lean_Meta_assignExprMVar(x_4, x_214, x_13, x_215); -if (lean_obj_tag(x_217) == 0) -{ -lean_object* x_218; lean_object* x_219; -x_218 = lean_ctor_get(x_217, 1); -lean_inc(x_218); -lean_dec(x_217); -x_219 = l_Lean_Meta_clear(x_216, x_1, x_13, x_218); -if (lean_obj_tag(x_219) == 0) -{ -lean_object* x_220; lean_object* x_221; lean_object* x_222; -x_220 = lean_ctor_get(x_219, 0); -lean_inc(x_220); -x_221 = lean_ctor_get(x_219, 1); -lean_inc(x_221); -lean_dec(x_219); -x_222 = l_Lean_Meta_clear(x_220, x_5, x_13, x_221); -if (lean_obj_tag(x_222) == 0) -{ -lean_object* x_223; lean_object* x_224; lean_object* x_225; lean_object* x_226; lean_object* x_227; uint8_t x_228; lean_object* x_229; -x_223 = lean_ctor_get(x_222, 0); -lean_inc(x_223); -x_224 = lean_ctor_get(x_222, 1); -lean_inc(x_224); -lean_dec(x_222); -x_225 = lean_array_get_size(x_6); -x_226 = lean_unsigned_to_nat(2u); -x_227 = lean_nat_sub(x_225, x_226); -lean_dec(x_225); -x_228 = 0; -x_229 = l_Lean_Meta_introNCore___at_Lean_Meta_introN___spec__1(x_228, x_223, x_227, x_7, x_13, x_224); -if (lean_obj_tag(x_229) == 0) -{ -lean_object* x_230; lean_object* x_231; uint8_t x_232; -x_230 = lean_ctor_get(x_229, 0); -lean_inc(x_230); -x_231 = lean_ctor_get(x_229, 1); -lean_inc(x_231); -lean_dec(x_229); -x_232 = !lean_is_exclusive(x_230); -if (x_232 == 0) -{ -lean_object* x_233; lean_object* x_234; lean_object* x_235; lean_object* x_236; uint8_t x_237; -x_233 = lean_ctor_get(x_230, 0); -x_234 = lean_array_get_size(x_233); -x_235 = l_Lean_Meta_FVarSubst_empty; -lean_inc(x_234); -x_236 = l_Nat_foldMAux___main___at_Lean_Meta_substCore___spec__3(x_6, x_233, x_234, x_234, x_235, x_13, x_231); -lean_dec(x_13); -lean_dec(x_234); -lean_dec(x_233); -x_237 = !lean_is_exclusive(x_236); -if (x_237 == 0) -{ -lean_object* x_238; -x_238 = lean_ctor_get(x_236, 0); -lean_ctor_set(x_230, 0, x_238); -lean_ctor_set(x_236, 0, x_230); -return x_236; -} -else -{ -lean_object* x_239; lean_object* x_240; lean_object* x_241; -x_239 = lean_ctor_get(x_236, 0); -x_240 = lean_ctor_get(x_236, 1); -lean_inc(x_240); -lean_inc(x_239); -lean_dec(x_236); -lean_ctor_set(x_230, 0, x_239); -x_241 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_241, 0, x_230); -lean_ctor_set(x_241, 1, x_240); -return x_241; -} -} -else -{ -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; -x_242 = lean_ctor_get(x_230, 0); -x_243 = lean_ctor_get(x_230, 1); -lean_inc(x_243); -lean_inc(x_242); -lean_dec(x_230); -x_244 = lean_array_get_size(x_242); -x_245 = l_Lean_Meta_FVarSubst_empty; -lean_inc(x_244); -x_246 = l_Nat_foldMAux___main___at_Lean_Meta_substCore___spec__3(x_6, x_242, x_244, x_244, x_245, x_13, x_231); -lean_dec(x_13); -lean_dec(x_244); -lean_dec(x_242); -x_247 = lean_ctor_get(x_246, 0); -lean_inc(x_247); -x_248 = lean_ctor_get(x_246, 1); -lean_inc(x_248); -if (lean_is_exclusive(x_246)) { - lean_ctor_release(x_246, 0); - lean_ctor_release(x_246, 1); - x_249 = x_246; -} else { - lean_dec_ref(x_246); - x_249 = lean_box(0); -} -x_250 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_250, 0, x_247); -lean_ctor_set(x_250, 1, x_243); -if (lean_is_scalar(x_249)) { - x_251 = lean_alloc_ctor(0, 2, 0); -} else { - x_251 = x_249; -} -lean_ctor_set(x_251, 0, x_250); -lean_ctor_set(x_251, 1, x_248); -return x_251; -} -} -else -{ -uint8_t x_252; -lean_dec(x_13); -x_252 = !lean_is_exclusive(x_229); -if (x_252 == 0) -{ -return x_229; -} -else -{ -lean_object* x_253; lean_object* x_254; lean_object* x_255; -x_253 = lean_ctor_get(x_229, 0); -x_254 = lean_ctor_get(x_229, 1); -lean_inc(x_254); -lean_inc(x_253); -lean_dec(x_229); -x_255 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_255, 0, x_253); -lean_ctor_set(x_255, 1, x_254); -return x_255; -} -} -} -else -{ -uint8_t x_256; -lean_dec(x_13); -lean_dec(x_7); -x_256 = !lean_is_exclusive(x_222); -if (x_256 == 0) -{ -return x_222; -} -else -{ -lean_object* x_257; lean_object* x_258; lean_object* x_259; -x_257 = lean_ctor_get(x_222, 0); -x_258 = lean_ctor_get(x_222, 1); -lean_inc(x_258); -lean_inc(x_257); -lean_dec(x_222); -x_259 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_259, 0, x_257); -lean_ctor_set(x_259, 1, x_258); -return x_259; -} -} -} -else -{ -uint8_t x_260; -lean_dec(x_13); -lean_dec(x_7); -lean_dec(x_5); -x_260 = !lean_is_exclusive(x_219); -if (x_260 == 0) -{ -return x_219; -} -else -{ -lean_object* x_261; lean_object* x_262; lean_object* x_263; -x_261 = lean_ctor_get(x_219, 0); -x_262 = lean_ctor_get(x_219, 1); -lean_inc(x_262); -lean_inc(x_261); -lean_dec(x_219); -x_263 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_263, 0, x_261); -lean_ctor_set(x_263, 1, x_262); -return x_263; -} -} -} -else -{ -uint8_t x_264; -lean_dec(x_216); -lean_dec(x_13); -lean_dec(x_7); -lean_dec(x_5); -lean_dec(x_1); -x_264 = !lean_is_exclusive(x_217); -if (x_264 == 0) -{ -return x_217; -} -else -{ -lean_object* x_265; lean_object* x_266; lean_object* x_267; -x_265 = lean_ctor_get(x_217, 0); -x_266 = lean_ctor_get(x_217, 1); -lean_inc(x_266); -lean_inc(x_265); -lean_dec(x_217); -x_267 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_267, 0, x_265); -lean_ctor_set(x_267, 1, x_266); -return x_267; -} -} -} -else -{ -uint8_t x_268; -lean_dec(x_211); -lean_dec(x_13); -lean_dec(x_7); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_1); -x_268 = !lean_is_exclusive(x_213); -if (x_268 == 0) -{ -return x_213; -} -else -{ -lean_object* x_269; lean_object* x_270; lean_object* x_271; -x_269 = lean_ctor_get(x_213, 0); -x_270 = lean_ctor_get(x_213, 1); -lean_inc(x_270); -lean_inc(x_269); -lean_dec(x_213); -x_271 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_271, 0, x_269); -lean_ctor_set(x_271, 1, x_270); -return x_271; -} -} -} -else -{ -uint8_t x_272; -lean_dec(x_116); -lean_dec(x_13); -lean_dec(x_9); -lean_dec(x_7); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_1); -x_272 = !lean_is_exclusive(x_206); -if (x_272 == 0) -{ -return x_206; -} -else -{ -lean_object* x_273; lean_object* x_274; lean_object* x_275; -x_273 = lean_ctor_get(x_206, 0); -x_274 = lean_ctor_get(x_206, 1); -lean_inc(x_274); -lean_inc(x_273); -lean_dec(x_206); -x_275 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_275, 0, x_273); -lean_ctor_set(x_275, 1, x_274); -return x_275; -} -} -} -} -else -{ -uint8_t x_276; +uint8_t x_194; lean_dec(x_110); -lean_dec(x_19); lean_dec(x_15); lean_dec(x_13); lean_dec(x_10); @@ -1522,31 +1156,348 @@ lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); -x_276 = !lean_is_exclusive(x_111); -if (x_276 == 0) +x_194 = !lean_is_exclusive(x_111); +if (x_194 == 0) { return x_111; } else { -lean_object* x_277; lean_object* x_278; lean_object* x_279; -x_277 = lean_ctor_get(x_111, 0); -x_278 = lean_ctor_get(x_111, 1); -lean_inc(x_278); -lean_inc(x_277); +lean_object* x_195; lean_object* x_196; lean_object* x_197; +x_195 = lean_ctor_get(x_111, 0); +x_196 = lean_ctor_get(x_111, 1); +lean_inc(x_196); +lean_inc(x_195); lean_dec(x_111); -x_279 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_279, 0, x_277); -lean_ctor_set(x_279, 1, x_278); -return x_279; +x_197 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_197, 0, x_195); +lean_ctor_set(x_197, 1, x_196); +return x_197; } } } +else +{ +lean_object* x_198; lean_object* x_199; lean_object* x_200; +lean_dec(x_19); +x_198 = lean_array_push(x_10, x_2); +lean_inc(x_9); +x_199 = lean_array_push(x_198, x_9); +lean_inc(x_13); +x_200 = l_Lean_Meta_mkLambda(x_199, x_15, x_13, x_109); +if (lean_obj_tag(x_200) == 0) +{ +lean_object* x_201; lean_object* x_202; uint8_t x_203; lean_object* x_204; lean_object* x_205; lean_object* x_206; lean_object* x_207; +x_201 = lean_ctor_get(x_200, 0); +lean_inc(x_201); +x_202 = lean_ctor_get(x_200, 1); +lean_inc(x_202); +lean_dec(x_200); +x_203 = 2; +lean_inc(x_13); +x_204 = l_Lean_Meta_mkFreshExprMVar(x_110, x_3, x_203, x_13, x_202); +x_205 = lean_ctor_get(x_204, 0); +lean_inc(x_205); +x_206 = lean_ctor_get(x_204, 1); +lean_inc(x_206); +lean_dec(x_204); +lean_inc(x_13); +lean_inc(x_205); +x_207 = l_Lean_Meta_mkEqRec(x_201, x_205, x_9, x_13, x_206); +if (lean_obj_tag(x_207) == 0) +{ +lean_object* x_208; lean_object* x_209; lean_object* x_210; lean_object* x_211; +x_208 = lean_ctor_get(x_207, 0); +lean_inc(x_208); +x_209 = lean_ctor_get(x_207, 1); +lean_inc(x_209); +lean_dec(x_207); +x_210 = l_Lean_Expr_mvarId_x21(x_205); +lean_dec(x_205); +x_211 = l_Lean_Meta_assignExprMVar(x_4, x_208, x_13, x_209); +if (lean_obj_tag(x_211) == 0) +{ +lean_object* x_212; lean_object* x_213; +x_212 = lean_ctor_get(x_211, 1); +lean_inc(x_212); +lean_dec(x_211); +x_213 = l_Lean_Meta_clear(x_210, x_1, x_13, x_212); +if (lean_obj_tag(x_213) == 0) +{ +lean_object* x_214; lean_object* x_215; lean_object* x_216; +x_214 = lean_ctor_get(x_213, 0); +lean_inc(x_214); +x_215 = lean_ctor_get(x_213, 1); +lean_inc(x_215); +lean_dec(x_213); +x_216 = l_Lean_Meta_clear(x_214, x_5, x_13, x_215); +if (lean_obj_tag(x_216) == 0) +{ +lean_object* x_217; lean_object* x_218; lean_object* x_219; lean_object* x_220; lean_object* x_221; uint8_t x_222; lean_object* x_223; +x_217 = lean_ctor_get(x_216, 0); +lean_inc(x_217); +x_218 = lean_ctor_get(x_216, 1); +lean_inc(x_218); +lean_dec(x_216); +x_219 = lean_array_get_size(x_6); +x_220 = lean_unsigned_to_nat(2u); +x_221 = lean_nat_sub(x_219, x_220); +lean_dec(x_219); +x_222 = 0; +x_223 = l_Lean_Meta_introNCore___at_Lean_Meta_introN___spec__1(x_222, x_217, x_221, x_7, x_13, x_218); +if (lean_obj_tag(x_223) == 0) +{ +lean_object* x_224; lean_object* x_225; uint8_t x_226; +x_224 = lean_ctor_get(x_223, 0); +lean_inc(x_224); +x_225 = lean_ctor_get(x_223, 1); +lean_inc(x_225); +lean_dec(x_223); +x_226 = !lean_is_exclusive(x_224); +if (x_226 == 0) +{ +lean_object* x_227; lean_object* x_228; lean_object* x_229; lean_object* x_230; uint8_t x_231; +x_227 = lean_ctor_get(x_224, 0); +x_228 = lean_array_get_size(x_227); +x_229 = l_Lean_Meta_FVarSubst_empty; +lean_inc(x_228); +x_230 = l_Nat_foldMAux___main___at_Lean_Meta_substCore___spec__3(x_6, x_227, x_228, x_228, x_229, x_13, x_225); +lean_dec(x_13); +lean_dec(x_228); +lean_dec(x_227); +x_231 = !lean_is_exclusive(x_230); +if (x_231 == 0) +{ +lean_object* x_232; +x_232 = lean_ctor_get(x_230, 0); +lean_ctor_set(x_224, 0, x_232); +lean_ctor_set(x_230, 0, x_224); +return x_230; +} +else +{ +lean_object* x_233; lean_object* x_234; lean_object* x_235; +x_233 = lean_ctor_get(x_230, 0); +x_234 = lean_ctor_get(x_230, 1); +lean_inc(x_234); +lean_inc(x_233); +lean_dec(x_230); +lean_ctor_set(x_224, 0, x_233); +x_235 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_235, 0, x_224); +lean_ctor_set(x_235, 1, x_234); +return x_235; +} +} +else +{ +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; +x_236 = lean_ctor_get(x_224, 0); +x_237 = lean_ctor_get(x_224, 1); +lean_inc(x_237); +lean_inc(x_236); +lean_dec(x_224); +x_238 = lean_array_get_size(x_236); +x_239 = l_Lean_Meta_FVarSubst_empty; +lean_inc(x_238); +x_240 = l_Nat_foldMAux___main___at_Lean_Meta_substCore___spec__3(x_6, x_236, x_238, x_238, x_239, x_13, x_225); +lean_dec(x_13); +lean_dec(x_238); +lean_dec(x_236); +x_241 = lean_ctor_get(x_240, 0); +lean_inc(x_241); +x_242 = lean_ctor_get(x_240, 1); +lean_inc(x_242); +if (lean_is_exclusive(x_240)) { + lean_ctor_release(x_240, 0); + lean_ctor_release(x_240, 1); + x_243 = x_240; +} else { + lean_dec_ref(x_240); + x_243 = lean_box(0); +} +x_244 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_244, 0, x_241); +lean_ctor_set(x_244, 1, x_237); +if (lean_is_scalar(x_243)) { + x_245 = lean_alloc_ctor(0, 2, 0); +} else { + x_245 = x_243; +} +lean_ctor_set(x_245, 0, x_244); +lean_ctor_set(x_245, 1, x_242); +return x_245; +} +} +else +{ +uint8_t x_246; +lean_dec(x_13); +x_246 = !lean_is_exclusive(x_223); +if (x_246 == 0) +{ +return x_223; +} +else +{ +lean_object* x_247; lean_object* x_248; lean_object* x_249; +x_247 = lean_ctor_get(x_223, 0); +x_248 = lean_ctor_get(x_223, 1); +lean_inc(x_248); +lean_inc(x_247); +lean_dec(x_223); +x_249 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_249, 0, x_247); +lean_ctor_set(x_249, 1, x_248); +return x_249; +} +} +} +else +{ +uint8_t x_250; +lean_dec(x_13); +lean_dec(x_7); +x_250 = !lean_is_exclusive(x_216); +if (x_250 == 0) +{ +return x_216; +} +else +{ +lean_object* x_251; lean_object* x_252; lean_object* x_253; +x_251 = lean_ctor_get(x_216, 0); +x_252 = lean_ctor_get(x_216, 1); +lean_inc(x_252); +lean_inc(x_251); +lean_dec(x_216); +x_253 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_253, 0, x_251); +lean_ctor_set(x_253, 1, x_252); +return x_253; +} +} +} +else +{ +uint8_t x_254; +lean_dec(x_13); +lean_dec(x_7); +lean_dec(x_5); +x_254 = !lean_is_exclusive(x_213); +if (x_254 == 0) +{ +return x_213; +} +else +{ +lean_object* x_255; lean_object* x_256; lean_object* x_257; +x_255 = lean_ctor_get(x_213, 0); +x_256 = lean_ctor_get(x_213, 1); +lean_inc(x_256); +lean_inc(x_255); +lean_dec(x_213); +x_257 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_257, 0, x_255); +lean_ctor_set(x_257, 1, x_256); +return x_257; +} +} +} +else +{ +uint8_t x_258; +lean_dec(x_210); +lean_dec(x_13); +lean_dec(x_7); +lean_dec(x_5); +lean_dec(x_1); +x_258 = !lean_is_exclusive(x_211); +if (x_258 == 0) +{ +return x_211; +} +else +{ +lean_object* x_259; lean_object* x_260; lean_object* x_261; +x_259 = lean_ctor_get(x_211, 0); +x_260 = lean_ctor_get(x_211, 1); +lean_inc(x_260); +lean_inc(x_259); +lean_dec(x_211); +x_261 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_261, 0, x_259); +lean_ctor_set(x_261, 1, x_260); +return x_261; +} +} +} +else +{ +uint8_t x_262; +lean_dec(x_205); +lean_dec(x_13); +lean_dec(x_7); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_1); +x_262 = !lean_is_exclusive(x_207); +if (x_262 == 0) +{ +return x_207; +} +else +{ +lean_object* x_263; lean_object* x_264; lean_object* x_265; +x_263 = lean_ctor_get(x_207, 0); +x_264 = lean_ctor_get(x_207, 1); +lean_inc(x_264); +lean_inc(x_263); +lean_dec(x_207); +x_265 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_265, 0, x_263); +lean_ctor_set(x_265, 1, x_264); +return x_265; +} +} +} +else +{ +uint8_t x_266; +lean_dec(x_110); +lean_dec(x_13); +lean_dec(x_9); +lean_dec(x_7); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_1); +x_266 = !lean_is_exclusive(x_200); +if (x_266 == 0) +{ +return x_200; +} +else +{ +lean_object* x_267; lean_object* x_268; lean_object* x_269; +x_267 = lean_ctor_get(x_200, 0); +x_268 = lean_ctor_get(x_200, 1); +lean_inc(x_268); +lean_inc(x_267); +lean_dec(x_200); +x_269 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_269, 0, x_267); +lean_ctor_set(x_269, 1, x_268); +return x_269; +} +} } } else { -uint8_t x_290; +uint8_t x_270; +lean_dec(x_106); +lean_dec(x_19); lean_dec(x_15); lean_dec(x_13); lean_dec(x_10); @@ -1557,23 +1508,58 @@ lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); -x_290 = !lean_is_exclusive(x_16); -if (x_290 == 0) +x_270 = !lean_is_exclusive(x_107); +if (x_270 == 0) +{ +return x_107; +} +else +{ +lean_object* x_271; lean_object* x_272; lean_object* x_273; +x_271 = lean_ctor_get(x_107, 0); +x_272 = lean_ctor_get(x_107, 1); +lean_inc(x_272); +lean_inc(x_271); +lean_dec(x_107); +x_273 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_273, 0, x_271); +lean_ctor_set(x_273, 1, x_272); +return x_273; +} +} +} +} +} +else +{ +uint8_t x_284; +lean_dec(x_15); +lean_dec(x_13); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_7); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_284 = !lean_is_exclusive(x_16); +if (x_284 == 0) { return x_16; } else { -lean_object* x_291; lean_object* x_292; lean_object* x_293; -x_291 = lean_ctor_get(x_16, 0); -x_292 = lean_ctor_get(x_16, 1); -lean_inc(x_292); -lean_inc(x_291); +lean_object* x_285; lean_object* x_286; lean_object* x_287; +x_285 = lean_ctor_get(x_16, 0); +x_286 = lean_ctor_get(x_16, 1); +lean_inc(x_286); +lean_inc(x_285); lean_dec(x_16); -x_293 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_293, 0, x_291); -lean_ctor_set(x_293, 1, x_292); -return x_293; +x_287 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_287, 0, x_285); +lean_ctor_set(x_287, 1, x_286); +return x_287; } } } @@ -2355,7 +2341,6 @@ _start: { lean_object* x_8; x_8 = l_Lean_Meta_substCore___lambda__1(x_1, x_2, x_3, x_4, x_5, x_6, x_7); -lean_dec(x_2); lean_dec(x_1); return x_8; } diff --git a/stage0/stdlib/Lean/Meta/WHNF.c b/stage0/stdlib/Lean/Meta/WHNF.c index a967406847..49f26536b2 100644 --- a/stage0/stdlib/Lean/Meta/WHNF.c +++ b/stage0/stdlib/Lean/Meta/WHNF.c @@ -71,7 +71,6 @@ lean_object* l_Lean_Meta_unfoldDefinition_x3f(lean_object*, lean_object*, lean_o lean_object* l___private_Lean_Util_WHNF_4__toCtorWhenK___at_Lean_Meta_whnfCore___spec__5(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_WHNF_reduceQuotRec___at_Lean_Meta_unfoldDefinition_x3f___spec__7(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_WHNF_unfoldDefinitionAux___at_Lean_Meta_unfoldDefinition_x3f___spec__1(lean_object*, lean_object*, lean_object*); -extern lean_object* l_Lean_Meta_Exception_Inhabited___closed__1; lean_object* l___private_Lean_Util_WHNF_3__getRecRuleFor(lean_object*, lean_object*); lean_object* l_Lean_Meta_whnfUntil___boxed(lean_object*, lean_object*, lean_object*, lean_object*); size_t l_USize_shiftRight(size_t, size_t); @@ -228,6 +227,7 @@ lean_object* l_Lean_WHNF_isRecStuck_x3f___at_Lean_Meta_unfoldDefinition_x3f___sp lean_object* l_Lean_Meta_reduceNat_x3f___lambda__1___boxed(lean_object*); lean_object* l_Lean_Meta_reduceBinNatOp___closed__8; lean_object* l_Lean_Meta_reduceNative_x3f(lean_object*, lean_object*, lean_object*); +extern lean_object* l_Lean_Meta_Exception_Inhabited___closed__2; lean_object* l_Lean_Meta_reduceNative_x3f___closed__4; lean_object* l_Lean_MonadTracerAdapter_addTrace___at_Lean_Meta_isLevelDefEqAux___main___spec__1(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Lean_Meta_WHNF_3__cache(uint8_t, lean_object*, lean_object*, lean_object*, lean_object*); @@ -11072,28 +11072,32 @@ lean_inc(x_5); x_6 = l_Lean_Environment_evalConstCheck___rarg(x_5, x_1, x_2); if (lean_obj_tag(x_6) == 0) { -lean_object* x_7; lean_object* x_8; lean_object* x_9; +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_6, 0); lean_inc(x_7); lean_dec(x_6); -x_8 = lean_alloc_ctor(22, 1, 0); +x_8 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_8, 0, x_7); -x_9 = lean_alloc_ctor(1, 2, 0); +x_9 = lean_alloc_ctor(0, 1, 0); lean_ctor_set(x_9, 0, x_8); -lean_ctor_set(x_9, 1, x_4); -return x_9; -} -else -{ -lean_object* x_10; lean_object* x_11; -x_10 = lean_ctor_get(x_6, 0); -lean_inc(x_10); -lean_dec(x_6); -x_11 = lean_alloc_ctor(0, 2, 0); +x_10 = lean_alloc_ctor(22, 1, 0); +lean_ctor_set(x_10, 0, x_9); +x_11 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_11, 0, x_10); lean_ctor_set(x_11, 1, x_4); return x_11; } +else +{ +lean_object* x_12; lean_object* x_13; +x_12 = lean_ctor_get(x_6, 0); +lean_inc(x_12); +lean_dec(x_6); +x_13 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_13, 0, x_12); +lean_ctor_set(x_13, 1, x_4); +return x_13; +} } } lean_object* l_Lean_Meta_reduceNativeConst(lean_object* x_1) { @@ -11153,7 +11157,7 @@ lean_object* l_Lean_Meta_reduceBoolNative___rarg(lean_object* x_1) { _start: { lean_object* x_2; lean_object* x_3; -x_2 = l_Lean_Meta_Exception_Inhabited___closed__1; +x_2 = l_Lean_Meta_Exception_Inhabited___closed__2; x_3 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_3, 0, x_2); lean_ctor_set(x_3, 1, x_1); @@ -11182,7 +11186,7 @@ lean_object* l_Lean_Meta_reduceNatNative___rarg(lean_object* x_1) { _start: { lean_object* x_2; lean_object* x_3; -x_2 = l_Lean_Meta_Exception_Inhabited___closed__1; +x_2 = l_Lean_Meta_Exception_Inhabited___closed__2; x_3 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_3, 0, x_2); lean_ctor_set(x_3, 1, x_1); diff --git a/stage0/stdlib/Lean/PrettyPrinter/Parenthesizer.c b/stage0/stdlib/Lean/PrettyPrinter/Parenthesizer.c index 830aedd549..25ffecd38e 100644 --- a/stage0/stdlib/Lean/PrettyPrinter/Parenthesizer.c +++ b/stage0/stdlib/Lean/PrettyPrinter/Parenthesizer.c @@ -25,6 +25,7 @@ lean_object* l___regBuiltin_Lean_PrettyPrinter_Parenthesizer_try_parenthesizer__ extern lean_object* l_Lean_Parser_Syntax_many___elambda__1___closed__1; extern lean_object* l_Lean_Name_toString___closed__1; lean_object* l_Lean_PrettyPrinter_Parenthesizer_commentBody_parenthesizer___rarg___boxed(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_PrettyPrinter_Parenthesizer_termParser_parenthesizer___closed__5; lean_object* l_Lean_PrettyPrinter_Parenthesizer_numLitNoAntiquot_parenthesizer(lean_object*, lean_object*); lean_object* l_Lean_Syntax_MonadTraverser_setCur___at_Lean_PrettyPrinter_Parenthesizer_visitParenthesizable___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___regBuiltin_Lean_PrettyPrinter_Parenthesizer_rawIdent_parenthesizer___closed__1; @@ -69,6 +70,7 @@ extern lean_object* l_Lean_Expr_hasSorry___main___closed__1; lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkStackTop_parenthesizer___boxed(lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_withPosition_parenthesizer___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_identNoAntiquot_parenthesizer___boxed(lean_object*, lean_object*); +lean_object* l_Lean_PrettyPrinter_Parenthesizer_visitAntiquot___closed__7; lean_object* l___regBuiltin_Lean_PrettyPrinter_Parenthesizer_strLitNoAntiquot_parenthesizer___closed__1; lean_object* l___regBuiltin_Lean_PrettyPrinter_Parenthesizer_andthen_parenthesizer(lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_withPosition_parenthesizer___closed__1; @@ -109,6 +111,7 @@ extern lean_object* l_Lean_Name_toExprAux___main___closed__1; lean_object* l___regBuiltin_Lean_PrettyPrinter_Parenthesizer_withPosition_parenthesizer___closed__3; lean_object* l_Lean_PrettyPrinter_Parenthesizer_visit___main___closed__10; lean_object* l_Lean_PrettyPrinter_Parenthesizer_levelParser_parenthesizer___closed__1; +lean_object* l_Lean_PrettyPrinter_Parenthesizer_termParser_parenthesizer___closed__4; lean_object* l_Lean_PrettyPrinter_Parenthesizer_levelParser_parenthesizer___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_visit(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Syntax_MonadTraverser_goUp___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__4___rarg(lean_object*, lean_object*, lean_object*); @@ -236,6 +239,7 @@ lean_object* l_Lean_PrettyPrinter_parenthesizeCommand___closed__2; lean_object* l___regBuiltin_Lean_PrettyPrinter_Parenthesizer_checkPrec_parenthesizer___closed__1; uint8_t lean_nat_dec_eq(lean_object*, lean_object*); lean_object* l___regBuiltin_Lean_PrettyPrinter_Parenthesizer_checkStackTop_parenthesizer(lean_object*); +lean_object* l_Lean_PrettyPrinter_Parenthesizer_evalString___closed__2; lean_object* l_Lean_PrettyPrinter_mkParenthesizerAttribute___lambda__1___closed__2; extern lean_object* l_Lean_Option_format___rarg___closed__1; lean_object* l_Lean_PrettyPrinter_Parenthesizer_visitParenthesizable___closed__17; @@ -263,6 +267,7 @@ lean_object* l___regBuiltin_Lean_PrettyPrinter_Parenthesizer_checkPrec_parenthes extern lean_object* l_Lean_Parser_Tactic_seq___elambda__1___closed__3; lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkWsBefore_parenthesizer(lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_rawIdent_parenthesizer___rarg___boxed(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_PrettyPrinter_Parenthesizer_evalNat___closed__3; lean_object* l___regBuiltin_Lean_PrettyPrinter_Parenthesizer_tacticParser_parenthesizer___closed__1; lean_object* l_Lean_PrettyPrinter_Parenthesizer_charLitNoAntiquot_parenthesizer(lean_object*, lean_object*); lean_object* l___regBuiltin_Lean_PrettyPrinter_Parenthesizer_sepBy_parenthesizer___closed__1; @@ -367,6 +372,7 @@ lean_object* l_Std_PersistentHashMap_findAux___main___at_Lean_PrettyPrinter_Pare lean_object* l___regBuiltin_Lean_PrettyPrinter_Parenthesizer_numLitNoAntiquot_parenthesizer___closed__3; lean_object* l_Lean_Meta_whnf(lean_object*, lean_object*, lean_object*); lean_object* l___regBuiltin_Lean_PrettyPrinter_Parenthesizer_optional_parenthesizer___closed__1; +lean_object* l_Lean_PrettyPrinter_Parenthesizer_evalOptPrec___closed__2; lean_object* l_Lean_PrettyPrinter_Parenthesizer_visit___main___closed__9; uint8_t l_Lean_Elab_Term_Quotation_isAntiquot(lean_object*); lean_object* l___regBuiltin_Lean_PrettyPrinter_Parenthesizer_many_parenthesizer___closed__1; @@ -405,6 +411,7 @@ lean_object* l_Lean_PrettyPrinter_Parenthesizer_visitParenthesizable___closed__6 lean_object* l_Lean_Syntax_getHeadInfo___main(lean_object*); lean_object* l_StateT_get___at_Lean_PrettyPrinter_Parenthesizer_ParenthesizerM_monadTraverser___spec__1(lean_object*, lean_object*, lean_object*); lean_object* l___regBuiltin_Lean_PrettyPrinter_Parenthesizer_quotedSymbol_parenthesizer___closed__2; +lean_object* l_Lean_PrettyPrinter_Parenthesizer_evalNat___closed__2; lean_object* l_Lean_PrettyPrinter_Parenthesizer_visitAntiquot___closed__1; extern lean_object* l_Lean_quotedSymbolKind___closed__1; lean_object* l_Lean_Syntax_MonadTraverser_goRight___at_Lean_PrettyPrinter_Parenthesizer_visitParenthesizable___spec__3___rarg(lean_object*, lean_object*, lean_object*); @@ -415,6 +422,7 @@ lean_object* l_Lean_PrettyPrinter_Parenthesizer_ParenthesizerM_monadTraverser___ lean_object* l_Lean_PrettyPrinter_Parenthesizer_evalName(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkNoWsBefore_parenthesizer___boxed(lean_object*, lean_object*); lean_object* l___regBuiltin_Lean_PrettyPrinter_Parenthesizer_checkPrec_parenthesizer(lean_object*); +lean_object* l_Lean_PrettyPrinter_Parenthesizer_visitAntiquot___closed__8; lean_object* l_Std_PersistentArray_push___rarg(lean_object*, lean_object*); lean_object* l___regBuiltin_Lean_PrettyPrinter_Parenthesizer_orelse_parenthesizer___closed__2; lean_object* l_ReaderT_pure___at_Lean_PrettyPrinter_Parenthesizer_monadQuotation___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -445,6 +453,7 @@ lean_object* l___regBuiltin_Lean_PrettyPrinter_Parenthesizer_checkStackTop_paren lean_object* l___regBuiltin_Lean_PrettyPrinter_Parenthesizer_nonReservedSymbol_parenthesizer___closed__3; lean_object* l_Lean_PrettyPrinter_mkParenthesizerAttribute___closed__8; lean_object* l_Lean_PrettyPrinter_Parenthesizer_checkStackTop_parenthesizer(lean_object*, lean_object*); +lean_object* l_Lean_PrettyPrinter_Parenthesizer_evalName___main___closed__6; lean_object* l_Lean_Syntax_MonadTraverser_getIdx___at_Lean_PrettyPrinter_Parenthesizer_visitParenthesizable___spec__1___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_ParenthesizerM_monadTraverser___lambda__1___boxed(lean_object*); lean_object* l_Lean_Syntax_getArgs(lean_object*); @@ -471,6 +480,7 @@ lean_object* l___regBuiltin_Lean_PrettyPrinter_Parenthesizer_checkNoWsBefore_par lean_object* l___regBuiltin_Lean_PrettyPrinter_Parenthesizer_nonReservedSymbol_parenthesizer___closed__2; lean_object* l___regBuiltin_Lean_PrettyPrinter_Parenthesizer_orelse_parenthesizer___closed__1; lean_object* l_Lean_SMap_empty___at_Lean_PrettyPrinter_parenthesizerAttribute___spec__1___closed__1; +lean_object* l_Lean_PrettyPrinter_Parenthesizer_visit___main___closed__11; lean_object* l_Lean_PrettyPrinter_Parenthesizer_identNoAntiquot_parenthesizer(lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_parenthesizeCommand___closed__1; lean_object* l_Lean_PrettyPrinter_mkParenthesizerAttribute___closed__9; @@ -480,11 +490,13 @@ lean_object* l_Lean_PrettyPrinter_Parenthesizer_evalNat___boxed(lean_object*, le lean_object* l_Lean_PrettyPrinter_Parenthesizer_evalNat___closed__1; lean_object* l_Lean_PrettyPrinter_Parenthesizer_visitParenthesizable___closed__14; lean_object* l___regBuiltin_Lean_PrettyPrinter_Parenthesizer_termParser_parenthesizer___closed__2; +lean_object* l_Lean_PrettyPrinter_Parenthesizer_visit___main___closed__12; lean_object* l___regBuiltin_Lean_PrettyPrinter_Parenthesizer_trailingNode_parenthesizer___closed__1; lean_object* l_Lean_PrettyPrinter_Parenthesizer_nonReservedSymbol_parenthesizer(lean_object*, lean_object*); lean_object* l_Lean_PrettyPrinter_Parenthesizer_tacticParser_parenthesizer___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Syntax_MonadTraverser_goUp___at_Lean_PrettyPrinter_Parenthesizer_visitArgs___spec__4(lean_object*); lean_object* l___regBuiltin_Lean_PrettyPrinter_Parenthesizer_withPosition_parenthesizer(lean_object*); +lean_object* l_Lean_PrettyPrinter_Parenthesizer_evalString___closed__3; lean_object* l_Nat_forMAux___main___at_Lean_PrettyPrinter_Parenthesizer_many1_parenthesizer___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Expr_constName_x3f(lean_object*); lean_object* l___regBuiltin_Lean_PrettyPrinter_Parenthesizer_termParser_parenthesizer(lean_object*); @@ -522,6 +534,7 @@ lean_object* l_Lean_PrettyPrinter_Parenthesizer_visitAntiquot___closed__6; lean_object* l___regBuiltin_Lean_PrettyPrinter_Parenthesizer_rawIdent_parenthesizer(lean_object*); lean_object* l_Lean_PrettyPrinter_parenthesizeTerm___closed__2; lean_object* l_Lean_PrettyPrinter_Parenthesizer_withPosition_parenthesizer(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_PrettyPrinter_Parenthesizer_evalOptPrec___closed__3; lean_object* l_Lean_PrettyPrinter_Parenthesizer_termParser_parenthesizer___closed__2; lean_object* l___regBuiltin_Lean_PrettyPrinter_Parenthesizer_unquotedSymbol_parenthesizer___closed__1; lean_object* l_Lean_PrettyPrinter_Parenthesizer_trailingNode_parenthesizer___lambda__1___closed__2; @@ -582,6 +595,7 @@ lean_object* l_Std_AssocList_find_x3f___main___at_Lean_PrettyPrinter_Parenthesiz lean_object* l_Lean_PrettyPrinter_Parenthesizer_strLitNoAntiquot_parenthesizer___rarg(lean_object*, lean_object*, lean_object*); lean_object* l___regBuiltin_Lean_PrettyPrinter_Parenthesizer_unquotedSymbol_parenthesizer(lean_object*); lean_object* l_Std_PersistentHashMap_findAtAux___main___at_Lean_PrettyPrinter_Parenthesizer_visit___main___spec__5___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_PrettyPrinter_Parenthesizer_evalName___main___closed__7; lean_object* l_Lean_PrettyPrinter_Parenthesizer_addPrecCheck___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___regBuiltin_Lean_PrettyPrinter_Parenthesizer_nameLitNoAntiquot_parenthesizer___closed__1; extern lean_object* l_Lean_MetavarContext_MkBinding_mkBinding___closed__1; @@ -2379,9 +2393,11 @@ return x_1; lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_visit___main___closed__5() { _start: { -lean_object* x_1; -x_1 = lean_mk_string("parenthesizing"); -return x_1; +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_PrettyPrinter_Parenthesizer_visit___main___closed__4; +x_2 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; } } lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_visit___main___closed__6() { @@ -2389,7 +2405,7 @@ _start: { lean_object* x_1; lean_object* x_2; x_1 = l_Lean_PrettyPrinter_Parenthesizer_visit___main___closed__5; -x_2 = lean_alloc_ctor(2, 1, 0); +x_2 = lean_alloc_ctor(0, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } @@ -2397,19 +2413,19 @@ return x_2; lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_visit___main___closed__7() { _start: { -lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_PrettyPrinter_Parenthesizer_visit___main___closed__6; -x_2 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_2, 0, x_1); -return x_2; +lean_object* x_1; +x_1 = lean_mk_string("parenthesizing"); +return x_1; } } lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_visit___main___closed__8() { _start: { -lean_object* x_1; -x_1 = lean_mk_string("using"); -return x_1; +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_PrettyPrinter_Parenthesizer_visit___main___closed__7; +x_2 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; } } lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_visit___main___closed__9() { @@ -2417,7 +2433,7 @@ _start: { lean_object* x_1; lean_object* x_2; x_1 = l_Lean_PrettyPrinter_Parenthesizer_visit___main___closed__8; -x_2 = lean_alloc_ctor(2, 1, 0); +x_2 = lean_alloc_ctor(0, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } @@ -2425,8 +2441,26 @@ return x_2; lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_visit___main___closed__10() { _start: { +lean_object* x_1; +x_1 = lean_mk_string("using"); +return x_1; +} +} +lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_visit___main___closed__11() { +_start: +{ lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_PrettyPrinter_Parenthesizer_visit___main___closed__9; +x_1 = l_Lean_PrettyPrinter_Parenthesizer_visit___main___closed__10; +x_2 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_visit___main___closed__12() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_PrettyPrinter_Parenthesizer_visit___main___closed__11; x_2 = lean_alloc_ctor(0, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; @@ -2452,7 +2486,7 @@ lean_inc(x_4); x_12 = l_Lean_WHNF_whnfCore___main___at_Lean_Meta_whnfCore___spec__1(x_1, x_4, x_8); if (lean_obj_tag(x_12) == 0) { -lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_93; lean_object* x_94; lean_object* x_123; uint8_t x_124; +lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_101; lean_object* x_102; lean_object* x_131; uint8_t x_132; x_13 = lean_ctor_get(x_12, 0); lean_inc(x_13); x_14 = lean_ctor_get(x_12, 1); @@ -2461,36 +2495,36 @@ lean_dec(x_12); x_15 = l_Lean_Expr_getAppFn___main(x_13); x_16 = l_Lean_Expr_constName_x3f(x_15); lean_dec(x_15); -x_123 = lean_ctor_get(x_14, 4); -lean_inc(x_123); -x_124 = lean_ctor_get_uint8(x_123, sizeof(void*)*1); -lean_dec(x_123); -if (x_124 == 0) +x_131 = lean_ctor_get(x_14, 4); +lean_inc(x_131); +x_132 = lean_ctor_get_uint8(x_131, sizeof(void*)*1); +lean_dec(x_131); +if (x_132 == 0) { -uint8_t x_125; lean_object* x_126; -x_125 = 0; -x_126 = lean_box(x_125); -lean_ctor_set(x_7, 0, x_126); -x_93 = x_7; -x_94 = x_14; -goto block_122; +uint8_t x_133; lean_object* x_134; +x_133 = 0; +x_134 = lean_box(x_133); +lean_ctor_set(x_7, 0, x_134); +x_101 = x_7; +x_102 = x_14; +goto block_130; } else { -lean_object* x_127; lean_object* x_128; lean_object* x_129; lean_object* x_130; -x_127 = l_Lean_PrettyPrinter_Parenthesizer_visit___main___closed__3; -x_128 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_Meta_check___spec__3(x_127, x_4, x_14); -x_129 = lean_ctor_get(x_128, 0); -lean_inc(x_129); -x_130 = lean_ctor_get(x_128, 1); -lean_inc(x_130); -lean_dec(x_128); -lean_ctor_set(x_7, 0, x_129); -x_93 = x_7; -x_94 = x_130; -goto block_122; +lean_object* x_135; lean_object* x_136; lean_object* x_137; lean_object* x_138; +x_135 = l_Lean_PrettyPrinter_Parenthesizer_visit___main___closed__3; +x_136 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_Meta_check___spec__3(x_135, x_4, x_14); +x_137 = lean_ctor_get(x_136, 0); +lean_inc(x_137); +x_138 = lean_ctor_get(x_136, 1); +lean_inc(x_138); +lean_dec(x_136); +lean_ctor_set(x_7, 0, x_137); +x_101 = x_7; +x_102 = x_138; +goto block_130; } -block_92: +block_100: { lean_object* x_19; lean_object* x_20; lean_object* x_21; x_19 = lean_ctor_get(x_17, 1); @@ -2500,62 +2534,62 @@ x_20 = lean_ctor_get(x_18, 0); lean_inc(x_20); if (lean_obj_tag(x_16) == 0) { -lean_object* x_80; -lean_dec(x_20); -x_80 = lean_box(0); -x_21 = x_80; -goto block_79; -} -else -{ -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_81 = lean_ctor_get(x_16, 0); -lean_inc(x_81); -x_82 = l_Lean_PrettyPrinter_parenthesizerAttribute; -x_83 = lean_ctor_get(x_82, 1); -lean_inc(x_83); -x_84 = l_Lean_PersistentEnvExtension_getState___rarg(x_83, x_20); -lean_dec(x_20); -lean_dec(x_83); -x_85 = lean_ctor_get(x_84, 1); -lean_inc(x_85); -lean_dec(x_84); -x_86 = l_Lean_SMap_find_x3f___at_Lean_PrettyPrinter_Parenthesizer_visit___main___spec__2(x_85, x_81); -lean_dec(x_81); -if (lean_obj_tag(x_86) == 0) -{ -lean_object* x_87; -x_87 = lean_box(0); -x_21 = x_87; -goto block_79; -} -else -{ lean_object* x_88; -x_88 = lean_ctor_get(x_86, 0); -lean_inc(x_88); -lean_dec(x_86); -if (lean_obj_tag(x_88) == 0) -{ -lean_object* x_89; -x_89 = lean_box(0); -x_21 = x_89; -goto block_79; +lean_dec(x_20); +x_88 = lean_box(0); +x_21 = x_88; +goto block_87; } else { -lean_object* x_90; lean_object* x_91; +lean_object* x_89; lean_object* x_90; lean_object* x_91; lean_object* x_92; lean_object* x_93; lean_object* x_94; +x_89 = lean_ctor_get(x_16, 0); +lean_inc(x_89); +x_90 = l_Lean_PrettyPrinter_parenthesizerAttribute; +x_91 = lean_ctor_get(x_90, 1); +lean_inc(x_91); +x_92 = l_Lean_PersistentEnvExtension_getState___rarg(x_91, x_20); +lean_dec(x_20); +lean_dec(x_91); +x_93 = lean_ctor_get(x_92, 1); +lean_inc(x_93); +lean_dec(x_92); +x_94 = l_Lean_SMap_find_x3f___at_Lean_PrettyPrinter_Parenthesizer_visit___main___spec__2(x_93, x_89); +lean_dec(x_89); +if (lean_obj_tag(x_94) == 0) +{ +lean_object* x_95; +x_95 = lean_box(0); +x_21 = x_95; +goto block_87; +} +else +{ +lean_object* x_96; +x_96 = lean_ctor_get(x_94, 0); +lean_inc(x_96); +lean_dec(x_94); +if (lean_obj_tag(x_96) == 0) +{ +lean_object* x_97; +x_97 = lean_box(0); +x_21 = x_97; +goto block_87; +} +else +{ +lean_object* x_98; lean_object* x_99; lean_dec(x_16); lean_dec(x_10); -x_90 = lean_ctor_get(x_88, 0); -lean_inc(x_90); -lean_dec(x_88); -x_91 = lean_apply_5(x_90, x_13, x_2, x_19, x_4, x_18); -return x_91; +x_98 = lean_ctor_get(x_96, 0); +lean_inc(x_98); +lean_dec(x_96); +x_99 = lean_apply_5(x_98, x_13, x_2, x_19, x_4, x_18); +return x_99; } } } -block_79: +block_87: { lean_dec(x_21); if (lean_obj_tag(x_16) == 0) @@ -2579,777 +2613,819 @@ lean_dec(x_2); x_24 = !lean_is_exclusive(x_22); if (x_24 == 0) { -lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; +lean_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; x_25 = lean_ctor_get(x_22, 0); lean_dec(x_25); x_26 = lean_expr_dbg_to_string(x_13); lean_dec(x_13); -x_27 = l_Lean_PrettyPrinter_Parenthesizer_visit___main___closed__4; -x_28 = lean_string_append(x_27, x_26); -lean_dec(x_26); -x_29 = l_Char_HasRepr___closed__1; -x_30 = lean_string_append(x_28, x_29); -x_31 = lean_alloc_ctor(22, 1, 0); -lean_ctor_set(x_31, 0, x_30); +x_27 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_27, 0, x_26); +x_28 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_28, 0, x_27); +x_29 = l_Lean_PrettyPrinter_Parenthesizer_visit___main___closed__6; +x_30 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_30, 0, x_29); +lean_ctor_set(x_30, 1, x_28); +x_31 = l_Lean_Elab_Term_mkConst___closed__4; +x_32 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_32, 0, x_30); +lean_ctor_set(x_32, 1, x_31); +x_33 = lean_alloc_ctor(22, 1, 0); +lean_ctor_set(x_33, 0, x_32); lean_ctor_set_tag(x_22, 1); -lean_ctor_set(x_22, 0, x_31); +lean_ctor_set(x_22, 0, x_33); return x_22; } else { -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_32 = lean_ctor_get(x_22, 1); -lean_inc(x_32); +lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; +x_34 = lean_ctor_get(x_22, 1); +lean_inc(x_34); lean_dec(x_22); -x_33 = lean_expr_dbg_to_string(x_13); +x_35 = lean_expr_dbg_to_string(x_13); lean_dec(x_13); -x_34 = l_Lean_PrettyPrinter_Parenthesizer_visit___main___closed__4; -x_35 = lean_string_append(x_34, x_33); -lean_dec(x_33); -x_36 = l_Char_HasRepr___closed__1; -x_37 = lean_string_append(x_35, x_36); -x_38 = lean_alloc_ctor(22, 1, 0); -lean_ctor_set(x_38, 0, x_37); -x_39 = lean_alloc_ctor(1, 2, 0); +x_36 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_36, 0, x_35); +x_37 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_37, 0, x_36); +x_38 = l_Lean_PrettyPrinter_Parenthesizer_visit___main___closed__6; +x_39 = lean_alloc_ctor(9, 2, 0); lean_ctor_set(x_39, 0, x_38); -lean_ctor_set(x_39, 1, x_32); -return x_39; +lean_ctor_set(x_39, 1, x_37); +x_40 = l_Lean_Elab_Term_mkConst___closed__4; +x_41 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_41, 0, x_39); +lean_ctor_set(x_41, 1, x_40); +x_42 = lean_alloc_ctor(22, 1, 0); +lean_ctor_set(x_42, 0, x_41); +x_43 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_43, 0, x_42); +lean_ctor_set(x_43, 1, x_34); +return x_43; } } else { -lean_object* x_40; lean_object* x_41; +lean_object* x_44; lean_object* x_45; lean_dec(x_13); -x_40 = lean_ctor_get(x_22, 1); -lean_inc(x_40); +x_44 = lean_ctor_get(x_22, 1); +lean_inc(x_44); lean_dec(x_22); -x_41 = lean_ctor_get(x_23, 0); -lean_inc(x_41); +x_45 = lean_ctor_get(x_23, 0); +lean_inc(x_45); lean_dec(x_23); -x_1 = x_41; +x_1 = x_45; x_3 = x_19; -x_5 = x_40; +x_5 = x_44; goto _start; } } else { -uint8_t x_43; +uint8_t x_47; lean_dec(x_19); lean_dec(x_13); lean_dec(x_4); lean_dec(x_2); -x_43 = !lean_is_exclusive(x_22); -if (x_43 == 0) +x_47 = !lean_is_exclusive(x_22); +if (x_47 == 0) { return x_22; } else { -lean_object* x_44; lean_object* x_45; lean_object* x_46; -x_44 = lean_ctor_get(x_22, 0); -x_45 = lean_ctor_get(x_22, 1); -lean_inc(x_45); -lean_inc(x_44); +lean_object* x_48; lean_object* x_49; lean_object* x_50; +x_48 = lean_ctor_get(x_22, 0); +x_49 = lean_ctor_get(x_22, 1); +lean_inc(x_49); +lean_inc(x_48); lean_dec(x_22); -x_46 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_46, 0, x_44); -lean_ctor_set(x_46, 1, x_45); -return x_46; +x_50 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_50, 0, x_48); +lean_ctor_set(x_50, 1, x_49); +return x_50; } } } else { -lean_object* x_47; lean_object* x_48; uint8_t x_49; -x_47 = lean_ctor_get(x_16, 0); -lean_inc(x_47); +lean_object* x_51; lean_object* x_52; uint8_t x_53; +x_51 = lean_ctor_get(x_16, 0); +lean_inc(x_51); lean_dec(x_16); -x_48 = l_Lean_choiceKind___closed__2; -x_49 = lean_name_eq(x_47, x_48); -lean_dec(x_47); -if (x_49 == 0) +x_52 = l_Lean_choiceKind___closed__2; +x_53 = lean_name_eq(x_51, x_52); +lean_dec(x_51); +if (x_53 == 0) { -lean_object* x_50; +lean_object* x_54; lean_dec(x_10); lean_inc(x_4); lean_inc(x_13); -x_50 = l_Lean_WHNF_unfoldDefinitionAux___at_Lean_Meta_unfoldDefinition_x3f___spec__1(x_13, x_4, x_18); -if (lean_obj_tag(x_50) == 0) +x_54 = l_Lean_WHNF_unfoldDefinitionAux___at_Lean_Meta_unfoldDefinition_x3f___spec__1(x_13, x_4, x_18); +if (lean_obj_tag(x_54) == 0) { -lean_object* x_51; -x_51 = lean_ctor_get(x_50, 0); -lean_inc(x_51); -if (lean_obj_tag(x_51) == 0) +lean_object* x_55; +x_55 = lean_ctor_get(x_54, 0); +lean_inc(x_55); +if (lean_obj_tag(x_55) == 0) { -uint8_t x_52; +uint8_t x_56; lean_dec(x_19); lean_dec(x_4); lean_dec(x_2); -x_52 = !lean_is_exclusive(x_50); -if (x_52 == 0) +x_56 = !lean_is_exclusive(x_54); +if (x_56 == 0) { -lean_object* x_53; lean_object* x_54; lean_object* x_55; lean_object* x_56; lean_object* x_57; lean_object* x_58; lean_object* x_59; -x_53 = lean_ctor_get(x_50, 0); -lean_dec(x_53); -x_54 = lean_expr_dbg_to_string(x_13); +lean_object* x_57; lean_object* x_58; lean_object* x_59; lean_object* x_60; lean_object* x_61; lean_object* x_62; lean_object* x_63; lean_object* x_64; lean_object* x_65; +x_57 = lean_ctor_get(x_54, 0); +lean_dec(x_57); +x_58 = lean_expr_dbg_to_string(x_13); lean_dec(x_13); -x_55 = l_Lean_PrettyPrinter_Parenthesizer_visit___main___closed__4; -x_56 = lean_string_append(x_55, x_54); -lean_dec(x_54); -x_57 = l_Char_HasRepr___closed__1; -x_58 = lean_string_append(x_56, x_57); -x_59 = lean_alloc_ctor(22, 1, 0); +x_59 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_59, 0, x_58); -lean_ctor_set_tag(x_50, 1); -lean_ctor_set(x_50, 0, x_59); -return x_50; +x_60 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_60, 0, x_59); +x_61 = l_Lean_PrettyPrinter_Parenthesizer_visit___main___closed__6; +x_62 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_62, 0, x_61); +lean_ctor_set(x_62, 1, x_60); +x_63 = l_Lean_Elab_Term_mkConst___closed__4; +x_64 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_64, 0, x_62); +lean_ctor_set(x_64, 1, x_63); +x_65 = lean_alloc_ctor(22, 1, 0); +lean_ctor_set(x_65, 0, x_64); +lean_ctor_set_tag(x_54, 1); +lean_ctor_set(x_54, 0, x_65); +return x_54; } else { -lean_object* x_60; lean_object* x_61; lean_object* x_62; lean_object* x_63; lean_object* x_64; lean_object* x_65; lean_object* x_66; lean_object* x_67; -x_60 = lean_ctor_get(x_50, 1); -lean_inc(x_60); -lean_dec(x_50); -x_61 = lean_expr_dbg_to_string(x_13); +lean_object* x_66; lean_object* x_67; lean_object* x_68; lean_object* x_69; lean_object* x_70; lean_object* x_71; lean_object* x_72; lean_object* x_73; lean_object* x_74; lean_object* x_75; +x_66 = lean_ctor_get(x_54, 1); +lean_inc(x_66); +lean_dec(x_54); +x_67 = lean_expr_dbg_to_string(x_13); lean_dec(x_13); -x_62 = l_Lean_PrettyPrinter_Parenthesizer_visit___main___closed__4; -x_63 = lean_string_append(x_62, x_61); -lean_dec(x_61); -x_64 = l_Char_HasRepr___closed__1; -x_65 = lean_string_append(x_63, x_64); -x_66 = lean_alloc_ctor(22, 1, 0); -lean_ctor_set(x_66, 0, x_65); -x_67 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_67, 0, x_66); -lean_ctor_set(x_67, 1, x_60); -return x_67; +x_68 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_68, 0, x_67); +x_69 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_69, 0, x_68); +x_70 = l_Lean_PrettyPrinter_Parenthesizer_visit___main___closed__6; +x_71 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_71, 0, x_70); +lean_ctor_set(x_71, 1, x_69); +x_72 = l_Lean_Elab_Term_mkConst___closed__4; +x_73 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_73, 0, x_71); +lean_ctor_set(x_73, 1, x_72); +x_74 = lean_alloc_ctor(22, 1, 0); +lean_ctor_set(x_74, 0, x_73); +x_75 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_75, 0, x_74); +lean_ctor_set(x_75, 1, x_66); +return x_75; } } else { -lean_object* x_68; lean_object* x_69; +lean_object* x_76; lean_object* x_77; lean_dec(x_13); -x_68 = lean_ctor_get(x_50, 1); -lean_inc(x_68); -lean_dec(x_50); -x_69 = lean_ctor_get(x_51, 0); -lean_inc(x_69); -lean_dec(x_51); -x_1 = x_69; +x_76 = lean_ctor_get(x_54, 1); +lean_inc(x_76); +lean_dec(x_54); +x_77 = lean_ctor_get(x_55, 0); +lean_inc(x_77); +lean_dec(x_55); +x_1 = x_77; x_3 = x_19; -x_5 = x_68; +x_5 = x_76; goto _start; } } else { -uint8_t x_71; +uint8_t x_79; lean_dec(x_19); lean_dec(x_13); lean_dec(x_4); lean_dec(x_2); -x_71 = !lean_is_exclusive(x_50); -if (x_71 == 0) +x_79 = !lean_is_exclusive(x_54); +if (x_79 == 0) { -return x_50; +return x_54; } else { -lean_object* x_72; lean_object* x_73; lean_object* x_74; -x_72 = lean_ctor_get(x_50, 0); -x_73 = lean_ctor_get(x_50, 1); -lean_inc(x_73); -lean_inc(x_72); -lean_dec(x_50); -x_74 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_74, 0, x_72); -lean_ctor_set(x_74, 1, x_73); -return x_74; +lean_object* x_80; lean_object* x_81; lean_object* x_82; +x_80 = lean_ctor_get(x_54, 0); +x_81 = lean_ctor_get(x_54, 1); +lean_inc(x_81); +lean_inc(x_80); +lean_dec(x_54); +x_82 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_82, 0, x_80); +lean_ctor_set(x_82, 1, x_81); +return x_82; } } } else { -lean_object* x_75; lean_object* x_76; lean_object* x_77; lean_object* x_78; +lean_object* x_83; lean_object* x_84; lean_object* x_85; lean_object* x_86; lean_dec(x_13); -x_75 = l_Lean_Syntax_getArgs(x_10); +x_83 = l_Lean_Syntax_getArgs(x_10); lean_dec(x_10); -x_76 = lean_array_get_size(x_75); -lean_dec(x_75); -lean_inc(x_76); -x_77 = lean_alloc_closure((void*)(l_Nat_forMAux___main___at_Lean_PrettyPrinter_Parenthesizer_visit___main___spec__1___boxed), 6, 2); -lean_closure_set(x_77, 0, x_76); -lean_closure_set(x_77, 1, x_76); -x_78 = l_Lean_PrettyPrinter_Parenthesizer_visitArgs(x_77, x_2, x_19, x_4, x_18); -return x_78; +x_84 = lean_array_get_size(x_83); +lean_dec(x_83); +lean_inc(x_84); +x_85 = lean_alloc_closure((void*)(l_Nat_forMAux___main___at_Lean_PrettyPrinter_Parenthesizer_visit___main___spec__1___boxed), 6, 2); +lean_closure_set(x_85, 0, x_84); +lean_closure_set(x_85, 1, x_84); +x_86 = l_Lean_PrettyPrinter_Parenthesizer_visitArgs(x_85, x_2, x_19, x_4, x_18); +return x_86; } } } } -block_122: +block_130: { -lean_object* x_95; uint8_t x_96; -x_95 = lean_ctor_get(x_93, 0); -lean_inc(x_95); -x_96 = lean_unbox(x_95); -lean_dec(x_95); -if (x_96 == 0) -{ -uint8_t x_97; -x_97 = !lean_is_exclusive(x_93); -if (x_97 == 0) -{ -lean_object* x_98; lean_object* x_99; -x_98 = lean_ctor_get(x_93, 0); -lean_dec(x_98); -x_99 = lean_box(0); -lean_ctor_set(x_93, 0, x_99); -x_17 = x_93; -x_18 = x_94; -goto block_92; -} -else -{ -lean_object* x_100; lean_object* x_101; lean_object* x_102; -x_100 = lean_ctor_get(x_93, 1); -lean_inc(x_100); -lean_dec(x_93); -x_101 = lean_box(0); -x_102 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_102, 0, x_101); -lean_ctor_set(x_102, 1, x_100); -x_17 = x_102; -x_18 = x_94; -goto block_92; -} -} -else -{ -lean_object* x_103; lean_object* x_104; lean_object* x_105; lean_object* x_106; lean_object* x_107; lean_object* x_108; lean_object* x_109; lean_object* x_110; lean_object* x_111; lean_object* x_112; lean_object* x_113; 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_103 = lean_ctor_get(x_93, 1); +lean_object* x_103; uint8_t x_104; +x_103 = lean_ctor_get(x_101, 0); lean_inc(x_103); -lean_dec(x_93); -lean_inc(x_10); -x_104 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_104, 0, x_10); -x_105 = l_Lean_MessageData_ofList___closed__3; -x_106 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_106, 0, x_105); -lean_ctor_set(x_106, 1, x_104); -x_107 = lean_unsigned_to_nat(2u); -x_108 = lean_alloc_ctor(7, 2, 0); -lean_ctor_set(x_108, 0, x_107); -lean_ctor_set(x_108, 1, x_106); -x_109 = l_Lean_PrettyPrinter_Parenthesizer_visit___main___closed__7; -x_110 = lean_alloc_ctor(9, 2, 0); +x_104 = lean_unbox(x_103); +lean_dec(x_103); +if (x_104 == 0) +{ +uint8_t x_105; +x_105 = !lean_is_exclusive(x_101); +if (x_105 == 0) +{ +lean_object* x_106; lean_object* x_107; +x_106 = lean_ctor_get(x_101, 0); +lean_dec(x_106); +x_107 = lean_box(0); +lean_ctor_set(x_101, 0, x_107); +x_17 = x_101; +x_18 = x_102; +goto block_100; +} +else +{ +lean_object* x_108; lean_object* x_109; lean_object* x_110; +x_108 = lean_ctor_get(x_101, 1); +lean_inc(x_108); +lean_dec(x_101); +x_109 = lean_box(0); +x_110 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_110, 0, x_109); lean_ctor_set(x_110, 1, x_108); -x_111 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_111, 0, x_110); -lean_ctor_set(x_111, 1, x_105); -x_112 = l_Lean_PrettyPrinter_Parenthesizer_visit___main___closed__10; -x_113 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_113, 0, x_111); -lean_ctor_set(x_113, 1, x_112); -lean_inc(x_13); -x_114 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_114, 0, x_13); -x_115 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_115, 0, x_105); -lean_ctor_set(x_115, 1, x_114); +x_17 = x_110; +x_18 = x_102; +goto block_100; +} +} +else +{ +lean_object* x_111; lean_object* x_112; lean_object* x_113; lean_object* x_114; lean_object* x_115; lean_object* x_116; lean_object* x_117; lean_object* x_118; lean_object* x_119; lean_object* x_120; lean_object* x_121; lean_object* x_122; lean_object* x_123; lean_object* x_124; lean_object* x_125; lean_object* x_126; lean_object* x_127; lean_object* x_128; lean_object* x_129; +x_111 = lean_ctor_get(x_101, 1); +lean_inc(x_111); +lean_dec(x_101); +lean_inc(x_10); +x_112 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_112, 0, x_10); +x_113 = l_Lean_MessageData_ofList___closed__3; +x_114 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_114, 0, x_113); +lean_ctor_set(x_114, 1, x_112); +x_115 = lean_unsigned_to_nat(2u); x_116 = lean_alloc_ctor(7, 2, 0); -lean_ctor_set(x_116, 0, x_107); -lean_ctor_set(x_116, 1, x_115); -x_117 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_117, 0, x_113); -lean_ctor_set(x_117, 1, x_116); -x_118 = l_Lean_PrettyPrinter_Parenthesizer_visit___main___closed__3; -x_119 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_visit___main___spec__8(x_118, x_117, x_2, x_103, x_4, x_94); -x_120 = lean_ctor_get(x_119, 0); -lean_inc(x_120); -x_121 = lean_ctor_get(x_119, 1); -lean_inc(x_121); -lean_dec(x_119); -x_17 = x_120; -x_18 = x_121; -goto block_92; +lean_ctor_set(x_116, 0, x_115); +lean_ctor_set(x_116, 1, x_114); +x_117 = l_Lean_PrettyPrinter_Parenthesizer_visit___main___closed__9; +x_118 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_118, 0, x_117); +lean_ctor_set(x_118, 1, x_116); +x_119 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_119, 0, x_118); +lean_ctor_set(x_119, 1, x_113); +x_120 = l_Lean_PrettyPrinter_Parenthesizer_visit___main___closed__12; +x_121 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_121, 0, x_119); +lean_ctor_set(x_121, 1, x_120); +lean_inc(x_13); +x_122 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_122, 0, x_13); +x_123 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_123, 0, x_113); +lean_ctor_set(x_123, 1, x_122); +x_124 = lean_alloc_ctor(7, 2, 0); +lean_ctor_set(x_124, 0, x_115); +lean_ctor_set(x_124, 1, x_123); +x_125 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_125, 0, x_121); +lean_ctor_set(x_125, 1, x_124); +x_126 = l_Lean_PrettyPrinter_Parenthesizer_visit___main___closed__3; +x_127 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_visit___main___spec__8(x_126, x_125, x_2, x_111, x_4, x_102); +x_128 = lean_ctor_get(x_127, 0); +lean_inc(x_128); +x_129 = lean_ctor_get(x_127, 1); +lean_inc(x_129); +lean_dec(x_127); +x_17 = x_128; +x_18 = x_129; +goto block_100; } } } else { -uint8_t x_131; +uint8_t x_139; lean_free_object(x_7); lean_dec(x_11); lean_dec(x_10); lean_dec(x_4); lean_dec(x_2); -x_131 = !lean_is_exclusive(x_12); -if (x_131 == 0) +x_139 = !lean_is_exclusive(x_12); +if (x_139 == 0) { return x_12; } else { -lean_object* x_132; lean_object* x_133; lean_object* x_134; -x_132 = lean_ctor_get(x_12, 0); -x_133 = lean_ctor_get(x_12, 1); -lean_inc(x_133); -lean_inc(x_132); +lean_object* x_140; lean_object* x_141; lean_object* x_142; +x_140 = lean_ctor_get(x_12, 0); +x_141 = lean_ctor_get(x_12, 1); +lean_inc(x_141); +lean_inc(x_140); lean_dec(x_12); -x_134 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_134, 0, x_132); -lean_ctor_set(x_134, 1, x_133); -return x_134; +x_142 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_142, 0, x_140); +lean_ctor_set(x_142, 1, x_141); +return x_142; } } } else { -lean_object* x_135; lean_object* x_136; lean_object* x_137; -x_135 = lean_ctor_get(x_7, 0); -x_136 = lean_ctor_get(x_7, 1); -lean_inc(x_136); -lean_inc(x_135); +lean_object* x_143; lean_object* x_144; lean_object* x_145; +x_143 = lean_ctor_get(x_7, 0); +x_144 = lean_ctor_get(x_7, 1); +lean_inc(x_144); +lean_inc(x_143); lean_dec(x_7); lean_inc(x_4); -x_137 = l_Lean_WHNF_whnfCore___main___at_Lean_Meta_whnfCore___spec__1(x_1, x_4, x_8); -if (lean_obj_tag(x_137) == 0) +x_145 = l_Lean_WHNF_whnfCore___main___at_Lean_Meta_whnfCore___spec__1(x_1, x_4, x_8); +if (lean_obj_tag(x_145) == 0) { -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_204; lean_object* x_205; lean_object* x_232; uint8_t x_233; -x_138 = lean_ctor_get(x_137, 0); -lean_inc(x_138); -x_139 = lean_ctor_get(x_137, 1); -lean_inc(x_139); -lean_dec(x_137); -x_140 = l_Lean_Expr_getAppFn___main(x_138); -x_141 = l_Lean_Expr_constName_x3f(x_140); -lean_dec(x_140); -x_232 = lean_ctor_get(x_139, 4); -lean_inc(x_232); -x_233 = lean_ctor_get_uint8(x_232, sizeof(void*)*1); -lean_dec(x_232); -if (x_233 == 0) -{ -uint8_t x_234; lean_object* x_235; lean_object* x_236; -x_234 = 0; -x_235 = lean_box(x_234); -x_236 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_236, 0, x_235); -lean_ctor_set(x_236, 1, x_136); -x_204 = x_236; -x_205 = x_139; -goto block_231; -} -else -{ -lean_object* x_237; lean_object* x_238; lean_object* x_239; lean_object* x_240; lean_object* x_241; -x_237 = l_Lean_PrettyPrinter_Parenthesizer_visit___main___closed__3; -x_238 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_Meta_check___spec__3(x_237, x_4, x_139); -x_239 = lean_ctor_get(x_238, 0); -lean_inc(x_239); -x_240 = lean_ctor_get(x_238, 1); -lean_inc(x_240); -lean_dec(x_238); -x_241 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_241, 0, x_239); -lean_ctor_set(x_241, 1, x_136); -x_204 = x_241; -x_205 = x_240; -goto block_231; -} -block_203: -{ -lean_object* x_144; lean_object* x_145; lean_object* x_146; -x_144 = lean_ctor_get(x_142, 1); -lean_inc(x_144); -lean_dec(x_142); -x_145 = lean_ctor_get(x_143, 0); -lean_inc(x_145); -if (lean_obj_tag(x_141) == 0) -{ -lean_object* x_191; +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_216; lean_object* x_217; lean_object* x_244; uint8_t x_245; +x_146 = lean_ctor_get(x_145, 0); +lean_inc(x_146); +x_147 = lean_ctor_get(x_145, 1); +lean_inc(x_147); lean_dec(x_145); -x_191 = lean_box(0); -x_146 = x_191; -goto block_190; -} -else -{ -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_192 = lean_ctor_get(x_141, 0); -lean_inc(x_192); -x_193 = l_Lean_PrettyPrinter_parenthesizerAttribute; -x_194 = lean_ctor_get(x_193, 1); -lean_inc(x_194); -x_195 = l_Lean_PersistentEnvExtension_getState___rarg(x_194, x_145); -lean_dec(x_145); -lean_dec(x_194); -x_196 = lean_ctor_get(x_195, 1); -lean_inc(x_196); -lean_dec(x_195); -x_197 = l_Lean_SMap_find_x3f___at_Lean_PrettyPrinter_Parenthesizer_visit___main___spec__2(x_196, x_192); -lean_dec(x_192); -if (lean_obj_tag(x_197) == 0) -{ -lean_object* x_198; -x_198 = lean_box(0); -x_146 = x_198; -goto block_190; -} -else -{ -lean_object* x_199; -x_199 = lean_ctor_get(x_197, 0); -lean_inc(x_199); -lean_dec(x_197); -if (lean_obj_tag(x_199) == 0) -{ -lean_object* x_200; -x_200 = lean_box(0); -x_146 = x_200; -goto block_190; -} -else -{ -lean_object* x_201; lean_object* x_202; -lean_dec(x_141); -lean_dec(x_135); -x_201 = lean_ctor_get(x_199, 0); -lean_inc(x_201); -lean_dec(x_199); -x_202 = lean_apply_5(x_201, x_138, x_2, x_144, x_4, x_143); -return x_202; -} -} -} -block_190: -{ -lean_dec(x_146); -if (lean_obj_tag(x_141) == 0) -{ -lean_object* x_147; -lean_dec(x_135); -lean_inc(x_4); -lean_inc(x_138); -x_147 = l_Lean_WHNF_unfoldDefinitionAux___at_Lean_Meta_unfoldDefinition_x3f___spec__1(x_138, x_4, x_143); -if (lean_obj_tag(x_147) == 0) -{ -lean_object* x_148; -x_148 = lean_ctor_get(x_147, 0); -lean_inc(x_148); -if (lean_obj_tag(x_148) == 0) -{ -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_dec(x_144); -lean_dec(x_4); -lean_dec(x_2); -x_149 = lean_ctor_get(x_147, 1); -lean_inc(x_149); -if (lean_is_exclusive(x_147)) { - lean_ctor_release(x_147, 0); - lean_ctor_release(x_147, 1); - x_150 = x_147; -} else { - lean_dec_ref(x_147); - x_150 = lean_box(0); -} -x_151 = lean_expr_dbg_to_string(x_138); -lean_dec(x_138); -x_152 = l_Lean_PrettyPrinter_Parenthesizer_visit___main___closed__4; -x_153 = lean_string_append(x_152, x_151); -lean_dec(x_151); -x_154 = l_Char_HasRepr___closed__1; -x_155 = lean_string_append(x_153, x_154); -x_156 = lean_alloc_ctor(22, 1, 0); -lean_ctor_set(x_156, 0, x_155); -if (lean_is_scalar(x_150)) { - x_157 = lean_alloc_ctor(1, 2, 0); -} else { - x_157 = x_150; - lean_ctor_set_tag(x_157, 1); -} -lean_ctor_set(x_157, 0, x_156); -lean_ctor_set(x_157, 1, x_149); -return x_157; -} -else -{ -lean_object* x_158; lean_object* x_159; -lean_dec(x_138); -x_158 = lean_ctor_get(x_147, 1); -lean_inc(x_158); -lean_dec(x_147); -x_159 = lean_ctor_get(x_148, 0); -lean_inc(x_159); +x_148 = l_Lean_Expr_getAppFn___main(x_146); +x_149 = l_Lean_Expr_constName_x3f(x_148); lean_dec(x_148); -x_1 = x_159; -x_3 = x_144; -x_5 = x_158; -goto _start; -} +x_244 = lean_ctor_get(x_147, 4); +lean_inc(x_244); +x_245 = lean_ctor_get_uint8(x_244, sizeof(void*)*1); +lean_dec(x_244); +if (x_245 == 0) +{ +uint8_t x_246; lean_object* x_247; lean_object* x_248; +x_246 = 0; +x_247 = lean_box(x_246); +x_248 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_248, 0, x_247); +lean_ctor_set(x_248, 1, x_144); +x_216 = x_248; +x_217 = x_147; +goto block_243; } else { -lean_object* x_161; lean_object* x_162; lean_object* x_163; lean_object* x_164; -lean_dec(x_144); -lean_dec(x_138); -lean_dec(x_4); -lean_dec(x_2); -x_161 = lean_ctor_get(x_147, 0); -lean_inc(x_161); -x_162 = lean_ctor_get(x_147, 1); -lean_inc(x_162); -if (lean_is_exclusive(x_147)) { - lean_ctor_release(x_147, 0); - lean_ctor_release(x_147, 1); - x_163 = x_147; -} else { - lean_dec_ref(x_147); - x_163 = lean_box(0); -} -if (lean_is_scalar(x_163)) { - x_164 = lean_alloc_ctor(1, 2, 0); -} else { - x_164 = x_163; -} -lean_ctor_set(x_164, 0, x_161); -lean_ctor_set(x_164, 1, x_162); -return x_164; +lean_object* x_249; lean_object* x_250; lean_object* x_251; lean_object* x_252; lean_object* x_253; +x_249 = l_Lean_PrettyPrinter_Parenthesizer_visit___main___closed__3; +x_250 = l___private_Lean_Util_Trace_5__checkTraceOptionM___at_Lean_Meta_check___spec__3(x_249, x_4, x_147); +x_251 = lean_ctor_get(x_250, 0); +lean_inc(x_251); +x_252 = lean_ctor_get(x_250, 1); +lean_inc(x_252); +lean_dec(x_250); +x_253 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_253, 0, x_251); +lean_ctor_set(x_253, 1, x_144); +x_216 = x_253; +x_217 = x_252; +goto block_243; } +block_215: +{ +lean_object* x_152; lean_object* x_153; lean_object* x_154; +x_152 = lean_ctor_get(x_150, 1); +lean_inc(x_152); +lean_dec(x_150); +x_153 = lean_ctor_get(x_151, 0); +lean_inc(x_153); +if (lean_obj_tag(x_149) == 0) +{ +lean_object* x_203; +lean_dec(x_153); +x_203 = lean_box(0); +x_154 = x_203; +goto block_202; } else { -lean_object* x_165; lean_object* x_166; uint8_t x_167; -x_165 = lean_ctor_get(x_141, 0); -lean_inc(x_165); -lean_dec(x_141); -x_166 = l_Lean_choiceKind___closed__2; -x_167 = lean_name_eq(x_165, x_166); -lean_dec(x_165); -if (x_167 == 0) -{ -lean_object* x_168; -lean_dec(x_135); -lean_inc(x_4); -lean_inc(x_138); -x_168 = l_Lean_WHNF_unfoldDefinitionAux___at_Lean_Meta_unfoldDefinition_x3f___spec__1(x_138, x_4, x_143); -if (lean_obj_tag(x_168) == 0) -{ -lean_object* x_169; -x_169 = lean_ctor_get(x_168, 0); -lean_inc(x_169); -if (lean_obj_tag(x_169) == 0) -{ -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_dec(x_144); -lean_dec(x_4); -lean_dec(x_2); -x_170 = lean_ctor_get(x_168, 1); -lean_inc(x_170); -if (lean_is_exclusive(x_168)) { - lean_ctor_release(x_168, 0); - lean_ctor_release(x_168, 1); - x_171 = x_168; -} else { - lean_dec_ref(x_168); - x_171 = lean_box(0); -} -x_172 = lean_expr_dbg_to_string(x_138); -lean_dec(x_138); -x_173 = l_Lean_PrettyPrinter_Parenthesizer_visit___main___closed__4; -x_174 = lean_string_append(x_173, x_172); -lean_dec(x_172); -x_175 = l_Char_HasRepr___closed__1; -x_176 = lean_string_append(x_174, x_175); -x_177 = lean_alloc_ctor(22, 1, 0); -lean_ctor_set(x_177, 0, x_176); -if (lean_is_scalar(x_171)) { - x_178 = lean_alloc_ctor(1, 2, 0); -} else { - x_178 = x_171; - lean_ctor_set_tag(x_178, 1); -} -lean_ctor_set(x_178, 0, x_177); -lean_ctor_set(x_178, 1, x_170); -return x_178; -} -else -{ -lean_object* x_179; lean_object* x_180; -lean_dec(x_138); -x_179 = lean_ctor_get(x_168, 1); -lean_inc(x_179); -lean_dec(x_168); -x_180 = lean_ctor_get(x_169, 0); -lean_inc(x_180); -lean_dec(x_169); -x_1 = x_180; -x_3 = x_144; -x_5 = x_179; -goto _start; -} -} -else -{ -lean_object* x_182; lean_object* x_183; lean_object* x_184; lean_object* x_185; -lean_dec(x_144); -lean_dec(x_138); -lean_dec(x_4); -lean_dec(x_2); -x_182 = lean_ctor_get(x_168, 0); -lean_inc(x_182); -x_183 = lean_ctor_get(x_168, 1); -lean_inc(x_183); -if (lean_is_exclusive(x_168)) { - lean_ctor_release(x_168, 0); - lean_ctor_release(x_168, 1); - x_184 = x_168; -} else { - lean_dec_ref(x_168); - x_184 = lean_box(0); -} -if (lean_is_scalar(x_184)) { - x_185 = lean_alloc_ctor(1, 2, 0); -} else { - x_185 = x_184; -} -lean_ctor_set(x_185, 0, x_182); -lean_ctor_set(x_185, 1, x_183); -return x_185; -} -} -else -{ -lean_object* x_186; lean_object* x_187; lean_object* x_188; lean_object* x_189; -lean_dec(x_138); -x_186 = l_Lean_Syntax_getArgs(x_135); -lean_dec(x_135); -x_187 = lean_array_get_size(x_186); -lean_dec(x_186); -lean_inc(x_187); -x_188 = lean_alloc_closure((void*)(l_Nat_forMAux___main___at_Lean_PrettyPrinter_Parenthesizer_visit___main___spec__1___boxed), 6, 2); -lean_closure_set(x_188, 0, x_187); -lean_closure_set(x_188, 1, x_187); -x_189 = l_Lean_PrettyPrinter_Parenthesizer_visitArgs(x_188, x_2, x_144, x_4, x_143); -return x_189; -} -} -} -} -block_231: -{ -lean_object* x_206; uint8_t x_207; -x_206 = lean_ctor_get(x_204, 0); +lean_object* x_204; lean_object* x_205; lean_object* x_206; lean_object* x_207; lean_object* x_208; lean_object* x_209; +x_204 = lean_ctor_get(x_149, 0); +lean_inc(x_204); +x_205 = l_Lean_PrettyPrinter_parenthesizerAttribute; +x_206 = lean_ctor_get(x_205, 1); lean_inc(x_206); -x_207 = lean_unbox(x_206); +x_207 = l_Lean_PersistentEnvExtension_getState___rarg(x_206, x_153); +lean_dec(x_153); lean_dec(x_206); -if (x_207 == 0) -{ -lean_object* x_208; lean_object* x_209; lean_object* x_210; lean_object* x_211; -x_208 = lean_ctor_get(x_204, 1); +x_208 = lean_ctor_get(x_207, 1); lean_inc(x_208); -if (lean_is_exclusive(x_204)) { - lean_ctor_release(x_204, 0); - lean_ctor_release(x_204, 1); - x_209 = x_204; -} else { - lean_dec_ref(x_204); - x_209 = lean_box(0); -} -x_210 = lean_box(0); -if (lean_is_scalar(x_209)) { - x_211 = lean_alloc_ctor(0, 2, 0); -} else { - x_211 = x_209; -} -lean_ctor_set(x_211, 0, x_210); -lean_ctor_set(x_211, 1, x_208); -x_142 = x_211; -x_143 = x_205; -goto block_203; -} -else -{ -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; lean_object* x_221; lean_object* x_222; lean_object* x_223; lean_object* x_224; lean_object* x_225; lean_object* x_226; lean_object* x_227; lean_object* x_228; lean_object* x_229; lean_object* x_230; -x_212 = lean_ctor_get(x_204, 1); -lean_inc(x_212); +lean_dec(x_207); +x_209 = l_Lean_SMap_find_x3f___at_Lean_PrettyPrinter_Parenthesizer_visit___main___spec__2(x_208, x_204); lean_dec(x_204); -lean_inc(x_135); -x_213 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_213, 0, x_135); -x_214 = l_Lean_MessageData_ofList___closed__3; -x_215 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_215, 0, x_214); -lean_ctor_set(x_215, 1, x_213); -x_216 = lean_unsigned_to_nat(2u); -x_217 = lean_alloc_ctor(7, 2, 0); -lean_ctor_set(x_217, 0, x_216); -lean_ctor_set(x_217, 1, x_215); -x_218 = l_Lean_PrettyPrinter_Parenthesizer_visit___main___closed__7; -x_219 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_219, 0, x_218); -lean_ctor_set(x_219, 1, x_217); -x_220 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_220, 0, x_219); -lean_ctor_set(x_220, 1, x_214); -x_221 = l_Lean_PrettyPrinter_Parenthesizer_visit___main___closed__10; -x_222 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_222, 0, x_220); -lean_ctor_set(x_222, 1, x_221); -lean_inc(x_138); -x_223 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_223, 0, x_138); -x_224 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_224, 0, x_214); -lean_ctor_set(x_224, 1, x_223); -x_225 = lean_alloc_ctor(7, 2, 0); -lean_ctor_set(x_225, 0, x_216); -lean_ctor_set(x_225, 1, x_224); -x_226 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_226, 0, x_222); -lean_ctor_set(x_226, 1, x_225); -x_227 = l_Lean_PrettyPrinter_Parenthesizer_visit___main___closed__3; -x_228 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_visit___main___spec__8(x_227, x_226, x_2, x_212, x_4, x_205); -x_229 = lean_ctor_get(x_228, 0); -lean_inc(x_229); -x_230 = lean_ctor_get(x_228, 1); -lean_inc(x_230); -lean_dec(x_228); -x_142 = x_229; -x_143 = x_230; -goto block_203; -} -} +if (lean_obj_tag(x_209) == 0) +{ +lean_object* x_210; +x_210 = lean_box(0); +x_154 = x_210; +goto block_202; } else { -lean_object* x_242; lean_object* x_243; lean_object* x_244; lean_object* x_245; -lean_dec(x_136); -lean_dec(x_135); +lean_object* x_211; +x_211 = lean_ctor_get(x_209, 0); +lean_inc(x_211); +lean_dec(x_209); +if (lean_obj_tag(x_211) == 0) +{ +lean_object* x_212; +x_212 = lean_box(0); +x_154 = x_212; +goto block_202; +} +else +{ +lean_object* x_213; lean_object* x_214; +lean_dec(x_149); +lean_dec(x_143); +x_213 = lean_ctor_get(x_211, 0); +lean_inc(x_213); +lean_dec(x_211); +x_214 = lean_apply_5(x_213, x_146, x_2, x_152, x_4, x_151); +return x_214; +} +} +} +block_202: +{ +lean_dec(x_154); +if (lean_obj_tag(x_149) == 0) +{ +lean_object* x_155; +lean_dec(x_143); +lean_inc(x_4); +lean_inc(x_146); +x_155 = l_Lean_WHNF_unfoldDefinitionAux___at_Lean_Meta_unfoldDefinition_x3f___spec__1(x_146, x_4, x_151); +if (lean_obj_tag(x_155) == 0) +{ +lean_object* x_156; +x_156 = lean_ctor_get(x_155, 0); +lean_inc(x_156); +if (lean_obj_tag(x_156) == 0) +{ +lean_object* x_157; lean_object* x_158; lean_object* x_159; lean_object* x_160; lean_object* x_161; lean_object* x_162; lean_object* x_163; lean_object* x_164; lean_object* x_165; lean_object* x_166; lean_object* x_167; +lean_dec(x_152); lean_dec(x_4); lean_dec(x_2); -x_242 = lean_ctor_get(x_137, 0); +x_157 = lean_ctor_get(x_155, 1); +lean_inc(x_157); +if (lean_is_exclusive(x_155)) { + lean_ctor_release(x_155, 0); + lean_ctor_release(x_155, 1); + x_158 = x_155; +} else { + lean_dec_ref(x_155); + x_158 = lean_box(0); +} +x_159 = lean_expr_dbg_to_string(x_146); +lean_dec(x_146); +x_160 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_160, 0, x_159); +x_161 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_161, 0, x_160); +x_162 = l_Lean_PrettyPrinter_Parenthesizer_visit___main___closed__6; +x_163 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_163, 0, x_162); +lean_ctor_set(x_163, 1, x_161); +x_164 = l_Lean_Elab_Term_mkConst___closed__4; +x_165 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_165, 0, x_163); +lean_ctor_set(x_165, 1, x_164); +x_166 = lean_alloc_ctor(22, 1, 0); +lean_ctor_set(x_166, 0, x_165); +if (lean_is_scalar(x_158)) { + x_167 = lean_alloc_ctor(1, 2, 0); +} else { + x_167 = x_158; + lean_ctor_set_tag(x_167, 1); +} +lean_ctor_set(x_167, 0, x_166); +lean_ctor_set(x_167, 1, x_157); +return x_167; +} +else +{ +lean_object* x_168; lean_object* x_169; +lean_dec(x_146); +x_168 = lean_ctor_get(x_155, 1); +lean_inc(x_168); +lean_dec(x_155); +x_169 = lean_ctor_get(x_156, 0); +lean_inc(x_169); +lean_dec(x_156); +x_1 = x_169; +x_3 = x_152; +x_5 = x_168; +goto _start; +} +} +else +{ +lean_object* x_171; lean_object* x_172; lean_object* x_173; lean_object* x_174; +lean_dec(x_152); +lean_dec(x_146); +lean_dec(x_4); +lean_dec(x_2); +x_171 = lean_ctor_get(x_155, 0); +lean_inc(x_171); +x_172 = lean_ctor_get(x_155, 1); +lean_inc(x_172); +if (lean_is_exclusive(x_155)) { + lean_ctor_release(x_155, 0); + lean_ctor_release(x_155, 1); + x_173 = x_155; +} else { + lean_dec_ref(x_155); + x_173 = lean_box(0); +} +if (lean_is_scalar(x_173)) { + x_174 = lean_alloc_ctor(1, 2, 0); +} else { + x_174 = x_173; +} +lean_ctor_set(x_174, 0, x_171); +lean_ctor_set(x_174, 1, x_172); +return x_174; +} +} +else +{ +lean_object* x_175; lean_object* x_176; uint8_t x_177; +x_175 = lean_ctor_get(x_149, 0); +lean_inc(x_175); +lean_dec(x_149); +x_176 = l_Lean_choiceKind___closed__2; +x_177 = lean_name_eq(x_175, x_176); +lean_dec(x_175); +if (x_177 == 0) +{ +lean_object* x_178; +lean_dec(x_143); +lean_inc(x_4); +lean_inc(x_146); +x_178 = l_Lean_WHNF_unfoldDefinitionAux___at_Lean_Meta_unfoldDefinition_x3f___spec__1(x_146, x_4, x_151); +if (lean_obj_tag(x_178) == 0) +{ +lean_object* x_179; +x_179 = lean_ctor_get(x_178, 0); +lean_inc(x_179); +if (lean_obj_tag(x_179) == 0) +{ +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_dec(x_152); +lean_dec(x_4); +lean_dec(x_2); +x_180 = lean_ctor_get(x_178, 1); +lean_inc(x_180); +if (lean_is_exclusive(x_178)) { + lean_ctor_release(x_178, 0); + lean_ctor_release(x_178, 1); + x_181 = x_178; +} else { + lean_dec_ref(x_178); + x_181 = lean_box(0); +} +x_182 = lean_expr_dbg_to_string(x_146); +lean_dec(x_146); +x_183 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_183, 0, x_182); +x_184 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_184, 0, x_183); +x_185 = l_Lean_PrettyPrinter_Parenthesizer_visit___main___closed__6; +x_186 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_186, 0, x_185); +lean_ctor_set(x_186, 1, x_184); +x_187 = l_Lean_Elab_Term_mkConst___closed__4; +x_188 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_188, 0, x_186); +lean_ctor_set(x_188, 1, x_187); +x_189 = lean_alloc_ctor(22, 1, 0); +lean_ctor_set(x_189, 0, x_188); +if (lean_is_scalar(x_181)) { + x_190 = lean_alloc_ctor(1, 2, 0); +} else { + x_190 = x_181; + lean_ctor_set_tag(x_190, 1); +} +lean_ctor_set(x_190, 0, x_189); +lean_ctor_set(x_190, 1, x_180); +return x_190; +} +else +{ +lean_object* x_191; lean_object* x_192; +lean_dec(x_146); +x_191 = lean_ctor_get(x_178, 1); +lean_inc(x_191); +lean_dec(x_178); +x_192 = lean_ctor_get(x_179, 0); +lean_inc(x_192); +lean_dec(x_179); +x_1 = x_192; +x_3 = x_152; +x_5 = x_191; +goto _start; +} +} +else +{ +lean_object* x_194; lean_object* x_195; lean_object* x_196; lean_object* x_197; +lean_dec(x_152); +lean_dec(x_146); +lean_dec(x_4); +lean_dec(x_2); +x_194 = lean_ctor_get(x_178, 0); +lean_inc(x_194); +x_195 = lean_ctor_get(x_178, 1); +lean_inc(x_195); +if (lean_is_exclusive(x_178)) { + lean_ctor_release(x_178, 0); + lean_ctor_release(x_178, 1); + x_196 = x_178; +} else { + lean_dec_ref(x_178); + x_196 = lean_box(0); +} +if (lean_is_scalar(x_196)) { + x_197 = lean_alloc_ctor(1, 2, 0); +} else { + x_197 = x_196; +} +lean_ctor_set(x_197, 0, x_194); +lean_ctor_set(x_197, 1, x_195); +return x_197; +} +} +else +{ +lean_object* x_198; lean_object* x_199; lean_object* x_200; lean_object* x_201; +lean_dec(x_146); +x_198 = l_Lean_Syntax_getArgs(x_143); +lean_dec(x_143); +x_199 = lean_array_get_size(x_198); +lean_dec(x_198); +lean_inc(x_199); +x_200 = lean_alloc_closure((void*)(l_Nat_forMAux___main___at_Lean_PrettyPrinter_Parenthesizer_visit___main___spec__1___boxed), 6, 2); +lean_closure_set(x_200, 0, x_199); +lean_closure_set(x_200, 1, x_199); +x_201 = l_Lean_PrettyPrinter_Parenthesizer_visitArgs(x_200, x_2, x_152, x_4, x_151); +return x_201; +} +} +} +} +block_243: +{ +lean_object* x_218; uint8_t x_219; +x_218 = lean_ctor_get(x_216, 0); +lean_inc(x_218); +x_219 = lean_unbox(x_218); +lean_dec(x_218); +if (x_219 == 0) +{ +lean_object* x_220; lean_object* x_221; lean_object* x_222; lean_object* x_223; +x_220 = lean_ctor_get(x_216, 1); +lean_inc(x_220); +if (lean_is_exclusive(x_216)) { + lean_ctor_release(x_216, 0); + lean_ctor_release(x_216, 1); + x_221 = x_216; +} else { + lean_dec_ref(x_216); + x_221 = lean_box(0); +} +x_222 = lean_box(0); +if (lean_is_scalar(x_221)) { + x_223 = lean_alloc_ctor(0, 2, 0); +} else { + x_223 = x_221; +} +lean_ctor_set(x_223, 0, x_222); +lean_ctor_set(x_223, 1, x_220); +x_150 = x_223; +x_151 = x_217; +goto block_215; +} +else +{ +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; lean_object* x_237; lean_object* x_238; lean_object* x_239; lean_object* x_240; lean_object* x_241; lean_object* x_242; +x_224 = lean_ctor_get(x_216, 1); +lean_inc(x_224); +lean_dec(x_216); +lean_inc(x_143); +x_225 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_225, 0, x_143); +x_226 = l_Lean_MessageData_ofList___closed__3; +x_227 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_227, 0, x_226); +lean_ctor_set(x_227, 1, x_225); +x_228 = lean_unsigned_to_nat(2u); +x_229 = lean_alloc_ctor(7, 2, 0); +lean_ctor_set(x_229, 0, x_228); +lean_ctor_set(x_229, 1, x_227); +x_230 = l_Lean_PrettyPrinter_Parenthesizer_visit___main___closed__9; +x_231 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_231, 0, x_230); +lean_ctor_set(x_231, 1, x_229); +x_232 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_232, 0, x_231); +lean_ctor_set(x_232, 1, x_226); +x_233 = l_Lean_PrettyPrinter_Parenthesizer_visit___main___closed__12; +x_234 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_234, 0, x_232); +lean_ctor_set(x_234, 1, x_233); +lean_inc(x_146); +x_235 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_235, 0, x_146); +x_236 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_236, 0, x_226); +lean_ctor_set(x_236, 1, x_235); +x_237 = lean_alloc_ctor(7, 2, 0); +lean_ctor_set(x_237, 0, x_228); +lean_ctor_set(x_237, 1, x_236); +x_238 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_238, 0, x_234); +lean_ctor_set(x_238, 1, x_237); +x_239 = l_Lean_PrettyPrinter_Parenthesizer_visit___main___closed__3; +x_240 = l_Lean_MonadTracerAdapter_addTrace___at_Lean_PrettyPrinter_Parenthesizer_visit___main___spec__8(x_239, x_238, x_2, x_224, x_4, x_217); +x_241 = lean_ctor_get(x_240, 0); +lean_inc(x_241); +x_242 = lean_ctor_get(x_240, 1); lean_inc(x_242); -x_243 = lean_ctor_get(x_137, 1); -lean_inc(x_243); -if (lean_is_exclusive(x_137)) { - lean_ctor_release(x_137, 0); - lean_ctor_release(x_137, 1); - x_244 = x_137; -} else { - lean_dec_ref(x_137); - x_244 = lean_box(0); +lean_dec(x_240); +x_150 = x_241; +x_151 = x_242; +goto block_215; } -if (lean_is_scalar(x_244)) { - x_245 = lean_alloc_ctor(1, 2, 0); -} else { - x_245 = x_244; } -lean_ctor_set(x_245, 0, x_242); -lean_ctor_set(x_245, 1, x_243); -return x_245; +} +else +{ +lean_object* x_254; lean_object* x_255; lean_object* x_256; lean_object* x_257; +lean_dec(x_144); +lean_dec(x_143); +lean_dec(x_4); +lean_dec(x_2); +x_254 = lean_ctor_get(x_145, 0); +lean_inc(x_254); +x_255 = lean_ctor_get(x_145, 1); +lean_inc(x_255); +if (lean_is_exclusive(x_145)) { + lean_ctor_release(x_145, 0); + lean_ctor_release(x_145, 1); + x_256 = x_145; +} else { + lean_dec_ref(x_145); + x_256 = lean_box(0); +} +if (lean_is_scalar(x_256)) { + x_257 = lean_alloc_ctor(1, 2, 0); +} else { + x_257 = x_256; +} +lean_ctor_set(x_257, 0, x_254); +lean_ctor_set(x_257, 1, x_255); +return x_257; } } } @@ -3620,7 +3696,7 @@ _start: { lean_object* x_1; lean_object* x_2; x_1 = l_Lean_PrettyPrinter_Parenthesizer_visitAntiquot___closed__1; -x_2 = lean_alloc_ctor(22, 1, 0); +x_2 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } @@ -3628,36 +3704,56 @@ return x_2; lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_visitAntiquot___closed__3() { _start: { -lean_object* x_1; -x_1 = lean_mk_string("antiquotExpr"); -return x_1; +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_PrettyPrinter_Parenthesizer_visitAntiquot___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_PrettyPrinter_Parenthesizer_visitAntiquot___closed__4() { _start: { -lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_mkAppStx___closed__4; -x_2 = l_Lean_PrettyPrinter_Parenthesizer_visitAntiquot___closed__3; -x_3 = lean_name_mk_string(x_1, x_2); -return x_3; +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_PrettyPrinter_Parenthesizer_visitAntiquot___closed__3; +x_2 = lean_alloc_ctor(22, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; } } lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_visitAntiquot___closed__5() { _start: { -lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = lean_box(0); -x_2 = l_Lean_PrettyPrinter_Parenthesizer_visitAntiquot___closed__4; -x_3 = l_Lean_mkConst(x_2, x_1); -return x_3; +lean_object* x_1; +x_1 = lean_mk_string("antiquotExpr"); +return x_1; } } lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_visitAntiquot___closed__6() { _start: { +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_mkAppStx___closed__4; +x_2 = l_Lean_PrettyPrinter_Parenthesizer_visitAntiquot___closed__5; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_visitAntiquot___closed__7() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l_Lean_PrettyPrinter_Parenthesizer_visitAntiquot___closed__6; +x_3 = l_Lean_mkConst(x_2, x_1); +return x_3; +} +} +lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_visitAntiquot___closed__8() { +_start: +{ lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_PrettyPrinter_Parenthesizer_visitAntiquot___closed__5; +x_1 = l_Lean_PrettyPrinter_Parenthesizer_visitAntiquot___closed__7; x_2 = lean_alloc_closure((void*)(l_Lean_PrettyPrinter_Parenthesizer_visitAntiquot___lambda__1), 5, 1); lean_closure_set(x_2, 0, x_1); return x_2; @@ -3687,7 +3783,7 @@ lean_object* x_12; lean_dec(x_10); lean_dec(x_3); lean_dec(x_1); -x_12 = l_Lean_PrettyPrinter_Parenthesizer_visitAntiquot___closed__2; +x_12 = l_Lean_PrettyPrinter_Parenthesizer_visitAntiquot___closed__4; lean_ctor_set_tag(x_5, 1); lean_ctor_set(x_5, 0, x_12); return x_5; @@ -3696,7 +3792,7 @@ else { lean_object* x_13; lean_object* x_14; lean_free_object(x_5); -x_13 = l_Lean_PrettyPrinter_Parenthesizer_visitAntiquot___closed__6; +x_13 = l_Lean_PrettyPrinter_Parenthesizer_visitAntiquot___closed__8; x_14 = l_Lean_PrettyPrinter_Parenthesizer_visitArgs(x_13, x_1, x_10, x_3, x_8); return x_14; } @@ -3722,7 +3818,7 @@ lean_object* x_20; lean_object* x_21; lean_dec(x_18); lean_dec(x_3); lean_dec(x_1); -x_20 = l_Lean_PrettyPrinter_Parenthesizer_visitAntiquot___closed__2; +x_20 = l_Lean_PrettyPrinter_Parenthesizer_visitAntiquot___closed__4; x_21 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_21, 0, x_20); lean_ctor_set(x_21, 1, x_16); @@ -3731,7 +3827,7 @@ return x_21; else { lean_object* x_22; lean_object* x_23; -x_22 = l_Lean_PrettyPrinter_Parenthesizer_visitAntiquot___closed__6; +x_22 = l_Lean_PrettyPrinter_Parenthesizer_visitAntiquot___closed__8; x_23 = l_Lean_PrettyPrinter_Parenthesizer_visitArgs(x_22, x_1, x_18, x_3, x_16); return x_23; } @@ -6635,6 +6731,26 @@ x_1 = lean_mk_string("failed to evaluate Nat argument: "); return x_1; } } +lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_evalNat___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_PrettyPrinter_Parenthesizer_evalNat___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_PrettyPrinter_Parenthesizer_evalNat___closed__3() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_PrettyPrinter_Parenthesizer_evalNat___closed__2; +x_2 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} lean_object* l_Lean_PrettyPrinter_Parenthesizer_evalNat(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { _start: { @@ -6652,100 +6768,110 @@ lean_inc(x_8); x_9 = l_Lean_Meta_evalNat___main(x_8); 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_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_dec(x_3); x_10 = lean_expr_dbg_to_string(x_8); lean_dec(x_8); -x_11 = l_Lean_PrettyPrinter_Parenthesizer_evalNat___closed__1; -x_12 = lean_string_append(x_11, x_10); -lean_dec(x_10); -x_13 = lean_alloc_ctor(22, 1, 0); -lean_ctor_set(x_13, 0, x_12); -lean_ctor_set_tag(x_6, 1); -lean_ctor_set(x_6, 0, x_13); -return x_6; -} -else -{ -lean_object* x_14; lean_object* x_15; -lean_dec(x_8); -x_14 = lean_ctor_get(x_9, 0); -lean_inc(x_14); -lean_dec(x_9); -x_15 = lean_alloc_ctor(0, 2, 0); +x_11 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_11, 0, x_10); +x_12 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_12, 0, x_11); +x_13 = l_Lean_PrettyPrinter_Parenthesizer_evalNat___closed__3; +x_14 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_14, 0, x_13); +lean_ctor_set(x_14, 1, x_12); +x_15 = lean_alloc_ctor(22, 1, 0); lean_ctor_set(x_15, 0, x_14); -lean_ctor_set(x_15, 1, x_3); +lean_ctor_set_tag(x_6, 1); lean_ctor_set(x_6, 0, x_15); return x_6; } -} else { -lean_object* x_16; lean_object* x_17; lean_object* x_18; -x_16 = lean_ctor_get(x_6, 0); -x_17 = lean_ctor_get(x_6, 1); -lean_inc(x_17); +lean_object* x_16; lean_object* x_17; +lean_dec(x_8); +x_16 = lean_ctor_get(x_9, 0); lean_inc(x_16); -lean_dec(x_6); -lean_inc(x_16); -x_18 = l_Lean_Meta_evalNat___main(x_16); -if (lean_obj_tag(x_18) == 0) -{ -lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; -lean_dec(x_3); -x_19 = lean_expr_dbg_to_string(x_16); -lean_dec(x_16); -x_20 = l_Lean_PrettyPrinter_Parenthesizer_evalNat___closed__1; -x_21 = lean_string_append(x_20, x_19); -lean_dec(x_19); -x_22 = lean_alloc_ctor(22, 1, 0); -lean_ctor_set(x_22, 0, x_21); -x_23 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_23, 0, x_22); -lean_ctor_set(x_23, 1, x_17); -return x_23; -} -else -{ -lean_object* x_24; lean_object* x_25; lean_object* x_26; -lean_dec(x_16); -x_24 = lean_ctor_get(x_18, 0); -lean_inc(x_24); -lean_dec(x_18); -x_25 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_25, 0, x_24); -lean_ctor_set(x_25, 1, x_3); -x_26 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_26, 0, x_25); -lean_ctor_set(x_26, 1, x_17); -return x_26; -} -} -} -else -{ -uint8_t x_27; -lean_dec(x_3); -x_27 = !lean_is_exclusive(x_6); -if (x_27 == 0) -{ +lean_dec(x_9); +x_17 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_17, 0, x_16); +lean_ctor_set(x_17, 1, x_3); +lean_ctor_set(x_6, 0, x_17); return x_6; } +} +else +{ +lean_object* x_18; lean_object* x_19; lean_object* x_20; +x_18 = lean_ctor_get(x_6, 0); +x_19 = lean_ctor_get(x_6, 1); +lean_inc(x_19); +lean_inc(x_18); +lean_dec(x_6); +lean_inc(x_18); +x_20 = l_Lean_Meta_evalNat___main(x_18); +if (lean_obj_tag(x_20) == 0) +{ +lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; +lean_dec(x_3); +x_21 = lean_expr_dbg_to_string(x_18); +lean_dec(x_18); +x_22 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_22, 0, x_21); +x_23 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_23, 0, x_22); +x_24 = l_Lean_PrettyPrinter_Parenthesizer_evalNat___closed__3; +x_25 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_25, 0, x_24); +lean_ctor_set(x_25, 1, x_23); +x_26 = lean_alloc_ctor(22, 1, 0); +lean_ctor_set(x_26, 0, x_25); +x_27 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_27, 0, x_26); +lean_ctor_set(x_27, 1, x_19); +return x_27; +} else { lean_object* x_28; lean_object* x_29; lean_object* x_30; -x_28 = lean_ctor_get(x_6, 0); -x_29 = lean_ctor_get(x_6, 1); -lean_inc(x_29); +lean_dec(x_18); +x_28 = lean_ctor_get(x_20, 0); lean_inc(x_28); -lean_dec(x_6); -x_30 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_30, 0, x_28); -lean_ctor_set(x_30, 1, x_29); +lean_dec(x_20); +x_29 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_29, 0, x_28); +lean_ctor_set(x_29, 1, x_3); +x_30 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_30, 0, x_29); +lean_ctor_set(x_30, 1, x_19); return x_30; } } } +else +{ +uint8_t x_31; +lean_dec(x_3); +x_31 = !lean_is_exclusive(x_6); +if (x_31 == 0) +{ +return x_6; +} +else +{ +lean_object* x_32; lean_object* x_33; lean_object* x_34; +x_32 = lean_ctor_get(x_6, 0); +x_33 = lean_ctor_get(x_6, 1); +lean_inc(x_33); +lean_inc(x_32); +lean_dec(x_6); +x_34 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_34, 0, x_32); +lean_ctor_set(x_34, 1, x_33); +return x_34; +} +} +} } lean_object* l_Lean_PrettyPrinter_Parenthesizer_evalNat___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { _start: @@ -6764,6 +6890,26 @@ x_1 = lean_mk_string("failed to evaluate precedence: "); return x_1; } } +lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_evalOptPrec___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_PrettyPrinter_Parenthesizer_evalOptPrec___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_PrettyPrinter_Parenthesizer_evalOptPrec___closed__3() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_PrettyPrinter_Parenthesizer_evalOptPrec___closed__2; +x_2 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} lean_object* l_Lean_PrettyPrinter_Parenthesizer_evalOptPrec(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { _start: { @@ -6772,7 +6918,7 @@ lean_inc(x_4); x_6 = l_Lean_Meta_whnf(x_1, x_4, x_5); if (lean_obj_tag(x_6) == 0) { -lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_17; lean_object* x_18; +lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_19; lean_object* x_20; x_7 = lean_ctor_get(x_6, 0); lean_inc(x_7); x_8 = lean_ctor_get(x_6, 1); @@ -6785,184 +6931,189 @@ if (lean_is_exclusive(x_6)) { lean_dec_ref(x_6); x_9 = lean_box(0); } -x_17 = l_Lean_Expr_getAppFn___main(x_7); -x_18 = l_Lean_Expr_constName_x3f(x_17); -lean_dec(x_17); -if (lean_obj_tag(x_18) == 0) -{ -lean_object* x_19; -lean_dec(x_4); -lean_dec(x_3); -x_19 = lean_box(0); -x_10 = x_19; -goto block_16; -} -else -{ -lean_object* x_20; -x_20 = lean_ctor_get(x_18, 0); -lean_inc(x_20); -lean_dec(x_18); -if (lean_obj_tag(x_20) == 1) +x_19 = l_Lean_Expr_getAppFn___main(x_7); +x_20 = l_Lean_Expr_constName_x3f(x_19); +lean_dec(x_19); +if (lean_obj_tag(x_20) == 0) { lean_object* x_21; -x_21 = lean_ctor_get(x_20, 0); -lean_inc(x_21); -if (lean_obj_tag(x_21) == 1) +lean_dec(x_4); +lean_dec(x_3); +x_21 = lean_box(0); +x_10 = x_21; +goto block_18; +} +else { lean_object* x_22; -x_22 = lean_ctor_get(x_21, 0); +x_22 = lean_ctor_get(x_20, 0); lean_inc(x_22); -if (lean_obj_tag(x_22) == 0) -{ -lean_object* x_23; lean_object* x_24; lean_object* x_25; uint8_t x_26; -x_23 = lean_ctor_get(x_20, 1); -lean_inc(x_23); lean_dec(x_20); -x_24 = lean_ctor_get(x_21, 1); -lean_inc(x_24); -lean_dec(x_21); -x_25 = l_Lean_optionToExpr___rarg___lambda__1___closed__1; -x_26 = lean_string_dec_eq(x_24, x_25); -lean_dec(x_24); -if (x_26 == 0) +if (lean_obj_tag(x_22) == 1) { -lean_object* x_27; +lean_object* x_23; +x_23 = lean_ctor_get(x_22, 0); +lean_inc(x_23); +if (lean_obj_tag(x_23) == 1) +{ +lean_object* x_24; +x_24 = lean_ctor_get(x_23, 0); +lean_inc(x_24); +if (lean_obj_tag(x_24) == 0) +{ +lean_object* x_25; lean_object* x_26; lean_object* x_27; uint8_t x_28; +x_25 = lean_ctor_get(x_22, 1); +lean_inc(x_25); +lean_dec(x_22); +x_26 = lean_ctor_get(x_23, 1); +lean_inc(x_26); lean_dec(x_23); +x_27 = l_Lean_optionToExpr___rarg___lambda__1___closed__1; +x_28 = lean_string_dec_eq(x_26, x_27); +lean_dec(x_26); +if (x_28 == 0) +{ +lean_object* x_29; +lean_dec(x_25); lean_dec(x_4); lean_dec(x_3); -x_27 = lean_box(0); -x_10 = x_27; -goto block_16; +x_29 = lean_box(0); +x_10 = x_29; +goto block_18; } else { -lean_object* x_28; uint8_t x_29; -x_28 = l_Option_HasRepr___rarg___closed__1; -x_29 = lean_string_dec_eq(x_23, x_28); -if (x_29 == 0) -{ lean_object* x_30; uint8_t x_31; -x_30 = l___private_Lean_Syntax_9__quoteOption___rarg___closed__5; -x_31 = lean_string_dec_eq(x_23, x_30); -lean_dec(x_23); +x_30 = l_Option_HasRepr___rarg___closed__1; +x_31 = lean_string_dec_eq(x_25, x_30); if (x_31 == 0) { -lean_object* x_32; +lean_object* x_32; uint8_t x_33; +x_32 = l___private_Lean_Syntax_9__quoteOption___rarg___closed__5; +x_33 = lean_string_dec_eq(x_25, x_32); +lean_dec(x_25); +if (x_33 == 0) +{ +lean_object* x_34; lean_dec(x_4); lean_dec(x_3); -x_32 = lean_box(0); -x_10 = x_32; -goto block_16; +x_34 = lean_box(0); +x_10 = x_34; +goto block_18; } else { -lean_object* x_33; lean_object* x_34; +lean_object* x_35; lean_object* x_36; lean_dec(x_9); -x_33 = l_Lean_Expr_appArg_x21(x_7); +x_35 = l_Lean_Expr_appArg_x21(x_7); lean_dec(x_7); -x_34 = l_Lean_PrettyPrinter_Parenthesizer_evalNat(x_33, x_2, x_3, x_4, x_8); -return x_34; +x_36 = l_Lean_PrettyPrinter_Parenthesizer_evalNat(x_35, x_2, x_3, x_4, x_8); +return x_36; } } else { -lean_object* x_35; lean_object* x_36; lean_object* x_37; -lean_dec(x_23); +lean_object* x_37; lean_object* x_38; lean_object* x_39; +lean_dec(x_25); lean_dec(x_9); lean_dec(x_7); lean_dec(x_4); -x_35 = lean_unsigned_to_nat(0u); -x_36 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_36, 0, x_35); -lean_ctor_set(x_36, 1, x_3); -x_37 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_37, 0, x_36); -lean_ctor_set(x_37, 1, x_8); -return x_37; +x_37 = lean_unsigned_to_nat(0u); +x_38 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_38, 0, x_37); +lean_ctor_set(x_38, 1, x_3); +x_39 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_39, 0, x_38); +lean_ctor_set(x_39, 1, x_8); +return x_39; } } } else { -lean_object* x_38; -lean_dec(x_22); -lean_dec(x_21); -lean_dec(x_20); -lean_dec(x_4); -lean_dec(x_3); -x_38 = lean_box(0); -x_10 = x_38; -goto block_16; -} -} -else -{ -lean_object* x_39; -lean_dec(x_21); -lean_dec(x_20); -lean_dec(x_4); -lean_dec(x_3); -x_39 = lean_box(0); -x_10 = x_39; -goto block_16; -} -} -else -{ lean_object* x_40; -lean_dec(x_20); +lean_dec(x_24); +lean_dec(x_23); +lean_dec(x_22); lean_dec(x_4); lean_dec(x_3); x_40 = lean_box(0); x_10 = x_40; -goto block_16; -} -} -block_16: -{ -lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; -lean_dec(x_10); -x_11 = lean_expr_dbg_to_string(x_7); -lean_dec(x_7); -x_12 = l_Lean_PrettyPrinter_Parenthesizer_evalOptPrec___closed__1; -x_13 = lean_string_append(x_12, x_11); -lean_dec(x_11); -x_14 = lean_alloc_ctor(22, 1, 0); -lean_ctor_set(x_14, 0, x_13); -if (lean_is_scalar(x_9)) { - x_15 = lean_alloc_ctor(1, 2, 0); -} else { - x_15 = x_9; - lean_ctor_set_tag(x_15, 1); -} -lean_ctor_set(x_15, 0, x_14); -lean_ctor_set(x_15, 1, x_8); -return x_15; +goto block_18; } } else { -uint8_t x_41; +lean_object* x_41; +lean_dec(x_23); +lean_dec(x_22); lean_dec(x_4); lean_dec(x_3); -x_41 = !lean_is_exclusive(x_6); -if (x_41 == 0) +x_41 = lean_box(0); +x_10 = x_41; +goto block_18; +} +} +else +{ +lean_object* x_42; +lean_dec(x_22); +lean_dec(x_4); +lean_dec(x_3); +x_42 = lean_box(0); +x_10 = x_42; +goto block_18; +} +} +block_18: +{ +lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; +lean_dec(x_10); +x_11 = lean_expr_dbg_to_string(x_7); +lean_dec(x_7); +x_12 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_12, 0, x_11); +x_13 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_13, 0, x_12); +x_14 = l_Lean_PrettyPrinter_Parenthesizer_evalOptPrec___closed__3; +x_15 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_15, 0, x_14); +lean_ctor_set(x_15, 1, x_13); +x_16 = lean_alloc_ctor(22, 1, 0); +lean_ctor_set(x_16, 0, x_15); +if (lean_is_scalar(x_9)) { + x_17 = lean_alloc_ctor(1, 2, 0); +} else { + x_17 = x_9; + lean_ctor_set_tag(x_17, 1); +} +lean_ctor_set(x_17, 0, x_16); +lean_ctor_set(x_17, 1, x_8); +return x_17; +} +} +else +{ +uint8_t x_43; +lean_dec(x_4); +lean_dec(x_3); +x_43 = !lean_is_exclusive(x_6); +if (x_43 == 0) { return x_6; } else { -lean_object* x_42; lean_object* x_43; lean_object* x_44; -x_42 = lean_ctor_get(x_6, 0); -x_43 = lean_ctor_get(x_6, 1); -lean_inc(x_43); -lean_inc(x_42); +lean_object* x_44; lean_object* x_45; lean_object* x_46; +x_44 = lean_ctor_get(x_6, 0); +x_45 = lean_ctor_get(x_6, 1); +lean_inc(x_45); +lean_inc(x_44); lean_dec(x_6); -x_44 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_44, 0, x_42); -lean_ctor_set(x_44, 1, x_43); -return x_44; +x_46 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_46, 0, x_44); +lean_ctor_set(x_46, 1, x_45); +return x_46; } } } @@ -6984,6 +7135,26 @@ x_1 = lean_mk_string("failed to evaluate String argument: "); return x_1; } } +lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_evalString___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_PrettyPrinter_Parenthesizer_evalString___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_PrettyPrinter_Parenthesizer_evalString___closed__3() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_PrettyPrinter_Parenthesizer_evalString___closed__2; +x_2 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} lean_object* l_Lean_PrettyPrinter_Parenthesizer_evalString(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { _start: { @@ -7007,89 +7178,94 @@ if (lean_is_exclusive(x_6)) { } if (lean_obj_tag(x_7) == 9) { -lean_object* x_17; -x_17 = lean_ctor_get(x_7, 0); -lean_inc(x_17); +lean_object* x_19; +x_19 = lean_ctor_get(x_7, 0); +lean_inc(x_19); lean_dec(x_7); -if (lean_obj_tag(x_17) == 0) +if (lean_obj_tag(x_19) == 0) { -lean_object* x_18; -lean_dec(x_17); +lean_object* x_20; +lean_dec(x_19); lean_dec(x_3); -x_18 = lean_box(0); -x_10 = x_18; -goto block_16; +x_20 = lean_box(0); +x_10 = x_20; +goto block_18; } else { -lean_object* x_19; lean_object* x_20; lean_object* x_21; +lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_dec(x_9); lean_dec(x_1); -x_19 = lean_ctor_get(x_17, 0); -lean_inc(x_19); -lean_dec(x_17); -x_20 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_20, 0, x_19); -lean_ctor_set(x_20, 1, x_3); -x_21 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_21, 0, x_20); -lean_ctor_set(x_21, 1, x_8); -return x_21; +x_21 = lean_ctor_get(x_19, 0); +lean_inc(x_21); +lean_dec(x_19); +x_22 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_22, 0, x_21); +lean_ctor_set(x_22, 1, x_3); +x_23 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_23, 0, x_22); +lean_ctor_set(x_23, 1, x_8); +return x_23; } } else { -lean_object* x_22; +lean_object* x_24; lean_dec(x_7); lean_dec(x_3); -x_22 = lean_box(0); -x_10 = x_22; -goto block_16; +x_24 = lean_box(0); +x_10 = x_24; +goto block_18; } -block_16: +block_18: { -lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; +lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_dec(x_10); x_11 = lean_expr_dbg_to_string(x_1); lean_dec(x_1); -x_12 = l_Lean_PrettyPrinter_Parenthesizer_evalString___closed__1; -x_13 = lean_string_append(x_12, x_11); -lean_dec(x_11); -x_14 = lean_alloc_ctor(22, 1, 0); -lean_ctor_set(x_14, 0, x_13); -if (lean_is_scalar(x_9)) { - x_15 = lean_alloc_ctor(1, 2, 0); -} else { - x_15 = x_9; - lean_ctor_set_tag(x_15, 1); -} +x_12 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_12, 0, x_11); +x_13 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_13, 0, x_12); +x_14 = l_Lean_PrettyPrinter_Parenthesizer_evalString___closed__3; +x_15 = lean_alloc_ctor(9, 2, 0); lean_ctor_set(x_15, 0, x_14); -lean_ctor_set(x_15, 1, x_8); -return x_15; +lean_ctor_set(x_15, 1, x_13); +x_16 = lean_alloc_ctor(22, 1, 0); +lean_ctor_set(x_16, 0, x_15); +if (lean_is_scalar(x_9)) { + x_17 = lean_alloc_ctor(1, 2, 0); +} else { + x_17 = x_9; + lean_ctor_set_tag(x_17, 1); +} +lean_ctor_set(x_17, 0, x_16); +lean_ctor_set(x_17, 1, x_8); +return x_17; } } else { -uint8_t x_23; +uint8_t x_25; lean_dec(x_3); lean_dec(x_1); -x_23 = !lean_is_exclusive(x_6); -if (x_23 == 0) +x_25 = !lean_is_exclusive(x_6); +if (x_25 == 0) { return x_6; } else { -lean_object* x_24; lean_object* x_25; lean_object* x_26; -x_24 = lean_ctor_get(x_6, 0); -x_25 = lean_ctor_get(x_6, 1); -lean_inc(x_25); -lean_inc(x_24); +lean_object* x_26; lean_object* x_27; lean_object* x_28; +x_26 = lean_ctor_get(x_6, 0); +x_27 = lean_ctor_get(x_6, 1); +lean_inc(x_27); +lean_inc(x_26); lean_dec(x_6); -x_26 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_26, 0, x_24); -lean_ctor_set(x_26, 1, x_25); -return x_26; +x_28 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_28, 0, x_26); +lean_ctor_set(x_28, 1, x_27); +return x_28; } } } @@ -7151,6 +7327,26 @@ x_1 = lean_mk_string("failed to evaluate Name argument: "); return x_1; } } +lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_evalName___main___closed__6() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_PrettyPrinter_Parenthesizer_evalName___main___closed__5; +x_2 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_evalName___main___closed__7() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_PrettyPrinter_Parenthesizer_evalName___main___closed__6; +x_2 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} lean_object* l_Lean_PrettyPrinter_Parenthesizer_evalName___main(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { _start: { @@ -7182,489 +7378,471 @@ x_16 = l_Lean_PrettyPrinter_Parenthesizer_evalName___main___closed__4; x_17 = l_Lean_Expr_isAppOfArity___main(x_8, x_16, x_14); if (x_17 == 0) { -lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; +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_dec(x_4); lean_dec(x_3); x_18 = lean_expr_dbg_to_string(x_8); lean_dec(x_8); -x_19 = l_Lean_PrettyPrinter_Parenthesizer_evalName___main___closed__5; -x_20 = lean_string_append(x_19, x_18); -lean_dec(x_18); -x_21 = lean_alloc_ctor(22, 1, 0); -lean_ctor_set(x_21, 0, x_20); +x_19 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_19, 0, x_18); +x_20 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_20, 0, x_19); +x_21 = l_Lean_PrettyPrinter_Parenthesizer_evalName___main___closed__7; +x_22 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_22, 0, x_21); +lean_ctor_set(x_22, 1, x_20); +x_23 = lean_alloc_ctor(22, 1, 0); +lean_ctor_set(x_23, 0, x_22); lean_ctor_set_tag(x_6, 1); -lean_ctor_set(x_6, 0, x_21); +lean_ctor_set(x_6, 0, x_23); return x_6; } else { -lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; +lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_free_object(x_6); -x_22 = l_Lean_Expr_getAppNumArgsAux___main(x_8, x_11); -x_23 = lean_nat_sub(x_22, x_11); -x_24 = lean_unsigned_to_nat(1u); -x_25 = lean_nat_sub(x_23, x_24); -lean_dec(x_23); -x_26 = l_Lean_Expr_getRevArg_x21___main(x_8, x_25); +x_24 = l_Lean_Expr_getAppNumArgsAux___main(x_8, x_11); +x_25 = lean_nat_sub(x_24, x_11); +x_26 = lean_unsigned_to_nat(1u); +x_27 = lean_nat_sub(x_25, x_26); +lean_dec(x_25); +x_28 = l_Lean_Expr_getRevArg_x21___main(x_8, x_27); lean_inc(x_4); -x_27 = l_Lean_PrettyPrinter_Parenthesizer_evalName___main(x_26, x_2, x_3, x_4, x_9); -if (lean_obj_tag(x_27) == 0) +x_29 = l_Lean_PrettyPrinter_Parenthesizer_evalName___main(x_28, x_2, x_3, x_4, x_9); +if (lean_obj_tag(x_29) == 0) { -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_28 = lean_ctor_get(x_27, 0); -lean_inc(x_28); -x_29 = lean_ctor_get(x_27, 1); -lean_inc(x_29); -lean_dec(x_27); -x_30 = lean_ctor_get(x_28, 0); +lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; +x_30 = lean_ctor_get(x_29, 0); lean_inc(x_30); -x_31 = lean_ctor_get(x_28, 1); +x_31 = lean_ctor_get(x_29, 1); lean_inc(x_31); -lean_dec(x_28); -x_32 = lean_nat_sub(x_22, x_24); -lean_dec(x_22); -x_33 = lean_nat_sub(x_32, x_24); -lean_dec(x_32); -x_34 = l_Lean_Expr_getRevArg_x21___main(x_8, x_33); +lean_dec(x_29); +x_32 = lean_ctor_get(x_30, 0); +lean_inc(x_32); +x_33 = lean_ctor_get(x_30, 1); +lean_inc(x_33); +lean_dec(x_30); +x_34 = lean_nat_sub(x_24, x_26); +lean_dec(x_24); +x_35 = lean_nat_sub(x_34, x_26); +lean_dec(x_34); +x_36 = l_Lean_Expr_getRevArg_x21___main(x_8, x_35); lean_dec(x_8); -x_35 = l_Lean_PrettyPrinter_Parenthesizer_evalNat(x_34, x_2, x_31, x_4, x_29); -if (lean_obj_tag(x_35) == 0) +x_37 = l_Lean_PrettyPrinter_Parenthesizer_evalNat(x_36, x_2, x_33, x_4, x_31); +if (lean_obj_tag(x_37) == 0) { -uint8_t x_36; -x_36 = !lean_is_exclusive(x_35); -if (x_36 == 0) -{ -lean_object* x_37; uint8_t x_38; -x_37 = lean_ctor_get(x_35, 0); +uint8_t x_38; x_38 = !lean_is_exclusive(x_37); if (x_38 == 0) { -lean_object* x_39; lean_object* x_40; +lean_object* x_39; uint8_t x_40; x_39 = lean_ctor_get(x_37, 0); -x_40 = lean_name_mk_numeral(x_30, x_39); -lean_ctor_set(x_37, 0, x_40); -return x_35; +x_40 = !lean_is_exclusive(x_39); +if (x_40 == 0) +{ +lean_object* x_41; lean_object* x_42; +x_41 = lean_ctor_get(x_39, 0); +x_42 = lean_name_mk_numeral(x_32, x_41); +lean_ctor_set(x_39, 0, x_42); +return x_37; } else { -lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; -x_41 = lean_ctor_get(x_37, 0); -x_42 = lean_ctor_get(x_37, 1); -lean_inc(x_42); -lean_inc(x_41); -lean_dec(x_37); -x_43 = lean_name_mk_numeral(x_30, x_41); -x_44 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_44, 0, x_43); -lean_ctor_set(x_44, 1, x_42); -lean_ctor_set(x_35, 0, x_44); -return x_35; +lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; +x_43 = lean_ctor_get(x_39, 0); +x_44 = lean_ctor_get(x_39, 1); +lean_inc(x_44); +lean_inc(x_43); +lean_dec(x_39); +x_45 = lean_name_mk_numeral(x_32, x_43); +x_46 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_46, 0, x_45); +lean_ctor_set(x_46, 1, x_44); +lean_ctor_set(x_37, 0, x_46); +return x_37; } } else { -lean_object* x_45; lean_object* x_46; lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_object* x_51; lean_object* x_52; -x_45 = lean_ctor_get(x_35, 0); -x_46 = lean_ctor_get(x_35, 1); -lean_inc(x_46); -lean_inc(x_45); -lean_dec(x_35); -x_47 = lean_ctor_get(x_45, 0); -lean_inc(x_47); -x_48 = lean_ctor_get(x_45, 1); +lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_object* x_51; lean_object* x_52; lean_object* x_53; lean_object* x_54; +x_47 = lean_ctor_get(x_37, 0); +x_48 = lean_ctor_get(x_37, 1); lean_inc(x_48); -if (lean_is_exclusive(x_45)) { - lean_ctor_release(x_45, 0); - lean_ctor_release(x_45, 1); - x_49 = x_45; +lean_inc(x_47); +lean_dec(x_37); +x_49 = lean_ctor_get(x_47, 0); +lean_inc(x_49); +x_50 = lean_ctor_get(x_47, 1); +lean_inc(x_50); +if (lean_is_exclusive(x_47)) { + lean_ctor_release(x_47, 0); + lean_ctor_release(x_47, 1); + x_51 = x_47; } else { - lean_dec_ref(x_45); - x_49 = lean_box(0); + lean_dec_ref(x_47); + x_51 = lean_box(0); } -x_50 = lean_name_mk_numeral(x_30, x_47); -if (lean_is_scalar(x_49)) { - x_51 = lean_alloc_ctor(0, 2, 0); +x_52 = lean_name_mk_numeral(x_32, x_49); +if (lean_is_scalar(x_51)) { + x_53 = lean_alloc_ctor(0, 2, 0); } else { - x_51 = x_49; + x_53 = x_51; } -lean_ctor_set(x_51, 0, x_50); -lean_ctor_set(x_51, 1, x_48); -x_52 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_52, 0, x_51); -lean_ctor_set(x_52, 1, x_46); -return x_52; +lean_ctor_set(x_53, 0, x_52); +lean_ctor_set(x_53, 1, x_50); +x_54 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_54, 0, x_53); +lean_ctor_set(x_54, 1, x_48); +return x_54; } } else { -uint8_t x_53; -lean_dec(x_30); -x_53 = !lean_is_exclusive(x_35); -if (x_53 == 0) +uint8_t x_55; +lean_dec(x_32); +x_55 = !lean_is_exclusive(x_37); +if (x_55 == 0) { -return x_35; +return x_37; } else { -lean_object* x_54; lean_object* x_55; lean_object* x_56; -x_54 = lean_ctor_get(x_35, 0); -x_55 = lean_ctor_get(x_35, 1); -lean_inc(x_55); -lean_inc(x_54); -lean_dec(x_35); -x_56 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_56, 0, x_54); -lean_ctor_set(x_56, 1, x_55); -return x_56; +lean_object* x_56; lean_object* x_57; lean_object* x_58; +x_56 = lean_ctor_get(x_37, 0); +x_57 = lean_ctor_get(x_37, 1); +lean_inc(x_57); +lean_inc(x_56); +lean_dec(x_37); +x_58 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_58, 0, x_56); +lean_ctor_set(x_58, 1, x_57); +return x_58; } } } else { -uint8_t x_57; -lean_dec(x_22); +uint8_t x_59; +lean_dec(x_24); lean_dec(x_8); lean_dec(x_4); -x_57 = !lean_is_exclusive(x_27); -if (x_57 == 0) +x_59 = !lean_is_exclusive(x_29); +if (x_59 == 0) { -return x_27; +return x_29; } else { -lean_object* x_58; lean_object* x_59; lean_object* x_60; -x_58 = lean_ctor_get(x_27, 0); -x_59 = lean_ctor_get(x_27, 1); -lean_inc(x_59); -lean_inc(x_58); -lean_dec(x_27); -x_60 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_60, 0, x_58); -lean_ctor_set(x_60, 1, x_59); -return x_60; +lean_object* x_60; lean_object* x_61; lean_object* x_62; +x_60 = lean_ctor_get(x_29, 0); +x_61 = lean_ctor_get(x_29, 1); +lean_inc(x_61); +lean_inc(x_60); +lean_dec(x_29); +x_62 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_62, 0, x_60); +lean_ctor_set(x_62, 1, x_61); +return x_62; } } } } else { -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_63; lean_object* x_64; lean_object* x_65; lean_object* x_66; lean_object* x_67; lean_object* x_68; lean_free_object(x_6); -x_61 = l_Lean_Expr_getAppNumArgsAux___main(x_8, x_11); -x_62 = lean_nat_sub(x_61, x_11); -x_63 = lean_unsigned_to_nat(1u); -x_64 = lean_nat_sub(x_62, x_63); -lean_dec(x_62); -x_65 = l_Lean_Expr_getRevArg_x21___main(x_8, x_64); +x_63 = l_Lean_Expr_getAppNumArgsAux___main(x_8, x_11); +x_64 = lean_nat_sub(x_63, x_11); +x_65 = lean_unsigned_to_nat(1u); +x_66 = lean_nat_sub(x_64, x_65); +lean_dec(x_64); +x_67 = l_Lean_Expr_getRevArg_x21___main(x_8, x_66); lean_inc(x_4); -x_66 = l_Lean_PrettyPrinter_Parenthesizer_evalName___main(x_65, x_2, x_3, x_4, x_9); -if (lean_obj_tag(x_66) == 0) +x_68 = l_Lean_PrettyPrinter_Parenthesizer_evalName___main(x_67, x_2, x_3, x_4, x_9); +if (lean_obj_tag(x_68) == 0) { -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; -x_67 = lean_ctor_get(x_66, 0); -lean_inc(x_67); -x_68 = lean_ctor_get(x_66, 1); -lean_inc(x_68); -lean_dec(x_66); -x_69 = lean_ctor_get(x_67, 0); +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_69 = lean_ctor_get(x_68, 0); lean_inc(x_69); -x_70 = lean_ctor_get(x_67, 1); +x_70 = lean_ctor_get(x_68, 1); lean_inc(x_70); -lean_dec(x_67); -x_71 = lean_nat_sub(x_61, x_63); -lean_dec(x_61); -x_72 = lean_nat_sub(x_71, x_63); -lean_dec(x_71); -x_73 = l_Lean_Expr_getRevArg_x21___main(x_8, x_72); +lean_dec(x_68); +x_71 = lean_ctor_get(x_69, 0); +lean_inc(x_71); +x_72 = lean_ctor_get(x_69, 1); +lean_inc(x_72); +lean_dec(x_69); +x_73 = lean_nat_sub(x_63, x_65); +lean_dec(x_63); +x_74 = lean_nat_sub(x_73, x_65); +lean_dec(x_73); +x_75 = l_Lean_Expr_getRevArg_x21___main(x_8, x_74); lean_dec(x_8); -x_74 = l_Lean_PrettyPrinter_Parenthesizer_evalString(x_73, x_2, x_70, x_4, x_68); -if (lean_obj_tag(x_74) == 0) +x_76 = l_Lean_PrettyPrinter_Parenthesizer_evalString(x_75, x_2, x_72, x_4, x_70); +if (lean_obj_tag(x_76) == 0) { -uint8_t x_75; -x_75 = !lean_is_exclusive(x_74); -if (x_75 == 0) -{ -lean_object* x_76; uint8_t x_77; -x_76 = lean_ctor_get(x_74, 0); +uint8_t x_77; x_77 = !lean_is_exclusive(x_76); if (x_77 == 0) { -lean_object* x_78; lean_object* x_79; +lean_object* x_78; uint8_t x_79; x_78 = lean_ctor_get(x_76, 0); -x_79 = lean_name_mk_string(x_69, x_78); -lean_ctor_set(x_76, 0, x_79); -return x_74; +x_79 = !lean_is_exclusive(x_78); +if (x_79 == 0) +{ +lean_object* x_80; lean_object* x_81; +x_80 = lean_ctor_get(x_78, 0); +x_81 = lean_name_mk_string(x_71, x_80); +lean_ctor_set(x_78, 0, x_81); +return x_76; } else { -lean_object* x_80; lean_object* x_81; lean_object* x_82; lean_object* x_83; -x_80 = lean_ctor_get(x_76, 0); -x_81 = lean_ctor_get(x_76, 1); -lean_inc(x_81); -lean_inc(x_80); -lean_dec(x_76); -x_82 = lean_name_mk_string(x_69, x_80); -x_83 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_83, 0, x_82); -lean_ctor_set(x_83, 1, x_81); -lean_ctor_set(x_74, 0, x_83); -return x_74; +lean_object* x_82; lean_object* x_83; lean_object* x_84; lean_object* x_85; +x_82 = lean_ctor_get(x_78, 0); +x_83 = lean_ctor_get(x_78, 1); +lean_inc(x_83); +lean_inc(x_82); +lean_dec(x_78); +x_84 = lean_name_mk_string(x_71, x_82); +x_85 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_85, 0, x_84); +lean_ctor_set(x_85, 1, x_83); +lean_ctor_set(x_76, 0, x_85); +return x_76; } } else { -lean_object* x_84; lean_object* x_85; lean_object* x_86; lean_object* x_87; lean_object* x_88; lean_object* x_89; lean_object* x_90; lean_object* x_91; -x_84 = lean_ctor_get(x_74, 0); -x_85 = lean_ctor_get(x_74, 1); -lean_inc(x_85); -lean_inc(x_84); -lean_dec(x_74); -x_86 = lean_ctor_get(x_84, 0); -lean_inc(x_86); -x_87 = lean_ctor_get(x_84, 1); +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; +x_86 = lean_ctor_get(x_76, 0); +x_87 = lean_ctor_get(x_76, 1); lean_inc(x_87); -if (lean_is_exclusive(x_84)) { - lean_ctor_release(x_84, 0); - lean_ctor_release(x_84, 1); - x_88 = x_84; +lean_inc(x_86); +lean_dec(x_76); +x_88 = lean_ctor_get(x_86, 0); +lean_inc(x_88); +x_89 = lean_ctor_get(x_86, 1); +lean_inc(x_89); +if (lean_is_exclusive(x_86)) { + lean_ctor_release(x_86, 0); + lean_ctor_release(x_86, 1); + x_90 = x_86; } else { - lean_dec_ref(x_84); - x_88 = lean_box(0); + lean_dec_ref(x_86); + x_90 = lean_box(0); } -x_89 = lean_name_mk_string(x_69, x_86); -if (lean_is_scalar(x_88)) { - x_90 = lean_alloc_ctor(0, 2, 0); +x_91 = lean_name_mk_string(x_71, x_88); +if (lean_is_scalar(x_90)) { + x_92 = lean_alloc_ctor(0, 2, 0); } else { - x_90 = x_88; + x_92 = x_90; } -lean_ctor_set(x_90, 0, x_89); -lean_ctor_set(x_90, 1, x_87); -x_91 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_91, 0, x_90); -lean_ctor_set(x_91, 1, x_85); -return x_91; +lean_ctor_set(x_92, 0, x_91); +lean_ctor_set(x_92, 1, x_89); +x_93 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_93, 0, x_92); +lean_ctor_set(x_93, 1, x_87); +return x_93; } } else { -uint8_t x_92; -lean_dec(x_69); -x_92 = !lean_is_exclusive(x_74); -if (x_92 == 0) +uint8_t x_94; +lean_dec(x_71); +x_94 = !lean_is_exclusive(x_76); +if (x_94 == 0) { -return x_74; +return x_76; } else { -lean_object* x_93; lean_object* x_94; lean_object* x_95; -x_93 = lean_ctor_get(x_74, 0); -x_94 = lean_ctor_get(x_74, 1); -lean_inc(x_94); -lean_inc(x_93); -lean_dec(x_74); -x_95 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_95, 0, x_93); -lean_ctor_set(x_95, 1, x_94); -return x_95; +lean_object* x_95; lean_object* x_96; lean_object* x_97; +x_95 = lean_ctor_get(x_76, 0); +x_96 = lean_ctor_get(x_76, 1); +lean_inc(x_96); +lean_inc(x_95); +lean_dec(x_76); +x_97 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_97, 0, x_95); +lean_ctor_set(x_97, 1, x_96); +return x_97; } } } else { -uint8_t x_96; -lean_dec(x_61); +uint8_t x_98; +lean_dec(x_63); lean_dec(x_8); lean_dec(x_4); -x_96 = !lean_is_exclusive(x_66); -if (x_96 == 0) +x_98 = !lean_is_exclusive(x_68); +if (x_98 == 0) { -return x_66; +return x_68; } else { -lean_object* x_97; lean_object* x_98; lean_object* x_99; -x_97 = lean_ctor_get(x_66, 0); -x_98 = lean_ctor_get(x_66, 1); -lean_inc(x_98); -lean_inc(x_97); -lean_dec(x_66); -x_99 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_99, 0, x_97); -lean_ctor_set(x_99, 1, x_98); -return x_99; +lean_object* x_99; lean_object* x_100; lean_object* x_101; +x_99 = lean_ctor_get(x_68, 0); +x_100 = lean_ctor_get(x_68, 1); +lean_inc(x_100); +lean_inc(x_99); +lean_dec(x_68); +x_101 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_101, 0, x_99); +lean_ctor_set(x_101, 1, x_100); +return x_101; } } } } else { -lean_object* x_100; lean_object* x_101; +lean_object* x_102; lean_object* x_103; lean_dec(x_8); lean_dec(x_4); -x_100 = lean_box(0); -x_101 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_101, 0, x_100); -lean_ctor_set(x_101, 1, x_3); -lean_ctor_set(x_6, 0, x_101); +x_102 = lean_box(0); +x_103 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_103, 0, x_102); +lean_ctor_set(x_103, 1, x_3); +lean_ctor_set(x_6, 0, x_103); return x_6; } } else { -lean_object* x_102; lean_object* x_103; lean_object* x_104; lean_object* x_105; uint8_t x_106; -x_102 = lean_ctor_get(x_6, 0); -x_103 = lean_ctor_get(x_6, 1); -lean_inc(x_103); -lean_inc(x_102); +lean_object* x_104; lean_object* x_105; lean_object* x_106; lean_object* x_107; uint8_t x_108; +x_104 = lean_ctor_get(x_6, 0); +x_105 = lean_ctor_get(x_6, 1); +lean_inc(x_105); +lean_inc(x_104); lean_dec(x_6); -x_104 = l_Lean_PrettyPrinter_Parenthesizer_evalName___main___closed__2; -x_105 = lean_unsigned_to_nat(0u); -x_106 = l_Lean_Expr_isAppOfArity___main(x_102, x_104, x_105); -if (x_106 == 0) +x_106 = l_Lean_PrettyPrinter_Parenthesizer_evalName___main___closed__2; +x_107 = lean_unsigned_to_nat(0u); +x_108 = l_Lean_Expr_isAppOfArity___main(x_104, x_106, x_107); +if (x_108 == 0) { -lean_object* x_107; lean_object* x_108; uint8_t x_109; -x_107 = l_Lean_PrettyPrinter_Parenthesizer_evalName___main___closed__3; -x_108 = lean_unsigned_to_nat(3u); -x_109 = l_Lean_Expr_isAppOfArity___main(x_102, x_107, x_108); -if (x_109 == 0) -{ -lean_object* x_110; uint8_t x_111; -x_110 = l_Lean_PrettyPrinter_Parenthesizer_evalName___main___closed__4; -x_111 = l_Lean_Expr_isAppOfArity___main(x_102, x_110, x_108); +lean_object* x_109; lean_object* x_110; uint8_t x_111; +x_109 = l_Lean_PrettyPrinter_Parenthesizer_evalName___main___closed__3; +x_110 = lean_unsigned_to_nat(3u); +x_111 = l_Lean_Expr_isAppOfArity___main(x_104, x_109, x_110); if (x_111 == 0) { -lean_object* x_112; lean_object* x_113; lean_object* x_114; lean_object* x_115; lean_object* x_116; +lean_object* x_112; uint8_t x_113; +x_112 = l_Lean_PrettyPrinter_Parenthesizer_evalName___main___closed__4; +x_113 = l_Lean_Expr_isAppOfArity___main(x_104, x_112, x_110); +if (x_113 == 0) +{ +lean_object* x_114; lean_object* x_115; lean_object* x_116; lean_object* x_117; lean_object* x_118; lean_object* x_119; lean_object* x_120; lean_dec(x_4); lean_dec(x_3); -x_112 = lean_expr_dbg_to_string(x_102); -lean_dec(x_102); -x_113 = l_Lean_PrettyPrinter_Parenthesizer_evalName___main___closed__5; -x_114 = lean_string_append(x_113, x_112); -lean_dec(x_112); -x_115 = lean_alloc_ctor(22, 1, 0); +x_114 = lean_expr_dbg_to_string(x_104); +lean_dec(x_104); +x_115 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_115, 0, x_114); -x_116 = lean_alloc_ctor(1, 2, 0); +x_116 = lean_alloc_ctor(0, 1, 0); lean_ctor_set(x_116, 0, x_115); -lean_ctor_set(x_116, 1, x_103); -return x_116; +x_117 = l_Lean_PrettyPrinter_Parenthesizer_evalName___main___closed__7; +x_118 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_118, 0, x_117); +lean_ctor_set(x_118, 1, x_116); +x_119 = lean_alloc_ctor(22, 1, 0); +lean_ctor_set(x_119, 0, x_118); +x_120 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_120, 0, x_119); +lean_ctor_set(x_120, 1, x_105); +return x_120; } else { -lean_object* x_117; lean_object* x_118; lean_object* x_119; lean_object* x_120; lean_object* x_121; lean_object* x_122; -x_117 = l_Lean_Expr_getAppNumArgsAux___main(x_102, x_105); -x_118 = lean_nat_sub(x_117, x_105); -x_119 = lean_unsigned_to_nat(1u); -x_120 = lean_nat_sub(x_118, x_119); -lean_dec(x_118); -x_121 = l_Lean_Expr_getRevArg_x21___main(x_102, x_120); -lean_inc(x_4); -x_122 = l_Lean_PrettyPrinter_Parenthesizer_evalName___main(x_121, x_2, x_3, x_4, x_103); -if (lean_obj_tag(x_122) == 0) -{ -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_123 = lean_ctor_get(x_122, 0); -lean_inc(x_123); -x_124 = lean_ctor_get(x_122, 1); -lean_inc(x_124); +lean_object* x_121; lean_object* x_122; lean_object* x_123; lean_object* x_124; lean_object* x_125; lean_object* x_126; +x_121 = l_Lean_Expr_getAppNumArgsAux___main(x_104, x_107); +x_122 = lean_nat_sub(x_121, x_107); +x_123 = lean_unsigned_to_nat(1u); +x_124 = lean_nat_sub(x_122, x_123); lean_dec(x_122); -x_125 = lean_ctor_get(x_123, 0); -lean_inc(x_125); -x_126 = lean_ctor_get(x_123, 1); -lean_inc(x_126); -lean_dec(x_123); -x_127 = lean_nat_sub(x_117, x_119); -lean_dec(x_117); -x_128 = lean_nat_sub(x_127, x_119); +x_125 = l_Lean_Expr_getRevArg_x21___main(x_104, x_124); +lean_inc(x_4); +x_126 = l_Lean_PrettyPrinter_Parenthesizer_evalName___main(x_125, x_2, x_3, x_4, x_105); +if (lean_obj_tag(x_126) == 0) +{ +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_127 = lean_ctor_get(x_126, 0); +lean_inc(x_127); +x_128 = lean_ctor_get(x_126, 1); +lean_inc(x_128); +lean_dec(x_126); +x_129 = lean_ctor_get(x_127, 0); +lean_inc(x_129); +x_130 = lean_ctor_get(x_127, 1); +lean_inc(x_130); lean_dec(x_127); -x_129 = l_Lean_Expr_getRevArg_x21___main(x_102, x_128); -lean_dec(x_102); -x_130 = l_Lean_PrettyPrinter_Parenthesizer_evalNat(x_129, x_2, x_126, x_4, x_124); -if (lean_obj_tag(x_130) == 0) +x_131 = lean_nat_sub(x_121, x_123); +lean_dec(x_121); +x_132 = lean_nat_sub(x_131, x_123); +lean_dec(x_131); +x_133 = l_Lean_Expr_getRevArg_x21___main(x_104, x_132); +lean_dec(x_104); +x_134 = l_Lean_PrettyPrinter_Parenthesizer_evalNat(x_133, x_2, x_130, x_4, x_128); +if (lean_obj_tag(x_134) == 0) { -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; -x_131 = lean_ctor_get(x_130, 0); -lean_inc(x_131); -x_132 = lean_ctor_get(x_130, 1); -lean_inc(x_132); -if (lean_is_exclusive(x_130)) { - lean_ctor_release(x_130, 0); - lean_ctor_release(x_130, 1); - x_133 = x_130; -} else { - lean_dec_ref(x_130); - x_133 = lean_box(0); -} -x_134 = lean_ctor_get(x_131, 0); -lean_inc(x_134); -x_135 = lean_ctor_get(x_131, 1); +lean_object* x_135; lean_object* x_136; lean_object* x_137; lean_object* x_138; lean_object* x_139; lean_object* x_140; lean_object* x_141; lean_object* x_142; lean_object* x_143; +x_135 = lean_ctor_get(x_134, 0); lean_inc(x_135); -if (lean_is_exclusive(x_131)) { - lean_ctor_release(x_131, 0); - lean_ctor_release(x_131, 1); - x_136 = x_131; +x_136 = lean_ctor_get(x_134, 1); +lean_inc(x_136); +if (lean_is_exclusive(x_134)) { + lean_ctor_release(x_134, 0); + lean_ctor_release(x_134, 1); + x_137 = x_134; } else { - lean_dec_ref(x_131); - x_136 = lean_box(0); + lean_dec_ref(x_134); + x_137 = lean_box(0); } -x_137 = lean_name_mk_numeral(x_125, x_134); -if (lean_is_scalar(x_136)) { - x_138 = lean_alloc_ctor(0, 2, 0); +x_138 = lean_ctor_get(x_135, 0); +lean_inc(x_138); +x_139 = lean_ctor_get(x_135, 1); +lean_inc(x_139); +if (lean_is_exclusive(x_135)) { + lean_ctor_release(x_135, 0); + lean_ctor_release(x_135, 1); + x_140 = x_135; } else { - x_138 = x_136; + lean_dec_ref(x_135); + x_140 = lean_box(0); } -lean_ctor_set(x_138, 0, x_137); -lean_ctor_set(x_138, 1, x_135); -if (lean_is_scalar(x_133)) { - x_139 = lean_alloc_ctor(0, 2, 0); +x_141 = lean_name_mk_numeral(x_129, x_138); +if (lean_is_scalar(x_140)) { + x_142 = lean_alloc_ctor(0, 2, 0); } else { - x_139 = x_133; + x_142 = x_140; } -lean_ctor_set(x_139, 0, x_138); -lean_ctor_set(x_139, 1, x_132); -return x_139; -} -else -{ -lean_object* x_140; lean_object* x_141; lean_object* x_142; lean_object* x_143; -lean_dec(x_125); -x_140 = lean_ctor_get(x_130, 0); -lean_inc(x_140); -x_141 = lean_ctor_get(x_130, 1); -lean_inc(x_141); -if (lean_is_exclusive(x_130)) { - lean_ctor_release(x_130, 0); - lean_ctor_release(x_130, 1); - x_142 = x_130; +lean_ctor_set(x_142, 0, x_141); +lean_ctor_set(x_142, 1, x_139); +if (lean_is_scalar(x_137)) { + x_143 = lean_alloc_ctor(0, 2, 0); } else { - lean_dec_ref(x_130); - x_142 = lean_box(0); + x_143 = x_137; } -if (lean_is_scalar(x_142)) { - x_143 = lean_alloc_ctor(1, 2, 0); -} else { - x_143 = x_142; -} -lean_ctor_set(x_143, 0, x_140); -lean_ctor_set(x_143, 1, x_141); +lean_ctor_set(x_143, 0, x_142); +lean_ctor_set(x_143, 1, x_136); return x_143; } -} else { lean_object* x_144; lean_object* x_145; lean_object* x_146; lean_object* x_147; -lean_dec(x_117); -lean_dec(x_102); -lean_dec(x_4); -x_144 = lean_ctor_get(x_122, 0); +lean_dec(x_129); +x_144 = lean_ctor_get(x_134, 0); lean_inc(x_144); -x_145 = lean_ctor_get(x_122, 1); +x_145 = lean_ctor_get(x_134, 1); lean_inc(x_145); -if (lean_is_exclusive(x_122)) { - lean_ctor_release(x_122, 0); - lean_ctor_release(x_122, 1); - x_146 = x_122; +if (lean_is_exclusive(x_134)) { + lean_ctor_release(x_134, 0); + lean_ctor_release(x_134, 1); + x_146 = x_134; } else { - lean_dec_ref(x_122); + lean_dec_ref(x_134); x_146 = lean_box(0); } if (lean_is_scalar(x_146)) { @@ -7677,124 +7855,124 @@ lean_ctor_set(x_147, 1, x_145); return x_147; } } +else +{ +lean_object* x_148; lean_object* x_149; lean_object* x_150; lean_object* x_151; +lean_dec(x_121); +lean_dec(x_104); +lean_dec(x_4); +x_148 = lean_ctor_get(x_126, 0); +lean_inc(x_148); +x_149 = lean_ctor_get(x_126, 1); +lean_inc(x_149); +if (lean_is_exclusive(x_126)) { + lean_ctor_release(x_126, 0); + lean_ctor_release(x_126, 1); + x_150 = x_126; +} else { + lean_dec_ref(x_126); + x_150 = lean_box(0); +} +if (lean_is_scalar(x_150)) { + x_151 = lean_alloc_ctor(1, 2, 0); +} else { + x_151 = x_150; +} +lean_ctor_set(x_151, 0, x_148); +lean_ctor_set(x_151, 1, x_149); +return x_151; +} +} } else { -lean_object* x_148; lean_object* x_149; lean_object* x_150; lean_object* x_151; lean_object* x_152; lean_object* x_153; -x_148 = l_Lean_Expr_getAppNumArgsAux___main(x_102, x_105); -x_149 = lean_nat_sub(x_148, x_105); -x_150 = lean_unsigned_to_nat(1u); -x_151 = lean_nat_sub(x_149, x_150); -lean_dec(x_149); -x_152 = l_Lean_Expr_getRevArg_x21___main(x_102, x_151); -lean_inc(x_4); -x_153 = l_Lean_PrettyPrinter_Parenthesizer_evalName___main(x_152, x_2, x_3, x_4, x_103); -if (lean_obj_tag(x_153) == 0) -{ -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_154 = lean_ctor_get(x_153, 0); -lean_inc(x_154); -x_155 = lean_ctor_get(x_153, 1); -lean_inc(x_155); +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_152 = l_Lean_Expr_getAppNumArgsAux___main(x_104, x_107); +x_153 = lean_nat_sub(x_152, x_107); +x_154 = lean_unsigned_to_nat(1u); +x_155 = lean_nat_sub(x_153, x_154); lean_dec(x_153); -x_156 = lean_ctor_get(x_154, 0); -lean_inc(x_156); -x_157 = lean_ctor_get(x_154, 1); -lean_inc(x_157); -lean_dec(x_154); -x_158 = lean_nat_sub(x_148, x_150); -lean_dec(x_148); -x_159 = lean_nat_sub(x_158, x_150); +x_156 = l_Lean_Expr_getRevArg_x21___main(x_104, x_155); +lean_inc(x_4); +x_157 = l_Lean_PrettyPrinter_Parenthesizer_evalName___main(x_156, x_2, x_3, x_4, x_105); +if (lean_obj_tag(x_157) == 0) +{ +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_158 = lean_ctor_get(x_157, 0); +lean_inc(x_158); +x_159 = lean_ctor_get(x_157, 1); +lean_inc(x_159); +lean_dec(x_157); +x_160 = lean_ctor_get(x_158, 0); +lean_inc(x_160); +x_161 = lean_ctor_get(x_158, 1); +lean_inc(x_161); lean_dec(x_158); -x_160 = l_Lean_Expr_getRevArg_x21___main(x_102, x_159); -lean_dec(x_102); -x_161 = l_Lean_PrettyPrinter_Parenthesizer_evalString(x_160, x_2, x_157, x_4, x_155); -if (lean_obj_tag(x_161) == 0) +x_162 = lean_nat_sub(x_152, x_154); +lean_dec(x_152); +x_163 = lean_nat_sub(x_162, x_154); +lean_dec(x_162); +x_164 = l_Lean_Expr_getRevArg_x21___main(x_104, x_163); +lean_dec(x_104); +x_165 = l_Lean_PrettyPrinter_Parenthesizer_evalString(x_164, x_2, x_161, x_4, x_159); +if (lean_obj_tag(x_165) == 0) { -lean_object* x_162; lean_object* x_163; lean_object* x_164; lean_object* x_165; lean_object* x_166; lean_object* x_167; lean_object* x_168; lean_object* x_169; lean_object* x_170; -x_162 = lean_ctor_get(x_161, 0); -lean_inc(x_162); -x_163 = lean_ctor_get(x_161, 1); -lean_inc(x_163); -if (lean_is_exclusive(x_161)) { - lean_ctor_release(x_161, 0); - lean_ctor_release(x_161, 1); - x_164 = x_161; -} else { - lean_dec_ref(x_161); - x_164 = lean_box(0); -} -x_165 = lean_ctor_get(x_162, 0); -lean_inc(x_165); -x_166 = lean_ctor_get(x_162, 1); +lean_object* x_166; lean_object* x_167; lean_object* x_168; lean_object* x_169; lean_object* x_170; lean_object* x_171; lean_object* x_172; lean_object* x_173; lean_object* x_174; +x_166 = lean_ctor_get(x_165, 0); lean_inc(x_166); -if (lean_is_exclusive(x_162)) { - lean_ctor_release(x_162, 0); - lean_ctor_release(x_162, 1); - x_167 = x_162; +x_167 = lean_ctor_get(x_165, 1); +lean_inc(x_167); +if (lean_is_exclusive(x_165)) { + lean_ctor_release(x_165, 0); + lean_ctor_release(x_165, 1); + x_168 = x_165; } else { - lean_dec_ref(x_162); - x_167 = lean_box(0); + lean_dec_ref(x_165); + x_168 = lean_box(0); } -x_168 = lean_name_mk_string(x_156, x_165); -if (lean_is_scalar(x_167)) { - x_169 = lean_alloc_ctor(0, 2, 0); +x_169 = lean_ctor_get(x_166, 0); +lean_inc(x_169); +x_170 = lean_ctor_get(x_166, 1); +lean_inc(x_170); +if (lean_is_exclusive(x_166)) { + lean_ctor_release(x_166, 0); + lean_ctor_release(x_166, 1); + x_171 = x_166; } else { - x_169 = x_167; + lean_dec_ref(x_166); + x_171 = lean_box(0); } -lean_ctor_set(x_169, 0, x_168); -lean_ctor_set(x_169, 1, x_166); -if (lean_is_scalar(x_164)) { - x_170 = lean_alloc_ctor(0, 2, 0); +x_172 = lean_name_mk_string(x_160, x_169); +if (lean_is_scalar(x_171)) { + x_173 = lean_alloc_ctor(0, 2, 0); } else { - x_170 = x_164; + x_173 = x_171; } -lean_ctor_set(x_170, 0, x_169); -lean_ctor_set(x_170, 1, x_163); -return x_170; -} -else -{ -lean_object* x_171; lean_object* x_172; lean_object* x_173; lean_object* x_174; -lean_dec(x_156); -x_171 = lean_ctor_get(x_161, 0); -lean_inc(x_171); -x_172 = lean_ctor_get(x_161, 1); -lean_inc(x_172); -if (lean_is_exclusive(x_161)) { - lean_ctor_release(x_161, 0); - lean_ctor_release(x_161, 1); - x_173 = x_161; +lean_ctor_set(x_173, 0, x_172); +lean_ctor_set(x_173, 1, x_170); +if (lean_is_scalar(x_168)) { + x_174 = lean_alloc_ctor(0, 2, 0); } else { - lean_dec_ref(x_161); - x_173 = lean_box(0); + x_174 = x_168; } -if (lean_is_scalar(x_173)) { - x_174 = lean_alloc_ctor(1, 2, 0); -} else { - x_174 = x_173; -} -lean_ctor_set(x_174, 0, x_171); -lean_ctor_set(x_174, 1, x_172); +lean_ctor_set(x_174, 0, x_173); +lean_ctor_set(x_174, 1, x_167); return x_174; } -} else { lean_object* x_175; lean_object* x_176; lean_object* x_177; lean_object* x_178; -lean_dec(x_148); -lean_dec(x_102); -lean_dec(x_4); -x_175 = lean_ctor_get(x_153, 0); +lean_dec(x_160); +x_175 = lean_ctor_get(x_165, 0); lean_inc(x_175); -x_176 = lean_ctor_get(x_153, 1); +x_176 = lean_ctor_get(x_165, 1); lean_inc(x_176); -if (lean_is_exclusive(x_153)) { - lean_ctor_release(x_153, 0); - lean_ctor_release(x_153, 1); - x_177 = x_153; +if (lean_is_exclusive(x_165)) { + lean_ctor_release(x_165, 0); + lean_ctor_release(x_165, 1); + x_177 = x_165; } else { - lean_dec_ref(x_153); + lean_dec_ref(x_165); x_177 = lean_box(0); } if (lean_is_scalar(x_177)) { @@ -7807,45 +7985,73 @@ lean_ctor_set(x_178, 1, x_176); return x_178; } } -} else { -lean_object* x_179; lean_object* x_180; lean_object* x_181; -lean_dec(x_102); +lean_object* x_179; lean_object* x_180; lean_object* x_181; lean_object* x_182; +lean_dec(x_152); +lean_dec(x_104); lean_dec(x_4); -x_179 = lean_box(0); -x_180 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_180, 0, x_179); -lean_ctor_set(x_180, 1, x_3); -x_181 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_181, 0, x_180); -lean_ctor_set(x_181, 1, x_103); -return x_181; +x_179 = lean_ctor_get(x_157, 0); +lean_inc(x_179); +x_180 = lean_ctor_get(x_157, 1); +lean_inc(x_180); +if (lean_is_exclusive(x_157)) { + lean_ctor_release(x_157, 0); + lean_ctor_release(x_157, 1); + x_181 = x_157; +} else { + lean_dec_ref(x_157); + x_181 = lean_box(0); +} +if (lean_is_scalar(x_181)) { + x_182 = lean_alloc_ctor(1, 2, 0); +} else { + x_182 = x_181; +} +lean_ctor_set(x_182, 0, x_179); +lean_ctor_set(x_182, 1, x_180); +return x_182; } } } else { -uint8_t x_182; +lean_object* x_183; lean_object* x_184; lean_object* x_185; +lean_dec(x_104); +lean_dec(x_4); +x_183 = lean_box(0); +x_184 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_184, 0, x_183); +lean_ctor_set(x_184, 1, x_3); +x_185 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_185, 0, x_184); +lean_ctor_set(x_185, 1, x_105); +return x_185; +} +} +} +else +{ +uint8_t x_186; lean_dec(x_4); lean_dec(x_3); -x_182 = !lean_is_exclusive(x_6); -if (x_182 == 0) +x_186 = !lean_is_exclusive(x_6); +if (x_186 == 0) { return x_6; } else { -lean_object* x_183; lean_object* x_184; lean_object* x_185; -x_183 = lean_ctor_get(x_6, 0); -x_184 = lean_ctor_get(x_6, 1); -lean_inc(x_184); -lean_inc(x_183); +lean_object* x_187; lean_object* x_188; lean_object* x_189; +x_187 = lean_ctor_get(x_6, 0); +x_188 = lean_ctor_get(x_6, 1); +lean_inc(x_188); +lean_inc(x_187); lean_dec(x_6); -x_185 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_185, 0, x_183); -lean_ctor_set(x_185, 1, x_184); -return x_185; +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; } } } @@ -7937,6 +8143,26 @@ _start: { lean_object* x_1; lean_object* x_2; x_1 = l_Lean_PrettyPrinter_Parenthesizer_termParser_parenthesizer___closed__2; +x_2 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_termParser_parenthesizer___closed__4() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_PrettyPrinter_Parenthesizer_termParser_parenthesizer___closed__3; +x_2 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* _init_l_Lean_PrettyPrinter_Parenthesizer_termParser_parenthesizer___closed__5() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_PrettyPrinter_Parenthesizer_termParser_parenthesizer___closed__4; x_2 = lean_alloc_ctor(22, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; @@ -8034,7 +8260,7 @@ lean_object* x_29; lean_dec(x_13); lean_dec(x_4); lean_dec(x_2); -x_29 = l_Lean_PrettyPrinter_Parenthesizer_termParser_parenthesizer___closed__3; +x_29 = l_Lean_PrettyPrinter_Parenthesizer_termParser_parenthesizer___closed__5; lean_ctor_set_tag(x_8, 1); lean_ctor_set(x_8, 0, x_29); return x_8; @@ -8113,7 +8339,7 @@ lean_object* x_49; lean_object* x_50; lean_dec(x_33); lean_dec(x_4); lean_dec(x_2); -x_49 = l_Lean_PrettyPrinter_Parenthesizer_termParser_parenthesizer___closed__3; +x_49 = l_Lean_PrettyPrinter_Parenthesizer_termParser_parenthesizer___closed__5; x_50 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_50, 0, x_49); lean_ctor_set(x_50, 1, x_31); @@ -9088,7 +9314,7 @@ lean_dec(x_24); lean_dec(x_21); lean_dec(x_4); lean_dec(x_2); -x_35 = l_Lean_PrettyPrinter_Parenthesizer_termParser_parenthesizer___closed__3; +x_35 = l_Lean_PrettyPrinter_Parenthesizer_termParser_parenthesizer___closed__5; if (lean_is_scalar(x_20)) { x_36 = lean_alloc_ctor(1, 2, 0); } else { @@ -9142,7 +9368,7 @@ if (x_54 == 0) lean_object* x_55; lean_object* x_56; x_55 = lean_ctor_get(x_53, 0); lean_dec(x_55); -x_56 = l_Lean_PrettyPrinter_Parenthesizer_termParser_parenthesizer___closed__3; +x_56 = l_Lean_PrettyPrinter_Parenthesizer_termParser_parenthesizer___closed__5; lean_ctor_set_tag(x_53, 1); lean_ctor_set(x_53, 0, x_56); return x_53; @@ -9153,7 +9379,7 @@ lean_object* x_57; lean_object* x_58; lean_object* x_59; x_57 = lean_ctor_get(x_53, 1); lean_inc(x_57); lean_dec(x_53); -x_58 = l_Lean_PrettyPrinter_Parenthesizer_termParser_parenthesizer___closed__3; +x_58 = l_Lean_PrettyPrinter_Parenthesizer_termParser_parenthesizer___closed__5; x_59 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_59, 0, x_58); lean_ctor_set(x_59, 1, x_57); @@ -10140,7 +10366,7 @@ lean_dec(x_32); lean_dec(x_20); lean_dec(x_4); lean_dec(x_2); -x_44 = l_Lean_PrettyPrinter_Parenthesizer_termParser_parenthesizer___closed__3; +x_44 = l_Lean_PrettyPrinter_Parenthesizer_termParser_parenthesizer___closed__5; if (lean_is_scalar(x_28)) { x_45 = lean_alloc_ctor(1, 2, 0); } else { @@ -10194,7 +10420,7 @@ if (x_63 == 0) lean_object* x_64; lean_object* x_65; x_64 = lean_ctor_get(x_62, 0); lean_dec(x_64); -x_65 = l_Lean_PrettyPrinter_Parenthesizer_termParser_parenthesizer___closed__3; +x_65 = l_Lean_PrettyPrinter_Parenthesizer_termParser_parenthesizer___closed__5; lean_ctor_set_tag(x_62, 1); lean_ctor_set(x_62, 0, x_65); return x_62; @@ -10205,7 +10431,7 @@ lean_object* x_66; lean_object* x_67; lean_object* x_68; x_66 = lean_ctor_get(x_62, 1); lean_inc(x_66); lean_dec(x_62); -x_67 = l_Lean_PrettyPrinter_Parenthesizer_termParser_parenthesizer___closed__3; +x_67 = l_Lean_PrettyPrinter_Parenthesizer_termParser_parenthesizer___closed__5; x_68 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_68, 0, x_67); lean_ctor_set(x_68, 1, x_66); @@ -11682,20 +11908,32 @@ x_13 = lean_ctor_get(x_12, 0); lean_inc(x_13); if (lean_obj_tag(x_13) == 22) { -uint8_t x_14; -x_14 = !lean_is_exclusive(x_12); -if (x_14 == 0) +lean_object* x_14; +x_14 = lean_ctor_get(x_13, 0); +lean_inc(x_14); +if (lean_obj_tag(x_14) == 0) { -lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; uint8_t x_19; -x_15 = lean_ctor_get(x_12, 1); -x_16 = lean_ctor_get(x_12, 0); -lean_dec(x_16); -x_17 = lean_ctor_get(x_13, 0); -lean_inc(x_17); -x_18 = l_Lean_PrettyPrinter_Parenthesizer_termParser_parenthesizer___closed__2; -x_19 = lean_string_dec_eq(x_17, x_18); -lean_dec(x_17); -if (x_19 == 0) +lean_object* x_15; +x_15 = lean_ctor_get(x_14, 0); +lean_inc(x_15); +lean_dec(x_14); +if (lean_obj_tag(x_15) == 2) +{ +uint8_t x_16; +x_16 = !lean_is_exclusive(x_12); +if (x_16 == 0) +{ +lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; uint8_t x_21; +x_17 = lean_ctor_get(x_12, 1); +x_18 = lean_ctor_get(x_12, 0); +lean_dec(x_18); +x_19 = lean_ctor_get(x_15, 0); +lean_inc(x_19); +lean_dec(x_15); +x_20 = l_Lean_PrettyPrinter_Parenthesizer_termParser_parenthesizer___closed__2; +x_21 = lean_string_dec_eq(x_19, x_20); +lean_dec(x_19); +if (x_21 == 0) { lean_dec(x_7); lean_dec(x_4); @@ -11705,80 +11943,139 @@ return x_12; } else { -lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; +lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_free_object(x_12); lean_dec(x_13); -x_20 = lean_nat_sub(x_7, x_9); +x_22 = lean_nat_sub(x_7, x_9); lean_dec(x_7); -x_21 = lean_nat_sub(x_20, x_9); -lean_dec(x_20); -x_22 = l_Lean_Expr_getRevArg_x21___main(x_1, x_21); -x_23 = l_Lean_PrettyPrinter_Parenthesizer_visit___main(x_22, x_2, x_3, x_4, x_15); -return x_23; +x_23 = lean_nat_sub(x_22, x_9); +lean_dec(x_22); +x_24 = l_Lean_Expr_getRevArg_x21___main(x_1, x_23); +x_25 = l_Lean_PrettyPrinter_Parenthesizer_visit___main(x_24, x_2, x_3, x_4, x_17); +return x_25; } } else { -lean_object* x_24; lean_object* x_25; lean_object* x_26; uint8_t x_27; -x_24 = lean_ctor_get(x_12, 1); -lean_inc(x_24); +lean_object* x_26; lean_object* x_27; lean_object* x_28; uint8_t x_29; +x_26 = lean_ctor_get(x_12, 1); +lean_inc(x_26); lean_dec(x_12); -x_25 = lean_ctor_get(x_13, 0); -lean_inc(x_25); -x_26 = l_Lean_PrettyPrinter_Parenthesizer_termParser_parenthesizer___closed__2; -x_27 = lean_string_dec_eq(x_25, x_26); -lean_dec(x_25); -if (x_27 == 0) +x_27 = lean_ctor_get(x_15, 0); +lean_inc(x_27); +lean_dec(x_15); +x_28 = l_Lean_PrettyPrinter_Parenthesizer_termParser_parenthesizer___closed__2; +x_29 = lean_string_dec_eq(x_27, x_28); +lean_dec(x_27); +if (x_29 == 0) { -lean_object* x_28; +lean_object* x_30; lean_dec(x_7); lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); -x_28 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_28, 0, x_13); -lean_ctor_set(x_28, 1, x_24); -return x_28; +x_30 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_30, 0, x_13); +lean_ctor_set(x_30, 1, x_26); +return x_30; } else { -lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; +lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_dec(x_13); -x_29 = lean_nat_sub(x_7, x_9); +x_31 = lean_nat_sub(x_7, x_9); lean_dec(x_7); -x_30 = lean_nat_sub(x_29, x_9); -lean_dec(x_29); -x_31 = l_Lean_Expr_getRevArg_x21___main(x_1, x_30); -x_32 = l_Lean_PrettyPrinter_Parenthesizer_visit___main(x_31, x_2, x_3, x_4, x_24); -return x_32; +x_32 = lean_nat_sub(x_31, x_9); +lean_dec(x_31); +x_33 = l_Lean_Expr_getRevArg_x21___main(x_1, x_32); +x_34 = l_Lean_PrettyPrinter_Parenthesizer_visit___main(x_33, x_2, x_3, x_4, x_26); +return x_34; } } } else { -uint8_t x_33; +uint8_t x_35; +lean_dec(x_15); lean_dec(x_7); lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); -x_33 = !lean_is_exclusive(x_12); -if (x_33 == 0) +x_35 = !lean_is_exclusive(x_12); +if (x_35 == 0) { -lean_object* x_34; -x_34 = lean_ctor_get(x_12, 0); -lean_dec(x_34); +lean_object* x_36; +x_36 = lean_ctor_get(x_12, 0); +lean_dec(x_36); return x_12; } else { -lean_object* x_35; lean_object* x_36; -x_35 = lean_ctor_get(x_12, 1); -lean_inc(x_35); +lean_object* x_37; lean_object* x_38; +x_37 = lean_ctor_get(x_12, 1); +lean_inc(x_37); lean_dec(x_12); -x_36 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_36, 0, x_13); -lean_ctor_set(x_36, 1, x_35); -return x_36; +x_38 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_38, 0, x_13); +lean_ctor_set(x_38, 1, x_37); +return x_38; +} +} +} +else +{ +uint8_t x_39; +lean_dec(x_14); +lean_dec(x_7); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +x_39 = !lean_is_exclusive(x_12); +if (x_39 == 0) +{ +lean_object* x_40; +x_40 = lean_ctor_get(x_12, 0); +lean_dec(x_40); +return x_12; +} +else +{ +lean_object* x_41; lean_object* x_42; +x_41 = lean_ctor_get(x_12, 1); +lean_inc(x_41); +lean_dec(x_12); +x_42 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_42, 0, x_13); +lean_ctor_set(x_42, 1, x_41); +return x_42; +} +} +} +else +{ +uint8_t x_43; +lean_dec(x_7); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +x_43 = !lean_is_exclusive(x_12); +if (x_43 == 0) +{ +lean_object* x_44; +x_44 = lean_ctor_get(x_12, 0); +lean_dec(x_44); +return x_12; +} +else +{ +lean_object* x_45; lean_object* x_46; +x_45 = lean_ctor_get(x_12, 1); +lean_inc(x_45); +lean_dec(x_12); +x_46 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_46, 0, x_13); +lean_ctor_set(x_46, 1, x_45); +return x_46; } } } @@ -12802,6 +13099,10 @@ l_Lean_PrettyPrinter_Parenthesizer_visit___main___closed__9 = _init_l_Lean_Prett lean_mark_persistent(l_Lean_PrettyPrinter_Parenthesizer_visit___main___closed__9); l_Lean_PrettyPrinter_Parenthesizer_visit___main___closed__10 = _init_l_Lean_PrettyPrinter_Parenthesizer_visit___main___closed__10(); lean_mark_persistent(l_Lean_PrettyPrinter_Parenthesizer_visit___main___closed__10); +l_Lean_PrettyPrinter_Parenthesizer_visit___main___closed__11 = _init_l_Lean_PrettyPrinter_Parenthesizer_visit___main___closed__11(); +lean_mark_persistent(l_Lean_PrettyPrinter_Parenthesizer_visit___main___closed__11); +l_Lean_PrettyPrinter_Parenthesizer_visit___main___closed__12 = _init_l_Lean_PrettyPrinter_Parenthesizer_visit___main___closed__12(); +lean_mark_persistent(l_Lean_PrettyPrinter_Parenthesizer_visit___main___closed__12); l_Lean_PrettyPrinter_Parenthesizer_monadQuotation___closed__1 = _init_l_Lean_PrettyPrinter_Parenthesizer_monadQuotation___closed__1(); lean_mark_persistent(l_Lean_PrettyPrinter_Parenthesizer_monadQuotation___closed__1); l_Lean_PrettyPrinter_Parenthesizer_monadQuotation___closed__2 = _init_l_Lean_PrettyPrinter_Parenthesizer_monadQuotation___closed__2(); @@ -12824,6 +13125,10 @@ l_Lean_PrettyPrinter_Parenthesizer_visitAntiquot___closed__5 = _init_l_Lean_Pret lean_mark_persistent(l_Lean_PrettyPrinter_Parenthesizer_visitAntiquot___closed__5); l_Lean_PrettyPrinter_Parenthesizer_visitAntiquot___closed__6 = _init_l_Lean_PrettyPrinter_Parenthesizer_visitAntiquot___closed__6(); lean_mark_persistent(l_Lean_PrettyPrinter_Parenthesizer_visitAntiquot___closed__6); +l_Lean_PrettyPrinter_Parenthesizer_visitAntiquot___closed__7 = _init_l_Lean_PrettyPrinter_Parenthesizer_visitAntiquot___closed__7(); +lean_mark_persistent(l_Lean_PrettyPrinter_Parenthesizer_visitAntiquot___closed__7); +l_Lean_PrettyPrinter_Parenthesizer_visitAntiquot___closed__8 = _init_l_Lean_PrettyPrinter_Parenthesizer_visitAntiquot___closed__8(); +lean_mark_persistent(l_Lean_PrettyPrinter_Parenthesizer_visitAntiquot___closed__8); l_Lean_PrettyPrinter_Parenthesizer_visitParenthesizable___closed__1 = _init_l_Lean_PrettyPrinter_Parenthesizer_visitParenthesizable___closed__1(); lean_mark_persistent(l_Lean_PrettyPrinter_Parenthesizer_visitParenthesizable___closed__1); l_Lean_PrettyPrinter_Parenthesizer_visitParenthesizable___closed__2 = _init_l_Lean_PrettyPrinter_Parenthesizer_visitParenthesizable___closed__2(); @@ -12864,10 +13169,22 @@ l_Lean_PrettyPrinter_Parenthesizer_visitParenthesizable___closed__19 = _init_l_L lean_mark_persistent(l_Lean_PrettyPrinter_Parenthesizer_visitParenthesizable___closed__19); l_Lean_PrettyPrinter_Parenthesizer_evalNat___closed__1 = _init_l_Lean_PrettyPrinter_Parenthesizer_evalNat___closed__1(); lean_mark_persistent(l_Lean_PrettyPrinter_Parenthesizer_evalNat___closed__1); +l_Lean_PrettyPrinter_Parenthesizer_evalNat___closed__2 = _init_l_Lean_PrettyPrinter_Parenthesizer_evalNat___closed__2(); +lean_mark_persistent(l_Lean_PrettyPrinter_Parenthesizer_evalNat___closed__2); +l_Lean_PrettyPrinter_Parenthesizer_evalNat___closed__3 = _init_l_Lean_PrettyPrinter_Parenthesizer_evalNat___closed__3(); +lean_mark_persistent(l_Lean_PrettyPrinter_Parenthesizer_evalNat___closed__3); l_Lean_PrettyPrinter_Parenthesizer_evalOptPrec___closed__1 = _init_l_Lean_PrettyPrinter_Parenthesizer_evalOptPrec___closed__1(); lean_mark_persistent(l_Lean_PrettyPrinter_Parenthesizer_evalOptPrec___closed__1); +l_Lean_PrettyPrinter_Parenthesizer_evalOptPrec___closed__2 = _init_l_Lean_PrettyPrinter_Parenthesizer_evalOptPrec___closed__2(); +lean_mark_persistent(l_Lean_PrettyPrinter_Parenthesizer_evalOptPrec___closed__2); +l_Lean_PrettyPrinter_Parenthesizer_evalOptPrec___closed__3 = _init_l_Lean_PrettyPrinter_Parenthesizer_evalOptPrec___closed__3(); +lean_mark_persistent(l_Lean_PrettyPrinter_Parenthesizer_evalOptPrec___closed__3); l_Lean_PrettyPrinter_Parenthesizer_evalString___closed__1 = _init_l_Lean_PrettyPrinter_Parenthesizer_evalString___closed__1(); lean_mark_persistent(l_Lean_PrettyPrinter_Parenthesizer_evalString___closed__1); +l_Lean_PrettyPrinter_Parenthesizer_evalString___closed__2 = _init_l_Lean_PrettyPrinter_Parenthesizer_evalString___closed__2(); +lean_mark_persistent(l_Lean_PrettyPrinter_Parenthesizer_evalString___closed__2); +l_Lean_PrettyPrinter_Parenthesizer_evalString___closed__3 = _init_l_Lean_PrettyPrinter_Parenthesizer_evalString___closed__3(); +lean_mark_persistent(l_Lean_PrettyPrinter_Parenthesizer_evalString___closed__3); l_Lean_PrettyPrinter_Parenthesizer_evalName___main___closed__1 = _init_l_Lean_PrettyPrinter_Parenthesizer_evalName___main___closed__1(); lean_mark_persistent(l_Lean_PrettyPrinter_Parenthesizer_evalName___main___closed__1); l_Lean_PrettyPrinter_Parenthesizer_evalName___main___closed__2 = _init_l_Lean_PrettyPrinter_Parenthesizer_evalName___main___closed__2(); @@ -12878,12 +13195,20 @@ l_Lean_PrettyPrinter_Parenthesizer_evalName___main___closed__4 = _init_l_Lean_Pr lean_mark_persistent(l_Lean_PrettyPrinter_Parenthesizer_evalName___main___closed__4); l_Lean_PrettyPrinter_Parenthesizer_evalName___main___closed__5 = _init_l_Lean_PrettyPrinter_Parenthesizer_evalName___main___closed__5(); lean_mark_persistent(l_Lean_PrettyPrinter_Parenthesizer_evalName___main___closed__5); +l_Lean_PrettyPrinter_Parenthesizer_evalName___main___closed__6 = _init_l_Lean_PrettyPrinter_Parenthesizer_evalName___main___closed__6(); +lean_mark_persistent(l_Lean_PrettyPrinter_Parenthesizer_evalName___main___closed__6); +l_Lean_PrettyPrinter_Parenthesizer_evalName___main___closed__7 = _init_l_Lean_PrettyPrinter_Parenthesizer_evalName___main___closed__7(); +lean_mark_persistent(l_Lean_PrettyPrinter_Parenthesizer_evalName___main___closed__7); l_Lean_PrettyPrinter_Parenthesizer_termParser_parenthesizer___closed__1 = _init_l_Lean_PrettyPrinter_Parenthesizer_termParser_parenthesizer___closed__1(); lean_mark_persistent(l_Lean_PrettyPrinter_Parenthesizer_termParser_parenthesizer___closed__1); l_Lean_PrettyPrinter_Parenthesizer_termParser_parenthesizer___closed__2 = _init_l_Lean_PrettyPrinter_Parenthesizer_termParser_parenthesizer___closed__2(); lean_mark_persistent(l_Lean_PrettyPrinter_Parenthesizer_termParser_parenthesizer___closed__2); l_Lean_PrettyPrinter_Parenthesizer_termParser_parenthesizer___closed__3 = _init_l_Lean_PrettyPrinter_Parenthesizer_termParser_parenthesizer___closed__3(); lean_mark_persistent(l_Lean_PrettyPrinter_Parenthesizer_termParser_parenthesizer___closed__3); +l_Lean_PrettyPrinter_Parenthesizer_termParser_parenthesizer___closed__4 = _init_l_Lean_PrettyPrinter_Parenthesizer_termParser_parenthesizer___closed__4(); +lean_mark_persistent(l_Lean_PrettyPrinter_Parenthesizer_termParser_parenthesizer___closed__4); +l_Lean_PrettyPrinter_Parenthesizer_termParser_parenthesizer___closed__5 = _init_l_Lean_PrettyPrinter_Parenthesizer_termParser_parenthesizer___closed__5(); +lean_mark_persistent(l_Lean_PrettyPrinter_Parenthesizer_termParser_parenthesizer___closed__5); l___regBuiltin_Lean_PrettyPrinter_Parenthesizer_termParser_parenthesizer___closed__1 = _init_l___regBuiltin_Lean_PrettyPrinter_Parenthesizer_termParser_parenthesizer___closed__1(); lean_mark_persistent(l___regBuiltin_Lean_PrettyPrinter_Parenthesizer_termParser_parenthesizer___closed__1); l___regBuiltin_Lean_PrettyPrinter_Parenthesizer_termParser_parenthesizer___closed__2 = _init_l___regBuiltin_Lean_PrettyPrinter_Parenthesizer_termParser_parenthesizer___closed__2(); diff --git a/stage0/stdlib/Lean/Util/CollectLevelParams.c b/stage0/stdlib/Lean/Util/CollectLevelParams.c index c6a6adac6c..521216199a 100644 --- a/stage0/stdlib/Lean/Util/CollectLevelParams.c +++ b/stage0/stdlib/Lean/Util/CollectLevelParams.c @@ -14,6 +14,7 @@ extern "C" { #endif lean_object* l_List_replace___main___at_Lean_CollectLevelParams_visitExpr___spec__7___boxed(lean_object*, lean_object*, lean_object*); +lean_object* l___private_Lean_Util_CollectLevelParams_1__getUnusedLevelParamAux(lean_object*, 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_Lean_CollectLevelParams_visitLevel(lean_object*, lean_object*, lean_object*); @@ -29,13 +30,16 @@ uint8_t l_List_elem___main___at_Lean_CollectLevelParams_visitExpr___spec__2(lean lean_object* lean_nat_add(lean_object*, lean_object*); lean_object* l_Lean_CollectLevelParams_collect___main(lean_object*, lean_object*); lean_object* l_Std_HashSetImp_insert___at_Lean_CollectLevelParams_visitLevel___spec__3(lean_object*, lean_object*); +lean_object* l_Lean_CollectLevelParams_State_getUnusedLevelParam(lean_object*, lean_object*); lean_object* lean_array_fget(lean_object*, lean_object*); uint8_t l_List_elem___main___at_Lean_CollectLevelParams_visitLevel___spec__2(lean_object*, lean_object*); uint8_t l_Lean_Expr_hasLevelParam(lean_object*); +lean_object* l_Lean_CollectLevelParams_State_getUnusedLevelParam___boxed(lean_object*, lean_object*); lean_object* l_Lean_CollectLevelParams_visitExpr(lean_object*, lean_object*, lean_object*); lean_object* l_Std_HashSetImp_moveEntries___main___at_Lean_CollectLevelParams_visitExpr___spec__5(lean_object*, lean_object*, lean_object*); lean_object* l_List_replace___main___at_Lean_CollectLevelParams_visitExpr___spec__7(lean_object*, lean_object*, lean_object*); lean_object* lean_array_fset(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Name_appendIndexAfter(lean_object*, lean_object*); lean_object* l_Std_HashSetImp_contains___at_Lean_CollectLevelParams_visitLevel___spec__1___boxed(lean_object*, lean_object*); uint8_t l_Std_HashSetImp_contains___at_Lean_CollectLevelParams_visitLevel___spec__1(lean_object*, lean_object*); lean_object* l_Std_mkHashSet___at_Lean_CollectLevelParams_State_inhabited___spec__2(lean_object*); @@ -43,10 +47,12 @@ size_t l_Lean_Expr_hash(lean_object*); lean_object* l_Std_HashSetImp_expand___at_Lean_CollectLevelParams_visitLevel___spec__4(lean_object*, lean_object*); lean_object* l_Lean_CollectLevelParams_main(lean_object*, lean_object*); size_t lean_usize_modn(size_t, lean_object*); +lean_object* l___private_Lean_Util_CollectLevelParams_1__getUnusedLevelParamAux___main(lean_object*, lean_object*, lean_object*); lean_object* l_Std_HashSetImp_moveEntries___main___at_Lean_CollectLevelParams_visitLevel___spec__5(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_CollectLevelParams_State_inhabited___closed__3; lean_object* l_List_foldl___main___at_Lean_CollectLevelParams_main___main___spec__1(lean_object*, lean_object*); lean_object* l_Std_HashSetImp_expand___at_Lean_CollectLevelParams_visitExpr___spec__4(lean_object*, lean_object*); +lean_object* l___private_Lean_Util_CollectLevelParams_1__getUnusedLevelParamAux___main___boxed(lean_object*, lean_object*, lean_object*); uint8_t lean_expr_eqv(lean_object*, lean_object*); lean_object* l_Lean_CollectLevelParams_State_inhabited___closed__1; uint8_t lean_nat_dec_le(lean_object*, lean_object*); @@ -61,6 +67,8 @@ lean_object* l_Lean_CollectLevelParams_State_inhabited; lean_object* l_List_elem___main___at_Lean_CollectLevelParams_visitExpr___spec__2___boxed(lean_object*, lean_object*); lean_object* l_Lean_CollectLevelParams_State_inhabited___closed__2; lean_object* l_List_foldl___main___at_Lean_CollectLevelParams_visitExpr___spec__6(lean_object*, lean_object*); +lean_object* l___private_Lean_Util_CollectLevelParams_1__getUnusedLevelParamAux___boxed(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_mkLevelParam(lean_object*); lean_object* l_Lean_collectLevelParams(lean_object*, lean_object*); uint8_t lean_level_eq(lean_object*, lean_object*); lean_object* l_List_replace___main___at_Lean_CollectLevelParams_visitLevel___spec__7___boxed(lean_object*, lean_object*, lean_object*); @@ -2440,6 +2448,92 @@ x_3 = l_Lean_CollectLevelParams_main___main(x_1, x_2); return x_3; } } +lean_object* l___private_Lean_Util_CollectLevelParams_1__getUnusedLevelParamAux___main(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; uint8_t x_7; +lean_inc(x_3); +lean_inc(x_2); +x_4 = l_Lean_Name_appendIndexAfter(x_2, x_3); +x_5 = l_Lean_mkLevelParam(x_4); +x_6 = lean_ctor_get(x_1, 0); +x_7 = l_Std_HashSetImp_contains___at_Lean_CollectLevelParams_visitLevel___spec__1(x_6, x_5); +if (x_7 == 0) +{ +lean_dec(x_3); +lean_dec(x_2); +return x_5; +} +else +{ +lean_object* x_8; lean_object* x_9; +lean_dec(x_5); +x_8 = lean_unsigned_to_nat(1u); +x_9 = lean_nat_add(x_3, x_8); +lean_dec(x_3); +x_3 = x_9; +goto _start; +} +} +} +lean_object* l___private_Lean_Util_CollectLevelParams_1__getUnusedLevelParamAux___main___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; +x_4 = l___private_Lean_Util_CollectLevelParams_1__getUnusedLevelParamAux___main(x_1, x_2, x_3); +lean_dec(x_1); +return x_4; +} +} +lean_object* l___private_Lean_Util_CollectLevelParams_1__getUnusedLevelParamAux(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; +x_4 = l___private_Lean_Util_CollectLevelParams_1__getUnusedLevelParamAux___main(x_1, x_2, x_3); +return x_4; +} +} +lean_object* l___private_Lean_Util_CollectLevelParams_1__getUnusedLevelParamAux___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; +x_4 = l___private_Lean_Util_CollectLevelParams_1__getUnusedLevelParamAux(x_1, x_2, x_3); +lean_dec(x_1); +return x_4; +} +} +lean_object* l_Lean_CollectLevelParams_State_getUnusedLevelParam(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; lean_object* x_4; uint8_t x_5; +lean_inc(x_2); +x_3 = l_Lean_mkLevelParam(x_2); +x_4 = lean_ctor_get(x_1, 0); +x_5 = l_Std_HashSetImp_contains___at_Lean_CollectLevelParams_visitLevel___spec__1(x_4, x_3); +if (x_5 == 0) +{ +lean_dec(x_2); +return x_3; +} +else +{ +lean_object* x_6; lean_object* x_7; +lean_dec(x_3); +x_6 = lean_unsigned_to_nat(1u); +x_7 = l___private_Lean_Util_CollectLevelParams_1__getUnusedLevelParamAux___main(x_1, x_2, x_6); +return x_7; +} +} +} +lean_object* l_Lean_CollectLevelParams_State_getUnusedLevelParam___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = l_Lean_CollectLevelParams_State_getUnusedLevelParam(x_1, x_2); +lean_dec(x_1); +return x_3; +} +} lean_object* l_Lean_collectLevelParams(lean_object* x_1, lean_object* x_2) { _start: {