From 8094d35366eaf511ca7ce4be074948a4169f1da7 Mon Sep 17 00:00:00 2001 From: Leonardo de Moura Date: Wed, 12 Feb 2020 17:20:46 -0800 Subject: [PATCH] chore: update stage0 --- stage0/src/Init/Lean/Elab/App.lean | 34 +- stage0/src/Init/Lean/Elab/Binders.lean | 37 +- stage0/src/Init/Lean/Elab/Command.lean | 27 + stage0/src/Init/Lean/Message.lean | 3 + stage0/src/Init/Lean/Meta/ExprDefEq.lean | 2 +- stage0/stdlib/Init/Lean/Elab/App.c | 4895 +++++++++----------- stage0/stdlib/Init/Lean/Elab/Binders.c | 5354 +++++++++++++--------- stage0/stdlib/Init/Lean/Elab/Command.c | 1371 ++++++ stage0/stdlib/Init/Lean/Message.c | 228 + stage0/stdlib/Init/Lean/Meta/ExprDefEq.c | 824 ++-- 10 files changed, 7472 insertions(+), 5303 deletions(-) diff --git a/stage0/src/Init/Lean/Elab/App.lean b/stage0/src/Init/Lean/Elab/App.lean index 313b603e40..bb61f27697 100644 --- a/stage0/src/Init/Lean/Elab/App.lean +++ b/stage0/src/Init/Lean/Elab/App.lean @@ -271,7 +271,8 @@ private def elabAppArgs (ref : Syntax) (f : Expr) (namedArgs : Array NamedArg) ( fType ← inferType ref f; fType ← instantiateMVars ref fType; trace `Elab.app.args ref $ fun _ => "explicit: " ++ toString explicit ++ ", " ++ f ++ " : " ++ fType; -tryPostponeIfMVar fType; +unless (namedArgs.isEmpty && args.isEmpty) $ + tryPostponeIfMVar fType; elabAppArgsAux {ref := ref, args := args, expectedType? := expectedType?, explicit := explicit, namedArgs := namedArgs } f fType /-- Auxiliary inductive datatype that represents the resolution of an `LVal`. -/ @@ -493,17 +494,8 @@ private partial def elabAppFn (ref : Syntax) : Syntax → List LVal → Array Na -- Remark: `id.` should already have been expanded us ← if us.isEmpty then pure [] else elabExplicitUniv (us.get! 0); elabAppFnId ref id us lvals namedArgs args expectedType? explicit acc - | `(@($f:fun)) => do - s ← observing $ do { - if lvals.isEmpty && namedArgs.isEmpty && args.isEmpty then - elabFunCore f expectedType? true - else do - f ← elabFunCore f none true; - elabAppLVals ref f lvals namedArgs args expectedType? true - }; - pure $ acc.push s - | `(@$f) => - elabAppFn f lvals namedArgs args expectedType? true acc + | `(@$id:id) => + elabAppFn id lvals namedArgs args expectedType? true acc | _ => do s ← observing $ do { f ← elabTerm f none; @@ -579,7 +571,18 @@ def elabAtom : TermElab := fun stx expectedType? => elabAppAux stx stx #[] #[] expectedType? @[builtinTermElab «id»] def elabId : TermElab := elabAtom -@[builtinTermElab explicit] def elabExplicit : TermElab := elabAtom + +@[builtinTermElab explicit] def elabExplicit : TermElab := +fun stx expectedType? => match_syntax stx with + | `(@$f:fun) => elabFunCore f expectedType? true + | `(@($f:fun)) => elabFunCore f expectedType? true + | `(@($f:fun : $type)) => do + type ← elabType type; + f ← elabFunCore f type true; + ensureHasType stx type f + | `(@$id:id) => elabAtom stx expectedType? + | _ => throwUnsupportedSyntax + @[builtinTermElab choice] def elabChoice : TermElab := elabAtom @[builtinTermElab proj] def elabProj : TermElab := elabAtom @[builtinTermElab arrayRef] def elabArrayRef : TermElab := elabAtom @@ -587,11 +590,6 @@ fun stx expectedType? => elabAppAux stx stx #[] #[] expectedType? but it is nice to have a handler for them because it allows `macros` to insert them into terms. -/ @[builtinTermElab ident] def elabRawIdent : TermElab := elabAtom -@[builtinTermElab «fun»] def elabFun : TermElab := -fun stx expectedType? => do - f ← elabFunCore stx expectedType? false; - elabAppArgs stx f #[] #[] none false - @[builtinTermElab sortApp] def elabSortApp : TermElab := fun stx _ => do u ← elabLevel (stx.getArg 1); diff --git a/stage0/src/Init/Lean/Elab/Binders.lean b/stage0/src/Init/Lean/Elab/Binders.lean index 15fd7c7c2d..0c14703ad8 100644 --- a/stage0/src/Init/Lean/Elab/Binders.lean +++ b/stage0/src/Init/Lean/Elab/Binders.lean @@ -243,7 +243,6 @@ expandFunBindersAux binders body 0 #[] namespace FunBinders structure State := -(implicitArgs : Array Expr := #[]) (fvars : Array Expr := #[]) (lctx : LocalContext) (localInsts : LocalInstances) @@ -267,20 +266,29 @@ private partial def elabFunBinderViews (binderViews : Array BinderView) : Nat if h : i < binderViews.size then let binderView := binderViews.get ⟨i, h⟩; withLCtx s.lctx s.localInsts $ do + let s := if binderView.bi.isExplicit then { explicit := true, .. s } else s; type ← elabType binderView.type; - fvarId ← mkFreshFVarId; + fvarId ← mkFreshFVarId; let fvar := mkFVar fvarId; - let fvars := s.fvars.push fvar; - -- dbgTrace (toString binderView.id.getId ++ " : " ++ toString type); - let lctx := s.lctx.mkLocalDecl fvarId binderView.id.getId type binderView.bi; - s ← propagateExpectedType binderView.id fvar type s; - className? ← isClass binderView.type type; - match className? with - | none => elabFunBinderViews (i+1) { fvars := fvars, lctx := lctx, .. s } - | some className => do - resetSynthInstanceCache; - let localInsts := s.localInsts.push { className := className, fvar := mkFVar fvarId }; - elabFunBinderViews (i+1) { fvars := fvars, lctx := lctx, localInsts := localInsts, .. s } + let s := { fvars := s.fvars.push fvar, .. s }; + let continue (s : State) : TermElabM State := do { + className? ← isClass binderView.type type; + match className? with + | none => elabFunBinderViews (i+1) s + | some className => do + resetSynthInstanceCache; + let localInsts := s.localInsts.push { className := className, fvar := mkFVar fvarId }; + elabFunBinderViews (i+1) { localInsts := localInsts, .. s } + }; + if s.explicit then do + -- dbgTrace (toString binderView.id.getId ++ " : " ++ toString type); + let lctx := s.lctx.mkLocalDecl fvarId binderView.id.getId type binderView.bi; + s ← propagateExpectedType binderView.id fvar type s; + continue { lctx := lctx, .. s } + else do + mvar ← mkFreshExprMVar binderView.id type; + let lctx := s.lctx.mkLetDecl fvarId binderView.id.getId type mvar; + continue { lctx := lctx, .. s } else pure s @@ -314,6 +322,9 @@ elabFunBinders binders expectedType? explicit $ fun xs expectedType? => do { mkLambda stx xs e } +@[builtinTermElab «fun»] def elabFun : TermElab := +fun stx expectedType? => elabFunCore stx expectedType? false + /- Recall that ``` diff --git a/stage0/src/Init/Lean/Elab/Command.lean b/stage0/src/Init/Lean/Elab/Command.lean index 17c127d84c..0176c77b63 100644 --- a/stage0/src/Init/Lean/Elab/Command.lean +++ b/stage0/src/Init/Lean/Elab/Command.lean @@ -522,6 +522,33 @@ fun stx => do logInfo stx (e ++ " : " ++ type); pure () +def hasNoErrorMessages : CommandElabM Bool := do +s ← get; pure $ !s.messages.hasErrors + +def failIfSucceeds {α} (ref : Syntax) (x : CommandElabM α) : CommandElabM Unit := do +let resetMessages : CommandElabM MessageLog := do { + s ← get; + let messages := s.messages; + modify $ fun s => { messages := {}, .. s }; + pure messages +}; +let restoreMessages (prevMessages : MessageLog) : CommandElabM Unit := do { + modify $ fun s => { messages := prevMessages ++ s.messages.errorsToWarnings, .. s } +}; +prevMessages ← resetMessages; +succeeded ← finally + (catch + (do x; hasNoErrorMessages) + (fun ex => match ex with + | Exception.error msg => do modify (fun s => { messages := s.messages.add msg, .. s }); pure false + | Exception.unsupportedSyntax => do logError ref "unsupported syntax"; pure false)) + (restoreMessages prevMessages); +when succeeded $ + throwError ref "unexpected success" + +@[builtinCommandElab «check_failure»] def elabCheckFailure : CommandElab := +fun stx => failIfSucceeds stx $ elabCheck stx + @[builtinCommandElab «synth»] def elabSynth : CommandElab := fun stx => do let ref := stx; diff --git a/stage0/src/Init/Lean/Message.lean b/stage0/src/Init/Lean/Message.lean index eb5faea33f..5ee4707a15 100644 --- a/stage0/src/Init/Lean/Message.lean +++ b/stage0/src/Init/Lean/Message.lean @@ -166,6 +166,9 @@ log.msgs.any $ fun m => match m.severity with | MessageSeverity.error => true | _ => false +def errorsToWarnings (log : MessageLog) : MessageLog := +{ msgs := log.msgs.map (fun m => match m.severity with | MessageSeverity.error => { severity := MessageSeverity.warning, .. m} | _ => m) } + def forM {m : Type → Type} [Monad m] (log : MessageLog) (f : Message → m Unit) : m Unit := log.msgs.forM f diff --git a/stage0/src/Init/Lean/Meta/ExprDefEq.lean b/stage0/src/Init/Lean/Meta/ExprDefEq.lean index b370077c8c..632ae6c234 100644 --- a/stage0/src/Init/Lean/Meta/ExprDefEq.lean +++ b/stage0/src/Init/Lean/Meta/ExprDefEq.lean @@ -611,7 +611,7 @@ private partial def processAssignmentAux (mvar : Expr) (mvarDecl : MetavarDecl) arg ← simpAssignmentArg arg; let args := args.set ⟨i, h⟩ arg; let useConstApprox : Unit → MetaM Bool := fun _ => - if cfg.constApprox then + if cfg.constApprox || (not args.isEmpty && not v.isApp) then processConstApprox mvar args.size v else pure false; diff --git a/stage0/stdlib/Init/Lean/Elab/App.c b/stage0/stdlib/Init/Lean/Elab/App.c index 9974c79ace..e87ff6b2ec 100644 --- a/stage0/stdlib/Init/Lean/Elab/App.c +++ b/stage0/stdlib/Init/Lean/Elab/App.c @@ -40,7 +40,6 @@ extern lean_object* l_Lean_MessageData_ofList___closed__3; lean_object* l_Array_eraseIdx___rarg(lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_inferType(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_FindMVar_main___main___at___private_Init_Lean_Elab_App_7__hasTypeMVar___spec__3(lean_object*, lean_object*, lean_object*); -lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabFun___closed__1; lean_object* l___private_Init_Lean_Elab_App_17__mkBaseProjections___closed__1; lean_object* l___private_Init_Lean_Elab_App_17__mkBaseProjections___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Format_pretty(lean_object*, lean_object*); @@ -48,11 +47,9 @@ uint8_t lean_name_eq(lean_object*, lean_object*); lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabId___closed__1; extern lean_object* l_Option_get_x21___rarg___closed__3; lean_object* l___private_Init_Lean_Elab_App_17__mkBaseProjections___closed__2; -lean_object* l_Lean_Elab_Term_elabFun(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabId___closed__2; lean_object* lean_array_fswap(lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_identKind___closed__2; -lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabFun___closed__2; extern lean_object* l_Prod_HasRepr___rarg___closed__1; lean_object* l_Array_contains___at___private_Init_Lean_Elab_App_7__hasTypeMVar___spec__1___boxed(lean_object*, lean_object*); lean_object* l___private_Init_Lean_Elab_App_27__expandApp(lean_object*, lean_object*, lean_object*); @@ -90,6 +87,7 @@ lean_object* l_Lean_Expr_getAppFn___main(lean_object*); lean_object* l_PersistentArray_push___rarg(lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_isTypeFormer(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Init_Lean_Elab_App_12__elabAppArgs___closed__7; +extern lean_object* l_Lean_Parser_Term_typeAscription___elambda__1___closed__2; lean_object* l_Lean_Elab_Term_synthesizeAppInstMVars(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Init_Lean_Elab_App_18__addLValArg___main___closed__4; lean_object* l___private_Init_Lean_Elab_App_20__elabAppLVals(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, uint8_t, lean_object*, lean_object*); @@ -108,6 +106,7 @@ lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabRawIdent___closed__3; extern lean_object* l_Lean_mkAppStx___closed__7; lean_object* lean_nat_add(lean_object*, lean_object*); lean_object* l___private_Init_Lean_Elab_App_16__resolveLVal(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Term_ensureHasType(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Init_Lean_Elab_App_5__isAutoOrOptParam___boxed(lean_object*); lean_object* l___private_Init_Lean_Elab_App_16__resolveLVal___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_foldlStepMAux___main___at_Lean_Syntax_foldSepRevArgsM___spec__1(lean_object*, lean_object*, lean_object*, lean_object*); @@ -130,7 +129,6 @@ extern lean_object* l_Lean_Parser_Term_proj___elambda__1___closed__2; lean_object* l___private_Init_Lean_Elab_App_22__elabAppFn___main___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Array_HasRepr___rarg___closed__1; lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabArrayRef___closed__1; -lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabFun___closed__3; lean_object* l_Lean_Elab_Term_elabLevel(lean_object*, lean_object*, lean_object*); uint8_t l___private_Init_Lean_Elab_App_7__hasTypeMVar(lean_object*, lean_object*); lean_object* lean_array_fget(lean_object*, lean_object*); @@ -193,7 +191,6 @@ extern lean_object* l_Lean_choiceKind; lean_object* l___private_Init_Lean_Elab_App_18__addLValArg___main___closed__12; lean_object* l___private_Init_Lean_Elab_App_19__elabAppLValsAux(lean_object*, lean_object*, lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_throwError___rarg(lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabFun(lean_object*); lean_object* l___private_Init_Lean_Elab_App_18__addLValArg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Parser_Term_fun___elambda__1___closed__2; lean_object* l___private_Init_Lean_Elab_App_12__elabAppArgs(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, uint8_t, lean_object*, lean_object*); @@ -319,6 +316,7 @@ lean_object* l_Lean_Elab_Term_tryPostponeIfMVar(lean_object*, lean_object*, lean lean_object* l___private_Init_Lean_Elab_App_14__resolveLValAux___closed__15; lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabApp___closed__3; lean_object* l___private_Init_Lean_Elab_App_24__toMessageData___closed__2; +lean_object* l_Lean_Elab_Term_elabType(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_mkForall(lean_object*, uint8_t, lean_object*, lean_object*); lean_object* l___private_Init_Lean_Elab_App_19__elabAppLValsAux___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_mkAppStx___closed__9; @@ -9461,7 +9459,7 @@ lean_inc(x_2); x_9 = l_Lean_Elab_Term_inferType(x_1, 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_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; uint8_t x_19; +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_46; lean_object* x_47; lean_object* x_48; lean_object* x_49; uint8_t x_50; x_10 = lean_ctor_get(x_9, 0); lean_inc(x_10); x_11 = lean_ctor_get(x_9, 1); @@ -9474,195 +9472,105 @@ lean_inc(x_13); x_14 = lean_ctor_get(x_12, 1); lean_inc(x_14); lean_dec(x_12); -x_15 = l_Lean_Elab_Term_getOptions(x_7, x_14); -x_16 = lean_ctor_get(x_15, 0); -lean_inc(x_16); -x_17 = lean_ctor_get(x_15, 1); -lean_inc(x_17); -lean_dec(x_15); -x_18 = l___private_Init_Lean_Elab_App_12__elabAppArgs___closed__2; -x_19 = l_Lean_checkTraceOption(x_16, x_18); -lean_dec(x_16); -if (x_19 == 0) +x_46 = l_Lean_Elab_Term_getOptions(x_7, x_14); +x_47 = lean_ctor_get(x_46, 0); +lean_inc(x_47); +x_48 = lean_ctor_get(x_46, 1); +lean_inc(x_48); +lean_dec(x_46); +x_49 = l___private_Init_Lean_Elab_App_12__elabAppArgs___closed__2; +x_50 = l_Lean_checkTraceOption(x_47, x_49); +lean_dec(x_47); +if (x_50 == 0) { -lean_object* x_20; -x_20 = l_Lean_Elab_Term_tryPostponeIfMVar(x_13, x_7, x_17); -if (lean_obj_tag(x_20) == 0) -{ -lean_object* x_21; lean_object* x_22; lean_object* x_23; uint8_t x_24; lean_object* x_25; lean_object* x_26; -x_21 = lean_ctor_get(x_20, 1); -lean_inc(x_21); -lean_dec(x_20); -x_22 = lean_unsigned_to_nat(0u); -x_23 = l_Array_empty___closed__1; -x_24 = 0; -x_25 = lean_alloc_ctor(0, 7, 2); -lean_ctor_set(x_25, 0, x_1); -lean_ctor_set(x_25, 1, x_4); -lean_ctor_set(x_25, 2, x_5); -lean_ctor_set(x_25, 3, x_22); -lean_ctor_set(x_25, 4, x_3); -lean_ctor_set(x_25, 5, x_23); -lean_ctor_set(x_25, 6, x_23); -lean_ctor_set_uint8(x_25, sizeof(void*)*7, x_6); -lean_ctor_set_uint8(x_25, sizeof(void*)*7 + 1, x_24); -x_26 = l___private_Init_Lean_Elab_App_11__elabAppArgsAux___main(x_25, x_2, x_13, x_7, x_21); -return x_26; +x_15 = x_48; +goto block_45; } else { -uint8_t x_27; -lean_dec(x_13); -lean_dec(x_7); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_27 = !lean_is_exclusive(x_20); -if (x_27 == 0) -{ -return x_20; -} -else -{ -lean_object* x_28; lean_object* x_29; lean_object* x_30; -x_28 = lean_ctor_get(x_20, 0); -x_29 = lean_ctor_get(x_20, 1); -lean_inc(x_29); -lean_inc(x_28); -lean_dec(x_20); -x_30 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_30, 0, x_28); -lean_ctor_set(x_30, 1, x_29); -return x_30; -} -} -} -else -{ -lean_object* x_31; lean_object* x_32; +lean_object* x_51; lean_object* x_52; lean_inc(x_2); -x_31 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_31, 0, x_2); +x_51 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_51, 0, x_2); lean_inc(x_13); -x_32 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_32, 0, x_13); +x_52 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_52, 0, x_13); if (x_6 == 0) { -lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; -x_33 = l___private_Init_Lean_Elab_App_12__elabAppArgs___closed__8; -x_34 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_34, 0, x_33); -lean_ctor_set(x_34, 1, x_31); -x_35 = l___private_Init_Lean_Meta_ExprDefEq_7__checkTypesAndAssign___closed__7; -x_36 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_36, 0, x_34); -lean_ctor_set(x_36, 1, x_35); -x_37 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_37, 0, x_36); -lean_ctor_set(x_37, 1, x_32); -x_38 = l_Lean_Elab_Term_logTrace(x_18, x_1, x_37, x_7, x_17); -x_39 = lean_ctor_get(x_38, 1); -lean_inc(x_39); -lean_dec(x_38); -x_40 = l_Lean_Elab_Term_tryPostponeIfMVar(x_13, x_7, x_39); -if (lean_obj_tag(x_40) == 0) -{ -lean_object* x_41; lean_object* x_42; lean_object* x_43; uint8_t x_44; lean_object* x_45; lean_object* x_46; -x_41 = lean_ctor_get(x_40, 1); -lean_inc(x_41); -lean_dec(x_40); -x_42 = lean_unsigned_to_nat(0u); -x_43 = l_Array_empty___closed__1; -x_44 = 0; -x_45 = lean_alloc_ctor(0, 7, 2); -lean_ctor_set(x_45, 0, x_1); -lean_ctor_set(x_45, 1, x_4); -lean_ctor_set(x_45, 2, x_5); -lean_ctor_set(x_45, 3, x_42); -lean_ctor_set(x_45, 4, x_3); -lean_ctor_set(x_45, 5, x_43); -lean_ctor_set(x_45, 6, x_43); -lean_ctor_set_uint8(x_45, sizeof(void*)*7, x_6); -lean_ctor_set_uint8(x_45, sizeof(void*)*7 + 1, x_44); -x_46 = l___private_Init_Lean_Elab_App_11__elabAppArgsAux___main(x_45, x_2, x_13, x_7, x_41); -return x_46; -} -else -{ -uint8_t x_47; -lean_dec(x_13); -lean_dec(x_7); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_2); -lean_dec(x_1); -x_47 = !lean_is_exclusive(x_40); -if (x_47 == 0) -{ -return x_40; -} -else -{ -lean_object* x_48; lean_object* x_49; lean_object* x_50; -x_48 = lean_ctor_get(x_40, 0); -x_49 = lean_ctor_get(x_40, 1); -lean_inc(x_49); -lean_inc(x_48); -lean_dec(x_40); -x_50 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_50, 0, x_48); -lean_ctor_set(x_50, 1, x_49); -return x_50; -} -} -} -else -{ -lean_object* x_51; lean_object* x_52; lean_object* x_53; lean_object* x_54; lean_object* x_55; lean_object* x_56; lean_object* x_57; lean_object* x_58; -x_51 = l___private_Init_Lean_Elab_App_12__elabAppArgs___closed__11; -x_52 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_52, 0, x_51); -lean_ctor_set(x_52, 1, x_31); -x_53 = l___private_Init_Lean_Meta_ExprDefEq_7__checkTypesAndAssign___closed__7; +lean_object* x_53; lean_object* x_54; lean_object* x_55; lean_object* x_56; lean_object* x_57; lean_object* x_58; lean_object* x_59; +x_53 = l___private_Init_Lean_Elab_App_12__elabAppArgs___closed__8; x_54 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_54, 0, x_52); -lean_ctor_set(x_54, 1, x_53); -x_55 = lean_alloc_ctor(9, 2, 0); -lean_ctor_set(x_55, 0, x_54); -lean_ctor_set(x_55, 1, x_32); -x_56 = l_Lean_Elab_Term_logTrace(x_18, x_1, x_55, x_7, x_17); -x_57 = lean_ctor_get(x_56, 1); -lean_inc(x_57); -lean_dec(x_56); -x_58 = l_Lean_Elab_Term_tryPostponeIfMVar(x_13, x_7, x_57); -if (lean_obj_tag(x_58) == 0) -{ -lean_object* x_59; lean_object* x_60; lean_object* x_61; uint8_t x_62; lean_object* x_63; lean_object* x_64; +lean_ctor_set(x_54, 0, x_53); +lean_ctor_set(x_54, 1, x_51); +x_55 = l___private_Init_Lean_Meta_ExprDefEq_7__checkTypesAndAssign___closed__7; +x_56 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_56, 0, x_54); +lean_ctor_set(x_56, 1, x_55); +x_57 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_57, 0, x_56); +lean_ctor_set(x_57, 1, x_52); +x_58 = l_Lean_Elab_Term_logTrace(x_49, x_1, x_57, x_7, x_48); x_59 = lean_ctor_get(x_58, 1); lean_inc(x_59); lean_dec(x_58); -x_60 = lean_unsigned_to_nat(0u); -x_61 = l_Array_empty___closed__1; -x_62 = 0; -x_63 = lean_alloc_ctor(0, 7, 2); -lean_ctor_set(x_63, 0, x_1); -lean_ctor_set(x_63, 1, x_4); -lean_ctor_set(x_63, 2, x_5); -lean_ctor_set(x_63, 3, x_60); -lean_ctor_set(x_63, 4, x_3); -lean_ctor_set(x_63, 5, x_61); -lean_ctor_set(x_63, 6, x_61); -lean_ctor_set_uint8(x_63, sizeof(void*)*7, x_6); -lean_ctor_set_uint8(x_63, sizeof(void*)*7 + 1, x_62); -x_64 = l___private_Init_Lean_Elab_App_11__elabAppArgsAux___main(x_63, x_2, x_13, x_7, x_59); -return x_64; +x_15 = x_59; +goto block_45; } else { -uint8_t x_65; +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; +x_60 = l___private_Init_Lean_Elab_App_12__elabAppArgs___closed__11; +x_61 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_61, 0, x_60); +lean_ctor_set(x_61, 1, x_51); +x_62 = l___private_Init_Lean_Meta_ExprDefEq_7__checkTypesAndAssign___closed__7; +x_63 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_63, 0, x_61); +lean_ctor_set(x_63, 1, x_62); +x_64 = lean_alloc_ctor(9, 2, 0); +lean_ctor_set(x_64, 0, x_63); +lean_ctor_set(x_64, 1, x_52); +x_65 = l_Lean_Elab_Term_logTrace(x_49, x_1, x_64, x_7, x_48); +x_66 = lean_ctor_get(x_65, 1); +lean_inc(x_66); +lean_dec(x_65); +x_15 = x_66; +goto block_45; +} +} +block_45: +{ +uint8_t x_16; +x_16 = l_Array_isEmpty___rarg(x_3); +if (x_16 == 0) +{ +lean_object* x_17; +x_17 = l_Lean_Elab_Term_tryPostponeIfMVar(x_13, x_7, x_15); +if (lean_obj_tag(x_17) == 0) +{ +lean_object* x_18; lean_object* x_19; lean_object* x_20; uint8_t x_21; lean_object* x_22; lean_object* x_23; +x_18 = lean_ctor_get(x_17, 1); +lean_inc(x_18); +lean_dec(x_17); +x_19 = lean_unsigned_to_nat(0u); +x_20 = l_Array_empty___closed__1; +x_21 = 0; +x_22 = lean_alloc_ctor(0, 7, 2); +lean_ctor_set(x_22, 0, x_1); +lean_ctor_set(x_22, 1, x_4); +lean_ctor_set(x_22, 2, x_5); +lean_ctor_set(x_22, 3, x_19); +lean_ctor_set(x_22, 4, x_3); +lean_ctor_set(x_22, 5, x_20); +lean_ctor_set(x_22, 6, x_20); +lean_ctor_set_uint8(x_22, sizeof(void*)*7, x_6); +lean_ctor_set_uint8(x_22, sizeof(void*)*7 + 1, x_21); +x_23 = l___private_Init_Lean_Elab_App_11__elabAppArgsAux___main(x_22, x_2, x_13, x_7, x_18); +return x_23; +} +else +{ +uint8_t x_24; lean_dec(x_13); lean_dec(x_7); lean_dec(x_5); @@ -9670,54 +9578,134 @@ lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); -x_65 = !lean_is_exclusive(x_58); -if (x_65 == 0) +x_24 = !lean_is_exclusive(x_17); +if (x_24 == 0) { -return x_58; +return x_17; } else { -lean_object* x_66; lean_object* x_67; lean_object* x_68; -x_66 = lean_ctor_get(x_58, 0); -x_67 = lean_ctor_get(x_58, 1); -lean_inc(x_67); -lean_inc(x_66); -lean_dec(x_58); -x_68 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_68, 0, x_66); -lean_ctor_set(x_68, 1, x_67); -return x_68; -} -} +lean_object* x_25; lean_object* x_26; lean_object* x_27; +x_25 = lean_ctor_get(x_17, 0); +x_26 = lean_ctor_get(x_17, 1); +lean_inc(x_26); +lean_inc(x_25); +lean_dec(x_17); +x_27 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_27, 0, x_25); +lean_ctor_set(x_27, 1, x_26); +return x_27; } } } else { -uint8_t x_69; +uint8_t x_28; +x_28 = l_Array_isEmpty___rarg(x_4); +if (x_28 == 0) +{ +lean_object* x_29; +x_29 = l_Lean_Elab_Term_tryPostponeIfMVar(x_13, x_7, x_15); +if (lean_obj_tag(x_29) == 0) +{ +lean_object* x_30; lean_object* x_31; lean_object* x_32; uint8_t x_33; lean_object* x_34; lean_object* x_35; +x_30 = lean_ctor_get(x_29, 1); +lean_inc(x_30); +lean_dec(x_29); +x_31 = lean_unsigned_to_nat(0u); +x_32 = l_Array_empty___closed__1; +x_33 = 0; +x_34 = lean_alloc_ctor(0, 7, 2); +lean_ctor_set(x_34, 0, x_1); +lean_ctor_set(x_34, 1, x_4); +lean_ctor_set(x_34, 2, x_5); +lean_ctor_set(x_34, 3, x_31); +lean_ctor_set(x_34, 4, x_3); +lean_ctor_set(x_34, 5, x_32); +lean_ctor_set(x_34, 6, x_32); +lean_ctor_set_uint8(x_34, sizeof(void*)*7, x_6); +lean_ctor_set_uint8(x_34, sizeof(void*)*7 + 1, x_33); +x_35 = l___private_Init_Lean_Elab_App_11__elabAppArgsAux___main(x_34, x_2, x_13, x_7, x_30); +return x_35; +} +else +{ +uint8_t x_36; +lean_dec(x_13); lean_dec(x_7); lean_dec(x_5); lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); -x_69 = !lean_is_exclusive(x_9); -if (x_69 == 0) +x_36 = !lean_is_exclusive(x_29); +if (x_36 == 0) +{ +return x_29; +} +else +{ +lean_object* x_37; lean_object* x_38; lean_object* x_39; +x_37 = lean_ctor_get(x_29, 0); +x_38 = lean_ctor_get(x_29, 1); +lean_inc(x_38); +lean_inc(x_37); +lean_dec(x_29); +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 +{ +lean_object* x_40; lean_object* x_41; uint8_t x_42; lean_object* x_43; lean_object* x_44; +x_40 = lean_unsigned_to_nat(0u); +x_41 = l_Array_empty___closed__1; +x_42 = 0; +x_43 = lean_alloc_ctor(0, 7, 2); +lean_ctor_set(x_43, 0, x_1); +lean_ctor_set(x_43, 1, x_4); +lean_ctor_set(x_43, 2, x_5); +lean_ctor_set(x_43, 3, x_40); +lean_ctor_set(x_43, 4, x_3); +lean_ctor_set(x_43, 5, x_41); +lean_ctor_set(x_43, 6, x_41); +lean_ctor_set_uint8(x_43, sizeof(void*)*7, x_6); +lean_ctor_set_uint8(x_43, sizeof(void*)*7 + 1, x_42); +x_44 = l___private_Init_Lean_Elab_App_11__elabAppArgsAux___main(x_43, x_2, x_13, x_7, x_15); +return x_44; +} +} +} +} +else +{ +uint8_t x_67; +lean_dec(x_7); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_67 = !lean_is_exclusive(x_9); +if (x_67 == 0) { return x_9; } else { -lean_object* x_70; lean_object* x_71; lean_object* x_72; -x_70 = lean_ctor_get(x_9, 0); -x_71 = lean_ctor_get(x_9, 1); -lean_inc(x_71); -lean_inc(x_70); +lean_object* x_68; lean_object* x_69; lean_object* x_70; +x_68 = lean_ctor_get(x_9, 0); +x_69 = lean_ctor_get(x_9, 1); +lean_inc(x_69); +lean_inc(x_68); lean_dec(x_9); -x_72 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_72, 0, x_70); -lean_ctor_set(x_72, 1, x_71); -return x_72; +x_70 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_70, 0, x_68); +lean_ctor_set(x_70, 1, x_69); +return x_70; } } } @@ -13874,294 +13862,301 @@ x_14 = lean_name_eq(x_12, x_13); lean_dec(x_12); if (x_14 == 0) { -uint8_t x_15; uint8_t x_389; uint8_t x_493; lean_object* x_632; uint8_t x_633; -x_632 = l_Lean_Parser_Term_proj___elambda__1___closed__2; +uint8_t x_15; uint8_t x_292; lean_object* x_404; uint8_t x_405; +x_404 = l_Lean_Parser_Term_proj___elambda__1___closed__2; lean_inc(x_2); -x_633 = l_Lean_Syntax_isOfKind(x_2, x_632); -if (x_633 == 0) +x_405 = l_Lean_Syntax_isOfKind(x_2, x_404); +if (x_405 == 0) { -uint8_t x_634; -x_634 = 0; -x_493 = x_634; -goto block_631; +uint8_t x_406; +x_406 = 0; +x_292 = x_406; +goto block_403; } else { -lean_object* x_635; lean_object* x_636; lean_object* x_637; uint8_t x_638; -x_635 = l_Lean_Syntax_getArgs(x_2); -x_636 = lean_array_get_size(x_635); -lean_dec(x_635); -x_637 = lean_unsigned_to_nat(3u); -x_638 = lean_nat_dec_eq(x_636, x_637); -lean_dec(x_636); -x_493 = x_638; -goto block_631; +lean_object* x_407; lean_object* x_408; lean_object* x_409; uint8_t x_410; +x_407 = l_Lean_Syntax_getArgs(x_2); +x_408 = lean_array_get_size(x_407); +lean_dec(x_407); +x_409 = lean_unsigned_to_nat(3u); +x_410 = lean_nat_dec_eq(x_408, x_409); +lean_dec(x_408); +x_292 = x_410; +goto block_403; } -block_388: +block_291: { uint8_t x_16; x_16 = l_coeDecidableEq(x_15); if (x_16 == 0) { -lean_object* x_17; uint8_t x_18; lean_object* x_19; -x_17 = lean_box(0); -x_18 = 1; +uint8_t x_17; uint8_t x_173; lean_object* x_277; uint8_t x_278; +x_277 = l_Lean_mkTermIdFromIdent___closed__2; +lean_inc(x_2); +x_278 = l_Lean_Syntax_isOfKind(x_2, x_277); +if (x_278 == 0) +{ +uint8_t x_279; +x_279 = 0; +x_173 = x_279; +goto block_276; +} +else +{ +lean_object* x_280; lean_object* x_281; lean_object* x_282; uint8_t x_283; +x_280 = l_Lean_Syntax_getArgs(x_2); +x_281 = lean_array_get_size(x_280); +lean_dec(x_280); +x_282 = lean_unsigned_to_nat(2u); +x_283 = lean_nat_dec_eq(x_281, x_282); +lean_dec(x_281); +x_173 = x_283; +goto block_276; +} +block_172: +{ +uint8_t x_18; +x_18 = l_coeDecidableEq(x_17); +if (x_18 == 0) +{ +lean_object* x_19; uint8_t x_20; lean_object* x_21; +x_19 = lean_box(0); +x_20 = 1; lean_inc(x_10); lean_inc(x_9); -x_19 = l_Lean_Elab_Term_elabTerm(x_2, x_17, x_18, x_9, x_10); -if (lean_obj_tag(x_19) == 0) +x_21 = l_Lean_Elab_Term_elabTerm(x_2, x_19, x_20, x_9, x_10); +if (lean_obj_tag(x_21) == 0) { -uint8_t x_20; -x_20 = !lean_is_exclusive(x_19); -if (x_20 == 0) +uint8_t x_22; +x_22 = !lean_is_exclusive(x_21); +if (x_22 == 0) { -lean_object* x_21; lean_object* x_22; lean_object* x_23; -x_21 = lean_ctor_get(x_19, 0); -x_22 = lean_ctor_get(x_19, 1); -x_23 = l___private_Init_Lean_Elab_App_20__elabAppLVals(x_1, x_21, x_3, x_4, x_5, x_6, x_7, x_9, x_22); -if (lean_obj_tag(x_23) == 0) +lean_object* x_23; lean_object* x_24; lean_object* x_25; +x_23 = lean_ctor_get(x_21, 0); +x_24 = lean_ctor_get(x_21, 1); +x_25 = l___private_Init_Lean_Elab_App_20__elabAppLVals(x_1, x_23, x_3, x_4, x_5, x_6, x_7, x_9, x_24); +if (lean_obj_tag(x_25) == 0) { -uint8_t x_24; -x_24 = !lean_is_exclusive(x_23); -if (x_24 == 0) +uint8_t x_26; +x_26 = !lean_is_exclusive(x_25); +if (x_26 == 0) { -lean_object* x_25; -x_25 = lean_array_push(x_8, x_23); -lean_ctor_set(x_19, 1, x_10); -lean_ctor_set(x_19, 0, x_25); -return x_19; +lean_object* x_27; +x_27 = lean_array_push(x_8, x_25); +lean_ctor_set(x_21, 1, x_10); +lean_ctor_set(x_21, 0, x_27); +return x_21; } else { -lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; -x_26 = lean_ctor_get(x_23, 0); -x_27 = lean_ctor_get(x_23, 1); -lean_inc(x_27); -lean_inc(x_26); -lean_dec(x_23); -x_28 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_28, 0, x_26); -lean_ctor_set(x_28, 1, x_27); -x_29 = lean_array_push(x_8, x_28); -lean_ctor_set(x_19, 1, x_10); -lean_ctor_set(x_19, 0, x_29); -return x_19; +lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; +x_28 = lean_ctor_get(x_25, 0); +x_29 = lean_ctor_get(x_25, 1); +lean_inc(x_29); +lean_inc(x_28); +lean_dec(x_25); +x_30 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_30, 0, x_28); +lean_ctor_set(x_30, 1, x_29); +x_31 = lean_array_push(x_8, x_30); +lean_ctor_set(x_21, 1, x_10); +lean_ctor_set(x_21, 0, x_31); +return x_21; } } else { -lean_object* x_30; -x_30 = lean_ctor_get(x_23, 0); -lean_inc(x_30); -if (lean_obj_tag(x_30) == 0) +lean_object* x_32; +x_32 = lean_ctor_get(x_25, 0); +lean_inc(x_32); +if (lean_obj_tag(x_32) == 0) { -lean_object* x_31; -x_31 = lean_ctor_get(x_30, 0); -lean_inc(x_31); -if (lean_obj_tag(x_31) == 0) +lean_object* x_33; +x_33 = lean_ctor_get(x_32, 0); +lean_inc(x_33); +if (lean_obj_tag(x_33) == 0) { -uint8_t x_32; -lean_dec(x_30); -x_32 = !lean_is_exclusive(x_23); -if (x_32 == 0) +uint8_t x_34; +lean_dec(x_32); +x_34 = !lean_is_exclusive(x_25); +if (x_34 == 0) { -lean_object* x_33; lean_object* x_34; lean_object* x_35; -x_33 = lean_ctor_get(x_23, 0); -lean_dec(x_33); -x_34 = lean_ctor_get(x_31, 0); -lean_inc(x_34); -lean_dec(x_31); -lean_ctor_set(x_23, 0, x_34); -x_35 = lean_array_push(x_8, x_23); -lean_ctor_set(x_19, 1, x_10); -lean_ctor_set(x_19, 0, x_35); -return x_19; -} -else -{ -lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; -x_36 = lean_ctor_get(x_23, 1); +lean_object* x_35; lean_object* x_36; lean_object* x_37; +x_35 = lean_ctor_get(x_25, 0); +lean_dec(x_35); +x_36 = lean_ctor_get(x_33, 0); lean_inc(x_36); -lean_dec(x_23); -x_37 = lean_ctor_get(x_31, 0); -lean_inc(x_37); -lean_dec(x_31); -x_38 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_38, 0, x_37); -lean_ctor_set(x_38, 1, x_36); -x_39 = lean_array_push(x_8, x_38); -lean_ctor_set(x_19, 1, x_10); -lean_ctor_set(x_19, 0, x_39); -return x_19; +lean_dec(x_33); +lean_ctor_set(x_25, 0, x_36); +x_37 = lean_array_push(x_8, x_25); +lean_ctor_set(x_21, 1, x_10); +lean_ctor_set(x_21, 0, x_37); +return x_21; +} +else +{ +lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; +x_38 = lean_ctor_get(x_25, 1); +lean_inc(x_38); +lean_dec(x_25); +x_39 = lean_ctor_get(x_33, 0); +lean_inc(x_39); +lean_dec(x_33); +x_40 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_40, 0, x_39); +lean_ctor_set(x_40, 1, x_38); +x_41 = lean_array_push(x_8, x_40); +lean_ctor_set(x_21, 1, x_10); +lean_ctor_set(x_21, 0, x_41); +return x_21; } } else { -uint8_t x_40; -lean_free_object(x_19); +uint8_t x_42; +lean_free_object(x_21); lean_dec(x_10); lean_dec(x_8); -x_40 = !lean_is_exclusive(x_23); -if (x_40 == 0) +x_42 = !lean_is_exclusive(x_25); +if (x_42 == 0) { -lean_object* x_41; -x_41 = lean_ctor_get(x_23, 0); -lean_dec(x_41); -return x_23; +lean_object* x_43; +x_43 = lean_ctor_get(x_25, 0); +lean_dec(x_43); +return x_25; } else { -lean_object* x_42; lean_object* x_43; -x_42 = lean_ctor_get(x_23, 1); -lean_inc(x_42); -lean_dec(x_23); -x_43 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_43, 0, x_30); -lean_ctor_set(x_43, 1, x_42); -return x_43; +lean_object* x_44; lean_object* x_45; +x_44 = lean_ctor_get(x_25, 1); +lean_inc(x_44); +lean_dec(x_25); +x_45 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_45, 0, x_32); +lean_ctor_set(x_45, 1, x_44); +return x_45; } } } else { -uint8_t x_44; -lean_free_object(x_19); +uint8_t x_46; +lean_free_object(x_21); lean_dec(x_8); -x_44 = !lean_is_exclusive(x_23); -if (x_44 == 0) +x_46 = !lean_is_exclusive(x_25); +if (x_46 == 0) { -lean_object* x_45; lean_object* x_46; -x_45 = lean_ctor_get(x_23, 1); -lean_dec(x_45); -x_46 = lean_ctor_get(x_23, 0); -lean_dec(x_46); -lean_ctor_set(x_23, 1, x_10); -return x_23; +lean_object* x_47; lean_object* x_48; +x_47 = lean_ctor_get(x_25, 1); +lean_dec(x_47); +x_48 = lean_ctor_get(x_25, 0); +lean_dec(x_48); +lean_ctor_set(x_25, 1, x_10); +return x_25; } else { -lean_object* x_47; -lean_dec(x_23); -x_47 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_47, 0, x_30); -lean_ctor_set(x_47, 1, x_10); -return x_47; +lean_object* x_49; +lean_dec(x_25); +x_49 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_49, 0, x_32); +lean_ctor_set(x_49, 1, x_10); +return x_49; } } } } else { -lean_object* x_48; lean_object* x_49; lean_object* x_50; -x_48 = lean_ctor_get(x_19, 0); -x_49 = lean_ctor_get(x_19, 1); -lean_inc(x_49); -lean_inc(x_48); -lean_dec(x_19); -x_50 = l___private_Init_Lean_Elab_App_20__elabAppLVals(x_1, x_48, x_3, x_4, x_5, x_6, x_7, x_9, x_49); -if (lean_obj_tag(x_50) == 0) -{ -lean_object* x_51; lean_object* x_52; lean_object* x_53; lean_object* x_54; lean_object* x_55; lean_object* x_56; -x_51 = lean_ctor_get(x_50, 0); +lean_object* x_50; lean_object* x_51; lean_object* x_52; +x_50 = lean_ctor_get(x_21, 0); +x_51 = lean_ctor_get(x_21, 1); lean_inc(x_51); -x_52 = lean_ctor_get(x_50, 1); -lean_inc(x_52); -if (lean_is_exclusive(x_50)) { - lean_ctor_release(x_50, 0); - lean_ctor_release(x_50, 1); - x_53 = x_50; +lean_inc(x_50); +lean_dec(x_21); +x_52 = l___private_Init_Lean_Elab_App_20__elabAppLVals(x_1, x_50, x_3, x_4, x_5, x_6, x_7, x_9, x_51); +if (lean_obj_tag(x_52) == 0) +{ +lean_object* x_53; lean_object* x_54; lean_object* x_55; lean_object* x_56; lean_object* x_57; lean_object* x_58; +x_53 = lean_ctor_get(x_52, 0); +lean_inc(x_53); +x_54 = lean_ctor_get(x_52, 1); +lean_inc(x_54); +if (lean_is_exclusive(x_52)) { + lean_ctor_release(x_52, 0); + lean_ctor_release(x_52, 1); + x_55 = x_52; } else { - lean_dec_ref(x_50); - x_53 = lean_box(0); + lean_dec_ref(x_52); + x_55 = lean_box(0); } -if (lean_is_scalar(x_53)) { - x_54 = lean_alloc_ctor(0, 2, 0); +if (lean_is_scalar(x_55)) { + x_56 = lean_alloc_ctor(0, 2, 0); } else { - x_54 = x_53; + x_56 = x_55; } -lean_ctor_set(x_54, 0, x_51); -lean_ctor_set(x_54, 1, x_52); -x_55 = lean_array_push(x_8, x_54); -x_56 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_56, 0, x_55); -lean_ctor_set(x_56, 1, x_10); -return x_56; +lean_ctor_set(x_56, 0, x_53); +lean_ctor_set(x_56, 1, x_54); +x_57 = lean_array_push(x_8, x_56); +x_58 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_58, 0, x_57); +lean_ctor_set(x_58, 1, x_10); +return x_58; } else { -lean_object* x_57; -x_57 = lean_ctor_get(x_50, 0); -lean_inc(x_57); -if (lean_obj_tag(x_57) == 0) -{ -lean_object* x_58; -x_58 = lean_ctor_get(x_57, 0); -lean_inc(x_58); -if (lean_obj_tag(x_58) == 0) -{ -lean_object* x_59; lean_object* x_60; lean_object* x_61; lean_object* x_62; lean_object* x_63; lean_object* x_64; -lean_dec(x_57); -x_59 = lean_ctor_get(x_50, 1); +lean_object* x_59; +x_59 = lean_ctor_get(x_52, 0); lean_inc(x_59); -if (lean_is_exclusive(x_50)) { - lean_ctor_release(x_50, 0); - lean_ctor_release(x_50, 1); - x_60 = x_50; -} else { - lean_dec_ref(x_50); - x_60 = lean_box(0); -} -x_61 = lean_ctor_get(x_58, 0); +if (lean_obj_tag(x_59) == 0) +{ +lean_object* x_60; +x_60 = lean_ctor_get(x_59, 0); +lean_inc(x_60); +if (lean_obj_tag(x_60) == 0) +{ +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_dec(x_59); +x_61 = lean_ctor_get(x_52, 1); lean_inc(x_61); -lean_dec(x_58); -if (lean_is_scalar(x_60)) { - x_62 = lean_alloc_ctor(1, 2, 0); +if (lean_is_exclusive(x_52)) { + lean_ctor_release(x_52, 0); + lean_ctor_release(x_52, 1); + x_62 = x_52; } else { - x_62 = x_60; + lean_dec_ref(x_52); + x_62 = lean_box(0); +} +x_63 = lean_ctor_get(x_60, 0); +lean_inc(x_63); +lean_dec(x_60); +if (lean_is_scalar(x_62)) { + x_64 = lean_alloc_ctor(1, 2, 0); +} else { + x_64 = x_62; } -lean_ctor_set(x_62, 0, x_61); -lean_ctor_set(x_62, 1, x_59); -x_63 = lean_array_push(x_8, x_62); -x_64 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_64, 0, x_63); -lean_ctor_set(x_64, 1, x_10); -return x_64; +lean_ctor_set(x_64, 1, x_61); +x_65 = lean_array_push(x_8, x_64); +x_66 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_66, 0, x_65); +lean_ctor_set(x_66, 1, x_10); +return x_66; } else { -lean_object* x_65; lean_object* x_66; lean_object* x_67; +lean_object* x_67; lean_object* x_68; lean_object* x_69; lean_dec(x_10); lean_dec(x_8); -x_65 = lean_ctor_get(x_50, 1); -lean_inc(x_65); -if (lean_is_exclusive(x_50)) { - lean_ctor_release(x_50, 0); - lean_ctor_release(x_50, 1); - x_66 = x_50; +x_67 = lean_ctor_get(x_52, 1); +lean_inc(x_67); +if (lean_is_exclusive(x_52)) { + lean_ctor_release(x_52, 0); + lean_ctor_release(x_52, 1); + x_68 = x_52; } else { - lean_dec_ref(x_50); - x_66 = lean_box(0); -} -if (lean_is_scalar(x_66)) { - x_67 = lean_alloc_ctor(1, 2, 0); -} else { - x_67 = x_66; -} -lean_ctor_set(x_67, 0, x_57); -lean_ctor_set(x_67, 1, x_65); -return x_67; -} -} -else -{ -lean_object* x_68; lean_object* x_69; -lean_dec(x_8); -if (lean_is_exclusive(x_50)) { - lean_ctor_release(x_50, 0); - lean_ctor_release(x_50, 1); - x_68 = x_50; -} else { - lean_dec_ref(x_50); + lean_dec_ref(x_52); x_68 = lean_box(0); } if (lean_is_scalar(x_68)) { @@ -14169,2633 +14164,1542 @@ if (lean_is_scalar(x_68)) { } else { x_69 = x_68; } -lean_ctor_set(x_69, 0, x_57); -lean_ctor_set(x_69, 1, x_10); +lean_ctor_set(x_69, 0, x_59); +lean_ctor_set(x_69, 1, x_67); return x_69; } } +else +{ +lean_object* x_70; lean_object* x_71; +lean_dec(x_8); +if (lean_is_exclusive(x_52)) { + lean_ctor_release(x_52, 0); + lean_ctor_release(x_52, 1); + x_70 = x_52; +} else { + lean_dec_ref(x_52); + x_70 = lean_box(0); +} +if (lean_is_scalar(x_70)) { + x_71 = lean_alloc_ctor(1, 2, 0); +} else { + x_71 = x_70; +} +lean_ctor_set(x_71, 0, x_59); +lean_ctor_set(x_71, 1, x_10); +return x_71; +} +} } } else { -lean_object* x_70; +lean_object* x_72; lean_dec(x_9); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_3); lean_dec(x_1); -x_70 = lean_ctor_get(x_19, 0); -lean_inc(x_70); -if (lean_obj_tag(x_70) == 0) +x_72 = lean_ctor_get(x_21, 0); +lean_inc(x_72); +if (lean_obj_tag(x_72) == 0) { -lean_object* x_71; -x_71 = lean_ctor_get(x_70, 0); -lean_inc(x_71); -if (lean_obj_tag(x_71) == 0) +lean_object* x_73; +x_73 = lean_ctor_get(x_72, 0); +lean_inc(x_73); +if (lean_obj_tag(x_73) == 0) { -uint8_t x_72; -lean_dec(x_70); -x_72 = !lean_is_exclusive(x_19); -if (x_72 == 0) +uint8_t x_74; +lean_dec(x_72); +x_74 = !lean_is_exclusive(x_21); +if (x_74 == 0) { -lean_object* x_73; lean_object* x_74; lean_object* x_75; lean_object* x_76; -x_73 = lean_ctor_get(x_19, 0); +lean_object* x_75; lean_object* x_76; lean_object* x_77; lean_object* x_78; +x_75 = lean_ctor_get(x_21, 0); +lean_dec(x_75); +x_76 = lean_ctor_get(x_73, 0); +lean_inc(x_76); lean_dec(x_73); -x_74 = lean_ctor_get(x_71, 0); -lean_inc(x_74); -lean_dec(x_71); -lean_ctor_set(x_19, 0, x_74); -x_75 = lean_array_push(x_8, x_19); -x_76 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_76, 0, x_75); -lean_ctor_set(x_76, 1, x_10); -return x_76; +lean_ctor_set(x_21, 0, x_76); +x_77 = lean_array_push(x_8, x_21); +x_78 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_78, 0, x_77); +lean_ctor_set(x_78, 1, x_10); +return x_78; } else { -lean_object* x_77; lean_object* x_78; lean_object* x_79; lean_object* x_80; lean_object* x_81; -x_77 = lean_ctor_get(x_19, 1); -lean_inc(x_77); -lean_dec(x_19); -x_78 = lean_ctor_get(x_71, 0); -lean_inc(x_78); -lean_dec(x_71); -x_79 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_79, 0, x_78); -lean_ctor_set(x_79, 1, x_77); -x_80 = lean_array_push(x_8, x_79); -x_81 = lean_alloc_ctor(0, 2, 0); +lean_object* x_79; lean_object* x_80; lean_object* x_81; lean_object* x_82; lean_object* x_83; +x_79 = lean_ctor_get(x_21, 1); +lean_inc(x_79); +lean_dec(x_21); +x_80 = lean_ctor_get(x_73, 0); +lean_inc(x_80); +lean_dec(x_73); +x_81 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_81, 0, x_80); -lean_ctor_set(x_81, 1, x_10); -return x_81; +lean_ctor_set(x_81, 1, x_79); +x_82 = lean_array_push(x_8, x_81); +x_83 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_83, 0, x_82); +lean_ctor_set(x_83, 1, x_10); +return x_83; } } else { -uint8_t x_82; +uint8_t x_84; lean_dec(x_10); lean_dec(x_8); -x_82 = !lean_is_exclusive(x_19); -if (x_82 == 0) +x_84 = !lean_is_exclusive(x_21); +if (x_84 == 0) { -lean_object* x_83; -x_83 = lean_ctor_get(x_19, 0); -lean_dec(x_83); -return x_19; +lean_object* x_85; +x_85 = lean_ctor_get(x_21, 0); +lean_dec(x_85); +return x_21; } else { -lean_object* x_84; lean_object* x_85; -x_84 = lean_ctor_get(x_19, 1); -lean_inc(x_84); -lean_dec(x_19); -x_85 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_85, 0, x_70); -lean_ctor_set(x_85, 1, x_84); -return x_85; +lean_object* x_86; lean_object* x_87; +x_86 = lean_ctor_get(x_21, 1); +lean_inc(x_86); +lean_dec(x_21); +x_87 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_87, 0, x_72); +lean_ctor_set(x_87, 1, x_86); +return x_87; } } } else { -uint8_t x_86; +uint8_t x_88; lean_dec(x_8); -x_86 = !lean_is_exclusive(x_19); -if (x_86 == 0) +x_88 = !lean_is_exclusive(x_21); +if (x_88 == 0) { -lean_object* x_87; lean_object* x_88; -x_87 = lean_ctor_get(x_19, 1); -lean_dec(x_87); -x_88 = lean_ctor_get(x_19, 0); -lean_dec(x_88); -lean_ctor_set(x_19, 1, x_10); -return x_19; +lean_object* x_89; lean_object* x_90; +x_89 = lean_ctor_get(x_21, 1); +lean_dec(x_89); +x_90 = lean_ctor_get(x_21, 0); +lean_dec(x_90); +lean_ctor_set(x_21, 1, x_10); +return x_21; } else { -lean_object* x_89; -lean_dec(x_19); -x_89 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_89, 0, x_70); -lean_ctor_set(x_89, 1, x_10); -return x_89; +lean_object* x_91; +lean_dec(x_21); +x_91 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_91, 0, x_72); +lean_ctor_set(x_91, 1, x_10); +return x_91; } } } } else { -lean_object* x_90; lean_object* x_91; uint8_t x_92; lean_object* x_381; uint8_t x_382; -x_90 = lean_unsigned_to_nat(1u); -x_91 = l_Lean_Syntax_getArg(x_2, x_90); -lean_dec(x_2); -x_381 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___closed__2; -lean_inc(x_91); -x_382 = l_Lean_Syntax_isOfKind(x_91, x_381); -if (x_382 == 0) +lean_object* x_92; lean_object* x_93; lean_object* x_94; uint8_t x_95; uint8_t x_96; +x_92 = lean_unsigned_to_nat(1u); +x_93 = l_Lean_Syntax_getArg(x_2, x_92); +x_94 = l_Lean_mkTermIdFromIdent___closed__2; +lean_inc(x_93); +x_95 = l_Lean_Syntax_isOfKind(x_93, x_94); +x_96 = l_coeDecidableEq(x_95); +if (x_96 == 0) { -uint8_t x_383; -x_383 = 0; -x_92 = x_383; -goto block_380; -} -else -{ -lean_object* x_384; lean_object* x_385; lean_object* x_386; uint8_t x_387; -x_384 = l_Lean_Syntax_getArgs(x_91); -x_385 = lean_array_get_size(x_384); -lean_dec(x_384); -x_386 = lean_unsigned_to_nat(3u); -x_387 = lean_nat_dec_eq(x_385, x_386); -lean_dec(x_385); -x_92 = x_387; -goto block_380; -} -block_380: -{ -uint8_t x_93; -x_93 = l_coeDecidableEq(x_92); -if (x_93 == 0) -{ -uint8_t x_94; -x_94 = 1; -x_2 = x_91; -x_7 = x_94; -goto _start; -} -else -{ -lean_object* x_96; uint8_t x_97; lean_object* x_373; uint8_t x_374; -x_96 = l_Lean_Syntax_getArg(x_91, x_90); -x_373 = l_Lean_nullKind___closed__2; -lean_inc(x_96); -x_374 = l_Lean_Syntax_isOfKind(x_96, x_373); -if (x_374 == 0) -{ -uint8_t x_375; -x_375 = 0; -x_97 = x_375; -goto block_372; -} -else -{ -lean_object* x_376; lean_object* x_377; lean_object* x_378; uint8_t x_379; -x_376 = l_Lean_Syntax_getArgs(x_96); -x_377 = lean_array_get_size(x_376); -lean_dec(x_376); -x_378 = lean_unsigned_to_nat(2u); -x_379 = lean_nat_dec_eq(x_377, x_378); -lean_dec(x_377); -x_97 = x_379; -goto block_372; -} -block_372: -{ -uint8_t x_98; -x_98 = l_coeDecidableEq(x_97); -if (x_98 == 0) -{ -uint8_t x_99; -lean_dec(x_96); -x_99 = 1; -x_2 = x_91; -x_7 = x_99; -goto _start; -} -else -{ -lean_object* x_101; lean_object* x_102; lean_object* x_103; uint8_t x_104; uint8_t x_105; -x_101 = lean_unsigned_to_nat(0u); -x_102 = l_Lean_Syntax_getArg(x_96, x_101); -x_103 = l_Lean_Parser_Term_fun___elambda__1___closed__2; -lean_inc(x_102); -x_104 = l_Lean_Syntax_isOfKind(x_102, x_103); -x_105 = l_coeDecidableEq(x_104); -if (x_105 == 0) -{ -uint8_t x_106; -lean_dec(x_102); -lean_dec(x_96); -x_106 = 1; -x_2 = x_91; -x_7 = x_106; -goto _start; -} -else -{ -lean_object* x_108; uint8_t x_109; lean_object* x_366; uint8_t x_367; -x_108 = l_Lean_Syntax_getArg(x_96, x_90); -lean_dec(x_96); -x_366 = l_Lean_nullKind___closed__2; -lean_inc(x_108); -x_367 = l_Lean_Syntax_isOfKind(x_108, x_366); -if (x_367 == 0) -{ -uint8_t x_368; -lean_dec(x_108); -x_368 = 0; -x_109 = x_368; -goto block_365; -} -else -{ -lean_object* x_369; lean_object* x_370; uint8_t x_371; -x_369 = l_Lean_Syntax_getArgs(x_108); -lean_dec(x_108); -x_370 = lean_array_get_size(x_369); -lean_dec(x_369); -x_371 = lean_nat_dec_eq(x_370, x_101); -lean_dec(x_370); -x_109 = x_371; -goto block_365; -} -block_365: -{ -uint8_t x_110; -x_110 = l_coeDecidableEq(x_109); -if (x_110 == 0) -{ -uint8_t x_111; -lean_dec(x_102); -x_111 = 1; -x_2 = x_91; -x_7 = x_111; -goto _start; -} -else -{ -uint8_t x_113; -lean_dec(x_91); -x_113 = l_List_isEmpty___rarg(x_3); -if (x_113 == 0) -{ -lean_object* x_114; uint8_t x_115; lean_object* x_116; -x_114 = lean_box(0); -x_115 = 1; +lean_object* x_97; uint8_t x_98; lean_object* x_99; +lean_dec(x_93); +x_97 = lean_box(0); +x_98 = 1; lean_inc(x_10); lean_inc(x_9); -x_116 = l_Lean_Elab_Term_elabFunCore(x_102, x_114, x_115, x_9, x_10); -if (lean_obj_tag(x_116) == 0) +x_99 = l_Lean_Elab_Term_elabTerm(x_2, x_97, x_98, x_9, x_10); +if (lean_obj_tag(x_99) == 0) { -uint8_t x_117; -x_117 = !lean_is_exclusive(x_116); -if (x_117 == 0) +uint8_t x_100; +x_100 = !lean_is_exclusive(x_99); +if (x_100 == 0) { -lean_object* x_118; lean_object* x_119; lean_object* x_120; -x_118 = lean_ctor_get(x_116, 0); -x_119 = lean_ctor_get(x_116, 1); -x_120 = l___private_Init_Lean_Elab_App_20__elabAppLVals(x_1, x_118, x_3, x_4, x_5, x_6, x_115, x_9, x_119); -if (lean_obj_tag(x_120) == 0) +lean_object* x_101; lean_object* x_102; lean_object* x_103; +x_101 = lean_ctor_get(x_99, 0); +x_102 = lean_ctor_get(x_99, 1); +x_103 = l___private_Init_Lean_Elab_App_20__elabAppLVals(x_1, x_101, x_3, x_4, x_5, x_6, x_7, x_9, x_102); +if (lean_obj_tag(x_103) == 0) { -uint8_t x_121; -x_121 = !lean_is_exclusive(x_120); -if (x_121 == 0) +uint8_t x_104; +x_104 = !lean_is_exclusive(x_103); +if (x_104 == 0) { -lean_object* x_122; -x_122 = lean_array_push(x_8, x_120); -lean_ctor_set(x_116, 1, x_10); -lean_ctor_set(x_116, 0, x_122); -return x_116; +lean_object* x_105; +x_105 = lean_array_push(x_8, x_103); +lean_ctor_set(x_99, 1, x_10); +lean_ctor_set(x_99, 0, x_105); +return x_99; } else { -lean_object* x_123; lean_object* x_124; lean_object* x_125; lean_object* x_126; -x_123 = lean_ctor_get(x_120, 0); -x_124 = lean_ctor_get(x_120, 1); -lean_inc(x_124); -lean_inc(x_123); -lean_dec(x_120); -x_125 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_125, 0, x_123); -lean_ctor_set(x_125, 1, x_124); -x_126 = lean_array_push(x_8, x_125); -lean_ctor_set(x_116, 1, x_10); -lean_ctor_set(x_116, 0, x_126); -return x_116; +lean_object* x_106; lean_object* x_107; lean_object* x_108; lean_object* x_109; +x_106 = lean_ctor_get(x_103, 0); +x_107 = lean_ctor_get(x_103, 1); +lean_inc(x_107); +lean_inc(x_106); +lean_dec(x_103); +x_108 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_108, 0, x_106); +lean_ctor_set(x_108, 1, x_107); +x_109 = lean_array_push(x_8, x_108); +lean_ctor_set(x_99, 1, x_10); +lean_ctor_set(x_99, 0, x_109); +return x_99; } } else { +lean_object* x_110; +x_110 = lean_ctor_get(x_103, 0); +lean_inc(x_110); +if (lean_obj_tag(x_110) == 0) +{ +lean_object* x_111; +x_111 = lean_ctor_get(x_110, 0); +lean_inc(x_111); +if (lean_obj_tag(x_111) == 0) +{ +uint8_t x_112; +lean_dec(x_110); +x_112 = !lean_is_exclusive(x_103); +if (x_112 == 0) +{ +lean_object* x_113; lean_object* x_114; lean_object* x_115; +x_113 = lean_ctor_get(x_103, 0); +lean_dec(x_113); +x_114 = lean_ctor_get(x_111, 0); +lean_inc(x_114); +lean_dec(x_111); +lean_ctor_set(x_103, 0, x_114); +x_115 = lean_array_push(x_8, x_103); +lean_ctor_set(x_99, 1, x_10); +lean_ctor_set(x_99, 0, x_115); +return x_99; +} +else +{ +lean_object* x_116; lean_object* x_117; lean_object* x_118; lean_object* x_119; +x_116 = lean_ctor_get(x_103, 1); +lean_inc(x_116); +lean_dec(x_103); +x_117 = lean_ctor_get(x_111, 0); +lean_inc(x_117); +lean_dec(x_111); +x_118 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_118, 0, x_117); +lean_ctor_set(x_118, 1, x_116); +x_119 = lean_array_push(x_8, x_118); +lean_ctor_set(x_99, 1, x_10); +lean_ctor_set(x_99, 0, x_119); +return x_99; +} +} +else +{ +uint8_t x_120; +lean_free_object(x_99); +lean_dec(x_10); +lean_dec(x_8); +x_120 = !lean_is_exclusive(x_103); +if (x_120 == 0) +{ +lean_object* x_121; +x_121 = lean_ctor_get(x_103, 0); +lean_dec(x_121); +return x_103; +} +else +{ +lean_object* x_122; lean_object* x_123; +x_122 = lean_ctor_get(x_103, 1); +lean_inc(x_122); +lean_dec(x_103); +x_123 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_123, 0, x_110); +lean_ctor_set(x_123, 1, x_122); +return x_123; +} +} +} +else +{ +uint8_t x_124; +lean_free_object(x_99); +lean_dec(x_8); +x_124 = !lean_is_exclusive(x_103); +if (x_124 == 0) +{ +lean_object* x_125; lean_object* x_126; +x_125 = lean_ctor_get(x_103, 1); +lean_dec(x_125); +x_126 = lean_ctor_get(x_103, 0); +lean_dec(x_126); +lean_ctor_set(x_103, 1, x_10); +return x_103; +} +else +{ lean_object* x_127; -x_127 = lean_ctor_get(x_120, 0); -lean_inc(x_127); -if (lean_obj_tag(x_127) == 0) +lean_dec(x_103); +x_127 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_127, 0, x_110); +lean_ctor_set(x_127, 1, x_10); +return x_127; +} +} +} +} +else { -lean_object* x_128; -x_128 = lean_ctor_get(x_127, 0); +lean_object* x_128; lean_object* x_129; lean_object* x_130; +x_128 = lean_ctor_get(x_99, 0); +x_129 = lean_ctor_get(x_99, 1); +lean_inc(x_129); lean_inc(x_128); -if (lean_obj_tag(x_128) == 0) +lean_dec(x_99); +x_130 = l___private_Init_Lean_Elab_App_20__elabAppLVals(x_1, x_128, x_3, x_4, x_5, x_6, x_7, x_9, x_129); +if (lean_obj_tag(x_130) == 0) { -uint8_t x_129; -lean_dec(x_127); -x_129 = !lean_is_exclusive(x_120); -if (x_129 == 0) -{ -lean_object* x_130; lean_object* x_131; lean_object* x_132; -x_130 = lean_ctor_get(x_120, 0); -lean_dec(x_130); -x_131 = lean_ctor_get(x_128, 0); +lean_object* x_131; lean_object* x_132; lean_object* x_133; lean_object* x_134; lean_object* x_135; lean_object* x_136; +x_131 = lean_ctor_get(x_130, 0); lean_inc(x_131); -lean_dec(x_128); -lean_ctor_set(x_120, 0, x_131); -x_132 = lean_array_push(x_8, x_120); -lean_ctor_set(x_116, 1, x_10); -lean_ctor_set(x_116, 0, x_132); -return x_116; +x_132 = lean_ctor_get(x_130, 1); +lean_inc(x_132); +if (lean_is_exclusive(x_130)) { + lean_ctor_release(x_130, 0); + lean_ctor_release(x_130, 1); + x_133 = x_130; +} else { + lean_dec_ref(x_130); + x_133 = lean_box(0); +} +if (lean_is_scalar(x_133)) { + x_134 = lean_alloc_ctor(0, 2, 0); +} else { + x_134 = x_133; +} +lean_ctor_set(x_134, 0, x_131); +lean_ctor_set(x_134, 1, x_132); +x_135 = lean_array_push(x_8, x_134); +x_136 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_136, 0, x_135); +lean_ctor_set(x_136, 1, x_10); +return x_136; } else { -lean_object* x_133; lean_object* x_134; lean_object* x_135; lean_object* x_136; -x_133 = lean_ctor_get(x_120, 1); -lean_inc(x_133); -lean_dec(x_120); -x_134 = lean_ctor_get(x_128, 0); -lean_inc(x_134); -lean_dec(x_128); -x_135 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_135, 0, x_134); -lean_ctor_set(x_135, 1, x_133); -x_136 = lean_array_push(x_8, x_135); -lean_ctor_set(x_116, 1, x_10); -lean_ctor_set(x_116, 0, x_136); -return x_116; -} -} -else -{ -uint8_t x_137; -lean_free_object(x_116); -lean_dec(x_10); -lean_dec(x_8); -x_137 = !lean_is_exclusive(x_120); -if (x_137 == 0) +lean_object* x_137; +x_137 = lean_ctor_get(x_130, 0); +lean_inc(x_137); +if (lean_obj_tag(x_137) == 0) { lean_object* x_138; -x_138 = lean_ctor_get(x_120, 0); -lean_dec(x_138); -return x_120; -} -else +x_138 = lean_ctor_get(x_137, 0); +lean_inc(x_138); +if (lean_obj_tag(x_138) == 0) { -lean_object* x_139; lean_object* x_140; -x_139 = lean_ctor_get(x_120, 1); +lean_object* x_139; lean_object* x_140; lean_object* x_141; lean_object* x_142; lean_object* x_143; lean_object* x_144; +lean_dec(x_137); +x_139 = lean_ctor_get(x_130, 1); lean_inc(x_139); -lean_dec(x_120); -x_140 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_140, 0, x_127); -lean_ctor_set(x_140, 1, x_139); -return x_140; +if (lean_is_exclusive(x_130)) { + lean_ctor_release(x_130, 0); + lean_ctor_release(x_130, 1); + x_140 = x_130; +} else { + lean_dec_ref(x_130); + x_140 = lean_box(0); } +x_141 = lean_ctor_get(x_138, 0); +lean_inc(x_141); +lean_dec(x_138); +if (lean_is_scalar(x_140)) { + x_142 = lean_alloc_ctor(1, 2, 0); +} else { + x_142 = x_140; } -} -else -{ -uint8_t x_141; -lean_free_object(x_116); -lean_dec(x_8); -x_141 = !lean_is_exclusive(x_120); -if (x_141 == 0) -{ -lean_object* x_142; lean_object* x_143; -x_142 = lean_ctor_get(x_120, 1); -lean_dec(x_142); -x_143 = lean_ctor_get(x_120, 0); -lean_dec(x_143); -lean_ctor_set(x_120, 1, x_10); -return x_120; -} -else -{ -lean_object* x_144; -lean_dec(x_120); -x_144 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_144, 0, x_127); +lean_ctor_set(x_142, 0, x_141); +lean_ctor_set(x_142, 1, x_139); +x_143 = lean_array_push(x_8, x_142); +x_144 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_144, 0, x_143); lean_ctor_set(x_144, 1, x_10); return x_144; } -} -} -} else { lean_object* x_145; lean_object* x_146; lean_object* x_147; -x_145 = lean_ctor_get(x_116, 0); -x_146 = lean_ctor_get(x_116, 1); -lean_inc(x_146); +lean_dec(x_10); +lean_dec(x_8); +x_145 = lean_ctor_get(x_130, 1); lean_inc(x_145); -lean_dec(x_116); -x_147 = l___private_Init_Lean_Elab_App_20__elabAppLVals(x_1, x_145, x_3, x_4, x_5, x_6, x_115, x_9, x_146); -if (lean_obj_tag(x_147) == 0) -{ -lean_object* x_148; lean_object* x_149; lean_object* x_150; lean_object* x_151; lean_object* x_152; lean_object* x_153; -x_148 = lean_ctor_get(x_147, 0); -lean_inc(x_148); -x_149 = lean_ctor_get(x_147, 1); -lean_inc(x_149); -if (lean_is_exclusive(x_147)) { - lean_ctor_release(x_147, 0); - lean_ctor_release(x_147, 1); - x_150 = x_147; +if (lean_is_exclusive(x_130)) { + lean_ctor_release(x_130, 0); + lean_ctor_release(x_130, 1); + x_146 = x_130; } else { - lean_dec_ref(x_147); - x_150 = lean_box(0); + lean_dec_ref(x_130); + x_146 = lean_box(0); } -if (lean_is_scalar(x_150)) { - x_151 = lean_alloc_ctor(0, 2, 0); +if (lean_is_scalar(x_146)) { + x_147 = lean_alloc_ctor(1, 2, 0); } else { - x_151 = x_150; + x_147 = x_146; +} +lean_ctor_set(x_147, 0, x_137); +lean_ctor_set(x_147, 1, x_145); +return x_147; } -lean_ctor_set(x_151, 0, x_148); -lean_ctor_set(x_151, 1, x_149); -x_152 = lean_array_push(x_8, x_151); -x_153 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_153, 0, x_152); -lean_ctor_set(x_153, 1, x_10); -return x_153; } else { -lean_object* x_154; -x_154 = lean_ctor_get(x_147, 0); +lean_object* x_148; lean_object* x_149; +lean_dec(x_8); +if (lean_is_exclusive(x_130)) { + lean_ctor_release(x_130, 0); + lean_ctor_release(x_130, 1); + x_148 = x_130; +} else { + lean_dec_ref(x_130); + x_148 = lean_box(0); +} +if (lean_is_scalar(x_148)) { + x_149 = lean_alloc_ctor(1, 2, 0); +} else { + x_149 = x_148; +} +lean_ctor_set(x_149, 0, x_137); +lean_ctor_set(x_149, 1, x_10); +return x_149; +} +} +} +} +else +{ +lean_object* x_150; +lean_dec(x_9); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_1); +x_150 = lean_ctor_get(x_99, 0); +lean_inc(x_150); +if (lean_obj_tag(x_150) == 0) +{ +lean_object* x_151; +x_151 = lean_ctor_get(x_150, 0); +lean_inc(x_151); +if (lean_obj_tag(x_151) == 0) +{ +uint8_t x_152; +lean_dec(x_150); +x_152 = !lean_is_exclusive(x_99); +if (x_152 == 0) +{ +lean_object* x_153; lean_object* x_154; lean_object* x_155; lean_object* x_156; +x_153 = lean_ctor_get(x_99, 0); +lean_dec(x_153); +x_154 = lean_ctor_get(x_151, 0); lean_inc(x_154); -if (lean_obj_tag(x_154) == 0) -{ -lean_object* x_155; -x_155 = lean_ctor_get(x_154, 0); -lean_inc(x_155); -if (lean_obj_tag(x_155) == 0) -{ -lean_object* x_156; lean_object* x_157; lean_object* x_158; lean_object* x_159; lean_object* x_160; lean_object* x_161; -lean_dec(x_154); -x_156 = lean_ctor_get(x_147, 1); -lean_inc(x_156); -if (lean_is_exclusive(x_147)) { - lean_ctor_release(x_147, 0); - lean_ctor_release(x_147, 1); - x_157 = x_147; -} else { - lean_dec_ref(x_147); - x_157 = lean_box(0); +lean_dec(x_151); +lean_ctor_set(x_99, 0, x_154); +x_155 = lean_array_push(x_8, x_99); +x_156 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_156, 0, x_155); +lean_ctor_set(x_156, 1, x_10); +return x_156; } -x_158 = lean_ctor_get(x_155, 0); +else +{ +lean_object* x_157; lean_object* x_158; lean_object* x_159; lean_object* x_160; lean_object* x_161; +x_157 = lean_ctor_get(x_99, 1); +lean_inc(x_157); +lean_dec(x_99); +x_158 = lean_ctor_get(x_151, 0); lean_inc(x_158); -lean_dec(x_155); -if (lean_is_scalar(x_157)) { - x_159 = lean_alloc_ctor(1, 2, 0); -} else { - x_159 = x_157; -} +lean_dec(x_151); +x_159 = lean_alloc_ctor(1, 2, 0); lean_ctor_set(x_159, 0, x_158); -lean_ctor_set(x_159, 1, x_156); +lean_ctor_set(x_159, 1, x_157); x_160 = lean_array_push(x_8, x_159); x_161 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_161, 0, x_160); lean_ctor_set(x_161, 1, x_10); return x_161; } +} else { -lean_object* x_162; lean_object* x_163; lean_object* x_164; +uint8_t x_162; lean_dec(x_10); lean_dec(x_8); -x_162 = lean_ctor_get(x_147, 1); -lean_inc(x_162); -if (lean_is_exclusive(x_147)) { - lean_ctor_release(x_147, 0); - lean_ctor_release(x_147, 1); - x_163 = x_147; -} else { - lean_dec_ref(x_147); - x_163 = lean_box(0); +x_162 = !lean_is_exclusive(x_99); +if (x_162 == 0) +{ +lean_object* x_163; +x_163 = lean_ctor_get(x_99, 0); +lean_dec(x_163); +return x_99; } -if (lean_is_scalar(x_163)) { - x_164 = lean_alloc_ctor(1, 2, 0); -} else { - x_164 = x_163; +else +{ +lean_object* x_164; lean_object* x_165; +x_164 = lean_ctor_get(x_99, 1); +lean_inc(x_164); +lean_dec(x_99); +x_165 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_165, 0, x_150); +lean_ctor_set(x_165, 1, x_164); +return x_165; } -lean_ctor_set(x_164, 0, x_154); -lean_ctor_set(x_164, 1, x_162); -return x_164; } } else { -lean_object* x_165; lean_object* x_166; +uint8_t x_166; lean_dec(x_8); -if (lean_is_exclusive(x_147)) { - lean_ctor_release(x_147, 0); - lean_ctor_release(x_147, 1); - x_165 = x_147; -} else { - lean_dec_ref(x_147); - x_165 = lean_box(0); -} -if (lean_is_scalar(x_165)) { - x_166 = lean_alloc_ctor(1, 2, 0); -} else { - x_166 = x_165; -} -lean_ctor_set(x_166, 0, x_154); -lean_ctor_set(x_166, 1, x_10); -return x_166; -} -} -} -} -else +x_166 = !lean_is_exclusive(x_99); +if (x_166 == 0) { -lean_object* x_167; -lean_dec(x_9); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_1); -x_167 = lean_ctor_get(x_116, 0); -lean_inc(x_167); -if (lean_obj_tag(x_167) == 0) -{ -lean_object* x_168; -x_168 = lean_ctor_get(x_167, 0); -lean_inc(x_168); -if (lean_obj_tag(x_168) == 0) -{ -uint8_t x_169; +lean_object* x_167; lean_object* x_168; +x_167 = lean_ctor_get(x_99, 1); lean_dec(x_167); -x_169 = !lean_is_exclusive(x_116); -if (x_169 == 0) -{ -lean_object* x_170; lean_object* x_171; lean_object* x_172; lean_object* x_173; -x_170 = lean_ctor_get(x_116, 0); -lean_dec(x_170); -x_171 = lean_ctor_get(x_168, 0); -lean_inc(x_171); +x_168 = lean_ctor_get(x_99, 0); lean_dec(x_168); -lean_ctor_set(x_116, 0, x_171); -x_172 = lean_array_push(x_8, x_116); -x_173 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_173, 0, x_172); -lean_ctor_set(x_173, 1, x_10); -return x_173; +lean_ctor_set(x_99, 1, x_10); +return x_99; } else { -lean_object* x_174; lean_object* x_175; lean_object* x_176; lean_object* x_177; lean_object* x_178; -x_174 = lean_ctor_get(x_116, 1); -lean_inc(x_174); -lean_dec(x_116); -x_175 = lean_ctor_get(x_168, 0); -lean_inc(x_175); -lean_dec(x_168); -x_176 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_176, 0, x_175); -lean_ctor_set(x_176, 1, x_174); -x_177 = lean_array_push(x_8, x_176); -x_178 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_178, 0, x_177); -lean_ctor_set(x_178, 1, x_10); -return x_178; -} -} -else -{ -uint8_t x_179; -lean_dec(x_10); -lean_dec(x_8); -x_179 = !lean_is_exclusive(x_116); -if (x_179 == 0) -{ -lean_object* x_180; -x_180 = lean_ctor_get(x_116, 0); -lean_dec(x_180); -return x_116; -} -else -{ -lean_object* x_181; lean_object* x_182; -x_181 = lean_ctor_get(x_116, 1); -lean_inc(x_181); -lean_dec(x_116); -x_182 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_182, 0, x_167); -lean_ctor_set(x_182, 1, x_181); -return x_182; -} -} -} -else -{ -uint8_t x_183; -lean_dec(x_8); -x_183 = !lean_is_exclusive(x_116); -if (x_183 == 0) -{ -lean_object* x_184; lean_object* x_185; -x_184 = lean_ctor_get(x_116, 1); -lean_dec(x_184); -x_185 = lean_ctor_get(x_116, 0); -lean_dec(x_185); -lean_ctor_set(x_116, 1, x_10); -return x_116; -} -else -{ -lean_object* x_186; -lean_dec(x_116); -x_186 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_186, 0, x_167); -lean_ctor_set(x_186, 1, x_10); -return x_186; +lean_object* x_169; +lean_dec(x_99); +x_169 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_169, 0, x_150); +lean_ctor_set(x_169, 1, x_10); +return x_169; } } } } else { -uint8_t x_187; -x_187 = l_Array_isEmpty___rarg(x_4); -if (x_187 == 0) +uint8_t x_170; +lean_dec(x_2); +x_170 = 1; +x_2 = x_93; +x_7 = x_170; +goto _start; +} +} +} +block_276: { -lean_object* x_188; uint8_t x_189; lean_object* x_190; -x_188 = lean_box(0); -x_189 = 1; +uint8_t x_174; +x_174 = l_coeDecidableEq(x_173); +if (x_174 == 0) +{ +lean_object* x_175; uint8_t x_176; +x_175 = l_Lean_Parser_Term_explicit___elambda__1___closed__2; +lean_inc(x_2); +x_176 = l_Lean_Syntax_isOfKind(x_2, x_175); +if (x_176 == 0) +{ +uint8_t x_177; +x_177 = 0; +x_17 = x_177; +goto block_172; +} +else +{ +lean_object* x_178; lean_object* x_179; lean_object* x_180; uint8_t x_181; +x_178 = l_Lean_Syntax_getArgs(x_2); +x_179 = lean_array_get_size(x_178); +lean_dec(x_178); +x_180 = lean_unsigned_to_nat(2u); +x_181 = lean_nat_dec_eq(x_179, x_180); +lean_dec(x_179); +x_17 = x_181; +goto block_172; +} +} +else +{ +lean_object* x_182; lean_object* x_183; lean_object* x_184; uint8_t x_185; uint8_t x_186; +x_182 = lean_unsigned_to_nat(0u); +x_183 = l_Lean_Syntax_getArg(x_2, x_182); +x_184 = l_Lean_identKind___closed__2; +lean_inc(x_183); +x_185 = l_Lean_Syntax_isOfKind(x_183, x_184); +x_186 = l_coeDecidableEq(x_185); +if (x_186 == 0) +{ +lean_object* x_187; uint8_t x_188; lean_object* x_189; +lean_dec(x_183); +x_187 = lean_box(0); +x_188 = 1; lean_inc(x_10); lean_inc(x_9); -x_190 = l_Lean_Elab_Term_elabFunCore(x_102, x_188, x_189, x_9, x_10); -if (lean_obj_tag(x_190) == 0) +x_189 = l_Lean_Elab_Term_elabTerm(x_2, x_187, x_188, x_9, x_10); +if (lean_obj_tag(x_189) == 0) { -uint8_t x_191; -x_191 = !lean_is_exclusive(x_190); -if (x_191 == 0) +uint8_t x_190; +x_190 = !lean_is_exclusive(x_189); +if (x_190 == 0) { -lean_object* x_192; lean_object* x_193; lean_object* x_194; -x_192 = lean_ctor_get(x_190, 0); -x_193 = lean_ctor_get(x_190, 1); -x_194 = l___private_Init_Lean_Elab_App_20__elabAppLVals(x_1, x_192, x_3, x_4, x_5, x_6, x_189, x_9, x_193); -if (lean_obj_tag(x_194) == 0) +lean_object* x_191; lean_object* x_192; lean_object* x_193; +x_191 = lean_ctor_get(x_189, 0); +x_192 = lean_ctor_get(x_189, 1); +x_193 = l___private_Init_Lean_Elab_App_20__elabAppLVals(x_1, x_191, x_3, x_4, x_5, x_6, x_7, x_9, x_192); +if (lean_obj_tag(x_193) == 0) { -uint8_t x_195; -x_195 = !lean_is_exclusive(x_194); -if (x_195 == 0) +uint8_t x_194; +x_194 = !lean_is_exclusive(x_193); +if (x_194 == 0) { -lean_object* x_196; -x_196 = lean_array_push(x_8, x_194); -lean_ctor_set(x_190, 1, x_10); -lean_ctor_set(x_190, 0, x_196); -return x_190; +lean_object* x_195; +x_195 = lean_array_push(x_8, x_193); +lean_ctor_set(x_189, 1, x_10); +lean_ctor_set(x_189, 0, x_195); +return x_189; } else { -lean_object* x_197; lean_object* x_198; lean_object* x_199; lean_object* x_200; -x_197 = lean_ctor_get(x_194, 0); -x_198 = lean_ctor_get(x_194, 1); -lean_inc(x_198); +lean_object* x_196; lean_object* x_197; lean_object* x_198; lean_object* x_199; +x_196 = lean_ctor_get(x_193, 0); +x_197 = lean_ctor_get(x_193, 1); lean_inc(x_197); -lean_dec(x_194); -x_199 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_199, 0, x_197); -lean_ctor_set(x_199, 1, x_198); -x_200 = lean_array_push(x_8, x_199); -lean_ctor_set(x_190, 1, x_10); -lean_ctor_set(x_190, 0, x_200); -return x_190; +lean_inc(x_196); +lean_dec(x_193); +x_198 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_198, 0, x_196); +lean_ctor_set(x_198, 1, x_197); +x_199 = lean_array_push(x_8, x_198); +lean_ctor_set(x_189, 1, x_10); +lean_ctor_set(x_189, 0, x_199); +return x_189; } } else { +lean_object* x_200; +x_200 = lean_ctor_get(x_193, 0); +lean_inc(x_200); +if (lean_obj_tag(x_200) == 0) +{ lean_object* x_201; -x_201 = lean_ctor_get(x_194, 0); +x_201 = lean_ctor_get(x_200, 0); lean_inc(x_201); if (lean_obj_tag(x_201) == 0) { -lean_object* x_202; -x_202 = lean_ctor_get(x_201, 0); -lean_inc(x_202); -if (lean_obj_tag(x_202) == 0) +uint8_t x_202; +lean_dec(x_200); +x_202 = !lean_is_exclusive(x_193); +if (x_202 == 0) { -uint8_t x_203; +lean_object* x_203; lean_object* x_204; lean_object* x_205; +x_203 = lean_ctor_get(x_193, 0); +lean_dec(x_203); +x_204 = lean_ctor_get(x_201, 0); +lean_inc(x_204); lean_dec(x_201); -x_203 = !lean_is_exclusive(x_194); -if (x_203 == 0) -{ -lean_object* x_204; lean_object* x_205; lean_object* x_206; -x_204 = lean_ctor_get(x_194, 0); -lean_dec(x_204); -x_205 = lean_ctor_get(x_202, 0); -lean_inc(x_205); -lean_dec(x_202); -lean_ctor_set(x_194, 0, x_205); -x_206 = lean_array_push(x_8, x_194); -lean_ctor_set(x_190, 1, x_10); -lean_ctor_set(x_190, 0, x_206); -return x_190; +lean_ctor_set(x_193, 0, x_204); +x_205 = lean_array_push(x_8, x_193); +lean_ctor_set(x_189, 1, x_10); +lean_ctor_set(x_189, 0, x_205); +return x_189; } else { -lean_object* x_207; lean_object* x_208; lean_object* x_209; lean_object* x_210; -x_207 = lean_ctor_get(x_194, 1); +lean_object* x_206; lean_object* x_207; lean_object* x_208; lean_object* x_209; +x_206 = lean_ctor_get(x_193, 1); +lean_inc(x_206); +lean_dec(x_193); +x_207 = lean_ctor_get(x_201, 0); lean_inc(x_207); -lean_dec(x_194); -x_208 = lean_ctor_get(x_202, 0); -lean_inc(x_208); -lean_dec(x_202); -x_209 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_209, 0, x_208); -lean_ctor_set(x_209, 1, x_207); -x_210 = lean_array_push(x_8, x_209); -lean_ctor_set(x_190, 1, x_10); -lean_ctor_set(x_190, 0, x_210); -return x_190; +lean_dec(x_201); +x_208 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_208, 0, x_207); +lean_ctor_set(x_208, 1, x_206); +x_209 = lean_array_push(x_8, x_208); +lean_ctor_set(x_189, 1, x_10); +lean_ctor_set(x_189, 0, x_209); +return x_189; } } else { -uint8_t x_211; -lean_free_object(x_190); +uint8_t x_210; +lean_free_object(x_189); lean_dec(x_10); lean_dec(x_8); -x_211 = !lean_is_exclusive(x_194); -if (x_211 == 0) +x_210 = !lean_is_exclusive(x_193); +if (x_210 == 0) { -lean_object* x_212; -x_212 = lean_ctor_get(x_194, 0); -lean_dec(x_212); -return x_194; +lean_object* x_211; +x_211 = lean_ctor_get(x_193, 0); +lean_dec(x_211); +return x_193; } else { -lean_object* x_213; lean_object* x_214; -x_213 = lean_ctor_get(x_194, 1); -lean_inc(x_213); -lean_dec(x_194); -x_214 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_214, 0, x_201); -lean_ctor_set(x_214, 1, x_213); -return x_214; +lean_object* x_212; lean_object* x_213; +x_212 = lean_ctor_get(x_193, 1); +lean_inc(x_212); +lean_dec(x_193); +x_213 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_213, 0, x_200); +lean_ctor_set(x_213, 1, x_212); +return x_213; } } } else { -uint8_t x_215; -lean_free_object(x_190); +uint8_t x_214; +lean_free_object(x_189); lean_dec(x_8); -x_215 = !lean_is_exclusive(x_194); -if (x_215 == 0) +x_214 = !lean_is_exclusive(x_193); +if (x_214 == 0) { -lean_object* x_216; lean_object* x_217; -x_216 = lean_ctor_get(x_194, 1); +lean_object* x_215; lean_object* x_216; +x_215 = lean_ctor_get(x_193, 1); +lean_dec(x_215); +x_216 = lean_ctor_get(x_193, 0); lean_dec(x_216); -x_217 = lean_ctor_get(x_194, 0); -lean_dec(x_217); -lean_ctor_set(x_194, 1, x_10); -return x_194; +lean_ctor_set(x_193, 1, x_10); +return x_193; } else { -lean_object* x_218; -lean_dec(x_194); -x_218 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_218, 0, x_201); -lean_ctor_set(x_218, 1, x_10); -return x_218; +lean_object* x_217; +lean_dec(x_193); +x_217 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_217, 0, x_200); +lean_ctor_set(x_217, 1, x_10); +return x_217; } } } } else { -lean_object* x_219; lean_object* x_220; lean_object* x_221; -x_219 = lean_ctor_get(x_190, 0); -x_220 = lean_ctor_get(x_190, 1); -lean_inc(x_220); +lean_object* x_218; lean_object* x_219; lean_object* x_220; +x_218 = lean_ctor_get(x_189, 0); +x_219 = lean_ctor_get(x_189, 1); lean_inc(x_219); -lean_dec(x_190); -x_221 = l___private_Init_Lean_Elab_App_20__elabAppLVals(x_1, x_219, x_3, x_4, x_5, x_6, x_189, x_9, x_220); -if (lean_obj_tag(x_221) == 0) +lean_inc(x_218); +lean_dec(x_189); +x_220 = l___private_Init_Lean_Elab_App_20__elabAppLVals(x_1, x_218, x_3, x_4, x_5, x_6, x_7, x_9, x_219); +if (lean_obj_tag(x_220) == 0) { -lean_object* x_222; lean_object* x_223; lean_object* x_224; lean_object* x_225; lean_object* x_226; lean_object* x_227; -x_222 = lean_ctor_get(x_221, 0); +lean_object* x_221; lean_object* x_222; lean_object* x_223; lean_object* x_224; lean_object* x_225; lean_object* x_226; +x_221 = lean_ctor_get(x_220, 0); +lean_inc(x_221); +x_222 = lean_ctor_get(x_220, 1); lean_inc(x_222); -x_223 = lean_ctor_get(x_221, 1); -lean_inc(x_223); -if (lean_is_exclusive(x_221)) { - lean_ctor_release(x_221, 0); - lean_ctor_release(x_221, 1); - x_224 = x_221; +if (lean_is_exclusive(x_220)) { + lean_ctor_release(x_220, 0); + lean_ctor_release(x_220, 1); + x_223 = x_220; } else { - lean_dec_ref(x_221); - x_224 = lean_box(0); + lean_dec_ref(x_220); + x_223 = lean_box(0); } -if (lean_is_scalar(x_224)) { - x_225 = lean_alloc_ctor(0, 2, 0); +if (lean_is_scalar(x_223)) { + x_224 = lean_alloc_ctor(0, 2, 0); } else { - x_225 = x_224; + x_224 = x_223; } -lean_ctor_set(x_225, 0, x_222); -lean_ctor_set(x_225, 1, x_223); -x_226 = lean_array_push(x_8, x_225); -x_227 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_227, 0, x_226); -lean_ctor_set(x_227, 1, x_10); -return x_227; +lean_ctor_set(x_224, 0, x_221); +lean_ctor_set(x_224, 1, x_222); +x_225 = lean_array_push(x_8, x_224); +x_226 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_226, 0, x_225); +lean_ctor_set(x_226, 1, x_10); +return x_226; } else { +lean_object* x_227; +x_227 = lean_ctor_get(x_220, 0); +lean_inc(x_227); +if (lean_obj_tag(x_227) == 0) +{ lean_object* x_228; -x_228 = lean_ctor_get(x_221, 0); +x_228 = lean_ctor_get(x_227, 0); lean_inc(x_228); if (lean_obj_tag(x_228) == 0) { -lean_object* x_229; -x_229 = lean_ctor_get(x_228, 0); +lean_object* x_229; lean_object* x_230; lean_object* x_231; lean_object* x_232; lean_object* x_233; lean_object* x_234; +lean_dec(x_227); +x_229 = lean_ctor_get(x_220, 1); lean_inc(x_229); -if (lean_obj_tag(x_229) == 0) -{ -lean_object* x_230; lean_object* x_231; lean_object* x_232; lean_object* x_233; lean_object* x_234; lean_object* x_235; +if (lean_is_exclusive(x_220)) { + lean_ctor_release(x_220, 0); + lean_ctor_release(x_220, 1); + x_230 = x_220; +} else { + lean_dec_ref(x_220); + x_230 = lean_box(0); +} +x_231 = lean_ctor_get(x_228, 0); +lean_inc(x_231); lean_dec(x_228); -x_230 = lean_ctor_get(x_221, 1); -lean_inc(x_230); -if (lean_is_exclusive(x_221)) { - lean_ctor_release(x_221, 0); - lean_ctor_release(x_221, 1); - x_231 = x_221; +if (lean_is_scalar(x_230)) { + x_232 = lean_alloc_ctor(1, 2, 0); } else { - lean_dec_ref(x_221); - x_231 = lean_box(0); + x_232 = x_230; } -x_232 = lean_ctor_get(x_229, 0); -lean_inc(x_232); -lean_dec(x_229); -if (lean_is_scalar(x_231)) { - x_233 = lean_alloc_ctor(1, 2, 0); -} else { - x_233 = x_231; -} -lean_ctor_set(x_233, 0, x_232); -lean_ctor_set(x_233, 1, x_230); -x_234 = lean_array_push(x_8, x_233); -x_235 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_235, 0, x_234); -lean_ctor_set(x_235, 1, x_10); -return x_235; +lean_ctor_set(x_232, 0, x_231); +lean_ctor_set(x_232, 1, x_229); +x_233 = lean_array_push(x_8, x_232); +x_234 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_234, 0, x_233); +lean_ctor_set(x_234, 1, x_10); +return x_234; } else { -lean_object* x_236; lean_object* x_237; lean_object* x_238; +lean_object* x_235; lean_object* x_236; lean_object* x_237; lean_dec(x_10); lean_dec(x_8); -x_236 = lean_ctor_get(x_221, 1); -lean_inc(x_236); -if (lean_is_exclusive(x_221)) { - lean_ctor_release(x_221, 0); - lean_ctor_release(x_221, 1); - x_237 = x_221; +x_235 = lean_ctor_get(x_220, 1); +lean_inc(x_235); +if (lean_is_exclusive(x_220)) { + lean_ctor_release(x_220, 0); + lean_ctor_release(x_220, 1); + x_236 = x_220; } else { - lean_dec_ref(x_221); - x_237 = lean_box(0); + lean_dec_ref(x_220); + x_236 = lean_box(0); } -if (lean_is_scalar(x_237)) { - x_238 = lean_alloc_ctor(1, 2, 0); +if (lean_is_scalar(x_236)) { + x_237 = lean_alloc_ctor(1, 2, 0); } else { - x_238 = x_237; + x_237 = x_236; } -lean_ctor_set(x_238, 0, x_228); -lean_ctor_set(x_238, 1, x_236); -return x_238; +lean_ctor_set(x_237, 0, x_227); +lean_ctor_set(x_237, 1, x_235); +return x_237; } } else { -lean_object* x_239; lean_object* x_240; +lean_object* x_238; lean_object* x_239; lean_dec(x_8); -if (lean_is_exclusive(x_221)) { - lean_ctor_release(x_221, 0); - lean_ctor_release(x_221, 1); - x_239 = x_221; +if (lean_is_exclusive(x_220)) { + lean_ctor_release(x_220, 0); + lean_ctor_release(x_220, 1); + x_238 = x_220; } else { - lean_dec_ref(x_221); - x_239 = lean_box(0); + lean_dec_ref(x_220); + x_238 = lean_box(0); } -if (lean_is_scalar(x_239)) { - x_240 = lean_alloc_ctor(1, 2, 0); +if (lean_is_scalar(x_238)) { + x_239 = lean_alloc_ctor(1, 2, 0); } else { - x_240 = x_239; + x_239 = x_238; } -lean_ctor_set(x_240, 0, x_228); -lean_ctor_set(x_240, 1, x_10); -return x_240; +lean_ctor_set(x_239, 0, x_227); +lean_ctor_set(x_239, 1, x_10); +return x_239; } } } } else { -lean_object* x_241; +lean_object* x_240; lean_dec(x_9); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_3); lean_dec(x_1); -x_241 = lean_ctor_get(x_190, 0); +x_240 = lean_ctor_get(x_189, 0); +lean_inc(x_240); +if (lean_obj_tag(x_240) == 0) +{ +lean_object* x_241; +x_241 = lean_ctor_get(x_240, 0); lean_inc(x_241); if (lean_obj_tag(x_241) == 0) { -lean_object* x_242; -x_242 = lean_ctor_get(x_241, 0); -lean_inc(x_242); -if (lean_obj_tag(x_242) == 0) +uint8_t x_242; +lean_dec(x_240); +x_242 = !lean_is_exclusive(x_189); +if (x_242 == 0) { -uint8_t x_243; +lean_object* x_243; lean_object* x_244; lean_object* x_245; lean_object* x_246; +x_243 = lean_ctor_get(x_189, 0); +lean_dec(x_243); +x_244 = lean_ctor_get(x_241, 0); +lean_inc(x_244); lean_dec(x_241); -x_243 = !lean_is_exclusive(x_190); -if (x_243 == 0) -{ -lean_object* x_244; lean_object* x_245; lean_object* x_246; lean_object* x_247; -x_244 = lean_ctor_get(x_190, 0); -lean_dec(x_244); -x_245 = lean_ctor_get(x_242, 0); -lean_inc(x_245); -lean_dec(x_242); -lean_ctor_set(x_190, 0, x_245); -x_246 = lean_array_push(x_8, x_190); -x_247 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_247, 0, x_246); -lean_ctor_set(x_247, 1, x_10); -return x_247; +lean_ctor_set(x_189, 0, x_244); +x_245 = lean_array_push(x_8, x_189); +x_246 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_246, 0, x_245); +lean_ctor_set(x_246, 1, x_10); +return x_246; } else { -lean_object* x_248; lean_object* x_249; lean_object* x_250; lean_object* x_251; lean_object* x_252; -x_248 = lean_ctor_get(x_190, 1); +lean_object* x_247; lean_object* x_248; lean_object* x_249; lean_object* x_250; lean_object* x_251; +x_247 = lean_ctor_get(x_189, 1); +lean_inc(x_247); +lean_dec(x_189); +x_248 = lean_ctor_get(x_241, 0); lean_inc(x_248); -lean_dec(x_190); -x_249 = lean_ctor_get(x_242, 0); -lean_inc(x_249); -lean_dec(x_242); -x_250 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_250, 0, x_249); -lean_ctor_set(x_250, 1, x_248); -x_251 = lean_array_push(x_8, x_250); -x_252 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_252, 0, x_251); -lean_ctor_set(x_252, 1, x_10); -return x_252; +lean_dec(x_241); +x_249 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_249, 0, x_248); +lean_ctor_set(x_249, 1, x_247); +x_250 = lean_array_push(x_8, x_249); +x_251 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_251, 0, x_250); +lean_ctor_set(x_251, 1, x_10); +return x_251; } } else { -uint8_t x_253; +uint8_t x_252; lean_dec(x_10); lean_dec(x_8); -x_253 = !lean_is_exclusive(x_190); -if (x_253 == 0) +x_252 = !lean_is_exclusive(x_189); +if (x_252 == 0) { -lean_object* x_254; -x_254 = lean_ctor_get(x_190, 0); -lean_dec(x_254); -return x_190; +lean_object* x_253; +x_253 = lean_ctor_get(x_189, 0); +lean_dec(x_253); +return x_189; } else { -lean_object* x_255; lean_object* x_256; -x_255 = lean_ctor_get(x_190, 1); -lean_inc(x_255); -lean_dec(x_190); -x_256 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_256, 0, x_241); -lean_ctor_set(x_256, 1, x_255); -return x_256; +lean_object* x_254; lean_object* x_255; +x_254 = lean_ctor_get(x_189, 1); +lean_inc(x_254); +lean_dec(x_189); +x_255 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_255, 0, x_240); +lean_ctor_set(x_255, 1, x_254); +return x_255; } } } else { -uint8_t x_257; +uint8_t x_256; lean_dec(x_8); -x_257 = !lean_is_exclusive(x_190); -if (x_257 == 0) +x_256 = !lean_is_exclusive(x_189); +if (x_256 == 0) { -lean_object* x_258; lean_object* x_259; -x_258 = lean_ctor_get(x_190, 1); +lean_object* x_257; lean_object* x_258; +x_257 = lean_ctor_get(x_189, 1); +lean_dec(x_257); +x_258 = lean_ctor_get(x_189, 0); lean_dec(x_258); -x_259 = lean_ctor_get(x_190, 0); -lean_dec(x_259); -lean_ctor_set(x_190, 1, x_10); -return x_190; +lean_ctor_set(x_189, 1, x_10); +return x_189; } else { -lean_object* x_260; -lean_dec(x_190); -x_260 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_260, 0, x_241); -lean_ctor_set(x_260, 1, x_10); -return x_260; +lean_object* x_259; +lean_dec(x_189); +x_259 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_259, 0, x_240); +lean_ctor_set(x_259, 1, x_10); +return x_259; } } } } else { -uint8_t x_261; -x_261 = l_Array_isEmpty___rarg(x_5); -if (x_261 == 0) +lean_object* x_260; lean_object* x_261; lean_object* x_262; uint8_t x_263; +x_260 = lean_unsigned_to_nat(1u); +x_261 = l_Lean_Syntax_getArg(x_2, x_260); +lean_dec(x_2); +x_262 = l_Lean_Syntax_getArgs(x_261); +lean_dec(x_261); +x_263 = l_Array_isEmpty___rarg(x_262); +if (x_263 == 0) { -lean_object* x_262; uint8_t x_263; lean_object* x_264; -x_262 = lean_box(0); -x_263 = 1; -lean_inc(x_10); -lean_inc(x_9); -x_264 = l_Lean_Elab_Term_elabFunCore(x_102, x_262, x_263, x_9, x_10); -if (lean_obj_tag(x_264) == 0) +lean_object* x_264; lean_object* x_265; lean_object* x_266; +x_264 = l_Lean_Syntax_inhabited; +x_265 = lean_array_get(x_264, x_262, x_182); +lean_dec(x_262); +x_266 = l_Lean_Elab_Term_elabExplicitUniv(x_265, x_9, x_10); +lean_dec(x_265); +if (lean_obj_tag(x_266) == 0) { -uint8_t x_265; -x_265 = !lean_is_exclusive(x_264); -if (x_265 == 0) -{ -lean_object* x_266; lean_object* x_267; lean_object* x_268; -x_266 = lean_ctor_get(x_264, 0); -x_267 = lean_ctor_get(x_264, 1); -x_268 = l___private_Init_Lean_Elab_App_20__elabAppLVals(x_1, x_266, x_3, x_4, x_5, x_6, x_263, x_9, x_267); -if (lean_obj_tag(x_268) == 0) -{ -uint8_t x_269; -x_269 = !lean_is_exclusive(x_268); -if (x_269 == 0) -{ -lean_object* x_270; -x_270 = lean_array_push(x_8, x_268); -lean_ctor_set(x_264, 1, x_10); -lean_ctor_set(x_264, 0, x_270); -return x_264; +lean_object* x_267; lean_object* x_268; lean_object* x_269; +x_267 = lean_ctor_get(x_266, 0); +lean_inc(x_267); +x_268 = lean_ctor_get(x_266, 1); +lean_inc(x_268); +lean_dec(x_266); +x_269 = l___private_Init_Lean_Elab_App_21__elabAppFnId(x_1, x_183, x_267, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_268); +return x_269; } else { -lean_object* x_271; lean_object* x_272; lean_object* x_273; lean_object* x_274; -x_271 = lean_ctor_get(x_268, 0); -x_272 = lean_ctor_get(x_268, 1); -lean_inc(x_272); -lean_inc(x_271); -lean_dec(x_268); -x_273 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_273, 0, x_271); -lean_ctor_set(x_273, 1, x_272); -x_274 = lean_array_push(x_8, x_273); -lean_ctor_set(x_264, 1, x_10); -lean_ctor_set(x_264, 0, x_274); -return x_264; -} -} -else -{ -lean_object* x_275; -x_275 = lean_ctor_get(x_268, 0); -lean_inc(x_275); -if (lean_obj_tag(x_275) == 0) -{ -lean_object* x_276; -x_276 = lean_ctor_get(x_275, 0); -lean_inc(x_276); -if (lean_obj_tag(x_276) == 0) -{ -uint8_t x_277; -lean_dec(x_275); -x_277 = !lean_is_exclusive(x_268); -if (x_277 == 0) -{ -lean_object* x_278; lean_object* x_279; lean_object* x_280; -x_278 = lean_ctor_get(x_268, 0); -lean_dec(x_278); -x_279 = lean_ctor_get(x_276, 0); -lean_inc(x_279); -lean_dec(x_276); -lean_ctor_set(x_268, 0, x_279); -x_280 = lean_array_push(x_8, x_268); -lean_ctor_set(x_264, 1, x_10); -lean_ctor_set(x_264, 0, x_280); -return x_264; -} -else -{ -lean_object* x_281; lean_object* x_282; lean_object* x_283; lean_object* x_284; -x_281 = lean_ctor_get(x_268, 1); -lean_inc(x_281); -lean_dec(x_268); -x_282 = lean_ctor_get(x_276, 0); -lean_inc(x_282); -lean_dec(x_276); -x_283 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_283, 0, x_282); -lean_ctor_set(x_283, 1, x_281); -x_284 = lean_array_push(x_8, x_283); -lean_ctor_set(x_264, 1, x_10); -lean_ctor_set(x_264, 0, x_284); -return x_264; -} -} -else -{ -uint8_t x_285; -lean_free_object(x_264); -lean_dec(x_10); -lean_dec(x_8); -x_285 = !lean_is_exclusive(x_268); -if (x_285 == 0) -{ -lean_object* x_286; -x_286 = lean_ctor_get(x_268, 0); -lean_dec(x_286); -return x_268; -} -else -{ -lean_object* x_287; lean_object* x_288; -x_287 = lean_ctor_get(x_268, 1); -lean_inc(x_287); -lean_dec(x_268); -x_288 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_288, 0, x_275); -lean_ctor_set(x_288, 1, x_287); -return x_288; -} -} -} -else -{ -uint8_t x_289; -lean_free_object(x_264); -lean_dec(x_8); -x_289 = !lean_is_exclusive(x_268); -if (x_289 == 0) -{ -lean_object* x_290; lean_object* x_291; -x_290 = lean_ctor_get(x_268, 1); -lean_dec(x_290); -x_291 = lean_ctor_get(x_268, 0); -lean_dec(x_291); -lean_ctor_set(x_268, 1, x_10); -return x_268; -} -else -{ -lean_object* x_292; -lean_dec(x_268); -x_292 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_292, 0, x_275); -lean_ctor_set(x_292, 1, x_10); -return x_292; -} -} -} -} -else -{ -lean_object* x_293; lean_object* x_294; lean_object* x_295; -x_293 = lean_ctor_get(x_264, 0); -x_294 = lean_ctor_get(x_264, 1); -lean_inc(x_294); -lean_inc(x_293); -lean_dec(x_264); -x_295 = l___private_Init_Lean_Elab_App_20__elabAppLVals(x_1, x_293, x_3, x_4, x_5, x_6, x_263, x_9, x_294); -if (lean_obj_tag(x_295) == 0) -{ -lean_object* x_296; lean_object* x_297; lean_object* x_298; lean_object* x_299; lean_object* x_300; lean_object* x_301; -x_296 = lean_ctor_get(x_295, 0); -lean_inc(x_296); -x_297 = lean_ctor_get(x_295, 1); -lean_inc(x_297); -if (lean_is_exclusive(x_295)) { - lean_ctor_release(x_295, 0); - lean_ctor_release(x_295, 1); - x_298 = x_295; -} else { - lean_dec_ref(x_295); - x_298 = lean_box(0); -} -if (lean_is_scalar(x_298)) { - x_299 = lean_alloc_ctor(0, 2, 0); -} else { - x_299 = x_298; -} -lean_ctor_set(x_299, 0, x_296); -lean_ctor_set(x_299, 1, x_297); -x_300 = lean_array_push(x_8, x_299); -x_301 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_301, 0, x_300); -lean_ctor_set(x_301, 1, x_10); -return x_301; -} -else -{ -lean_object* x_302; -x_302 = lean_ctor_get(x_295, 0); -lean_inc(x_302); -if (lean_obj_tag(x_302) == 0) -{ -lean_object* x_303; -x_303 = lean_ctor_get(x_302, 0); -lean_inc(x_303); -if (lean_obj_tag(x_303) == 0) -{ -lean_object* x_304; lean_object* x_305; lean_object* x_306; lean_object* x_307; lean_object* x_308; lean_object* x_309; -lean_dec(x_302); -x_304 = lean_ctor_get(x_295, 1); -lean_inc(x_304); -if (lean_is_exclusive(x_295)) { - lean_ctor_release(x_295, 0); - lean_ctor_release(x_295, 1); - x_305 = x_295; -} else { - lean_dec_ref(x_295); - x_305 = lean_box(0); -} -x_306 = lean_ctor_get(x_303, 0); -lean_inc(x_306); -lean_dec(x_303); -if (lean_is_scalar(x_305)) { - x_307 = lean_alloc_ctor(1, 2, 0); -} else { - x_307 = x_305; -} -lean_ctor_set(x_307, 0, x_306); -lean_ctor_set(x_307, 1, x_304); -x_308 = lean_array_push(x_8, x_307); -x_309 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_309, 0, x_308); -lean_ctor_set(x_309, 1, x_10); -return x_309; -} -else -{ -lean_object* x_310; lean_object* x_311; lean_object* x_312; -lean_dec(x_10); -lean_dec(x_8); -x_310 = lean_ctor_get(x_295, 1); -lean_inc(x_310); -if (lean_is_exclusive(x_295)) { - lean_ctor_release(x_295, 0); - lean_ctor_release(x_295, 1); - x_311 = x_295; -} else { - lean_dec_ref(x_295); - x_311 = lean_box(0); -} -if (lean_is_scalar(x_311)) { - x_312 = lean_alloc_ctor(1, 2, 0); -} else { - x_312 = x_311; -} -lean_ctor_set(x_312, 0, x_302); -lean_ctor_set(x_312, 1, x_310); -return x_312; -} -} -else -{ -lean_object* x_313; lean_object* x_314; -lean_dec(x_8); -if (lean_is_exclusive(x_295)) { - lean_ctor_release(x_295, 0); - lean_ctor_release(x_295, 1); - x_313 = x_295; -} else { - lean_dec_ref(x_295); - x_313 = lean_box(0); -} -if (lean_is_scalar(x_313)) { - x_314 = lean_alloc_ctor(1, 2, 0); -} else { - x_314 = x_313; -} -lean_ctor_set(x_314, 0, x_302); -lean_ctor_set(x_314, 1, x_10); -return x_314; -} -} -} -} -else -{ -lean_object* x_315; +uint8_t x_270; +lean_dec(x_183); lean_dec(x_9); +lean_dec(x_8); lean_dec(x_6); lean_dec(x_5); lean_dec(x_4); lean_dec(x_3); lean_dec(x_1); -x_315 = lean_ctor_get(x_264, 0); -lean_inc(x_315); +x_270 = !lean_is_exclusive(x_266); +if (x_270 == 0) +{ +return x_266; +} +else +{ +lean_object* x_271; lean_object* x_272; lean_object* x_273; +x_271 = lean_ctor_get(x_266, 0); +x_272 = lean_ctor_get(x_266, 1); +lean_inc(x_272); +lean_inc(x_271); +lean_dec(x_266); +x_273 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_273, 0, x_271); +lean_ctor_set(x_273, 1, x_272); +return x_273; +} +} +} +else +{ +lean_object* x_274; lean_object* x_275; +lean_dec(x_262); +x_274 = lean_box(0); +x_275 = l___private_Init_Lean_Elab_App_21__elabAppFnId(x_1, x_183, x_274, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10); +return x_275; +} +} +} +} +} +else +{ +lean_object* x_284; lean_object* x_285; lean_object* x_286; lean_object* x_287; lean_object* x_288; lean_object* x_289; +x_284 = lean_unsigned_to_nat(0u); +x_285 = l_Lean_Syntax_getArg(x_2, x_284); +x_286 = lean_unsigned_to_nat(2u); +x_287 = l_Lean_Syntax_getArg(x_2, x_286); +lean_dec(x_2); +x_288 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_288, 0, x_287); +x_289 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_289, 0, x_288); +lean_ctor_set(x_289, 1, x_3); +x_2 = x_285; +x_3 = x_289; +goto _start; +} +} +block_403: +{ +uint8_t x_293; +x_293 = l_coeDecidableEq(x_292); +if (x_293 == 0) +{ +lean_object* x_294; uint8_t x_295; +x_294 = l_Lean_Parser_Term_arrayRef___elambda__1___closed__2; +lean_inc(x_2); +x_295 = l_Lean_Syntax_isOfKind(x_2, x_294); +if (x_295 == 0) +{ +uint8_t x_296; +x_296 = 0; +x_15 = x_296; +goto block_291; +} +else +{ +lean_object* x_297; lean_object* x_298; lean_object* x_299; uint8_t x_300; +x_297 = l_Lean_Syntax_getArgs(x_2); +x_298 = lean_array_get_size(x_297); +lean_dec(x_297); +x_299 = lean_unsigned_to_nat(4u); +x_300 = lean_nat_dec_eq(x_298, x_299); +lean_dec(x_298); +x_15 = x_300; +goto block_291; +} +} +else +{ +lean_object* x_301; lean_object* x_302; lean_object* x_303; uint8_t x_304; uint8_t x_305; +x_301 = lean_unsigned_to_nat(2u); +x_302 = l_Lean_Syntax_getArg(x_2, x_301); +x_303 = l_Lean_fieldIdxKind___closed__2; +lean_inc(x_302); +x_304 = l_Lean_Syntax_isOfKind(x_302, x_303); +x_305 = l_coeDecidableEq(x_304); +if (x_305 == 0) +{ +lean_object* x_306; uint8_t x_307; uint8_t x_308; +x_306 = l_Lean_identKind___closed__2; +lean_inc(x_302); +x_307 = l_Lean_Syntax_isOfKind(x_302, x_306); +x_308 = l_coeDecidableEq(x_307); +if (x_308 == 0) +{ +lean_object* x_309; uint8_t x_310; lean_object* x_311; +lean_dec(x_302); +x_309 = lean_box(0); +x_310 = 1; +lean_inc(x_10); +lean_inc(x_9); +x_311 = l_Lean_Elab_Term_elabTerm(x_2, x_309, x_310, x_9, x_10); +if (lean_obj_tag(x_311) == 0) +{ +uint8_t x_312; +x_312 = !lean_is_exclusive(x_311); +if (x_312 == 0) +{ +lean_object* x_313; lean_object* x_314; lean_object* x_315; +x_313 = lean_ctor_get(x_311, 0); +x_314 = lean_ctor_get(x_311, 1); +x_315 = l___private_Init_Lean_Elab_App_20__elabAppLVals(x_1, x_313, x_3, x_4, x_5, x_6, x_7, x_9, x_314); if (lean_obj_tag(x_315) == 0) { -lean_object* x_316; -x_316 = lean_ctor_get(x_315, 0); -lean_inc(x_316); -if (lean_obj_tag(x_316) == 0) +uint8_t x_316; +x_316 = !lean_is_exclusive(x_315); +if (x_316 == 0) { -uint8_t x_317; -lean_dec(x_315); -x_317 = !lean_is_exclusive(x_264); -if (x_317 == 0) +lean_object* x_317; +x_317 = lean_array_push(x_8, x_315); +lean_ctor_set(x_311, 1, x_10); +lean_ctor_set(x_311, 0, x_317); +return x_311; +} +else { lean_object* x_318; lean_object* x_319; lean_object* x_320; lean_object* x_321; -x_318 = lean_ctor_get(x_264, 0); -lean_dec(x_318); -x_319 = lean_ctor_get(x_316, 0); +x_318 = lean_ctor_get(x_315, 0); +x_319 = lean_ctor_get(x_315, 1); lean_inc(x_319); -lean_dec(x_316); -lean_ctor_set(x_264, 0, x_319); -x_320 = lean_array_push(x_8, x_264); -x_321 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_321, 0, x_320); -lean_ctor_set(x_321, 1, x_10); -return x_321; +lean_inc(x_318); +lean_dec(x_315); +x_320 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_320, 0, x_318); +lean_ctor_set(x_320, 1, x_319); +x_321 = lean_array_push(x_8, x_320); +lean_ctor_set(x_311, 1, x_10); +lean_ctor_set(x_311, 0, x_321); +return x_311; +} } else { -lean_object* x_322; lean_object* x_323; lean_object* x_324; lean_object* x_325; lean_object* x_326; -x_322 = lean_ctor_get(x_264, 1); +lean_object* x_322; +x_322 = lean_ctor_get(x_315, 0); lean_inc(x_322); -lean_dec(x_264); -x_323 = lean_ctor_get(x_316, 0); +if (lean_obj_tag(x_322) == 0) +{ +lean_object* x_323; +x_323 = lean_ctor_get(x_322, 0); lean_inc(x_323); -lean_dec(x_316); -x_324 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_324, 0, x_323); -lean_ctor_set(x_324, 1, x_322); -x_325 = lean_array_push(x_8, x_324); -x_326 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_326, 0, x_325); -lean_ctor_set(x_326, 1, x_10); -return x_326; +if (lean_obj_tag(x_323) == 0) +{ +uint8_t x_324; +lean_dec(x_322); +x_324 = !lean_is_exclusive(x_315); +if (x_324 == 0) +{ +lean_object* x_325; lean_object* x_326; lean_object* x_327; +x_325 = lean_ctor_get(x_315, 0); +lean_dec(x_325); +x_326 = lean_ctor_get(x_323, 0); +lean_inc(x_326); +lean_dec(x_323); +lean_ctor_set(x_315, 0, x_326); +x_327 = lean_array_push(x_8, x_315); +lean_ctor_set(x_311, 1, x_10); +lean_ctor_set(x_311, 0, x_327); +return x_311; +} +else +{ +lean_object* x_328; lean_object* x_329; lean_object* x_330; lean_object* x_331; +x_328 = lean_ctor_get(x_315, 1); +lean_inc(x_328); +lean_dec(x_315); +x_329 = lean_ctor_get(x_323, 0); +lean_inc(x_329); +lean_dec(x_323); +x_330 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_330, 0, x_329); +lean_ctor_set(x_330, 1, x_328); +x_331 = lean_array_push(x_8, x_330); +lean_ctor_set(x_311, 1, x_10); +lean_ctor_set(x_311, 0, x_331); +return x_311; } } else { -uint8_t x_327; +uint8_t x_332; +lean_free_object(x_311); lean_dec(x_10); lean_dec(x_8); -x_327 = !lean_is_exclusive(x_264); -if (x_327 == 0) +x_332 = !lean_is_exclusive(x_315); +if (x_332 == 0) { -lean_object* x_328; -x_328 = lean_ctor_get(x_264, 0); -lean_dec(x_328); -return x_264; -} -else -{ -lean_object* x_329; lean_object* x_330; -x_329 = lean_ctor_get(x_264, 1); -lean_inc(x_329); -lean_dec(x_264); -x_330 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_330, 0, x_315); -lean_ctor_set(x_330, 1, x_329); -return x_330; -} -} -} -else -{ -uint8_t x_331; -lean_dec(x_8); -x_331 = !lean_is_exclusive(x_264); -if (x_331 == 0) -{ -lean_object* x_332; lean_object* x_333; -x_332 = lean_ctor_get(x_264, 1); -lean_dec(x_332); -x_333 = lean_ctor_get(x_264, 0); +lean_object* x_333; +x_333 = lean_ctor_get(x_315, 0); lean_dec(x_333); -lean_ctor_set(x_264, 1, x_10); -return x_264; +return x_315; } else { -lean_object* x_334; -lean_dec(x_264); -x_334 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_334, 0, x_315); -lean_ctor_set(x_334, 1, x_10); -return x_334; -} +lean_object* x_334; lean_object* x_335; +x_334 = lean_ctor_get(x_315, 1); +lean_inc(x_334); +lean_dec(x_315); +x_335 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_335, 0, x_322); +lean_ctor_set(x_335, 1, x_334); +return x_335; } } } else { -uint8_t x_335; lean_object* x_336; -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_1); -x_335 = 1; -lean_inc(x_10); -x_336 = l_Lean_Elab_Term_elabFunCore(x_102, x_6, x_335, x_9, x_10); -if (lean_obj_tag(x_336) == 0) +uint8_t x_336; +lean_free_object(x_311); +lean_dec(x_8); +x_336 = !lean_is_exclusive(x_315); +if (x_336 == 0) { -uint8_t x_337; -x_337 = !lean_is_exclusive(x_336); -if (x_337 == 0) +lean_object* x_337; lean_object* x_338; +x_337 = lean_ctor_get(x_315, 1); +lean_dec(x_337); +x_338 = lean_ctor_get(x_315, 0); +lean_dec(x_338); +lean_ctor_set(x_315, 1, x_10); +return x_315; +} +else { -lean_object* x_338; lean_object* x_339; -x_338 = lean_array_push(x_8, x_336); -x_339 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_339, 0, x_338); +lean_object* x_339; +lean_dec(x_315); +x_339 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_339, 0, x_322); lean_ctor_set(x_339, 1, x_10); return x_339; } +} +} +} else { -lean_object* x_340; lean_object* x_341; lean_object* x_342; lean_object* x_343; lean_object* x_344; -x_340 = lean_ctor_get(x_336, 0); -x_341 = lean_ctor_get(x_336, 1); +lean_object* x_340; lean_object* x_341; lean_object* x_342; +x_340 = lean_ctor_get(x_311, 0); +x_341 = lean_ctor_get(x_311, 1); lean_inc(x_341); lean_inc(x_340); -lean_dec(x_336); -x_342 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_342, 0, x_340); -lean_ctor_set(x_342, 1, x_341); -x_343 = lean_array_push(x_8, x_342); -x_344 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_344, 0, x_343); -lean_ctor_set(x_344, 1, x_10); -return x_344; +lean_dec(x_311); +x_342 = l___private_Init_Lean_Elab_App_20__elabAppLVals(x_1, x_340, x_3, x_4, x_5, x_6, x_7, x_9, x_341); +if (lean_obj_tag(x_342) == 0) +{ +lean_object* x_343; lean_object* x_344; lean_object* x_345; lean_object* x_346; lean_object* x_347; lean_object* x_348; +x_343 = lean_ctor_get(x_342, 0); +lean_inc(x_343); +x_344 = lean_ctor_get(x_342, 1); +lean_inc(x_344); +if (lean_is_exclusive(x_342)) { + lean_ctor_release(x_342, 0); + lean_ctor_release(x_342, 1); + x_345 = x_342; +} else { + lean_dec_ref(x_342); + x_345 = lean_box(0); } +if (lean_is_scalar(x_345)) { + x_346 = lean_alloc_ctor(0, 2, 0); +} else { + x_346 = x_345; +} +lean_ctor_set(x_346, 0, x_343); +lean_ctor_set(x_346, 1, x_344); +x_347 = lean_array_push(x_8, x_346); +x_348 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_348, 0, x_347); +lean_ctor_set(x_348, 1, x_10); +return x_348; } else { -lean_object* x_345; -x_345 = lean_ctor_get(x_336, 0); -lean_inc(x_345); -if (lean_obj_tag(x_345) == 0) -{ -lean_object* x_346; -x_346 = lean_ctor_get(x_345, 0); -lean_inc(x_346); -if (lean_obj_tag(x_346) == 0) -{ -uint8_t x_347; -lean_dec(x_345); -x_347 = !lean_is_exclusive(x_336); -if (x_347 == 0) -{ -lean_object* x_348; lean_object* x_349; lean_object* x_350; lean_object* x_351; -x_348 = lean_ctor_get(x_336, 0); -lean_dec(x_348); -x_349 = lean_ctor_get(x_346, 0); +lean_object* x_349; +x_349 = lean_ctor_get(x_342, 0); lean_inc(x_349); -lean_dec(x_346); -lean_ctor_set(x_336, 0, x_349); -x_350 = lean_array_push(x_8, x_336); -x_351 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_351, 0, x_350); -lean_ctor_set(x_351, 1, x_10); -return x_351; -} -else +if (lean_obj_tag(x_349) == 0) { -lean_object* x_352; lean_object* x_353; lean_object* x_354; lean_object* x_355; lean_object* x_356; -x_352 = lean_ctor_get(x_336, 1); -lean_inc(x_352); -lean_dec(x_336); -x_353 = lean_ctor_get(x_346, 0); +lean_object* x_350; +x_350 = lean_ctor_get(x_349, 0); +lean_inc(x_350); +if (lean_obj_tag(x_350) == 0) +{ +lean_object* x_351; lean_object* x_352; lean_object* x_353; lean_object* x_354; lean_object* x_355; lean_object* x_356; +lean_dec(x_349); +x_351 = lean_ctor_get(x_342, 1); +lean_inc(x_351); +if (lean_is_exclusive(x_342)) { + lean_ctor_release(x_342, 0); + lean_ctor_release(x_342, 1); + x_352 = x_342; +} else { + lean_dec_ref(x_342); + x_352 = lean_box(0); +} +x_353 = lean_ctor_get(x_350, 0); lean_inc(x_353); -lean_dec(x_346); -x_354 = lean_alloc_ctor(1, 2, 0); +lean_dec(x_350); +if (lean_is_scalar(x_352)) { + x_354 = lean_alloc_ctor(1, 2, 0); +} else { + x_354 = x_352; +} lean_ctor_set(x_354, 0, x_353); -lean_ctor_set(x_354, 1, x_352); +lean_ctor_set(x_354, 1, x_351); x_355 = lean_array_push(x_8, x_354); x_356 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_356, 0, x_355); lean_ctor_set(x_356, 1, x_10); return x_356; } -} else { -uint8_t x_357; +lean_object* x_357; lean_object* x_358; lean_object* x_359; lean_dec(x_10); lean_dec(x_8); -x_357 = !lean_is_exclusive(x_336); -if (x_357 == 0) -{ -lean_object* x_358; -x_358 = lean_ctor_get(x_336, 0); -lean_dec(x_358); -return x_336; +x_357 = lean_ctor_get(x_342, 1); +lean_inc(x_357); +if (lean_is_exclusive(x_342)) { + lean_ctor_release(x_342, 0); + lean_ctor_release(x_342, 1); + x_358 = x_342; +} else { + lean_dec_ref(x_342); + x_358 = lean_box(0); } -else -{ -lean_object* x_359; lean_object* x_360; -x_359 = lean_ctor_get(x_336, 1); -lean_inc(x_359); -lean_dec(x_336); -x_360 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_360, 0, x_345); -lean_ctor_set(x_360, 1, x_359); -return x_360; +if (lean_is_scalar(x_358)) { + x_359 = lean_alloc_ctor(1, 2, 0); +} else { + x_359 = x_358; } +lean_ctor_set(x_359, 0, x_349); +lean_ctor_set(x_359, 1, x_357); +return x_359; } } else { -uint8_t x_361; +lean_object* x_360; lean_object* x_361; lean_dec(x_8); -x_361 = !lean_is_exclusive(x_336); -if (x_361 == 0) +if (lean_is_exclusive(x_342)) { + lean_ctor_release(x_342, 0); + lean_ctor_release(x_342, 1); + x_360 = x_342; +} else { + lean_dec_ref(x_342); + x_360 = lean_box(0); +} +if (lean_is_scalar(x_360)) { + x_361 = lean_alloc_ctor(1, 2, 0); +} else { + x_361 = x_360; +} +lean_ctor_set(x_361, 0, x_349); +lean_ctor_set(x_361, 1, x_10); +return x_361; +} +} +} +} +else { -lean_object* x_362; lean_object* x_363; -x_362 = lean_ctor_get(x_336, 1); +lean_object* x_362; +lean_dec(x_9); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_1); +x_362 = lean_ctor_get(x_311, 0); +lean_inc(x_362); +if (lean_obj_tag(x_362) == 0) +{ +lean_object* x_363; +x_363 = lean_ctor_get(x_362, 0); +lean_inc(x_363); +if (lean_obj_tag(x_363) == 0) +{ +uint8_t x_364; lean_dec(x_362); -x_363 = lean_ctor_get(x_336, 0); +x_364 = !lean_is_exclusive(x_311); +if (x_364 == 0) +{ +lean_object* x_365; lean_object* x_366; lean_object* x_367; lean_object* x_368; +x_365 = lean_ctor_get(x_311, 0); +lean_dec(x_365); +x_366 = lean_ctor_get(x_363, 0); +lean_inc(x_366); lean_dec(x_363); -lean_ctor_set(x_336, 1, x_10); -return x_336; +lean_ctor_set(x_311, 0, x_366); +x_367 = lean_array_push(x_8, x_311); +x_368 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_368, 0, x_367); +lean_ctor_set(x_368, 1, x_10); +return x_368; } else { -lean_object* x_364; -lean_dec(x_336); -x_364 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_364, 0, x_345); -lean_ctor_set(x_364, 1, x_10); -return x_364; -} -} -} -} -} -} -} -} -} -} -} -} -} -} -} -block_492: -{ -uint8_t x_390; -x_390 = l_coeDecidableEq(x_389); -if (x_390 == 0) -{ -lean_object* x_391; uint8_t x_392; -x_391 = l_Lean_Parser_Term_explicit___elambda__1___closed__2; -lean_inc(x_2); -x_392 = l_Lean_Syntax_isOfKind(x_2, x_391); -if (x_392 == 0) -{ -uint8_t x_393; -x_393 = 0; -x_15 = x_393; -goto block_388; -} -else -{ -lean_object* x_394; lean_object* x_395; lean_object* x_396; uint8_t x_397; -x_394 = l_Lean_Syntax_getArgs(x_2); -x_395 = lean_array_get_size(x_394); -lean_dec(x_394); -x_396 = lean_unsigned_to_nat(2u); -x_397 = lean_nat_dec_eq(x_395, x_396); -lean_dec(x_395); -x_15 = x_397; -goto block_388; +lean_object* x_369; lean_object* x_370; lean_object* x_371; lean_object* x_372; lean_object* x_373; +x_369 = lean_ctor_get(x_311, 1); +lean_inc(x_369); +lean_dec(x_311); +x_370 = lean_ctor_get(x_363, 0); +lean_inc(x_370); +lean_dec(x_363); +x_371 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_371, 0, x_370); +lean_ctor_set(x_371, 1, x_369); +x_372 = lean_array_push(x_8, x_371); +x_373 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_373, 0, x_372); +lean_ctor_set(x_373, 1, x_10); +return x_373; } } else { -lean_object* x_398; lean_object* x_399; lean_object* x_400; uint8_t x_401; uint8_t x_402; -x_398 = lean_unsigned_to_nat(0u); -x_399 = l_Lean_Syntax_getArg(x_2, x_398); -x_400 = l_Lean_identKind___closed__2; +uint8_t x_374; +lean_dec(x_10); +lean_dec(x_8); +x_374 = !lean_is_exclusive(x_311); +if (x_374 == 0) +{ +lean_object* x_375; +x_375 = lean_ctor_get(x_311, 0); +lean_dec(x_375); +return x_311; +} +else +{ +lean_object* x_376; lean_object* x_377; +x_376 = lean_ctor_get(x_311, 1); +lean_inc(x_376); +lean_dec(x_311); +x_377 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_377, 0, x_362); +lean_ctor_set(x_377, 1, x_376); +return x_377; +} +} +} +else +{ +uint8_t x_378; +lean_dec(x_8); +x_378 = !lean_is_exclusive(x_311); +if (x_378 == 0) +{ +lean_object* x_379; lean_object* x_380; +x_379 = lean_ctor_get(x_311, 1); +lean_dec(x_379); +x_380 = lean_ctor_get(x_311, 0); +lean_dec(x_380); +lean_ctor_set(x_311, 1, x_10); +return x_311; +} +else +{ +lean_object* x_381; +lean_dec(x_311); +x_381 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_381, 0, x_362); +lean_ctor_set(x_381, 1, x_10); +return x_381; +} +} +} +} +else +{ +lean_object* x_382; lean_object* x_383; lean_object* x_384; lean_object* x_385; lean_object* x_386; lean_object* x_387; +x_382 = l_Lean_Syntax_getId(x_302); +lean_dec(x_302); +x_383 = l_Lean_Name_components(x_382); +x_384 = l_List_map___main___at___private_Init_Lean_Elab_App_22__elabAppFn___main___spec__1(x_383); +x_385 = lean_unsigned_to_nat(0u); +x_386 = l_Lean_Syntax_getArg(x_2, x_385); +lean_dec(x_2); +x_387 = l_List_append___rarg(x_384, x_3); +x_2 = x_386; +x_3 = x_387; +goto _start; +} +} +else +{ +lean_object* x_389; lean_object* x_390; lean_object* x_391; lean_object* x_392; +x_389 = l_Lean_fieldIdxKind; +x_390 = l_Lean_Syntax_isNatLitAux(x_389, x_302); +lean_dec(x_302); +x_391 = lean_unsigned_to_nat(0u); +x_392 = l_Lean_Syntax_getArg(x_2, x_391); +lean_dec(x_2); +if (lean_obj_tag(x_390) == 0) +{ +lean_object* x_393; lean_object* x_394; lean_object* x_395; lean_object* x_396; lean_object* x_397; +x_393 = l_Nat_Inhabited; +x_394 = l_Option_get_x21___rarg___closed__3; +x_395 = lean_panic_fn(x_393, x_394); +x_396 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_396, 0, x_395); +x_397 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_397, 0, x_396); +lean_ctor_set(x_397, 1, x_3); +x_2 = x_392; +x_3 = x_397; +goto _start; +} +else +{ +lean_object* x_399; lean_object* x_400; lean_object* x_401; +x_399 = lean_ctor_get(x_390, 0); lean_inc(x_399); -x_401 = l_Lean_Syntax_isOfKind(x_399, x_400); -x_402 = l_coeDecidableEq(x_401); -if (x_402 == 0) -{ -lean_object* x_403; uint8_t x_404; lean_object* x_405; -lean_dec(x_399); -x_403 = lean_box(0); -x_404 = 1; -lean_inc(x_10); -lean_inc(x_9); -x_405 = l_Lean_Elab_Term_elabTerm(x_2, x_403, x_404, x_9, x_10); -if (lean_obj_tag(x_405) == 0) -{ -uint8_t x_406; -x_406 = !lean_is_exclusive(x_405); -if (x_406 == 0) -{ -lean_object* x_407; lean_object* x_408; lean_object* x_409; -x_407 = lean_ctor_get(x_405, 0); -x_408 = lean_ctor_get(x_405, 1); -x_409 = l___private_Init_Lean_Elab_App_20__elabAppLVals(x_1, x_407, x_3, x_4, x_5, x_6, x_7, x_9, x_408); -if (lean_obj_tag(x_409) == 0) -{ -uint8_t x_410; -x_410 = !lean_is_exclusive(x_409); -if (x_410 == 0) -{ -lean_object* x_411; -x_411 = lean_array_push(x_8, x_409); -lean_ctor_set(x_405, 1, x_10); -lean_ctor_set(x_405, 0, x_411); -return x_405; -} -else -{ -lean_object* x_412; lean_object* x_413; lean_object* x_414; lean_object* x_415; -x_412 = lean_ctor_get(x_409, 0); -x_413 = lean_ctor_get(x_409, 1); -lean_inc(x_413); -lean_inc(x_412); -lean_dec(x_409); -x_414 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_414, 0, x_412); -lean_ctor_set(x_414, 1, x_413); -x_415 = lean_array_push(x_8, x_414); -lean_ctor_set(x_405, 1, x_10); -lean_ctor_set(x_405, 0, x_415); -return x_405; -} -} -else -{ -lean_object* x_416; -x_416 = lean_ctor_get(x_409, 0); -lean_inc(x_416); -if (lean_obj_tag(x_416) == 0) -{ -lean_object* x_417; -x_417 = lean_ctor_get(x_416, 0); -lean_inc(x_417); -if (lean_obj_tag(x_417) == 0) -{ -uint8_t x_418; -lean_dec(x_416); -x_418 = !lean_is_exclusive(x_409); -if (x_418 == 0) -{ -lean_object* x_419; lean_object* x_420; lean_object* x_421; -x_419 = lean_ctor_get(x_409, 0); -lean_dec(x_419); -x_420 = lean_ctor_get(x_417, 0); -lean_inc(x_420); -lean_dec(x_417); -lean_ctor_set(x_409, 0, x_420); -x_421 = lean_array_push(x_8, x_409); -lean_ctor_set(x_405, 1, x_10); -lean_ctor_set(x_405, 0, x_421); -return x_405; -} -else -{ -lean_object* x_422; lean_object* x_423; lean_object* x_424; lean_object* x_425; -x_422 = lean_ctor_get(x_409, 1); -lean_inc(x_422); -lean_dec(x_409); -x_423 = lean_ctor_get(x_417, 0); -lean_inc(x_423); -lean_dec(x_417); -x_424 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_424, 0, x_423); -lean_ctor_set(x_424, 1, x_422); -x_425 = lean_array_push(x_8, x_424); -lean_ctor_set(x_405, 1, x_10); -lean_ctor_set(x_405, 0, x_425); -return x_405; -} -} -else -{ -uint8_t x_426; -lean_free_object(x_405); -lean_dec(x_10); -lean_dec(x_8); -x_426 = !lean_is_exclusive(x_409); -if (x_426 == 0) -{ -lean_object* x_427; -x_427 = lean_ctor_get(x_409, 0); -lean_dec(x_427); -return x_409; -} -else -{ -lean_object* x_428; lean_object* x_429; -x_428 = lean_ctor_get(x_409, 1); -lean_inc(x_428); -lean_dec(x_409); -x_429 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_429, 0, x_416); -lean_ctor_set(x_429, 1, x_428); -return x_429; -} -} -} -else -{ -uint8_t x_430; -lean_free_object(x_405); -lean_dec(x_8); -x_430 = !lean_is_exclusive(x_409); -if (x_430 == 0) -{ -lean_object* x_431; lean_object* x_432; -x_431 = lean_ctor_get(x_409, 1); -lean_dec(x_431); -x_432 = lean_ctor_get(x_409, 0); -lean_dec(x_432); -lean_ctor_set(x_409, 1, x_10); -return x_409; -} -else -{ -lean_object* x_433; -lean_dec(x_409); -x_433 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_433, 0, x_416); -lean_ctor_set(x_433, 1, x_10); -return x_433; -} -} -} -} -else -{ -lean_object* x_434; lean_object* x_435; lean_object* x_436; -x_434 = lean_ctor_get(x_405, 0); -x_435 = lean_ctor_get(x_405, 1); -lean_inc(x_435); -lean_inc(x_434); -lean_dec(x_405); -x_436 = l___private_Init_Lean_Elab_App_20__elabAppLVals(x_1, x_434, x_3, x_4, x_5, x_6, x_7, x_9, x_435); -if (lean_obj_tag(x_436) == 0) -{ -lean_object* x_437; lean_object* x_438; lean_object* x_439; lean_object* x_440; lean_object* x_441; lean_object* x_442; -x_437 = lean_ctor_get(x_436, 0); -lean_inc(x_437); -x_438 = lean_ctor_get(x_436, 1); -lean_inc(x_438); -if (lean_is_exclusive(x_436)) { - lean_ctor_release(x_436, 0); - lean_ctor_release(x_436, 1); - x_439 = x_436; -} else { - lean_dec_ref(x_436); - x_439 = lean_box(0); -} -if (lean_is_scalar(x_439)) { - x_440 = lean_alloc_ctor(0, 2, 0); -} else { - x_440 = x_439; -} -lean_ctor_set(x_440, 0, x_437); -lean_ctor_set(x_440, 1, x_438); -x_441 = lean_array_push(x_8, x_440); -x_442 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_442, 0, x_441); -lean_ctor_set(x_442, 1, x_10); -return x_442; -} -else -{ -lean_object* x_443; -x_443 = lean_ctor_get(x_436, 0); -lean_inc(x_443); -if (lean_obj_tag(x_443) == 0) -{ -lean_object* x_444; -x_444 = lean_ctor_get(x_443, 0); -lean_inc(x_444); -if (lean_obj_tag(x_444) == 0) -{ -lean_object* x_445; lean_object* x_446; lean_object* x_447; lean_object* x_448; lean_object* x_449; lean_object* x_450; -lean_dec(x_443); -x_445 = lean_ctor_get(x_436, 1); -lean_inc(x_445); -if (lean_is_exclusive(x_436)) { - lean_ctor_release(x_436, 0); - lean_ctor_release(x_436, 1); - x_446 = x_436; -} else { - lean_dec_ref(x_436); - x_446 = lean_box(0); -} -x_447 = lean_ctor_get(x_444, 0); -lean_inc(x_447); -lean_dec(x_444); -if (lean_is_scalar(x_446)) { - x_448 = lean_alloc_ctor(1, 2, 0); -} else { - x_448 = x_446; -} -lean_ctor_set(x_448, 0, x_447); -lean_ctor_set(x_448, 1, x_445); -x_449 = lean_array_push(x_8, x_448); -x_450 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_450, 0, x_449); -lean_ctor_set(x_450, 1, x_10); -return x_450; -} -else -{ -lean_object* x_451; lean_object* x_452; lean_object* x_453; -lean_dec(x_10); -lean_dec(x_8); -x_451 = lean_ctor_get(x_436, 1); -lean_inc(x_451); -if (lean_is_exclusive(x_436)) { - lean_ctor_release(x_436, 0); - lean_ctor_release(x_436, 1); - x_452 = x_436; -} else { - lean_dec_ref(x_436); - x_452 = lean_box(0); -} -if (lean_is_scalar(x_452)) { - x_453 = lean_alloc_ctor(1, 2, 0); -} else { - x_453 = x_452; -} -lean_ctor_set(x_453, 0, x_443); -lean_ctor_set(x_453, 1, x_451); -return x_453; -} -} -else -{ -lean_object* x_454; lean_object* x_455; -lean_dec(x_8); -if (lean_is_exclusive(x_436)) { - lean_ctor_release(x_436, 0); - lean_ctor_release(x_436, 1); - x_454 = x_436; -} else { - lean_dec_ref(x_436); - x_454 = lean_box(0); -} -if (lean_is_scalar(x_454)) { - x_455 = lean_alloc_ctor(1, 2, 0); -} else { - x_455 = x_454; -} -lean_ctor_set(x_455, 0, x_443); -lean_ctor_set(x_455, 1, x_10); -return x_455; -} -} -} -} -else -{ -lean_object* x_456; -lean_dec(x_9); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_1); -x_456 = lean_ctor_get(x_405, 0); -lean_inc(x_456); -if (lean_obj_tag(x_456) == 0) -{ -lean_object* x_457; -x_457 = lean_ctor_get(x_456, 0); -lean_inc(x_457); -if (lean_obj_tag(x_457) == 0) -{ -uint8_t x_458; -lean_dec(x_456); -x_458 = !lean_is_exclusive(x_405); -if (x_458 == 0) -{ -lean_object* x_459; lean_object* x_460; lean_object* x_461; lean_object* x_462; -x_459 = lean_ctor_get(x_405, 0); -lean_dec(x_459); -x_460 = lean_ctor_get(x_457, 0); -lean_inc(x_460); -lean_dec(x_457); -lean_ctor_set(x_405, 0, x_460); -x_461 = lean_array_push(x_8, x_405); -x_462 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_462, 0, x_461); -lean_ctor_set(x_462, 1, x_10); -return x_462; -} -else -{ -lean_object* x_463; lean_object* x_464; lean_object* x_465; lean_object* x_466; lean_object* x_467; -x_463 = lean_ctor_get(x_405, 1); -lean_inc(x_463); -lean_dec(x_405); -x_464 = lean_ctor_get(x_457, 0); -lean_inc(x_464); -lean_dec(x_457); -x_465 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_465, 0, x_464); -lean_ctor_set(x_465, 1, x_463); -x_466 = lean_array_push(x_8, x_465); -x_467 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_467, 0, x_466); -lean_ctor_set(x_467, 1, x_10); -return x_467; -} -} -else -{ -uint8_t x_468; -lean_dec(x_10); -lean_dec(x_8); -x_468 = !lean_is_exclusive(x_405); -if (x_468 == 0) -{ -lean_object* x_469; -x_469 = lean_ctor_get(x_405, 0); -lean_dec(x_469); -return x_405; -} -else -{ -lean_object* x_470; lean_object* x_471; -x_470 = lean_ctor_get(x_405, 1); -lean_inc(x_470); -lean_dec(x_405); -x_471 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_471, 0, x_456); -lean_ctor_set(x_471, 1, x_470); -return x_471; -} -} -} -else -{ -uint8_t x_472; -lean_dec(x_8); -x_472 = !lean_is_exclusive(x_405); -if (x_472 == 0) -{ -lean_object* x_473; lean_object* x_474; -x_473 = lean_ctor_get(x_405, 1); -lean_dec(x_473); -x_474 = lean_ctor_get(x_405, 0); -lean_dec(x_474); -lean_ctor_set(x_405, 1, x_10); -return x_405; -} -else -{ -lean_object* x_475; -lean_dec(x_405); -x_475 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_475, 0, x_456); -lean_ctor_set(x_475, 1, x_10); -return x_475; -} -} -} -} -else -{ -lean_object* x_476; lean_object* x_477; lean_object* x_478; uint8_t x_479; -x_476 = lean_unsigned_to_nat(1u); -x_477 = l_Lean_Syntax_getArg(x_2, x_476); -lean_dec(x_2); -x_478 = l_Lean_Syntax_getArgs(x_477); -lean_dec(x_477); -x_479 = l_Array_isEmpty___rarg(x_478); -if (x_479 == 0) -{ -lean_object* x_480; lean_object* x_481; lean_object* x_482; -x_480 = l_Lean_Syntax_inhabited; -x_481 = lean_array_get(x_480, x_478, x_398); -lean_dec(x_478); -x_482 = l_Lean_Elab_Term_elabExplicitUniv(x_481, x_9, x_10); -lean_dec(x_481); -if (lean_obj_tag(x_482) == 0) -{ -lean_object* x_483; lean_object* x_484; lean_object* x_485; -x_483 = lean_ctor_get(x_482, 0); -lean_inc(x_483); -x_484 = lean_ctor_get(x_482, 1); -lean_inc(x_484); -lean_dec(x_482); -x_485 = l___private_Init_Lean_Elab_App_21__elabAppFnId(x_1, x_399, x_483, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_484); -return x_485; -} -else -{ -uint8_t x_486; -lean_dec(x_399); -lean_dec(x_9); -lean_dec(x_8); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_1); -x_486 = !lean_is_exclusive(x_482); -if (x_486 == 0) -{ -return x_482; -} -else -{ -lean_object* x_487; lean_object* x_488; lean_object* x_489; -x_487 = lean_ctor_get(x_482, 0); -x_488 = lean_ctor_get(x_482, 1); -lean_inc(x_488); -lean_inc(x_487); -lean_dec(x_482); -x_489 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_489, 0, x_487); -lean_ctor_set(x_489, 1, x_488); -return x_489; -} -} -} -else -{ -lean_object* x_490; lean_object* x_491; -lean_dec(x_478); -x_490 = lean_box(0); -x_491 = l___private_Init_Lean_Elab_App_21__elabAppFnId(x_1, x_399, x_490, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10); -return x_491; -} -} -} -} -block_631: -{ -uint8_t x_494; -x_494 = l_coeDecidableEq(x_493); -if (x_494 == 0) -{ -lean_object* x_495; uint8_t x_496; -x_495 = l_Lean_Parser_Term_arrayRef___elambda__1___closed__2; -lean_inc(x_2); -x_496 = l_Lean_Syntax_isOfKind(x_2, x_495); -if (x_496 == 0) -{ -uint8_t x_497; -x_497 = l___private_Init_Lean_Elab_Term_11__isExplicit___closed__1; -if (x_497 == 0) -{ -lean_object* x_498; uint8_t x_499; -x_498 = l_Lean_mkTermIdFromIdent___closed__2; -lean_inc(x_2); -x_499 = l_Lean_Syntax_isOfKind(x_2, x_498); -if (x_499 == 0) -{ -uint8_t x_500; -x_500 = 0; -x_389 = x_500; -goto block_492; -} -else -{ -lean_object* x_501; lean_object* x_502; lean_object* x_503; uint8_t x_504; -x_501 = l_Lean_Syntax_getArgs(x_2); -x_502 = lean_array_get_size(x_501); -lean_dec(x_501); -x_503 = lean_unsigned_to_nat(2u); -x_504 = lean_nat_dec_eq(x_502, x_503); -lean_dec(x_502); -x_389 = x_504; -goto block_492; -} -} -else -{ -lean_object* x_505; lean_object* x_506; lean_object* x_507; lean_object* x_508; lean_object* x_509; lean_object* x_510; -x_505 = lean_unsigned_to_nat(0u); -x_506 = l_Lean_Syntax_getArg(x_2, x_505); -x_507 = lean_unsigned_to_nat(2u); -x_508 = l_Lean_Syntax_getArg(x_2, x_507); -lean_dec(x_2); -x_509 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_509, 0, x_508); -x_510 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_510, 0, x_509); -lean_ctor_set(x_510, 1, x_3); -x_2 = x_506; -x_3 = x_510; -goto _start; -} -} -else -{ -lean_object* x_512; lean_object* x_513; lean_object* x_514; uint8_t x_515; uint8_t x_516; -x_512 = l_Lean_Syntax_getArgs(x_2); -x_513 = lean_array_get_size(x_512); -lean_dec(x_512); -x_514 = lean_unsigned_to_nat(4u); -x_515 = lean_nat_dec_eq(x_513, x_514); -x_516 = l_coeDecidableEq(x_515); -if (x_516 == 0) -{ -lean_object* x_517; uint8_t x_518; -x_517 = l_Lean_mkTermIdFromIdent___closed__2; -lean_inc(x_2); -x_518 = l_Lean_Syntax_isOfKind(x_2, x_517); -if (x_518 == 0) -{ -uint8_t x_519; -lean_dec(x_513); -x_519 = 0; -x_389 = x_519; -goto block_492; -} -else -{ -lean_object* x_520; uint8_t x_521; -x_520 = lean_unsigned_to_nat(2u); -x_521 = lean_nat_dec_eq(x_513, x_520); -lean_dec(x_513); -x_389 = x_521; -goto block_492; -} -} -else -{ -lean_object* x_522; lean_object* x_523; lean_object* x_524; lean_object* x_525; lean_object* x_526; lean_object* x_527; -lean_dec(x_513); -x_522 = lean_unsigned_to_nat(0u); -x_523 = l_Lean_Syntax_getArg(x_2, x_522); -x_524 = lean_unsigned_to_nat(2u); -x_525 = l_Lean_Syntax_getArg(x_2, x_524); -lean_dec(x_2); -x_526 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_526, 0, x_525); -x_527 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_527, 0, x_526); -lean_ctor_set(x_527, 1, x_3); -x_2 = x_523; -x_3 = x_527; -goto _start; -} -} -} -else -{ -lean_object* x_529; lean_object* x_530; lean_object* x_531; uint8_t x_532; uint8_t x_533; -x_529 = lean_unsigned_to_nat(2u); -x_530 = l_Lean_Syntax_getArg(x_2, x_529); -x_531 = l_Lean_fieldIdxKind___closed__2; -lean_inc(x_530); -x_532 = l_Lean_Syntax_isOfKind(x_530, x_531); -x_533 = l_coeDecidableEq(x_532); -if (x_533 == 0) -{ -lean_object* x_534; uint8_t x_535; uint8_t x_536; -x_534 = l_Lean_identKind___closed__2; -lean_inc(x_530); -x_535 = l_Lean_Syntax_isOfKind(x_530, x_534); -x_536 = l_coeDecidableEq(x_535); -if (x_536 == 0) -{ -lean_object* x_537; uint8_t x_538; lean_object* x_539; -lean_dec(x_530); -x_537 = lean_box(0); -x_538 = 1; -lean_inc(x_10); -lean_inc(x_9); -x_539 = l_Lean_Elab_Term_elabTerm(x_2, x_537, x_538, x_9, x_10); -if (lean_obj_tag(x_539) == 0) -{ -uint8_t x_540; -x_540 = !lean_is_exclusive(x_539); -if (x_540 == 0) -{ -lean_object* x_541; lean_object* x_542; lean_object* x_543; -x_541 = lean_ctor_get(x_539, 0); -x_542 = lean_ctor_get(x_539, 1); -x_543 = l___private_Init_Lean_Elab_App_20__elabAppLVals(x_1, x_541, x_3, x_4, x_5, x_6, x_7, x_9, x_542); -if (lean_obj_tag(x_543) == 0) -{ -uint8_t x_544; -x_544 = !lean_is_exclusive(x_543); -if (x_544 == 0) -{ -lean_object* x_545; -x_545 = lean_array_push(x_8, x_543); -lean_ctor_set(x_539, 1, x_10); -lean_ctor_set(x_539, 0, x_545); -return x_539; -} -else -{ -lean_object* x_546; lean_object* x_547; lean_object* x_548; lean_object* x_549; -x_546 = lean_ctor_get(x_543, 0); -x_547 = lean_ctor_get(x_543, 1); -lean_inc(x_547); -lean_inc(x_546); -lean_dec(x_543); -x_548 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_548, 0, x_546); -lean_ctor_set(x_548, 1, x_547); -x_549 = lean_array_push(x_8, x_548); -lean_ctor_set(x_539, 1, x_10); -lean_ctor_set(x_539, 0, x_549); -return x_539; -} -} -else -{ -lean_object* x_550; -x_550 = lean_ctor_get(x_543, 0); -lean_inc(x_550); -if (lean_obj_tag(x_550) == 0) -{ -lean_object* x_551; -x_551 = lean_ctor_get(x_550, 0); -lean_inc(x_551); -if (lean_obj_tag(x_551) == 0) -{ -uint8_t x_552; -lean_dec(x_550); -x_552 = !lean_is_exclusive(x_543); -if (x_552 == 0) -{ -lean_object* x_553; lean_object* x_554; lean_object* x_555; -x_553 = lean_ctor_get(x_543, 0); -lean_dec(x_553); -x_554 = lean_ctor_get(x_551, 0); -lean_inc(x_554); -lean_dec(x_551); -lean_ctor_set(x_543, 0, x_554); -x_555 = lean_array_push(x_8, x_543); -lean_ctor_set(x_539, 1, x_10); -lean_ctor_set(x_539, 0, x_555); -return x_539; -} -else -{ -lean_object* x_556; lean_object* x_557; lean_object* x_558; lean_object* x_559; -x_556 = lean_ctor_get(x_543, 1); -lean_inc(x_556); -lean_dec(x_543); -x_557 = lean_ctor_get(x_551, 0); -lean_inc(x_557); -lean_dec(x_551); -x_558 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_558, 0, x_557); -lean_ctor_set(x_558, 1, x_556); -x_559 = lean_array_push(x_8, x_558); -lean_ctor_set(x_539, 1, x_10); -lean_ctor_set(x_539, 0, x_559); -return x_539; -} -} -else -{ -uint8_t x_560; -lean_free_object(x_539); -lean_dec(x_10); -lean_dec(x_8); -x_560 = !lean_is_exclusive(x_543); -if (x_560 == 0) -{ -lean_object* x_561; -x_561 = lean_ctor_get(x_543, 0); -lean_dec(x_561); -return x_543; -} -else -{ -lean_object* x_562; lean_object* x_563; -x_562 = lean_ctor_get(x_543, 1); -lean_inc(x_562); -lean_dec(x_543); -x_563 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_563, 0, x_550); -lean_ctor_set(x_563, 1, x_562); -return x_563; -} -} -} -else -{ -uint8_t x_564; -lean_free_object(x_539); -lean_dec(x_8); -x_564 = !lean_is_exclusive(x_543); -if (x_564 == 0) -{ -lean_object* x_565; lean_object* x_566; -x_565 = lean_ctor_get(x_543, 1); -lean_dec(x_565); -x_566 = lean_ctor_get(x_543, 0); -lean_dec(x_566); -lean_ctor_set(x_543, 1, x_10); -return x_543; -} -else -{ -lean_object* x_567; -lean_dec(x_543); -x_567 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_567, 0, x_550); -lean_ctor_set(x_567, 1, x_10); -return x_567; -} -} -} -} -else -{ -lean_object* x_568; lean_object* x_569; lean_object* x_570; -x_568 = lean_ctor_get(x_539, 0); -x_569 = lean_ctor_get(x_539, 1); -lean_inc(x_569); -lean_inc(x_568); -lean_dec(x_539); -x_570 = l___private_Init_Lean_Elab_App_20__elabAppLVals(x_1, x_568, x_3, x_4, x_5, x_6, x_7, x_9, x_569); -if (lean_obj_tag(x_570) == 0) -{ -lean_object* x_571; lean_object* x_572; lean_object* x_573; lean_object* x_574; lean_object* x_575; lean_object* x_576; -x_571 = lean_ctor_get(x_570, 0); -lean_inc(x_571); -x_572 = lean_ctor_get(x_570, 1); -lean_inc(x_572); -if (lean_is_exclusive(x_570)) { - lean_ctor_release(x_570, 0); - lean_ctor_release(x_570, 1); - x_573 = x_570; -} else { - lean_dec_ref(x_570); - x_573 = lean_box(0); -} -if (lean_is_scalar(x_573)) { - x_574 = lean_alloc_ctor(0, 2, 0); -} else { - x_574 = x_573; -} -lean_ctor_set(x_574, 0, x_571); -lean_ctor_set(x_574, 1, x_572); -x_575 = lean_array_push(x_8, x_574); -x_576 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_576, 0, x_575); -lean_ctor_set(x_576, 1, x_10); -return x_576; -} -else -{ -lean_object* x_577; -x_577 = lean_ctor_get(x_570, 0); -lean_inc(x_577); -if (lean_obj_tag(x_577) == 0) -{ -lean_object* x_578; -x_578 = lean_ctor_get(x_577, 0); -lean_inc(x_578); -if (lean_obj_tag(x_578) == 0) -{ -lean_object* x_579; lean_object* x_580; lean_object* x_581; lean_object* x_582; lean_object* x_583; lean_object* x_584; -lean_dec(x_577); -x_579 = lean_ctor_get(x_570, 1); -lean_inc(x_579); -if (lean_is_exclusive(x_570)) { - lean_ctor_release(x_570, 0); - lean_ctor_release(x_570, 1); - x_580 = x_570; -} else { - lean_dec_ref(x_570); - x_580 = lean_box(0); -} -x_581 = lean_ctor_get(x_578, 0); -lean_inc(x_581); -lean_dec(x_578); -if (lean_is_scalar(x_580)) { - x_582 = lean_alloc_ctor(1, 2, 0); -} else { - x_582 = x_580; -} -lean_ctor_set(x_582, 0, x_581); -lean_ctor_set(x_582, 1, x_579); -x_583 = lean_array_push(x_8, x_582); -x_584 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_584, 0, x_583); -lean_ctor_set(x_584, 1, x_10); -return x_584; -} -else -{ -lean_object* x_585; lean_object* x_586; lean_object* x_587; -lean_dec(x_10); -lean_dec(x_8); -x_585 = lean_ctor_get(x_570, 1); -lean_inc(x_585); -if (lean_is_exclusive(x_570)) { - lean_ctor_release(x_570, 0); - lean_ctor_release(x_570, 1); - x_586 = x_570; -} else { - lean_dec_ref(x_570); - x_586 = lean_box(0); -} -if (lean_is_scalar(x_586)) { - x_587 = lean_alloc_ctor(1, 2, 0); -} else { - x_587 = x_586; -} -lean_ctor_set(x_587, 0, x_577); -lean_ctor_set(x_587, 1, x_585); -return x_587; -} -} -else -{ -lean_object* x_588; lean_object* x_589; -lean_dec(x_8); -if (lean_is_exclusive(x_570)) { - lean_ctor_release(x_570, 0); - lean_ctor_release(x_570, 1); - x_588 = x_570; -} else { - lean_dec_ref(x_570); - x_588 = lean_box(0); -} -if (lean_is_scalar(x_588)) { - x_589 = lean_alloc_ctor(1, 2, 0); -} else { - x_589 = x_588; -} -lean_ctor_set(x_589, 0, x_577); -lean_ctor_set(x_589, 1, x_10); -return x_589; -} -} -} -} -else -{ -lean_object* x_590; -lean_dec(x_9); -lean_dec(x_6); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_3); -lean_dec(x_1); -x_590 = lean_ctor_get(x_539, 0); -lean_inc(x_590); -if (lean_obj_tag(x_590) == 0) -{ -lean_object* x_591; -x_591 = lean_ctor_get(x_590, 0); -lean_inc(x_591); -if (lean_obj_tag(x_591) == 0) -{ -uint8_t x_592; -lean_dec(x_590); -x_592 = !lean_is_exclusive(x_539); -if (x_592 == 0) -{ -lean_object* x_593; lean_object* x_594; lean_object* x_595; lean_object* x_596; -x_593 = lean_ctor_get(x_539, 0); -lean_dec(x_593); -x_594 = lean_ctor_get(x_591, 0); -lean_inc(x_594); -lean_dec(x_591); -lean_ctor_set(x_539, 0, x_594); -x_595 = lean_array_push(x_8, x_539); -x_596 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_596, 0, x_595); -lean_ctor_set(x_596, 1, x_10); -return x_596; -} -else -{ -lean_object* x_597; lean_object* x_598; lean_object* x_599; lean_object* x_600; lean_object* x_601; -x_597 = lean_ctor_get(x_539, 1); -lean_inc(x_597); -lean_dec(x_539); -x_598 = lean_ctor_get(x_591, 0); -lean_inc(x_598); -lean_dec(x_591); -x_599 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_599, 0, x_598); -lean_ctor_set(x_599, 1, x_597); -x_600 = lean_array_push(x_8, x_599); -x_601 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_601, 0, x_600); -lean_ctor_set(x_601, 1, x_10); -return x_601; -} -} -else -{ -uint8_t x_602; -lean_dec(x_10); -lean_dec(x_8); -x_602 = !lean_is_exclusive(x_539); -if (x_602 == 0) -{ -lean_object* x_603; -x_603 = lean_ctor_get(x_539, 0); -lean_dec(x_603); -return x_539; -} -else -{ -lean_object* x_604; lean_object* x_605; -x_604 = lean_ctor_get(x_539, 1); -lean_inc(x_604); -lean_dec(x_539); -x_605 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_605, 0, x_590); -lean_ctor_set(x_605, 1, x_604); -return x_605; -} -} -} -else -{ -uint8_t x_606; -lean_dec(x_8); -x_606 = !lean_is_exclusive(x_539); -if (x_606 == 0) -{ -lean_object* x_607; lean_object* x_608; -x_607 = lean_ctor_get(x_539, 1); -lean_dec(x_607); -x_608 = lean_ctor_get(x_539, 0); -lean_dec(x_608); -lean_ctor_set(x_539, 1, x_10); -return x_539; -} -else -{ -lean_object* x_609; -lean_dec(x_539); -x_609 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_609, 0, x_590); -lean_ctor_set(x_609, 1, x_10); -return x_609; -} -} -} -} -else -{ -lean_object* x_610; lean_object* x_611; lean_object* x_612; lean_object* x_613; lean_object* x_614; lean_object* x_615; -x_610 = l_Lean_Syntax_getId(x_530); -lean_dec(x_530); -x_611 = l_Lean_Name_components(x_610); -x_612 = l_List_map___main___at___private_Init_Lean_Elab_App_22__elabAppFn___main___spec__1(x_611); -x_613 = lean_unsigned_to_nat(0u); -x_614 = l_Lean_Syntax_getArg(x_2, x_613); -lean_dec(x_2); -x_615 = l_List_append___rarg(x_612, x_3); -x_2 = x_614; -x_3 = x_615; -goto _start; -} -} -else -{ -lean_object* x_617; lean_object* x_618; lean_object* x_619; lean_object* x_620; -x_617 = l_Lean_fieldIdxKind; -x_618 = l_Lean_Syntax_isNatLitAux(x_617, x_530); -lean_dec(x_530); -x_619 = lean_unsigned_to_nat(0u); -x_620 = l_Lean_Syntax_getArg(x_2, x_619); -lean_dec(x_2); -if (lean_obj_tag(x_618) == 0) -{ -lean_object* x_621; lean_object* x_622; lean_object* x_623; lean_object* x_624; lean_object* x_625; -x_621 = l_Nat_Inhabited; -x_622 = l_Option_get_x21___rarg___closed__3; -x_623 = lean_panic_fn(x_621, x_622); -x_624 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_624, 0, x_623); -x_625 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_625, 0, x_624); -lean_ctor_set(x_625, 1, x_3); -x_2 = x_620; -x_3 = x_625; -goto _start; -} -else -{ -lean_object* x_627; lean_object* x_628; lean_object* x_629; -x_627 = lean_ctor_get(x_618, 0); -lean_inc(x_627); -lean_dec(x_618); -x_628 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_628, 0, x_627); -x_629 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_629, 0, x_628); -lean_ctor_set(x_629, 1, x_3); -x_2 = x_620; -x_3 = x_629; +lean_dec(x_390); +x_400 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_400, 0, x_399); +x_401 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_401, 0, x_400); +lean_ctor_set(x_401, 1, x_3); +x_2 = x_392; +x_3 = x_401; goto _start; } } @@ -16804,21 +15708,21 @@ goto _start; } else { -lean_object* x_639; lean_object* x_640; lean_object* x_641; -x_639 = l_Lean_Syntax_getArgs(x_2); -x_640 = lean_unsigned_to_nat(0u); -x_641 = l_Array_iterateMAux___main___at___private_Init_Lean_Elab_App_22__elabAppFn___main___spec__2(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_639, x_640, x_8, x_9, x_10); -lean_dec(x_639); +lean_object* x_411; lean_object* x_412; lean_object* x_413; +x_411 = l_Lean_Syntax_getArgs(x_2); +x_412 = lean_unsigned_to_nat(0u); +x_413 = l_Array_iterateMAux___main___at___private_Init_Lean_Elab_App_22__elabAppFn___main___spec__2(x_1, x_2, x_3, x_4, x_5, x_6, x_7, x_411, x_412, x_8, x_9, x_10); +lean_dec(x_411); lean_dec(x_2); -return x_641; +return x_413; } } else { -lean_object* x_642; lean_object* x_643; -x_642 = lean_box(0); -x_643 = l___private_Init_Lean_Elab_App_21__elabAppFnId(x_1, x_2, x_642, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10); -return x_643; +lean_object* x_414; lean_object* x_415; +x_414 = lean_box(0); +x_415 = l___private_Init_Lean_Elab_App_21__elabAppFnId(x_1, x_2, x_414, x_3, x_4, x_5, x_6, x_7, x_8, x_9, x_10); +return x_415; } } } @@ -18044,9 +16948,465 @@ return x_5; lean_object* l_Lean_Elab_Term_elabExplicit(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_elabAtom(x_1, x_2, x_3, x_4); -return x_5; +uint8_t x_5; lean_object* x_114; uint8_t x_115; +x_114 = l_Lean_Parser_Term_explicit___elambda__1___closed__2; +lean_inc(x_1); +x_115 = l_Lean_Syntax_isOfKind(x_1, x_114); +if (x_115 == 0) +{ +uint8_t x_116; +x_116 = 0; +x_5 = x_116; +goto block_113; +} +else +{ +lean_object* x_117; lean_object* x_118; lean_object* x_119; uint8_t x_120; +x_117 = l_Lean_Syntax_getArgs(x_1); +x_118 = lean_array_get_size(x_117); +lean_dec(x_117); +x_119 = lean_unsigned_to_nat(2u); +x_120 = lean_nat_dec_eq(x_118, x_119); +lean_dec(x_118); +x_5 = x_120; +goto block_113; +} +block_113: +{ +uint8_t x_6; +x_6 = l_coeDecidableEq(x_5); +if (x_6 == 0) +{ +lean_object* x_7; +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_7 = l_Lean_Elab_Term_throwUnsupportedSyntax___rarg(x_4); +return x_7; +} +else +{ +lean_object* x_8; lean_object* x_9; uint8_t x_10; lean_object* x_101; uint8_t x_102; uint8_t x_103; +x_8 = lean_unsigned_to_nat(1u); +x_9 = l_Lean_Syntax_getArg(x_1, x_8); +x_101 = l_Lean_Parser_Term_fun___elambda__1___closed__2; +lean_inc(x_9); +x_102 = l_Lean_Syntax_isOfKind(x_9, x_101); +x_103 = l_coeDecidableEq(x_102); +if (x_103 == 0) +{ +lean_object* x_104; uint8_t x_105; +x_104 = l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___closed__2; +lean_inc(x_9); +x_105 = l_Lean_Syntax_isOfKind(x_9, x_104); +if (x_105 == 0) +{ +uint8_t x_106; +x_106 = 0; +x_10 = x_106; +goto block_100; +} +else +{ +lean_object* x_107; lean_object* x_108; lean_object* x_109; uint8_t x_110; +x_107 = l_Lean_Syntax_getArgs(x_9); +x_108 = lean_array_get_size(x_107); +lean_dec(x_107); +x_109 = lean_unsigned_to_nat(3u); +x_110 = lean_nat_dec_eq(x_108, x_109); +lean_dec(x_108); +x_10 = x_110; +goto block_100; +} +} +else +{ +uint8_t x_111; lean_object* x_112; +lean_dec(x_1); +x_111 = 1; +x_112 = l_Lean_Elab_Term_elabFunCore(x_9, x_2, x_111, x_3, x_4); +return x_112; +} +block_100: +{ +uint8_t x_11; +x_11 = l_coeDecidableEq(x_10); +if (x_11 == 0) +{ +lean_object* x_12; uint8_t x_13; uint8_t x_14; +x_12 = l_Lean_mkTermIdFromIdent___closed__2; +x_13 = l_Lean_Syntax_isOfKind(x_9, x_12); +x_14 = l_coeDecidableEq(x_13); +if (x_14 == 0) +{ +lean_object* x_15; +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_15 = l_Lean_Elab_Term_throwUnsupportedSyntax___rarg(x_4); +return x_15; +} +else +{ +lean_object* x_16; +x_16 = l_Lean_Elab_Term_elabAtom(x_1, x_2, x_3, x_4); +return x_16; +} +} +else +{ +lean_object* x_17; uint8_t x_18; lean_object* x_93; uint8_t x_94; +x_17 = l_Lean_Syntax_getArg(x_9, x_8); +lean_dec(x_9); +x_93 = l_Lean_nullKind___closed__2; +lean_inc(x_17); +x_94 = l_Lean_Syntax_isOfKind(x_17, x_93); +if (x_94 == 0) +{ +uint8_t x_95; +x_95 = 0; +x_18 = x_95; +goto block_92; +} +else +{ +lean_object* x_96; lean_object* x_97; lean_object* x_98; uint8_t x_99; +x_96 = l_Lean_Syntax_getArgs(x_17); +x_97 = lean_array_get_size(x_96); +lean_dec(x_96); +x_98 = lean_unsigned_to_nat(2u); +x_99 = lean_nat_dec_eq(x_97, x_98); +lean_dec(x_97); +x_18 = x_99; +goto block_92; +} +block_92: +{ +uint8_t x_19; +x_19 = l_coeDecidableEq(x_18); +if (x_19 == 0) +{ +lean_object* x_20; +lean_dec(x_17); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_20 = l_Lean_Elab_Term_throwUnsupportedSyntax___rarg(x_4); +return x_20; +} +else +{ +lean_object* x_21; lean_object* x_22; lean_object* x_23; uint8_t x_24; uint8_t x_25; +x_21 = lean_unsigned_to_nat(0u); +x_22 = l_Lean_Syntax_getArg(x_17, x_21); +x_23 = l_Lean_Parser_Term_fun___elambda__1___closed__2; +lean_inc(x_22); +x_24 = l_Lean_Syntax_isOfKind(x_22, x_23); +x_25 = l_coeDecidableEq(x_24); +if (x_25 == 0) +{ +lean_object* x_26; +lean_dec(x_22); +lean_dec(x_17); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_26 = l_Lean_Elab_Term_throwUnsupportedSyntax___rarg(x_4); +return x_26; +} +else +{ +lean_object* x_27; uint8_t x_28; lean_object* x_79; uint8_t x_80; +x_27 = l_Lean_Syntax_getArg(x_17, x_8); +lean_dec(x_17); +x_79 = l_Lean_nullKind___closed__2; +lean_inc(x_27); +x_80 = l_Lean_Syntax_isOfKind(x_27, x_79); +if (x_80 == 0) +{ +uint8_t x_81; +x_81 = l___private_Init_Lean_Elab_Term_11__isExplicit___closed__1; +if (x_81 == 0) +{ +uint8_t x_82; +lean_dec(x_2); +x_82 = 0; +x_28 = x_82; +goto block_78; +} +else +{ +uint8_t x_83; lean_object* x_84; +lean_dec(x_27); +lean_dec(x_1); +x_83 = 1; +x_84 = l_Lean_Elab_Term_elabFunCore(x_22, x_2, x_83, x_3, x_4); +return x_84; +} +} +else +{ +lean_object* x_85; lean_object* x_86; uint8_t x_87; uint8_t x_88; +x_85 = l_Lean_Syntax_getArgs(x_27); +x_86 = lean_array_get_size(x_85); +lean_dec(x_85); +x_87 = lean_nat_dec_eq(x_86, x_21); +x_88 = l_coeDecidableEq(x_87); +if (x_88 == 0) +{ +uint8_t x_89; +lean_dec(x_2); +x_89 = lean_nat_dec_eq(x_86, x_8); +lean_dec(x_86); +x_28 = x_89; +goto block_78; +} +else +{ +uint8_t x_90; lean_object* x_91; +lean_dec(x_86); +lean_dec(x_27); +lean_dec(x_1); +x_90 = 1; +x_91 = l_Lean_Elab_Term_elabFunCore(x_22, x_2, x_90, x_3, x_4); +return x_91; +} +} +block_78: +{ +uint8_t x_29; +x_29 = l_coeDecidableEq(x_28); +if (x_29 == 0) +{ +lean_object* x_30; +lean_dec(x_27); +lean_dec(x_22); +lean_dec(x_3); +lean_dec(x_1); +x_30 = l_Lean_Elab_Term_throwUnsupportedSyntax___rarg(x_4); +return x_30; +} +else +{ +lean_object* x_31; lean_object* x_32; uint8_t x_33; +x_31 = l_Lean_Syntax_getArg(x_27, x_21); +lean_dec(x_27); +x_32 = l_Lean_Parser_Term_typeAscription___elambda__1___closed__2; +lean_inc(x_31); +x_33 = l_Lean_Syntax_isOfKind(x_31, x_32); +if (x_33 == 0) +{ +uint8_t x_34; +x_34 = l___private_Init_Lean_Elab_Term_11__isExplicit___closed__1; +if (x_34 == 0) +{ +lean_object* x_35; +lean_dec(x_31); +lean_dec(x_22); +lean_dec(x_3); +lean_dec(x_1); +x_35 = l_Lean_Elab_Term_throwUnsupportedSyntax___rarg(x_4); +return x_35; +} +else +{ +lean_object* x_36; lean_object* x_37; +x_36 = l_Lean_Syntax_getArg(x_31, x_8); +lean_dec(x_31); +lean_inc(x_3); +x_37 = l_Lean_Elab_Term_elabType(x_36, x_3, x_4); +if (lean_obj_tag(x_37) == 0) +{ +lean_object* x_38; lean_object* x_39; lean_object* x_40; uint8_t x_41; lean_object* x_42; +x_38 = lean_ctor_get(x_37, 0); +lean_inc(x_38); +x_39 = lean_ctor_get(x_37, 1); +lean_inc(x_39); +lean_dec(x_37); +x_40 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_40, 0, x_38); +x_41 = 1; +lean_inc(x_3); +lean_inc(x_40); +x_42 = l_Lean_Elab_Term_elabFunCore(x_22, x_40, x_41, x_3, x_39); +if (lean_obj_tag(x_42) == 0) +{ +lean_object* x_43; lean_object* x_44; lean_object* x_45; +x_43 = lean_ctor_get(x_42, 0); +lean_inc(x_43); +x_44 = lean_ctor_get(x_42, 1); +lean_inc(x_44); +lean_dec(x_42); +x_45 = l_Lean_Elab_Term_ensureHasType(x_1, x_40, x_43, x_3, x_44); +return x_45; +} +else +{ +uint8_t x_46; +lean_dec(x_40); +lean_dec(x_3); +lean_dec(x_1); +x_46 = !lean_is_exclusive(x_42); +if (x_46 == 0) +{ +return x_42; +} +else +{ +lean_object* x_47; lean_object* x_48; lean_object* x_49; +x_47 = lean_ctor_get(x_42, 0); +x_48 = lean_ctor_get(x_42, 1); +lean_inc(x_48); +lean_inc(x_47); +lean_dec(x_42); +x_49 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_49, 0, x_47); +lean_ctor_set(x_49, 1, x_48); +return x_49; +} +} +} +else +{ +uint8_t x_50; +lean_dec(x_22); +lean_dec(x_3); +lean_dec(x_1); +x_50 = !lean_is_exclusive(x_37); +if (x_50 == 0) +{ +return x_37; +} +else +{ +lean_object* x_51; lean_object* x_52; lean_object* x_53; +x_51 = lean_ctor_get(x_37, 0); +x_52 = lean_ctor_get(x_37, 1); +lean_inc(x_52); +lean_inc(x_51); +lean_dec(x_37); +x_53 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_53, 0, x_51); +lean_ctor_set(x_53, 1, x_52); +return x_53; +} +} +} +} +else +{ +lean_object* x_54; lean_object* x_55; lean_object* x_56; uint8_t x_57; uint8_t x_58; +x_54 = l_Lean_Syntax_getArgs(x_31); +x_55 = lean_array_get_size(x_54); +lean_dec(x_54); +x_56 = lean_unsigned_to_nat(2u); +x_57 = lean_nat_dec_eq(x_55, x_56); +lean_dec(x_55); +x_58 = l_coeDecidableEq(x_57); +if (x_58 == 0) +{ +lean_object* x_59; +lean_dec(x_31); +lean_dec(x_22); +lean_dec(x_3); +lean_dec(x_1); +x_59 = l_Lean_Elab_Term_throwUnsupportedSyntax___rarg(x_4); +return x_59; +} +else +{ +lean_object* x_60; lean_object* x_61; +x_60 = l_Lean_Syntax_getArg(x_31, x_8); +lean_dec(x_31); +lean_inc(x_3); +x_61 = l_Lean_Elab_Term_elabType(x_60, x_3, x_4); +if (lean_obj_tag(x_61) == 0) +{ +lean_object* x_62; lean_object* x_63; lean_object* x_64; uint8_t x_65; lean_object* x_66; +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 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_64, 0, x_62); +x_65 = 1; +lean_inc(x_3); +lean_inc(x_64); +x_66 = l_Lean_Elab_Term_elabFunCore(x_22, x_64, x_65, x_3, x_63); +if (lean_obj_tag(x_66) == 0) +{ +lean_object* x_67; lean_object* x_68; lean_object* x_69; +x_67 = lean_ctor_get(x_66, 0); +lean_inc(x_67); +x_68 = lean_ctor_get(x_66, 1); +lean_inc(x_68); +lean_dec(x_66); +x_69 = l_Lean_Elab_Term_ensureHasType(x_1, x_64, x_67, x_3, x_68); +return x_69; +} +else +{ +uint8_t x_70; +lean_dec(x_64); +lean_dec(x_3); +lean_dec(x_1); +x_70 = !lean_is_exclusive(x_66); +if (x_70 == 0) +{ +return x_66; +} +else +{ +lean_object* x_71; lean_object* x_72; lean_object* x_73; +x_71 = lean_ctor_get(x_66, 0); +x_72 = lean_ctor_get(x_66, 1); +lean_inc(x_72); +lean_inc(x_71); +lean_dec(x_66); +x_73 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_73, 0, x_71); +lean_ctor_set(x_73, 1, x_72); +return x_73; +} +} +} +else +{ +uint8_t x_74; +lean_dec(x_22); +lean_dec(x_3); +lean_dec(x_1); +x_74 = !lean_is_exclusive(x_61); +if (x_74 == 0) +{ +return x_61; +} +else +{ +lean_object* x_75; lean_object* x_76; lean_object* x_77; +x_75 = lean_ctor_get(x_61, 0); +x_76 = lean_ctor_get(x_61, 1); +lean_inc(x_76); +lean_inc(x_75); +lean_dec(x_61); +x_77 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_77, 0, x_75); +lean_ctor_set(x_77, 1, x_76); +return x_77; +} +} +} +} +} +} +} +} +} +} +} +} +} } } lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabExplicit___closed__1() { @@ -18266,90 +17626,6 @@ x_5 = l_Lean_Elab_Term_addBuiltinTermElab(x_2, x_3, x_4, x_1); return x_5; } } -lean_object* l_Lean_Elab_Term_elabFun(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { -_start: -{ -uint8_t x_5; lean_object* x_6; -x_5 = 0; -lean_inc(x_3); -lean_inc(x_1); -x_6 = l_Lean_Elab_Term_elabFunCore(x_1, x_2, x_5, x_3, x_4); -if (lean_obj_tag(x_6) == 0) -{ -lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; -x_7 = lean_ctor_get(x_6, 0); -lean_inc(x_7); -x_8 = lean_ctor_get(x_6, 1); -lean_inc(x_8); -lean_dec(x_6); -x_9 = lean_box(0); -x_10 = l_Array_empty___closed__1; -x_11 = l___private_Init_Lean_Elab_App_12__elabAppArgs(x_1, x_7, x_10, x_10, x_9, x_5, x_3, x_8); -return x_11; -} -else -{ -uint8_t x_12; -lean_dec(x_3); -lean_dec(x_1); -x_12 = !lean_is_exclusive(x_6); -if (x_12 == 0) -{ -return x_6; -} -else -{ -lean_object* x_13; lean_object* x_14; lean_object* x_15; -x_13 = lean_ctor_get(x_6, 0); -x_14 = lean_ctor_get(x_6, 1); -lean_inc(x_14); -lean_inc(x_13); -lean_dec(x_6); -x_15 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_15, 0, x_13); -lean_ctor_set(x_15, 1, x_14); -return x_15; -} -} -} -} -lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabFun___closed__1() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string("elabFun"); -return x_1; -} -} -lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabFun___closed__2() { -_start: -{ -lean_object* x_1; lean_object* x_2; lean_object* x_3; -x_1 = l_Lean_Elab_Term_declareBuiltinTermElab___closed__3; -x_2 = l___regBuiltinTermElab_Lean_Elab_Term_elabFun___closed__1; -x_3 = lean_name_mk_string(x_1, x_2); -return x_3; -} -} -lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabFun___closed__3() { -_start: -{ -lean_object* x_1; -x_1 = lean_alloc_closure((void*)(l_Lean_Elab_Term_elabFun), 4, 0); -return x_1; -} -} -lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabFun(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_fun___elambda__1___closed__2; -x_3 = l___regBuiltinTermElab_Lean_Elab_Term_elabFun___closed__2; -x_4 = l___regBuiltinTermElab_Lean_Elab_Term_elabFun___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_elabSortApp(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { @@ -18818,15 +18094,6 @@ lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabRawIdent___closed res = l___regBuiltinTermElab_Lean_Elab_Term_elabRawIdent(lean_io_mk_world()); if (lean_io_result_is_error(res)) return res; lean_dec_ref(res); -l___regBuiltinTermElab_Lean_Elab_Term_elabFun___closed__1 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabFun___closed__1(); -lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabFun___closed__1); -l___regBuiltinTermElab_Lean_Elab_Term_elabFun___closed__2 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabFun___closed__2(); -lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabFun___closed__2); -l___regBuiltinTermElab_Lean_Elab_Term_elabFun___closed__3 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabFun___closed__3(); -lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabFun___closed__3); -res = l___regBuiltinTermElab_Lean_Elab_Term_elabFun(lean_io_mk_world()); -if (lean_io_result_is_error(res)) return res; -lean_dec_ref(res); l___regBuiltinTermElab_Lean_Elab_Term_elabSortApp___closed__1 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabSortApp___closed__1(); lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabSortApp___closed__1); l___regBuiltinTermElab_Lean_Elab_Term_elabSortApp___closed__2 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabSortApp___closed__2(); diff --git a/stage0/stdlib/Init/Lean/Elab/Binders.c b/stage0/stdlib/Init/Lean/Elab/Binders.c index 158c0e1bee..ffc2d97f02 100644 --- a/stage0/stdlib/Init/Lean/Elab/Binders.c +++ b/stage0/stdlib/Init/Lean/Elab/Binders.c @@ -24,20 +24,25 @@ lean_object* l_Lean_registerTraceClass(lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_elabLetDecl___closed__5; lean_object* l_Lean_Elab_Term_elabDepArrow___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_instantiateMVars(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Term_mkFreshExprMVar(lean_object*, lean_object*, uint8_t, lean_object*, lean_object*, lean_object*); lean_object* l___private_Init_Lean_Elab_Binders_2__expandBinderIdent(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_elabDepArrow(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_elabArrow___closed__1; lean_object* l___private_Init_Lean_Elab_Binders_10__expandFunBindersAux___main(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabFun___closed__1; extern lean_object* l_Lean_List_format___rarg___closed__2; uint8_t lean_name_eq(lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_elabFunCore___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l___private_Init_Lean_Meta_ExprDefEq_7__checkTypesAndAssign___closed__8; lean_object* l_Lean_Syntax_getIdAt(lean_object*, lean_object*); +lean_object* lean_local_ctx_mk_let_decl(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Init_Lean_Elab_Binders_1__expandBinderType___boxed(lean_object*); lean_object* l___private_Init_Lean_Elab_Binders_6__elabBinderViews___main(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_elabBinder___rarg(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Term_elabFun(lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Parser_Term_forall___elambda__1___closed__2; extern lean_object* l_Lean_identKind___closed__2; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabFun___closed__2; lean_object* l_Lean_Elab_Term_elabForall___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Parser_Term_typeAscription___elambda__1___closed__1; extern lean_object* l_Lean_Parser_Term_match___elambda__1___closed__1; @@ -85,6 +90,7 @@ lean_object* l_Lean_Elab_Term_elabFunCore___lambda__1(lean_object*, lean_object* lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabLetDecl(lean_object*); lean_object* l_Lean_Elab_Term_FunBinders_elabFunBindersAux(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l___private_Init_Lean_Parser_Parser_12__antiquotNestedExpr___elambda__1___closed__1; +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabFun___closed__3; lean_object* lean_array_fget(lean_object*, lean_object*); extern lean_object* l_Lean_Elab_Term_declareBuiltinTermElab___closed__3; extern lean_object* l_Lean_Expr_getOptParamDefault_x3f___closed__2; @@ -131,7 +137,9 @@ lean_object* l_Lean_Elab_Term_elabFunBinders(lean_object*); extern lean_object* l_Lean_Parser_Term_instBinder___elambda__1___closed__1; lean_object* lean_name_mk_string(lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_throwError___rarg(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabFun(lean_object*); lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabDepArrow(lean_object*); +extern lean_object* l_Lean_Parser_Term_fun___elambda__1___closed__2; lean_object* l_Lean_Elab_Term_elabArrow___lambda__1___closed__1; lean_object* l_Lean_Elab_Term_elabBinder___rarg___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Term_getCurrMacroScope(lean_object*, lean_object*); @@ -194,6 +202,7 @@ lean_object* l_Lean_Elab_Term_elabLetDecl___closed__6; lean_object* l_Lean_Syntax_isTermId_x3f(lean_object*, uint8_t); extern lean_object* l_Lean_Parser_Term_let___elambda__1___closed__1; lean_object* l_Lean_Syntax_getArgs(lean_object*); +uint8_t l_Lean_BinderInfo_isExplicit(uint8_t); lean_object* l_Lean_Syntax_getKind(lean_object*); lean_object* l_Lean_Elab_Term_elabLetDecl___closed__1; lean_object* l_Lean_Elab_Term_elabLetDeclAux___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -16986,7 +16995,7 @@ lean_object* l___private_Init_Lean_Elab_Binders_11__propagateExpectedType(lean_o _start: { lean_object* x_7; -x_7 = lean_ctor_get(x_4, 4); +x_7 = lean_ctor_get(x_4, 3); lean_inc(x_7); if (lean_obj_tag(x_7) == 0) { @@ -17000,364 +17009,352 @@ return x_8; } else { -lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; uint8_t x_13; lean_object* x_14; uint8_t x_15; +lean_object* x_9; lean_object* x_10; lean_object* x_11; uint8_t x_12; lean_object* x_13; uint8_t x_14; x_9 = lean_ctor_get(x_4, 0); lean_inc(x_9); x_10 = lean_ctor_get(x_4, 1); lean_inc(x_10); x_11 = lean_ctor_get(x_4, 2); lean_inc(x_11); -x_12 = lean_ctor_get(x_4, 3); -lean_inc(x_12); -x_13 = lean_ctor_get_uint8(x_4, sizeof(void*)*5); +x_12 = lean_ctor_get_uint8(x_4, sizeof(void*)*4); if (lean_is_exclusive(x_4)) { lean_ctor_release(x_4, 0); lean_ctor_release(x_4, 1); lean_ctor_release(x_4, 2); lean_ctor_release(x_4, 3); - lean_ctor_release(x_4, 4); - x_14 = x_4; + x_13 = x_4; } else { lean_dec_ref(x_4); - x_14 = lean_box(0); + x_13 = lean_box(0); } -x_15 = !lean_is_exclusive(x_7); -if (x_15 == 0) +x_14 = !lean_is_exclusive(x_7); +if (x_14 == 0) { -lean_object* x_16; lean_object* x_17; -x_16 = lean_ctor_get(x_7, 0); +lean_object* x_15; lean_object* x_16; +x_15 = lean_ctor_get(x_7, 0); lean_inc(x_5); -x_17 = l_Lean_Elab_Term_whnfForall(x_1, x_16, x_5, x_6); -if (lean_obj_tag(x_17) == 0) +x_16 = l_Lean_Elab_Term_whnfForall(x_1, x_15, x_5, x_6); +if (lean_obj_tag(x_16) == 0) { -lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; -x_18 = lean_ctor_get(x_17, 0); +lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; +x_17 = lean_ctor_get(x_16, 0); +lean_inc(x_17); +x_18 = lean_ctor_get(x_16, 1); lean_inc(x_18); -x_19 = lean_ctor_get(x_17, 1); -lean_inc(x_19); -if (lean_is_exclusive(x_17)) { - lean_ctor_release(x_17, 0); - lean_ctor_release(x_17, 1); - x_20 = x_17; +if (lean_is_exclusive(x_16)) { + lean_ctor_release(x_16, 0); + lean_ctor_release(x_16, 1); + x_19 = x_16; } else { - lean_dec_ref(x_17); - x_20 = lean_box(0); + lean_dec_ref(x_16); + x_19 = lean_box(0); } -if (lean_obj_tag(x_18) == 7) +if (lean_obj_tag(x_17) == 7) { -lean_object* x_26; lean_object* x_27; lean_object* x_28; -lean_dec(x_20); -lean_dec(x_14); -x_26 = lean_ctor_get(x_18, 1); +lean_object* x_25; lean_object* x_26; lean_object* x_27; +lean_dec(x_19); +lean_dec(x_13); +x_25 = lean_ctor_get(x_17, 1); +lean_inc(x_25); +x_26 = lean_ctor_get(x_17, 2); lean_inc(x_26); -x_27 = lean_ctor_get(x_18, 2); -lean_inc(x_27); -lean_dec(x_18); -x_28 = l_Lean_Elab_Term_isDefEq(x_1, x_3, x_26, x_5, x_19); -if (lean_obj_tag(x_28) == 0) -{ -uint8_t x_29; -x_29 = !lean_is_exclusive(x_28); -if (x_29 == 0) -{ -lean_object* x_30; lean_object* x_31; lean_object* x_32; -x_30 = lean_ctor_get(x_28, 0); -lean_dec(x_30); -x_31 = lean_expr_instantiate1(x_27, x_2); -lean_dec(x_27); -lean_ctor_set(x_7, 0, x_31); -x_32 = lean_alloc_ctor(0, 5, 1); -lean_ctor_set(x_32, 0, x_9); -lean_ctor_set(x_32, 1, x_10); -lean_ctor_set(x_32, 2, x_11); -lean_ctor_set(x_32, 3, x_12); -lean_ctor_set(x_32, 4, x_7); -lean_ctor_set_uint8(x_32, sizeof(void*)*5, x_13); -lean_ctor_set(x_28, 0, x_32); -return x_28; -} -else -{ -lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; -x_33 = lean_ctor_get(x_28, 1); -lean_inc(x_33); -lean_dec(x_28); -x_34 = lean_expr_instantiate1(x_27, x_2); -lean_dec(x_27); -lean_ctor_set(x_7, 0, x_34); -x_35 = lean_alloc_ctor(0, 5, 1); -lean_ctor_set(x_35, 0, x_9); -lean_ctor_set(x_35, 1, x_10); -lean_ctor_set(x_35, 2, x_11); -lean_ctor_set(x_35, 3, x_12); -lean_ctor_set(x_35, 4, x_7); -lean_ctor_set_uint8(x_35, sizeof(void*)*5, x_13); -x_36 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_36, 0, x_35); -lean_ctor_set(x_36, 1, x_33); -return x_36; -} -} -else -{ -uint8_t x_37; -lean_dec(x_27); -lean_free_object(x_7); -lean_dec(x_12); -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -x_37 = !lean_is_exclusive(x_28); -if (x_37 == 0) -{ -return x_28; -} -else -{ -lean_object* x_38; lean_object* x_39; lean_object* x_40; -x_38 = lean_ctor_get(x_28, 0); -x_39 = lean_ctor_get(x_28, 1); -lean_inc(x_39); -lean_inc(x_38); -lean_dec(x_28); -x_40 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_40, 0, x_38); -lean_ctor_set(x_40, 1, x_39); -return x_40; -} -} -} -else -{ -lean_object* x_41; -lean_dec(x_18); -lean_free_object(x_7); -lean_dec(x_5); -lean_dec(x_3); -x_41 = lean_box(0); -x_21 = x_41; -goto block_25; -} -block_25: -{ -lean_object* x_22; lean_object* x_23; lean_object* x_24; -lean_dec(x_21); -x_22 = lean_box(0); -if (lean_is_scalar(x_14)) { - x_23 = lean_alloc_ctor(0, 5, 1); -} else { - x_23 = x_14; -} -lean_ctor_set(x_23, 0, x_9); -lean_ctor_set(x_23, 1, x_10); -lean_ctor_set(x_23, 2, x_11); -lean_ctor_set(x_23, 3, x_12); -lean_ctor_set(x_23, 4, x_22); -lean_ctor_set_uint8(x_23, sizeof(void*)*5, x_13); -if (lean_is_scalar(x_20)) { - x_24 = lean_alloc_ctor(0, 2, 0); -} else { - x_24 = x_20; -} -lean_ctor_set(x_24, 0, x_23); -lean_ctor_set(x_24, 1, x_19); -return x_24; -} -} -else -{ -uint8_t x_42; -lean_free_object(x_7); -lean_dec(x_14); -lean_dec(x_12); -lean_dec(x_11); -lean_dec(x_10); -lean_dec(x_9); -lean_dec(x_5); -lean_dec(x_3); -x_42 = !lean_is_exclusive(x_17); -if (x_42 == 0) -{ -return x_17; -} -else -{ -lean_object* x_43; lean_object* x_44; lean_object* x_45; -x_43 = lean_ctor_get(x_17, 0); -x_44 = lean_ctor_get(x_17, 1); -lean_inc(x_44); -lean_inc(x_43); lean_dec(x_17); -x_45 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_45, 0, x_43); -lean_ctor_set(x_45, 1, x_44); -return x_45; +x_27 = l_Lean_Elab_Term_isDefEq(x_1, x_3, x_25, x_5, x_18); +if (lean_obj_tag(x_27) == 0) +{ +uint8_t x_28; +x_28 = !lean_is_exclusive(x_27); +if (x_28 == 0) +{ +lean_object* x_29; lean_object* x_30; lean_object* x_31; +x_29 = lean_ctor_get(x_27, 0); +lean_dec(x_29); +x_30 = lean_expr_instantiate1(x_26, x_2); +lean_dec(x_26); +lean_ctor_set(x_7, 0, x_30); +x_31 = lean_alloc_ctor(0, 4, 1); +lean_ctor_set(x_31, 0, x_9); +lean_ctor_set(x_31, 1, x_10); +lean_ctor_set(x_31, 2, x_11); +lean_ctor_set(x_31, 3, x_7); +lean_ctor_set_uint8(x_31, sizeof(void*)*4, x_12); +lean_ctor_set(x_27, 0, x_31); +return x_27; +} +else +{ +lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; +x_32 = lean_ctor_get(x_27, 1); +lean_inc(x_32); +lean_dec(x_27); +x_33 = lean_expr_instantiate1(x_26, x_2); +lean_dec(x_26); +lean_ctor_set(x_7, 0, x_33); +x_34 = lean_alloc_ctor(0, 4, 1); +lean_ctor_set(x_34, 0, x_9); +lean_ctor_set(x_34, 1, x_10); +lean_ctor_set(x_34, 2, x_11); +lean_ctor_set(x_34, 3, x_7); +lean_ctor_set_uint8(x_34, sizeof(void*)*4, x_12); +x_35 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_35, 0, x_34); +lean_ctor_set(x_35, 1, x_32); +return x_35; +} +} +else +{ +uint8_t x_36; +lean_dec(x_26); +lean_free_object(x_7); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +x_36 = !lean_is_exclusive(x_27); +if (x_36 == 0) +{ +return x_27; +} +else +{ +lean_object* x_37; lean_object* x_38; lean_object* x_39; +x_37 = lean_ctor_get(x_27, 0); +x_38 = lean_ctor_get(x_27, 1); +lean_inc(x_38); +lean_inc(x_37); +lean_dec(x_27); +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 { -lean_object* x_46; lean_object* x_47; -x_46 = lean_ctor_get(x_7, 0); -lean_inc(x_46); +lean_object* x_40; +lean_dec(x_17); +lean_free_object(x_7); +lean_dec(x_5); +lean_dec(x_3); +x_40 = lean_box(0); +x_20 = x_40; +goto block_24; +} +block_24: +{ +lean_object* x_21; lean_object* x_22; lean_object* x_23; +lean_dec(x_20); +x_21 = lean_box(0); +if (lean_is_scalar(x_13)) { + x_22 = lean_alloc_ctor(0, 4, 1); +} else { + x_22 = x_13; +} +lean_ctor_set(x_22, 0, x_9); +lean_ctor_set(x_22, 1, x_10); +lean_ctor_set(x_22, 2, x_11); +lean_ctor_set(x_22, 3, x_21); +lean_ctor_set_uint8(x_22, sizeof(void*)*4, x_12); +if (lean_is_scalar(x_19)) { + x_23 = lean_alloc_ctor(0, 2, 0); +} else { + x_23 = x_19; +} +lean_ctor_set(x_23, 0, x_22); +lean_ctor_set(x_23, 1, x_18); +return x_23; +} +} +else +{ +uint8_t x_41; +lean_free_object(x_7); +lean_dec(x_13); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_5); +lean_dec(x_3); +x_41 = !lean_is_exclusive(x_16); +if (x_41 == 0) +{ +return x_16; +} +else +{ +lean_object* x_42; lean_object* x_43; lean_object* x_44; +x_42 = lean_ctor_get(x_16, 0); +x_43 = lean_ctor_get(x_16, 1); +lean_inc(x_43); +lean_inc(x_42); +lean_dec(x_16); +x_44 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_44, 0, x_42); +lean_ctor_set(x_44, 1, x_43); +return x_44; +} +} +} +else +{ +lean_object* x_45; lean_object* x_46; +x_45 = lean_ctor_get(x_7, 0); +lean_inc(x_45); lean_dec(x_7); lean_inc(x_5); -x_47 = l_Lean_Elab_Term_whnfForall(x_1, x_46, x_5, x_6); -if (lean_obj_tag(x_47) == 0) +x_46 = l_Lean_Elab_Term_whnfForall(x_1, x_45, x_5, x_6); +if (lean_obj_tag(x_46) == 0) { -lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_object* x_51; -x_48 = lean_ctor_get(x_47, 0); +lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; +x_47 = lean_ctor_get(x_46, 0); +lean_inc(x_47); +x_48 = lean_ctor_get(x_46, 1); lean_inc(x_48); -x_49 = lean_ctor_get(x_47, 1); -lean_inc(x_49); -if (lean_is_exclusive(x_47)) { - lean_ctor_release(x_47, 0); - lean_ctor_release(x_47, 1); - x_50 = x_47; +if (lean_is_exclusive(x_46)) { + lean_ctor_release(x_46, 0); + lean_ctor_release(x_46, 1); + x_49 = x_46; } else { - lean_dec_ref(x_47); - x_50 = lean_box(0); + lean_dec_ref(x_46); + x_49 = lean_box(0); } -if (lean_obj_tag(x_48) == 7) +if (lean_obj_tag(x_47) == 7) { -lean_object* x_56; lean_object* x_57; lean_object* x_58; -lean_dec(x_50); -lean_dec(x_14); -x_56 = lean_ctor_get(x_48, 1); +lean_object* x_55; lean_object* x_56; lean_object* x_57; +lean_dec(x_49); +lean_dec(x_13); +x_55 = lean_ctor_get(x_47, 1); +lean_inc(x_55); +x_56 = lean_ctor_get(x_47, 2); lean_inc(x_56); -x_57 = lean_ctor_get(x_48, 2); -lean_inc(x_57); -lean_dec(x_48); -x_58 = l_Lean_Elab_Term_isDefEq(x_1, x_3, x_56, x_5, x_49); -if (lean_obj_tag(x_58) == 0) +lean_dec(x_47); +x_57 = l_Lean_Elab_Term_isDefEq(x_1, x_3, x_55, x_5, x_48); +if (lean_obj_tag(x_57) == 0) { -lean_object* x_59; lean_object* x_60; lean_object* x_61; lean_object* x_62; lean_object* x_63; lean_object* x_64; -x_59 = lean_ctor_get(x_58, 1); -lean_inc(x_59); -if (lean_is_exclusive(x_58)) { - lean_ctor_release(x_58, 0); - lean_ctor_release(x_58, 1); - x_60 = x_58; +lean_object* x_58; lean_object* x_59; lean_object* x_60; lean_object* x_61; lean_object* x_62; lean_object* x_63; +x_58 = lean_ctor_get(x_57, 1); +lean_inc(x_58); +if (lean_is_exclusive(x_57)) { + lean_ctor_release(x_57, 0); + lean_ctor_release(x_57, 1); + x_59 = x_57; } else { - lean_dec_ref(x_58); - x_60 = lean_box(0); + lean_dec_ref(x_57); + x_59 = lean_box(0); } -x_61 = lean_expr_instantiate1(x_57, x_2); -lean_dec(x_57); -x_62 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_62, 0, x_61); -x_63 = lean_alloc_ctor(0, 5, 1); -lean_ctor_set(x_63, 0, x_9); -lean_ctor_set(x_63, 1, x_10); -lean_ctor_set(x_63, 2, x_11); -lean_ctor_set(x_63, 3, x_12); -lean_ctor_set(x_63, 4, x_62); -lean_ctor_set_uint8(x_63, sizeof(void*)*5, x_13); -if (lean_is_scalar(x_60)) { - x_64 = lean_alloc_ctor(0, 2, 0); +x_60 = lean_expr_instantiate1(x_56, x_2); +lean_dec(x_56); +x_61 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_61, 0, x_60); +x_62 = lean_alloc_ctor(0, 4, 1); +lean_ctor_set(x_62, 0, x_9); +lean_ctor_set(x_62, 1, x_10); +lean_ctor_set(x_62, 2, x_11); +lean_ctor_set(x_62, 3, x_61); +lean_ctor_set_uint8(x_62, sizeof(void*)*4, x_12); +if (lean_is_scalar(x_59)) { + x_63 = lean_alloc_ctor(0, 2, 0); } else { - x_64 = x_60; + x_63 = x_59; } -lean_ctor_set(x_64, 0, x_63); -lean_ctor_set(x_64, 1, x_59); -return x_64; +lean_ctor_set(x_63, 0, x_62); +lean_ctor_set(x_63, 1, x_58); +return x_63; } else { -lean_object* x_65; lean_object* x_66; lean_object* x_67; lean_object* x_68; -lean_dec(x_57); -lean_dec(x_12); +lean_object* x_64; lean_object* x_65; lean_object* x_66; lean_object* x_67; +lean_dec(x_56); lean_dec(x_11); lean_dec(x_10); lean_dec(x_9); -x_65 = lean_ctor_get(x_58, 0); +x_64 = lean_ctor_get(x_57, 0); +lean_inc(x_64); +x_65 = lean_ctor_get(x_57, 1); lean_inc(x_65); -x_66 = lean_ctor_get(x_58, 1); -lean_inc(x_66); -if (lean_is_exclusive(x_58)) { - lean_ctor_release(x_58, 0); - lean_ctor_release(x_58, 1); - x_67 = x_58; +if (lean_is_exclusive(x_57)) { + lean_ctor_release(x_57, 0); + lean_ctor_release(x_57, 1); + x_66 = x_57; } else { - lean_dec_ref(x_58); - x_67 = lean_box(0); + lean_dec_ref(x_57); + x_66 = lean_box(0); } -if (lean_is_scalar(x_67)) { - x_68 = lean_alloc_ctor(1, 2, 0); +if (lean_is_scalar(x_66)) { + x_67 = lean_alloc_ctor(1, 2, 0); } else { - x_68 = x_67; + x_67 = x_66; } -lean_ctor_set(x_68, 0, x_65); -lean_ctor_set(x_68, 1, x_66); -return x_68; +lean_ctor_set(x_67, 0, x_64); +lean_ctor_set(x_67, 1, x_65); +return x_67; } } else { -lean_object* x_69; -lean_dec(x_48); +lean_object* x_68; +lean_dec(x_47); lean_dec(x_5); lean_dec(x_3); -x_69 = lean_box(0); -x_51 = x_69; -goto block_55; +x_68 = lean_box(0); +x_50 = x_68; +goto block_54; } -block_55: +block_54: { -lean_object* x_52; lean_object* x_53; lean_object* x_54; -lean_dec(x_51); -x_52 = lean_box(0); -if (lean_is_scalar(x_14)) { - x_53 = lean_alloc_ctor(0, 5, 1); +lean_object* x_51; lean_object* x_52; lean_object* x_53; +lean_dec(x_50); +x_51 = lean_box(0); +if (lean_is_scalar(x_13)) { + x_52 = lean_alloc_ctor(0, 4, 1); } else { - x_53 = x_14; + x_52 = x_13; } -lean_ctor_set(x_53, 0, x_9); -lean_ctor_set(x_53, 1, x_10); -lean_ctor_set(x_53, 2, x_11); -lean_ctor_set(x_53, 3, x_12); -lean_ctor_set(x_53, 4, x_52); -lean_ctor_set_uint8(x_53, sizeof(void*)*5, x_13); -if (lean_is_scalar(x_50)) { - x_54 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_52, 0, x_9); +lean_ctor_set(x_52, 1, x_10); +lean_ctor_set(x_52, 2, x_11); +lean_ctor_set(x_52, 3, x_51); +lean_ctor_set_uint8(x_52, sizeof(void*)*4, x_12); +if (lean_is_scalar(x_49)) { + x_53 = lean_alloc_ctor(0, 2, 0); } else { - x_54 = x_50; + x_53 = x_49; } -lean_ctor_set(x_54, 0, x_53); -lean_ctor_set(x_54, 1, x_49); -return x_54; +lean_ctor_set(x_53, 0, x_52); +lean_ctor_set(x_53, 1, x_48); +return x_53; } } else { -lean_object* x_70; lean_object* x_71; lean_object* x_72; lean_object* x_73; -lean_dec(x_14); -lean_dec(x_12); +lean_object* x_69; lean_object* x_70; lean_object* x_71; lean_object* x_72; +lean_dec(x_13); lean_dec(x_11); lean_dec(x_10); lean_dec(x_9); lean_dec(x_5); lean_dec(x_3); -x_70 = lean_ctor_get(x_47, 0); +x_69 = lean_ctor_get(x_46, 0); +lean_inc(x_69); +x_70 = lean_ctor_get(x_46, 1); lean_inc(x_70); -x_71 = lean_ctor_get(x_47, 1); -lean_inc(x_71); -if (lean_is_exclusive(x_47)) { - lean_ctor_release(x_47, 0); - lean_ctor_release(x_47, 1); - x_72 = x_47; +if (lean_is_exclusive(x_46)) { + lean_ctor_release(x_46, 0); + lean_ctor_release(x_46, 1); + x_71 = x_46; } else { - lean_dec_ref(x_47); - x_72 = lean_box(0); + lean_dec_ref(x_46); + x_71 = lean_box(0); } -if (lean_is_scalar(x_72)) { - x_73 = lean_alloc_ctor(1, 2, 0); +if (lean_is_scalar(x_71)) { + x_72 = lean_alloc_ctor(1, 2, 0); } else { - x_73 = x_72; + x_72 = x_71; } -lean_ctor_set(x_73, 0, x_70); -lean_ctor_set(x_73, 1, x_71); -return x_73; +lean_ctor_set(x_72, 0, x_69); +lean_ctor_set(x_72, 1, x_70); +return x_72; } } } @@ -17392,861 +17389,1986 @@ return x_8; } else { -lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; uint8_t x_14; +lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; uint8_t x_14; uint8_t x_15; lean_object* x_16; lean_object* x_17; uint8_t x_18; x_9 = lean_array_fget(x_1, x_2); -x_10 = lean_ctor_get(x_4, 0); +x_10 = lean_ctor_get(x_3, 0); lean_inc(x_10); -x_11 = lean_ctor_get(x_3, 2); +x_11 = lean_ctor_get(x_3, 1); lean_inc(x_11); -x_12 = lean_ctor_get(x_3, 3); +x_12 = lean_ctor_get(x_3, 2); lean_inc(x_12); -x_13 = lean_ctor_get(x_9, 1); +x_13 = lean_ctor_get(x_3, 3); lean_inc(x_13); -x_14 = !lean_is_exclusive(x_4); -if (x_14 == 0) +x_14 = lean_ctor_get_uint8(x_9, sizeof(void*)*2); +x_15 = l_Lean_BinderInfo_isExplicit(x_14); +x_16 = lean_ctor_get(x_4, 0); +lean_inc(x_16); +x_17 = lean_ctor_get(x_9, 1); +lean_inc(x_17); +x_18 = !lean_is_exclusive(x_4); +if (x_18 == 0) { -lean_object* x_15; uint8_t x_16; -x_15 = lean_ctor_get(x_4, 0); -lean_dec(x_15); -x_16 = !lean_is_exclusive(x_10); -if (x_16 == 0) -{ -lean_object* x_17; lean_object* x_18; lean_object* x_19; -x_17 = lean_ctor_get(x_10, 2); -lean_dec(x_17); -x_18 = lean_ctor_get(x_10, 1); -lean_dec(x_18); -lean_inc(x_11); -lean_ctor_set(x_10, 2, x_12); -lean_ctor_set(x_10, 1, x_11); -lean_inc(x_4); -lean_inc(x_13); -x_19 = l_Lean_Elab_Term_elabType(x_13, x_4, x_5); -if (lean_obj_tag(x_19) == 0) -{ -lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; uint8_t x_30; lean_object* x_31; lean_object* x_32; -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_object* x_19; uint8_t x_20; +x_19 = lean_ctor_get(x_4, 0); lean_dec(x_19); -x_22 = l_Lean_Elab_Term_mkFreshFVarId___rarg(x_21); -x_23 = lean_ctor_get(x_22, 0); -lean_inc(x_23); -x_24 = lean_ctor_get(x_22, 1); -lean_inc(x_24); +x_20 = !lean_is_exclusive(x_16); +if (x_20 == 0) +{ +lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; +x_21 = lean_ctor_get(x_16, 2); +lean_dec(x_21); +x_22 = lean_ctor_get(x_16, 1); lean_dec(x_22); -lean_inc(x_23); -x_25 = l_Lean_mkFVar(x_23); -x_26 = lean_ctor_get(x_3, 1); -lean_inc(x_26); -lean_inc(x_25); -x_27 = lean_array_push(x_26, x_25); -x_28 = lean_ctor_get(x_9, 0); -lean_inc(x_28); -x_29 = l_Lean_Syntax_getId(x_28); -x_30 = lean_ctor_get_uint8(x_9, sizeof(void*)*2); -lean_dec(x_9); -lean_inc(x_20); -x_31 = lean_local_ctx_mk_local_decl(x_11, x_23, x_29, x_20, x_30); +lean_inc(x_12); +lean_inc(x_11); +lean_ctor_set(x_16, 2, x_12); +lean_ctor_set(x_16, 1, x_11); lean_inc(x_4); -lean_inc(x_20); -x_32 = l___private_Init_Lean_Elab_Binders_11__propagateExpectedType(x_28, x_25, x_20, x_3, x_4, x_24); -lean_dec(x_28); -if (lean_obj_tag(x_32) == 0) +lean_inc(x_17); +x_23 = l_Lean_Elab_Term_elabType(x_17, x_4, x_5); +if (x_15 == 0) { -lean_object* x_33; lean_object* x_34; lean_object* x_35; -x_33 = lean_ctor_get(x_32, 0); -lean_inc(x_33); -x_34 = lean_ctor_get(x_32, 1); -lean_inc(x_34); -lean_dec(x_32); -lean_inc(x_4); -x_35 = l_Lean_Elab_Term_isClass(x_13, x_20, x_4, x_34); -lean_dec(x_13); -if (lean_obj_tag(x_35) == 0) -{ -lean_object* x_36; -x_36 = lean_ctor_get(x_35, 0); -lean_inc(x_36); -if (lean_obj_tag(x_36) == 0) -{ -lean_object* x_37; lean_object* x_38; lean_object* x_39; uint8_t x_40; -lean_dec(x_25); -x_37 = lean_ctor_get(x_35, 1); -lean_inc(x_37); -lean_dec(x_35); -x_38 = lean_unsigned_to_nat(1u); -x_39 = lean_nat_add(x_2, x_38); -lean_dec(x_2); -x_40 = !lean_is_exclusive(x_33); -if (x_40 == 0) -{ -lean_object* x_41; lean_object* x_42; -x_41 = lean_ctor_get(x_33, 2); -lean_dec(x_41); -x_42 = lean_ctor_get(x_33, 1); -lean_dec(x_42); -lean_ctor_set(x_33, 2, x_31); -lean_ctor_set(x_33, 1, x_27); -x_2 = x_39; -x_3 = x_33; -x_5 = x_37; -goto _start; -} -else -{ -lean_object* x_44; lean_object* x_45; lean_object* x_46; uint8_t x_47; lean_object* x_48; -x_44 = lean_ctor_get(x_33, 0); -x_45 = lean_ctor_get(x_33, 3); -x_46 = lean_ctor_get(x_33, 4); -x_47 = lean_ctor_get_uint8(x_33, sizeof(void*)*5); -lean_inc(x_46); -lean_inc(x_45); -lean_inc(x_44); -lean_dec(x_33); -x_48 = lean_alloc_ctor(0, 5, 1); -lean_ctor_set(x_48, 0, x_44); -lean_ctor_set(x_48, 1, x_27); -lean_ctor_set(x_48, 2, x_31); -lean_ctor_set(x_48, 3, x_45); -lean_ctor_set(x_48, 4, x_46); -lean_ctor_set_uint8(x_48, sizeof(void*)*5, x_47); -x_2 = x_39; -x_3 = x_48; -x_5 = x_37; -goto _start; -} -} -else -{ -lean_object* x_50; lean_object* x_51; lean_object* x_52; lean_object* x_53; uint8_t x_54; -x_50 = lean_ctor_get(x_35, 1); -lean_inc(x_50); -lean_dec(x_35); -x_51 = lean_ctor_get(x_36, 0); -lean_inc(x_51); -lean_dec(x_36); -x_52 = l_Lean_Elab_Term_resetSynthInstanceCache___rarg(x_50); -x_53 = lean_ctor_get(x_52, 1); -lean_inc(x_53); -lean_dec(x_52); -x_54 = !lean_is_exclusive(x_33); -if (x_54 == 0) -{ -lean_object* x_55; lean_object* x_56; lean_object* x_57; lean_object* x_58; lean_object* x_59; lean_object* x_60; lean_object* x_61; -x_55 = lean_ctor_get(x_33, 3); -x_56 = lean_ctor_get(x_33, 2); -lean_dec(x_56); -x_57 = lean_ctor_get(x_33, 1); -lean_dec(x_57); -x_58 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_58, 0, x_51); -lean_ctor_set(x_58, 1, x_25); -x_59 = lean_array_push(x_55, x_58); -x_60 = lean_unsigned_to_nat(1u); -x_61 = lean_nat_add(x_2, x_60); -lean_dec(x_2); -lean_ctor_set(x_33, 3, x_59); -lean_ctor_set(x_33, 2, x_31); -lean_ctor_set(x_33, 1, x_27); -x_2 = x_61; -x_3 = x_33; -x_5 = x_53; -goto _start; -} -else -{ -lean_object* x_63; lean_object* x_64; lean_object* x_65; uint8_t x_66; lean_object* x_67; lean_object* x_68; lean_object* x_69; lean_object* x_70; lean_object* x_71; -x_63 = lean_ctor_get(x_33, 0); -x_64 = lean_ctor_get(x_33, 3); -x_65 = lean_ctor_get(x_33, 4); -x_66 = lean_ctor_get_uint8(x_33, sizeof(void*)*5); -lean_inc(x_65); -lean_inc(x_64); -lean_inc(x_63); -lean_dec(x_33); -x_67 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_67, 0, x_51); -lean_ctor_set(x_67, 1, x_25); -x_68 = lean_array_push(x_64, x_67); -x_69 = lean_unsigned_to_nat(1u); -x_70 = lean_nat_add(x_2, x_69); -lean_dec(x_2); -x_71 = lean_alloc_ctor(0, 5, 1); -lean_ctor_set(x_71, 0, x_63); -lean_ctor_set(x_71, 1, x_27); -lean_ctor_set(x_71, 2, x_31); -lean_ctor_set(x_71, 3, x_68); -lean_ctor_set(x_71, 4, x_65); -lean_ctor_set_uint8(x_71, sizeof(void*)*5, x_66); -x_2 = x_70; -x_3 = x_71; -x_5 = x_53; -goto _start; -} -} -} -else -{ -uint8_t x_73; -lean_dec(x_33); -lean_dec(x_31); -lean_dec(x_27); -lean_dec(x_25); -lean_dec(x_4); -lean_dec(x_2); -x_73 = !lean_is_exclusive(x_35); -if (x_73 == 0) -{ -return x_35; -} -else -{ -lean_object* x_74; lean_object* x_75; lean_object* x_76; -x_74 = lean_ctor_get(x_35, 0); -x_75 = lean_ctor_get(x_35, 1); -lean_inc(x_75); -lean_inc(x_74); -lean_dec(x_35); -x_76 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_76, 0, x_74); -lean_ctor_set(x_76, 1, x_75); -return x_76; -} -} -} -else -{ -uint8_t x_77; -lean_dec(x_31); -lean_dec(x_27); -lean_dec(x_25); -lean_dec(x_20); -lean_dec(x_4); -lean_dec(x_13); -lean_dec(x_2); -x_77 = !lean_is_exclusive(x_32); -if (x_77 == 0) -{ -return x_32; -} -else -{ -lean_object* x_78; lean_object* x_79; lean_object* x_80; -x_78 = lean_ctor_get(x_32, 0); -x_79 = lean_ctor_get(x_32, 1); -lean_inc(x_79); -lean_inc(x_78); -lean_dec(x_32); -x_80 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_80, 0, x_78); -lean_ctor_set(x_80, 1, x_79); -return x_80; -} -} -} -else -{ -uint8_t x_81; -lean_dec(x_4); lean_dec(x_13); +lean_dec(x_12); lean_dec(x_11); -lean_dec(x_9); -lean_dec(x_3); -lean_dec(x_2); -x_81 = !lean_is_exclusive(x_19); -if (x_81 == 0) -{ -return x_19; -} -else -{ -lean_object* x_82; lean_object* x_83; lean_object* x_84; -x_82 = lean_ctor_get(x_19, 0); -x_83 = lean_ctor_get(x_19, 1); -lean_inc(x_83); -lean_inc(x_82); -lean_dec(x_19); -x_84 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_84, 0, x_82); -lean_ctor_set(x_84, 1, x_83); -return x_84; -} -} -} -else -{ -lean_object* x_85; lean_object* x_86; lean_object* x_87; lean_object* x_88; lean_object* x_89; -x_85 = lean_ctor_get(x_10, 0); -x_86 = lean_ctor_get(x_10, 3); -x_87 = lean_ctor_get(x_10, 4); -lean_inc(x_87); -lean_inc(x_86); -lean_inc(x_85); lean_dec(x_10); -lean_inc(x_11); -x_88 = lean_alloc_ctor(0, 5, 0); -lean_ctor_set(x_88, 0, x_85); -lean_ctor_set(x_88, 1, x_11); -lean_ctor_set(x_88, 2, x_12); -lean_ctor_set(x_88, 3, x_86); -lean_ctor_set(x_88, 4, x_87); -lean_ctor_set(x_4, 0, x_88); -lean_inc(x_4); -lean_inc(x_13); -x_89 = l_Lean_Elab_Term_elabType(x_13, x_4, x_5); -if (lean_obj_tag(x_89) == 0) +if (lean_obj_tag(x_23) == 0) { -lean_object* x_90; lean_object* x_91; lean_object* x_92; lean_object* x_93; lean_object* x_94; lean_object* x_95; lean_object* x_96; lean_object* x_97; lean_object* x_98; lean_object* x_99; uint8_t x_100; lean_object* x_101; lean_object* x_102; -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_Lean_Elab_Term_mkFreshFVarId___rarg(x_91); -x_93 = lean_ctor_get(x_92, 0); -lean_inc(x_93); -x_94 = lean_ctor_get(x_92, 1); -lean_inc(x_94); -lean_dec(x_92); -lean_inc(x_93); -x_95 = l_Lean_mkFVar(x_93); -x_96 = lean_ctor_get(x_3, 1); -lean_inc(x_96); -lean_inc(x_95); -x_97 = lean_array_push(x_96, x_95); -x_98 = lean_ctor_get(x_9, 0); -lean_inc(x_98); -x_99 = l_Lean_Syntax_getId(x_98); -x_100 = lean_ctor_get_uint8(x_9, sizeof(void*)*2); -lean_dec(x_9); -lean_inc(x_90); -x_101 = lean_local_ctx_mk_local_decl(x_11, x_93, x_99, x_90, x_100); -lean_inc(x_4); -lean_inc(x_90); -x_102 = l___private_Init_Lean_Elab_Binders_11__propagateExpectedType(x_98, x_95, x_90, x_3, x_4, x_94); -lean_dec(x_98); -if (lean_obj_tag(x_102) == 0) -{ -lean_object* x_103; lean_object* x_104; lean_object* x_105; -x_103 = lean_ctor_get(x_102, 0); -lean_inc(x_103); -x_104 = lean_ctor_get(x_102, 1); -lean_inc(x_104); -lean_dec(x_102); -lean_inc(x_4); -x_105 = l_Lean_Elab_Term_isClass(x_13, x_90, x_4, x_104); -lean_dec(x_13); -if (lean_obj_tag(x_105) == 0) -{ -lean_object* x_106; -x_106 = lean_ctor_get(x_105, 0); -lean_inc(x_106); -if (lean_obj_tag(x_106) == 0) -{ -lean_object* x_107; lean_object* x_108; lean_object* x_109; lean_object* x_110; lean_object* x_111; lean_object* x_112; uint8_t x_113; lean_object* x_114; lean_object* x_115; -lean_dec(x_95); -x_107 = lean_ctor_get(x_105, 1); -lean_inc(x_107); -lean_dec(x_105); -x_108 = lean_unsigned_to_nat(1u); -x_109 = lean_nat_add(x_2, x_108); -lean_dec(x_2); -x_110 = lean_ctor_get(x_103, 0); -lean_inc(x_110); -x_111 = lean_ctor_get(x_103, 3); -lean_inc(x_111); -x_112 = lean_ctor_get(x_103, 4); -lean_inc(x_112); -x_113 = lean_ctor_get_uint8(x_103, sizeof(void*)*5); -if (lean_is_exclusive(x_103)) { - lean_ctor_release(x_103, 0); - lean_ctor_release(x_103, 1); - lean_ctor_release(x_103, 2); - lean_ctor_release(x_103, 3); - lean_ctor_release(x_103, 4); - x_114 = x_103; -} else { - lean_dec_ref(x_103); - x_114 = lean_box(0); -} -if (lean_is_scalar(x_114)) { - x_115 = lean_alloc_ctor(0, 5, 1); -} else { - x_115 = x_114; -} -lean_ctor_set(x_115, 0, x_110); -lean_ctor_set(x_115, 1, x_97); -lean_ctor_set(x_115, 2, x_101); -lean_ctor_set(x_115, 3, x_111); -lean_ctor_set(x_115, 4, x_112); -lean_ctor_set_uint8(x_115, sizeof(void*)*5, x_113); -x_2 = x_109; -x_3 = x_115; -x_5 = x_107; -goto _start; +lean_object* x_202; lean_object* x_203; +x_202 = lean_ctor_get(x_23, 0); +lean_inc(x_202); +x_203 = lean_ctor_get(x_23, 1); +lean_inc(x_203); +lean_dec(x_23); +x_24 = x_3; +x_25 = x_202; +x_26 = x_203; +goto block_201; } else { -lean_object* x_117; lean_object* x_118; lean_object* x_119; lean_object* x_120; lean_object* x_121; lean_object* x_122; lean_object* x_123; uint8_t x_124; lean_object* x_125; lean_object* x_126; lean_object* x_127; lean_object* x_128; lean_object* x_129; lean_object* x_130; -x_117 = lean_ctor_get(x_105, 1); -lean_inc(x_117); -lean_dec(x_105); -x_118 = lean_ctor_get(x_106, 0); -lean_inc(x_118); -lean_dec(x_106); -x_119 = l_Lean_Elab_Term_resetSynthInstanceCache___rarg(x_117); -x_120 = lean_ctor_get(x_119, 1); -lean_inc(x_120); -lean_dec(x_119); -x_121 = lean_ctor_get(x_103, 0); -lean_inc(x_121); -x_122 = lean_ctor_get(x_103, 3); -lean_inc(x_122); -x_123 = lean_ctor_get(x_103, 4); -lean_inc(x_123); -x_124 = lean_ctor_get_uint8(x_103, sizeof(void*)*5); -if (lean_is_exclusive(x_103)) { - lean_ctor_release(x_103, 0); - lean_ctor_release(x_103, 1); - lean_ctor_release(x_103, 2); - lean_ctor_release(x_103, 3); - lean_ctor_release(x_103, 4); - x_125 = x_103; -} else { - lean_dec_ref(x_103); - x_125 = lean_box(0); -} -x_126 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_126, 0, x_118); -lean_ctor_set(x_126, 1, x_95); -x_127 = lean_array_push(x_122, x_126); -x_128 = lean_unsigned_to_nat(1u); -x_129 = lean_nat_add(x_2, x_128); -lean_dec(x_2); -if (lean_is_scalar(x_125)) { - x_130 = lean_alloc_ctor(0, 5, 1); -} else { - x_130 = x_125; -} -lean_ctor_set(x_130, 0, x_121); -lean_ctor_set(x_130, 1, x_97); -lean_ctor_set(x_130, 2, x_101); -lean_ctor_set(x_130, 3, x_127); -lean_ctor_set(x_130, 4, x_123); -lean_ctor_set_uint8(x_130, sizeof(void*)*5, x_124); -x_2 = x_129; -x_3 = x_130; -x_5 = x_120; -goto _start; -} -} -else -{ -lean_object* x_132; lean_object* x_133; lean_object* x_134; lean_object* x_135; -lean_dec(x_103); -lean_dec(x_101); -lean_dec(x_97); -lean_dec(x_95); +uint8_t x_204; lean_dec(x_4); -lean_dec(x_2); -x_132 = lean_ctor_get(x_105, 0); -lean_inc(x_132); -x_133 = lean_ctor_get(x_105, 1); -lean_inc(x_133); -if (lean_is_exclusive(x_105)) { - lean_ctor_release(x_105, 0); - lean_ctor_release(x_105, 1); - x_134 = x_105; -} else { - lean_dec_ref(x_105); - x_134 = lean_box(0); -} -if (lean_is_scalar(x_134)) { - x_135 = lean_alloc_ctor(1, 2, 0); -} else { - x_135 = x_134; -} -lean_ctor_set(x_135, 0, x_132); -lean_ctor_set(x_135, 1, x_133); -return x_135; -} -} -else -{ -lean_object* x_136; lean_object* x_137; lean_object* x_138; lean_object* x_139; -lean_dec(x_101); -lean_dec(x_97); -lean_dec(x_95); -lean_dec(x_90); -lean_dec(x_4); -lean_dec(x_13); -lean_dec(x_2); -x_136 = lean_ctor_get(x_102, 0); -lean_inc(x_136); -x_137 = lean_ctor_get(x_102, 1); -lean_inc(x_137); -if (lean_is_exclusive(x_102)) { - lean_ctor_release(x_102, 0); - lean_ctor_release(x_102, 1); - x_138 = x_102; -} else { - lean_dec_ref(x_102); - x_138 = lean_box(0); -} -if (lean_is_scalar(x_138)) { - x_139 = lean_alloc_ctor(1, 2, 0); -} else { - x_139 = x_138; -} -lean_ctor_set(x_139, 0, x_136); -lean_ctor_set(x_139, 1, x_137); -return x_139; -} -} -else -{ -lean_object* x_140; lean_object* x_141; lean_object* x_142; lean_object* x_143; -lean_dec(x_4); -lean_dec(x_13); -lean_dec(x_11); +lean_dec(x_17); lean_dec(x_9); lean_dec(x_3); lean_dec(x_2); -x_140 = lean_ctor_get(x_89, 0); -lean_inc(x_140); -x_141 = lean_ctor_get(x_89, 1); -lean_inc(x_141); -if (lean_is_exclusive(x_89)) { - lean_ctor_release(x_89, 0); - lean_ctor_release(x_89, 1); - x_142 = x_89; -} else { - lean_dec_ref(x_89); - x_142 = lean_box(0); -} -if (lean_is_scalar(x_142)) { - x_143 = lean_alloc_ctor(1, 2, 0); -} else { - x_143 = x_142; -} -lean_ctor_set(x_143, 0, x_140); -lean_ctor_set(x_143, 1, x_141); -return x_143; -} -} +x_204 = !lean_is_exclusive(x_23); +if (x_204 == 0) +{ +return x_23; } else { -lean_object* x_144; lean_object* x_145; lean_object* x_146; lean_object* x_147; lean_object* x_148; lean_object* x_149; lean_object* x_150; lean_object* x_151; lean_object* x_152; uint8_t x_153; uint8_t x_154; uint8_t x_155; lean_object* x_156; lean_object* x_157; lean_object* x_158; lean_object* x_159; lean_object* x_160; lean_object* x_161; lean_object* x_162; -x_144 = lean_ctor_get(x_4, 1); -x_145 = lean_ctor_get(x_4, 2); -x_146 = lean_ctor_get(x_4, 3); -x_147 = lean_ctor_get(x_4, 4); -x_148 = lean_ctor_get(x_4, 5); -x_149 = lean_ctor_get(x_4, 6); -x_150 = lean_ctor_get(x_4, 7); -x_151 = lean_ctor_get(x_4, 8); -x_152 = lean_ctor_get(x_4, 9); -x_153 = lean_ctor_get_uint8(x_4, sizeof(void*)*10); -x_154 = lean_ctor_get_uint8(x_4, sizeof(void*)*10 + 1); -x_155 = lean_ctor_get_uint8(x_4, sizeof(void*)*10 + 2); -lean_inc(x_152); -lean_inc(x_151); -lean_inc(x_150); -lean_inc(x_149); -lean_inc(x_148); -lean_inc(x_147); -lean_inc(x_146); -lean_inc(x_145); -lean_inc(x_144); -lean_dec(x_4); -x_156 = lean_ctor_get(x_10, 0); -lean_inc(x_156); -x_157 = lean_ctor_get(x_10, 3); -lean_inc(x_157); -x_158 = lean_ctor_get(x_10, 4); -lean_inc(x_158); -if (lean_is_exclusive(x_10)) { - lean_ctor_release(x_10, 0); - lean_ctor_release(x_10, 1); - lean_ctor_release(x_10, 2); - lean_ctor_release(x_10, 3); - lean_ctor_release(x_10, 4); - x_159 = x_10; -} else { - lean_dec_ref(x_10); - x_159 = lean_box(0); -} -lean_inc(x_11); -if (lean_is_scalar(x_159)) { - x_160 = lean_alloc_ctor(0, 5, 0); -} else { - x_160 = x_159; -} -lean_ctor_set(x_160, 0, x_156); -lean_ctor_set(x_160, 1, x_11); -lean_ctor_set(x_160, 2, x_12); -lean_ctor_set(x_160, 3, x_157); -lean_ctor_set(x_160, 4, x_158); -x_161 = lean_alloc_ctor(0, 10, 3); -lean_ctor_set(x_161, 0, x_160); -lean_ctor_set(x_161, 1, x_144); -lean_ctor_set(x_161, 2, x_145); -lean_ctor_set(x_161, 3, x_146); -lean_ctor_set(x_161, 4, x_147); -lean_ctor_set(x_161, 5, x_148); -lean_ctor_set(x_161, 6, x_149); -lean_ctor_set(x_161, 7, x_150); -lean_ctor_set(x_161, 8, x_151); -lean_ctor_set(x_161, 9, x_152); -lean_ctor_set_uint8(x_161, sizeof(void*)*10, x_153); -lean_ctor_set_uint8(x_161, sizeof(void*)*10 + 1, x_154); -lean_ctor_set_uint8(x_161, sizeof(void*)*10 + 2, x_155); -lean_inc(x_161); -lean_inc(x_13); -x_162 = l_Lean_Elab_Term_elabType(x_13, x_161, x_5); -if (lean_obj_tag(x_162) == 0) -{ -lean_object* x_163; lean_object* x_164; lean_object* x_165; lean_object* x_166; lean_object* x_167; lean_object* x_168; lean_object* x_169; lean_object* x_170; lean_object* x_171; lean_object* x_172; uint8_t x_173; lean_object* x_174; lean_object* x_175; -x_163 = lean_ctor_get(x_162, 0); -lean_inc(x_163); -x_164 = lean_ctor_get(x_162, 1); -lean_inc(x_164); -lean_dec(x_162); -x_165 = l_Lean_Elab_Term_mkFreshFVarId___rarg(x_164); -x_166 = lean_ctor_get(x_165, 0); -lean_inc(x_166); -x_167 = lean_ctor_get(x_165, 1); -lean_inc(x_167); -lean_dec(x_165); -lean_inc(x_166); -x_168 = l_Lean_mkFVar(x_166); -x_169 = lean_ctor_get(x_3, 1); -lean_inc(x_169); -lean_inc(x_168); -x_170 = lean_array_push(x_169, x_168); -x_171 = lean_ctor_get(x_9, 0); -lean_inc(x_171); -x_172 = l_Lean_Syntax_getId(x_171); -x_173 = lean_ctor_get_uint8(x_9, sizeof(void*)*2); -lean_dec(x_9); -lean_inc(x_163); -x_174 = lean_local_ctx_mk_local_decl(x_11, x_166, x_172, x_163, x_173); -lean_inc(x_161); -lean_inc(x_163); -x_175 = l___private_Init_Lean_Elab_Binders_11__propagateExpectedType(x_171, x_168, x_163, x_3, x_161, x_167); -lean_dec(x_171); -if (lean_obj_tag(x_175) == 0) -{ -lean_object* x_176; lean_object* x_177; lean_object* x_178; -x_176 = lean_ctor_get(x_175, 0); -lean_inc(x_176); -x_177 = lean_ctor_get(x_175, 1); -lean_inc(x_177); -lean_dec(x_175); -lean_inc(x_161); -x_178 = l_Lean_Elab_Term_isClass(x_13, x_163, x_161, x_177); -lean_dec(x_13); -if (lean_obj_tag(x_178) == 0) -{ -lean_object* x_179; -x_179 = lean_ctor_get(x_178, 0); -lean_inc(x_179); -if (lean_obj_tag(x_179) == 0) -{ -lean_object* x_180; lean_object* x_181; lean_object* x_182; lean_object* x_183; lean_object* x_184; lean_object* x_185; uint8_t x_186; lean_object* x_187; lean_object* x_188; -lean_dec(x_168); -x_180 = lean_ctor_get(x_178, 1); -lean_inc(x_180); -lean_dec(x_178); -x_181 = lean_unsigned_to_nat(1u); -x_182 = lean_nat_add(x_2, x_181); -lean_dec(x_2); -x_183 = lean_ctor_get(x_176, 0); -lean_inc(x_183); -x_184 = lean_ctor_get(x_176, 3); -lean_inc(x_184); -x_185 = lean_ctor_get(x_176, 4); -lean_inc(x_185); -x_186 = lean_ctor_get_uint8(x_176, sizeof(void*)*5); -if (lean_is_exclusive(x_176)) { - lean_ctor_release(x_176, 0); - lean_ctor_release(x_176, 1); - lean_ctor_release(x_176, 2); - lean_ctor_release(x_176, 3); - lean_ctor_release(x_176, 4); - x_187 = x_176; -} else { - lean_dec_ref(x_176); - x_187 = lean_box(0); -} -if (lean_is_scalar(x_187)) { - x_188 = lean_alloc_ctor(0, 5, 1); -} else { - x_188 = x_187; -} -lean_ctor_set(x_188, 0, x_183); -lean_ctor_set(x_188, 1, x_170); -lean_ctor_set(x_188, 2, x_174); -lean_ctor_set(x_188, 3, x_184); -lean_ctor_set(x_188, 4, x_185); -lean_ctor_set_uint8(x_188, sizeof(void*)*5, x_186); -x_2 = x_182; -x_3 = x_188; -x_4 = x_161; -x_5 = x_180; -goto _start; -} -else -{ -lean_object* x_190; lean_object* x_191; lean_object* x_192; lean_object* x_193; lean_object* x_194; lean_object* x_195; lean_object* x_196; uint8_t x_197; lean_object* x_198; lean_object* x_199; lean_object* x_200; lean_object* x_201; lean_object* x_202; lean_object* x_203; -x_190 = lean_ctor_get(x_178, 1); -lean_inc(x_190); -lean_dec(x_178); -x_191 = lean_ctor_get(x_179, 0); -lean_inc(x_191); -lean_dec(x_179); -x_192 = l_Lean_Elab_Term_resetSynthInstanceCache___rarg(x_190); -x_193 = lean_ctor_get(x_192, 1); -lean_inc(x_193); -lean_dec(x_192); -x_194 = lean_ctor_get(x_176, 0); -lean_inc(x_194); -x_195 = lean_ctor_get(x_176, 3); -lean_inc(x_195); -x_196 = lean_ctor_get(x_176, 4); -lean_inc(x_196); -x_197 = lean_ctor_get_uint8(x_176, sizeof(void*)*5); -if (lean_is_exclusive(x_176)) { - lean_ctor_release(x_176, 0); - lean_ctor_release(x_176, 1); - lean_ctor_release(x_176, 2); - lean_ctor_release(x_176, 3); - lean_ctor_release(x_176, 4); - x_198 = x_176; -} else { - lean_dec_ref(x_176); - x_198 = lean_box(0); -} -x_199 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_199, 0, x_191); -lean_ctor_set(x_199, 1, x_168); -x_200 = lean_array_push(x_195, x_199); -x_201 = lean_unsigned_to_nat(1u); -x_202 = lean_nat_add(x_2, x_201); -lean_dec(x_2); -if (lean_is_scalar(x_198)) { - x_203 = lean_alloc_ctor(0, 5, 1); -} else { - x_203 = x_198; -} -lean_ctor_set(x_203, 0, x_194); -lean_ctor_set(x_203, 1, x_170); -lean_ctor_set(x_203, 2, x_174); -lean_ctor_set(x_203, 3, x_200); -lean_ctor_set(x_203, 4, x_196); -lean_ctor_set_uint8(x_203, sizeof(void*)*5, x_197); -x_2 = x_202; -x_3 = x_203; -x_4 = x_161; -x_5 = x_193; -goto _start; -} -} -else -{ -lean_object* x_205; lean_object* x_206; lean_object* x_207; lean_object* x_208; -lean_dec(x_176); -lean_dec(x_174); -lean_dec(x_170); -lean_dec(x_168); -lean_dec(x_161); -lean_dec(x_2); -x_205 = lean_ctor_get(x_178, 0); -lean_inc(x_205); -x_206 = lean_ctor_get(x_178, 1); +lean_object* x_205; lean_object* x_206; lean_object* x_207; +x_205 = lean_ctor_get(x_23, 0); +x_206 = lean_ctor_get(x_23, 1); lean_inc(x_206); -if (lean_is_exclusive(x_178)) { - lean_ctor_release(x_178, 0); - lean_ctor_release(x_178, 1); - x_207 = x_178; -} else { - lean_dec_ref(x_178); - x_207 = lean_box(0); +lean_inc(x_205); +lean_dec(x_23); +x_207 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_207, 0, x_205); +lean_ctor_set(x_207, 1, x_206); +return x_207; } -if (lean_is_scalar(x_207)) { - x_208 = lean_alloc_ctor(1, 2, 0); -} else { - x_208 = x_207; -} -lean_ctor_set(x_208, 0, x_205); -lean_ctor_set(x_208, 1, x_206); -return x_208; } } else { +uint8_t x_208; +x_208 = !lean_is_exclusive(x_3); +if (x_208 == 0) +{ lean_object* x_209; lean_object* x_210; lean_object* x_211; lean_object* x_212; -lean_dec(x_174); -lean_dec(x_170); -lean_dec(x_168); -lean_dec(x_163); -lean_dec(x_161); +x_209 = lean_ctor_get(x_3, 3); +lean_dec(x_209); +x_210 = lean_ctor_get(x_3, 2); +lean_dec(x_210); +x_211 = lean_ctor_get(x_3, 1); +lean_dec(x_211); +x_212 = lean_ctor_get(x_3, 0); +lean_dec(x_212); +if (lean_obj_tag(x_23) == 0) +{ +lean_object* x_213; lean_object* x_214; uint8_t x_215; +x_213 = lean_ctor_get(x_23, 0); +lean_inc(x_213); +x_214 = lean_ctor_get(x_23, 1); +lean_inc(x_214); +lean_dec(x_23); +x_215 = 1; +lean_ctor_set_uint8(x_3, sizeof(void*)*4, x_215); +x_24 = x_3; +x_25 = x_213; +x_26 = x_214; +goto block_201; +} +else +{ +uint8_t x_216; +lean_free_object(x_3); +lean_dec(x_4); +lean_dec(x_17); lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); lean_dec(x_2); -x_209 = lean_ctor_get(x_175, 0); -lean_inc(x_209); -x_210 = lean_ctor_get(x_175, 1); -lean_inc(x_210); -if (lean_is_exclusive(x_175)) { - lean_ctor_release(x_175, 0); - lean_ctor_release(x_175, 1); - x_211 = x_175; -} else { - lean_dec_ref(x_175); - x_211 = lean_box(0); +x_216 = !lean_is_exclusive(x_23); +if (x_216 == 0) +{ +return x_23; } -if (lean_is_scalar(x_211)) { - x_212 = lean_alloc_ctor(1, 2, 0); -} else { - x_212 = x_211; +else +{ +lean_object* x_217; lean_object* x_218; lean_object* x_219; +x_217 = lean_ctor_get(x_23, 0); +x_218 = lean_ctor_get(x_23, 1); +lean_inc(x_218); +lean_inc(x_217); +lean_dec(x_23); +x_219 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_219, 0, x_217); +lean_ctor_set(x_219, 1, x_218); +return x_219; } -lean_ctor_set(x_212, 0, x_209); -lean_ctor_set(x_212, 1, x_210); -return x_212; } } else { -lean_object* x_213; lean_object* x_214; lean_object* x_215; lean_object* x_216; -lean_dec(x_161); +lean_dec(x_3); +if (lean_obj_tag(x_23) == 0) +{ +lean_object* x_220; lean_object* x_221; uint8_t x_222; lean_object* x_223; +x_220 = lean_ctor_get(x_23, 0); +lean_inc(x_220); +x_221 = lean_ctor_get(x_23, 1); +lean_inc(x_221); +lean_dec(x_23); +x_222 = 1; +x_223 = lean_alloc_ctor(0, 4, 1); +lean_ctor_set(x_223, 0, x_10); +lean_ctor_set(x_223, 1, x_11); +lean_ctor_set(x_223, 2, x_12); +lean_ctor_set(x_223, 3, x_13); +lean_ctor_set_uint8(x_223, sizeof(void*)*4, x_222); +x_24 = x_223; +x_25 = x_220; +x_26 = x_221; +goto block_201; +} +else +{ +lean_object* x_224; lean_object* x_225; lean_object* x_226; lean_object* x_227; +lean_dec(x_4); +lean_dec(x_17); lean_dec(x_13); +lean_dec(x_12); lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_2); +x_224 = lean_ctor_get(x_23, 0); +lean_inc(x_224); +x_225 = lean_ctor_get(x_23, 1); +lean_inc(x_225); +if (lean_is_exclusive(x_23)) { + lean_ctor_release(x_23, 0); + lean_ctor_release(x_23, 1); + x_226 = x_23; +} else { + lean_dec_ref(x_23); + x_226 = lean_box(0); +} +if (lean_is_scalar(x_226)) { + x_227 = lean_alloc_ctor(1, 2, 0); +} else { + x_227 = x_226; +} +lean_ctor_set(x_227, 0, x_224); +lean_ctor_set(x_227, 1, x_225); +return x_227; +} +} +} +block_201: +{ +lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; uint8_t x_31; +x_27 = l_Lean_Elab_Term_mkFreshFVarId___rarg(x_26); +x_28 = lean_ctor_get(x_27, 0); +lean_inc(x_28); +x_29 = lean_ctor_get(x_27, 1); +lean_inc(x_29); +lean_dec(x_27); +lean_inc(x_28); +x_30 = l_Lean_mkFVar(x_28); +x_31 = !lean_is_exclusive(x_24); +if (x_31 == 0) +{ +lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; uint8_t x_36; lean_object* x_37; +x_32 = lean_ctor_get(x_24, 0); +x_33 = lean_ctor_get(x_24, 1); +x_34 = lean_ctor_get(x_24, 2); +x_35 = lean_ctor_get(x_24, 3); +x_36 = lean_ctor_get_uint8(x_24, sizeof(void*)*4); +lean_inc(x_30); +x_37 = lean_array_push(x_32, x_30); +if (x_36 == 0) +{ +lean_object* x_38; lean_object* x_39; uint8_t x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; +x_38 = lean_ctor_get(x_9, 0); +lean_inc(x_38); +lean_dec(x_9); +lean_inc(x_25); +x_39 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_39, 0, x_25); +x_40 = 0; +x_41 = lean_box(0); +lean_inc(x_4); +x_42 = l_Lean_Elab_Term_mkFreshExprMVar(x_38, x_39, x_40, x_41, x_4, x_29); +x_43 = lean_ctor_get(x_42, 0); +lean_inc(x_43); +x_44 = lean_ctor_get(x_42, 1); +lean_inc(x_44); +lean_dec(x_42); +x_45 = l_Lean_Syntax_getId(x_38); +lean_dec(x_38); +lean_inc(x_25); +x_46 = lean_local_ctx_mk_let_decl(x_33, x_28, x_45, x_25, x_43); +lean_inc(x_35); +lean_inc(x_34); +lean_inc(x_46); +lean_inc(x_37); +lean_ctor_set(x_24, 1, x_46); +lean_ctor_set(x_24, 0, x_37); +lean_inc(x_4); +x_47 = l_Lean_Elab_Term_isClass(x_17, x_25, x_4, x_44); +lean_dec(x_17); +if (lean_obj_tag(x_47) == 0) +{ +lean_object* x_48; +x_48 = lean_ctor_get(x_47, 0); +lean_inc(x_48); +if (lean_obj_tag(x_48) == 0) +{ +lean_object* x_49; lean_object* x_50; lean_object* x_51; +lean_dec(x_46); +lean_dec(x_37); +lean_dec(x_35); +lean_dec(x_34); +lean_dec(x_30); +x_49 = lean_ctor_get(x_47, 1); +lean_inc(x_49); +lean_dec(x_47); +x_50 = lean_unsigned_to_nat(1u); +x_51 = lean_nat_add(x_2, x_50); +lean_dec(x_2); +x_2 = x_51; +x_3 = x_24; +x_5 = x_49; +goto _start; +} +else +{ +lean_object* x_53; lean_object* x_54; lean_object* x_55; lean_object* x_56; lean_object* x_57; lean_object* x_58; lean_object* x_59; lean_object* x_60; lean_object* x_61; +lean_dec(x_24); +x_53 = lean_ctor_get(x_47, 1); +lean_inc(x_53); +lean_dec(x_47); +x_54 = lean_ctor_get(x_48, 0); +lean_inc(x_54); +lean_dec(x_48); +x_55 = l_Lean_Elab_Term_resetSynthInstanceCache___rarg(x_53); +x_56 = lean_ctor_get(x_55, 1); +lean_inc(x_56); +lean_dec(x_55); +x_57 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_57, 0, x_54); +lean_ctor_set(x_57, 1, x_30); +x_58 = lean_array_push(x_34, x_57); +x_59 = lean_unsigned_to_nat(1u); +x_60 = lean_nat_add(x_2, x_59); +lean_dec(x_2); +x_61 = lean_alloc_ctor(0, 4, 1); +lean_ctor_set(x_61, 0, x_37); +lean_ctor_set(x_61, 1, x_46); +lean_ctor_set(x_61, 2, x_58); +lean_ctor_set(x_61, 3, x_35); +lean_ctor_set_uint8(x_61, sizeof(void*)*4, x_36); +x_2 = x_60; +x_3 = x_61; +x_5 = x_56; +goto _start; +} +} +else +{ +uint8_t x_63; +lean_dec(x_24); +lean_dec(x_46); +lean_dec(x_37); +lean_dec(x_35); +lean_dec(x_34); +lean_dec(x_30); +lean_dec(x_4); +lean_dec(x_2); +x_63 = !lean_is_exclusive(x_47); +if (x_63 == 0) +{ +return x_47; +} +else +{ +lean_object* x_64; lean_object* x_65; lean_object* x_66; +x_64 = lean_ctor_get(x_47, 0); +x_65 = lean_ctor_get(x_47, 1); +lean_inc(x_65); +lean_inc(x_64); +lean_dec(x_47); +x_66 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_66, 0, x_64); +lean_ctor_set(x_66, 1, x_65); +return x_66; +} +} +} +else +{ +lean_object* x_67; lean_object* x_68; lean_object* x_69; lean_object* x_70; +lean_inc(x_33); +lean_ctor_set(x_24, 0, x_37); +x_67 = lean_ctor_get(x_9, 0); +lean_inc(x_67); +lean_dec(x_9); +x_68 = l_Lean_Syntax_getId(x_67); +lean_inc(x_25); +x_69 = lean_local_ctx_mk_local_decl(x_33, x_28, x_68, x_25, x_14); +lean_inc(x_4); +lean_inc(x_25); +x_70 = l___private_Init_Lean_Elab_Binders_11__propagateExpectedType(x_67, x_30, x_25, x_24, x_4, x_29); +lean_dec(x_67); +if (lean_obj_tag(x_70) == 0) +{ +lean_object* x_71; lean_object* x_72; uint8_t x_73; +x_71 = lean_ctor_get(x_70, 0); +lean_inc(x_71); +x_72 = lean_ctor_get(x_70, 1); +lean_inc(x_72); +lean_dec(x_70); +x_73 = !lean_is_exclusive(x_71); +if (x_73 == 0) +{ +lean_object* x_74; lean_object* x_75; lean_object* x_76; uint8_t x_77; lean_object* x_78; lean_object* x_79; +x_74 = lean_ctor_get(x_71, 0); +x_75 = lean_ctor_get(x_71, 2); +x_76 = lean_ctor_get(x_71, 3); +x_77 = lean_ctor_get_uint8(x_71, sizeof(void*)*4); +x_78 = lean_ctor_get(x_71, 1); +lean_dec(x_78); +lean_inc(x_76); +lean_inc(x_75); +lean_inc(x_69); +lean_inc(x_74); +lean_ctor_set(x_71, 1, x_69); +lean_inc(x_4); +x_79 = l_Lean_Elab_Term_isClass(x_17, x_25, x_4, x_72); +lean_dec(x_17); +if (lean_obj_tag(x_79) == 0) +{ +lean_object* x_80; +x_80 = lean_ctor_get(x_79, 0); +lean_inc(x_80); +if (lean_obj_tag(x_80) == 0) +{ +lean_object* x_81; lean_object* x_82; lean_object* x_83; +lean_dec(x_76); +lean_dec(x_75); +lean_dec(x_74); +lean_dec(x_69); +lean_dec(x_30); +x_81 = lean_ctor_get(x_79, 1); +lean_inc(x_81); +lean_dec(x_79); +x_82 = lean_unsigned_to_nat(1u); +x_83 = lean_nat_add(x_2, x_82); +lean_dec(x_2); +x_2 = x_83; +x_3 = x_71; +x_5 = x_81; +goto _start; +} +else +{ +lean_object* x_85; lean_object* x_86; lean_object* x_87; lean_object* x_88; lean_object* x_89; lean_object* x_90; lean_object* x_91; lean_object* x_92; lean_object* x_93; +lean_dec(x_71); +x_85 = lean_ctor_get(x_79, 1); +lean_inc(x_85); +lean_dec(x_79); +x_86 = lean_ctor_get(x_80, 0); +lean_inc(x_86); +lean_dec(x_80); +x_87 = l_Lean_Elab_Term_resetSynthInstanceCache___rarg(x_85); +x_88 = lean_ctor_get(x_87, 1); +lean_inc(x_88); +lean_dec(x_87); +x_89 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_89, 0, x_86); +lean_ctor_set(x_89, 1, x_30); +x_90 = lean_array_push(x_75, x_89); +x_91 = lean_unsigned_to_nat(1u); +x_92 = lean_nat_add(x_2, x_91); +lean_dec(x_2); +x_93 = lean_alloc_ctor(0, 4, 1); +lean_ctor_set(x_93, 0, x_74); +lean_ctor_set(x_93, 1, x_69); +lean_ctor_set(x_93, 2, x_90); +lean_ctor_set(x_93, 3, x_76); +lean_ctor_set_uint8(x_93, sizeof(void*)*4, x_77); +x_2 = x_92; +x_3 = x_93; +x_5 = x_88; +goto _start; +} +} +else +{ +uint8_t x_95; +lean_dec(x_71); +lean_dec(x_76); +lean_dec(x_75); +lean_dec(x_74); +lean_dec(x_69); +lean_dec(x_30); +lean_dec(x_4); +lean_dec(x_2); +x_95 = !lean_is_exclusive(x_79); +if (x_95 == 0) +{ +return x_79; +} +else +{ +lean_object* x_96; lean_object* x_97; lean_object* x_98; +x_96 = lean_ctor_get(x_79, 0); +x_97 = lean_ctor_get(x_79, 1); +lean_inc(x_97); +lean_inc(x_96); +lean_dec(x_79); +x_98 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_98, 0, x_96); +lean_ctor_set(x_98, 1, x_97); +return x_98; +} +} +} +else +{ +lean_object* x_99; lean_object* x_100; lean_object* x_101; uint8_t x_102; lean_object* x_103; lean_object* x_104; +x_99 = lean_ctor_get(x_71, 0); +x_100 = lean_ctor_get(x_71, 2); +x_101 = lean_ctor_get(x_71, 3); +x_102 = lean_ctor_get_uint8(x_71, sizeof(void*)*4); +lean_inc(x_101); +lean_inc(x_100); +lean_inc(x_99); +lean_dec(x_71); +lean_inc(x_101); +lean_inc(x_100); +lean_inc(x_69); +lean_inc(x_99); +x_103 = lean_alloc_ctor(0, 4, 1); +lean_ctor_set(x_103, 0, x_99); +lean_ctor_set(x_103, 1, x_69); +lean_ctor_set(x_103, 2, x_100); +lean_ctor_set(x_103, 3, x_101); +lean_ctor_set_uint8(x_103, sizeof(void*)*4, x_102); +lean_inc(x_4); +x_104 = l_Lean_Elab_Term_isClass(x_17, x_25, x_4, x_72); +lean_dec(x_17); +if (lean_obj_tag(x_104) == 0) +{ +lean_object* x_105; +x_105 = lean_ctor_get(x_104, 0); +lean_inc(x_105); +if (lean_obj_tag(x_105) == 0) +{ +lean_object* x_106; lean_object* x_107; lean_object* x_108; +lean_dec(x_101); +lean_dec(x_100); +lean_dec(x_99); +lean_dec(x_69); +lean_dec(x_30); +x_106 = lean_ctor_get(x_104, 1); +lean_inc(x_106); +lean_dec(x_104); +x_107 = lean_unsigned_to_nat(1u); +x_108 = lean_nat_add(x_2, x_107); +lean_dec(x_2); +x_2 = x_108; +x_3 = x_103; +x_5 = x_106; +goto _start; +} +else +{ +lean_object* x_110; lean_object* x_111; lean_object* x_112; lean_object* x_113; lean_object* x_114; lean_object* x_115; lean_object* x_116; lean_object* x_117; lean_object* x_118; +lean_dec(x_103); +x_110 = lean_ctor_get(x_104, 1); +lean_inc(x_110); +lean_dec(x_104); +x_111 = lean_ctor_get(x_105, 0); +lean_inc(x_111); +lean_dec(x_105); +x_112 = l_Lean_Elab_Term_resetSynthInstanceCache___rarg(x_110); +x_113 = lean_ctor_get(x_112, 1); +lean_inc(x_113); +lean_dec(x_112); +x_114 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_114, 0, x_111); +lean_ctor_set(x_114, 1, x_30); +x_115 = lean_array_push(x_100, x_114); +x_116 = lean_unsigned_to_nat(1u); +x_117 = lean_nat_add(x_2, x_116); +lean_dec(x_2); +x_118 = lean_alloc_ctor(0, 4, 1); +lean_ctor_set(x_118, 0, x_99); +lean_ctor_set(x_118, 1, x_69); +lean_ctor_set(x_118, 2, x_115); +lean_ctor_set(x_118, 3, x_101); +lean_ctor_set_uint8(x_118, sizeof(void*)*4, x_102); +x_2 = x_117; +x_3 = x_118; +x_5 = x_113; +goto _start; +} +} +else +{ +lean_object* x_120; lean_object* x_121; lean_object* x_122; lean_object* x_123; +lean_dec(x_103); +lean_dec(x_101); +lean_dec(x_100); +lean_dec(x_99); +lean_dec(x_69); +lean_dec(x_30); +lean_dec(x_4); +lean_dec(x_2); +x_120 = lean_ctor_get(x_104, 0); +lean_inc(x_120); +x_121 = lean_ctor_get(x_104, 1); +lean_inc(x_121); +if (lean_is_exclusive(x_104)) { + lean_ctor_release(x_104, 0); + lean_ctor_release(x_104, 1); + x_122 = x_104; +} else { + lean_dec_ref(x_104); + x_122 = lean_box(0); +} +if (lean_is_scalar(x_122)) { + x_123 = lean_alloc_ctor(1, 2, 0); +} else { + x_123 = x_122; +} +lean_ctor_set(x_123, 0, x_120); +lean_ctor_set(x_123, 1, x_121); +return x_123; +} +} +} +else +{ +uint8_t x_124; +lean_dec(x_69); +lean_dec(x_30); +lean_dec(x_25); +lean_dec(x_4); +lean_dec(x_17); +lean_dec(x_2); +x_124 = !lean_is_exclusive(x_70); +if (x_124 == 0) +{ +return x_70; +} +else +{ +lean_object* x_125; lean_object* x_126; lean_object* x_127; +x_125 = lean_ctor_get(x_70, 0); +x_126 = lean_ctor_get(x_70, 1); +lean_inc(x_126); +lean_inc(x_125); +lean_dec(x_70); +x_127 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_127, 0, x_125); +lean_ctor_set(x_127, 1, x_126); +return x_127; +} +} +} +} +else +{ +lean_object* x_128; lean_object* x_129; lean_object* x_130; lean_object* x_131; uint8_t x_132; lean_object* x_133; +x_128 = lean_ctor_get(x_24, 0); +x_129 = lean_ctor_get(x_24, 1); +x_130 = lean_ctor_get(x_24, 2); +x_131 = lean_ctor_get(x_24, 3); +x_132 = lean_ctor_get_uint8(x_24, sizeof(void*)*4); +lean_inc(x_131); +lean_inc(x_130); +lean_inc(x_129); +lean_inc(x_128); +lean_dec(x_24); +lean_inc(x_30); +x_133 = lean_array_push(x_128, x_30); +if (x_132 == 0) +{ +lean_object* x_134; 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_object* x_143; lean_object* x_144; +x_134 = lean_ctor_get(x_9, 0); +lean_inc(x_134); +lean_dec(x_9); +lean_inc(x_25); +x_135 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_135, 0, x_25); +x_136 = 0; +x_137 = lean_box(0); +lean_inc(x_4); +x_138 = l_Lean_Elab_Term_mkFreshExprMVar(x_134, x_135, x_136, x_137, x_4, x_29); +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 = l_Lean_Syntax_getId(x_134); +lean_dec(x_134); +lean_inc(x_25); +x_142 = lean_local_ctx_mk_let_decl(x_129, x_28, x_141, x_25, x_139); +lean_inc(x_131); +lean_inc(x_130); +lean_inc(x_142); +lean_inc(x_133); +x_143 = lean_alloc_ctor(0, 4, 1); +lean_ctor_set(x_143, 0, x_133); +lean_ctor_set(x_143, 1, x_142); +lean_ctor_set(x_143, 2, x_130); +lean_ctor_set(x_143, 3, x_131); +lean_ctor_set_uint8(x_143, sizeof(void*)*4, x_132); +lean_inc(x_4); +x_144 = l_Lean_Elab_Term_isClass(x_17, x_25, x_4, x_140); +lean_dec(x_17); +if (lean_obj_tag(x_144) == 0) +{ +lean_object* x_145; +x_145 = lean_ctor_get(x_144, 0); +lean_inc(x_145); +if (lean_obj_tag(x_145) == 0) +{ +lean_object* x_146; lean_object* x_147; lean_object* x_148; +lean_dec(x_142); +lean_dec(x_133); +lean_dec(x_131); +lean_dec(x_130); +lean_dec(x_30); +x_146 = lean_ctor_get(x_144, 1); +lean_inc(x_146); +lean_dec(x_144); +x_147 = lean_unsigned_to_nat(1u); +x_148 = lean_nat_add(x_2, x_147); +lean_dec(x_2); +x_2 = x_148; +x_3 = x_143; +x_5 = x_146; +goto _start; +} +else +{ +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_dec(x_143); +x_150 = lean_ctor_get(x_144, 1); +lean_inc(x_150); +lean_dec(x_144); +x_151 = lean_ctor_get(x_145, 0); +lean_inc(x_151); +lean_dec(x_145); +x_152 = l_Lean_Elab_Term_resetSynthInstanceCache___rarg(x_150); +x_153 = lean_ctor_get(x_152, 1); +lean_inc(x_153); +lean_dec(x_152); +x_154 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_154, 0, x_151); +lean_ctor_set(x_154, 1, x_30); +x_155 = lean_array_push(x_130, x_154); +x_156 = lean_unsigned_to_nat(1u); +x_157 = lean_nat_add(x_2, x_156); +lean_dec(x_2); +x_158 = lean_alloc_ctor(0, 4, 1); +lean_ctor_set(x_158, 0, x_133); +lean_ctor_set(x_158, 1, x_142); +lean_ctor_set(x_158, 2, x_155); +lean_ctor_set(x_158, 3, x_131); +lean_ctor_set_uint8(x_158, sizeof(void*)*4, x_132); +x_2 = x_157; +x_3 = x_158; +x_5 = x_153; +goto _start; +} +} +else +{ +lean_object* x_160; lean_object* x_161; lean_object* x_162; lean_object* x_163; +lean_dec(x_143); +lean_dec(x_142); +lean_dec(x_133); +lean_dec(x_131); +lean_dec(x_130); +lean_dec(x_30); +lean_dec(x_4); +lean_dec(x_2); +x_160 = lean_ctor_get(x_144, 0); +lean_inc(x_160); +x_161 = lean_ctor_get(x_144, 1); +lean_inc(x_161); +if (lean_is_exclusive(x_144)) { + lean_ctor_release(x_144, 0); + lean_ctor_release(x_144, 1); + x_162 = x_144; +} else { + lean_dec_ref(x_144); + x_162 = lean_box(0); +} +if (lean_is_scalar(x_162)) { + x_163 = lean_alloc_ctor(1, 2, 0); +} else { + x_163 = x_162; +} +lean_ctor_set(x_163, 0, x_160); +lean_ctor_set(x_163, 1, x_161); +return x_163; +} +} +else +{ +lean_object* x_164; lean_object* x_165; lean_object* x_166; lean_object* x_167; lean_object* x_168; +lean_inc(x_129); +x_164 = lean_alloc_ctor(0, 4, 1); +lean_ctor_set(x_164, 0, x_133); +lean_ctor_set(x_164, 1, x_129); +lean_ctor_set(x_164, 2, x_130); +lean_ctor_set(x_164, 3, x_131); +lean_ctor_set_uint8(x_164, sizeof(void*)*4, x_132); +x_165 = lean_ctor_get(x_9, 0); +lean_inc(x_165); +lean_dec(x_9); +x_166 = l_Lean_Syntax_getId(x_165); +lean_inc(x_25); +x_167 = lean_local_ctx_mk_local_decl(x_129, x_28, x_166, x_25, x_14); +lean_inc(x_4); +lean_inc(x_25); +x_168 = l___private_Init_Lean_Elab_Binders_11__propagateExpectedType(x_165, x_30, x_25, x_164, x_4, x_29); +lean_dec(x_165); +if (lean_obj_tag(x_168) == 0) +{ +lean_object* x_169; lean_object* x_170; lean_object* x_171; lean_object* x_172; lean_object* x_173; uint8_t x_174; lean_object* x_175; lean_object* x_176; lean_object* x_177; +x_169 = lean_ctor_get(x_168, 0); +lean_inc(x_169); +x_170 = lean_ctor_get(x_168, 1); +lean_inc(x_170); +lean_dec(x_168); +x_171 = lean_ctor_get(x_169, 0); +lean_inc(x_171); +x_172 = lean_ctor_get(x_169, 2); +lean_inc(x_172); +x_173 = lean_ctor_get(x_169, 3); +lean_inc(x_173); +x_174 = lean_ctor_get_uint8(x_169, sizeof(void*)*4); +if (lean_is_exclusive(x_169)) { + lean_ctor_release(x_169, 0); + lean_ctor_release(x_169, 1); + lean_ctor_release(x_169, 2); + lean_ctor_release(x_169, 3); + x_175 = x_169; +} else { + lean_dec_ref(x_169); + x_175 = lean_box(0); +} +lean_inc(x_173); +lean_inc(x_172); +lean_inc(x_167); +lean_inc(x_171); +if (lean_is_scalar(x_175)) { + x_176 = lean_alloc_ctor(0, 4, 1); +} else { + x_176 = x_175; +} +lean_ctor_set(x_176, 0, x_171); +lean_ctor_set(x_176, 1, x_167); +lean_ctor_set(x_176, 2, x_172); +lean_ctor_set(x_176, 3, x_173); +lean_ctor_set_uint8(x_176, sizeof(void*)*4, x_174); +lean_inc(x_4); +x_177 = l_Lean_Elab_Term_isClass(x_17, x_25, x_4, x_170); +lean_dec(x_17); +if (lean_obj_tag(x_177) == 0) +{ +lean_object* x_178; +x_178 = lean_ctor_get(x_177, 0); +lean_inc(x_178); +if (lean_obj_tag(x_178) == 0) +{ +lean_object* x_179; lean_object* x_180; lean_object* x_181; +lean_dec(x_173); +lean_dec(x_172); +lean_dec(x_171); +lean_dec(x_167); +lean_dec(x_30); +x_179 = lean_ctor_get(x_177, 1); +lean_inc(x_179); +lean_dec(x_177); +x_180 = lean_unsigned_to_nat(1u); +x_181 = lean_nat_add(x_2, x_180); +lean_dec(x_2); +x_2 = x_181; +x_3 = x_176; +x_5 = x_179; +goto _start; +} +else +{ +lean_object* x_183; lean_object* x_184; lean_object* x_185; lean_object* x_186; lean_object* x_187; lean_object* x_188; lean_object* x_189; lean_object* x_190; lean_object* x_191; +lean_dec(x_176); +x_183 = lean_ctor_get(x_177, 1); +lean_inc(x_183); +lean_dec(x_177); +x_184 = lean_ctor_get(x_178, 0); +lean_inc(x_184); +lean_dec(x_178); +x_185 = l_Lean_Elab_Term_resetSynthInstanceCache___rarg(x_183); +x_186 = lean_ctor_get(x_185, 1); +lean_inc(x_186); +lean_dec(x_185); +x_187 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_187, 0, x_184); +lean_ctor_set(x_187, 1, x_30); +x_188 = lean_array_push(x_172, x_187); +x_189 = lean_unsigned_to_nat(1u); +x_190 = lean_nat_add(x_2, x_189); +lean_dec(x_2); +x_191 = lean_alloc_ctor(0, 4, 1); +lean_ctor_set(x_191, 0, x_171); +lean_ctor_set(x_191, 1, x_167); +lean_ctor_set(x_191, 2, x_188); +lean_ctor_set(x_191, 3, x_173); +lean_ctor_set_uint8(x_191, sizeof(void*)*4, x_174); +x_2 = x_190; +x_3 = x_191; +x_5 = x_186; +goto _start; +} +} +else +{ +lean_object* x_193; lean_object* x_194; lean_object* x_195; lean_object* x_196; +lean_dec(x_176); +lean_dec(x_173); +lean_dec(x_172); +lean_dec(x_171); +lean_dec(x_167); +lean_dec(x_30); +lean_dec(x_4); +lean_dec(x_2); +x_193 = lean_ctor_get(x_177, 0); +lean_inc(x_193); +x_194 = lean_ctor_get(x_177, 1); +lean_inc(x_194); +if (lean_is_exclusive(x_177)) { + lean_ctor_release(x_177, 0); + lean_ctor_release(x_177, 1); + x_195 = x_177; +} else { + lean_dec_ref(x_177); + x_195 = lean_box(0); +} +if (lean_is_scalar(x_195)) { + x_196 = lean_alloc_ctor(1, 2, 0); +} else { + x_196 = x_195; +} +lean_ctor_set(x_196, 0, x_193); +lean_ctor_set(x_196, 1, x_194); +return x_196; +} +} +else +{ +lean_object* x_197; lean_object* x_198; lean_object* x_199; lean_object* x_200; +lean_dec(x_167); +lean_dec(x_30); +lean_dec(x_25); +lean_dec(x_4); +lean_dec(x_17); +lean_dec(x_2); +x_197 = lean_ctor_get(x_168, 0); +lean_inc(x_197); +x_198 = lean_ctor_get(x_168, 1); +lean_inc(x_198); +if (lean_is_exclusive(x_168)) { + lean_ctor_release(x_168, 0); + lean_ctor_release(x_168, 1); + x_199 = x_168; +} else { + lean_dec_ref(x_168); + x_199 = lean_box(0); +} +if (lean_is_scalar(x_199)) { + x_200 = lean_alloc_ctor(1, 2, 0); +} else { + x_200 = x_199; +} +lean_ctor_set(x_200, 0, x_197); +lean_ctor_set(x_200, 1, x_198); +return x_200; +} +} +} +} +} +else +{ +lean_object* x_228; lean_object* x_229; lean_object* x_230; lean_object* x_231; lean_object* x_232; lean_object* x_233; lean_object* x_234; lean_object* x_235; +x_228 = lean_ctor_get(x_16, 0); +x_229 = lean_ctor_get(x_16, 3); +x_230 = lean_ctor_get(x_16, 4); +lean_inc(x_230); +lean_inc(x_229); +lean_inc(x_228); +lean_dec(x_16); +lean_inc(x_12); +lean_inc(x_11); +x_231 = lean_alloc_ctor(0, 5, 0); +lean_ctor_set(x_231, 0, x_228); +lean_ctor_set(x_231, 1, x_11); +lean_ctor_set(x_231, 2, x_12); +lean_ctor_set(x_231, 3, x_229); +lean_ctor_set(x_231, 4, x_230); +lean_ctor_set(x_4, 0, x_231); +lean_inc(x_4); +lean_inc(x_17); +x_232 = l_Lean_Elab_Term_elabType(x_17, x_4, x_5); +if (x_15 == 0) +{ +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_10); +if (lean_obj_tag(x_232) == 0) +{ +lean_object* x_315; lean_object* x_316; +x_315 = lean_ctor_get(x_232, 0); +lean_inc(x_315); +x_316 = lean_ctor_get(x_232, 1); +lean_inc(x_316); +lean_dec(x_232); +x_233 = x_3; +x_234 = x_315; +x_235 = x_316; +goto block_314; +} +else +{ +lean_object* x_317; lean_object* x_318; lean_object* x_319; lean_object* x_320; +lean_dec(x_4); +lean_dec(x_17); lean_dec(x_9); lean_dec(x_3); lean_dec(x_2); -x_213 = lean_ctor_get(x_162, 0); -lean_inc(x_213); -x_214 = lean_ctor_get(x_162, 1); -lean_inc(x_214); -if (lean_is_exclusive(x_162)) { - lean_ctor_release(x_162, 0); - lean_ctor_release(x_162, 1); - x_215 = x_162; +x_317 = lean_ctor_get(x_232, 0); +lean_inc(x_317); +x_318 = lean_ctor_get(x_232, 1); +lean_inc(x_318); +if (lean_is_exclusive(x_232)) { + lean_ctor_release(x_232, 0); + lean_ctor_release(x_232, 1); + x_319 = x_232; } else { - lean_dec_ref(x_162); - x_215 = lean_box(0); + lean_dec_ref(x_232); + x_319 = lean_box(0); } -if (lean_is_scalar(x_215)) { - x_216 = lean_alloc_ctor(1, 2, 0); +if (lean_is_scalar(x_319)) { + x_320 = lean_alloc_ctor(1, 2, 0); } else { - x_216 = x_215; + x_320 = x_319; +} +lean_ctor_set(x_320, 0, x_317); +lean_ctor_set(x_320, 1, x_318); +return x_320; +} +} +else +{ +lean_object* x_321; +if (lean_is_exclusive(x_3)) { + lean_ctor_release(x_3, 0); + lean_ctor_release(x_3, 1); + lean_ctor_release(x_3, 2); + lean_ctor_release(x_3, 3); + x_321 = x_3; +} else { + lean_dec_ref(x_3); + x_321 = lean_box(0); +} +if (lean_obj_tag(x_232) == 0) +{ +lean_object* x_322; lean_object* x_323; uint8_t x_324; lean_object* x_325; +x_322 = lean_ctor_get(x_232, 0); +lean_inc(x_322); +x_323 = lean_ctor_get(x_232, 1); +lean_inc(x_323); +lean_dec(x_232); +x_324 = 1; +if (lean_is_scalar(x_321)) { + x_325 = lean_alloc_ctor(0, 4, 1); +} else { + x_325 = x_321; +} +lean_ctor_set(x_325, 0, x_10); +lean_ctor_set(x_325, 1, x_11); +lean_ctor_set(x_325, 2, x_12); +lean_ctor_set(x_325, 3, x_13); +lean_ctor_set_uint8(x_325, sizeof(void*)*4, x_324); +x_233 = x_325; +x_234 = x_322; +x_235 = x_323; +goto block_314; +} +else +{ +lean_object* x_326; lean_object* x_327; lean_object* x_328; lean_object* x_329; +lean_dec(x_321); +lean_dec(x_4); +lean_dec(x_17); +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_2); +x_326 = lean_ctor_get(x_232, 0); +lean_inc(x_326); +x_327 = lean_ctor_get(x_232, 1); +lean_inc(x_327); +if (lean_is_exclusive(x_232)) { + lean_ctor_release(x_232, 0); + lean_ctor_release(x_232, 1); + x_328 = x_232; +} else { + lean_dec_ref(x_232); + x_328 = lean_box(0); +} +if (lean_is_scalar(x_328)) { + x_329 = lean_alloc_ctor(1, 2, 0); +} else { + x_329 = x_328; +} +lean_ctor_set(x_329, 0, x_326); +lean_ctor_set(x_329, 1, x_327); +return x_329; +} +} +block_314: +{ +lean_object* x_236; lean_object* x_237; lean_object* x_238; lean_object* x_239; lean_object* x_240; lean_object* x_241; lean_object* x_242; lean_object* x_243; uint8_t x_244; lean_object* x_245; lean_object* x_246; +x_236 = l_Lean_Elab_Term_mkFreshFVarId___rarg(x_235); +x_237 = lean_ctor_get(x_236, 0); +lean_inc(x_237); +x_238 = lean_ctor_get(x_236, 1); +lean_inc(x_238); +lean_dec(x_236); +lean_inc(x_237); +x_239 = l_Lean_mkFVar(x_237); +x_240 = lean_ctor_get(x_233, 0); +lean_inc(x_240); +x_241 = lean_ctor_get(x_233, 1); +lean_inc(x_241); +x_242 = lean_ctor_get(x_233, 2); +lean_inc(x_242); +x_243 = lean_ctor_get(x_233, 3); +lean_inc(x_243); +x_244 = lean_ctor_get_uint8(x_233, sizeof(void*)*4); +if (lean_is_exclusive(x_233)) { + lean_ctor_release(x_233, 0); + lean_ctor_release(x_233, 1); + lean_ctor_release(x_233, 2); + lean_ctor_release(x_233, 3); + x_245 = x_233; +} else { + lean_dec_ref(x_233); + x_245 = lean_box(0); +} +lean_inc(x_239); +x_246 = lean_array_push(x_240, x_239); +if (x_244 == 0) +{ +lean_object* x_247; lean_object* x_248; uint8_t x_249; lean_object* x_250; lean_object* x_251; lean_object* x_252; lean_object* x_253; lean_object* x_254; lean_object* x_255; lean_object* x_256; lean_object* x_257; +x_247 = lean_ctor_get(x_9, 0); +lean_inc(x_247); +lean_dec(x_9); +lean_inc(x_234); +x_248 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_248, 0, x_234); +x_249 = 0; +x_250 = lean_box(0); +lean_inc(x_4); +x_251 = l_Lean_Elab_Term_mkFreshExprMVar(x_247, x_248, x_249, x_250, x_4, x_238); +x_252 = lean_ctor_get(x_251, 0); +lean_inc(x_252); +x_253 = lean_ctor_get(x_251, 1); +lean_inc(x_253); +lean_dec(x_251); +x_254 = l_Lean_Syntax_getId(x_247); +lean_dec(x_247); +lean_inc(x_234); +x_255 = lean_local_ctx_mk_let_decl(x_241, x_237, x_254, x_234, x_252); +lean_inc(x_243); +lean_inc(x_242); +lean_inc(x_255); +lean_inc(x_246); +if (lean_is_scalar(x_245)) { + x_256 = lean_alloc_ctor(0, 4, 1); +} else { + x_256 = x_245; +} +lean_ctor_set(x_256, 0, x_246); +lean_ctor_set(x_256, 1, x_255); +lean_ctor_set(x_256, 2, x_242); +lean_ctor_set(x_256, 3, x_243); +lean_ctor_set_uint8(x_256, sizeof(void*)*4, x_244); +lean_inc(x_4); +x_257 = l_Lean_Elab_Term_isClass(x_17, x_234, x_4, x_253); +lean_dec(x_17); +if (lean_obj_tag(x_257) == 0) +{ +lean_object* x_258; +x_258 = lean_ctor_get(x_257, 0); +lean_inc(x_258); +if (lean_obj_tag(x_258) == 0) +{ +lean_object* x_259; lean_object* x_260; lean_object* x_261; +lean_dec(x_255); +lean_dec(x_246); +lean_dec(x_243); +lean_dec(x_242); +lean_dec(x_239); +x_259 = lean_ctor_get(x_257, 1); +lean_inc(x_259); +lean_dec(x_257); +x_260 = lean_unsigned_to_nat(1u); +x_261 = lean_nat_add(x_2, x_260); +lean_dec(x_2); +x_2 = x_261; +x_3 = x_256; +x_5 = x_259; +goto _start; +} +else +{ +lean_object* x_263; lean_object* x_264; lean_object* x_265; lean_object* x_266; lean_object* x_267; lean_object* x_268; lean_object* x_269; lean_object* x_270; lean_object* x_271; +lean_dec(x_256); +x_263 = lean_ctor_get(x_257, 1); +lean_inc(x_263); +lean_dec(x_257); +x_264 = lean_ctor_get(x_258, 0); +lean_inc(x_264); +lean_dec(x_258); +x_265 = l_Lean_Elab_Term_resetSynthInstanceCache___rarg(x_263); +x_266 = lean_ctor_get(x_265, 1); +lean_inc(x_266); +lean_dec(x_265); +x_267 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_267, 0, x_264); +lean_ctor_set(x_267, 1, x_239); +x_268 = lean_array_push(x_242, x_267); +x_269 = lean_unsigned_to_nat(1u); +x_270 = lean_nat_add(x_2, x_269); +lean_dec(x_2); +x_271 = lean_alloc_ctor(0, 4, 1); +lean_ctor_set(x_271, 0, x_246); +lean_ctor_set(x_271, 1, x_255); +lean_ctor_set(x_271, 2, x_268); +lean_ctor_set(x_271, 3, x_243); +lean_ctor_set_uint8(x_271, sizeof(void*)*4, x_244); +x_2 = x_270; +x_3 = x_271; +x_5 = x_266; +goto _start; +} +} +else +{ +lean_object* x_273; lean_object* x_274; lean_object* x_275; lean_object* x_276; +lean_dec(x_256); +lean_dec(x_255); +lean_dec(x_246); +lean_dec(x_243); +lean_dec(x_242); +lean_dec(x_239); +lean_dec(x_4); +lean_dec(x_2); +x_273 = lean_ctor_get(x_257, 0); +lean_inc(x_273); +x_274 = lean_ctor_get(x_257, 1); +lean_inc(x_274); +if (lean_is_exclusive(x_257)) { + lean_ctor_release(x_257, 0); + lean_ctor_release(x_257, 1); + x_275 = x_257; +} else { + lean_dec_ref(x_257); + x_275 = lean_box(0); +} +if (lean_is_scalar(x_275)) { + x_276 = lean_alloc_ctor(1, 2, 0); +} else { + x_276 = x_275; +} +lean_ctor_set(x_276, 0, x_273); +lean_ctor_set(x_276, 1, x_274); +return x_276; +} +} +else +{ +lean_object* x_277; lean_object* x_278; lean_object* x_279; lean_object* x_280; lean_object* x_281; +lean_inc(x_241); +if (lean_is_scalar(x_245)) { + x_277 = lean_alloc_ctor(0, 4, 1); +} else { + x_277 = x_245; +} +lean_ctor_set(x_277, 0, x_246); +lean_ctor_set(x_277, 1, x_241); +lean_ctor_set(x_277, 2, x_242); +lean_ctor_set(x_277, 3, x_243); +lean_ctor_set_uint8(x_277, sizeof(void*)*4, x_244); +x_278 = lean_ctor_get(x_9, 0); +lean_inc(x_278); +lean_dec(x_9); +x_279 = l_Lean_Syntax_getId(x_278); +lean_inc(x_234); +x_280 = lean_local_ctx_mk_local_decl(x_241, x_237, x_279, x_234, x_14); +lean_inc(x_4); +lean_inc(x_234); +x_281 = l___private_Init_Lean_Elab_Binders_11__propagateExpectedType(x_278, x_239, x_234, x_277, x_4, x_238); +lean_dec(x_278); +if (lean_obj_tag(x_281) == 0) +{ +lean_object* x_282; lean_object* x_283; lean_object* x_284; lean_object* x_285; lean_object* x_286; uint8_t x_287; lean_object* x_288; lean_object* x_289; lean_object* x_290; +x_282 = lean_ctor_get(x_281, 0); +lean_inc(x_282); +x_283 = lean_ctor_get(x_281, 1); +lean_inc(x_283); +lean_dec(x_281); +x_284 = lean_ctor_get(x_282, 0); +lean_inc(x_284); +x_285 = lean_ctor_get(x_282, 2); +lean_inc(x_285); +x_286 = lean_ctor_get(x_282, 3); +lean_inc(x_286); +x_287 = lean_ctor_get_uint8(x_282, sizeof(void*)*4); +if (lean_is_exclusive(x_282)) { + lean_ctor_release(x_282, 0); + lean_ctor_release(x_282, 1); + lean_ctor_release(x_282, 2); + lean_ctor_release(x_282, 3); + x_288 = x_282; +} else { + lean_dec_ref(x_282); + x_288 = lean_box(0); +} +lean_inc(x_286); +lean_inc(x_285); +lean_inc(x_280); +lean_inc(x_284); +if (lean_is_scalar(x_288)) { + x_289 = lean_alloc_ctor(0, 4, 1); +} else { + x_289 = x_288; +} +lean_ctor_set(x_289, 0, x_284); +lean_ctor_set(x_289, 1, x_280); +lean_ctor_set(x_289, 2, x_285); +lean_ctor_set(x_289, 3, x_286); +lean_ctor_set_uint8(x_289, sizeof(void*)*4, x_287); +lean_inc(x_4); +x_290 = l_Lean_Elab_Term_isClass(x_17, x_234, x_4, x_283); +lean_dec(x_17); +if (lean_obj_tag(x_290) == 0) +{ +lean_object* x_291; +x_291 = lean_ctor_get(x_290, 0); +lean_inc(x_291); +if (lean_obj_tag(x_291) == 0) +{ +lean_object* x_292; lean_object* x_293; lean_object* x_294; +lean_dec(x_286); +lean_dec(x_285); +lean_dec(x_284); +lean_dec(x_280); +lean_dec(x_239); +x_292 = lean_ctor_get(x_290, 1); +lean_inc(x_292); +lean_dec(x_290); +x_293 = lean_unsigned_to_nat(1u); +x_294 = lean_nat_add(x_2, x_293); +lean_dec(x_2); +x_2 = x_294; +x_3 = x_289; +x_5 = x_292; +goto _start; +} +else +{ +lean_object* x_296; lean_object* x_297; lean_object* x_298; lean_object* x_299; lean_object* x_300; lean_object* x_301; lean_object* x_302; lean_object* x_303; lean_object* x_304; +lean_dec(x_289); +x_296 = lean_ctor_get(x_290, 1); +lean_inc(x_296); +lean_dec(x_290); +x_297 = lean_ctor_get(x_291, 0); +lean_inc(x_297); +lean_dec(x_291); +x_298 = l_Lean_Elab_Term_resetSynthInstanceCache___rarg(x_296); +x_299 = lean_ctor_get(x_298, 1); +lean_inc(x_299); +lean_dec(x_298); +x_300 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_300, 0, x_297); +lean_ctor_set(x_300, 1, x_239); +x_301 = lean_array_push(x_285, x_300); +x_302 = lean_unsigned_to_nat(1u); +x_303 = lean_nat_add(x_2, x_302); +lean_dec(x_2); +x_304 = lean_alloc_ctor(0, 4, 1); +lean_ctor_set(x_304, 0, x_284); +lean_ctor_set(x_304, 1, x_280); +lean_ctor_set(x_304, 2, x_301); +lean_ctor_set(x_304, 3, x_286); +lean_ctor_set_uint8(x_304, sizeof(void*)*4, x_287); +x_2 = x_303; +x_3 = x_304; +x_5 = x_299; +goto _start; +} +} +else +{ +lean_object* x_306; lean_object* x_307; lean_object* x_308; lean_object* x_309; +lean_dec(x_289); +lean_dec(x_286); +lean_dec(x_285); +lean_dec(x_284); +lean_dec(x_280); +lean_dec(x_239); +lean_dec(x_4); +lean_dec(x_2); +x_306 = lean_ctor_get(x_290, 0); +lean_inc(x_306); +x_307 = lean_ctor_get(x_290, 1); +lean_inc(x_307); +if (lean_is_exclusive(x_290)) { + lean_ctor_release(x_290, 0); + lean_ctor_release(x_290, 1); + x_308 = x_290; +} else { + lean_dec_ref(x_290); + x_308 = lean_box(0); +} +if (lean_is_scalar(x_308)) { + x_309 = lean_alloc_ctor(1, 2, 0); +} else { + x_309 = x_308; +} +lean_ctor_set(x_309, 0, x_306); +lean_ctor_set(x_309, 1, x_307); +return x_309; +} +} +else +{ +lean_object* x_310; lean_object* x_311; lean_object* x_312; lean_object* x_313; +lean_dec(x_280); +lean_dec(x_239); +lean_dec(x_234); +lean_dec(x_4); +lean_dec(x_17); +lean_dec(x_2); +x_310 = lean_ctor_get(x_281, 0); +lean_inc(x_310); +x_311 = lean_ctor_get(x_281, 1); +lean_inc(x_311); +if (lean_is_exclusive(x_281)) { + lean_ctor_release(x_281, 0); + lean_ctor_release(x_281, 1); + x_312 = x_281; +} else { + lean_dec_ref(x_281); + x_312 = lean_box(0); +} +if (lean_is_scalar(x_312)) { + x_313 = lean_alloc_ctor(1, 2, 0); +} else { + x_313 = x_312; +} +lean_ctor_set(x_313, 0, x_310); +lean_ctor_set(x_313, 1, x_311); +return x_313; +} +} +} +} +} +else +{ +lean_object* x_330; lean_object* x_331; lean_object* x_332; lean_object* x_333; lean_object* x_334; lean_object* x_335; lean_object* x_336; lean_object* x_337; lean_object* x_338; uint8_t x_339; uint8_t x_340; uint8_t x_341; lean_object* x_342; lean_object* x_343; lean_object* x_344; lean_object* x_345; lean_object* x_346; lean_object* x_347; lean_object* x_348; lean_object* x_349; lean_object* x_350; lean_object* x_351; +x_330 = lean_ctor_get(x_4, 1); +x_331 = lean_ctor_get(x_4, 2); +x_332 = lean_ctor_get(x_4, 3); +x_333 = lean_ctor_get(x_4, 4); +x_334 = lean_ctor_get(x_4, 5); +x_335 = lean_ctor_get(x_4, 6); +x_336 = lean_ctor_get(x_4, 7); +x_337 = lean_ctor_get(x_4, 8); +x_338 = lean_ctor_get(x_4, 9); +x_339 = lean_ctor_get_uint8(x_4, sizeof(void*)*10); +x_340 = lean_ctor_get_uint8(x_4, sizeof(void*)*10 + 1); +x_341 = lean_ctor_get_uint8(x_4, sizeof(void*)*10 + 2); +lean_inc(x_338); +lean_inc(x_337); +lean_inc(x_336); +lean_inc(x_335); +lean_inc(x_334); +lean_inc(x_333); +lean_inc(x_332); +lean_inc(x_331); +lean_inc(x_330); +lean_dec(x_4); +x_342 = lean_ctor_get(x_16, 0); +lean_inc(x_342); +x_343 = lean_ctor_get(x_16, 3); +lean_inc(x_343); +x_344 = lean_ctor_get(x_16, 4); +lean_inc(x_344); +if (lean_is_exclusive(x_16)) { + lean_ctor_release(x_16, 0); + lean_ctor_release(x_16, 1); + lean_ctor_release(x_16, 2); + lean_ctor_release(x_16, 3); + lean_ctor_release(x_16, 4); + x_345 = x_16; +} else { + lean_dec_ref(x_16); + x_345 = lean_box(0); +} +lean_inc(x_12); +lean_inc(x_11); +if (lean_is_scalar(x_345)) { + x_346 = lean_alloc_ctor(0, 5, 0); +} else { + x_346 = x_345; +} +lean_ctor_set(x_346, 0, x_342); +lean_ctor_set(x_346, 1, x_11); +lean_ctor_set(x_346, 2, x_12); +lean_ctor_set(x_346, 3, x_343); +lean_ctor_set(x_346, 4, x_344); +x_347 = lean_alloc_ctor(0, 10, 3); +lean_ctor_set(x_347, 0, x_346); +lean_ctor_set(x_347, 1, x_330); +lean_ctor_set(x_347, 2, x_331); +lean_ctor_set(x_347, 3, x_332); +lean_ctor_set(x_347, 4, x_333); +lean_ctor_set(x_347, 5, x_334); +lean_ctor_set(x_347, 6, x_335); +lean_ctor_set(x_347, 7, x_336); +lean_ctor_set(x_347, 8, x_337); +lean_ctor_set(x_347, 9, x_338); +lean_ctor_set_uint8(x_347, sizeof(void*)*10, x_339); +lean_ctor_set_uint8(x_347, sizeof(void*)*10 + 1, x_340); +lean_ctor_set_uint8(x_347, sizeof(void*)*10 + 2, x_341); +lean_inc(x_347); +lean_inc(x_17); +x_348 = l_Lean_Elab_Term_elabType(x_17, x_347, x_5); +if (x_15 == 0) +{ +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_10); +if (lean_obj_tag(x_348) == 0) +{ +lean_object* x_431; lean_object* x_432; +x_431 = lean_ctor_get(x_348, 0); +lean_inc(x_431); +x_432 = lean_ctor_get(x_348, 1); +lean_inc(x_432); +lean_dec(x_348); +x_349 = x_3; +x_350 = x_431; +x_351 = x_432; +goto block_430; +} +else +{ +lean_object* x_433; lean_object* x_434; lean_object* x_435; lean_object* x_436; +lean_dec(x_347); +lean_dec(x_17); +lean_dec(x_9); +lean_dec(x_3); +lean_dec(x_2); +x_433 = lean_ctor_get(x_348, 0); +lean_inc(x_433); +x_434 = lean_ctor_get(x_348, 1); +lean_inc(x_434); +if (lean_is_exclusive(x_348)) { + lean_ctor_release(x_348, 0); + lean_ctor_release(x_348, 1); + x_435 = x_348; +} else { + lean_dec_ref(x_348); + x_435 = lean_box(0); +} +if (lean_is_scalar(x_435)) { + x_436 = lean_alloc_ctor(1, 2, 0); +} else { + x_436 = x_435; +} +lean_ctor_set(x_436, 0, x_433); +lean_ctor_set(x_436, 1, x_434); +return x_436; +} +} +else +{ +lean_object* x_437; +if (lean_is_exclusive(x_3)) { + lean_ctor_release(x_3, 0); + lean_ctor_release(x_3, 1); + lean_ctor_release(x_3, 2); + lean_ctor_release(x_3, 3); + x_437 = x_3; +} else { + lean_dec_ref(x_3); + x_437 = lean_box(0); +} +if (lean_obj_tag(x_348) == 0) +{ +lean_object* x_438; lean_object* x_439; uint8_t x_440; lean_object* x_441; +x_438 = lean_ctor_get(x_348, 0); +lean_inc(x_438); +x_439 = lean_ctor_get(x_348, 1); +lean_inc(x_439); +lean_dec(x_348); +x_440 = 1; +if (lean_is_scalar(x_437)) { + x_441 = lean_alloc_ctor(0, 4, 1); +} else { + x_441 = x_437; +} +lean_ctor_set(x_441, 0, x_10); +lean_ctor_set(x_441, 1, x_11); +lean_ctor_set(x_441, 2, x_12); +lean_ctor_set(x_441, 3, x_13); +lean_ctor_set_uint8(x_441, sizeof(void*)*4, x_440); +x_349 = x_441; +x_350 = x_438; +x_351 = x_439; +goto block_430; +} +else +{ +lean_object* x_442; lean_object* x_443; lean_object* x_444; lean_object* x_445; +lean_dec(x_437); +lean_dec(x_347); +lean_dec(x_17); +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_2); +x_442 = lean_ctor_get(x_348, 0); +lean_inc(x_442); +x_443 = lean_ctor_get(x_348, 1); +lean_inc(x_443); +if (lean_is_exclusive(x_348)) { + lean_ctor_release(x_348, 0); + lean_ctor_release(x_348, 1); + x_444 = x_348; +} else { + lean_dec_ref(x_348); + x_444 = lean_box(0); +} +if (lean_is_scalar(x_444)) { + x_445 = lean_alloc_ctor(1, 2, 0); +} else { + x_445 = x_444; +} +lean_ctor_set(x_445, 0, x_442); +lean_ctor_set(x_445, 1, x_443); +return x_445; +} +} +block_430: +{ +lean_object* x_352; lean_object* x_353; lean_object* x_354; lean_object* x_355; lean_object* x_356; lean_object* x_357; lean_object* x_358; lean_object* x_359; uint8_t x_360; lean_object* x_361; lean_object* x_362; +x_352 = l_Lean_Elab_Term_mkFreshFVarId___rarg(x_351); +x_353 = lean_ctor_get(x_352, 0); +lean_inc(x_353); +x_354 = lean_ctor_get(x_352, 1); +lean_inc(x_354); +lean_dec(x_352); +lean_inc(x_353); +x_355 = l_Lean_mkFVar(x_353); +x_356 = lean_ctor_get(x_349, 0); +lean_inc(x_356); +x_357 = lean_ctor_get(x_349, 1); +lean_inc(x_357); +x_358 = lean_ctor_get(x_349, 2); +lean_inc(x_358); +x_359 = lean_ctor_get(x_349, 3); +lean_inc(x_359); +x_360 = lean_ctor_get_uint8(x_349, sizeof(void*)*4); +if (lean_is_exclusive(x_349)) { + lean_ctor_release(x_349, 0); + lean_ctor_release(x_349, 1); + lean_ctor_release(x_349, 2); + lean_ctor_release(x_349, 3); + x_361 = x_349; +} else { + lean_dec_ref(x_349); + x_361 = lean_box(0); +} +lean_inc(x_355); +x_362 = lean_array_push(x_356, x_355); +if (x_360 == 0) +{ +lean_object* x_363; lean_object* x_364; uint8_t x_365; lean_object* x_366; lean_object* x_367; lean_object* x_368; lean_object* x_369; lean_object* x_370; lean_object* x_371; lean_object* x_372; lean_object* x_373; +x_363 = lean_ctor_get(x_9, 0); +lean_inc(x_363); +lean_dec(x_9); +lean_inc(x_350); +x_364 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_364, 0, x_350); +x_365 = 0; +x_366 = lean_box(0); +lean_inc(x_347); +x_367 = l_Lean_Elab_Term_mkFreshExprMVar(x_363, x_364, x_365, x_366, x_347, x_354); +x_368 = lean_ctor_get(x_367, 0); +lean_inc(x_368); +x_369 = lean_ctor_get(x_367, 1); +lean_inc(x_369); +lean_dec(x_367); +x_370 = l_Lean_Syntax_getId(x_363); +lean_dec(x_363); +lean_inc(x_350); +x_371 = lean_local_ctx_mk_let_decl(x_357, x_353, x_370, x_350, x_368); +lean_inc(x_359); +lean_inc(x_358); +lean_inc(x_371); +lean_inc(x_362); +if (lean_is_scalar(x_361)) { + x_372 = lean_alloc_ctor(0, 4, 1); +} else { + x_372 = x_361; +} +lean_ctor_set(x_372, 0, x_362); +lean_ctor_set(x_372, 1, x_371); +lean_ctor_set(x_372, 2, x_358); +lean_ctor_set(x_372, 3, x_359); +lean_ctor_set_uint8(x_372, sizeof(void*)*4, x_360); +lean_inc(x_347); +x_373 = l_Lean_Elab_Term_isClass(x_17, x_350, x_347, x_369); +lean_dec(x_17); +if (lean_obj_tag(x_373) == 0) +{ +lean_object* x_374; +x_374 = lean_ctor_get(x_373, 0); +lean_inc(x_374); +if (lean_obj_tag(x_374) == 0) +{ +lean_object* x_375; lean_object* x_376; lean_object* x_377; +lean_dec(x_371); +lean_dec(x_362); +lean_dec(x_359); +lean_dec(x_358); +lean_dec(x_355); +x_375 = lean_ctor_get(x_373, 1); +lean_inc(x_375); +lean_dec(x_373); +x_376 = lean_unsigned_to_nat(1u); +x_377 = lean_nat_add(x_2, x_376); +lean_dec(x_2); +x_2 = x_377; +x_3 = x_372; +x_4 = x_347; +x_5 = x_375; +goto _start; +} +else +{ +lean_object* x_379; lean_object* x_380; lean_object* x_381; lean_object* x_382; lean_object* x_383; lean_object* x_384; lean_object* x_385; lean_object* x_386; lean_object* x_387; +lean_dec(x_372); +x_379 = lean_ctor_get(x_373, 1); +lean_inc(x_379); +lean_dec(x_373); +x_380 = lean_ctor_get(x_374, 0); +lean_inc(x_380); +lean_dec(x_374); +x_381 = l_Lean_Elab_Term_resetSynthInstanceCache___rarg(x_379); +x_382 = lean_ctor_get(x_381, 1); +lean_inc(x_382); +lean_dec(x_381); +x_383 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_383, 0, x_380); +lean_ctor_set(x_383, 1, x_355); +x_384 = lean_array_push(x_358, x_383); +x_385 = lean_unsigned_to_nat(1u); +x_386 = lean_nat_add(x_2, x_385); +lean_dec(x_2); +x_387 = lean_alloc_ctor(0, 4, 1); +lean_ctor_set(x_387, 0, x_362); +lean_ctor_set(x_387, 1, x_371); +lean_ctor_set(x_387, 2, x_384); +lean_ctor_set(x_387, 3, x_359); +lean_ctor_set_uint8(x_387, sizeof(void*)*4, x_360); +x_2 = x_386; +x_3 = x_387; +x_4 = x_347; +x_5 = x_382; +goto _start; +} +} +else +{ +lean_object* x_389; lean_object* x_390; lean_object* x_391; lean_object* x_392; +lean_dec(x_372); +lean_dec(x_371); +lean_dec(x_362); +lean_dec(x_359); +lean_dec(x_358); +lean_dec(x_355); +lean_dec(x_347); +lean_dec(x_2); +x_389 = lean_ctor_get(x_373, 0); +lean_inc(x_389); +x_390 = lean_ctor_get(x_373, 1); +lean_inc(x_390); +if (lean_is_exclusive(x_373)) { + lean_ctor_release(x_373, 0); + lean_ctor_release(x_373, 1); + x_391 = x_373; +} else { + lean_dec_ref(x_373); + x_391 = lean_box(0); +} +if (lean_is_scalar(x_391)) { + x_392 = lean_alloc_ctor(1, 2, 0); +} else { + x_392 = x_391; +} +lean_ctor_set(x_392, 0, x_389); +lean_ctor_set(x_392, 1, x_390); +return x_392; +} +} +else +{ +lean_object* x_393; lean_object* x_394; lean_object* x_395; lean_object* x_396; lean_object* x_397; +lean_inc(x_357); +if (lean_is_scalar(x_361)) { + x_393 = lean_alloc_ctor(0, 4, 1); +} else { + x_393 = x_361; +} +lean_ctor_set(x_393, 0, x_362); +lean_ctor_set(x_393, 1, x_357); +lean_ctor_set(x_393, 2, x_358); +lean_ctor_set(x_393, 3, x_359); +lean_ctor_set_uint8(x_393, sizeof(void*)*4, x_360); +x_394 = lean_ctor_get(x_9, 0); +lean_inc(x_394); +lean_dec(x_9); +x_395 = l_Lean_Syntax_getId(x_394); +lean_inc(x_350); +x_396 = lean_local_ctx_mk_local_decl(x_357, x_353, x_395, x_350, x_14); +lean_inc(x_347); +lean_inc(x_350); +x_397 = l___private_Init_Lean_Elab_Binders_11__propagateExpectedType(x_394, x_355, x_350, x_393, x_347, x_354); +lean_dec(x_394); +if (lean_obj_tag(x_397) == 0) +{ +lean_object* x_398; lean_object* x_399; lean_object* x_400; lean_object* x_401; lean_object* x_402; uint8_t x_403; lean_object* x_404; lean_object* x_405; lean_object* x_406; +x_398 = lean_ctor_get(x_397, 0); +lean_inc(x_398); +x_399 = lean_ctor_get(x_397, 1); +lean_inc(x_399); +lean_dec(x_397); +x_400 = lean_ctor_get(x_398, 0); +lean_inc(x_400); +x_401 = lean_ctor_get(x_398, 2); +lean_inc(x_401); +x_402 = lean_ctor_get(x_398, 3); +lean_inc(x_402); +x_403 = lean_ctor_get_uint8(x_398, sizeof(void*)*4); +if (lean_is_exclusive(x_398)) { + lean_ctor_release(x_398, 0); + lean_ctor_release(x_398, 1); + lean_ctor_release(x_398, 2); + lean_ctor_release(x_398, 3); + x_404 = x_398; +} else { + lean_dec_ref(x_398); + x_404 = lean_box(0); +} +lean_inc(x_402); +lean_inc(x_401); +lean_inc(x_396); +lean_inc(x_400); +if (lean_is_scalar(x_404)) { + x_405 = lean_alloc_ctor(0, 4, 1); +} else { + x_405 = x_404; +} +lean_ctor_set(x_405, 0, x_400); +lean_ctor_set(x_405, 1, x_396); +lean_ctor_set(x_405, 2, x_401); +lean_ctor_set(x_405, 3, x_402); +lean_ctor_set_uint8(x_405, sizeof(void*)*4, x_403); +lean_inc(x_347); +x_406 = l_Lean_Elab_Term_isClass(x_17, x_350, x_347, x_399); +lean_dec(x_17); +if (lean_obj_tag(x_406) == 0) +{ +lean_object* x_407; +x_407 = lean_ctor_get(x_406, 0); +lean_inc(x_407); +if (lean_obj_tag(x_407) == 0) +{ +lean_object* x_408; lean_object* x_409; lean_object* x_410; +lean_dec(x_402); +lean_dec(x_401); +lean_dec(x_400); +lean_dec(x_396); +lean_dec(x_355); +x_408 = lean_ctor_get(x_406, 1); +lean_inc(x_408); +lean_dec(x_406); +x_409 = lean_unsigned_to_nat(1u); +x_410 = lean_nat_add(x_2, x_409); +lean_dec(x_2); +x_2 = x_410; +x_3 = x_405; +x_4 = x_347; +x_5 = x_408; +goto _start; +} +else +{ +lean_object* x_412; lean_object* x_413; lean_object* x_414; lean_object* x_415; lean_object* x_416; lean_object* x_417; lean_object* x_418; lean_object* x_419; lean_object* x_420; +lean_dec(x_405); +x_412 = lean_ctor_get(x_406, 1); +lean_inc(x_412); +lean_dec(x_406); +x_413 = lean_ctor_get(x_407, 0); +lean_inc(x_413); +lean_dec(x_407); +x_414 = l_Lean_Elab_Term_resetSynthInstanceCache___rarg(x_412); +x_415 = lean_ctor_get(x_414, 1); +lean_inc(x_415); +lean_dec(x_414); +x_416 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_416, 0, x_413); +lean_ctor_set(x_416, 1, x_355); +x_417 = lean_array_push(x_401, x_416); +x_418 = lean_unsigned_to_nat(1u); +x_419 = lean_nat_add(x_2, x_418); +lean_dec(x_2); +x_420 = lean_alloc_ctor(0, 4, 1); +lean_ctor_set(x_420, 0, x_400); +lean_ctor_set(x_420, 1, x_396); +lean_ctor_set(x_420, 2, x_417); +lean_ctor_set(x_420, 3, x_402); +lean_ctor_set_uint8(x_420, sizeof(void*)*4, x_403); +x_2 = x_419; +x_3 = x_420; +x_4 = x_347; +x_5 = x_415; +goto _start; +} +} +else +{ +lean_object* x_422; lean_object* x_423; lean_object* x_424; lean_object* x_425; +lean_dec(x_405); +lean_dec(x_402); +lean_dec(x_401); +lean_dec(x_400); +lean_dec(x_396); +lean_dec(x_355); +lean_dec(x_347); +lean_dec(x_2); +x_422 = lean_ctor_get(x_406, 0); +lean_inc(x_422); +x_423 = lean_ctor_get(x_406, 1); +lean_inc(x_423); +if (lean_is_exclusive(x_406)) { + lean_ctor_release(x_406, 0); + lean_ctor_release(x_406, 1); + x_424 = x_406; +} else { + lean_dec_ref(x_406); + x_424 = lean_box(0); +} +if (lean_is_scalar(x_424)) { + x_425 = lean_alloc_ctor(1, 2, 0); +} else { + x_425 = x_424; +} +lean_ctor_set(x_425, 0, x_422); +lean_ctor_set(x_425, 1, x_423); +return x_425; +} +} +else +{ +lean_object* x_426; lean_object* x_427; lean_object* x_428; lean_object* x_429; +lean_dec(x_396); +lean_dec(x_355); +lean_dec(x_350); +lean_dec(x_347); +lean_dec(x_17); +lean_dec(x_2); +x_426 = lean_ctor_get(x_397, 0); +lean_inc(x_426); +x_427 = lean_ctor_get(x_397, 1); +lean_inc(x_427); +if (lean_is_exclusive(x_397)) { + lean_ctor_release(x_397, 0); + lean_ctor_release(x_397, 1); + x_428 = x_397; +} else { + lean_dec_ref(x_397); + x_428 = lean_box(0); +} +if (lean_is_scalar(x_428)) { + x_429 = lean_alloc_ctor(1, 2, 0); +} else { + x_429 = x_428; +} +lean_ctor_set(x_429, 0, x_426); +lean_ctor_set(x_429, 1, x_427); +return x_429; +} } -lean_ctor_set(x_216, 0, x_213); -lean_ctor_set(x_216, 1, x_214); -return x_216; } } } @@ -18431,19 +19553,18 @@ lean_inc(x_13); lean_dec(x_11); x_14 = l_Array_empty___closed__1; lean_inc(x_12); -x_15 = lean_alloc_ctor(0, 5, 1); +x_15 = lean_alloc_ctor(0, 4, 1); lean_ctor_set(x_15, 0, x_14); -lean_ctor_set(x_15, 1, x_14); -lean_ctor_set(x_15, 2, x_9); -lean_ctor_set(x_15, 3, x_12); -lean_ctor_set(x_15, 4, x_2); -lean_ctor_set_uint8(x_15, sizeof(void*)*5, x_3); +lean_ctor_set(x_15, 1, x_9); +lean_ctor_set(x_15, 2, x_12); +lean_ctor_set(x_15, 3, x_2); +lean_ctor_set_uint8(x_15, sizeof(void*)*4, x_3); x_16 = lean_unsigned_to_nat(0u); lean_inc(x_5); x_17 = l_Lean_Elab_Term_FunBinders_elabFunBindersAux___main(x_1, x_16, x_15, x_5, x_13); if (lean_obj_tag(x_17) == 0) { -lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; uint8_t x_23; +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; uint8_t x_26; x_18 = lean_ctor_get(x_17, 0); lean_inc(x_18); x_19 = lean_ctor_get(x_17, 1); @@ -18451,67 +19572,65 @@ lean_inc(x_19); lean_dec(x_17); x_20 = lean_array_get_size(x_12); lean_dec(x_12); -x_21 = lean_ctor_get(x_18, 3); +x_21 = lean_ctor_get(x_18, 0); lean_inc(x_21); -x_22 = lean_array_get_size(x_21); -x_23 = lean_nat_dec_lt(x_20, x_22); -lean_dec(x_22); -lean_dec(x_20); -if (x_23 == 0) -{ -lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; uint8_t x_28; -x_24 = lean_ctor_get(x_5, 0); +x_22 = lean_ctor_get(x_18, 1); +lean_inc(x_22); +x_23 = lean_ctor_get(x_18, 2); +lean_inc(x_23); +x_24 = lean_ctor_get(x_18, 3); lean_inc(x_24); -x_25 = lean_ctor_get(x_18, 2); -lean_inc(x_25); -x_26 = lean_ctor_get(x_18, 1); -lean_inc(x_26); -x_27 = lean_ctor_get(x_18, 4); -lean_inc(x_27); lean_dec(x_18); -x_28 = !lean_is_exclusive(x_5); -if (x_28 == 0) +x_25 = lean_array_get_size(x_23); +x_26 = lean_nat_dec_lt(x_20, x_25); +lean_dec(x_25); +lean_dec(x_20); +if (x_26 == 0) { -lean_object* x_29; uint8_t x_30; -x_29 = lean_ctor_get(x_5, 0); -lean_dec(x_29); -x_30 = !lean_is_exclusive(x_24); -if (x_30 == 0) +uint8_t x_27; +x_27 = !lean_is_exclusive(x_5); +if (x_27 == 0) { -lean_object* x_31; lean_object* x_32; lean_object* x_33; -x_31 = lean_ctor_get(x_24, 2); +lean_object* x_28; uint8_t x_29; +x_28 = lean_ctor_get(x_5, 0); +x_29 = !lean_is_exclusive(x_28); +if (x_29 == 0) +{ +lean_object* x_30; lean_object* x_31; lean_object* x_32; +x_30 = lean_ctor_get(x_28, 2); +lean_dec(x_30); +x_31 = lean_ctor_get(x_28, 1); lean_dec(x_31); -x_32 = lean_ctor_get(x_24, 1); -lean_dec(x_32); -lean_ctor_set(x_24, 2, x_21); -lean_ctor_set(x_24, 1, x_25); -x_33 = lean_apply_4(x_4, x_26, x_27, x_5, x_19); -return x_33; +lean_ctor_set(x_28, 2, x_23); +lean_ctor_set(x_28, 1, x_22); +x_32 = lean_apply_4(x_4, x_21, x_24, x_5, x_19); +return x_32; } else { -lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; -x_34 = lean_ctor_get(x_24, 0); -x_35 = lean_ctor_get(x_24, 3); -x_36 = lean_ctor_get(x_24, 4); -lean_inc(x_36); +lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; +x_33 = lean_ctor_get(x_28, 0); +x_34 = lean_ctor_get(x_28, 3); +x_35 = lean_ctor_get(x_28, 4); lean_inc(x_35); lean_inc(x_34); -lean_dec(x_24); -x_37 = lean_alloc_ctor(0, 5, 0); -lean_ctor_set(x_37, 0, x_34); -lean_ctor_set(x_37, 1, x_25); -lean_ctor_set(x_37, 2, x_21); -lean_ctor_set(x_37, 3, x_35); -lean_ctor_set(x_37, 4, x_36); -lean_ctor_set(x_5, 0, x_37); -x_38 = lean_apply_4(x_4, x_26, x_27, x_5, x_19); -return x_38; +lean_inc(x_33); +lean_dec(x_28); +x_36 = lean_alloc_ctor(0, 5, 0); +lean_ctor_set(x_36, 0, x_33); +lean_ctor_set(x_36, 1, x_22); +lean_ctor_set(x_36, 2, x_23); +lean_ctor_set(x_36, 3, x_34); +lean_ctor_set(x_36, 4, x_35); +lean_ctor_set(x_5, 0, x_36); +x_37 = lean_apply_4(x_4, x_21, x_24, x_5, x_19); +return x_37; } } else { -lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; uint8_t x_48; uint8_t 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_object* x_57; +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; uint8_t x_48; uint8_t 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_object* x_57; +x_38 = lean_ctor_get(x_5, 0); x_39 = lean_ctor_get(x_5, 1); x_40 = lean_ctor_get(x_5, 2); x_41 = lean_ctor_get(x_5, 3); @@ -18533,22 +19652,23 @@ lean_inc(x_42); lean_inc(x_41); lean_inc(x_40); lean_inc(x_39); +lean_inc(x_38); lean_dec(x_5); -x_51 = lean_ctor_get(x_24, 0); +x_51 = lean_ctor_get(x_38, 0); lean_inc(x_51); -x_52 = lean_ctor_get(x_24, 3); +x_52 = lean_ctor_get(x_38, 3); lean_inc(x_52); -x_53 = lean_ctor_get(x_24, 4); +x_53 = lean_ctor_get(x_38, 4); lean_inc(x_53); -if (lean_is_exclusive(x_24)) { - lean_ctor_release(x_24, 0); - lean_ctor_release(x_24, 1); - lean_ctor_release(x_24, 2); - lean_ctor_release(x_24, 3); - lean_ctor_release(x_24, 4); - x_54 = x_24; +if (lean_is_exclusive(x_38)) { + lean_ctor_release(x_38, 0); + lean_ctor_release(x_38, 1); + lean_ctor_release(x_38, 2); + lean_ctor_release(x_38, 3); + lean_ctor_release(x_38, 4); + x_54 = x_38; } else { - lean_dec_ref(x_24); + lean_dec_ref(x_38); x_54 = lean_box(0); } if (lean_is_scalar(x_54)) { @@ -18557,8 +19677,8 @@ if (lean_is_scalar(x_54)) { x_55 = x_54; } lean_ctor_set(x_55, 0, x_51); -lean_ctor_set(x_55, 1, x_25); -lean_ctor_set(x_55, 2, x_21); +lean_ctor_set(x_55, 1, x_22); +lean_ctor_set(x_55, 2, x_23); lean_ctor_set(x_55, 3, x_52); lean_ctor_set(x_55, 4, x_53); x_56 = lean_alloc_ctor(0, 10, 3); @@ -18575,1186 +19695,1179 @@ lean_ctor_set(x_56, 9, x_47); lean_ctor_set_uint8(x_56, sizeof(void*)*10, x_48); lean_ctor_set_uint8(x_56, sizeof(void*)*10 + 1, x_49); lean_ctor_set_uint8(x_56, sizeof(void*)*10 + 2, x_50); -x_57 = lean_apply_4(x_4, x_26, x_27, x_56, x_19); +x_57 = lean_apply_4(x_4, x_21, x_24, x_56, x_19); return x_57; } } else { -lean_object* x_58; lean_object* x_59; lean_object* x_60; lean_object* x_61; lean_object* x_62; lean_object* x_63; lean_object* x_64; lean_object* x_65; lean_object* x_66; uint8_t x_67; +lean_object* x_58; lean_object* x_59; lean_object* x_60; lean_object* x_61; lean_object* x_62; lean_object* x_63; uint8_t x_64; x_58 = lean_ctor_get(x_19, 0); lean_inc(x_58); x_59 = lean_ctor_get(x_58, 2); lean_inc(x_59); lean_dec(x_58); -x_60 = lean_ctor_get(x_18, 2); +x_60 = lean_ctor_get(x_59, 2); lean_inc(x_60); -x_61 = lean_ctor_get(x_18, 1); -lean_inc(x_61); -x_62 = lean_ctor_get(x_18, 4); -lean_inc(x_62); -lean_dec(x_18); -x_63 = lean_ctor_get(x_59, 2); -lean_inc(x_63); lean_dec(x_59); -x_64 = l_Lean_Elab_Term_resetSynthInstanceCache___rarg(x_19); +x_61 = l_Lean_Elab_Term_resetSynthInstanceCache___rarg(x_19); +x_62 = lean_ctor_get(x_5, 0); +lean_inc(x_62); +x_63 = lean_ctor_get(x_61, 1); +lean_inc(x_63); +lean_dec(x_61); +x_64 = !lean_is_exclusive(x_5); +if (x_64 == 0) +{ +lean_object* x_65; uint8_t x_66; x_65 = lean_ctor_get(x_5, 0); -lean_inc(x_65); -x_66 = lean_ctor_get(x_64, 1); -lean_inc(x_66); -lean_dec(x_64); -x_67 = !lean_is_exclusive(x_5); -if (x_67 == 0) +lean_dec(x_65); +x_66 = !lean_is_exclusive(x_62); +if (x_66 == 0) { -lean_object* x_68; uint8_t x_69; -x_68 = lean_ctor_get(x_5, 0); +lean_object* x_67; lean_object* x_68; lean_object* x_69; +x_67 = lean_ctor_get(x_62, 2); +lean_dec(x_67); +x_68 = lean_ctor_get(x_62, 1); lean_dec(x_68); -x_69 = !lean_is_exclusive(x_65); -if (x_69 == 0) +lean_ctor_set(x_62, 2, x_23); +lean_ctor_set(x_62, 1, x_22); +x_69 = lean_apply_4(x_4, x_21, x_24, x_5, x_63); +if (lean_obj_tag(x_69) == 0) { -lean_object* x_70; lean_object* x_71; lean_object* x_72; -x_70 = lean_ctor_get(x_65, 2); -lean_dec(x_70); -x_71 = lean_ctor_get(x_65, 1); -lean_dec(x_71); -lean_ctor_set(x_65, 2, x_21); -lean_ctor_set(x_65, 1, x_60); -x_72 = lean_apply_4(x_4, x_61, x_62, x_5, x_66); -if (lean_obj_tag(x_72) == 0) +lean_object* x_70; lean_object* x_71; lean_object* x_72; uint8_t x_73; +x_70 = lean_ctor_get(x_69, 1); +lean_inc(x_70); +x_71 = lean_ctor_get(x_70, 0); +lean_inc(x_71); +x_72 = lean_ctor_get(x_71, 2); +lean_inc(x_72); +x_73 = !lean_is_exclusive(x_69); +if (x_73 == 0) { -lean_object* x_73; lean_object* x_74; lean_object* x_75; uint8_t x_76; -x_73 = lean_ctor_get(x_72, 1); -lean_inc(x_73); -x_74 = lean_ctor_get(x_73, 0); -lean_inc(x_74); -x_75 = lean_ctor_get(x_74, 2); -lean_inc(x_75); -x_76 = !lean_is_exclusive(x_72); -if (x_76 == 0) +lean_object* x_74; uint8_t x_75; +x_74 = lean_ctor_get(x_69, 1); +lean_dec(x_74); +x_75 = !lean_is_exclusive(x_70); +if (x_75 == 0) { -lean_object* x_77; uint8_t x_78; -x_77 = lean_ctor_get(x_72, 1); -lean_dec(x_77); -x_78 = !lean_is_exclusive(x_73); -if (x_78 == 0) +lean_object* x_76; uint8_t x_77; +x_76 = lean_ctor_get(x_70, 0); +lean_dec(x_76); +x_77 = !lean_is_exclusive(x_71); +if (x_77 == 0) { -lean_object* x_79; uint8_t x_80; -x_79 = lean_ctor_get(x_73, 0); -lean_dec(x_79); -x_80 = !lean_is_exclusive(x_74); -if (x_80 == 0) +lean_object* x_78; uint8_t x_79; +x_78 = lean_ctor_get(x_71, 2); +lean_dec(x_78); +x_79 = !lean_is_exclusive(x_72); +if (x_79 == 0) { -lean_object* x_81; uint8_t x_82; -x_81 = lean_ctor_get(x_74, 2); -lean_dec(x_81); -x_82 = !lean_is_exclusive(x_75); -if (x_82 == 0) -{ -lean_object* x_83; -x_83 = lean_ctor_get(x_75, 2); -lean_dec(x_83); -lean_ctor_set(x_75, 2, x_63); -return x_72; +lean_object* x_80; +x_80 = lean_ctor_get(x_72, 2); +lean_dec(x_80); +lean_ctor_set(x_72, 2, x_60); +return x_69; } else { -lean_object* x_84; lean_object* x_85; lean_object* x_86; -x_84 = lean_ctor_get(x_75, 0); -x_85 = lean_ctor_get(x_75, 1); -lean_inc(x_85); -lean_inc(x_84); -lean_dec(x_75); -x_86 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_86, 0, x_84); -lean_ctor_set(x_86, 1, x_85); -lean_ctor_set(x_86, 2, x_63); -lean_ctor_set(x_74, 2, x_86); -return x_72; +lean_object* x_81; lean_object* x_82; lean_object* x_83; +x_81 = lean_ctor_get(x_72, 0); +x_82 = lean_ctor_get(x_72, 1); +lean_inc(x_82); +lean_inc(x_81); +lean_dec(x_72); +x_83 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_83, 0, x_81); +lean_ctor_set(x_83, 1, x_82); +lean_ctor_set(x_83, 2, x_60); +lean_ctor_set(x_71, 2, x_83); +return x_69; } } else { -lean_object* x_87; lean_object* x_88; lean_object* x_89; lean_object* x_90; lean_object* x_91; lean_object* x_92; lean_object* x_93; lean_object* x_94; lean_object* x_95; lean_object* x_96; -x_87 = lean_ctor_get(x_74, 0); -x_88 = lean_ctor_get(x_74, 1); -x_89 = lean_ctor_get(x_74, 3); -x_90 = lean_ctor_get(x_74, 4); -x_91 = lean_ctor_get(x_74, 5); -lean_inc(x_91); -lean_inc(x_90); -lean_inc(x_89); +lean_object* x_84; lean_object* x_85; lean_object* x_86; lean_object* x_87; lean_object* x_88; lean_object* x_89; lean_object* x_90; lean_object* x_91; lean_object* x_92; lean_object* x_93; +x_84 = lean_ctor_get(x_71, 0); +x_85 = lean_ctor_get(x_71, 1); +x_86 = lean_ctor_get(x_71, 3); +x_87 = lean_ctor_get(x_71, 4); +x_88 = lean_ctor_get(x_71, 5); lean_inc(x_88); lean_inc(x_87); -lean_dec(x_74); -x_92 = lean_ctor_get(x_75, 0); -lean_inc(x_92); -x_93 = lean_ctor_get(x_75, 1); -lean_inc(x_93); -if (lean_is_exclusive(x_75)) { - lean_ctor_release(x_75, 0); - lean_ctor_release(x_75, 1); - lean_ctor_release(x_75, 2); - x_94 = x_75; +lean_inc(x_86); +lean_inc(x_85); +lean_inc(x_84); +lean_dec(x_71); +x_89 = lean_ctor_get(x_72, 0); +lean_inc(x_89); +x_90 = lean_ctor_get(x_72, 1); +lean_inc(x_90); +if (lean_is_exclusive(x_72)) { + lean_ctor_release(x_72, 0); + lean_ctor_release(x_72, 1); + lean_ctor_release(x_72, 2); + x_91 = x_72; } else { - lean_dec_ref(x_75); - x_94 = lean_box(0); + lean_dec_ref(x_72); + x_91 = lean_box(0); } -if (lean_is_scalar(x_94)) { - x_95 = lean_alloc_ctor(0, 3, 0); +if (lean_is_scalar(x_91)) { + x_92 = lean_alloc_ctor(0, 3, 0); } else { - x_95 = x_94; + x_92 = x_91; } -lean_ctor_set(x_95, 0, x_92); -lean_ctor_set(x_95, 1, x_93); -lean_ctor_set(x_95, 2, x_63); -x_96 = lean_alloc_ctor(0, 6, 0); -lean_ctor_set(x_96, 0, x_87); -lean_ctor_set(x_96, 1, x_88); -lean_ctor_set(x_96, 2, x_95); -lean_ctor_set(x_96, 3, x_89); -lean_ctor_set(x_96, 4, x_90); -lean_ctor_set(x_96, 5, x_91); -lean_ctor_set(x_73, 0, x_96); -return x_72; +lean_ctor_set(x_92, 0, x_89); +lean_ctor_set(x_92, 1, x_90); +lean_ctor_set(x_92, 2, x_60); +x_93 = lean_alloc_ctor(0, 6, 0); +lean_ctor_set(x_93, 0, x_84); +lean_ctor_set(x_93, 1, x_85); +lean_ctor_set(x_93, 2, x_92); +lean_ctor_set(x_93, 3, x_86); +lean_ctor_set(x_93, 4, x_87); +lean_ctor_set(x_93, 5, x_88); +lean_ctor_set(x_70, 0, x_93); +return x_69; } } else { -lean_object* x_97; lean_object* x_98; lean_object* x_99; lean_object* x_100; lean_object* x_101; lean_object* x_102; lean_object* x_103; lean_object* x_104; lean_object* x_105; lean_object* x_106; lean_object* x_107; lean_object* x_108; lean_object* x_109; lean_object* x_110; lean_object* x_111; lean_object* x_112; lean_object* x_113; -x_97 = lean_ctor_get(x_73, 1); -x_98 = lean_ctor_get(x_73, 2); -x_99 = lean_ctor_get(x_73, 3); -x_100 = lean_ctor_get(x_73, 4); -x_101 = lean_ctor_get(x_73, 5); -lean_inc(x_101); -lean_inc(x_100); -lean_inc(x_99); +lean_object* x_94; lean_object* x_95; lean_object* x_96; lean_object* x_97; lean_object* x_98; lean_object* x_99; lean_object* x_100; lean_object* x_101; lean_object* x_102; lean_object* x_103; lean_object* x_104; lean_object* x_105; lean_object* x_106; lean_object* x_107; lean_object* x_108; lean_object* x_109; lean_object* x_110; +x_94 = lean_ctor_get(x_70, 1); +x_95 = lean_ctor_get(x_70, 2); +x_96 = lean_ctor_get(x_70, 3); +x_97 = lean_ctor_get(x_70, 4); +x_98 = lean_ctor_get(x_70, 5); lean_inc(x_98); lean_inc(x_97); -lean_dec(x_73); -x_102 = lean_ctor_get(x_74, 0); +lean_inc(x_96); +lean_inc(x_95); +lean_inc(x_94); +lean_dec(x_70); +x_99 = lean_ctor_get(x_71, 0); +lean_inc(x_99); +x_100 = lean_ctor_get(x_71, 1); +lean_inc(x_100); +x_101 = lean_ctor_get(x_71, 3); +lean_inc(x_101); +x_102 = lean_ctor_get(x_71, 4); lean_inc(x_102); -x_103 = lean_ctor_get(x_74, 1); +x_103 = lean_ctor_get(x_71, 5); lean_inc(x_103); -x_104 = lean_ctor_get(x_74, 3); -lean_inc(x_104); -x_105 = lean_ctor_get(x_74, 4); -lean_inc(x_105); -x_106 = lean_ctor_get(x_74, 5); -lean_inc(x_106); -if (lean_is_exclusive(x_74)) { - lean_ctor_release(x_74, 0); - lean_ctor_release(x_74, 1); - lean_ctor_release(x_74, 2); - lean_ctor_release(x_74, 3); - lean_ctor_release(x_74, 4); - lean_ctor_release(x_74, 5); - x_107 = x_74; +if (lean_is_exclusive(x_71)) { + lean_ctor_release(x_71, 0); + lean_ctor_release(x_71, 1); + lean_ctor_release(x_71, 2); + lean_ctor_release(x_71, 3); + lean_ctor_release(x_71, 4); + lean_ctor_release(x_71, 5); + x_104 = x_71; } else { - lean_dec_ref(x_74); + lean_dec_ref(x_71); + x_104 = lean_box(0); +} +x_105 = lean_ctor_get(x_72, 0); +lean_inc(x_105); +x_106 = lean_ctor_get(x_72, 1); +lean_inc(x_106); +if (lean_is_exclusive(x_72)) { + lean_ctor_release(x_72, 0); + lean_ctor_release(x_72, 1); + lean_ctor_release(x_72, 2); + x_107 = x_72; +} else { + lean_dec_ref(x_72); x_107 = lean_box(0); } -x_108 = lean_ctor_get(x_75, 0); -lean_inc(x_108); -x_109 = lean_ctor_get(x_75, 1); -lean_inc(x_109); -if (lean_is_exclusive(x_75)) { - lean_ctor_release(x_75, 0); - lean_ctor_release(x_75, 1); - lean_ctor_release(x_75, 2); - x_110 = x_75; -} else { - lean_dec_ref(x_75); - x_110 = lean_box(0); -} -if (lean_is_scalar(x_110)) { - x_111 = lean_alloc_ctor(0, 3, 0); -} else { - x_111 = x_110; -} -lean_ctor_set(x_111, 0, x_108); -lean_ctor_set(x_111, 1, x_109); -lean_ctor_set(x_111, 2, x_63); if (lean_is_scalar(x_107)) { - x_112 = lean_alloc_ctor(0, 6, 0); + x_108 = lean_alloc_ctor(0, 3, 0); } else { - x_112 = x_107; + x_108 = x_107; } -lean_ctor_set(x_112, 0, x_102); -lean_ctor_set(x_112, 1, x_103); -lean_ctor_set(x_112, 2, x_111); -lean_ctor_set(x_112, 3, x_104); -lean_ctor_set(x_112, 4, x_105); -lean_ctor_set(x_112, 5, x_106); -x_113 = lean_alloc_ctor(0, 6, 0); -lean_ctor_set(x_113, 0, x_112); -lean_ctor_set(x_113, 1, x_97); -lean_ctor_set(x_113, 2, x_98); -lean_ctor_set(x_113, 3, x_99); -lean_ctor_set(x_113, 4, x_100); -lean_ctor_set(x_113, 5, x_101); -lean_ctor_set(x_72, 1, x_113); -return x_72; +lean_ctor_set(x_108, 0, x_105); +lean_ctor_set(x_108, 1, x_106); +lean_ctor_set(x_108, 2, x_60); +if (lean_is_scalar(x_104)) { + x_109 = lean_alloc_ctor(0, 6, 0); +} else { + x_109 = x_104; +} +lean_ctor_set(x_109, 0, x_99); +lean_ctor_set(x_109, 1, x_100); +lean_ctor_set(x_109, 2, x_108); +lean_ctor_set(x_109, 3, x_101); +lean_ctor_set(x_109, 4, x_102); +lean_ctor_set(x_109, 5, x_103); +x_110 = lean_alloc_ctor(0, 6, 0); +lean_ctor_set(x_110, 0, x_109); +lean_ctor_set(x_110, 1, x_94); +lean_ctor_set(x_110, 2, x_95); +lean_ctor_set(x_110, 3, x_96); +lean_ctor_set(x_110, 4, x_97); +lean_ctor_set(x_110, 5, x_98); +lean_ctor_set(x_69, 1, x_110); +return x_69; } } else { -lean_object* x_114; lean_object* x_115; lean_object* x_116; lean_object* x_117; lean_object* x_118; lean_object* x_119; lean_object* x_120; lean_object* x_121; lean_object* x_122; 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; -x_114 = lean_ctor_get(x_72, 0); +lean_object* x_111; lean_object* x_112; lean_object* x_113; lean_object* x_114; lean_object* x_115; lean_object* x_116; lean_object* x_117; lean_object* x_118; lean_object* x_119; lean_object* x_120; lean_object* x_121; lean_object* x_122; lean_object* x_123; lean_object* x_124; lean_object* x_125; lean_object* x_126; lean_object* x_127; lean_object* x_128; lean_object* x_129; lean_object* x_130; +x_111 = lean_ctor_get(x_69, 0); +lean_inc(x_111); +lean_dec(x_69); +x_112 = lean_ctor_get(x_70, 1); +lean_inc(x_112); +x_113 = lean_ctor_get(x_70, 2); +lean_inc(x_113); +x_114 = lean_ctor_get(x_70, 3); lean_inc(x_114); -lean_dec(x_72); -x_115 = lean_ctor_get(x_73, 1); +x_115 = lean_ctor_get(x_70, 4); lean_inc(x_115); -x_116 = lean_ctor_get(x_73, 2); +x_116 = lean_ctor_get(x_70, 5); lean_inc(x_116); -x_117 = lean_ctor_get(x_73, 3); -lean_inc(x_117); -x_118 = lean_ctor_get(x_73, 4); -lean_inc(x_118); -x_119 = lean_ctor_get(x_73, 5); -lean_inc(x_119); -if (lean_is_exclusive(x_73)) { - lean_ctor_release(x_73, 0); - lean_ctor_release(x_73, 1); - lean_ctor_release(x_73, 2); - lean_ctor_release(x_73, 3); - lean_ctor_release(x_73, 4); - lean_ctor_release(x_73, 5); - x_120 = x_73; +if (lean_is_exclusive(x_70)) { + lean_ctor_release(x_70, 0); + lean_ctor_release(x_70, 1); + lean_ctor_release(x_70, 2); + lean_ctor_release(x_70, 3); + lean_ctor_release(x_70, 4); + lean_ctor_release(x_70, 5); + x_117 = x_70; } else { - lean_dec_ref(x_73); - x_120 = lean_box(0); + lean_dec_ref(x_70); + x_117 = lean_box(0); } -x_121 = lean_ctor_get(x_74, 0); +x_118 = lean_ctor_get(x_71, 0); +lean_inc(x_118); +x_119 = lean_ctor_get(x_71, 1); +lean_inc(x_119); +x_120 = lean_ctor_get(x_71, 3); +lean_inc(x_120); +x_121 = lean_ctor_get(x_71, 4); lean_inc(x_121); -x_122 = lean_ctor_get(x_74, 1); +x_122 = lean_ctor_get(x_71, 5); lean_inc(x_122); -x_123 = lean_ctor_get(x_74, 3); -lean_inc(x_123); -x_124 = lean_ctor_get(x_74, 4); -lean_inc(x_124); -x_125 = lean_ctor_get(x_74, 5); -lean_inc(x_125); -if (lean_is_exclusive(x_74)) { - lean_ctor_release(x_74, 0); - lean_ctor_release(x_74, 1); - lean_ctor_release(x_74, 2); - lean_ctor_release(x_74, 3); - lean_ctor_release(x_74, 4); - lean_ctor_release(x_74, 5); - x_126 = x_74; +if (lean_is_exclusive(x_71)) { + lean_ctor_release(x_71, 0); + lean_ctor_release(x_71, 1); + lean_ctor_release(x_71, 2); + lean_ctor_release(x_71, 3); + lean_ctor_release(x_71, 4); + lean_ctor_release(x_71, 5); + x_123 = x_71; } else { - lean_dec_ref(x_74); + lean_dec_ref(x_71); + x_123 = lean_box(0); +} +x_124 = lean_ctor_get(x_72, 0); +lean_inc(x_124); +x_125 = lean_ctor_get(x_72, 1); +lean_inc(x_125); +if (lean_is_exclusive(x_72)) { + lean_ctor_release(x_72, 0); + lean_ctor_release(x_72, 1); + lean_ctor_release(x_72, 2); + x_126 = x_72; +} else { + lean_dec_ref(x_72); x_126 = lean_box(0); } -x_127 = lean_ctor_get(x_75, 0); -lean_inc(x_127); -x_128 = lean_ctor_get(x_75, 1); -lean_inc(x_128); -if (lean_is_exclusive(x_75)) { - lean_ctor_release(x_75, 0); - lean_ctor_release(x_75, 1); - lean_ctor_release(x_75, 2); - x_129 = x_75; -} else { - lean_dec_ref(x_75); - x_129 = lean_box(0); -} -if (lean_is_scalar(x_129)) { - x_130 = lean_alloc_ctor(0, 3, 0); -} else { - x_130 = x_129; -} -lean_ctor_set(x_130, 0, x_127); -lean_ctor_set(x_130, 1, x_128); -lean_ctor_set(x_130, 2, x_63); if (lean_is_scalar(x_126)) { - x_131 = lean_alloc_ctor(0, 6, 0); + x_127 = lean_alloc_ctor(0, 3, 0); } else { - x_131 = x_126; + x_127 = x_126; } -lean_ctor_set(x_131, 0, x_121); -lean_ctor_set(x_131, 1, x_122); -lean_ctor_set(x_131, 2, x_130); -lean_ctor_set(x_131, 3, x_123); -lean_ctor_set(x_131, 4, x_124); -lean_ctor_set(x_131, 5, x_125); -if (lean_is_scalar(x_120)) { - x_132 = lean_alloc_ctor(0, 6, 0); +lean_ctor_set(x_127, 0, x_124); +lean_ctor_set(x_127, 1, x_125); +lean_ctor_set(x_127, 2, x_60); +if (lean_is_scalar(x_123)) { + x_128 = lean_alloc_ctor(0, 6, 0); } else { - x_132 = x_120; + x_128 = x_123; } -lean_ctor_set(x_132, 0, x_131); -lean_ctor_set(x_132, 1, x_115); -lean_ctor_set(x_132, 2, x_116); -lean_ctor_set(x_132, 3, x_117); -lean_ctor_set(x_132, 4, x_118); -lean_ctor_set(x_132, 5, x_119); -x_133 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_133, 0, x_114); -lean_ctor_set(x_133, 1, x_132); -return x_133; +lean_ctor_set(x_128, 0, x_118); +lean_ctor_set(x_128, 1, x_119); +lean_ctor_set(x_128, 2, x_127); +lean_ctor_set(x_128, 3, x_120); +lean_ctor_set(x_128, 4, x_121); +lean_ctor_set(x_128, 5, x_122); +if (lean_is_scalar(x_117)) { + x_129 = lean_alloc_ctor(0, 6, 0); +} else { + x_129 = x_117; +} +lean_ctor_set(x_129, 0, x_128); +lean_ctor_set(x_129, 1, x_112); +lean_ctor_set(x_129, 2, x_113); +lean_ctor_set(x_129, 3, x_114); +lean_ctor_set(x_129, 4, x_115); +lean_ctor_set(x_129, 5, x_116); +x_130 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_130, 0, x_111); +lean_ctor_set(x_130, 1, x_129); +return x_130; } } else { -lean_object* x_134; lean_object* x_135; lean_object* x_136; uint8_t x_137; -x_134 = lean_ctor_get(x_72, 1); -lean_inc(x_134); -x_135 = lean_ctor_get(x_134, 0); -lean_inc(x_135); -x_136 = lean_ctor_get(x_135, 2); -lean_inc(x_136); -x_137 = !lean_is_exclusive(x_72); -if (x_137 == 0) +lean_object* x_131; lean_object* x_132; lean_object* x_133; uint8_t x_134; +x_131 = lean_ctor_get(x_69, 1); +lean_inc(x_131); +x_132 = lean_ctor_get(x_131, 0); +lean_inc(x_132); +x_133 = lean_ctor_get(x_132, 2); +lean_inc(x_133); +x_134 = !lean_is_exclusive(x_69); +if (x_134 == 0) { -lean_object* x_138; uint8_t x_139; -x_138 = lean_ctor_get(x_72, 1); -lean_dec(x_138); -x_139 = !lean_is_exclusive(x_134); -if (x_139 == 0) +lean_object* x_135; uint8_t x_136; +x_135 = lean_ctor_get(x_69, 1); +lean_dec(x_135); +x_136 = !lean_is_exclusive(x_131); +if (x_136 == 0) { -lean_object* x_140; uint8_t x_141; -x_140 = lean_ctor_get(x_134, 0); -lean_dec(x_140); -x_141 = !lean_is_exclusive(x_135); -if (x_141 == 0) +lean_object* x_137; uint8_t x_138; +x_137 = lean_ctor_get(x_131, 0); +lean_dec(x_137); +x_138 = !lean_is_exclusive(x_132); +if (x_138 == 0) { -lean_object* x_142; uint8_t x_143; -x_142 = lean_ctor_get(x_135, 2); -lean_dec(x_142); -x_143 = !lean_is_exclusive(x_136); -if (x_143 == 0) +lean_object* x_139; uint8_t x_140; +x_139 = lean_ctor_get(x_132, 2); +lean_dec(x_139); +x_140 = !lean_is_exclusive(x_133); +if (x_140 == 0) { -lean_object* x_144; -x_144 = lean_ctor_get(x_136, 2); -lean_dec(x_144); -lean_ctor_set(x_136, 2, x_63); -return x_72; +lean_object* x_141; +x_141 = lean_ctor_get(x_133, 2); +lean_dec(x_141); +lean_ctor_set(x_133, 2, x_60); +return x_69; } else { -lean_object* x_145; lean_object* x_146; lean_object* x_147; -x_145 = lean_ctor_get(x_136, 0); -x_146 = lean_ctor_get(x_136, 1); -lean_inc(x_146); -lean_inc(x_145); -lean_dec(x_136); -x_147 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_147, 0, x_145); -lean_ctor_set(x_147, 1, x_146); -lean_ctor_set(x_147, 2, x_63); -lean_ctor_set(x_135, 2, x_147); -return x_72; +lean_object* x_142; lean_object* x_143; lean_object* x_144; +x_142 = lean_ctor_get(x_133, 0); +x_143 = lean_ctor_get(x_133, 1); +lean_inc(x_143); +lean_inc(x_142); +lean_dec(x_133); +x_144 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_144, 0, x_142); +lean_ctor_set(x_144, 1, x_143); +lean_ctor_set(x_144, 2, x_60); +lean_ctor_set(x_132, 2, x_144); +return x_69; } } else { -lean_object* x_148; lean_object* x_149; lean_object* x_150; lean_object* x_151; lean_object* x_152; lean_object* x_153; lean_object* x_154; lean_object* x_155; lean_object* x_156; lean_object* x_157; -x_148 = lean_ctor_get(x_135, 0); -x_149 = lean_ctor_get(x_135, 1); -x_150 = lean_ctor_get(x_135, 3); -x_151 = lean_ctor_get(x_135, 4); -x_152 = lean_ctor_get(x_135, 5); -lean_inc(x_152); -lean_inc(x_151); -lean_inc(x_150); +lean_object* x_145; lean_object* x_146; lean_object* x_147; lean_object* x_148; lean_object* x_149; lean_object* x_150; lean_object* x_151; lean_object* x_152; lean_object* x_153; lean_object* x_154; +x_145 = lean_ctor_get(x_132, 0); +x_146 = lean_ctor_get(x_132, 1); +x_147 = lean_ctor_get(x_132, 3); +x_148 = lean_ctor_get(x_132, 4); +x_149 = lean_ctor_get(x_132, 5); lean_inc(x_149); lean_inc(x_148); -lean_dec(x_135); -x_153 = lean_ctor_get(x_136, 0); -lean_inc(x_153); -x_154 = lean_ctor_get(x_136, 1); -lean_inc(x_154); -if (lean_is_exclusive(x_136)) { - lean_ctor_release(x_136, 0); - lean_ctor_release(x_136, 1); - lean_ctor_release(x_136, 2); - x_155 = x_136; +lean_inc(x_147); +lean_inc(x_146); +lean_inc(x_145); +lean_dec(x_132); +x_150 = lean_ctor_get(x_133, 0); +lean_inc(x_150); +x_151 = lean_ctor_get(x_133, 1); +lean_inc(x_151); +if (lean_is_exclusive(x_133)) { + lean_ctor_release(x_133, 0); + lean_ctor_release(x_133, 1); + lean_ctor_release(x_133, 2); + x_152 = x_133; } else { - lean_dec_ref(x_136); - x_155 = lean_box(0); + lean_dec_ref(x_133); + x_152 = lean_box(0); } -if (lean_is_scalar(x_155)) { - x_156 = lean_alloc_ctor(0, 3, 0); +if (lean_is_scalar(x_152)) { + x_153 = lean_alloc_ctor(0, 3, 0); } else { - x_156 = x_155; + x_153 = x_152; } -lean_ctor_set(x_156, 0, x_153); -lean_ctor_set(x_156, 1, x_154); -lean_ctor_set(x_156, 2, x_63); -x_157 = lean_alloc_ctor(0, 6, 0); -lean_ctor_set(x_157, 0, x_148); -lean_ctor_set(x_157, 1, x_149); -lean_ctor_set(x_157, 2, x_156); -lean_ctor_set(x_157, 3, x_150); -lean_ctor_set(x_157, 4, x_151); -lean_ctor_set(x_157, 5, x_152); -lean_ctor_set(x_134, 0, x_157); -return x_72; +lean_ctor_set(x_153, 0, x_150); +lean_ctor_set(x_153, 1, x_151); +lean_ctor_set(x_153, 2, x_60); +x_154 = lean_alloc_ctor(0, 6, 0); +lean_ctor_set(x_154, 0, x_145); +lean_ctor_set(x_154, 1, x_146); +lean_ctor_set(x_154, 2, x_153); +lean_ctor_set(x_154, 3, x_147); +lean_ctor_set(x_154, 4, x_148); +lean_ctor_set(x_154, 5, x_149); +lean_ctor_set(x_131, 0, x_154); +return x_69; } } else { -lean_object* x_158; lean_object* x_159; lean_object* x_160; lean_object* x_161; lean_object* x_162; lean_object* x_163; lean_object* x_164; lean_object* x_165; lean_object* x_166; lean_object* x_167; lean_object* x_168; lean_object* x_169; lean_object* x_170; lean_object* x_171; lean_object* x_172; lean_object* x_173; lean_object* x_174; -x_158 = lean_ctor_get(x_134, 1); -x_159 = lean_ctor_get(x_134, 2); -x_160 = lean_ctor_get(x_134, 3); -x_161 = lean_ctor_get(x_134, 4); -x_162 = lean_ctor_get(x_134, 5); -lean_inc(x_162); -lean_inc(x_161); -lean_inc(x_160); +lean_object* x_155; lean_object* x_156; lean_object* x_157; lean_object* x_158; lean_object* x_159; lean_object* x_160; lean_object* x_161; lean_object* x_162; lean_object* x_163; lean_object* x_164; lean_object* x_165; lean_object* x_166; lean_object* x_167; lean_object* x_168; lean_object* x_169; lean_object* x_170; lean_object* x_171; +x_155 = lean_ctor_get(x_131, 1); +x_156 = lean_ctor_get(x_131, 2); +x_157 = lean_ctor_get(x_131, 3); +x_158 = lean_ctor_get(x_131, 4); +x_159 = lean_ctor_get(x_131, 5); lean_inc(x_159); lean_inc(x_158); -lean_dec(x_134); -x_163 = lean_ctor_get(x_135, 0); +lean_inc(x_157); +lean_inc(x_156); +lean_inc(x_155); +lean_dec(x_131); +x_160 = lean_ctor_get(x_132, 0); +lean_inc(x_160); +x_161 = lean_ctor_get(x_132, 1); +lean_inc(x_161); +x_162 = lean_ctor_get(x_132, 3); +lean_inc(x_162); +x_163 = lean_ctor_get(x_132, 4); lean_inc(x_163); -x_164 = lean_ctor_get(x_135, 1); +x_164 = lean_ctor_get(x_132, 5); lean_inc(x_164); -x_165 = lean_ctor_get(x_135, 3); -lean_inc(x_165); -x_166 = lean_ctor_get(x_135, 4); -lean_inc(x_166); -x_167 = lean_ctor_get(x_135, 5); -lean_inc(x_167); -if (lean_is_exclusive(x_135)) { - lean_ctor_release(x_135, 0); - lean_ctor_release(x_135, 1); - lean_ctor_release(x_135, 2); - lean_ctor_release(x_135, 3); - lean_ctor_release(x_135, 4); - lean_ctor_release(x_135, 5); - x_168 = x_135; +if (lean_is_exclusive(x_132)) { + lean_ctor_release(x_132, 0); + lean_ctor_release(x_132, 1); + lean_ctor_release(x_132, 2); + lean_ctor_release(x_132, 3); + lean_ctor_release(x_132, 4); + lean_ctor_release(x_132, 5); + x_165 = x_132; } else { - lean_dec_ref(x_135); + lean_dec_ref(x_132); + x_165 = lean_box(0); +} +x_166 = lean_ctor_get(x_133, 0); +lean_inc(x_166); +x_167 = lean_ctor_get(x_133, 1); +lean_inc(x_167); +if (lean_is_exclusive(x_133)) { + lean_ctor_release(x_133, 0); + lean_ctor_release(x_133, 1); + lean_ctor_release(x_133, 2); + x_168 = x_133; +} else { + lean_dec_ref(x_133); x_168 = lean_box(0); } -x_169 = lean_ctor_get(x_136, 0); -lean_inc(x_169); -x_170 = lean_ctor_get(x_136, 1); -lean_inc(x_170); -if (lean_is_exclusive(x_136)) { - lean_ctor_release(x_136, 0); - lean_ctor_release(x_136, 1); - lean_ctor_release(x_136, 2); - x_171 = x_136; -} else { - lean_dec_ref(x_136); - x_171 = lean_box(0); -} -if (lean_is_scalar(x_171)) { - x_172 = lean_alloc_ctor(0, 3, 0); -} else { - x_172 = x_171; -} -lean_ctor_set(x_172, 0, x_169); -lean_ctor_set(x_172, 1, x_170); -lean_ctor_set(x_172, 2, x_63); if (lean_is_scalar(x_168)) { - x_173 = lean_alloc_ctor(0, 6, 0); + x_169 = lean_alloc_ctor(0, 3, 0); } else { - x_173 = x_168; + x_169 = x_168; } -lean_ctor_set(x_173, 0, x_163); -lean_ctor_set(x_173, 1, x_164); -lean_ctor_set(x_173, 2, x_172); -lean_ctor_set(x_173, 3, x_165); -lean_ctor_set(x_173, 4, x_166); -lean_ctor_set(x_173, 5, x_167); -x_174 = lean_alloc_ctor(0, 6, 0); -lean_ctor_set(x_174, 0, x_173); -lean_ctor_set(x_174, 1, x_158); -lean_ctor_set(x_174, 2, x_159); -lean_ctor_set(x_174, 3, x_160); -lean_ctor_set(x_174, 4, x_161); -lean_ctor_set(x_174, 5, x_162); -lean_ctor_set(x_72, 1, x_174); -return x_72; +lean_ctor_set(x_169, 0, x_166); +lean_ctor_set(x_169, 1, x_167); +lean_ctor_set(x_169, 2, x_60); +if (lean_is_scalar(x_165)) { + x_170 = lean_alloc_ctor(0, 6, 0); +} else { + x_170 = x_165; +} +lean_ctor_set(x_170, 0, x_160); +lean_ctor_set(x_170, 1, x_161); +lean_ctor_set(x_170, 2, x_169); +lean_ctor_set(x_170, 3, x_162); +lean_ctor_set(x_170, 4, x_163); +lean_ctor_set(x_170, 5, x_164); +x_171 = lean_alloc_ctor(0, 6, 0); +lean_ctor_set(x_171, 0, x_170); +lean_ctor_set(x_171, 1, x_155); +lean_ctor_set(x_171, 2, x_156); +lean_ctor_set(x_171, 3, x_157); +lean_ctor_set(x_171, 4, x_158); +lean_ctor_set(x_171, 5, x_159); +lean_ctor_set(x_69, 1, x_171); +return x_69; } } else { -lean_object* x_175; lean_object* x_176; lean_object* x_177; lean_object* x_178; lean_object* x_179; lean_object* x_180; lean_object* x_181; lean_object* x_182; lean_object* x_183; lean_object* x_184; lean_object* x_185; lean_object* x_186; lean_object* x_187; lean_object* x_188; lean_object* x_189; lean_object* x_190; lean_object* x_191; lean_object* x_192; lean_object* x_193; lean_object* x_194; -x_175 = lean_ctor_get(x_72, 0); +lean_object* x_172; lean_object* x_173; lean_object* x_174; lean_object* x_175; lean_object* x_176; lean_object* x_177; lean_object* x_178; lean_object* x_179; lean_object* x_180; lean_object* x_181; lean_object* x_182; lean_object* x_183; lean_object* x_184; lean_object* x_185; lean_object* x_186; lean_object* x_187; lean_object* x_188; lean_object* x_189; lean_object* x_190; lean_object* x_191; +x_172 = lean_ctor_get(x_69, 0); +lean_inc(x_172); +lean_dec(x_69); +x_173 = lean_ctor_get(x_131, 1); +lean_inc(x_173); +x_174 = lean_ctor_get(x_131, 2); +lean_inc(x_174); +x_175 = lean_ctor_get(x_131, 3); lean_inc(x_175); -lean_dec(x_72); -x_176 = lean_ctor_get(x_134, 1); +x_176 = lean_ctor_get(x_131, 4); lean_inc(x_176); -x_177 = lean_ctor_get(x_134, 2); +x_177 = lean_ctor_get(x_131, 5); lean_inc(x_177); -x_178 = lean_ctor_get(x_134, 3); -lean_inc(x_178); -x_179 = lean_ctor_get(x_134, 4); -lean_inc(x_179); -x_180 = lean_ctor_get(x_134, 5); -lean_inc(x_180); -if (lean_is_exclusive(x_134)) { - lean_ctor_release(x_134, 0); - lean_ctor_release(x_134, 1); - lean_ctor_release(x_134, 2); - lean_ctor_release(x_134, 3); - lean_ctor_release(x_134, 4); - lean_ctor_release(x_134, 5); - x_181 = x_134; +if (lean_is_exclusive(x_131)) { + lean_ctor_release(x_131, 0); + lean_ctor_release(x_131, 1); + lean_ctor_release(x_131, 2); + lean_ctor_release(x_131, 3); + lean_ctor_release(x_131, 4); + lean_ctor_release(x_131, 5); + x_178 = x_131; } else { - lean_dec_ref(x_134); - x_181 = lean_box(0); + lean_dec_ref(x_131); + x_178 = lean_box(0); } -x_182 = lean_ctor_get(x_135, 0); +x_179 = lean_ctor_get(x_132, 0); +lean_inc(x_179); +x_180 = lean_ctor_get(x_132, 1); +lean_inc(x_180); +x_181 = lean_ctor_get(x_132, 3); +lean_inc(x_181); +x_182 = lean_ctor_get(x_132, 4); lean_inc(x_182); -x_183 = lean_ctor_get(x_135, 1); +x_183 = lean_ctor_get(x_132, 5); lean_inc(x_183); -x_184 = lean_ctor_get(x_135, 3); -lean_inc(x_184); -x_185 = lean_ctor_get(x_135, 4); -lean_inc(x_185); -x_186 = lean_ctor_get(x_135, 5); -lean_inc(x_186); -if (lean_is_exclusive(x_135)) { - lean_ctor_release(x_135, 0); - lean_ctor_release(x_135, 1); - lean_ctor_release(x_135, 2); - lean_ctor_release(x_135, 3); - lean_ctor_release(x_135, 4); - lean_ctor_release(x_135, 5); - x_187 = x_135; +if (lean_is_exclusive(x_132)) { + lean_ctor_release(x_132, 0); + lean_ctor_release(x_132, 1); + lean_ctor_release(x_132, 2); + lean_ctor_release(x_132, 3); + lean_ctor_release(x_132, 4); + lean_ctor_release(x_132, 5); + x_184 = x_132; } else { - lean_dec_ref(x_135); + lean_dec_ref(x_132); + x_184 = lean_box(0); +} +x_185 = lean_ctor_get(x_133, 0); +lean_inc(x_185); +x_186 = lean_ctor_get(x_133, 1); +lean_inc(x_186); +if (lean_is_exclusive(x_133)) { + lean_ctor_release(x_133, 0); + lean_ctor_release(x_133, 1); + lean_ctor_release(x_133, 2); + x_187 = x_133; +} else { + lean_dec_ref(x_133); x_187 = lean_box(0); } -x_188 = lean_ctor_get(x_136, 0); -lean_inc(x_188); -x_189 = lean_ctor_get(x_136, 1); -lean_inc(x_189); -if (lean_is_exclusive(x_136)) { - lean_ctor_release(x_136, 0); - lean_ctor_release(x_136, 1); - lean_ctor_release(x_136, 2); - x_190 = x_136; -} else { - lean_dec_ref(x_136); - x_190 = lean_box(0); -} -if (lean_is_scalar(x_190)) { - x_191 = lean_alloc_ctor(0, 3, 0); -} else { - x_191 = x_190; -} -lean_ctor_set(x_191, 0, x_188); -lean_ctor_set(x_191, 1, x_189); -lean_ctor_set(x_191, 2, x_63); if (lean_is_scalar(x_187)) { - x_192 = lean_alloc_ctor(0, 6, 0); + x_188 = lean_alloc_ctor(0, 3, 0); } else { - x_192 = x_187; + x_188 = x_187; } -lean_ctor_set(x_192, 0, x_182); -lean_ctor_set(x_192, 1, x_183); -lean_ctor_set(x_192, 2, x_191); -lean_ctor_set(x_192, 3, x_184); -lean_ctor_set(x_192, 4, x_185); -lean_ctor_set(x_192, 5, x_186); -if (lean_is_scalar(x_181)) { - x_193 = lean_alloc_ctor(0, 6, 0); +lean_ctor_set(x_188, 0, x_185); +lean_ctor_set(x_188, 1, x_186); +lean_ctor_set(x_188, 2, x_60); +if (lean_is_scalar(x_184)) { + x_189 = lean_alloc_ctor(0, 6, 0); } else { - x_193 = x_181; + x_189 = x_184; } -lean_ctor_set(x_193, 0, x_192); -lean_ctor_set(x_193, 1, x_176); -lean_ctor_set(x_193, 2, x_177); -lean_ctor_set(x_193, 3, x_178); -lean_ctor_set(x_193, 4, x_179); -lean_ctor_set(x_193, 5, x_180); -x_194 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_194, 0, x_175); -lean_ctor_set(x_194, 1, x_193); -return x_194; +lean_ctor_set(x_189, 0, x_179); +lean_ctor_set(x_189, 1, x_180); +lean_ctor_set(x_189, 2, x_188); +lean_ctor_set(x_189, 3, x_181); +lean_ctor_set(x_189, 4, x_182); +lean_ctor_set(x_189, 5, x_183); +if (lean_is_scalar(x_178)) { + x_190 = lean_alloc_ctor(0, 6, 0); +} else { + x_190 = x_178; +} +lean_ctor_set(x_190, 0, x_189); +lean_ctor_set(x_190, 1, x_173); +lean_ctor_set(x_190, 2, x_174); +lean_ctor_set(x_190, 3, x_175); +lean_ctor_set(x_190, 4, x_176); +lean_ctor_set(x_190, 5, x_177); +x_191 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_191, 0, x_172); +lean_ctor_set(x_191, 1, x_190); +return x_191; } } } else { -lean_object* x_195; lean_object* x_196; lean_object* x_197; lean_object* x_198; lean_object* x_199; -x_195 = lean_ctor_get(x_65, 0); -x_196 = lean_ctor_get(x_65, 3); -x_197 = lean_ctor_get(x_65, 4); -lean_inc(x_197); -lean_inc(x_196); -lean_inc(x_195); -lean_dec(x_65); -x_198 = lean_alloc_ctor(0, 5, 0); -lean_ctor_set(x_198, 0, x_195); -lean_ctor_set(x_198, 1, x_60); -lean_ctor_set(x_198, 2, x_21); -lean_ctor_set(x_198, 3, x_196); -lean_ctor_set(x_198, 4, x_197); -lean_ctor_set(x_5, 0, x_198); -x_199 = lean_apply_4(x_4, x_61, x_62, x_5, x_66); -if (lean_obj_tag(x_199) == 0) +lean_object* x_192; lean_object* x_193; lean_object* x_194; lean_object* x_195; lean_object* x_196; +x_192 = lean_ctor_get(x_62, 0); +x_193 = lean_ctor_get(x_62, 3); +x_194 = lean_ctor_get(x_62, 4); +lean_inc(x_194); +lean_inc(x_193); +lean_inc(x_192); +lean_dec(x_62); +x_195 = lean_alloc_ctor(0, 5, 0); +lean_ctor_set(x_195, 0, x_192); +lean_ctor_set(x_195, 1, x_22); +lean_ctor_set(x_195, 2, x_23); +lean_ctor_set(x_195, 3, x_193); +lean_ctor_set(x_195, 4, x_194); +lean_ctor_set(x_5, 0, x_195); +x_196 = lean_apply_4(x_4, x_21, x_24, x_5, x_63); +if (lean_obj_tag(x_196) == 0) { -lean_object* x_200; lean_object* x_201; lean_object* x_202; lean_object* x_203; lean_object* x_204; lean_object* x_205; lean_object* x_206; lean_object* x_207; lean_object* x_208; lean_object* x_209; lean_object* x_210; lean_object* x_211; lean_object* x_212; lean_object* x_213; lean_object* x_214; lean_object* x_215; lean_object* x_216; lean_object* x_217; lean_object* x_218; lean_object* x_219; lean_object* x_220; lean_object* x_221; lean_object* x_222; lean_object* x_223; -x_200 = lean_ctor_get(x_199, 1); +lean_object* x_197; lean_object* x_198; lean_object* x_199; lean_object* x_200; lean_object* x_201; lean_object* x_202; lean_object* x_203; lean_object* x_204; lean_object* x_205; lean_object* x_206; lean_object* x_207; lean_object* x_208; lean_object* x_209; lean_object* x_210; lean_object* x_211; lean_object* x_212; lean_object* x_213; lean_object* x_214; lean_object* x_215; lean_object* x_216; lean_object* x_217; lean_object* x_218; lean_object* x_219; lean_object* x_220; +x_197 = lean_ctor_get(x_196, 1); +lean_inc(x_197); +x_198 = lean_ctor_get(x_197, 0); +lean_inc(x_198); +x_199 = lean_ctor_get(x_198, 2); +lean_inc(x_199); +x_200 = lean_ctor_get(x_196, 0); lean_inc(x_200); -x_201 = lean_ctor_get(x_200, 0); -lean_inc(x_201); -x_202 = lean_ctor_get(x_201, 2); +if (lean_is_exclusive(x_196)) { + lean_ctor_release(x_196, 0); + lean_ctor_release(x_196, 1); + x_201 = x_196; +} else { + lean_dec_ref(x_196); + x_201 = lean_box(0); +} +x_202 = lean_ctor_get(x_197, 1); lean_inc(x_202); -x_203 = lean_ctor_get(x_199, 0); +x_203 = lean_ctor_get(x_197, 2); lean_inc(x_203); +x_204 = lean_ctor_get(x_197, 3); +lean_inc(x_204); +x_205 = lean_ctor_get(x_197, 4); +lean_inc(x_205); +x_206 = lean_ctor_get(x_197, 5); +lean_inc(x_206); +if (lean_is_exclusive(x_197)) { + lean_ctor_release(x_197, 0); + lean_ctor_release(x_197, 1); + lean_ctor_release(x_197, 2); + lean_ctor_release(x_197, 3); + lean_ctor_release(x_197, 4); + lean_ctor_release(x_197, 5); + x_207 = x_197; +} else { + lean_dec_ref(x_197); + x_207 = lean_box(0); +} +x_208 = lean_ctor_get(x_198, 0); +lean_inc(x_208); +x_209 = lean_ctor_get(x_198, 1); +lean_inc(x_209); +x_210 = lean_ctor_get(x_198, 3); +lean_inc(x_210); +x_211 = lean_ctor_get(x_198, 4); +lean_inc(x_211); +x_212 = lean_ctor_get(x_198, 5); +lean_inc(x_212); +if (lean_is_exclusive(x_198)) { + lean_ctor_release(x_198, 0); + lean_ctor_release(x_198, 1); + lean_ctor_release(x_198, 2); + lean_ctor_release(x_198, 3); + lean_ctor_release(x_198, 4); + lean_ctor_release(x_198, 5); + x_213 = x_198; +} else { + lean_dec_ref(x_198); + x_213 = lean_box(0); +} +x_214 = lean_ctor_get(x_199, 0); +lean_inc(x_214); +x_215 = lean_ctor_get(x_199, 1); +lean_inc(x_215); if (lean_is_exclusive(x_199)) { lean_ctor_release(x_199, 0); lean_ctor_release(x_199, 1); - x_204 = x_199; + lean_ctor_release(x_199, 2); + x_216 = x_199; } else { lean_dec_ref(x_199); - x_204 = lean_box(0); -} -x_205 = lean_ctor_get(x_200, 1); -lean_inc(x_205); -x_206 = lean_ctor_get(x_200, 2); -lean_inc(x_206); -x_207 = lean_ctor_get(x_200, 3); -lean_inc(x_207); -x_208 = lean_ctor_get(x_200, 4); -lean_inc(x_208); -x_209 = lean_ctor_get(x_200, 5); -lean_inc(x_209); -if (lean_is_exclusive(x_200)) { - lean_ctor_release(x_200, 0); - lean_ctor_release(x_200, 1); - lean_ctor_release(x_200, 2); - lean_ctor_release(x_200, 3); - lean_ctor_release(x_200, 4); - lean_ctor_release(x_200, 5); - x_210 = x_200; -} else { - lean_dec_ref(x_200); - x_210 = lean_box(0); -} -x_211 = lean_ctor_get(x_201, 0); -lean_inc(x_211); -x_212 = lean_ctor_get(x_201, 1); -lean_inc(x_212); -x_213 = lean_ctor_get(x_201, 3); -lean_inc(x_213); -x_214 = lean_ctor_get(x_201, 4); -lean_inc(x_214); -x_215 = lean_ctor_get(x_201, 5); -lean_inc(x_215); -if (lean_is_exclusive(x_201)) { - lean_ctor_release(x_201, 0); - lean_ctor_release(x_201, 1); - lean_ctor_release(x_201, 2); - lean_ctor_release(x_201, 3); - lean_ctor_release(x_201, 4); - lean_ctor_release(x_201, 5); - x_216 = x_201; -} else { - lean_dec_ref(x_201); x_216 = lean_box(0); } -x_217 = lean_ctor_get(x_202, 0); -lean_inc(x_217); -x_218 = lean_ctor_get(x_202, 1); -lean_inc(x_218); -if (lean_is_exclusive(x_202)) { - lean_ctor_release(x_202, 0); - lean_ctor_release(x_202, 1); - lean_ctor_release(x_202, 2); - x_219 = x_202; -} else { - lean_dec_ref(x_202); - x_219 = lean_box(0); -} -if (lean_is_scalar(x_219)) { - x_220 = lean_alloc_ctor(0, 3, 0); -} else { - x_220 = x_219; -} -lean_ctor_set(x_220, 0, x_217); -lean_ctor_set(x_220, 1, x_218); -lean_ctor_set(x_220, 2, x_63); if (lean_is_scalar(x_216)) { - x_221 = lean_alloc_ctor(0, 6, 0); + x_217 = lean_alloc_ctor(0, 3, 0); } else { - x_221 = x_216; + x_217 = x_216; } -lean_ctor_set(x_221, 0, x_211); -lean_ctor_set(x_221, 1, x_212); -lean_ctor_set(x_221, 2, x_220); -lean_ctor_set(x_221, 3, x_213); -lean_ctor_set(x_221, 4, x_214); -lean_ctor_set(x_221, 5, x_215); -if (lean_is_scalar(x_210)) { - x_222 = lean_alloc_ctor(0, 6, 0); +lean_ctor_set(x_217, 0, x_214); +lean_ctor_set(x_217, 1, x_215); +lean_ctor_set(x_217, 2, x_60); +if (lean_is_scalar(x_213)) { + x_218 = lean_alloc_ctor(0, 6, 0); } else { - x_222 = x_210; + x_218 = x_213; } -lean_ctor_set(x_222, 0, x_221); -lean_ctor_set(x_222, 1, x_205); -lean_ctor_set(x_222, 2, x_206); -lean_ctor_set(x_222, 3, x_207); -lean_ctor_set(x_222, 4, x_208); -lean_ctor_set(x_222, 5, x_209); -if (lean_is_scalar(x_204)) { - x_223 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_218, 0, x_208); +lean_ctor_set(x_218, 1, x_209); +lean_ctor_set(x_218, 2, x_217); +lean_ctor_set(x_218, 3, x_210); +lean_ctor_set(x_218, 4, x_211); +lean_ctor_set(x_218, 5, x_212); +if (lean_is_scalar(x_207)) { + x_219 = lean_alloc_ctor(0, 6, 0); } else { - x_223 = x_204; + x_219 = x_207; } -lean_ctor_set(x_223, 0, x_203); -lean_ctor_set(x_223, 1, x_222); -return x_223; +lean_ctor_set(x_219, 0, x_218); +lean_ctor_set(x_219, 1, x_202); +lean_ctor_set(x_219, 2, x_203); +lean_ctor_set(x_219, 3, x_204); +lean_ctor_set(x_219, 4, x_205); +lean_ctor_set(x_219, 5, x_206); +if (lean_is_scalar(x_201)) { + x_220 = lean_alloc_ctor(0, 2, 0); +} else { + x_220 = x_201; +} +lean_ctor_set(x_220, 0, x_200); +lean_ctor_set(x_220, 1, x_219); +return x_220; } else { -lean_object* x_224; lean_object* x_225; lean_object* x_226; lean_object* x_227; lean_object* x_228; lean_object* x_229; lean_object* x_230; lean_object* x_231; lean_object* x_232; lean_object* x_233; lean_object* x_234; lean_object* x_235; lean_object* x_236; lean_object* x_237; lean_object* x_238; lean_object* x_239; lean_object* x_240; lean_object* x_241; lean_object* x_242; lean_object* x_243; lean_object* x_244; lean_object* x_245; lean_object* x_246; lean_object* x_247; -x_224 = lean_ctor_get(x_199, 1); +lean_object* x_221; lean_object* x_222; lean_object* x_223; lean_object* x_224; lean_object* x_225; lean_object* x_226; lean_object* x_227; lean_object* x_228; lean_object* x_229; lean_object* x_230; lean_object* x_231; lean_object* x_232; lean_object* x_233; lean_object* x_234; lean_object* x_235; lean_object* x_236; lean_object* x_237; lean_object* x_238; lean_object* x_239; lean_object* x_240; lean_object* x_241; lean_object* x_242; lean_object* x_243; lean_object* x_244; +x_221 = lean_ctor_get(x_196, 1); +lean_inc(x_221); +x_222 = lean_ctor_get(x_221, 0); +lean_inc(x_222); +x_223 = lean_ctor_get(x_222, 2); +lean_inc(x_223); +x_224 = lean_ctor_get(x_196, 0); lean_inc(x_224); -x_225 = lean_ctor_get(x_224, 0); -lean_inc(x_225); -x_226 = lean_ctor_get(x_225, 2); +if (lean_is_exclusive(x_196)) { + lean_ctor_release(x_196, 0); + lean_ctor_release(x_196, 1); + x_225 = x_196; +} else { + lean_dec_ref(x_196); + x_225 = lean_box(0); +} +x_226 = lean_ctor_get(x_221, 1); lean_inc(x_226); -x_227 = lean_ctor_get(x_199, 0); +x_227 = lean_ctor_get(x_221, 2); lean_inc(x_227); -if (lean_is_exclusive(x_199)) { - lean_ctor_release(x_199, 0); - lean_ctor_release(x_199, 1); - x_228 = x_199; -} else { - lean_dec_ref(x_199); - x_228 = lean_box(0); -} -x_229 = lean_ctor_get(x_224, 1); +x_228 = lean_ctor_get(x_221, 3); +lean_inc(x_228); +x_229 = lean_ctor_get(x_221, 4); lean_inc(x_229); -x_230 = lean_ctor_get(x_224, 2); +x_230 = lean_ctor_get(x_221, 5); lean_inc(x_230); -x_231 = lean_ctor_get(x_224, 3); -lean_inc(x_231); -x_232 = lean_ctor_get(x_224, 4); -lean_inc(x_232); -x_233 = lean_ctor_get(x_224, 5); -lean_inc(x_233); -if (lean_is_exclusive(x_224)) { - lean_ctor_release(x_224, 0); - lean_ctor_release(x_224, 1); - lean_ctor_release(x_224, 2); - lean_ctor_release(x_224, 3); - lean_ctor_release(x_224, 4); - lean_ctor_release(x_224, 5); - x_234 = x_224; +if (lean_is_exclusive(x_221)) { + lean_ctor_release(x_221, 0); + lean_ctor_release(x_221, 1); + lean_ctor_release(x_221, 2); + lean_ctor_release(x_221, 3); + lean_ctor_release(x_221, 4); + lean_ctor_release(x_221, 5); + x_231 = x_221; } else { - lean_dec_ref(x_224); - x_234 = lean_box(0); + lean_dec_ref(x_221); + x_231 = lean_box(0); } -x_235 = lean_ctor_get(x_225, 0); +x_232 = lean_ctor_get(x_222, 0); +lean_inc(x_232); +x_233 = lean_ctor_get(x_222, 1); +lean_inc(x_233); +x_234 = lean_ctor_get(x_222, 3); +lean_inc(x_234); +x_235 = lean_ctor_get(x_222, 4); lean_inc(x_235); -x_236 = lean_ctor_get(x_225, 1); +x_236 = lean_ctor_get(x_222, 5); lean_inc(x_236); -x_237 = lean_ctor_get(x_225, 3); -lean_inc(x_237); -x_238 = lean_ctor_get(x_225, 4); -lean_inc(x_238); -x_239 = lean_ctor_get(x_225, 5); -lean_inc(x_239); -if (lean_is_exclusive(x_225)) { - lean_ctor_release(x_225, 0); - lean_ctor_release(x_225, 1); - lean_ctor_release(x_225, 2); - lean_ctor_release(x_225, 3); - lean_ctor_release(x_225, 4); - lean_ctor_release(x_225, 5); - x_240 = x_225; +if (lean_is_exclusive(x_222)) { + lean_ctor_release(x_222, 0); + lean_ctor_release(x_222, 1); + lean_ctor_release(x_222, 2); + lean_ctor_release(x_222, 3); + lean_ctor_release(x_222, 4); + lean_ctor_release(x_222, 5); + x_237 = x_222; } else { - lean_dec_ref(x_225); + lean_dec_ref(x_222); + x_237 = lean_box(0); +} +x_238 = lean_ctor_get(x_223, 0); +lean_inc(x_238); +x_239 = lean_ctor_get(x_223, 1); +lean_inc(x_239); +if (lean_is_exclusive(x_223)) { + lean_ctor_release(x_223, 0); + lean_ctor_release(x_223, 1); + lean_ctor_release(x_223, 2); + x_240 = x_223; +} else { + lean_dec_ref(x_223); x_240 = lean_box(0); } -x_241 = lean_ctor_get(x_226, 0); -lean_inc(x_241); -x_242 = lean_ctor_get(x_226, 1); -lean_inc(x_242); -if (lean_is_exclusive(x_226)) { - lean_ctor_release(x_226, 0); - lean_ctor_release(x_226, 1); - lean_ctor_release(x_226, 2); - x_243 = x_226; -} else { - lean_dec_ref(x_226); - x_243 = lean_box(0); -} -if (lean_is_scalar(x_243)) { - x_244 = lean_alloc_ctor(0, 3, 0); -} else { - x_244 = x_243; -} -lean_ctor_set(x_244, 0, x_241); -lean_ctor_set(x_244, 1, x_242); -lean_ctor_set(x_244, 2, x_63); if (lean_is_scalar(x_240)) { - x_245 = lean_alloc_ctor(0, 6, 0); + x_241 = lean_alloc_ctor(0, 3, 0); } else { - x_245 = x_240; + x_241 = x_240; } -lean_ctor_set(x_245, 0, x_235); -lean_ctor_set(x_245, 1, x_236); -lean_ctor_set(x_245, 2, x_244); -lean_ctor_set(x_245, 3, x_237); -lean_ctor_set(x_245, 4, x_238); -lean_ctor_set(x_245, 5, x_239); -if (lean_is_scalar(x_234)) { - x_246 = lean_alloc_ctor(0, 6, 0); +lean_ctor_set(x_241, 0, x_238); +lean_ctor_set(x_241, 1, x_239); +lean_ctor_set(x_241, 2, x_60); +if (lean_is_scalar(x_237)) { + x_242 = lean_alloc_ctor(0, 6, 0); } else { - x_246 = x_234; + x_242 = x_237; } -lean_ctor_set(x_246, 0, x_245); -lean_ctor_set(x_246, 1, x_229); -lean_ctor_set(x_246, 2, x_230); -lean_ctor_set(x_246, 3, x_231); -lean_ctor_set(x_246, 4, x_232); -lean_ctor_set(x_246, 5, x_233); -if (lean_is_scalar(x_228)) { - x_247 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_242, 0, x_232); +lean_ctor_set(x_242, 1, x_233); +lean_ctor_set(x_242, 2, x_241); +lean_ctor_set(x_242, 3, x_234); +lean_ctor_set(x_242, 4, x_235); +lean_ctor_set(x_242, 5, x_236); +if (lean_is_scalar(x_231)) { + x_243 = lean_alloc_ctor(0, 6, 0); } else { - x_247 = x_228; + x_243 = x_231; } -lean_ctor_set(x_247, 0, x_227); -lean_ctor_set(x_247, 1, x_246); -return x_247; +lean_ctor_set(x_243, 0, x_242); +lean_ctor_set(x_243, 1, x_226); +lean_ctor_set(x_243, 2, x_227); +lean_ctor_set(x_243, 3, x_228); +lean_ctor_set(x_243, 4, x_229); +lean_ctor_set(x_243, 5, x_230); +if (lean_is_scalar(x_225)) { + x_244 = lean_alloc_ctor(1, 2, 0); +} else { + x_244 = x_225; +} +lean_ctor_set(x_244, 0, x_224); +lean_ctor_set(x_244, 1, x_243); +return x_244; } } } else { -lean_object* x_248; lean_object* x_249; lean_object* x_250; lean_object* x_251; lean_object* x_252; lean_object* x_253; lean_object* x_254; lean_object* x_255; lean_object* x_256; uint8_t x_257; uint8_t x_258; uint8_t x_259; lean_object* x_260; lean_object* x_261; lean_object* x_262; lean_object* x_263; lean_object* x_264; lean_object* x_265; lean_object* x_266; -x_248 = lean_ctor_get(x_5, 1); -x_249 = lean_ctor_get(x_5, 2); -x_250 = lean_ctor_get(x_5, 3); -x_251 = lean_ctor_get(x_5, 4); -x_252 = lean_ctor_get(x_5, 5); -x_253 = lean_ctor_get(x_5, 6); -x_254 = lean_ctor_get(x_5, 7); -x_255 = lean_ctor_get(x_5, 8); -x_256 = lean_ctor_get(x_5, 9); -x_257 = lean_ctor_get_uint8(x_5, sizeof(void*)*10); -x_258 = lean_ctor_get_uint8(x_5, sizeof(void*)*10 + 1); -x_259 = lean_ctor_get_uint8(x_5, sizeof(void*)*10 + 2); -lean_inc(x_256); -lean_inc(x_255); -lean_inc(x_254); +lean_object* x_245; lean_object* x_246; lean_object* x_247; lean_object* x_248; lean_object* x_249; lean_object* x_250; lean_object* x_251; lean_object* x_252; lean_object* x_253; uint8_t x_254; uint8_t x_255; uint8_t x_256; lean_object* x_257; lean_object* x_258; lean_object* x_259; lean_object* x_260; lean_object* x_261; lean_object* x_262; lean_object* x_263; +x_245 = lean_ctor_get(x_5, 1); +x_246 = lean_ctor_get(x_5, 2); +x_247 = lean_ctor_get(x_5, 3); +x_248 = lean_ctor_get(x_5, 4); +x_249 = lean_ctor_get(x_5, 5); +x_250 = lean_ctor_get(x_5, 6); +x_251 = lean_ctor_get(x_5, 7); +x_252 = lean_ctor_get(x_5, 8); +x_253 = lean_ctor_get(x_5, 9); +x_254 = lean_ctor_get_uint8(x_5, sizeof(void*)*10); +x_255 = lean_ctor_get_uint8(x_5, sizeof(void*)*10 + 1); +x_256 = lean_ctor_get_uint8(x_5, sizeof(void*)*10 + 2); lean_inc(x_253); lean_inc(x_252); lean_inc(x_251); lean_inc(x_250); lean_inc(x_249); lean_inc(x_248); +lean_inc(x_247); +lean_inc(x_246); +lean_inc(x_245); lean_dec(x_5); -x_260 = lean_ctor_get(x_65, 0); -lean_inc(x_260); -x_261 = lean_ctor_get(x_65, 3); -lean_inc(x_261); -x_262 = lean_ctor_get(x_65, 4); -lean_inc(x_262); -if (lean_is_exclusive(x_65)) { - lean_ctor_release(x_65, 0); - lean_ctor_release(x_65, 1); - lean_ctor_release(x_65, 2); - lean_ctor_release(x_65, 3); - lean_ctor_release(x_65, 4); - x_263 = x_65; +x_257 = lean_ctor_get(x_62, 0); +lean_inc(x_257); +x_258 = lean_ctor_get(x_62, 3); +lean_inc(x_258); +x_259 = lean_ctor_get(x_62, 4); +lean_inc(x_259); +if (lean_is_exclusive(x_62)) { + lean_ctor_release(x_62, 0); + lean_ctor_release(x_62, 1); + lean_ctor_release(x_62, 2); + lean_ctor_release(x_62, 3); + lean_ctor_release(x_62, 4); + x_260 = x_62; } else { - lean_dec_ref(x_65); - x_263 = lean_box(0); + lean_dec_ref(x_62); + x_260 = lean_box(0); } -if (lean_is_scalar(x_263)) { - x_264 = lean_alloc_ctor(0, 5, 0); +if (lean_is_scalar(x_260)) { + x_261 = lean_alloc_ctor(0, 5, 0); } else { - x_264 = x_263; + x_261 = x_260; } -lean_ctor_set(x_264, 0, x_260); -lean_ctor_set(x_264, 1, x_60); -lean_ctor_set(x_264, 2, x_21); -lean_ctor_set(x_264, 3, x_261); -lean_ctor_set(x_264, 4, x_262); -x_265 = lean_alloc_ctor(0, 10, 3); -lean_ctor_set(x_265, 0, x_264); -lean_ctor_set(x_265, 1, x_248); -lean_ctor_set(x_265, 2, x_249); -lean_ctor_set(x_265, 3, x_250); -lean_ctor_set(x_265, 4, x_251); -lean_ctor_set(x_265, 5, x_252); -lean_ctor_set(x_265, 6, x_253); -lean_ctor_set(x_265, 7, x_254); -lean_ctor_set(x_265, 8, x_255); -lean_ctor_set(x_265, 9, x_256); -lean_ctor_set_uint8(x_265, sizeof(void*)*10, x_257); -lean_ctor_set_uint8(x_265, sizeof(void*)*10 + 1, x_258); -lean_ctor_set_uint8(x_265, sizeof(void*)*10 + 2, x_259); -x_266 = lean_apply_4(x_4, x_61, x_62, x_265, x_66); -if (lean_obj_tag(x_266) == 0) +lean_ctor_set(x_261, 0, x_257); +lean_ctor_set(x_261, 1, x_22); +lean_ctor_set(x_261, 2, x_23); +lean_ctor_set(x_261, 3, x_258); +lean_ctor_set(x_261, 4, x_259); +x_262 = lean_alloc_ctor(0, 10, 3); +lean_ctor_set(x_262, 0, x_261); +lean_ctor_set(x_262, 1, x_245); +lean_ctor_set(x_262, 2, x_246); +lean_ctor_set(x_262, 3, x_247); +lean_ctor_set(x_262, 4, x_248); +lean_ctor_set(x_262, 5, x_249); +lean_ctor_set(x_262, 6, x_250); +lean_ctor_set(x_262, 7, x_251); +lean_ctor_set(x_262, 8, x_252); +lean_ctor_set(x_262, 9, x_253); +lean_ctor_set_uint8(x_262, sizeof(void*)*10, x_254); +lean_ctor_set_uint8(x_262, sizeof(void*)*10 + 1, x_255); +lean_ctor_set_uint8(x_262, sizeof(void*)*10 + 2, x_256); +x_263 = lean_apply_4(x_4, x_21, x_24, x_262, x_63); +if (lean_obj_tag(x_263) == 0) { -lean_object* x_267; lean_object* x_268; lean_object* x_269; lean_object* x_270; lean_object* x_271; lean_object* x_272; lean_object* x_273; lean_object* x_274; lean_object* x_275; lean_object* x_276; lean_object* x_277; lean_object* x_278; lean_object* x_279; lean_object* x_280; lean_object* x_281; lean_object* x_282; lean_object* x_283; lean_object* x_284; lean_object* x_285; lean_object* x_286; lean_object* x_287; lean_object* x_288; lean_object* x_289; lean_object* x_290; -x_267 = lean_ctor_get(x_266, 1); +lean_object* x_264; lean_object* x_265; lean_object* x_266; lean_object* x_267; lean_object* x_268; lean_object* x_269; lean_object* x_270; lean_object* x_271; lean_object* x_272; lean_object* x_273; lean_object* x_274; lean_object* x_275; lean_object* x_276; lean_object* x_277; lean_object* x_278; lean_object* x_279; lean_object* x_280; lean_object* x_281; lean_object* x_282; lean_object* x_283; lean_object* x_284; lean_object* x_285; lean_object* x_286; lean_object* x_287; +x_264 = lean_ctor_get(x_263, 1); +lean_inc(x_264); +x_265 = lean_ctor_get(x_264, 0); +lean_inc(x_265); +x_266 = lean_ctor_get(x_265, 2); +lean_inc(x_266); +x_267 = lean_ctor_get(x_263, 0); lean_inc(x_267); -x_268 = lean_ctor_get(x_267, 0); -lean_inc(x_268); -x_269 = lean_ctor_get(x_268, 2); +if (lean_is_exclusive(x_263)) { + lean_ctor_release(x_263, 0); + lean_ctor_release(x_263, 1); + x_268 = x_263; +} else { + lean_dec_ref(x_263); + x_268 = lean_box(0); +} +x_269 = lean_ctor_get(x_264, 1); lean_inc(x_269); -x_270 = lean_ctor_get(x_266, 0); +x_270 = lean_ctor_get(x_264, 2); lean_inc(x_270); +x_271 = lean_ctor_get(x_264, 3); +lean_inc(x_271); +x_272 = lean_ctor_get(x_264, 4); +lean_inc(x_272); +x_273 = lean_ctor_get(x_264, 5); +lean_inc(x_273); +if (lean_is_exclusive(x_264)) { + lean_ctor_release(x_264, 0); + lean_ctor_release(x_264, 1); + lean_ctor_release(x_264, 2); + lean_ctor_release(x_264, 3); + lean_ctor_release(x_264, 4); + lean_ctor_release(x_264, 5); + x_274 = x_264; +} else { + lean_dec_ref(x_264); + x_274 = lean_box(0); +} +x_275 = lean_ctor_get(x_265, 0); +lean_inc(x_275); +x_276 = lean_ctor_get(x_265, 1); +lean_inc(x_276); +x_277 = lean_ctor_get(x_265, 3); +lean_inc(x_277); +x_278 = lean_ctor_get(x_265, 4); +lean_inc(x_278); +x_279 = lean_ctor_get(x_265, 5); +lean_inc(x_279); +if (lean_is_exclusive(x_265)) { + lean_ctor_release(x_265, 0); + lean_ctor_release(x_265, 1); + lean_ctor_release(x_265, 2); + lean_ctor_release(x_265, 3); + lean_ctor_release(x_265, 4); + lean_ctor_release(x_265, 5); + x_280 = x_265; +} else { + lean_dec_ref(x_265); + x_280 = lean_box(0); +} +x_281 = lean_ctor_get(x_266, 0); +lean_inc(x_281); +x_282 = lean_ctor_get(x_266, 1); +lean_inc(x_282); if (lean_is_exclusive(x_266)) { lean_ctor_release(x_266, 0); lean_ctor_release(x_266, 1); - x_271 = x_266; + lean_ctor_release(x_266, 2); + x_283 = x_266; } else { lean_dec_ref(x_266); - x_271 = lean_box(0); -} -x_272 = lean_ctor_get(x_267, 1); -lean_inc(x_272); -x_273 = lean_ctor_get(x_267, 2); -lean_inc(x_273); -x_274 = lean_ctor_get(x_267, 3); -lean_inc(x_274); -x_275 = lean_ctor_get(x_267, 4); -lean_inc(x_275); -x_276 = lean_ctor_get(x_267, 5); -lean_inc(x_276); -if (lean_is_exclusive(x_267)) { - lean_ctor_release(x_267, 0); - lean_ctor_release(x_267, 1); - lean_ctor_release(x_267, 2); - lean_ctor_release(x_267, 3); - lean_ctor_release(x_267, 4); - lean_ctor_release(x_267, 5); - x_277 = x_267; -} else { - lean_dec_ref(x_267); - x_277 = lean_box(0); -} -x_278 = lean_ctor_get(x_268, 0); -lean_inc(x_278); -x_279 = lean_ctor_get(x_268, 1); -lean_inc(x_279); -x_280 = lean_ctor_get(x_268, 3); -lean_inc(x_280); -x_281 = lean_ctor_get(x_268, 4); -lean_inc(x_281); -x_282 = lean_ctor_get(x_268, 5); -lean_inc(x_282); -if (lean_is_exclusive(x_268)) { - lean_ctor_release(x_268, 0); - lean_ctor_release(x_268, 1); - lean_ctor_release(x_268, 2); - lean_ctor_release(x_268, 3); - lean_ctor_release(x_268, 4); - lean_ctor_release(x_268, 5); - x_283 = x_268; -} else { - lean_dec_ref(x_268); x_283 = lean_box(0); } -x_284 = lean_ctor_get(x_269, 0); -lean_inc(x_284); -x_285 = lean_ctor_get(x_269, 1); -lean_inc(x_285); -if (lean_is_exclusive(x_269)) { - lean_ctor_release(x_269, 0); - lean_ctor_release(x_269, 1); - lean_ctor_release(x_269, 2); - x_286 = x_269; -} else { - lean_dec_ref(x_269); - x_286 = lean_box(0); -} -if (lean_is_scalar(x_286)) { - x_287 = lean_alloc_ctor(0, 3, 0); -} else { - x_287 = x_286; -} -lean_ctor_set(x_287, 0, x_284); -lean_ctor_set(x_287, 1, x_285); -lean_ctor_set(x_287, 2, x_63); if (lean_is_scalar(x_283)) { - x_288 = lean_alloc_ctor(0, 6, 0); + x_284 = lean_alloc_ctor(0, 3, 0); } else { - x_288 = x_283; + x_284 = x_283; } -lean_ctor_set(x_288, 0, x_278); -lean_ctor_set(x_288, 1, x_279); -lean_ctor_set(x_288, 2, x_287); -lean_ctor_set(x_288, 3, x_280); -lean_ctor_set(x_288, 4, x_281); -lean_ctor_set(x_288, 5, x_282); -if (lean_is_scalar(x_277)) { - x_289 = lean_alloc_ctor(0, 6, 0); +lean_ctor_set(x_284, 0, x_281); +lean_ctor_set(x_284, 1, x_282); +lean_ctor_set(x_284, 2, x_60); +if (lean_is_scalar(x_280)) { + x_285 = lean_alloc_ctor(0, 6, 0); } else { - x_289 = x_277; + x_285 = x_280; } -lean_ctor_set(x_289, 0, x_288); -lean_ctor_set(x_289, 1, x_272); -lean_ctor_set(x_289, 2, x_273); -lean_ctor_set(x_289, 3, x_274); -lean_ctor_set(x_289, 4, x_275); -lean_ctor_set(x_289, 5, x_276); -if (lean_is_scalar(x_271)) { - x_290 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_285, 0, x_275); +lean_ctor_set(x_285, 1, x_276); +lean_ctor_set(x_285, 2, x_284); +lean_ctor_set(x_285, 3, x_277); +lean_ctor_set(x_285, 4, x_278); +lean_ctor_set(x_285, 5, x_279); +if (lean_is_scalar(x_274)) { + x_286 = lean_alloc_ctor(0, 6, 0); } else { - x_290 = x_271; + x_286 = x_274; } -lean_ctor_set(x_290, 0, x_270); -lean_ctor_set(x_290, 1, x_289); -return x_290; +lean_ctor_set(x_286, 0, x_285); +lean_ctor_set(x_286, 1, x_269); +lean_ctor_set(x_286, 2, x_270); +lean_ctor_set(x_286, 3, x_271); +lean_ctor_set(x_286, 4, x_272); +lean_ctor_set(x_286, 5, x_273); +if (lean_is_scalar(x_268)) { + x_287 = lean_alloc_ctor(0, 2, 0); +} else { + x_287 = x_268; +} +lean_ctor_set(x_287, 0, x_267); +lean_ctor_set(x_287, 1, x_286); +return x_287; } else { -lean_object* x_291; lean_object* x_292; lean_object* x_293; lean_object* x_294; lean_object* x_295; lean_object* x_296; lean_object* x_297; lean_object* x_298; lean_object* x_299; lean_object* x_300; lean_object* x_301; lean_object* x_302; lean_object* x_303; lean_object* x_304; lean_object* x_305; lean_object* x_306; lean_object* x_307; lean_object* x_308; lean_object* x_309; lean_object* x_310; lean_object* x_311; lean_object* x_312; lean_object* x_313; lean_object* x_314; -x_291 = lean_ctor_get(x_266, 1); +lean_object* x_288; lean_object* x_289; lean_object* x_290; lean_object* x_291; lean_object* x_292; lean_object* x_293; lean_object* x_294; lean_object* x_295; lean_object* x_296; lean_object* x_297; lean_object* x_298; lean_object* x_299; lean_object* x_300; lean_object* x_301; lean_object* x_302; lean_object* x_303; lean_object* x_304; lean_object* x_305; lean_object* x_306; lean_object* x_307; lean_object* x_308; lean_object* x_309; lean_object* x_310; lean_object* x_311; +x_288 = lean_ctor_get(x_263, 1); +lean_inc(x_288); +x_289 = lean_ctor_get(x_288, 0); +lean_inc(x_289); +x_290 = lean_ctor_get(x_289, 2); +lean_inc(x_290); +x_291 = lean_ctor_get(x_263, 0); lean_inc(x_291); -x_292 = lean_ctor_get(x_291, 0); -lean_inc(x_292); -x_293 = lean_ctor_get(x_292, 2); +if (lean_is_exclusive(x_263)) { + lean_ctor_release(x_263, 0); + lean_ctor_release(x_263, 1); + x_292 = x_263; +} else { + lean_dec_ref(x_263); + x_292 = lean_box(0); +} +x_293 = lean_ctor_get(x_288, 1); lean_inc(x_293); -x_294 = lean_ctor_get(x_266, 0); +x_294 = lean_ctor_get(x_288, 2); lean_inc(x_294); -if (lean_is_exclusive(x_266)) { - lean_ctor_release(x_266, 0); - lean_ctor_release(x_266, 1); - x_295 = x_266; -} else { - lean_dec_ref(x_266); - x_295 = lean_box(0); -} -x_296 = lean_ctor_get(x_291, 1); +x_295 = lean_ctor_get(x_288, 3); +lean_inc(x_295); +x_296 = lean_ctor_get(x_288, 4); lean_inc(x_296); -x_297 = lean_ctor_get(x_291, 2); +x_297 = lean_ctor_get(x_288, 5); lean_inc(x_297); -x_298 = lean_ctor_get(x_291, 3); -lean_inc(x_298); -x_299 = lean_ctor_get(x_291, 4); -lean_inc(x_299); -x_300 = lean_ctor_get(x_291, 5); -lean_inc(x_300); -if (lean_is_exclusive(x_291)) { - lean_ctor_release(x_291, 0); - lean_ctor_release(x_291, 1); - lean_ctor_release(x_291, 2); - lean_ctor_release(x_291, 3); - lean_ctor_release(x_291, 4); - lean_ctor_release(x_291, 5); - x_301 = x_291; +if (lean_is_exclusive(x_288)) { + lean_ctor_release(x_288, 0); + lean_ctor_release(x_288, 1); + lean_ctor_release(x_288, 2); + lean_ctor_release(x_288, 3); + lean_ctor_release(x_288, 4); + lean_ctor_release(x_288, 5); + x_298 = x_288; } else { - lean_dec_ref(x_291); - x_301 = lean_box(0); + lean_dec_ref(x_288); + x_298 = lean_box(0); } -x_302 = lean_ctor_get(x_292, 0); +x_299 = lean_ctor_get(x_289, 0); +lean_inc(x_299); +x_300 = lean_ctor_get(x_289, 1); +lean_inc(x_300); +x_301 = lean_ctor_get(x_289, 3); +lean_inc(x_301); +x_302 = lean_ctor_get(x_289, 4); lean_inc(x_302); -x_303 = lean_ctor_get(x_292, 1); +x_303 = lean_ctor_get(x_289, 5); lean_inc(x_303); -x_304 = lean_ctor_get(x_292, 3); -lean_inc(x_304); -x_305 = lean_ctor_get(x_292, 4); -lean_inc(x_305); -x_306 = lean_ctor_get(x_292, 5); -lean_inc(x_306); -if (lean_is_exclusive(x_292)) { - lean_ctor_release(x_292, 0); - lean_ctor_release(x_292, 1); - lean_ctor_release(x_292, 2); - lean_ctor_release(x_292, 3); - lean_ctor_release(x_292, 4); - lean_ctor_release(x_292, 5); - x_307 = x_292; +if (lean_is_exclusive(x_289)) { + lean_ctor_release(x_289, 0); + lean_ctor_release(x_289, 1); + lean_ctor_release(x_289, 2); + lean_ctor_release(x_289, 3); + lean_ctor_release(x_289, 4); + lean_ctor_release(x_289, 5); + x_304 = x_289; } else { - lean_dec_ref(x_292); + lean_dec_ref(x_289); + x_304 = lean_box(0); +} +x_305 = lean_ctor_get(x_290, 0); +lean_inc(x_305); +x_306 = lean_ctor_get(x_290, 1); +lean_inc(x_306); +if (lean_is_exclusive(x_290)) { + lean_ctor_release(x_290, 0); + lean_ctor_release(x_290, 1); + lean_ctor_release(x_290, 2); + x_307 = x_290; +} else { + lean_dec_ref(x_290); x_307 = lean_box(0); } -x_308 = lean_ctor_get(x_293, 0); -lean_inc(x_308); -x_309 = lean_ctor_get(x_293, 1); -lean_inc(x_309); -if (lean_is_exclusive(x_293)) { - lean_ctor_release(x_293, 0); - lean_ctor_release(x_293, 1); - lean_ctor_release(x_293, 2); - x_310 = x_293; -} else { - lean_dec_ref(x_293); - x_310 = lean_box(0); -} -if (lean_is_scalar(x_310)) { - x_311 = lean_alloc_ctor(0, 3, 0); -} else { - x_311 = x_310; -} -lean_ctor_set(x_311, 0, x_308); -lean_ctor_set(x_311, 1, x_309); -lean_ctor_set(x_311, 2, x_63); if (lean_is_scalar(x_307)) { - x_312 = lean_alloc_ctor(0, 6, 0); + x_308 = lean_alloc_ctor(0, 3, 0); } else { - x_312 = x_307; + x_308 = x_307; } -lean_ctor_set(x_312, 0, x_302); -lean_ctor_set(x_312, 1, x_303); -lean_ctor_set(x_312, 2, x_311); -lean_ctor_set(x_312, 3, x_304); -lean_ctor_set(x_312, 4, x_305); -lean_ctor_set(x_312, 5, x_306); -if (lean_is_scalar(x_301)) { - x_313 = lean_alloc_ctor(0, 6, 0); +lean_ctor_set(x_308, 0, x_305); +lean_ctor_set(x_308, 1, x_306); +lean_ctor_set(x_308, 2, x_60); +if (lean_is_scalar(x_304)) { + x_309 = lean_alloc_ctor(0, 6, 0); } else { - x_313 = x_301; + x_309 = x_304; } -lean_ctor_set(x_313, 0, x_312); -lean_ctor_set(x_313, 1, x_296); -lean_ctor_set(x_313, 2, x_297); -lean_ctor_set(x_313, 3, x_298); -lean_ctor_set(x_313, 4, x_299); -lean_ctor_set(x_313, 5, x_300); -if (lean_is_scalar(x_295)) { - x_314 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_309, 0, x_299); +lean_ctor_set(x_309, 1, x_300); +lean_ctor_set(x_309, 2, x_308); +lean_ctor_set(x_309, 3, x_301); +lean_ctor_set(x_309, 4, x_302); +lean_ctor_set(x_309, 5, x_303); +if (lean_is_scalar(x_298)) { + x_310 = lean_alloc_ctor(0, 6, 0); } else { - x_314 = x_295; + x_310 = x_298; } -lean_ctor_set(x_314, 0, x_294); -lean_ctor_set(x_314, 1, x_313); -return x_314; +lean_ctor_set(x_310, 0, x_309); +lean_ctor_set(x_310, 1, x_293); +lean_ctor_set(x_310, 2, x_294); +lean_ctor_set(x_310, 3, x_295); +lean_ctor_set(x_310, 4, x_296); +lean_ctor_set(x_310, 5, x_297); +if (lean_is_scalar(x_292)) { + x_311 = lean_alloc_ctor(1, 2, 0); +} else { + x_311 = x_292; +} +lean_ctor_set(x_311, 0, x_291); +lean_ctor_set(x_311, 1, x_310); +return x_311; } } } } else { -uint8_t x_315; +uint8_t x_312; lean_dec(x_12); lean_dec(x_5); lean_dec(x_4); -x_315 = !lean_is_exclusive(x_17); -if (x_315 == 0) +x_312 = !lean_is_exclusive(x_17); +if (x_312 == 0) { return x_17; } else { -lean_object* x_316; lean_object* x_317; lean_object* x_318; -x_316 = lean_ctor_get(x_17, 0); -x_317 = lean_ctor_get(x_17, 1); -lean_inc(x_317); -lean_inc(x_316); +lean_object* x_313; lean_object* x_314; lean_object* x_315; +x_313 = lean_ctor_get(x_17, 0); +x_314 = lean_ctor_get(x_17, 1); +lean_inc(x_314); +lean_inc(x_313); lean_dec(x_17); -x_318 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_318, 0, x_316); -lean_ctor_set(x_318, 1, x_317); -return x_318; +x_315 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_315, 0, x_313); +lean_ctor_set(x_315, 1, x_314); +return x_315; } } } else { -lean_object* x_319; lean_object* x_320; -x_319 = l_Array_empty___closed__1; -x_320 = lean_apply_4(x_4, x_319, x_2, x_5, x_6); -return x_320; +lean_object* x_316; lean_object* x_317; +x_316 = l_Array_empty___closed__1; +x_317 = lean_apply_4(x_4, x_316, x_2, x_5, x_6); +return x_317; } } } @@ -19900,6 +21013,52 @@ x_7 = l_Lean_Elab_Term_elabFunCore(x_1, x_2, x_6, x_4, x_5); return x_7; } } +lean_object* l_Lean_Elab_Term_elabFun(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +uint8_t x_5; lean_object* x_6; +x_5 = 0; +x_6 = l_Lean_Elab_Term_elabFunCore(x_1, x_2, x_5, x_3, x_4); +return x_6; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabFun___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("elabFun"); +return x_1; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabFun___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Elab_Term_declareBuiltinTermElab___closed__3; +x_2 = l___regBuiltinTermElab_Lean_Elab_Term_elabFun___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* _init_l___regBuiltinTermElab_Lean_Elab_Term_elabFun___closed__3() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_Elab_Term_elabFun), 4, 0); +return x_1; +} +} +lean_object* l___regBuiltinTermElab_Lean_Elab_Term_elabFun(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_fun___elambda__1___closed__2; +x_3 = l___regBuiltinTermElab_Lean_Elab_Term_elabFun___closed__2; +x_4 = l___regBuiltinTermElab_Lean_Elab_Term_elabFun___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_expandOptType(lean_object* x_1, lean_object* x_2) { _start: { @@ -21434,6 +22593,15 @@ l___private_Init_Lean_Elab_Binders_10__expandFunBindersAux___main___closed__8 = lean_mark_persistent(l___private_Init_Lean_Elab_Binders_10__expandFunBindersAux___main___closed__8); l___private_Init_Lean_Elab_Binders_10__expandFunBindersAux___main___closed__9 = _init_l___private_Init_Lean_Elab_Binders_10__expandFunBindersAux___main___closed__9(); lean_mark_persistent(l___private_Init_Lean_Elab_Binders_10__expandFunBindersAux___main___closed__9); +l___regBuiltinTermElab_Lean_Elab_Term_elabFun___closed__1 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabFun___closed__1(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabFun___closed__1); +l___regBuiltinTermElab_Lean_Elab_Term_elabFun___closed__2 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabFun___closed__2(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabFun___closed__2); +l___regBuiltinTermElab_Lean_Elab_Term_elabFun___closed__3 = _init_l___regBuiltinTermElab_Lean_Elab_Term_elabFun___closed__3(); +lean_mark_persistent(l___regBuiltinTermElab_Lean_Elab_Term_elabFun___closed__3); +res = l___regBuiltinTermElab_Lean_Elab_Term_elabFun(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); l_Lean_Elab_Term_elabLetDeclAux___closed__1 = _init_l_Lean_Elab_Term_elabLetDeclAux___closed__1(); lean_mark_persistent(l_Lean_Elab_Term_elabLetDeclAux___closed__1); l_Lean_Elab_Term_elabLetDeclAux___closed__2 = _init_l_Lean_Elab_Term_elabLetDeclAux___closed__2(); diff --git a/stage0/stdlib/Init/Lean/Elab/Command.c b/stage0/stdlib/Init/Lean/Elab/Command.c index 05d71d2091..cf8674ab73 100644 --- a/stage0/stdlib/Init/Lean/Elab/Command.c +++ b/stage0/stdlib/Init/Lean/Elab/Command.c @@ -31,6 +31,7 @@ lean_object* l_PersistentHashMap_findAux___main___at_Lean_Elab_Command_elabComma extern lean_object* l_Lean_Meta_check___closed__1; lean_object* l_Lean_Syntax_isNatLitAux(lean_object*, lean_object*); lean_object* l_Lean_Elab_Command_getOptions(lean_object*, lean_object*); +lean_object* l_PersistentArray_mapM___at_Lean_MessageLog_errorsToWarnings___spec__1(lean_object*); extern lean_object* l___private_Init_Lean_Parser_Parser_27__BuiltinParserAttribute_add___closed__2; extern lean_object* l_Lean_Elab_Tactic_evalTactic___main___closed__3; extern lean_object* l_Lean_Parser_declareBuiltinParser___closed__8; @@ -72,6 +73,7 @@ lean_object* l_Lean_Elab_log___at_Lean_Elab_Command_logTrace___spec__1___boxed(l lean_object* l_Lean_Elab_Command_liftIO(lean_object*); extern size_t l_PersistentHashMap_insertAux___main___rarg___closed__2; lean_object* l_Lean_SMap_empty___at_Lean_Elab_Command_mkBuiltinCommandElabTable___spec__1; +lean_object* l_Lean_Elab_Command_failIfSucceeds___rarg___closed__4; lean_object* l_Lean_Syntax_getIdAt(lean_object*, lean_object*); lean_object* l_Lean_Elab_Command_commandElabAttribute; lean_object* l_Lean_Elab_Command_elabUniverse(lean_object*, lean_object*, lean_object*); @@ -87,6 +89,7 @@ lean_object* l_Lean_Elab_Command_withIncRecDepth___rarg___boxed(lean_object*, le lean_object* l_Lean_Meta_SynthInstance_SynthM_inhabited___lambda__1___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Array_iterateMAux___main___at_Lean_Elab_Command_withDeclId___spec__5___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Command_throwUnsupportedSyntax___boxed(lean_object*, lean_object*); +lean_object* l___regBuiltinCommandElab_Lean_Elab_Command_elabCheckFailure___closed__1; extern lean_object* l_Array_empty___closed__1; extern lean_object* l_Lean_verboseOption___closed__3; lean_object* l_Lean_Elab_Command_CommandElabM_monadLog___lambda__2(lean_object*, lean_object*, lean_object*); @@ -137,6 +140,7 @@ lean_object* l_Lean_SMap_empty___at_Lean_Elab_Command_mkBuiltinCommandElabTable_ lean_object* l___regBuiltinCommandElab_Lean_Elab_Command_elabExport(lean_object*); lean_object* l___private_Init_Lean_Elab_Command_13__addNamespace(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Command_Lean_Elab_MonadMacroAdapter___lambda__1(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Command_failIfSucceeds(lean_object*); lean_object* l_Lean_Elab_Command_commandElabAttribute___closed__2; lean_object* l_Lean_Elab_Command_CommandElabM_monadLog___lambda__2___boxed(lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Meta_isLevelDefEqAux___main___closed__5; @@ -165,6 +169,7 @@ lean_object* l_Lean_Elab_Command_elabEnd___closed__9; lean_object* l_Lean_Elab_Command_throwUnsupportedSyntax___rarg(lean_object*); lean_object* l_IO_ofExcept___at_Lean_registerClassAttr___spec__1(lean_object*, lean_object*); lean_object* l_Lean_Elab_Command_addBuiltinCommandElab(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Command_elabCheckFailure(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Command_State_inhabited___closed__3; lean_object* l_Lean_Elab_Command_withIncRecDepth___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Command_setOption___closed__1; @@ -182,6 +187,7 @@ lean_object* l_Array_foldlStepMAux___main___at_Lean_Elab_Term_elabParen___spec__ extern uint8_t l___private_Init_Lean_Elab_Term_11__isExplicit___closed__1; extern lean_object* l_Lean_PersistentEnvExtension_inhabited___rarg___closed__1; lean_object* l_Lean_Elab_Command_declareBuiltinCommandElab___closed__4; +lean_object* l_Lean_Elab_Command_failIfSucceeds___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_Init_Data_Array_QSort_1__partitionAux___main___at_Lean_Elab_Command_sortDeclLevelParams___spec__4(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Command_setOption___closed__2; extern lean_object* l_Lean_LocalContext_Inhabited___closed__2; @@ -253,6 +259,7 @@ lean_object* l_Lean_Elab_Term_elabTerm(lean_object*, lean_object*, uint8_t, lean uint8_t l_PersistentHashMap_contains___at_Lean_Elab_Command_addBuiltinCommandElab___spec__4(lean_object*, lean_object*); lean_object* l___regBuiltinCommandElab_Lean_Elab_Command_elabCheck___closed__3; lean_object* l_Lean_Elab_Command_throwAlreadyDeclaredUniverseLevel(lean_object*); +lean_object* l_Lean_Elab_Command_failIfSucceeds___rarg___closed__5; lean_object* l___regBuiltinCommandElab_Lean_Elab_Command_elabVariables___closed__1; lean_object* l_Lean_Elab_Command_CommandElabM_monadLog___closed__4; lean_object* l_Lean_Elab_Command_throwAlreadyDeclaredUniverseLevel___rarg___closed__3; @@ -262,6 +269,7 @@ lean_object* l_Lean_Elab_Command_expandDeclId___boxed(lean_object*); lean_object* l___regBuiltinCommandElab_Lean_Elab_Command_elabSetOption(lean_object*); lean_object* l_Lean_Elab_Command_elabOpenRenaming(lean_object*, lean_object*, lean_object*); lean_object* l_List_lengthAux___main___rarg(lean_object*, lean_object*); +lean_object* l_Lean_Elab_Command_failIfSucceeds___rarg___closed__3; lean_object* l_Lean_Elab_Command_resolveNamespace(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Command_addBuiltinCommandElab___closed__1; lean_object* l_Lean_Elab_Command_mkState(lean_object*, lean_object*, lean_object*); @@ -279,18 +287,22 @@ lean_object* l___private_Init_Lean_Elab_Command_1__ioErrorToMessage___boxed(lean uint8_t l___private_Init_Lean_Elab_Command_14__checkAnonymousScope(lean_object*); lean_object* l___private_Init_Lean_Elab_Command_1__ioErrorToMessage(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Syntax_getId(lean_object*); +lean_object* l_Lean_Elab_Command_failIfSucceeds___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Syntax_prettyPrint(lean_object*); lean_object* l_Lean_Elab_Command_adaptExpander(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Command_Lean_Elab_MonadMacroAdapter___closed__5; lean_object* lean_name_mk_string(lean_object*, lean_object*); +lean_object* l_Lean_Elab_Command_failIfSucceeds___rarg___closed__1; lean_object* l___regBuiltinCommandElab_Lean_Elab_Command_elabSynth___closed__3; lean_object* l_Lean_KVMap_insertCore___main(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Command_Lean_Elab_MonadMacroAdapter___closed__3; lean_object* l_Lean_Elab_Command_runTermElabM___rarg(lean_object*, lean_object*, lean_object*, lean_object*); +extern lean_object* l_Lean_Elab_Exception_hasToString___closed__1; extern lean_object* l_PersistentArray_empty___closed__3; lean_object* l___regBuiltinCommandElab_Lean_Elab_Command_elabUniverses(lean_object*); extern lean_object* l_Lean_Parser_Command_namespace___elambda__1___closed__1; lean_object* l_Lean_Elab_Command_elabVariables___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Command_failIfSucceeds___rarg___closed__2; lean_object* l_Lean_Elab_Command_throwError___rarg(lean_object*, lean_object*, lean_object*, lean_object*); uint8_t l_Lean_Environment_contains(lean_object*, lean_object*); lean_object* l_Lean_Elab_Command_getScopes(lean_object*, lean_object*); @@ -303,6 +315,7 @@ lean_object* l___private_Init_Lean_Elab_Command_6__mkTermContext(lean_object*, l lean_object* l_Lean_Elab_Command_elabCheck___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Parser_declareBuiltinParser___closed__7; lean_object* l_Lean_Elab_Command_elabOpenOnly(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Elab_Command_hasNoErrorMessages(lean_object*, lean_object*); extern lean_object* l_Lean_Options_empty; extern lean_object* l_Lean_Parser_Command_variable___elambda__1___closed__2; lean_object* l_Array_iterateMAux___main___at_Lean_Elab_Command_elabOpenSimple___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -381,6 +394,7 @@ lean_object* l_Lean_SMap_contains___at_Lean_Elab_Command_addBuiltinCommandElab__ lean_object* l_Lean_Elab_Command_declareBuiltinCommandElab___closed__1; lean_object* l_Lean_Elab_Command_CommandElabM_monadLog; lean_object* l_Lean_Elab_Command_addUnivLevel(lean_object*, lean_object*, lean_object*); +lean_object* l_PersistentArray_append___rarg(lean_object*, lean_object*); lean_object* l_Lean_Elab_Command_CommandElabCoreM_monadState___closed__4; lean_object* l___regBuiltinCommandElab_Lean_Elab_Command_elabSynth___closed__1; extern lean_object* l_Lean_Elab_declareBuiltinMacro___closed__4; @@ -416,6 +430,7 @@ lean_object* l_Lean_Elab_Command_getCurrMacroScope(lean_object*, lean_object*); lean_object* l_Lean_getMaxRecDepth(lean_object*); lean_object* l_Lean_Elab_Command_getMainModule(lean_object*, lean_object*); lean_object* l_Lean_Elab_Command_elabVariable___boxed(lean_object*, lean_object*, lean_object*); +extern lean_object* l_Lean_Parser_Command_check__failure___elambda__1___closed__2; lean_object* l_Lean_nameToExprAux___main(lean_object*); lean_object* l_Lean_Elab_Command_modifyScope(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Command_CommandElabM_MonadQuotation___closed__2; @@ -523,12 +538,14 @@ lean_object* l_Array_foldlStepMAux___main___at_Lean_Elab_Command_elabOpenRenamin extern lean_object* l_Lean_MetavarContext_Inhabited___closed__1; lean_object* l_ReaderT_bind___at_Lean_Elab_Command_CommandElabM_monadLog___spec__2___rarg(lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_mkOptionalNode___closed__2; +lean_object* l___regBuiltinCommandElab_Lean_Elab_Command_elabCheckFailure___closed__3; lean_object* l___private_Init_Lean_Elab_Term_3__fromMetaState(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Command_CommandElabM_monadLog___lambda__4(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Elab_Command_elabVariable___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Unhygienic_run___rarg___closed__1; lean_object* l___private_Init_Lean_Elab_Command_15__checkEndHeader___main___boxed(lean_object*, lean_object*); lean_object* l_Lean_Elab_Command_registerBuiltinCommandElabAttr___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +uint8_t l_PersistentArray_anyM___at_Lean_MessageLog_hasErrors___spec__1(lean_object*); lean_object* l_Lean_Syntax_asNode(lean_object*); lean_object* l_Array_iterateMAux___main___at_Lean_Elab_Command_elabExport___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_compile_decl(lean_object*, lean_object*, lean_object*); @@ -552,10 +569,12 @@ lean_object* l_Lean_Elab_Command_elabOpenSimple___boxed(lean_object*, lean_objec lean_object* l_Lean_Elab_Command_CommandElabM_monadLog___closed__7; lean_object* l_Lean_Elab_Command_elabEnd___closed__7; lean_object* l_Lean_Elab_Command_elabOpenRenaming___boxed(lean_object*, lean_object*, lean_object*); +lean_object* l___regBuiltinCommandElab_Lean_Elab_Command_elabCheckFailure___closed__2; lean_object* l_Lean_Elab_Command_elabOpenOnly___boxed(lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Parser_Command_synth___elambda__1___closed__2; lean_object* l_Lean_Elab_Command_registerBuiltinCommandElabAttr___lambda__1___closed__1; lean_object* l_Lean_Elab_Command_elabSynth___closed__3; +lean_object* l___regBuiltinCommandElab_Lean_Elab_Command_elabCheckFailure(lean_object*); lean_object* l_IO_ofExcept___at___private_Init_Lean_Elab_Util_6__ElabAttribute_add___spec__1(lean_object*, lean_object*); lean_object* l_Lean_Elab_Command_mkMessageAux(lean_object*, lean_object*, lean_object*, uint8_t); lean_object* l_Lean_mkConst(lean_object*, lean_object*); @@ -17998,6 +18017,1339 @@ x_5 = l_Lean_Elab_Command_addBuiltinCommandElab(x_2, x_3, x_4, x_1); return x_5; } } +lean_object* l_Lean_Elab_Command_hasNoErrorMessages(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = l___private_Init_Lean_Elab_Command_2__getState(x_1, x_2); +if (lean_obj_tag(x_3) == 0) +{ +uint8_t x_4; +x_4 = !lean_is_exclusive(x_3); +if (x_4 == 0) +{ +lean_object* x_5; lean_object* x_6; uint8_t x_7; +x_5 = lean_ctor_get(x_3, 0); +x_6 = lean_ctor_get(x_5, 1); +lean_inc(x_6); +lean_dec(x_5); +x_7 = l_PersistentArray_anyM___at_Lean_MessageLog_hasErrors___spec__1(x_6); +lean_dec(x_6); +if (x_7 == 0) +{ +uint8_t x_8; lean_object* x_9; +x_8 = 1; +x_9 = lean_box(x_8); +lean_ctor_set(x_3, 0, x_9); +return x_3; +} +else +{ +uint8_t x_10; lean_object* x_11; +x_10 = 0; +x_11 = lean_box(x_10); +lean_ctor_set(x_3, 0, x_11); +return x_3; +} +} +else +{ +lean_object* x_12; lean_object* x_13; lean_object* x_14; uint8_t x_15; +x_12 = lean_ctor_get(x_3, 0); +x_13 = lean_ctor_get(x_3, 1); +lean_inc(x_13); +lean_inc(x_12); +lean_dec(x_3); +x_14 = lean_ctor_get(x_12, 1); +lean_inc(x_14); +lean_dec(x_12); +x_15 = l_PersistentArray_anyM___at_Lean_MessageLog_hasErrors___spec__1(x_14); +lean_dec(x_14); +if (x_15 == 0) +{ +uint8_t x_16; lean_object* x_17; lean_object* x_18; +x_16 = 1; +x_17 = lean_box(x_16); +x_18 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_18, 0, x_17); +lean_ctor_set(x_18, 1, x_13); +return x_18; +} +else +{ +uint8_t x_19; lean_object* x_20; lean_object* x_21; +x_19 = 0; +x_20 = lean_box(x_19); +x_21 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_21, 0, x_20); +lean_ctor_set(x_21, 1, x_13); +return x_21; +} +} +} +else +{ +uint8_t x_22; +x_22 = !lean_is_exclusive(x_3); +if (x_22 == 0) +{ +return x_3; +} +else +{ +lean_object* x_23; lean_object* x_24; lean_object* x_25; +x_23 = lean_ctor_get(x_3, 0); +x_24 = lean_ctor_get(x_3, 1); +lean_inc(x_24); +lean_inc(x_23); +lean_dec(x_3); +x_25 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_25, 0, x_23); +lean_ctor_set(x_25, 1, x_24); +return x_25; +} +} +} +} +lean_object* _init_l_Lean_Elab_Command_failIfSucceeds___rarg___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("unexpected success"); +return x_1; +} +} +lean_object* _init_l_Lean_Elab_Command_failIfSucceeds___rarg___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Elab_Command_failIfSucceeds___rarg___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_Command_failIfSucceeds___rarg___closed__3() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Elab_Command_failIfSucceeds___rarg___closed__2; +x_2 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* _init_l_Lean_Elab_Command_failIfSucceeds___rarg___closed__4() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Elab_Exception_hasToString___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_Command_failIfSucceeds___rarg___closed__5() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_Elab_Command_failIfSucceeds___rarg___closed__4; +x_2 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* l_Lean_Elab_Command_failIfSucceeds___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; +lean_inc(x_3); +x_5 = l___private_Init_Lean_Elab_Command_2__getState(x_3, x_4); +if (lean_obj_tag(x_5) == 0) +{ +lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; +x_6 = lean_ctor_get(x_5, 0); +lean_inc(x_6); +x_7 = lean_ctor_get(x_5, 1); +lean_inc(x_7); +lean_dec(x_5); +x_8 = lean_ctor_get(x_6, 1); +lean_inc(x_8); +lean_dec(x_6); +lean_inc(x_3); +x_9 = l___private_Init_Lean_Elab_Command_2__getState(x_3, x_7); +if (lean_obj_tag(x_9) == 0) +{ +lean_object* x_10; lean_object* x_11; uint8_t x_12; +x_10 = lean_ctor_get(x_9, 0); +lean_inc(x_10); +x_11 = lean_ctor_get(x_9, 1); +lean_inc(x_11); +lean_dec(x_9); +x_12 = !lean_is_exclusive(x_10); +if (x_12 == 0) +{ +lean_object* x_13; lean_object* x_14; lean_object* x_15; +x_13 = lean_ctor_get(x_10, 1); +lean_dec(x_13); +x_14 = l_PersistentArray_empty___closed__3; +lean_ctor_set(x_10, 1, x_14); +lean_inc(x_3); +x_15 = l___private_Init_Lean_Elab_Command_3__setState(x_10, x_3, x_11); +if (lean_obj_tag(x_15) == 0) +{ +lean_object* x_16; lean_object* x_17; lean_object* x_18; uint8_t x_56; lean_object* x_57; lean_object* x_98; lean_object* x_99; lean_object* x_134; +x_16 = lean_ctor_get(x_15, 1); +lean_inc(x_16); +lean_dec(x_15); +lean_inc(x_3); +x_134 = lean_apply_2(x_2, x_3, x_16); +if (lean_obj_tag(x_134) == 0) +{ +lean_object* x_135; lean_object* x_136; +x_135 = lean_ctor_get(x_134, 1); +lean_inc(x_135); +lean_dec(x_134); +lean_inc(x_3); +x_136 = l_Lean_Elab_Command_hasNoErrorMessages(x_3, x_135); +if (lean_obj_tag(x_136) == 0) +{ +lean_object* x_137; lean_object* x_138; uint8_t 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 = lean_unbox(x_137); +lean_dec(x_137); +x_56 = x_139; +x_57 = x_138; +goto block_97; +} +else +{ +lean_object* x_140; lean_object* x_141; +x_140 = lean_ctor_get(x_136, 0); +lean_inc(x_140); +x_141 = lean_ctor_get(x_136, 1); +lean_inc(x_141); +lean_dec(x_136); +x_98 = x_140; +x_99 = x_141; +goto block_133; +} +} +else +{ +lean_object* x_142; lean_object* x_143; +x_142 = lean_ctor_get(x_134, 0); +lean_inc(x_142); +x_143 = lean_ctor_get(x_134, 1); +lean_inc(x_143); +lean_dec(x_134); +x_98 = x_142; +x_99 = x_143; +goto block_133; +} +block_55: +{ +lean_object* x_19; +lean_inc(x_3); +x_19 = l___private_Init_Lean_Elab_Command_2__getState(x_3, x_18); +if (lean_obj_tag(x_19) == 0) +{ +lean_object* x_20; lean_object* x_21; uint8_t x_22; +x_20 = lean_ctor_get(x_19, 0); +lean_inc(x_20); +x_21 = lean_ctor_get(x_19, 1); +lean_inc(x_21); +lean_dec(x_19); +x_22 = !lean_is_exclusive(x_20); +if (x_22 == 0) +{ +lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; +x_23 = lean_ctor_get(x_20, 1); +x_24 = l_PersistentArray_mapM___at_Lean_MessageLog_errorsToWarnings___spec__1(x_23); +x_25 = l_PersistentArray_append___rarg(x_8, x_24); +lean_dec(x_24); +lean_ctor_set(x_20, 1, x_25); +x_26 = l___private_Init_Lean_Elab_Command_3__setState(x_20, x_3, x_21); +if (lean_obj_tag(x_26) == 0) +{ +uint8_t x_27; +x_27 = !lean_is_exclusive(x_26); +if (x_27 == 0) +{ +lean_object* x_28; +x_28 = lean_ctor_get(x_26, 0); +lean_dec(x_28); +lean_ctor_set_tag(x_26, 1); +lean_ctor_set(x_26, 0, x_17); +return x_26; +} +else +{ +lean_object* x_29; lean_object* x_30; +x_29 = lean_ctor_get(x_26, 1); +lean_inc(x_29); +lean_dec(x_26); +x_30 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_30, 0, x_17); +lean_ctor_set(x_30, 1, x_29); +return x_30; +} +} +else +{ +uint8_t x_31; +lean_dec(x_17); +x_31 = !lean_is_exclusive(x_26); +if (x_31 == 0) +{ +return x_26; +} +else +{ +lean_object* x_32; lean_object* x_33; lean_object* x_34; +x_32 = lean_ctor_get(x_26, 0); +x_33 = lean_ctor_get(x_26, 1); +lean_inc(x_33); +lean_inc(x_32); +lean_dec(x_26); +x_34 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_34, 0, x_32); +lean_ctor_set(x_34, 1, x_33); +return x_34; +} +} +} +else +{ +lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; +x_35 = lean_ctor_get(x_20, 0); +x_36 = lean_ctor_get(x_20, 1); +x_37 = lean_ctor_get(x_20, 2); +x_38 = lean_ctor_get(x_20, 3); +x_39 = lean_ctor_get(x_20, 4); +lean_inc(x_39); +lean_inc(x_38); +lean_inc(x_37); +lean_inc(x_36); +lean_inc(x_35); +lean_dec(x_20); +x_40 = l_PersistentArray_mapM___at_Lean_MessageLog_errorsToWarnings___spec__1(x_36); +x_41 = l_PersistentArray_append___rarg(x_8, x_40); +lean_dec(x_40); +x_42 = lean_alloc_ctor(0, 5, 0); +lean_ctor_set(x_42, 0, x_35); +lean_ctor_set(x_42, 1, x_41); +lean_ctor_set(x_42, 2, x_37); +lean_ctor_set(x_42, 3, x_38); +lean_ctor_set(x_42, 4, x_39); +x_43 = l___private_Init_Lean_Elab_Command_3__setState(x_42, x_3, x_21); +if (lean_obj_tag(x_43) == 0) +{ +lean_object* x_44; lean_object* x_45; lean_object* x_46; +x_44 = lean_ctor_get(x_43, 1); +lean_inc(x_44); +if (lean_is_exclusive(x_43)) { + lean_ctor_release(x_43, 0); + lean_ctor_release(x_43, 1); + x_45 = x_43; +} else { + lean_dec_ref(x_43); + x_45 = lean_box(0); +} +if (lean_is_scalar(x_45)) { + x_46 = lean_alloc_ctor(1, 2, 0); +} else { + x_46 = x_45; + lean_ctor_set_tag(x_46, 1); +} +lean_ctor_set(x_46, 0, x_17); +lean_ctor_set(x_46, 1, x_44); +return x_46; +} +else +{ +lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; +lean_dec(x_17); +x_47 = lean_ctor_get(x_43, 0); +lean_inc(x_47); +x_48 = lean_ctor_get(x_43, 1); +lean_inc(x_48); +if (lean_is_exclusive(x_43)) { + lean_ctor_release(x_43, 0); + lean_ctor_release(x_43, 1); + x_49 = x_43; +} else { + lean_dec_ref(x_43); + x_49 = lean_box(0); +} +if (lean_is_scalar(x_49)) { + x_50 = lean_alloc_ctor(1, 2, 0); +} else { + x_50 = x_49; +} +lean_ctor_set(x_50, 0, x_47); +lean_ctor_set(x_50, 1, x_48); +return x_50; +} +} +} +else +{ +uint8_t x_51; +lean_dec(x_17); +lean_dec(x_8); +lean_dec(x_3); +x_51 = !lean_is_exclusive(x_19); +if (x_51 == 0) +{ +return x_19; +} +else +{ +lean_object* x_52; lean_object* x_53; lean_object* x_54; +x_52 = lean_ctor_get(x_19, 0); +x_53 = lean_ctor_get(x_19, 1); +lean_inc(x_53); +lean_inc(x_52); +lean_dec(x_19); +x_54 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_54, 0, x_52); +lean_ctor_set(x_54, 1, x_53); +return x_54; +} +} +} +block_97: +{ +lean_object* x_58; +lean_inc(x_3); +x_58 = l___private_Init_Lean_Elab_Command_2__getState(x_3, x_57); +if (lean_obj_tag(x_58) == 0) +{ +lean_object* x_59; lean_object* x_60; uint8_t x_61; +x_59 = lean_ctor_get(x_58, 0); +lean_inc(x_59); +x_60 = lean_ctor_get(x_58, 1); +lean_inc(x_60); +lean_dec(x_58); +x_61 = !lean_is_exclusive(x_59); +if (x_61 == 0) +{ +lean_object* x_62; lean_object* x_63; lean_object* x_64; lean_object* x_65; +x_62 = lean_ctor_get(x_59, 1); +x_63 = l_PersistentArray_mapM___at_Lean_MessageLog_errorsToWarnings___spec__1(x_62); +lean_inc(x_8); +x_64 = l_PersistentArray_append___rarg(x_8, x_63); +lean_dec(x_63); +lean_ctor_set(x_59, 1, x_64); +lean_inc(x_3); +x_65 = l___private_Init_Lean_Elab_Command_3__setState(x_59, x_3, x_60); +if (lean_obj_tag(x_65) == 0) +{ +lean_dec(x_8); +if (x_56 == 0) +{ +uint8_t x_66; +lean_dec(x_3); +x_66 = !lean_is_exclusive(x_65); +if (x_66 == 0) +{ +lean_object* x_67; lean_object* x_68; +x_67 = lean_ctor_get(x_65, 0); +lean_dec(x_67); +x_68 = lean_box(0); +lean_ctor_set(x_65, 0, x_68); +return x_65; +} +else +{ +lean_object* x_69; lean_object* x_70; lean_object* x_71; +x_69 = lean_ctor_get(x_65, 1); +lean_inc(x_69); +lean_dec(x_65); +x_70 = lean_box(0); +x_71 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_71, 0, x_70); +lean_ctor_set(x_71, 1, x_69); +return x_71; +} +} +else +{ +lean_object* x_72; lean_object* x_73; lean_object* x_74; +x_72 = lean_ctor_get(x_65, 1); +lean_inc(x_72); +lean_dec(x_65); +x_73 = l_Lean_Elab_Command_failIfSucceeds___rarg___closed__3; +x_74 = l_Lean_Elab_Command_throwError___rarg(x_1, x_73, x_3, x_72); +return x_74; +} +} +else +{ +lean_object* x_75; lean_object* x_76; +x_75 = lean_ctor_get(x_65, 0); +lean_inc(x_75); +x_76 = lean_ctor_get(x_65, 1); +lean_inc(x_76); +lean_dec(x_65); +x_17 = x_75; +x_18 = x_76; +goto block_55; +} +} +else +{ +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; +x_77 = lean_ctor_get(x_59, 0); +x_78 = lean_ctor_get(x_59, 1); +x_79 = lean_ctor_get(x_59, 2); +x_80 = lean_ctor_get(x_59, 3); +x_81 = lean_ctor_get(x_59, 4); +lean_inc(x_81); +lean_inc(x_80); +lean_inc(x_79); +lean_inc(x_78); +lean_inc(x_77); +lean_dec(x_59); +x_82 = l_PersistentArray_mapM___at_Lean_MessageLog_errorsToWarnings___spec__1(x_78); +lean_inc(x_8); +x_83 = l_PersistentArray_append___rarg(x_8, x_82); +lean_dec(x_82); +x_84 = lean_alloc_ctor(0, 5, 0); +lean_ctor_set(x_84, 0, x_77); +lean_ctor_set(x_84, 1, x_83); +lean_ctor_set(x_84, 2, x_79); +lean_ctor_set(x_84, 3, x_80); +lean_ctor_set(x_84, 4, x_81); +lean_inc(x_3); +x_85 = l___private_Init_Lean_Elab_Command_3__setState(x_84, x_3, x_60); +if (lean_obj_tag(x_85) == 0) +{ +lean_dec(x_8); +if (x_56 == 0) +{ +lean_object* x_86; lean_object* x_87; lean_object* x_88; lean_object* x_89; +lean_dec(x_3); +x_86 = lean_ctor_get(x_85, 1); +lean_inc(x_86); +if (lean_is_exclusive(x_85)) { + lean_ctor_release(x_85, 0); + lean_ctor_release(x_85, 1); + x_87 = x_85; +} else { + lean_dec_ref(x_85); + x_87 = lean_box(0); +} +x_88 = lean_box(0); +if (lean_is_scalar(x_87)) { + x_89 = lean_alloc_ctor(0, 2, 0); +} else { + x_89 = x_87; +} +lean_ctor_set(x_89, 0, x_88); +lean_ctor_set(x_89, 1, x_86); +return x_89; +} +else +{ +lean_object* x_90; lean_object* x_91; lean_object* x_92; +x_90 = lean_ctor_get(x_85, 1); +lean_inc(x_90); +lean_dec(x_85); +x_91 = l_Lean_Elab_Command_failIfSucceeds___rarg___closed__3; +x_92 = l_Lean_Elab_Command_throwError___rarg(x_1, x_91, x_3, x_90); +return x_92; +} +} +else +{ +lean_object* x_93; lean_object* x_94; +x_93 = lean_ctor_get(x_85, 0); +lean_inc(x_93); +x_94 = lean_ctor_get(x_85, 1); +lean_inc(x_94); +lean_dec(x_85); +x_17 = x_93; +x_18 = x_94; +goto block_55; +} +} +} +else +{ +lean_object* x_95; lean_object* x_96; +x_95 = lean_ctor_get(x_58, 0); +lean_inc(x_95); +x_96 = lean_ctor_get(x_58, 1); +lean_inc(x_96); +lean_dec(x_58); +x_17 = x_95; +x_18 = x_96; +goto block_55; +} +} +block_133: +{ +if (lean_obj_tag(x_98) == 0) +{ +lean_object* x_100; lean_object* x_101; +x_100 = lean_ctor_get(x_98, 0); +lean_inc(x_100); +lean_dec(x_98); +lean_inc(x_3); +x_101 = l___private_Init_Lean_Elab_Command_2__getState(x_3, x_99); +if (lean_obj_tag(x_101) == 0) +{ +lean_object* x_102; lean_object* x_103; uint8_t x_104; +x_102 = lean_ctor_get(x_101, 0); +lean_inc(x_102); +x_103 = lean_ctor_get(x_101, 1); +lean_inc(x_103); +lean_dec(x_101); +x_104 = !lean_is_exclusive(x_102); +if (x_104 == 0) +{ +lean_object* x_105; lean_object* x_106; lean_object* x_107; +x_105 = lean_ctor_get(x_102, 1); +x_106 = l_PersistentArray_push___rarg(x_105, x_100); +lean_ctor_set(x_102, 1, x_106); +lean_inc(x_3); +x_107 = l___private_Init_Lean_Elab_Command_3__setState(x_102, x_3, x_103); +if (lean_obj_tag(x_107) == 0) +{ +lean_object* x_108; uint8_t x_109; +x_108 = lean_ctor_get(x_107, 1); +lean_inc(x_108); +lean_dec(x_107); +x_109 = 0; +x_56 = x_109; +x_57 = x_108; +goto block_97; +} +else +{ +lean_object* x_110; lean_object* x_111; +x_110 = lean_ctor_get(x_107, 0); +lean_inc(x_110); +x_111 = lean_ctor_get(x_107, 1); +lean_inc(x_111); +lean_dec(x_107); +x_17 = x_110; +x_18 = x_111; +goto block_55; +} +} +else +{ +lean_object* x_112; lean_object* x_113; lean_object* x_114; lean_object* x_115; lean_object* x_116; lean_object* x_117; lean_object* x_118; lean_object* x_119; +x_112 = lean_ctor_get(x_102, 0); +x_113 = lean_ctor_get(x_102, 1); +x_114 = lean_ctor_get(x_102, 2); +x_115 = lean_ctor_get(x_102, 3); +x_116 = lean_ctor_get(x_102, 4); +lean_inc(x_116); +lean_inc(x_115); +lean_inc(x_114); +lean_inc(x_113); +lean_inc(x_112); +lean_dec(x_102); +x_117 = l_PersistentArray_push___rarg(x_113, x_100); +x_118 = lean_alloc_ctor(0, 5, 0); +lean_ctor_set(x_118, 0, x_112); +lean_ctor_set(x_118, 1, x_117); +lean_ctor_set(x_118, 2, x_114); +lean_ctor_set(x_118, 3, x_115); +lean_ctor_set(x_118, 4, x_116); +lean_inc(x_3); +x_119 = l___private_Init_Lean_Elab_Command_3__setState(x_118, x_3, x_103); +if (lean_obj_tag(x_119) == 0) +{ +lean_object* x_120; uint8_t x_121; +x_120 = lean_ctor_get(x_119, 1); +lean_inc(x_120); +lean_dec(x_119); +x_121 = 0; +x_56 = x_121; +x_57 = x_120; +goto block_97; +} +else +{ +lean_object* x_122; lean_object* x_123; +x_122 = lean_ctor_get(x_119, 0); +lean_inc(x_122); +x_123 = lean_ctor_get(x_119, 1); +lean_inc(x_123); +lean_dec(x_119); +x_17 = x_122; +x_18 = x_123; +goto block_55; +} +} +} +else +{ +lean_object* x_124; lean_object* x_125; +lean_dec(x_100); +x_124 = lean_ctor_get(x_101, 0); +lean_inc(x_124); +x_125 = lean_ctor_get(x_101, 1); +lean_inc(x_125); +lean_dec(x_101); +x_17 = x_124; +x_18 = x_125; +goto block_55; +} +} +else +{ +uint8_t x_126; lean_object* x_127; lean_object* x_128; +x_126 = 2; +x_127 = l_Lean_Elab_Command_failIfSucceeds___rarg___closed__5; +lean_inc(x_3); +x_128 = l_Lean_Elab_log___at_Lean_Elab_Command_logTrace___spec__1(x_1, x_126, x_127, x_3, x_99); +if (lean_obj_tag(x_128) == 0) +{ +lean_object* x_129; uint8_t x_130; +x_129 = lean_ctor_get(x_128, 1); +lean_inc(x_129); +lean_dec(x_128); +x_130 = 0; +x_56 = x_130; +x_57 = x_129; +goto block_97; +} +else +{ +lean_object* x_131; lean_object* x_132; +x_131 = lean_ctor_get(x_128, 0); +lean_inc(x_131); +x_132 = lean_ctor_get(x_128, 1); +lean_inc(x_132); +lean_dec(x_128); +x_17 = x_131; +x_18 = x_132; +goto block_55; +} +} +} +} +else +{ +uint8_t x_144; +lean_dec(x_8); +lean_dec(x_3); +lean_dec(x_2); +x_144 = !lean_is_exclusive(x_15); +if (x_144 == 0) +{ +return x_15; +} +else +{ +lean_object* x_145; lean_object* x_146; lean_object* x_147; +x_145 = lean_ctor_get(x_15, 0); +x_146 = lean_ctor_get(x_15, 1); +lean_inc(x_146); +lean_inc(x_145); +lean_dec(x_15); +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 +{ +lean_object* x_148; lean_object* x_149; lean_object* x_150; lean_object* x_151; lean_object* x_152; lean_object* x_153; lean_object* x_154; +x_148 = lean_ctor_get(x_10, 0); +x_149 = lean_ctor_get(x_10, 2); +x_150 = lean_ctor_get(x_10, 3); +x_151 = lean_ctor_get(x_10, 4); +lean_inc(x_151); +lean_inc(x_150); +lean_inc(x_149); +lean_inc(x_148); +lean_dec(x_10); +x_152 = l_PersistentArray_empty___closed__3; +x_153 = lean_alloc_ctor(0, 5, 0); +lean_ctor_set(x_153, 0, x_148); +lean_ctor_set(x_153, 1, x_152); +lean_ctor_set(x_153, 2, x_149); +lean_ctor_set(x_153, 3, x_150); +lean_ctor_set(x_153, 4, x_151); +lean_inc(x_3); +x_154 = l___private_Init_Lean_Elab_Command_3__setState(x_153, x_3, x_11); +if (lean_obj_tag(x_154) == 0) +{ +lean_object* x_155; lean_object* x_156; lean_object* x_157; uint8_t x_183; lean_object* x_184; lean_object* x_210; lean_object* x_211; lean_object* x_239; +x_155 = lean_ctor_get(x_154, 1); +lean_inc(x_155); +lean_dec(x_154); +lean_inc(x_3); +x_239 = lean_apply_2(x_2, x_3, x_155); +if (lean_obj_tag(x_239) == 0) +{ +lean_object* x_240; lean_object* x_241; +x_240 = lean_ctor_get(x_239, 1); +lean_inc(x_240); +lean_dec(x_239); +lean_inc(x_3); +x_241 = l_Lean_Elab_Command_hasNoErrorMessages(x_3, x_240); +if (lean_obj_tag(x_241) == 0) +{ +lean_object* x_242; lean_object* x_243; uint8_t x_244; +x_242 = lean_ctor_get(x_241, 0); +lean_inc(x_242); +x_243 = lean_ctor_get(x_241, 1); +lean_inc(x_243); +lean_dec(x_241); +x_244 = lean_unbox(x_242); +lean_dec(x_242); +x_183 = x_244; +x_184 = x_243; +goto block_209; +} +else +{ +lean_object* x_245; lean_object* x_246; +x_245 = lean_ctor_get(x_241, 0); +lean_inc(x_245); +x_246 = lean_ctor_get(x_241, 1); +lean_inc(x_246); +lean_dec(x_241); +x_210 = x_245; +x_211 = x_246; +goto block_238; +} +} +else +{ +lean_object* x_247; lean_object* x_248; +x_247 = lean_ctor_get(x_239, 0); +lean_inc(x_247); +x_248 = lean_ctor_get(x_239, 1); +lean_inc(x_248); +lean_dec(x_239); +x_210 = x_247; +x_211 = x_248; +goto block_238; +} +block_182: +{ +lean_object* x_158; +lean_inc(x_3); +x_158 = l___private_Init_Lean_Elab_Command_2__getState(x_3, x_157); +if (lean_obj_tag(x_158) == 0) +{ +lean_object* x_159; lean_object* x_160; lean_object* x_161; lean_object* x_162; lean_object* x_163; lean_object* x_164; lean_object* x_165; lean_object* x_166; lean_object* x_167; lean_object* x_168; lean_object* x_169; lean_object* x_170; +x_159 = lean_ctor_get(x_158, 0); +lean_inc(x_159); +x_160 = lean_ctor_get(x_158, 1); +lean_inc(x_160); +lean_dec(x_158); +x_161 = lean_ctor_get(x_159, 0); +lean_inc(x_161); +x_162 = lean_ctor_get(x_159, 1); +lean_inc(x_162); +x_163 = lean_ctor_get(x_159, 2); +lean_inc(x_163); +x_164 = lean_ctor_get(x_159, 3); +lean_inc(x_164); +x_165 = lean_ctor_get(x_159, 4); +lean_inc(x_165); +if (lean_is_exclusive(x_159)) { + lean_ctor_release(x_159, 0); + lean_ctor_release(x_159, 1); + lean_ctor_release(x_159, 2); + lean_ctor_release(x_159, 3); + lean_ctor_release(x_159, 4); + x_166 = x_159; +} else { + lean_dec_ref(x_159); + x_166 = lean_box(0); +} +x_167 = l_PersistentArray_mapM___at_Lean_MessageLog_errorsToWarnings___spec__1(x_162); +x_168 = l_PersistentArray_append___rarg(x_8, x_167); +lean_dec(x_167); +if (lean_is_scalar(x_166)) { + x_169 = lean_alloc_ctor(0, 5, 0); +} else { + x_169 = x_166; +} +lean_ctor_set(x_169, 0, x_161); +lean_ctor_set(x_169, 1, x_168); +lean_ctor_set(x_169, 2, x_163); +lean_ctor_set(x_169, 3, x_164); +lean_ctor_set(x_169, 4, x_165); +x_170 = l___private_Init_Lean_Elab_Command_3__setState(x_169, x_3, x_160); +if (lean_obj_tag(x_170) == 0) +{ +lean_object* x_171; lean_object* x_172; lean_object* x_173; +x_171 = lean_ctor_get(x_170, 1); +lean_inc(x_171); +if (lean_is_exclusive(x_170)) { + lean_ctor_release(x_170, 0); + lean_ctor_release(x_170, 1); + x_172 = x_170; +} else { + lean_dec_ref(x_170); + x_172 = lean_box(0); +} +if (lean_is_scalar(x_172)) { + x_173 = lean_alloc_ctor(1, 2, 0); +} else { + x_173 = x_172; + lean_ctor_set_tag(x_173, 1); +} +lean_ctor_set(x_173, 0, x_156); +lean_ctor_set(x_173, 1, x_171); +return x_173; +} +else +{ +lean_object* x_174; lean_object* x_175; lean_object* x_176; lean_object* x_177; +lean_dec(x_156); +x_174 = lean_ctor_get(x_170, 0); +lean_inc(x_174); +x_175 = lean_ctor_get(x_170, 1); +lean_inc(x_175); +if (lean_is_exclusive(x_170)) { + lean_ctor_release(x_170, 0); + lean_ctor_release(x_170, 1); + x_176 = x_170; +} else { + lean_dec_ref(x_170); + x_176 = lean_box(0); +} +if (lean_is_scalar(x_176)) { + x_177 = lean_alloc_ctor(1, 2, 0); +} else { + x_177 = x_176; +} +lean_ctor_set(x_177, 0, x_174); +lean_ctor_set(x_177, 1, x_175); +return x_177; +} +} +else +{ +lean_object* x_178; lean_object* x_179; lean_object* x_180; lean_object* x_181; +lean_dec(x_156); +lean_dec(x_8); +lean_dec(x_3); +x_178 = lean_ctor_get(x_158, 0); +lean_inc(x_178); +x_179 = lean_ctor_get(x_158, 1); +lean_inc(x_179); +if (lean_is_exclusive(x_158)) { + lean_ctor_release(x_158, 0); + lean_ctor_release(x_158, 1); + x_180 = x_158; +} else { + lean_dec_ref(x_158); + x_180 = lean_box(0); +} +if (lean_is_scalar(x_180)) { + x_181 = lean_alloc_ctor(1, 2, 0); +} else { + x_181 = x_180; +} +lean_ctor_set(x_181, 0, x_178); +lean_ctor_set(x_181, 1, x_179); +return x_181; +} +} +block_209: +{ +lean_object* x_185; +lean_inc(x_3); +x_185 = l___private_Init_Lean_Elab_Command_2__getState(x_3, x_184); +if (lean_obj_tag(x_185) == 0) +{ +lean_object* x_186; lean_object* x_187; lean_object* x_188; lean_object* x_189; lean_object* x_190; lean_object* x_191; lean_object* x_192; lean_object* x_193; lean_object* x_194; lean_object* x_195; lean_object* x_196; lean_object* x_197; +x_186 = lean_ctor_get(x_185, 0); +lean_inc(x_186); +x_187 = lean_ctor_get(x_185, 1); +lean_inc(x_187); +lean_dec(x_185); +x_188 = lean_ctor_get(x_186, 0); +lean_inc(x_188); +x_189 = lean_ctor_get(x_186, 1); +lean_inc(x_189); +x_190 = lean_ctor_get(x_186, 2); +lean_inc(x_190); +x_191 = lean_ctor_get(x_186, 3); +lean_inc(x_191); +x_192 = lean_ctor_get(x_186, 4); +lean_inc(x_192); +if (lean_is_exclusive(x_186)) { + lean_ctor_release(x_186, 0); + lean_ctor_release(x_186, 1); + lean_ctor_release(x_186, 2); + lean_ctor_release(x_186, 3); + lean_ctor_release(x_186, 4); + x_193 = x_186; +} else { + lean_dec_ref(x_186); + x_193 = lean_box(0); +} +x_194 = l_PersistentArray_mapM___at_Lean_MessageLog_errorsToWarnings___spec__1(x_189); +lean_inc(x_8); +x_195 = l_PersistentArray_append___rarg(x_8, x_194); +lean_dec(x_194); +if (lean_is_scalar(x_193)) { + x_196 = lean_alloc_ctor(0, 5, 0); +} else { + x_196 = x_193; +} +lean_ctor_set(x_196, 0, x_188); +lean_ctor_set(x_196, 1, x_195); +lean_ctor_set(x_196, 2, x_190); +lean_ctor_set(x_196, 3, x_191); +lean_ctor_set(x_196, 4, x_192); +lean_inc(x_3); +x_197 = l___private_Init_Lean_Elab_Command_3__setState(x_196, x_3, x_187); +if (lean_obj_tag(x_197) == 0) +{ +lean_dec(x_8); +if (x_183 == 0) +{ +lean_object* x_198; lean_object* x_199; lean_object* x_200; lean_object* x_201; +lean_dec(x_3); +x_198 = lean_ctor_get(x_197, 1); +lean_inc(x_198); +if (lean_is_exclusive(x_197)) { + lean_ctor_release(x_197, 0); + lean_ctor_release(x_197, 1); + x_199 = x_197; +} else { + lean_dec_ref(x_197); + x_199 = lean_box(0); +} +x_200 = lean_box(0); +if (lean_is_scalar(x_199)) { + x_201 = lean_alloc_ctor(0, 2, 0); +} else { + x_201 = x_199; +} +lean_ctor_set(x_201, 0, x_200); +lean_ctor_set(x_201, 1, x_198); +return x_201; +} +else +{ +lean_object* x_202; lean_object* x_203; lean_object* x_204; +x_202 = lean_ctor_get(x_197, 1); +lean_inc(x_202); +lean_dec(x_197); +x_203 = l_Lean_Elab_Command_failIfSucceeds___rarg___closed__3; +x_204 = l_Lean_Elab_Command_throwError___rarg(x_1, x_203, x_3, x_202); +return x_204; +} +} +else +{ +lean_object* x_205; lean_object* x_206; +x_205 = lean_ctor_get(x_197, 0); +lean_inc(x_205); +x_206 = lean_ctor_get(x_197, 1); +lean_inc(x_206); +lean_dec(x_197); +x_156 = x_205; +x_157 = x_206; +goto block_182; +} +} +else +{ +lean_object* x_207; lean_object* x_208; +x_207 = lean_ctor_get(x_185, 0); +lean_inc(x_207); +x_208 = lean_ctor_get(x_185, 1); +lean_inc(x_208); +lean_dec(x_185); +x_156 = x_207; +x_157 = x_208; +goto block_182; +} +} +block_238: +{ +if (lean_obj_tag(x_210) == 0) +{ +lean_object* x_212; lean_object* x_213; +x_212 = lean_ctor_get(x_210, 0); +lean_inc(x_212); +lean_dec(x_210); +lean_inc(x_3); +x_213 = l___private_Init_Lean_Elab_Command_2__getState(x_3, x_211); +if (lean_obj_tag(x_213) == 0) +{ +lean_object* x_214; lean_object* x_215; lean_object* x_216; lean_object* x_217; lean_object* x_218; lean_object* x_219; lean_object* x_220; lean_object* x_221; lean_object* x_222; lean_object* x_223; lean_object* x_224; +x_214 = lean_ctor_get(x_213, 0); +lean_inc(x_214); +x_215 = lean_ctor_get(x_213, 1); +lean_inc(x_215); +lean_dec(x_213); +x_216 = lean_ctor_get(x_214, 0); +lean_inc(x_216); +x_217 = lean_ctor_get(x_214, 1); +lean_inc(x_217); +x_218 = lean_ctor_get(x_214, 2); +lean_inc(x_218); +x_219 = lean_ctor_get(x_214, 3); +lean_inc(x_219); +x_220 = lean_ctor_get(x_214, 4); +lean_inc(x_220); +if (lean_is_exclusive(x_214)) { + lean_ctor_release(x_214, 0); + lean_ctor_release(x_214, 1); + lean_ctor_release(x_214, 2); + lean_ctor_release(x_214, 3); + lean_ctor_release(x_214, 4); + x_221 = x_214; +} else { + lean_dec_ref(x_214); + x_221 = lean_box(0); +} +x_222 = l_PersistentArray_push___rarg(x_217, x_212); +if (lean_is_scalar(x_221)) { + x_223 = lean_alloc_ctor(0, 5, 0); +} else { + x_223 = x_221; +} +lean_ctor_set(x_223, 0, x_216); +lean_ctor_set(x_223, 1, x_222); +lean_ctor_set(x_223, 2, x_218); +lean_ctor_set(x_223, 3, x_219); +lean_ctor_set(x_223, 4, x_220); +lean_inc(x_3); +x_224 = l___private_Init_Lean_Elab_Command_3__setState(x_223, x_3, x_215); +if (lean_obj_tag(x_224) == 0) +{ +lean_object* x_225; uint8_t x_226; +x_225 = lean_ctor_get(x_224, 1); +lean_inc(x_225); +lean_dec(x_224); +x_226 = 0; +x_183 = x_226; +x_184 = x_225; +goto block_209; +} +else +{ +lean_object* x_227; lean_object* x_228; +x_227 = lean_ctor_get(x_224, 0); +lean_inc(x_227); +x_228 = lean_ctor_get(x_224, 1); +lean_inc(x_228); +lean_dec(x_224); +x_156 = x_227; +x_157 = x_228; +goto block_182; +} +} +else +{ +lean_object* x_229; lean_object* x_230; +lean_dec(x_212); +x_229 = lean_ctor_get(x_213, 0); +lean_inc(x_229); +x_230 = lean_ctor_get(x_213, 1); +lean_inc(x_230); +lean_dec(x_213); +x_156 = x_229; +x_157 = x_230; +goto block_182; +} +} +else +{ +uint8_t x_231; lean_object* x_232; lean_object* x_233; +x_231 = 2; +x_232 = l_Lean_Elab_Command_failIfSucceeds___rarg___closed__5; +lean_inc(x_3); +x_233 = l_Lean_Elab_log___at_Lean_Elab_Command_logTrace___spec__1(x_1, x_231, x_232, x_3, x_211); +if (lean_obj_tag(x_233) == 0) +{ +lean_object* x_234; uint8_t x_235; +x_234 = lean_ctor_get(x_233, 1); +lean_inc(x_234); +lean_dec(x_233); +x_235 = 0; +x_183 = x_235; +x_184 = x_234; +goto block_209; +} +else +{ +lean_object* x_236; lean_object* x_237; +x_236 = lean_ctor_get(x_233, 0); +lean_inc(x_236); +x_237 = lean_ctor_get(x_233, 1); +lean_inc(x_237); +lean_dec(x_233); +x_156 = x_236; +x_157 = x_237; +goto block_182; +} +} +} +} +else +{ +lean_object* x_249; lean_object* x_250; lean_object* x_251; lean_object* x_252; +lean_dec(x_8); +lean_dec(x_3); +lean_dec(x_2); +x_249 = lean_ctor_get(x_154, 0); +lean_inc(x_249); +x_250 = lean_ctor_get(x_154, 1); +lean_inc(x_250); +if (lean_is_exclusive(x_154)) { + lean_ctor_release(x_154, 0); + lean_ctor_release(x_154, 1); + x_251 = x_154; +} else { + lean_dec_ref(x_154); + x_251 = lean_box(0); +} +if (lean_is_scalar(x_251)) { + x_252 = lean_alloc_ctor(1, 2, 0); +} else { + x_252 = x_251; +} +lean_ctor_set(x_252, 0, x_249); +lean_ctor_set(x_252, 1, x_250); +return x_252; +} +} +} +else +{ +uint8_t x_253; +lean_dec(x_8); +lean_dec(x_3); +lean_dec(x_2); +x_253 = !lean_is_exclusive(x_9); +if (x_253 == 0) +{ +return x_9; +} +else +{ +lean_object* x_254; lean_object* x_255; lean_object* x_256; +x_254 = lean_ctor_get(x_9, 0); +x_255 = lean_ctor_get(x_9, 1); +lean_inc(x_255); +lean_inc(x_254); +lean_dec(x_9); +x_256 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_256, 0, x_254); +lean_ctor_set(x_256, 1, x_255); +return x_256; +} +} +} +else +{ +uint8_t x_257; +lean_dec(x_3); +lean_dec(x_2); +x_257 = !lean_is_exclusive(x_5); +if (x_257 == 0) +{ +return x_5; +} +else +{ +lean_object* x_258; lean_object* x_259; lean_object* x_260; +x_258 = lean_ctor_get(x_5, 0); +x_259 = lean_ctor_get(x_5, 1); +lean_inc(x_259); +lean_inc(x_258); +lean_dec(x_5); +x_260 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_260, 0, x_258); +lean_ctor_set(x_260, 1, x_259); +return x_260; +} +} +} +} +lean_object* l_Lean_Elab_Command_failIfSucceeds(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_Lean_Elab_Command_failIfSucceeds___rarg___boxed), 4, 0); +return x_2; +} +} +lean_object* l_Lean_Elab_Command_failIfSucceeds___rarg___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_Command_failIfSucceeds___rarg(x_1, x_2, x_3, x_4); +lean_dec(x_1); +return x_5; +} +} +lean_object* l_Lean_Elab_Command_elabCheckFailure(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; lean_object* x_5; +lean_inc(x_1); +x_4 = lean_alloc_closure((void*)(l_Lean_Elab_Command_elabCheck), 3, 1); +lean_closure_set(x_4, 0, x_1); +x_5 = l_Lean_Elab_Command_failIfSucceeds___rarg(x_1, x_4, x_2, x_3); +lean_dec(x_1); +return x_5; +} +} +lean_object* _init_l___regBuiltinCommandElab_Lean_Elab_Command_elabCheckFailure___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("elabCheckFailure"); +return x_1; +} +} +lean_object* _init_l___regBuiltinCommandElab_Lean_Elab_Command_elabCheckFailure___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_Elab_Command_declareBuiltinCommandElab___closed__3; +x_2 = l___regBuiltinCommandElab_Lean_Elab_Command_elabCheckFailure___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* _init_l___regBuiltinCommandElab_Lean_Elab_Command_elabCheckFailure___closed__3() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_Elab_Command_elabCheckFailure), 3, 0); +return x_1; +} +} +lean_object* l___regBuiltinCommandElab_Lean_Elab_Command_elabCheckFailure(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_Command_check__failure___elambda__1___closed__2; +x_3 = l___regBuiltinCommandElab_Lean_Elab_Command_elabCheckFailure___closed__2; +x_4 = l___regBuiltinCommandElab_Lean_Elab_Command_elabCheckFailure___closed__3; +x_5 = l_Lean_Elab_Command_addBuiltinCommandElab(x_2, x_3, x_4, x_1); +return x_5; +} +} lean_object* l_Lean_Elab_Command_elabSynth___lambda__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { _start: { @@ -24245,6 +25597,25 @@ lean_mark_persistent(l___regBuiltinCommandElab_Lean_Elab_Command_elabCheck___clo res = l___regBuiltinCommandElab_Lean_Elab_Command_elabCheck(lean_io_mk_world()); if (lean_io_result_is_error(res)) return res; lean_dec_ref(res); +l_Lean_Elab_Command_failIfSucceeds___rarg___closed__1 = _init_l_Lean_Elab_Command_failIfSucceeds___rarg___closed__1(); +lean_mark_persistent(l_Lean_Elab_Command_failIfSucceeds___rarg___closed__1); +l_Lean_Elab_Command_failIfSucceeds___rarg___closed__2 = _init_l_Lean_Elab_Command_failIfSucceeds___rarg___closed__2(); +lean_mark_persistent(l_Lean_Elab_Command_failIfSucceeds___rarg___closed__2); +l_Lean_Elab_Command_failIfSucceeds___rarg___closed__3 = _init_l_Lean_Elab_Command_failIfSucceeds___rarg___closed__3(); +lean_mark_persistent(l_Lean_Elab_Command_failIfSucceeds___rarg___closed__3); +l_Lean_Elab_Command_failIfSucceeds___rarg___closed__4 = _init_l_Lean_Elab_Command_failIfSucceeds___rarg___closed__4(); +lean_mark_persistent(l_Lean_Elab_Command_failIfSucceeds___rarg___closed__4); +l_Lean_Elab_Command_failIfSucceeds___rarg___closed__5 = _init_l_Lean_Elab_Command_failIfSucceeds___rarg___closed__5(); +lean_mark_persistent(l_Lean_Elab_Command_failIfSucceeds___rarg___closed__5); +l___regBuiltinCommandElab_Lean_Elab_Command_elabCheckFailure___closed__1 = _init_l___regBuiltinCommandElab_Lean_Elab_Command_elabCheckFailure___closed__1(); +lean_mark_persistent(l___regBuiltinCommandElab_Lean_Elab_Command_elabCheckFailure___closed__1); +l___regBuiltinCommandElab_Lean_Elab_Command_elabCheckFailure___closed__2 = _init_l___regBuiltinCommandElab_Lean_Elab_Command_elabCheckFailure___closed__2(); +lean_mark_persistent(l___regBuiltinCommandElab_Lean_Elab_Command_elabCheckFailure___closed__2); +l___regBuiltinCommandElab_Lean_Elab_Command_elabCheckFailure___closed__3 = _init_l___regBuiltinCommandElab_Lean_Elab_Command_elabCheckFailure___closed__3(); +lean_mark_persistent(l___regBuiltinCommandElab_Lean_Elab_Command_elabCheckFailure___closed__3); +res = l___regBuiltinCommandElab_Lean_Elab_Command_elabCheckFailure(lean_io_mk_world()); +if (lean_io_result_is_error(res)) return res; +lean_dec_ref(res); l_Lean_Elab_Command_elabSynth___closed__1 = _init_l_Lean_Elab_Command_elabSynth___closed__1(); lean_mark_persistent(l_Lean_Elab_Command_elabSynth___closed__1); l_Lean_Elab_Command_elabSynth___closed__2 = _init_l_Lean_Elab_Command_elabSynth___closed__2(); diff --git a/stage0/stdlib/Init/Lean/Message.c b/stage0/stdlib/Init/Lean/Message.c index b3266e7dac..fd5f9d009a 100644 --- a/stage0/stdlib/Init/Lean/Message.c +++ b/stage0/stdlib/Init/Lean/Message.c @@ -16,10 +16,13 @@ extern "C" { lean_object* l_List_reverse___rarg(lean_object*); lean_object* l_PersistentArray_forM___rarg(lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_Name_toString___closed__1; +lean_object* l_PersistentArray_mapM___at_Lean_MessageLog_errorsToWarnings___spec__1(lean_object*); lean_object* l_Array_iterateMAux___main___at_Lean_MessageLog_toList___spec__5(lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_addParenHeuristic___closed__2; +lean_object* l_Array_umapMAux___main___at_Lean_MessageLog_errorsToWarnings___spec__3(lean_object*, lean_object*); lean_object* l_PersistentArray_foldlM___at_Lean_MessageLog_toList___spec__1___boxed(lean_object*, lean_object*); lean_object* l_Lean_MessageData_ofList___closed__3; +lean_object* l_Array_umapMAux___main___at_Lean_MessageLog_errorsToWarnings___spec__4(lean_object*, lean_object*); lean_object* l_Lean_MessageData_ofArray___boxed(lean_object*); lean_object* l_Lean_Message_toString___closed__3; lean_object* l_Lean_MessageLog_Inhabited; @@ -33,6 +36,7 @@ lean_object* l_Lean_MessageData_coeOfSyntax(lean_object*); extern lean_object* l_Lean_List_format___rarg___closed__1; extern lean_object* l_Prod_HasRepr___rarg___closed__1; lean_object* l_Lean_mkMVar(lean_object*); +extern lean_object* l_Array_empty___closed__1; extern lean_object* l_Lean_Format_flatten___main___closed__1; lean_object* l_Lean_MessageData_coeOfLevel(lean_object*); uint8_t l_PersistentArray_anyMAux___main___at_Lean_MessageLog_hasErrors___spec__2(lean_object*); @@ -73,6 +77,8 @@ lean_object* l_Array_iterateMAux___main___at_Lean_MessageData_formatAux___main__ lean_object* l_Lean_MessageData_Inhabited; lean_object* l_Lean_fmt___at_Lean_MessageData_formatAux___main___spec__1(lean_object*); lean_object* l_Lean_MessageData_stxMaxDepthOption___closed__1; +lean_object* lean_array_fset(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_MessageLog_errorsToWarnings(lean_object*); lean_object* l_PersistentArray_foldlM___at_Lean_MessageLog_toList___spec__1(lean_object*, lean_object*); lean_object* l_Lean_Message_Inhabited; lean_object* l_Lean_Message_HasToString; @@ -103,6 +109,7 @@ lean_object* l_Lean_MessageData_arrayExpr_toMessageData(lean_object*, lean_objec lean_object* l_Lean_MessageData_joinSep___main(lean_object*, lean_object*); lean_object* l_Lean_KVMap_getNat(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_MessageLog_toList___boxed(lean_object*); +lean_object* l_PersistentArray_mapMAux___main___at_Lean_MessageLog_errorsToWarnings___spec__2(lean_object*); lean_object* l_Array_iterateMAux___main___at_Lean_MessageLog_toList___spec__3___boxed(lean_object*, lean_object*, lean_object*, lean_object*); uint8_t lean_message_severity(lean_object*); lean_object* l_Lean_MessageLog_HasAppend___closed__1; @@ -143,6 +150,7 @@ lean_object* l_Lean_MessageData_coeOfOptExpr___closed__1; lean_object* l_PersistentArray_foldlMAux___main___at_Lean_MessageLog_toList___spec__2___boxed(lean_object*, lean_object*); uint8_t l_PersistentArray_anyM___at_Lean_MessageLog_hasErrors___spec__1(lean_object*); lean_object* l_Lean_Syntax_formatStxAux___main(lean_object*, lean_object*, lean_object*); +lean_object* l_unsafeCast(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_iterateMAux___main___at_Lean_MessageData_formatAux___main___spec__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Name_toStringWithSep___main(lean_object*, lean_object*); lean_object* l_Lean_Message_toString___closed__5; @@ -1881,6 +1889,226 @@ x_3 = lean_box(x_2); return x_3; } } +lean_object* l_Array_umapMAux___main___at_Lean_MessageLog_errorsToWarnings___spec__3(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; uint8_t x_4; +x_3 = lean_array_get_size(x_2); +x_4 = lean_nat_dec_lt(x_1, x_3); +lean_dec(x_3); +if (x_4 == 0) +{ +lean_object* x_5; lean_object* x_6; +lean_dec(x_1); +x_5 = l_Array_empty___closed__1; +x_6 = x_2; +return x_6; +} +else +{ +lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; +x_7 = lean_array_fget(x_2, x_1); +x_8 = lean_box(0); +x_9 = x_8; +x_10 = lean_array_fset(x_2, x_1, x_9); +lean_inc(x_7); +x_11 = l_PersistentArray_mapMAux___main___at_Lean_MessageLog_errorsToWarnings___spec__2(x_7); +x_12 = lean_unsigned_to_nat(1u); +x_13 = lean_nat_add(x_1, x_12); +x_14 = x_11; +lean_dec(x_7); +x_15 = lean_array_fset(x_10, x_1, x_14); +lean_dec(x_1); +x_1 = x_13; +x_2 = x_15; +goto _start; +} +} +} +lean_object* l_Array_umapMAux___main___at_Lean_MessageLog_errorsToWarnings___spec__4(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; uint8_t x_4; +x_3 = lean_array_get_size(x_2); +x_4 = lean_nat_dec_lt(x_1, x_3); +lean_dec(x_3); +if (x_4 == 0) +{ +lean_object* x_5; lean_object* x_6; +lean_dec(x_1); +x_5 = l_Array_empty___closed__1; +x_6 = x_2; +return x_6; +} +else +{ +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; uint8_t x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; +x_7 = lean_array_fget(x_2, x_1); +x_8 = lean_box(0); +x_9 = x_8; +x_10 = lean_array_fset(x_2, x_1, x_9); +x_11 = lean_ctor_get(x_7, 0); +lean_inc(x_11); +x_12 = lean_ctor_get(x_7, 1); +lean_inc(x_12); +x_13 = lean_ctor_get(x_7, 2); +lean_inc(x_13); +x_14 = lean_ctor_get_uint8(x_7, sizeof(void*)*5); +x_15 = lean_ctor_get(x_7, 3); +lean_inc(x_15); +x_16 = lean_ctor_get(x_7, 4); +lean_inc(x_16); +x_17 = lean_unsigned_to_nat(1u); +x_18 = lean_nat_add(x_1, x_17); +x_19 = lean_box(x_14); +if (lean_obj_tag(x_19) == 2) +{ +uint8_t x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; +x_20 = 1; +x_21 = lean_alloc_ctor(0, 5, 1); +lean_ctor_set(x_21, 0, x_11); +lean_ctor_set(x_21, 1, x_12); +lean_ctor_set(x_21, 2, x_13); +lean_ctor_set(x_21, 3, x_15); +lean_ctor_set(x_21, 4, x_16); +lean_ctor_set_uint8(x_21, sizeof(void*)*5, x_20); +x_22 = x_21; +lean_dec(x_7); +x_23 = lean_array_fset(x_10, x_1, x_22); +lean_dec(x_1); +x_1 = x_18; +x_2 = x_23; +goto _start; +} +else +{ +lean_object* x_25; lean_object* x_26; +lean_dec(x_19); +lean_dec(x_16); +lean_dec(x_15); +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_11); +lean_inc(x_7); +x_25 = x_7; +lean_dec(x_7); +x_26 = lean_array_fset(x_10, x_1, x_25); +lean_dec(x_1); +x_1 = x_18; +x_2 = x_26; +goto _start; +} +} +} +} +lean_object* l_PersistentArray_mapMAux___main___at_Lean_MessageLog_errorsToWarnings___spec__2(lean_object* x_1) { +_start: +{ +if (lean_obj_tag(x_1) == 0) +{ +uint8_t x_2; +x_2 = !lean_is_exclusive(x_1); +if (x_2 == 0) +{ +lean_object* x_3; lean_object* x_4; lean_object* x_5; +x_3 = lean_ctor_get(x_1, 0); +x_4 = lean_unsigned_to_nat(0u); +x_5 = l_Array_umapMAux___main___at_Lean_MessageLog_errorsToWarnings___spec__3(x_4, x_3); +lean_ctor_set(x_1, 0, x_5); +return x_1; +} +else +{ +lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; +x_6 = lean_ctor_get(x_1, 0); +lean_inc(x_6); +lean_dec(x_1); +x_7 = lean_unsigned_to_nat(0u); +x_8 = l_Array_umapMAux___main___at_Lean_MessageLog_errorsToWarnings___spec__3(x_7, x_6); +x_9 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_9, 0, x_8); +return x_9; +} +} +else +{ +uint8_t x_10; +x_10 = !lean_is_exclusive(x_1); +if (x_10 == 0) +{ +lean_object* x_11; lean_object* x_12; lean_object* x_13; +x_11 = lean_ctor_get(x_1, 0); +x_12 = lean_unsigned_to_nat(0u); +x_13 = l_Array_umapMAux___main___at_Lean_MessageLog_errorsToWarnings___spec__4(x_12, x_11); +lean_ctor_set(x_1, 0, x_13); +return x_1; +} +else +{ +lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; +x_14 = lean_ctor_get(x_1, 0); +lean_inc(x_14); +lean_dec(x_1); +x_15 = lean_unsigned_to_nat(0u); +x_16 = l_Array_umapMAux___main___at_Lean_MessageLog_errorsToWarnings___spec__4(x_15, x_14); +x_17 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_17, 0, x_16); +return x_17; +} +} +} +} +lean_object* l_PersistentArray_mapM___at_Lean_MessageLog_errorsToWarnings___spec__1(lean_object* x_1) { +_start: +{ +uint8_t x_2; +x_2 = !lean_is_exclusive(x_1); +if (x_2 == 0) +{ +lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; +x_3 = lean_ctor_get(x_1, 0); +x_4 = lean_ctor_get(x_1, 1); +x_5 = l_PersistentArray_mapMAux___main___at_Lean_MessageLog_errorsToWarnings___spec__2(x_3); +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Array_umapMAux___main___at_Lean_MessageLog_errorsToWarnings___spec__4(x_6, x_4); +lean_ctor_set(x_1, 1, x_7); +lean_ctor_set(x_1, 0, x_5); +return x_1; +} +else +{ +lean_object* x_8; lean_object* x_9; lean_object* x_10; size_t 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_1, 0); +x_9 = lean_ctor_get(x_1, 1); +x_10 = lean_ctor_get(x_1, 2); +x_11 = lean_ctor_get_usize(x_1, 4); +x_12 = lean_ctor_get(x_1, 3); +lean_inc(x_12); +lean_inc(x_10); +lean_inc(x_9); +lean_inc(x_8); +lean_dec(x_1); +x_13 = l_PersistentArray_mapMAux___main___at_Lean_MessageLog_errorsToWarnings___spec__2(x_8); +x_14 = lean_unsigned_to_nat(0u); +x_15 = l_Array_umapMAux___main___at_Lean_MessageLog_errorsToWarnings___spec__4(x_14, x_9); +x_16 = lean_alloc_ctor(0, 4, sizeof(size_t)*1); +lean_ctor_set(x_16, 0, x_13); +lean_ctor_set(x_16, 1, x_15); +lean_ctor_set(x_16, 2, x_10); +lean_ctor_set(x_16, 3, x_12); +lean_ctor_set_usize(x_16, 4, x_11); +return x_16; +} +} +} +lean_object* l_Lean_MessageLog_errorsToWarnings(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = l_PersistentArray_mapM___at_Lean_MessageLog_errorsToWarnings___spec__1(x_1); +return x_2; +} +} lean_object* l_Lean_MessageLog_forM___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3) { _start: { diff --git a/stage0/stdlib/Init/Lean/Meta/ExprDefEq.c b/stage0/stdlib/Init/Lean/Meta/ExprDefEq.c index a8802a68c2..6dcd7eed7e 100644 --- a/stage0/stdlib/Init/Lean/Meta/ExprDefEq.c +++ b/stage0/stdlib/Init/Lean/Meta/ExprDefEq.c @@ -38497,61 +38497,61 @@ lean_inc(x_5); x_161 = lean_array_fset(x_5, x_4, x_158); if (lean_obj_tag(x_158) == 1) { -lean_object* x_201; lean_object* x_202; uint8_t x_203; -x_201 = lean_ctor_get(x_158, 0); -lean_inc(x_201); -x_202 = lean_array_get_size(x_161); -x_203 = lean_nat_dec_le(x_4, x_202); -if (x_203 == 0) +lean_object* x_211; lean_object* x_212; uint8_t x_213; +x_211 = lean_ctor_get(x_158, 0); +lean_inc(x_211); +x_212 = lean_array_get_size(x_161); +x_213 = lean_nat_dec_le(x_4, x_212); +if (x_213 == 0) { -lean_object* x_204; uint8_t x_205; -x_204 = lean_unsigned_to_nat(0u); -x_205 = l_Array_anyRangeMAux___main___at___private_Init_Lean_Meta_ExprDefEq_18__processAssignmentAux___main___spec__2(x_4, x_5, lean_box(0), x_158, x_161, x_202, x_204); -lean_dec(x_202); +lean_object* x_214; uint8_t x_215; +x_214 = lean_unsigned_to_nat(0u); +x_215 = l_Array_anyRangeMAux___main___at___private_Init_Lean_Meta_ExprDefEq_18__processAssignmentAux___main___spec__2(x_4, x_5, lean_box(0), x_158, x_161, x_212, x_214); +lean_dec(x_212); lean_dec(x_158); lean_dec(x_5); -if (x_205 == 0) +if (x_215 == 0) { -lean_object* x_206; uint8_t x_207; -x_206 = lean_ctor_get(x_2, 1); -lean_inc(x_206); -x_207 = l_Lean_LocalContext_contains(x_206, x_201); -lean_dec(x_201); -if (x_207 == 0) +lean_object* x_216; uint8_t x_217; +x_216 = lean_ctor_get(x_2, 1); +lean_inc(x_216); +x_217 = l_Lean_LocalContext_contains(x_216, x_211); +lean_dec(x_211); +if (x_217 == 0) { -lean_object* x_208; lean_object* x_209; +lean_object* x_218; lean_object* x_219; lean_dec(x_160); lean_dec(x_155); -x_208 = lean_unsigned_to_nat(1u); -x_209 = lean_nat_add(x_4, x_208); +x_218 = lean_unsigned_to_nat(1u); +x_219 = lean_nat_add(x_4, x_218); lean_dec(x_4); -x_4 = x_209; +x_4 = x_219; x_5 = x_161; x_7 = x_159; goto _start; } else { -uint8_t x_211; -x_211 = lean_ctor_get_uint8(x_155, sizeof(void*)*1 + 2); -if (x_211 == 0) +uint8_t x_221; +x_221 = lean_ctor_get_uint8(x_155, sizeof(void*)*1 + 2); +if (x_221 == 0) { -lean_object* x_212; +lean_object* x_222; lean_dec(x_4); lean_dec(x_2); -x_212 = lean_box(0); -x_162 = x_212; -goto block_200; +x_222 = lean_box(0); +x_162 = x_222; +goto block_210; } else { -lean_object* x_213; lean_object* x_214; +lean_object* x_223; lean_object* x_224; lean_dec(x_160); lean_dec(x_155); -x_213 = lean_unsigned_to_nat(1u); -x_214 = lean_nat_add(x_4, x_213); +x_223 = lean_unsigned_to_nat(1u); +x_224 = lean_nat_add(x_4, x_223); lean_dec(x_4); -x_4 = x_214; +x_4 = x_224; x_5 = x_161; x_7 = x_159; goto _start; @@ -38560,275 +38560,320 @@ goto _start; } else { -lean_object* x_216; -lean_dec(x_201); +lean_object* x_226; +lean_dec(x_211); lean_dec(x_4); lean_dec(x_2); -x_216 = lean_box(0); -x_162 = x_216; -goto block_200; +x_226 = lean_box(0); +x_162 = x_226; +goto block_210; } } else { -lean_object* x_217; uint8_t x_218; -lean_dec(x_202); -x_217 = lean_unsigned_to_nat(0u); -x_218 = l_Array_anyRangeMAux___main___at___private_Init_Lean_Meta_ExprDefEq_18__processAssignmentAux___main___spec__3(x_4, x_5, lean_box(0), x_158, lean_box(0), x_161, x_4, x_217); +lean_object* x_227; uint8_t x_228; +lean_dec(x_212); +x_227 = lean_unsigned_to_nat(0u); +x_228 = l_Array_anyRangeMAux___main___at___private_Init_Lean_Meta_ExprDefEq_18__processAssignmentAux___main___spec__3(x_4, x_5, lean_box(0), x_158, lean_box(0), x_161, x_4, x_227); lean_dec(x_158); lean_dec(x_5); -if (x_218 == 0) +if (x_228 == 0) { -lean_object* x_219; uint8_t x_220; -x_219 = lean_ctor_get(x_2, 1); -lean_inc(x_219); -x_220 = l_Lean_LocalContext_contains(x_219, x_201); -lean_dec(x_201); -if (x_220 == 0) -{ -lean_object* x_221; lean_object* x_222; -lean_dec(x_160); -lean_dec(x_155); -x_221 = lean_unsigned_to_nat(1u); -x_222 = lean_nat_add(x_4, x_221); -lean_dec(x_4); -x_4 = x_222; -x_5 = x_161; -x_7 = x_159; -goto _start; -} -else -{ -uint8_t x_224; -x_224 = lean_ctor_get_uint8(x_155, sizeof(void*)*1 + 2); -if (x_224 == 0) -{ -lean_object* x_225; -lean_dec(x_4); -lean_dec(x_2); -x_225 = lean_box(0); -x_162 = x_225; -goto block_200; -} -else -{ -lean_object* x_226; lean_object* x_227; -lean_dec(x_160); -lean_dec(x_155); -x_226 = lean_unsigned_to_nat(1u); -x_227 = lean_nat_add(x_4, x_226); -lean_dec(x_4); -x_4 = x_227; -x_5 = x_161; -x_7 = x_159; -goto _start; -} -} -} -else -{ -lean_object* x_229; -lean_dec(x_201); -lean_dec(x_4); -lean_dec(x_2); -x_229 = lean_box(0); -x_162 = x_229; -goto block_200; -} -} -} -else -{ -uint8_t x_230; -lean_dec(x_160); -lean_dec(x_158); -lean_dec(x_5); -lean_dec(x_4); -lean_dec(x_2); -x_230 = lean_ctor_get_uint8(x_155, sizeof(void*)*1); +lean_object* x_229; uint8_t x_230; +x_229 = lean_ctor_get(x_2, 1); +lean_inc(x_229); +x_230 = l_Lean_LocalContext_contains(x_229, x_211); +lean_dec(x_211); if (x_230 == 0) { -uint8_t x_231; -x_231 = lean_ctor_get_uint8(x_155, sizeof(void*)*1 + 3); +lean_object* x_231; lean_object* x_232; +lean_dec(x_160); lean_dec(x_155); -if (x_231 == 0) +x_231 = lean_unsigned_to_nat(1u); +x_232 = lean_nat_add(x_4, x_231); +lean_dec(x_4); +x_4 = x_232; +x_5 = x_161; +x_7 = x_159; +goto _start; +} +else { -uint8_t x_232; lean_object* x_233; lean_object* x_234; +uint8_t x_234; +x_234 = lean_ctor_get_uint8(x_155, sizeof(void*)*1 + 2); +if (x_234 == 0) +{ +lean_object* x_235; +lean_dec(x_4); +lean_dec(x_2); +x_235 = lean_box(0); +x_162 = x_235; +goto block_210; +} +else +{ +lean_object* x_236; lean_object* x_237; +lean_dec(x_160); +lean_dec(x_155); +x_236 = lean_unsigned_to_nat(1u); +x_237 = lean_nat_add(x_4, x_236); +lean_dec(x_4); +x_4 = x_237; +x_5 = x_161; +x_7 = x_159; +goto _start; +} +} +} +else +{ +lean_object* x_239; +lean_dec(x_211); +lean_dec(x_4); +lean_dec(x_2); +x_239 = lean_box(0); +x_162 = x_239; +goto block_210; +} +} +} +else +{ +uint8_t x_240; +lean_dec(x_160); +lean_dec(x_158); +lean_dec(x_5); +lean_dec(x_4); +lean_dec(x_2); +x_240 = lean_ctor_get_uint8(x_155, sizeof(void*)*1); +if (x_240 == 0) +{ +uint8_t x_241; +x_241 = lean_ctor_get_uint8(x_155, sizeof(void*)*1 + 3); +lean_dec(x_155); +if (x_241 == 0) +{ +uint8_t x_242; +x_242 = l_Array_isEmpty___rarg(x_161); +if (x_242 == 0) +{ +uint8_t x_243; +x_243 = l_Lean_Expr_isApp(x_3); +if (x_243 == 0) +{ +lean_object* x_244; lean_object* x_245; +x_244 = lean_array_get_size(x_161); +lean_dec(x_161); +x_245 = l___private_Init_Lean_Meta_ExprDefEq_17__processConstApprox(x_1, x_244, x_3, x_6, x_159); +return x_245; +} +else +{ +uint8_t x_246; lean_object* x_247; lean_object* x_248; lean_dec(x_161); lean_dec(x_6); lean_dec(x_3); lean_dec(x_1); -x_232 = 0; -x_233 = lean_box(x_232); -x_234 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_234, 0, x_233); -lean_ctor_set(x_234, 1, x_159); -return x_234; -} -else -{ -lean_object* x_235; lean_object* x_236; -x_235 = lean_array_get_size(x_161); -lean_dec(x_161); -x_236 = l___private_Init_Lean_Meta_ExprDefEq_17__processConstApprox(x_1, x_235, x_3, x_6, x_159); -return x_236; +x_246 = 0; +x_247 = lean_box(x_246); +x_248 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_248, 0, x_247); +lean_ctor_set(x_248, 1, x_159); +return x_248; } } else { -uint8_t x_237; -x_237 = l_Lean_Expr_isApp(x_3); -if (x_237 == 0) -{ -uint8_t x_238; -x_238 = lean_ctor_get_uint8(x_155, sizeof(void*)*1 + 3); -lean_dec(x_155); -if (x_238 == 0) -{ -uint8_t x_239; lean_object* x_240; lean_object* x_241; +uint8_t x_249; lean_object* x_250; lean_object* x_251; lean_dec(x_161); lean_dec(x_6); lean_dec(x_3); lean_dec(x_1); -x_239 = 0; -x_240 = lean_box(x_239); -x_241 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_241, 0, x_240); -lean_ctor_set(x_241, 1, x_159); -return x_241; +x_249 = 0; +x_250 = lean_box(x_249); +x_251 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_251, 0, x_250); +lean_ctor_set(x_251, 1, x_159); +return x_251; +} } else { -lean_object* x_242; lean_object* x_243; -x_242 = lean_array_get_size(x_161); +lean_object* x_252; lean_object* x_253; +x_252 = lean_array_get_size(x_161); lean_dec(x_161); -x_243 = l___private_Init_Lean_Meta_ExprDefEq_17__processConstApprox(x_1, x_242, x_3, x_6, x_159); -return x_243; +x_253 = l___private_Init_Lean_Meta_ExprDefEq_17__processConstApprox(x_1, x_252, x_3, x_6, x_159); +return x_253; } } else { -lean_object* x_244; +uint8_t x_254; +x_254 = l_Lean_Expr_isApp(x_3); +if (x_254 == 0) +{ +uint8_t x_255; +x_255 = lean_ctor_get_uint8(x_155, sizeof(void*)*1 + 3); +lean_dec(x_155); +if (x_255 == 0) +{ +uint8_t x_256; +x_256 = l_Array_isEmpty___rarg(x_161); +if (x_256 == 0) +{ +lean_object* x_257; lean_object* x_258; +x_257 = lean_array_get_size(x_161); +lean_dec(x_161); +x_258 = l___private_Init_Lean_Meta_ExprDefEq_17__processConstApprox(x_1, x_257, x_3, x_6, x_159); +return x_258; +} +else +{ +uint8_t x_259; lean_object* x_260; lean_object* x_261; +lean_dec(x_161); +lean_dec(x_6); +lean_dec(x_3); +lean_dec(x_1); +x_259 = 0; +x_260 = lean_box(x_259); +x_261 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_261, 0, x_260); +lean_ctor_set(x_261, 1, x_159); +return x_261; +} +} +else +{ +lean_object* x_262; lean_object* x_263; +x_262 = lean_array_get_size(x_161); +lean_dec(x_161); +x_263 = l___private_Init_Lean_Meta_ExprDefEq_17__processConstApprox(x_1, x_262, x_3, x_6, x_159); +return x_263; +} +} +else +{ +lean_object* x_264; lean_inc(x_6); lean_inc(x_3); lean_inc(x_1); -x_244 = l___private_Init_Lean_Meta_ExprDefEq_14__processAssignmentFOApprox___main(x_1, x_161, x_3, x_6, x_159); -if (lean_obj_tag(x_244) == 0) +x_264 = l___private_Init_Lean_Meta_ExprDefEq_14__processAssignmentFOApprox___main(x_1, x_161, x_3, x_6, x_159); +if (lean_obj_tag(x_264) == 0) { -lean_object* x_245; uint8_t x_246; -x_245 = lean_ctor_get(x_244, 0); -lean_inc(x_245); -x_246 = lean_unbox(x_245); -if (x_246 == 0) -{ -uint8_t x_247; -lean_dec(x_245); -x_247 = lean_ctor_get_uint8(x_155, sizeof(void*)*1 + 3); -lean_dec(x_155); -if (x_247 == 0) -{ -uint8_t x_248; -lean_dec(x_161); -lean_dec(x_6); -lean_dec(x_3); -lean_dec(x_1); -x_248 = !lean_is_exclusive(x_244); -if (x_248 == 0) -{ -lean_object* x_249; uint8_t x_250; lean_object* x_251; -x_249 = lean_ctor_get(x_244, 0); -lean_dec(x_249); -x_250 = 0; -x_251 = lean_box(x_250); -lean_ctor_set(x_244, 0, x_251); -return x_244; -} -else -{ -lean_object* x_252; uint8_t x_253; lean_object* x_254; lean_object* x_255; -x_252 = lean_ctor_get(x_244, 1); -lean_inc(x_252); -lean_dec(x_244); -x_253 = 0; -x_254 = lean_box(x_253); -x_255 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_255, 0, x_254); -lean_ctor_set(x_255, 1, x_252); -return x_255; -} -} -else -{ -lean_object* x_256; lean_object* x_257; lean_object* x_258; -x_256 = lean_ctor_get(x_244, 1); -lean_inc(x_256); -lean_dec(x_244); -x_257 = lean_array_get_size(x_161); -lean_dec(x_161); -x_258 = l___private_Init_Lean_Meta_ExprDefEq_17__processConstApprox(x_1, x_257, x_3, x_6, x_256); -return x_258; -} -} -else -{ -uint8_t x_259; -lean_dec(x_161); -lean_dec(x_155); -lean_dec(x_6); -lean_dec(x_3); -lean_dec(x_1); -x_259 = !lean_is_exclusive(x_244); -if (x_259 == 0) -{ -lean_object* x_260; -x_260 = lean_ctor_get(x_244, 0); -lean_dec(x_260); -return x_244; -} -else -{ -lean_object* x_261; lean_object* x_262; -x_261 = lean_ctor_get(x_244, 1); -lean_inc(x_261); -lean_dec(x_244); -x_262 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_262, 0, x_245); -lean_ctor_set(x_262, 1, x_261); -return x_262; -} -} -} -else -{ -uint8_t x_263; -lean_dec(x_161); -lean_dec(x_155); -lean_dec(x_6); -lean_dec(x_3); -lean_dec(x_1); -x_263 = !lean_is_exclusive(x_244); -if (x_263 == 0) -{ -return x_244; -} -else -{ -lean_object* x_264; lean_object* x_265; lean_object* x_266; -x_264 = lean_ctor_get(x_244, 0); -x_265 = lean_ctor_get(x_244, 1); +lean_object* x_265; uint8_t x_266; +x_265 = lean_ctor_get(x_264, 0); lean_inc(x_265); -lean_inc(x_264); -lean_dec(x_244); -x_266 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_266, 0, x_264); -lean_ctor_set(x_266, 1, x_265); -return x_266; +x_266 = lean_unbox(x_265); +if (x_266 == 0) +{ +uint8_t x_267; +lean_dec(x_265); +x_267 = lean_ctor_get_uint8(x_155, sizeof(void*)*1 + 3); +lean_dec(x_155); +if (x_267 == 0) +{ +uint8_t x_268; +lean_dec(x_161); +lean_dec(x_6); +lean_dec(x_3); +lean_dec(x_1); +x_268 = !lean_is_exclusive(x_264); +if (x_268 == 0) +{ +lean_object* x_269; uint8_t x_270; lean_object* x_271; +x_269 = lean_ctor_get(x_264, 0); +lean_dec(x_269); +x_270 = 0; +x_271 = lean_box(x_270); +lean_ctor_set(x_264, 0, x_271); +return x_264; +} +else +{ +lean_object* x_272; uint8_t x_273; lean_object* x_274; lean_object* x_275; +x_272 = lean_ctor_get(x_264, 1); +lean_inc(x_272); +lean_dec(x_264); +x_273 = 0; +x_274 = lean_box(x_273); +x_275 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_275, 0, x_274); +lean_ctor_set(x_275, 1, x_272); +return x_275; +} +} +else +{ +lean_object* x_276; lean_object* x_277; lean_object* x_278; +x_276 = lean_ctor_get(x_264, 1); +lean_inc(x_276); +lean_dec(x_264); +x_277 = lean_array_get_size(x_161); +lean_dec(x_161); +x_278 = l___private_Init_Lean_Meta_ExprDefEq_17__processConstApprox(x_1, x_277, x_3, x_6, x_276); +return x_278; +} +} +else +{ +uint8_t x_279; +lean_dec(x_161); +lean_dec(x_155); +lean_dec(x_6); +lean_dec(x_3); +lean_dec(x_1); +x_279 = !lean_is_exclusive(x_264); +if (x_279 == 0) +{ +lean_object* x_280; +x_280 = lean_ctor_get(x_264, 0); +lean_dec(x_280); +return x_264; +} +else +{ +lean_object* x_281; lean_object* x_282; +x_281 = lean_ctor_get(x_264, 1); +lean_inc(x_281); +lean_dec(x_264); +x_282 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_282, 0, x_265); +lean_ctor_set(x_282, 1, x_281); +return x_282; +} +} +} +else +{ +uint8_t x_283; +lean_dec(x_161); +lean_dec(x_155); +lean_dec(x_6); +lean_dec(x_3); +lean_dec(x_1); +x_283 = !lean_is_exclusive(x_264); +if (x_283 == 0) +{ +return x_264; +} +else +{ +lean_object* x_284; lean_object* x_285; lean_object* x_286; +x_284 = lean_ctor_get(x_264, 0); +x_285 = lean_ctor_get(x_264, 1); +lean_inc(x_285); +lean_inc(x_284); +lean_dec(x_264); +x_286 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_286, 0, x_284); +lean_ctor_set(x_286, 1, x_285); +return x_286; } } } } } -block_200: +block_210: { uint8_t x_163; lean_dec(x_162); @@ -38840,43 +38885,42 @@ x_164 = lean_ctor_get_uint8(x_155, sizeof(void*)*1 + 3); lean_dec(x_155); if (x_164 == 0) { -uint8_t x_165; lean_object* x_166; lean_object* x_167; +uint8_t x_165; +x_165 = l_Array_isEmpty___rarg(x_161); +if (x_165 == 0) +{ +uint8_t x_166; +x_166 = l_Lean_Expr_isApp(x_3); +if (x_166 == 0) +{ +lean_object* x_167; lean_object* x_168; +lean_dec(x_160); +x_167 = lean_array_get_size(x_161); +lean_dec(x_161); +x_168 = l___private_Init_Lean_Meta_ExprDefEq_17__processConstApprox(x_1, x_167, x_3, x_6, x_159); +return x_168; +} +else +{ +uint8_t x_169; lean_object* x_170; lean_object* x_171; lean_dec(x_161); lean_dec(x_6); lean_dec(x_3); lean_dec(x_1); -x_165 = 0; -x_166 = lean_box(x_165); +x_169 = 0; +x_170 = lean_box(x_169); if (lean_is_scalar(x_160)) { - x_167 = lean_alloc_ctor(0, 2, 0); + x_171 = lean_alloc_ctor(0, 2, 0); } else { - x_167 = x_160; + x_171 = x_160; } -lean_ctor_set(x_167, 0, x_166); -lean_ctor_set(x_167, 1, x_159); -return x_167; -} -else -{ -lean_object* x_168; lean_object* x_169; -lean_dec(x_160); -x_168 = lean_array_get_size(x_161); -lean_dec(x_161); -x_169 = l___private_Init_Lean_Meta_ExprDefEq_17__processConstApprox(x_1, x_168, x_3, x_6, x_159); -return x_169; +lean_ctor_set(x_171, 0, x_170); +lean_ctor_set(x_171, 1, x_159); +return x_171; } } else { -uint8_t x_170; -x_170 = l_Lean_Expr_isApp(x_3); -if (x_170 == 0) -{ -uint8_t x_171; -x_171 = lean_ctor_get_uint8(x_155, sizeof(void*)*1 + 3); -lean_dec(x_155); -if (x_171 == 0) -{ uint8_t x_172; lean_object* x_173; lean_object* x_174; lean_dec(x_161); lean_dec(x_6); @@ -38893,6 +38937,7 @@ lean_ctor_set(x_174, 0, x_173); lean_ctor_set(x_174, 1, x_159); return x_174; } +} else { lean_object* x_175; lean_object* x_176; @@ -38905,122 +38950,173 @@ return x_176; } else { -lean_object* x_177; +uint8_t x_177; +x_177 = l_Lean_Expr_isApp(x_3); +if (x_177 == 0) +{ +uint8_t x_178; +x_178 = lean_ctor_get_uint8(x_155, sizeof(void*)*1 + 3); +lean_dec(x_155); +if (x_178 == 0) +{ +uint8_t x_179; +x_179 = l_Array_isEmpty___rarg(x_161); +if (x_179 == 0) +{ +lean_object* x_180; lean_object* x_181; +lean_dec(x_160); +x_180 = lean_array_get_size(x_161); +lean_dec(x_161); +x_181 = l___private_Init_Lean_Meta_ExprDefEq_17__processConstApprox(x_1, x_180, x_3, x_6, x_159); +return x_181; +} +else +{ +uint8_t x_182; lean_object* x_183; lean_object* x_184; +lean_dec(x_161); +lean_dec(x_6); +lean_dec(x_3); +lean_dec(x_1); +x_182 = 0; +x_183 = lean_box(x_182); +if (lean_is_scalar(x_160)) { + x_184 = lean_alloc_ctor(0, 2, 0); +} else { + x_184 = x_160; +} +lean_ctor_set(x_184, 0, x_183); +lean_ctor_set(x_184, 1, x_159); +return x_184; +} +} +else +{ +lean_object* x_185; lean_object* x_186; +lean_dec(x_160); +x_185 = lean_array_get_size(x_161); +lean_dec(x_161); +x_186 = l___private_Init_Lean_Meta_ExprDefEq_17__processConstApprox(x_1, x_185, x_3, x_6, x_159); +return x_186; +} +} +else +{ +lean_object* x_187; lean_dec(x_160); lean_inc(x_6); lean_inc(x_3); lean_inc(x_1); -x_177 = l___private_Init_Lean_Meta_ExprDefEq_14__processAssignmentFOApprox___main(x_1, x_161, x_3, x_6, x_159); -if (lean_obj_tag(x_177) == 0) +x_187 = l___private_Init_Lean_Meta_ExprDefEq_14__processAssignmentFOApprox___main(x_1, x_161, x_3, x_6, x_159); +if (lean_obj_tag(x_187) == 0) { -lean_object* x_178; uint8_t x_179; -x_178 = lean_ctor_get(x_177, 0); -lean_inc(x_178); -x_179 = lean_unbox(x_178); -if (x_179 == 0) +lean_object* x_188; uint8_t x_189; +x_188 = lean_ctor_get(x_187, 0); +lean_inc(x_188); +x_189 = lean_unbox(x_188); +if (x_189 == 0) { -uint8_t x_180; -lean_dec(x_178); -x_180 = lean_ctor_get_uint8(x_155, sizeof(void*)*1 + 3); +uint8_t x_190; +lean_dec(x_188); +x_190 = lean_ctor_get_uint8(x_155, sizeof(void*)*1 + 3); lean_dec(x_155); -if (x_180 == 0) +if (x_190 == 0) { -uint8_t x_181; +uint8_t x_191; lean_dec(x_161); lean_dec(x_6); lean_dec(x_3); lean_dec(x_1); -x_181 = !lean_is_exclusive(x_177); -if (x_181 == 0) +x_191 = !lean_is_exclusive(x_187); +if (x_191 == 0) { -lean_object* x_182; uint8_t x_183; lean_object* x_184; -x_182 = lean_ctor_get(x_177, 0); -lean_dec(x_182); -x_183 = 0; -x_184 = lean_box(x_183); -lean_ctor_set(x_177, 0, x_184); -return x_177; +lean_object* x_192; uint8_t x_193; lean_object* x_194; +x_192 = lean_ctor_get(x_187, 0); +lean_dec(x_192); +x_193 = 0; +x_194 = lean_box(x_193); +lean_ctor_set(x_187, 0, x_194); +return x_187; } else { -lean_object* x_185; uint8_t x_186; lean_object* x_187; lean_object* x_188; -x_185 = lean_ctor_get(x_177, 1); -lean_inc(x_185); -lean_dec(x_177); -x_186 = 0; -x_187 = lean_box(x_186); -x_188 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_188, 0, x_187); -lean_ctor_set(x_188, 1, x_185); -return x_188; +lean_object* x_195; uint8_t x_196; lean_object* x_197; lean_object* x_198; +x_195 = lean_ctor_get(x_187, 1); +lean_inc(x_195); +lean_dec(x_187); +x_196 = 0; +x_197 = lean_box(x_196); +x_198 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_198, 0, x_197); +lean_ctor_set(x_198, 1, x_195); +return x_198; } } else { -lean_object* x_189; lean_object* x_190; lean_object* x_191; -x_189 = lean_ctor_get(x_177, 1); -lean_inc(x_189); -lean_dec(x_177); -x_190 = lean_array_get_size(x_161); +lean_object* x_199; lean_object* x_200; lean_object* x_201; +x_199 = lean_ctor_get(x_187, 1); +lean_inc(x_199); +lean_dec(x_187); +x_200 = lean_array_get_size(x_161); lean_dec(x_161); -x_191 = l___private_Init_Lean_Meta_ExprDefEq_17__processConstApprox(x_1, x_190, x_3, x_6, x_189); -return x_191; +x_201 = l___private_Init_Lean_Meta_ExprDefEq_17__processConstApprox(x_1, x_200, x_3, x_6, x_199); +return x_201; } } else { -uint8_t x_192; +uint8_t x_202; lean_dec(x_161); lean_dec(x_155); lean_dec(x_6); lean_dec(x_3); lean_dec(x_1); -x_192 = !lean_is_exclusive(x_177); -if (x_192 == 0) +x_202 = !lean_is_exclusive(x_187); +if (x_202 == 0) { -lean_object* x_193; -x_193 = lean_ctor_get(x_177, 0); -lean_dec(x_193); -return x_177; +lean_object* x_203; +x_203 = lean_ctor_get(x_187, 0); +lean_dec(x_203); +return x_187; } else { -lean_object* x_194; lean_object* x_195; -x_194 = lean_ctor_get(x_177, 1); -lean_inc(x_194); -lean_dec(x_177); -x_195 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_195, 0, x_178); -lean_ctor_set(x_195, 1, x_194); -return x_195; +lean_object* x_204; lean_object* x_205; +x_204 = lean_ctor_get(x_187, 1); +lean_inc(x_204); +lean_dec(x_187); +x_205 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_205, 0, x_188); +lean_ctor_set(x_205, 1, x_204); +return x_205; } } } else { -uint8_t x_196; +uint8_t x_206; lean_dec(x_161); lean_dec(x_155); lean_dec(x_6); lean_dec(x_3); lean_dec(x_1); -x_196 = !lean_is_exclusive(x_177); -if (x_196 == 0) +x_206 = !lean_is_exclusive(x_187); +if (x_206 == 0) { -return x_177; +return x_187; } else { -lean_object* x_197; lean_object* x_198; lean_object* x_199; -x_197 = lean_ctor_get(x_177, 0); -x_198 = lean_ctor_get(x_177, 1); -lean_inc(x_198); -lean_inc(x_197); -lean_dec(x_177); -x_199 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_199, 0, x_197); -lean_ctor_set(x_199, 1, x_198); -return x_199; +lean_object* x_207; lean_object* x_208; lean_object* x_209; +x_207 = lean_ctor_get(x_187, 0); +x_208 = lean_ctor_get(x_187, 1); +lean_inc(x_208); +lean_inc(x_207); +lean_dec(x_187); +x_209 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_209, 0, x_207); +lean_ctor_set(x_209, 1, x_208); +return x_209; } } } @@ -39029,7 +39125,7 @@ return x_199; } else { -uint8_t x_267; +uint8_t x_287; lean_dec(x_155); lean_dec(x_6); lean_dec(x_5); @@ -39037,23 +39133,23 @@ lean_dec(x_4); lean_dec(x_3); lean_dec(x_2); lean_dec(x_1); -x_267 = !lean_is_exclusive(x_157); -if (x_267 == 0) +x_287 = !lean_is_exclusive(x_157); +if (x_287 == 0) { return x_157; } else { -lean_object* x_268; lean_object* x_269; lean_object* x_270; -x_268 = lean_ctor_get(x_157, 0); -x_269 = lean_ctor_get(x_157, 1); -lean_inc(x_269); -lean_inc(x_268); +lean_object* x_288; lean_object* x_289; lean_object* x_290; +x_288 = lean_ctor_get(x_157, 0); +x_289 = lean_ctor_get(x_157, 1); +lean_inc(x_289); +lean_inc(x_288); lean_dec(x_157); -x_270 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_270, 0, x_268); -lean_ctor_set(x_270, 1, x_269); -return x_270; +x_290 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_290, 0, x_288); +lean_ctor_set(x_290, 1, x_289); +return x_290; } } }