From aab4d64f2560b095b34234c623a75888bb558e2e Mon Sep 17 00:00:00 2001 From: Lean stage0 autoupdater <> Date: Mon, 23 Feb 2026 04:20:25 +0000 Subject: [PATCH] chore: update stage0 --- stage0/src/stdlib_flags.h | 1 - stage0/stdlib/Lean/Elab/ComputedFields.c | 2 +- stage0/stdlib/Lean/Elab/Structure.c | 1795 +++++++------ stage0/stdlib/Lean/Meta/WHNF.c | 2963 ++++++++++++---------- stage0/stdlib/Lean/ProjFns.c | 482 ++++ 5 files changed, 3127 insertions(+), 2116 deletions(-) diff --git a/stage0/src/stdlib_flags.h b/stage0/src/stdlib_flags.h index ad491b0de1..79a0e58edd 100644 --- a/stage0/src/stdlib_flags.h +++ b/stage0/src/stdlib_flags.h @@ -1,4 +1,3 @@ -// update me! #include "util/options.h" namespace lean { diff --git a/stage0/stdlib/Lean/Elab/ComputedFields.c b/stage0/stdlib/Lean/Elab/ComputedFields.c index aa1153e7f4..460fab8927 100644 --- a/stage0/stdlib/Lean/Elab/ComputedFields.c +++ b/stage0/stdlib/Lean/Elab/ComputedFields.c @@ -1581,7 +1581,7 @@ _start: lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; x_1 = ((lean_object*)(l_Lean_Meta_whnfEasyCases___at___00Lean_Meta_whnfEasyCases___at___00Lean_Meta_whnfHeadPred___at___00Lean_Elab_ComputedFields_getComputedFieldValue_spec__0_spec__0_spec__2___closed__2)); x_2 = lean_unsigned_to_nat(22u); -x_3 = lean_unsigned_to_nat(381u); +x_3 = lean_unsigned_to_nat(390u); x_4 = ((lean_object*)(l_Lean_Meta_whnfEasyCases___at___00Lean_Meta_whnfEasyCases___at___00Lean_Meta_whnfHeadPred___at___00Lean_Elab_ComputedFields_getComputedFieldValue_spec__0_spec__0_spec__2___closed__1)); x_5 = ((lean_object*)(l_Lean_Meta_whnfEasyCases___at___00Lean_Meta_whnfEasyCases___at___00Lean_Meta_whnfHeadPred___at___00Lean_Elab_ComputedFields_getComputedFieldValue_spec__0_spec__0_spec__2___closed__0)); x_6 = l_mkPanicMessageWithDecl(x_5, x_4, x_3, x_2, x_1); diff --git a/stage0/stdlib/Lean/Elab/Structure.c b/stage0/stdlib/Lean/Elab/Structure.c index 0f055b91c8..00becc6b8e 100644 --- a/stage0/stdlib/Lean/Elab/Structure.c +++ b/stage0/stdlib/Lean/Elab/Structure.c @@ -2700,6 +2700,7 @@ LEAN_EXPORT lean_object* l_Lean_setReducibilityStatus___at___00Lean_setReducible LEAN_EXPORT lean_object* l_Lean_setReducibleAttribute___at___00__private_Lean_Elab_Structure_0__Lean_Elab_Command_Structure_mkCoercionToCopiedParent_spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_setReducibleAttribute___at___00__private_Lean_Elab_Structure_0__Lean_Elab_Command_Structure_mkCoercionToCopiedParent_spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_isProp(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_addAuxParentProjectionInfo(lean_object*, lean_object*, lean_object*, uint8_t); uint8_t l_Lean_BinderInfo_isInstImplicit(uint8_t); lean_object* l_Lean_addAndCompile(lean_object*, uint8_t, lean_object*, lean_object*); LEAN_EXPORT lean_object* l___private_Lean_Elab_Structure_0__Lean_Elab_Command_Structure_mkCoercionToCopiedParent(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -75789,795 +75790,835 @@ return x_7; LEAN_EXPORT lean_object* l___private_Lean_Elab_Structure_0__Lean_Elab_Command_Structure_mkCoercionToCopiedParent(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8, lean_object* x_9, lean_object* x_10, lean_object* x_11) { _start: { -lean_object* x_13; +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; 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_47; lean_inc(x_11); lean_inc_ref(x_10); lean_inc(x_9); lean_inc_ref(x_8); lean_inc_ref(x_6); -x_13 = l_Lean_Meta_isProp(x_6, x_8, x_9, x_10, x_11); -if (lean_obj_tag(x_13) == 0) +x_47 = l_Lean_Meta_isProp(x_6, x_8, x_9, x_10, x_11); +if (lean_obj_tag(x_47) == 0) { -lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; uint8_t x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; uint8_t x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_40; uint8_t x_41; lean_object* x_42; lean_object* x_43; uint8_t x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_object* x_59; lean_object* x_60; uint8_t x_61; lean_object* x_62; lean_object* x_63; lean_object* x_64; lean_object* x_65; lean_object* x_66; lean_object* x_67; uint8_t x_68; lean_object* x_69; lean_object* x_75; uint8_t x_76; lean_object* x_77; lean_object* x_78; lean_object* x_79; lean_object* x_80; lean_object* x_81; lean_object* x_82; lean_object* x_83; uint8_t x_84; lean_object* x_85; lean_object* x_86; lean_object* x_87; uint8_t x_88; uint8_t x_89; uint8_t x_99; uint8_t x_100; uint8_t x_101; uint8_t 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; uint8_t x_161; uint8_t x_162; uint8_t x_163; uint8_t x_183; -x_14 = lean_ctor_get(x_13, 0); -lean_inc(x_14); -lean_dec_ref(x_13); -x_15 = lean_st_ref_get(x_11); -x_16 = lean_ctor_get(x_3, 0); -lean_inc_ref(x_16); +lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_object* x_51; lean_object* x_52; lean_object* x_53; uint8_t x_54; lean_object* x_55; lean_object* x_56; uint8_t x_57; lean_object* x_58; lean_object* x_59; lean_object* x_60; lean_object* x_61; lean_object* x_62; lean_object* x_63; lean_object* x_64; uint8_t x_90; lean_object* x_91; uint8_t x_92; lean_object* x_93; lean_object* x_94; lean_object* x_95; lean_object* x_96; lean_object* x_97; lean_object* x_98; lean_object* x_99; lean_object* x_100; uint8_t x_110; lean_object* x_111; lean_object* x_112; lean_object* x_113; lean_object* x_114; uint8_t 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_127; uint8_t x_128; lean_object* x_129; lean_object* x_130; lean_object* x_131; lean_object* x_132; uint8_t x_133; lean_object* x_134; lean_object* x_135; lean_object* x_136; uint8_t x_137; lean_object* x_138; lean_object* x_139; lean_object* x_140; lean_object* x_141; uint8_t x_142; uint8_t x_152; lean_object* x_153; uint8_t x_154; uint8_t x_155; uint8_t 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; uint8_t x_214; uint8_t x_215; uint8_t x_216; uint8_t x_236; +x_48 = lean_ctor_get(x_47, 0); +lean_inc(x_48); +lean_dec_ref(x_47); +x_49 = lean_st_ref_get(x_11); +x_50 = lean_ctor_get(x_3, 0); +lean_inc_ref(x_50); if (lean_is_exclusive(x_3)) { lean_ctor_release(x_3, 0); lean_ctor_release(x_3, 1); lean_ctor_release(x_3, 2); - x_17 = x_3; + x_51 = x_3; } else { lean_dec_ref(x_3); - x_17 = lean_box(0); + x_51 = lean_box(0); } -x_18 = lean_ctor_get(x_16, 0); -lean_inc(x_18); -x_19 = lean_ctor_get(x_16, 2); -lean_inc_ref(x_19); -x_20 = lean_ctor_get_uint8(x_16, sizeof(void*)*12); -lean_dec_ref(x_16); -if (x_20 == 0) -{ -lean_dec(x_15); -x_183 = x_20; -goto block_186; -} -else -{ -lean_object* x_187; lean_object* x_188; uint8_t x_189; -x_187 = lean_ctor_get(x_15, 0); -lean_inc_ref(x_187); -lean_dec(x_15); -x_188 = lean_ctor_get(x_5, 2); -lean_inc(x_188); -x_189 = lean_is_class(x_187, x_188); -if (x_189 == 0) -{ -x_183 = x_189; -goto block_186; -} -else -{ -uint8_t x_190; -x_190 = 3; -x_161 = x_20; -x_162 = x_189; -x_163 = x_190; -goto block_182; -} -} -block_39: -{ -lean_object* x_30; -lean_inc(x_22); -x_30 = l_Lean_Elab_addDeclarationRangesFromSyntax___at___00__private_Lean_Elab_Structure_0__Lean_Elab_Command_Structure_mkCoercionToCopiedParent_spec__0(x_22, x_18, x_21, x_25, x_26, x_27, x_28); -lean_dec(x_28); -lean_dec(x_26); -lean_dec_ref(x_25); -lean_dec(x_21); -lean_dec(x_18); -if (lean_obj_tag(x_30) == 0) -{ -uint8_t x_31; -x_31 = !lean_is_exclusive(x_30); -if (x_31 == 0) -{ -lean_object* x_32; lean_object* x_33; -x_32 = lean_ctor_get(x_30, 0); -lean_dec(x_32); -x_33 = lean_alloc_ctor(0, 2, 1); -lean_ctor_set(x_33, 0, x_23); -lean_ctor_set(x_33, 1, x_22); -lean_ctor_set_uint8(x_33, sizeof(void*)*2, x_24); -lean_ctor_set(x_30, 0, x_33); -return x_30; -} -else -{ -lean_object* x_34; lean_object* x_35; -lean_dec(x_30); -x_34 = lean_alloc_ctor(0, 2, 1); -lean_ctor_set(x_34, 0, x_23); -lean_ctor_set(x_34, 1, x_22); -lean_ctor_set_uint8(x_34, sizeof(void*)*2, x_24); -x_35 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_35, 0, x_34); -return x_35; -} -} -else -{ -uint8_t x_36; -lean_dec(x_23); -lean_dec(x_22); -x_36 = !lean_is_exclusive(x_30); -if (x_36 == 0) -{ -return x_30; -} -else -{ -lean_object* x_37; lean_object* x_38; -x_37 = lean_ctor_get(x_30, 0); -lean_inc(x_37); -lean_dec(x_30); -x_38 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_38, 0, x_37); -return x_38; -} -} -} -block_58: -{ -lean_object* x_50; -lean_inc(x_48); -lean_inc_ref(x_47); -lean_inc(x_46); -lean_inc_ref(x_45); -x_50 = l_Lean_Meta_isProp(x_6, x_45, x_46, x_47, x_48); -if (lean_obj_tag(x_50) == 0) -{ -lean_object* x_51; uint8_t x_52; -x_51 = lean_ctor_get(x_50, 0); -lean_inc(x_51); +x_52 = lean_ctor_get(x_50, 0); +lean_inc(x_52); +x_53 = lean_ctor_get(x_50, 2); +lean_inc_ref(x_53); +x_54 = lean_ctor_get_uint8(x_50, sizeof(void*)*12); lean_dec_ref(x_50); -x_52 = l_Lean_BinderInfo_isInstImplicit(x_41); -if (x_52 == 0) +if (x_54 == 0) { -uint8_t x_53; -x_53 = lean_unbox(x_51); -lean_dec(x_51); -if (x_53 == 0) -{ -lean_object* x_54; -lean_inc(x_42); -x_54 = l_Lean_setReducibleAttribute___at___00__private_Lean_Elab_Structure_0__Lean_Elab_Command_Structure_mkCoercionToCopiedParent_spec__1(x_42, x_45, x_46, x_47, x_48); -lean_dec_ref(x_54); -x_21 = x_40; -x_22 = x_42; -x_23 = x_43; -x_24 = x_44; -x_25 = x_45; -x_26 = x_46; -x_27 = x_47; -x_28 = x_48; -x_29 = lean_box(0); -goto block_39; +lean_dec(x_49); +x_236 = x_54; +goto block_239; } else { -x_21 = x_40; -x_22 = x_42; -x_23 = x_43; -x_24 = x_44; -x_25 = x_45; -x_26 = x_46; -x_27 = x_47; -x_28 = x_48; -x_29 = lean_box(0); -goto block_39; -} +lean_object* x_240; lean_object* x_241; uint8_t x_242; +x_240 = lean_ctor_get(x_49, 0); +lean_inc_ref(x_240); +lean_dec(x_49); +x_241 = lean_ctor_get(x_5, 2); +lean_inc(x_241); +x_242 = lean_is_class(x_240, x_241); +if (x_242 == 0) +{ +x_236 = x_242; +goto block_239; } else { -lean_dec(x_51); -x_21 = x_40; -x_22 = x_42; -x_23 = x_43; -x_24 = x_44; -x_25 = x_45; -x_26 = x_46; -x_27 = x_47; -x_28 = x_48; -x_29 = lean_box(0); -goto block_39; +uint8_t x_243; +x_243 = 3; +x_214 = x_242; +x_215 = x_54; +x_216 = x_243; +goto block_235; } } -else +block_89: { -uint8_t x_55; -lean_dec(x_48); -lean_dec_ref(x_47); -lean_dec(x_46); -lean_dec_ref(x_45); -lean_dec(x_43); -lean_dec(x_42); -lean_dec(x_40); -lean_dec(x_18); -x_55 = !lean_is_exclusive(x_50); -if (x_55 == 0) +lean_object* x_65; +lean_inc(x_58); +x_65 = l_Lean_Elab_addDeclarationRangesFromSyntax___at___00__private_Lean_Elab_Structure_0__Lean_Elab_Command_Structure_mkCoercionToCopiedParent_spec__0(x_58, x_52, x_59, x_60, x_61, x_62, x_63); +lean_dec_ref(x_60); +lean_dec(x_59); +lean_dec(x_52); +if (lean_obj_tag(x_65) == 0) { -return x_50; -} -else +lean_object* x_66; +lean_dec_ref(x_65); +x_66 = lean_st_ref_take(x_63); +if (x_54 == 0) { -lean_object* x_56; lean_object* x_57; -x_56 = lean_ctor_get(x_50, 0); -lean_inc(x_56); -lean_dec(x_50); -x_57 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_57, 0, x_56); -return x_57; -} -} -} -block_74: -{ -lean_object* x_70; -lean_inc(x_63); -lean_inc_ref(x_59); -x_70 = l_Lean_addDecl(x_69, x_68, x_59, x_63); -if (lean_obj_tag(x_70) == 0) -{ -lean_dec_ref(x_70); -x_40 = x_62; -x_41 = x_61; -x_42 = x_64; -x_43 = x_66; -x_44 = x_68; -x_45 = x_67; -x_46 = x_65; -x_47 = x_59; -x_48 = x_63; -x_49 = lean_box(0); -goto block_58; -} -else -{ -uint8_t x_71; -lean_dec_ref(x_67); +lean_object* x_67; lean_object* x_68; lean_object* x_69; lean_object* x_70; lean_object* x_71; lean_object* x_72; lean_object* x_73; lean_object* x_74; lean_object* x_75; +x_67 = lean_ctor_get(x_66, 0); +lean_inc_ref(x_67); +x_68 = lean_ctor_get(x_66, 1); +lean_inc(x_68); +x_69 = lean_ctor_get(x_66, 2); +lean_inc_ref(x_69); +x_70 = lean_ctor_get(x_66, 3); +lean_inc_ref(x_70); +x_71 = lean_ctor_get(x_66, 4); +lean_inc_ref(x_71); +x_72 = lean_ctor_get(x_66, 6); +lean_inc_ref(x_72); +x_73 = lean_ctor_get(x_66, 7); +lean_inc_ref(x_73); +x_74 = lean_ctor_get(x_66, 8); +lean_inc_ref(x_74); lean_dec(x_66); -lean_dec(x_65); -lean_dec(x_64); -lean_dec(x_63); -lean_dec(x_62); -lean_dec_ref(x_59); -lean_dec(x_18); -lean_dec_ref(x_6); -x_71 = !lean_is_exclusive(x_70); -if (x_71 == 0) -{ -return x_70; +lean_inc(x_58); +x_75 = l_Lean_addAuxParentProjectionInfo(x_67, x_58, x_56, x_54); +x_13 = x_55; +x_14 = x_57; +x_15 = lean_box(0); +x_16 = x_61; +x_17 = x_58; +x_18 = x_68; +x_19 = x_69; +x_20 = x_70; +x_21 = x_71; +x_22 = x_72; +x_23 = x_73; +x_24 = x_74; +x_25 = x_63; +x_26 = x_75; +goto block_46; } else { -lean_object* x_72; lean_object* x_73; -x_72 = lean_ctor_get(x_70, 0); -lean_inc(x_72); -lean_dec(x_70); -x_73 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_73, 0, x_72); -return x_73; -} -} -} -block_98: -{ -lean_object* x_90; lean_object* x_91; lean_object* x_92; lean_object* x_93; lean_object* x_94; -x_90 = lean_box(0); -lean_inc(x_79); -x_91 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_91, 0, x_79); -lean_ctor_set(x_91, 1, x_90); -x_92 = lean_alloc_ctor(0, 4, 1); -lean_ctor_set(x_92, 0, x_77); -lean_ctor_set(x_92, 1, x_87); -lean_ctor_set(x_92, 2, x_75); -lean_ctor_set(x_92, 3, x_91); -lean_ctor_set_uint8(x_92, sizeof(void*)*4, x_89); -x_93 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_93, 0, x_92); -lean_inc(x_78); +lean_object* x_76; lean_object* x_77; lean_object* x_78; lean_object* x_79; lean_object* x_80; lean_object* x_81; lean_object* x_82; lean_object* x_83; uint8_t x_84; lean_object* x_85; +x_76 = lean_ctor_get(x_66, 0); +lean_inc_ref(x_76); +x_77 = lean_ctor_get(x_66, 1); +lean_inc(x_77); +x_78 = lean_ctor_get(x_66, 2); +lean_inc_ref(x_78); +x_79 = lean_ctor_get(x_66, 3); +lean_inc_ref(x_79); +x_80 = lean_ctor_get(x_66, 4); +lean_inc_ref(x_80); +x_81 = lean_ctor_get(x_66, 6); +lean_inc_ref(x_81); +x_82 = lean_ctor_get(x_66, 7); lean_inc_ref(x_82); -x_94 = l_Lean_addAndCompile(x_93, x_84, x_82, x_78); -if (lean_obj_tag(x_94) == 0) -{ -lean_dec_ref(x_94); -x_40 = x_85; -x_41 = x_76; -x_42 = x_79; -x_43 = x_81; -x_44 = x_88; -x_45 = x_86; -x_46 = x_80; -x_47 = x_82; -x_48 = x_78; -x_49 = lean_box(0); -goto block_58; +x_83 = lean_ctor_get(x_66, 8); +lean_inc_ref(x_83); +lean_dec(x_66); +lean_inc(x_55); +lean_inc_ref(x_76); +x_84 = lean_is_class(x_76, x_55); +lean_inc(x_58); +x_85 = l_Lean_addAuxParentProjectionInfo(x_76, x_58, x_56, x_84); +x_13 = x_55; +x_14 = x_57; +x_15 = lean_box(0); +x_16 = x_61; +x_17 = x_58; +x_18 = x_77; +x_19 = x_78; +x_20 = x_79; +x_21 = x_80; +x_22 = x_81; +x_23 = x_82; +x_24 = x_83; +x_25 = x_63; +x_26 = x_85; +goto block_46; +} } else { -uint8_t x_95; -lean_dec_ref(x_86); -lean_dec(x_85); -lean_dec_ref(x_82); -lean_dec(x_81); -lean_dec(x_80); -lean_dec(x_79); -lean_dec(x_78); -lean_dec(x_18); -lean_dec_ref(x_6); -x_95 = !lean_is_exclusive(x_94); -if (x_95 == 0) +uint8_t x_86; +lean_dec(x_63); +lean_dec(x_61); +lean_dec(x_58); +lean_dec(x_56); +lean_dec(x_55); +x_86 = !lean_is_exclusive(x_65); +if (x_86 == 0) { -return x_94; +return x_65; } else { -lean_object* x_96; lean_object* x_97; -x_96 = lean_ctor_get(x_94, 0); -lean_inc(x_96); +lean_object* x_87; lean_object* x_88; +x_87 = lean_ctor_get(x_65, 0); +lean_inc(x_87); +lean_dec(x_65); +x_88 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_88, 0, x_87); +return x_88; +} +} +} +block_109: +{ +lean_object* x_101; +lean_inc(x_99); +lean_inc_ref(x_98); +lean_inc(x_97); +lean_inc_ref(x_96); +x_101 = l_Lean_Meta_isProp(x_6, x_96, x_97, x_98, x_99); +if (lean_obj_tag(x_101) == 0) +{ +lean_object* x_102; uint8_t x_103; +x_102 = lean_ctor_get(x_101, 0); +lean_inc(x_102); +lean_dec_ref(x_101); +x_103 = l_Lean_BinderInfo_isInstImplicit(x_90); +if (x_103 == 0) +{ +uint8_t x_104; +x_104 = lean_unbox(x_102); +lean_dec(x_102); +if (x_104 == 0) +{ +lean_object* x_105; +lean_inc(x_94); +x_105 = l_Lean_setReducibleAttribute___at___00__private_Lean_Elab_Structure_0__Lean_Elab_Command_Structure_mkCoercionToCopiedParent_spec__1(x_94, x_96, x_97, x_98, x_99); +lean_dec_ref(x_105); +x_55 = x_91; +x_56 = x_93; +x_57 = x_92; +x_58 = x_94; +x_59 = x_95; +x_60 = x_96; +x_61 = x_97; +x_62 = x_98; +x_63 = x_99; +x_64 = lean_box(0); +goto block_89; +} +else +{ +x_55 = x_91; +x_56 = x_93; +x_57 = x_92; +x_58 = x_94; +x_59 = x_95; +x_60 = x_96; +x_61 = x_97; +x_62 = x_98; +x_63 = x_99; +x_64 = lean_box(0); +goto block_89; +} +} +else +{ +lean_dec(x_102); +x_55 = x_91; +x_56 = x_93; +x_57 = x_92; +x_58 = x_94; +x_59 = x_95; +x_60 = x_96; +x_61 = x_97; +x_62 = x_98; +x_63 = x_99; +x_64 = lean_box(0); +goto block_89; +} +} +else +{ +uint8_t x_106; +lean_dec(x_99); +lean_dec_ref(x_98); +lean_dec(x_97); +lean_dec_ref(x_96); +lean_dec(x_95); lean_dec(x_94); -x_97 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_97, 0, x_96); -return x_97; +lean_dec(x_93); +lean_dec(x_91); +lean_dec(x_52); +x_106 = !lean_is_exclusive(x_101); +if (x_106 == 0) +{ +return x_101; +} +else +{ +lean_object* x_107; lean_object* x_108; +x_107 = lean_ctor_get(x_101, 0); +lean_inc(x_107); +lean_dec(x_101); +x_108 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_108, 0, x_107); +return x_108; } } } -block_160: +block_126: { -lean_object* x_110; lean_object* x_111; lean_object* x_112; -x_110 = lean_array_get_size(x_2); -x_111 = l_Lean_Expr_inferImplicit(x_104, x_110, x_99); -x_112 = l_Lean_Meta_mkLambdaFVars(x_103, x_7, x_102, x_99, x_102, x_99, x_100, x_105, x_106, x_107, x_108); -lean_dec_ref(x_103); -if (lean_obj_tag(x_112) == 0) +lean_object* x_122; +lean_inc(x_111); +lean_inc_ref(x_116); +x_122 = l_Lean_addDecl(x_121, x_115, x_116, x_111); +if (lean_obj_tag(x_122) == 0) { -lean_object* x_113; lean_object* x_114; -x_113 = lean_ctor_get(x_112, 0); -lean_inc(x_113); -lean_dec_ref(x_112); -x_114 = l_Lean_Meta_mkLambdaFVars(x_2, x_113, x_102, x_99, x_102, x_99, x_100, x_105, x_106, x_107, x_108); -if (lean_obj_tag(x_114) == 0) -{ -lean_object* x_115; lean_object* x_116; uint8_t x_117; -x_115 = lean_ctor_get(x_114, 0); -lean_inc(x_115); -lean_dec_ref(x_114); -x_116 = l_Lean_instantiateMVars___at___00__private_Lean_Elab_Structure_0__Lean_Elab_Command_Structure_mkCtorLCtx_spec__2___redArg(x_115, x_106); -x_117 = !lean_is_exclusive(x_116); -if (x_117 == 0) -{ -lean_object* x_118; lean_object* x_119; lean_object* x_120; lean_object* x_121; lean_object* x_122; uint8_t x_123; -x_118 = lean_ctor_get(x_116, 0); -x_119 = lean_ctor_get(x_5, 0); -lean_inc(x_119); -x_120 = lean_ctor_get(x_5, 2); -lean_inc(x_120); -x_121 = lean_ctor_get(x_5, 4); -lean_inc(x_121); -lean_dec_ref(x_5); -lean_inc(x_121); -if (lean_is_scalar(x_17)) { - x_122 = lean_alloc_ctor(0, 3, 0); -} else { - x_122 = x_17; +lean_dec_ref(x_122); +x_90 = x_110; +x_91 = x_112; +x_92 = x_115; +x_93 = x_113; +x_94 = x_118; +x_95 = x_120; +x_96 = x_117; +x_97 = x_114; +x_98 = x_116; +x_99 = x_111; +x_100 = lean_box(0); +goto block_109; } -lean_ctor_set(x_122, 0, x_121); -lean_ctor_set(x_122, 1, x_1); -lean_ctor_set(x_122, 2, x_111); -x_123 = lean_unbox(x_14); -lean_dec(x_14); +else +{ +uint8_t x_123; +lean_dec(x_120); +lean_dec(x_118); +lean_dec_ref(x_117); +lean_dec_ref(x_116); +lean_dec(x_114); +lean_dec(x_113); +lean_dec(x_112); +lean_dec(x_111); +lean_dec(x_52); +lean_dec_ref(x_6); +x_123 = !lean_is_exclusive(x_122); if (x_123 == 0) { -uint8_t x_124; lean_object* x_125; -lean_free_object(x_116); -x_124 = lean_ctor_get_uint8(x_19, sizeof(void*)*3 + 4); -lean_dec_ref(x_19); -x_125 = lean_box(1); -if (x_124 == 0) -{ -uint8_t x_126; -x_126 = 1; -x_75 = x_125; -x_76 = x_101; -x_77 = x_122; -x_78 = x_108; -x_79 = x_121; -x_80 = x_106; -x_81 = x_120; -x_82 = x_107; -x_83 = lean_box(0); -x_84 = x_99; -x_85 = x_119; -x_86 = x_105; -x_87 = x_118; -x_88 = x_102; -x_89 = x_126; -goto block_98; +return x_122; } else { -uint8_t x_127; -x_127 = 0; -x_75 = x_125; -x_76 = x_101; -x_77 = x_122; -x_78 = x_108; -x_79 = x_121; -x_80 = x_106; -x_81 = x_120; -x_82 = x_107; -x_83 = lean_box(0); -x_84 = x_99; -x_85 = x_119; -x_86 = x_105; -x_87 = x_118; -x_88 = x_102; -x_89 = x_127; -goto block_98; +lean_object* x_124; lean_object* x_125; +x_124 = lean_ctor_get(x_122, 0); +lean_inc(x_124); +lean_dec(x_122); +x_125 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_125, 0, x_124); +return x_125; } } -else +} +block_151: { -uint8_t x_128; -x_128 = lean_ctor_get_uint8(x_19, sizeof(void*)*3 + 4); -lean_dec_ref(x_19); -if (x_128 == 0) -{ -lean_object* x_129; lean_object* x_130; lean_object* x_131; -x_129 = lean_box(0); -lean_inc(x_121); -x_130 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_130, 0, x_121); -lean_ctor_set(x_130, 1, x_129); -x_131 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_131, 0, x_122); -lean_ctor_set(x_131, 1, x_118); -lean_ctor_set(x_131, 2, x_130); -lean_ctor_set_tag(x_116, 2); -lean_ctor_set(x_116, 0, x_131); -x_59 = x_107; -x_60 = lean_box(0); -x_61 = x_101; -x_62 = x_119; -x_63 = x_108; -x_64 = x_121; -x_65 = x_106; -x_66 = x_120; -x_67 = x_105; -x_68 = x_102; -x_69 = x_116; -goto block_74; -} -else -{ -lean_object* x_132; lean_object* x_133; lean_object* x_134; -x_132 = lean_box(0); -lean_inc(x_121); -x_133 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_133, 0, x_121); -lean_ctor_set(x_133, 1, x_132); -x_134 = lean_alloc_ctor(0, 3, 1); -lean_ctor_set(x_134, 0, x_122); -lean_ctor_set(x_134, 1, x_118); -lean_ctor_set(x_134, 2, x_133); -lean_ctor_set_uint8(x_134, sizeof(void*)*3, x_99); -lean_ctor_set_tag(x_116, 3); -lean_ctor_set(x_116, 0, x_134); -x_59 = x_107; -x_60 = lean_box(0); -x_61 = x_101; -x_62 = x_119; -x_63 = x_108; -x_64 = x_121; -x_65 = x_106; -x_66 = x_120; -x_67 = x_105; -x_68 = x_102; -x_69 = x_116; -goto block_74; -} -} -} -else -{ -lean_object* x_135; lean_object* x_136; lean_object* x_137; lean_object* x_138; lean_object* x_139; uint8_t x_140; -x_135 = lean_ctor_get(x_116, 0); -lean_inc(x_135); -lean_dec(x_116); -x_136 = lean_ctor_get(x_5, 0); +lean_object* x_143; lean_object* x_144; lean_object* x_145; lean_object* x_146; lean_object* x_147; +x_143 = lean_box(0); +lean_inc(x_131); +x_144 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_144, 0, x_131); +lean_ctor_set(x_144, 1, x_143); +x_145 = lean_alloc_ctor(0, 4, 1); +lean_ctor_set(x_145, 0, x_135); +lean_ctor_set(x_145, 1, x_134); +lean_ctor_set(x_145, 2, x_129); +lean_ctor_set(x_145, 3, x_144); +lean_ctor_set_uint8(x_145, sizeof(void*)*4, x_142); +x_146 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_146, 0, x_145); lean_inc(x_136); -x_137 = lean_ctor_get(x_5, 2); -lean_inc(x_137); -x_138 = lean_ctor_get(x_5, 4); -lean_inc(x_138); -lean_dec_ref(x_5); -lean_inc(x_138); -if (lean_is_scalar(x_17)) { - x_139 = lean_alloc_ctor(0, 3, 0); -} else { - x_139 = x_17; -} -lean_ctor_set(x_139, 0, x_138); -lean_ctor_set(x_139, 1, x_1); -lean_ctor_set(x_139, 2, x_111); -x_140 = lean_unbox(x_14); -lean_dec(x_14); -if (x_140 == 0) +lean_inc_ref(x_140); +x_147 = l_Lean_addAndCompile(x_146, x_133, x_140, x_136); +if (lean_obj_tag(x_147) == 0) { -uint8_t x_141; lean_object* x_142; -x_141 = lean_ctor_get_uint8(x_19, sizeof(void*)*3 + 4); -lean_dec_ref(x_19); -x_142 = lean_box(1); -if (x_141 == 0) -{ -uint8_t x_143; -x_143 = 1; -x_75 = x_142; -x_76 = x_101; -x_77 = x_139; -x_78 = x_108; -x_79 = x_138; -x_80 = x_106; -x_81 = x_137; -x_82 = x_107; -x_83 = lean_box(0); -x_84 = x_99; -x_85 = x_136; -x_86 = x_105; -x_87 = x_135; -x_88 = x_102; -x_89 = x_143; -goto block_98; +lean_dec_ref(x_147); +x_90 = x_137; +x_91 = x_138; +x_92 = x_128; +x_93 = x_139; +x_94 = x_131; +x_95 = x_141; +x_96 = x_130; +x_97 = x_127; +x_98 = x_140; +x_99 = x_136; +x_100 = lean_box(0); +goto block_109; } else { -uint8_t x_144; -x_144 = 0; -x_75 = x_142; -x_76 = x_101; -x_77 = x_139; -x_78 = x_108; -x_79 = x_138; -x_80 = x_106; -x_81 = x_137; -x_82 = x_107; -x_83 = lean_box(0); -x_84 = x_99; -x_85 = x_136; -x_86 = x_105; -x_87 = x_135; -x_88 = x_102; -x_89 = x_144; -goto block_98; -} -} -else -{ -uint8_t x_145; -x_145 = lean_ctor_get_uint8(x_19, sizeof(void*)*3 + 4); -lean_dec_ref(x_19); -if (x_145 == 0) -{ -lean_object* x_146; lean_object* x_147; lean_object* x_148; lean_object* x_149; -x_146 = lean_box(0); -lean_inc(x_138); -x_147 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_147, 0, x_138); -lean_ctor_set(x_147, 1, x_146); -x_148 = lean_alloc_ctor(0, 3, 0); -lean_ctor_set(x_148, 0, x_139); -lean_ctor_set(x_148, 1, x_135); -lean_ctor_set(x_148, 2, x_147); -x_149 = lean_alloc_ctor(2, 1, 0); -lean_ctor_set(x_149, 0, x_148); -x_59 = x_107; -x_60 = lean_box(0); -x_61 = x_101; -x_62 = x_136; -x_63 = x_108; -x_64 = x_138; -x_65 = x_106; -x_66 = x_137; -x_67 = x_105; -x_68 = x_102; -x_69 = x_149; -goto block_74; -} -else -{ -lean_object* x_150; lean_object* x_151; lean_object* x_152; lean_object* x_153; -x_150 = lean_box(0); -lean_inc(x_138); -x_151 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_151, 0, x_138); -lean_ctor_set(x_151, 1, x_150); -x_152 = lean_alloc_ctor(0, 3, 1); -lean_ctor_set(x_152, 0, x_139); -lean_ctor_set(x_152, 1, x_135); -lean_ctor_set(x_152, 2, x_151); -lean_ctor_set_uint8(x_152, sizeof(void*)*3, x_99); -x_153 = lean_alloc_ctor(3, 1, 0); -lean_ctor_set(x_153, 0, x_152); -x_59 = x_107; -x_60 = lean_box(0); -x_61 = x_101; -x_62 = x_136; -x_63 = x_108; -x_64 = x_138; -x_65 = x_106; -x_66 = x_137; -x_67 = x_105; -x_68 = x_102; -x_69 = x_153; -goto block_74; -} -} -} -} -else -{ -uint8_t x_154; -lean_dec_ref(x_111); -lean_dec(x_108); -lean_dec_ref(x_107); -lean_dec(x_106); -lean_dec_ref(x_105); -lean_dec_ref(x_19); -lean_dec(x_18); -lean_dec(x_17); -lean_dec(x_14); +uint8_t x_148; +lean_dec(x_141); +lean_dec_ref(x_140); +lean_dec(x_139); +lean_dec(x_138); +lean_dec(x_136); +lean_dec(x_131); +lean_dec_ref(x_130); +lean_dec(x_127); +lean_dec(x_52); lean_dec_ref(x_6); -lean_dec_ref(x_5); -lean_dec(x_1); -x_154 = !lean_is_exclusive(x_114); -if (x_154 == 0) +x_148 = !lean_is_exclusive(x_147); +if (x_148 == 0) { -return x_114; +return x_147; } else { -lean_object* x_155; lean_object* x_156; -x_155 = lean_ctor_get(x_114, 0); -lean_inc(x_155); -lean_dec(x_114); -x_156 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_156, 0, x_155); -return x_156; +lean_object* x_149; lean_object* x_150; +x_149 = lean_ctor_get(x_147, 0); +lean_inc(x_149); +lean_dec(x_147); +x_150 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_150, 0, x_149); +return x_150; } } } -else +block_213: { -uint8_t x_157; -lean_dec_ref(x_111); -lean_dec(x_108); -lean_dec_ref(x_107); -lean_dec(x_106); -lean_dec_ref(x_105); -lean_dec_ref(x_19); -lean_dec(x_18); -lean_dec(x_17); -lean_dec(x_14); -lean_dec_ref(x_6); -lean_dec_ref(x_5); -lean_dec(x_1); -x_157 = !lean_is_exclusive(x_112); -if (x_157 == 0) +lean_object* x_163; lean_object* x_164; lean_object* x_165; +x_163 = lean_array_get_size(x_2); +x_164 = l_Lean_Expr_inferImplicit(x_157, x_163, x_155); +x_165 = l_Lean_Meta_mkLambdaFVars(x_153, x_7, x_154, x_155, x_154, x_155, x_156, x_158, x_159, x_160, x_161); +lean_dec_ref(x_153); +if (lean_obj_tag(x_165) == 0) { -return x_112; -} -else -{ -lean_object* x_158; lean_object* x_159; -x_158 = lean_ctor_get(x_112, 0); -lean_inc(x_158); -lean_dec(x_112); -x_159 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_159, 0, x_158); -return x_159; -} -} -} -block_182: -{ -lean_object* x_164; lean_object* x_165; uint8_t x_166; uint8_t x_167; lean_object* x_168; -x_164 = lean_obj_once(&l___private_Init_Data_Array_Basic_0__Array_foldrMUnsafe_fold___at___00__private_Lean_Elab_Structure_0__Lean_Elab_Command_Structure_mkFlatCtorExpr_spec__2___redArg___closed__0, &l___private_Init_Data_Array_Basic_0__Array_foldrMUnsafe_fold___at___00__private_Lean_Elab_Structure_0__Lean_Elab_Command_Structure_mkFlatCtorExpr_spec__2___redArg___closed__0_once, _init_l___private_Init_Data_Array_Basic_0__Array_foldrMUnsafe_fold___at___00__private_Lean_Elab_Structure_0__Lean_Elab_Command_Structure_mkFlatCtorExpr_spec__2___redArg___closed__0); -x_165 = lean_array_push(x_164, x_4); -x_166 = 0; -x_167 = 1; -lean_inc_ref(x_6); -x_168 = l_Lean_Meta_mkForallFVars(x_165, x_6, x_166, x_161, x_161, x_167, x_8, x_9, x_10, x_11); -if (lean_obj_tag(x_168) == 0) -{ -lean_object* x_169; lean_object* x_170; -x_169 = lean_ctor_get(x_168, 0); -lean_inc(x_169); -lean_dec_ref(x_168); -x_170 = l_Lean_Meta_mkForallFVars(x_2, x_169, x_166, x_161, x_161, x_167, x_8, x_9, x_10, x_11); -if (lean_obj_tag(x_170) == 0) -{ -lean_object* x_171; lean_object* x_172; -x_171 = lean_ctor_get(x_170, 0); -lean_inc(x_171); -lean_dec_ref(x_170); -x_172 = l_Lean_instantiateMVars___at___00__private_Lean_Elab_Structure_0__Lean_Elab_Command_Structure_mkCtorLCtx_spec__2___redArg(x_171, x_9); -if (x_162 == 0) -{ -lean_object* x_173; -x_173 = lean_ctor_get(x_172, 0); -lean_inc(x_173); -lean_dec_ref(x_172); -x_99 = x_161; -x_100 = x_167; -x_101 = x_163; -x_102 = x_166; -x_103 = x_165; -x_104 = x_173; -x_105 = x_8; -x_106 = x_9; -x_107 = x_10; -x_108 = x_11; -x_109 = lean_box(0); -goto block_160; -} -else -{ -lean_object* x_174; lean_object* x_175; -x_174 = lean_ctor_get(x_172, 0); -lean_inc(x_174); -lean_dec_ref(x_172); -x_175 = l___private_Lean_Elab_Structure_0__Lean_Elab_Command_Structure_setSourceInstImplicit(x_174); -x_99 = x_161; -x_100 = x_167; -x_101 = x_163; -x_102 = x_166; -x_103 = x_165; -x_104 = x_175; -x_105 = x_8; -x_106 = x_9; -x_107 = x_10; -x_108 = x_11; -x_109 = lean_box(0); -goto block_160; -} -} -else -{ -uint8_t x_176; +lean_object* x_166; lean_object* x_167; +x_166 = lean_ctor_get(x_165, 0); +lean_inc(x_166); lean_dec_ref(x_165); -lean_dec_ref(x_19); -lean_dec(x_18); -lean_dec(x_17); -lean_dec(x_14); -lean_dec(x_11); -lean_dec_ref(x_10); -lean_dec(x_9); -lean_dec_ref(x_8); -lean_dec_ref(x_7); -lean_dec_ref(x_6); +x_167 = l_Lean_Meta_mkLambdaFVars(x_2, x_166, x_154, x_155, x_154, x_155, x_156, x_158, x_159, x_160, x_161); +if (lean_obj_tag(x_167) == 0) +{ +lean_object* x_168; lean_object* x_169; uint8_t x_170; +x_168 = lean_ctor_get(x_167, 0); +lean_inc(x_168); +lean_dec_ref(x_167); +x_169 = l_Lean_instantiateMVars___at___00__private_Lean_Elab_Structure_0__Lean_Elab_Command_Structure_mkCtorLCtx_spec__2___redArg(x_168, x_159); +x_170 = !lean_is_exclusive(x_169); +if (x_170 == 0) +{ +lean_object* x_171; lean_object* x_172; lean_object* x_173; lean_object* x_174; lean_object* x_175; uint8_t x_176; +x_171 = lean_ctor_get(x_169, 0); +x_172 = lean_ctor_get(x_5, 0); +lean_inc(x_172); +x_173 = lean_ctor_get(x_5, 2); +lean_inc(x_173); +x_174 = lean_ctor_get(x_5, 4); +lean_inc(x_174); lean_dec_ref(x_5); -lean_dec(x_1); -x_176 = !lean_is_exclusive(x_170); +lean_inc(x_174); +if (lean_is_scalar(x_51)) { + x_175 = lean_alloc_ctor(0, 3, 0); +} else { + x_175 = x_51; +} +lean_ctor_set(x_175, 0, x_174); +lean_ctor_set(x_175, 1, x_1); +lean_ctor_set(x_175, 2, x_164); +x_176 = lean_unbox(x_48); +lean_dec(x_48); if (x_176 == 0) { -return x_170; -} -else -{ -lean_object* x_177; lean_object* x_178; -x_177 = lean_ctor_get(x_170, 0); -lean_inc(x_177); -lean_dec(x_170); -x_178 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_178, 0, x_177); -return x_178; -} -} -} -else +uint8_t x_177; lean_object* x_178; +lean_free_object(x_169); +x_177 = lean_ctor_get_uint8(x_53, sizeof(void*)*3 + 4); +lean_dec_ref(x_53); +x_178 = lean_box(1); +if (x_177 == 0) { uint8_t x_179; -lean_dec_ref(x_165); -lean_dec_ref(x_19); -lean_dec(x_18); -lean_dec(x_17); -lean_dec(x_14); +x_179 = 1; +x_127 = x_159; +x_128 = x_154; +x_129 = x_178; +x_130 = x_158; +x_131 = x_174; +x_132 = lean_box(0); +x_133 = x_155; +x_134 = x_171; +x_135 = x_175; +x_136 = x_161; +x_137 = x_152; +x_138 = x_173; +x_139 = x_163; +x_140 = x_160; +x_141 = x_172; +x_142 = x_179; +goto block_151; +} +else +{ +uint8_t x_180; +x_180 = 0; +x_127 = x_159; +x_128 = x_154; +x_129 = x_178; +x_130 = x_158; +x_131 = x_174; +x_132 = lean_box(0); +x_133 = x_155; +x_134 = x_171; +x_135 = x_175; +x_136 = x_161; +x_137 = x_152; +x_138 = x_173; +x_139 = x_163; +x_140 = x_160; +x_141 = x_172; +x_142 = x_180; +goto block_151; +} +} +else +{ +uint8_t x_181; +x_181 = lean_ctor_get_uint8(x_53, sizeof(void*)*3 + 4); +lean_dec_ref(x_53); +if (x_181 == 0) +{ +lean_object* x_182; lean_object* x_183; lean_object* x_184; +x_182 = lean_box(0); +lean_inc(x_174); +x_183 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_183, 0, x_174); +lean_ctor_set(x_183, 1, x_182); +x_184 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_184, 0, x_175); +lean_ctor_set(x_184, 1, x_171); +lean_ctor_set(x_184, 2, x_183); +lean_ctor_set_tag(x_169, 2); +lean_ctor_set(x_169, 0, x_184); +x_110 = x_152; +x_111 = x_161; +x_112 = x_173; +x_113 = x_163; +x_114 = x_159; +x_115 = x_154; +x_116 = x_160; +x_117 = x_158; +x_118 = x_174; +x_119 = lean_box(0); +x_120 = x_172; +x_121 = x_169; +goto block_126; +} +else +{ +lean_object* x_185; lean_object* x_186; lean_object* x_187; +x_185 = lean_box(0); +lean_inc(x_174); +x_186 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_186, 0, x_174); +lean_ctor_set(x_186, 1, x_185); +x_187 = lean_alloc_ctor(0, 3, 1); +lean_ctor_set(x_187, 0, x_175); +lean_ctor_set(x_187, 1, x_171); +lean_ctor_set(x_187, 2, x_186); +lean_ctor_set_uint8(x_187, sizeof(void*)*3, x_155); +lean_ctor_set_tag(x_169, 3); +lean_ctor_set(x_169, 0, x_187); +x_110 = x_152; +x_111 = x_161; +x_112 = x_173; +x_113 = x_163; +x_114 = x_159; +x_115 = x_154; +x_116 = x_160; +x_117 = x_158; +x_118 = x_174; +x_119 = lean_box(0); +x_120 = x_172; +x_121 = x_169; +goto block_126; +} +} +} +else +{ +lean_object* x_188; lean_object* x_189; lean_object* x_190; lean_object* x_191; lean_object* x_192; uint8_t x_193; +x_188 = lean_ctor_get(x_169, 0); +lean_inc(x_188); +lean_dec(x_169); +x_189 = lean_ctor_get(x_5, 0); +lean_inc(x_189); +x_190 = lean_ctor_get(x_5, 2); +lean_inc(x_190); +x_191 = lean_ctor_get(x_5, 4); +lean_inc(x_191); +lean_dec_ref(x_5); +lean_inc(x_191); +if (lean_is_scalar(x_51)) { + x_192 = lean_alloc_ctor(0, 3, 0); +} else { + x_192 = x_51; +} +lean_ctor_set(x_192, 0, x_191); +lean_ctor_set(x_192, 1, x_1); +lean_ctor_set(x_192, 2, x_164); +x_193 = lean_unbox(x_48); +lean_dec(x_48); +if (x_193 == 0) +{ +uint8_t x_194; lean_object* x_195; +x_194 = lean_ctor_get_uint8(x_53, sizeof(void*)*3 + 4); +lean_dec_ref(x_53); +x_195 = lean_box(1); +if (x_194 == 0) +{ +uint8_t x_196; +x_196 = 1; +x_127 = x_159; +x_128 = x_154; +x_129 = x_195; +x_130 = x_158; +x_131 = x_191; +x_132 = lean_box(0); +x_133 = x_155; +x_134 = x_188; +x_135 = x_192; +x_136 = x_161; +x_137 = x_152; +x_138 = x_190; +x_139 = x_163; +x_140 = x_160; +x_141 = x_189; +x_142 = x_196; +goto block_151; +} +else +{ +uint8_t x_197; +x_197 = 0; +x_127 = x_159; +x_128 = x_154; +x_129 = x_195; +x_130 = x_158; +x_131 = x_191; +x_132 = lean_box(0); +x_133 = x_155; +x_134 = x_188; +x_135 = x_192; +x_136 = x_161; +x_137 = x_152; +x_138 = x_190; +x_139 = x_163; +x_140 = x_160; +x_141 = x_189; +x_142 = x_197; +goto block_151; +} +} +else +{ +uint8_t x_198; +x_198 = lean_ctor_get_uint8(x_53, sizeof(void*)*3 + 4); +lean_dec_ref(x_53); +if (x_198 == 0) +{ +lean_object* x_199; lean_object* x_200; lean_object* x_201; lean_object* x_202; +x_199 = lean_box(0); +lean_inc(x_191); +x_200 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_200, 0, x_191); +lean_ctor_set(x_200, 1, x_199); +x_201 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_201, 0, x_192); +lean_ctor_set(x_201, 1, x_188); +lean_ctor_set(x_201, 2, x_200); +x_202 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_202, 0, x_201); +x_110 = x_152; +x_111 = x_161; +x_112 = x_190; +x_113 = x_163; +x_114 = x_159; +x_115 = x_154; +x_116 = x_160; +x_117 = x_158; +x_118 = x_191; +x_119 = lean_box(0); +x_120 = x_189; +x_121 = x_202; +goto block_126; +} +else +{ +lean_object* x_203; lean_object* x_204; lean_object* x_205; lean_object* x_206; +x_203 = lean_box(0); +lean_inc(x_191); +x_204 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_204, 0, x_191); +lean_ctor_set(x_204, 1, x_203); +x_205 = lean_alloc_ctor(0, 3, 1); +lean_ctor_set(x_205, 0, x_192); +lean_ctor_set(x_205, 1, x_188); +lean_ctor_set(x_205, 2, x_204); +lean_ctor_set_uint8(x_205, sizeof(void*)*3, x_155); +x_206 = lean_alloc_ctor(3, 1, 0); +lean_ctor_set(x_206, 0, x_205); +x_110 = x_152; +x_111 = x_161; +x_112 = x_190; +x_113 = x_163; +x_114 = x_159; +x_115 = x_154; +x_116 = x_160; +x_117 = x_158; +x_118 = x_191; +x_119 = lean_box(0); +x_120 = x_189; +x_121 = x_206; +goto block_126; +} +} +} +} +else +{ +uint8_t x_207; +lean_dec_ref(x_164); +lean_dec(x_161); +lean_dec_ref(x_160); +lean_dec(x_159); +lean_dec_ref(x_158); +lean_dec_ref(x_53); +lean_dec(x_52); +lean_dec(x_51); +lean_dec(x_48); +lean_dec_ref(x_6); +lean_dec_ref(x_5); +lean_dec(x_1); +x_207 = !lean_is_exclusive(x_167); +if (x_207 == 0) +{ +return x_167; +} +else +{ +lean_object* x_208; lean_object* x_209; +x_208 = lean_ctor_get(x_167, 0); +lean_inc(x_208); +lean_dec(x_167); +x_209 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_209, 0, x_208); +return x_209; +} +} +} +else +{ +uint8_t x_210; +lean_dec_ref(x_164); +lean_dec(x_161); +lean_dec_ref(x_160); +lean_dec(x_159); +lean_dec_ref(x_158); +lean_dec_ref(x_53); +lean_dec(x_52); +lean_dec(x_51); +lean_dec(x_48); +lean_dec_ref(x_6); +lean_dec_ref(x_5); +lean_dec(x_1); +x_210 = !lean_is_exclusive(x_165); +if (x_210 == 0) +{ +return x_165; +} +else +{ +lean_object* x_211; lean_object* x_212; +x_211 = lean_ctor_get(x_165, 0); +lean_inc(x_211); +lean_dec(x_165); +x_212 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_212, 0, x_211); +return x_212; +} +} +} +block_235: +{ +lean_object* x_217; lean_object* x_218; uint8_t x_219; uint8_t x_220; lean_object* x_221; +x_217 = lean_obj_once(&l___private_Init_Data_Array_Basic_0__Array_foldrMUnsafe_fold___at___00__private_Lean_Elab_Structure_0__Lean_Elab_Command_Structure_mkFlatCtorExpr_spec__2___redArg___closed__0, &l___private_Init_Data_Array_Basic_0__Array_foldrMUnsafe_fold___at___00__private_Lean_Elab_Structure_0__Lean_Elab_Command_Structure_mkFlatCtorExpr_spec__2___redArg___closed__0_once, _init_l___private_Init_Data_Array_Basic_0__Array_foldrMUnsafe_fold___at___00__private_Lean_Elab_Structure_0__Lean_Elab_Command_Structure_mkFlatCtorExpr_spec__2___redArg___closed__0); +x_218 = lean_array_push(x_217, x_4); +x_219 = 0; +x_220 = 1; +lean_inc_ref(x_6); +x_221 = l_Lean_Meta_mkForallFVars(x_218, x_6, x_219, x_215, x_215, x_220, x_8, x_9, x_10, x_11); +if (lean_obj_tag(x_221) == 0) +{ +lean_object* x_222; lean_object* x_223; +x_222 = lean_ctor_get(x_221, 0); +lean_inc(x_222); +lean_dec_ref(x_221); +x_223 = l_Lean_Meta_mkForallFVars(x_2, x_222, x_219, x_215, x_215, x_220, x_8, x_9, x_10, x_11); +if (lean_obj_tag(x_223) == 0) +{ +lean_object* x_224; lean_object* x_225; +x_224 = lean_ctor_get(x_223, 0); +lean_inc(x_224); +lean_dec_ref(x_223); +x_225 = l_Lean_instantiateMVars___at___00__private_Lean_Elab_Structure_0__Lean_Elab_Command_Structure_mkCtorLCtx_spec__2___redArg(x_224, x_9); +if (x_214 == 0) +{ +lean_object* x_226; +x_226 = lean_ctor_get(x_225, 0); +lean_inc(x_226); +lean_dec_ref(x_225); +x_152 = x_216; +x_153 = x_218; +x_154 = x_219; +x_155 = x_215; +x_156 = x_220; +x_157 = x_226; +x_158 = x_8; +x_159 = x_9; +x_160 = x_10; +x_161 = x_11; +x_162 = lean_box(0); +goto block_213; +} +else +{ +lean_object* x_227; lean_object* x_228; +x_227 = lean_ctor_get(x_225, 0); +lean_inc(x_227); +lean_dec_ref(x_225); +x_228 = l___private_Lean_Elab_Structure_0__Lean_Elab_Command_Structure_setSourceInstImplicit(x_227); +x_152 = x_216; +x_153 = x_218; +x_154 = x_219; +x_155 = x_215; +x_156 = x_220; +x_157 = x_228; +x_158 = x_8; +x_159 = x_9; +x_160 = x_10; +x_161 = x_11; +x_162 = lean_box(0); +goto block_213; +} +} +else +{ +uint8_t x_229; +lean_dec_ref(x_218); +lean_dec_ref(x_53); +lean_dec(x_52); +lean_dec(x_51); +lean_dec(x_48); lean_dec(x_11); lean_dec_ref(x_10); lean_dec(x_9); @@ -76586,37 +76627,70 @@ lean_dec_ref(x_7); lean_dec_ref(x_6); lean_dec_ref(x_5); lean_dec(x_1); -x_179 = !lean_is_exclusive(x_168); -if (x_179 == 0) +x_229 = !lean_is_exclusive(x_223); +if (x_229 == 0) { -return x_168; +return x_223; } else { -lean_object* x_180; lean_object* x_181; -x_180 = lean_ctor_get(x_168, 0); -lean_inc(x_180); -lean_dec(x_168); -x_181 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_181, 0, x_180); -return x_181; +lean_object* x_230; lean_object* x_231; +x_230 = lean_ctor_get(x_223, 0); +lean_inc(x_230); +lean_dec(x_223); +x_231 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_231, 0, x_230); +return x_231; } } } -block_186: -{ -uint8_t x_184; uint8_t x_185; -x_184 = 1; -x_185 = 0; -x_161 = x_184; -x_162 = x_183; -x_163 = x_185; -goto block_182; -} -} else { -uint8_t x_191; +uint8_t x_232; +lean_dec_ref(x_218); +lean_dec_ref(x_53); +lean_dec(x_52); +lean_dec(x_51); +lean_dec(x_48); +lean_dec(x_11); +lean_dec_ref(x_10); +lean_dec(x_9); +lean_dec_ref(x_8); +lean_dec_ref(x_7); +lean_dec_ref(x_6); +lean_dec_ref(x_5); +lean_dec(x_1); +x_232 = !lean_is_exclusive(x_221); +if (x_232 == 0) +{ +return x_221; +} +else +{ +lean_object* x_233; lean_object* x_234; +x_233 = lean_ctor_get(x_221, 0); +lean_inc(x_233); +lean_dec(x_221); +x_234 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_234, 0, x_233); +return x_234; +} +} +} +block_239: +{ +uint8_t x_237; uint8_t x_238; +x_237 = 1; +x_238 = 0; +x_214 = x_236; +x_215 = x_237; +x_216 = x_238; +goto block_235; +} +} +else +{ +uint8_t x_244; lean_dec(x_11); lean_dec_ref(x_10); lean_dec(x_9); @@ -76627,20 +76701,85 @@ lean_dec_ref(x_5); lean_dec_ref(x_4); lean_dec_ref(x_3); lean_dec(x_1); -x_191 = !lean_is_exclusive(x_13); -if (x_191 == 0) +x_244 = !lean_is_exclusive(x_47); +if (x_244 == 0) { -return x_13; +return x_47; } else { -lean_object* x_192; lean_object* x_193; -x_192 = lean_ctor_get(x_13, 0); -lean_inc(x_192); -lean_dec(x_13); -x_193 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_193, 0, x_192); -return x_193; +lean_object* x_245; lean_object* x_246; +x_245 = lean_ctor_get(x_47, 0); +lean_inc(x_245); +lean_dec(x_47); +x_246 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_246, 0, x_245); +return x_246; +} +} +block_46: +{ +lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; uint8_t x_31; +x_27 = lean_obj_once(&l_Lean_setEnv___at___00Lean_withEnv___at___00Lean_Elab_checkNotAlreadyDeclared___at___00Lean_Elab_applyVisibility___at___00__private_Lean_Elab_Structure_0__Lean_Elab_Command_Structure_expandCtor_spec__0_spec__0_spec__3_spec__15___redArg___closed__2, &l_Lean_setEnv___at___00Lean_withEnv___at___00Lean_Elab_checkNotAlreadyDeclared___at___00Lean_Elab_applyVisibility___at___00__private_Lean_Elab_Structure_0__Lean_Elab_Command_Structure_expandCtor_spec__0_spec__0_spec__3_spec__15___redArg___closed__2_once, _init_l_Lean_setEnv___at___00Lean_withEnv___at___00Lean_Elab_checkNotAlreadyDeclared___at___00Lean_Elab_applyVisibility___at___00__private_Lean_Elab_Structure_0__Lean_Elab_Command_Structure_expandCtor_spec__0_spec__0_spec__3_spec__15___redArg___closed__2); +x_28 = lean_alloc_ctor(0, 9, 0); +lean_ctor_set(x_28, 0, x_26); +lean_ctor_set(x_28, 1, x_18); +lean_ctor_set(x_28, 2, x_19); +lean_ctor_set(x_28, 3, x_20); +lean_ctor_set(x_28, 4, x_21); +lean_ctor_set(x_28, 5, x_27); +lean_ctor_set(x_28, 6, x_22); +lean_ctor_set(x_28, 7, x_23); +lean_ctor_set(x_28, 8, x_24); +x_29 = lean_st_ref_set(x_25, x_28); +lean_dec(x_25); +x_30 = lean_st_ref_take(x_16); +x_31 = !lean_is_exclusive(x_30); +if (x_31 == 0) +{ +lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; +x_32 = lean_ctor_get(x_30, 1); +lean_dec(x_32); +x_33 = lean_obj_once(&l_Lean_setEnv___at___00Lean_withEnv___at___00Lean_Elab_checkNotAlreadyDeclared___at___00Lean_Elab_applyVisibility___at___00__private_Lean_Elab_Structure_0__Lean_Elab_Command_Structure_expandCtor_spec__0_spec__0_spec__3_spec__15___redArg___closed__3, &l_Lean_setEnv___at___00Lean_withEnv___at___00Lean_Elab_checkNotAlreadyDeclared___at___00Lean_Elab_applyVisibility___at___00__private_Lean_Elab_Structure_0__Lean_Elab_Command_Structure_expandCtor_spec__0_spec__0_spec__3_spec__15___redArg___closed__3_once, _init_l_Lean_setEnv___at___00Lean_withEnv___at___00Lean_Elab_checkNotAlreadyDeclared___at___00Lean_Elab_applyVisibility___at___00__private_Lean_Elab_Structure_0__Lean_Elab_Command_Structure_expandCtor_spec__0_spec__0_spec__3_spec__15___redArg___closed__3); +lean_ctor_set(x_30, 1, x_33); +x_34 = lean_st_ref_set(x_16, x_30); +lean_dec(x_16); +x_35 = lean_alloc_ctor(0, 2, 1); +lean_ctor_set(x_35, 0, x_13); +lean_ctor_set(x_35, 1, x_17); +lean_ctor_set_uint8(x_35, sizeof(void*)*2, x_14); +x_36 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_36, 0, x_35); +return x_36; +} +else +{ +lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; +x_37 = lean_ctor_get(x_30, 0); +x_38 = lean_ctor_get(x_30, 2); +x_39 = lean_ctor_get(x_30, 3); +x_40 = lean_ctor_get(x_30, 4); +lean_inc(x_40); +lean_inc(x_39); +lean_inc(x_38); +lean_inc(x_37); +lean_dec(x_30); +x_41 = lean_obj_once(&l_Lean_setEnv___at___00Lean_withEnv___at___00Lean_Elab_checkNotAlreadyDeclared___at___00Lean_Elab_applyVisibility___at___00__private_Lean_Elab_Structure_0__Lean_Elab_Command_Structure_expandCtor_spec__0_spec__0_spec__3_spec__15___redArg___closed__3, &l_Lean_setEnv___at___00Lean_withEnv___at___00Lean_Elab_checkNotAlreadyDeclared___at___00Lean_Elab_applyVisibility___at___00__private_Lean_Elab_Structure_0__Lean_Elab_Command_Structure_expandCtor_spec__0_spec__0_spec__3_spec__15___redArg___closed__3_once, _init_l_Lean_setEnv___at___00Lean_withEnv___at___00Lean_Elab_checkNotAlreadyDeclared___at___00Lean_Elab_applyVisibility___at___00__private_Lean_Elab_Structure_0__Lean_Elab_Command_Structure_expandCtor_spec__0_spec__0_spec__3_spec__15___redArg___closed__3); +x_42 = lean_alloc_ctor(0, 5, 0); +lean_ctor_set(x_42, 0, x_37); +lean_ctor_set(x_42, 1, x_41); +lean_ctor_set(x_42, 2, x_38); +lean_ctor_set(x_42, 3, x_39); +lean_ctor_set(x_42, 4, x_40); +x_43 = lean_st_ref_set(x_16, x_42); +lean_dec(x_16); +x_44 = lean_alloc_ctor(0, 2, 1); +lean_ctor_set(x_44, 0, x_13); +lean_ctor_set(x_44, 1, x_17); +lean_ctor_set_uint8(x_44, sizeof(void*)*2, x_14); +x_45 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_45, 0, x_44); +return x_45; } } } @@ -76826,7 +76965,7 @@ _start: lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; x_1 = ((lean_object*)(l___private_Lean_Elab_Structure_0__Lean_Elab_Command_Structure_reduceFieldProjs___lam__1___closed__2)); x_2 = lean_unsigned_to_nat(65u); -x_3 = lean_unsigned_to_nat(1486u); +x_3 = lean_unsigned_to_nat(1487u); x_4 = ((lean_object*)(l___private_Init_Data_Array_Basic_0__Array_forIn_x27Unsafe_loop___at___00__private_Lean_Elab_Structure_0__Lean_Elab_Command_Structure_mkRemainingProjections_spec__3___closed__0)); x_5 = ((lean_object*)(l___private_Lean_Elab_Structure_0__Lean_Elab_Command_Structure_reduceFieldProjs___lam__1___closed__0)); x_6 = l_mkPanicMessageWithDecl(x_5, x_4, x_3, x_2, x_1); @@ -78212,7 +78351,7 @@ return x_35; } else { -lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_54; uint8_t x_55; lean_object* x_56; lean_object* x_57; lean_object* x_58; uint8_t x_64; uint8_t x_75; lean_object* x_76; +lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_54; lean_object* x_55; uint8_t x_56; lean_object* x_57; lean_object* x_58; uint8_t x_64; uint8_t x_75; lean_object* x_76; lean_dec_ref(x_6); x_36 = lean_obj_once(&l_WellFounded_opaqueFix_u2083___at___00WellFounded_opaqueFix_u2083___at___00__private_Lean_Structure_0__Lean_mergeStructureResolutionOrders_selectParent___at___00Lean_mergeStructureResolutionOrders___at___00__private_Lean_Elab_Structure_0__Lean_Elab_Command_Structure_resolveFieldDefaults_spec__5_spec__12_spec__19_spec__26___redArg___closed__0, &l_WellFounded_opaqueFix_u2083___at___00WellFounded_opaqueFix_u2083___at___00__private_Lean_Structure_0__Lean_mergeStructureResolutionOrders_selectParent___at___00Lean_mergeStructureResolutionOrders___at___00__private_Lean_Elab_Structure_0__Lean_Elab_Command_Structure_resolveFieldDefaults_spec__5_spec__12_spec__19_spec__26___redArg___closed__0_once, _init_l_WellFounded_opaqueFix_u2083___at___00WellFounded_opaqueFix_u2083___at___00__private_Lean_Structure_0__Lean_mergeStructureResolutionOrders_selectParent___at___00Lean_mergeStructureResolutionOrders___at___00__private_Lean_Elab_Structure_0__Lean_Elab_Command_Structure_resolveFieldDefaults_spec__5_spec__12_spec__19_spec__26___redArg___closed__0); x_37 = lean_box(0); @@ -78281,23 +78420,23 @@ goto block_33; block_63: { uint8_t x_59; -x_59 = lean_nat_dec_lt(x_56, x_58); +x_59 = lean_nat_dec_lt(x_57, x_58); if (x_59 == 0) { lean_dec(x_58); -lean_dec_ref(x_57); -lean_dec(x_56); +lean_dec(x_57); +lean_dec_ref(x_55); goto block_53; } else { size_t x_60; size_t x_61; uint8_t x_62; -x_60 = lean_usize_of_nat(x_56); -lean_dec(x_56); +x_60 = lean_usize_of_nat(x_57); +lean_dec(x_57); x_61 = lean_usize_of_nat(x_58); lean_dec(x_58); -x_62 = l___private_Init_Data_Array_Basic_0__Array_anyMUnsafe_any___at___00__private_Lean_Structure_0__Lean_mergeStructureResolutionOrders_selectParent___at___00Lean_mergeStructureResolutionOrders___at___00__private_Lean_Elab_Structure_0__Lean_Elab_Command_Structure_resolveFieldDefaults_spec__5_spec__12_spec__17(x_40, x_55, x_57, x_60, x_61); -lean_dec_ref(x_57); +x_62 = l___private_Init_Data_Array_Basic_0__Array_anyMUnsafe_any___at___00__private_Lean_Structure_0__Lean_mergeStructureResolutionOrders_selectParent___at___00Lean_mergeStructureResolutionOrders___at___00__private_Lean_Elab_Structure_0__Lean_Elab_Command_Structure_resolveFieldDefaults_spec__5_spec__12_spec__17(x_40, x_56, x_55, x_60, x_61); +lean_dec_ref(x_55); if (x_62 == 0) { goto block_53; @@ -78340,17 +78479,17 @@ x_73 = lean_nat_dec_le(x_70, x_72); if (x_73 == 0) { lean_dec(x_70); -x_55 = x_64; -x_56 = x_69; -x_57 = x_68; +x_55 = x_68; +x_56 = x_64; +x_57 = x_69; x_58 = x_72; goto block_63; } else { -x_55 = x_64; -x_56 = x_69; -x_57 = x_68; +x_55 = x_68; +x_56 = x_64; +x_57 = x_69; x_58 = x_70; goto block_63; } @@ -78545,7 +78684,7 @@ return x_35; } else { -lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_54; lean_object* x_55; uint8_t x_56; lean_object* x_57; lean_object* x_58; uint8_t x_64; uint8_t x_75; lean_object* x_76; +lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_54; lean_object* x_55; lean_object* x_56; uint8_t x_57; lean_object* x_58; uint8_t x_64; uint8_t x_75; lean_object* x_76; lean_dec_ref(x_6); x_36 = lean_obj_once(&l_WellFounded_opaqueFix_u2083___at___00WellFounded_opaqueFix_u2083___at___00__private_Lean_Structure_0__Lean_mergeStructureResolutionOrders_selectParent___at___00Lean_mergeStructureResolutionOrders___at___00__private_Lean_Elab_Structure_0__Lean_Elab_Command_Structure_resolveFieldDefaults_spec__5_spec__12_spec__19_spec__26___redArg___closed__0, &l_WellFounded_opaqueFix_u2083___at___00WellFounded_opaqueFix_u2083___at___00__private_Lean_Structure_0__Lean_mergeStructureResolutionOrders_selectParent___at___00Lean_mergeStructureResolutionOrders___at___00__private_Lean_Elab_Structure_0__Lean_Elab_Command_Structure_resolveFieldDefaults_spec__5_spec__12_spec__19_spec__26___redArg___closed__0_once, _init_l_WellFounded_opaqueFix_u2083___at___00WellFounded_opaqueFix_u2083___at___00__private_Lean_Structure_0__Lean_mergeStructureResolutionOrders_selectParent___at___00Lean_mergeStructureResolutionOrders___at___00__private_Lean_Elab_Structure_0__Lean_Elab_Command_Structure_resolveFieldDefaults_spec__5_spec__12_spec__19_spec__26___redArg___closed__0); x_37 = lean_box(0); @@ -78614,23 +78753,23 @@ goto block_33; block_63: { uint8_t x_59; -x_59 = lean_nat_dec_lt(x_55, x_58); +x_59 = lean_nat_dec_lt(x_56, x_58); if (x_59 == 0) { lean_dec(x_58); -lean_dec_ref(x_57); -lean_dec(x_55); +lean_dec(x_56); +lean_dec_ref(x_55); goto block_53; } else { size_t x_60; size_t x_61; uint8_t x_62; -x_60 = lean_usize_of_nat(x_55); -lean_dec(x_55); +x_60 = lean_usize_of_nat(x_56); +lean_dec(x_56); x_61 = lean_usize_of_nat(x_58); lean_dec(x_58); -x_62 = l___private_Init_Data_Array_Basic_0__Array_anyMUnsafe_any___at___00__private_Lean_Structure_0__Lean_mergeStructureResolutionOrders_selectParent___at___00Lean_mergeStructureResolutionOrders___at___00__private_Lean_Elab_Structure_0__Lean_Elab_Command_Structure_resolveFieldDefaults_spec__5_spec__12_spec__17(x_40, x_56, x_57, x_60, x_61); -lean_dec_ref(x_57); +x_62 = l___private_Init_Data_Array_Basic_0__Array_anyMUnsafe_any___at___00__private_Lean_Structure_0__Lean_mergeStructureResolutionOrders_selectParent___at___00Lean_mergeStructureResolutionOrders___at___00__private_Lean_Elab_Structure_0__Lean_Elab_Command_Structure_resolveFieldDefaults_spec__5_spec__12_spec__17(x_40, x_57, x_55, x_60, x_61); +lean_dec_ref(x_55); if (x_62 == 0) { goto block_53; @@ -78673,17 +78812,17 @@ x_73 = lean_nat_dec_le(x_70, x_72); if (x_73 == 0) { lean_dec(x_70); -x_55 = x_69; -x_56 = x_64; -x_57 = x_68; +x_55 = x_68; +x_56 = x_69; +x_57 = x_64; x_58 = x_72; goto block_63; } else { -x_55 = x_69; -x_56 = x_64; -x_57 = x_68; +x_55 = x_68; +x_56 = x_69; +x_57 = x_64; x_58 = x_70; goto block_63; } @@ -79333,7 +79472,7 @@ goto block_25; block_53: { lean_object* x_52; -x_52 = l___private_Init_Data_Array_QSort_Basic_0__Array_qsort_sort___at___00Lean_mergeStructureResolutionOrders___at___00__private_Lean_Elab_Structure_0__Lean_Elab_Command_Structure_resolveFieldDefaults_spec__5_spec__21___redArg(x_50, x_49, x_51); +x_52 = l___private_Init_Data_Array_QSort_Basic_0__Array_qsort_sort___at___00Lean_mergeStructureResolutionOrders___at___00__private_Lean_Elab_Structure_0__Lean_Elab_Command_Structure_resolveFieldDefaults_spec__5_spec__21___redArg(x_49, x_50, x_51); lean_dec(x_51); x_38 = x_52; goto block_48; @@ -79346,15 +79485,15 @@ if (x_57 == 0) { lean_dec(x_54); lean_inc(x_56); -x_49 = x_56; -x_50 = x_55; +x_49 = x_55; +x_50 = x_56; x_51 = x_56; goto block_53; } else { -x_49 = x_56; -x_50 = x_55; +x_49 = x_55; +x_50 = x_56; x_51 = x_54; goto block_53; } @@ -79560,7 +79699,7 @@ goto block_25; block_111: { lean_object* x_110; -x_110 = l___private_Init_Data_Array_QSort_Basic_0__Array_qsort_sort___at___00Lean_mergeStructureResolutionOrders___at___00__private_Lean_Elab_Structure_0__Lean_Elab_Command_Structure_resolveFieldDefaults_spec__5_spec__21___redArg(x_108, x_107, x_109); +x_110 = l___private_Init_Data_Array_QSort_Basic_0__Array_qsort_sort___at___00Lean_mergeStructureResolutionOrders___at___00__private_Lean_Elab_Structure_0__Lean_Elab_Command_Structure_resolveFieldDefaults_spec__5_spec__21___redArg(x_107, x_108, x_109); lean_dec(x_109); x_96 = x_110; goto block_106; @@ -79573,15 +79712,15 @@ if (x_115 == 0) { lean_dec(x_112); lean_inc(x_114); -x_107 = x_114; -x_108 = x_113; +x_107 = x_113; +x_108 = x_114; x_109 = x_114; goto block_111; } else { -x_107 = x_114; -x_108 = x_113; +x_107 = x_113; +x_108 = x_114; x_109 = x_112; goto block_111; } @@ -79804,7 +79943,7 @@ goto block_25; block_172: { lean_object* x_171; -x_171 = l___private_Init_Data_Array_QSort_Basic_0__Array_qsort_sort___at___00Lean_mergeStructureResolutionOrders___at___00__private_Lean_Elab_Structure_0__Lean_Elab_Command_Structure_resolveFieldDefaults_spec__5_spec__21___redArg(x_169, x_168, x_170); +x_171 = l___private_Init_Data_Array_QSort_Basic_0__Array_qsort_sort___at___00Lean_mergeStructureResolutionOrders___at___00__private_Lean_Elab_Structure_0__Lean_Elab_Command_Structure_resolveFieldDefaults_spec__5_spec__21___redArg(x_168, x_169, x_170); lean_dec(x_170); x_157 = x_171; goto block_167; @@ -79817,15 +79956,15 @@ if (x_176 == 0) { lean_dec(x_173); lean_inc(x_175); -x_168 = x_175; -x_169 = x_174; +x_168 = x_174; +x_169 = x_175; x_170 = x_175; goto block_172; } else { -x_168 = x_175; -x_169 = x_174; +x_168 = x_174; +x_169 = x_175; x_170 = x_173; goto block_172; } @@ -81678,7 +81817,7 @@ return x_33; } else { -lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_52; lean_object* x_53; uint8_t x_54; lean_object* x_55; lean_object* x_56; uint8_t x_62; uint8_t x_73; lean_object* x_74; +lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_52; lean_object* x_53; lean_object* x_54; uint8_t x_55; lean_object* x_56; uint8_t x_62; uint8_t x_73; lean_object* x_74; lean_dec_ref(x_6); x_34 = lean_obj_once(&l_WellFounded_opaqueFix_u2083___at___00WellFounded_opaqueFix_u2083___at___00__private_Lean_Structure_0__Lean_mergeStructureResolutionOrders_selectParent___at___00Lean_mergeStructureResolutionOrders___at___00__private_Lean_Elab_Structure_0__Lean_Elab_Command_Structure_resolveFieldDefaults_spec__5_spec__12_spec__19_spec__26___redArg___closed__0, &l_WellFounded_opaqueFix_u2083___at___00WellFounded_opaqueFix_u2083___at___00__private_Lean_Structure_0__Lean_mergeStructureResolutionOrders_selectParent___at___00Lean_mergeStructureResolutionOrders___at___00__private_Lean_Elab_Structure_0__Lean_Elab_Command_Structure_resolveFieldDefaults_spec__5_spec__12_spec__19_spec__26___redArg___closed__0_once, _init_l_WellFounded_opaqueFix_u2083___at___00WellFounded_opaqueFix_u2083___at___00__private_Lean_Structure_0__Lean_mergeStructureResolutionOrders_selectParent___at___00Lean_mergeStructureResolutionOrders___at___00__private_Lean_Elab_Structure_0__Lean_Elab_Command_Structure_resolveFieldDefaults_spec__5_spec__12_spec__19_spec__26___redArg___closed__0); x_35 = lean_box(0); @@ -81747,23 +81886,23 @@ goto block_31; block_61: { uint8_t x_57; -x_57 = lean_nat_dec_lt(x_55, x_56); +x_57 = lean_nat_dec_lt(x_53, x_56); if (x_57 == 0) { lean_dec(x_56); -lean_dec(x_55); -lean_dec_ref(x_53); +lean_dec_ref(x_54); +lean_dec(x_53); goto block_51; } else { size_t x_58; size_t x_59; uint8_t x_60; -x_58 = lean_usize_of_nat(x_55); -lean_dec(x_55); +x_58 = lean_usize_of_nat(x_53); +lean_dec(x_53); x_59 = lean_usize_of_nat(x_56); lean_dec(x_56); -x_60 = l___private_Init_Data_Array_Basic_0__Array_anyMUnsafe_any___at___00__private_Lean_Structure_0__Lean_mergeStructureResolutionOrders_selectParent___at___00Lean_mergeStructureResolutionOrders___at___00__private_Lean_Elab_Structure_0__Lean_Elab_Command_Structure_resolveFieldDefaults_spec__5_spec__12_spec__17(x_38, x_54, x_53, x_58, x_59); -lean_dec_ref(x_53); +x_60 = l___private_Init_Data_Array_Basic_0__Array_anyMUnsafe_any___at___00__private_Lean_Structure_0__Lean_mergeStructureResolutionOrders_selectParent___at___00Lean_mergeStructureResolutionOrders___at___00__private_Lean_Elab_Structure_0__Lean_Elab_Command_Structure_resolveFieldDefaults_spec__5_spec__12_spec__17(x_38, x_55, x_54, x_58, x_59); +lean_dec_ref(x_54); if (x_60 == 0) { goto block_51; @@ -81806,17 +81945,17 @@ x_71 = lean_nat_dec_le(x_68, x_70); if (x_71 == 0) { lean_dec(x_68); -x_53 = x_66; -x_54 = x_62; -x_55 = x_67; +x_53 = x_67; +x_54 = x_66; +x_55 = x_62; x_56 = x_70; goto block_61; } else { -x_53 = x_66; -x_54 = x_62; -x_55 = x_67; +x_53 = x_67; +x_54 = x_66; +x_55 = x_62; x_56 = x_68; goto block_61; } @@ -82001,7 +82140,7 @@ return x_33; } else { -lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_52; lean_object* x_53; lean_object* x_54; uint8_t x_55; lean_object* x_56; uint8_t x_62; uint8_t x_73; lean_object* x_74; +lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_52; lean_object* x_53; uint8_t x_54; lean_object* x_55; lean_object* x_56; uint8_t x_62; uint8_t x_73; lean_object* x_74; lean_dec_ref(x_6); x_34 = lean_obj_once(&l_WellFounded_opaqueFix_u2083___at___00WellFounded_opaqueFix_u2083___at___00__private_Lean_Structure_0__Lean_mergeStructureResolutionOrders_selectParent___at___00Lean_mergeStructureResolutionOrders___at___00__private_Lean_Elab_Structure_0__Lean_Elab_Command_Structure_resolveFieldDefaults_spec__5_spec__12_spec__19_spec__26___redArg___closed__0, &l_WellFounded_opaqueFix_u2083___at___00WellFounded_opaqueFix_u2083___at___00__private_Lean_Structure_0__Lean_mergeStructureResolutionOrders_selectParent___at___00Lean_mergeStructureResolutionOrders___at___00__private_Lean_Elab_Structure_0__Lean_Elab_Command_Structure_resolveFieldDefaults_spec__5_spec__12_spec__19_spec__26___redArg___closed__0_once, _init_l_WellFounded_opaqueFix_u2083___at___00WellFounded_opaqueFix_u2083___at___00__private_Lean_Structure_0__Lean_mergeStructureResolutionOrders_selectParent___at___00Lean_mergeStructureResolutionOrders___at___00__private_Lean_Elab_Structure_0__Lean_Elab_Command_Structure_resolveFieldDefaults_spec__5_spec__12_spec__19_spec__26___redArg___closed__0); x_35 = lean_box(0); @@ -82074,7 +82213,7 @@ x_57 = lean_nat_dec_lt(x_53, x_56); if (x_57 == 0) { lean_dec(x_56); -lean_dec_ref(x_54); +lean_dec_ref(x_55); lean_dec(x_53); goto block_51; } @@ -82085,8 +82224,8 @@ x_58 = lean_usize_of_nat(x_53); lean_dec(x_53); x_59 = lean_usize_of_nat(x_56); lean_dec(x_56); -x_60 = l___private_Init_Data_Array_Basic_0__Array_anyMUnsafe_any___at___00__private_Lean_Structure_0__Lean_mergeStructureResolutionOrders_selectParent___at___00Lean_mergeStructureResolutionOrders___at___00__private_Lean_Elab_Structure_0__Lean_Elab_Command_Structure_resolveFieldDefaults_spec__5_spec__12_spec__17(x_38, x_55, x_54, x_58, x_59); -lean_dec_ref(x_54); +x_60 = l___private_Init_Data_Array_Basic_0__Array_anyMUnsafe_any___at___00__private_Lean_Structure_0__Lean_mergeStructureResolutionOrders_selectParent___at___00Lean_mergeStructureResolutionOrders___at___00__private_Lean_Elab_Structure_0__Lean_Elab_Command_Structure_resolveFieldDefaults_spec__5_spec__12_spec__17(x_38, x_54, x_55, x_58, x_59); +lean_dec_ref(x_55); if (x_60 == 0) { goto block_51; @@ -82130,16 +82269,16 @@ if (x_71 == 0) { lean_dec(x_68); x_53 = x_67; -x_54 = x_66; -x_55 = x_62; +x_54 = x_62; +x_55 = x_66; x_56 = x_70; goto block_61; } else { x_53 = x_67; -x_54 = x_66; -x_55 = x_62; +x_54 = x_62; +x_55 = x_66; x_56 = x_68; goto block_61; } @@ -82848,7 +82987,7 @@ goto block_23; block_51: { lean_object* x_50; -x_50 = l___private_Init_Data_Array_QSort_Basic_0__Array_qsort_sort___at___00Lean_mergeStructureResolutionOrders___at___00__private_Lean_Elab_Structure_0__Lean_Elab_Command_Structure_resolveFieldDefaults_spec__5_spec__21___redArg(x_47, x_48, x_49); +x_50 = l___private_Init_Data_Array_QSort_Basic_0__Array_qsort_sort___at___00Lean_mergeStructureResolutionOrders___at___00__private_Lean_Elab_Structure_0__Lean_Elab_Command_Structure_resolveFieldDefaults_spec__5_spec__21___redArg(x_48, x_47, x_49); lean_dec(x_49); x_36 = x_50; goto block_46; @@ -82861,15 +83000,15 @@ if (x_55 == 0) { lean_dec(x_53); lean_inc(x_54); -x_47 = x_52; -x_48 = x_54; +x_47 = x_54; +x_48 = x_52; x_49 = x_54; goto block_51; } else { -x_47 = x_52; -x_48 = x_54; +x_47 = x_54; +x_48 = x_52; x_49 = x_53; goto block_51; } @@ -83069,7 +83208,7 @@ goto block_23; block_109: { lean_object* x_108; -x_108 = l___private_Init_Data_Array_QSort_Basic_0__Array_qsort_sort___at___00Lean_mergeStructureResolutionOrders___at___00__private_Lean_Elab_Structure_0__Lean_Elab_Command_Structure_resolveFieldDefaults_spec__5_spec__21___redArg(x_105, x_106, x_107); +x_108 = l___private_Init_Data_Array_QSort_Basic_0__Array_qsort_sort___at___00Lean_mergeStructureResolutionOrders___at___00__private_Lean_Elab_Structure_0__Lean_Elab_Command_Structure_resolveFieldDefaults_spec__5_spec__21___redArg(x_106, x_105, x_107); lean_dec(x_107); x_94 = x_108; goto block_104; @@ -83082,15 +83221,15 @@ if (x_113 == 0) { lean_dec(x_111); lean_inc(x_112); -x_105 = x_110; -x_106 = x_112; +x_105 = x_112; +x_106 = x_110; x_107 = x_112; goto block_109; } else { -x_105 = x_110; -x_106 = x_112; +x_105 = x_112; +x_106 = x_110; x_107 = x_111; goto block_109; } @@ -83307,7 +83446,7 @@ goto block_23; block_170: { lean_object* x_169; -x_169 = l___private_Init_Data_Array_QSort_Basic_0__Array_qsort_sort___at___00Lean_mergeStructureResolutionOrders___at___00__private_Lean_Elab_Structure_0__Lean_Elab_Command_Structure_resolveFieldDefaults_spec__5_spec__21___redArg(x_166, x_167, x_168); +x_169 = l___private_Init_Data_Array_QSort_Basic_0__Array_qsort_sort___at___00Lean_mergeStructureResolutionOrders___at___00__private_Lean_Elab_Structure_0__Lean_Elab_Command_Structure_resolveFieldDefaults_spec__5_spec__21___redArg(x_167, x_166, x_168); lean_dec(x_168); x_155 = x_169; goto block_165; @@ -83320,15 +83459,15 @@ if (x_174 == 0) { lean_dec(x_172); lean_inc(x_173); -x_166 = x_171; -x_167 = x_173; +x_166 = x_173; +x_167 = x_171; x_168 = x_173; goto block_170; } else { -x_166 = x_171; -x_167 = x_173; +x_166 = x_173; +x_167 = x_171; x_168 = x_172; goto block_170; } diff --git a/stage0/stdlib/Lean/Meta/WHNF.c b/stage0/stdlib/Lean/Meta/WHNF.c index a1eb649841..1d6189f6ad 100644 --- a/stage0/stdlib/Lean/Meta/WHNF.c +++ b/stage0/stdlib/Lean/Meta/WHNF.c @@ -334,6 +334,9 @@ LEAN_EXPORT lean_object* l___private_Lean_Meta_WHNF_0__Lean_Meta_reduceQuotRec__ lean_object* l_Lean_Environment_getProjectionFnInfo_x3f(lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_getProjectionFnInfo_x3f___at___00Lean_Meta_getStuckMVar_x3f_spec__1___redArg(lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_getProjectionFnInfo_x3f___at___00Lean_Meta_getStuckMVar_x3f_spec__1___redArg___boxed(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Environment_getAuxParentProjectionInfo_x3f(lean_object*, lean_object*); +LEAN_EXPORT lean_object* l_Lean_getAuxParentProjectionInfo_x3f___at___00Lean_Meta_getStuckMVar_x3f_spec__3___redArg(lean_object*, lean_object*); +LEAN_EXPORT lean_object* l_Lean_getAuxParentProjectionInfo_x3f___at___00Lean_Meta_getStuckMVar_x3f_spec__3___redArg___boxed(lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l___private_Init_Data_Array_Basic_0__Array_forIn_x27Unsafe_loop___at___00Lean_Meta_getStuckMVar_x3f_spec__2(lean_object*, size_t, size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); uint8_t lean_usize_dec_lt(size_t, size_t); lean_object* lean_array_fget(lean_object*, lean_object*); @@ -349,6 +352,8 @@ LEAN_EXPORT lean_object* l___private_Init_Data_Array_Basic_0__Array_forIn_x27Uns LEAN_EXPORT lean_object* l_Lean_Meta_getStuckMVar_x3f___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_getProjectionFnInfo_x3f___at___00Lean_Meta_getStuckMVar_x3f_spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_getProjectionFnInfo_x3f___at___00Lean_Meta_getStuckMVar_x3f_spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +LEAN_EXPORT lean_object* l_Lean_getAuxParentProjectionInfo_x3f___at___00Lean_Meta_getStuckMVar_x3f_spec__3(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +LEAN_EXPORT lean_object* l_Lean_getAuxParentProjectionInfo_x3f___at___00Lean_Meta_getStuckMVar_x3f_spec__3___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Meta_instInhabitedMetaM___lam__0___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); static const lean_closure_object l_Lean_Meta_whnfEasyCases___closed__0_value = {.m_header = {.m_rc = 0, .m_cs_sz = sizeof(lean_closure_object) + sizeof(void*)*0, .m_other = 0, .m_tag = 245}, .m_fun = (void*)l_Lean_Meta_instInhabitedMetaM___lam__0___boxed, .m_arity = 5, .m_num_fixed = 0, .m_objs = {} }; static const lean_object* l_Lean_Meta_whnfEasyCases___closed__0 = (const lean_object*)&l_Lean_Meta_whnfEasyCases___closed__0_value; @@ -7504,6 +7509,29 @@ lean_dec(x_2); return x_4; } } +LEAN_EXPORT lean_object* l_Lean_getAuxParentProjectionInfo_x3f___at___00Lean_Meta_getStuckMVar_x3f_spec__3___redArg(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; +x_4 = lean_st_ref_get(x_2); +x_5 = lean_ctor_get(x_4, 0); +lean_inc_ref(x_5); +lean_dec(x_4); +x_6 = l_Lean_Environment_getAuxParentProjectionInfo_x3f(x_5, x_1); +x_7 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_7, 0, x_6); +return x_7; +} +} +LEAN_EXPORT lean_object* l_Lean_getAuxParentProjectionInfo_x3f___at___00Lean_Meta_getStuckMVar_x3f_spec__3___redArg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; +x_4 = l_Lean_getAuxParentProjectionInfo_x3f___at___00Lean_Meta_getStuckMVar_x3f_spec__3___redArg(x_1, x_2); +lean_dec(x_2); +return x_4; +} +} LEAN_EXPORT lean_object* l___private_Init_Data_Array_Basic_0__Array_forIn_x27Unsafe_loop___at___00Lean_Meta_getStuckMVar_x3f_spec__2(lean_object* x_1, size_t x_2, size_t x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { _start: { @@ -8044,24 +8072,24 @@ return x_24; LEAN_EXPORT lean_object* l_Lean_Meta_getStuckMVar_x3f(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { _start: { -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_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_20; switch (lean_obj_tag(x_1)) { case 10: { -lean_object* x_20; -x_20 = lean_ctor_get(x_1, 1); -lean_inc_ref(x_20); +lean_object* x_24; +x_24 = lean_ctor_get(x_1, 1); +lean_inc_ref(x_24); lean_dec_ref(x_1); -x_1 = x_20; +x_1 = x_24; goto _start; } case 11: { -lean_object* x_22; -x_22 = lean_ctor_get(x_1, 2); -lean_inc_ref(x_22); +lean_object* x_26; +x_26 = lean_ctor_get(x_1, 2); +lean_inc_ref(x_26); lean_dec_ref(x_1); -x_7 = x_22; +x_7 = x_26; x_8 = x_2; x_9 = x_3; x_10 = x_4; @@ -8071,47 +8099,19 @@ goto block_19; } case 2: { -lean_object* x_23; -x_23 = l_Lean_instantiateMVars___at___00__private_Lean_Meta_WHNF_0__Lean_Meta_toCtorWhenK_spec__0___redArg(x_1, x_3); -if (lean_obj_tag(x_23) == 0) +lean_object* x_27; +x_27 = l_Lean_instantiateMVars___at___00__private_Lean_Meta_WHNF_0__Lean_Meta_toCtorWhenK_spec__0___redArg(x_1, x_3); +if (lean_obj_tag(x_27) == 0) { -uint8_t x_24; -x_24 = !lean_is_exclusive(x_23); -if (x_24 == 0) -{ -lean_object* x_25; -x_25 = lean_ctor_get(x_23, 0); -if (lean_obj_tag(x_25) == 2) -{ -lean_object* x_26; lean_object* x_27; -lean_dec(x_5); -lean_dec_ref(x_4); -lean_dec(x_3); -lean_dec_ref(x_2); -x_26 = lean_ctor_get(x_25, 0); -lean_inc(x_26); -lean_dec_ref(x_25); -x_27 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_27, 0, x_26); -lean_ctor_set(x_23, 0, x_27); -return x_23; -} -else -{ -lean_free_object(x_23); -x_1 = x_25; -goto _start; -} -} -else +uint8_t x_28; +x_28 = !lean_is_exclusive(x_27); +if (x_28 == 0) { lean_object* x_29; -x_29 = lean_ctor_get(x_23, 0); -lean_inc(x_29); -lean_dec(x_23); +x_29 = lean_ctor_get(x_27, 0); if (lean_obj_tag(x_29) == 2) { -lean_object* x_30; lean_object* x_31; lean_object* x_32; +lean_object* x_30; lean_object* x_31; lean_dec(x_5); lean_dec_ref(x_4); lean_dec(x_3); @@ -8121,518 +8121,881 @@ lean_inc(x_30); lean_dec_ref(x_29); x_31 = lean_alloc_ctor(1, 1, 0); lean_ctor_set(x_31, 0, x_30); -x_32 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_32, 0, x_31); -return x_32; +lean_ctor_set(x_27, 0, x_31); +return x_27; } else { +lean_free_object(x_27); x_1 = x_29; goto _start; } } +else +{ +lean_object* x_33; +x_33 = lean_ctor_get(x_27, 0); +lean_inc(x_33); +lean_dec(x_27); +if (lean_obj_tag(x_33) == 2) +{ +lean_object* x_34; lean_object* x_35; lean_object* x_36; +lean_dec(x_5); +lean_dec_ref(x_4); +lean_dec(x_3); +lean_dec_ref(x_2); +x_34 = lean_ctor_get(x_33, 0); +lean_inc(x_34); +lean_dec_ref(x_33); +x_35 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_35, 0, x_34); +x_36 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_36, 0, x_35); +return x_36; +} +else +{ +x_1 = x_33; +goto _start; +} +} } else { -uint8_t x_34; +uint8_t x_38; lean_dec(x_5); lean_dec_ref(x_4); lean_dec(x_3); lean_dec_ref(x_2); -x_34 = !lean_is_exclusive(x_23); -if (x_34 == 0) +x_38 = !lean_is_exclusive(x_27); +if (x_38 == 0) { -return x_23; +return x_27; } else { -lean_object* x_35; lean_object* x_36; -x_35 = lean_ctor_get(x_23, 0); -lean_inc(x_35); -lean_dec(x_23); -x_36 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_36, 0, x_35); -return x_36; +lean_object* x_39; lean_object* x_40; +x_39 = lean_ctor_get(x_27, 0); +lean_inc(x_39); +lean_dec(x_27); +x_40 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_40, 0, x_39); +return x_40; } } } case 5: { -lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; -x_37 = lean_ctor_get(x_1, 0); -x_38 = l_Lean_Expr_getAppFn(x_37); -switch (lean_obj_tag(x_38)) { +lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; lean_object* x_48; +x_41 = lean_ctor_get(x_1, 0); +x_42 = l_Lean_Expr_getAppFn(x_41); +switch (lean_obj_tag(x_42)) { case 2: { -lean_object* x_90; -lean_dec_ref(x_38); -x_90 = l_Lean_instantiateMVars___at___00__private_Lean_Meta_WHNF_0__Lean_Meta_toCtorWhenK_spec__0___redArg(x_1, x_3); -if (lean_obj_tag(x_90) == 0) +lean_object* x_94; +lean_dec_ref(x_42); +x_94 = l_Lean_instantiateMVars___at___00__private_Lean_Meta_WHNF_0__Lean_Meta_toCtorWhenK_spec__0___redArg(x_1, x_3); +if (lean_obj_tag(x_94) == 0) { -uint8_t x_91; -x_91 = !lean_is_exclusive(x_90); -if (x_91 == 0) +uint8_t x_95; +x_95 = !lean_is_exclusive(x_94); +if (x_95 == 0) { -lean_object* x_92; lean_object* x_93; -x_92 = lean_ctor_get(x_90, 0); -x_93 = l_Lean_Expr_getAppFn(x_92); -if (lean_obj_tag(x_93) == 2) +lean_object* x_96; lean_object* x_97; +x_96 = lean_ctor_get(x_94, 0); +x_97 = l_Lean_Expr_getAppFn(x_96); +if (lean_obj_tag(x_97) == 2) { -lean_object* x_94; lean_object* x_95; -lean_dec(x_92); +lean_object* x_98; lean_object* x_99; +lean_dec(x_96); lean_dec(x_5); lean_dec_ref(x_4); lean_dec(x_3); lean_dec_ref(x_2); -x_94 = lean_ctor_get(x_93, 0); -lean_inc(x_94); -lean_dec_ref(x_93); -x_95 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_95, 0, x_94); -lean_ctor_set(x_90, 0, x_95); -return x_90; +x_98 = lean_ctor_get(x_97, 0); +lean_inc(x_98); +lean_dec_ref(x_97); +x_99 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_99, 0, x_98); +lean_ctor_set(x_94, 0, x_99); +return x_94; } else { -lean_dec_ref(x_93); -lean_free_object(x_90); -x_1 = x_92; +lean_dec_ref(x_97); +lean_free_object(x_94); +x_1 = x_96; goto _start; } } else { -lean_object* x_97; lean_object* x_98; -x_97 = lean_ctor_get(x_90, 0); -lean_inc(x_97); -lean_dec(x_90); -x_98 = l_Lean_Expr_getAppFn(x_97); -if (lean_obj_tag(x_98) == 2) +lean_object* x_101; lean_object* x_102; +x_101 = lean_ctor_get(x_94, 0); +lean_inc(x_101); +lean_dec(x_94); +x_102 = l_Lean_Expr_getAppFn(x_101); +if (lean_obj_tag(x_102) == 2) { -lean_object* x_99; lean_object* x_100; lean_object* x_101; -lean_dec(x_97); +lean_object* x_103; lean_object* x_104; lean_object* x_105; +lean_dec(x_101); lean_dec(x_5); lean_dec_ref(x_4); lean_dec(x_3); lean_dec_ref(x_2); -x_99 = lean_ctor_get(x_98, 0); -lean_inc(x_99); -lean_dec_ref(x_98); -x_100 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_100, 0, x_99); -x_101 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_101, 0, x_100); -return x_101; -} -else -{ -lean_dec_ref(x_98); -x_1 = x_97; -goto _start; -} -} -} -else -{ -uint8_t x_103; -lean_dec(x_5); -lean_dec_ref(x_4); -lean_dec(x_3); -lean_dec_ref(x_2); -x_103 = !lean_is_exclusive(x_90); -if (x_103 == 0) -{ -return x_90; -} -else -{ -lean_object* x_104; lean_object* x_105; -x_104 = lean_ctor_get(x_90, 0); -lean_inc(x_104); -lean_dec(x_90); -x_105 = lean_alloc_ctor(1, 1, 0); +x_103 = lean_ctor_get(x_102, 0); +lean_inc(x_103); +lean_dec_ref(x_102); +x_104 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_104, 0, x_103); +x_105 = lean_alloc_ctor(0, 1, 0); lean_ctor_set(x_105, 0, x_104); return x_105; } +else +{ +lean_dec_ref(x_102); +x_1 = x_101; +goto _start; +} +} +} +else +{ +uint8_t x_107; +lean_dec(x_5); +lean_dec_ref(x_4); +lean_dec(x_3); +lean_dec_ref(x_2); +x_107 = !lean_is_exclusive(x_94); +if (x_107 == 0) +{ +return x_94; +} +else +{ +lean_object* x_108; lean_object* x_109; +x_108 = lean_ctor_get(x_94, 0); +lean_inc(x_108); +lean_dec(x_94); +x_109 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_109, 0, x_108); +return x_109; +} } } case 4: { -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_157; lean_object* x_158; uint8_t x_159; lean_object* x_160; -x_106 = lean_ctor_get(x_38, 0); -lean_inc(x_106); -x_157 = lean_st_ref_get(x_5); -x_158 = lean_ctor_get(x_157, 0); -lean_inc_ref(x_158); -lean_dec(x_157); -x_159 = 0; -lean_inc(x_106); -x_160 = l_Lean_Environment_find_x3f(x_158, x_106, x_159); -if (lean_obj_tag(x_160) == 1) +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_205; lean_object* x_206; uint8_t x_207; lean_object* x_208; +x_110 = lean_ctor_get(x_42, 0); +lean_inc(x_110); +x_205 = lean_st_ref_get(x_5); +x_206 = lean_ctor_get(x_205, 0); +lean_inc_ref(x_206); +lean_dec(x_205); +x_207 = 0; +lean_inc(x_110); +x_208 = l_Lean_Environment_find_x3f(x_206, x_110, x_207); +if (lean_obj_tag(x_208) == 1) { -lean_object* x_161; -x_161 = lean_ctor_get(x_160, 0); -lean_inc(x_161); -lean_dec_ref(x_160); -switch (lean_obj_tag(x_161)) { +lean_object* x_209; +x_209 = lean_ctor_get(x_208, 0); +lean_inc(x_209); +lean_dec_ref(x_208); +switch (lean_obj_tag(x_209)) { case 7: { -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_dec(x_106); -lean_dec_ref(x_38); -x_162 = lean_ctor_get(x_161, 0); -lean_inc_ref(x_162); -lean_dec_ref(x_161); -x_163 = lean_obj_once(&l___private_Lean_Meta_WHNF_0__Lean_Meta_mkNullaryCtor___redArg___closed__0, &l___private_Lean_Meta_WHNF_0__Lean_Meta_mkNullaryCtor___redArg___closed__0_once, _init_l___private_Lean_Meta_WHNF_0__Lean_Meta_mkNullaryCtor___redArg___closed__0); -x_164 = l_Lean_Expr_getAppNumArgs(x_1); -lean_inc(x_164); -x_165 = lean_mk_array(x_164, x_163); -x_166 = lean_unsigned_to_nat(1u); -x_167 = lean_nat_sub(x_164, x_166); -lean_dec(x_164); -x_168 = l___private_Lean_Expr_0__Lean_Expr_getAppArgsAux(x_1, x_165, x_167); -x_169 = l___private_Lean_Meta_WHNF_0__Lean_Meta_isRecStuck_x3f(x_162, x_168, x_2, x_3, x_4, x_5); -lean_dec_ref(x_168); -lean_dec_ref(x_162); -return x_169; +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_dec(x_110); +lean_dec_ref(x_42); +x_210 = lean_ctor_get(x_209, 0); +lean_inc_ref(x_210); +lean_dec_ref(x_209); +x_211 = lean_obj_once(&l___private_Lean_Meta_WHNF_0__Lean_Meta_mkNullaryCtor___redArg___closed__0, &l___private_Lean_Meta_WHNF_0__Lean_Meta_mkNullaryCtor___redArg___closed__0_once, _init_l___private_Lean_Meta_WHNF_0__Lean_Meta_mkNullaryCtor___redArg___closed__0); +x_212 = l_Lean_Expr_getAppNumArgs(x_1); +lean_inc(x_212); +x_213 = lean_mk_array(x_212, x_211); +x_214 = lean_unsigned_to_nat(1u); +x_215 = lean_nat_sub(x_212, x_214); +lean_dec(x_212); +x_216 = l___private_Lean_Expr_0__Lean_Expr_getAppArgsAux(x_1, x_213, x_215); +x_217 = l___private_Lean_Meta_WHNF_0__Lean_Meta_isRecStuck_x3f(x_210, x_216, x_2, x_3, x_4, x_5); +lean_dec_ref(x_216); +lean_dec_ref(x_210); +return x_217; } case 4: { -lean_object* x_170; lean_object* x_171; lean_object* x_172; lean_object* x_173; lean_object* x_174; lean_object* x_175; lean_object* x_176; lean_object* x_177; -lean_dec(x_106); -lean_dec_ref(x_38); -x_170 = lean_ctor_get(x_161, 0); -lean_inc_ref(x_170); -lean_dec_ref(x_161); -x_171 = lean_obj_once(&l___private_Lean_Meta_WHNF_0__Lean_Meta_mkNullaryCtor___redArg___closed__0, &l___private_Lean_Meta_WHNF_0__Lean_Meta_mkNullaryCtor___redArg___closed__0_once, _init_l___private_Lean_Meta_WHNF_0__Lean_Meta_mkNullaryCtor___redArg___closed__0); -x_172 = l_Lean_Expr_getAppNumArgs(x_1); -lean_inc(x_172); -x_173 = lean_mk_array(x_172, x_171); -x_174 = lean_unsigned_to_nat(1u); -x_175 = lean_nat_sub(x_172, x_174); -lean_dec(x_172); -x_176 = l___private_Lean_Expr_0__Lean_Expr_getAppArgsAux(x_1, x_173, x_175); -x_177 = l___private_Lean_Meta_WHNF_0__Lean_Meta_isQuotRecStuck_x3f(x_170, x_176, x_2, x_3, x_4, x_5); -lean_dec_ref(x_176); -lean_dec_ref(x_170); -return x_177; +lean_object* x_218; lean_object* x_219; lean_object* x_220; lean_object* x_221; lean_object* x_222; lean_object* x_223; lean_object* x_224; lean_object* x_225; +lean_dec(x_110); +lean_dec_ref(x_42); +x_218 = lean_ctor_get(x_209, 0); +lean_inc_ref(x_218); +lean_dec_ref(x_209); +x_219 = lean_obj_once(&l___private_Lean_Meta_WHNF_0__Lean_Meta_mkNullaryCtor___redArg___closed__0, &l___private_Lean_Meta_WHNF_0__Lean_Meta_mkNullaryCtor___redArg___closed__0_once, _init_l___private_Lean_Meta_WHNF_0__Lean_Meta_mkNullaryCtor___redArg___closed__0); +x_220 = l_Lean_Expr_getAppNumArgs(x_1); +lean_inc(x_220); +x_221 = lean_mk_array(x_220, x_219); +x_222 = lean_unsigned_to_nat(1u); +x_223 = lean_nat_sub(x_220, x_222); +lean_dec(x_220); +x_224 = l___private_Lean_Expr_0__Lean_Expr_getAppArgsAux(x_1, x_221, x_223); +x_225 = l___private_Lean_Meta_WHNF_0__Lean_Meta_isQuotRecStuck_x3f(x_218, x_224, x_2, x_3, x_4, x_5); +lean_dec_ref(x_224); +lean_dec_ref(x_218); +return x_225; } default: { -lean_dec(x_161); -x_107 = x_2; -x_108 = x_3; -x_109 = x_4; -x_110 = x_5; -x_111 = lean_box(0); -goto block_156; +lean_dec(x_209); +x_111 = x_2; +x_112 = x_3; +x_113 = x_4; +x_114 = x_5; +x_115 = lean_box(0); +goto block_204; } } } else { -lean_dec(x_160); -x_107 = x_2; -x_108 = x_3; -x_109 = x_4; -x_110 = x_5; -x_111 = lean_box(0); -goto block_156; +lean_dec(x_208); +x_111 = x_2; +x_112 = x_3; +x_113 = x_4; +x_114 = x_5; +x_115 = lean_box(0); +goto block_204; } -block_156: -{ -uint8_t x_112; -x_112 = l_Lean_Expr_hasExprMVar(x_1); -if (x_112 == 0) -{ -lean_object* x_113; lean_object* x_114; -lean_dec(x_110); -lean_dec_ref(x_109); -lean_dec(x_108); -lean_dec_ref(x_107); -lean_dec_ref(x_38); -lean_dec(x_106); -lean_dec_ref(x_1); -x_113 = lean_box(0); -x_114 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_114, 0, x_113); -return x_114; -} -else -{ -lean_object* x_115; -x_115 = l_Lean_getProjectionFnInfo_x3f___at___00Lean_Meta_getStuckMVar_x3f_spec__1___redArg(x_106, x_110); -if (lean_obj_tag(x_115) == 0) +block_204: { uint8_t x_116; -x_116 = !lean_is_exclusive(x_115); +x_116 = l_Lean_Expr_hasExprMVar(x_1); if (x_116 == 0) { -lean_object* x_117; -x_117 = lean_ctor_get(x_115, 0); -if (lean_obj_tag(x_117) == 1) -{ -lean_object* x_118; uint8_t x_119; -x_118 = lean_ctor_get(x_117, 0); -lean_inc(x_118); -lean_dec_ref(x_117); -x_119 = lean_ctor_get_uint8(x_118, sizeof(void*)*3); -if (x_119 == 0) -{ -lean_object* x_120; -lean_dec(x_118); +lean_object* x_117; lean_object* x_118; +lean_dec(x_114); +lean_dec_ref(x_113); +lean_dec(x_112); +lean_dec_ref(x_111); lean_dec(x_110); -lean_dec_ref(x_109); -lean_dec(x_108); -lean_dec_ref(x_107); -lean_dec_ref(x_38); +lean_dec_ref(x_42); lean_dec_ref(x_1); -x_120 = lean_box(0); -lean_ctor_set(x_115, 0, x_120); -return x_115; +x_117 = lean_box(0); +x_118 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_118, 0, x_117); +return x_118; } else { -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; uint8_t x_129; -lean_free_object(x_115); -x_121 = lean_ctor_get(x_118, 1); -lean_inc(x_121); -lean_dec(x_118); -x_122 = lean_obj_once(&l___private_Lean_Meta_WHNF_0__Lean_Meta_mkNullaryCtor___redArg___closed__0, &l___private_Lean_Meta_WHNF_0__Lean_Meta_mkNullaryCtor___redArg___closed__0_once, _init_l___private_Lean_Meta_WHNF_0__Lean_Meta_mkNullaryCtor___redArg___closed__0); -x_123 = l_Lean_Expr_getAppNumArgs(x_1); -lean_inc(x_123); -x_124 = lean_mk_array(x_123, x_122); +lean_object* x_119; +lean_inc(x_110); +x_119 = l_Lean_getProjectionFnInfo_x3f___at___00Lean_Meta_getStuckMVar_x3f_spec__1___redArg(x_110, x_114); +if (lean_obj_tag(x_119) == 0) +{ +uint8_t x_120; +x_120 = !lean_is_exclusive(x_119); +if (x_120 == 0) +{ +lean_object* x_121; lean_object* x_122; lean_object* x_123; lean_object* x_124; lean_object* x_125; lean_object* x_126; lean_object* x_127; +x_121 = lean_ctor_get(x_119, 0); +x_122 = l_Lean_Expr_getAppNumArgs(x_1); +x_123 = lean_obj_once(&l___private_Lean_Meta_WHNF_0__Lean_Meta_mkNullaryCtor___redArg___closed__0, &l___private_Lean_Meta_WHNF_0__Lean_Meta_mkNullaryCtor___redArg___closed__0_once, _init_l___private_Lean_Meta_WHNF_0__Lean_Meta_mkNullaryCtor___redArg___closed__0); +lean_inc(x_122); +x_124 = lean_mk_array(x_122, x_123); x_125 = lean_unsigned_to_nat(1u); -x_126 = lean_nat_sub(x_123, x_125); -lean_dec(x_123); +x_126 = lean_nat_sub(x_122, x_125); +lean_dec(x_122); x_127 = l___private_Lean_Expr_0__Lean_Expr_getAppArgsAux(x_1, x_124, x_126); -x_128 = lean_array_get_size(x_127); -x_129 = lean_nat_dec_lt(x_121, x_128); +if (lean_obj_tag(x_121) == 1) +{ +lean_object* x_128; uint8_t x_129; +lean_dec(x_110); +x_128 = lean_ctor_get(x_121, 0); +lean_inc(x_128); +lean_dec_ref(x_121); +x_129 = lean_ctor_get_uint8(x_128, sizeof(void*)*3); if (x_129 == 0) { -lean_dec(x_121); -x_39 = x_127; -x_40 = x_107; -x_41 = x_108; -x_42 = x_109; -x_43 = x_110; -x_44 = lean_box(0); -goto block_89; -} -else -{ -lean_object* x_130; lean_object* x_131; -x_130 = lean_array_fget(x_127, x_121); -lean_dec(x_121); -lean_inc(x_110); -lean_inc_ref(x_109); -lean_inc(x_108); -lean_inc_ref(x_107); -x_131 = l_Lean_Meta_getStuckMVar_x3f(x_130, x_107, x_108, x_109, x_110); -if (lean_obj_tag(x_131) == 0) -{ -lean_object* x_132; -x_132 = lean_ctor_get(x_131, 0); -lean_inc(x_132); -if (lean_obj_tag(x_132) == 1) -{ -lean_dec_ref(x_132); +lean_object* x_130; +lean_dec(x_128); lean_dec_ref(x_127); -lean_dec(x_110); -lean_dec_ref(x_109); -lean_dec(x_108); -lean_dec_ref(x_107); -lean_dec_ref(x_38); -return x_131; +lean_dec(x_114); +lean_dec_ref(x_113); +lean_dec(x_112); +lean_dec_ref(x_111); +lean_dec_ref(x_42); +x_130 = lean_box(0); +lean_ctor_set(x_119, 0, x_130); +return x_119; } else { -lean_dec_ref(x_131); -lean_dec(x_132); -x_39 = x_127; -x_40 = x_107; -x_41 = x_108; -x_42 = x_109; -x_43 = x_110; -x_44 = lean_box(0); -goto block_89; +lean_object* x_131; lean_object* x_132; uint8_t x_133; +lean_free_object(x_119); +x_131 = lean_ctor_get(x_128, 1); +lean_inc(x_131); +lean_dec(x_128); +x_132 = lean_array_get_size(x_127); +x_133 = lean_nat_dec_lt(x_131, x_132); +if (x_133 == 0) +{ +lean_dec(x_131); +x_43 = x_127; +x_44 = x_111; +x_45 = x_112; +x_46 = x_113; +x_47 = x_114; +x_48 = lean_box(0); +goto block_93; +} +else +{ +lean_object* x_134; lean_object* x_135; +x_134 = lean_array_fget(x_127, x_131); +lean_dec(x_131); +lean_inc(x_114); +lean_inc_ref(x_113); +lean_inc(x_112); +lean_inc_ref(x_111); +x_135 = l_Lean_Meta_getStuckMVar_x3f(x_134, x_111, x_112, x_113, x_114); +if (lean_obj_tag(x_135) == 0) +{ +lean_object* x_136; +x_136 = lean_ctor_get(x_135, 0); +lean_inc(x_136); +if (lean_obj_tag(x_136) == 1) +{ +lean_dec_ref(x_136); +lean_dec_ref(x_127); +lean_dec(x_114); +lean_dec_ref(x_113); +lean_dec(x_112); +lean_dec_ref(x_111); +lean_dec_ref(x_42); +return x_135; +} +else +{ +lean_dec_ref(x_135); +lean_dec(x_136); +x_43 = x_127; +x_44 = x_111; +x_45 = x_112; +x_46 = x_113; +x_47 = x_114; +x_48 = lean_box(0); +goto block_93; } } else { lean_dec_ref(x_127); -lean_dec(x_110); -lean_dec_ref(x_109); -lean_dec(x_108); -lean_dec_ref(x_107); -lean_dec_ref(x_38); -return x_131; +lean_dec(x_114); +lean_dec_ref(x_113); +lean_dec(x_112); +lean_dec_ref(x_111); +lean_dec_ref(x_42); +return x_135; } } } } else { -lean_object* x_133; -lean_dec(x_117); -lean_dec(x_110); -lean_dec_ref(x_109); -lean_dec(x_108); -lean_dec_ref(x_107); -lean_dec_ref(x_38); -lean_dec_ref(x_1); -x_133 = lean_box(0); -lean_ctor_set(x_115, 0, x_133); -return x_115; +lean_object* x_137; +lean_free_object(x_119); +lean_dec(x_121); +lean_dec_ref(x_42); +x_137 = l_Lean_getAuxParentProjectionInfo_x3f___at___00Lean_Meta_getStuckMVar_x3f_spec__3___redArg(x_110, x_114); +if (lean_obj_tag(x_137) == 0) +{ +uint8_t x_138; +x_138 = !lean_is_exclusive(x_137); +if (x_138 == 0) +{ +lean_object* x_139; +x_139 = lean_ctor_get(x_137, 0); +if (lean_obj_tag(x_139) == 1) +{ +lean_object* x_140; uint8_t x_141; +x_140 = lean_ctor_get(x_139, 0); +lean_inc(x_140); +lean_dec_ref(x_139); +x_141 = lean_ctor_get_uint8(x_140, sizeof(void*)*1); +if (x_141 == 0) +{ +lean_object* x_142; +lean_dec(x_140); +lean_dec_ref(x_127); +lean_dec(x_114); +lean_dec_ref(x_113); +lean_dec(x_112); +lean_dec_ref(x_111); +x_142 = lean_box(0); +lean_ctor_set(x_137, 0, x_142); +return x_137; +} +else +{ +lean_object* x_143; lean_object* x_144; uint8_t x_145; +lean_free_object(x_137); +x_143 = lean_ctor_get(x_140, 0); +lean_inc(x_143); +lean_dec(x_140); +x_144 = lean_array_get_size(x_127); +x_145 = lean_nat_dec_lt(x_143, x_144); +if (x_145 == 0) +{ +lean_dec(x_143); +lean_dec_ref(x_127); +lean_dec(x_114); +lean_dec_ref(x_113); +lean_dec(x_112); +lean_dec_ref(x_111); +x_20 = lean_box(0); +goto block_23; +} +else +{ +lean_object* x_146; lean_object* x_147; +x_146 = lean_array_fget(x_127, x_143); +lean_dec(x_143); +lean_dec_ref(x_127); +x_147 = l_Lean_Meta_getStuckMVar_x3f(x_146, x_111, x_112, x_113, x_114); +if (lean_obj_tag(x_147) == 0) +{ +lean_object* x_148; +x_148 = lean_ctor_get(x_147, 0); +lean_inc(x_148); +if (lean_obj_tag(x_148) == 1) +{ +lean_dec_ref(x_148); +return x_147; +} +else +{ +lean_dec_ref(x_147); +lean_dec(x_148); +x_20 = lean_box(0); +goto block_23; } } else { -lean_object* x_134; -x_134 = lean_ctor_get(x_115, 0); -lean_inc(x_134); -lean_dec(x_115); -if (lean_obj_tag(x_134) == 1) -{ -lean_object* x_135; uint8_t x_136; -x_135 = lean_ctor_get(x_134, 0); -lean_inc(x_135); -lean_dec_ref(x_134); -x_136 = lean_ctor_get_uint8(x_135, sizeof(void*)*3); -if (x_136 == 0) -{ -lean_object* x_137; lean_object* x_138; -lean_dec(x_135); -lean_dec(x_110); -lean_dec_ref(x_109); -lean_dec(x_108); -lean_dec_ref(x_107); -lean_dec_ref(x_38); -lean_dec_ref(x_1); -x_137 = lean_box(0); -x_138 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_138, 0, x_137); -return x_138; +return x_147; +} +} +} } else { -lean_object* x_139; lean_object* x_140; lean_object* x_141; lean_object* x_142; lean_object* x_143; lean_object* x_144; lean_object* x_145; lean_object* x_146; uint8_t x_147; -x_139 = lean_ctor_get(x_135, 1); -lean_inc(x_139); -lean_dec(x_135); -x_140 = lean_obj_once(&l___private_Lean_Meta_WHNF_0__Lean_Meta_mkNullaryCtor___redArg___closed__0, &l___private_Lean_Meta_WHNF_0__Lean_Meta_mkNullaryCtor___redArg___closed__0_once, _init_l___private_Lean_Meta_WHNF_0__Lean_Meta_mkNullaryCtor___redArg___closed__0); -x_141 = l_Lean_Expr_getAppNumArgs(x_1); -lean_inc(x_141); -x_142 = lean_mk_array(x_141, x_140); -x_143 = lean_unsigned_to_nat(1u); -x_144 = lean_nat_sub(x_141, x_143); -lean_dec(x_141); -x_145 = l___private_Lean_Expr_0__Lean_Expr_getAppArgsAux(x_1, x_142, x_144); -x_146 = lean_array_get_size(x_145); -x_147 = lean_nat_dec_lt(x_139, x_146); -if (x_147 == 0) -{ +lean_object* x_149; lean_dec(x_139); -x_39 = x_145; -x_40 = x_107; -x_41 = x_108; -x_42 = x_109; -x_43 = x_110; -x_44 = lean_box(0); -goto block_89; +lean_dec_ref(x_127); +lean_dec(x_114); +lean_dec_ref(x_113); +lean_dec(x_112); +lean_dec_ref(x_111); +x_149 = lean_box(0); +lean_ctor_set(x_137, 0, x_149); +return x_137; +} } else { -lean_object* x_148; lean_object* x_149; -x_148 = lean_array_fget(x_145, x_139); -lean_dec(x_139); -lean_inc(x_110); -lean_inc_ref(x_109); -lean_inc(x_108); -lean_inc_ref(x_107); -x_149 = l_Lean_Meta_getStuckMVar_x3f(x_148, x_107, x_108, x_109, x_110); -if (lean_obj_tag(x_149) == 0) -{ lean_object* x_150; -x_150 = lean_ctor_get(x_149, 0); +x_150 = lean_ctor_get(x_137, 0); lean_inc(x_150); +lean_dec(x_137); if (lean_obj_tag(x_150) == 1) { +lean_object* x_151; uint8_t x_152; +x_151 = lean_ctor_get(x_150, 0); +lean_inc(x_151); lean_dec_ref(x_150); -lean_dec_ref(x_145); -lean_dec(x_110); -lean_dec_ref(x_109); -lean_dec(x_108); -lean_dec_ref(x_107); -lean_dec_ref(x_38); -return x_149; +x_152 = lean_ctor_get_uint8(x_151, sizeof(void*)*1); +if (x_152 == 0) +{ +lean_object* x_153; lean_object* x_154; +lean_dec(x_151); +lean_dec_ref(x_127); +lean_dec(x_114); +lean_dec_ref(x_113); +lean_dec(x_112); +lean_dec_ref(x_111); +x_153 = lean_box(0); +x_154 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_154, 0, x_153); +return x_154; } else { -lean_dec_ref(x_149); +lean_object* x_155; lean_object* x_156; uint8_t x_157; +x_155 = lean_ctor_get(x_151, 0); +lean_inc(x_155); +lean_dec(x_151); +x_156 = lean_array_get_size(x_127); +x_157 = lean_nat_dec_lt(x_155, x_156); +if (x_157 == 0) +{ +lean_dec(x_155); +lean_dec_ref(x_127); +lean_dec(x_114); +lean_dec_ref(x_113); +lean_dec(x_112); +lean_dec_ref(x_111); +x_20 = lean_box(0); +goto block_23; +} +else +{ +lean_object* x_158; lean_object* x_159; +x_158 = lean_array_fget(x_127, x_155); +lean_dec(x_155); +lean_dec_ref(x_127); +x_159 = l_Lean_Meta_getStuckMVar_x3f(x_158, x_111, x_112, x_113, x_114); +if (lean_obj_tag(x_159) == 0) +{ +lean_object* x_160; +x_160 = lean_ctor_get(x_159, 0); +lean_inc(x_160); +if (lean_obj_tag(x_160) == 1) +{ +lean_dec_ref(x_160); +return x_159; +} +else +{ +lean_dec_ref(x_159); +lean_dec(x_160); +x_20 = lean_box(0); +goto block_23; +} +} +else +{ +return x_159; +} +} +} +} +else +{ +lean_object* x_161; lean_object* x_162; lean_dec(x_150); -x_39 = x_145; -x_40 = x_107; -x_41 = x_108; -x_42 = x_109; -x_43 = x_110; -x_44 = lean_box(0); -goto block_89; +lean_dec_ref(x_127); +lean_dec(x_114); +lean_dec_ref(x_113); +lean_dec(x_112); +lean_dec_ref(x_111); +x_161 = lean_box(0); +x_162 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_162, 0, x_161); +return x_162; +} } } else { -lean_dec_ref(x_145); -lean_dec(x_110); -lean_dec_ref(x_109); -lean_dec(x_108); -lean_dec_ref(x_107); -lean_dec_ref(x_38); -return x_149; +uint8_t x_163; +lean_dec_ref(x_127); +lean_dec(x_114); +lean_dec_ref(x_113); +lean_dec(x_112); +lean_dec_ref(x_111); +x_163 = !lean_is_exclusive(x_137); +if (x_163 == 0) +{ +return x_137; +} +else +{ +lean_object* x_164; lean_object* x_165; +x_164 = lean_ctor_get(x_137, 0); +lean_inc(x_164); +lean_dec(x_137); +x_165 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_165, 0, x_164); +return x_165; } } } } else { -lean_object* x_151; lean_object* x_152; -lean_dec(x_134); +lean_object* x_166; lean_object* x_167; lean_object* x_168; lean_object* x_169; lean_object* x_170; lean_object* x_171; lean_object* x_172; +x_166 = lean_ctor_get(x_119, 0); +lean_inc(x_166); +lean_dec(x_119); +x_167 = l_Lean_Expr_getAppNumArgs(x_1); +x_168 = lean_obj_once(&l___private_Lean_Meta_WHNF_0__Lean_Meta_mkNullaryCtor___redArg___closed__0, &l___private_Lean_Meta_WHNF_0__Lean_Meta_mkNullaryCtor___redArg___closed__0_once, _init_l___private_Lean_Meta_WHNF_0__Lean_Meta_mkNullaryCtor___redArg___closed__0); +lean_inc(x_167); +x_169 = lean_mk_array(x_167, x_168); +x_170 = lean_unsigned_to_nat(1u); +x_171 = lean_nat_sub(x_167, x_170); +lean_dec(x_167); +x_172 = l___private_Lean_Expr_0__Lean_Expr_getAppArgsAux(x_1, x_169, x_171); +if (lean_obj_tag(x_166) == 1) +{ +lean_object* x_173; uint8_t x_174; lean_dec(x_110); -lean_dec_ref(x_109); -lean_dec(x_108); -lean_dec_ref(x_107); -lean_dec_ref(x_38); +x_173 = lean_ctor_get(x_166, 0); +lean_inc(x_173); +lean_dec_ref(x_166); +x_174 = lean_ctor_get_uint8(x_173, sizeof(void*)*3); +if (x_174 == 0) +{ +lean_object* x_175; lean_object* x_176; +lean_dec(x_173); +lean_dec_ref(x_172); +lean_dec(x_114); +lean_dec_ref(x_113); +lean_dec(x_112); +lean_dec_ref(x_111); +lean_dec_ref(x_42); +x_175 = lean_box(0); +x_176 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_176, 0, x_175); +return x_176; +} +else +{ +lean_object* x_177; lean_object* x_178; uint8_t x_179; +x_177 = lean_ctor_get(x_173, 1); +lean_inc(x_177); +lean_dec(x_173); +x_178 = lean_array_get_size(x_172); +x_179 = lean_nat_dec_lt(x_177, x_178); +if (x_179 == 0) +{ +lean_dec(x_177); +x_43 = x_172; +x_44 = x_111; +x_45 = x_112; +x_46 = x_113; +x_47 = x_114; +x_48 = lean_box(0); +goto block_93; +} +else +{ +lean_object* x_180; lean_object* x_181; +x_180 = lean_array_fget(x_172, x_177); +lean_dec(x_177); +lean_inc(x_114); +lean_inc_ref(x_113); +lean_inc(x_112); +lean_inc_ref(x_111); +x_181 = l_Lean_Meta_getStuckMVar_x3f(x_180, x_111, x_112, x_113, x_114); +if (lean_obj_tag(x_181) == 0) +{ +lean_object* x_182; +x_182 = lean_ctor_get(x_181, 0); +lean_inc(x_182); +if (lean_obj_tag(x_182) == 1) +{ +lean_dec_ref(x_182); +lean_dec_ref(x_172); +lean_dec(x_114); +lean_dec_ref(x_113); +lean_dec(x_112); +lean_dec_ref(x_111); +lean_dec_ref(x_42); +return x_181; +} +else +{ +lean_dec_ref(x_181); +lean_dec(x_182); +x_43 = x_172; +x_44 = x_111; +x_45 = x_112; +x_46 = x_113; +x_47 = x_114; +x_48 = lean_box(0); +goto block_93; +} +} +else +{ +lean_dec_ref(x_172); +lean_dec(x_114); +lean_dec_ref(x_113); +lean_dec(x_112); +lean_dec_ref(x_111); +lean_dec_ref(x_42); +return x_181; +} +} +} +} +else +{ +lean_object* x_183; +lean_dec(x_166); +lean_dec_ref(x_42); +x_183 = l_Lean_getAuxParentProjectionInfo_x3f___at___00Lean_Meta_getStuckMVar_x3f_spec__3___redArg(x_110, x_114); +if (lean_obj_tag(x_183) == 0) +{ +lean_object* x_184; lean_object* x_185; +x_184 = lean_ctor_get(x_183, 0); +lean_inc(x_184); +if (lean_is_exclusive(x_183)) { + lean_ctor_release(x_183, 0); + x_185 = x_183; +} else { + lean_dec_ref(x_183); + x_185 = lean_box(0); +} +if (lean_obj_tag(x_184) == 1) +{ +lean_object* x_186; uint8_t x_187; +x_186 = lean_ctor_get(x_184, 0); +lean_inc(x_186); +lean_dec_ref(x_184); +x_187 = lean_ctor_get_uint8(x_186, sizeof(void*)*1); +if (x_187 == 0) +{ +lean_object* x_188; lean_object* x_189; +lean_dec(x_186); +lean_dec_ref(x_172); +lean_dec(x_114); +lean_dec_ref(x_113); +lean_dec(x_112); +lean_dec_ref(x_111); +x_188 = lean_box(0); +if (lean_is_scalar(x_185)) { + x_189 = lean_alloc_ctor(0, 1, 0); +} else { + x_189 = x_185; +} +lean_ctor_set(x_189, 0, x_188); +return x_189; +} +else +{ +lean_object* x_190; lean_object* x_191; uint8_t x_192; +lean_dec(x_185); +x_190 = lean_ctor_get(x_186, 0); +lean_inc(x_190); +lean_dec(x_186); +x_191 = lean_array_get_size(x_172); +x_192 = lean_nat_dec_lt(x_190, x_191); +if (x_192 == 0) +{ +lean_dec(x_190); +lean_dec_ref(x_172); +lean_dec(x_114); +lean_dec_ref(x_113); +lean_dec(x_112); +lean_dec_ref(x_111); +x_20 = lean_box(0); +goto block_23; +} +else +{ +lean_object* x_193; lean_object* x_194; +x_193 = lean_array_fget(x_172, x_190); +lean_dec(x_190); +lean_dec_ref(x_172); +x_194 = l_Lean_Meta_getStuckMVar_x3f(x_193, x_111, x_112, x_113, x_114); +if (lean_obj_tag(x_194) == 0) +{ +lean_object* x_195; +x_195 = lean_ctor_get(x_194, 0); +lean_inc(x_195); +if (lean_obj_tag(x_195) == 1) +{ +lean_dec_ref(x_195); +return x_194; +} +else +{ +lean_dec_ref(x_194); +lean_dec(x_195); +x_20 = lean_box(0); +goto block_23; +} +} +else +{ +return x_194; +} +} +} +} +else +{ +lean_object* x_196; lean_object* x_197; +lean_dec(x_184); +lean_dec_ref(x_172); +lean_dec(x_114); +lean_dec_ref(x_113); +lean_dec(x_112); +lean_dec_ref(x_111); +x_196 = lean_box(0); +if (lean_is_scalar(x_185)) { + x_197 = lean_alloc_ctor(0, 1, 0); +} else { + x_197 = x_185; +} +lean_ctor_set(x_197, 0, x_196); +return x_197; +} +} +else +{ +lean_object* x_198; lean_object* x_199; lean_object* x_200; +lean_dec_ref(x_172); +lean_dec(x_114); +lean_dec_ref(x_113); +lean_dec(x_112); +lean_dec_ref(x_111); +x_198 = lean_ctor_get(x_183, 0); +lean_inc(x_198); +if (lean_is_exclusive(x_183)) { + lean_ctor_release(x_183, 0); + x_199 = x_183; +} else { + lean_dec_ref(x_183); + x_199 = lean_box(0); +} +if (lean_is_scalar(x_199)) { + x_200 = lean_alloc_ctor(1, 1, 0); +} else { + x_200 = x_199; +} +lean_ctor_set(x_200, 0, x_198); +return x_200; +} +} +} +} +else +{ +uint8_t x_201; +lean_dec(x_114); +lean_dec_ref(x_113); +lean_dec(x_112); +lean_dec_ref(x_111); +lean_dec(x_110); +lean_dec_ref(x_42); lean_dec_ref(x_1); -x_151 = lean_box(0); -x_152 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_152, 0, x_151); -return x_152; -} -} +x_201 = !lean_is_exclusive(x_119); +if (x_201 == 0) +{ +return x_119; } else { -uint8_t x_153; -lean_dec(x_110); -lean_dec_ref(x_109); -lean_dec(x_108); -lean_dec_ref(x_107); -lean_dec_ref(x_38); -lean_dec_ref(x_1); -x_153 = !lean_is_exclusive(x_115); -if (x_153 == 0) -{ -return x_115; -} -else -{ -lean_object* x_154; lean_object* x_155; -x_154 = lean_ctor_get(x_115, 0); -lean_inc(x_154); -lean_dec(x_115); -x_155 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_155, 0, x_154); -return x_155; +lean_object* x_202; lean_object* x_203; +x_202 = lean_ctor_get(x_119, 0); +lean_inc(x_202); +lean_dec(x_119); +x_203 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_203, 0, x_202); +return x_203; } } } @@ -8640,12 +9003,12 @@ return x_155; } case 11: { -lean_object* x_178; +lean_object* x_226; lean_dec_ref(x_1); -x_178 = lean_ctor_get(x_38, 2); -lean_inc_ref(x_178); -lean_dec_ref(x_38); -x_7 = x_178; +x_226 = lean_ctor_get(x_42, 2); +lean_inc_ref(x_226); +lean_dec_ref(x_42); +x_7 = x_226; x_8 = x_2; x_9 = x_3; x_10 = x_4; @@ -8655,241 +9018,241 @@ goto block_19; } default: { -lean_object* x_179; lean_object* x_180; -lean_dec_ref(x_38); +lean_object* x_227; lean_object* x_228; +lean_dec_ref(x_42); lean_dec_ref(x_1); lean_dec(x_5); lean_dec_ref(x_4); lean_dec(x_3); lean_dec_ref(x_2); -x_179 = lean_box(0); -x_180 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_180, 0, x_179); -return x_180; +x_227 = lean_box(0); +x_228 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_228, 0, x_227); +return x_228; } } -block_89: +block_93: { -lean_object* x_45; lean_object* x_46; -x_45 = lean_box(0); -lean_inc(x_43); -lean_inc_ref(x_42); -lean_inc(x_41); -lean_inc_ref(x_40); -x_46 = l_Lean_Meta_getFunInfo(x_38, x_45, x_40, x_41, x_42, x_43); -if (lean_obj_tag(x_46) == 0) -{ -lean_object* x_47; uint8_t x_48; -x_47 = lean_ctor_get(x_46, 0); +lean_object* x_49; lean_object* x_50; +x_49 = lean_box(0); lean_inc(x_47); -lean_dec_ref(x_46); -x_48 = !lean_is_exclusive(x_47); -if (x_48 == 0) +lean_inc_ref(x_46); +lean_inc(x_45); +lean_inc_ref(x_44); +x_50 = l_Lean_Meta_getFunInfo(x_42, x_49, x_44, x_45, x_46, x_47); +if (lean_obj_tag(x_50) == 0) { -lean_object* x_49; lean_object* x_50; lean_object* x_51; lean_object* x_52; lean_object* x_53; size_t x_54; size_t x_55; lean_object* x_56; -x_49 = lean_ctor_get(x_47, 0); -x_50 = lean_ctor_get(x_47, 1); -lean_dec(x_50); -x_51 = lean_array_get_size(x_39); -x_52 = lean_unsigned_to_nat(0u); -x_53 = l_Array_toSubarray___redArg(x_39, x_52, x_51); -lean_ctor_set(x_47, 1, x_53); -lean_ctor_set(x_47, 0, x_45); -x_54 = lean_array_size(x_49); -x_55 = 0; -x_56 = l___private_Init_Data_Array_Basic_0__Array_forIn_x27Unsafe_loop___at___00Lean_Meta_getStuckMVar_x3f_spec__2(x_49, x_54, x_55, x_47, x_40, x_41, x_42, x_43); -lean_dec_ref(x_49); -if (lean_obj_tag(x_56) == 0) +lean_object* x_51; uint8_t x_52; +x_51 = lean_ctor_get(x_50, 0); +lean_inc(x_51); +lean_dec_ref(x_50); +x_52 = !lean_is_exclusive(x_51); +if (x_52 == 0) { -uint8_t x_57; -x_57 = !lean_is_exclusive(x_56); -if (x_57 == 0) +lean_object* x_53; lean_object* x_54; lean_object* x_55; lean_object* x_56; lean_object* x_57; size_t x_58; size_t x_59; lean_object* x_60; +x_53 = lean_ctor_get(x_51, 0); +x_54 = lean_ctor_get(x_51, 1); +lean_dec(x_54); +x_55 = lean_array_get_size(x_43); +x_56 = lean_unsigned_to_nat(0u); +x_57 = l_Array_toSubarray___redArg(x_43, x_56, x_55); +lean_ctor_set(x_51, 1, x_57); +lean_ctor_set(x_51, 0, x_49); +x_58 = lean_array_size(x_53); +x_59 = 0; +x_60 = l___private_Init_Data_Array_Basic_0__Array_forIn_x27Unsafe_loop___at___00Lean_Meta_getStuckMVar_x3f_spec__2(x_53, x_58, x_59, x_51, x_44, x_45, x_46, x_47); +lean_dec_ref(x_53); +if (lean_obj_tag(x_60) == 0) { -lean_object* x_58; lean_object* x_59; -x_58 = lean_ctor_get(x_56, 0); -x_59 = lean_ctor_get(x_58, 0); -lean_inc(x_59); -lean_dec(x_58); -if (lean_obj_tag(x_59) == 0) +uint8_t x_61; +x_61 = !lean_is_exclusive(x_60); +if (x_61 == 0) { -lean_ctor_set(x_56, 0, x_45); -return x_56; +lean_object* x_62; lean_object* x_63; +x_62 = lean_ctor_get(x_60, 0); +x_63 = lean_ctor_get(x_62, 0); +lean_inc(x_63); +lean_dec(x_62); +if (lean_obj_tag(x_63) == 0) +{ +lean_ctor_set(x_60, 0, x_49); +return x_60; } else { -lean_object* x_60; -x_60 = lean_ctor_get(x_59, 0); -lean_inc(x_60); -lean_dec_ref(x_59); -lean_ctor_set(x_56, 0, x_60); -return x_56; -} -} -else -{ -lean_object* x_61; lean_object* x_62; -x_61 = lean_ctor_get(x_56, 0); -lean_inc(x_61); -lean_dec(x_56); -x_62 = lean_ctor_get(x_61, 0); -lean_inc(x_62); -lean_dec(x_61); -if (lean_obj_tag(x_62) == 0) -{ -lean_object* x_63; -x_63 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_63, 0, x_45); -return x_63; -} -else -{ -lean_object* x_64; lean_object* x_65; -x_64 = lean_ctor_get(x_62, 0); +lean_object* x_64; +x_64 = lean_ctor_get(x_63, 0); lean_inc(x_64); -lean_dec_ref(x_62); -x_65 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_65, 0, x_64); -return x_65; +lean_dec_ref(x_63); +lean_ctor_set(x_60, 0, x_64); +return x_60; +} +} +else +{ +lean_object* x_65; lean_object* x_66; +x_65 = lean_ctor_get(x_60, 0); +lean_inc(x_65); +lean_dec(x_60); +x_66 = lean_ctor_get(x_65, 0); +lean_inc(x_66); +lean_dec(x_65); +if (lean_obj_tag(x_66) == 0) +{ +lean_object* x_67; +x_67 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_67, 0, x_49); +return x_67; +} +else +{ +lean_object* x_68; lean_object* x_69; +x_68 = lean_ctor_get(x_66, 0); +lean_inc(x_68); +lean_dec_ref(x_66); +x_69 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_69, 0, x_68); +return x_69; } } } else { -uint8_t x_66; -x_66 = !lean_is_exclusive(x_56); -if (x_66 == 0) +uint8_t x_70; +x_70 = !lean_is_exclusive(x_60); +if (x_70 == 0) { -return x_56; +return x_60; } else { -lean_object* x_67; lean_object* x_68; -x_67 = lean_ctor_get(x_56, 0); -lean_inc(x_67); -lean_dec(x_56); -x_68 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_68, 0, x_67); -return x_68; +lean_object* x_71; lean_object* x_72; +x_71 = lean_ctor_get(x_60, 0); +lean_inc(x_71); +lean_dec(x_60); +x_72 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_72, 0, x_71); +return x_72; } } } else { -lean_object* x_69; lean_object* x_70; lean_object* x_71; lean_object* x_72; lean_object* x_73; size_t x_74; size_t x_75; lean_object* x_76; -x_69 = lean_ctor_get(x_47, 0); -lean_inc(x_69); -lean_dec(x_47); -x_70 = lean_array_get_size(x_39); -x_71 = lean_unsigned_to_nat(0u); -x_72 = l_Array_toSubarray___redArg(x_39, x_71, x_70); -x_73 = lean_alloc_ctor(0, 2, 0); -lean_ctor_set(x_73, 0, x_45); -lean_ctor_set(x_73, 1, x_72); -x_74 = lean_array_size(x_69); -x_75 = 0; -x_76 = l___private_Init_Data_Array_Basic_0__Array_forIn_x27Unsafe_loop___at___00Lean_Meta_getStuckMVar_x3f_spec__2(x_69, x_74, x_75, x_73, x_40, x_41, x_42, x_43); -lean_dec_ref(x_69); -if (lean_obj_tag(x_76) == 0) +lean_object* x_73; lean_object* x_74; lean_object* x_75; lean_object* x_76; lean_object* x_77; size_t x_78; size_t x_79; lean_object* x_80; +x_73 = lean_ctor_get(x_51, 0); +lean_inc(x_73); +lean_dec(x_51); +x_74 = lean_array_get_size(x_43); +x_75 = lean_unsigned_to_nat(0u); +x_76 = l_Array_toSubarray___redArg(x_43, x_75, x_74); +x_77 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_77, 0, x_49); +lean_ctor_set(x_77, 1, x_76); +x_78 = lean_array_size(x_73); +x_79 = 0; +x_80 = l___private_Init_Data_Array_Basic_0__Array_forIn_x27Unsafe_loop___at___00Lean_Meta_getStuckMVar_x3f_spec__2(x_73, x_78, x_79, x_77, x_44, x_45, x_46, x_47); +lean_dec_ref(x_73); +if (lean_obj_tag(x_80) == 0) { -lean_object* x_77; lean_object* x_78; lean_object* x_79; -x_77 = lean_ctor_get(x_76, 0); -lean_inc(x_77); -if (lean_is_exclusive(x_76)) { - lean_ctor_release(x_76, 0); - x_78 = x_76; -} else { - lean_dec_ref(x_76); - x_78 = lean_box(0); -} -x_79 = lean_ctor_get(x_77, 0); -lean_inc(x_79); -lean_dec(x_77); -if (lean_obj_tag(x_79) == 0) -{ -lean_object* x_80; -if (lean_is_scalar(x_78)) { - x_80 = lean_alloc_ctor(0, 1, 0); -} else { - x_80 = x_78; -} -lean_ctor_set(x_80, 0, x_45); -return x_80; -} -else -{ -lean_object* x_81; lean_object* x_82; -x_81 = lean_ctor_get(x_79, 0); +lean_object* x_81; lean_object* x_82; lean_object* x_83; +x_81 = lean_ctor_get(x_80, 0); lean_inc(x_81); -lean_dec_ref(x_79); -if (lean_is_scalar(x_78)) { - x_82 = lean_alloc_ctor(0, 1, 0); +if (lean_is_exclusive(x_80)) { + lean_ctor_release(x_80, 0); + x_82 = x_80; } else { - x_82 = x_78; + lean_dec_ref(x_80); + x_82 = lean_box(0); } -lean_ctor_set(x_82, 0, x_81); -return x_82; -} -} -else -{ -lean_object* x_83; lean_object* x_84; lean_object* x_85; -x_83 = lean_ctor_get(x_76, 0); +x_83 = lean_ctor_get(x_81, 0); lean_inc(x_83); -if (lean_is_exclusive(x_76)) { - lean_ctor_release(x_76, 0); - x_84 = x_76; +lean_dec(x_81); +if (lean_obj_tag(x_83) == 0) +{ +lean_object* x_84; +if (lean_is_scalar(x_82)) { + x_84 = lean_alloc_ctor(0, 1, 0); } else { - lean_dec_ref(x_76); - x_84 = lean_box(0); + x_84 = x_82; } -if (lean_is_scalar(x_84)) { - x_85 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_84, 0, x_49); +return x_84; +} +else +{ +lean_object* x_85; lean_object* x_86; +x_85 = lean_ctor_get(x_83, 0); +lean_inc(x_85); +lean_dec_ref(x_83); +if (lean_is_scalar(x_82)) { + x_86 = lean_alloc_ctor(0, 1, 0); } else { - x_85 = x_84; -} -lean_ctor_set(x_85, 0, x_83); -return x_85; + x_86 = x_82; } +lean_ctor_set(x_86, 0, x_85); +return x_86; } } else { -uint8_t x_86; -lean_dec(x_43); -lean_dec_ref(x_42); -lean_dec(x_41); -lean_dec_ref(x_40); -lean_dec_ref(x_39); -x_86 = !lean_is_exclusive(x_46); -if (x_86 == 0) -{ -return x_46; -} -else -{ -lean_object* x_87; lean_object* x_88; -x_87 = lean_ctor_get(x_46, 0); +lean_object* x_87; lean_object* x_88; lean_object* x_89; +x_87 = lean_ctor_get(x_80, 0); lean_inc(x_87); -lean_dec(x_46); -x_88 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_88, 0, x_87); -return x_88; +if (lean_is_exclusive(x_80)) { + lean_ctor_release(x_80, 0); + x_88 = x_80; +} else { + lean_dec_ref(x_80); + x_88 = lean_box(0); +} +if (lean_is_scalar(x_88)) { + x_89 = lean_alloc_ctor(1, 1, 0); +} else { + x_89 = x_88; +} +lean_ctor_set(x_89, 0, x_87); +return x_89; +} +} +} +else +{ +uint8_t x_90; +lean_dec(x_47); +lean_dec_ref(x_46); +lean_dec(x_45); +lean_dec_ref(x_44); +lean_dec_ref(x_43); +x_90 = !lean_is_exclusive(x_50); +if (x_90 == 0) +{ +return x_50; +} +else +{ +lean_object* x_91; lean_object* x_92; +x_91 = lean_ctor_get(x_50, 0); +lean_inc(x_91); +lean_dec(x_50); +x_92 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_92, 0, x_91); +return x_92; } } } } default: { -lean_object* x_181; lean_object* x_182; +lean_object* x_229; lean_object* x_230; lean_dec(x_5); lean_dec_ref(x_4); lean_dec(x_3); lean_dec_ref(x_2); lean_dec_ref(x_1); -x_181 = lean_box(0); -x_182 = lean_alloc_ctor(0, 1, 0); -lean_ctor_set(x_182, 0, x_181); -return x_182; +x_229 = lean_box(0); +x_230 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_230, 0, x_229); +return x_230; } } block_19: @@ -8937,6 +9300,14 @@ return x_18; } } } +block_23: +{ +lean_object* x_21; lean_object* x_22; +x_21 = lean_box(0); +x_22 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_22, 0, x_21); +return x_22; +} } } LEAN_EXPORT lean_object* l___private_Lean_Meta_WHNF_0__Lean_Meta_isRecStuck_x3f(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { @@ -9083,13 +9454,33 @@ lean_dec_ref(x_2); return x_7; } } +LEAN_EXPORT lean_object* l_Lean_getAuxParentProjectionInfo_x3f___at___00Lean_Meta_getStuckMVar_x3f_spec__3(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { +_start: +{ +lean_object* x_7; +x_7 = l_Lean_getAuxParentProjectionInfo_x3f___at___00Lean_Meta_getStuckMVar_x3f_spec__3___redArg(x_1, x_5); +return x_7; +} +} +LEAN_EXPORT lean_object* l_Lean_getAuxParentProjectionInfo_x3f___at___00Lean_Meta_getStuckMVar_x3f_spec__3___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { +_start: +{ +lean_object* x_7; +x_7 = l_Lean_getAuxParentProjectionInfo_x3f___at___00Lean_Meta_getStuckMVar_x3f_spec__3(x_1, x_2, x_3, x_4, x_5); +lean_dec(x_5); +lean_dec_ref(x_4); +lean_dec(x_3); +lean_dec_ref(x_2); +return x_7; +} +} static lean_object* _init_l_Lean_Meta_whnfEasyCases___closed__4(void) { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; x_1 = ((lean_object*)(l_Lean_Meta_whnfEasyCases___closed__3)); x_2 = lean_unsigned_to_nat(22u); -x_3 = lean_unsigned_to_nat(381u); +x_3 = lean_unsigned_to_nat(390u); x_4 = ((lean_object*)(l_Lean_Meta_whnfEasyCases___closed__2)); x_5 = ((lean_object*)(l_Lean_Meta_whnfEasyCases___closed__1)); x_6 = l_mkPanicMessageWithDecl(x_5, x_4, x_3, x_2, x_1); @@ -14188,7 +14579,7 @@ return x_16; LEAN_EXPORT lean_object* l___private_Lean_Meta_Transform_0__Lean_Core_transform_visit___at___00Lean_Core_transform___at___00__private_Lean_Meta_WHNF_0__Lean_Meta_unfoldNestedDIte_spec__1_spec__2___lam__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { _start: { -lean_object* x_8; uint8_t x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; uint8_t x_16; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; uint8_t x_31; uint8_t x_32; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; uint8_t x_44; lean_object* x_45; uint8_t x_46; lean_object* x_54; +lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; uint8_t x_13; lean_object* x_14; lean_object* x_15; uint8_t x_16; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; uint8_t x_30; lean_object* x_31; uint8_t x_32; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; uint8_t x_45; uint8_t x_46; lean_object* x_54; lean_inc_ref(x_1); lean_inc(x_6); lean_inc_ref(x_5); @@ -14317,12 +14708,12 @@ x_67 = lean_ptr_addr(x_63); x_68 = lean_usize_dec_eq(x_66, x_67); if (x_68 == 0) { -x_40 = x_58; +x_40 = x_57; x_41 = x_65; -x_42 = x_57; -x_43 = x_63; -x_44 = x_61; -x_45 = lean_box(0); +x_42 = lean_box(0); +x_43 = x_58; +x_44 = x_63; +x_45 = x_61; x_46 = x_68; goto block_53; } @@ -14332,12 +14723,12 @@ size_t x_69; size_t x_70; uint8_t x_71; x_69 = lean_ptr_addr(x_60); x_70 = lean_ptr_addr(x_65); x_71 = lean_usize_dec_eq(x_69, x_70); -x_40 = x_58; +x_40 = x_57; x_41 = x_65; -x_42 = x_57; -x_43 = x_63; -x_44 = x_61; -x_45 = lean_box(0); +x_42 = lean_box(0); +x_43 = x_58; +x_44 = x_63; +x_45 = x_61; x_46 = x_71; goto block_53; } @@ -14345,8 +14736,8 @@ goto block_53; else { lean_dec(x_63); -lean_dec_ref(x_57); lean_dec(x_58); +lean_dec_ref(x_57); lean_dec(x_6); lean_dec_ref(x_5); lean_dec(x_4); @@ -14357,8 +14748,8 @@ return x_64; } else { -lean_dec_ref(x_57); lean_dec(x_58); +lean_dec_ref(x_57); lean_dec(x_6); lean_dec_ref(x_5); lean_dec(x_4); @@ -14406,12 +14797,12 @@ x_81 = lean_ptr_addr(x_77); x_82 = lean_usize_dec_eq(x_80, x_81); if (x_82 == 0) { -x_26 = x_77; -x_27 = x_79; -x_28 = x_72; -x_29 = x_57; -x_30 = lean_box(0); -x_31 = x_75; +x_26 = lean_box(0); +x_27 = x_57; +x_28 = x_77; +x_29 = x_72; +x_30 = x_75; +x_31 = x_79; x_32 = x_82; goto block_39; } @@ -14421,12 +14812,12 @@ size_t x_83; size_t x_84; uint8_t x_85; x_83 = lean_ptr_addr(x_74); x_84 = lean_ptr_addr(x_79); x_85 = lean_usize_dec_eq(x_83, x_84); -x_26 = x_77; -x_27 = x_79; -x_28 = x_72; -x_29 = x_57; -x_30 = lean_box(0); -x_31 = x_75; +x_26 = lean_box(0); +x_27 = x_57; +x_28 = x_77; +x_29 = x_72; +x_30 = x_75; +x_31 = x_79; x_32 = x_85; goto block_39; } @@ -14434,8 +14825,8 @@ goto block_39; else { lean_dec(x_77); -lean_dec(x_72); lean_dec_ref(x_57); +lean_dec(x_72); lean_dec(x_6); lean_dec_ref(x_5); lean_dec(x_4); @@ -14510,14 +14901,14 @@ x_98 = lean_ptr_addr(x_92); x_99 = lean_usize_dec_eq(x_97, x_98); if (x_99 == 0) { -x_8 = x_96; -x_9 = x_90; -x_10 = x_89; -x_11 = x_57; -x_12 = lean_box(0); -x_13 = x_94; +x_8 = x_89; +x_9 = x_57; +x_10 = x_86; +x_11 = lean_box(0); +x_12 = x_94; +x_13 = x_90; x_14 = x_92; -x_15 = x_86; +x_15 = x_96; x_16 = x_99; goto block_25; } @@ -14527,14 +14918,14 @@ size_t x_100; size_t x_101; uint8_t x_102; x_100 = lean_ptr_addr(x_88); x_101 = lean_ptr_addr(x_94); x_102 = lean_usize_dec_eq(x_100, x_101); -x_8 = x_96; -x_9 = x_90; -x_10 = x_89; -x_11 = x_57; -x_12 = lean_box(0); -x_13 = x_94; +x_8 = x_89; +x_9 = x_57; +x_10 = x_86; +x_11 = lean_box(0); +x_12 = x_94; +x_13 = x_90; x_14 = x_92; -x_15 = x_86; +x_15 = x_96; x_16 = x_102; goto block_25; } @@ -14544,8 +14935,8 @@ else lean_dec(x_94); lean_dec(x_92); lean_dec_ref(x_89); -lean_dec(x_86); lean_dec_ref(x_57); +lean_dec(x_86); lean_dec(x_6); lean_dec_ref(x_5); lean_dec(x_4); @@ -14558,8 +14949,8 @@ else { lean_dec(x_92); lean_dec_ref(x_89); -lean_dec(x_86); lean_dec_ref(x_57); +lean_dec(x_86); lean_dec(x_6); lean_dec_ref(x_5); lean_dec(x_4); @@ -14571,8 +14962,8 @@ return x_93; else { lean_dec_ref(x_89); -lean_dec_ref(x_57); lean_dec(x_86); +lean_dec_ref(x_57); lean_dec(x_6); lean_dec_ref(x_5); lean_dec(x_4); @@ -14823,12 +15214,12 @@ x_150 = lean_ptr_addr(x_146); x_151 = lean_usize_dec_eq(x_149, x_150); if (x_151 == 0) { -x_40 = x_141; +x_40 = x_140; x_41 = x_148; -x_42 = x_140; -x_43 = x_146; -x_44 = x_144; -x_45 = lean_box(0); +x_42 = lean_box(0); +x_43 = x_141; +x_44 = x_146; +x_45 = x_144; x_46 = x_151; goto block_53; } @@ -14838,12 +15229,12 @@ size_t x_152; size_t x_153; uint8_t x_154; x_152 = lean_ptr_addr(x_143); x_153 = lean_ptr_addr(x_148); x_154 = lean_usize_dec_eq(x_152, x_153); -x_40 = x_141; +x_40 = x_140; x_41 = x_148; -x_42 = x_140; -x_43 = x_146; -x_44 = x_144; -x_45 = lean_box(0); +x_42 = lean_box(0); +x_43 = x_141; +x_44 = x_146; +x_45 = x_144; x_46 = x_154; goto block_53; } @@ -14851,8 +15242,8 @@ goto block_53; else { lean_dec(x_146); -lean_dec_ref(x_140); lean_dec(x_141); +lean_dec_ref(x_140); lean_dec(x_6); lean_dec_ref(x_5); lean_dec(x_4); @@ -14863,8 +15254,8 @@ return x_147; } else { -lean_dec_ref(x_140); lean_dec(x_141); +lean_dec_ref(x_140); lean_dec(x_6); lean_dec_ref(x_5); lean_dec(x_4); @@ -14912,12 +15303,12 @@ x_164 = lean_ptr_addr(x_160); x_165 = lean_usize_dec_eq(x_163, x_164); if (x_165 == 0) { -x_26 = x_160; -x_27 = x_162; -x_28 = x_155; -x_29 = x_140; -x_30 = lean_box(0); -x_31 = x_158; +x_26 = lean_box(0); +x_27 = x_140; +x_28 = x_160; +x_29 = x_155; +x_30 = x_158; +x_31 = x_162; x_32 = x_165; goto block_39; } @@ -14927,12 +15318,12 @@ size_t x_166; size_t x_167; uint8_t x_168; x_166 = lean_ptr_addr(x_157); x_167 = lean_ptr_addr(x_162); x_168 = lean_usize_dec_eq(x_166, x_167); -x_26 = x_160; -x_27 = x_162; -x_28 = x_155; -x_29 = x_140; -x_30 = lean_box(0); -x_31 = x_158; +x_26 = lean_box(0); +x_27 = x_140; +x_28 = x_160; +x_29 = x_155; +x_30 = x_158; +x_31 = x_162; x_32 = x_168; goto block_39; } @@ -14940,8 +15331,8 @@ goto block_39; else { lean_dec(x_160); -lean_dec(x_155); lean_dec_ref(x_140); +lean_dec(x_155); lean_dec(x_6); lean_dec_ref(x_5); lean_dec(x_4); @@ -15016,14 +15407,14 @@ x_181 = lean_ptr_addr(x_175); x_182 = lean_usize_dec_eq(x_180, x_181); if (x_182 == 0) { -x_8 = x_179; -x_9 = x_173; -x_10 = x_172; -x_11 = x_140; -x_12 = lean_box(0); -x_13 = x_177; +x_8 = x_172; +x_9 = x_140; +x_10 = x_169; +x_11 = lean_box(0); +x_12 = x_177; +x_13 = x_173; x_14 = x_175; -x_15 = x_169; +x_15 = x_179; x_16 = x_182; goto block_25; } @@ -15033,14 +15424,14 @@ size_t x_183; size_t x_184; uint8_t x_185; x_183 = lean_ptr_addr(x_171); x_184 = lean_ptr_addr(x_177); x_185 = lean_usize_dec_eq(x_183, x_184); -x_8 = x_179; -x_9 = x_173; -x_10 = x_172; -x_11 = x_140; -x_12 = lean_box(0); -x_13 = x_177; +x_8 = x_172; +x_9 = x_140; +x_10 = x_169; +x_11 = lean_box(0); +x_12 = x_177; +x_13 = x_173; x_14 = x_175; -x_15 = x_169; +x_15 = x_179; x_16 = x_185; goto block_25; } @@ -15050,8 +15441,8 @@ else lean_dec(x_177); lean_dec(x_175); lean_dec_ref(x_172); -lean_dec(x_169); lean_dec_ref(x_140); +lean_dec(x_169); lean_dec(x_6); lean_dec_ref(x_5); lean_dec(x_4); @@ -15064,8 +15455,8 @@ else { lean_dec(x_175); lean_dec_ref(x_172); -lean_dec(x_169); lean_dec_ref(x_140); +lean_dec(x_169); lean_dec(x_6); lean_dec_ref(x_5); lean_dec(x_4); @@ -15077,8 +15468,8 @@ return x_176; else { lean_dec_ref(x_172); -lean_dec_ref(x_140); lean_dec(x_169); +lean_dec_ref(x_140); lean_dec(x_6); lean_dec_ref(x_5); lean_dec(x_4); @@ -15240,35 +15631,35 @@ block_25: if (x_16 == 0) { lean_object* x_17; lean_object* x_18; -lean_dec_ref(x_11); -lean_dec_ref(x_10); -x_17 = l_Lean_Expr_letE___override(x_15, x_14, x_13, x_8, x_9); +lean_dec_ref(x_9); +lean_dec_ref(x_8); +x_17 = l_Lean_Expr_letE___override(x_10, x_14, x_12, x_15, x_13); x_18 = l___private_Lean_Meta_Transform_0__Lean_Core_transform_visit_visitPost___at___00__private_Lean_Meta_Transform_0__Lean_Core_transform_visit___at___00Lean_Core_transform___at___00__private_Lean_Meta_WHNF_0__Lean_Meta_unfoldNestedDIte_spec__1_spec__2_spec__5(x_1, x_3, x_17, x_4, x_5, x_6); return x_18; } else { size_t x_19; size_t x_20; uint8_t x_21; -x_19 = lean_ptr_addr(x_10); -lean_dec_ref(x_10); -x_20 = lean_ptr_addr(x_8); +x_19 = lean_ptr_addr(x_8); +lean_dec_ref(x_8); +x_20 = lean_ptr_addr(x_15); x_21 = lean_usize_dec_eq(x_19, x_20); if (x_21 == 0) { lean_object* x_22; lean_object* x_23; -lean_dec_ref(x_11); -x_22 = l_Lean_Expr_letE___override(x_15, x_14, x_13, x_8, x_9); +lean_dec_ref(x_9); +x_22 = l_Lean_Expr_letE___override(x_10, x_14, x_12, x_15, x_13); x_23 = l___private_Lean_Meta_Transform_0__Lean_Core_transform_visit_visitPost___at___00__private_Lean_Meta_Transform_0__Lean_Core_transform_visit___at___00Lean_Core_transform___at___00__private_Lean_Meta_WHNF_0__Lean_Meta_unfoldNestedDIte_spec__1_spec__2_spec__5(x_1, x_3, x_22, x_4, x_5, x_6); return x_23; } else { lean_object* x_24; -lean_dec(x_15); +lean_dec_ref(x_15); lean_dec_ref(x_14); -lean_dec_ref(x_13); -lean_dec_ref(x_8); -x_24 = l___private_Lean_Meta_Transform_0__Lean_Core_transform_visit_visitPost___at___00__private_Lean_Meta_Transform_0__Lean_Core_transform_visit___at___00Lean_Core_transform___at___00__private_Lean_Meta_WHNF_0__Lean_Meta_unfoldNestedDIte_spec__1_spec__2_spec__5(x_1, x_3, x_11, x_4, x_5, x_6); +lean_dec_ref(x_12); +lean_dec(x_10); +x_24 = l___private_Lean_Meta_Transform_0__Lean_Core_transform_visit_visitPost___at___00__private_Lean_Meta_Transform_0__Lean_Core_transform_visit___at___00Lean_Core_transform___at___00__private_Lean_Meta_WHNF_0__Lean_Meta_unfoldNestedDIte_spec__1_spec__2_spec__5(x_1, x_3, x_9, x_4, x_5, x_6); return x_24; } } @@ -15278,30 +15669,30 @@ block_39: if (x_32 == 0) { lean_object* x_33; lean_object* x_34; -lean_dec_ref(x_29); -x_33 = l_Lean_Expr_lam___override(x_28, x_26, x_27, x_31); +lean_dec_ref(x_27); +x_33 = l_Lean_Expr_lam___override(x_29, x_28, x_31, x_30); x_34 = l___private_Lean_Meta_Transform_0__Lean_Core_transform_visit_visitPost___at___00__private_Lean_Meta_Transform_0__Lean_Core_transform_visit___at___00Lean_Core_transform___at___00__private_Lean_Meta_WHNF_0__Lean_Meta_unfoldNestedDIte_spec__1_spec__2_spec__5(x_1, x_3, x_33, x_4, x_5, x_6); return x_34; } else { uint8_t x_35; -x_35 = l_Lean_instBEqBinderInfo_beq(x_31, x_31); +x_35 = l_Lean_instBEqBinderInfo_beq(x_30, x_30); if (x_35 == 0) { lean_object* x_36; lean_object* x_37; -lean_dec_ref(x_29); -x_36 = l_Lean_Expr_lam___override(x_28, x_26, x_27, x_31); +lean_dec_ref(x_27); +x_36 = l_Lean_Expr_lam___override(x_29, x_28, x_31, x_30); x_37 = l___private_Lean_Meta_Transform_0__Lean_Core_transform_visit_visitPost___at___00__private_Lean_Meta_Transform_0__Lean_Core_transform_visit___at___00Lean_Core_transform___at___00__private_Lean_Meta_WHNF_0__Lean_Meta_unfoldNestedDIte_spec__1_spec__2_spec__5(x_1, x_3, x_36, x_4, x_5, x_6); return x_37; } else { lean_object* x_38; -lean_dec(x_28); -lean_dec_ref(x_27); -lean_dec_ref(x_26); -x_38 = l___private_Lean_Meta_Transform_0__Lean_Core_transform_visit_visitPost___at___00__private_Lean_Meta_Transform_0__Lean_Core_transform_visit___at___00Lean_Core_transform___at___00__private_Lean_Meta_WHNF_0__Lean_Meta_unfoldNestedDIte_spec__1_spec__2_spec__5(x_1, x_3, x_29, x_4, x_5, x_6); +lean_dec_ref(x_31); +lean_dec(x_29); +lean_dec_ref(x_28); +x_38 = l___private_Lean_Meta_Transform_0__Lean_Core_transform_visit_visitPost___at___00__private_Lean_Meta_Transform_0__Lean_Core_transform_visit___at___00Lean_Core_transform___at___00__private_Lean_Meta_WHNF_0__Lean_Meta_unfoldNestedDIte_spec__1_spec__2_spec__5(x_1, x_3, x_27, x_4, x_5, x_6); return x_38; } } @@ -15311,30 +15702,30 @@ block_53: if (x_46 == 0) { lean_object* x_47; lean_object* x_48; -lean_dec_ref(x_42); -x_47 = l_Lean_Expr_forallE___override(x_40, x_43, x_41, x_44); +lean_dec_ref(x_40); +x_47 = l_Lean_Expr_forallE___override(x_43, x_44, x_41, x_45); x_48 = l___private_Lean_Meta_Transform_0__Lean_Core_transform_visit_visitPost___at___00__private_Lean_Meta_Transform_0__Lean_Core_transform_visit___at___00Lean_Core_transform___at___00__private_Lean_Meta_WHNF_0__Lean_Meta_unfoldNestedDIte_spec__1_spec__2_spec__5(x_1, x_3, x_47, x_4, x_5, x_6); return x_48; } else { uint8_t x_49; -x_49 = l_Lean_instBEqBinderInfo_beq(x_44, x_44); +x_49 = l_Lean_instBEqBinderInfo_beq(x_45, x_45); if (x_49 == 0) { lean_object* x_50; lean_object* x_51; -lean_dec_ref(x_42); -x_50 = l_Lean_Expr_forallE___override(x_40, x_43, x_41, x_44); +lean_dec_ref(x_40); +x_50 = l_Lean_Expr_forallE___override(x_43, x_44, x_41, x_45); x_51 = l___private_Lean_Meta_Transform_0__Lean_Core_transform_visit_visitPost___at___00__private_Lean_Meta_Transform_0__Lean_Core_transform_visit___at___00Lean_Core_transform___at___00__private_Lean_Meta_WHNF_0__Lean_Meta_unfoldNestedDIte_spec__1_spec__2_spec__5(x_1, x_3, x_50, x_4, x_5, x_6); return x_51; } else { lean_object* x_52; -lean_dec_ref(x_43); +lean_dec_ref(x_44); +lean_dec(x_43); lean_dec_ref(x_41); -lean_dec(x_40); -x_52 = l___private_Lean_Meta_Transform_0__Lean_Core_transform_visit_visitPost___at___00__private_Lean_Meta_Transform_0__Lean_Core_transform_visit___at___00Lean_Core_transform___at___00__private_Lean_Meta_WHNF_0__Lean_Meta_unfoldNestedDIte_spec__1_spec__2_spec__5(x_1, x_3, x_42, x_4, x_5, x_6); +x_52 = l___private_Lean_Meta_Transform_0__Lean_Core_transform_visit_visitPost___at___00__private_Lean_Meta_Transform_0__Lean_Core_transform_visit___at___00Lean_Core_transform___at___00__private_Lean_Meta_WHNF_0__Lean_Meta_unfoldNestedDIte_spec__1_spec__2_spec__5(x_1, x_3, x_40, x_4, x_5, x_6); return x_52; } } @@ -20164,7 +20555,7 @@ _start: lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; x_1 = ((lean_object*)(l_Lean_getConstInfoCtor___at___00__private_Lean_Meta_WHNF_0__Lean_Meta_toCtorWhenStructure_spec__0___closed__6)); x_2 = lean_unsigned_to_nat(13u); -x_3 = lean_unsigned_to_nat(707u); +x_3 = lean_unsigned_to_nat(716u); x_4 = ((lean_object*)(l_Lean_Meta_whnfEasyCases___at___00__private_Lean_Meta_WHNF_0__Lean_Meta_whnfCore_go_spec__4___closed__1)); x_5 = ((lean_object*)(l_Lean_Meta_whnfEasyCases___closed__1)); x_6 = l_mkPanicMessageWithDecl(x_5, x_4, x_3, x_2, x_1); @@ -20174,7 +20565,7 @@ return x_6; LEAN_EXPORT lean_object* l_Lean_Meta_whnfEasyCases___at___00__private_Lean_Meta_WHNF_0__Lean_Meta_whnfCore_go_spec__4(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { _start: { -lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; uint8_t x_13; lean_object* x_14; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; uint8_t x_25; lean_object* x_26; uint8_t x_27; 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_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; uint8_t x_51; lean_object* x_52; lean_object* x_53; lean_object* x_54; lean_object* x_55; 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; uint8_t x_197; 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; uint8_t x_216; lean_object* x_218; lean_object* x_219; lean_object* x_220; lean_object* x_221; lean_object* x_222; lean_object* x_223; lean_object* x_224; lean_object* x_238; lean_object* x_239; lean_object* x_240; lean_object* x_241; lean_object* x_242; +lean_object* x_7; lean_object* x_8; uint8_t x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_20; lean_object* x_21; uint8_t x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; uint8_t x_27; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; uint8_t x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_object* x_51; lean_object* x_52; lean_object* x_53; lean_object* x_54; lean_object* x_55; lean_object* x_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; uint8_t x_197; 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; uint8_t x_216; lean_object* x_218; lean_object* x_219; lean_object* x_220; lean_object* x_221; lean_object* x_222; lean_object* x_223; lean_object* x_224; lean_object* x_238; lean_object* x_239; lean_object* x_240; lean_object* x_241; lean_object* x_242; switch (lean_obj_tag(x_1)) { case 0: { @@ -20996,22 +21387,22 @@ block_19: { lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; x_15 = lean_obj_once(&l_Lean_Meta_whnfEasyCases___at___00__private_Lean_Meta_WHNF_0__Lean_Meta_whnfCore_go_spec__4___closed__0, &l_Lean_Meta_whnfEasyCases___at___00__private_Lean_Meta_WHNF_0__Lean_Meta_whnfCore_go_spec__4___closed__0_once, _init_l_Lean_Meta_whnfEasyCases___at___00__private_Lean_Meta_WHNF_0__Lean_Meta_whnfCore_go_spec__4___closed__0); -x_16 = lean_array_push(x_15, x_11); -x_17 = l_Lean_Meta_expandLet(x_10, x_16, x_13); +x_16 = lean_array_push(x_15, x_12); +x_17 = l_Lean_Meta_expandLet(x_10, x_16, x_9); lean_dec_ref(x_10); -x_18 = l___private_Lean_Meta_WHNF_0__Lean_Meta_whnfCore_go(x_17, x_14, x_12, x_7, x_9); +x_18 = l___private_Lean_Meta_WHNF_0__Lean_Meta_whnfCore_go(x_17, x_13, x_11, x_14, x_8); return x_18; } block_33: { -if (x_25 == 0) +if (x_22 == 0) { lean_object* x_28; lean_dec_ref(x_26); +lean_dec_ref(x_25); lean_dec(x_24); lean_dec_ref(x_23); -lean_dec(x_22); -lean_dec_ref(x_20); +lean_dec(x_21); x_28 = lean_alloc_ctor(0, 1, 0); lean_ctor_set(x_28, 0, x_1); return x_28; @@ -21026,17 +21417,17 @@ lean_object* x_30; lean_object* x_31; lean_dec_ref(x_1); x_30 = l_Lean_Meta_consumeUnusedLet(x_23, x_27); lean_dec_ref(x_23); -x_31 = l___private_Lean_Meta_WHNF_0__Lean_Meta_whnfCore_go(x_30, x_26, x_24, x_20, x_22); +x_31 = l___private_Lean_Meta_WHNF_0__Lean_Meta_whnfCore_go(x_30, x_25, x_24, x_26, x_21); return x_31; } else { lean_object* x_32; lean_dec_ref(x_26); +lean_dec_ref(x_25); lean_dec(x_24); lean_dec_ref(x_23); -lean_dec(x_22); -lean_dec_ref(x_20); +lean_dec(x_21); x_32 = lean_alloc_ctor(0, 1, 0); lean_ctor_set(x_32, 0, x_1); return x_32; @@ -21051,24 +21442,24 @@ x_41 = lean_mk_empty_array_with_capacity(x_40); lean_dec(x_40); x_42 = l___private_Lean_Expr_0__Lean_Expr_getAppRevArgsAux(x_1, x_41); x_43 = 0; -x_44 = l_Lean_Expr_betaRev(x_35, x_42, x_43, x_43); +x_44 = l_Lean_Expr_betaRev(x_34, x_42, x_43, x_43); lean_dec_ref(x_42); -x_45 = l___private_Lean_Meta_WHNF_0__Lean_Meta_whnfCore_go(x_44, x_39, x_38, x_34, x_37); +x_45 = l___private_Lean_Meta_WHNF_0__Lean_Meta_whnfCore_go(x_44, x_38, x_37, x_39, x_35); return x_45; } block_188: { uint8_t x_56; -x_56 = lean_ctor_get_uint8(x_54, 12); -lean_dec_ref(x_54); +x_56 = lean_ctor_get_uint8(x_52, 12); +lean_dec_ref(x_52); if (x_56 == 0) { lean_object* x_57; +lean_dec_ref(x_54); lean_dec_ref(x_53); -lean_dec(x_52); -lean_dec(x_49); -lean_dec_ref(x_48); -lean_dec_ref(x_47); +lean_dec(x_51); +lean_dec(x_50); +lean_dec_ref(x_49); x_57 = lean_alloc_ctor(0, 1, 0); lean_ctor_set(x_57, 0, x_55); return x_57; @@ -21076,12 +21467,12 @@ return x_57; else { lean_object* x_58; -lean_inc(x_49); -lean_inc_ref(x_48); -lean_inc(x_52); +lean_inc(x_50); +lean_inc_ref(x_54); +lean_inc(x_51); lean_inc_ref(x_53); lean_inc_ref(x_55); -x_58 = l_Lean_Meta_reduceMatcher_x3f(x_55, x_53, x_52, x_48, x_49); +x_58 = l_Lean_Meta_reduceMatcher_x3f(x_55, x_53, x_51, x_54, x_50); if (lean_obj_tag(x_58) == 0) { uint8_t x_59; @@ -21096,18 +21487,18 @@ case 0: lean_object* x_61; lean_object* x_62; lean_free_object(x_58); lean_dec_ref(x_55); -lean_dec_ref(x_47); +lean_dec_ref(x_49); x_61 = lean_ctor_get(x_60, 0); lean_inc_ref(x_61); lean_dec_ref(x_60); -x_62 = l___private_Lean_Meta_WHNF_0__Lean_Meta_whnfCore_go(x_61, x_53, x_52, x_48, x_49); +x_62 = l___private_Lean_Meta_WHNF_0__Lean_Meta_whnfCore_go(x_61, x_53, x_51, x_54, x_50); return x_62; } case 2: { lean_object* x_63; -x_63 = l_Lean_Expr_getAppFn(x_47); -lean_dec_ref(x_47); +x_63 = l_Lean_Expr_getAppFn(x_49); +lean_dec_ref(x_49); if (lean_obj_tag(x_63) == 4) { lean_object* x_64; lean_object* x_65; lean_object* x_66; lean_object* x_67; lean_object* x_68; @@ -21116,11 +21507,11 @@ lean_inc(x_64); x_65 = lean_ctor_get(x_63, 1); lean_inc(x_65); lean_dec_ref(x_63); -x_66 = lean_st_ref_get(x_49); +x_66 = lean_st_ref_get(x_50); x_67 = lean_ctor_get(x_66, 0); lean_inc_ref(x_67); lean_dec(x_66); -x_68 = l_Lean_Environment_find_x3f(x_67, x_64, x_51); +x_68 = l_Lean_Environment_find_x3f(x_67, x_64, x_47); if (lean_obj_tag(x_68) == 1) { lean_object* x_69; lean_object* x_70; @@ -21147,7 +21538,7 @@ x_76 = lean_unsigned_to_nat(1u); x_77 = lean_nat_sub(x_74, x_76); lean_dec(x_74); x_78 = l___private_Lean_Expr_0__Lean_Expr_getAppArgsAux(x_55, x_75, x_77); -x_79 = l___private_Lean_Meta_WHNF_0__Lean_Meta_reduceRec___redArg(x_71, x_65, x_78, x_70, x_72, x_53, x_52, x_48, x_49); +x_79 = l___private_Lean_Meta_WHNF_0__Lean_Meta_reduceRec___redArg(x_71, x_65, x_78, x_70, x_72, x_53, x_51, x_54, x_50); lean_dec_ref(x_78); return x_79; } @@ -21168,7 +21559,7 @@ x_85 = lean_unsigned_to_nat(1u); x_86 = lean_nat_sub(x_83, x_85); lean_dec(x_83); x_87 = l___private_Lean_Expr_0__Lean_Expr_getAppArgsAux(x_55, x_84, x_86); -x_88 = l___private_Lean_Meta_WHNF_0__Lean_Meta_reduceQuotRec___redArg(x_80, x_87, x_70, x_81, x_53, x_52, x_48, x_49); +x_88 = l___private_Lean_Meta_WHNF_0__Lean_Meta_reduceQuotRec___redArg(x_80, x_87, x_70, x_81, x_53, x_51, x_54, x_50); lean_dec_ref(x_87); lean_dec_ref(x_80); return x_88; @@ -21180,7 +21571,7 @@ lean_dec_ref(x_70); lean_free_object(x_58); x_89 = l_Lean_ConstantInfo_name(x_69); lean_inc(x_89); -x_90 = l_Lean_Meta_isAuxDef___redArg(x_89, x_49); +x_90 = l_Lean_Meta_isAuxDef___redArg(x_89, x_50); if (lean_obj_tag(x_90) == 0) { uint8_t x_91; @@ -21196,10 +21587,10 @@ if (x_93 == 0) lean_dec_ref(x_69); lean_dec(x_89); lean_dec(x_65); +lean_dec_ref(x_54); lean_dec_ref(x_53); -lean_dec(x_52); -lean_dec(x_49); -lean_dec_ref(x_48); +lean_dec(x_51); +lean_dec(x_50); lean_ctor_set(x_90, 0, x_55); return x_90; } @@ -21207,7 +21598,7 @@ else { lean_object* x_94; lean_free_object(x_90); -x_94 = l_Lean_Meta_recordUnfold___redArg(x_89, x_52, x_48); +x_94 = l_Lean_Meta_recordUnfold___redArg(x_89, x_51, x_54); if (lean_obj_tag(x_94) == 0) { lean_object* x_95; lean_object* x_96; lean_object* x_97; lean_object* x_98; @@ -21217,7 +21608,7 @@ x_96 = lean_mk_empty_array_with_capacity(x_95); lean_dec(x_95); lean_inc_ref(x_55); x_97 = l___private_Lean_Expr_0__Lean_Expr_getAppRevArgsAux(x_55, x_96); -x_98 = l___private_Lean_Meta_WHNF_0__Lean_Meta_deltaBetaDefinition___at___00__private_Lean_Meta_WHNF_0__Lean_Meta_whnfCore_go_spec__0(x_55, x_69, x_65, x_97, x_51, x_53, x_52, x_48, x_49); +x_98 = l___private_Lean_Meta_WHNF_0__Lean_Meta_deltaBetaDefinition___at___00__private_Lean_Meta_WHNF_0__Lean_Meta_whnfCore_go_spec__0(x_55, x_69, x_65, x_97, x_47, x_53, x_51, x_54, x_50); lean_dec_ref(x_97); lean_dec_ref(x_69); return x_98; @@ -21228,10 +21619,10 @@ uint8_t x_99; lean_dec_ref(x_69); lean_dec(x_65); lean_dec_ref(x_55); +lean_dec_ref(x_54); lean_dec_ref(x_53); -lean_dec(x_52); -lean_dec(x_49); -lean_dec_ref(x_48); +lean_dec(x_51); +lean_dec(x_50); x_99 = !lean_is_exclusive(x_94); if (x_99 == 0) { @@ -21264,10 +21655,10 @@ lean_object* x_104; lean_dec_ref(x_69); lean_dec(x_89); lean_dec(x_65); +lean_dec_ref(x_54); lean_dec_ref(x_53); -lean_dec(x_52); -lean_dec(x_49); -lean_dec_ref(x_48); +lean_dec(x_51); +lean_dec(x_50); x_104 = lean_alloc_ctor(0, 1, 0); lean_ctor_set(x_104, 0, x_55); return x_104; @@ -21275,7 +21666,7 @@ return x_104; else { lean_object* x_105; -x_105 = l_Lean_Meta_recordUnfold___redArg(x_89, x_52, x_48); +x_105 = l_Lean_Meta_recordUnfold___redArg(x_89, x_51, x_54); if (lean_obj_tag(x_105) == 0) { lean_object* x_106; lean_object* x_107; lean_object* x_108; lean_object* x_109; @@ -21285,7 +21676,7 @@ x_107 = lean_mk_empty_array_with_capacity(x_106); lean_dec(x_106); lean_inc_ref(x_55); x_108 = l___private_Lean_Expr_0__Lean_Expr_getAppRevArgsAux(x_55, x_107); -x_109 = l___private_Lean_Meta_WHNF_0__Lean_Meta_deltaBetaDefinition___at___00__private_Lean_Meta_WHNF_0__Lean_Meta_whnfCore_go_spec__0(x_55, x_69, x_65, x_108, x_51, x_53, x_52, x_48, x_49); +x_109 = l___private_Lean_Meta_WHNF_0__Lean_Meta_deltaBetaDefinition___at___00__private_Lean_Meta_WHNF_0__Lean_Meta_whnfCore_go_spec__0(x_55, x_69, x_65, x_108, x_47, x_53, x_51, x_54, x_50); lean_dec_ref(x_108); lean_dec_ref(x_69); return x_109; @@ -21296,10 +21687,10 @@ lean_object* x_110; lean_object* x_111; lean_object* x_112; lean_dec_ref(x_69); lean_dec(x_65); lean_dec_ref(x_55); +lean_dec_ref(x_54); lean_dec_ref(x_53); -lean_dec(x_52); -lean_dec(x_49); -lean_dec_ref(x_48); +lean_dec(x_51); +lean_dec(x_50); x_110 = lean_ctor_get(x_105, 0); lean_inc(x_110); if (lean_is_exclusive(x_105)) { @@ -21327,10 +21718,10 @@ lean_dec_ref(x_69); lean_dec(x_89); lean_dec(x_65); lean_dec_ref(x_55); +lean_dec_ref(x_54); lean_dec_ref(x_53); -lean_dec(x_52); -lean_dec(x_49); -lean_dec_ref(x_48); +lean_dec(x_51); +lean_dec(x_50); x_113 = !lean_is_exclusive(x_90); if (x_113 == 0) { @@ -21355,7 +21746,7 @@ lean_dec_ref(x_70); lean_dec(x_65); lean_free_object(x_58); lean_dec_ref(x_53); -lean_dec(x_49); +lean_dec(x_50); x_116 = lean_ctor_get(x_69, 0); lean_inc_ref(x_116); lean_dec_ref(x_69); @@ -21365,9 +21756,9 @@ lean_dec_ref(x_116); x_118 = lean_ctor_get(x_117, 0); lean_inc(x_118); lean_dec_ref(x_117); -x_119 = l_Lean_Meta_recordUnfoldAxiom___redArg(x_118, x_52, x_48); -lean_dec_ref(x_48); -lean_dec(x_52); +x_119 = l_Lean_Meta_recordUnfoldAxiom___redArg(x_118, x_51, x_54); +lean_dec_ref(x_54); +lean_dec(x_51); if (lean_obj_tag(x_119) == 0) { uint8_t x_120; @@ -21415,10 +21806,10 @@ default: lean_dec_ref(x_70); lean_dec(x_69); lean_dec(x_65); +lean_dec_ref(x_54); lean_dec_ref(x_53); -lean_dec(x_52); -lean_dec(x_49); -lean_dec_ref(x_48); +lean_dec(x_51); +lean_dec(x_50); lean_ctor_set(x_58, 0, x_55); return x_58; } @@ -21428,10 +21819,10 @@ else { lean_dec(x_68); lean_dec(x_65); +lean_dec_ref(x_54); lean_dec_ref(x_53); -lean_dec(x_52); -lean_dec(x_49); -lean_dec_ref(x_48); +lean_dec(x_51); +lean_dec(x_50); lean_ctor_set(x_58, 0, x_55); return x_58; } @@ -21439,10 +21830,10 @@ return x_58; else { lean_dec_ref(x_63); +lean_dec_ref(x_54); lean_dec_ref(x_53); -lean_dec(x_52); -lean_dec(x_49); -lean_dec_ref(x_48); +lean_dec(x_51); +lean_dec(x_50); lean_ctor_set(x_58, 0, x_55); return x_58; } @@ -21450,11 +21841,11 @@ return x_58; default: { lean_dec(x_60); +lean_dec_ref(x_54); lean_dec_ref(x_53); -lean_dec(x_52); -lean_dec(x_49); -lean_dec_ref(x_48); -lean_dec_ref(x_47); +lean_dec(x_51); +lean_dec(x_50); +lean_dec_ref(x_49); lean_ctor_set(x_58, 0, x_55); return x_58; } @@ -21471,18 +21862,18 @@ case 0: { lean_object* x_127; lean_object* x_128; lean_dec_ref(x_55); -lean_dec_ref(x_47); +lean_dec_ref(x_49); x_127 = lean_ctor_get(x_126, 0); lean_inc_ref(x_127); lean_dec_ref(x_126); -x_128 = l___private_Lean_Meta_WHNF_0__Lean_Meta_whnfCore_go(x_127, x_53, x_52, x_48, x_49); +x_128 = l___private_Lean_Meta_WHNF_0__Lean_Meta_whnfCore_go(x_127, x_53, x_51, x_54, x_50); return x_128; } case 2: { lean_object* x_129; -x_129 = l_Lean_Expr_getAppFn(x_47); -lean_dec_ref(x_47); +x_129 = l_Lean_Expr_getAppFn(x_49); +lean_dec_ref(x_49); if (lean_obj_tag(x_129) == 4) { lean_object* x_130; lean_object* x_131; lean_object* x_132; lean_object* x_133; lean_object* x_134; @@ -21491,11 +21882,11 @@ lean_inc(x_130); x_131 = lean_ctor_get(x_129, 1); lean_inc(x_131); lean_dec_ref(x_129); -x_132 = lean_st_ref_get(x_49); +x_132 = lean_st_ref_get(x_50); x_133 = lean_ctor_get(x_132, 0); lean_inc_ref(x_133); lean_dec(x_132); -x_134 = l_Lean_Environment_find_x3f(x_133, x_130, x_51); +x_134 = l_Lean_Environment_find_x3f(x_133, x_130, x_47); if (lean_obj_tag(x_134) == 1) { lean_object* x_135; lean_object* x_136; @@ -21521,7 +21912,7 @@ x_142 = lean_unsigned_to_nat(1u); x_143 = lean_nat_sub(x_140, x_142); lean_dec(x_140); x_144 = l___private_Lean_Expr_0__Lean_Expr_getAppArgsAux(x_55, x_141, x_143); -x_145 = l___private_Lean_Meta_WHNF_0__Lean_Meta_reduceRec___redArg(x_137, x_131, x_144, x_136, x_138, x_53, x_52, x_48, x_49); +x_145 = l___private_Lean_Meta_WHNF_0__Lean_Meta_reduceRec___redArg(x_137, x_131, x_144, x_136, x_138, x_53, x_51, x_54, x_50); lean_dec_ref(x_144); return x_145; } @@ -21541,7 +21932,7 @@ x_151 = lean_unsigned_to_nat(1u); x_152 = lean_nat_sub(x_149, x_151); lean_dec(x_149); x_153 = l___private_Lean_Expr_0__Lean_Expr_getAppArgsAux(x_55, x_150, x_152); -x_154 = l___private_Lean_Meta_WHNF_0__Lean_Meta_reduceQuotRec___redArg(x_146, x_153, x_136, x_147, x_53, x_52, x_48, x_49); +x_154 = l___private_Lean_Meta_WHNF_0__Lean_Meta_reduceQuotRec___redArg(x_146, x_153, x_136, x_147, x_53, x_51, x_54, x_50); lean_dec_ref(x_153); lean_dec_ref(x_146); return x_154; @@ -21552,7 +21943,7 @@ lean_object* x_155; lean_object* x_156; lean_dec_ref(x_136); x_155 = l_Lean_ConstantInfo_name(x_135); lean_inc(x_155); -x_156 = l_Lean_Meta_isAuxDef___redArg(x_155, x_49); +x_156 = l_Lean_Meta_isAuxDef___redArg(x_155, x_50); if (lean_obj_tag(x_156) == 0) { lean_object* x_157; lean_object* x_158; uint8_t x_159; @@ -21573,10 +21964,10 @@ lean_object* x_160; lean_dec_ref(x_135); lean_dec(x_155); lean_dec(x_131); +lean_dec_ref(x_54); lean_dec_ref(x_53); -lean_dec(x_52); -lean_dec(x_49); -lean_dec_ref(x_48); +lean_dec(x_51); +lean_dec(x_50); if (lean_is_scalar(x_158)) { x_160 = lean_alloc_ctor(0, 1, 0); } else { @@ -21589,7 +21980,7 @@ else { lean_object* x_161; lean_dec(x_158); -x_161 = l_Lean_Meta_recordUnfold___redArg(x_155, x_52, x_48); +x_161 = l_Lean_Meta_recordUnfold___redArg(x_155, x_51, x_54); if (lean_obj_tag(x_161) == 0) { lean_object* x_162; lean_object* x_163; lean_object* x_164; lean_object* x_165; @@ -21599,7 +21990,7 @@ x_163 = lean_mk_empty_array_with_capacity(x_162); lean_dec(x_162); lean_inc_ref(x_55); x_164 = l___private_Lean_Expr_0__Lean_Expr_getAppRevArgsAux(x_55, x_163); -x_165 = l___private_Lean_Meta_WHNF_0__Lean_Meta_deltaBetaDefinition___at___00__private_Lean_Meta_WHNF_0__Lean_Meta_whnfCore_go_spec__0(x_55, x_135, x_131, x_164, x_51, x_53, x_52, x_48, x_49); +x_165 = l___private_Lean_Meta_WHNF_0__Lean_Meta_deltaBetaDefinition___at___00__private_Lean_Meta_WHNF_0__Lean_Meta_whnfCore_go_spec__0(x_55, x_135, x_131, x_164, x_47, x_53, x_51, x_54, x_50); lean_dec_ref(x_164); lean_dec_ref(x_135); return x_165; @@ -21610,10 +22001,10 @@ lean_object* x_166; lean_object* x_167; lean_object* x_168; lean_dec_ref(x_135); lean_dec(x_131); lean_dec_ref(x_55); +lean_dec_ref(x_54); lean_dec_ref(x_53); -lean_dec(x_52); -lean_dec(x_49); -lean_dec_ref(x_48); +lean_dec(x_51); +lean_dec(x_50); x_166 = lean_ctor_get(x_161, 0); lean_inc(x_166); if (lean_is_exclusive(x_161)) { @@ -21640,10 +22031,10 @@ lean_dec_ref(x_135); lean_dec(x_155); lean_dec(x_131); lean_dec_ref(x_55); +lean_dec_ref(x_54); lean_dec_ref(x_53); -lean_dec(x_52); -lean_dec(x_49); -lean_dec_ref(x_48); +lean_dec(x_51); +lean_dec(x_50); x_169 = lean_ctor_get(x_156, 0); lean_inc(x_169); if (lean_is_exclusive(x_156)) { @@ -21668,7 +22059,7 @@ lean_object* x_172; lean_object* x_173; lean_object* x_174; lean_object* x_175; lean_dec_ref(x_136); lean_dec(x_131); lean_dec_ref(x_53); -lean_dec(x_49); +lean_dec(x_50); x_172 = lean_ctor_get(x_135, 0); lean_inc_ref(x_172); lean_dec_ref(x_135); @@ -21678,9 +22069,9 @@ lean_dec_ref(x_172); x_174 = lean_ctor_get(x_173, 0); lean_inc(x_174); lean_dec_ref(x_173); -x_175 = l_Lean_Meta_recordUnfoldAxiom___redArg(x_174, x_52, x_48); -lean_dec_ref(x_48); -lean_dec(x_52); +x_175 = l_Lean_Meta_recordUnfoldAxiom___redArg(x_174, x_51, x_54); +lean_dec_ref(x_54); +lean_dec(x_51); if (lean_obj_tag(x_175) == 0) { lean_object* x_176; lean_object* x_177; @@ -21727,10 +22118,10 @@ lean_object* x_181; lean_dec_ref(x_136); lean_dec(x_135); lean_dec(x_131); +lean_dec_ref(x_54); lean_dec_ref(x_53); -lean_dec(x_52); -lean_dec(x_49); -lean_dec_ref(x_48); +lean_dec(x_51); +lean_dec(x_50); x_181 = lean_alloc_ctor(0, 1, 0); lean_ctor_set(x_181, 0, x_55); return x_181; @@ -21742,10 +22133,10 @@ else lean_object* x_182; lean_dec(x_134); lean_dec(x_131); +lean_dec_ref(x_54); lean_dec_ref(x_53); -lean_dec(x_52); -lean_dec(x_49); -lean_dec_ref(x_48); +lean_dec(x_51); +lean_dec(x_50); x_182 = lean_alloc_ctor(0, 1, 0); lean_ctor_set(x_182, 0, x_55); return x_182; @@ -21755,10 +22146,10 @@ else { lean_object* x_183; lean_dec_ref(x_129); +lean_dec_ref(x_54); lean_dec_ref(x_53); -lean_dec(x_52); -lean_dec(x_49); -lean_dec_ref(x_48); +lean_dec(x_51); +lean_dec(x_50); x_183 = lean_alloc_ctor(0, 1, 0); lean_ctor_set(x_183, 0, x_55); return x_183; @@ -21768,11 +22159,11 @@ default: { lean_object* x_184; lean_dec(x_126); +lean_dec_ref(x_54); lean_dec_ref(x_53); -lean_dec(x_52); -lean_dec(x_49); -lean_dec_ref(x_48); -lean_dec_ref(x_47); +lean_dec(x_51); +lean_dec(x_50); +lean_dec_ref(x_49); x_184 = lean_alloc_ctor(0, 1, 0); lean_ctor_set(x_184, 0, x_55); return x_184; @@ -21784,11 +22175,11 @@ else { uint8_t x_185; lean_dec_ref(x_55); +lean_dec_ref(x_54); lean_dec_ref(x_53); -lean_dec(x_52); -lean_dec(x_49); -lean_dec_ref(x_48); -lean_dec_ref(x_47); +lean_dec(x_51); +lean_dec(x_50); +lean_dec_ref(x_49); x_185 = !lean_is_exclusive(x_58); if (x_185 == 0) { @@ -21811,7 +22202,7 @@ block_207: { lean_object* x_198; lean_inc_ref(x_1); -x_198 = l___private_Lean_Meta_WHNF_0__Lean_Meta_whnfDelayedAssigned_x3f(x_190, x_1, x_195, x_194, x_189, x_193); +x_198 = l___private_Lean_Meta_WHNF_0__Lean_Meta_whnfDelayedAssigned_x3f(x_189, x_1, x_195, x_193, x_196, x_190); if (lean_obj_tag(x_198) == 0) { lean_object* x_199; @@ -21821,31 +22212,31 @@ lean_dec_ref(x_198); if (lean_obj_tag(x_199) == 1) { lean_object* x_200; lean_object* x_201; -lean_dec_ref(x_196); -lean_dec_ref(x_191); -lean_dec_ref(x_190); +lean_dec_ref(x_194); +lean_dec_ref(x_192); +lean_dec_ref(x_189); lean_dec_ref(x_1); x_200 = lean_ctor_get(x_199, 0); lean_inc(x_200); lean_dec_ref(x_199); -x_201 = l___private_Lean_Meta_WHNF_0__Lean_Meta_whnfCore_go(x_200, x_195, x_194, x_189, x_193); +x_201 = l___private_Lean_Meta_WHNF_0__Lean_Meta_whnfCore_go(x_200, x_195, x_193, x_196, x_190); return x_201; } else { uint8_t x_202; lean_dec(x_199); -x_202 = lean_expr_eqv(x_191, x_190); -lean_dec_ref(x_191); +x_202 = lean_expr_eqv(x_192, x_189); +lean_dec_ref(x_192); if (x_202 == 0) { lean_object* x_203; -x_203 = l_Lean_Expr_updateFn(x_1, x_190); -x_47 = x_190; -x_48 = x_189; -x_49 = x_193; -x_50 = lean_box(0); -x_51 = x_197; +x_203 = l_Lean_Expr_updateFn(x_1, x_189); +x_47 = x_197; +x_48 = lean_box(0); +x_49 = x_189; +x_50 = x_190; +x_51 = x_193; x_52 = x_194; x_53 = x_195; x_54 = x_196; @@ -21854,11 +22245,11 @@ goto block_188; } else { -x_47 = x_190; -x_48 = x_189; -x_49 = x_193; -x_50 = lean_box(0); -x_51 = x_197; +x_47 = x_197; +x_48 = lean_box(0); +x_49 = x_189; +x_50 = x_190; +x_51 = x_193; x_52 = x_194; x_53 = x_195; x_54 = x_196; @@ -21872,10 +22263,10 @@ else uint8_t x_204; lean_dec_ref(x_196); lean_dec_ref(x_195); -lean_dec(x_194); +lean_dec_ref(x_194); lean_dec(x_193); -lean_dec_ref(x_191); -lean_dec_ref(x_190); +lean_dec_ref(x_192); +lean_dec(x_190); lean_dec_ref(x_189); lean_dec_ref(x_1); x_204 = !lean_is_exclusive(x_198); @@ -21899,11 +22290,11 @@ block_217: { if (x_216 == 0) { -x_189 = x_209; -x_190 = x_208; -x_191 = x_210; -x_192 = lean_box(0); -x_193 = x_212; +x_189 = x_208; +x_190 = x_209; +x_191 = lean_box(0); +x_192 = x_212; +x_193 = x_211; x_194 = x_213; x_195 = x_214; x_196 = x_215; @@ -21912,14 +22303,14 @@ goto block_207; } else { -lean_dec_ref(x_215); -lean_dec_ref(x_210); -x_34 = x_209; -x_35 = x_208; +lean_dec_ref(x_213); +lean_dec_ref(x_212); +x_34 = x_208; +x_35 = x_209; x_36 = lean_box(0); -x_37 = x_212; -x_38 = x_213; -x_39 = x_214; +x_37 = x_211; +x_38 = x_214; +x_39 = x_215; goto block_46; } } @@ -22049,13 +22440,13 @@ uint8_t x_250; x_250 = lean_ctor_get_uint8(x_248, 17); lean_dec(x_248); lean_inc_ref(x_245); -x_20 = x_240; -x_21 = lean_box(0); -x_22 = x_241; +x_20 = lean_box(0); +x_21 = x_241; +x_22 = x_250; x_23 = x_245; x_24 = x_239; -x_25 = x_250; -x_26 = x_238; +x_25 = x_238; +x_26 = x_240; x_27 = x_249; goto block_33; } @@ -22069,14 +22460,14 @@ lean_inc_ref(x_244); lean_dec_ref(x_1); x_251 = lean_ctor_get_uint8(x_248, 18); lean_dec(x_248); -x_7 = x_240; -x_8 = lean_box(0); -x_9 = x_241; +x_7 = lean_box(0); +x_8 = x_241; +x_9 = x_251; x_10 = x_245; -x_11 = x_244; -x_12 = x_239; -x_13 = x_251; -x_14 = x_238; +x_11 = x_239; +x_12 = x_244; +x_13 = x_238; +x_14 = x_240; goto block_19; } else @@ -22089,13 +22480,13 @@ uint8_t x_253; x_253 = lean_ctor_get_uint8(x_248, 17); lean_dec(x_248); lean_inc_ref(x_245); -x_20 = x_240; -x_21 = lean_box(0); -x_22 = x_241; +x_20 = lean_box(0); +x_21 = x_241; +x_22 = x_253; x_23 = x_245; x_24 = x_239; -x_25 = x_253; -x_26 = x_238; +x_25 = x_238; +x_26 = x_240; x_27 = x_252; goto block_33; } @@ -22105,14 +22496,14 @@ lean_inc_ref(x_245); lean_inc_ref(x_244); lean_dec(x_248); lean_dec_ref(x_1); -x_7 = x_240; -x_8 = lean_box(0); -x_9 = x_241; +x_7 = lean_box(0); +x_8 = x_241; +x_9 = x_252; x_10 = x_245; -x_11 = x_244; -x_12 = x_239; -x_13 = x_252; -x_14 = x_238; +x_11 = x_239; +x_12 = x_244; +x_13 = x_238; +x_14 = x_240; goto block_19; } } @@ -22171,13 +22562,13 @@ x_263 = l_Lean_Expr_isLambda(x_262); if (x_263 == 0) { x_208 = x_262; -x_209 = x_240; -x_210 = x_260; -x_211 = lean_box(0); -x_212 = x_241; -x_213 = x_239; +x_209 = x_241; +x_210 = lean_box(0); +x_211 = x_239; +x_212 = x_260; +x_213 = x_259; x_214 = x_238; -x_215 = x_259; +x_215 = x_240; x_216 = x_263; goto block_217; } @@ -22192,26 +22583,26 @@ x_265 = l_Lean_Expr_isLambda(x_260); if (x_265 == 0) { x_208 = x_262; -x_209 = x_240; -x_210 = x_260; -x_211 = lean_box(0); -x_212 = x_241; -x_213 = x_239; +x_209 = x_241; +x_210 = lean_box(0); +x_211 = x_239; +x_212 = x_260; +x_213 = x_259; x_214 = x_238; -x_215 = x_259; +x_215 = x_240; x_216 = x_263; goto block_217; } else { -x_189 = x_240; -x_190 = x_262; -x_191 = x_260; -x_192 = lean_box(0); -x_193 = x_241; -x_194 = x_239; +x_189 = x_262; +x_190 = x_241; +x_191 = lean_box(0); +x_192 = x_260; +x_193 = x_239; +x_194 = x_259; x_195 = x_238; -x_196 = x_259; +x_196 = x_240; x_197 = x_264; goto block_207; } @@ -22220,12 +22611,12 @@ else { lean_dec_ref(x_260); lean_dec(x_259); -x_34 = x_240; -x_35 = x_262; +x_34 = x_262; +x_35 = x_241; x_36 = lean_box(0); -x_37 = x_241; -x_38 = x_239; -x_39 = x_238; +x_37 = x_239; +x_38 = x_238; +x_39 = x_240; goto block_46; } } @@ -26912,8 +27303,8 @@ goto block_49; else { lean_object* x_51; -lean_dec_ref(x_25); lean_dec(x_26); +lean_dec_ref(x_25); lean_dec_ref(x_10); lean_dec(x_9); x_51 = lean_box(0); @@ -26992,8 +27383,8 @@ goto block_59; else { lean_object* x_61; lean_object* x_62; -lean_dec_ref(x_25); lean_dec(x_26); +lean_dec_ref(x_25); lean_dec_ref(x_10); lean_dec(x_9); x_61 = lean_box(0); @@ -27057,8 +27448,8 @@ return x_58; else { uint8_t x_63; -lean_dec_ref(x_25); lean_dec(x_26); +lean_dec_ref(x_25); lean_dec_ref(x_10); lean_dec(x_9); x_63 = !lean_is_exclusive(x_39); @@ -27081,8 +27472,8 @@ return x_65; else { uint8_t x_66; -lean_dec(x_26); lean_dec_ref(x_25); +lean_dec(x_26); lean_dec(x_11); lean_dec_ref(x_10); lean_dec(x_9); @@ -27109,8 +27500,8 @@ else lean_object* x_69; lean_dec(x_31); lean_dec(x_30); -lean_dec_ref(x_25); lean_dec(x_26); +lean_dec_ref(x_25); lean_dec(x_11); lean_dec_ref(x_10); lean_dec(x_9); @@ -27235,8 +27626,8 @@ goto block_96; else { lean_object* x_98; lean_object* x_99; -lean_dec_ref(x_25); lean_dec(x_26); +lean_dec_ref(x_25); lean_dec_ref(x_10); lean_dec(x_9); x_98 = lean_box(0); @@ -27304,8 +27695,8 @@ return x_95; else { lean_object* x_100; lean_object* x_101; lean_object* x_102; -lean_dec_ref(x_25); lean_dec(x_26); +lean_dec_ref(x_25); lean_dec_ref(x_10); lean_dec(x_9); x_100 = lean_ctor_get(x_87, 0); @@ -27329,8 +27720,8 @@ return x_102; else { lean_object* x_103; lean_object* x_104; lean_object* x_105; -lean_dec(x_26); lean_dec_ref(x_25); +lean_dec(x_26); lean_dec(x_11); lean_dec_ref(x_10); lean_dec(x_9); @@ -27358,8 +27749,8 @@ else lean_object* x_106; lean_object* x_107; lean_dec(x_79); lean_dec(x_78); -lean_dec_ref(x_25); lean_dec(x_26); +lean_dec_ref(x_25); lean_dec(x_11); lean_dec_ref(x_10); lean_dec(x_9); @@ -27424,8 +27815,8 @@ return x_113; else { uint8_t x_114; -lean_dec(x_26); lean_dec_ref(x_25); +lean_dec(x_26); lean_dec(x_11); lean_dec_ref(x_10); lean_dec(x_9); @@ -27543,8 +27934,8 @@ goto block_141; else { lean_object* x_143; lean_object* x_144; -lean_dec_ref(x_118); lean_dec(x_119); +lean_dec_ref(x_118); lean_dec_ref(x_10); lean_dec(x_9); x_143 = lean_box(0); @@ -27612,8 +28003,8 @@ return x_140; else { lean_object* x_145; lean_object* x_146; lean_object* x_147; -lean_dec_ref(x_118); lean_dec(x_119); +lean_dec_ref(x_118); lean_dec_ref(x_10); lean_dec(x_9); x_145 = lean_ctor_get(x_132, 0); @@ -27637,8 +28028,8 @@ return x_147; else { lean_object* x_148; lean_object* x_149; lean_object* x_150; -lean_dec(x_119); lean_dec_ref(x_118); +lean_dec(x_119); lean_dec(x_11); lean_dec_ref(x_10); lean_dec(x_9); @@ -27666,8 +28057,8 @@ else lean_object* x_151; lean_object* x_152; lean_dec(x_124); lean_dec(x_123); -lean_dec_ref(x_118); lean_dec(x_119); +lean_dec_ref(x_118); lean_dec(x_11); lean_dec_ref(x_10); lean_dec(x_9); @@ -27736,8 +28127,8 @@ return x_158; else { lean_object* x_159; lean_object* x_160; lean_object* x_161; -lean_dec(x_119); lean_dec_ref(x_118); +lean_dec(x_119); lean_dec(x_11); lean_dec_ref(x_10); lean_dec(x_9); @@ -33957,15 +34348,15 @@ if (x_78 == 0) { uint8_t x_79; x_79 = l_Lean_Expr_hasFVar(x_77); -x_12 = x_77; -x_13 = lean_box(0); +x_12 = lean_box(0); +x_13 = x_77; x_14 = x_79; goto block_36; } else { -x_12 = x_77; -x_13 = lean_box(0); +x_12 = lean_box(0); +x_13 = x_77; x_14 = x_78; goto block_36; } @@ -34082,15 +34473,15 @@ if (x_105 == 0) { uint8_t x_106; x_106 = l_Lean_Expr_hasFVar(x_104); -x_12 = x_104; -x_13 = lean_box(0); +x_12 = lean_box(0); +x_13 = x_104; x_14 = x_106; goto block_36; } else { -x_12 = x_104; -x_13 = lean_box(0); +x_12 = lean_box(0); +x_13 = x_104; x_14 = x_105; goto block_36; } @@ -34227,15 +34618,15 @@ if (x_135 == 0) { uint8_t x_136; x_136 = l_Lean_Expr_hasFVar(x_134); -x_12 = x_134; -x_13 = lean_box(0); +x_12 = lean_box(0); +x_13 = x_134; x_14 = x_136; goto block_36; } else { -x_12 = x_134; -x_13 = lean_box(0); +x_12 = lean_box(0); +x_13 = x_134; x_14 = x_135; goto block_36; } @@ -34417,15 +34808,15 @@ if (x_180 == 0) { uint8_t x_181; x_181 = l_Lean_Expr_hasFVar(x_179); -x_12 = x_179; -x_13 = lean_box(0); +x_12 = lean_box(0); +x_13 = x_179; x_14 = x_181; goto block_36; } else { -x_12 = x_179; -x_13 = lean_box(0); +x_12 = lean_box(0); +x_13 = x_179; x_14 = x_180; goto block_36; } @@ -34625,15 +35016,15 @@ if (x_228 == 0) { uint8_t x_229; x_229 = l_Lean_Expr_hasFVar(x_227); -x_12 = x_227; -x_13 = lean_box(0); +x_12 = lean_box(0); +x_13 = x_227; x_14 = x_229; goto block_36; } else { -x_12 = x_227; -x_13 = lean_box(0); +x_12 = lean_box(0); +x_13 = x_227; x_14 = x_228; goto block_36; } @@ -34682,7 +35073,7 @@ lean_inc(x_6); lean_inc_ref(x_5); lean_inc(x_4); lean_inc_ref(x_3); -x_15 = lean_whnf(x_12, x_3, x_4, x_5, x_6); +x_15 = lean_whnf(x_13, x_3, x_4, x_5, x_6); if (lean_obj_tag(x_15) == 0) { lean_object* x_16; @@ -34768,8 +35159,8 @@ goto block_11; } else { -lean_dec_ref(x_17); lean_dec(x_18); +lean_dec_ref(x_17); lean_dec(x_6); lean_dec_ref(x_5); lean_dec(x_4); @@ -34859,7 +35250,7 @@ return x_33; else { lean_object* x_34; lean_object* x_35; -lean_dec_ref(x_12); +lean_dec_ref(x_13); lean_dec(x_6); lean_dec_ref(x_5); lean_dec(x_4); @@ -35016,15 +35407,15 @@ if (x_79 == 0) { uint8_t x_80; x_80 = l_Lean_Expr_hasFVar(x_78); -x_13 = x_78; -x_14 = lean_box(0); +x_13 = lean_box(0); +x_14 = x_78; x_15 = x_80; goto block_37; } else { -x_13 = x_78; -x_14 = lean_box(0); +x_13 = lean_box(0); +x_14 = x_78; x_15 = x_79; goto block_37; } @@ -35141,15 +35532,15 @@ if (x_106 == 0) { uint8_t x_107; x_107 = l_Lean_Expr_hasFVar(x_105); -x_13 = x_105; -x_14 = lean_box(0); +x_13 = lean_box(0); +x_14 = x_105; x_15 = x_107; goto block_37; } else { -x_13 = x_105; -x_14 = lean_box(0); +x_13 = lean_box(0); +x_14 = x_105; x_15 = x_106; goto block_37; } @@ -35286,15 +35677,15 @@ if (x_136 == 0) { uint8_t x_137; x_137 = l_Lean_Expr_hasFVar(x_135); -x_13 = x_135; -x_14 = lean_box(0); +x_13 = lean_box(0); +x_14 = x_135; x_15 = x_137; goto block_37; } else { -x_13 = x_135; -x_14 = lean_box(0); +x_13 = lean_box(0); +x_14 = x_135; x_15 = x_136; goto block_37; } @@ -35476,15 +35867,15 @@ if (x_181 == 0) { uint8_t x_182; x_182 = l_Lean_Expr_hasFVar(x_180); -x_13 = x_180; -x_14 = lean_box(0); +x_13 = lean_box(0); +x_14 = x_180; x_15 = x_182; goto block_37; } else { -x_13 = x_180; -x_14 = lean_box(0); +x_13 = lean_box(0); +x_14 = x_180; x_15 = x_181; goto block_37; } @@ -35684,15 +36075,15 @@ if (x_229 == 0) { uint8_t x_230; x_230 = l_Lean_Expr_hasFVar(x_228); -x_13 = x_228; -x_14 = lean_box(0); +x_13 = lean_box(0); +x_14 = x_228; x_15 = x_230; goto block_37; } else { -x_13 = x_228; -x_14 = lean_box(0); +x_13 = lean_box(0); +x_14 = x_228; x_15 = x_229; goto block_37; } @@ -35741,7 +36132,7 @@ lean_inc(x_7); lean_inc_ref(x_6); lean_inc(x_5); lean_inc_ref(x_4); -x_16 = lean_whnf(x_13, x_4, x_5, x_6, x_7); +x_16 = lean_whnf(x_14, x_4, x_5, x_6, x_7); if (lean_obj_tag(x_16) == 0) { lean_object* x_17; @@ -35827,8 +36218,8 @@ goto block_12; } else { -lean_dec_ref(x_18); lean_dec(x_19); +lean_dec_ref(x_18); lean_dec(x_7); lean_dec_ref(x_6); lean_dec(x_5); @@ -35918,7 +36309,7 @@ return x_34; else { lean_object* x_35; lean_object* x_36; -lean_dec_ref(x_13); +lean_dec_ref(x_14); lean_dec(x_7); lean_dec_ref(x_6); lean_dec(x_5); @@ -35996,7 +36387,7 @@ block_41: if (x_21 == 0) { lean_object* x_22; -x_22 = lean_whnf(x_19, x_3, x_4, x_5, x_6); +x_22 = lean_whnf(x_20, x_3, x_4, x_5, x_6); if (lean_obj_tag(x_22) == 0) { lean_object* x_23; @@ -36071,8 +36462,8 @@ goto block_11; } else { -lean_dec(x_25); lean_dec_ref(x_24); +lean_dec(x_25); lean_dec_ref(x_1); x_8 = lean_box(0); goto block_11; @@ -36143,7 +36534,7 @@ return x_38; else { lean_object* x_39; lean_object* x_40; -lean_dec_ref(x_19); +lean_dec_ref(x_20); lean_dec(x_6); lean_dec_ref(x_5); lean_dec(x_4); @@ -36167,15 +36558,15 @@ if (x_44 == 0) { uint8_t x_45; x_45 = l_Lean_Expr_hasFVar(x_43); -x_19 = x_43; -x_20 = lean_box(0); +x_19 = lean_box(0); +x_20 = x_43; x_21 = x_45; goto block_41; } else { -x_19 = x_43; -x_20 = lean_box(0); +x_19 = lean_box(0); +x_20 = x_43; x_21 = x_44; goto block_41; } @@ -36424,10 +36815,10 @@ if (x_72 == 0) { lean_object* x_73; lean_inc(x_69); -lean_inc_ref(x_65); -lean_inc(x_66); -lean_inc_ref(x_71); -x_73 = lean_whnf(x_70, x_71, x_66, x_65, x_69); +lean_inc_ref(x_68); +lean_inc(x_71); +lean_inc_ref(x_67); +x_73 = lean_whnf(x_65, x_67, x_71, x_68, x_69); if (lean_obj_tag(x_73) == 0) { lean_object* x_74; @@ -36465,11 +36856,11 @@ lean_dec_ref(x_79); if (x_81 == 0) { lean_dec_ref(x_78); -lean_dec_ref(x_71); +lean_dec(x_71); +lean_dec(x_70); lean_dec(x_69); -lean_dec(x_67); -lean_dec(x_66); -lean_dec_ref(x_65); +lean_dec_ref(x_68); +lean_dec_ref(x_67); lean_dec_ref(x_1); x_9 = lean_box(0); goto block_12; @@ -36482,11 +36873,11 @@ x_83 = lean_string_dec_eq(x_78, x_82); lean_dec_ref(x_78); if (x_83 == 0) { -lean_dec_ref(x_71); +lean_dec(x_71); +lean_dec(x_70); lean_dec(x_69); -lean_dec(x_67); -lean_dec(x_66); -lean_dec_ref(x_65); +lean_dec_ref(x_68); +lean_dec_ref(x_67); lean_dec_ref(x_1); x_9 = lean_box(0); goto block_12; @@ -36495,11 +36886,11 @@ else { lean_object* x_84; x_84 = lean_unsigned_to_nat(0u); -x_25 = x_67; +x_25 = x_70; x_26 = x_84; -x_27 = x_71; -x_28 = x_66; -x_29 = x_65; +x_27 = x_67; +x_28 = x_71; +x_29 = x_68; x_30 = x_69; x_31 = lean_box(0); goto block_64; @@ -36510,11 +36901,11 @@ else { lean_dec_ref(x_76); lean_dec_ref(x_75); -lean_dec_ref(x_71); +lean_dec(x_71); +lean_dec(x_70); lean_dec(x_69); -lean_dec(x_67); -lean_dec(x_66); -lean_dec_ref(x_65); +lean_dec_ref(x_68); +lean_dec_ref(x_67); lean_dec_ref(x_1); x_9 = lean_box(0); goto block_12; @@ -36522,13 +36913,13 @@ goto block_12; } else { -lean_dec(x_76); lean_dec_ref(x_75); -lean_dec_ref(x_71); +lean_dec(x_76); +lean_dec(x_71); +lean_dec(x_70); lean_dec(x_69); -lean_dec(x_67); -lean_dec(x_66); -lean_dec_ref(x_65); +lean_dec_ref(x_68); +lean_dec_ref(x_67); lean_dec_ref(x_1); x_9 = lean_box(0); goto block_12; @@ -36537,11 +36928,11 @@ goto block_12; else { lean_dec(x_75); -lean_dec_ref(x_71); +lean_dec(x_71); +lean_dec(x_70); lean_dec(x_69); -lean_dec(x_67); -lean_dec(x_66); -lean_dec_ref(x_65); +lean_dec_ref(x_68); +lean_dec_ref(x_67); lean_dec_ref(x_1); x_9 = lean_box(0); goto block_12; @@ -36559,11 +36950,11 @@ lean_object* x_86; x_86 = lean_ctor_get(x_85, 0); lean_inc(x_86); lean_dec_ref(x_85); -x_25 = x_67; +x_25 = x_70; x_26 = x_86; -x_27 = x_71; -x_28 = x_66; -x_29 = x_65; +x_27 = x_67; +x_28 = x_71; +x_29 = x_68; x_30 = x_69; x_31 = lean_box(0); goto block_64; @@ -36571,11 +36962,11 @@ goto block_64; else { lean_dec_ref(x_85); -lean_dec_ref(x_71); +lean_dec(x_71); +lean_dec(x_70); lean_dec(x_69); -lean_dec(x_67); -lean_dec(x_66); -lean_dec_ref(x_65); +lean_dec_ref(x_68); +lean_dec_ref(x_67); lean_dec_ref(x_1); x_9 = lean_box(0); goto block_12; @@ -36584,11 +36975,11 @@ goto block_12; default: { lean_dec(x_74); -lean_dec_ref(x_71); +lean_dec(x_71); +lean_dec(x_70); lean_dec(x_69); -lean_dec(x_67); -lean_dec(x_66); -lean_dec_ref(x_65); +lean_dec_ref(x_68); +lean_dec_ref(x_67); lean_dec_ref(x_1); x_9 = lean_box(0); goto block_12; @@ -36598,11 +36989,11 @@ goto block_12; else { uint8_t x_87; -lean_dec_ref(x_71); +lean_dec(x_71); +lean_dec(x_70); lean_dec(x_69); -lean_dec(x_67); -lean_dec(x_66); -lean_dec_ref(x_65); +lean_dec_ref(x_68); +lean_dec_ref(x_67); lean_dec_ref(x_1); x_87 = !lean_is_exclusive(x_73); if (x_87 == 0) @@ -36624,11 +37015,11 @@ return x_89; else { lean_object* x_90; lean_object* x_91; -lean_dec_ref(x_71); -lean_dec_ref(x_70); +lean_dec(x_71); +lean_dec(x_70); lean_dec(x_69); -lean_dec(x_67); -lean_dec(x_66); +lean_dec_ref(x_68); +lean_dec_ref(x_67); lean_dec_ref(x_65); lean_dec_ref(x_1); x_90 = lean_box(0); @@ -36640,7 +37031,7 @@ return x_91; block_103: { lean_object* x_99; lean_object* x_100; uint8_t x_101; -x_99 = l_Lean_instantiateMVars___at___00__private_Lean_Meta_WHNF_0__Lean_Meta_toCtorWhenK_spec__0___redArg(x_3, x_95); +x_99 = l_Lean_instantiateMVars___at___00__private_Lean_Meta_WHNF_0__Lean_Meta_toCtorWhenK_spec__0___redArg(x_3, x_98); x_100 = lean_ctor_get(x_99, 0); lean_inc(x_100); lean_dec_ref(x_99); @@ -36649,24 +37040,24 @@ if (x_101 == 0) { uint8_t x_102; x_102 = l_Lean_Expr_hasFVar(x_100); -x_65 = x_94; -x_66 = x_95; -x_67 = x_96; -x_68 = lean_box(0); -x_69 = x_97; -x_70 = x_100; +x_65 = x_100; +x_66 = lean_box(0); +x_67 = x_93; +x_68 = x_94; +x_69 = x_95; +x_70 = x_97; x_71 = x_98; x_72 = x_102; goto block_92; } else { -x_65 = x_94; -x_66 = x_95; -x_67 = x_96; -x_68 = lean_box(0); -x_69 = x_97; -x_70 = x_100; +x_65 = x_100; +x_66 = lean_box(0); +x_67 = x_93; +x_68 = x_94; +x_69 = x_95; +x_70 = x_97; x_71 = x_98; x_72 = x_101; goto block_92; @@ -36682,12 +37073,12 @@ uint8_t x_111; x_111 = l_Lean_Expr_hasFVar(x_3); if (x_111 == 0) { -x_93 = lean_box(0); +x_93 = x_105; x_94 = x_107; -x_95 = x_106; -x_96 = x_104; -x_97 = x_108; -x_98 = x_105; +x_95 = x_108; +x_96 = lean_box(0); +x_97 = x_104; +x_98 = x_106; goto block_103; } else @@ -36708,12 +37099,12 @@ return x_113; } else { -x_93 = lean_box(0); +x_93 = x_105; x_94 = x_107; -x_95 = x_106; -x_96 = x_104; -x_97 = x_108; -x_98 = x_105; +x_95 = x_108; +x_96 = lean_box(0); +x_97 = x_104; +x_98 = x_106; goto block_103; } } @@ -36820,8 +37211,8 @@ goto block_16; } else { -lean_dec(x_121); lean_dec_ref(x_120); +lean_dec(x_121); lean_dec(x_7); lean_dec_ref(x_6); lean_dec(x_5); @@ -37359,9 +37750,9 @@ return x_14; block_23: { lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; -x_19 = lean_nat_pow(x_16, x_17); -lean_dec(x_17); +x_19 = lean_nat_pow(x_17, x_16); lean_dec(x_16); +lean_dec(x_17); x_20 = l_Lean_mkRawNatLit(x_19); x_21 = lean_alloc_ctor(1, 1, 0); lean_ctor_set(x_21, 0, x_20); @@ -37425,8 +37816,8 @@ lean_dec(x_29); lean_dec_ref(x_28); lean_dec(x_27); lean_dec_ref(x_26); -x_16 = x_24; -x_17 = x_25; +x_16 = x_25; +x_17 = x_24; x_18 = lean_box(0); goto block_23; } @@ -37458,8 +37849,8 @@ lean_dec_ref(x_26); if (lean_obj_tag(x_51) == 0) { lean_dec_ref(x_51); -x_16 = x_24; -x_17 = x_25; +x_16 = x_25; +x_17 = x_24; x_18 = lean_box(0); goto block_23; } @@ -37501,8 +37892,8 @@ lean_dec(x_29); lean_dec_ref(x_28); lean_dec(x_27); lean_dec_ref(x_26); -x_16 = x_24; -x_17 = x_25; +x_16 = x_25; +x_17 = x_24; x_18 = lean_box(0); goto block_23; } @@ -37534,8 +37925,8 @@ lean_dec_ref(x_26); if (lean_obj_tag(x_65) == 0) { lean_dec_ref(x_65); -x_16 = x_24; -x_17 = x_25; +x_16 = x_25; +x_17 = x_24; x_18 = lean_box(0); goto block_23; } @@ -37588,8 +37979,8 @@ lean_dec(x_29); lean_dec_ref(x_28); lean_dec(x_27); lean_dec_ref(x_26); -x_16 = x_24; -x_17 = x_25; +x_16 = x_25; +x_17 = x_24; x_18 = lean_box(0); goto block_23; } @@ -37626,8 +38017,8 @@ lean_dec_ref(x_26); if (lean_obj_tag(x_82) == 0) { lean_dec_ref(x_82); -x_16 = x_24; -x_17 = x_25; +x_16 = x_25; +x_17 = x_24; x_18 = lean_box(0); goto block_23; } @@ -37712,8 +38103,8 @@ lean_dec(x_29); lean_dec_ref(x_28); lean_dec(x_27); lean_dec_ref(x_26); -x_16 = x_24; -x_17 = x_25; +x_16 = x_25; +x_17 = x_24; x_18 = lean_box(0); goto block_23; } @@ -37755,8 +38146,8 @@ lean_dec_ref(x_26); if (lean_obj_tag(x_106) == 0) { lean_dec_ref(x_106); -x_16 = x_24; -x_17 = x_25; +x_16 = x_25; +x_17 = x_24; x_18 = lean_box(0); goto block_23; } @@ -37817,11 +38208,11 @@ block_141: if (x_121 == 0) { lean_object* x_122; -lean_inc(x_118); -lean_inc_ref(x_120); -lean_inc(x_116); +lean_inc(x_119); lean_inc_ref(x_114); -x_122 = lean_whnf(x_119, x_114, x_116, x_120, x_118); +lean_inc(x_116); +lean_inc_ref(x_115); +x_122 = lean_whnf(x_120, x_115, x_116, x_114, x_119); if (lean_obj_tag(x_122) == 0) { lean_object* x_123; @@ -37859,10 +38250,10 @@ lean_dec_ref(x_128); if (x_130 == 0) { lean_dec_ref(x_127); -lean_dec_ref(x_120); -lean_dec(x_118); +lean_dec(x_119); +lean_dec(x_117); lean_dec(x_116); -lean_dec(x_115); +lean_dec_ref(x_115); lean_dec_ref(x_114); x_8 = lean_box(0); goto block_11; @@ -37875,10 +38266,10 @@ x_132 = lean_string_dec_eq(x_127, x_131); lean_dec_ref(x_127); if (x_132 == 0) { -lean_dec_ref(x_120); -lean_dec(x_118); +lean_dec(x_119); +lean_dec(x_117); lean_dec(x_116); -lean_dec(x_115); +lean_dec_ref(x_115); lean_dec_ref(x_114); x_8 = lean_box(0); goto block_11; @@ -37887,12 +38278,12 @@ else { lean_object* x_133; x_133 = lean_unsigned_to_nat(0u); -x_24 = x_115; +x_24 = x_117; x_25 = x_133; -x_26 = x_114; +x_26 = x_115; x_27 = x_116; -x_28 = x_120; -x_29 = x_118; +x_28 = x_114; +x_29 = x_119; x_30 = lean_box(0); goto block_113; } @@ -37902,10 +38293,10 @@ else { lean_dec_ref(x_125); lean_dec_ref(x_124); -lean_dec_ref(x_120); -lean_dec(x_118); +lean_dec(x_119); +lean_dec(x_117); lean_dec(x_116); -lean_dec(x_115); +lean_dec_ref(x_115); lean_dec_ref(x_114); x_8 = lean_box(0); goto block_11; @@ -37915,10 +38306,10 @@ else { lean_dec(x_125); lean_dec_ref(x_124); -lean_dec_ref(x_120); -lean_dec(x_118); +lean_dec(x_119); +lean_dec(x_117); lean_dec(x_116); -lean_dec(x_115); +lean_dec_ref(x_115); lean_dec_ref(x_114); x_8 = lean_box(0); goto block_11; @@ -37927,10 +38318,10 @@ goto block_11; else { lean_dec(x_124); -lean_dec_ref(x_120); -lean_dec(x_118); +lean_dec(x_119); +lean_dec(x_117); lean_dec(x_116); -lean_dec(x_115); +lean_dec_ref(x_115); lean_dec_ref(x_114); x_8 = lean_box(0); goto block_11; @@ -37948,22 +38339,22 @@ lean_object* x_135; x_135 = lean_ctor_get(x_134, 0); lean_inc(x_135); lean_dec_ref(x_134); -x_24 = x_115; +x_24 = x_117; x_25 = x_135; -x_26 = x_114; +x_26 = x_115; x_27 = x_116; -x_28 = x_120; -x_29 = x_118; +x_28 = x_114; +x_29 = x_119; x_30 = lean_box(0); goto block_113; } else { lean_dec_ref(x_134); -lean_dec_ref(x_120); -lean_dec(x_118); +lean_dec(x_119); +lean_dec(x_117); lean_dec(x_116); -lean_dec(x_115); +lean_dec_ref(x_115); lean_dec_ref(x_114); x_8 = lean_box(0); goto block_11; @@ -37972,10 +38363,10 @@ goto block_11; default: { lean_dec(x_123); -lean_dec_ref(x_120); -lean_dec(x_118); +lean_dec(x_119); +lean_dec(x_117); lean_dec(x_116); -lean_dec(x_115); +lean_dec_ref(x_115); lean_dec_ref(x_114); x_8 = lean_box(0); goto block_11; @@ -37985,10 +38376,10 @@ goto block_11; else { uint8_t x_136; -lean_dec_ref(x_120); -lean_dec(x_118); +lean_dec(x_119); +lean_dec(x_117); lean_dec(x_116); -lean_dec(x_115); +lean_dec_ref(x_115); lean_dec_ref(x_114); x_136 = !lean_is_exclusive(x_122); if (x_136 == 0) @@ -38011,10 +38402,10 @@ else { lean_object* x_139; lean_object* x_140; lean_dec_ref(x_120); -lean_dec_ref(x_119); -lean_dec(x_118); +lean_dec(x_119); +lean_dec(x_117); lean_dec(x_116); -lean_dec(x_115); +lean_dec_ref(x_115); lean_dec_ref(x_114); x_139 = lean_box(0); x_140 = lean_alloc_ctor(0, 1, 0); @@ -38037,10 +38428,10 @@ x_151 = l_Lean_Expr_hasFVar(x_149); x_114 = x_142; x_115 = x_143; x_116 = x_144; -x_117 = lean_box(0); -x_118 = x_146; -x_119 = x_149; -x_120 = x_147; +x_117 = x_145; +x_118 = lean_box(0); +x_119 = x_147; +x_120 = x_149; x_121 = x_151; goto block_141; } @@ -38049,10 +38440,10 @@ else x_114 = x_142; x_115 = x_143; x_116 = x_144; -x_117 = lean_box(0); -x_118 = x_146; -x_119 = x_149; -x_120 = x_147; +x_117 = x_145; +x_118 = lean_box(0); +x_119 = x_147; +x_120 = x_149; x_121 = x_150; goto block_141; } @@ -38067,12 +38458,12 @@ uint8_t x_160; x_160 = l_Lean_Expr_hasFVar(x_2); if (x_160 == 0) { -x_142 = x_154; -x_143 = x_153; +x_142 = x_156; +x_143 = x_154; x_144 = x_155; -x_145 = lean_box(0); -x_146 = x_157; -x_147 = x_156; +x_145 = x_153; +x_146 = lean_box(0); +x_147 = x_157; goto block_152; } else @@ -38092,12 +38483,12 @@ return x_162; } else { -x_142 = x_154; -x_143 = x_153; +x_142 = x_156; +x_143 = x_154; x_144 = x_155; -x_145 = lean_box(0); -x_146 = x_157; -x_147 = x_156; +x_145 = x_153; +x_146 = lean_box(0); +x_147 = x_157; goto block_152; } } @@ -38110,7 +38501,7 @@ lean_inc(x_6); lean_inc_ref(x_5); lean_inc(x_4); lean_inc_ref(x_3); -x_167 = lean_whnf(x_165, x_3, x_4, x_5, x_6); +x_167 = lean_whnf(x_164, x_3, x_4, x_5, x_6); if (lean_obj_tag(x_167) == 0) { lean_object* x_168; @@ -38297,7 +38688,7 @@ return x_183; else { lean_object* x_184; lean_object* x_185; -lean_dec_ref(x_165); +lean_dec_ref(x_164); lean_dec(x_6); lean_dec_ref(x_5); lean_dec(x_4); @@ -38321,15 +38712,15 @@ if (x_189 == 0) { uint8_t x_190; x_190 = l_Lean_Expr_hasFVar(x_188); -x_164 = lean_box(0); -x_165 = x_188; +x_164 = x_188; +x_165 = lean_box(0); x_166 = x_190; goto block_186; } else { -x_164 = lean_box(0); -x_165 = x_188; +x_164 = x_188; +x_165 = lean_box(0); x_166 = x_189; goto block_186; } @@ -38429,7 +38820,7 @@ block_57: if (x_37 == 0) { lean_object* x_38; -x_38 = lean_whnf(x_31, x_33, x_35, x_30, x_36); +x_38 = lean_whnf(x_31, x_34, x_33, x_35, x_36); if (lean_obj_tag(x_38) == 0) { lean_object* x_39; @@ -38587,11 +38978,11 @@ else { lean_object* x_55; lean_object* x_56; lean_dec(x_36); -lean_dec(x_35); -lean_dec_ref(x_33); +lean_dec_ref(x_35); +lean_dec_ref(x_34); +lean_dec(x_33); lean_dec(x_32); lean_dec_ref(x_31); -lean_dec_ref(x_30); lean_dec_ref(x_1); x_55 = lean_box(0); x_56 = lean_alloc_ctor(0, 1, 0); @@ -38602,7 +38993,7 @@ return x_56; block_68: { lean_object* x_64; lean_object* x_65; uint8_t x_66; -x_64 = l_Lean_instantiateMVars___at___00__private_Lean_Meta_WHNF_0__Lean_Meta_toCtorWhenK_spec__0___redArg(x_3, x_62); +x_64 = l_Lean_instantiateMVars___at___00__private_Lean_Meta_WHNF_0__Lean_Meta_toCtorWhenK_spec__0___redArg(x_3, x_59); x_65 = lean_ctor_get(x_64, 0); lean_inc(x_65); lean_dec_ref(x_64); @@ -38611,11 +39002,11 @@ if (x_66 == 0) { uint8_t x_67; x_67 = l_Lean_Expr_hasFVar(x_65); -x_30 = x_58; +x_30 = lean_box(0); x_31 = x_65; -x_32 = x_60; +x_32 = x_58; x_33 = x_59; -x_34 = lean_box(0); +x_34 = x_60; x_35 = x_62; x_36 = x_63; x_37 = x_67; @@ -38623,11 +39014,11 @@ goto block_57; } else { -x_30 = x_58; +x_30 = lean_box(0); x_31 = x_65; -x_32 = x_60; +x_32 = x_58; x_33 = x_59; -x_34 = lean_box(0); +x_34 = x_60; x_35 = x_62; x_36 = x_63; x_37 = x_66; @@ -38644,11 +39035,11 @@ uint8_t x_76; x_76 = l_Lean_Expr_hasFVar(x_3); if (x_76 == 0) { -x_58 = x_72; -x_59 = x_70; -x_60 = x_69; +x_58 = x_69; +x_59 = x_71; +x_60 = x_70; x_61 = lean_box(0); -x_62 = x_71; +x_62 = x_72; x_63 = x_73; goto block_68; } @@ -38670,11 +39061,11 @@ return x_78; } else { -x_58 = x_72; -x_59 = x_70; -x_60 = x_69; +x_58 = x_69; +x_59 = x_71; +x_60 = x_70; x_61 = lean_box(0); -x_62 = x_71; +x_62 = x_72; x_63 = x_73; goto block_68; } @@ -38688,7 +39079,7 @@ lean_inc(x_7); lean_inc_ref(x_6); lean_inc(x_5); lean_inc_ref(x_4); -x_83 = lean_whnf(x_81, x_4, x_5, x_6, x_7); +x_83 = lean_whnf(x_80, x_4, x_5, x_6, x_7); if (lean_obj_tag(x_83) == 0) { lean_object* x_84; @@ -38883,7 +39274,7 @@ return x_99; else { lean_object* x_100; lean_object* x_101; -lean_dec_ref(x_81); +lean_dec_ref(x_80); lean_dec(x_7); lean_dec_ref(x_6); lean_dec(x_5); @@ -38908,15 +39299,15 @@ if (x_105 == 0) { uint8_t x_106; x_106 = l_Lean_Expr_hasFVar(x_104); -x_80 = lean_box(0); -x_81 = x_104; +x_80 = x_104; +x_81 = lean_box(0); x_82 = x_106; goto block_102; } else { -x_80 = lean_box(0); -x_81 = x_104; +x_80 = x_104; +x_81 = lean_box(0); x_82 = x_105; goto block_102; } @@ -39263,8 +39654,8 @@ goto block_14; } else { -lean_dec(x_26); lean_dec_ref(x_25); +lean_dec(x_26); lean_dec_ref(x_15); lean_dec_ref(x_1); lean_dec(x_5); @@ -41759,7 +42150,7 @@ return x_2; LEAN_EXPORT lean_object* l_Lean_Meta_whnfEasyCases___at___00Lean_Meta_whnfImp_spec__3(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { _start: { -uint8_t x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; +lean_object* x_7; uint8_t x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; switch (lean_obj_tag(x_1)) { case 0: { @@ -42489,7 +42880,7 @@ goto _start; } default: { -lean_object* x_165; uint8_t x_166; lean_object* x_167; uint8_t 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; uint8_t x_184; lean_object* x_185; uint8_t 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; uint8_t 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; uint8_t x_208; lean_object* x_209; uint8_t 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; uint8_t x_229; lean_object* x_230; uint8_t 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; uint8_t x_240; lean_object* x_241; uint8_t x_242; lean_object* x_243; lean_object* x_244; lean_object* x_245; lean_object* x_246; lean_object* x_247; uint8_t x_253; uint8_t x_254; lean_object* x_255; uint8_t x_256; lean_object* x_257; lean_object* x_258; lean_object* x_259; lean_object* x_260; uint8_t x_316; lean_object* x_317; uint8_t x_336; uint8_t x_357; +lean_object* x_165; uint8_t x_166; lean_object* x_167; lean_object* x_168; lean_object* x_169; lean_object* x_170; uint8_t x_171; lean_object* x_172; lean_object* x_173; lean_object* x_174; uint8_t x_184; lean_object* x_185; lean_object* x_186; lean_object* x_187; lean_object* x_188; lean_object* x_189; uint8_t x_190; lean_object* x_191; lean_object* x_192; uint8_t x_195; lean_object* x_196; lean_object* x_197; lean_object* x_198; lean_object* x_199; lean_object* x_200; uint8_t x_201; lean_object* x_202; uint8_t x_208; lean_object* x_209; lean_object* x_210; lean_object* x_211; lean_object* x_212; lean_object* x_213; uint8_t x_214; lean_object* x_215; lean_object* x_216; uint8_t x_229; lean_object* x_230; lean_object* x_231; lean_object* x_232; lean_object* x_233; lean_object* x_234; uint8_t x_235; lean_object* x_236; lean_object* x_237; uint8_t x_240; lean_object* x_241; lean_object* x_242; lean_object* x_243; lean_object* x_244; lean_object* x_245; uint8_t x_246; lean_object* x_247; uint8_t x_253; lean_object* x_254; lean_object* x_255; lean_object* x_256; lean_object* x_257; lean_object* x_258; uint8_t x_259; uint8_t x_260; uint8_t x_316; lean_object* x_317; uint8_t x_336; uint8_t x_357; lean_inc_ref(x_1); x_165 = lean_alloc_closure((void*)(l_Lean_Meta_whnfEasyCases___at___00Lean_Meta_whnfImp_spec__3___lam__0___boxed), 7, 1); lean_closure_set(x_165, 0, x_1); @@ -42520,7 +42911,7 @@ lean_ctor_set(x_180, 1, x_179); x_181 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_181, 0, x_173); lean_ctor_set(x_181, 1, x_180); -x_182 = l___private_Lean_Util_Trace_0__Lean_withTraceNode_postCallback___at___00Lean_Meta_whnfImp_spec__1___redArg(x_170, x_168, x_171, x_167, x_166, x_169, x_165, x_181, x_2, x_3, x_4, x_5); +x_182 = l___private_Lean_Util_Trace_0__Lean_withTraceNode_postCallback___at___00Lean_Meta_whnfImp_spec__1___redArg(x_168, x_171, x_169, x_167, x_166, x_170, x_165, x_181, x_2, x_3, x_4, x_5); lean_dec_ref(x_167); return x_182; } @@ -42530,10 +42921,10 @@ lean_object* x_193; x_193 = lean_alloc_ctor(0, 1, 0); lean_ctor_set(x_193, 0, x_191); x_166 = x_184; -x_167 = x_185; -x_168 = x_186; -x_169 = x_188; -x_170 = x_187; +x_167 = x_186; +x_168 = x_185; +x_169 = x_187; +x_170 = x_188; x_171 = x_190; x_172 = x_189; x_173 = x_193; @@ -42550,10 +42941,10 @@ if (x_203 == 0) { lean_ctor_set_tag(x_202, 1); x_166 = x_195; -x_167 = x_196; -x_168 = x_197; -x_169 = x_199; -x_170 = x_198; +x_167 = x_197; +x_168 = x_196; +x_169 = x_198; +x_170 = x_199; x_171 = x_201; x_172 = x_200; x_173 = x_202; @@ -42569,10 +42960,10 @@ lean_dec(x_202); x_205 = lean_alloc_ctor(1, 1, 0); lean_ctor_set(x_205, 0, x_204); x_166 = x_195; -x_167 = x_196; -x_168 = x_197; -x_169 = x_199; -x_170 = x_198; +x_167 = x_197; +x_168 = x_196; +x_169 = x_198; +x_170 = x_199; x_171 = x_201; x_172 = x_200; x_173 = x_205; @@ -42602,7 +42993,7 @@ block_228: { lean_object* x_217; double x_218; double x_219; double x_220; double x_221; double x_222; lean_object* x_223; lean_object* x_224; lean_object* x_225; lean_object* x_226; lean_object* x_227; x_217 = lean_io_mono_nanos_now(); -x_218 = lean_float_of_nat(x_213); +x_218 = lean_float_of_nat(x_211); x_219 = lean_float_once(&l_Lean_Meta_whnfEasyCases___at___00Lean_Meta_whnfImp_spec__3___closed__0, &l_Lean_Meta_whnfEasyCases___at___00Lean_Meta_whnfImp_spec__3___closed__0_once, _init_l_Lean_Meta_whnfEasyCases___at___00Lean_Meta_whnfImp_spec__3___closed__0); x_220 = lean_float_div(x_218, x_219); x_221 = lean_float_of_nat(x_217); @@ -42615,7 +43006,7 @@ lean_ctor_set(x_225, 1, x_224); x_226 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_226, 0, x_215); lean_ctor_set(x_226, 1, x_225); -x_227 = l___private_Lean_Util_Trace_0__Lean_withTraceNode_postCallback___at___00Lean_Meta_whnfImp_spec__1___redArg(x_212, x_210, x_214, x_209, x_208, x_211, x_165, x_226, x_2, x_3, x_4, x_5); +x_227 = l___private_Lean_Util_Trace_0__Lean_withTraceNode_postCallback___at___00Lean_Meta_whnfImp_spec__1___redArg(x_210, x_214, x_212, x_209, x_208, x_213, x_165, x_226, x_2, x_3, x_4, x_5); lean_dec_ref(x_209); return x_227; } @@ -42625,11 +43016,11 @@ lean_object* x_238; x_238 = lean_alloc_ctor(0, 1, 0); lean_ctor_set(x_238, 0, x_236); x_208 = x_229; -x_209 = x_230; -x_210 = x_231; -x_211 = x_234; +x_209 = x_231; +x_210 = x_230; +x_211 = x_232; x_212 = x_233; -x_213 = x_232; +x_213 = x_234; x_214 = x_235; x_215 = x_238; x_216 = lean_box(0); @@ -42645,11 +43036,11 @@ if (x_248 == 0) { lean_ctor_set_tag(x_247, 1); x_208 = x_240; -x_209 = x_241; -x_210 = x_242; -x_211 = x_245; +x_209 = x_242; +x_210 = x_241; +x_211 = x_243; x_212 = x_244; -x_213 = x_243; +x_213 = x_245; x_214 = x_246; x_215 = x_247; x_216 = lean_box(0); @@ -42664,11 +43055,11 @@ lean_dec(x_247); x_250 = lean_alloc_ctor(1, 1, 0); lean_ctor_set(x_250, 0, x_249); x_208 = x_240; -x_209 = x_241; -x_210 = x_242; -x_211 = x_245; +x_209 = x_242; +x_210 = x_241; +x_211 = x_243; x_212 = x_244; -x_213 = x_243; +x_213 = x_245; x_214 = x_246; x_215 = x_250; x_216 = lean_box(0); @@ -42709,7 +43100,7 @@ if (x_264 == 0) { lean_object* x_265; lean_object* x_266; x_265 = lean_io_mono_nanos_now(); -x_266 = l_Lean_Core_checkSystem(x_257, x_4, x_5); +x_266 = l_Lean_Core_checkSystem(x_256, x_4, x_5); if (lean_obj_tag(x_266) == 0) { lean_object* x_267; @@ -42767,12 +43158,12 @@ lean_dec_ref(x_273); if (lean_obj_tag(x_274) == 0) { lean_object* x_275; -x_275 = l___private_Lean_Meta_WHNF_0__Lean_Meta_cache___redArg(x_254, x_1, x_268, x_2, x_3); +x_275 = l___private_Lean_Meta_WHNF_0__Lean_Meta_cache___redArg(x_259, x_1, x_268, x_2, x_3); x_240 = x_253; -x_241 = x_255; -x_242 = x_256; +x_241 = x_254; +x_242 = x_255; x_243 = x_265; -x_244 = x_258; +x_244 = x_257; x_245 = x_262; x_246 = x_260; x_247 = x_275; @@ -42796,12 +43187,12 @@ lean_object* x_278; lean_object* x_279; x_278 = lean_ctor_get(x_277, 0); lean_inc(x_278); lean_dec_ref(x_277); -x_279 = l___private_Lean_Meta_WHNF_0__Lean_Meta_cache___redArg(x_254, x_1, x_278, x_2, x_3); +x_279 = l___private_Lean_Meta_WHNF_0__Lean_Meta_cache___redArg(x_259, x_1, x_278, x_2, x_3); x_240 = x_253; -x_241 = x_255; -x_242 = x_256; +x_241 = x_254; +x_242 = x_255; x_243 = x_265; -x_244 = x_258; +x_244 = x_257; x_245 = x_262; x_246 = x_260; x_247 = x_279; @@ -42811,10 +43202,10 @@ else { lean_dec_ref(x_1); x_240 = x_253; -x_241 = x_255; -x_242 = x_256; +x_241 = x_254; +x_242 = x_255; x_243 = x_265; -x_244 = x_258; +x_244 = x_257; x_245 = x_262; x_246 = x_260; x_247 = x_277; @@ -42831,10 +43222,10 @@ x_280 = lean_ctor_get(x_273, 0); lean_inc(x_280); lean_dec_ref(x_273); x_229 = x_253; -x_230 = x_255; -x_231 = x_256; +x_230 = x_254; +x_231 = x_255; x_232 = x_265; -x_233 = x_258; +x_233 = x_257; x_234 = x_262; x_235 = x_260; x_236 = x_280; @@ -42849,12 +43240,12 @@ lean_dec(x_268); x_281 = lean_ctor_get(x_272, 0); lean_inc(x_281); lean_dec_ref(x_272); -x_282 = l___private_Lean_Meta_WHNF_0__Lean_Meta_cache___redArg(x_254, x_1, x_281, x_2, x_3); +x_282 = l___private_Lean_Meta_WHNF_0__Lean_Meta_cache___redArg(x_259, x_1, x_281, x_2, x_3); x_240 = x_253; -x_241 = x_255; -x_242 = x_256; +x_241 = x_254; +x_242 = x_255; x_243 = x_265; -x_244 = x_258; +x_244 = x_257; x_245 = x_262; x_246 = x_260; x_247 = x_282; @@ -42870,10 +43261,10 @@ x_283 = lean_ctor_get(x_271, 0); lean_inc(x_283); lean_dec_ref(x_271); x_229 = x_253; -x_230 = x_255; -x_231 = x_256; +x_230 = x_254; +x_231 = x_255; x_232 = x_265; -x_233 = x_258; +x_233 = x_257; x_234 = x_262; x_235 = x_260; x_236 = x_283; @@ -42888,12 +43279,12 @@ lean_dec(x_268); x_284 = lean_ctor_get(x_270, 0); lean_inc(x_284); lean_dec_ref(x_270); -x_285 = l___private_Lean_Meta_WHNF_0__Lean_Meta_cache___redArg(x_254, x_1, x_284, x_2, x_3); +x_285 = l___private_Lean_Meta_WHNF_0__Lean_Meta_cache___redArg(x_259, x_1, x_284, x_2, x_3); x_240 = x_253; -x_241 = x_255; -x_242 = x_256; +x_241 = x_254; +x_242 = x_255; x_243 = x_265; -x_244 = x_258; +x_244 = x_257; x_245 = x_262; x_246 = x_260; x_247 = x_285; @@ -42909,10 +43300,10 @@ x_286 = lean_ctor_get(x_269, 0); lean_inc(x_286); lean_dec_ref(x_269); x_229 = x_253; -x_230 = x_255; -x_231 = x_256; +x_230 = x_254; +x_231 = x_255; x_232 = x_265; -x_233 = x_258; +x_233 = x_257; x_234 = x_262; x_235 = x_260; x_236 = x_286; @@ -42924,10 +43315,10 @@ else { lean_dec_ref(x_1); x_240 = x_253; -x_241 = x_255; -x_242 = x_256; +x_241 = x_254; +x_242 = x_255; x_243 = x_265; -x_244 = x_258; +x_244 = x_257; x_245 = x_262; x_246 = x_260; x_247 = x_267; @@ -42942,10 +43333,10 @@ x_287 = lean_ctor_get(x_266, 0); lean_inc(x_287); lean_dec_ref(x_266); x_229 = x_253; -x_230 = x_255; -x_231 = x_256; +x_230 = x_254; +x_231 = x_255; x_232 = x_265; -x_233 = x_258; +x_233 = x_257; x_234 = x_262; x_235 = x_260; x_236 = x_287; @@ -42957,7 +43348,7 @@ else { lean_object* x_288; lean_object* x_289; x_288 = lean_io_get_num_heartbeats(); -x_289 = l_Lean_Core_checkSystem(x_257, x_4, x_5); +x_289 = l_Lean_Core_checkSystem(x_256, x_4, x_5); if (lean_obj_tag(x_289) == 0) { lean_object* x_290; @@ -43016,11 +43407,11 @@ lean_dec_ref(x_297); if (lean_obj_tag(x_298) == 0) { lean_object* x_299; -x_299 = l___private_Lean_Meta_WHNF_0__Lean_Meta_cache___redArg(x_254, x_1, x_291, x_2, x_3); +x_299 = l___private_Lean_Meta_WHNF_0__Lean_Meta_cache___redArg(x_259, x_1, x_291, x_2, x_3); x_195 = x_253; -x_196 = x_255; -x_197 = x_256; -x_198 = x_258; +x_196 = x_254; +x_197 = x_255; +x_198 = x_257; x_199 = x_262; x_200 = x_288; x_201 = x_260; @@ -43045,11 +43436,11 @@ lean_object* x_302; lean_object* x_303; x_302 = lean_ctor_get(x_301, 0); lean_inc(x_302); lean_dec_ref(x_301); -x_303 = l___private_Lean_Meta_WHNF_0__Lean_Meta_cache___redArg(x_254, x_1, x_302, x_2, x_3); +x_303 = l___private_Lean_Meta_WHNF_0__Lean_Meta_cache___redArg(x_259, x_1, x_302, x_2, x_3); x_195 = x_253; -x_196 = x_255; -x_197 = x_256; -x_198 = x_258; +x_196 = x_254; +x_197 = x_255; +x_198 = x_257; x_199 = x_262; x_200 = x_288; x_201 = x_260; @@ -43060,9 +43451,9 @@ else { lean_dec_ref(x_1); x_195 = x_253; -x_196 = x_255; -x_197 = x_256; -x_198 = x_258; +x_196 = x_254; +x_197 = x_255; +x_198 = x_257; x_199 = x_262; x_200 = x_288; x_201 = x_260; @@ -43080,9 +43471,9 @@ x_304 = lean_ctor_get(x_297, 0); lean_inc(x_304); lean_dec_ref(x_297); x_184 = x_253; -x_185 = x_255; -x_186 = x_256; -x_187 = x_258; +x_185 = x_254; +x_186 = x_255; +x_187 = x_257; x_188 = x_262; x_189 = x_288; x_190 = x_260; @@ -43098,11 +43489,11 @@ lean_dec(x_291); x_305 = lean_ctor_get(x_295, 0); lean_inc(x_305); lean_dec_ref(x_295); -x_306 = l___private_Lean_Meta_WHNF_0__Lean_Meta_cache___redArg(x_254, x_1, x_305, x_2, x_3); +x_306 = l___private_Lean_Meta_WHNF_0__Lean_Meta_cache___redArg(x_259, x_1, x_305, x_2, x_3); x_195 = x_253; -x_196 = x_255; -x_197 = x_256; -x_198 = x_258; +x_196 = x_254; +x_197 = x_255; +x_198 = x_257; x_199 = x_262; x_200 = x_288; x_201 = x_260; @@ -43119,9 +43510,9 @@ x_307 = lean_ctor_get(x_294, 0); lean_inc(x_307); lean_dec_ref(x_294); x_184 = x_253; -x_185 = x_255; -x_186 = x_256; -x_187 = x_258; +x_185 = x_254; +x_186 = x_255; +x_187 = x_257; x_188 = x_262; x_189 = x_288; x_190 = x_260; @@ -43137,11 +43528,11 @@ lean_dec(x_291); x_308 = lean_ctor_get(x_293, 0); lean_inc(x_308); lean_dec_ref(x_293); -x_309 = l___private_Lean_Meta_WHNF_0__Lean_Meta_cache___redArg(x_254, x_1, x_308, x_2, x_3); +x_309 = l___private_Lean_Meta_WHNF_0__Lean_Meta_cache___redArg(x_259, x_1, x_308, x_2, x_3); x_195 = x_253; -x_196 = x_255; -x_197 = x_256; -x_198 = x_258; +x_196 = x_254; +x_197 = x_255; +x_198 = x_257; x_199 = x_262; x_200 = x_288; x_201 = x_260; @@ -43158,9 +43549,9 @@ x_310 = lean_ctor_get(x_292, 0); lean_inc(x_310); lean_dec_ref(x_292); x_184 = x_253; -x_185 = x_255; -x_186 = x_256; -x_187 = x_258; +x_185 = x_254; +x_186 = x_255; +x_187 = x_257; x_188 = x_262; x_189 = x_288; x_190 = x_260; @@ -43173,9 +43564,9 @@ else { lean_dec_ref(x_1); x_195 = x_253; -x_196 = x_255; -x_197 = x_256; -x_198 = x_258; +x_196 = x_254; +x_197 = x_255; +x_198 = x_257; x_199 = x_262; x_200 = x_288; x_201 = x_260; @@ -43191,9 +43582,9 @@ x_311 = lean_ctor_get(x_289, 0); lean_inc(x_311); lean_dec_ref(x_289); x_184 = x_253; -x_185 = x_255; -x_186 = x_256; -x_187 = x_258; +x_185 = x_254; +x_186 = x_255; +x_187 = x_257; x_188 = x_262; x_189 = x_288; x_190 = x_260; @@ -43206,10 +43597,10 @@ goto block_194; else { uint8_t x_312; -lean_dec_ref(x_260); -lean_dec(x_258); lean_dec_ref(x_257); +lean_dec_ref(x_256); lean_dec_ref(x_255); +lean_dec(x_254); lean_dec_ref(x_165); lean_dec(x_5); lean_dec_ref(x_4); @@ -43242,8 +43633,8 @@ x_320 = ((lean_object*)(l_Lean_Meta_whnfEasyCases___at___00__private_Lean_Meta_W if (x_319 == 0) { lean_dec_ref(x_165); -x_7 = x_316; -x_8 = x_320; +x_7 = x_320; +x_8 = x_316; x_9 = x_2; x_10 = x_3; x_11 = x_4; @@ -43273,8 +43664,8 @@ if (x_327 == 0) { lean_dec(x_323); lean_dec_ref(x_165); -x_7 = x_316; -x_8 = x_320; +x_7 = x_320; +x_8 = x_316; x_9 = x_2; x_10 = x_3; x_11 = x_4; @@ -43289,13 +43680,13 @@ x_328 = lean_unbox(x_323); lean_dec(x_323); lean_inc_ref(x_318); x_253 = x_328; -x_254 = x_316; +x_254 = x_321; x_255 = x_318; -x_256 = x_319; -x_257 = x_320; -x_258 = x_321; -x_259 = lean_box(0); -x_260 = x_324; +x_256 = x_320; +x_257 = x_324; +x_258 = lean_box(0); +x_259 = x_316; +x_260 = x_319; goto block_315; } } @@ -43306,13 +43697,13 @@ x_329 = lean_unbox(x_323); lean_dec(x_323); lean_inc_ref(x_318); x_253 = x_329; -x_254 = x_316; +x_254 = x_321; x_255 = x_318; -x_256 = x_319; -x_257 = x_320; -x_258 = x_321; -x_259 = lean_box(0); -x_260 = x_324; +x_256 = x_320; +x_257 = x_324; +x_258 = lean_box(0); +x_259 = x_316; +x_260 = x_319; goto block_315; } } @@ -43483,7 +43874,7 @@ goto block_335; block_45: { lean_object* x_14; -x_14 = l_Lean_Core_checkSystem(x_8, x_11, x_12); +x_14 = l_Lean_Core_checkSystem(x_7, x_11, x_12); if (lean_obj_tag(x_14) == 0) { lean_object* x_15; @@ -43544,7 +43935,7 @@ if (lean_obj_tag(x_23) == 0) lean_object* x_24; lean_dec(x_12); lean_dec_ref(x_11); -x_24 = l___private_Lean_Meta_WHNF_0__Lean_Meta_cache___redArg(x_7, x_1, x_16, x_9, x_10); +x_24 = l___private_Lean_Meta_WHNF_0__Lean_Meta_cache___redArg(x_8, x_1, x_16, x_9, x_10); lean_dec(x_10); lean_dec_ref(x_9); return x_24; @@ -43565,7 +43956,7 @@ lean_object* x_27; lean_object* x_28; x_27 = lean_ctor_get(x_26, 0); lean_inc(x_27); lean_dec_ref(x_26); -x_28 = l___private_Lean_Meta_WHNF_0__Lean_Meta_cache___redArg(x_7, x_1, x_27, x_9, x_10); +x_28 = l___private_Lean_Meta_WHNF_0__Lean_Meta_cache___redArg(x_8, x_1, x_27, x_9, x_10); lean_dec(x_10); lean_dec_ref(x_9); return x_28; @@ -43614,7 +44005,7 @@ lean_dec_ref(x_11); x_32 = lean_ctor_get(x_20, 0); lean_inc(x_32); lean_dec_ref(x_20); -x_33 = l___private_Lean_Meta_WHNF_0__Lean_Meta_cache___redArg(x_7, x_1, x_32, x_9, x_10); +x_33 = l___private_Lean_Meta_WHNF_0__Lean_Meta_cache___redArg(x_8, x_1, x_32, x_9, x_10); lean_dec(x_10); lean_dec_ref(x_9); return x_33; @@ -43655,7 +44046,7 @@ lean_dec_ref(x_11); x_37 = lean_ctor_get(x_18, 0); lean_inc(x_37); lean_dec_ref(x_18); -x_38 = l___private_Lean_Meta_WHNF_0__Lean_Meta_cache___redArg(x_7, x_1, x_37, x_9, x_10); +x_38 = l___private_Lean_Meta_WHNF_0__Lean_Meta_cache___redArg(x_8, x_1, x_37, x_9, x_10); lean_dec(x_10); lean_dec_ref(x_9); return x_38; diff --git a/stage0/stdlib/Lean/ProjFns.c b/stage0/stdlib/Lean/ProjFns.c index b91c749518..16f7225263 100644 --- a/stage0/stdlib/Lean/ProjFns.c +++ b/stage0/stdlib/Lean/ProjFns.c @@ -134,6 +134,48 @@ LEAN_EXPORT lean_object* l_Lean_isProjectionFn(lean_object*, lean_object*, lean_ LEAN_EXPORT lean_object* l_Lean_getProjectionFnInfo_x3f___redArg___lam__0(lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_getProjectionFnInfo_x3f___redArg(lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Lean_getProjectionFnInfo_x3f(lean_object*, lean_object*, lean_object*, lean_object*); +static const lean_ctor_object l_Lean_instInhabitedAuxParentProjectionInfo_default___closed__0_value = {.m_header = {.m_rc = 0, .m_cs_sz = sizeof(lean_ctor_object) + sizeof(void*)*1 + 8, .m_other = 1, .m_tag = 0}, .m_objs = {((lean_object*)(((size_t)(0) << 1) | 1)),LEAN_SCALAR_PTR_LITERAL(0, 0, 0, 0, 0, 0, 0, 0)}}; +static const lean_object* l_Lean_instInhabitedAuxParentProjectionInfo_default___closed__0 = (const lean_object*)&l_Lean_instInhabitedAuxParentProjectionInfo_default___closed__0_value; +LEAN_EXPORT const lean_object* l_Lean_instInhabitedAuxParentProjectionInfo_default = (const lean_object*)&l_Lean_instInhabitedAuxParentProjectionInfo_default___closed__0_value; +LEAN_EXPORT const lean_object* l_Lean_instInhabitedAuxParentProjectionInfo = (const lean_object*)&l_Lean_instInhabitedAuxParentProjectionInfo_default___closed__0_value; +static const lean_ctor_object l_Lean_instReprAuxParentProjectionInfo_repr___redArg___closed__0_value = {.m_header = {.m_rc = 0, .m_cs_sz = sizeof(lean_ctor_object) + sizeof(void*)*2 + 0, .m_other = 2, .m_tag = 5}, .m_objs = {((lean_object*)(((size_t)(0) << 1) | 1)),((lean_object*)&l_Lean_instReprProjectionFunctionInfo_repr___redArg___closed__11_value)}}; +static const lean_object* l_Lean_instReprAuxParentProjectionInfo_repr___redArg___closed__0 = (const lean_object*)&l_Lean_instReprAuxParentProjectionInfo_repr___redArg___closed__0_value; +static const lean_ctor_object l_Lean_instReprAuxParentProjectionInfo_repr___redArg___closed__1_value = {.m_header = {.m_rc = 0, .m_cs_sz = sizeof(lean_ctor_object) + sizeof(void*)*2 + 0, .m_other = 2, .m_tag = 5}, .m_objs = {((lean_object*)&l_Lean_instReprAuxParentProjectionInfo_repr___redArg___closed__0_value),((lean_object*)&l_Lean_instReprProjectionFunctionInfo_repr___redArg___closed__5_value)}}; +static const lean_object* l_Lean_instReprAuxParentProjectionInfo_repr___redArg___closed__1 = (const lean_object*)&l_Lean_instReprAuxParentProjectionInfo_repr___redArg___closed__1_value; +LEAN_EXPORT lean_object* l_Lean_instReprAuxParentProjectionInfo_repr___redArg(lean_object*); +LEAN_EXPORT lean_object* l_Lean_instReprAuxParentProjectionInfo_repr(lean_object*, lean_object*); +LEAN_EXPORT lean_object* l_Lean_instReprAuxParentProjectionInfo_repr___boxed(lean_object*, lean_object*); +static const lean_closure_object l_Lean_instReprAuxParentProjectionInfo___closed__0_value = {.m_header = {.m_rc = 0, .m_cs_sz = sizeof(lean_closure_object) + sizeof(void*)*0, .m_other = 0, .m_tag = 245}, .m_fun = (void*)l_Lean_instReprAuxParentProjectionInfo_repr___boxed, .m_arity = 2, .m_num_fixed = 0, .m_objs = {} }; +static const lean_object* l_Lean_instReprAuxParentProjectionInfo___closed__0 = (const lean_object*)&l_Lean_instReprAuxParentProjectionInfo___closed__0_value; +LEAN_EXPORT const lean_object* l_Lean_instReprAuxParentProjectionInfo = (const lean_object*)&l_Lean_instReprAuxParentProjectionInfo___closed__0_value; +LEAN_EXPORT lean_object* l___private_Init_Data_Array_Basic_0__Array_foldlMUnsafe_fold___at___00Lean_initFn_00___x40_Lean_ProjFns_496916995____hygCtx___hyg_2__spec__1(lean_object*, lean_object*, size_t, size_t, lean_object*); +LEAN_EXPORT lean_object* l___private_Init_Data_Array_Basic_0__Array_foldlMUnsafe_fold___at___00Lean_initFn_00___x40_Lean_ProjFns_496916995____hygCtx___hyg_2__spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +LEAN_EXPORT lean_object* l_Std_DTreeMap_Internal_Impl_foldlM___at___00Std_DTreeMap_Internal_Impl_foldl___at___00Lean_initFn_00___x40_Lean_ProjFns_496916995____hygCtx___hyg_2__spec__0_spec__0(lean_object*, lean_object*); +LEAN_EXPORT lean_object* l_Std_DTreeMap_Internal_Impl_foldlM___at___00Std_DTreeMap_Internal_Impl_foldl___at___00Lean_initFn_00___x40_Lean_ProjFns_496916995____hygCtx___hyg_2__spec__0_spec__0___boxed(lean_object*, lean_object*); +static lean_once_cell_t l_Lean_initFn___lam__0___closed__0_00___x40_Lean_ProjFns_496916995____hygCtx___hyg_2__once = LEAN_ONCE_CELL_INITIALIZER; +static lean_object* l_Lean_initFn___lam__0___closed__0_00___x40_Lean_ProjFns_496916995____hygCtx___hyg_2_; +static lean_once_cell_t l_Lean_initFn___lam__0___closed__1_00___x40_Lean_ProjFns_496916995____hygCtx___hyg_2__once = LEAN_ONCE_CELL_INITIALIZER; +static lean_object* l_Lean_initFn___lam__0___closed__1_00___x40_Lean_ProjFns_496916995____hygCtx___hyg_2_; +LEAN_EXPORT lean_object* l_Lean_initFn___lam__0_00___x40_Lean_ProjFns_496916995____hygCtx___hyg_2_(lean_object*, lean_object*, uint8_t); +LEAN_EXPORT lean_object* l_Lean_initFn___lam__0_00___x40_Lean_ProjFns_496916995____hygCtx___hyg_2____boxed(lean_object*, lean_object*, lean_object*); +static const lean_closure_object l_Lean_initFn___closed__0_00___x40_Lean_ProjFns_496916995____hygCtx___hyg_2__value = {.m_header = {.m_rc = 0, .m_cs_sz = sizeof(lean_closure_object) + sizeof(void*)*0, .m_other = 0, .m_tag = 245}, .m_fun = (void*)l_Lean_initFn___lam__0_00___x40_Lean_ProjFns_496916995____hygCtx___hyg_2____boxed, .m_arity = 3, .m_num_fixed = 0, .m_objs = {} }; +static const lean_object* l_Lean_initFn___closed__0_00___x40_Lean_ProjFns_496916995____hygCtx___hyg_2_ = (const lean_object*)&l_Lean_initFn___closed__0_00___x40_Lean_ProjFns_496916995____hygCtx___hyg_2__value; +static const lean_string_object l_Lean_initFn___closed__1_00___x40_Lean_ProjFns_496916995____hygCtx___hyg_2__value = {.m_header = {.m_rc = 0, .m_cs_sz = 0, .m_other = 0, .m_tag = 249}, .m_size = 21, .m_capacity = 21, .m_length = 20, .m_data = "auxParentProjInfoExt"}; +static const lean_object* l_Lean_initFn___closed__1_00___x40_Lean_ProjFns_496916995____hygCtx___hyg_2_ = (const lean_object*)&l_Lean_initFn___closed__1_00___x40_Lean_ProjFns_496916995____hygCtx___hyg_2__value; +static const lean_ctor_object l_Lean_initFn___closed__2_00___x40_Lean_ProjFns_496916995____hygCtx___hyg_2__value_aux_0 = {.m_header = {.m_rc = 0, .m_cs_sz = sizeof(lean_ctor_object) + sizeof(void*)*2 + 8, .m_other = 2, .m_tag = 1}, .m_objs = {((lean_object*)(((size_t)(0) << 1) | 1)),((lean_object*)&l_Lean_initFn___closed__1_00___x40_Lean_ProjFns_2268652983____hygCtx___hyg_2__value),LEAN_SCALAR_PTR_LITERAL(70, 193, 83, 126, 233, 67, 208, 165)}}; +static const lean_ctor_object l_Lean_initFn___closed__2_00___x40_Lean_ProjFns_496916995____hygCtx___hyg_2__value = {.m_header = {.m_rc = 0, .m_cs_sz = sizeof(lean_ctor_object) + sizeof(void*)*2 + 8, .m_other = 2, .m_tag = 1}, .m_objs = {((lean_object*)&l_Lean_initFn___closed__2_00___x40_Lean_ProjFns_496916995____hygCtx___hyg_2__value_aux_0),((lean_object*)&l_Lean_initFn___closed__1_00___x40_Lean_ProjFns_496916995____hygCtx___hyg_2__value),LEAN_SCALAR_PTR_LITERAL(4, 64, 229, 66, 82, 134, 114, 43)}}; +static const lean_object* l_Lean_initFn___closed__2_00___x40_Lean_ProjFns_496916995____hygCtx___hyg_2_ = (const lean_object*)&l_Lean_initFn___closed__2_00___x40_Lean_ProjFns_496916995____hygCtx___hyg_2__value; +LEAN_EXPORT lean_object* l_Lean_initFn_00___x40_Lean_ProjFns_496916995____hygCtx___hyg_2_(); +LEAN_EXPORT lean_object* l_Lean_initFn_00___x40_Lean_ProjFns_496916995____hygCtx___hyg_2____boxed(lean_object*); +LEAN_EXPORT lean_object* l_Std_DTreeMap_Internal_Impl_foldl___at___00Lean_initFn_00___x40_Lean_ProjFns_496916995____hygCtx___hyg_2__spec__0(lean_object*, lean_object*); +LEAN_EXPORT lean_object* l_Std_DTreeMap_Internal_Impl_foldl___at___00Lean_initFn_00___x40_Lean_ProjFns_496916995____hygCtx___hyg_2__spec__0___boxed(lean_object*, lean_object*); +LEAN_EXPORT lean_object* l_Lean_auxParentProjInfoExt; +LEAN_EXPORT lean_object* l_Lean_addAuxParentProjectionInfo(lean_object*, lean_object*, lean_object*, uint8_t); +LEAN_EXPORT lean_object* l_Lean_addAuxParentProjectionInfo___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +LEAN_EXPORT lean_object* l_Lean_Environment_getAuxParentProjectionInfo_x3f(lean_object*, lean_object*); +LEAN_EXPORT lean_object* l_Lean_getAuxParentProjectionInfo_x3f___redArg___lam__0(lean_object*, lean_object*, lean_object*); +LEAN_EXPORT lean_object* l_Lean_getAuxParentProjectionInfo_x3f___redArg(lean_object*, lean_object*, lean_object*); +LEAN_EXPORT lean_object* l_Lean_getAuxParentProjectionInfo_x3f(lean_object*, lean_object*, lean_object*, lean_object*); LEAN_EXPORT lean_object* l_Nat_cast___at___00Lean_instReprProjectionFunctionInfo_repr_spec__0(lean_object* x_1) { _start: { @@ -800,6 +842,441 @@ x_5 = l_Lean_getProjectionFnInfo_x3f___redArg(x_2, x_3, x_4); return x_5; } } +LEAN_EXPORT lean_object* l_Lean_instReprAuxParentProjectionInfo_repr___redArg(lean_object* x_1) { +_start: +{ +uint8_t x_2; +x_2 = !lean_is_exclusive(x_1); +if (x_2 == 0) +{ +lean_object* x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; uint8_t x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; +x_3 = lean_ctor_get(x_1, 0); +x_4 = lean_ctor_get_uint8(x_1, sizeof(void*)*1); +x_5 = ((lean_object*)(l_Lean_instReprProjectionFunctionInfo_repr___redArg___closed__5)); +x_6 = ((lean_object*)(l_Lean_instReprAuxParentProjectionInfo_repr___redArg___closed__1)); +x_7 = lean_obj_once(&l_Lean_instReprProjectionFunctionInfo_repr___redArg___closed__12, &l_Lean_instReprProjectionFunctionInfo_repr___redArg___closed__12_once, _init_l_Lean_instReprProjectionFunctionInfo_repr___redArg___closed__12); +x_8 = l_Nat_reprFast(x_3); +x_9 = lean_alloc_ctor(3, 1, 0); +lean_ctor_set(x_9, 0, x_8); +x_10 = lean_alloc_ctor(4, 2, 0); +lean_ctor_set(x_10, 0, x_7); +lean_ctor_set(x_10, 1, x_9); +x_11 = 0; +lean_ctor_set_tag(x_1, 6); +lean_ctor_set(x_1, 0, x_10); +lean_ctor_set_uint8(x_1, sizeof(void*)*1, x_11); +x_12 = lean_alloc_ctor(5, 2, 0); +lean_ctor_set(x_12, 0, x_6); +lean_ctor_set(x_12, 1, x_1); +x_13 = ((lean_object*)(l_Lean_instReprProjectionFunctionInfo_repr___redArg___closed__9)); +x_14 = lean_alloc_ctor(5, 2, 0); +lean_ctor_set(x_14, 0, x_12); +lean_ctor_set(x_14, 1, x_13); +x_15 = lean_box(1); +x_16 = lean_alloc_ctor(5, 2, 0); +lean_ctor_set(x_16, 0, x_14); +lean_ctor_set(x_16, 1, x_15); +x_17 = ((lean_object*)(l_Lean_instReprProjectionFunctionInfo_repr___redArg___closed__17)); +x_18 = lean_alloc_ctor(5, 2, 0); +lean_ctor_set(x_18, 0, x_16); +lean_ctor_set(x_18, 1, x_17); +x_19 = lean_alloc_ctor(5, 2, 0); +lean_ctor_set(x_19, 0, x_18); +lean_ctor_set(x_19, 1, x_5); +x_20 = l_Bool_repr___redArg(x_4); +x_21 = lean_alloc_ctor(4, 2, 0); +lean_ctor_set(x_21, 0, x_7); +lean_ctor_set(x_21, 1, x_20); +x_22 = lean_alloc_ctor(6, 1, 1); +lean_ctor_set(x_22, 0, x_21); +lean_ctor_set_uint8(x_22, sizeof(void*)*1, x_11); +x_23 = lean_alloc_ctor(5, 2, 0); +lean_ctor_set(x_23, 0, x_19); +lean_ctor_set(x_23, 1, x_22); +x_24 = lean_obj_once(&l_Lean_instReprProjectionFunctionInfo_repr___redArg___closed__20, &l_Lean_instReprProjectionFunctionInfo_repr___redArg___closed__20_once, _init_l_Lean_instReprProjectionFunctionInfo_repr___redArg___closed__20); +x_25 = ((lean_object*)(l_Lean_instReprProjectionFunctionInfo_repr___redArg___closed__21)); +x_26 = lean_alloc_ctor(5, 2, 0); +lean_ctor_set(x_26, 0, x_25); +lean_ctor_set(x_26, 1, x_23); +x_27 = ((lean_object*)(l_Lean_instReprProjectionFunctionInfo_repr___redArg___closed__22)); +x_28 = lean_alloc_ctor(5, 2, 0); +lean_ctor_set(x_28, 0, x_26); +lean_ctor_set(x_28, 1, x_27); +x_29 = lean_alloc_ctor(4, 2, 0); +lean_ctor_set(x_29, 0, x_24); +lean_ctor_set(x_29, 1, x_28); +x_30 = lean_alloc_ctor(6, 1, 1); +lean_ctor_set(x_30, 0, x_29); +lean_ctor_set_uint8(x_30, sizeof(void*)*1, x_11); +return x_30; +} +else +{ +lean_object* x_31; uint8_t x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; uint8_t x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_object* x_51; lean_object* x_52; lean_object* x_53; lean_object* x_54; lean_object* x_55; lean_object* x_56; lean_object* x_57; lean_object* x_58; lean_object* x_59; +x_31 = lean_ctor_get(x_1, 0); +x_32 = lean_ctor_get_uint8(x_1, sizeof(void*)*1); +lean_inc(x_31); +lean_dec(x_1); +x_33 = ((lean_object*)(l_Lean_instReprProjectionFunctionInfo_repr___redArg___closed__5)); +x_34 = ((lean_object*)(l_Lean_instReprAuxParentProjectionInfo_repr___redArg___closed__1)); +x_35 = lean_obj_once(&l_Lean_instReprProjectionFunctionInfo_repr___redArg___closed__12, &l_Lean_instReprProjectionFunctionInfo_repr___redArg___closed__12_once, _init_l_Lean_instReprProjectionFunctionInfo_repr___redArg___closed__12); +x_36 = l_Nat_reprFast(x_31); +x_37 = lean_alloc_ctor(3, 1, 0); +lean_ctor_set(x_37, 0, x_36); +x_38 = lean_alloc_ctor(4, 2, 0); +lean_ctor_set(x_38, 0, x_35); +lean_ctor_set(x_38, 1, x_37); +x_39 = 0; +x_40 = lean_alloc_ctor(6, 1, 1); +lean_ctor_set(x_40, 0, x_38); +lean_ctor_set_uint8(x_40, sizeof(void*)*1, x_39); +x_41 = lean_alloc_ctor(5, 2, 0); +lean_ctor_set(x_41, 0, x_34); +lean_ctor_set(x_41, 1, x_40); +x_42 = ((lean_object*)(l_Lean_instReprProjectionFunctionInfo_repr___redArg___closed__9)); +x_43 = lean_alloc_ctor(5, 2, 0); +lean_ctor_set(x_43, 0, x_41); +lean_ctor_set(x_43, 1, x_42); +x_44 = lean_box(1); +x_45 = lean_alloc_ctor(5, 2, 0); +lean_ctor_set(x_45, 0, x_43); +lean_ctor_set(x_45, 1, x_44); +x_46 = ((lean_object*)(l_Lean_instReprProjectionFunctionInfo_repr___redArg___closed__17)); +x_47 = lean_alloc_ctor(5, 2, 0); +lean_ctor_set(x_47, 0, x_45); +lean_ctor_set(x_47, 1, x_46); +x_48 = lean_alloc_ctor(5, 2, 0); +lean_ctor_set(x_48, 0, x_47); +lean_ctor_set(x_48, 1, x_33); +x_49 = l_Bool_repr___redArg(x_32); +x_50 = lean_alloc_ctor(4, 2, 0); +lean_ctor_set(x_50, 0, x_35); +lean_ctor_set(x_50, 1, x_49); +x_51 = lean_alloc_ctor(6, 1, 1); +lean_ctor_set(x_51, 0, x_50); +lean_ctor_set_uint8(x_51, sizeof(void*)*1, x_39); +x_52 = lean_alloc_ctor(5, 2, 0); +lean_ctor_set(x_52, 0, x_48); +lean_ctor_set(x_52, 1, x_51); +x_53 = lean_obj_once(&l_Lean_instReprProjectionFunctionInfo_repr___redArg___closed__20, &l_Lean_instReprProjectionFunctionInfo_repr___redArg___closed__20_once, _init_l_Lean_instReprProjectionFunctionInfo_repr___redArg___closed__20); +x_54 = ((lean_object*)(l_Lean_instReprProjectionFunctionInfo_repr___redArg___closed__21)); +x_55 = lean_alloc_ctor(5, 2, 0); +lean_ctor_set(x_55, 0, x_54); +lean_ctor_set(x_55, 1, x_52); +x_56 = ((lean_object*)(l_Lean_instReprProjectionFunctionInfo_repr___redArg___closed__22)); +x_57 = lean_alloc_ctor(5, 2, 0); +lean_ctor_set(x_57, 0, x_55); +lean_ctor_set(x_57, 1, x_56); +x_58 = lean_alloc_ctor(4, 2, 0); +lean_ctor_set(x_58, 0, x_53); +lean_ctor_set(x_58, 1, x_57); +x_59 = lean_alloc_ctor(6, 1, 1); +lean_ctor_set(x_59, 0, x_58); +lean_ctor_set_uint8(x_59, sizeof(void*)*1, x_39); +return x_59; +} +} +} +LEAN_EXPORT lean_object* l_Lean_instReprAuxParentProjectionInfo_repr(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = l_Lean_instReprAuxParentProjectionInfo_repr___redArg(x_1); +return x_3; +} +} +LEAN_EXPORT lean_object* l_Lean_instReprAuxParentProjectionInfo_repr___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = l_Lean_instReprAuxParentProjectionInfo_repr(x_1, x_2); +lean_dec(x_2); +return x_3; +} +} +LEAN_EXPORT lean_object* l___private_Init_Data_Array_Basic_0__Array_foldlMUnsafe_fold___at___00Lean_initFn_00___x40_Lean_ProjFns_496916995____hygCtx___hyg_2__spec__1(lean_object* x_1, lean_object* x_2, size_t x_3, size_t x_4, lean_object* x_5) { +_start: +{ +lean_object* x_6; uint8_t x_11; +x_11 = lean_usize_dec_eq(x_3, x_4); +if (x_11 == 0) +{ +lean_object* x_12; lean_object* x_13; uint8_t x_14; +x_12 = lean_array_uget_borrowed(x_2, x_3); +x_13 = lean_ctor_get(x_12, 0); +lean_inc(x_13); +lean_inc_ref(x_1); +x_14 = l_Lean_Environment_contains(x_1, x_13, x_11); +if (x_14 == 0) +{ +x_6 = x_5; +goto block_10; +} +else +{ +lean_object* x_15; +lean_inc(x_12); +x_15 = lean_array_push(x_5, x_12); +x_6 = x_15; +goto block_10; +} +} +else +{ +lean_dec_ref(x_1); +return x_5; +} +block_10: +{ +size_t x_7; size_t x_8; +x_7 = 1; +x_8 = lean_usize_add(x_3, x_7); +x_3 = x_8; +x_5 = x_6; +goto _start; +} +} +} +LEAN_EXPORT lean_object* l___private_Init_Data_Array_Basic_0__Array_foldlMUnsafe_fold___at___00Lean_initFn_00___x40_Lean_ProjFns_496916995____hygCtx___hyg_2__spec__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { +_start: +{ +size_t x_6; size_t x_7; lean_object* x_8; +x_6 = lean_unbox_usize(x_3); +lean_dec(x_3); +x_7 = lean_unbox_usize(x_4); +lean_dec(x_4); +x_8 = l___private_Init_Data_Array_Basic_0__Array_foldlMUnsafe_fold___at___00Lean_initFn_00___x40_Lean_ProjFns_496916995____hygCtx___hyg_2__spec__1(x_1, x_2, x_6, x_7, x_5); +lean_dec_ref(x_2); +return x_8; +} +} +LEAN_EXPORT lean_object* l_Std_DTreeMap_Internal_Impl_foldlM___at___00Std_DTreeMap_Internal_Impl_foldl___at___00Lean_initFn_00___x40_Lean_ProjFns_496916995____hygCtx___hyg_2__spec__0_spec__0(lean_object* x_1, lean_object* x_2) { +_start: +{ +if (lean_obj_tag(x_2) == 0) +{ +lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; +x_3 = lean_ctor_get(x_2, 1); +x_4 = lean_ctor_get(x_2, 2); +x_5 = lean_ctor_get(x_2, 3); +x_6 = lean_ctor_get(x_2, 4); +x_7 = l_Std_DTreeMap_Internal_Impl_foldlM___at___00Std_DTreeMap_Internal_Impl_foldl___at___00Lean_initFn_00___x40_Lean_ProjFns_496916995____hygCtx___hyg_2__spec__0_spec__0(x_1, x_5); +lean_inc(x_4); +lean_inc(x_3); +x_8 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_8, 0, x_3); +lean_ctor_set(x_8, 1, x_4); +x_9 = lean_array_push(x_7, x_8); +x_1 = x_9; +x_2 = x_6; +goto _start; +} +else +{ +return x_1; +} +} +} +LEAN_EXPORT lean_object* l_Std_DTreeMap_Internal_Impl_foldlM___at___00Std_DTreeMap_Internal_Impl_foldl___at___00Lean_initFn_00___x40_Lean_ProjFns_496916995____hygCtx___hyg_2__spec__0_spec__0___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = l_Std_DTreeMap_Internal_Impl_foldlM___at___00Std_DTreeMap_Internal_Impl_foldl___at___00Lean_initFn_00___x40_Lean_ProjFns_496916995____hygCtx___hyg_2__spec__0_spec__0(x_1, x_2); +lean_dec(x_2); +return x_3; +} +} +static lean_object* _init_l_Lean_initFn___lam__0___closed__0_00___x40_Lean_ProjFns_496916995____hygCtx___hyg_2_(void) { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = lean_unsigned_to_nat(0u); +x_2 = lean_mk_empty_array_with_capacity(x_1); +return x_2; +} +} +static lean_object* _init_l_Lean_initFn___lam__0___closed__1_00___x40_Lean_ProjFns_496916995____hygCtx___hyg_2_(void) { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = lean_unsigned_to_nat(0u); +x_2 = lean_mk_empty_array_with_capacity(x_1); +return x_2; +} +} +LEAN_EXPORT lean_object* l_Lean_initFn___lam__0_00___x40_Lean_ProjFns_496916995____hygCtx___hyg_2_(lean_object* x_1, lean_object* x_2, uint8_t x_3) { +_start: +{ +lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; uint8_t x_9; +x_4 = lean_unsigned_to_nat(0u); +x_5 = lean_obj_once(&l_Lean_initFn___lam__0___closed__0_00___x40_Lean_ProjFns_496916995____hygCtx___hyg_2_, &l_Lean_initFn___lam__0___closed__0_00___x40_Lean_ProjFns_496916995____hygCtx___hyg_2__once, _init_l_Lean_initFn___lam__0___closed__0_00___x40_Lean_ProjFns_496916995____hygCtx___hyg_2_); +x_6 = l_Std_DTreeMap_Internal_Impl_foldlM___at___00Std_DTreeMap_Internal_Impl_foldl___at___00Lean_initFn_00___x40_Lean_ProjFns_496916995____hygCtx___hyg_2__spec__0_spec__0(x_5, x_2); +x_7 = lean_array_get_size(x_6); +x_8 = lean_obj_once(&l_Lean_initFn___lam__0___closed__1_00___x40_Lean_ProjFns_496916995____hygCtx___hyg_2_, &l_Lean_initFn___lam__0___closed__1_00___x40_Lean_ProjFns_496916995____hygCtx___hyg_2__once, _init_l_Lean_initFn___lam__0___closed__1_00___x40_Lean_ProjFns_496916995____hygCtx___hyg_2_); +x_9 = lean_nat_dec_lt(x_4, x_7); +if (x_9 == 0) +{ +lean_dec_ref(x_6); +lean_dec_ref(x_1); +return x_8; +} +else +{ +uint8_t x_10; +x_10 = lean_nat_dec_le(x_7, x_7); +if (x_10 == 0) +{ +if (x_9 == 0) +{ +lean_dec_ref(x_6); +lean_dec_ref(x_1); +return x_8; +} +else +{ +size_t x_11; size_t x_12; lean_object* x_13; +x_11 = 0; +x_12 = lean_usize_of_nat(x_7); +x_13 = l___private_Init_Data_Array_Basic_0__Array_foldlMUnsafe_fold___at___00Lean_initFn_00___x40_Lean_ProjFns_496916995____hygCtx___hyg_2__spec__1(x_1, x_6, x_11, x_12, x_8); +lean_dec_ref(x_6); +return x_13; +} +} +else +{ +size_t x_14; size_t x_15; lean_object* x_16; +x_14 = 0; +x_15 = lean_usize_of_nat(x_7); +x_16 = l___private_Init_Data_Array_Basic_0__Array_foldlMUnsafe_fold___at___00Lean_initFn_00___x40_Lean_ProjFns_496916995____hygCtx___hyg_2__spec__1(x_1, x_6, x_14, x_15, x_8); +lean_dec_ref(x_6); +return x_16; +} +} +} +} +LEAN_EXPORT lean_object* l_Lean_initFn___lam__0_00___x40_Lean_ProjFns_496916995____hygCtx___hyg_2____boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +uint8_t x_4; lean_object* x_5; +x_4 = lean_unbox(x_3); +x_5 = l_Lean_initFn___lam__0_00___x40_Lean_ProjFns_496916995____hygCtx___hyg_2_(x_1, x_2, x_4); +lean_dec(x_2); +return x_5; +} +} +LEAN_EXPORT lean_object* l_Lean_initFn_00___x40_Lean_ProjFns_496916995____hygCtx___hyg_2_() { +_start: +{ +lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; +x_2 = ((lean_object*)(l_Lean_initFn___closed__0_00___x40_Lean_ProjFns_496916995____hygCtx___hyg_2_)); +x_3 = ((lean_object*)(l_Lean_initFn___closed__2_00___x40_Lean_ProjFns_496916995____hygCtx___hyg_2_)); +x_4 = ((lean_object*)(l_Lean_initFn___closed__4_00___x40_Lean_ProjFns_2268652983____hygCtx___hyg_2_)); +x_5 = l_Lean_mkMapDeclarationExtension___redArg(x_3, x_4, x_2); +return x_5; +} +} +LEAN_EXPORT lean_object* l_Lean_initFn_00___x40_Lean_ProjFns_496916995____hygCtx___hyg_2____boxed(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = l_Lean_initFn_00___x40_Lean_ProjFns_496916995____hygCtx___hyg_2_(); +return x_2; +} +} +LEAN_EXPORT lean_object* l_Std_DTreeMap_Internal_Impl_foldl___at___00Lean_initFn_00___x40_Lean_ProjFns_496916995____hygCtx___hyg_2__spec__0(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = l_Std_DTreeMap_Internal_Impl_foldlM___at___00Std_DTreeMap_Internal_Impl_foldl___at___00Lean_initFn_00___x40_Lean_ProjFns_496916995____hygCtx___hyg_2__spec__0_spec__0(x_1, x_2); +return x_3; +} +} +LEAN_EXPORT lean_object* l_Std_DTreeMap_Internal_Impl_foldl___at___00Lean_initFn_00___x40_Lean_ProjFns_496916995____hygCtx___hyg_2__spec__0___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = l_Std_DTreeMap_Internal_Impl_foldl___at___00Lean_initFn_00___x40_Lean_ProjFns_496916995____hygCtx___hyg_2__spec__0(x_1, x_2); +lean_dec(x_2); +return x_3; +} +} +LEAN_EXPORT lean_object* l_Lean_addAuxParentProjectionInfo(lean_object* x_1, lean_object* x_2, lean_object* x_3, uint8_t x_4) { +_start: +{ +lean_object* x_5; lean_object* x_6; lean_object* x_7; +x_5 = l_Lean_auxParentProjInfoExt; +x_6 = lean_alloc_ctor(0, 1, 1); +lean_ctor_set(x_6, 0, x_3); +lean_ctor_set_uint8(x_6, sizeof(void*)*1, x_4); +x_7 = l_Lean_MapDeclarationExtension_insert___redArg(x_5, x_1, x_2, x_6); +return x_7; +} +} +LEAN_EXPORT lean_object* l_Lean_addAuxParentProjectionInfo___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +uint8_t x_5; lean_object* x_6; +x_5 = lean_unbox(x_4); +x_6 = l_Lean_addAuxParentProjectionInfo(x_1, x_2, x_3, x_5); +return x_6; +} +} +LEAN_EXPORT lean_object* l_Lean_Environment_getAuxParentProjectionInfo_x3f(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; uint8_t x_7; lean_object* x_8; +x_3 = l_Lean_auxParentProjInfoExt; +x_4 = lean_ctor_get(x_3, 0); +lean_inc_ref(x_4); +x_5 = lean_ctor_get(x_4, 2); +lean_inc(x_5); +lean_dec_ref(x_4); +x_6 = ((lean_object*)(l_Lean_instInhabitedAuxParentProjectionInfo_default)); +x_7 = 0; +x_8 = l_Lean_MapDeclarationExtension_find_x3f___redArg(x_6, x_3, x_1, x_2, x_5, x_7); +lean_dec(x_5); +return x_8; +} +} +LEAN_EXPORT lean_object* l_Lean_getAuxParentProjectionInfo_x3f___redArg___lam__0(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; lean_object* x_5; +x_4 = l_Lean_Environment_getAuxParentProjectionInfo_x3f(x_3, x_1); +x_5 = lean_apply_2(x_2, lean_box(0), x_4); +return x_5; +} +} +LEAN_EXPORT lean_object* l_Lean_getAuxParentProjectionInfo_x3f___redArg(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; +x_4 = lean_ctor_get(x_2, 0); +lean_inc_ref(x_4); +x_5 = lean_ctor_get(x_2, 1); +lean_inc(x_5); +lean_dec_ref(x_2); +x_6 = lean_ctor_get(x_1, 0); +lean_inc(x_6); +lean_dec_ref(x_1); +x_7 = lean_ctor_get(x_4, 1); +lean_inc(x_7); +lean_dec_ref(x_4); +x_8 = lean_alloc_closure((void*)(l_Lean_getAuxParentProjectionInfo_x3f___redArg___lam__0), 3, 2); +lean_closure_set(x_8, 0, x_3); +lean_closure_set(x_8, 1, x_7); +x_9 = lean_apply_4(x_5, lean_box(0), lean_box(0), x_6, x_8); +return x_9; +} +} +LEAN_EXPORT lean_object* l_Lean_getAuxParentProjectionInfo_x3f(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_getAuxParentProjectionInfo_x3f___redArg(x_2, x_3, x_4); +return x_5; +} +} lean_object* initialize_Lean_EnvExtension(uint8_t builtin); static bool _G_initialized = false; LEAN_EXPORT lean_object* initialize_Lean_ProjFns(uint8_t builtin) { @@ -814,6 +1291,11 @@ if (lean_io_result_is_error(res)) return res; l_Lean_projectionFnInfoExt = lean_io_result_get_value(res); lean_mark_persistent(l_Lean_projectionFnInfoExt); lean_dec_ref(res); +}if (builtin) {res = l_Lean_initFn_00___x40_Lean_ProjFns_496916995____hygCtx___hyg_2_(); +if (lean_io_result_is_error(res)) return res; +l_Lean_auxParentProjInfoExt = lean_io_result_get_value(res); +lean_mark_persistent(l_Lean_auxParentProjInfoExt); +lean_dec_ref(res); }return lean_io_result_mk_ok(lean_box(0)); } #ifdef __cplusplus