diff --git a/stage0/src/Init/Core.lean b/stage0/src/Init/Core.lean index 5058da03a6..1da33cb272 100644 --- a/stage0/src/Init/Core.lean +++ b/stage0/src/Init/Core.lean @@ -340,7 +340,7 @@ class HasNeg (α : Type u) := (neg : α → α) class HasSub (α : Type u) := (sub : α → α → α) class HasDiv (α : Type u) := (div : α → α → α) class HasMod (α : Type u) := (mod : α → α → α) -class HasModn (α : Type u) := (modn : α → Nat → α) +class HasModN (α : Type u) := (modn : α → Nat → α) class HasLessEq (α : Type u) := (LessEq : α → α → Prop) class HasLess (α : Type u) := (Less : α → α → Prop) class HasBeq (α : Type u) := (beq : α → α → Bool) @@ -353,15 +353,12 @@ class HasEmptyc (α : Type u) := (emptyc : α) class HasPow (α : Type u) (β : Type v) := (pow : α → β → α) -export HasAndthen (andthen) -export HasPow (pow) - infix `+` := HasAdd.add infix `*` := HasMul.mul infix `-` := HasSub.sub infix `/` := HasDiv.div infix `%` := HasMod.mod -infix `%ₙ` := HasModn.modn +infix `%ₙ` := HasModN.modn prefix `-` := HasNeg.neg infix `<=` := HasLessEq.LessEq infix `≤` := HasLessEq.LessEq @@ -382,8 +379,6 @@ infix `↔` := Iff infixr `<|>` := HasOrelse.orelse infixr `>>` := HasAndthen.andthen -export HasAppend (append) - @[reducible] def GreaterEq {α : Type u} [HasLessEq α] (a b : α) : Prop := HasLessEq.LessEq b a @[reducible] def Greater {α : Type u} [HasLess α] (a b : α) : Prop := HasLess.Less b a diff --git a/stage0/src/Init/Data/DList.lean b/stage0/src/Init/Data/DList.lean index 227fc057c6..9e8c5d1949 100644 --- a/stage0/src/Init/Data/DList.lean +++ b/stage0/src/Init/Data/DList.lean @@ -21,7 +21,7 @@ variables {α : Type u} open List def ofList (l : List α) : DList α := -⟨append l, fun t => (appendNil l).symm ▸ rfl⟩ +⟨HasAppend.append l, fun t => (appendNil l).symm ▸ rfl⟩ def empty : DList α := ⟨id, fun t => rfl⟩ diff --git a/stage0/src/Init/Data/Fin/Basic.lean b/stage0/src/Init/Data/Fin/Basic.lean index 2e7efb4a56..8bee150c28 100644 --- a/stage0/src/Init/Data/Fin/Basic.lean +++ b/stage0/src/Init/Data/Fin/Basic.lean @@ -81,7 +81,7 @@ instance : HasSub (Fin n) := ⟨Fin.sub⟩ instance : HasMul (Fin n) := ⟨Fin.mul⟩ instance : HasMod (Fin n) := ⟨Fin.mod⟩ instance : HasDiv (Fin n) := ⟨Fin.div⟩ -instance : HasModn (Fin n) := ⟨Fin.modn⟩ +instance : HasModN (Fin n) := ⟨Fin.modn⟩ theorem eqOfVeq : ∀ {i j : Fin n}, (val i) = (val j) → i = j | ⟨iv, ilt₁⟩, ⟨.(iv), ilt₂⟩, rfl => rfl diff --git a/stage0/src/Init/Data/UInt.lean b/stage0/src/Init/Data/UInt.lean index 8bb0a3d14f..84f9d58a7b 100644 --- a/stage0/src/Init/Data/UInt.lean +++ b/stage0/src/Init/Data/UInt.lean @@ -43,7 +43,7 @@ instance : HasAdd UInt8 := ⟨UInt8.add⟩ instance : HasSub UInt8 := ⟨UInt8.sub⟩ instance : HasMul UInt8 := ⟨UInt8.mul⟩ instance : HasMod UInt8 := ⟨UInt8.mod⟩ -instance : HasModn UInt8 := ⟨UInt8.modn⟩ +instance : HasModN UInt8 := ⟨UInt8.modn⟩ instance : HasDiv UInt8 := ⟨UInt8.div⟩ instance : HasLess UInt8 := ⟨UInt8.lt⟩ instance : HasLessEq UInt8 := ⟨UInt8.le⟩ @@ -102,7 +102,7 @@ instance : HasAdd UInt16 := ⟨UInt16.add⟩ instance : HasSub UInt16 := ⟨UInt16.sub⟩ instance : HasMul UInt16 := ⟨UInt16.mul⟩ instance : HasMod UInt16 := ⟨UInt16.mod⟩ -instance : HasModn UInt16 := ⟨UInt16.modn⟩ +instance : HasModN UInt16 := ⟨UInt16.modn⟩ instance : HasDiv UInt16 := ⟨UInt16.div⟩ instance : HasLess UInt16 := ⟨UInt16.lt⟩ instance : HasLessEq UInt16 := ⟨UInt16.le⟩ @@ -161,7 +161,7 @@ instance : HasAdd UInt32 := ⟨UInt32.add⟩ instance : HasSub UInt32 := ⟨UInt32.sub⟩ instance : HasMul UInt32 := ⟨UInt32.mul⟩ instance : HasMod UInt32 := ⟨UInt32.mod⟩ -instance : HasModn UInt32 := ⟨UInt32.modn⟩ +instance : HasModN UInt32 := ⟨UInt32.modn⟩ instance : HasDiv UInt32 := ⟨UInt32.div⟩ instance : HasLess UInt32 := ⟨UInt32.lt⟩ instance : HasLessEq UInt32 := ⟨UInt32.le⟩ @@ -234,7 +234,7 @@ instance : HasAdd UInt64 := ⟨UInt64.add⟩ instance : HasSub UInt64 := ⟨UInt64.sub⟩ instance : HasMul UInt64 := ⟨UInt64.mul⟩ instance : HasMod UInt64 := ⟨UInt64.mod⟩ -instance : HasModn UInt64 := ⟨UInt64.modn⟩ +instance : HasModN UInt64 := ⟨UInt64.modn⟩ instance : HasDiv UInt64 := ⟨UInt64.div⟩ instance : HasLess UInt64 := ⟨UInt64.lt⟩ instance : HasLessEq UInt64 := ⟨UInt64.le⟩ @@ -311,7 +311,7 @@ instance : HasAdd USize := ⟨USize.add⟩ instance : HasSub USize := ⟨USize.sub⟩ instance : HasMul USize := ⟨USize.mul⟩ instance : HasMod USize := ⟨USize.mod⟩ -instance : HasModn USize := ⟨USize.modn⟩ +instance : HasModN USize := ⟨USize.modn⟩ instance : HasDiv USize := ⟨USize.div⟩ instance : HasLess USize := ⟨USize.lt⟩ instance : HasLessEq USize := ⟨USize.le⟩ diff --git a/stage0/src/Init/Lean/Elab.lean b/stage0/src/Init/Lean/Elab.lean index f61b05f594..564d2ccfee 100644 --- a/stage0/src/Init/Lean/Elab.lean +++ b/stage0/src/Init/Lean/Elab.lean @@ -10,3 +10,4 @@ import Init.Lean.Elab.ElabStrategyAttrs import Init.Lean.Elab.Command import Init.Lean.Elab.Term import Init.Lean.Elab.Frontend +import Init.Lean.Elab.BuiltinNotation diff --git a/stage0/src/Init/Lean/Elab/BuiltinNotation.lean b/stage0/src/Init/Lean/Elab/BuiltinNotation.lean new file mode 100644 index 0000000000..e1535bef79 --- /dev/null +++ b/stage0/src/Init/Lean/Elab/BuiltinNotation.lean @@ -0,0 +1,81 @@ +/- +Copyright (c) 2019 Microsoft Corporation. All rights reserved. +Released under Apache 2.0 license as described in the file LICENSE. +Authors: Leonardo de Moura +-/ +prelude +import Init.Lean.Elab.Term + +namespace Lean +namespace Elab +namespace Term + +@[builtinTermElab dollar] def elabDollar : TermElab := +fun stx expectedType? => do + -- term `$` term + let f := stx.getArg 0; + let a := stx.getArg 2; + elabTerm (mkAppStx f #[a]) expectedType? + +def elabInfix (f : Syntax) : TermElab := +fun stx expectedType? => do + -- term `op` term + let a := stx.getArg 0; + let b := stx.getArg 2; + elabTerm (mkAppStx f #[a, b]) expectedType? + +def elabInfixOp (op : Name) : TermElab := +fun stx expectedType? => elabInfix (mkTermId (stx.getArg 1) op) stx expectedType? + +@[builtinTermElab add] def elabAdd : TermElab := elabInfixOp `HasAdd.add +@[builtinTermElab sub] def elabSub : TermElab := elabInfixOp `HasSub.sub +@[builtinTermElab mul] def elabMul : TermElab := elabInfixOp `HasMul.mul +@[builtinTermElab div] def elabDiv : TermElab := elabInfixOp `HasDiv.div +@[builtinTermElab mod] def elabMod : TermElab := elabInfixOp `HasMod.mod +@[builtinTermElab modN] def elabModN : TermElab := elabInfixOp `HasModN.modn +@[builtinTermElab pow] def elabPow : TermElab := elabInfixOp `HasPow.pow + +@[builtinTermElab le] def elabLE : TermElab := elabInfixOp `HasLessEq.LessEq +@[builtinTermElab ge] def elabGE : TermElab := elabInfixOp `GreaterEq +@[builtinTermElab lt] def elabLT : TermElab := elabInfixOp `HasLess.Less +@[builtinTermElab gt] def elabGT : TermElab := elabInfixOp `Greater +@[builtinTermElab eq] def elabEq : TermElab := elabInfixOp `Eq +@[builtinTermElab ne] def elabNe : TermElab := elabInfixOp `Ne +@[builtinTermElab beq] def elabBEq : TermElab := elabInfixOp `HasBeq.beq +@[builtinTermElab bne] def elabBNe : TermElab := elabInfixOp `bne +@[builtinTermElab heq] def elabHEq : TermElab := elabInfixOp `HEq +@[builtinTermElab equiv] def elabEquiv : TermElab := elabInfixOp `HasEquiv.Equiv + +@[builtinTermElab and] def elabAnd : TermElab := elabInfixOp `And +@[builtinTermElab or] def elabOr : TermElab := elabInfixOp `Or +@[builtinTermElab iff] def elabIff : TermElab := elabInfixOp `Iff + +@[builtinTermElab band] def elabBAnd : TermElab := elabInfixOp `and +@[builtinTermElab bor] def elabBOr : TermElab := elabInfixOp `or + +@[builtinTermElab append] def elabAppend : TermElab := elabInfixOp `HasAppend.append +@[builtinTermElab cons] def elabCons : TermElab := elabInfixOp `List.cons + +@[builtinTermElab andthen] def elabAndThen : TermElab := elabInfixOp `HasAndthen.andthen +-- @[builtinTermElab bind] def elabBind : TermElab := elabInfixOp `HasBind.bind + +@[builtinTermElab seq] def elabseq : TermElab := elabInfixOp `HasSeq.seq +@[builtinTermElab seqLeft] def elabseqLeft : TermElab := elabInfixOp `HasSeqLeft.seqLeft +@[builtinTermElab seqRight] def elabseqRight : TermElab := elabInfixOp `HasSeqRight.seqRight + +@[builtinTermElab map] def elabMap : TermElab := elabInfixOp `Functor.map +@[builtinTermElab mapRev] def elabMapRev : TermElab := elabInfixOp `Functor.mapRev +@[builtinTermElab mapConst] def elabMapConst : TermElab := elabInfixOp `Functor.mapConst +@[builtinTermElab mapConstRev] def elabMapConstRev : TermElab := elabInfixOp `Functor.mapConstRev + +@[builtinTermElab orelse] def elabOrElse : TermElab := elabInfixOp `HasOrelse.orelse +@[builtinTermElab orM] def elabOrM : TermElab := elabInfixOp `orM +@[builtinTermElab andM] def elabAndM : TermElab := elabInfixOp `andM + +/- +@[builtinTermElab] def elabsubst : TermElab := elabInfixOp infixR " ▸ " 75 +-/ + +end Term +end Elab +end Lean diff --git a/stage0/src/Init/Lean/Elab/Term.lean b/stage0/src/Init/Lean/Elab/Term.lean index b7401d9c72..4fda896970 100644 --- a/stage0/src/Init/Lean/Elab/Term.lean +++ b/stage0/src/Init/Lean/Elab/Term.lean @@ -24,13 +24,16 @@ structure Context extends Meta.Context := (macroStack : List Syntax := []) (mayPostpone : Bool := true) -inductive SyntheticMVarInfo -| typeClass : SyntheticMVarInfo -| tactic (tacticCode : Syntax) : SyntheticMVarInfo -| postponed (macroStack : List Syntax) : SyntheticMVarInfo +inductive SyntheticMVarKind +| typeClass +| tactic (tacticCode : Syntax) +| postponed (macroStack : List Syntax) + +structure SyntheticMVarDecl := +(mvarId : MVarId) (ref : Syntax) (kind : SyntheticMVarKind) structure State extends Meta.State := -(syntheticMVars : List (MVarId × SyntheticMVarInfo) := []) +(syntheticMVars : List SyntheticMVarDecl := []) (messages : MessageLog := {}) (instImplicitIdx : Nat := 1) (anonymousIdx : Nat := 1) @@ -108,6 +111,7 @@ fun ctx s => match x ctx.toContext s.toState with | EStateM.Result.error ex newS => EStateM.Result.error (Exception.meta ex) { toState := newS, .. s } def getEnv : TermElabM Environment := do s ← get; pure s.env +def getMCtx : TermElabM MetavarContext := do s ← get; pure s.mctx def getNamespace : TermElabM Name := do ctx ← read; pure ctx.ns def getOpenDecls : TermElabM (List OpenDecl) := do ctx ← read; pure ctx.openDecls def getLCtx : TermElabM LocalContext := do ctx ← read; pure ctx.lctx @@ -115,6 +119,10 @@ def getLocalInsts : TermElabM LocalInstances := do ctx ← read; pure ctx.localI def getOptions : TermElabM Options := do ctx ← read; pure ctx.config.opts def getTraceState : TermElabM TraceState := do s ← get; pure s.traceState def setTraceState (traceState : TraceState) : TermElabM Unit := modify $ fun s => { traceState := traceState, .. s } +def isExprMVarAssigned (mvarId : MVarId) : TermElabM Bool := do mctx ← getMCtx; pure $ mctx.isExprAssigned mvarId +def getMVarDecl (mvarId : MVarId) : TermElabM MetavarDecl := do mctx ← getMCtx; pure $ mctx.getDecl mvarId +def assignExprMVar (mvarId : MVarId) (val : Expr) : TermElabM Unit := modify $ fun s => { mctx := s.mctx.assignExpr mvarId val, .. s } + def addContext (msg : MessageData) : TermElabM MessageData := do ctx ← read; s ← get; @@ -136,12 +144,17 @@ def whnfForall (e : Expr) : TermElabM Expr := liftMetaM $ Meta.whnfForall e def instantiateMVars (e : Expr) : TermElabM Expr := liftMetaM $ Meta.instantiateMVars e def isClass (t : Expr) : TermElabM (Option Name) := liftMetaM $ Meta.isClass t def mkFreshLevelMVar : TermElabM Level := liftMetaM $ Meta.mkFreshLevelMVar -def mkForall (xs : Array Expr) (e : Expr) : TermElabM Expr := liftMetaM $ Meta.mkForall xs e def mkFreshExprMVar (type? : Option Expr := none) (synthetic : Bool := false) (userName? : Name := Name.anonymous) : TermElabM Expr := match type? with | some type => liftMetaM $ Meta.mkFreshExprMVar type userName? synthetic | none => liftMetaM $ do u ← Meta.mkFreshLevelMVar; Meta.mkFreshExprMVar (mkSort u) userName? synthetic +def mkForall (xs : Array Expr) (e : Expr) : TermElabM Expr := liftMetaM $ Meta.mkForall xs e +def trySynthInstance (type : Expr) : TermElabM (LOption Expr) := liftMetaM $ Meta.trySynthInstance type + +def registerSyntheticMVar (mvarId : MVarId) (ref : Syntax) (kind : SyntheticMVarKind) : TermElabM Unit := +modify $ fun s => { syntheticMVars := { mvarId := mvarId, ref := ref, kind := kind } :: s.syntheticMVars, .. s } + @[inline] def withoutPostponing {α} (x : TermElabM α) : TermElabM α := adaptReader (fun (ctx : Context) => { mayPostpone := false, .. ctx }) x @@ -204,7 +217,7 @@ let instIdx := s.instImplicitIdx; modify $ fun s => { instImplicitIdx := s.instImplicitIdx + 1, .. s}; pure $ (`_inst).appendIndexAfter instIdx -def mkHole := mkNode `Lean.Parser.Term.hole [mkAtom "_"] +def mkHole := mkNode `Lean.Parser.Term.hole #[mkAtom "_"] /-- Given syntax of the forms @@ -333,7 +346,7 @@ fun stx _ => mkForall xs e def mkExplicitBinder (n : Syntax) (type : Syntax) : Syntax := -mkNode `Lean.Parser.Term.explicitBinder [mkAtom "(", mkNullNode [n], mkNullNode [mkAtom ":", type], mkNullNode [], mkAtom ")"] +mkNode `Lean.Parser.Term.explicitBinder #[mkAtom "(", mkNullNode #[n], mkNullNode #[mkAtom ":", type], mkNullNode, mkAtom ")"] @[builtinTermElab arrow] def elabArrow : TermElab := fun stx expectedType? => do @@ -341,7 +354,7 @@ fun stx expectedType? => do let id := mkIdentFrom stx.val a; let dom := stx.getArg 0; let rng := stx.getArg 2; - let newStx := mkNode `Lean.Parser.Term.forall [mkAtom "forall", mkNullNode [mkExplicitBinder id dom], mkAtom ",", rng]; + let newStx := mkNode `Lean.Parser.Term.forall #[mkAtom "forall", mkNullNode #[mkExplicitBinder id dom], mkAtom ",", rng]; elabTerm newStx expectedType? @[builtinTermElab depArrow] def elabDepArrow : TermElab := @@ -364,14 +377,18 @@ fun stx expectedType? => -- TODO: handle parenSpecial elabTerm term expectedType? +def mkTermId (ref : Syntax) (n : Name) : Syntax := +let id := mkIdentFrom ref n; +mkNode `Lean.Parser.Term.id #[id, mkNullNode] + @[builtinTermElab «listLit»] def elabListLit : TermElab := fun stx expectedType? => do let openBkt := stx.getArg 0; let args := stx.getArg 1; let closeBkt := stx.getArg 2; - let consId := mkIdentFrom openBkt `List.cons; - let nilId := mkIdentFrom closeBkt `List.nil; - let newStx := args.foldSepArgs (fun arg r => mkAppStx consId #[arg, r]) nilId; + let consId := mkTermId openBkt `List.cons; + let nilId := mkTermId closeBkt `List.nil; + let newStx := args.foldSepRevArgs (fun arg r => mkAppStx consId #[arg, r]) nilId; elabTerm newStx expectedType? def elabExplicitUniv (stx : Syntax) : TermElabM (List Level) := @@ -453,6 +470,9 @@ match expectedType? with condM (isDefEq eType expectedType) (pure e) (do -- TODO try `HasCoe` + e ← instantiateMVars e; + eType ← instantiateMVars eType; + expectedType ← instantiateMVars expectedType; let msg : MessageData := "type mismatch" ++ indentExpr e ++ Format.line ++ "has type" ++ indentExpr eType @@ -460,57 +480,80 @@ match expectedType? with logErrorAndThrow ref msg) /-- Consume parameters of the form `(x : A := val)` and `(x : A . tactic)` -/ -def consumeDefaultParams (ref : Syntax) (expectedType? : Option Expr) : Expr → Expr → TermElabM Expr +def consumeDefaultParams (ref : Syntax) : Expr → Expr → TermElabM Expr | eType, e => -- TODO - ensureHasType ref expectedType? eType e + pure e + +def synthesizeInstMVar (ref : Syntax) (instMVar : MVarId) : TermElabM Unit := +condM (isExprMVarAssigned instMVar) (pure ()) $ do + instMVarDecl ← getMVarDecl instMVar; + let type := instMVarDecl.type; + type ← instantiateMVars type; + result ← trySynthInstance type; + match result with + | LOption.some val => assignExprMVar instMVar val + | LOption.undef => pure () -- we will try later + | LOption.none => logErrorAndThrow ref ("failed to synthesize instance" ++ indentExpr type) + +def synthesizeInstMVars (ref : Syntax) (instMVars : Array MVarId) : TermElabM Unit := +instMVars.forM $ synthesizeInstMVar ref private partial def elabAppArgsAux (ref : Syntax) (args : Array Syntax) (expectedType? : Option Expr) (explicit : Bool) - : Nat → Array NamedArg → Expr → Expr → TermElabM Expr -| argIdx, namedArgs, eType, e => - if namedArgs.isEmpty && argIdx == args.size then + : Nat → Array NamedArg → Array MVarId → Expr → Expr → TermElabM Expr +| argIdx, namedArgs, instMVars, eType, e => do + let finalize : Unit → TermElabM Expr := fun _ => do { -- all user explicit arguments have been consumed - if explicit then - ensureHasType ref expectedType? eType e - else - consumeDefaultParams ref expectedType? eType e - else do - eType ← whnfForall eType; - match eType with - | Expr.forallE n d b c => - match namedArgs.findIdx? (fun namedArg => namedArg.name == n) with - | some idx => do - let arg := namedArgs.get! idx; - let namedArgs := namedArgs.eraseIdx idx; - a ← elabTerm arg.val d; - elabAppArgsAux argIdx namedArgs (b.instantiate1 a) (mkApp e a) - | none => - let processExplictArg : Unit → TermElabM Expr := fun _ => do { - if h : argIdx < args.size then do - a ← elabTerm (args.get ⟨argIdx, h⟩) d; - elabAppArgsAux (argIdx + 1) namedArgs (b.instantiate1 a) (mkApp e a) - else - logErrorAndThrow ref ("explicit parameter '" ++ n ++ "' is missing, unused named arguments " ++ toString (namedArgs.map $ fun narg => narg.name)) - }; - if explicit then + e ← if explicit then pure e else consumeDefaultParams ref eType e; + e ← ensureHasType ref expectedType? eType e; + synthesizeInstMVars ref instMVars; + pure e + }; + eType ← whnfForall eType; + match eType with + | Expr.forallE n d b c => + match namedArgs.findIdx? (fun namedArg => namedArg.name == n) with + | some idx => do + let arg := namedArgs.get! idx; + let namedArgs := namedArgs.eraseIdx idx; + a ← elabTerm arg.val d; + elabAppArgsAux argIdx namedArgs instMVars (b.instantiate1 a) (mkApp e a) + | none => + let processExplictArg : Unit → TermElabM Expr := fun _ => do { + if h : argIdx < args.size then do + a ← elabTerm (args.get ⟨argIdx, h⟩) d; + elabAppArgsAux (argIdx + 1) namedArgs instMVars (b.instantiate1 a) (mkApp e a) + else if namedArgs.isEmpty then + finalize () + else + logErrorAndThrow ref ("explicit parameter '" ++ n ++ "' is missing, unused named arguments " ++ toString (namedArgs.map $ fun narg => narg.name)) + }; + if explicit then + processExplictArg () + else match c.binderInfo with + | BinderInfo.implicit => do + a ← mkFreshExprMVar d; + elabAppArgsAux argIdx namedArgs instMVars (b.instantiate1 a) (mkApp e a) + | BinderInfo.instImplicit => do + a ← mkFreshExprMVar d true; + let mvarId := a.mvarId!; + registerSyntheticMVar mvarId ref SyntheticMVarKind.typeClass; + elabAppArgsAux argIdx namedArgs (instMVars.push mvarId) (b.instantiate1 a) (mkApp e a) + | _ => processExplictArg () - else match c.binderInfo with - | BinderInfo.implicit => do - a ← mkFreshExprMVar d; - elabAppArgsAux argIdx namedArgs (b.instantiate1 a) (mkApp e a) - | BinderInfo.instImplicit => - -- TODO - pure e - | _ => - processExplictArg () - | _ => + | _ => + if namedArgs.isEmpty && argIdx == args.size then + finalize () + else -- TODO: try `HasCoeToFun` logErrorAndThrow ref "too many arguments" private def elabAppArgs (ref : Syntax) (f : Expr) (namedArgs : Array NamedArg) (args : Array Syntax) (expectedType? : Option Expr) (explicit : Bool) : TermElabM Expr := do fType ← inferType f; -elabAppArgsAux ref args expectedType? explicit 0 namedArgs fType f +let argIdx := 0; +let instMVars := #[]; +elabAppArgsAux ref args expectedType? explicit argIdx namedArgs instMVars fType f private def elabAppProjs (ref : Syntax) (f : Expr) (projs : List String) (namedArgs : Array NamedArg) (args : Array Syntax) (expectedType? : Option Expr) (explicit : Bool) : TermElabM Expr := diff --git a/stage0/src/Init/Lean/Parser/Parser.lean b/stage0/src/Init/Lean/Parser/Parser.lean index 64e4730d7a..40042ed94b 100644 --- a/stage0/src/Init/Lean/Parser/Parser.lean +++ b/stage0/src/Init/Lean/Parser/Parser.lean @@ -1589,6 +1589,13 @@ Id.run (s.foldSepArgsM f b) @[inline] def forSepArgsM (s : Syntax) (f : Syntax → m Unit) : m Unit := s.foldSepArgsM (fun s _ => f s) () +@[inline] def foldSepRevArgsM (s : Syntax) (f : Syntax → β → m β) (b : β) : m β := do +let args := foldSepArgs s (fun arg (args : Array Syntax) => args.push arg) #[]; +args.foldrM f b + +@[inline] def foldSepRevArgs (s : Syntax) (f : Syntax → β → β) (b : β) : β := do +Id.run $ foldSepRevArgsM s f b + end end Syntax diff --git a/stage0/src/Init/Lean/Parser/Term.lean b/stage0/src/Init/Lean/Parser/Term.lean index 2bdab9d11c..a45a635762 100644 --- a/stage0/src/Init/Lean/Parser/Term.lean +++ b/stage0/src/Init/Lean/Parser/Term.lean @@ -169,7 +169,7 @@ def checkIsSort := checkLeading (fun leading => leading.isOfKind `Lean.Parser.Te @[builtinTermParser] def orM := tparser! infixR " <||> " 30 @[builtinTermParser] def andM := tparser! infixR " <&&> " 35 @[builtinTermParser] def andthen := tparser! infixR " >> " 60 -@[builtinTermParser] def bind := tparser! infixR " >>= " 55 +@[builtinTermParser] def bindOp := tparser! infixR " >>= " 55 @[builtinTermParser] def mapRev := tparser! infixR " <&> " 100 @[builtinTermParser] def seq := tparser! infixL " <*> " 60 @[builtinTermParser] def seqLeft := tparser! infixL " <* " 60 diff --git a/stage0/src/Init/Lean/Syntax.lean b/stage0/src/Init/Lean/Syntax.lean index e96743a689..c432f864a4 100644 --- a/stage0/src/Init/Lean/Syntax.lean +++ b/stage0/src/Init/Lean/Syntax.lean @@ -331,11 +331,11 @@ Syntax.node nullKind args def mkAtom (val : String) : Syntax := Syntax.atom none val -@[inline] def mkNode (k : SyntaxNodeKind) (args : List Syntax) : Syntax := -Syntax.node k args.toArray +@[inline] def mkNode (k : SyntaxNodeKind) (args : Array Syntax) : Syntax := +Syntax.node k args -@[inline] def mkNullNode (args : List Syntax) : Syntax := -Syntax.node nullKind args.toArray +@[inline] def mkNullNode (args : Array Syntax := #[]) : Syntax := +Syntax.node nullKind args def mkOptionalNode (arg : Option Syntax) : Syntax := match arg with diff --git a/stage0/stdlib/CMakeLists.txt b/stage0/stdlib/CMakeLists.txt index 813884b940..4bbdd5491f 100644 --- a/stage0/stdlib/CMakeLists.txt +++ b/stage0/stdlib/CMakeLists.txt @@ -1 +1 @@ -add_library (stage0 OBJECT Init/./Coe.c Init/./Control.c Init/./Control/Alternative.c Init/./Control/Applicative.c Init/./Control/Conditional.c Init/./Control/EState.c Init/./Control/Except.c Init/./Control/Functor.c Init/./Control/Id.c Init/./Control/Lift.c Init/./Control/Monad.c Init/./Control/MonadFail.c Init/./Control/Option.c Init/./Control/Reader.c Init/./Control/State.c Init/./Core.c Init/./Data.c Init/./Data/Array.c Init/./Data/Array/Basic.c Init/./Data/Array/BinSearch.c Init/./Data/Array/QSort.c Init/./Data/AssocList.c Init/./Data/Basic.c Init/./Data/BinomialHeap.c Init/./Data/BinomialHeap/Basic.c Init/./Data/ByteArray.c Init/./Data/ByteArray/Basic.c Init/./Data/Char.c Init/./Data/Char/Basic.c Init/./Data/DList.c Init/./Data/Fin.c Init/./Data/Fin/Basic.c Init/./Data/HashMap.c Init/./Data/HashMap/Basic.c Init/./Data/HashSet.c Init/./Data/Hashable.c Init/./Data/Int.c Init/./Data/Int/Basic.c Init/./Data/List.c Init/./Data/List/Basic.c Init/./Data/List/BasicAux.c Init/./Data/List/Control.c Init/./Data/List/Instances.c Init/./Data/Nat.c Init/./Data/Nat/Basic.c Init/./Data/Nat/Bitwise.c Init/./Data/Nat/Control.c Init/./Data/Nat/Div.c Init/./Data/Option.c Init/./Data/Option/Basic.c Init/./Data/Option/BasicAux.c Init/./Data/Option/Instances.c Init/./Data/PersistentArray.c Init/./Data/PersistentArray/Basic.c Init/./Data/PersistentHashMap.c Init/./Data/PersistentHashMap/Basic.c Init/./Data/PersistentHashSet.c Init/./Data/Queue.c Init/./Data/Queue/Basic.c Init/./Data/RBMap.c Init/./Data/RBMap/Basic.c Init/./Data/RBMap/BasicAux.c Init/./Data/RBTree.c Init/./Data/RBTree/Basic.c Init/./Data/Random.c Init/./Data/Repr.c Init/./Data/Stack.c Init/./Data/Stack/Basic.c Init/./Data/String.c Init/./Data/String/Basic.c Init/./Data/ToString.c Init/./Data/UInt.c Init/./Default.c Init/./Fix.c Init/./Lean.c Init/./Lean/Attributes.c Init/./Lean/AuxRecursor.c Init/./Lean/Class.c Init/./Lean/Compiler.c Init/./Lean/Compiler/ClosedTermCache.c Init/./Lean/Compiler/ConstFolding.c Init/./Lean/Compiler/ExportAttr.c Init/./Lean/Compiler/ExternAttr.c Init/./Lean/Compiler/IR.c Init/./Lean/Compiler/IR/Basic.c Init/./Lean/Compiler/IR/Borrow.c Init/./Lean/Compiler/IR/Boxing.c Init/./Lean/Compiler/IR/Checker.c Init/./Lean/Compiler/IR/CompilerM.c Init/./Lean/Compiler/IR/CtorLayout.c Init/./Lean/Compiler/IR/ElimDeadBranches.c Init/./Lean/Compiler/IR/ElimDeadVars.c Init/./Lean/Compiler/IR/EmitC.c Init/./Lean/Compiler/IR/EmitUtil.c Init/./Lean/Compiler/IR/ExpandResetReuse.c Init/./Lean/Compiler/IR/Format.c Init/./Lean/Compiler/IR/FreeVars.c Init/./Lean/Compiler/IR/LiveVars.c Init/./Lean/Compiler/IR/NormIds.c Init/./Lean/Compiler/IR/PushProj.c Init/./Lean/Compiler/IR/RC.c Init/./Lean/Compiler/IR/ResetReuse.c Init/./Lean/Compiler/IR/SimpCase.c Init/./Lean/Compiler/IR/UnboxResult.c Init/./Lean/Compiler/ImplementedByAttr.c Init/./Lean/Compiler/InitAttr.c Init/./Lean/Compiler/InlineAttrs.c Init/./Lean/Compiler/NameMangling.c Init/./Lean/Compiler/NeverExtractAttr.c Init/./Lean/Compiler/Specialize.c Init/./Lean/Compiler/Util.c Init/./Lean/Data/Format.c Init/./Lean/Data/KVMap.c Init/./Lean/Data/LBool.c Init/./Lean/Data/LOption.c Init/./Lean/Data/Name.c Init/./Lean/Data/NameGenerator.c Init/./Lean/Data/Options.c Init/./Lean/Data/Position.c Init/./Lean/Data/SMap.c Init/./Lean/Data/Trie.c Init/./Lean/Declaration.c Init/./Lean/Elab.c Init/./Lean/Elab/Alias.c Init/./Lean/Elab/Command.c Init/./Lean/Elab/ElabStrategyAttrs.c Init/./Lean/Elab/Exception.c Init/./Lean/Elab/Frontend.c Init/./Lean/Elab/Import.c Init/./Lean/Elab/Log.c Init/./Lean/Elab/Quotation.c Init/./Lean/Elab/ResolveName.c Init/./Lean/Elab/Term.c Init/./Lean/Elab/Util.c Init/./Lean/Environment.c Init/./Lean/EqnCompiler.c Init/./Lean/EqnCompiler/MatchPattern.c Init/./Lean/Eval.c Init/./Lean/Expr.c Init/./Lean/Level.c Init/./Lean/Linter.c Init/./Lean/LocalContext.c Init/./Lean/Meta.c Init/./Lean/Meta/AbstractMVars.c Init/./Lean/Meta/AppBuilder.c Init/./Lean/Meta/Basic.c Init/./Lean/Meta/Check.c Init/./Lean/Meta/DiscrTree.c Init/./Lean/Meta/DiscrTreeTypes.c Init/./Lean/Meta/Exception.c Init/./Lean/Meta/ExprDefEq.c Init/./Lean/Meta/FunInfo.c Init/./Lean/Meta/InferType.c Init/./Lean/Meta/Instances.c Init/./Lean/Meta/LevelDefEq.c Init/./Lean/Meta/Message.c Init/./Lean/Meta/Offset.c Init/./Lean/Meta/Reduce.c Init/./Lean/Meta/SynthInstance.c Init/./Lean/Meta/Tactic.c Init/./Lean/Meta/Tactic/Assumption.c Init/./Lean/Meta/Tactic/Intro.c Init/./Lean/Meta/Tactic/Util.c Init/./Lean/Meta/WHNF.c Init/./Lean/MetavarContext.c Init/./Lean/Modifiers.c Init/./Lean/Parser.c Init/./Lean/Parser/Command.c Init/./Lean/Parser/Identifier.c Init/./Lean/Parser/Level.c Init/./Lean/Parser/Module.c Init/./Lean/Parser/Parser.c Init/./Lean/Parser/Term.c Init/./Lean/Parser/Transform.c Init/./Lean/ProjFns.c Init/./Lean/ReducibilityAttrs.c Init/./Lean/Runtime.c Init/./Lean/Scopes.c Init/./Lean/Syntax.c Init/./Lean/ToExpr.c Init/./Lean/Util/Message.c Init/./Lean/Util/MonadCache.c Init/./Lean/Util/Path.c Init/./Lean/Util/Profile.c Init/./Lean/Util/Trace.c Init/./Lean/Util/WHNF.c Init/./System.c Init/./System/FilePath.c Init/./System/IO.c Init/./System/Platform.c Init/./Util.c Init/./WF.c) +add_library (stage0 OBJECT Init/./Coe.c Init/./Control.c Init/./Control/Alternative.c Init/./Control/Applicative.c Init/./Control/Conditional.c Init/./Control/EState.c Init/./Control/Except.c Init/./Control/Functor.c Init/./Control/Id.c Init/./Control/Lift.c Init/./Control/Monad.c Init/./Control/MonadFail.c Init/./Control/Option.c Init/./Control/Reader.c Init/./Control/State.c Init/./Core.c Init/./Data.c Init/./Data/Array.c Init/./Data/Array/Basic.c Init/./Data/Array/BinSearch.c Init/./Data/Array/QSort.c Init/./Data/AssocList.c Init/./Data/Basic.c Init/./Data/BinomialHeap.c Init/./Data/BinomialHeap/Basic.c Init/./Data/ByteArray.c Init/./Data/ByteArray/Basic.c Init/./Data/Char.c Init/./Data/Char/Basic.c Init/./Data/DList.c Init/./Data/Fin.c Init/./Data/Fin/Basic.c Init/./Data/HashMap.c Init/./Data/HashMap/Basic.c Init/./Data/HashSet.c Init/./Data/Hashable.c Init/./Data/Int.c Init/./Data/Int/Basic.c Init/./Data/List.c Init/./Data/List/Basic.c Init/./Data/List/BasicAux.c Init/./Data/List/Control.c Init/./Data/List/Instances.c Init/./Data/Nat.c Init/./Data/Nat/Basic.c Init/./Data/Nat/Bitwise.c Init/./Data/Nat/Control.c Init/./Data/Nat/Div.c Init/./Data/Option.c Init/./Data/Option/Basic.c Init/./Data/Option/BasicAux.c Init/./Data/Option/Instances.c Init/./Data/PersistentArray.c Init/./Data/PersistentArray/Basic.c Init/./Data/PersistentHashMap.c Init/./Data/PersistentHashMap/Basic.c Init/./Data/PersistentHashSet.c Init/./Data/Queue.c Init/./Data/Queue/Basic.c Init/./Data/RBMap.c Init/./Data/RBMap/Basic.c Init/./Data/RBMap/BasicAux.c Init/./Data/RBTree.c Init/./Data/RBTree/Basic.c Init/./Data/Random.c Init/./Data/Repr.c Init/./Data/Stack.c Init/./Data/Stack/Basic.c Init/./Data/String.c Init/./Data/String/Basic.c Init/./Data/ToString.c Init/./Data/UInt.c Init/./Default.c Init/./Fix.c Init/./Lean.c Init/./Lean/Attributes.c Init/./Lean/AuxRecursor.c Init/./Lean/Class.c Init/./Lean/Compiler.c Init/./Lean/Compiler/ClosedTermCache.c Init/./Lean/Compiler/ConstFolding.c Init/./Lean/Compiler/ExportAttr.c Init/./Lean/Compiler/ExternAttr.c Init/./Lean/Compiler/IR.c Init/./Lean/Compiler/IR/Basic.c Init/./Lean/Compiler/IR/Borrow.c Init/./Lean/Compiler/IR/Boxing.c Init/./Lean/Compiler/IR/Checker.c Init/./Lean/Compiler/IR/CompilerM.c Init/./Lean/Compiler/IR/CtorLayout.c Init/./Lean/Compiler/IR/ElimDeadBranches.c Init/./Lean/Compiler/IR/ElimDeadVars.c Init/./Lean/Compiler/IR/EmitC.c Init/./Lean/Compiler/IR/EmitUtil.c Init/./Lean/Compiler/IR/ExpandResetReuse.c Init/./Lean/Compiler/IR/Format.c Init/./Lean/Compiler/IR/FreeVars.c Init/./Lean/Compiler/IR/LiveVars.c Init/./Lean/Compiler/IR/NormIds.c Init/./Lean/Compiler/IR/PushProj.c Init/./Lean/Compiler/IR/RC.c Init/./Lean/Compiler/IR/ResetReuse.c Init/./Lean/Compiler/IR/SimpCase.c Init/./Lean/Compiler/IR/UnboxResult.c Init/./Lean/Compiler/ImplementedByAttr.c Init/./Lean/Compiler/InitAttr.c Init/./Lean/Compiler/InlineAttrs.c Init/./Lean/Compiler/NameMangling.c Init/./Lean/Compiler/NeverExtractAttr.c Init/./Lean/Compiler/Specialize.c Init/./Lean/Compiler/Util.c Init/./Lean/Data/Format.c Init/./Lean/Data/KVMap.c Init/./Lean/Data/LBool.c Init/./Lean/Data/LOption.c Init/./Lean/Data/Name.c Init/./Lean/Data/NameGenerator.c Init/./Lean/Data/Options.c Init/./Lean/Data/Position.c Init/./Lean/Data/SMap.c Init/./Lean/Data/Trie.c Init/./Lean/Declaration.c Init/./Lean/Elab.c Init/./Lean/Elab/Alias.c Init/./Lean/Elab/BuiltinNotation.c Init/./Lean/Elab/Command.c Init/./Lean/Elab/ElabStrategyAttrs.c Init/./Lean/Elab/Exception.c Init/./Lean/Elab/Frontend.c Init/./Lean/Elab/Import.c Init/./Lean/Elab/Log.c Init/./Lean/Elab/Quotation.c Init/./Lean/Elab/ResolveName.c Init/./Lean/Elab/Term.c Init/./Lean/Elab/Util.c Init/./Lean/Environment.c Init/./Lean/EqnCompiler.c Init/./Lean/EqnCompiler/MatchPattern.c Init/./Lean/Eval.c Init/./Lean/Expr.c Init/./Lean/Level.c Init/./Lean/Linter.c Init/./Lean/LocalContext.c Init/./Lean/Meta.c Init/./Lean/Meta/AbstractMVars.c Init/./Lean/Meta/AppBuilder.c Init/./Lean/Meta/Basic.c Init/./Lean/Meta/Check.c Init/./Lean/Meta/DiscrTree.c Init/./Lean/Meta/DiscrTreeTypes.c Init/./Lean/Meta/Exception.c Init/./Lean/Meta/ExprDefEq.c Init/./Lean/Meta/FunInfo.c Init/./Lean/Meta/InferType.c Init/./Lean/Meta/Instances.c Init/./Lean/Meta/LevelDefEq.c Init/./Lean/Meta/Message.c Init/./Lean/Meta/Offset.c Init/./Lean/Meta/Reduce.c Init/./Lean/Meta/SynthInstance.c Init/./Lean/Meta/Tactic.c Init/./Lean/Meta/Tactic/Assumption.c Init/./Lean/Meta/Tactic/Intro.c Init/./Lean/Meta/Tactic/Util.c Init/./Lean/Meta/WHNF.c Init/./Lean/MetavarContext.c Init/./Lean/Modifiers.c Init/./Lean/Parser.c Init/./Lean/Parser/Command.c Init/./Lean/Parser/Identifier.c Init/./Lean/Parser/Level.c Init/./Lean/Parser/Module.c Init/./Lean/Parser/Parser.c Init/./Lean/Parser/Term.c Init/./Lean/Parser/Transform.c Init/./Lean/ProjFns.c Init/./Lean/ReducibilityAttrs.c Init/./Lean/Runtime.c Init/./Lean/Scopes.c Init/./Lean/Syntax.c Init/./Lean/ToExpr.c Init/./Lean/Util/Message.c Init/./Lean/Util/MonadCache.c Init/./Lean/Util/Path.c Init/./Lean/Util/Profile.c Init/./Lean/Util/Trace.c Init/./Lean/Util/WHNF.c Init/./System.c Init/./System/FilePath.c Init/./System/IO.c Init/./System/Platform.c Init/./Util.c Init/./WF.c) diff --git a/stage0/stdlib/Init/Data/Fin/Basic.c b/stage0/stdlib/Init/Data/Fin/Basic.c index ffd4829581..f6f68fb2fd 100644 --- a/stage0/stdlib/Init/Data/Fin/Basic.c +++ b/stage0/stdlib/Init/Data/Fin/Basic.c @@ -23,7 +23,6 @@ lean_object* l_Fin_DecidableEq(lean_object*); uint8_t l_Fin_decLe___rarg(lean_object*, lean_object*); lean_object* l_Fin_HasOne(lean_object*); lean_object* l_Fin_land___boxed(lean_object*, lean_object*, lean_object*); -lean_object* l_Fin_HasModn(lean_object*); lean_object* l_Fin_HasLessEq(lean_object*); lean_object* l_Fin_div(lean_object*, lean_object*, lean_object*); lean_object* l_Fin_add___boxed(lean_object*, lean_object*, lean_object*); @@ -52,6 +51,7 @@ lean_object* l_Fin_HasLess___boxed(lean_object*); lean_object* l_Fin_mod___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Fin_decLt(lean_object*); uint8_t lean_nat_dec_le(lean_object*, lean_object*); +lean_object* l_Fin_HasModN(lean_object*); uint8_t l_Fin_DecidableEq___rarg(lean_object*, lean_object*); lean_object* l_Fin_lor(lean_object*, lean_object*, lean_object*); lean_object* l_Fin_HasLess(lean_object*); @@ -477,7 +477,7 @@ lean_closure_set(x_2, 0, x_1); return x_2; } } -lean_object* l_Fin_HasModn(lean_object* x_1) { +lean_object* l_Fin_HasModN(lean_object* x_1) { _start: { lean_object* x_2; diff --git a/stage0/stdlib/Init/Data/UInt.c b/stage0/stdlib/Init/Data/UInt.c index 9a434ef96a..55c7767ef4 100644 --- a/stage0/stdlib/Init/Data/UInt.c +++ b/stage0/stdlib/Init/Data/UInt.c @@ -51,7 +51,6 @@ size_t l_USize_sub(size_t, size_t); lean_object* l_UInt8_lor___boxed(lean_object*, lean_object*); lean_object* l_UInt8_decLe___boxed(lean_object*, lean_object*); lean_object* l_UInt64_DecidableEq___boxed(lean_object*, lean_object*); -lean_object* l_UInt16_HasModn; uint32_t l_UInt32_land(uint32_t, uint32_t); lean_object* l_UInt16_HasSub___closed__1; lean_object* l_UInt32_land___boxed(lean_object*, lean_object*); @@ -69,7 +68,6 @@ lean_object* l_UInt32_mul___boxed(lean_object*, lean_object*); lean_object* l_UInt8_HasLess; lean_object* l_USize_land___boxed(lean_object*, lean_object*); lean_object* l_UInt64_land___boxed(lean_object*, lean_object*); -lean_object* l_UInt32_HasModn; lean_object* l_UInt8_HasDiv___closed__1; lean_object* l_UInt16_decLe___boxed(lean_object*, lean_object*); lean_object* l_UInt16_HasLessEq; @@ -80,6 +78,7 @@ lean_object* l_uint64Sz___closed__1; uint8_t l_UInt8_div(uint8_t, uint8_t); uint64_t l_UInt64_HasOne; lean_object* l_USize_HasAdd; +lean_object* l_USize_HasModN; uint8_t l_UInt8_Inhabited; uint32_t lean_uint32_of_nat(lean_object*); uint8_t l_USize_decLt(size_t, size_t); @@ -93,6 +92,7 @@ uint8_t l_UInt8_add(uint8_t, uint8_t); uint16_t l_UInt16_add(uint16_t, uint16_t); uint8_t l_UInt16_hasDecidableLt(uint16_t, uint16_t); lean_object* l_USize_div___boxed(lean_object*, lean_object*); +lean_object* l_UInt32_HasModN; lean_object* l_USize_decEq___boxed(lean_object*, lean_object*); lean_object* l_UInt8_ofNat___boxed(lean_object*); uint32_t l_UInt32_add(uint32_t, uint32_t); @@ -155,10 +155,10 @@ uint64_t l_UInt64_land(uint64_t, uint64_t); uint8_t l_UInt32_hasDecidableLe(uint32_t, uint32_t); uint16_t l_UInt16_div(uint16_t, uint16_t); uint8_t l_UInt8_land(uint8_t, uint8_t); -lean_object* l_UInt64_HasModn; uint8_t l_UInt32_hasDecidableLt(uint32_t, uint32_t); size_t lean_usize_of_nat(lean_object*); lean_object* l_UInt64_shiftLeft___boxed(lean_object*, lean_object*); +lean_object* l_UInt8_HasModN; lean_object* l_UInt16_HasMul; lean_object* l_UInt32_div___boxed(lean_object*, lean_object*); lean_object* l_USize_hasDecidableLt___boxed(lean_object*, lean_object*); @@ -175,15 +175,14 @@ uint8_t l_UInt8_sub(uint8_t, uint8_t); lean_object* l_UInt64_HasAdd___closed__1; lean_object* l_Nat_toUInt64___boxed(lean_object*); lean_object* l_UInt32_DecidableEq___boxed(lean_object*, lean_object*); +lean_object* l_USize_HasModN___closed__1; lean_object* l_UInt32_HasSub___closed__1; uint8_t l_UInt32_decEq(uint32_t, uint32_t); lean_object* l_UInt16_HasAdd; -lean_object* l_USize_HasModn; lean_object* l_USize_HasMul___closed__1; uint16_t l_UInt16_Inhabited; lean_object* l_USize_modn___boxed(lean_object*, lean_object*); uint8_t l_UInt8_HasOne; -lean_object* l_USize_HasModn___closed__1; lean_object* l_USize_DecidableEq___boxed(lean_object*, lean_object*); uint8_t l_UInt64_toUInt8(uint64_t); lean_object* l_UInt8_HasSub___closed__1; @@ -193,8 +192,8 @@ lean_object* l_UInt32_mod___boxed(lean_object*, lean_object*); lean_object* l_usizeSz___closed__1; uint64_t lean_uint64_modn(uint64_t, lean_object*); uint8_t l_UInt64_DecidableEq(uint64_t, uint64_t); +lean_object* l_UInt16_HasModN; uint32_t l_UInt32_Inhabited; -lean_object* l_UInt64_HasModn___closed__1; lean_object* l_UInt32_HasAdd; lean_object* l_Bool_toUInt64___boxed(lean_object*); uint32_t l_USize_toUInt32(size_t); @@ -205,11 +204,11 @@ lean_object* l_UInt64_toNat___boxed(lean_object*); lean_object* l_UInt16_toNat___boxed(lean_object*); lean_object* l_USize_HasLessEq; uint64_t l_UInt64_lor(uint64_t, uint64_t); +lean_object* l_UInt8_HasModN___closed__1; lean_object* l_UInt16_hasDecidableLe___boxed(lean_object*, lean_object*); lean_object* l_UInt32_HasSub; uint8_t l_UInt16_decLt(uint16_t, uint16_t); lean_object* l_UInt32_ofNat___boxed(lean_object*); -lean_object* l_UInt8_HasModn; lean_object* l_UInt64_HasLess; lean_object* l_UInt64_HasMod___closed__1; uint64_t l_UInt64_HasZero; @@ -245,7 +244,6 @@ lean_object* l_Nat_toUInt32___boxed(lean_object*); lean_object* l_UInt8_DecidableEq___boxed(lean_object*, lean_object*); lean_object* l_USize_HasDiv; lean_object* lean_uint64_to_nat(uint64_t); -lean_object* l_UInt8_HasModn___closed__1; lean_object* l_UInt16_mod___boxed(lean_object*, lean_object*); size_t l_USize_HasZero; lean_object* l_USize_toUInt32___boxed(lean_object*); @@ -269,21 +267,23 @@ lean_object* l_Nat_toUInt8___boxed(lean_object*); uint16_t l_UInt64_toUInt16(uint64_t); lean_object* l_UInt64_mod___boxed(lean_object*, lean_object*); uint64_t l_UInt64_sub(uint64_t, uint64_t); +lean_object* l_UInt32_HasModN___closed__1; lean_object* l_UInt32_toUSize___boxed(lean_object*); lean_object* lean_uint16_to_nat(uint16_t); uint64_t l_UInt64_div(uint64_t, uint64_t); uint64_t l_UInt64_shiftRight(uint64_t, uint64_t); lean_object* l_UInt32_toUInt64___boxed(lean_object*); +lean_object* l_UInt64_HasModN; uint8_t l_UInt8_mod(uint8_t, uint8_t); lean_object* lean_usize_to_nat(size_t); +lean_object* l_UInt64_HasModN___closed__1; uint8_t l_UInt16_decLe(uint16_t, uint16_t); uint8_t l_UInt32_decLe(uint32_t, uint32_t); -lean_object* l_UInt16_HasModn___closed__1; +lean_object* l_UInt16_HasModN___closed__1; lean_object* l_UInt16_HasLess; lean_object* lean_uint32_to_nat(uint32_t); lean_object* l_UInt64_HasDiv; uint8_t l_UInt64_hasDecidableLe(uint64_t, uint64_t); -lean_object* l_UInt32_HasModn___closed__1; lean_object* l_UInt8_HasMul; lean_object* l_UInt64_hasDecidableLt___boxed(lean_object*, lean_object*); lean_object* l_UInt8_decEq___boxed(lean_object*, lean_object*); @@ -530,7 +530,7 @@ x_1 = l_UInt8_HasMod___closed__1; return x_1; } } -lean_object* _init_l_UInt8_HasModn___closed__1() { +lean_object* _init_l_UInt8_HasModN___closed__1() { _start: { lean_object* x_1; @@ -538,11 +538,11 @@ x_1 = lean_alloc_closure((void*)(l_UInt8_modn___boxed), 2, 0); return x_1; } } -lean_object* _init_l_UInt8_HasModn() { +lean_object* _init_l_UInt8_HasModN() { _start: { lean_object* x_1; -x_1 = l_UInt8_HasModn___closed__1; +x_1 = l_UInt8_HasModN___closed__1; return x_1; } } @@ -917,7 +917,7 @@ x_1 = l_UInt16_HasMod___closed__1; return x_1; } } -lean_object* _init_l_UInt16_HasModn___closed__1() { +lean_object* _init_l_UInt16_HasModN___closed__1() { _start: { lean_object* x_1; @@ -925,11 +925,11 @@ x_1 = lean_alloc_closure((void*)(l_UInt16_modn___boxed), 2, 0); return x_1; } } -lean_object* _init_l_UInt16_HasModn() { +lean_object* _init_l_UInt16_HasModN() { _start: { lean_object* x_1; -x_1 = l_UInt16_HasModn___closed__1; +x_1 = l_UInt16_HasModN___closed__1; return x_1; } } @@ -1304,7 +1304,7 @@ x_1 = l_UInt32_HasMod___closed__1; return x_1; } } -lean_object* _init_l_UInt32_HasModn___closed__1() { +lean_object* _init_l_UInt32_HasModN___closed__1() { _start: { lean_object* x_1; @@ -1312,11 +1312,11 @@ x_1 = lean_alloc_closure((void*)(l_UInt32_modn___boxed), 2, 0); return x_1; } } -lean_object* _init_l_UInt32_HasModn() { +lean_object* _init_l_UInt32_HasModN() { _start: { lean_object* x_1; -x_1 = l_UInt32_HasModn___closed__1; +x_1 = l_UInt32_HasModN___closed__1; return x_1; } } @@ -1769,7 +1769,7 @@ x_1 = l_UInt64_HasMod___closed__1; return x_1; } } -lean_object* _init_l_UInt64_HasModn___closed__1() { +lean_object* _init_l_UInt64_HasModN___closed__1() { _start: { lean_object* x_1; @@ -1777,11 +1777,11 @@ x_1 = lean_alloc_closure((void*)(l_UInt64_modn___boxed), 2, 0); return x_1; } } -lean_object* _init_l_UInt64_HasModn() { +lean_object* _init_l_UInt64_HasModN() { _start: { lean_object* x_1; -x_1 = l_UInt64_HasModn___closed__1; +x_1 = l_UInt64_HasModN___closed__1; return x_1; } } @@ -2236,7 +2236,7 @@ x_1 = l_USize_HasMod___closed__1; return x_1; } } -lean_object* _init_l_USize_HasModn___closed__1() { +lean_object* _init_l_USize_HasModN___closed__1() { _start: { lean_object* x_1; @@ -2244,11 +2244,11 @@ x_1 = lean_alloc_closure((void*)(l_USize_modn___boxed), 2, 0); return x_1; } } -lean_object* _init_l_USize_HasModn() { +lean_object* _init_l_USize_HasModN() { _start: { lean_object* x_1; -x_1 = l_USize_HasModn___closed__1; +x_1 = l_USize_HasModN___closed__1; return x_1; } } @@ -2427,10 +2427,10 @@ l_UInt8_HasMod___closed__1 = _init_l_UInt8_HasMod___closed__1(); lean_mark_persistent(l_UInt8_HasMod___closed__1); l_UInt8_HasMod = _init_l_UInt8_HasMod(); lean_mark_persistent(l_UInt8_HasMod); -l_UInt8_HasModn___closed__1 = _init_l_UInt8_HasModn___closed__1(); -lean_mark_persistent(l_UInt8_HasModn___closed__1); -l_UInt8_HasModn = _init_l_UInt8_HasModn(); -lean_mark_persistent(l_UInt8_HasModn); +l_UInt8_HasModN___closed__1 = _init_l_UInt8_HasModN___closed__1(); +lean_mark_persistent(l_UInt8_HasModN___closed__1); +l_UInt8_HasModN = _init_l_UInt8_HasModN(); +lean_mark_persistent(l_UInt8_HasModN); l_UInt8_HasDiv___closed__1 = _init_l_UInt8_HasDiv___closed__1(); lean_mark_persistent(l_UInt8_HasDiv___closed__1); l_UInt8_HasDiv = _init_l_UInt8_HasDiv(); @@ -2460,10 +2460,10 @@ l_UInt16_HasMod___closed__1 = _init_l_UInt16_HasMod___closed__1(); lean_mark_persistent(l_UInt16_HasMod___closed__1); l_UInt16_HasMod = _init_l_UInt16_HasMod(); lean_mark_persistent(l_UInt16_HasMod); -l_UInt16_HasModn___closed__1 = _init_l_UInt16_HasModn___closed__1(); -lean_mark_persistent(l_UInt16_HasModn___closed__1); -l_UInt16_HasModn = _init_l_UInt16_HasModn(); -lean_mark_persistent(l_UInt16_HasModn); +l_UInt16_HasModN___closed__1 = _init_l_UInt16_HasModN___closed__1(); +lean_mark_persistent(l_UInt16_HasModN___closed__1); +l_UInt16_HasModN = _init_l_UInt16_HasModN(); +lean_mark_persistent(l_UInt16_HasModN); l_UInt16_HasDiv___closed__1 = _init_l_UInt16_HasDiv___closed__1(); lean_mark_persistent(l_UInt16_HasDiv___closed__1); l_UInt16_HasDiv = _init_l_UInt16_HasDiv(); @@ -2493,10 +2493,10 @@ l_UInt32_HasMod___closed__1 = _init_l_UInt32_HasMod___closed__1(); lean_mark_persistent(l_UInt32_HasMod___closed__1); l_UInt32_HasMod = _init_l_UInt32_HasMod(); lean_mark_persistent(l_UInt32_HasMod); -l_UInt32_HasModn___closed__1 = _init_l_UInt32_HasModn___closed__1(); -lean_mark_persistent(l_UInt32_HasModn___closed__1); -l_UInt32_HasModn = _init_l_UInt32_HasModn(); -lean_mark_persistent(l_UInt32_HasModn); +l_UInt32_HasModN___closed__1 = _init_l_UInt32_HasModN___closed__1(); +lean_mark_persistent(l_UInt32_HasModN___closed__1); +l_UInt32_HasModN = _init_l_UInt32_HasModN(); +lean_mark_persistent(l_UInt32_HasModN); l_UInt32_HasDiv___closed__1 = _init_l_UInt32_HasDiv___closed__1(); lean_mark_persistent(l_UInt32_HasDiv___closed__1); l_UInt32_HasDiv = _init_l_UInt32_HasDiv(); @@ -2528,10 +2528,10 @@ l_UInt64_HasMod___closed__1 = _init_l_UInt64_HasMod___closed__1(); lean_mark_persistent(l_UInt64_HasMod___closed__1); l_UInt64_HasMod = _init_l_UInt64_HasMod(); lean_mark_persistent(l_UInt64_HasMod); -l_UInt64_HasModn___closed__1 = _init_l_UInt64_HasModn___closed__1(); -lean_mark_persistent(l_UInt64_HasModn___closed__1); -l_UInt64_HasModn = _init_l_UInt64_HasModn(); -lean_mark_persistent(l_UInt64_HasModn); +l_UInt64_HasModN___closed__1 = _init_l_UInt64_HasModN___closed__1(); +lean_mark_persistent(l_UInt64_HasModN___closed__1); +l_UInt64_HasModN = _init_l_UInt64_HasModN(); +lean_mark_persistent(l_UInt64_HasModN); l_UInt64_HasDiv___closed__1 = _init_l_UInt64_HasDiv___closed__1(); lean_mark_persistent(l_UInt64_HasDiv___closed__1); l_UInt64_HasDiv = _init_l_UInt64_HasDiv(); @@ -2563,10 +2563,10 @@ l_USize_HasMod___closed__1 = _init_l_USize_HasMod___closed__1(); lean_mark_persistent(l_USize_HasMod___closed__1); l_USize_HasMod = _init_l_USize_HasMod(); lean_mark_persistent(l_USize_HasMod); -l_USize_HasModn___closed__1 = _init_l_USize_HasModn___closed__1(); -lean_mark_persistent(l_USize_HasModn___closed__1); -l_USize_HasModn = _init_l_USize_HasModn(); -lean_mark_persistent(l_USize_HasModn); +l_USize_HasModN___closed__1 = _init_l_USize_HasModN___closed__1(); +lean_mark_persistent(l_USize_HasModN___closed__1); +l_USize_HasModN = _init_l_USize_HasModN(); +lean_mark_persistent(l_USize_HasModN); l_USize_HasDiv___closed__1 = _init_l_USize_HasDiv___closed__1(); lean_mark_persistent(l_USize_HasDiv___closed__1); l_USize_HasDiv = _init_l_USize_HasDiv(); diff --git a/stage0/stdlib/Init/Lean/Elab.c b/stage0/stdlib/Init/Lean/Elab.c index 71fc31ba2f..0dd9c6fb08 100644 --- a/stage0/stdlib/Init/Lean/Elab.c +++ b/stage0/stdlib/Init/Lean/Elab.c @@ -1,6 +1,6 @@ // Lean compiler output // Module: Init.Lean.Elab -// Imports: Init.Lean.Elab.Import Init.Lean.Elab.Exception Init.Lean.Elab.ElabStrategyAttrs Init.Lean.Elab.Command Init.Lean.Elab.Term Init.Lean.Elab.Frontend +// Imports: Init.Lean.Elab.Import Init.Lean.Elab.Exception Init.Lean.Elab.ElabStrategyAttrs Init.Lean.Elab.Command Init.Lean.Elab.Term Init.Lean.Elab.Frontend Init.Lean.Elab.BuiltinNotation #include "runtime/lean.h" #if defined(__clang__) #pragma clang diagnostic ignored "-Wunused-parameter" @@ -19,6 +19,7 @@ lean_object* initialize_Init_Lean_Elab_ElabStrategyAttrs(lean_object*); lean_object* initialize_Init_Lean_Elab_Command(lean_object*); lean_object* initialize_Init_Lean_Elab_Term(lean_object*); lean_object* initialize_Init_Lean_Elab_Frontend(lean_object*); +lean_object* initialize_Init_Lean_Elab_BuiltinNotation(lean_object*); static bool _G_initialized = false; lean_object* initialize_Init_Lean_Elab(lean_object* w) { lean_object * res; @@ -42,6 +43,9 @@ lean_dec_ref(res); res = initialize_Init_Lean_Elab_Frontend(lean_io_mk_world()); if (lean_io_result_is_error(res)) return res; lean_dec_ref(res); +res = initialize_Init_Lean_Elab_BuiltinNotation(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); return lean_mk_io_result(lean_box(0)); } #ifdef __cplusplus diff --git a/stage0/stdlib/Init/Lean/Elab/BuiltinNotation.c b/stage0/stdlib/Init/Lean/Elab/BuiltinNotation.c new file mode 100644 index 0000000000..c8f42c2328 --- /dev/null +++ b/stage0/stdlib/Init/Lean/Elab/BuiltinNotation.c @@ -0,0 +1,3620 @@ +// Lean compiler output +// Module: Init.Lean.Elab.BuiltinNotation +// Imports: Init.Lean.Elab.Term +#include "runtime/lean.h" +#if defined(__clang__) +#pragma clang diagnostic ignored "-Wunused-parameter" +#pragma clang diagnostic ignored "-Wunused-label" +#elif defined(__GNUC__) && !defined(__CLANG__) +#pragma GCC diagnostic ignored "-Wunused-parameter" +#pragma GCC diagnostic ignored "-Wunused-label" +#pragma GCC diagnostic ignored "-Wunused-but-set-variable" +#endif +#ifdef __cplusplus +extern "C" { +#endif +lean_object* l_Lean_Elab_Term_elabModN___closed__2; +lean_object* l_Lean_Elab_Term_elabBAnd___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabseq___closed__3; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabOrElse___closed__2; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabMapConstRev___closed__2; +lean_object* l_Lean_Elab_Term_elabseqLeft___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Term_elabDiv(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Term_elabAdd___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Term_elabseqLeft___closed__1; +lean_object* l_Lean_Elab_Term_elabAdd___closed__1; +extern lean_object* l_Lean_Parser_Term_andthen___elambda__1___closed__2; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabMapRev___closed__1; +lean_object* l_Lean_Elab_Term_elabModN___closed__1; +lean_object* l_Lean_Elab_Term_elabIff(lean_object*, lean_object*, lean_object*, lean_object*); +extern lean_object* l_Lean_Parser_Term_andthen___elambda__1___closed__1; +lean_object* l_Lean_Elab_Term_elabBAnd___closed__1; +extern lean_object* l_Lean_Expr_eq_x3f___closed__2; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabIff___closed__3; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabDiv(lean_object*); +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabBEq(lean_object*); +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabNe___closed__3; +extern lean_object* l_Lean_Parser_Term_sub___elambda__1___closed__2; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabHEq___closed__2; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabOr___closed__3; +lean_object* l_Lean_Elab_Term_elabseqLeft___closed__2; +lean_object* l_Lean_Elab_Term_elabMod___closed__2; +lean_object* l_Lean_Elab_Term_elabPow(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Term_elabModN___closed__3; +lean_object* l_Lean_Elab_Term_elabBOr___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Term_elabInfix(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +extern lean_object* l_Lean_Parser_Term_eq___elambda__1___closed__2; +lean_object* l_Lean_Elab_Term_elabInfixOp(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabBNe(lean_object*); +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabOrElse___closed__1; +lean_object* l_Lean_Elab_Term_elabBOr___closed__1; +lean_object* l_Lean_Elab_Term_elabMul___closed__1; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabSub___closed__1; +extern lean_object* l_Lean_Parser_Term_seqLeft___elambda__1___closed__1; +lean_object* l_Lean_Elab_Term_elabseqLeft___closed__3; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabAnd(lean_object*); +extern lean_object* l_Lean_Parser_Term_seqLeft___elambda__1___closed__2; +extern lean_object* l_Lean_stxInh; +lean_object* l_Lean_Elab_Term_elabMul___closed__2; +lean_object* l_Lean_Elab_Term_elabPow___closed__3; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabBAnd___closed__3; +lean_object* l_Lean_Elab_Term_elabMod___closed__1; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabIff___closed__1; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabMul___closed__3; +extern lean_object* l_Lean_Parser_Term_mul___elambda__1___closed__1; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabEquiv___closed__1; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabAdd(lean_object*); +extern lean_object* l_Lean_Parser_Term_andM___elambda__1___closed__1; +lean_object* l_Lean_Elab_Term_elabEquiv___closed__1; +lean_object* l_Lean_Elab_Term_elabEquiv___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +extern lean_object* l_Lean_Parser_Term_pow___elambda__1___closed__1; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabMod(lean_object*); +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabIff___closed__2; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabSub___closed__2; +lean_object* l_Lean_Elab_Term_elabMul___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Term_elabModN___closed__4; +lean_object* l_Lean_Elab_Term_elabseq(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Term_elabEq___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +extern lean_object* l_Lean_Parser_Term_seqRight___elambda__1___closed__2; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabAndThen(lean_object*); +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabCons___closed__1; +lean_object* lean_array_push(lean_object*, lean_object*); +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabEquiv___closed__2; +lean_object* l_Lean_Elab_Term_elabModN(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabMap(lean_object*); +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabseq(lean_object*); +lean_object* l_Lean_Elab_Term_elabAndThen___closed__1; +extern lean_object* l_Lean_Parser_Term_gt___elambda__1___closed__2; +lean_object* l_Lean_Elab_Term_elabEquiv(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabOrElse___closed__3; +lean_object* l_Lean_Elab_Term_elabAnd(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabAdd___closed__2; +lean_object* l_Lean_Elab_Term_elabLT___closed__3; +lean_object* l_Lean_Elab_Term_elabDiv___closed__3; +lean_object* l_Lean_Elab_Term_elabBNe(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabseq___closed__2; +lean_object* l_Lean_Elab_Term_elabLT___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Term_elabEquiv___closed__4; +extern lean_object* l_Lean_Parser_Term_andM___elambda__1___closed__2; +lean_object* l_Lean_Elab_Term_elabLT___closed__1; +extern lean_object* l_Lean_FileMap_ofString___closed__1; +lean_object* l_Lean_Elab_Term_elabEquiv___closed__2; +lean_object* l_Lean_Elab_Term_elabMod___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Term_elabAppend___closed__3; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabseqRight___closed__1; +extern lean_object* l_Array_iterateMAux___main___at_Lean_mkAppStx___spec__1___closed__1; +extern lean_object* l_Lean_Parser_Term_lt___elambda__1___closed__2; +lean_object* l_Lean_Elab_Term_elabModN___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Term_elabEq(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Term_elabSub___closed__2; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabseq___closed__1; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabseqRight(lean_object*); +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabBAnd(lean_object*); +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabHEq(lean_object*); +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabMapConstRev(lean_object*); +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabAndThen___closed__3; +lean_object* l_Lean_Elab_Term_elabMapRev(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabAdd___closed__3; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabMapConst___closed__1; +lean_object* l_Lean_Elab_Term_elabOrElse___closed__3; +extern lean_object* l_Lean_Parser_Term_or___elambda__1___closed__2; +lean_object* l_Lean_Elab_Term_elabseq___closed__1; +extern lean_object* l_Lean_Parser_Term_add___elambda__1___closed__1; +extern lean_object* l_Lean_Parser_Term_add___elambda__1___closed__2; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabAnd___closed__2; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabPow(lean_object*); +lean_object* l_Lean_Elab_Term_elabOr___closed__2; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabLT___closed__3; +lean_object* l_Lean_Elab_Term_elabMul___closed__3; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabIff(lean_object*); +extern lean_object* l_Lean_Parser_Term_div___elambda__1___closed__2; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabGT___closed__1; +lean_object* l_Lean_Elab_Term_elabseq___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabModN(lean_object*); +lean_object* l_Lean_Elab_Term_elabBEq___closed__3; +lean_object* l_Lean_Elab_Term_elabMul(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Term_elabseq___closed__2; +extern lean_object* l_Lean_Parser_Term_band___elambda__1___closed__2; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabseqRight___closed__3; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabHEq___closed__1; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabSub(lean_object*); +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabGT___closed__2; +lean_object* l_Lean_Elab_Term_elabAppend(lean_object*, lean_object*, lean_object*, lean_object*); +extern lean_object* l_Lean_Parser_Term_or___elambda__1___closed__1; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabseqLeft___closed__1; +extern lean_object* l_Lean_Parser_Term_ne___elambda__1___closed__2; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabLE(lean_object*); +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabMap___closed__3; +lean_object* l_Lean_Elab_Term_elabMapConst(lean_object*, lean_object*, lean_object*, lean_object*); +extern lean_object* l_Lean_Parser_Term_mul___elambda__1___closed__2; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabMapConst___closed__2; +extern lean_object* l_Lean_Parser_Term_div___elambda__1___closed__1; +extern lean_object* l_Lean_Parser_Term_ge___elambda__1___closed__2; +lean_object* l_Lean_Elab_Term_elabseq___closed__3; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabseqLeft___closed__2; +extern lean_object* l_Lean_Expr_heq_x3f___closed__2; +lean_object* l_Lean_Elab_Term_elabDiv___closed__2; +lean_object* l_Lean_Elab_Term_elabTerm(lean_object*, lean_object*, lean_object*, lean_object*); +extern lean_object* l_Lean_Parser_Term_sub___elambda__1___closed__1; +extern lean_object* l_Lean_Parser_Term_seq___elambda__1___closed__2; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabEq(lean_object*); +lean_object* l_Lean_Elab_Term_elabLE___closed__1; +lean_object* lean_array_get(lean_object*, lean_object*, lean_object*); +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabOrM___closed__1; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabBAnd___closed__2; +lean_object* l_Lean_Elab_Term_elabDiv___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Term_elabLE___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Term_elabOrElse(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabCons(lean_object*); +extern lean_object* l_Lean_Parser_Term_equiv___elambda__1___closed__2; +lean_object* l_Lean_Elab_Term_elabDiv___closed__1; +lean_object* l_Lean_Elab_Term_elabEquiv___closed__3; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabDiv___closed__3; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabBNe___closed__3; +extern lean_object* l_Lean_Parser_Term_mod___elambda__1___closed__1; +lean_object* l_Lean_Elab_Term_elabMapRev___closed__1; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabOrM___closed__2; +lean_object* l_Lean_Elab_Term_elabSub(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Term_elabMapRev___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Term_elabMod___closed__3; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabAnd___closed__1; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabAppend___closed__1; +lean_object* l_Lean_Elab_Term_elabLE___closed__2; +lean_object* l_Lean_Elab_Term_elabseqRight___closed__1; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabBOr___closed__3; +lean_object* lean_name_mk_string(lean_object*, lean_object*); +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabBEq___closed__2; +lean_object* l_Lean_Elab_Term_elabIff___closed__2; +lean_object* l_Lean_Elab_Term_elabHEq(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Term_elabMapConstRev(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Term_elabseqRight___closed__2; +lean_object* l_Lean_Elab_Term_elabIff___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Term_elabLT___closed__2; +lean_object* l_Lean_Elab_Term_elabBAnd(lean_object*, lean_object*, lean_object*, lean_object*); +extern lean_object* l_Lean_Parser_Term_orM___elambda__1___closed__2; +extern lean_object* l_Lean_Parser_Term_orM___elambda__1___closed__1; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabDollar___closed__3; +extern lean_object* l_Lean_Parser_Term_iff___elambda__1___closed__2; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabAppend___closed__3; +lean_object* l_Lean_Elab_Term_elabLE(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Term_elabDollar___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Term_elabOr___closed__1; +lean_object* l_Lean_Elab_Term_elabMap___closed__3; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabPow___closed__3; +lean_object* l_Lean_Elab_Term_elabOr___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +extern lean_object* l_Lean_Parser_Term_beq___elambda__1___closed__1; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabAndThen___closed__1; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabDollar___closed__2; +lean_object* l_Lean_Elab_Term_elabAppend___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Term_elabPow___closed__2; +lean_object* l_Lean_Elab_Term_elabInfixOp___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabBOr___closed__2; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabSub___closed__3; +extern lean_object* l_Lean_Parser_Term_append___elambda__1___closed__1; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabMapConst(lean_object*); +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabGE___closed__1; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabMod___closed__1; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabMapRev(lean_object*); +extern lean_object* l_Lean_Parser_Term_mapConstRev___elambda__1___closed__1; +extern lean_object* l_Lean_Parser_Term_beq___elambda__1___closed__2; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabBEq___closed__1; +extern lean_object* l_Lean_Parser_Term_bor___elambda__1___closed__2; +lean_object* l_Lean_Elab_Term_elabCons___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabBOr___closed__1; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabAppend___closed__2; +lean_object* l_Lean_Elab_Term_elabPow___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabMapConst___closed__3; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabModN___closed__3; +lean_object* l_Lean_Elab_Term_elabGE(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Term_elabLT___closed__4; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabMapRev___closed__3; +lean_object* l_Lean_Elab_Term_elabMapConstRev___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Term_elabOr(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Term_elabMap___closed__1; +lean_object* l_Lean_Elab_Term_elabAnd___closed__2; +extern lean_object* l_Lean_Parser_Term_mapConstRev___elambda__1___closed__2; +lean_object* l_Lean_Elab_Term_elabMapConstRev___closed__1; +lean_object* l_Lean_Elab_Term_elabOrElse___closed__2; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabPow___closed__1; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabOrElse(lean_object*); +lean_object* l_Lean_Elab_Term_elabBOr(lean_object*, lean_object*, lean_object*, lean_object*); +extern lean_object* l_Lean_Parser_Term_seq___elambda__1___closed__1; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabMapConstRev___closed__3; +lean_object* l_Lean_Elab_Term_elabAndM(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Term_elabOrElse___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Term_elabOrM___closed__1; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabCons___closed__2; +lean_object* l_Lean_Elab_Term_elabPow___closed__1; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabPow___closed__2; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabGE(lean_object*); +extern lean_object* l_Lean_Parser_Term_heq___elambda__1___closed__2; +lean_object* l_Lean_Elab_Term_elabOrElse___closed__1; +lean_object* l_Lean_Elab_Term_elabBEq___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Term_elabAppend___closed__2; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabMod___closed__2; +lean_object* l_Lean_Elab_Term_elabAppend___closed__1; +lean_object* l_Lean_Elab_Term_elabGT(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabMapRev___closed__2; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabMap___closed__1; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabOr___closed__2; +lean_object* l_Lean_Elab_Term_elabAnd___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Term_elabMap___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabMap___closed__2; +lean_object* l_Lean_Elab_Term_elabGE___closed__2; +lean_object* l_Lean_Elab_Term_elabMap___closed__2; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabGE___closed__2; +extern lean_object* l_Lean_Parser_Term_le___elambda__1___closed__2; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabMod___closed__3; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabDiv___closed__2; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabAppend(lean_object*); +lean_object* l_Lean_Elab_Term_elabAnd___closed__1; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabEq___closed__2; +extern lean_object* l___private_Init_Lean_Elab_Quotation_5__quoteList___main___closed__6; +lean_object* l_Array_iterateMAux___main___at_Lean_mkAppStx___spec__1(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabGT___closed__3; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabAndM___closed__3; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabAdd___closed__1; +lean_object* l_Lean_Elab_Term_elabLE___closed__3; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabEq___closed__1; +lean_object* l_Lean_Elab_Term_elabLT(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabBEq___closed__3; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabseqLeft___closed__3; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabBOr(lean_object*); +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabAndThen___closed__2; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabDollar___closed__1; +lean_object* l_Lean_Elab_Term_elabLE___closed__4; +lean_object* l_Lean_Elab_Term_elabOrM___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Term_elabIff___closed__1; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabCons___closed__3; +lean_object* l_Lean_Elab_Term_elabGE___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +extern lean_object* l_Lean_Parser_Term_seqRight___elambda__1___closed__1; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabLT(lean_object*); +extern lean_object* l_Lean_Parser_Term_mapRev___elambda__1___closed__2; +extern lean_object* l_Lean_Parser_Term_append___elambda__1___closed__2; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabMul(lean_object*); +lean_object* l_Lean_Elab_Term_elabGE___closed__1; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabBNe___closed__2; +extern lean_object* l_Lean_Elab_Term_declareBuiltinTermElab___closed__4; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabBAnd___closed__1; +lean_object* l_Lean_Elab_Term_elabInfix___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +extern lean_object* l_Lean_Parser_Term_mapConst___elambda__1___closed__1; +lean_object* l_Lean_Elab_Term_elabBEq(lean_object*, lean_object*, lean_object*, lean_object*); +extern lean_object* l_Lean_Parser_Term_pow___elambda__1___closed__2; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabModN___closed__1; +extern lean_object* l_Lean_Parser_Term_cons___elambda__1___closed__2; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabOrM___closed__3; +lean_object* l_Lean_Elab_Term_elabAndThen___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabseqRight___closed__2; +extern lean_object* l_Lean_Parser_Term_and___elambda__1___closed__2; +lean_object* l_Lean_Elab_Term_mkTermId(lean_object*, lean_object*); +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabGT(lean_object*); +extern lean_object* l_Lean_Parser_Term_mapRev___elambda__1___closed__1; +lean_object* l_Lean_Elab_Term_elabGT___closed__2; +lean_object* l_Lean_Elab_Term_elabGT___closed__1; +lean_object* l_Lean_Elab_Term_elabGT___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabHEq___closed__3; +extern lean_object* l_Lean_Parser_Term_mapConst___elambda__1___closed__2; +lean_object* l_Lean_Elab_Term_elabHEq___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Term_elabOrM(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Term_addBuiltinTermElab(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Term_elabAndThen___closed__2; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabEquiv(lean_object*); +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabEq___closed__3; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabGE___closed__3; +lean_object* l_Lean_Elab_Term_elabMapConst___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Term_elabAndThen___closed__3; +lean_object* l_Lean_Elab_Term_elabseqLeft(lean_object*, lean_object*, lean_object*, lean_object*); +extern lean_object* l_Lean_Meta_evalNat___main___closed__3; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabMul___closed__2; +lean_object* l_Lean_Elab_Term_elabMapConst___closed__1; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabLE___closed__3; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabMapConstRev___closed__1; +lean_object* l_Lean_Elab_Term_elabseqRight(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Term_elabseqRight___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabNe(lean_object*); +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabMul___closed__1; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabNe___closed__2; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabLT___closed__1; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabModN___closed__2; +extern lean_object* l_Lean_Parser_Term_bne___elambda__1___closed__2; +lean_object* l_Lean_Elab_Term_elabCons(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Term_elabMod(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabOr___closed__1; +extern lean_object* l_Lean_Parser_Term_map___elambda__1___closed__2; +extern lean_object* l_Lean_Parser_Term_orelse___elambda__1___closed__2; +lean_object* l_Lean_Elab_Term_elabBEq___closed__2; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabLT___closed__2; +lean_object* l_Lean_Elab_Term_elabBNe___closed__1; +lean_object* l_Lean_Elab_Term_elabBNe___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Term_elabSub___closed__1; +lean_object* l_Lean_Elab_Term_elabMap(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabDiv___closed__1; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabBNe___closed__1; +lean_object* l_Lean_Elab_Term_elabseqRight___closed__3; +extern lean_object* l_Lean_Parser_Term_bne___elambda__1___closed__1; +lean_object* l_Lean_Elab_Term_elabDollar(lean_object*, lean_object*, lean_object*, lean_object*); +extern lean_object* l_Lean_Parser_Term_map___elambda__1___closed__1; +lean_object* l_Lean_Elab_Term_elabAndThen(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabLE___closed__1; +extern lean_object* l_Lean_Parser_Term_modN___elambda__1___closed__2; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabEquiv___closed__3; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabAndM___closed__1; +lean_object* l_Lean_Elab_Term_elabNe___closed__2; +extern lean_object* l_Lean_Parser_Term_and___elambda__1___closed__1; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabOrM(lean_object*); +lean_object* l_Lean_Elab_Term_elabNe(lean_object*, lean_object*, lean_object*, lean_object*); +extern lean_object* l_Lean_Parser_Term_orelse___elambda__1___closed__1; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabOr(lean_object*); +lean_object* l_Lean_Elab_Term_elabSub___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +extern lean_object* l_Lean_Parser_Term_dollar___elambda__1___closed__2; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabNe___closed__1; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabseqLeft(lean_object*); +lean_object* l_Lean_Elab_Term_elabNe___closed__1; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabDollar(lean_object*); +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabAndM(lean_object*); +lean_object* l_Lean_Elab_Term_elabBEq___closed__1; +lean_object* l_Lean_Elab_Term_elabNe___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabAnd___closed__3; +lean_object* l_Lean_Elab_Term_elabSub___closed__3; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabLE___closed__2; +extern lean_object* l_Lean_Parser_Term_mod___elambda__1___closed__2; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabAndM___closed__2; +lean_object* l_Lean_Elab_Term_elabAdd(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Term_elabAndM___closed__1; +lean_object* l_Lean_Elab_Term_elabAndM___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Term_elabDollar(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; +x_5 = lean_ctor_get(x_1, 1); +x_6 = l_Lean_stxInh; +x_7 = lean_unsigned_to_nat(0u); +x_8 = lean_array_get(x_6, x_5, x_7); +x_9 = lean_unsigned_to_nat(2u); +x_10 = lean_array_get(x_6, x_5, x_9); +x_11 = l_Lean_FileMap_ofString___closed__1; +x_12 = lean_array_push(x_11, x_10); +x_13 = l_Array_iterateMAux___main___at_Lean_mkAppStx___spec__1(x_12, x_12, x_7, x_8); +lean_dec(x_12); +x_14 = l_Lean_Elab_Term_elabTerm(x_13, x_2, x_3, x_4); +return x_14; +} +} +lean_object* l_Lean_Elab_Term_elabDollar___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; +x_5 = l_Lean_Elab_Term_elabDollar(x_1, x_2, x_3, x_4); +lean_dec(x_1); +return x_5; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabDollar___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("elabDollar"); +return x_1; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabDollar___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Elab_Term_declareBuiltinTermElab___closed__4; +x_2 = l___regBuiltinTermElab_Lean_Elab_Term_elabDollar___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabDollar___closed__3() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_Elab_Term_elabDollar___boxed), 4, 0); +return x_1; +} +} +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabDollar(lean_object* x_1) { +_start: +{ +lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; +x_2 = l_Lean_Parser_Term_dollar___elambda__1___closed__2; +x_3 = l___regBuiltinTermElab_Lean_Elab_Term_elabDollar___closed__2; +x_4 = l___regBuiltinTermElab_Lean_Elab_Term_elabDollar___closed__3; +x_5 = l_Lean_Elab_Term_addBuiltinTermElab(x_2, x_3, x_4, x_1); +return x_5; +} +} +lean_object* l_Lean_Elab_Term_elabInfix(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { +_start: +{ +lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; +x_6 = lean_ctor_get(x_2, 1); +x_7 = l_Lean_stxInh; +x_8 = lean_unsigned_to_nat(0u); +x_9 = lean_array_get(x_7, x_6, x_8); +x_10 = l_Array_iterateMAux___main___at_Lean_mkAppStx___spec__1___closed__1; +x_11 = lean_array_push(x_10, x_9); +x_12 = lean_unsigned_to_nat(2u); +x_13 = lean_array_get(x_7, x_6, x_12); +x_14 = lean_array_push(x_11, x_13); +x_15 = l_Array_iterateMAux___main___at_Lean_mkAppStx___spec__1(x_14, x_14, x_8, x_1); +lean_dec(x_14); +x_16 = l_Lean_Elab_Term_elabTerm(x_15, x_3, x_4, x_5); +return x_16; +} +} +lean_object* l_Lean_Elab_Term_elabInfix___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { +_start: +{ +lean_object* x_6; +x_6 = l_Lean_Elab_Term_elabInfix(x_1, x_2, x_3, x_4, x_5); +lean_dec(x_2); +return x_6; +} +} +lean_object* l_Lean_Elab_Term_elabInfixOp(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { +_start: +{ +lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; +x_6 = lean_ctor_get(x_2, 1); +x_7 = l_Lean_stxInh; +x_8 = lean_unsigned_to_nat(1u); +x_9 = lean_array_get(x_7, x_6, x_8); +x_10 = l_Lean_Elab_Term_mkTermId(x_9, x_1); +lean_dec(x_9); +x_11 = l_Lean_Elab_Term_elabInfix(x_10, x_2, x_3, x_4, x_5); +return x_11; +} +} +lean_object* l_Lean_Elab_Term_elabInfixOp___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { +_start: +{ +lean_object* x_6; +x_6 = l_Lean_Elab_Term_elabInfixOp(x_1, x_2, x_3, x_4, x_5); +lean_dec(x_2); +return x_6; +} +} +lean_object* _init_l_Lean_Elab_Term_elabAdd___closed__1() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Meta_evalNat___main___closed__3; +x_2 = l_Lean_Parser_Term_add___elambda__1___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* l_Lean_Elab_Term_elabAdd(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_Elab_Term_elabAdd___closed__1; +x_6 = l_Lean_Elab_Term_elabInfixOp(x_5, x_1, x_2, x_3, x_4); +return x_6; +} +} +lean_object* l_Lean_Elab_Term_elabAdd___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; +x_5 = l_Lean_Elab_Term_elabAdd(x_1, x_2, x_3, x_4); +lean_dec(x_1); +return x_5; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabAdd___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("elabAdd"); +return x_1; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabAdd___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Elab_Term_declareBuiltinTermElab___closed__4; +x_2 = l___regBuiltinTermElab_Lean_Elab_Term_elabAdd___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabAdd___closed__3() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_Elab_Term_elabAdd___boxed), 4, 0); +return x_1; +} +} +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabAdd(lean_object* x_1) { +_start: +{ +lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; +x_2 = l_Lean_Parser_Term_add___elambda__1___closed__2; +x_3 = l___regBuiltinTermElab_Lean_Elab_Term_elabAdd___closed__2; +x_4 = l___regBuiltinTermElab_Lean_Elab_Term_elabAdd___closed__3; +x_5 = l_Lean_Elab_Term_addBuiltinTermElab(x_2, x_3, x_4, x_1); +return x_5; +} +} +lean_object* _init_l_Lean_Elab_Term_elabSub___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("HasSub"); +return x_1; +} +} +lean_object* _init_l_Lean_Elab_Term_elabSub___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l_Lean_Elab_Term_elabSub___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* _init_l_Lean_Elab_Term_elabSub___closed__3() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Elab_Term_elabSub___closed__2; +x_2 = l_Lean_Parser_Term_sub___elambda__1___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* l_Lean_Elab_Term_elabSub(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_Elab_Term_elabSub___closed__3; +x_6 = l_Lean_Elab_Term_elabInfixOp(x_5, x_1, x_2, x_3, x_4); +return x_6; +} +} +lean_object* l_Lean_Elab_Term_elabSub___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; +x_5 = l_Lean_Elab_Term_elabSub(x_1, x_2, x_3, x_4); +lean_dec(x_1); +return x_5; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabSub___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("elabSub"); +return x_1; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabSub___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Elab_Term_declareBuiltinTermElab___closed__4; +x_2 = l___regBuiltinTermElab_Lean_Elab_Term_elabSub___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabSub___closed__3() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_Elab_Term_elabSub___boxed), 4, 0); +return x_1; +} +} +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabSub(lean_object* x_1) { +_start: +{ +lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; +x_2 = l_Lean_Parser_Term_sub___elambda__1___closed__2; +x_3 = l___regBuiltinTermElab_Lean_Elab_Term_elabSub___closed__2; +x_4 = l___regBuiltinTermElab_Lean_Elab_Term_elabSub___closed__3; +x_5 = l_Lean_Elab_Term_addBuiltinTermElab(x_2, x_3, x_4, x_1); +return x_5; +} +} +lean_object* _init_l_Lean_Elab_Term_elabMul___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("HasMul"); +return x_1; +} +} +lean_object* _init_l_Lean_Elab_Term_elabMul___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l_Lean_Elab_Term_elabMul___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* _init_l_Lean_Elab_Term_elabMul___closed__3() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Elab_Term_elabMul___closed__2; +x_2 = l_Lean_Parser_Term_mul___elambda__1___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* l_Lean_Elab_Term_elabMul(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_Elab_Term_elabMul___closed__3; +x_6 = l_Lean_Elab_Term_elabInfixOp(x_5, x_1, x_2, x_3, x_4); +return x_6; +} +} +lean_object* l_Lean_Elab_Term_elabMul___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; +x_5 = l_Lean_Elab_Term_elabMul(x_1, x_2, x_3, x_4); +lean_dec(x_1); +return x_5; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabMul___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("elabMul"); +return x_1; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabMul___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Elab_Term_declareBuiltinTermElab___closed__4; +x_2 = l___regBuiltinTermElab_Lean_Elab_Term_elabMul___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabMul___closed__3() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_Elab_Term_elabMul___boxed), 4, 0); +return x_1; +} +} +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabMul(lean_object* x_1) { +_start: +{ +lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; +x_2 = l_Lean_Parser_Term_mul___elambda__1___closed__2; +x_3 = l___regBuiltinTermElab_Lean_Elab_Term_elabMul___closed__2; +x_4 = l___regBuiltinTermElab_Lean_Elab_Term_elabMul___closed__3; +x_5 = l_Lean_Elab_Term_addBuiltinTermElab(x_2, x_3, x_4, x_1); +return x_5; +} +} +lean_object* _init_l_Lean_Elab_Term_elabDiv___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("HasDiv"); +return x_1; +} +} +lean_object* _init_l_Lean_Elab_Term_elabDiv___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l_Lean_Elab_Term_elabDiv___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* _init_l_Lean_Elab_Term_elabDiv___closed__3() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Elab_Term_elabDiv___closed__2; +x_2 = l_Lean_Parser_Term_div___elambda__1___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* l_Lean_Elab_Term_elabDiv(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_Elab_Term_elabDiv___closed__3; +x_6 = l_Lean_Elab_Term_elabInfixOp(x_5, x_1, x_2, x_3, x_4); +return x_6; +} +} +lean_object* l_Lean_Elab_Term_elabDiv___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; +x_5 = l_Lean_Elab_Term_elabDiv(x_1, x_2, x_3, x_4); +lean_dec(x_1); +return x_5; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabDiv___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("elabDiv"); +return x_1; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabDiv___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Elab_Term_declareBuiltinTermElab___closed__4; +x_2 = l___regBuiltinTermElab_Lean_Elab_Term_elabDiv___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabDiv___closed__3() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_Elab_Term_elabDiv___boxed), 4, 0); +return x_1; +} +} +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabDiv(lean_object* x_1) { +_start: +{ +lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; +x_2 = l_Lean_Parser_Term_div___elambda__1___closed__2; +x_3 = l___regBuiltinTermElab_Lean_Elab_Term_elabDiv___closed__2; +x_4 = l___regBuiltinTermElab_Lean_Elab_Term_elabDiv___closed__3; +x_5 = l_Lean_Elab_Term_addBuiltinTermElab(x_2, x_3, x_4, x_1); +return x_5; +} +} +lean_object* _init_l_Lean_Elab_Term_elabMod___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("HasMod"); +return x_1; +} +} +lean_object* _init_l_Lean_Elab_Term_elabMod___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l_Lean_Elab_Term_elabMod___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* _init_l_Lean_Elab_Term_elabMod___closed__3() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Elab_Term_elabMod___closed__2; +x_2 = l_Lean_Parser_Term_mod___elambda__1___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* l_Lean_Elab_Term_elabMod(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_Elab_Term_elabMod___closed__3; +x_6 = l_Lean_Elab_Term_elabInfixOp(x_5, x_1, x_2, x_3, x_4); +return x_6; +} +} +lean_object* l_Lean_Elab_Term_elabMod___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; +x_5 = l_Lean_Elab_Term_elabMod(x_1, x_2, x_3, x_4); +lean_dec(x_1); +return x_5; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabMod___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("elabMod"); +return x_1; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabMod___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Elab_Term_declareBuiltinTermElab___closed__4; +x_2 = l___regBuiltinTermElab_Lean_Elab_Term_elabMod___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabMod___closed__3() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_Elab_Term_elabMod___boxed), 4, 0); +return x_1; +} +} +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabMod(lean_object* x_1) { +_start: +{ +lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; +x_2 = l_Lean_Parser_Term_mod___elambda__1___closed__2; +x_3 = l___regBuiltinTermElab_Lean_Elab_Term_elabMod___closed__2; +x_4 = l___regBuiltinTermElab_Lean_Elab_Term_elabMod___closed__3; +x_5 = l_Lean_Elab_Term_addBuiltinTermElab(x_2, x_3, x_4, x_1); +return x_5; +} +} +lean_object* _init_l_Lean_Elab_Term_elabModN___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("HasModN"); +return x_1; +} +} +lean_object* _init_l_Lean_Elab_Term_elabModN___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l_Lean_Elab_Term_elabModN___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* _init_l_Lean_Elab_Term_elabModN___closed__3() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("modn"); +return x_1; +} +} +lean_object* _init_l_Lean_Elab_Term_elabModN___closed__4() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Elab_Term_elabModN___closed__2; +x_2 = l_Lean_Elab_Term_elabModN___closed__3; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* l_Lean_Elab_Term_elabModN(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_Elab_Term_elabModN___closed__4; +x_6 = l_Lean_Elab_Term_elabInfixOp(x_5, x_1, x_2, x_3, x_4); +return x_6; +} +} +lean_object* l_Lean_Elab_Term_elabModN___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; +x_5 = l_Lean_Elab_Term_elabModN(x_1, x_2, x_3, x_4); +lean_dec(x_1); +return x_5; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabModN___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("elabModN"); +return x_1; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabModN___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Elab_Term_declareBuiltinTermElab___closed__4; +x_2 = l___regBuiltinTermElab_Lean_Elab_Term_elabModN___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabModN___closed__3() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_Elab_Term_elabModN___boxed), 4, 0); +return x_1; +} +} +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabModN(lean_object* x_1) { +_start: +{ +lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; +x_2 = l_Lean_Parser_Term_modN___elambda__1___closed__2; +x_3 = l___regBuiltinTermElab_Lean_Elab_Term_elabModN___closed__2; +x_4 = l___regBuiltinTermElab_Lean_Elab_Term_elabModN___closed__3; +x_5 = l_Lean_Elab_Term_addBuiltinTermElab(x_2, x_3, x_4, x_1); +return x_5; +} +} +lean_object* _init_l_Lean_Elab_Term_elabPow___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("HasPow"); +return x_1; +} +} +lean_object* _init_l_Lean_Elab_Term_elabPow___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l_Lean_Elab_Term_elabPow___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* _init_l_Lean_Elab_Term_elabPow___closed__3() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Elab_Term_elabPow___closed__2; +x_2 = l_Lean_Parser_Term_pow___elambda__1___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* l_Lean_Elab_Term_elabPow(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_Elab_Term_elabPow___closed__3; +x_6 = l_Lean_Elab_Term_elabInfixOp(x_5, x_1, x_2, x_3, x_4); +return x_6; +} +} +lean_object* l_Lean_Elab_Term_elabPow___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; +x_5 = l_Lean_Elab_Term_elabPow(x_1, x_2, x_3, x_4); +lean_dec(x_1); +return x_5; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabPow___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("elabPow"); +return x_1; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabPow___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Elab_Term_declareBuiltinTermElab___closed__4; +x_2 = l___regBuiltinTermElab_Lean_Elab_Term_elabPow___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabPow___closed__3() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_Elab_Term_elabPow___boxed), 4, 0); +return x_1; +} +} +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabPow(lean_object* x_1) { +_start: +{ +lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; +x_2 = l_Lean_Parser_Term_pow___elambda__1___closed__2; +x_3 = l___regBuiltinTermElab_Lean_Elab_Term_elabPow___closed__2; +x_4 = l___regBuiltinTermElab_Lean_Elab_Term_elabPow___closed__3; +x_5 = l_Lean_Elab_Term_addBuiltinTermElab(x_2, x_3, x_4, x_1); +return x_5; +} +} +lean_object* _init_l_Lean_Elab_Term_elabLE___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("HasLessEq"); +return x_1; +} +} +lean_object* _init_l_Lean_Elab_Term_elabLE___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l_Lean_Elab_Term_elabLE___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* _init_l_Lean_Elab_Term_elabLE___closed__3() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("LessEq"); +return x_1; +} +} +lean_object* _init_l_Lean_Elab_Term_elabLE___closed__4() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Elab_Term_elabLE___closed__2; +x_2 = l_Lean_Elab_Term_elabLE___closed__3; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* l_Lean_Elab_Term_elabLE(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_Elab_Term_elabLE___closed__4; +x_6 = l_Lean_Elab_Term_elabInfixOp(x_5, x_1, x_2, x_3, x_4); +return x_6; +} +} +lean_object* l_Lean_Elab_Term_elabLE___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; +x_5 = l_Lean_Elab_Term_elabLE(x_1, x_2, x_3, x_4); +lean_dec(x_1); +return x_5; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabLE___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("elabLE"); +return x_1; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabLE___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Elab_Term_declareBuiltinTermElab___closed__4; +x_2 = l___regBuiltinTermElab_Lean_Elab_Term_elabLE___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabLE___closed__3() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_Elab_Term_elabLE___boxed), 4, 0); +return x_1; +} +} +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabLE(lean_object* x_1) { +_start: +{ +lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; +x_2 = l_Lean_Parser_Term_le___elambda__1___closed__2; +x_3 = l___regBuiltinTermElab_Lean_Elab_Term_elabLE___closed__2; +x_4 = l___regBuiltinTermElab_Lean_Elab_Term_elabLE___closed__3; +x_5 = l_Lean_Elab_Term_addBuiltinTermElab(x_2, x_3, x_4, x_1); +return x_5; +} +} +lean_object* _init_l_Lean_Elab_Term_elabGE___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("GreaterEq"); +return x_1; +} +} +lean_object* _init_l_Lean_Elab_Term_elabGE___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l_Lean_Elab_Term_elabGE___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* l_Lean_Elab_Term_elabGE(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_Elab_Term_elabGE___closed__2; +x_6 = l_Lean_Elab_Term_elabInfixOp(x_5, x_1, x_2, x_3, x_4); +return x_6; +} +} +lean_object* l_Lean_Elab_Term_elabGE___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; +x_5 = l_Lean_Elab_Term_elabGE(x_1, x_2, x_3, x_4); +lean_dec(x_1); +return x_5; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabGE___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("elabGE"); +return x_1; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabGE___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Elab_Term_declareBuiltinTermElab___closed__4; +x_2 = l___regBuiltinTermElab_Lean_Elab_Term_elabGE___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabGE___closed__3() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_Elab_Term_elabGE___boxed), 4, 0); +return x_1; +} +} +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabGE(lean_object* x_1) { +_start: +{ +lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; +x_2 = l_Lean_Parser_Term_ge___elambda__1___closed__2; +x_3 = l___regBuiltinTermElab_Lean_Elab_Term_elabGE___closed__2; +x_4 = l___regBuiltinTermElab_Lean_Elab_Term_elabGE___closed__3; +x_5 = l_Lean_Elab_Term_addBuiltinTermElab(x_2, x_3, x_4, x_1); +return x_5; +} +} +lean_object* _init_l_Lean_Elab_Term_elabLT___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("HasLess"); +return x_1; +} +} +lean_object* _init_l_Lean_Elab_Term_elabLT___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l_Lean_Elab_Term_elabLT___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* _init_l_Lean_Elab_Term_elabLT___closed__3() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("Less"); +return x_1; +} +} +lean_object* _init_l_Lean_Elab_Term_elabLT___closed__4() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Elab_Term_elabLT___closed__2; +x_2 = l_Lean_Elab_Term_elabLT___closed__3; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* l_Lean_Elab_Term_elabLT(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_Elab_Term_elabLT___closed__4; +x_6 = l_Lean_Elab_Term_elabInfixOp(x_5, x_1, x_2, x_3, x_4); +return x_6; +} +} +lean_object* l_Lean_Elab_Term_elabLT___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; +x_5 = l_Lean_Elab_Term_elabLT(x_1, x_2, x_3, x_4); +lean_dec(x_1); +return x_5; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabLT___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("elabLT"); +return x_1; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabLT___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Elab_Term_declareBuiltinTermElab___closed__4; +x_2 = l___regBuiltinTermElab_Lean_Elab_Term_elabLT___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabLT___closed__3() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_Elab_Term_elabLT___boxed), 4, 0); +return x_1; +} +} +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabLT(lean_object* x_1) { +_start: +{ +lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; +x_2 = l_Lean_Parser_Term_lt___elambda__1___closed__2; +x_3 = l___regBuiltinTermElab_Lean_Elab_Term_elabLT___closed__2; +x_4 = l___regBuiltinTermElab_Lean_Elab_Term_elabLT___closed__3; +x_5 = l_Lean_Elab_Term_addBuiltinTermElab(x_2, x_3, x_4, x_1); +return x_5; +} +} +lean_object* _init_l_Lean_Elab_Term_elabGT___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("Greater"); +return x_1; +} +} +lean_object* _init_l_Lean_Elab_Term_elabGT___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l_Lean_Elab_Term_elabGT___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* l_Lean_Elab_Term_elabGT(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_Elab_Term_elabGT___closed__2; +x_6 = l_Lean_Elab_Term_elabInfixOp(x_5, x_1, x_2, x_3, x_4); +return x_6; +} +} +lean_object* l_Lean_Elab_Term_elabGT___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; +x_5 = l_Lean_Elab_Term_elabGT(x_1, x_2, x_3, x_4); +lean_dec(x_1); +return x_5; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabGT___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("elabGT"); +return x_1; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabGT___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Elab_Term_declareBuiltinTermElab___closed__4; +x_2 = l___regBuiltinTermElab_Lean_Elab_Term_elabGT___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabGT___closed__3() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_Elab_Term_elabGT___boxed), 4, 0); +return x_1; +} +} +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabGT(lean_object* x_1) { +_start: +{ +lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; +x_2 = l_Lean_Parser_Term_gt___elambda__1___closed__2; +x_3 = l___regBuiltinTermElab_Lean_Elab_Term_elabGT___closed__2; +x_4 = l___regBuiltinTermElab_Lean_Elab_Term_elabGT___closed__3; +x_5 = l_Lean_Elab_Term_addBuiltinTermElab(x_2, x_3, x_4, x_1); +return x_5; +} +} +lean_object* l_Lean_Elab_Term_elabEq(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_Expr_eq_x3f___closed__2; +x_6 = l_Lean_Elab_Term_elabInfixOp(x_5, x_1, x_2, x_3, x_4); +return x_6; +} +} +lean_object* l_Lean_Elab_Term_elabEq___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; +x_5 = l_Lean_Elab_Term_elabEq(x_1, x_2, x_3, x_4); +lean_dec(x_1); +return x_5; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabEq___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("elabEq"); +return x_1; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabEq___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Elab_Term_declareBuiltinTermElab___closed__4; +x_2 = l___regBuiltinTermElab_Lean_Elab_Term_elabEq___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabEq___closed__3() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_Elab_Term_elabEq___boxed), 4, 0); +return x_1; +} +} +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabEq(lean_object* x_1) { +_start: +{ +lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; +x_2 = l_Lean_Parser_Term_eq___elambda__1___closed__2; +x_3 = l___regBuiltinTermElab_Lean_Elab_Term_elabEq___closed__2; +x_4 = l___regBuiltinTermElab_Lean_Elab_Term_elabEq___closed__3; +x_5 = l_Lean_Elab_Term_addBuiltinTermElab(x_2, x_3, x_4, x_1); +return x_5; +} +} +lean_object* _init_l_Lean_Elab_Term_elabNe___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("Ne"); +return x_1; +} +} +lean_object* _init_l_Lean_Elab_Term_elabNe___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l_Lean_Elab_Term_elabNe___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* l_Lean_Elab_Term_elabNe(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_Elab_Term_elabNe___closed__2; +x_6 = l_Lean_Elab_Term_elabInfixOp(x_5, x_1, x_2, x_3, x_4); +return x_6; +} +} +lean_object* l_Lean_Elab_Term_elabNe___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; +x_5 = l_Lean_Elab_Term_elabNe(x_1, x_2, x_3, x_4); +lean_dec(x_1); +return x_5; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabNe___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("elabNe"); +return x_1; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabNe___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Elab_Term_declareBuiltinTermElab___closed__4; +x_2 = l___regBuiltinTermElab_Lean_Elab_Term_elabNe___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabNe___closed__3() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_Elab_Term_elabNe___boxed), 4, 0); +return x_1; +} +} +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabNe(lean_object* x_1) { +_start: +{ +lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; +x_2 = l_Lean_Parser_Term_ne___elambda__1___closed__2; +x_3 = l___regBuiltinTermElab_Lean_Elab_Term_elabNe___closed__2; +x_4 = l___regBuiltinTermElab_Lean_Elab_Term_elabNe___closed__3; +x_5 = l_Lean_Elab_Term_addBuiltinTermElab(x_2, x_3, x_4, x_1); +return x_5; +} +} +lean_object* _init_l_Lean_Elab_Term_elabBEq___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("HasBeq"); +return x_1; +} +} +lean_object* _init_l_Lean_Elab_Term_elabBEq___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l_Lean_Elab_Term_elabBEq___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* _init_l_Lean_Elab_Term_elabBEq___closed__3() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Elab_Term_elabBEq___closed__2; +x_2 = l_Lean_Parser_Term_beq___elambda__1___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* l_Lean_Elab_Term_elabBEq(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_Elab_Term_elabBEq___closed__3; +x_6 = l_Lean_Elab_Term_elabInfixOp(x_5, x_1, x_2, x_3, x_4); +return x_6; +} +} +lean_object* l_Lean_Elab_Term_elabBEq___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; +x_5 = l_Lean_Elab_Term_elabBEq(x_1, x_2, x_3, x_4); +lean_dec(x_1); +return x_5; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabBEq___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("elabBEq"); +return x_1; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabBEq___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Elab_Term_declareBuiltinTermElab___closed__4; +x_2 = l___regBuiltinTermElab_Lean_Elab_Term_elabBEq___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabBEq___closed__3() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_Elab_Term_elabBEq___boxed), 4, 0); +return x_1; +} +} +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabBEq(lean_object* x_1) { +_start: +{ +lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; +x_2 = l_Lean_Parser_Term_beq___elambda__1___closed__2; +x_3 = l___regBuiltinTermElab_Lean_Elab_Term_elabBEq___closed__2; +x_4 = l___regBuiltinTermElab_Lean_Elab_Term_elabBEq___closed__3; +x_5 = l_Lean_Elab_Term_addBuiltinTermElab(x_2, x_3, x_4, x_1); +return x_5; +} +} +lean_object* _init_l_Lean_Elab_Term_elabBNe___closed__1() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l_Lean_Parser_Term_bne___elambda__1___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* l_Lean_Elab_Term_elabBNe(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_Elab_Term_elabBNe___closed__1; +x_6 = l_Lean_Elab_Term_elabInfixOp(x_5, x_1, x_2, x_3, x_4); +return x_6; +} +} +lean_object* l_Lean_Elab_Term_elabBNe___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; +x_5 = l_Lean_Elab_Term_elabBNe(x_1, x_2, x_3, x_4); +lean_dec(x_1); +return x_5; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabBNe___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("elabBNe"); +return x_1; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabBNe___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Elab_Term_declareBuiltinTermElab___closed__4; +x_2 = l___regBuiltinTermElab_Lean_Elab_Term_elabBNe___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabBNe___closed__3() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_Elab_Term_elabBNe___boxed), 4, 0); +return x_1; +} +} +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabBNe(lean_object* x_1) { +_start: +{ +lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; +x_2 = l_Lean_Parser_Term_bne___elambda__1___closed__2; +x_3 = l___regBuiltinTermElab_Lean_Elab_Term_elabBNe___closed__2; +x_4 = l___regBuiltinTermElab_Lean_Elab_Term_elabBNe___closed__3; +x_5 = l_Lean_Elab_Term_addBuiltinTermElab(x_2, x_3, x_4, x_1); +return x_5; +} +} +lean_object* l_Lean_Elab_Term_elabHEq(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_Expr_heq_x3f___closed__2; +x_6 = l_Lean_Elab_Term_elabInfixOp(x_5, x_1, x_2, x_3, x_4); +return x_6; +} +} +lean_object* l_Lean_Elab_Term_elabHEq___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; +x_5 = l_Lean_Elab_Term_elabHEq(x_1, x_2, x_3, x_4); +lean_dec(x_1); +return x_5; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabHEq___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("elabHEq"); +return x_1; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabHEq___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Elab_Term_declareBuiltinTermElab___closed__4; +x_2 = l___regBuiltinTermElab_Lean_Elab_Term_elabHEq___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabHEq___closed__3() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_Elab_Term_elabHEq___boxed), 4, 0); +return x_1; +} +} +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabHEq(lean_object* x_1) { +_start: +{ +lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; +x_2 = l_Lean_Parser_Term_heq___elambda__1___closed__2; +x_3 = l___regBuiltinTermElab_Lean_Elab_Term_elabHEq___closed__2; +x_4 = l___regBuiltinTermElab_Lean_Elab_Term_elabHEq___closed__3; +x_5 = l_Lean_Elab_Term_addBuiltinTermElab(x_2, x_3, x_4, x_1); +return x_5; +} +} +lean_object* _init_l_Lean_Elab_Term_elabEquiv___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("HasEquiv"); +return x_1; +} +} +lean_object* _init_l_Lean_Elab_Term_elabEquiv___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l_Lean_Elab_Term_elabEquiv___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* _init_l_Lean_Elab_Term_elabEquiv___closed__3() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("Equiv"); +return x_1; +} +} +lean_object* _init_l_Lean_Elab_Term_elabEquiv___closed__4() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Elab_Term_elabEquiv___closed__2; +x_2 = l_Lean_Elab_Term_elabEquiv___closed__3; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* l_Lean_Elab_Term_elabEquiv(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_Elab_Term_elabEquiv___closed__4; +x_6 = l_Lean_Elab_Term_elabInfixOp(x_5, x_1, x_2, x_3, x_4); +return x_6; +} +} +lean_object* l_Lean_Elab_Term_elabEquiv___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; +x_5 = l_Lean_Elab_Term_elabEquiv(x_1, x_2, x_3, x_4); +lean_dec(x_1); +return x_5; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabEquiv___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("elabEquiv"); +return x_1; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabEquiv___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Elab_Term_declareBuiltinTermElab___closed__4; +x_2 = l___regBuiltinTermElab_Lean_Elab_Term_elabEquiv___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabEquiv___closed__3() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_Elab_Term_elabEquiv___boxed), 4, 0); +return x_1; +} +} +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabEquiv(lean_object* x_1) { +_start: +{ +lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; +x_2 = l_Lean_Parser_Term_equiv___elambda__1___closed__2; +x_3 = l___regBuiltinTermElab_Lean_Elab_Term_elabEquiv___closed__2; +x_4 = l___regBuiltinTermElab_Lean_Elab_Term_elabEquiv___closed__3; +x_5 = l_Lean_Elab_Term_addBuiltinTermElab(x_2, x_3, x_4, x_1); +return x_5; +} +} +lean_object* _init_l_Lean_Elab_Term_elabAnd___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("And"); +return x_1; +} +} +lean_object* _init_l_Lean_Elab_Term_elabAnd___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l_Lean_Elab_Term_elabAnd___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* l_Lean_Elab_Term_elabAnd(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_Elab_Term_elabAnd___closed__2; +x_6 = l_Lean_Elab_Term_elabInfixOp(x_5, x_1, x_2, x_3, x_4); +return x_6; +} +} +lean_object* l_Lean_Elab_Term_elabAnd___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; +x_5 = l_Lean_Elab_Term_elabAnd(x_1, x_2, x_3, x_4); +lean_dec(x_1); +return x_5; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabAnd___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("elabAnd"); +return x_1; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabAnd___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Elab_Term_declareBuiltinTermElab___closed__4; +x_2 = l___regBuiltinTermElab_Lean_Elab_Term_elabAnd___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabAnd___closed__3() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_Elab_Term_elabAnd___boxed), 4, 0); +return x_1; +} +} +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabAnd(lean_object* x_1) { +_start: +{ +lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; +x_2 = l_Lean_Parser_Term_and___elambda__1___closed__2; +x_3 = l___regBuiltinTermElab_Lean_Elab_Term_elabAnd___closed__2; +x_4 = l___regBuiltinTermElab_Lean_Elab_Term_elabAnd___closed__3; +x_5 = l_Lean_Elab_Term_addBuiltinTermElab(x_2, x_3, x_4, x_1); +return x_5; +} +} +lean_object* _init_l_Lean_Elab_Term_elabOr___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("Or"); +return x_1; +} +} +lean_object* _init_l_Lean_Elab_Term_elabOr___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l_Lean_Elab_Term_elabOr___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* l_Lean_Elab_Term_elabOr(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_Elab_Term_elabOr___closed__2; +x_6 = l_Lean_Elab_Term_elabInfixOp(x_5, x_1, x_2, x_3, x_4); +return x_6; +} +} +lean_object* l_Lean_Elab_Term_elabOr___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; +x_5 = l_Lean_Elab_Term_elabOr(x_1, x_2, x_3, x_4); +lean_dec(x_1); +return x_5; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabOr___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("elabOr"); +return x_1; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabOr___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Elab_Term_declareBuiltinTermElab___closed__4; +x_2 = l___regBuiltinTermElab_Lean_Elab_Term_elabOr___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabOr___closed__3() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_Elab_Term_elabOr___boxed), 4, 0); +return x_1; +} +} +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabOr(lean_object* x_1) { +_start: +{ +lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; +x_2 = l_Lean_Parser_Term_or___elambda__1___closed__2; +x_3 = l___regBuiltinTermElab_Lean_Elab_Term_elabOr___closed__2; +x_4 = l___regBuiltinTermElab_Lean_Elab_Term_elabOr___closed__3; +x_5 = l_Lean_Elab_Term_addBuiltinTermElab(x_2, x_3, x_4, x_1); +return x_5; +} +} +lean_object* _init_l_Lean_Elab_Term_elabIff___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("Iff"); +return x_1; +} +} +lean_object* _init_l_Lean_Elab_Term_elabIff___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l_Lean_Elab_Term_elabIff___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* l_Lean_Elab_Term_elabIff(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_Elab_Term_elabIff___closed__2; +x_6 = l_Lean_Elab_Term_elabInfixOp(x_5, x_1, x_2, x_3, x_4); +return x_6; +} +} +lean_object* l_Lean_Elab_Term_elabIff___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; +x_5 = l_Lean_Elab_Term_elabIff(x_1, x_2, x_3, x_4); +lean_dec(x_1); +return x_5; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabIff___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("elabIff"); +return x_1; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabIff___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Elab_Term_declareBuiltinTermElab___closed__4; +x_2 = l___regBuiltinTermElab_Lean_Elab_Term_elabIff___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabIff___closed__3() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_Elab_Term_elabIff___boxed), 4, 0); +return x_1; +} +} +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabIff(lean_object* x_1) { +_start: +{ +lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; +x_2 = l_Lean_Parser_Term_iff___elambda__1___closed__2; +x_3 = l___regBuiltinTermElab_Lean_Elab_Term_elabIff___closed__2; +x_4 = l___regBuiltinTermElab_Lean_Elab_Term_elabIff___closed__3; +x_5 = l_Lean_Elab_Term_addBuiltinTermElab(x_2, x_3, x_4, x_1); +return x_5; +} +} +lean_object* _init_l_Lean_Elab_Term_elabBAnd___closed__1() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l_Lean_Parser_Term_and___elambda__1___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* l_Lean_Elab_Term_elabBAnd(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_Elab_Term_elabBAnd___closed__1; +x_6 = l_Lean_Elab_Term_elabInfixOp(x_5, x_1, x_2, x_3, x_4); +return x_6; +} +} +lean_object* l_Lean_Elab_Term_elabBAnd___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; +x_5 = l_Lean_Elab_Term_elabBAnd(x_1, x_2, x_3, x_4); +lean_dec(x_1); +return x_5; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabBAnd___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("elabBAnd"); +return x_1; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabBAnd___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Elab_Term_declareBuiltinTermElab___closed__4; +x_2 = l___regBuiltinTermElab_Lean_Elab_Term_elabBAnd___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabBAnd___closed__3() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_Elab_Term_elabBAnd___boxed), 4, 0); +return x_1; +} +} +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabBAnd(lean_object* x_1) { +_start: +{ +lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; +x_2 = l_Lean_Parser_Term_band___elambda__1___closed__2; +x_3 = l___regBuiltinTermElab_Lean_Elab_Term_elabBAnd___closed__2; +x_4 = l___regBuiltinTermElab_Lean_Elab_Term_elabBAnd___closed__3; +x_5 = l_Lean_Elab_Term_addBuiltinTermElab(x_2, x_3, x_4, x_1); +return x_5; +} +} +lean_object* _init_l_Lean_Elab_Term_elabBOr___closed__1() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l_Lean_Parser_Term_or___elambda__1___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* l_Lean_Elab_Term_elabBOr(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_Elab_Term_elabBOr___closed__1; +x_6 = l_Lean_Elab_Term_elabInfixOp(x_5, x_1, x_2, x_3, x_4); +return x_6; +} +} +lean_object* l_Lean_Elab_Term_elabBOr___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; +x_5 = l_Lean_Elab_Term_elabBOr(x_1, x_2, x_3, x_4); +lean_dec(x_1); +return x_5; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabBOr___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("elabBOr"); +return x_1; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabBOr___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Elab_Term_declareBuiltinTermElab___closed__4; +x_2 = l___regBuiltinTermElab_Lean_Elab_Term_elabBOr___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabBOr___closed__3() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_Elab_Term_elabBOr___boxed), 4, 0); +return x_1; +} +} +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabBOr(lean_object* x_1) { +_start: +{ +lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; +x_2 = l_Lean_Parser_Term_bor___elambda__1___closed__2; +x_3 = l___regBuiltinTermElab_Lean_Elab_Term_elabBOr___closed__2; +x_4 = l___regBuiltinTermElab_Lean_Elab_Term_elabBOr___closed__3; +x_5 = l_Lean_Elab_Term_addBuiltinTermElab(x_2, x_3, x_4, x_1); +return x_5; +} +} +lean_object* _init_l_Lean_Elab_Term_elabAppend___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("HasAppend"); +return x_1; +} +} +lean_object* _init_l_Lean_Elab_Term_elabAppend___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l_Lean_Elab_Term_elabAppend___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* _init_l_Lean_Elab_Term_elabAppend___closed__3() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Elab_Term_elabAppend___closed__2; +x_2 = l_Lean_Parser_Term_append___elambda__1___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* l_Lean_Elab_Term_elabAppend(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_Elab_Term_elabAppend___closed__3; +x_6 = l_Lean_Elab_Term_elabInfixOp(x_5, x_1, x_2, x_3, x_4); +return x_6; +} +} +lean_object* l_Lean_Elab_Term_elabAppend___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; +x_5 = l_Lean_Elab_Term_elabAppend(x_1, x_2, x_3, x_4); +lean_dec(x_1); +return x_5; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabAppend___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("elabAppend"); +return x_1; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabAppend___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Elab_Term_declareBuiltinTermElab___closed__4; +x_2 = l___regBuiltinTermElab_Lean_Elab_Term_elabAppend___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabAppend___closed__3() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_Elab_Term_elabAppend___boxed), 4, 0); +return x_1; +} +} +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabAppend(lean_object* x_1) { +_start: +{ +lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; +x_2 = l_Lean_Parser_Term_append___elambda__1___closed__2; +x_3 = l___regBuiltinTermElab_Lean_Elab_Term_elabAppend___closed__2; +x_4 = l___regBuiltinTermElab_Lean_Elab_Term_elabAppend___closed__3; +x_5 = l_Lean_Elab_Term_addBuiltinTermElab(x_2, x_3, x_4, x_1); +return x_5; +} +} +lean_object* l_Lean_Elab_Term_elabCons(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___private_Init_Lean_Elab_Quotation_5__quoteList___main___closed__6; +x_6 = l_Lean_Elab_Term_elabInfixOp(x_5, x_1, x_2, x_3, x_4); +return x_6; +} +} +lean_object* l_Lean_Elab_Term_elabCons___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; +x_5 = l_Lean_Elab_Term_elabCons(x_1, x_2, x_3, x_4); +lean_dec(x_1); +return x_5; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabCons___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("elabCons"); +return x_1; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabCons___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Elab_Term_declareBuiltinTermElab___closed__4; +x_2 = l___regBuiltinTermElab_Lean_Elab_Term_elabCons___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabCons___closed__3() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_Elab_Term_elabCons___boxed), 4, 0); +return x_1; +} +} +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabCons(lean_object* x_1) { +_start: +{ +lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; +x_2 = l_Lean_Parser_Term_cons___elambda__1___closed__2; +x_3 = l___regBuiltinTermElab_Lean_Elab_Term_elabCons___closed__2; +x_4 = l___regBuiltinTermElab_Lean_Elab_Term_elabCons___closed__3; +x_5 = l_Lean_Elab_Term_addBuiltinTermElab(x_2, x_3, x_4, x_1); +return x_5; +} +} +lean_object* _init_l_Lean_Elab_Term_elabAndThen___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("HasAndthen"); +return x_1; +} +} +lean_object* _init_l_Lean_Elab_Term_elabAndThen___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l_Lean_Elab_Term_elabAndThen___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* _init_l_Lean_Elab_Term_elabAndThen___closed__3() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Elab_Term_elabAndThen___closed__2; +x_2 = l_Lean_Parser_Term_andthen___elambda__1___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* l_Lean_Elab_Term_elabAndThen(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_Elab_Term_elabAndThen___closed__3; +x_6 = l_Lean_Elab_Term_elabInfixOp(x_5, x_1, x_2, x_3, x_4); +return x_6; +} +} +lean_object* l_Lean_Elab_Term_elabAndThen___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; +x_5 = l_Lean_Elab_Term_elabAndThen(x_1, x_2, x_3, x_4); +lean_dec(x_1); +return x_5; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabAndThen___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("elabAndThen"); +return x_1; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabAndThen___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Elab_Term_declareBuiltinTermElab___closed__4; +x_2 = l___regBuiltinTermElab_Lean_Elab_Term_elabAndThen___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabAndThen___closed__3() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_Elab_Term_elabAndThen___boxed), 4, 0); +return x_1; +} +} +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabAndThen(lean_object* x_1) { +_start: +{ +lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; +x_2 = l_Lean_Parser_Term_andthen___elambda__1___closed__2; +x_3 = l___regBuiltinTermElab_Lean_Elab_Term_elabAndThen___closed__2; +x_4 = l___regBuiltinTermElab_Lean_Elab_Term_elabAndThen___closed__3; +x_5 = l_Lean_Elab_Term_addBuiltinTermElab(x_2, x_3, x_4, x_1); +return x_5; +} +} +lean_object* _init_l_Lean_Elab_Term_elabseq___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("HasSeq"); +return x_1; +} +} +lean_object* _init_l_Lean_Elab_Term_elabseq___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l_Lean_Elab_Term_elabseq___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* _init_l_Lean_Elab_Term_elabseq___closed__3() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Elab_Term_elabseq___closed__2; +x_2 = l_Lean_Parser_Term_seq___elambda__1___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* l_Lean_Elab_Term_elabseq(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_Elab_Term_elabseq___closed__3; +x_6 = l_Lean_Elab_Term_elabInfixOp(x_5, x_1, x_2, x_3, x_4); +return x_6; +} +} +lean_object* l_Lean_Elab_Term_elabseq___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; +x_5 = l_Lean_Elab_Term_elabseq(x_1, x_2, x_3, x_4); +lean_dec(x_1); +return x_5; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabseq___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("elabseq"); +return x_1; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabseq___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Elab_Term_declareBuiltinTermElab___closed__4; +x_2 = l___regBuiltinTermElab_Lean_Elab_Term_elabseq___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabseq___closed__3() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_Elab_Term_elabseq___boxed), 4, 0); +return x_1; +} +} +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabseq(lean_object* x_1) { +_start: +{ +lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; +x_2 = l_Lean_Parser_Term_seq___elambda__1___closed__2; +x_3 = l___regBuiltinTermElab_Lean_Elab_Term_elabseq___closed__2; +x_4 = l___regBuiltinTermElab_Lean_Elab_Term_elabseq___closed__3; +x_5 = l_Lean_Elab_Term_addBuiltinTermElab(x_2, x_3, x_4, x_1); +return x_5; +} +} +lean_object* _init_l_Lean_Elab_Term_elabseqLeft___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("HasSeqLeft"); +return x_1; +} +} +lean_object* _init_l_Lean_Elab_Term_elabseqLeft___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l_Lean_Elab_Term_elabseqLeft___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* _init_l_Lean_Elab_Term_elabseqLeft___closed__3() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Elab_Term_elabseqLeft___closed__2; +x_2 = l_Lean_Parser_Term_seqLeft___elambda__1___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* l_Lean_Elab_Term_elabseqLeft(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_Elab_Term_elabseqLeft___closed__3; +x_6 = l_Lean_Elab_Term_elabInfixOp(x_5, x_1, x_2, x_3, x_4); +return x_6; +} +} +lean_object* l_Lean_Elab_Term_elabseqLeft___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; +x_5 = l_Lean_Elab_Term_elabseqLeft(x_1, x_2, x_3, x_4); +lean_dec(x_1); +return x_5; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabseqLeft___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("elabseqLeft"); +return x_1; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabseqLeft___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Elab_Term_declareBuiltinTermElab___closed__4; +x_2 = l___regBuiltinTermElab_Lean_Elab_Term_elabseqLeft___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabseqLeft___closed__3() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_Elab_Term_elabseqLeft___boxed), 4, 0); +return x_1; +} +} +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabseqLeft(lean_object* x_1) { +_start: +{ +lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; +x_2 = l_Lean_Parser_Term_seqLeft___elambda__1___closed__2; +x_3 = l___regBuiltinTermElab_Lean_Elab_Term_elabseqLeft___closed__2; +x_4 = l___regBuiltinTermElab_Lean_Elab_Term_elabseqLeft___closed__3; +x_5 = l_Lean_Elab_Term_addBuiltinTermElab(x_2, x_3, x_4, x_1); +return x_5; +} +} +lean_object* _init_l_Lean_Elab_Term_elabseqRight___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("HasSeqRight"); +return x_1; +} +} +lean_object* _init_l_Lean_Elab_Term_elabseqRight___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l_Lean_Elab_Term_elabseqRight___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* _init_l_Lean_Elab_Term_elabseqRight___closed__3() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Elab_Term_elabseqRight___closed__2; +x_2 = l_Lean_Parser_Term_seqRight___elambda__1___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* l_Lean_Elab_Term_elabseqRight(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_Elab_Term_elabseqRight___closed__3; +x_6 = l_Lean_Elab_Term_elabInfixOp(x_5, x_1, x_2, x_3, x_4); +return x_6; +} +} +lean_object* l_Lean_Elab_Term_elabseqRight___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; +x_5 = l_Lean_Elab_Term_elabseqRight(x_1, x_2, x_3, x_4); +lean_dec(x_1); +return x_5; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabseqRight___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("elabseqRight"); +return x_1; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabseqRight___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Elab_Term_declareBuiltinTermElab___closed__4; +x_2 = l___regBuiltinTermElab_Lean_Elab_Term_elabseqRight___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabseqRight___closed__3() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_Elab_Term_elabseqRight___boxed), 4, 0); +return x_1; +} +} +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabseqRight(lean_object* x_1) { +_start: +{ +lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; +x_2 = l_Lean_Parser_Term_seqRight___elambda__1___closed__2; +x_3 = l___regBuiltinTermElab_Lean_Elab_Term_elabseqRight___closed__2; +x_4 = l___regBuiltinTermElab_Lean_Elab_Term_elabseqRight___closed__3; +x_5 = l_Lean_Elab_Term_addBuiltinTermElab(x_2, x_3, x_4, x_1); +return x_5; +} +} +lean_object* _init_l_Lean_Elab_Term_elabMap___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("Functor"); +return x_1; +} +} +lean_object* _init_l_Lean_Elab_Term_elabMap___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l_Lean_Elab_Term_elabMap___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* _init_l_Lean_Elab_Term_elabMap___closed__3() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Elab_Term_elabMap___closed__2; +x_2 = l_Lean_Parser_Term_map___elambda__1___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* l_Lean_Elab_Term_elabMap(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_Elab_Term_elabMap___closed__3; +x_6 = l_Lean_Elab_Term_elabInfixOp(x_5, x_1, x_2, x_3, x_4); +return x_6; +} +} +lean_object* l_Lean_Elab_Term_elabMap___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; +x_5 = l_Lean_Elab_Term_elabMap(x_1, x_2, x_3, x_4); +lean_dec(x_1); +return x_5; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabMap___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("elabMap"); +return x_1; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabMap___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Elab_Term_declareBuiltinTermElab___closed__4; +x_2 = l___regBuiltinTermElab_Lean_Elab_Term_elabMap___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabMap___closed__3() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_Elab_Term_elabMap___boxed), 4, 0); +return x_1; +} +} +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabMap(lean_object* x_1) { +_start: +{ +lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; +x_2 = l_Lean_Parser_Term_map___elambda__1___closed__2; +x_3 = l___regBuiltinTermElab_Lean_Elab_Term_elabMap___closed__2; +x_4 = l___regBuiltinTermElab_Lean_Elab_Term_elabMap___closed__3; +x_5 = l_Lean_Elab_Term_addBuiltinTermElab(x_2, x_3, x_4, x_1); +return x_5; +} +} +lean_object* _init_l_Lean_Elab_Term_elabMapRev___closed__1() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Elab_Term_elabMap___closed__2; +x_2 = l_Lean_Parser_Term_mapRev___elambda__1___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* l_Lean_Elab_Term_elabMapRev(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_Elab_Term_elabMapRev___closed__1; +x_6 = l_Lean_Elab_Term_elabInfixOp(x_5, x_1, x_2, x_3, x_4); +return x_6; +} +} +lean_object* l_Lean_Elab_Term_elabMapRev___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; +x_5 = l_Lean_Elab_Term_elabMapRev(x_1, x_2, x_3, x_4); +lean_dec(x_1); +return x_5; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabMapRev___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("elabMapRev"); +return x_1; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabMapRev___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Elab_Term_declareBuiltinTermElab___closed__4; +x_2 = l___regBuiltinTermElab_Lean_Elab_Term_elabMapRev___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabMapRev___closed__3() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_Elab_Term_elabMapRev___boxed), 4, 0); +return x_1; +} +} +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabMapRev(lean_object* x_1) { +_start: +{ +lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; +x_2 = l_Lean_Parser_Term_mapRev___elambda__1___closed__2; +x_3 = l___regBuiltinTermElab_Lean_Elab_Term_elabMapRev___closed__2; +x_4 = l___regBuiltinTermElab_Lean_Elab_Term_elabMapRev___closed__3; +x_5 = l_Lean_Elab_Term_addBuiltinTermElab(x_2, x_3, x_4, x_1); +return x_5; +} +} +lean_object* _init_l_Lean_Elab_Term_elabMapConst___closed__1() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Elab_Term_elabMap___closed__2; +x_2 = l_Lean_Parser_Term_mapConst___elambda__1___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* l_Lean_Elab_Term_elabMapConst(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_Elab_Term_elabMapConst___closed__1; +x_6 = l_Lean_Elab_Term_elabInfixOp(x_5, x_1, x_2, x_3, x_4); +return x_6; +} +} +lean_object* l_Lean_Elab_Term_elabMapConst___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; +x_5 = l_Lean_Elab_Term_elabMapConst(x_1, x_2, x_3, x_4); +lean_dec(x_1); +return x_5; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabMapConst___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("elabMapConst"); +return x_1; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabMapConst___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Elab_Term_declareBuiltinTermElab___closed__4; +x_2 = l___regBuiltinTermElab_Lean_Elab_Term_elabMapConst___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabMapConst___closed__3() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_Elab_Term_elabMapConst___boxed), 4, 0); +return x_1; +} +} +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabMapConst(lean_object* x_1) { +_start: +{ +lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; +x_2 = l_Lean_Parser_Term_mapConst___elambda__1___closed__2; +x_3 = l___regBuiltinTermElab_Lean_Elab_Term_elabMapConst___closed__2; +x_4 = l___regBuiltinTermElab_Lean_Elab_Term_elabMapConst___closed__3; +x_5 = l_Lean_Elab_Term_addBuiltinTermElab(x_2, x_3, x_4, x_1); +return x_5; +} +} +lean_object* _init_l_Lean_Elab_Term_elabMapConstRev___closed__1() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Elab_Term_elabMap___closed__2; +x_2 = l_Lean_Parser_Term_mapConstRev___elambda__1___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* l_Lean_Elab_Term_elabMapConstRev(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_Elab_Term_elabMapConstRev___closed__1; +x_6 = l_Lean_Elab_Term_elabInfixOp(x_5, x_1, x_2, x_3, x_4); +return x_6; +} +} +lean_object* l_Lean_Elab_Term_elabMapConstRev___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; +x_5 = l_Lean_Elab_Term_elabMapConstRev(x_1, x_2, x_3, x_4); +lean_dec(x_1); +return x_5; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabMapConstRev___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("elabMapConstRev"); +return x_1; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabMapConstRev___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Elab_Term_declareBuiltinTermElab___closed__4; +x_2 = l___regBuiltinTermElab_Lean_Elab_Term_elabMapConstRev___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabMapConstRev___closed__3() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_Elab_Term_elabMapConstRev___boxed), 4, 0); +return x_1; +} +} +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabMapConstRev(lean_object* x_1) { +_start: +{ +lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; +x_2 = l_Lean_Parser_Term_mapConstRev___elambda__1___closed__2; +x_3 = l___regBuiltinTermElab_Lean_Elab_Term_elabMapConstRev___closed__2; +x_4 = l___regBuiltinTermElab_Lean_Elab_Term_elabMapConstRev___closed__3; +x_5 = l_Lean_Elab_Term_addBuiltinTermElab(x_2, x_3, x_4, x_1); +return x_5; +} +} +lean_object* _init_l_Lean_Elab_Term_elabOrElse___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("HasOrelse"); +return x_1; +} +} +lean_object* _init_l_Lean_Elab_Term_elabOrElse___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l_Lean_Elab_Term_elabOrElse___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* _init_l_Lean_Elab_Term_elabOrElse___closed__3() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Elab_Term_elabOrElse___closed__2; +x_2 = l_Lean_Parser_Term_orelse___elambda__1___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* l_Lean_Elab_Term_elabOrElse(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_Elab_Term_elabOrElse___closed__3; +x_6 = l_Lean_Elab_Term_elabInfixOp(x_5, x_1, x_2, x_3, x_4); +return x_6; +} +} +lean_object* l_Lean_Elab_Term_elabOrElse___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; +x_5 = l_Lean_Elab_Term_elabOrElse(x_1, x_2, x_3, x_4); +lean_dec(x_1); +return x_5; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabOrElse___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("elabOrElse"); +return x_1; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabOrElse___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Elab_Term_declareBuiltinTermElab___closed__4; +x_2 = l___regBuiltinTermElab_Lean_Elab_Term_elabOrElse___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabOrElse___closed__3() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_Elab_Term_elabOrElse___boxed), 4, 0); +return x_1; +} +} +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabOrElse(lean_object* x_1) { +_start: +{ +lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; +x_2 = l_Lean_Parser_Term_orelse___elambda__1___closed__2; +x_3 = l___regBuiltinTermElab_Lean_Elab_Term_elabOrElse___closed__2; +x_4 = l___regBuiltinTermElab_Lean_Elab_Term_elabOrElse___closed__3; +x_5 = l_Lean_Elab_Term_addBuiltinTermElab(x_2, x_3, x_4, x_1); +return x_5; +} +} +lean_object* _init_l_Lean_Elab_Term_elabOrM___closed__1() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l_Lean_Parser_Term_orM___elambda__1___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* l_Lean_Elab_Term_elabOrM(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_Elab_Term_elabOrM___closed__1; +x_6 = l_Lean_Elab_Term_elabInfixOp(x_5, x_1, x_2, x_3, x_4); +return x_6; +} +} +lean_object* l_Lean_Elab_Term_elabOrM___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; +x_5 = l_Lean_Elab_Term_elabOrM(x_1, x_2, x_3, x_4); +lean_dec(x_1); +return x_5; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabOrM___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("elabOrM"); +return x_1; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabOrM___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Elab_Term_declareBuiltinTermElab___closed__4; +x_2 = l___regBuiltinTermElab_Lean_Elab_Term_elabOrM___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabOrM___closed__3() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_Elab_Term_elabOrM___boxed), 4, 0); +return x_1; +} +} +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabOrM(lean_object* x_1) { +_start: +{ +lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; +x_2 = l_Lean_Parser_Term_orM___elambda__1___closed__2; +x_3 = l___regBuiltinTermElab_Lean_Elab_Term_elabOrM___closed__2; +x_4 = l___regBuiltinTermElab_Lean_Elab_Term_elabOrM___closed__3; +x_5 = l_Lean_Elab_Term_addBuiltinTermElab(x_2, x_3, x_4, x_1); +return x_5; +} +} +lean_object* _init_l_Lean_Elab_Term_elabAndM___closed__1() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l_Lean_Parser_Term_andM___elambda__1___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* l_Lean_Elab_Term_elabAndM(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_Elab_Term_elabAndM___closed__1; +x_6 = l_Lean_Elab_Term_elabInfixOp(x_5, x_1, x_2, x_3, x_4); +return x_6; +} +} +lean_object* l_Lean_Elab_Term_elabAndM___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; +x_5 = l_Lean_Elab_Term_elabAndM(x_1, x_2, x_3, x_4); +lean_dec(x_1); +return x_5; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabAndM___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("elabAndM"); +return x_1; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabAndM___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Elab_Term_declareBuiltinTermElab___closed__4; +x_2 = l___regBuiltinTermElab_Lean_Elab_Term_elabAndM___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabAndM___closed__3() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_Elab_Term_elabAndM___boxed), 4, 0); +return x_1; +} +} +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabAndM(lean_object* x_1) { +_start: +{ +lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; +x_2 = l_Lean_Parser_Term_andM___elambda__1___closed__2; +x_3 = l___regBuiltinTermElab_Lean_Elab_Term_elabAndM___closed__2; +x_4 = l___regBuiltinTermElab_Lean_Elab_Term_elabAndM___closed__3; +x_5 = l_Lean_Elab_Term_addBuiltinTermElab(x_2, x_3, x_4, x_1); +return x_5; +} +} +lean_object* initialize_Init_Lean_Elab_Term(lean_object*); +static bool _G_initialized = false; +lean_object* initialize_Init_Lean_Elab_BuiltinNotation(lean_object* w) { +lean_object * res; +if (_G_initialized) return lean_mk_io_result(lean_box(0)); +_G_initialized = true; +res = initialize_Init_Lean_Elab_Term(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); +l___regBuiltinTermElab_Lean_Elab_Term_elabDollar___closed__1 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabDollar___closed__1(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabDollar___closed__1); +l___regBuiltinTermElab_Lean_Elab_Term_elabDollar___closed__2 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabDollar___closed__2(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabDollar___closed__2); +l___regBuiltinTermElab_Lean_Elab_Term_elabDollar___closed__3 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabDollar___closed__3(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabDollar___closed__3); +res = l___regBuiltinTermElab_Lean_Elab_Term_elabDollar(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); +l_Lean_Elab_Term_elabAdd___closed__1 = _init_l_Lean_Elab_Term_elabAdd___closed__1(); +lean_mark_persistent(l_Lean_Elab_Term_elabAdd___closed__1); +l___regBuiltinTermElab_Lean_Elab_Term_elabAdd___closed__1 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabAdd___closed__1(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabAdd___closed__1); +l___regBuiltinTermElab_Lean_Elab_Term_elabAdd___closed__2 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabAdd___closed__2(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabAdd___closed__2); +l___regBuiltinTermElab_Lean_Elab_Term_elabAdd___closed__3 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabAdd___closed__3(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabAdd___closed__3); +res = l___regBuiltinTermElab_Lean_Elab_Term_elabAdd(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); +l_Lean_Elab_Term_elabSub___closed__1 = _init_l_Lean_Elab_Term_elabSub___closed__1(); +lean_mark_persistent(l_Lean_Elab_Term_elabSub___closed__1); +l_Lean_Elab_Term_elabSub___closed__2 = _init_l_Lean_Elab_Term_elabSub___closed__2(); +lean_mark_persistent(l_Lean_Elab_Term_elabSub___closed__2); +l_Lean_Elab_Term_elabSub___closed__3 = _init_l_Lean_Elab_Term_elabSub___closed__3(); +lean_mark_persistent(l_Lean_Elab_Term_elabSub___closed__3); +l___regBuiltinTermElab_Lean_Elab_Term_elabSub___closed__1 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabSub___closed__1(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabSub___closed__1); +l___regBuiltinTermElab_Lean_Elab_Term_elabSub___closed__2 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabSub___closed__2(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabSub___closed__2); +l___regBuiltinTermElab_Lean_Elab_Term_elabSub___closed__3 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabSub___closed__3(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabSub___closed__3); +res = l___regBuiltinTermElab_Lean_Elab_Term_elabSub(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); +l_Lean_Elab_Term_elabMul___closed__1 = _init_l_Lean_Elab_Term_elabMul___closed__1(); +lean_mark_persistent(l_Lean_Elab_Term_elabMul___closed__1); +l_Lean_Elab_Term_elabMul___closed__2 = _init_l_Lean_Elab_Term_elabMul___closed__2(); +lean_mark_persistent(l_Lean_Elab_Term_elabMul___closed__2); +l_Lean_Elab_Term_elabMul___closed__3 = _init_l_Lean_Elab_Term_elabMul___closed__3(); +lean_mark_persistent(l_Lean_Elab_Term_elabMul___closed__3); +l___regBuiltinTermElab_Lean_Elab_Term_elabMul___closed__1 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabMul___closed__1(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabMul___closed__1); +l___regBuiltinTermElab_Lean_Elab_Term_elabMul___closed__2 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabMul___closed__2(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabMul___closed__2); +l___regBuiltinTermElab_Lean_Elab_Term_elabMul___closed__3 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabMul___closed__3(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabMul___closed__3); +res = l___regBuiltinTermElab_Lean_Elab_Term_elabMul(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); +l_Lean_Elab_Term_elabDiv___closed__1 = _init_l_Lean_Elab_Term_elabDiv___closed__1(); +lean_mark_persistent(l_Lean_Elab_Term_elabDiv___closed__1); +l_Lean_Elab_Term_elabDiv___closed__2 = _init_l_Lean_Elab_Term_elabDiv___closed__2(); +lean_mark_persistent(l_Lean_Elab_Term_elabDiv___closed__2); +l_Lean_Elab_Term_elabDiv___closed__3 = _init_l_Lean_Elab_Term_elabDiv___closed__3(); +lean_mark_persistent(l_Lean_Elab_Term_elabDiv___closed__3); +l___regBuiltinTermElab_Lean_Elab_Term_elabDiv___closed__1 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabDiv___closed__1(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabDiv___closed__1); +l___regBuiltinTermElab_Lean_Elab_Term_elabDiv___closed__2 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabDiv___closed__2(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabDiv___closed__2); +l___regBuiltinTermElab_Lean_Elab_Term_elabDiv___closed__3 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabDiv___closed__3(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabDiv___closed__3); +res = l___regBuiltinTermElab_Lean_Elab_Term_elabDiv(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); +l_Lean_Elab_Term_elabMod___closed__1 = _init_l_Lean_Elab_Term_elabMod___closed__1(); +lean_mark_persistent(l_Lean_Elab_Term_elabMod___closed__1); +l_Lean_Elab_Term_elabMod___closed__2 = _init_l_Lean_Elab_Term_elabMod___closed__2(); +lean_mark_persistent(l_Lean_Elab_Term_elabMod___closed__2); +l_Lean_Elab_Term_elabMod___closed__3 = _init_l_Lean_Elab_Term_elabMod___closed__3(); +lean_mark_persistent(l_Lean_Elab_Term_elabMod___closed__3); +l___regBuiltinTermElab_Lean_Elab_Term_elabMod___closed__1 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabMod___closed__1(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabMod___closed__1); +l___regBuiltinTermElab_Lean_Elab_Term_elabMod___closed__2 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabMod___closed__2(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabMod___closed__2); +l___regBuiltinTermElab_Lean_Elab_Term_elabMod___closed__3 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabMod___closed__3(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabMod___closed__3); +res = l___regBuiltinTermElab_Lean_Elab_Term_elabMod(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); +l_Lean_Elab_Term_elabModN___closed__1 = _init_l_Lean_Elab_Term_elabModN___closed__1(); +lean_mark_persistent(l_Lean_Elab_Term_elabModN___closed__1); +l_Lean_Elab_Term_elabModN___closed__2 = _init_l_Lean_Elab_Term_elabModN___closed__2(); +lean_mark_persistent(l_Lean_Elab_Term_elabModN___closed__2); +l_Lean_Elab_Term_elabModN___closed__3 = _init_l_Lean_Elab_Term_elabModN___closed__3(); +lean_mark_persistent(l_Lean_Elab_Term_elabModN___closed__3); +l_Lean_Elab_Term_elabModN___closed__4 = _init_l_Lean_Elab_Term_elabModN___closed__4(); +lean_mark_persistent(l_Lean_Elab_Term_elabModN___closed__4); +l___regBuiltinTermElab_Lean_Elab_Term_elabModN___closed__1 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabModN___closed__1(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabModN___closed__1); +l___regBuiltinTermElab_Lean_Elab_Term_elabModN___closed__2 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabModN___closed__2(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabModN___closed__2); +l___regBuiltinTermElab_Lean_Elab_Term_elabModN___closed__3 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabModN___closed__3(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabModN___closed__3); +res = l___regBuiltinTermElab_Lean_Elab_Term_elabModN(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); +l_Lean_Elab_Term_elabPow___closed__1 = _init_l_Lean_Elab_Term_elabPow___closed__1(); +lean_mark_persistent(l_Lean_Elab_Term_elabPow___closed__1); +l_Lean_Elab_Term_elabPow___closed__2 = _init_l_Lean_Elab_Term_elabPow___closed__2(); +lean_mark_persistent(l_Lean_Elab_Term_elabPow___closed__2); +l_Lean_Elab_Term_elabPow___closed__3 = _init_l_Lean_Elab_Term_elabPow___closed__3(); +lean_mark_persistent(l_Lean_Elab_Term_elabPow___closed__3); +l___regBuiltinTermElab_Lean_Elab_Term_elabPow___closed__1 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabPow___closed__1(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabPow___closed__1); +l___regBuiltinTermElab_Lean_Elab_Term_elabPow___closed__2 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabPow___closed__2(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabPow___closed__2); +l___regBuiltinTermElab_Lean_Elab_Term_elabPow___closed__3 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabPow___closed__3(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabPow___closed__3); +res = l___regBuiltinTermElab_Lean_Elab_Term_elabPow(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); +l_Lean_Elab_Term_elabLE___closed__1 = _init_l_Lean_Elab_Term_elabLE___closed__1(); +lean_mark_persistent(l_Lean_Elab_Term_elabLE___closed__1); +l_Lean_Elab_Term_elabLE___closed__2 = _init_l_Lean_Elab_Term_elabLE___closed__2(); +lean_mark_persistent(l_Lean_Elab_Term_elabLE___closed__2); +l_Lean_Elab_Term_elabLE___closed__3 = _init_l_Lean_Elab_Term_elabLE___closed__3(); +lean_mark_persistent(l_Lean_Elab_Term_elabLE___closed__3); +l_Lean_Elab_Term_elabLE___closed__4 = _init_l_Lean_Elab_Term_elabLE___closed__4(); +lean_mark_persistent(l_Lean_Elab_Term_elabLE___closed__4); +l___regBuiltinTermElab_Lean_Elab_Term_elabLE___closed__1 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabLE___closed__1(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabLE___closed__1); +l___regBuiltinTermElab_Lean_Elab_Term_elabLE___closed__2 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabLE___closed__2(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabLE___closed__2); +l___regBuiltinTermElab_Lean_Elab_Term_elabLE___closed__3 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabLE___closed__3(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabLE___closed__3); +res = l___regBuiltinTermElab_Lean_Elab_Term_elabLE(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); +l_Lean_Elab_Term_elabGE___closed__1 = _init_l_Lean_Elab_Term_elabGE___closed__1(); +lean_mark_persistent(l_Lean_Elab_Term_elabGE___closed__1); +l_Lean_Elab_Term_elabGE___closed__2 = _init_l_Lean_Elab_Term_elabGE___closed__2(); +lean_mark_persistent(l_Lean_Elab_Term_elabGE___closed__2); +l___regBuiltinTermElab_Lean_Elab_Term_elabGE___closed__1 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabGE___closed__1(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabGE___closed__1); +l___regBuiltinTermElab_Lean_Elab_Term_elabGE___closed__2 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabGE___closed__2(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabGE___closed__2); +l___regBuiltinTermElab_Lean_Elab_Term_elabGE___closed__3 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabGE___closed__3(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabGE___closed__3); +res = l___regBuiltinTermElab_Lean_Elab_Term_elabGE(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); +l_Lean_Elab_Term_elabLT___closed__1 = _init_l_Lean_Elab_Term_elabLT___closed__1(); +lean_mark_persistent(l_Lean_Elab_Term_elabLT___closed__1); +l_Lean_Elab_Term_elabLT___closed__2 = _init_l_Lean_Elab_Term_elabLT___closed__2(); +lean_mark_persistent(l_Lean_Elab_Term_elabLT___closed__2); +l_Lean_Elab_Term_elabLT___closed__3 = _init_l_Lean_Elab_Term_elabLT___closed__3(); +lean_mark_persistent(l_Lean_Elab_Term_elabLT___closed__3); +l_Lean_Elab_Term_elabLT___closed__4 = _init_l_Lean_Elab_Term_elabLT___closed__4(); +lean_mark_persistent(l_Lean_Elab_Term_elabLT___closed__4); +l___regBuiltinTermElab_Lean_Elab_Term_elabLT___closed__1 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabLT___closed__1(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabLT___closed__1); +l___regBuiltinTermElab_Lean_Elab_Term_elabLT___closed__2 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabLT___closed__2(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabLT___closed__2); +l___regBuiltinTermElab_Lean_Elab_Term_elabLT___closed__3 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabLT___closed__3(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabLT___closed__3); +res = l___regBuiltinTermElab_Lean_Elab_Term_elabLT(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); +l_Lean_Elab_Term_elabGT___closed__1 = _init_l_Lean_Elab_Term_elabGT___closed__1(); +lean_mark_persistent(l_Lean_Elab_Term_elabGT___closed__1); +l_Lean_Elab_Term_elabGT___closed__2 = _init_l_Lean_Elab_Term_elabGT___closed__2(); +lean_mark_persistent(l_Lean_Elab_Term_elabGT___closed__2); +l___regBuiltinTermElab_Lean_Elab_Term_elabGT___closed__1 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabGT___closed__1(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabGT___closed__1); +l___regBuiltinTermElab_Lean_Elab_Term_elabGT___closed__2 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabGT___closed__2(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabGT___closed__2); +l___regBuiltinTermElab_Lean_Elab_Term_elabGT___closed__3 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabGT___closed__3(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabGT___closed__3); +res = l___regBuiltinTermElab_Lean_Elab_Term_elabGT(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); +l___regBuiltinTermElab_Lean_Elab_Term_elabEq___closed__1 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabEq___closed__1(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabEq___closed__1); +l___regBuiltinTermElab_Lean_Elab_Term_elabEq___closed__2 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabEq___closed__2(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabEq___closed__2); +l___regBuiltinTermElab_Lean_Elab_Term_elabEq___closed__3 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabEq___closed__3(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabEq___closed__3); +res = l___regBuiltinTermElab_Lean_Elab_Term_elabEq(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); +l_Lean_Elab_Term_elabNe___closed__1 = _init_l_Lean_Elab_Term_elabNe___closed__1(); +lean_mark_persistent(l_Lean_Elab_Term_elabNe___closed__1); +l_Lean_Elab_Term_elabNe___closed__2 = _init_l_Lean_Elab_Term_elabNe___closed__2(); +lean_mark_persistent(l_Lean_Elab_Term_elabNe___closed__2); +l___regBuiltinTermElab_Lean_Elab_Term_elabNe___closed__1 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabNe___closed__1(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabNe___closed__1); +l___regBuiltinTermElab_Lean_Elab_Term_elabNe___closed__2 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabNe___closed__2(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabNe___closed__2); +l___regBuiltinTermElab_Lean_Elab_Term_elabNe___closed__3 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabNe___closed__3(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabNe___closed__3); +res = l___regBuiltinTermElab_Lean_Elab_Term_elabNe(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); +l_Lean_Elab_Term_elabBEq___closed__1 = _init_l_Lean_Elab_Term_elabBEq___closed__1(); +lean_mark_persistent(l_Lean_Elab_Term_elabBEq___closed__1); +l_Lean_Elab_Term_elabBEq___closed__2 = _init_l_Lean_Elab_Term_elabBEq___closed__2(); +lean_mark_persistent(l_Lean_Elab_Term_elabBEq___closed__2); +l_Lean_Elab_Term_elabBEq___closed__3 = _init_l_Lean_Elab_Term_elabBEq___closed__3(); +lean_mark_persistent(l_Lean_Elab_Term_elabBEq___closed__3); +l___regBuiltinTermElab_Lean_Elab_Term_elabBEq___closed__1 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabBEq___closed__1(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabBEq___closed__1); +l___regBuiltinTermElab_Lean_Elab_Term_elabBEq___closed__2 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabBEq___closed__2(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabBEq___closed__2); +l___regBuiltinTermElab_Lean_Elab_Term_elabBEq___closed__3 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabBEq___closed__3(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabBEq___closed__3); +res = l___regBuiltinTermElab_Lean_Elab_Term_elabBEq(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); +l_Lean_Elab_Term_elabBNe___closed__1 = _init_l_Lean_Elab_Term_elabBNe___closed__1(); +lean_mark_persistent(l_Lean_Elab_Term_elabBNe___closed__1); +l___regBuiltinTermElab_Lean_Elab_Term_elabBNe___closed__1 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabBNe___closed__1(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabBNe___closed__1); +l___regBuiltinTermElab_Lean_Elab_Term_elabBNe___closed__2 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabBNe___closed__2(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabBNe___closed__2); +l___regBuiltinTermElab_Lean_Elab_Term_elabBNe___closed__3 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabBNe___closed__3(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabBNe___closed__3); +res = l___regBuiltinTermElab_Lean_Elab_Term_elabBNe(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); +l___regBuiltinTermElab_Lean_Elab_Term_elabHEq___closed__1 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabHEq___closed__1(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabHEq___closed__1); +l___regBuiltinTermElab_Lean_Elab_Term_elabHEq___closed__2 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabHEq___closed__2(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabHEq___closed__2); +l___regBuiltinTermElab_Lean_Elab_Term_elabHEq___closed__3 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabHEq___closed__3(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabHEq___closed__3); +res = l___regBuiltinTermElab_Lean_Elab_Term_elabHEq(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); +l_Lean_Elab_Term_elabEquiv___closed__1 = _init_l_Lean_Elab_Term_elabEquiv___closed__1(); +lean_mark_persistent(l_Lean_Elab_Term_elabEquiv___closed__1); +l_Lean_Elab_Term_elabEquiv___closed__2 = _init_l_Lean_Elab_Term_elabEquiv___closed__2(); +lean_mark_persistent(l_Lean_Elab_Term_elabEquiv___closed__2); +l_Lean_Elab_Term_elabEquiv___closed__3 = _init_l_Lean_Elab_Term_elabEquiv___closed__3(); +lean_mark_persistent(l_Lean_Elab_Term_elabEquiv___closed__3); +l_Lean_Elab_Term_elabEquiv___closed__4 = _init_l_Lean_Elab_Term_elabEquiv___closed__4(); +lean_mark_persistent(l_Lean_Elab_Term_elabEquiv___closed__4); +l___regBuiltinTermElab_Lean_Elab_Term_elabEquiv___closed__1 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabEquiv___closed__1(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabEquiv___closed__1); +l___regBuiltinTermElab_Lean_Elab_Term_elabEquiv___closed__2 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabEquiv___closed__2(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabEquiv___closed__2); +l___regBuiltinTermElab_Lean_Elab_Term_elabEquiv___closed__3 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabEquiv___closed__3(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabEquiv___closed__3); +res = l___regBuiltinTermElab_Lean_Elab_Term_elabEquiv(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); +l_Lean_Elab_Term_elabAnd___closed__1 = _init_l_Lean_Elab_Term_elabAnd___closed__1(); +lean_mark_persistent(l_Lean_Elab_Term_elabAnd___closed__1); +l_Lean_Elab_Term_elabAnd___closed__2 = _init_l_Lean_Elab_Term_elabAnd___closed__2(); +lean_mark_persistent(l_Lean_Elab_Term_elabAnd___closed__2); +l___regBuiltinTermElab_Lean_Elab_Term_elabAnd___closed__1 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabAnd___closed__1(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabAnd___closed__1); +l___regBuiltinTermElab_Lean_Elab_Term_elabAnd___closed__2 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabAnd___closed__2(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabAnd___closed__2); +l___regBuiltinTermElab_Lean_Elab_Term_elabAnd___closed__3 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabAnd___closed__3(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabAnd___closed__3); +res = l___regBuiltinTermElab_Lean_Elab_Term_elabAnd(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); +l_Lean_Elab_Term_elabOr___closed__1 = _init_l_Lean_Elab_Term_elabOr___closed__1(); +lean_mark_persistent(l_Lean_Elab_Term_elabOr___closed__1); +l_Lean_Elab_Term_elabOr___closed__2 = _init_l_Lean_Elab_Term_elabOr___closed__2(); +lean_mark_persistent(l_Lean_Elab_Term_elabOr___closed__2); +l___regBuiltinTermElab_Lean_Elab_Term_elabOr___closed__1 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabOr___closed__1(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabOr___closed__1); +l___regBuiltinTermElab_Lean_Elab_Term_elabOr___closed__2 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabOr___closed__2(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabOr___closed__2); +l___regBuiltinTermElab_Lean_Elab_Term_elabOr___closed__3 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabOr___closed__3(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabOr___closed__3); +res = l___regBuiltinTermElab_Lean_Elab_Term_elabOr(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); +l_Lean_Elab_Term_elabIff___closed__1 = _init_l_Lean_Elab_Term_elabIff___closed__1(); +lean_mark_persistent(l_Lean_Elab_Term_elabIff___closed__1); +l_Lean_Elab_Term_elabIff___closed__2 = _init_l_Lean_Elab_Term_elabIff___closed__2(); +lean_mark_persistent(l_Lean_Elab_Term_elabIff___closed__2); +l___regBuiltinTermElab_Lean_Elab_Term_elabIff___closed__1 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabIff___closed__1(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabIff___closed__1); +l___regBuiltinTermElab_Lean_Elab_Term_elabIff___closed__2 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabIff___closed__2(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabIff___closed__2); +l___regBuiltinTermElab_Lean_Elab_Term_elabIff___closed__3 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabIff___closed__3(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabIff___closed__3); +res = l___regBuiltinTermElab_Lean_Elab_Term_elabIff(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); +l_Lean_Elab_Term_elabBAnd___closed__1 = _init_l_Lean_Elab_Term_elabBAnd___closed__1(); +lean_mark_persistent(l_Lean_Elab_Term_elabBAnd___closed__1); +l___regBuiltinTermElab_Lean_Elab_Term_elabBAnd___closed__1 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabBAnd___closed__1(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabBAnd___closed__1); +l___regBuiltinTermElab_Lean_Elab_Term_elabBAnd___closed__2 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabBAnd___closed__2(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabBAnd___closed__2); +l___regBuiltinTermElab_Lean_Elab_Term_elabBAnd___closed__3 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabBAnd___closed__3(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabBAnd___closed__3); +res = l___regBuiltinTermElab_Lean_Elab_Term_elabBAnd(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); +l_Lean_Elab_Term_elabBOr___closed__1 = _init_l_Lean_Elab_Term_elabBOr___closed__1(); +lean_mark_persistent(l_Lean_Elab_Term_elabBOr___closed__1); +l___regBuiltinTermElab_Lean_Elab_Term_elabBOr___closed__1 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabBOr___closed__1(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabBOr___closed__1); +l___regBuiltinTermElab_Lean_Elab_Term_elabBOr___closed__2 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabBOr___closed__2(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabBOr___closed__2); +l___regBuiltinTermElab_Lean_Elab_Term_elabBOr___closed__3 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabBOr___closed__3(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabBOr___closed__3); +res = l___regBuiltinTermElab_Lean_Elab_Term_elabBOr(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); +l_Lean_Elab_Term_elabAppend___closed__1 = _init_l_Lean_Elab_Term_elabAppend___closed__1(); +lean_mark_persistent(l_Lean_Elab_Term_elabAppend___closed__1); +l_Lean_Elab_Term_elabAppend___closed__2 = _init_l_Lean_Elab_Term_elabAppend___closed__2(); +lean_mark_persistent(l_Lean_Elab_Term_elabAppend___closed__2); +l_Lean_Elab_Term_elabAppend___closed__3 = _init_l_Lean_Elab_Term_elabAppend___closed__3(); +lean_mark_persistent(l_Lean_Elab_Term_elabAppend___closed__3); +l___regBuiltinTermElab_Lean_Elab_Term_elabAppend___closed__1 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabAppend___closed__1(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabAppend___closed__1); +l___regBuiltinTermElab_Lean_Elab_Term_elabAppend___closed__2 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabAppend___closed__2(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabAppend___closed__2); +l___regBuiltinTermElab_Lean_Elab_Term_elabAppend___closed__3 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabAppend___closed__3(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabAppend___closed__3); +res = l___regBuiltinTermElab_Lean_Elab_Term_elabAppend(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); +l___regBuiltinTermElab_Lean_Elab_Term_elabCons___closed__1 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabCons___closed__1(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabCons___closed__1); +l___regBuiltinTermElab_Lean_Elab_Term_elabCons___closed__2 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabCons___closed__2(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabCons___closed__2); +l___regBuiltinTermElab_Lean_Elab_Term_elabCons___closed__3 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabCons___closed__3(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabCons___closed__3); +res = l___regBuiltinTermElab_Lean_Elab_Term_elabCons(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); +l_Lean_Elab_Term_elabAndThen___closed__1 = _init_l_Lean_Elab_Term_elabAndThen___closed__1(); +lean_mark_persistent(l_Lean_Elab_Term_elabAndThen___closed__1); +l_Lean_Elab_Term_elabAndThen___closed__2 = _init_l_Lean_Elab_Term_elabAndThen___closed__2(); +lean_mark_persistent(l_Lean_Elab_Term_elabAndThen___closed__2); +l_Lean_Elab_Term_elabAndThen___closed__3 = _init_l_Lean_Elab_Term_elabAndThen___closed__3(); +lean_mark_persistent(l_Lean_Elab_Term_elabAndThen___closed__3); +l___regBuiltinTermElab_Lean_Elab_Term_elabAndThen___closed__1 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabAndThen___closed__1(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabAndThen___closed__1); +l___regBuiltinTermElab_Lean_Elab_Term_elabAndThen___closed__2 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabAndThen___closed__2(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabAndThen___closed__2); +l___regBuiltinTermElab_Lean_Elab_Term_elabAndThen___closed__3 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabAndThen___closed__3(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabAndThen___closed__3); +res = l___regBuiltinTermElab_Lean_Elab_Term_elabAndThen(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); +l_Lean_Elab_Term_elabseq___closed__1 = _init_l_Lean_Elab_Term_elabseq___closed__1(); +lean_mark_persistent(l_Lean_Elab_Term_elabseq___closed__1); +l_Lean_Elab_Term_elabseq___closed__2 = _init_l_Lean_Elab_Term_elabseq___closed__2(); +lean_mark_persistent(l_Lean_Elab_Term_elabseq___closed__2); +l_Lean_Elab_Term_elabseq___closed__3 = _init_l_Lean_Elab_Term_elabseq___closed__3(); +lean_mark_persistent(l_Lean_Elab_Term_elabseq___closed__3); +l___regBuiltinTermElab_Lean_Elab_Term_elabseq___closed__1 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabseq___closed__1(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabseq___closed__1); +l___regBuiltinTermElab_Lean_Elab_Term_elabseq___closed__2 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabseq___closed__2(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabseq___closed__2); +l___regBuiltinTermElab_Lean_Elab_Term_elabseq___closed__3 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabseq___closed__3(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabseq___closed__3); +res = l___regBuiltinTermElab_Lean_Elab_Term_elabseq(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); +l_Lean_Elab_Term_elabseqLeft___closed__1 = _init_l_Lean_Elab_Term_elabseqLeft___closed__1(); +lean_mark_persistent(l_Lean_Elab_Term_elabseqLeft___closed__1); +l_Lean_Elab_Term_elabseqLeft___closed__2 = _init_l_Lean_Elab_Term_elabseqLeft___closed__2(); +lean_mark_persistent(l_Lean_Elab_Term_elabseqLeft___closed__2); +l_Lean_Elab_Term_elabseqLeft___closed__3 = _init_l_Lean_Elab_Term_elabseqLeft___closed__3(); +lean_mark_persistent(l_Lean_Elab_Term_elabseqLeft___closed__3); +l___regBuiltinTermElab_Lean_Elab_Term_elabseqLeft___closed__1 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabseqLeft___closed__1(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabseqLeft___closed__1); +l___regBuiltinTermElab_Lean_Elab_Term_elabseqLeft___closed__2 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabseqLeft___closed__2(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabseqLeft___closed__2); +l___regBuiltinTermElab_Lean_Elab_Term_elabseqLeft___closed__3 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabseqLeft___closed__3(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabseqLeft___closed__3); +res = l___regBuiltinTermElab_Lean_Elab_Term_elabseqLeft(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); +l_Lean_Elab_Term_elabseqRight___closed__1 = _init_l_Lean_Elab_Term_elabseqRight___closed__1(); +lean_mark_persistent(l_Lean_Elab_Term_elabseqRight___closed__1); +l_Lean_Elab_Term_elabseqRight___closed__2 = _init_l_Lean_Elab_Term_elabseqRight___closed__2(); +lean_mark_persistent(l_Lean_Elab_Term_elabseqRight___closed__2); +l_Lean_Elab_Term_elabseqRight___closed__3 = _init_l_Lean_Elab_Term_elabseqRight___closed__3(); +lean_mark_persistent(l_Lean_Elab_Term_elabseqRight___closed__3); +l___regBuiltinTermElab_Lean_Elab_Term_elabseqRight___closed__1 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabseqRight___closed__1(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabseqRight___closed__1); +l___regBuiltinTermElab_Lean_Elab_Term_elabseqRight___closed__2 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabseqRight___closed__2(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabseqRight___closed__2); +l___regBuiltinTermElab_Lean_Elab_Term_elabseqRight___closed__3 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabseqRight___closed__3(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabseqRight___closed__3); +res = l___regBuiltinTermElab_Lean_Elab_Term_elabseqRight(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); +l_Lean_Elab_Term_elabMap___closed__1 = _init_l_Lean_Elab_Term_elabMap___closed__1(); +lean_mark_persistent(l_Lean_Elab_Term_elabMap___closed__1); +l_Lean_Elab_Term_elabMap___closed__2 = _init_l_Lean_Elab_Term_elabMap___closed__2(); +lean_mark_persistent(l_Lean_Elab_Term_elabMap___closed__2); +l_Lean_Elab_Term_elabMap___closed__3 = _init_l_Lean_Elab_Term_elabMap___closed__3(); +lean_mark_persistent(l_Lean_Elab_Term_elabMap___closed__3); +l___regBuiltinTermElab_Lean_Elab_Term_elabMap___closed__1 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabMap___closed__1(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabMap___closed__1); +l___regBuiltinTermElab_Lean_Elab_Term_elabMap___closed__2 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabMap___closed__2(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabMap___closed__2); +l___regBuiltinTermElab_Lean_Elab_Term_elabMap___closed__3 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabMap___closed__3(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabMap___closed__3); +res = l___regBuiltinTermElab_Lean_Elab_Term_elabMap(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); +l_Lean_Elab_Term_elabMapRev___closed__1 = _init_l_Lean_Elab_Term_elabMapRev___closed__1(); +lean_mark_persistent(l_Lean_Elab_Term_elabMapRev___closed__1); +l___regBuiltinTermElab_Lean_Elab_Term_elabMapRev___closed__1 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabMapRev___closed__1(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabMapRev___closed__1); +l___regBuiltinTermElab_Lean_Elab_Term_elabMapRev___closed__2 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabMapRev___closed__2(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabMapRev___closed__2); +l___regBuiltinTermElab_Lean_Elab_Term_elabMapRev___closed__3 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabMapRev___closed__3(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabMapRev___closed__3); +res = l___regBuiltinTermElab_Lean_Elab_Term_elabMapRev(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); +l_Lean_Elab_Term_elabMapConst___closed__1 = _init_l_Lean_Elab_Term_elabMapConst___closed__1(); +lean_mark_persistent(l_Lean_Elab_Term_elabMapConst___closed__1); +l___regBuiltinTermElab_Lean_Elab_Term_elabMapConst___closed__1 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabMapConst___closed__1(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabMapConst___closed__1); +l___regBuiltinTermElab_Lean_Elab_Term_elabMapConst___closed__2 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabMapConst___closed__2(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabMapConst___closed__2); +l___regBuiltinTermElab_Lean_Elab_Term_elabMapConst___closed__3 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabMapConst___closed__3(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabMapConst___closed__3); +res = l___regBuiltinTermElab_Lean_Elab_Term_elabMapConst(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); +l_Lean_Elab_Term_elabMapConstRev___closed__1 = _init_l_Lean_Elab_Term_elabMapConstRev___closed__1(); +lean_mark_persistent(l_Lean_Elab_Term_elabMapConstRev___closed__1); +l___regBuiltinTermElab_Lean_Elab_Term_elabMapConstRev___closed__1 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabMapConstRev___closed__1(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabMapConstRev___closed__1); +l___regBuiltinTermElab_Lean_Elab_Term_elabMapConstRev___closed__2 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabMapConstRev___closed__2(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabMapConstRev___closed__2); +l___regBuiltinTermElab_Lean_Elab_Term_elabMapConstRev___closed__3 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabMapConstRev___closed__3(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabMapConstRev___closed__3); +res = l___regBuiltinTermElab_Lean_Elab_Term_elabMapConstRev(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); +l_Lean_Elab_Term_elabOrElse___closed__1 = _init_l_Lean_Elab_Term_elabOrElse___closed__1(); +lean_mark_persistent(l_Lean_Elab_Term_elabOrElse___closed__1); +l_Lean_Elab_Term_elabOrElse___closed__2 = _init_l_Lean_Elab_Term_elabOrElse___closed__2(); +lean_mark_persistent(l_Lean_Elab_Term_elabOrElse___closed__2); +l_Lean_Elab_Term_elabOrElse___closed__3 = _init_l_Lean_Elab_Term_elabOrElse___closed__3(); +lean_mark_persistent(l_Lean_Elab_Term_elabOrElse___closed__3); +l___regBuiltinTermElab_Lean_Elab_Term_elabOrElse___closed__1 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabOrElse___closed__1(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabOrElse___closed__1); +l___regBuiltinTermElab_Lean_Elab_Term_elabOrElse___closed__2 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabOrElse___closed__2(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabOrElse___closed__2); +l___regBuiltinTermElab_Lean_Elab_Term_elabOrElse___closed__3 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabOrElse___closed__3(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabOrElse___closed__3); +res = l___regBuiltinTermElab_Lean_Elab_Term_elabOrElse(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); +l_Lean_Elab_Term_elabOrM___closed__1 = _init_l_Lean_Elab_Term_elabOrM___closed__1(); +lean_mark_persistent(l_Lean_Elab_Term_elabOrM___closed__1); +l___regBuiltinTermElab_Lean_Elab_Term_elabOrM___closed__1 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabOrM___closed__1(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabOrM___closed__1); +l___regBuiltinTermElab_Lean_Elab_Term_elabOrM___closed__2 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabOrM___closed__2(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabOrM___closed__2); +l___regBuiltinTermElab_Lean_Elab_Term_elabOrM___closed__3 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabOrM___closed__3(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabOrM___closed__3); +res = l___regBuiltinTermElab_Lean_Elab_Term_elabOrM(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); +l_Lean_Elab_Term_elabAndM___closed__1 = _init_l_Lean_Elab_Term_elabAndM___closed__1(); +lean_mark_persistent(l_Lean_Elab_Term_elabAndM___closed__1); +l___regBuiltinTermElab_Lean_Elab_Term_elabAndM___closed__1 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabAndM___closed__1(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabAndM___closed__1); +l___regBuiltinTermElab_Lean_Elab_Term_elabAndM___closed__2 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabAndM___closed__2(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabAndM___closed__2); +l___regBuiltinTermElab_Lean_Elab_Term_elabAndM___closed__3 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabAndM___closed__3(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabAndM___closed__3); +res = l___regBuiltinTermElab_Lean_Elab_Term_elabAndM(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); +return lean_mk_io_result(lean_box(0)); +} +#ifdef __cplusplus +} +#endif diff --git a/stage0/stdlib/Init/Lean/Elab/Term.c b/stage0/stdlib/Init/Lean/Elab/Term.c index e8b3c5440c..333ef96f64 100644 --- a/stage0/stdlib/Init/Lean/Elab/Term.c +++ b/stage0/stdlib/Init/Lean/Elab/Term.c @@ -26,6 +26,7 @@ size_t l_USize_add(size_t, size_t); lean_object* l_Array_iterateMAux___main___at___private_Init_Lean_Elab_Term_23__expandApp___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_iterateMAux___main___at___private_Init_Lean_Elab_Term_23__expandApp___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_SMap_empty___at_Lean_Elab_Term_mkBuiltinTermElabTable___spec__1___closed__2; +lean_object* l_Lean_Expr_mvarId_x21(lean_object*); lean_object* l_Lean_Elab_getPos___at_Lean_Elab_Term_ensureType___spec__3(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_registerTraceClass(lean_object*, lean_object*); lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabChoice___closed__3; @@ -64,7 +65,8 @@ lean_object* l_PersistentHashMap_containsAtAux___main___at_Lean_Elab_Term_addBui lean_object* l_Lean_Elab_Term_tracer___closed__3; lean_object* l_Lean_Elab_Term_inferType(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_logErrorAndThrow___at_Lean_Elab_Term_ensureType___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Init_Lean_Elab_Term_13__elabAppArgsAux___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Term_assignExprMVar___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Init_Lean_Elab_Term_13__elabAppArgsAux___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_ensureHasType___closed__2; lean_object* l_Lean_Elab_Term_resettingSynthInstanceCacheWhen(lean_object*); lean_object* l_Lean_Format_pretty(lean_object*, lean_object*); @@ -108,6 +110,7 @@ lean_object* l___private_Init_Lean_Elab_Term_10__resolveLocalName___boxed(lean_o lean_object* l_Lean_Elab_Term_elabSort___rarg(lean_object*); lean_object* l___private_Init_Lean_Elab_Term_9__resolveLocalNameAux___main(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_resolveName___closed__3; +lean_object* l_Array_forMAux___main___at_Lean_Elab_Term_synthesizeInstMVars___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_findIdxAux___main___at___private_Init_Lean_Elab_Term_13__elabAppArgsAux___main___spec__1___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_mkExplicitBinder___closed__2; lean_object* l___private_Init_Lean_Elab_Term_16__elabAppFn___main(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*); @@ -135,6 +138,7 @@ lean_object* l_Lean_Elab_Term_withoutPostponing(lean_object*); lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabForall(lean_object*); lean_object* l_Lean_Elab_Term_elabParen___closed__3; extern lean_object* l_Lean_Elab_mkElabAttribute___rarg___closed__1; +lean_object* l_Lean_Elab_Term_getMVarDecl(lean_object*, lean_object*, lean_object*); lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabListLit___closed__1; lean_object* l___private_Init_Lean_Elab_Term_20__mergeFailures___rarg___closed__1; lean_object* lean_expr_instantiate1(lean_object*, lean_object*); @@ -149,6 +153,7 @@ lean_object* l_Lean_Elab_Term_resetSynthInstanceCache(lean_object*); lean_object* l_Lean_registerAttribute(lean_object*, lean_object*); lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabListLit___closed__2; lean_object* lean_string_append(lean_object*, lean_object*); +lean_object* l___private_Init_Data_Array_Basic_3__iterateRevMAux___main___at_Lean_Elab_Term_elabListLit___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_ensureType(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Init_Lean_Elab_Term_14__elabAppArgs(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, uint8_t, lean_object*, lean_object*); lean_object* l_ReaderT_read___at_Lean_Elab_Term_TermElabM_monadLog___spec__1(lean_object*, lean_object*); @@ -160,6 +165,7 @@ lean_object* l_Lean_Elab_Term_registerBuiltinTermElabAttr___lambda__1___closed__ lean_object* l_Lean_registerEnvExtensionUnsafe___at_Lean_Elab_Term_mkTermElabAttribute___spec__4___closed__1; lean_object* l___private_Init_Lean_Elab_Term_22__expandAppAux(lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_elabSort___boxed(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Term_getMCtx(lean_object*); size_t l_USize_shiftRight(size_t, size_t); lean_object* l_Lean_Elab_Term_withLCtx___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_addNamedArg___closed__6; @@ -174,6 +180,7 @@ lean_object* l_Lean_Elab_Term_dbgTrace___rarg(lean_object*, lean_object*, lean_o extern lean_object* l_Lean_FileMap_ofString___closed__1; lean_object* l_Lean_registerEnvExtensionUnsafe___at_Lean_Elab_Term_mkTermElabAttribute___spec__4___closed__2; extern lean_object* l_Lean_Meta_MetaHasEval___rarg___closed__4; +lean_object* l_Lean_Elab_Term_assignExprMVar(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_AssocList_find___main___at_Lean_Elab_Term_elabTerm___spec__6(lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_TermElabM_monadLog___lambda__1___boxed(lean_object*, lean_object*, lean_object*); lean_object* l___private_Init_Lean_Elab_Term_5__expandOptIdent(lean_object*, lean_object*, lean_object*); @@ -205,10 +212,10 @@ extern lean_object* l_Lean_Parser_Term_prop___elambda__1___rarg___closed__2; lean_object* l_Lean_Elab_Term_elabParen___closed__1; lean_object* l_Lean_Elab_Term_liftMetaM(lean_object*); extern lean_object* l_Lean_PersistentEnvExtension_inhabited___rarg___closed__1; -lean_object* l_Lean_Syntax_foldArgsAuxM___main___at_Lean_Elab_Term_elabListLit___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_umapMAux___main___at___private_Init_Lean_Elab_Term_6__matchBinder___spec__3___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_elabListLit___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Init_Lean_Elab_Term_1__mkFreshAnonymousName___rarg___closed__1; +uint8_t lean_metavar_ctx_is_expr_assigned(lean_object*, lean_object*); lean_object* l_Lean_Meta_isClass(lean_object*, lean_object*, lean_object*); lean_object* l___private_Init_Lean_Elab_Term_4__expandBinderIdent(lean_object*, lean_object*, lean_object*); lean_object* l___private_Init_Lean_Elab_Term_7__elabBinderViews___main___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -260,8 +267,9 @@ lean_object* l_Lean_SMap_find___at_Lean_Elab_Term_elabTerm___spec__1(lean_object extern lean_object* l_Lean_MessageData_Inhabited; lean_object* l_Lean_Elab_Term_mkFreshId___boxed(lean_object*); lean_object* l_Lean_Elab_Term_TermElabM_monadLog___closed__7; +lean_object* l_Lean_Elab_Term_isExprMVarAssigned___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_elabProp___rarg(lean_object*); -lean_object* l_Lean_Elab_Term_consumeDefaultParams___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Term_consumeDefaultParams___boxed(lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_mkHole___closed__1; lean_object* l_PersistentHashMap_empty___at_Lean_Elab_Term_mkBuiltinTermElabTable___spec__3; lean_object* l_Lean_Elab_Term_elabId(lean_object*, lean_object*, lean_object*, lean_object*); @@ -286,9 +294,11 @@ lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabStxQuot___closed__1; lean_object* l_Lean_Elab_Term_TermElabM_monadLog___lambda__2___boxed(lean_object*, lean_object*, lean_object*); lean_object* lean_array_get(lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Parser_Term_stxQuot___elambda__1___rarg___closed__2; +lean_object* l_Lean_Elab_Term_getMVarDecl___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_setTraceState___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Expr_fvarId_x21(lean_object*); lean_object* l_Lean_Elab_Term_registerBuiltinTermElabAttr___closed__7; +lean_object* l_Lean_Elab_Term_mkTermId___boxed(lean_object*, lean_object*); lean_object* l_Lean_Elab_log___at_Lean_Elab_Term_ensureType___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Init_Lean_Elab_Term_2__mkFreshInstanceName___boxed(lean_object*); lean_object* l_ReaderT_bind___at_Lean_Elab_Term_TermElabM_monadLog___spec__2(lean_object*, lean_object*); @@ -317,6 +327,7 @@ lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabListLit___closed__3; lean_object* l_Lean_registerEnvExtensionUnsafe___at_Lean_Elab_Term_mkTermElabAttribute___spec__4(lean_object*, lean_object*); lean_object* l_Lean_Elab_getPosition___at___private_Init_Lean_Elab_Term_18__toMessageData___spec__1(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_getPosition___at___private_Init_Lean_Elab_Term_18__toMessageData___spec__1___boxed(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Term_trySynthInstance(lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Parser_Term_explicitBinder___elambda__1___closed__2; extern lean_object* l_PersistentHashMap_insertAux___main___rarg___closed__3; lean_object* l_Lean_Syntax_getId(lean_object*); @@ -347,6 +358,8 @@ lean_object* l_PersistentHashMap_findAtAux___main___at_Lean_Elab_Term_elabTerm__ lean_object* l___private_Init_Lean_Elab_Term_6__matchBinder___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_elabProp___boxed(lean_object*, lean_object*, lean_object*); lean_object* l___private_Init_Lean_Elab_Term_19__getFailureMessage___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* lean_metavar_ctx_assign_expr(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Term_consumeDefaultParams___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_PersistentHashMap_findAux___main___at_Lean_Elab_Term_elabTerm___spec__3(lean_object*, size_t, lean_object*); lean_object* l_Lean_Elab_Term_applyResult___boxed(lean_object*, lean_object*, lean_object*); lean_object* l___private_Init_Lean_Elab_Term_9__resolveLocalNameAux(lean_object*, lean_object*, lean_object*); @@ -430,6 +443,7 @@ lean_object* l___private_Init_Lean_Elab_Term_3__expandBinderType(lean_object*); extern lean_object* l_Lean_Meta_Exception_toStr___closed__7; lean_object* l___private_Init_Lean_Elab_Term_8__elabBindersAux___main(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_elabExplicitUniv___rarg(lean_object*); +lean_object* l_Lean_Elab_Term_synthesizeInstMVars___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_isDefEq(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabExplicit___closed__2; extern lean_object* l_Lean_AttributeImpl_inhabited___closed__6; @@ -451,11 +465,13 @@ extern lean_object* l_Lean_Parser_Term_implicitBinder___elambda__1___closed__2; lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabId(lean_object*); lean_object* l_Lean_Elab_Term_TermElabM_monadLog; lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabProp___closed__2; +lean_object* l_Lean_Elab_Term_synthesizeInstMVars(lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_registerPersistentEnvExtensionUnsafe___rarg___closed__1; lean_object* l_Lean_Elab_Term_elabArrow(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_registerBuiltinTermElabAttr___lambda__1___closed__4; lean_object* l___private_Init_Lean_Elab_Term_11__mkFreshLevelMVars(lean_object*, lean_object*, lean_object*); lean_object* lean_local_ctx_find_from_user_name(lean_object*, lean_object*); +lean_object* l_Lean_Meta_trySynthInstance(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_declareBuiltinTermElab___closed__7; lean_object* l_Lean_Elab_logErrorAndThrow___at___private_Init_Lean_Elab_Term_20__mergeFailures___spec__2___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabForall___closed__3; @@ -490,6 +506,7 @@ lean_object* l_Lean_Elab_Term_ensureType___closed__2; lean_object* l_PersistentHashMap_insertAux___main___at_Lean_Elab_Term_addBuiltinTermElab___spec__9___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_registerBuiltinTermElabAttr___lambda__1___closed__2; lean_object* l_Lean_Environment_addAndCompile(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Term_registerSyntheticMVar(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Syntax_getKind(lean_object*); lean_object* l_Lean_Elab_Term_tracer___closed__4; lean_object* l_Lean_Elab_Term_registerBuiltinTermElabAttr___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -513,19 +530,21 @@ lean_object* l___private_Init_Lean_Elab_Term_21__elabAppAux___closed__3; extern lean_object* l___private_Init_Util_1__mkPanicMessage___closed__2; lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabParen___closed__2; lean_object* l_Lean_Elab_Term_resettingSynthInstanceCacheWhen___rarg(uint8_t, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Term_synthesizeInstMVar(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_iterateMAux___main___at___private_Init_Lean_Elab_Term_16__elabAppFn___main___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_elabExplicitUniv(lean_object*, lean_object*); extern lean_object* l_Lean_Parser_Term_hole___elambda__1___rarg___closed__1; +lean_object* l_Lean_Elab_Term_isExprMVarAssigned(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_elabTerm___closed__2; lean_object* l_Lean_Elab_Term_elabHole___boxed(lean_object*); -lean_object* l_Lean_Elab_Term_consumeDefaultParams(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Term_consumeDefaultParams(lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_declareBuiltinTermElab___closed__4; lean_object* lean_io_ref_reset(lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_mkExplicitBinder(lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_elabSort(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_mkHole___closed__3; extern lean_object* l_Lean_registerEnvExtensionUnsafe___rarg___closed__2; -lean_object* l___private_Init_Lean_Elab_Term_13__elabAppArgsAux(lean_object*, lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Init_Lean_Elab_Term_13__elabAppArgsAux(lean_object*, lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Init_Lean_Elab_Term_2__mkFreshInstanceName___rarg___closed__1; lean_object* lean_nat_mul(lean_object*, lean_object*); lean_object* l_Lean_Elab_logInfoAt___at_Lean_Elab_Term_elabTerm___spec__9(lean_object*, lean_object*, lean_object*, lean_object*); @@ -533,14 +552,18 @@ lean_object* l_Array_forMAux___main___at_Lean_Elab_Term_elabTerm___spec__12(lean lean_object* l_Lean_Syntax_getPos(lean_object*); lean_object* l_Lean_Elab_Term_elabListLit(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Init_Lean_Elab_Term_5__expandOptIdent___boxed(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Term_synthesizeInstMVar___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabApp___closed__3; lean_object* l_Lean_Elab_Term_elabType(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_registerBuiltinTermElabAttr___closed__2; lean_object* l___private_Init_Lean_Elab_Term_16__elabAppFn___main___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Term_synthesizeInstMVar___closed__2; lean_object* l_Lean_Elab_mkMessage___at_Lean_Elab_Term_elabTerm___spec__11(lean_object*, uint8_t, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_whnfForall(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_instantiateMVars___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_TermElabM_monadLog___closed__1; +lean_object* l_Lean_Elab_Term_synthesizeInstMVar___closed__1; +lean_object* l_Lean_Elab_Term_mkTermId(lean_object*, lean_object*); lean_object* l_Lean_Elab_mkElabAttribute___at_Lean_Elab_Term_mkTermElabAttribute___spec__1___closed__1; uint8_t l_Lean_Syntax_isNone(lean_object*); lean_object* l___private_Init_Lean_Elab_Term_2__mkFreshInstanceName___rarg___closed__2; @@ -584,6 +607,7 @@ lean_object* l_Lean_PersistentEnvExtension_getState___rarg(lean_object*, lean_ob lean_object* l_Lean_Elab_Term_tracer___closed__1; lean_object* l___private_Init_Lean_Elab_Term_7__elabBinderViews___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabHole___closed__3; +lean_object* l_Lean_Syntax_foldArgsAuxM___main___at_Lean_Syntax_foldSepRevArgsM___spec__1(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_TermElabM_monadLog___closed__9; lean_object* l_Lean_Elab_Term_getOpenDecls___boxed(lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_getTraceState___boxed(lean_object*); @@ -600,6 +624,8 @@ lean_object* l_Lean_Elab_Term_elabBinders___rarg(lean_object*, lean_object*, lea extern lean_object* l_Lean_registerPersistentEnvExtensionUnsafe___rarg___closed__2; lean_object* l_Lean_Elab_Term_TermElabM_monadLog___lambda__1(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_resolveName___closed__2; +lean_object* l___private_Init_Data_Array_Basic_3__iterateRevMAux___main___at_Lean_Elab_Term_elabListLit___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Term_synthesizeInstMVar___closed__3; lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabApp___closed__1; lean_object* l_Lean_Elab_Term_getLCtx___boxed(lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_mkFreshLevelMVar___boxed(lean_object*); @@ -622,6 +648,7 @@ lean_object* l_Lean_Elab_Term_addContext(lean_object*, lean_object*, lean_object extern lean_object* l_Lean_Parser_Term_listLit___elambda__1___closed__2; lean_object* l_Lean_Elab_Term_registerBuiltinTermElabAttr___closed__4; extern lean_object* l_Lean_Meta_resettingSynthInstanceCache___rarg___closed__1; +lean_object* l_Lean_MetavarContext_getDecl(lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_tracer; lean_object* l_Lean_Elab_Term_resetSynthInstanceCache___boxed(lean_object*); lean_object* l_Lean_Elab_Term_registerBuiltinTermElabAttr___lambda__1(lean_object*, lean_object*, lean_object*, uint8_t, lean_object*); @@ -632,7 +659,7 @@ uint8_t l_List_isEmpty___rarg(lean_object*); lean_object* l_Lean_Elab_Term_mkTermElabAttribute___closed__2; lean_object* l_Array_iterateMAux___main___at_Lean_mkAppN___spec__1(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_PersistentHashMap_find___at_Lean_Elab_Term_elabTerm___spec__2(lean_object*, lean_object*); -lean_object* l_Lean_Syntax_foldArgsAuxM___main___at_Lean_Elab_Term_elabListLit___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Term_getMCtx___boxed(lean_object*); lean_object* l_Lean_Elab_Term_applyResult(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Name_toStringWithSep___main(lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_elabForall(lean_object*, lean_object*, lean_object*, lean_object*); @@ -664,6 +691,7 @@ lean_object* l_HashMapImp_insert___at_Lean_Elab_Term_addBuiltinTermElab___spec__ lean_object* l_Lean_Elab_Term_TermElabM_monadLog___closed__8; lean_object* l_Array_umapMAux___main___at___private_Init_Lean_Elab_Term_6__matchBinder___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_mkConst(lean_object*, lean_object*); +lean_object* l_Lean_Elab_Term_registerSyntheticMVar___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_List_foldlM___main___at___private_Init_Lean_Elab_Term_12__mkConsts___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_PersistentEnvExtension_inhabited___rarg___closed__4; lean_object* l___private_Init_Lean_Elab_Term_17__getSuccess(lean_object*); @@ -675,7 +703,8 @@ lean_object* l___private_Init_Lean_Elab_Term_1__mkFreshAnonymousName___boxed(lea lean_object* l_Lean_Elab_Term_tracer___lambda__1___boxed(lean_object*, lean_object*, lean_object*); lean_object* lean_name_mk_numeral(lean_object*, lean_object*); lean_object* l_Lean_Elab_syntaxNodeKindOfAttrParam(lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_Init_Lean_Elab_Term_13__elabAppArgsAux___main(lean_object*, lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Term_getMCtx___rarg(lean_object*); +lean_object* l___private_Init_Lean_Elab_Term_13__elabAppArgsAux___main(lean_object*, lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_TermElabM_monadLog___closed__4; lean_object* l_HashMapImp_moveEntries___main___at_Lean_Elab_Term_addBuiltinTermElab___spec__14(lean_object*, lean_object*, lean_object*); lean_object* l_PersistentHashMap_mkCollisionNode___rarg(lean_object*, lean_object*, lean_object*, lean_object*); @@ -685,12 +714,14 @@ lean_object* l___private_Init_Lean_Elab_Term_13__elabAppArgsAux___main___closed_ lean_object* l_Lean_Elab_Term_liftMetaM___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_List_foldlM___main___at___private_Init_Lean_Elab_Term_12__mkConsts___spec__1___lambda__1___closed__3; lean_object* l_Lean_Elab_Term_addNamedArg___closed__4; +lean_object* l_Array_forMAux___main___at_Lean_Elab_Term_synthesizeInstMVars___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_mkTermElabAttribute___closed__1; extern lean_object* l_Lean_Parser_Term_type___elambda__1___rarg___closed__2; uint8_t l_Lean_Expr_isSort(lean_object*); lean_object* l_List_foldlM___main___at___private_Init_Lean_Elab_Term_12__mkConsts___spec__1___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Term_consumeDefaultParams___rarg___boxed(lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_NameGenerator_Inhabited___closed__3; -lean_object* l___private_Init_Lean_Elab_Term_13__elabAppArgsAux___main___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Init_Lean_Elab_Term_13__elabAppArgsAux___main___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); uint8_t lean_string_dec_eq(lean_object*, lean_object*); uint8_t lean_nat_dec_lt(lean_object*, lean_object*); extern lean_object* l___private_Init_Lean_Elab_Util_1__regTraceClasses___closed__2; @@ -4288,6 +4319,38 @@ lean_dec(x_1); return x_2; } } +lean_object* l_Lean_Elab_Term_getMCtx___rarg(lean_object* x_1) { +_start: +{ +lean_object* x_2; lean_object* x_3; lean_object* x_4; +x_2 = lean_ctor_get(x_1, 0); +lean_inc(x_2); +x_3 = lean_ctor_get(x_2, 1); +lean_inc(x_3); +lean_dec(x_2); +x_4 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_4, 0, x_3); +lean_ctor_set(x_4, 1, x_1); +return x_4; +} +} +lean_object* l_Lean_Elab_Term_getMCtx(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_Lean_Elab_Term_getMCtx___rarg), 1, 0); +return x_2; +} +} +lean_object* l_Lean_Elab_Term_getMCtx___boxed(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = l_Lean_Elab_Term_getMCtx(x_1); +lean_dec(x_1); +return x_2; +} +} lean_object* l_Lean_Elab_Term_getNamespace(lean_object* x_1, lean_object* x_2) { _start: { @@ -4550,6 +4613,216 @@ lean_dec(x_2); return x_4; } } +lean_object* l_Lean_Elab_Term_isExprMVarAssigned(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; uint8_t x_5; +x_4 = l_Lean_Elab_Term_getMCtx___rarg(x_3); +x_5 = !lean_is_exclusive(x_4); +if (x_5 == 0) +{ +lean_object* x_6; uint8_t x_7; lean_object* x_8; +x_6 = lean_ctor_get(x_4, 0); +x_7 = lean_metavar_ctx_is_expr_assigned(x_6, x_1); +x_8 = lean_box(x_7); +lean_ctor_set(x_4, 0, x_8); +return x_4; +} +else +{ +lean_object* x_9; lean_object* x_10; uint8_t x_11; lean_object* x_12; lean_object* x_13; +x_9 = lean_ctor_get(x_4, 0); +x_10 = lean_ctor_get(x_4, 1); +lean_inc(x_10); +lean_inc(x_9); +lean_dec(x_4); +x_11 = lean_metavar_ctx_is_expr_assigned(x_9, x_1); +x_12 = lean_box(x_11); +x_13 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_13, 0, x_12); +lean_ctor_set(x_13, 1, x_10); +return x_13; +} +} +} +lean_object* l_Lean_Elab_Term_isExprMVarAssigned___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; +x_4 = l_Lean_Elab_Term_isExprMVarAssigned(x_1, x_2, x_3); +lean_dec(x_2); +return x_4; +} +} +lean_object* l_Lean_Elab_Term_getMVarDecl(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; uint8_t x_5; +x_4 = l_Lean_Elab_Term_getMCtx___rarg(x_3); +x_5 = !lean_is_exclusive(x_4); +if (x_5 == 0) +{ +lean_object* x_6; lean_object* x_7; +x_6 = lean_ctor_get(x_4, 0); +x_7 = l_Lean_MetavarContext_getDecl(x_6, x_1); +lean_dec(x_6); +lean_ctor_set(x_4, 0, x_7); +return x_4; +} +else +{ +lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; +x_8 = lean_ctor_get(x_4, 0); +x_9 = lean_ctor_get(x_4, 1); +lean_inc(x_9); +lean_inc(x_8); +lean_dec(x_4); +x_10 = l_Lean_MetavarContext_getDecl(x_8, x_1); +lean_dec(x_8); +x_11 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_11, 0, x_10); +lean_ctor_set(x_11, 1, x_9); +return x_11; +} +} +} +lean_object* l_Lean_Elab_Term_getMVarDecl___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; +x_4 = l_Lean_Elab_Term_getMVarDecl(x_1, x_2, x_3); +lean_dec(x_2); +lean_dec(x_1); +return x_4; +} +} +lean_object* l_Lean_Elab_Term_assignExprMVar(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_4); +if (x_5 == 0) +{ +lean_object* x_6; uint8_t x_7; +x_6 = lean_ctor_get(x_4, 0); +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; +x_8 = lean_ctor_get(x_6, 1); +x_9 = lean_metavar_ctx_assign_expr(x_8, x_1, x_2); +lean_ctor_set(x_6, 1, x_9); +x_10 = lean_box(0); +x_11 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_11, 0, x_10); +lean_ctor_set(x_11, 1, x_4); +return x_11; +} +else +{ +lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; +x_12 = lean_ctor_get(x_6, 0); +x_13 = lean_ctor_get(x_6, 1); +x_14 = lean_ctor_get(x_6, 2); +x_15 = lean_ctor_get(x_6, 3); +x_16 = lean_ctor_get(x_6, 4); +x_17 = lean_ctor_get(x_6, 5); +lean_inc(x_17); +lean_inc(x_16); +lean_inc(x_15); +lean_inc(x_14); +lean_inc(x_13); +lean_inc(x_12); +lean_dec(x_6); +x_18 = lean_metavar_ctx_assign_expr(x_13, x_1, x_2); +x_19 = lean_alloc_ctor(0, 6, 0); +lean_ctor_set(x_19, 0, x_12); +lean_ctor_set(x_19, 1, x_18); +lean_ctor_set(x_19, 2, x_14); +lean_ctor_set(x_19, 3, x_15); +lean_ctor_set(x_19, 4, x_16); +lean_ctor_set(x_19, 5, x_17); +lean_ctor_set(x_4, 0, x_19); +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_4); +return x_21; +} +} +else +{ +lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_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_22 = lean_ctor_get(x_4, 0); +x_23 = lean_ctor_get(x_4, 1); +x_24 = lean_ctor_get(x_4, 2); +x_25 = lean_ctor_get(x_4, 3); +x_26 = lean_ctor_get(x_4, 4); +lean_inc(x_26); +lean_inc(x_25); +lean_inc(x_24); +lean_inc(x_23); +lean_inc(x_22); +lean_dec(x_4); +x_27 = lean_ctor_get(x_22, 0); +lean_inc(x_27); +x_28 = lean_ctor_get(x_22, 1); +lean_inc(x_28); +x_29 = lean_ctor_get(x_22, 2); +lean_inc(x_29); +x_30 = lean_ctor_get(x_22, 3); +lean_inc(x_30); +x_31 = lean_ctor_get(x_22, 4); +lean_inc(x_31); +x_32 = lean_ctor_get(x_22, 5); +lean_inc(x_32); +if (lean_is_exclusive(x_22)) { + lean_ctor_release(x_22, 0); + lean_ctor_release(x_22, 1); + lean_ctor_release(x_22, 2); + lean_ctor_release(x_22, 3); + lean_ctor_release(x_22, 4); + lean_ctor_release(x_22, 5); + x_33 = x_22; +} else { + lean_dec_ref(x_22); + x_33 = lean_box(0); +} +x_34 = lean_metavar_ctx_assign_expr(x_28, x_1, x_2); +if (lean_is_scalar(x_33)) { + x_35 = lean_alloc_ctor(0, 6, 0); +} else { + x_35 = x_33; +} +lean_ctor_set(x_35, 0, x_27); +lean_ctor_set(x_35, 1, x_34); +lean_ctor_set(x_35, 2, x_29); +lean_ctor_set(x_35, 3, x_30); +lean_ctor_set(x_35, 4, x_31); +lean_ctor_set(x_35, 5, x_32); +x_36 = lean_alloc_ctor(0, 5, 0); +lean_ctor_set(x_36, 0, x_35); +lean_ctor_set(x_36, 1, x_23); +lean_ctor_set(x_36, 2, x_24); +lean_ctor_set(x_36, 3, x_25); +lean_ctor_set(x_36, 4, x_26); +x_37 = lean_box(0); +x_38 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_38, 0, x_37); +lean_ctor_set(x_38, 1, x_36); +return x_38; +} +} +} +lean_object* l_Lean_Elab_Term_assignExprMVar___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; +x_5 = l_Lean_Elab_Term_assignExprMVar(x_1, x_2, x_3, x_4); +lean_dec(x_3); +return x_5; +} +} lean_object* l_Lean_Elab_Term_addContext(lean_object* x_1, lean_object* x_2, lean_object* x_3) { _start: { @@ -5740,160 +6013,6 @@ lean_dec(x_1); return x_2; } } -lean_object* l_Lean_Elab_Term_mkForall(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { -_start: -{ -lean_object* x_5; uint8_t x_6; -x_5 = lean_ctor_get(x_3, 0); -lean_inc(x_5); -lean_dec(x_3); -x_6 = !lean_is_exclusive(x_4); -if (x_6 == 0) -{ -lean_object* x_7; lean_object* x_8; -x_7 = lean_ctor_get(x_4, 0); -x_8 = l_Lean_Meta_mkForall(x_1, x_2, x_5, x_7); -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, 1); -lean_ctor_set(x_4, 0, x_10); -lean_ctor_set(x_8, 1, x_4); -return x_8; -} -else -{ -lean_object* x_11; lean_object* x_12; lean_object* x_13; -x_11 = lean_ctor_get(x_8, 0); -x_12 = lean_ctor_get(x_8, 1); -lean_inc(x_12); -lean_inc(x_11); -lean_dec(x_8); -lean_ctor_set(x_4, 0, x_12); -x_13 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_13, 0, x_11); -lean_ctor_set(x_13, 1, x_4); -return x_13; -} -} -else -{ -uint8_t x_14; -x_14 = !lean_is_exclusive(x_8); -if (x_14 == 0) -{ -lean_object* x_15; lean_object* x_16; lean_object* x_17; -x_15 = lean_ctor_get(x_8, 0); -x_16 = lean_ctor_get(x_8, 1); -x_17 = lean_alloc_ctor(3, 1, 0); -lean_ctor_set(x_17, 0, x_15); -lean_ctor_set(x_4, 0, x_16); -lean_ctor_set(x_8, 1, x_4); -lean_ctor_set(x_8, 0, x_17); -return x_8; -} -else -{ -lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; -x_18 = lean_ctor_get(x_8, 0); -x_19 = lean_ctor_get(x_8, 1); -lean_inc(x_19); -lean_inc(x_18); -lean_dec(x_8); -x_20 = lean_alloc_ctor(3, 1, 0); -lean_ctor_set(x_20, 0, x_18); -lean_ctor_set(x_4, 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_4); -return x_21; -} -} -} -else -{ -lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; -x_22 = lean_ctor_get(x_4, 0); -x_23 = lean_ctor_get(x_4, 1); -x_24 = lean_ctor_get(x_4, 2); -x_25 = lean_ctor_get(x_4, 3); -x_26 = lean_ctor_get(x_4, 4); -lean_inc(x_26); -lean_inc(x_25); -lean_inc(x_24); -lean_inc(x_23); -lean_inc(x_22); -lean_dec(x_4); -x_27 = l_Lean_Meta_mkForall(x_1, x_2, x_5, x_22); -if (lean_obj_tag(x_27) == 0) -{ -lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; -x_28 = lean_ctor_get(x_27, 0); -lean_inc(x_28); -x_29 = lean_ctor_get(x_27, 1); -lean_inc(x_29); -if (lean_is_exclusive(x_27)) { - lean_ctor_release(x_27, 0); - lean_ctor_release(x_27, 1); - x_30 = x_27; -} else { - lean_dec_ref(x_27); - x_30 = lean_box(0); -} -x_31 = lean_alloc_ctor(0, 5, 0); -lean_ctor_set(x_31, 0, x_29); -lean_ctor_set(x_31, 1, x_23); -lean_ctor_set(x_31, 2, x_24); -lean_ctor_set(x_31, 3, x_25); -lean_ctor_set(x_31, 4, x_26); -if (lean_is_scalar(x_30)) { - x_32 = lean_alloc_ctor(0, 2, 0); -} else { - x_32 = x_30; -} -lean_ctor_set(x_32, 0, x_28); -lean_ctor_set(x_32, 1, x_31); -return x_32; -} -else -{ -lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; -x_33 = lean_ctor_get(x_27, 0); -lean_inc(x_33); -x_34 = lean_ctor_get(x_27, 1); -lean_inc(x_34); -if (lean_is_exclusive(x_27)) { - lean_ctor_release(x_27, 0); - lean_ctor_release(x_27, 1); - x_35 = x_27; -} else { - lean_dec_ref(x_27); - x_35 = lean_box(0); -} -x_36 = lean_alloc_ctor(3, 1, 0); -lean_ctor_set(x_36, 0, x_33); -x_37 = lean_alloc_ctor(0, 5, 0); -lean_ctor_set(x_37, 0, x_34); -lean_ctor_set(x_37, 1, x_23); -lean_ctor_set(x_37, 2, x_24); -lean_ctor_set(x_37, 3, x_25); -lean_ctor_set(x_37, 4, x_26); -if (lean_is_scalar(x_35)) { - x_38 = lean_alloc_ctor(1, 2, 0); -} else { - x_38 = x_35; -} -lean_ctor_set(x_38, 0, x_36); -lean_ctor_set(x_38, 1, x_37); -return x_38; -} -} -} -} lean_object* l_Lean_Elab_Term_mkFreshExprMVar(lean_object* x_1, uint8_t x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { _start: { @@ -6084,6 +6203,383 @@ x_7 = l_Lean_Elab_Term_mkFreshExprMVar(x_1, x_6, x_3, x_4, x_5); return x_7; } } +lean_object* l_Lean_Elab_Term_mkForall(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; uint8_t x_6; +x_5 = lean_ctor_get(x_3, 0); +lean_inc(x_5); +lean_dec(x_3); +x_6 = !lean_is_exclusive(x_4); +if (x_6 == 0) +{ +lean_object* x_7; lean_object* x_8; +x_7 = lean_ctor_get(x_4, 0); +x_8 = l_Lean_Meta_mkForall(x_1, x_2, x_5, x_7); +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, 1); +lean_ctor_set(x_4, 0, x_10); +lean_ctor_set(x_8, 1, x_4); +return x_8; +} +else +{ +lean_object* x_11; lean_object* x_12; lean_object* x_13; +x_11 = lean_ctor_get(x_8, 0); +x_12 = lean_ctor_get(x_8, 1); +lean_inc(x_12); +lean_inc(x_11); +lean_dec(x_8); +lean_ctor_set(x_4, 0, x_12); +x_13 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_13, 0, x_11); +lean_ctor_set(x_13, 1, x_4); +return x_13; +} +} +else +{ +uint8_t x_14; +x_14 = !lean_is_exclusive(x_8); +if (x_14 == 0) +{ +lean_object* x_15; lean_object* x_16; lean_object* x_17; +x_15 = lean_ctor_get(x_8, 0); +x_16 = lean_ctor_get(x_8, 1); +x_17 = lean_alloc_ctor(3, 1, 0); +lean_ctor_set(x_17, 0, x_15); +lean_ctor_set(x_4, 0, x_16); +lean_ctor_set(x_8, 1, x_4); +lean_ctor_set(x_8, 0, x_17); +return x_8; +} +else +{ +lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; +x_18 = lean_ctor_get(x_8, 0); +x_19 = lean_ctor_get(x_8, 1); +lean_inc(x_19); +lean_inc(x_18); +lean_dec(x_8); +x_20 = lean_alloc_ctor(3, 1, 0); +lean_ctor_set(x_20, 0, x_18); +lean_ctor_set(x_4, 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_4); +return x_21; +} +} +} +else +{ +lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; +x_22 = lean_ctor_get(x_4, 0); +x_23 = lean_ctor_get(x_4, 1); +x_24 = lean_ctor_get(x_4, 2); +x_25 = lean_ctor_get(x_4, 3); +x_26 = lean_ctor_get(x_4, 4); +lean_inc(x_26); +lean_inc(x_25); +lean_inc(x_24); +lean_inc(x_23); +lean_inc(x_22); +lean_dec(x_4); +x_27 = l_Lean_Meta_mkForall(x_1, x_2, x_5, x_22); +if (lean_obj_tag(x_27) == 0) +{ +lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; +x_28 = lean_ctor_get(x_27, 0); +lean_inc(x_28); +x_29 = lean_ctor_get(x_27, 1); +lean_inc(x_29); +if (lean_is_exclusive(x_27)) { + lean_ctor_release(x_27, 0); + lean_ctor_release(x_27, 1); + x_30 = x_27; +} else { + lean_dec_ref(x_27); + x_30 = lean_box(0); +} +x_31 = lean_alloc_ctor(0, 5, 0); +lean_ctor_set(x_31, 0, x_29); +lean_ctor_set(x_31, 1, x_23); +lean_ctor_set(x_31, 2, x_24); +lean_ctor_set(x_31, 3, x_25); +lean_ctor_set(x_31, 4, x_26); +if (lean_is_scalar(x_30)) { + x_32 = lean_alloc_ctor(0, 2, 0); +} else { + x_32 = x_30; +} +lean_ctor_set(x_32, 0, x_28); +lean_ctor_set(x_32, 1, x_31); +return x_32; +} +else +{ +lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; +x_33 = lean_ctor_get(x_27, 0); +lean_inc(x_33); +x_34 = lean_ctor_get(x_27, 1); +lean_inc(x_34); +if (lean_is_exclusive(x_27)) { + lean_ctor_release(x_27, 0); + lean_ctor_release(x_27, 1); + x_35 = x_27; +} else { + lean_dec_ref(x_27); + x_35 = lean_box(0); +} +x_36 = lean_alloc_ctor(3, 1, 0); +lean_ctor_set(x_36, 0, x_33); +x_37 = lean_alloc_ctor(0, 5, 0); +lean_ctor_set(x_37, 0, x_34); +lean_ctor_set(x_37, 1, x_23); +lean_ctor_set(x_37, 2, x_24); +lean_ctor_set(x_37, 3, x_25); +lean_ctor_set(x_37, 4, x_26); +if (lean_is_scalar(x_35)) { + x_38 = lean_alloc_ctor(1, 2, 0); +} else { + x_38 = x_35; +} +lean_ctor_set(x_38, 0, x_36); +lean_ctor_set(x_38, 1, x_37); +return x_38; +} +} +} +} +lean_object* l_Lean_Elab_Term_trySynthInstance(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; uint8_t x_5; +x_4 = lean_ctor_get(x_2, 0); +lean_inc(x_4); +lean_dec(x_2); +x_5 = !lean_is_exclusive(x_3); +if (x_5 == 0) +{ +lean_object* x_6; lean_object* x_7; lean_object* x_8; +x_6 = lean_ctor_get(x_3, 0); +x_7 = lean_unsigned_to_nat(10000u); +x_8 = l_Lean_Meta_trySynthInstance(x_1, x_7, x_4, 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, 1); +lean_ctor_set(x_3, 0, x_10); +lean_ctor_set(x_8, 1, x_3); +return x_8; +} +else +{ +lean_object* x_11; lean_object* x_12; lean_object* x_13; +x_11 = lean_ctor_get(x_8, 0); +x_12 = lean_ctor_get(x_8, 1); +lean_inc(x_12); +lean_inc(x_11); +lean_dec(x_8); +lean_ctor_set(x_3, 0, x_12); +x_13 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_13, 0, x_11); +lean_ctor_set(x_13, 1, x_3); +return x_13; +} +} +else +{ +uint8_t x_14; +x_14 = !lean_is_exclusive(x_8); +if (x_14 == 0) +{ +lean_object* x_15; lean_object* x_16; lean_object* x_17; +x_15 = lean_ctor_get(x_8, 0); +x_16 = lean_ctor_get(x_8, 1); +x_17 = lean_alloc_ctor(3, 1, 0); +lean_ctor_set(x_17, 0, x_15); +lean_ctor_set(x_3, 0, x_16); +lean_ctor_set(x_8, 1, x_3); +lean_ctor_set(x_8, 0, x_17); +return x_8; +} +else +{ +lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; +x_18 = lean_ctor_get(x_8, 0); +x_19 = lean_ctor_get(x_8, 1); +lean_inc(x_19); +lean_inc(x_18); +lean_dec(x_8); +x_20 = lean_alloc_ctor(3, 1, 0); +lean_ctor_set(x_20, 0, x_18); +lean_ctor_set(x_3, 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_3); +return x_21; +} +} +} +else +{ +lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; +x_22 = lean_ctor_get(x_3, 0); +x_23 = lean_ctor_get(x_3, 1); +x_24 = lean_ctor_get(x_3, 2); +x_25 = lean_ctor_get(x_3, 3); +x_26 = lean_ctor_get(x_3, 4); +lean_inc(x_26); +lean_inc(x_25); +lean_inc(x_24); +lean_inc(x_23); +lean_inc(x_22); +lean_dec(x_3); +x_27 = lean_unsigned_to_nat(10000u); +x_28 = l_Lean_Meta_trySynthInstance(x_1, x_27, x_4, x_22); +if (lean_obj_tag(x_28) == 0) +{ +lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; +x_29 = lean_ctor_get(x_28, 0); +lean_inc(x_29); +x_30 = lean_ctor_get(x_28, 1); +lean_inc(x_30); +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_28); + x_31 = lean_box(0); +} +x_32 = lean_alloc_ctor(0, 5, 0); +lean_ctor_set(x_32, 0, x_30); +lean_ctor_set(x_32, 1, x_23); +lean_ctor_set(x_32, 2, x_24); +lean_ctor_set(x_32, 3, x_25); +lean_ctor_set(x_32, 4, x_26); +if (lean_is_scalar(x_31)) { + x_33 = lean_alloc_ctor(0, 2, 0); +} else { + x_33 = x_31; +} +lean_ctor_set(x_33, 0, x_29); +lean_ctor_set(x_33, 1, x_32); +return x_33; +} +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; +x_34 = lean_ctor_get(x_28, 0); +lean_inc(x_34); +x_35 = lean_ctor_get(x_28, 1); +lean_inc(x_35); +if (lean_is_exclusive(x_28)) { + lean_ctor_release(x_28, 0); + lean_ctor_release(x_28, 1); + x_36 = x_28; +} else { + lean_dec_ref(x_28); + x_36 = lean_box(0); +} +x_37 = lean_alloc_ctor(3, 1, 0); +lean_ctor_set(x_37, 0, x_34); +x_38 = lean_alloc_ctor(0, 5, 0); +lean_ctor_set(x_38, 0, x_35); +lean_ctor_set(x_38, 1, x_23); +lean_ctor_set(x_38, 2, x_24); +lean_ctor_set(x_38, 3, x_25); +lean_ctor_set(x_38, 4, x_26); +if (lean_is_scalar(x_36)) { + x_39 = lean_alloc_ctor(1, 2, 0); +} else { + x_39 = x_36; +} +lean_ctor_set(x_39, 0, x_37); +lean_ctor_set(x_39, 1, x_38); +return x_39; +} +} +} +} +lean_object* l_Lean_Elab_Term_registerSyntheticMVar(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { +_start: +{ +uint8_t x_6; +x_6 = !lean_is_exclusive(x_5); +if (x_6 == 0) +{ +lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; +x_7 = lean_ctor_get(x_5, 1); +x_8 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_8, 0, x_1); +lean_ctor_set(x_8, 1, x_2); +lean_ctor_set(x_8, 2, x_3); +x_9 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_9, 0, x_8); +lean_ctor_set(x_9, 1, x_7); +lean_ctor_set(x_5, 1, x_9); +x_10 = lean_box(0); +x_11 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_11, 0, x_10); +lean_ctor_set(x_11, 1, x_5); +return x_11; +} +else +{ +lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; +x_12 = lean_ctor_get(x_5, 0); +x_13 = lean_ctor_get(x_5, 1); +x_14 = lean_ctor_get(x_5, 2); +x_15 = lean_ctor_get(x_5, 3); +x_16 = lean_ctor_get(x_5, 4); +lean_inc(x_16); +lean_inc(x_15); +lean_inc(x_14); +lean_inc(x_13); +lean_inc(x_12); +lean_dec(x_5); +x_17 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_17, 0, x_1); +lean_ctor_set(x_17, 1, x_2); +lean_ctor_set(x_17, 2, x_3); +x_18 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_18, 0, x_17); +lean_ctor_set(x_18, 1, x_13); +x_19 = lean_alloc_ctor(0, 5, 0); +lean_ctor_set(x_19, 0, x_12); +lean_ctor_set(x_19, 1, x_18); +lean_ctor_set(x_19, 2, x_14); +lean_ctor_set(x_19, 3, x_15); +lean_ctor_set(x_19, 4, x_16); +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_19); +return x_21; +} +} +} +lean_object* l_Lean_Elab_Term_registerSyntheticMVar___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { +_start: +{ +lean_object* x_6; +x_6 = l_Lean_Elab_Term_registerSyntheticMVar(x_1, x_2, x_3, x_4, x_5); +lean_dec(x_4); +return x_6; +} +} lean_object* l_Lean_Elab_Term_withoutPostponing___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3) { _start: { @@ -18359,72 +18855,101 @@ x_5 = l_Lean_Elab_Term_addBuiltinTermElab(x_2, x_3, x_4, x_1); return x_5; } } -lean_object* l_Lean_Syntax_foldArgsAuxM___main___at_Lean_Elab_Term_elabListLit___spec__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { +lean_object* l_Lean_Elab_Term_mkTermId(lean_object* x_1, lean_object* x_2) { _start: { -lean_object* x_6; uint8_t x_7; -x_6 = lean_array_get_size(x_3); -x_7 = lean_nat_dec_lt(x_4, x_6); -lean_dec(x_6); -if (x_7 == 0) +lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; +x_3 = l_Lean_mkIdentFrom(x_1, x_2); +x_4 = l_Array_iterateMAux___main___at_Lean_mkAppStx___spec__1___closed__1; +x_5 = lean_array_push(x_4, x_3); +x_6 = l_Lean_Syntax_asNode___closed__1; +x_7 = lean_array_push(x_5, x_6); +x_8 = l_Lean_Parser_Term_id___elambda__1___closed__2; +x_9 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_9, 0, x_8); +lean_ctor_set(x_9, 1, x_7); +return x_9; +} +} +lean_object* l_Lean_Elab_Term_mkTermId___boxed(lean_object* x_1, lean_object* x_2) { +_start: { -lean_dec(x_4); +lean_object* x_3; +x_3 = l_Lean_Elab_Term_mkTermId(x_1, x_2); lean_dec(x_1); -return x_5; +return x_3; +} +} +lean_object* l___private_Init_Data_Array_Basic_3__iterateRevMAux___main___at_Lean_Elab_Term_elabListLit___spec__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { +_start: +{ +lean_object* x_7; uint8_t x_8; +x_7 = lean_unsigned_to_nat(0u); +x_8 = lean_nat_dec_eq(x_4, x_7); +if (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; +x_9 = lean_unsigned_to_nat(1u); +x_10 = lean_nat_sub(x_4, x_9); +lean_dec(x_4); +x_11 = lean_array_fget(x_3, x_10); +x_12 = l_Array_iterateMAux___main___at_Lean_mkAppStx___spec__1___closed__1; +x_13 = lean_array_push(x_12, x_11); +x_14 = lean_array_push(x_13, x_6); +lean_inc(x_2); +x_15 = l_Array_iterateMAux___main___at_Lean_mkAppStx___spec__1(x_14, x_14, x_7, x_2); +lean_dec(x_14); +x_4 = x_10; +x_5 = lean_box(0); +x_6 = x_15; +goto _start; } else { -lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; -x_8 = lean_array_fget(x_3, x_4); -x_9 = l_Array_iterateMAux___main___at_Lean_mkAppStx___spec__1___closed__1; -x_10 = lean_array_push(x_9, x_8); -x_11 = lean_array_push(x_10, x_5); -x_12 = lean_unsigned_to_nat(0u); -lean_inc(x_1); -x_13 = l_Array_iterateMAux___main___at_Lean_mkAppStx___spec__1(x_11, x_11, x_12, x_1); -lean_dec(x_11); -x_14 = lean_nat_add(x_4, x_2); lean_dec(x_4); -x_4 = x_14; -x_5 = x_13; -goto _start; +lean_dec(x_2); +return x_6; } } } lean_object* l_Lean_Elab_Term_elabListLit(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { -lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_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_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; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; x_5 = lean_ctor_get(x_1, 1); x_6 = l_Lean_stxInh; x_7 = lean_unsigned_to_nat(0u); x_8 = lean_array_get(x_6, x_5, x_7); x_9 = l___private_Init_Lean_Elab_Quotation_5__quoteList___main___closed__6; -x_10 = l_Lean_mkIdentFrom(x_8, x_9); +x_10 = l_Lean_Elab_Term_mkTermId(x_8, x_9); lean_dec(x_8); x_11 = lean_unsigned_to_nat(1u); x_12 = lean_array_get(x_6, x_5, x_11); x_13 = l_Lean_Syntax_getArgs(x_12); lean_dec(x_12); x_14 = lean_unsigned_to_nat(2u); -x_15 = lean_array_get(x_6, x_5, x_14); -x_16 = l___private_Init_Lean_Elab_Quotation_5__quoteList___main___closed__4; -x_17 = l_Lean_mkIdentFrom(x_15, x_16); -lean_dec(x_15); -x_18 = l_Lean_Syntax_foldArgsAuxM___main___at_Lean_Elab_Term_elabListLit___spec__1(x_10, x_14, x_13, x_7, x_17); +x_15 = l_Array_empty___closed__1; +x_16 = l_Lean_Syntax_foldArgsAuxM___main___at_Lean_Syntax_foldSepRevArgsM___spec__1(x_14, x_13, x_7, x_15); lean_dec(x_13); -x_19 = l_Lean_Elab_Term_elabTerm(x_18, x_2, x_3, x_4); -return x_19; +x_17 = lean_array_get_size(x_16); +x_18 = lean_array_get(x_6, x_5, x_14); +x_19 = l___private_Init_Lean_Elab_Quotation_5__quoteList___main___closed__4; +x_20 = l_Lean_Elab_Term_mkTermId(x_18, x_19); +lean_dec(x_18); +x_21 = l___private_Init_Data_Array_Basic_3__iterateRevMAux___main___at_Lean_Elab_Term_elabListLit___spec__1(x_5, x_10, x_16, x_17, lean_box(0), x_20); +lean_dec(x_16); +x_22 = l_Lean_Elab_Term_elabTerm(x_21, x_2, x_3, x_4); +return x_22; } } -lean_object* l_Lean_Syntax_foldArgsAuxM___main___at_Lean_Elab_Term_elabListLit___spec__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { +lean_object* l___private_Init_Data_Array_Basic_3__iterateRevMAux___main___at_Lean_Elab_Term_elabListLit___spec__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { _start: { -lean_object* x_6; -x_6 = l_Lean_Syntax_foldArgsAuxM___main___at_Lean_Elab_Term_elabListLit___spec__1(x_1, x_2, x_3, x_4, x_5); +lean_object* x_7; +x_7 = l___private_Init_Data_Array_Basic_3__iterateRevMAux___main___at_Lean_Elab_Term_elabListLit___spec__1(x_1, x_2, x_3, x_4, x_5, x_6); lean_dec(x_3); -lean_dec(x_2); -return x_6; +lean_dec(x_1); +return x_7; } } lean_object* l_Lean_Elab_Term_elabListLit___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { @@ -19898,100 +20423,118 @@ x_11 = lean_unbox(x_10); lean_dec(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_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_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; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; x_12 = lean_ctor_get(x_9, 1); lean_inc(x_12); lean_dec(x_9); -x_13 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_13, 0, x_4); -x_14 = l_Lean_indentExpr(x_13); -x_15 = l_Lean_Elab_Term_ensureHasType___closed__3; -x_16 = lean_alloc_ctor(8, 2, 0); -lean_ctor_set(x_16, 0, x_15); -lean_ctor_set(x_16, 1, x_14); -x_17 = l_Lean_MessageData_ofList___closed__3; -x_18 = lean_alloc_ctor(8, 2, 0); -lean_ctor_set(x_18, 0, x_16); -lean_ctor_set(x_18, 1, x_17); -x_19 = l_Lean_Meta_Exception_mkAppTypeMismatchMessage___closed__8; -x_20 = lean_alloc_ctor(8, 2, 0); -lean_ctor_set(x_20, 0, x_18); -lean_ctor_set(x_20, 1, x_19); -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 = lean_alloc_ctor(8, 2, 0); -lean_ctor_set(x_23, 0, x_20); -lean_ctor_set(x_23, 1, x_22); -x_24 = lean_alloc_ctor(8, 2, 0); -lean_ctor_set(x_24, 0, x_23); -lean_ctor_set(x_24, 1, x_17); -x_25 = l_Lean_KernelException_toMessageData___closed__12; -x_26 = lean_alloc_ctor(8, 2, 0); -lean_ctor_set(x_26, 0, x_24); -lean_ctor_set(x_26, 1, x_25); -x_27 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_27, 0, x_8); -x_28 = l_Lean_indentExpr(x_27); +x_13 = l_Lean_Elab_Term_instantiateMVars(x_4, x_5, x_12); +x_14 = lean_ctor_get(x_13, 0); +lean_inc(x_14); +x_15 = lean_ctor_get(x_13, 1); +lean_inc(x_15); +lean_dec(x_13); +x_16 = l_Lean_Elab_Term_instantiateMVars(x_3, x_5, x_15); +x_17 = lean_ctor_get(x_16, 0); +lean_inc(x_17); +x_18 = lean_ctor_get(x_16, 1); +lean_inc(x_18); +lean_dec(x_16); +x_19 = l_Lean_Elab_Term_instantiateMVars(x_8, x_5, x_18); +x_20 = lean_ctor_get(x_19, 0); +lean_inc(x_20); +x_21 = lean_ctor_get(x_19, 1); +lean_inc(x_21); +lean_dec(x_19); +x_22 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_22, 0, x_14); +x_23 = l_Lean_indentExpr(x_22); +x_24 = l_Lean_Elab_Term_ensureHasType___closed__3; +x_25 = lean_alloc_ctor(8, 2, 0); +lean_ctor_set(x_25, 0, x_24); +lean_ctor_set(x_25, 1, x_23); +x_26 = l_Lean_MessageData_ofList___closed__3; +x_27 = lean_alloc_ctor(8, 2, 0); +lean_ctor_set(x_27, 0, x_25); +lean_ctor_set(x_27, 1, x_26); +x_28 = l_Lean_Meta_Exception_mkAppTypeMismatchMessage___closed__8; x_29 = lean_alloc_ctor(8, 2, 0); -lean_ctor_set(x_29, 0, x_26); +lean_ctor_set(x_29, 0, x_27); lean_ctor_set(x_29, 1, x_28); -x_30 = l_Lean_Elab_logErrorAndThrow___at_Lean_Elab_Term_ensureType___spec__1(x_1, x_29, x_5, x_12); +x_30 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_30, 0, x_17); +x_31 = l_Lean_indentExpr(x_30); +x_32 = lean_alloc_ctor(8, 2, 0); +lean_ctor_set(x_32, 0, x_29); +lean_ctor_set(x_32, 1, x_31); +x_33 = lean_alloc_ctor(8, 2, 0); +lean_ctor_set(x_33, 0, x_32); +lean_ctor_set(x_33, 1, x_26); +x_34 = l_Lean_KernelException_toMessageData___closed__12; +x_35 = lean_alloc_ctor(8, 2, 0); +lean_ctor_set(x_35, 0, x_33); +lean_ctor_set(x_35, 1, x_34); +x_36 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_36, 0, x_20); +x_37 = l_Lean_indentExpr(x_36); +x_38 = lean_alloc_ctor(8, 2, 0); +lean_ctor_set(x_38, 0, x_35); +lean_ctor_set(x_38, 1, x_37); +x_39 = l_Lean_Elab_logErrorAndThrow___at_Lean_Elab_Term_ensureType___spec__1(x_1, x_38, x_5, x_21); lean_dec(x_5); -return x_30; +return x_39; } else { -uint8_t x_31; +uint8_t x_40; lean_dec(x_8); lean_dec(x_5); lean_dec(x_3); -x_31 = !lean_is_exclusive(x_9); -if (x_31 == 0) +x_40 = !lean_is_exclusive(x_9); +if (x_40 == 0) { -lean_object* x_32; -x_32 = lean_ctor_get(x_9, 0); -lean_dec(x_32); +lean_object* x_41; +x_41 = lean_ctor_get(x_9, 0); +lean_dec(x_41); lean_ctor_set(x_9, 0, x_4); return x_9; } else { -lean_object* x_33; lean_object* x_34; -x_33 = lean_ctor_get(x_9, 1); -lean_inc(x_33); +lean_object* x_42; lean_object* x_43; +x_42 = lean_ctor_get(x_9, 1); +lean_inc(x_42); lean_dec(x_9); -x_34 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_34, 0, x_4); -lean_ctor_set(x_34, 1, x_33); -return x_34; +x_43 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_43, 0, x_4); +lean_ctor_set(x_43, 1, x_42); +return x_43; } } } else { -uint8_t x_35; +uint8_t x_44; lean_dec(x_8); lean_dec(x_5); lean_dec(x_4); lean_dec(x_3); -x_35 = !lean_is_exclusive(x_9); -if (x_35 == 0) +x_44 = !lean_is_exclusive(x_9); +if (x_44 == 0) { return x_9; } else { -lean_object* x_36; lean_object* x_37; lean_object* x_38; -x_36 = lean_ctor_get(x_9, 0); -x_37 = lean_ctor_get(x_9, 1); -lean_inc(x_37); -lean_inc(x_36); +lean_object* x_45; lean_object* x_46; lean_object* x_47; +x_45 = lean_ctor_get(x_9, 0); +x_46 = lean_ctor_get(x_9, 1); +lean_inc(x_46); +lean_inc(x_45); lean_dec(x_9); -x_38 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_38, 0, x_36); -lean_ctor_set(x_38, 1, x_37); -return x_38; +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; } } } @@ -20006,21 +20549,330 @@ lean_dec(x_1); return x_7; } } -lean_object* l_Lean_Elab_Term_consumeDefaultParams(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { +lean_object* l_Lean_Elab_Term_consumeDefaultParams___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3) { _start: { -lean_object* x_7; -x_7 = l_Lean_Elab_Term_ensureHasType(x_1, x_2, x_3, x_4, x_5, x_6); -return x_7; +lean_object* x_4; +x_4 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_4, 0, x_1); +lean_ctor_set(x_4, 1, x_3); +return x_4; } } -lean_object* l_Lean_Elab_Term_consumeDefaultParams___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { +lean_object* l_Lean_Elab_Term_consumeDefaultParams(lean_object* x_1, lean_object* x_2) { _start: { -lean_object* x_7; -x_7 = l_Lean_Elab_Term_consumeDefaultParams(x_1, x_2, x_3, x_4, x_5, x_6); +lean_object* x_3; +x_3 = lean_alloc_closure((void*)(l_Lean_Elab_Term_consumeDefaultParams___rarg___boxed), 3, 0); +return x_3; +} +} +lean_object* l_Lean_Elab_Term_consumeDefaultParams___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; +x_4 = l_Lean_Elab_Term_consumeDefaultParams___rarg(x_1, x_2, x_3); +lean_dec(x_2); +return x_4; +} +} +lean_object* l_Lean_Elab_Term_consumeDefaultParams___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = l_Lean_Elab_Term_consumeDefaultParams(x_1, x_2); +lean_dec(x_2); lean_dec(x_1); -return x_7; +return x_3; +} +} +lean_object* _init_l_Lean_Elab_Term_synthesizeInstMVar___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("failed to synthesize instance"); +return x_1; +} +} +lean_object* _init_l_Lean_Elab_Term_synthesizeInstMVar___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Elab_Term_synthesizeInstMVar___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_synthesizeInstMVar___closed__3() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Elab_Term_synthesizeInstMVar___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_Elab_Term_synthesizeInstMVar(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; lean_object* x_6; uint8_t x_7; +lean_inc(x_2); +x_5 = l_Lean_Elab_Term_isExprMVarAssigned(x_2, x_3, x_4); +x_6 = lean_ctor_get(x_5, 0); +lean_inc(x_6); +x_7 = lean_unbox(x_6); +lean_dec(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; lean_object* x_14; lean_object* x_15; lean_object* x_16; +x_8 = lean_ctor_get(x_5, 1); +lean_inc(x_8); +lean_dec(x_5); +x_9 = l_Lean_Elab_Term_getMVarDecl(x_2, x_3, x_8); +x_10 = lean_ctor_get(x_9, 0); +lean_inc(x_10); +x_11 = lean_ctor_get(x_9, 1); +lean_inc(x_11); +lean_dec(x_9); +x_12 = lean_ctor_get(x_10, 2); +lean_inc(x_12); +lean_dec(x_10); +x_13 = l_Lean_Elab_Term_instantiateMVars(x_12, x_3, x_11); +x_14 = lean_ctor_get(x_13, 0); +lean_inc(x_14); +x_15 = lean_ctor_get(x_13, 1); +lean_inc(x_15); +lean_dec(x_13); +lean_inc(x_3); +lean_inc(x_14); +x_16 = l_Lean_Elab_Term_trySynthInstance(x_14, x_3, x_15); +if (lean_obj_tag(x_16) == 0) +{ +lean_object* x_17; +x_17 = lean_ctor_get(x_16, 0); +lean_inc(x_17); +switch (lean_obj_tag(x_17)) { +case 0: +{ +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_2); +x_18 = lean_ctor_get(x_16, 1); +lean_inc(x_18); +lean_dec(x_16); +x_19 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_19, 0, x_14); +x_20 = l_Lean_indentExpr(x_19); +x_21 = l_Lean_Elab_Term_synthesizeInstMVar___closed__3; +x_22 = lean_alloc_ctor(8, 2, 0); +lean_ctor_set(x_22, 0, x_21); +lean_ctor_set(x_22, 1, x_20); +x_23 = l_Lean_Elab_logErrorAndThrow___at_Lean_Elab_Term_addNamedArg___spec__2(x_1, x_22, x_3, x_18); +lean_dec(x_3); +return x_23; +} +case 1: +{ +lean_object* x_24; lean_object* x_25; lean_object* x_26; +lean_dec(x_14); +x_24 = lean_ctor_get(x_16, 1); +lean_inc(x_24); +lean_dec(x_16); +x_25 = lean_ctor_get(x_17, 0); +lean_inc(x_25); +lean_dec(x_17); +x_26 = l_Lean_Elab_Term_assignExprMVar(x_2, x_25, x_3, x_24); +lean_dec(x_3); +return x_26; +} +default: +{ +uint8_t x_27; +lean_dec(x_14); +lean_dec(x_3); +lean_dec(x_2); +x_27 = !lean_is_exclusive(x_16); +if (x_27 == 0) +{ +lean_object* x_28; lean_object* x_29; +x_28 = lean_ctor_get(x_16, 0); +lean_dec(x_28); +x_29 = lean_box(0); +lean_ctor_set(x_16, 0, x_29); +return x_16; +} +else +{ +lean_object* x_30; lean_object* x_31; lean_object* x_32; +x_30 = lean_ctor_get(x_16, 1); +lean_inc(x_30); +lean_dec(x_16); +x_31 = lean_box(0); +x_32 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_32, 0, x_31); +lean_ctor_set(x_32, 1, x_30); +return x_32; +} +} +} +} +else +{ +uint8_t x_33; +lean_dec(x_14); +lean_dec(x_3); +lean_dec(x_2); +x_33 = !lean_is_exclusive(x_16); +if (x_33 == 0) +{ +return x_16; +} +else +{ +lean_object* x_34; lean_object* x_35; lean_object* x_36; +x_34 = lean_ctor_get(x_16, 0); +x_35 = lean_ctor_get(x_16, 1); +lean_inc(x_35); +lean_inc(x_34); +lean_dec(x_16); +x_36 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_36, 0, x_34); +lean_ctor_set(x_36, 1, x_35); +return x_36; +} +} +} +else +{ +uint8_t x_37; +lean_dec(x_3); +lean_dec(x_2); +x_37 = !lean_is_exclusive(x_5); +if (x_37 == 0) +{ +lean_object* x_38; lean_object* x_39; +x_38 = lean_ctor_get(x_5, 0); +lean_dec(x_38); +x_39 = lean_box(0); +lean_ctor_set(x_5, 0, x_39); +return x_5; +} +else +{ +lean_object* x_40; lean_object* x_41; lean_object* x_42; +x_40 = lean_ctor_get(x_5, 1); +lean_inc(x_40); +lean_dec(x_5); +x_41 = lean_box(0); +x_42 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_42, 0, x_41); +lean_ctor_set(x_42, 1, x_40); +return x_42; +} +} +} +} +lean_object* l_Lean_Elab_Term_synthesizeInstMVar___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; +x_5 = l_Lean_Elab_Term_synthesizeInstMVar(x_1, x_2, x_3, x_4); +lean_dec(x_1); +return x_5; +} +} +lean_object* l_Array_forMAux___main___at_Lean_Elab_Term_synthesizeInstMVars___spec__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { +_start: +{ +lean_object* x_6; uint8_t x_7; +x_6 = lean_array_get_size(x_2); +x_7 = lean_nat_dec_lt(x_3, x_6); +lean_dec(x_6); +if (x_7 == 0) +{ +lean_object* x_8; lean_object* x_9; +lean_dec(x_4); +lean_dec(x_3); +x_8 = lean_box(0); +x_9 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_9, 0, x_8); +lean_ctor_set(x_9, 1, x_5); +return x_9; +} +else +{ +lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; +x_10 = lean_array_fget(x_2, x_3); +x_11 = lean_unsigned_to_nat(1u); +x_12 = lean_nat_add(x_3, x_11); +lean_dec(x_3); +lean_inc(x_4); +x_13 = l_Lean_Elab_Term_synthesizeInstMVar(x_1, x_10, x_4, x_5); +if (lean_obj_tag(x_13) == 0) +{ +lean_object* x_14; +x_14 = lean_ctor_get(x_13, 1); +lean_inc(x_14); +lean_dec(x_13); +x_3 = x_12; +x_5 = x_14; +goto _start; +} +else +{ +uint8_t x_16; +lean_dec(x_12); +lean_dec(x_4); +x_16 = !lean_is_exclusive(x_13); +if (x_16 == 0) +{ +return x_13; +} +else +{ +lean_object* x_17; lean_object* x_18; lean_object* x_19; +x_17 = lean_ctor_get(x_13, 0); +x_18 = lean_ctor_get(x_13, 1); +lean_inc(x_18); +lean_inc(x_17); +lean_dec(x_13); +x_19 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_19, 0, x_17); +lean_ctor_set(x_19, 1, x_18); +return x_19; +} +} +} +} +} +lean_object* l_Lean_Elab_Term_synthesizeInstMVars(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; lean_object* x_6; +x_5 = lean_unsigned_to_nat(0u); +x_6 = l_Array_forMAux___main___at_Lean_Elab_Term_synthesizeInstMVars___spec__1(x_1, x_2, x_5, x_3, x_4); +return x_6; +} +} +lean_object* l_Array_forMAux___main___at_Lean_Elab_Term_synthesizeInstMVars___spec__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { +_start: +{ +lean_object* x_6; +x_6 = l_Array_forMAux___main___at_Lean_Elab_Term_synthesizeInstMVars___spec__1(x_1, x_2, x_3, x_4, x_5); +lean_dec(x_2); +lean_dec(x_1); +return x_6; +} +} +lean_object* l_Lean_Elab_Term_synthesizeInstMVars___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; +x_5 = l_Lean_Elab_Term_synthesizeInstMVars(x_1, x_2, x_3, x_4); +lean_dec(x_2); +lean_dec(x_1); +return x_5; } } lean_object* l_Array_findIdxAux___main___at___private_Init_Lean_Elab_Term_13__elabAppArgsAux___main___spec__1(lean_object* x_1, lean_object* x_2, lean_object* x_3) { @@ -20185,619 +21037,507 @@ lean_ctor_set(x_2, 0, x_1); return x_2; } } -lean_object* l___private_Init_Lean_Elab_Term_13__elabAppArgsAux___main(lean_object* x_1, lean_object* x_2, lean_object* x_3, uint8_t x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10) { +lean_object* l___private_Init_Lean_Elab_Term_13__elabAppArgsAux___main(lean_object* x_1, lean_object* x_2, lean_object* x_3, uint8_t x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11) { _start: { -lean_object* x_11; uint8_t x_230; -x_230 = l_Array_isEmpty___rarg(x_6); -if (x_230 == 0) -{ -lean_object* x_231; -x_231 = lean_box(0); -x_11 = x_231; -goto block_229; -} -else -{ -lean_object* x_232; uint8_t x_233; -x_232 = lean_array_get_size(x_2); -x_233 = lean_nat_dec_eq(x_5, x_232); -lean_dec(x_232); -if (x_233 == 0) -{ -lean_object* x_234; -x_234 = lean_box(0); -x_11 = x_234; -goto block_229; -} -else -{ -lean_object* x_235; -lean_dec(x_6); -lean_dec(x_5); -x_235 = l_Lean_Elab_Term_ensureHasType(x_1, x_3, x_7, x_8, x_9, x_10); -return x_235; -} -} -block_229: -{ lean_object* x_12; -lean_dec(x_11); -lean_inc(x_9); -x_12 = l_Lean_Elab_Term_whnfForall(x_7, x_9, x_10); +lean_inc(x_10); +lean_inc(x_8); +x_12 = l_Lean_Elab_Term_whnfForall(x_8, x_10, x_11); if (lean_obj_tag(x_12) == 0) { -lean_object* x_13; +lean_object* x_13; lean_object* x_14; lean_object* x_15; x_13 = lean_ctor_get(x_12, 0); lean_inc(x_13); +x_14 = lean_ctor_get(x_12, 1); +lean_inc(x_14); +lean_dec(x_12); if (lean_obj_tag(x_13) == 7) { -uint8_t x_14; -x_14 = !lean_is_exclusive(x_12); -if (x_14 == 0) -{ -lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; uint64_t x_20; lean_object* x_21; lean_object* x_22; -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 = lean_ctor_get(x_13, 1); -lean_inc(x_18); -x_19 = lean_ctor_get(x_13, 2); -lean_inc(x_19); -x_20 = lean_ctor_get_uint64(x_13, sizeof(void*)*3); +lean_object* x_41; lean_object* x_42; lean_object* x_43; uint64_t x_44; lean_object* x_45; lean_object* x_46; +x_41 = lean_ctor_get(x_13, 0); +lean_inc(x_41); +x_42 = lean_ctor_get(x_13, 1); +lean_inc(x_42); +x_43 = lean_ctor_get(x_13, 2); +lean_inc(x_43); +x_44 = lean_ctor_get_uint64(x_13, sizeof(void*)*3); lean_dec(x_13); -x_21 = lean_unsigned_to_nat(0u); -x_22 = l_Array_findIdxAux___main___at___private_Init_Lean_Elab_Term_13__elabAppArgsAux___main___spec__1(x_17, x_6, x_21); -if (lean_obj_tag(x_22) == 0) +x_45 = lean_unsigned_to_nat(0u); +x_46 = l_Array_findIdxAux___main___at___private_Init_Lean_Elab_Term_13__elabAppArgsAux___main___spec__1(x_41, x_6, x_45); +if (lean_obj_tag(x_46) == 0) { if (x_4 == 0) { -uint8_t x_23; lean_object* x_24; -x_23 = (uint8_t)((x_20 << 24) >> 61); -x_24 = lean_box(x_23); -switch (lean_obj_tag(x_24)) { +uint8_t x_47; lean_object* x_48; +x_47 = (uint8_t)((x_44 << 24) >> 61); +x_48 = lean_box(x_47); +switch (lean_obj_tag(x_48)) { case 1: { -lean_object* x_25; uint8_t x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; -lean_dec(x_17); -lean_free_object(x_12); -x_25 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_25, 0, x_18); -x_26 = 0; -x_27 = lean_box(0); -lean_inc(x_9); -x_28 = l_Lean_Elab_Term_mkFreshExprMVar(x_25, x_26, x_27, x_9, x_15); -x_29 = lean_ctor_get(x_28, 0); -lean_inc(x_29); -x_30 = lean_ctor_get(x_28, 1); -lean_inc(x_30); -lean_dec(x_28); -x_31 = lean_expr_instantiate1(x_19, x_29); -lean_dec(x_19); -x_32 = l_Lean_mkApp(x_8, x_29); -x_7 = x_31; -x_8 = x_32; -x_10 = x_30; -goto _start; -} -case 3: -{ -lean_dec(x_19); -lean_dec(x_18); -lean_dec(x_17); -lean_dec(x_9); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_3); -lean_ctor_set(x_12, 0, x_8); -return x_12; -} -default: -{ -lean_object* x_34; uint8_t x_35; -lean_dec(x_24); -lean_free_object(x_12); -x_34 = lean_array_get_size(x_2); -x_35 = lean_nat_dec_lt(x_5, x_34); -lean_dec(x_34); -if (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; 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_dec(x_19); -lean_dec(x_18); -lean_dec(x_8); -lean_dec(x_5); -lean_dec(x_3); -x_36 = lean_alloc_ctor(4, 1, 0); -lean_ctor_set(x_36, 0, x_17); -x_37 = l___private_Init_Lean_Elab_Term_13__elabAppArgsAux___main___closed__6; -x_38 = lean_alloc_ctor(8, 2, 0); -lean_ctor_set(x_38, 0, x_37); -lean_ctor_set(x_38, 1, x_36); -x_39 = l___private_Init_Lean_Elab_Term_13__elabAppArgsAux___main___closed__9; -x_40 = lean_alloc_ctor(8, 2, 0); -lean_ctor_set(x_40, 0, x_38); -lean_ctor_set(x_40, 1, x_39); -x_41 = l_Array_umapMAux___main___at___private_Init_Lean_Elab_Term_13__elabAppArgsAux___main___spec__2(x_21, x_6); -x_42 = l_Array_toList___rarg(x_41); +lean_object* x_49; uint8_t 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_41); -x_43 = l_List_toString___at_Lean_Elab_OpenDecl_HasToString___spec__2(x_42); -x_44 = l_Array_HasRepr___rarg___closed__1; -x_45 = lean_string_append(x_44, x_43); -lean_dec(x_43); -x_46 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_46, 0, x_45); -x_47 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_47, 0, x_46); -x_48 = lean_alloc_ctor(8, 2, 0); -lean_ctor_set(x_48, 0, x_40); -lean_ctor_set(x_48, 1, x_47); -x_49 = l_Lean_Elab_logErrorAndThrow___at_Lean_Elab_Term_ensureType___spec__1(x_1, x_48, x_9, x_15); -lean_dec(x_9); -return x_49; -} -else -{ -lean_object* x_50; lean_object* x_51; lean_object* x_52; -lean_dec(x_17); -x_50 = lean_array_fget(x_2, x_5); -x_51 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_51, 0, x_18); -lean_inc(x_9); -x_52 = l_Lean_Elab_Term_elabTerm(x_50, x_51, x_9, x_15); -if (lean_obj_tag(x_52) == 0) -{ -lean_object* x_53; lean_object* x_54; lean_object* x_55; lean_object* x_56; lean_object* x_57; lean_object* x_58; +lean_dec(x_8); +x_49 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_49, 0, x_42); +x_50 = 0; +x_51 = lean_box(0); +lean_inc(x_10); +x_52 = l_Lean_Elab_Term_mkFreshExprMVar(x_49, x_50, x_51, x_10, x_14); x_53 = lean_ctor_get(x_52, 0); lean_inc(x_53); x_54 = lean_ctor_get(x_52, 1); lean_inc(x_54); lean_dec(x_52); -x_55 = lean_unsigned_to_nat(1u); -x_56 = lean_nat_add(x_5, x_55); -lean_dec(x_5); -x_57 = lean_expr_instantiate1(x_19, x_53); -lean_dec(x_19); -x_58 = l_Lean_mkApp(x_8, x_53); -x_5 = x_56; -x_7 = x_57; -x_8 = x_58; -x_10 = x_54; -goto _start; -} -else -{ -uint8_t x_60; -lean_dec(x_19); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_3); -x_60 = !lean_is_exclusive(x_52); -if (x_60 == 0) -{ -return x_52; -} -else -{ -lean_object* x_61; lean_object* x_62; lean_object* x_63; -x_61 = lean_ctor_get(x_52, 0); -x_62 = lean_ctor_get(x_52, 1); -lean_inc(x_62); -lean_inc(x_61); -lean_dec(x_52); -x_63 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_63, 0, x_61); -lean_ctor_set(x_63, 1, x_62); -return x_63; -} -} -} -} -} -} -else -{ -lean_object* x_64; uint8_t x_65; -lean_free_object(x_12); -x_64 = lean_array_get_size(x_2); -x_65 = lean_nat_dec_lt(x_5, x_64); -lean_dec(x_64); -if (x_65 == 0) -{ -lean_object* x_66; lean_object* x_67; lean_object* x_68; lean_object* x_69; lean_object* x_70; lean_object* x_71; lean_object* x_72; lean_object* x_73; lean_object* x_74; lean_object* x_75; lean_object* x_76; lean_object* x_77; lean_object* x_78; lean_object* x_79; -lean_dec(x_19); -lean_dec(x_18); -lean_dec(x_8); -lean_dec(x_5); -lean_dec(x_3); -x_66 = lean_alloc_ctor(4, 1, 0); -lean_ctor_set(x_66, 0, x_17); -x_67 = l___private_Init_Lean_Elab_Term_13__elabAppArgsAux___main___closed__6; -x_68 = lean_alloc_ctor(8, 2, 0); -lean_ctor_set(x_68, 0, x_67); -lean_ctor_set(x_68, 1, x_66); -x_69 = l___private_Init_Lean_Elab_Term_13__elabAppArgsAux___main___closed__9; -x_70 = lean_alloc_ctor(8, 2, 0); -lean_ctor_set(x_70, 0, x_68); -lean_ctor_set(x_70, 1, x_69); -x_71 = l_Array_umapMAux___main___at___private_Init_Lean_Elab_Term_13__elabAppArgsAux___main___spec__2(x_21, x_6); -x_72 = l_Array_toList___rarg(x_71); -lean_dec(x_71); -x_73 = l_List_toString___at_Lean_Elab_OpenDecl_HasToString___spec__2(x_72); -x_74 = l_Array_HasRepr___rarg___closed__1; -x_75 = lean_string_append(x_74, x_73); -lean_dec(x_73); -x_76 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_76, 0, x_75); -x_77 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_77, 0, x_76); -x_78 = lean_alloc_ctor(8, 2, 0); -lean_ctor_set(x_78, 0, x_70); -lean_ctor_set(x_78, 1, x_77); -x_79 = l_Lean_Elab_logErrorAndThrow___at_Lean_Elab_Term_ensureType___spec__1(x_1, x_78, x_9, x_15); -lean_dec(x_9); -return x_79; -} -else -{ -lean_object* x_80; lean_object* x_81; lean_object* x_82; -lean_dec(x_17); -x_80 = lean_array_fget(x_2, x_5); -x_81 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_81, 0, x_18); -lean_inc(x_9); -x_82 = l_Lean_Elab_Term_elabTerm(x_80, x_81, x_9, x_15); -if (lean_obj_tag(x_82) == 0) -{ -lean_object* x_83; lean_object* x_84; lean_object* x_85; lean_object* x_86; lean_object* x_87; lean_object* x_88; -x_83 = lean_ctor_get(x_82, 0); -lean_inc(x_83); -x_84 = lean_ctor_get(x_82, 1); -lean_inc(x_84); -lean_dec(x_82); -x_85 = lean_unsigned_to_nat(1u); -x_86 = lean_nat_add(x_5, x_85); -lean_dec(x_5); -x_87 = lean_expr_instantiate1(x_19, x_83); -lean_dec(x_19); -x_88 = l_Lean_mkApp(x_8, x_83); -x_5 = x_86; -x_7 = x_87; -x_8 = x_88; -x_10 = x_84; -goto _start; -} -else -{ -uint8_t x_90; -lean_dec(x_19); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_3); -x_90 = !lean_is_exclusive(x_82); -if (x_90 == 0) -{ -return x_82; -} -else -{ -lean_object* x_91; lean_object* x_92; lean_object* x_93; -x_91 = lean_ctor_get(x_82, 0); -x_92 = lean_ctor_get(x_82, 1); -lean_inc(x_92); -lean_inc(x_91); -lean_dec(x_82); -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_94; -lean_dec(x_17); -lean_free_object(x_12); -x_94 = !lean_is_exclusive(x_22); -if (x_94 == 0) -{ -lean_object* x_95; lean_object* x_96; lean_object* x_97; lean_object* x_98; lean_object* x_99; lean_object* x_100; -x_95 = lean_ctor_get(x_22, 0); -x_96 = l_Lean_Elab_Term_NamedArg_inhabited; -x_97 = lean_array_get(x_96, x_6, x_95); -x_98 = l_Array_eraseIdx___rarg(x_6, x_95); -lean_dec(x_95); -x_99 = lean_ctor_get(x_97, 1); -lean_inc(x_99); -lean_dec(x_97); -lean_ctor_set(x_22, 0, x_18); -lean_inc(x_9); -x_100 = l_Lean_Elab_Term_elabTerm(x_99, x_22, x_9, x_15); -if (lean_obj_tag(x_100) == 0) -{ -lean_object* x_101; lean_object* x_102; lean_object* x_103; lean_object* x_104; -x_101 = lean_ctor_get(x_100, 0); -lean_inc(x_101); -x_102 = lean_ctor_get(x_100, 1); -lean_inc(x_102); -lean_dec(x_100); -x_103 = lean_expr_instantiate1(x_19, x_101); -lean_dec(x_19); -x_104 = l_Lean_mkApp(x_8, x_101); -x_6 = x_98; -x_7 = x_103; -x_8 = x_104; -x_10 = x_102; -goto _start; -} -else -{ -uint8_t x_106; -lean_dec(x_98); -lean_dec(x_19); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_5); -lean_dec(x_3); -x_106 = !lean_is_exclusive(x_100); -if (x_106 == 0) -{ -return x_100; -} -else -{ -lean_object* x_107; lean_object* x_108; lean_object* x_109; -x_107 = lean_ctor_get(x_100, 0); -x_108 = lean_ctor_get(x_100, 1); -lean_inc(x_108); -lean_inc(x_107); -lean_dec(x_100); -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; -} -} -} -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 = lean_ctor_get(x_22, 0); -lean_inc(x_110); -lean_dec(x_22); -x_111 = l_Lean_Elab_Term_NamedArg_inhabited; -x_112 = lean_array_get(x_111, x_6, x_110); -x_113 = l_Array_eraseIdx___rarg(x_6, x_110); -lean_dec(x_110); -x_114 = lean_ctor_get(x_112, 1); -lean_inc(x_114); -lean_dec(x_112); -x_115 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_115, 0, x_18); -lean_inc(x_9); -x_116 = l_Lean_Elab_Term_elabTerm(x_114, x_115, x_9, x_15); -if (lean_obj_tag(x_116) == 0) -{ -lean_object* x_117; lean_object* x_118; lean_object* x_119; lean_object* x_120; -x_117 = lean_ctor_get(x_116, 0); -lean_inc(x_117); -x_118 = lean_ctor_get(x_116, 1); -lean_inc(x_118); -lean_dec(x_116); -x_119 = lean_expr_instantiate1(x_19, x_117); -lean_dec(x_19); -x_120 = l_Lean_mkApp(x_8, x_117); -x_6 = x_113; -x_7 = x_119; -x_8 = x_120; -x_10 = x_118; -goto _start; -} -else -{ -lean_object* x_122; lean_object* x_123; lean_object* x_124; lean_object* x_125; -lean_dec(x_113); -lean_dec(x_19); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_5); -lean_dec(x_3); -x_122 = lean_ctor_get(x_116, 0); -lean_inc(x_122); -x_123 = lean_ctor_get(x_116, 1); -lean_inc(x_123); -if (lean_is_exclusive(x_116)) { - lean_ctor_release(x_116, 0); - lean_ctor_release(x_116, 1); - x_124 = x_116; -} else { - lean_dec_ref(x_116); - x_124 = lean_box(0); -} -if (lean_is_scalar(x_124)) { - x_125 = lean_alloc_ctor(1, 2, 0); -} else { - x_125 = x_124; -} -lean_ctor_set(x_125, 0, x_122); -lean_ctor_set(x_125, 1, x_123); -return x_125; -} -} -} -} -else -{ -lean_object* x_126; lean_object* x_127; lean_object* x_128; lean_object* x_129; uint64_t x_130; lean_object* x_131; lean_object* x_132; -x_126 = lean_ctor_get(x_12, 1); -lean_inc(x_126); -lean_dec(x_12); -x_127 = lean_ctor_get(x_13, 0); -lean_inc(x_127); -x_128 = lean_ctor_get(x_13, 1); -lean_inc(x_128); -x_129 = lean_ctor_get(x_13, 2); -lean_inc(x_129); -x_130 = lean_ctor_get_uint64(x_13, sizeof(void*)*3); -lean_dec(x_13); -x_131 = lean_unsigned_to_nat(0u); -x_132 = l_Array_findIdxAux___main___at___private_Init_Lean_Elab_Term_13__elabAppArgsAux___main___spec__1(x_127, x_6, x_131); -if (lean_obj_tag(x_132) == 0) -{ -if (x_4 == 0) -{ -uint8_t x_133; lean_object* x_134; -x_133 = (uint8_t)((x_130 << 24) >> 61); -x_134 = lean_box(x_133); -switch (lean_obj_tag(x_134)) { -case 1: -{ -lean_object* x_135; uint8_t 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_127); -x_135 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_135, 0, x_128); -x_136 = 0; -x_137 = lean_box(0); -lean_inc(x_9); -x_138 = l_Lean_Elab_Term_mkFreshExprMVar(x_135, x_136, x_137, x_9, x_126); -x_139 = lean_ctor_get(x_138, 0); -lean_inc(x_139); -x_140 = lean_ctor_get(x_138, 1); -lean_inc(x_140); -lean_dec(x_138); -x_141 = lean_expr_instantiate1(x_129, x_139); -lean_dec(x_129); -x_142 = l_Lean_mkApp(x_8, x_139); -x_7 = x_141; -x_8 = x_142; -x_10 = x_140; +x_55 = lean_expr_instantiate1(x_43, x_53); +lean_dec(x_43); +x_56 = l_Lean_mkApp(x_9, x_53); +x_8 = x_55; +x_9 = x_56; +x_11 = x_54; goto _start; } case 3: { -lean_object* x_144; -lean_dec(x_129); -lean_dec(x_128); -lean_dec(x_127); -lean_dec(x_9); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_3); -x_144 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_144, 0, x_8); -lean_ctor_set(x_144, 1, x_126); -return x_144; +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_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_41); +lean_dec(x_8); +x_58 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_58, 0, x_42); +x_59 = 1; +x_60 = lean_box(0); +lean_inc(x_10); +x_61 = l_Lean_Elab_Term_mkFreshExprMVar(x_58, x_59, x_60, x_10, x_14); +x_62 = lean_ctor_get(x_61, 0); +lean_inc(x_62); +x_63 = lean_ctor_get(x_61, 1); +lean_inc(x_63); +lean_dec(x_61); +x_64 = l_Lean_Expr_mvarId_x21(x_62); +x_65 = lean_box(0); +lean_inc(x_1); +lean_inc(x_64); +x_66 = l_Lean_Elab_Term_registerSyntheticMVar(x_64, x_1, x_65, x_10, x_63); +x_67 = lean_ctor_get(x_66, 1); +lean_inc(x_67); +lean_dec(x_66); +x_68 = lean_array_push(x_7, x_64); +x_69 = lean_expr_instantiate1(x_43, x_62); +lean_dec(x_43); +x_70 = l_Lean_mkApp(x_9, x_62); +x_7 = x_68; +x_8 = x_69; +x_9 = x_70; +x_11 = x_67; +goto _start; } default: { -lean_object* x_145; uint8_t x_146; -lean_dec(x_134); -x_145 = lean_array_get_size(x_2); -x_146 = lean_nat_dec_lt(x_5, x_145); -lean_dec(x_145); -if (x_146 == 0) +lean_object* x_72; uint8_t x_73; +lean_dec(x_48); +x_72 = lean_array_get_size(x_2); +x_73 = lean_nat_dec_lt(x_5, x_72); +lean_dec(x_72); +if (x_73 == 0) { -lean_object* x_147; lean_object* x_148; lean_object* x_149; lean_object* x_150; lean_object* x_151; lean_object* x_152; lean_object* x_153; lean_object* x_154; lean_object* x_155; lean_object* x_156; lean_object* x_157; lean_object* x_158; lean_object* x_159; lean_object* x_160; -lean_dec(x_129); -lean_dec(x_128); +uint8_t x_74; +lean_dec(x_43); +lean_dec(x_42); +lean_dec(x_5); +x_74 = l_Array_isEmpty___rarg(x_6); +if (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; 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_dec(x_9); lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_3); +x_75 = lean_alloc_ctor(4, 1, 0); +lean_ctor_set(x_75, 0, x_41); +x_76 = l___private_Init_Lean_Elab_Term_13__elabAppArgsAux___main___closed__6; +x_77 = lean_alloc_ctor(8, 2, 0); +lean_ctor_set(x_77, 0, x_76); +lean_ctor_set(x_77, 1, x_75); +x_78 = l___private_Init_Lean_Elab_Term_13__elabAppArgsAux___main___closed__9; +x_79 = lean_alloc_ctor(8, 2, 0); +lean_ctor_set(x_79, 0, x_77); +lean_ctor_set(x_79, 1, x_78); +x_80 = l_Array_umapMAux___main___at___private_Init_Lean_Elab_Term_13__elabAppArgsAux___main___spec__2(x_45, x_6); +x_81 = l_Array_toList___rarg(x_80); +lean_dec(x_80); +x_82 = l_List_toString___at_Lean_Elab_OpenDecl_HasToString___spec__2(x_81); +x_83 = l_Array_HasRepr___rarg___closed__1; +x_84 = lean_string_append(x_83, x_82); +lean_dec(x_82); +x_85 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_85, 0, x_84); +x_86 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_86, 0, x_85); +x_87 = lean_alloc_ctor(8, 2, 0); +lean_ctor_set(x_87, 0, x_79); +lean_ctor_set(x_87, 1, x_86); +x_88 = l_Lean_Elab_logErrorAndThrow___at_Lean_Elab_Term_ensureType___spec__1(x_1, x_87, x_10, x_14); +lean_dec(x_10); +lean_dec(x_1); +return x_88; +} +else +{ +lean_object* x_89; +lean_dec(x_41); +lean_dec(x_6); +lean_inc(x_10); +x_89 = l_Lean_Elab_Term_ensureHasType(x_1, x_3, x_8, x_9, x_10, x_14); +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); +x_92 = l_Array_forMAux___main___at_Lean_Elab_Term_synthesizeInstMVars___spec__1(x_1, x_7, x_45, x_10, x_91); +lean_dec(x_7); +lean_dec(x_1); +if (lean_obj_tag(x_92) == 0) +{ +uint8_t x_93; +x_93 = !lean_is_exclusive(x_92); +if (x_93 == 0) +{ +lean_object* x_94; +x_94 = lean_ctor_get(x_92, 0); +lean_dec(x_94); +lean_ctor_set(x_92, 0, x_90); +return x_92; +} +else +{ +lean_object* x_95; lean_object* x_96; +x_95 = lean_ctor_get(x_92, 1); +lean_inc(x_95); +lean_dec(x_92); +x_96 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_96, 0, x_90); +lean_ctor_set(x_96, 1, x_95); +return x_96; +} +} +else +{ +uint8_t x_97; +lean_dec(x_90); +x_97 = !lean_is_exclusive(x_92); +if (x_97 == 0) +{ +return x_92; +} +else +{ +lean_object* x_98; lean_object* x_99; lean_object* x_100; +x_98 = lean_ctor_get(x_92, 0); +x_99 = lean_ctor_get(x_92, 1); +lean_inc(x_99); +lean_inc(x_98); +lean_dec(x_92); +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 +{ +uint8_t x_101; +lean_dec(x_10); +lean_dec(x_7); +lean_dec(x_1); +x_101 = !lean_is_exclusive(x_89); +if (x_101 == 0) +{ +return x_89; +} +else +{ +lean_object* x_102; lean_object* x_103; lean_object* x_104; +x_102 = lean_ctor_get(x_89, 0); +x_103 = lean_ctor_get(x_89, 1); +lean_inc(x_103); +lean_inc(x_102); +lean_dec(x_89); +x_104 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_104, 0, x_102); +lean_ctor_set(x_104, 1, x_103); +return x_104; +} +} +} +} +else +{ +lean_object* x_105; lean_object* x_106; lean_object* x_107; +lean_dec(x_41); +lean_dec(x_8); +x_105 = lean_array_fget(x_2, x_5); +x_106 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_106, 0, x_42); +lean_inc(x_10); +x_107 = l_Lean_Elab_Term_elabTerm(x_105, x_106, x_10, x_14); +if (lean_obj_tag(x_107) == 0) +{ +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_108 = lean_ctor_get(x_107, 0); +lean_inc(x_108); +x_109 = lean_ctor_get(x_107, 1); +lean_inc(x_109); +lean_dec(x_107); +x_110 = lean_unsigned_to_nat(1u); +x_111 = lean_nat_add(x_5, x_110); +lean_dec(x_5); +x_112 = lean_expr_instantiate1(x_43, x_108); +lean_dec(x_43); +x_113 = l_Lean_mkApp(x_9, x_108); +x_5 = x_111; +x_8 = x_112; +x_9 = x_113; +x_11 = x_109; +goto _start; +} +else +{ +uint8_t x_115; +lean_dec(x_43); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_7); +lean_dec(x_6); lean_dec(x_5); lean_dec(x_3); -x_147 = lean_alloc_ctor(4, 1, 0); -lean_ctor_set(x_147, 0, x_127); -x_148 = l___private_Init_Lean_Elab_Term_13__elabAppArgsAux___main___closed__6; -x_149 = lean_alloc_ctor(8, 2, 0); -lean_ctor_set(x_149, 0, x_148); -lean_ctor_set(x_149, 1, x_147); -x_150 = l___private_Init_Lean_Elab_Term_13__elabAppArgsAux___main___closed__9; -x_151 = lean_alloc_ctor(8, 2, 0); +lean_dec(x_1); +x_115 = !lean_is_exclusive(x_107); +if (x_115 == 0) +{ +return x_107; +} +else +{ +lean_object* x_116; lean_object* x_117; lean_object* x_118; +x_116 = lean_ctor_get(x_107, 0); +x_117 = lean_ctor_get(x_107, 1); +lean_inc(x_117); +lean_inc(x_116); +lean_dec(x_107); +x_118 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_118, 0, x_116); +lean_ctor_set(x_118, 1, x_117); +return x_118; +} +} +} +} +} +} +else +{ +lean_object* x_119; uint8_t x_120; +x_119 = lean_array_get_size(x_2); +x_120 = lean_nat_dec_lt(x_5, x_119); +lean_dec(x_119); +if (x_120 == 0) +{ +uint8_t x_121; +lean_dec(x_43); +lean_dec(x_42); +lean_dec(x_5); +x_121 = l_Array_isEmpty___rarg(x_6); +if (x_121 == 0) +{ +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_135; +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_3); +x_122 = lean_alloc_ctor(4, 1, 0); +lean_ctor_set(x_122, 0, x_41); +x_123 = l___private_Init_Lean_Elab_Term_13__elabAppArgsAux___main___closed__6; +x_124 = lean_alloc_ctor(8, 2, 0); +lean_ctor_set(x_124, 0, x_123); +lean_ctor_set(x_124, 1, x_122); +x_125 = l___private_Init_Lean_Elab_Term_13__elabAppArgsAux___main___closed__9; +x_126 = lean_alloc_ctor(8, 2, 0); +lean_ctor_set(x_126, 0, x_124); +lean_ctor_set(x_126, 1, x_125); +x_127 = l_Array_umapMAux___main___at___private_Init_Lean_Elab_Term_13__elabAppArgsAux___main___spec__2(x_45, x_6); +x_128 = l_Array_toList___rarg(x_127); +lean_dec(x_127); +x_129 = l_List_toString___at_Lean_Elab_OpenDecl_HasToString___spec__2(x_128); +x_130 = l_Array_HasRepr___rarg___closed__1; +x_131 = lean_string_append(x_130, x_129); +lean_dec(x_129); +x_132 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_132, 0, x_131); +x_133 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_133, 0, x_132); +x_134 = lean_alloc_ctor(8, 2, 0); +lean_ctor_set(x_134, 0, x_126); +lean_ctor_set(x_134, 1, x_133); +x_135 = l_Lean_Elab_logErrorAndThrow___at_Lean_Elab_Term_ensureType___spec__1(x_1, x_134, x_10, x_14); +lean_dec(x_10); +lean_dec(x_1); +return x_135; +} +else +{ +lean_object* x_136; +lean_dec(x_41); +lean_dec(x_6); +lean_inc(x_10); +x_136 = l_Lean_Elab_Term_ensureHasType(x_1, x_3, x_8, x_9, x_10, x_14); +if (lean_obj_tag(x_136) == 0) +{ +lean_object* x_137; lean_object* x_138; lean_object* x_139; +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); +x_139 = l_Array_forMAux___main___at_Lean_Elab_Term_synthesizeInstMVars___spec__1(x_1, x_7, x_45, x_10, x_138); +lean_dec(x_7); +lean_dec(x_1); +if (lean_obj_tag(x_139) == 0) +{ +uint8_t x_140; +x_140 = !lean_is_exclusive(x_139); +if (x_140 == 0) +{ +lean_object* x_141; +x_141 = lean_ctor_get(x_139, 0); +lean_dec(x_141); +lean_ctor_set(x_139, 0, x_137); +return x_139; +} +else +{ +lean_object* x_142; lean_object* x_143; +x_142 = lean_ctor_get(x_139, 1); +lean_inc(x_142); +lean_dec(x_139); +x_143 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_143, 0, x_137); +lean_ctor_set(x_143, 1, x_142); +return x_143; +} +} +else +{ +uint8_t x_144; +lean_dec(x_137); +x_144 = !lean_is_exclusive(x_139); +if (x_144 == 0) +{ +return x_139; +} +else +{ +lean_object* x_145; lean_object* x_146; lean_object* x_147; +x_145 = lean_ctor_get(x_139, 0); +x_146 = lean_ctor_get(x_139, 1); +lean_inc(x_146); +lean_inc(x_145); +lean_dec(x_139); +x_147 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_147, 0, x_145); +lean_ctor_set(x_147, 1, x_146); +return x_147; +} +} +} +else +{ +uint8_t x_148; +lean_dec(x_10); +lean_dec(x_7); +lean_dec(x_1); +x_148 = !lean_is_exclusive(x_136); +if (x_148 == 0) +{ +return x_136; +} +else +{ +lean_object* x_149; lean_object* x_150; lean_object* x_151; +x_149 = lean_ctor_get(x_136, 0); +x_150 = lean_ctor_get(x_136, 1); +lean_inc(x_150); +lean_inc(x_149); +lean_dec(x_136); +x_151 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_151, 0, x_149); lean_ctor_set(x_151, 1, x_150); -x_152 = l_Array_umapMAux___main___at___private_Init_Lean_Elab_Term_13__elabAppArgsAux___main___spec__2(x_131, x_6); -x_153 = l_Array_toList___rarg(x_152); -lean_dec(x_152); -x_154 = l_List_toString___at_Lean_Elab_OpenDecl_HasToString___spec__2(x_153); -x_155 = l_Array_HasRepr___rarg___closed__1; -x_156 = lean_string_append(x_155, x_154); -lean_dec(x_154); -x_157 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_157, 0, x_156); -x_158 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_158, 0, x_157); -x_159 = lean_alloc_ctor(8, 2, 0); -lean_ctor_set(x_159, 0, x_151); -lean_ctor_set(x_159, 1, x_158); -x_160 = l_Lean_Elab_logErrorAndThrow___at_Lean_Elab_Term_ensureType___spec__1(x_1, x_159, x_9, x_126); -lean_dec(x_9); -return x_160; +return x_151; +} +} +} } else { -lean_object* x_161; lean_object* x_162; lean_object* x_163; -lean_dec(x_127); -x_161 = lean_array_fget(x_2, x_5); -x_162 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_162, 0, x_128); -lean_inc(x_9); -x_163 = l_Lean_Elab_Term_elabTerm(x_161, x_162, x_9, x_126); -if (lean_obj_tag(x_163) == 0) +lean_object* x_152; lean_object* x_153; lean_object* x_154; +lean_dec(x_41); +lean_dec(x_8); +x_152 = lean_array_fget(x_2, x_5); +x_153 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_153, 0, x_42); +lean_inc(x_10); +x_154 = l_Lean_Elab_Term_elabTerm(x_152, x_153, x_10, x_14); +if (lean_obj_tag(x_154) == 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; -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_163); -x_166 = lean_unsigned_to_nat(1u); -x_167 = lean_nat_add(x_5, x_166); +lean_object* x_155; lean_object* x_156; lean_object* x_157; lean_object* x_158; lean_object* x_159; lean_object* x_160; +x_155 = lean_ctor_get(x_154, 0); +lean_inc(x_155); +x_156 = lean_ctor_get(x_154, 1); +lean_inc(x_156); +lean_dec(x_154); +x_157 = lean_unsigned_to_nat(1u); +x_158 = lean_nat_add(x_5, x_157); lean_dec(x_5); -x_168 = lean_expr_instantiate1(x_129, x_164); -lean_dec(x_129); -x_169 = l_Lean_mkApp(x_8, x_164); -x_5 = x_167; -x_7 = x_168; -x_8 = x_169; -x_10 = x_165; +x_159 = lean_expr_instantiate1(x_43, x_155); +lean_dec(x_43); +x_160 = l_Lean_mkApp(x_9, x_155); +x_5 = x_158; +x_8 = x_159; +x_9 = x_160; +x_11 = x_156; goto _start; } else { -lean_object* x_171; lean_object* x_172; lean_object* x_173; lean_object* x_174; -lean_dec(x_129); +uint8_t x_162; +lean_dec(x_43); +lean_dec(x_10); lean_dec(x_9); -lean_dec(x_8); +lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); lean_dec(x_3); -x_171 = lean_ctor_get(x_163, 0); -lean_inc(x_171); -x_172 = lean_ctor_get(x_163, 1); -lean_inc(x_172); -if (lean_is_exclusive(x_163)) { - lean_ctor_release(x_163, 0); - lean_ctor_release(x_163, 1); - x_173 = x_163; -} else { - lean_dec_ref(x_163); - x_173 = lean_box(0); +lean_dec(x_1); +x_162 = !lean_is_exclusive(x_154); +if (x_162 == 0) +{ +return x_154; } -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_163; lean_object* x_164; lean_object* x_165; +x_163 = lean_ctor_get(x_154, 0); +x_164 = lean_ctor_get(x_154, 1); +lean_inc(x_164); +lean_inc(x_163); +lean_dec(x_154); +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; } } } @@ -20805,229 +21545,311 @@ return x_174; } else { -lean_object* x_175; uint8_t x_176; -x_175 = lean_array_get_size(x_2); -x_176 = lean_nat_dec_lt(x_5, x_175); -lean_dec(x_175); -if (x_176 == 0) -{ -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_dec(x_129); -lean_dec(x_128); +uint8_t x_166; +lean_dec(x_41); lean_dec(x_8); +x_166 = !lean_is_exclusive(x_46); +if (x_166 == 0) +{ +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_167 = lean_ctor_get(x_46, 0); +x_168 = l_Lean_Elab_Term_NamedArg_inhabited; +x_169 = lean_array_get(x_168, x_6, x_167); +x_170 = l_Array_eraseIdx___rarg(x_6, x_167); +lean_dec(x_167); +x_171 = lean_ctor_get(x_169, 1); +lean_inc(x_171); +lean_dec(x_169); +lean_ctor_set(x_46, 0, x_42); +lean_inc(x_10); +x_172 = l_Lean_Elab_Term_elabTerm(x_171, x_46, x_10, x_14); +if (lean_obj_tag(x_172) == 0) +{ +lean_object* x_173; lean_object* x_174; lean_object* x_175; lean_object* x_176; +x_173 = lean_ctor_get(x_172, 0); +lean_inc(x_173); +x_174 = lean_ctor_get(x_172, 1); +lean_inc(x_174); +lean_dec(x_172); +x_175 = lean_expr_instantiate1(x_43, x_173); +lean_dec(x_43); +x_176 = l_Lean_mkApp(x_9, x_173); +x_6 = x_170; +x_8 = x_175; +x_9 = x_176; +x_11 = x_174; +goto _start; +} +else +{ +uint8_t x_178; +lean_dec(x_170); +lean_dec(x_43); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_7); lean_dec(x_5); lean_dec(x_3); -x_177 = lean_alloc_ctor(4, 1, 0); -lean_ctor_set(x_177, 0, x_127); -x_178 = l___private_Init_Lean_Elab_Term_13__elabAppArgsAux___main___closed__6; -x_179 = lean_alloc_ctor(8, 2, 0); -lean_ctor_set(x_179, 0, x_178); -lean_ctor_set(x_179, 1, x_177); -x_180 = l___private_Init_Lean_Elab_Term_13__elabAppArgsAux___main___closed__9; -x_181 = lean_alloc_ctor(8, 2, 0); +lean_dec(x_1); +x_178 = !lean_is_exclusive(x_172); +if (x_178 == 0) +{ +return x_172; +} +else +{ +lean_object* x_179; lean_object* x_180; lean_object* x_181; +x_179 = lean_ctor_get(x_172, 0); +x_180 = lean_ctor_get(x_172, 1); +lean_inc(x_180); +lean_inc(x_179); +lean_dec(x_172); +x_181 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_181, 0, x_179); lean_ctor_set(x_181, 1, x_180); -x_182 = l_Array_umapMAux___main___at___private_Init_Lean_Elab_Term_13__elabAppArgsAux___main___spec__2(x_131, x_6); -x_183 = l_Array_toList___rarg(x_182); +return x_181; +} +} +} +else +{ +lean_object* x_182; lean_object* x_183; lean_object* x_184; lean_object* x_185; lean_object* x_186; lean_object* x_187; lean_object* x_188; +x_182 = lean_ctor_get(x_46, 0); +lean_inc(x_182); +lean_dec(x_46); +x_183 = l_Lean_Elab_Term_NamedArg_inhabited; +x_184 = lean_array_get(x_183, x_6, x_182); +x_185 = l_Array_eraseIdx___rarg(x_6, x_182); lean_dec(x_182); -x_184 = l_List_toString___at_Lean_Elab_OpenDecl_HasToString___spec__2(x_183); -x_185 = l_Array_HasRepr___rarg___closed__1; -x_186 = lean_string_append(x_185, x_184); +x_186 = lean_ctor_get(x_184, 1); +lean_inc(x_186); lean_dec(x_184); -x_187 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_187, 0, x_186); -x_188 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_188, 0, x_187); -x_189 = lean_alloc_ctor(8, 2, 0); -lean_ctor_set(x_189, 0, x_181); -lean_ctor_set(x_189, 1, x_188); -x_190 = l_Lean_Elab_logErrorAndThrow___at_Lean_Elab_Term_ensureType___spec__1(x_1, x_189, x_9, x_126); -lean_dec(x_9); -return x_190; +x_187 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_187, 0, x_42); +lean_inc(x_10); +x_188 = l_Lean_Elab_Term_elabTerm(x_186, x_187, x_10, x_14); +if (lean_obj_tag(x_188) == 0) +{ +lean_object* x_189; lean_object* x_190; lean_object* x_191; lean_object* x_192; +x_189 = lean_ctor_get(x_188, 0); +lean_inc(x_189); +x_190 = lean_ctor_get(x_188, 1); +lean_inc(x_190); +lean_dec(x_188); +x_191 = lean_expr_instantiate1(x_43, x_189); +lean_dec(x_43); +x_192 = l_Lean_mkApp(x_9, x_189); +x_6 = x_185; +x_8 = x_191; +x_9 = x_192; +x_11 = x_190; +goto _start; } else { -lean_object* x_191; lean_object* x_192; lean_object* x_193; -lean_dec(x_127); -x_191 = lean_array_fget(x_2, x_5); -x_192 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_192, 0, x_128); -lean_inc(x_9); -x_193 = l_Lean_Elab_Term_elabTerm(x_191, x_192, x_9, x_126); -if (lean_obj_tag(x_193) == 0) -{ -lean_object* x_194; lean_object* x_195; lean_object* x_196; lean_object* x_197; lean_object* x_198; lean_object* x_199; -x_194 = lean_ctor_get(x_193, 0); +lean_object* x_194; lean_object* x_195; lean_object* x_196; lean_object* x_197; +lean_dec(x_185); +lean_dec(x_43); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_7); +lean_dec(x_5); +lean_dec(x_3); +lean_dec(x_1); +x_194 = lean_ctor_get(x_188, 0); lean_inc(x_194); -x_195 = lean_ctor_get(x_193, 1); +x_195 = lean_ctor_get(x_188, 1); lean_inc(x_195); -lean_dec(x_193); -x_196 = lean_unsigned_to_nat(1u); -x_197 = lean_nat_add(x_5, x_196); -lean_dec(x_5); -x_198 = lean_expr_instantiate1(x_129, x_194); -lean_dec(x_129); -x_199 = l_Lean_mkApp(x_8, x_194); -x_5 = x_197; -x_7 = x_198; -x_8 = x_199; -x_10 = x_195; -goto _start; -} -else -{ -lean_object* x_201; lean_object* x_202; lean_object* x_203; lean_object* x_204; -lean_dec(x_129); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_3); -x_201 = lean_ctor_get(x_193, 0); -lean_inc(x_201); -x_202 = lean_ctor_get(x_193, 1); -lean_inc(x_202); -if (lean_is_exclusive(x_193)) { - lean_ctor_release(x_193, 0); - lean_ctor_release(x_193, 1); - x_203 = x_193; +if (lean_is_exclusive(x_188)) { + lean_ctor_release(x_188, 0); + lean_ctor_release(x_188, 1); + x_196 = x_188; } else { - lean_dec_ref(x_193); - x_203 = lean_box(0); + lean_dec_ref(x_188); + x_196 = lean_box(0); } -if (lean_is_scalar(x_203)) { - x_204 = lean_alloc_ctor(1, 2, 0); +if (lean_is_scalar(x_196)) { + x_197 = lean_alloc_ctor(1, 2, 0); } else { - x_204 = x_203; + x_197 = x_196; } -lean_ctor_set(x_204, 0, x_201); -lean_ctor_set(x_204, 1, x_202); -return x_204; +lean_ctor_set(x_197, 0, x_194); +lean_ctor_set(x_197, 1, x_195); +return x_197; } } } } else { -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_dec(x_127); -x_205 = lean_ctor_get(x_132, 0); -lean_inc(x_205); -if (lean_is_exclusive(x_132)) { - lean_ctor_release(x_132, 0); - x_206 = x_132; -} else { - lean_dec_ref(x_132); - x_206 = lean_box(0); -} -x_207 = l_Lean_Elab_Term_NamedArg_inhabited; -x_208 = lean_array_get(x_207, x_6, x_205); -x_209 = l_Array_eraseIdx___rarg(x_6, x_205); -lean_dec(x_205); -x_210 = lean_ctor_get(x_208, 1); -lean_inc(x_210); -lean_dec(x_208); -if (lean_is_scalar(x_206)) { - x_211 = lean_alloc_ctor(1, 1, 0); -} else { - x_211 = x_206; -} -lean_ctor_set(x_211, 0, x_128); -lean_inc(x_9); -x_212 = l_Lean_Elab_Term_elabTerm(x_210, x_211, x_9, x_126); -if (lean_obj_tag(x_212) == 0) -{ -lean_object* x_213; lean_object* x_214; lean_object* x_215; lean_object* x_216; -x_213 = lean_ctor_get(x_212, 0); -lean_inc(x_213); -x_214 = lean_ctor_get(x_212, 1); -lean_inc(x_214); -lean_dec(x_212); -x_215 = lean_expr_instantiate1(x_129, x_213); -lean_dec(x_129); -x_216 = l_Lean_mkApp(x_8, x_213); -x_6 = x_209; -x_7 = x_215; -x_8 = x_216; -x_10 = x_214; -goto _start; -} -else -{ -lean_object* x_218; lean_object* x_219; lean_object* x_220; lean_object* x_221; -lean_dec(x_209); -lean_dec(x_129); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_5); -lean_dec(x_3); -x_218 = lean_ctor_get(x_212, 0); -lean_inc(x_218); -x_219 = lean_ctor_get(x_212, 1); -lean_inc(x_219); -if (lean_is_exclusive(x_212)) { - lean_ctor_release(x_212, 0); - lean_ctor_release(x_212, 1); - x_220 = x_212; -} else { - lean_dec_ref(x_212); - x_220 = lean_box(0); -} -if (lean_is_scalar(x_220)) { - x_221 = lean_alloc_ctor(1, 2, 0); -} else { - x_221 = x_220; -} -lean_ctor_set(x_221, 0, x_218); -lean_ctor_set(x_221, 1, x_219); -return x_221; -} -} -} -} -else -{ -lean_object* x_222; lean_object* x_223; lean_object* x_224; +lean_object* x_198; lean_dec(x_13); -lean_dec(x_8); +x_198 = lean_box(0); +x_15 = x_198; +goto block_40; +} +block_40: +{ +uint8_t x_16; +lean_dec(x_15); +x_16 = l_Array_isEmpty___rarg(x_6); lean_dec(x_6); +if (x_16 == 0) +{ +lean_object* x_17; lean_object* x_18; +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); lean_dec(x_5); lean_dec(x_3); -x_222 = lean_ctor_get(x_12, 1); -lean_inc(x_222); -lean_dec(x_12); -x_223 = l___private_Init_Lean_Elab_Term_13__elabAppArgsAux___main___closed__3; -x_224 = l_Lean_Elab_logErrorAndThrow___at_Lean_Elab_Term_ensureType___spec__1(x_1, x_223, x_9, x_222); +x_17 = l___private_Init_Lean_Elab_Term_13__elabAppArgsAux___main___closed__3; +x_18 = l_Lean_Elab_logErrorAndThrow___at_Lean_Elab_Term_ensureType___spec__1(x_1, x_17, x_10, x_14); +lean_dec(x_10); +lean_dec(x_1); +return x_18; +} +else +{ +lean_object* x_19; uint8_t x_20; +x_19 = lean_array_get_size(x_2); +x_20 = lean_nat_dec_eq(x_5, x_19); +lean_dec(x_19); +lean_dec(x_5); +if (x_20 == 0) +{ +lean_object* x_21; lean_object* x_22; lean_dec(x_9); -return x_224; +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_3); +x_21 = l___private_Init_Lean_Elab_Term_13__elabAppArgsAux___main___closed__3; +x_22 = l_Lean_Elab_logErrorAndThrow___at_Lean_Elab_Term_ensureType___spec__1(x_1, x_21, x_10, x_14); +lean_dec(x_10); +lean_dec(x_1); +return x_22; +} +else +{ +lean_object* x_23; +lean_inc(x_10); +x_23 = l_Lean_Elab_Term_ensureHasType(x_1, x_3, x_8, x_9, x_10, x_14); +if (lean_obj_tag(x_23) == 0) +{ +lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; +x_24 = lean_ctor_get(x_23, 0); +lean_inc(x_24); +x_25 = lean_ctor_get(x_23, 1); +lean_inc(x_25); +lean_dec(x_23); +x_26 = lean_unsigned_to_nat(0u); +x_27 = l_Array_forMAux___main___at_Lean_Elab_Term_synthesizeInstMVars___spec__1(x_1, x_7, x_26, x_10, x_25); +lean_dec(x_7); +lean_dec(x_1); +if (lean_obj_tag(x_27) == 0) +{ +uint8_t x_28; +x_28 = !lean_is_exclusive(x_27); +if (x_28 == 0) +{ +lean_object* x_29; +x_29 = lean_ctor_get(x_27, 0); +lean_dec(x_29); +lean_ctor_set(x_27, 0, x_24); +return x_27; +} +else +{ +lean_object* x_30; lean_object* x_31; +x_30 = lean_ctor_get(x_27, 1); +lean_inc(x_30); +lean_dec(x_27); +x_31 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_31, 0, x_24); +lean_ctor_set(x_31, 1, x_30); +return x_31; } } else { -uint8_t x_225; +uint8_t x_32; +lean_dec(x_24); +x_32 = !lean_is_exclusive(x_27); +if (x_32 == 0) +{ +return x_27; +} +else +{ +lean_object* x_33; lean_object* x_34; lean_object* x_35; +x_33 = lean_ctor_get(x_27, 0); +x_34 = lean_ctor_get(x_27, 1); +lean_inc(x_34); +lean_inc(x_33); +lean_dec(x_27); +x_35 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_35, 0, x_33); +lean_ctor_set(x_35, 1, x_34); +return x_35; +} +} +} +else +{ +uint8_t x_36; +lean_dec(x_10); +lean_dec(x_7); +lean_dec(x_1); +x_36 = !lean_is_exclusive(x_23); +if (x_36 == 0) +{ +return x_23; +} +else +{ +lean_object* x_37; lean_object* x_38; lean_object* x_39; +x_37 = lean_ctor_get(x_23, 0); +x_38 = lean_ctor_get(x_23, 1); +lean_inc(x_38); +lean_inc(x_37); +lean_dec(x_23); +x_39 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_39, 0, x_37); +lean_ctor_set(x_39, 1, x_38); +return x_39; +} +} +} +} +} +} +else +{ +uint8_t x_199; +lean_dec(x_10); lean_dec(x_9); lean_dec(x_8); +lean_dec(x_7); lean_dec(x_6); lean_dec(x_5); lean_dec(x_3); -x_225 = !lean_is_exclusive(x_12); -if (x_225 == 0) +lean_dec(x_1); +x_199 = !lean_is_exclusive(x_12); +if (x_199 == 0) { return x_12; } else { -lean_object* x_226; lean_object* x_227; lean_object* x_228; -x_226 = lean_ctor_get(x_12, 0); -x_227 = lean_ctor_get(x_12, 1); -lean_inc(x_227); -lean_inc(x_226); +lean_object* x_200; lean_object* x_201; lean_object* x_202; +x_200 = lean_ctor_get(x_12, 0); +x_201 = lean_ctor_get(x_12, 1); +lean_inc(x_201); +lean_inc(x_200); lean_dec(x_12); -x_228 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_228, 0, x_226); -lean_ctor_set(x_228, 1, x_227); -return x_228; -} +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; } } } @@ -21042,36 +21864,34 @@ lean_dec(x_1); return x_4; } } -lean_object* l___private_Init_Lean_Elab_Term_13__elabAppArgsAux___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* x_10) { +lean_object* l___private_Init_Lean_Elab_Term_13__elabAppArgsAux___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* x_10, lean_object* x_11) { _start: { -uint8_t x_11; lean_object* x_12; -x_11 = lean_unbox(x_4); +uint8_t x_12; lean_object* x_13; +x_12 = lean_unbox(x_4); lean_dec(x_4); -x_12 = l___private_Init_Lean_Elab_Term_13__elabAppArgsAux___main(x_1, x_2, x_3, x_11, x_5, x_6, x_7, x_8, x_9, x_10); +x_13 = l___private_Init_Lean_Elab_Term_13__elabAppArgsAux___main(x_1, x_2, x_3, x_12, x_5, x_6, x_7, x_8, x_9, x_10, x_11); lean_dec(x_2); -lean_dec(x_1); +return x_13; +} +} +lean_object* l___private_Init_Lean_Elab_Term_13__elabAppArgsAux(lean_object* x_1, lean_object* x_2, lean_object* x_3, uint8_t x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11) { +_start: +{ +lean_object* x_12; +x_12 = l___private_Init_Lean_Elab_Term_13__elabAppArgsAux___main(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10, x_11); return x_12; } } -lean_object* l___private_Init_Lean_Elab_Term_13__elabAppArgsAux(lean_object* x_1, lean_object* x_2, lean_object* x_3, uint8_t x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10) { +lean_object* l___private_Init_Lean_Elab_Term_13__elabAppArgsAux___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11) { _start: { -lean_object* x_11; -x_11 = l___private_Init_Lean_Elab_Term_13__elabAppArgsAux___main(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10); -return x_11; -} -} -lean_object* l___private_Init_Lean_Elab_Term_13__elabAppArgsAux___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10) { -_start: -{ -uint8_t x_11; lean_object* x_12; -x_11 = lean_unbox(x_4); +uint8_t x_12; lean_object* x_13; +x_12 = lean_unbox(x_4); lean_dec(x_4); -x_12 = l___private_Init_Lean_Elab_Term_13__elabAppArgsAux(x_1, x_2, x_3, x_11, x_5, x_6, x_7, x_8, x_9, x_10); +x_13 = l___private_Init_Lean_Elab_Term_13__elabAppArgsAux(x_1, x_2, x_3, x_12, x_5, x_6, x_7, x_8, x_9, x_10, x_11); lean_dec(x_2); -lean_dec(x_1); -return x_12; +return x_13; } } lean_object* l___private_Init_Lean_Elab_Term_14__elabAppArgs(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, uint8_t x_6, lean_object* x_7, lean_object* x_8) { @@ -21083,40 +21903,42 @@ lean_inc(x_2); x_9 = l_Lean_Elab_Term_inferType(x_2, x_7, 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; 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_unsigned_to_nat(0u); -x_13 = l___private_Init_Lean_Elab_Term_13__elabAppArgsAux___main(x_1, x_4, x_5, x_6, x_12, x_3, x_10, x_2, x_7, x_11); -return x_13; +x_13 = l_Array_empty___closed__1; +x_14 = l___private_Init_Lean_Elab_Term_13__elabAppArgsAux___main(x_1, x_4, x_5, x_6, x_12, x_3, x_13, x_10, x_2, x_7, x_11); +return x_14; } else { -uint8_t x_14; +uint8_t x_15; lean_dec(x_7); lean_dec(x_5); lean_dec(x_3); lean_dec(x_2); -x_14 = !lean_is_exclusive(x_9); -if (x_14 == 0) +lean_dec(x_1); +x_15 = !lean_is_exclusive(x_9); +if (x_15 == 0) { return x_9; } else { -lean_object* x_15; lean_object* x_16; lean_object* x_17; -x_15 = lean_ctor_get(x_9, 0); -x_16 = lean_ctor_get(x_9, 1); +lean_object* x_16; lean_object* x_17; lean_object* x_18; +x_16 = lean_ctor_get(x_9, 0); +x_17 = lean_ctor_get(x_9, 1); +lean_inc(x_17); lean_inc(x_16); -lean_inc(x_15); lean_dec(x_9); -x_17 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_17, 0, x_15); -lean_ctor_set(x_17, 1, x_16); -return x_17; +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; } } } @@ -21129,7 +21951,6 @@ x_9 = lean_unbox(x_6); lean_dec(x_6); x_10 = l___private_Init_Lean_Elab_Term_14__elabAppArgs(x_1, x_2, x_3, x_4, x_5, x_9, x_7, x_8); lean_dec(x_4); -lean_dec(x_1); return x_10; } } @@ -21150,7 +21971,6 @@ lean_dec(x_7); x_11 = l___private_Init_Lean_Elab_Term_15__elabAppProjs(x_1, x_2, x_3, x_4, x_5, x_6, x_10, x_8, x_9); lean_dec(x_5); lean_dec(x_3); -lean_dec(x_1); return x_11; } } @@ -21163,6 +21983,7 @@ lean_object* x_10; lean_dec(x_8); lean_dec(x_4); lean_dec(x_2); +lean_dec(x_1); x_10 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_10, 0, x_6); lean_ctor_set(x_10, 1, x_9); @@ -21183,6 +22004,7 @@ lean_inc(x_9); lean_inc(x_8); lean_inc(x_4); lean_inc(x_2); +lean_inc(x_1); x_14 = l___private_Init_Lean_Elab_Term_14__elabAppArgs(x_1, x_13, x_2, x_3, x_4, x_5, x_8, x_9); x_15 = lean_array_push(x_6, x_14); x_6 = x_15; @@ -21205,6 +22027,7 @@ lean_dec(x_10); lean_dec(x_8); lean_dec(x_5); lean_dec(x_3); +lean_dec(x_1); x_14 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_14, 0, x_9); lean_ctor_set(x_14, 1, x_11); @@ -21220,6 +22043,7 @@ lean_dec(x_8); lean_inc(x_10); lean_inc(x_5); lean_inc(x_3); +lean_inc(x_1); x_18 = l___private_Init_Lean_Elab_Term_16__elabAppFn___main(x_1, x_15, x_3, x_4, x_5, x_6, x_9, x_10, x_11); if (lean_obj_tag(x_18) == 0) { @@ -21241,6 +22065,7 @@ lean_dec(x_17); lean_dec(x_10); lean_dec(x_5); lean_dec(x_3); +lean_dec(x_1); x_22 = !lean_is_exclusive(x_18); if (x_22 == 0) { @@ -21362,6 +22187,7 @@ lean_dec(x_8); lean_dec(x_7); lean_dec(x_5); lean_dec(x_3); +lean_dec(x_1); x_39 = !lean_is_exclusive(x_28); if (x_39 == 0) { @@ -21422,6 +22248,7 @@ lean_dec(x_8); lean_dec(x_7); lean_dec(x_5); lean_dec(x_3); +lean_dec(x_1); x_54 = !lean_is_exclusive(x_50); if (x_54 == 0) { @@ -21450,6 +22277,7 @@ lean_dec(x_7); lean_dec(x_5); lean_dec(x_3); lean_dec(x_2); +lean_dec(x_1); x_58 = l___private_Init_Lean_Elab_Term_16__elabAppFn___main___closed__1; x_59 = l_unreachable_x21___rarg(x_58); x_60 = lean_apply_2(x_59, x_8, x_9); @@ -21491,7 +22319,6 @@ x_10 = lean_unbox(x_5); lean_dec(x_5); x_11 = l_List_foldlM___main___at___private_Init_Lean_Elab_Term_16__elabAppFn___main___spec__1(x_1, x_2, x_3, x_4, x_10, x_6, x_7, x_8, x_9); lean_dec(x_3); -lean_dec(x_1); return x_11; } } @@ -21505,7 +22332,6 @@ x_13 = l_Array_iterateMAux___main___at___private_Init_Lean_Elab_Term_16__elabApp lean_dec(x_7); lean_dec(x_4); lean_dec(x_2); -lean_dec(x_1); return x_13; } } @@ -21517,7 +22343,6 @@ x_10 = lean_unbox(x_6); lean_dec(x_6); x_11 = l___private_Init_Lean_Elab_Term_16__elabAppFn___main(x_1, x_2, x_3, x_4, x_5, x_10, x_7, x_8, x_9); lean_dec(x_4); -lean_dec(x_1); return x_11; } } @@ -21537,7 +22362,6 @@ x_10 = lean_unbox(x_6); lean_dec(x_6); x_11 = l___private_Init_Lean_Elab_Term_16__elabAppFn(x_1, x_2, x_3, x_4, x_5, x_10, x_7, x_8, x_9); lean_dec(x_4); -lean_dec(x_1); return x_11; } } @@ -22581,7 +23405,6 @@ _start: lean_object* x_8; x_8 = l___private_Init_Lean_Elab_Term_21__elabAppAux(x_1, x_2, x_3, x_4, x_5, x_6, x_7); lean_dec(x_4); -lean_dec(x_1); return x_8; } } @@ -23064,7 +23887,6 @@ lean_inc(x_11); lean_dec(x_7); x_12 = l___private_Init_Lean_Elab_Term_21__elabAppAux(x_1, x_9, x_10, x_11, x_2, x_3, x_8); lean_dec(x_11); -lean_dec(x_1); return x_12; } else @@ -23680,6 +24502,12 @@ l_Lean_Elab_Term_ensureHasType___closed__2 = _init_l_Lean_Elab_Term_ensureHasTyp lean_mark_persistent(l_Lean_Elab_Term_ensureHasType___closed__2); l_Lean_Elab_Term_ensureHasType___closed__3 = _init_l_Lean_Elab_Term_ensureHasType___closed__3(); lean_mark_persistent(l_Lean_Elab_Term_ensureHasType___closed__3); +l_Lean_Elab_Term_synthesizeInstMVar___closed__1 = _init_l_Lean_Elab_Term_synthesizeInstMVar___closed__1(); +lean_mark_persistent(l_Lean_Elab_Term_synthesizeInstMVar___closed__1); +l_Lean_Elab_Term_synthesizeInstMVar___closed__2 = _init_l_Lean_Elab_Term_synthesizeInstMVar___closed__2(); +lean_mark_persistent(l_Lean_Elab_Term_synthesizeInstMVar___closed__2); +l_Lean_Elab_Term_synthesizeInstMVar___closed__3 = _init_l_Lean_Elab_Term_synthesizeInstMVar___closed__3(); +lean_mark_persistent(l_Lean_Elab_Term_synthesizeInstMVar___closed__3); l___private_Init_Lean_Elab_Term_13__elabAppArgsAux___main___closed__1 = _init_l___private_Init_Lean_Elab_Term_13__elabAppArgsAux___main___closed__1(); lean_mark_persistent(l___private_Init_Lean_Elab_Term_13__elabAppArgsAux___main___closed__1); l___private_Init_Lean_Elab_Term_13__elabAppArgsAux___main___closed__2 = _init_l___private_Init_Lean_Elab_Term_13__elabAppArgsAux___main___closed__2(); diff --git a/stage0/stdlib/Init/Lean/Parser/Parser.c b/stage0/stdlib/Init/Lean/Parser/Parser.c index b3f60206b1..f5cb672801 100644 --- a/stage0/stdlib/Init/Lean/Parser/Parser.c +++ b/stage0/stdlib/Init/Lean/Parser/Parser.c @@ -48,6 +48,7 @@ lean_object* l_Lean_Parser_unicodeSymbolInfo___elambda__1___boxed(lean_object*); lean_object* l_Lean_Parser_prattParser(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_rawFn___rarg(lean_object*, uint8_t, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_andthenInfo(lean_object*, lean_object*); +lean_object* l_Lean_Syntax_foldSepRevArgs___rarg(lean_object*, lean_object*, lean_object*); extern lean_object* l___private_Init_Lean_Compiler_InitAttr_2__isUnitType___closed__1; extern lean_object* l___private_Init_Lean_Environment_8__persistentEnvExtensionsRef; lean_object* l_Lean_Parser_ParserState_mkError(lean_object*, lean_object*); @@ -66,6 +67,7 @@ lean_object* l_Lean_Parser_orelseFn___rarg(lean_object*, lean_object*, lean_obje lean_object* l_RBNode_find___main___at_Lean_Parser_TokenMap_insert___spec__1___rarg___boxed(lean_object*, lean_object*); lean_object* l_Lean_Parser_decimalNumberFn___boxed(lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_nameToExprAux___main___closed__1; +lean_object* l_Lean_Syntax_foldSepRevArgsM(lean_object*, lean_object*); extern lean_object* l_Lean_nullKind; lean_object* l_Lean_Parser_andthenAux(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_unicodeSymbolCheckPrecFnAux(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -86,6 +88,7 @@ lean_object* l_Lean_Parser_registerBuiltinParserAttribute___lambda__1___closed__ lean_object* l_Lean_Parser_ParserFn_inhabited___rarg(lean_object*); lean_object* l_Lean_Parser_binNumberFn___closed__1; lean_object* l_Lean_Parser_hexNumberFn___closed__1; +lean_object* l_Lean_Syntax_foldSepRevArgs(lean_object*); lean_object* l_Lean_Parser_binNumberFn___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_many___boxed(lean_object*, lean_object*); lean_object* l_Lean_Parser_numberFnAux(lean_object*, lean_object*); @@ -214,6 +217,7 @@ lean_object* l_Lean_Syntax_foldSepArgsM___boxed(lean_object*, lean_object*); lean_object* lean_string_utf8_byte_size(lean_object*); lean_object* l_Lean_Syntax_forSepArgsM(lean_object*); lean_object* l_Lean_Parser_ParserState_mkErrorsAt(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Syntax_foldSepRevArgs___rarg___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_leadingParser(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_symbolNoWsInfo___elambda__2(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_strLitFn___rarg___closed__1; @@ -252,6 +256,7 @@ lean_object* l_Lean_Parser_unicodeSymbolCheckPrecFn___closed__2; lean_object* l_Lean_Parser_quotedSymbolFn___rarg___closed__5; lean_object* l_Lean_Parser_optional(uint8_t, lean_object*); extern lean_object* l_Lean_AttributeImpl_inhabited___closed__4; +lean_object* l___private_Init_Data_Array_Basic_3__iterateRevMAux___main___at_Lean_Syntax_foldSepRevArgs___spec__1(lean_object*); lean_object* l_Lean_Parser_mkParserContextCore___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_numLit___boxed(lean_object*); lean_object* l_Lean_Parser_insertToken___closed__3; @@ -344,7 +349,9 @@ lean_object* lean_nat_sub(lean_object*, lean_object*); lean_object* l_Lean_Parser_ParserState_keepLatest(lean_object*, lean_object*); lean_object* l_Lean_Parser_checkLeadingFn___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_declareBuiltinParser(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Syntax_foldSepRevArgsM___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_TokenMap_HasEmptyc(lean_object*); +lean_object* l___private_Init_Data_Array_Basic_3__iterateRevMAux___main___at_Lean_Syntax_foldSepRevArgs___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_checkNoWsBefore(uint8_t, lean_object*); extern lean_object* l_Lean_choiceKind___closed__2; lean_object* l_Lean_Parser_checkWsBefore___boxed(lean_object*, lean_object*); @@ -500,6 +507,7 @@ lean_object* l_Lean_Parser_epsilonInfo___elambda__1___boxed(lean_object*); lean_object* l_Lean_Parser_ParserAttribute_inhabited___closed__2; lean_object* l_Lean_FileMap_toPosition(lean_object*, lean_object*); lean_object* l_HashMapImp_insert___at_Lean_Parser_nodeInfo___elambda__1___spec__1(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Syntax_foldArgsAuxM___main___at_Lean_Syntax_foldSepRevArgsM___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_mkAtomicInfo___elambda__1(lean_object*); lean_object* l_Lean_Parser_anyOfFn(uint8_t, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_AssocList_foldlM___main___at_Lean_Parser_nodeInfo___elambda__1___spec__5(lean_object*, lean_object*); @@ -552,6 +560,7 @@ lean_object* l_Lean_Parser_addBuiltinLeadingParser(lean_object*, lean_object*, l lean_object* l_Lean_Parser_mkBuiltinParsingTablesRef(lean_object*); lean_object* l_Lean_Syntax_foldSepArgsM___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Syntax_foldArgsAuxM___main___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Init_Data_Array_Basic_3__iterateRevMAux___main___at_Lean_Syntax_foldSepRevArgsM___spec__2___boxed(lean_object*, lean_object*); lean_object* l_List_eraseDupsAux___main___at_Lean_Parser_addBuiltinLeadingParser___spec__3(lean_object*, lean_object*); extern lean_object* l_Lean_registerTagAttribute___lambda__4___closed__2; lean_object* l_Lean_ParametricAttribute_setParam___rarg(lean_object*, lean_object*, lean_object*, lean_object*); @@ -588,10 +597,12 @@ lean_object* l_Lean_Parser_ParserState_mkErrorAt(lean_object*, lean_object*, lea lean_object* l_Lean_Parser_fieldIdxFn___closed__1; lean_object* l_Lean_Parser_Error_HasToString; lean_object* l_Lean_Parser_trailingLoop(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Init_Data_Array_Basic_3__iterateRevMAux___main___at_Lean_Syntax_foldSepRevArgsM___spec__2___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_symbol___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_checkNoWsBefore___boxed(lean_object*, lean_object*); uint8_t l_UInt32_decEq(uint32_t, uint32_t); lean_object* l_Lean_Parser_unquotedSymbolFn(uint8_t, lean_object*); +lean_object* l_Lean_Syntax_foldSepRevArgsM___boxed(lean_object*, lean_object*); lean_object* l_String_intercalate(lean_object*, lean_object*); extern lean_object* l_Lean_registerPersistentEnvExtensionUnsafe___rarg___closed__1; lean_object* l_Lean_Parser_numLit(uint8_t); @@ -704,6 +715,7 @@ lean_object* l_Lean_Parser_chFn___rarg(uint32_t, uint8_t, lean_object*, lean_obj lean_object* l_Lean_Syntax_foldArgsAuxM___main___at_Lean_Syntax_forArgsM___spec__1___rarg___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_epsilonInfo___closed__2; lean_object* l_Lean_Parser_Parser_inhabited___closed__2; +lean_object* l___private_Init_Data_Array_Basic_3__iterateRevMAux___main___at_Lean_Syntax_foldSepRevArgsM___spec__2(lean_object*, lean_object*); lean_object* l_Lean_Parser_rawCh___elambda__1___boxed(lean_object*); lean_object* l_Lean_Parser_numberFnAux___closed__1; lean_object* l_Lean_Syntax_forSepArgsM___boxed(lean_object*); @@ -741,6 +753,7 @@ uint8_t l_Lean_Syntax_isOfKind(lean_object*, lean_object*); lean_object* l_Lean_PersistentEnvExtension_getState___rarg(lean_object*, lean_object*); lean_object* l_Lean_Parser_ParserState_mkLongestNodeAlt(lean_object*, lean_object*); lean_object* l_Lean_Syntax_isNone___boxed(lean_object*); +lean_object* l_Lean_Syntax_foldArgsAuxM___main___at_Lean_Syntax_foldSepRevArgsM___spec__1(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_currLbp(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_takeWhile1Fn(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_io_initializing(lean_object*); @@ -774,6 +787,7 @@ lean_object* l_Lean_Parser_manyFn(uint8_t, lean_object*, lean_object*, lean_obje lean_object* l_Lean_Parser_ParserState_next___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Parser_inhabited___lambda__1___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_chFn___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_Init_Data_Array_Basic_3__iterateRevMAux___main___at_Lean_Syntax_foldSepRevArgsM___spec__2___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_sepBy1Info___elambda__2(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_epsilonInfo___elambda__2(lean_object*); lean_object* l___private_Init_Lean_Parser_Parser_1__expectedToString(lean_object*); @@ -870,6 +884,7 @@ lean_object* l_Lean_Parser_takeUntilFn___main___at_Lean_Parser_decimalNumberFn__ lean_object* l_RBNode_ins___main___at_Lean_Parser_TokenMap_insert___spec__3(lean_object*); lean_object* l_Lean_Parser_TokenConfig_HasBeq; lean_object* l_Lean_Parser_Parser_inhabited___boxed(lean_object*); +lean_object* l___private_Init_Data_Array_Basic_3__iterateRevMAux___main___at_Lean_Syntax_foldSepRevArgs___spec__1___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_strLitFnAux___main___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_mkErrorStringWithPos(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_unicodeSymbolFnAux(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -29438,6 +29453,222 @@ lean_dec(x_1); return x_2; } } +lean_object* l_Lean_Syntax_foldArgsAuxM___main___at_Lean_Syntax_foldSepRevArgsM___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; +x_5 = lean_array_get_size(x_2); +x_6 = lean_nat_dec_lt(x_3, x_5); +lean_dec(x_5); +if (x_6 == 0) +{ +lean_dec(x_3); +return x_4; +} +else +{ +lean_object* x_7; lean_object* x_8; lean_object* x_9; +x_7 = lean_array_fget(x_2, x_3); +x_8 = lean_array_push(x_4, x_7); +x_9 = lean_nat_add(x_3, x_1); +lean_dec(x_3); +x_3 = x_9; +x_4 = x_8; +goto _start; +} +} +} +lean_object* l___private_Init_Data_Array_Basic_3__iterateRevMAux___main___at_Lean_Syntax_foldSepRevArgsM___spec__2___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { +_start: +{ +lean_object* x_8; uint8_t x_9; +x_8 = lean_unsigned_to_nat(0u); +x_9 = lean_nat_dec_eq(x_5, x_8); +if (x_9 == 0) +{ +lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; +x_10 = lean_unsigned_to_nat(1u); +x_11 = lean_nat_sub(x_5, x_10); +x_12 = lean_ctor_get(x_1, 1); +lean_inc(x_12); +x_13 = lean_array_fget(x_4, x_11); +lean_inc(x_3); +x_14 = lean_apply_2(x_3, x_13, x_7); +x_15 = lean_alloc_closure((void*)(l___private_Init_Data_Array_Basic_3__iterateRevMAux___main___at_Lean_Syntax_foldSepRevArgsM___spec__2___rarg___boxed), 7, 6); +lean_closure_set(x_15, 0, x_1); +lean_closure_set(x_15, 1, x_2); +lean_closure_set(x_15, 2, x_3); +lean_closure_set(x_15, 3, x_4); +lean_closure_set(x_15, 4, x_11); +lean_closure_set(x_15, 5, lean_box(0)); +x_16 = lean_apply_4(x_12, lean_box(0), lean_box(0), x_14, x_15); +return x_16; +} +else +{ +lean_object* x_17; lean_object* x_18; lean_object* x_19; +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +x_17 = lean_ctor_get(x_1, 0); +lean_inc(x_17); +lean_dec(x_1); +x_18 = lean_ctor_get(x_17, 1); +lean_inc(x_18); +lean_dec(x_17); +x_19 = lean_apply_2(x_18, lean_box(0), x_7); +return x_19; +} +} +} +lean_object* l___private_Init_Data_Array_Basic_3__iterateRevMAux___main___at_Lean_Syntax_foldSepRevArgsM___spec__2(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = lean_alloc_closure((void*)(l___private_Init_Data_Array_Basic_3__iterateRevMAux___main___at_Lean_Syntax_foldSepRevArgsM___spec__2___rarg___boxed), 7, 0); +return x_3; +} +} +lean_object* l_Lean_Syntax_foldSepRevArgsM___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; +x_5 = l_Lean_Syntax_getArgs(x_2); +x_6 = lean_unsigned_to_nat(2u); +x_7 = lean_unsigned_to_nat(0u); +x_8 = l_Array_empty___closed__1; +x_9 = l_Lean_Syntax_foldArgsAuxM___main___at_Lean_Syntax_foldSepRevArgsM___spec__1(x_6, x_5, x_7, x_8); +lean_dec(x_5); +x_10 = lean_array_get_size(x_9); +x_11 = l___private_Init_Data_Array_Basic_3__iterateRevMAux___main___at_Lean_Syntax_foldSepRevArgsM___spec__2___rarg(x_1, x_2, x_3, x_9, x_10, lean_box(0), x_4); +lean_dec(x_10); +return x_11; +} +} +lean_object* l_Lean_Syntax_foldSepRevArgsM(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = lean_alloc_closure((void*)(l_Lean_Syntax_foldSepRevArgsM___rarg), 4, 0); +return x_3; +} +} +lean_object* l_Lean_Syntax_foldArgsAuxM___main___at_Lean_Syntax_foldSepRevArgsM___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_Lean_Syntax_foldArgsAuxM___main___at_Lean_Syntax_foldSepRevArgsM___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_Init_Data_Array_Basic_3__iterateRevMAux___main___at_Lean_Syntax_foldSepRevArgsM___spec__2___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { +_start: +{ +lean_object* x_8; +x_8 = l___private_Init_Data_Array_Basic_3__iterateRevMAux___main___at_Lean_Syntax_foldSepRevArgsM___spec__2___rarg(x_1, x_2, x_3, x_4, x_5, x_6, x_7); +lean_dec(x_5); +return x_8; +} +} +lean_object* l___private_Init_Data_Array_Basic_3__iterateRevMAux___main___at_Lean_Syntax_foldSepRevArgsM___spec__2___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = l___private_Init_Data_Array_Basic_3__iterateRevMAux___main___at_Lean_Syntax_foldSepRevArgsM___spec__2(x_1, x_2); +lean_dec(x_2); +return x_3; +} +} +lean_object* l_Lean_Syntax_foldSepRevArgsM___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = l_Lean_Syntax_foldSepRevArgsM(x_1, x_2); +lean_dec(x_2); +return x_3; +} +} +lean_object* l___private_Init_Data_Array_Basic_3__iterateRevMAux___main___at_Lean_Syntax_foldSepRevArgs___spec__1___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { +_start: +{ +lean_object* x_7; uint8_t x_8; +x_7 = lean_unsigned_to_nat(0u); +x_8 = lean_nat_dec_eq(x_4, x_7); +if (x_8 == 0) +{ +lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; +x_9 = lean_unsigned_to_nat(1u); +x_10 = lean_nat_sub(x_4, x_9); +lean_dec(x_4); +x_11 = lean_array_fget(x_3, x_10); +lean_inc(x_2); +x_12 = lean_apply_2(x_2, x_11, x_6); +x_4 = x_10; +x_5 = lean_box(0); +x_6 = x_12; +goto _start; +} +else +{ +lean_dec(x_4); +lean_dec(x_2); +return x_6; +} +} +} +lean_object* l___private_Init_Data_Array_Basic_3__iterateRevMAux___main___at_Lean_Syntax_foldSepRevArgs___spec__1(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l___private_Init_Data_Array_Basic_3__iterateRevMAux___main___at_Lean_Syntax_foldSepRevArgs___spec__1___rarg___boxed), 6, 0); +return x_2; +} +} +lean_object* l_Lean_Syntax_foldSepRevArgs___rarg(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; +x_4 = l_Lean_Syntax_getArgs(x_1); +x_5 = lean_unsigned_to_nat(2u); +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Array_empty___closed__1; +x_8 = l_Lean_Syntax_foldArgsAuxM___main___at_Lean_Syntax_foldSepRevArgsM___spec__1(x_5, x_4, x_6, x_7); +lean_dec(x_4); +x_9 = lean_array_get_size(x_8); +x_10 = l___private_Init_Data_Array_Basic_3__iterateRevMAux___main___at_Lean_Syntax_foldSepRevArgs___spec__1___rarg(x_1, x_2, x_8, x_9, lean_box(0), x_3); +lean_dec(x_8); +return x_10; +} +} +lean_object* l_Lean_Syntax_foldSepRevArgs(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_Lean_Syntax_foldSepRevArgs___rarg___boxed), 3, 0); +return x_2; +} +} +lean_object* l___private_Init_Data_Array_Basic_3__iterateRevMAux___main___at_Lean_Syntax_foldSepRevArgs___spec__1___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { +_start: +{ +lean_object* x_7; +x_7 = l___private_Init_Data_Array_Basic_3__iterateRevMAux___main___at_Lean_Syntax_foldSepRevArgs___spec__1___rarg(x_1, x_2, x_3, x_4, x_5, x_6); +lean_dec(x_3); +lean_dec(x_1); +return x_7; +} +} +lean_object* l_Lean_Syntax_foldSepRevArgs___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; +x_4 = l_Lean_Syntax_foldSepRevArgs___rarg(x_1, x_2, x_3); +lean_dec(x_1); +return x_4; +} +} lean_object* initialize_Init_Lean_Data_Trie(lean_object*); lean_object* initialize_Init_Lean_Data_Position(lean_object*); lean_object* initialize_Init_Lean_Syntax(lean_object*); diff --git a/stage0/stdlib/Init/Lean/Parser/Term.c b/stage0/stdlib/Init/Lean/Parser/Term.c index 21fd221d89..7924504bab 100644 --- a/stage0/stdlib/Init/Lean/Parser/Term.c +++ b/stage0/stdlib/Init/Lean/Parser/Term.c @@ -46,6 +46,7 @@ lean_object* l_Lean_Parser_Term_quotedName___closed__4; lean_object* l_Lean_Parser_Term_andthen___elambda__1___closed__2; lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_Parser_Term_doSeq___elambda__1___spec__2(uint8_t, uint8_t, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_app___elambda__1___closed__1; +lean_object* l_Lean_Parser_Term_bindOp___elambda__1(lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Parser_manyAux___main___closed__1; lean_object* l_Lean_Parser_Term_doPat___elambda__1___rarg(lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_explicitUniv___elambda__1___closed__10; @@ -296,7 +297,6 @@ lean_object* l_Lean_Parser_Term_anonymousCtor___elambda__1___closed__9; lean_object* l_Lean_Parser_Term_letPatDecl___closed__4; lean_object* l_Lean_Parser_Term_or___elambda__1___closed__4; lean_object* l_Lean_Parser_Term_quotedName___closed__5; -lean_object* l_Lean_Parser_Term_bind; lean_object* l_Lean_Parser_Term_match__syntax___closed__3; lean_object* l_Lean_Parser_manyAux___main___at_Lean_Parser_Term_match___elambda__1___spec__1___closed__1; extern lean_object* l_Lean_Parser_symbolNoWsFn___closed__1; @@ -510,10 +510,10 @@ lean_object* l_Lean_Parser_Term_ge___closed__1; lean_object* l_Lean_Parser_Term_prop___elambda__1___rarg___closed__2; lean_object* l_Lean_Parser_Term_arrayRef___closed__5; lean_object* l_Lean_Parser_manyAux___main___at_Lean_Parser_Term_letEqns___elambda__1___spec__2(lean_object*, uint8_t, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Parser_Term_bindOp___closed__3; lean_object* l_Lean_Parser_Term_add___elambda__1(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_show___elambda__1___rarg___closed__2; lean_object* l_Lean_Parser_Term_parser_x21___elambda__1(lean_object*); -lean_object* l_Lean_Parser_Term_bind___elambda__1(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_manyAux___main___at_Lean_Parser_Term_match___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_beq___elambda__1(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_bnot___elambda__1___rarg___closed__6; @@ -589,7 +589,6 @@ lean_object* l___private_Init_Lean_Parser_Parser_2__sepByFnAux___main___at_Lean_ lean_object* l_Lean_Parser_Term_namedPattern; lean_object* l_Lean_Parser_Term_seqLeft___elambda__1___closed__3; lean_object* l_Lean_Parser_Term_quotedName___elambda__1___rarg___closed__1; -lean_object* l_Lean_Parser_Term_bind___elambda__1___closed__4; lean_object* l_Lean_Parser_Term_match___elambda__1___closed__5; lean_object* l_Lean_Parser_Term_anonymousCtor___closed__3; lean_object* l_Lean_Parser_Term_suffices___elambda__1___rarg___closed__7; @@ -683,7 +682,6 @@ lean_object* l_Lean_Parser_noFirstTokenInfo(lean_object*); lean_object* l_Lean_Parser_Term_stxQuot___elambda__1___rarg___closed__1; lean_object* l_Lean_Parser_Term_letDecl; lean_object* l_Lean_Parser_Term_id___closed__2; -lean_object* l_Lean_Parser_Term_bind___elambda__1___closed__2; lean_object* l_Lean_Parser_Term_fun___elambda__1___closed__6; lean_object* l_Lean_Parser_Term_emptyC___elambda__1___boxed(lean_object*); extern lean_object* l_Lean_Parser_checkLeadingFn___closed__1; @@ -750,7 +748,6 @@ lean_object* l_Lean_Parser_manyAux___main___at_Lean_Parser_Term_letEqns___elambd lean_object* l_Lean_Parser_Term_bnot; lean_object* l_Lean_Parser_Term_doLet___closed__3; lean_object* l_Lean_Parser_Term_seq___elambda__1___closed__2; -lean_object* l_Lean_Parser_Term_bind___elambda__1___closed__1; lean_object* l_Lean_Parser_Term_bnot___closed__5; lean_object* l_Lean_Parser_Term_paren___closed__4; lean_object* l_Lean_Parser_Term_mul; @@ -808,6 +805,7 @@ lean_object* l_Lean_Parser_Term_le___closed__3; lean_object* l_Lean_Parser_Term_fcomp; lean_object* l_Lean_Parser_Term_depArrow___closed__4; lean_object* l_Lean_Parser_Term_subtype___closed__5; +lean_object* l___regBuiltinParser_Lean_Parser_Term_bindOp(lean_object*); lean_object* l_Lean_Parser_Term_doExpr___elambda__1___rarg___closed__2; lean_object* l_Lean_Parser_Term_seqRight___closed__2; lean_object* l_Lean_Parser_Term_matchAlt___elambda__1___closed__6; @@ -888,6 +886,7 @@ lean_object* l_Lean_Parser_Term_structInstSource___closed__3; lean_object* l___regBuiltinParser_Lean_Parser_Term_seq(lean_object*); lean_object* l_Lean_Parser_Term_equation; lean_object* l_Lean_Parser_Term_sub___elambda__1___closed__3; +lean_object* l_Lean_Parser_Term_bindOp___closed__2; lean_object* l_Lean_Parser_Term_namedPattern___elambda__1___rarg___closed__3; extern lean_object* l_Lean_Parser_Level_paren___elambda__1___rarg___closed__12; lean_object* l_Lean_Parser_Term_uminus___closed__5; @@ -907,6 +906,7 @@ lean_object* l_Lean_Parser_Term_stxQuot___elambda__1___rarg___closed__7; lean_object* l_Lean_Parser_Term_orM___elambda__1___closed__2; lean_object* l___regBuiltinParser_Lean_Parser_Term_anonymousCtor(lean_object*); lean_object* l_Lean_Parser_Term_lt___closed__1; +lean_object* l_Lean_Parser_Term_bindOp___closed__1; lean_object* l_Lean_Parser_Term_seq; lean_object* l_Lean_Parser_Term_depArrow___closed__1; lean_object* l_Lean_Parser_Term_bnot___elambda__1___rarg(lean_object*, lean_object*); @@ -1166,7 +1166,6 @@ lean_object* l_Lean_Parser_Term_match__syntax___elambda__1___closed__6; lean_object* l_Lean_Parser_Term_beq___closed__3; lean_object* l_Lean_Parser_Term_id___closed__1; lean_object* l_Lean_Parser_Term_arrayRef___closed__2; -lean_object* l_Lean_Parser_Term_bind___closed__1; lean_object* l_Lean_Parser_Term_stxQuot___closed__5; extern lean_object* l_Lean_Parser_appPrec; lean_object* l_Lean_Parser_Term_if___elambda__1___rarg___closed__1; @@ -1192,7 +1191,6 @@ lean_object* l_Lean_Parser_Term_arrayLit; lean_object* l_Lean_Parser_Term_mul___closed__2; lean_object* l_Lean_Parser_Term_mod___closed__2; lean_object* l_Lean_Parser_Term_leftArrow; -lean_object* l_Lean_Parser_Term_bind___elambda__1___closed__3; lean_object* l_Lean_Parser_Term_cdot___elambda__1___rarg___closed__6; lean_object* l_Lean_Parser_Term_namedPattern___closed__4; lean_object* l_Lean_Parser_Term_seq___elambda__1___closed__3; @@ -1208,6 +1206,7 @@ lean_object* l_Lean_Parser_Term_modN___elambda__1(lean_object*, lean_object*, le lean_object* l_Lean_Parser_Term_map___elambda__1(lean_object*, lean_object*, lean_object*); lean_object* l___regBuiltinParser_Lean_Parser_Term_le(lean_object*); lean_object* l_Lean_Parser_Term_seqRight; +lean_object* l_Lean_Parser_Term_bindOp; lean_object* l_Lean_Parser_Term_simpleBinder; lean_object* l_Lean_Parser_Term_matchAlt___elambda__1___closed__2; lean_object* l_Lean_Parser_Term_bor___elambda__1___closed__3; @@ -1419,7 +1418,6 @@ lean_object* l_Lean_Parser_Term_arrayRef___closed__1; lean_object* l_Lean_Parser_manyAux___main___at_Lean_Parser_Term_letEqns___elambda__1___spec__1___closed__1; lean_object* l_Lean_Parser_builtinTermParsingTable; lean_object* l_Lean_Parser_Term_fromTerm___closed__5; -lean_object* l___regBuiltinParser_Lean_Parser_Term_bind(lean_object*); lean_object* l_Lean_Parser_Term_doExpr___elambda__1___boxed(lean_object*); lean_object* l_Lean_Parser_Term_parser_x21___elambda__1___rarg___closed__7; lean_object* l_Lean_Parser_Term_optType___elambda__1___boxed(lean_object*); @@ -1485,6 +1483,7 @@ lean_object* l_String_trim(lean_object*); lean_object* l_Lean_Parser_Term_namedArgument___elambda__1___rarg(lean_object*, lean_object*); lean_object* l___regBuiltinParser_Lean_Parser_Term_prop(lean_object*); lean_object* l___regBuiltinParser_Lean_Parser_Term_antiquot(lean_object*); +lean_object* l_Lean_Parser_Term_bindOp___elambda__1___closed__4; lean_object* l_Lean_Parser_Term_explicitBinder___closed__9; lean_object* l_Lean_Parser_Term_letEqns___closed__4; lean_object* l_Lean_Parser_Term_pow___closed__3; @@ -1495,7 +1494,6 @@ lean_object* l_Lean_Parser_Term_if___closed__9; lean_object* l_Lean_Parser_Term_doLet___closed__1; lean_object* l___regBuiltinParser_Lean_Parser_Term_modN(lean_object*); lean_object* l_Lean_Parser_Term_typeSpec___closed__1; -lean_object* l_Lean_Parser_Term_bind___closed__2; lean_object* l_Lean_Parser_Term_parser_x21___elambda__1___rarg___closed__5; lean_object* l_Lean_Parser_Term_proj___elambda__1___closed__6; lean_object* l_Lean_Parser_Term_namedArgument___closed__6; @@ -1643,6 +1641,7 @@ lean_object* l_Lean_Parser_unicodeSymbolInfo(lean_object*, lean_object*, lean_ob lean_object* l_Lean_Parser_Term_not___elambda__1___rarg___closed__7; lean_object* l_Lean_Parser_Term_borrowed___closed__2; lean_object* l_Lean_Parser_Term_mapRev___elambda__1___closed__4; +lean_object* l_Lean_Parser_Term_bindOp___elambda__1___closed__1; lean_object* l_Lean_Parser_Term_dollar___elambda__1___closed__4; lean_object* l_Lean_Parser_Term_suffices; lean_object* l_Lean_Parser_Term_mapConstRev; @@ -1674,6 +1673,7 @@ lean_object* l_Lean_Parser_Term_subtype___closed__4; lean_object* l_Lean_Parser_Term_nomatch___closed__3; lean_object* l_Lean_Parser_Term_orM___elambda__1___closed__3; lean_object* l_Lean_Parser_Term_structInstField___elambda__1___rarg(lean_object*, lean_object*); +lean_object* l_Lean_Parser_Term_bindOp___elambda__1___closed__3; lean_object* l_Lean_Parser_Term_add___closed__3; lean_object* l_Lean_Parser_Term_structInst; lean_object* l_Lean_Parser_Term_type___elambda__1___boxed(lean_object*); @@ -1712,6 +1712,7 @@ lean_object* l_Lean_Parser_Term_structInst___closed__11; lean_object* l_Lean_Parser_Term_mapConstRev___closed__1; lean_object* l_Lean_Parser_Term_forall___elambda__1___closed__8; lean_object* l_Lean_Parser_charLitFn___rarg(lean_object*, lean_object*); +lean_object* l_Lean_Parser_Term_bindOp___elambda__1___closed__2; lean_object* l_Lean_Parser_Term_borrowed___elambda__1___rarg___closed__1; lean_object* l_Lean_Parser_Term_do___elambda__1(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_letDecl___closed__3; @@ -1782,7 +1783,6 @@ lean_object* l_Lean_Parser_Term_not___elambda__1___rarg___closed__5; lean_object* l_Lean_Parser_Term_listLit___elambda__1___closed__6; lean_object* l_Lean_Parser_Term_letEqns___closed__6; extern lean_object* l_Lean_Parser_Level_paren___closed__1; -lean_object* l_Lean_Parser_Term_bind___closed__3; lean_object* l_Lean_Parser_fieldIdxFn(lean_object*, lean_object*); lean_object* l_Lean_Parser_Term_arrayRef___closed__3; lean_object* l_Lean_Parser_Term_hole___closed__1; @@ -29241,25 +29241,25 @@ x_5 = l_Lean_Parser_addBuiltinTrailingParser(x_2, x_3, x_4, x_1); return x_5; } } -lean_object* _init_l_Lean_Parser_Term_bind___elambda__1___closed__1() { +lean_object* _init_l_Lean_Parser_Term_bindOp___elambda__1___closed__1() { _start: { lean_object* x_1; -x_1 = lean_mk_string("bind"); +x_1 = lean_mk_string("bindOp"); return x_1; } } -lean_object* _init_l_Lean_Parser_Term_bind___elambda__1___closed__2() { +lean_object* _init_l_Lean_Parser_Term_bindOp___elambda__1___closed__2() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = l_Lean_Parser_Term_explicitUniv___elambda__1___closed__2; -x_2 = l_Lean_Parser_Term_bind___elambda__1___closed__1; +x_2 = l_Lean_Parser_Term_bindOp___elambda__1___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; } } -lean_object* _init_l_Lean_Parser_Term_bind___elambda__1___closed__3() { +lean_object* _init_l_Lean_Parser_Term_bindOp___elambda__1___closed__3() { _start: { lean_object* x_1; @@ -29267,21 +29267,21 @@ x_1 = lean_mk_string(" >>= "); return x_1; } } -lean_object* _init_l_Lean_Parser_Term_bind___elambda__1___closed__4() { +lean_object* _init_l_Lean_Parser_Term_bindOp___elambda__1___closed__4() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Term_bind___elambda__1___closed__3; +x_1 = l_Lean_Parser_Term_bindOp___elambda__1___closed__3; x_2 = lean_unsigned_to_nat(55u); x_3 = l_Lean_Parser_Term_infixR(x_1, x_2); return x_3; } } -lean_object* l_Lean_Parser_Term_bind___elambda__1(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +lean_object* l_Lean_Parser_Term_bindOp___elambda__1(lean_object* x_1, lean_object* x_2, lean_object* x_3) { _start: { lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; -x_4 = l_Lean_Parser_Term_bind___elambda__1___closed__4; +x_4 = l_Lean_Parser_Term_bindOp___elambda__1___closed__4; x_5 = lean_ctor_get(x_4, 1); lean_inc(x_5); x_6 = lean_ctor_get(x_3, 0); @@ -29289,58 +29289,58 @@ lean_inc(x_6); x_7 = lean_array_get_size(x_6); lean_dec(x_6); x_8 = lean_apply_3(x_5, x_1, x_2, x_3); -x_9 = l_Lean_Parser_Term_bind___elambda__1___closed__2; +x_9 = l_Lean_Parser_Term_bindOp___elambda__1___closed__2; x_10 = l_Lean_Parser_ParserState_mkNode(x_8, x_9, x_7); return x_10; } } -lean_object* _init_l_Lean_Parser_Term_bind___closed__1() { +lean_object* _init_l_Lean_Parser_Term_bindOp___closed__1() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; -x_1 = l_Lean_Parser_Term_bind___elambda__1___closed__4; +x_1 = l_Lean_Parser_Term_bindOp___elambda__1___closed__4; x_2 = lean_ctor_get(x_1, 0); lean_inc(x_2); -x_3 = l_Lean_Parser_Term_bind___elambda__1___closed__2; +x_3 = l_Lean_Parser_Term_bindOp___elambda__1___closed__2; x_4 = l_Lean_Parser_nodeInfo(x_3, x_2); return x_4; } } -lean_object* _init_l_Lean_Parser_Term_bind___closed__2() { +lean_object* _init_l_Lean_Parser_Term_bindOp___closed__2() { _start: { lean_object* x_1; -x_1 = lean_alloc_closure((void*)(l_Lean_Parser_Term_bind___elambda__1), 3, 0); +x_1 = lean_alloc_closure((void*)(l_Lean_Parser_Term_bindOp___elambda__1), 3, 0); return x_1; } } -lean_object* _init_l_Lean_Parser_Term_bind___closed__3() { +lean_object* _init_l_Lean_Parser_Term_bindOp___closed__3() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Parser_Term_bind___closed__1; -x_2 = l_Lean_Parser_Term_bind___closed__2; +x_1 = l_Lean_Parser_Term_bindOp___closed__1; +x_2 = l_Lean_Parser_Term_bindOp___closed__2; x_3 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_3, 0, x_1); lean_ctor_set(x_3, 1, x_2); return x_3; } } -lean_object* _init_l_Lean_Parser_Term_bind() { +lean_object* _init_l_Lean_Parser_Term_bindOp() { _start: { lean_object* x_1; -x_1 = l_Lean_Parser_Term_bind___closed__3; +x_1 = l_Lean_Parser_Term_bindOp___closed__3; return x_1; } } -lean_object* l___regBuiltinParser_Lean_Parser_Term_bind(lean_object* x_1) { +lean_object* l___regBuiltinParser_Lean_Parser_Term_bindOp(lean_object* x_1) { _start: { lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; x_2 = l_Lean_Parser_builtinTermParsingTable; -x_3 = l_Lean_Parser_Term_bind___elambda__1___closed__2; -x_4 = l_Lean_Parser_Term_bind; +x_3 = l_Lean_Parser_Term_bindOp___elambda__1___closed__2; +x_4 = l_Lean_Parser_Term_bindOp; x_5 = l_Lean_Parser_addBuiltinTrailingParser(x_2, x_3, x_4, x_1); return x_5; } @@ -32833,23 +32833,23 @@ lean_mark_persistent(l_Lean_Parser_Term_andthen); res = l___regBuiltinParser_Lean_Parser_Term_andthen(lean_io_mk_world()); if (lean_io_result_is_error(res)) return res; lean_dec_ref(res); -l_Lean_Parser_Term_bind___elambda__1___closed__1 = _init_l_Lean_Parser_Term_bind___elambda__1___closed__1(); -lean_mark_persistent(l_Lean_Parser_Term_bind___elambda__1___closed__1); -l_Lean_Parser_Term_bind___elambda__1___closed__2 = _init_l_Lean_Parser_Term_bind___elambda__1___closed__2(); -lean_mark_persistent(l_Lean_Parser_Term_bind___elambda__1___closed__2); -l_Lean_Parser_Term_bind___elambda__1___closed__3 = _init_l_Lean_Parser_Term_bind___elambda__1___closed__3(); -lean_mark_persistent(l_Lean_Parser_Term_bind___elambda__1___closed__3); -l_Lean_Parser_Term_bind___elambda__1___closed__4 = _init_l_Lean_Parser_Term_bind___elambda__1___closed__4(); -lean_mark_persistent(l_Lean_Parser_Term_bind___elambda__1___closed__4); -l_Lean_Parser_Term_bind___closed__1 = _init_l_Lean_Parser_Term_bind___closed__1(); -lean_mark_persistent(l_Lean_Parser_Term_bind___closed__1); -l_Lean_Parser_Term_bind___closed__2 = _init_l_Lean_Parser_Term_bind___closed__2(); -lean_mark_persistent(l_Lean_Parser_Term_bind___closed__2); -l_Lean_Parser_Term_bind___closed__3 = _init_l_Lean_Parser_Term_bind___closed__3(); -lean_mark_persistent(l_Lean_Parser_Term_bind___closed__3); -l_Lean_Parser_Term_bind = _init_l_Lean_Parser_Term_bind(); -lean_mark_persistent(l_Lean_Parser_Term_bind); -res = l___regBuiltinParser_Lean_Parser_Term_bind(lean_io_mk_world()); +l_Lean_Parser_Term_bindOp___elambda__1___closed__1 = _init_l_Lean_Parser_Term_bindOp___elambda__1___closed__1(); +lean_mark_persistent(l_Lean_Parser_Term_bindOp___elambda__1___closed__1); +l_Lean_Parser_Term_bindOp___elambda__1___closed__2 = _init_l_Lean_Parser_Term_bindOp___elambda__1___closed__2(); +lean_mark_persistent(l_Lean_Parser_Term_bindOp___elambda__1___closed__2); +l_Lean_Parser_Term_bindOp___elambda__1___closed__3 = _init_l_Lean_Parser_Term_bindOp___elambda__1___closed__3(); +lean_mark_persistent(l_Lean_Parser_Term_bindOp___elambda__1___closed__3); +l_Lean_Parser_Term_bindOp___elambda__1___closed__4 = _init_l_Lean_Parser_Term_bindOp___elambda__1___closed__4(); +lean_mark_persistent(l_Lean_Parser_Term_bindOp___elambda__1___closed__4); +l_Lean_Parser_Term_bindOp___closed__1 = _init_l_Lean_Parser_Term_bindOp___closed__1(); +lean_mark_persistent(l_Lean_Parser_Term_bindOp___closed__1); +l_Lean_Parser_Term_bindOp___closed__2 = _init_l_Lean_Parser_Term_bindOp___closed__2(); +lean_mark_persistent(l_Lean_Parser_Term_bindOp___closed__2); +l_Lean_Parser_Term_bindOp___closed__3 = _init_l_Lean_Parser_Term_bindOp___closed__3(); +lean_mark_persistent(l_Lean_Parser_Term_bindOp___closed__3); +l_Lean_Parser_Term_bindOp = _init_l_Lean_Parser_Term_bindOp(); +lean_mark_persistent(l_Lean_Parser_Term_bindOp); +res = l___regBuiltinParser_Lean_Parser_Term_bindOp(lean_io_mk_world()); if (lean_io_result_is_error(res)) return res; lean_dec_ref(res); l_Lean_Parser_Term_mapRev___elambda__1___closed__1 = _init_l_Lean_Parser_Term_mapRev___elambda__1___closed__1(); diff --git a/stage0/stdlib/Init/Lean/Syntax.c b/stage0/stdlib/Init/Lean/Syntax.c index 7e76abc578..2fb7613544 100644 --- a/stage0/stdlib/Init/Lean/Syntax.c +++ b/stage0/stdlib/Init/Lean/Syntax.c @@ -152,7 +152,6 @@ lean_object* l_Lean_SyntaxNode_modifyArgs(lean_object*, lean_object*); lean_object* l_Lean_SyntaxNode_getArgs___boxed(lean_object*); lean_object* l_Lean_unreachIsNodeIdent___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_SourceInfo_appendToLeading(lean_object*, lean_object*); -lean_object* l_List_redLength___main___rarg(lean_object*); lean_object* l_Lean_Syntax_getTailInfo___main___boxed(lean_object*); lean_object* l_Lean_nullKind___closed__1; lean_object* l_Lean_Syntax_ifNode___rarg(lean_object*, lean_object*, lean_object*); @@ -234,7 +233,6 @@ lean_object* l_Lean_Syntax_getArg(lean_object*, lean_object*); lean_object* l_Lean_Syntax_toNat(lean_object*); extern lean_object* l_Lean_Format_paren___closed__3; lean_object* l_Lean_Syntax_asNode(lean_object*); -lean_object* l_List_toArrayAux___main___rarg(lean_object*, lean_object*); lean_object* l_Lean_unreachIsNodeIdent(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_System_FilePath_dirName___closed__1; lean_object* l_unsafeCast(lean_object*, lean_object*, lean_object*, lean_object*); @@ -4006,30 +4004,22 @@ return x_3; lean_object* l_Lean_mkNode(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; -x_3 = l_List_redLength___main___rarg(x_2); -x_4 = lean_mk_empty_array_with_capacity(x_3); -lean_dec(x_3); -x_5 = l_List_toArrayAux___main___rarg(x_2, x_4); -x_6 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_6, 0, x_1); -lean_ctor_set(x_6, 1, x_5); -return x_6; +lean_object* x_3; +x_3 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_3, 0, x_1); +lean_ctor_set(x_3, 1, x_2); +return x_3; } } lean_object* l_Lean_mkNullNode(lean_object* x_1) { _start: { -lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; -x_2 = l_List_redLength___main___rarg(x_1); -x_3 = lean_mk_empty_array_with_capacity(x_2); -lean_dec(x_2); -x_4 = l_List_toArrayAux___main___rarg(x_1, x_3); -x_5 = l_Lean_nullKind; -x_6 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_6, 0, x_5); -lean_ctor_set(x_6, 1, x_4); -return x_6; +lean_object* x_2; lean_object* x_3; +x_2 = l_Lean_nullKind; +x_3 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_3, 0, x_2); +lean_ctor_set(x_3, 1, x_1); +return x_3; } } lean_object* _init_l_Lean_mkOptionalNode___closed__1() {