diff --git a/src/stage0/CMakeLists.txt b/src/stage0/CMakeLists.txt index 1b50a27e96..f31df0d295 100644 --- a/src/stage0/CMakeLists.txt +++ b/src/stage0/CMakeLists.txt @@ -1 +1 @@ -add_library (stage0 OBJECT ./init/coe.c ./init/control/alternative.c ./init/control/applicative.c ./init/control/combinators.c ./init/control/conditional.c ./init/control/default.c ./init/control/estate.c ./init/control/except.c ./init/control/functor.c ./init/control/id.c ./init/control/lift.c ./init/control/monad.c ./init/control/monadfail.c ./init/control/option.c ./init/control/reader.c ./init/control/state.c ./init/core.c ./init/data/array/basic.c ./init/data/array/binsearch.c ./init/data/array/default.c ./init/data/array/qsort.c ./init/data/assoclist.c ./init/data/basic.c ./init/data/binomialheap/basic.c ./init/data/binomialheap/default.c ./init/data/bytearray/basic.c ./init/data/bytearray/default.c ./init/data/char/basic.c ./init/data/char/default.c ./init/data/default.c ./init/data/dlist.c ./init/data/fin/basic.c ./init/data/fin/default.c ./init/data/hashable.c ./init/data/hashmap/basic.c ./init/data/hashmap/default.c ./init/data/int/basic.c ./init/data/int/default.c ./init/data/list/basic.c ./init/data/list/basicaux.c ./init/data/list/default.c ./init/data/list/instances.c ./init/data/nat/basic.c ./init/data/nat/bitwise.c ./init/data/nat/default.c ./init/data/nat/div.c ./init/data/option/basic.c ./init/data/option/instances.c ./init/data/persistentarray/basic.c ./init/data/persistentarray/default.c ./init/data/persistenthashmap/basic.c ./init/data/persistenthashmap/default.c ./init/data/random.c ./init/data/rbmap/basic.c ./init/data/rbmap/default.c ./init/data/rbtree/basic.c ./init/data/rbtree/default.c ./init/data/repr.c ./init/data/string/basic.c ./init/data/string/default.c ./init/data/tostring.c ./init/data/uint.c ./init/default.c ./init/fix.c ./init/lean/attributes.c ./init/lean/class.c ./init/lean/compiler/closedtermcache.c ./init/lean/compiler/constfolding.c ./init/lean/compiler/default.c ./init/lean/compiler/exportattr.c ./init/lean/compiler/externattr.c ./init/lean/compiler/implementedbyattr.c ./init/lean/compiler/initattr.c ./init/lean/compiler/inlineattrs.c ./init/lean/compiler/ir/basic.c ./init/lean/compiler/ir/borrow.c ./init/lean/compiler/ir/boxing.c ./init/lean/compiler/ir/checker.c ./init/lean/compiler/ir/compilerm.c ./init/lean/compiler/ir/default.c ./init/lean/compiler/ir/elimdead.c ./init/lean/compiler/ir/emitc.c ./init/lean/compiler/ir/emitutil.c ./init/lean/compiler/ir/expandresetreuse.c ./init/lean/compiler/ir/format.c ./init/lean/compiler/ir/freevars.c ./init/lean/compiler/ir/livevars.c ./init/lean/compiler/ir/normids.c ./init/lean/compiler/ir/pushproj.c ./init/lean/compiler/ir/rc.c ./init/lean/compiler/ir/resetreuse.c ./init/lean/compiler/ir/simpcase.c ./init/lean/compiler/ir/unboxresult.c ./init/lean/compiler/namemangling.c ./init/lean/compiler/neverextractattr.c ./init/lean/compiler/specialize.c ./init/lean/compiler/util.c ./init/lean/declaration.c ./init/lean/default.c ./init/lean/elaborator/alias.c ./init/lean/elaborator/basic.c ./init/lean/elaborator/command.c ./init/lean/elaborator/default.c ./init/lean/elaborator/elabstrategyattrs.c ./init/lean/elaborator/preterm.c ./init/lean/elaborator/resolvename.c ./init/lean/elaborator/term.c ./init/lean/environment.c ./init/lean/eqncompiler/default.c ./init/lean/eqncompiler/matchpattern.c ./init/lean/expr.c ./init/lean/format.c ./init/lean/kvmap.c ./init/lean/level.c ./init/lean/localcontext.c ./init/lean/message.c ./init/lean/metavarcontext.c ./init/lean/modifiers.c ./init/lean/name.c ./init/lean/namegenerator.c ./init/lean/options.c ./init/lean/parser/command.c ./init/lean/parser/default.c ./init/lean/parser/identifier.c ./init/lean/parser/level.c ./init/lean/parser/module.c ./init/lean/parser/parser.c ./init/lean/parser/term.c ./init/lean/parser/transform.c ./init/lean/parser/trie.c ./init/lean/path.c ./init/lean/position.c ./init/lean/projfns.c ./init/lean/reducibilityattrs.c ./init/lean/runtime.c ./init/lean/scopes.c ./init/lean/smap.c ./init/lean/syntax.c ./init/lean/toexpr.c ./init/lean/trace.c ./init/lean/typeclass/basic.c ./init/lean/typeclass/default.c ./init/lean/util.c ./init/system/default.c ./init/system/filepath.c ./init/system/io.c ./init/system/platform.c ./init/util.c ./init/wf.c) +add_library (stage0 OBJECT ./init/coe.c ./init/control/alternative.c ./init/control/applicative.c ./init/control/combinators.c ./init/control/conditional.c ./init/control/default.c ./init/control/estate.c ./init/control/except.c ./init/control/functor.c ./init/control/id.c ./init/control/lift.c ./init/control/monad.c ./init/control/monadfail.c ./init/control/option.c ./init/control/reader.c ./init/control/state.c ./init/core.c ./init/data/array/basic.c ./init/data/array/binsearch.c ./init/data/array/default.c ./init/data/array/qsort.c ./init/data/assoclist.c ./init/data/basic.c ./init/data/binomialheap/basic.c ./init/data/binomialheap/default.c ./init/data/bytearray/basic.c ./init/data/bytearray/default.c ./init/data/char/basic.c ./init/data/char/default.c ./init/data/default.c ./init/data/dlist.c ./init/data/fin/basic.c ./init/data/fin/default.c ./init/data/hashable.c ./init/data/hashmap/basic.c ./init/data/hashmap/default.c ./init/data/int/basic.c ./init/data/int/default.c ./init/data/list/basic.c ./init/data/list/basicaux.c ./init/data/list/default.c ./init/data/list/instances.c ./init/data/nat/basic.c ./init/data/nat/bitwise.c ./init/data/nat/default.c ./init/data/nat/div.c ./init/data/option/basic.c ./init/data/option/basicaux.c ./init/data/option/default.c ./init/data/option/instances.c ./init/data/persistentarray/basic.c ./init/data/persistentarray/default.c ./init/data/persistenthashmap/basic.c ./init/data/persistenthashmap/default.c ./init/data/queue/basic.c ./init/data/queue/default.c ./init/data/random.c ./init/data/rbmap/basic.c ./init/data/rbmap/basicaux.c ./init/data/rbmap/default.c ./init/data/rbtree/basic.c ./init/data/rbtree/default.c ./init/data/repr.c ./init/data/string/basic.c ./init/data/string/default.c ./init/data/tostring.c ./init/data/uint.c ./init/default.c ./init/fix.c ./init/lean/attributes.c ./init/lean/class.c ./init/lean/compiler/closedtermcache.c ./init/lean/compiler/constfolding.c ./init/lean/compiler/default.c ./init/lean/compiler/exportattr.c ./init/lean/compiler/externattr.c ./init/lean/compiler/implementedbyattr.c ./init/lean/compiler/initattr.c ./init/lean/compiler/inlineattrs.c ./init/lean/compiler/ir/basic.c ./init/lean/compiler/ir/borrow.c ./init/lean/compiler/ir/boxing.c ./init/lean/compiler/ir/checker.c ./init/lean/compiler/ir/compilerm.c ./init/lean/compiler/ir/default.c ./init/lean/compiler/ir/elimdead.c ./init/lean/compiler/ir/emitc.c ./init/lean/compiler/ir/emitutil.c ./init/lean/compiler/ir/expandresetreuse.c ./init/lean/compiler/ir/format.c ./init/lean/compiler/ir/freevars.c ./init/lean/compiler/ir/livevars.c ./init/lean/compiler/ir/normids.c ./init/lean/compiler/ir/pushproj.c ./init/lean/compiler/ir/rc.c ./init/lean/compiler/ir/resetreuse.c ./init/lean/compiler/ir/simpcase.c ./init/lean/compiler/ir/unboxresult.c ./init/lean/compiler/ir/unreachbranches.c ./init/lean/compiler/namemangling.c ./init/lean/compiler/neverextractattr.c ./init/lean/compiler/specialize.c ./init/lean/compiler/util.c ./init/lean/declaration.c ./init/lean/default.c ./init/lean/elaborator/alias.c ./init/lean/elaborator/basic.c ./init/lean/elaborator/command.c ./init/lean/elaborator/default.c ./init/lean/elaborator/elabstrategyattrs.c ./init/lean/elaborator/preterm.c ./init/lean/elaborator/resolvename.c ./init/lean/elaborator/term.c ./init/lean/environment.c ./init/lean/eqncompiler/default.c ./init/lean/eqncompiler/matchpattern.c ./init/lean/expr.c ./init/lean/format.c ./init/lean/kvmap.c ./init/lean/level.c ./init/lean/localcontext.c ./init/lean/message.c ./init/lean/metavarcontext.c ./init/lean/modifiers.c ./init/lean/name.c ./init/lean/namegenerator.c ./init/lean/options.c ./init/lean/parser/command.c ./init/lean/parser/default.c ./init/lean/parser/identifier.c ./init/lean/parser/level.c ./init/lean/parser/module.c ./init/lean/parser/parser.c ./init/lean/parser/term.c ./init/lean/parser/transform.c ./init/lean/parser/trie.c ./init/lean/path.c ./init/lean/position.c ./init/lean/projfns.c ./init/lean/reducibilityattrs.c ./init/lean/runtime.c ./init/lean/scopes.c ./init/lean/smap.c ./init/lean/syntax.c ./init/lean/toexpr.c ./init/lean/trace.c ./init/lean/typeclass/basic.c ./init/lean/typeclass/context.c ./init/lean/typeclass/default.c ./init/lean/typeclass/synth.c ./init/lean/util.c ./init/system/default.c ./init/system/filepath.c ./init/system/io.c ./init/system/platform.c ./init/util.c ./init/wf.c) diff --git a/src/stage0/init/control/combinators.c b/src/stage0/init/control/combinators.c index d7c56a988e..00e00c3825 100644 --- a/src/stage0/init/control/combinators.c +++ b/src/stage0/init/control/combinators.c @@ -18,10 +18,12 @@ lean_object* l_Nat_mforRevAux___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_Nat_mforAux___main(lean_object*); lean_object* l_List_mmap(lean_object*); lean_object* l_Nat_mforAux___boxed(lean_object*); +lean_object* l_List_mfor_u2082___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_List_mforall___main(lean_object*); lean_object* l_mcond___boxed(lean_object*); lean_object* lean_nat_sub(lean_object*, lean_object*); lean_object* l_List_mexists___main(lean_object*); +lean_object* l_List_mmap_u2082___main___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_unless___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_List_mfilter___main___rarg___lambda__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_List_mfoldr___main___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -32,6 +34,7 @@ lean_object* l_mcond___rarg(lean_object*, lean_object*, lean_object*, lean_objec lean_object* l_mjoin___rarg___closed__1; lean_object* l_Nat_mforRev___rarg___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_mcond___rarg___lambda__1(lean_object*, lean_object*, uint8_t); +lean_object* l_List_mmap_u2082(lean_object*); lean_object* l_Nat_mfold___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_List_mfilter___main___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_mjoin___boxed(lean_object*); @@ -43,6 +46,7 @@ lean_object* l_id___rarg___boxed(lean_object*); lean_object* l_when___boxed(lean_object*); lean_object* l_List_mmap___main___boxed(lean_object*); lean_object* l_List_mmap___boxed(lean_object*); +lean_object* l_List_mfor_u2082___main___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_List_mfor___main___boxed(lean_object*); lean_object* l_Nat_mforRev(lean_object*); lean_object* l_Nat_mfoldRevAux___rarg(lean_object*, lean_object*, lean_object*, lean_object*); @@ -51,6 +55,7 @@ lean_object* l_Nat_mfoldAux___main(lean_object*, lean_object*); lean_object* l_Nat_mfoldRevAux(lean_object*, lean_object*); lean_object* l_List_mfirst___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_List_mfoldr(lean_object*); +lean_object* l_List_mfor_u2082___main___boxed(lean_object*); lean_object* l_Nat_mfoldRevAux___main(lean_object*, lean_object*); lean_object* l_Nat_mforRevAux___main(lean_object*); lean_object* l_Nat_mfoldRevAux___main___rarg(lean_object*, lean_object*, lean_object*, lean_object*); @@ -66,9 +71,12 @@ lean_object* l_mwhen___rarg___lambda__1(lean_object*, lean_object*, uint8_t); lean_object* l_List_mfoldr___main(lean_object*); lean_object* l_Nat_mforRev___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_List_mfoldl___main___rarg___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_List_mfor_u2082(lean_object*); lean_object* l_List_mfirst___main___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_List_mforall___main___boxed(lean_object*); lean_object* l_Nat_mfoldRevAux___main___boxed(lean_object*, lean_object*); +lean_object* l_List_mmap_u2082___boxed(lean_object*); +lean_object* l_List_mmap_u2082___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_List_mforall___main___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_unless___rarg(lean_object*, lean_object*, uint8_t, lean_object*); lean_object* l_List_mfoldr___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -79,12 +87,14 @@ lean_object* l_Nat_mfoldRevAux___boxed(lean_object*, lean_object*); lean_object* l_List_mmap___main(lean_object*); lean_object* l_List_mexists___main___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Nat_mfoldAux___main___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_List_mfor_u2082___main(lean_object*); lean_object* l_List_mfilter___boxed(lean_object*); lean_object* l_List_mmap___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_when___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_List_mfoldl___boxed(lean_object*); lean_object* l_List_mfoldl___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_mjoin___rarg(lean_object*, lean_object*, lean_object*); +lean_object* l_List_mfor_u2082___boxed(lean_object*); lean_object* l_Nat_mfoldRevAux___main___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_List_mfilter___main___boxed(lean_object*); lean_object* l_mjoin(lean_object*); @@ -106,11 +116,13 @@ lean_object* l_Nat_mforAux___rarg(lean_object*, lean_object*, lean_object*, lean lean_object* l_List_mfilter(lean_object*); lean_object* l_mwhen___boxed(lean_object*); lean_object* l_List_mfor___boxed(lean_object*); +lean_object* l_List_mmap_u2082___main(lean_object*); lean_object* l_List_mfoldl___main___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Nat_mforAux(lean_object*); lean_object* l_Nat_mfoldAux___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_unless___boxed(lean_object*); lean_object* l_List_mfirst(lean_object*, lean_object*); +lean_object* l_List_mmap_u2082___main___boxed(lean_object*); lean_object* l_List_mfoldr___main___boxed(lean_object*); lean_object* l_Nat_mforRev___boxed(lean_object*); lean_object* l_List_mfilter___main___rarg___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*); @@ -1022,6 +1034,114 @@ lean_dec(x_1); return x_2; } } +lean_object* l_List_mmap_u2082___main___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { +_start: +{ +lean_object* x_8; +if (lean_obj_tag(x_6) == 0) +{ +lean_object* x_13; +lean_dec(x_7); +lean_dec(x_5); +x_13 = lean_box(0); +x_8 = x_13; +goto block_12; +} +else +{ +if (lean_obj_tag(x_7) == 0) +{ +lean_object* x_14; +lean_dec(x_6); +lean_dec(x_5); +x_14 = lean_box(0); +x_8 = x_14; +goto block_12; +} +else +{ +lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; +x_15 = lean_ctor_get(x_6, 0); +lean_inc(x_15); +x_16 = lean_ctor_get(x_6, 1); +lean_inc(x_16); +lean_dec(x_6); +x_17 = lean_ctor_get(x_7, 0); +lean_inc(x_17); +x_18 = lean_ctor_get(x_7, 1); +lean_inc(x_18); +lean_dec(x_7); +x_19 = lean_ctor_get(x_1, 2); +lean_inc(x_19); +x_20 = lean_ctor_get(x_1, 0); +lean_inc(x_20); +x_21 = lean_ctor_get(x_20, 0); +lean_inc(x_21); +lean_dec(x_20); +lean_inc(x_5); +x_22 = lean_apply_2(x_5, x_15, x_17); +x_23 = l_List_mmap___main___rarg___closed__1; +x_24 = lean_apply_4(x_21, lean_box(0), lean_box(0), x_23, x_22); +x_25 = l_List_mmap_u2082___main___rarg(x_1, lean_box(0), lean_box(0), lean_box(0), x_5, x_16, x_18); +x_26 = lean_apply_4(x_19, lean_box(0), lean_box(0), x_24, x_25); +return x_26; +} +} +block_12: +{ +lean_object* x_9; lean_object* x_10; lean_object* x_11; +lean_dec(x_8); +x_9 = lean_ctor_get(x_1, 1); +lean_inc(x_9); +lean_dec(x_1); +x_10 = lean_box(0); +x_11 = lean_apply_2(x_9, lean_box(0), x_10); +return x_11; +} +} +} +lean_object* l_List_mmap_u2082___main(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_List_mmap_u2082___main___rarg), 7, 0); +return x_2; +} +} +lean_object* l_List_mmap_u2082___main___boxed(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = l_List_mmap_u2082___main(x_1); +lean_dec(x_1); +return x_2; +} +} +lean_object* l_List_mmap_u2082___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { +_start: +{ +lean_object* x_8; +x_8 = l_List_mmap_u2082___main___rarg(x_1, lean_box(0), lean_box(0), lean_box(0), x_5, x_6, x_7); +return x_8; +} +} +lean_object* l_List_mmap_u2082(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_List_mmap_u2082___rarg), 7, 0); +return x_2; +} +} +lean_object* l_List_mmap_u2082___boxed(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = l_List_mmap_u2082(x_1); +lean_dec(x_1); +return x_2; +} +} lean_object* l_List_mfor___main___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { _start: { @@ -1096,6 +1216,101 @@ lean_dec(x_1); return x_2; } } +lean_object* l_List_mfor_u2082___main___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { +_start: +{ +if (lean_obj_tag(x_6) == 0) +{ +lean_object* x_8; lean_object* x_9; lean_object* x_10; +lean_dec(x_7); +lean_dec(x_5); +x_8 = lean_ctor_get(x_1, 1); +lean_inc(x_8); +lean_dec(x_1); +x_9 = lean_box(0); +x_10 = lean_apply_2(x_8, lean_box(0), x_9); +return x_10; +} +else +{ +if (lean_obj_tag(x_7) == 0) +{ +lean_object* x_11; lean_object* x_12; lean_object* x_13; +lean_dec(x_6); +lean_dec(x_5); +x_11 = lean_ctor_get(x_1, 1); +lean_inc(x_11); +lean_dec(x_1); +x_12 = lean_box(0); +x_13 = lean_apply_2(x_11, lean_box(0), x_12); +return x_13; +} +else +{ +lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; +x_14 = lean_ctor_get(x_6, 0); +lean_inc(x_14); +x_15 = lean_ctor_get(x_6, 1); +lean_inc(x_15); +lean_dec(x_6); +x_16 = lean_ctor_get(x_7, 0); +lean_inc(x_16); +x_17 = lean_ctor_get(x_7, 1); +lean_inc(x_17); +lean_dec(x_7); +x_18 = lean_ctor_get(x_1, 4); +lean_inc(x_18); +lean_inc(x_5); +x_19 = lean_apply_2(x_5, x_14, x_16); +x_20 = l_List_mfor_u2082___main___rarg(x_1, lean_box(0), lean_box(0), lean_box(0), x_5, x_15, x_17); +x_21 = lean_apply_4(x_18, lean_box(0), lean_box(0), x_19, x_20); +return x_21; +} +} +} +} +lean_object* l_List_mfor_u2082___main(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_List_mfor_u2082___main___rarg), 7, 0); +return x_2; +} +} +lean_object* l_List_mfor_u2082___main___boxed(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = l_List_mfor_u2082___main(x_1); +lean_dec(x_1); +return x_2; +} +} +lean_object* l_List_mfor_u2082___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { +_start: +{ +lean_object* x_8; +x_8 = l_List_mfor_u2082___main___rarg(x_1, lean_box(0), lean_box(0), lean_box(0), x_5, x_6, x_7); +return x_8; +} +} +lean_object* l_List_mfor_u2082(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_List_mfor_u2082___rarg), 7, 0); +return x_2; +} +} +lean_object* l_List_mfor_u2082___boxed(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = l_List_mfor_u2082(x_1); +lean_dec(x_1); +return x_2; +} +} lean_object* l_List_mfilter___main___rarg___lambda__1(uint8_t x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { diff --git a/src/stage0/init/control/estate.c b/src/stage0/init/control/estate.c index 46af76e75c..66705070ed 100644 --- a/src/stage0/init/control/estate.c +++ b/src/stage0/init/control/estate.c @@ -35,6 +35,7 @@ lean_object* l_EState_adaptState___rarg(lean_object*, lean_object*, lean_object* lean_object* l_EState_Monad___closed__5; lean_object* l_EState_throw___rarg(lean_object*, lean_object*); lean_object* l_EState_Result_toString(lean_object*, lean_object*, lean_object*); +lean_object* l_EState_fromState___rarg(lean_object*, lean_object*); lean_object* l_EState_adaptExcept___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_EState_Result_toString___rarg___closed__1; lean_object* l_EState_bind(lean_object*, lean_object*, lean_object*, lean_object*); @@ -47,6 +48,7 @@ lean_object* l_EState_HasOrelse___closed__1; lean_object* l_EState_pure(lean_object*, lean_object*, lean_object*); lean_object* l_EState_Monad___closed__4; lean_object* l_EState_HasOrelse(lean_object*, lean_object*, lean_object*); +lean_object* l_EState_fromState(lean_object*, lean_object*, lean_object*); lean_object* l_EState_Monad___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_EState_MonadExcept___closed__3; lean_object* l_EState_Monad___closed__10; @@ -1747,6 +1749,54 @@ x_6 = lean_alloc_closure((void*)(l_EState_adaptState___rarg), 4, 0); return x_6; } } +lean_object* l_EState_fromState___rarg(lean_object* x_1, lean_object* x_2) { +_start: +{ +uint8_t x_3; +x_3 = !lean_is_exclusive(x_2); +if (x_3 == 0) +{ +lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; +x_4 = lean_ctor_get(x_2, 1); +x_5 = lean_ctor_get(x_2, 0); +lean_dec(x_5); +x_6 = lean_apply_1(x_1, x_4); +x_7 = lean_ctor_get(x_6, 0); +lean_inc(x_7); +x_8 = lean_ctor_get(x_6, 1); +lean_inc(x_8); +lean_dec(x_6); +lean_ctor_set(x_2, 1, x_8); +lean_ctor_set(x_2, 0, x_7); +return x_2; +} +else +{ +lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; +x_9 = lean_ctor_get(x_2, 1); +lean_inc(x_9); +lean_dec(x_2); +x_10 = lean_apply_1(x_1, x_9); +x_11 = lean_ctor_get(x_10, 0); +lean_inc(x_11); +x_12 = lean_ctor_get(x_10, 1); +lean_inc(x_12); +lean_dec(x_10); +x_13 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_13, 0, x_11); +lean_ctor_set(x_13, 1, x_12); +return x_13; +} +} +} +lean_object* l_EState_fromState(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; +x_4 = lean_alloc_closure((void*)(l_EState_fromState___rarg), 2, 0); +return x_4; +} +} lean_object* l_EState_run___rarg(lean_object* x_1, lean_object* x_2) { _start: { diff --git a/src/stage0/init/data/array/basic.c b/src/stage0/init/data/array/basic.c index 4bda6623d0..b9e044a20e 100644 --- a/src/stage0/init/data/array/basic.c +++ b/src/stage0/init/data/array/basic.c @@ -29,22 +29,24 @@ lean_object* l___private_init_data_array_basic_3__miterateRevAux___rarg(lean_obj lean_object* l_Array_iterateRev___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_Array_miterateAux___main___at_Array_iterateFrom___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_shrink___main___rarg___boxed(lean_object*, lean_object*); -lean_object* l_Array_mfindRevAux___main___at_Array_findRev___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_mforAux___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_miterate_u2082Aux___main___at_Array_foldl_u2082___spec__1___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_init_data_array_basic_1__swapAtPanic_x21___at_Array_swapAt_x21___spec__1(lean_object*); lean_object* l_Array_eraseIdxSzAux___rarg(lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Array_findRev(lean_object*, lean_object*); +extern lean_object* l_Nat_Inhabited; lean_object* l_Array_toList___rarg___boxed(lean_object*); lean_object* l_Array_miterate_u2082Aux___main___at_Array_foldl_u2082___spec__1(lean_object*, lean_object*, lean_object*); lean_object* l_Array_empty___closed__1; lean_object* lean_nat_sub(lean_object*, lean_object*); lean_object* l___private_init_data_array_basic_3__miterateRevAux___main___at_Array_toList___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_mfindRevAux___main___at_Array_findRev_x3f___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_anyMAux___main___at_Array_all___spec__1___rarg___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Array_miterateAux___main___at_Array_foldlFrom___spec__1(lean_object*, lean_object*); lean_object* l_Array_get_x21(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_any(lean_object*); lean_object* l_List_repr___rarg(lean_object*, lean_object*); +lean_object* l_Array_mfindRevAux___main___at_Array_findRev_x3f___spec__1___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_findIdxAux(lean_object*); lean_object* l_Array_swap___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_get_x21___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_mfor___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -54,6 +56,8 @@ lean_object* l___private_init_data_array_basic_3__miterateRevAux___main___at_Arr lean_object* l_Array_mkArray(lean_object*, lean_object*, lean_object*); lean_object* l_Array_iterate___rarg___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Array_mfoldl___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_findIdxAux___rarg___boxed(lean_object*, lean_object*, lean_object*); +lean_object* l_Array_findIdx_x3f(lean_object*); lean_object* l_Array_miterateAux___main___at_Array_iterateFrom___spec__1(lean_object*, lean_object*); lean_object* l_Array_miterateAux___main___at_Array_iterate___spec__1(lean_object*, lean_object*); lean_object* l_Array_miterateAux___main___at_Array_foldlFrom___spec__1___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -69,9 +73,11 @@ lean_object* l_Array_shrink___rarg(lean_object*, lean_object*); lean_object* l_Array_swapAt_x21(lean_object*); lean_object* l_Array_extractAux(lean_object*); lean_object* l_Array_HasRepr(lean_object*); +lean_object* l_Array_findRev_x21___rarg___boxed(lean_object*, lean_object*, lean_object*); lean_object* l___private_init_data_array_basic_3__miterateRevAux___main___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_ummapAux___main___rarg___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_get_x3f___rarg___boxed(lean_object*, lean_object*); +lean_object* l_Array_findIdx_x3f___rarg___boxed(lean_object*, lean_object*); lean_object* l_Array_allM___boxed(lean_object*, lean_object*); lean_object* l_Array_eraseIdxAux___rarg(lean_object*, lean_object*); lean_object* l_Array_iterate_u2082___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); @@ -86,10 +92,12 @@ lean_object* l_Array_HasBeq(lean_object*); lean_object* l___private_init_data_array_basic_3__miterateRevAux___main___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_ummapAux___main___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_ummapIdx(lean_object*, lean_object*); +lean_object* l_panicWithPos___at_Array_findIdx_x21___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_mfoldr(lean_object*, lean_object*); lean_object* l_Array_size___boxed(lean_object*, lean_object*); lean_object* l_Array_uset___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_miterateAux___main___at_Array_iterateFrom___spec__1___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_findIdxAux___main___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_Array_mfindRevAux(lean_object*, lean_object*); lean_object* l_Array_anyMAux___main___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_panicWithPos___at___private_init_data_array_basic_1__swapAtPanic_x21___spec__1(lean_object*); @@ -108,6 +116,7 @@ lean_object* l_Array_miterateAux___main___at_Array_mfoldlFrom___spec__1___rarg__ lean_object* l_List_redLength___main___rarg(lean_object*); lean_object* l_Array_indexOfAux___main(lean_object*); lean_object* l___private_init_data_array_basic_1__swapAtPanic_x21___at_Array_swapAt_x21___spec__1___rarg(lean_object*, lean_object*); +lean_object* l_Array_findIdx_x21___rarg(lean_object*, lean_object*); lean_object* l_panicWithPos___at___private_init_data_array_basic_1__swapAtPanic_x21___spec__1___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_init_data_array_basic_1__swapAtPanic_x21___rarg___closed__3; lean_object* l_Array_mfoldl___boxed(lean_object*, lean_object*); @@ -126,8 +135,10 @@ lean_object* l_Array_foldlFrom___rarg___boxed(lean_object*, lean_object*, lean_o lean_object* l_Array_anyMAux___main___at_Array_all___spec__1(lean_object*); lean_object* l_Array_mfindRevAux___main___rarg___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_eraseIdxSzAux___main___rarg(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_findIdxAux___main___rarg___boxed(lean_object*, lean_object*, lean_object*); uint8_t l_Array_isEqvAux___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_indexOfAux(lean_object*); +lean_object* l_Array_mfindAux___main___at_Array_find_x3f___spec__1___rarg___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Array_swapAt_x21___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_Array_miterateAux___main___at_Array_mmapIdx___spec__1___boxed(lean_object*, lean_object*); lean_object* l_List_redLength(lean_object*); @@ -144,14 +155,17 @@ lean_object* l_Array_miterateRev___rarg(lean_object*, lean_object*, lean_object* lean_object* l_Array_extract(lean_object*); lean_object* l_Array_eraseIdx(lean_object*); lean_object* l_Array_mfindAux___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_findRev_x21(lean_object*, lean_object*); lean_object* l_Array_ummapAux___main___rarg___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_map___rarg(lean_object*, lean_object*); lean_object* l_Array_feraseIdx___rarg___boxed(lean_object*, lean_object*); lean_object* l_Array_empty(lean_object*); lean_object* l_Array_swap(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_findRev_x3f___rarg___boxed(lean_object*, lean_object*); lean_object* l_Array_HasEmptyc(lean_object*); lean_object* l_Array_extractAux___main___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_List_redLength___main___rarg___boxed(lean_object*); +lean_object* l_Array_mfindAux___main___at_Array_find_x21___spec__1___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_Array_mapIdx(lean_object*, lean_object*); lean_object* l_Array_toList___rarg(lean_object*); lean_object* l_Array_uget___boxed(lean_object*, lean_object*, lean_object*, lean_object*); @@ -172,10 +186,11 @@ lean_object* l_Array_mfindAux___boxed(lean_object*, lean_object*); lean_object* l_Array_mfor(lean_object*); extern lean_object* l_panicWithPos___rarg___closed__3; lean_object* l_Array_mfoldr___boxed(lean_object*, lean_object*); -lean_object* l_Array_mfindAux___main___at_Array_find___spec__1(lean_object*, lean_object*); lean_object* l___private_init_data_array_basic_3__miterateRevAux___main___at_Array_mfoldr___spec__1___boxed(lean_object*, lean_object*); lean_object* l_Array_extract___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_Array_miterateAux___main___at_Array_mfoldl___spec__1___boxed(lean_object*, lean_object*); +lean_object* l_Array_findIdx_x3f___rarg(lean_object*, lean_object*); +lean_object* l_Array_findIdx_x21(lean_object*); lean_object* l_Array_set_x21___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_eraseIdx_x27(lean_object*); lean_object* l_Array_miterate_u2082Aux___main___at_Array_iterate_u2082___spec__1___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -183,6 +198,7 @@ uint8_t l_Array_allM___rarg___lambda__1(uint8_t); lean_object* l_Array_mfindAux___main___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_mfindRevAux___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_isEqv(lean_object*); +lean_object* l_Array_findRev_x3f___rarg(lean_object*, lean_object*); lean_object* l_Array_mfind___boxed(lean_object*, lean_object*); lean_object* l_Array_mfindAux___main(lean_object*, lean_object*); lean_object* l_Array_miterateAux___main___at_Array_mmapIdx___spec__1(lean_object*, lean_object*); @@ -190,14 +206,18 @@ lean_object* lean_string_append(lean_object*, lean_object*); lean_object* l_Array_miterateRev___boxed(lean_object*, lean_object*); lean_object* l_Array_miterateAux___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_mfindAux___main___boxed(lean_object*, lean_object*); +lean_object* l_Array_find_x3f(lean_object*, lean_object*); lean_object* l___private_init_data_array_basic_1__swapAtPanic_x21(lean_object*); +lean_object* l_Array_getD___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_List_toString___rarg(lean_object*, lean_object*); lean_object* l_Array_miterate_u2082Aux(lean_object*, lean_object*); lean_object* l_Array_miterateAux___main___at_Array_foldlFrom___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_swapAt___rarg___boxed(lean_object*, lean_object*, lean_object*); uint8_t lean_nat_dec_lt(lean_object*, lean_object*); lean_object* l_Array_mk(lean_object*, lean_object*, lean_object*); +lean_object* l_Array_find_x21___rarg___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Array_miterate_u2082(lean_object*, lean_object*); +lean_object* l_Array_find_x3f___rarg(lean_object*, lean_object*); lean_object* l_Array_mfindRevAux___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_miterateAux___main(lean_object*, lean_object*); lean_object* l_Array_mfindAux___main___rarg___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -207,23 +227,26 @@ lean_object* l_Array_allM___rarg___lambda__1___boxed(lean_object*); lean_object* l_Array_mfindRevAux___main___boxed(lean_object*, lean_object*); lean_object* l_Array_foldl(lean_object*, lean_object*); lean_object* l_Array_miterate_u2082Aux___main___at_Array_mfoldl_u2082___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Array_mfindAux___main___at_Array_find___spec__1___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_Array_ummapAux(lean_object*, lean_object*); lean_object* l_Array_mfindRevAux___main___rarg___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_anyMAux___main___rarg___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_filterAux___main___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_miterateAux___main___at_Array_mmap___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_mfindRevAux___main___at_Array_findRev_x21___spec__1(lean_object*, lean_object*); +lean_object* l_Array_mfindRevAux___main___at_Array_findRev_x21___spec__1___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_iterateRev(lean_object*, lean_object*); lean_object* l_Array_mforAux___main___boxed(lean_object*); lean_object* l_Array_singleton___rarg(lean_object*); +lean_object* l_Array_mfindAux___main___at_Array_find_x21___spec__1(lean_object*, lean_object*); lean_object* l_Array_mfindRevAux___boxed(lean_object*, lean_object*); lean_object* l_Array_mmapIdx___boxed(lean_object*, lean_object*); uint8_t l_Array_anyMAux___main___at_Array_all___spec__1___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_Array_filter___rarg(lean_object*, lean_object*); lean_object* lean_nat_add(lean_object*, lean_object*); lean_object* l___private_init_data_array_basic_3__miterateRevAux___main___at_Array_mfoldr___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Array_findRev___rarg(lean_object*, lean_object*); +lean_object* l_Array_findIdxAux___main(lean_object*); lean_object* l___private_init_data_array_basic_3__miterateRevAux___main___boxed(lean_object*, lean_object*); +lean_object* l_Array_find_x21(lean_object*, lean_object*); uint8_t lean_nat_dec_eq(lean_object*, lean_object*); uint8_t l_Array_isEmpty___rarg(lean_object*); lean_object* l_panicWithPos___at___private_init_data_array_basic_1__swapAtPanic_x21___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -236,6 +259,7 @@ lean_object* l_Array_anyMAux___main(lean_object*, lean_object*); lean_object* l_Array_eraseIdxAux___main(lean_object*); extern lean_object* l_panicWithPos___rarg___closed__1; lean_object* l_Array_mforAux___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_find_x21___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_Array_indexOfAux___main___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_eraseIdx___rarg___boxed(lean_object*, lean_object*); lean_object* l_Array_push___boxed(lean_object*, lean_object*, lean_object*); @@ -263,6 +287,7 @@ lean_object* l_Array_data(lean_object*, lean_object*, lean_object*); lean_object* l_Array_anyMAux___main___at_Array_allM___spec__1___boxed(lean_object*, lean_object*); lean_object* l_Array_ummapAux___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_ummapIdx___rarg(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_findIdxAux___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_Array_shrink___main(lean_object*); lean_object* l_Array_anyMAux___boxed(lean_object*, lean_object*); lean_object* l_Array_miterateAux___main___boxed(lean_object*, lean_object*); @@ -271,8 +296,8 @@ lean_object* l_List_toArray(lean_object*); lean_object* l___private_init_data_array_basic_3__miterateRevAux___main(lean_object*, lean_object*); lean_object* l_Array_reverseAux___main(lean_object*); lean_object* l_Array_mfor___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Array_mfindRevAux___main___at_Array_findRev___spec__1___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_ummapIdx___boxed(lean_object*, lean_object*); +lean_object* l_Array_mfindRevAux___main___at_Array_findRev_x3f___spec__1(lean_object*, lean_object*); lean_object* l_Array_append___rarg(lean_object*, lean_object*); lean_object* l_Array_indexOf(lean_object*); lean_object* l_Array_sz___boxed(lean_object*, lean_object*); @@ -302,7 +327,6 @@ lean_object* l_Array_reverseAux___main___rarg(lean_object*, lean_object*); lean_object* l_Array_anyMAux___main___rarg___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, uint8_t); lean_object* l_Array_eraseIdxSzAuxInstance___rarg(lean_object*); lean_object* l_Array_pop(lean_object*, lean_object*); -lean_object* l_Array_findRev___rarg___boxed(lean_object*, lean_object*); lean_object* l_Array_sz(lean_object*, lean_object*); lean_object* l___private_init_data_array_basic_3__miterateRevAux___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_miterateAux(lean_object*, lean_object*); @@ -310,7 +334,6 @@ lean_object* l_Array_extractAux___main(lean_object*); lean_object* l_Array_miterate_u2082Aux___main___at_Array_iterate_u2082___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_ummapAux___boxed(lean_object*, lean_object*); lean_object* l_panicWithPos___at_Array_swapAt_x21___spec__2___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Array_mfindAux___main___at_Array_find___spec__1___rarg___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Array_modify___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_iterateRev___rarg___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Array_size(lean_object*, lean_object*); @@ -327,7 +350,9 @@ lean_object* l_Array_foldl_u2082___rarg(lean_object*, lean_object*, lean_object* lean_object* l_Array_mfoldlFrom___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_get(lean_object*, lean_object*, lean_object*); lean_object* l_Array_ummap(lean_object*, lean_object*); +lean_object* l_Array_find_x21___rarg___closed__1; lean_object* l_Array_anyMAux___main___at_Array_allM___spec__1___rarg___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, uint8_t); +lean_object* l_Array_mfindRevAux___main___at_Array_findRev_x21___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l___private_init_data_array_basic_3__miterateRevAux___main___at_Array_foldr___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_mfoldl(lean_object*, lean_object*); lean_object* l_Array_mfind___rarg(lean_object*, lean_object*, lean_object*, lean_object*); @@ -335,17 +360,20 @@ lean_object* l_Array_miterate(lean_object*, lean_object*); lean_object* l_Array_eraseIdxSzAux___main(lean_object*); lean_object* l_Array_swap_x21___boxed(lean_object*, lean_object*, lean_object*, lean_object*); uint8_t l_Array_isEqvAux___main___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_getD___rarg___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Array_foldlFrom(lean_object*, lean_object*); uint8_t l_Array_anyMAux___main___at_Array_any___spec__1___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_Array_anyMAux___main___boxed(lean_object*, lean_object*); +lean_object* l_Array_mfindAux___main___at_Array_find_x3f___spec__1___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_Array_ummapAux___main___at_Array_ummap___spec__1(lean_object*, lean_object*); lean_object* l_Array_isEqvAux___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_getD(lean_object*); lean_object* l___private_init_data_array_basic_3__miterateRevAux___main___at_Array_iterateRev___spec__1___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_get_x3f(lean_object*); lean_object* l_Array_anyM(lean_object*, lean_object*); lean_object* l___private_init_data_array_basic_3__miterateRevAux(lean_object*, lean_object*); +lean_object* l_Array_findIdx_x21___rarg___boxed(lean_object*, lean_object*); lean_object* l_Array_HasRepr___rarg(lean_object*); -lean_object* l_Array_find___rarg(lean_object*, lean_object*); uint8_t lean_nat_dec_le(lean_object*, lean_object*); lean_object* l_Array_iterate_u2082___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_mfoldlFrom(lean_object*, lean_object*); @@ -369,12 +397,12 @@ lean_object* l___private_init_data_array_basic_3__miterateRevAux___main___at_Arr lean_object* l_Array_HasToString___rarg(lean_object*); lean_object* l_Array_mfoldr___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_miterateAux___main___at_Array_mfoldl___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_findRev_x21___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_Array_reverse___rarg(lean_object*); lean_object* l_Array_mfor___boxed(lean_object*); lean_object* l_Array_eraseIdxAux___main___rarg(lean_object*, lean_object*); lean_object* l_Array_mmap___boxed(lean_object*, lean_object*); lean_object* l_Array_set(lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Array_find(lean_object*, lean_object*); lean_object* l_Array_swapAt___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_Array_eraseIdxSzAux___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_miterateAux___main___at_Array_mmap___spec__1(lean_object*, lean_object*); @@ -389,14 +417,13 @@ lean_object* l_Array_foldl_u2082___rarg___boxed(lean_object*, lean_object*, lean lean_object* l_Array_miterate_u2082Aux___main___at_Array_foldl_u2082___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_anyM___boxed(lean_object*, lean_object*); lean_object* l_Array_mmap(lean_object*, lean_object*); -lean_object* l_Array_mfindRevAux___main___at_Array_findRev___spec__1(lean_object*, lean_object*); -lean_object* l_Array_find___rarg___boxed(lean_object*, lean_object*); lean_object* l_Array_toList(lean_object*); lean_object* l_Array_set___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_data___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Array_miterateAux___main___at_Array_append___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_indexOf___rarg___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Array_reverseAux(lean_object*); +lean_object* l_Array_find_x3f___rarg___boxed(lean_object*, lean_object*); lean_object* l_Array_foldl___rarg(lean_object*, lean_object*, lean_object*); lean_object* l___private_init_data_array_basic_1__swapAtPanic_x21___rarg(lean_object*, lean_object*); lean_object* l_Array_miterate_u2082Aux___main___at_Array_mfoldl_u2082___spec__1(lean_object*, lean_object*); @@ -413,18 +440,23 @@ lean_object* l___private_init_data_array_basic_3__miterateRevAux___boxed(lean_ob lean_object* l_Array_modify(lean_object*); lean_object* l_Array_mfindAux(lean_object*, lean_object*); lean_object* l_Array_miterateAux___boxed(lean_object*, lean_object*); +lean_object* l_Array_findRev_x3f(lean_object*, lean_object*); lean_object* l_Array_mkEmpty___boxed(lean_object*, lean_object*); lean_object* l_Array_ummapAux___main___at_Array_ummap___spec__1___rarg___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_iterateFrom___rarg(lean_object*, lean_object*, lean_object*, lean_object*); uint8_t l_Array_all___rarg(lean_object*, lean_object*); lean_object* l_Array_ummapAux___main(lean_object*, lean_object*); +lean_object* l_panicWithPos___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_miterateAux___main___at_Array_mmap___spec__1___boxed(lean_object*, lean_object*); +lean_object* l_Array_mfindAux___main___at_Array_find_x21___spec__1___rarg___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Array_filterAux(lean_object*); lean_object* l_Array_miterate_u2082Aux___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_back___rarg(lean_object*, lean_object*); lean_object* l_List_redLength___rarg(lean_object*); +lean_object* l_Array_mfindAux___main___at_Array_find_x3f___spec__1(lean_object*, lean_object*); lean_object* l___private_init_data_array_basic_3__miterateRevAux___main___at_Array_mfoldr___spec__1(lean_object*, lean_object*); lean_object* l_Array_anyMAux___rarg(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_panicWithPos___at_Array_findIdx_x21___spec__1(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_mforAux___main(lean_object*); lean_object* l_Array_mk___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { _start: @@ -665,6 +697,45 @@ lean_dec(x_1); return x_3; } } +lean_object* l_Array_getD___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; uint8_t x_5; +x_4 = lean_array_get_size(x_1); +x_5 = lean_nat_dec_lt(x_2, x_4); +lean_dec(x_4); +if (x_5 == 0) +{ +lean_inc(x_3); +return x_3; +} +else +{ +lean_object* x_6; +x_6 = lean_array_fget(x_1, x_2); +return x_6; +} +} +} +lean_object* l_Array_getD(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_Array_getD___rarg___boxed), 3, 0); +return x_2; +} +} +lean_object* l_Array_getD___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; +x_4 = l_Array_getD___rarg(x_1, x_2, x_3); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +return x_4; +} +} lean_object* l_Array_set___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { @@ -812,7 +883,7 @@ lean_dec(x_3); x_6 = l___private_init_data_array_basic_1__swapAtPanic_x21___rarg___closed__2; x_7 = lean_string_append(x_5, x_6); x_8 = l___private_init_data_array_basic_1__swapAtPanic_x21___rarg___closed__3; -x_9 = lean_unsigned_to_nat(133u); +x_9 = lean_unsigned_to_nat(140u); x_10 = lean_unsigned_to_nat(0u); x_11 = l_panicWithPos___at___private_init_data_array_basic_1__swapAtPanic_x21___spec__1___rarg(x_1, x_8, x_9, x_10, x_7); lean_dec(x_7); @@ -883,7 +954,7 @@ lean_dec(x_3); x_6 = l___private_init_data_array_basic_1__swapAtPanic_x21___rarg___closed__2; x_7 = lean_string_append(x_5, x_6); x_8 = l___private_init_data_array_basic_1__swapAtPanic_x21___rarg___closed__3; -x_9 = lean_unsigned_to_nat(133u); +x_9 = lean_unsigned_to_nat(140u); x_10 = lean_unsigned_to_nat(0u); x_11 = l_panicWithPos___at_Array_swapAt_x21___spec__2___rarg(x_1, x_8, x_9, x_10, x_7); lean_dec(x_7); @@ -2364,7 +2435,7 @@ lean_dec(x_3); return x_5; } } -lean_object* l_Array_mfindAux___main___at_Array_find___spec__1___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +lean_object* l_Array_mfindAux___main___at_Array_find_x3f___spec__1___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3) { _start: { lean_object* x_4; uint8_t x_5; @@ -2403,50 +2474,158 @@ return x_8; } } } -lean_object* l_Array_mfindAux___main___at_Array_find___spec__1(lean_object* x_1, lean_object* x_2) { +lean_object* l_Array_mfindAux___main___at_Array_find_x3f___spec__1(lean_object* x_1, lean_object* x_2) { _start: { lean_object* x_3; -x_3 = lean_alloc_closure((void*)(l_Array_mfindAux___main___at_Array_find___spec__1___rarg___boxed), 3, 0); +x_3 = lean_alloc_closure((void*)(l_Array_mfindAux___main___at_Array_find_x3f___spec__1___rarg___boxed), 3, 0); return x_3; } } -lean_object* l_Array_find___rarg(lean_object* x_1, lean_object* x_2) { +lean_object* l_Array_find_x3f___rarg(lean_object* x_1, lean_object* x_2) { _start: { lean_object* x_3; lean_object* x_4; x_3 = lean_unsigned_to_nat(0u); -x_4 = l_Array_mfindAux___main___at_Array_find___spec__1___rarg(x_2, x_1, x_3); +x_4 = l_Array_mfindAux___main___at_Array_find_x3f___spec__1___rarg(x_2, x_1, x_3); return x_4; } } -lean_object* l_Array_find(lean_object* x_1, lean_object* x_2) { +lean_object* l_Array_find_x3f(lean_object* x_1, lean_object* x_2) { _start: { lean_object* x_3; -x_3 = lean_alloc_closure((void*)(l_Array_find___rarg___boxed), 2, 0); +x_3 = lean_alloc_closure((void*)(l_Array_find_x3f___rarg___boxed), 2, 0); return x_3; } } -lean_object* l_Array_mfindAux___main___at_Array_find___spec__1___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +lean_object* l_Array_mfindAux___main___at_Array_find_x3f___spec__1___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { _start: { lean_object* x_4; -x_4 = l_Array_mfindAux___main___at_Array_find___spec__1___rarg(x_1, x_2, x_3); +x_4 = l_Array_mfindAux___main___at_Array_find_x3f___spec__1___rarg(x_1, x_2, x_3); lean_dec(x_2); return x_4; } } -lean_object* l_Array_find___rarg___boxed(lean_object* x_1, lean_object* x_2) { +lean_object* l_Array_find_x3f___rarg___boxed(lean_object* x_1, lean_object* x_2) { _start: { lean_object* x_3; -x_3 = l_Array_find___rarg(x_1, x_2); +x_3 = l_Array_find_x3f___rarg(x_1, x_2); lean_dec(x_1); return x_3; } } -lean_object* l_Array_mfindRevAux___main___at_Array_findRev___spec__1___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +lean_object* l_Array_mfindAux___main___at_Array_find_x21___spec__1___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; uint8_t x_5; +x_4 = lean_array_get_size(x_2); +x_5 = lean_nat_dec_lt(x_3, x_4); +lean_dec(x_4); +if (x_5 == 0) +{ +lean_object* x_6; +lean_dec(x_3); +lean_dec(x_1); +x_6 = lean_box(0); +return x_6; +} +else +{ +lean_object* x_7; lean_object* x_8; +x_7 = lean_array_fget(x_2, x_3); +lean_inc(x_1); +x_8 = lean_apply_1(x_1, x_7); +if (lean_obj_tag(x_8) == 0) +{ +lean_object* x_9; lean_object* x_10; +x_9 = lean_unsigned_to_nat(1u); +x_10 = lean_nat_add(x_3, x_9); +lean_dec(x_3); +x_3 = x_10; +goto _start; +} +else +{ +lean_dec(x_3); +lean_dec(x_1); +return x_8; +} +} +} +} +lean_object* l_Array_mfindAux___main___at_Array_find_x21___spec__1(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = lean_alloc_closure((void*)(l_Array_mfindAux___main___at_Array_find_x21___spec__1___rarg___boxed), 3, 0); +return x_3; +} +} +lean_object* _init_l_Array_find_x21___rarg___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("failed to find element"); +return x_1; +} +} +lean_object* l_Array_find_x21___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; lean_object* x_5; +x_4 = lean_unsigned_to_nat(0u); +x_5 = l_Array_mfindAux___main___at_Array_find_x21___spec__1___rarg(x_3, x_2, x_4); +if (lean_obj_tag(x_5) == 0) +{ +lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; +x_6 = l___private_init_data_array_basic_1__swapAtPanic_x21___rarg___closed__3; +x_7 = lean_unsigned_to_nat(254u); +x_8 = lean_unsigned_to_nat(12u); +x_9 = l_Array_find_x21___rarg___closed__1; +x_10 = l_panicWithPos___rarg(x_1, x_6, x_7, x_8, x_9); +return x_10; +} +else +{ +lean_object* x_11; +lean_dec(x_1); +x_11 = lean_ctor_get(x_5, 0); +lean_inc(x_11); +lean_dec(x_5); +return x_11; +} +} +} +lean_object* l_Array_find_x21(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = lean_alloc_closure((void*)(l_Array_find_x21___rarg___boxed), 3, 0); +return x_3; +} +} +lean_object* l_Array_mfindAux___main___at_Array_find_x21___spec__1___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; +x_4 = l_Array_mfindAux___main___at_Array_find_x21___spec__1___rarg(x_1, x_2, x_3); +lean_dec(x_2); +return x_4; +} +} +lean_object* l_Array_find_x21___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; +x_4 = l_Array_find_x21___rarg(x_1, x_2, x_3); +lean_dec(x_2); +return x_4; +} +} +lean_object* l_Array_mfindRevAux___main___at_Array_findRev_x3f___spec__1___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { lean_object* x_5; uint8_t x_6; @@ -2484,45 +2663,332 @@ return x_11; } } } -lean_object* l_Array_mfindRevAux___main___at_Array_findRev___spec__1(lean_object* x_1, lean_object* x_2) { +lean_object* l_Array_mfindRevAux___main___at_Array_findRev_x3f___spec__1(lean_object* x_1, lean_object* x_2) { _start: { lean_object* x_3; -x_3 = lean_alloc_closure((void*)(l_Array_mfindRevAux___main___at_Array_findRev___spec__1___rarg___boxed), 4, 0); +x_3 = lean_alloc_closure((void*)(l_Array_mfindRevAux___main___at_Array_findRev_x3f___spec__1___rarg___boxed), 4, 0); return x_3; } } -lean_object* l_Array_findRev___rarg(lean_object* x_1, lean_object* x_2) { +lean_object* l_Array_findRev_x3f___rarg(lean_object* x_1, lean_object* x_2) { _start: { lean_object* x_3; lean_object* x_4; x_3 = lean_array_get_size(x_1); -x_4 = l_Array_mfindRevAux___main___at_Array_findRev___spec__1___rarg(x_2, x_1, x_3, lean_box(0)); +x_4 = l_Array_mfindRevAux___main___at_Array_findRev_x3f___spec__1___rarg(x_2, x_1, x_3, lean_box(0)); return x_4; } } -lean_object* l_Array_findRev(lean_object* x_1, lean_object* x_2) { +lean_object* l_Array_findRev_x3f(lean_object* x_1, lean_object* x_2) { _start: { lean_object* x_3; -x_3 = lean_alloc_closure((void*)(l_Array_findRev___rarg___boxed), 2, 0); +x_3 = lean_alloc_closure((void*)(l_Array_findRev_x3f___rarg___boxed), 2, 0); return x_3; } } -lean_object* l_Array_mfindRevAux___main___at_Array_findRev___spec__1___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +lean_object* l_Array_mfindRevAux___main___at_Array_findRev_x3f___spec__1___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { lean_object* x_5; -x_5 = l_Array_mfindRevAux___main___at_Array_findRev___spec__1___rarg(x_1, x_2, x_3, x_4); +x_5 = l_Array_mfindRevAux___main___at_Array_findRev_x3f___spec__1___rarg(x_1, x_2, x_3, x_4); lean_dec(x_2); return x_5; } } -lean_object* l_Array_findRev___rarg___boxed(lean_object* x_1, lean_object* x_2) { +lean_object* l_Array_findRev_x3f___rarg___boxed(lean_object* x_1, lean_object* x_2) { _start: { lean_object* x_3; -x_3 = l_Array_findRev___rarg(x_1, x_2); +x_3 = l_Array_findRev_x3f___rarg(x_1, x_2); +lean_dec(x_1); +return x_3; +} +} +lean_object* l_Array_mfindRevAux___main___at_Array_findRev_x21___spec__1___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; uint8_t x_6; +x_5 = lean_unsigned_to_nat(0u); +x_6 = lean_nat_dec_lt(x_5, x_3); +if (x_6 == 0) +{ +lean_object* x_7; +lean_dec(x_3); +lean_dec(x_1); +x_7 = lean_box(0); +return x_7; +} +else +{ +lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; +x_8 = lean_unsigned_to_nat(1u); +x_9 = lean_nat_sub(x_3, x_8); +lean_dec(x_3); +x_10 = lean_array_fget(x_2, x_9); +lean_inc(x_1); +x_11 = lean_apply_1(x_1, x_10); +if (lean_obj_tag(x_11) == 0) +{ +x_3 = x_9; +x_4 = lean_box(0); +goto _start; +} +else +{ +lean_dec(x_9); +lean_dec(x_1); +return x_11; +} +} +} +} +lean_object* l_Array_mfindRevAux___main___at_Array_findRev_x21___spec__1(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = lean_alloc_closure((void*)(l_Array_mfindRevAux___main___at_Array_findRev_x21___spec__1___rarg___boxed), 4, 0); +return x_3; +} +} +lean_object* l_Array_findRev_x21___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; lean_object* x_5; +x_4 = lean_array_get_size(x_2); +x_5 = l_Array_mfindRevAux___main___at_Array_findRev_x21___spec__1___rarg(x_3, x_2, x_4, lean_box(0)); +if (lean_obj_tag(x_5) == 0) +{ +lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; +x_6 = l___private_init_data_array_basic_1__swapAtPanic_x21___rarg___closed__3; +x_7 = lean_unsigned_to_nat(262u); +x_8 = lean_unsigned_to_nat(12u); +x_9 = l_Array_find_x21___rarg___closed__1; +x_10 = l_panicWithPos___rarg(x_1, x_6, x_7, x_8, x_9); +return x_10; +} +else +{ +lean_object* x_11; +lean_dec(x_1); +x_11 = lean_ctor_get(x_5, 0); +lean_inc(x_11); +lean_dec(x_5); +return x_11; +} +} +} +lean_object* l_Array_findRev_x21(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = lean_alloc_closure((void*)(l_Array_findRev_x21___rarg___boxed), 3, 0); +return x_3; +} +} +lean_object* l_Array_mfindRevAux___main___at_Array_findRev_x21___spec__1___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; +x_5 = l_Array_mfindRevAux___main___at_Array_findRev_x21___spec__1___rarg(x_1, x_2, x_3, x_4); +lean_dec(x_2); +return x_5; +} +} +lean_object* l_Array_findRev_x21___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; +x_4 = l_Array_findRev_x21___rarg(x_1, x_2, x_3); +lean_dec(x_2); +return x_4; +} +} +lean_object* l_Array_findIdxAux___main___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; uint8_t x_5; +x_4 = lean_array_get_size(x_1); +x_5 = lean_nat_dec_lt(x_3, x_4); +lean_dec(x_4); +if (x_5 == 0) +{ +lean_object* x_6; +lean_dec(x_3); +lean_dec(x_2); +x_6 = lean_box(0); +return x_6; +} +else +{ +lean_object* x_7; lean_object* x_8; uint8_t x_9; +x_7 = lean_array_fget(x_1, x_3); +lean_inc(x_2); +x_8 = lean_apply_1(x_2, x_7); +x_9 = lean_unbox(x_8); +lean_dec(x_8); +if (x_9 == 0) +{ +lean_object* x_10; lean_object* x_11; +x_10 = lean_unsigned_to_nat(1u); +x_11 = lean_nat_add(x_3, x_10); +lean_dec(x_3); +x_3 = x_11; +goto _start; +} +else +{ +lean_object* x_13; +lean_dec(x_2); +x_13 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_13, 0, x_3); +return x_13; +} +} +} +} +lean_object* l_Array_findIdxAux___main(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_Array_findIdxAux___main___rarg___boxed), 3, 0); +return x_2; +} +} +lean_object* l_Array_findIdxAux___main___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; +x_4 = l_Array_findIdxAux___main___rarg(x_1, x_2, x_3); +lean_dec(x_1); +return x_4; +} +} +lean_object* l_Array_findIdxAux___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; +x_4 = l_Array_findIdxAux___main___rarg(x_1, x_2, x_3); +return x_4; +} +} +lean_object* l_Array_findIdxAux(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_Array_findIdxAux___rarg___boxed), 3, 0); +return x_2; +} +} +lean_object* l_Array_findIdxAux___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; +x_4 = l_Array_findIdxAux___rarg(x_1, x_2, x_3); +lean_dec(x_1); +return x_4; +} +} +lean_object* l_Array_findIdx_x3f___rarg(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; lean_object* x_4; +x_3 = lean_unsigned_to_nat(0u); +x_4 = l_Array_findIdxAux___main___rarg(x_1, x_2, x_3); +return x_4; +} +} +lean_object* l_Array_findIdx_x3f(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_Array_findIdx_x3f___rarg___boxed), 2, 0); +return x_2; +} +} +lean_object* l_Array_findIdx_x3f___rarg___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = l_Array_findIdx_x3f___rarg(x_1, x_2); +lean_dec(x_1); +return x_3; +} +} +lean_object* l_panicWithPos___at_Array_findIdx_x21___spec__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; +x_5 = l_panicWithPos___rarg___closed__1; +x_6 = lean_string_append(x_5, x_1); +x_7 = l_panicWithPos___rarg___closed__2; +x_8 = lean_string_append(x_6, x_7); +x_9 = l_Nat_repr(x_2); +x_10 = lean_string_append(x_8, x_9); +lean_dec(x_9); +x_11 = l_panicWithPos___rarg___closed__2; +x_12 = lean_string_append(x_10, x_11); +x_13 = l_Nat_repr(x_3); +x_14 = lean_string_append(x_12, x_13); +lean_dec(x_13); +x_15 = l_panicWithPos___rarg___closed__3; +x_16 = lean_string_append(x_14, x_15); +x_17 = lean_string_append(x_16, x_4); +x_18 = l_Nat_Inhabited; +x_19 = lean_panic_fn(x_17); +return x_19; +} +} +lean_object* l_Array_findIdx_x21___rarg(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; lean_object* x_4; +x_3 = lean_unsigned_to_nat(0u); +x_4 = l_Array_findIdxAux___main___rarg(x_1, x_2, x_3); +if (lean_obj_tag(x_4) == 0) +{ +lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; +x_5 = l___private_init_data_array_basic_1__swapAtPanic_x21___rarg___closed__3; +x_6 = lean_unsigned_to_nat(278u); +x_7 = lean_unsigned_to_nat(12u); +x_8 = l_Array_find_x21___rarg___closed__1; +x_9 = l_panicWithPos___at_Array_findIdx_x21___spec__1(x_5, x_6, x_7, x_8); +return x_9; +} +else +{ +lean_object* x_10; +x_10 = lean_ctor_get(x_4, 0); +lean_inc(x_10); +lean_dec(x_4); +return x_10; +} +} +} +lean_object* l_Array_findIdx_x21(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_Array_findIdx_x21___rarg___boxed), 2, 0); +return x_2; +} +} +lean_object* l_panicWithPos___at_Array_findIdx_x21___spec__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; +x_5 = l_panicWithPos___at_Array_findIdx_x21___spec__1(x_1, x_2, x_3, x_4); +lean_dec(x_4); +lean_dec(x_1); +return x_5; +} +} +lean_object* l_Array_findIdx_x21___rarg___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = l_Array_findIdx_x21___rarg(x_1, x_2); lean_dec(x_1); return x_3; } @@ -5363,6 +5829,8 @@ l___private_init_data_array_basic_1__swapAtPanic_x21___rarg___closed__2 = _init_ lean_mark_persistent(l___private_init_data_array_basic_1__swapAtPanic_x21___rarg___closed__2); l___private_init_data_array_basic_1__swapAtPanic_x21___rarg___closed__3 = _init_l___private_init_data_array_basic_1__swapAtPanic_x21___rarg___closed__3(); lean_mark_persistent(l___private_init_data_array_basic_1__swapAtPanic_x21___rarg___closed__3); +l_Array_find_x21___rarg___closed__1 = _init_l_Array_find_x21___rarg___closed__1(); +lean_mark_persistent(l_Array_find_x21___rarg___closed__1); l_Array_allM___rarg___closed__1 = _init_l_Array_allM___rarg___closed__1(); lean_mark_persistent(l_Array_allM___rarg___closed__1); l_Array_HasRepr___rarg___closed__1 = _init_l_Array_HasRepr___rarg___closed__1(); diff --git a/src/stage0/init/data/default.c b/src/stage0/init/data/default.c index ec02a349bd..76818abb4c 100644 --- a/src/stage0/init/data/default.c +++ b/src/stage0/init/data/default.c @@ -1,6 +1,6 @@ // Lean compiler output // Module: init.data.default -// Imports: init.data.basic init.data.nat.default init.data.char.default init.data.string.default init.data.list.default init.data.int.default init.data.array.default init.data.bytearray.default init.data.fin.default init.data.uint init.data.rbtree.default init.data.rbmap.default init.data.option.basic init.data.option.instances init.data.hashmap.default init.data.random +// Imports: init.data.basic init.data.nat.default init.data.char.default init.data.string.default init.data.list.default init.data.int.default init.data.array.default init.data.bytearray.default init.data.fin.default init.data.uint init.data.rbtree.default init.data.rbmap.default init.data.option.default init.data.hashmap.default init.data.random init.data.queue.default #include "runtime/lean.h" #if defined(__clang__) #pragma clang diagnostic ignored "-Wunused-parameter" @@ -25,10 +25,10 @@ lean_object* initialize_init_data_fin_default(lean_object*); lean_object* initialize_init_data_uint(lean_object*); lean_object* initialize_init_data_rbtree_default(lean_object*); lean_object* initialize_init_data_rbmap_default(lean_object*); -lean_object* initialize_init_data_option_basic(lean_object*); -lean_object* initialize_init_data_option_instances(lean_object*); +lean_object* initialize_init_data_option_default(lean_object*); lean_object* initialize_init_data_hashmap_default(lean_object*); lean_object* initialize_init_data_random(lean_object*); +lean_object* initialize_init_data_queue_default(lean_object*); static bool _G_initialized = false; lean_object* initialize_init_data_default(lean_object* w) { if (_G_initialized) return w; @@ -58,14 +58,14 @@ w = initialize_init_data_rbtree_default(w); if (lean_io_result_is_error(w)) return w; w = initialize_init_data_rbmap_default(w); if (lean_io_result_is_error(w)) return w; -w = initialize_init_data_option_basic(w); -if (lean_io_result_is_error(w)) return w; -w = initialize_init_data_option_instances(w); +w = initialize_init_data_option_default(w); if (lean_io_result_is_error(w)) return w; w = initialize_init_data_hashmap_default(w); if (lean_io_result_is_error(w)) return w; w = initialize_init_data_random(w); if (lean_io_result_is_error(w)) return w; +w = initialize_init_data_queue_default(w); +if (lean_io_result_is_error(w)) return w; return w; } #ifdef __cplusplus diff --git a/src/stage0/init/data/hashmap/basic.c b/src/stage0/init/data/hashmap/basic.c index 568c771719..e39600af03 100644 --- a/src/stage0/init/data/hashmap/basic.c +++ b/src/stage0/init/data/hashmap/basic.c @@ -50,6 +50,7 @@ lean_object* l_HashMap_Inhabited___boxed(lean_object*, lean_object*, lean_object lean_object* l_HashMap_HasEmptyc___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_uget(lean_object*, lean_object*, size_t, lean_object*); lean_object* l_HashMapImp_mfoldBuckets___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_HashMap_find_x21(lean_object*, lean_object*); lean_object* l_HashMap_size___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_uset(lean_object*, lean_object*, size_t, lean_object*, lean_object*); lean_object* l_HashMap_erase___rarg(lean_object*, lean_object*, lean_object*, lean_object*); @@ -63,6 +64,7 @@ lean_object* l_HashMap_empty___boxed(lean_object*, lean_object*, lean_object*, l lean_object* l_HashMap_insert___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_AssocList_erase___main___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_HashMapImp_moveEntries___rarg(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_HashMap_find_x21___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_HashMap_empty___rarg___boxed(lean_object*); lean_object* l_HashMap_contains(lean_object*, lean_object*); lean_object* l_HashMapImp_moveEntries___main(lean_object*, lean_object*); @@ -84,6 +86,7 @@ lean_object* l_AssocList_mfoldl___main___at_HashMapImp_fold___spec__1(lean_objec lean_object* l_HashMapBucket_update___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_miterateAux___main___at_HashMap_mfold___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_HashMapImp_erase___rarg(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_HashMap_find_x21___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_nat_add(lean_object*, lean_object*); lean_object* l_HashMapImp_find___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_HashMap_findD___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -97,6 +100,7 @@ lean_object* l_Array_miterateAux___main___at_HashMap_mfold___spec__1___boxed(lea lean_object* l_AssocList_replace___main___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_mkHashMapImp___rarg___closed__1; lean_object* l_Array_miterateAux___main___at_HashMapImp_mfold___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_HashMap_find_x21___rarg___closed__1; lean_object* l_HashMapImp_reinsertAux(lean_object*, lean_object*); lean_object* l_HashMapImp_moveEntries___main___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_HashMap_mfold(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -133,11 +137,13 @@ lean_object* l_HashMap_findD___rarg___boxed(lean_object*, lean_object*, lean_obj lean_object* l_Array_set(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_HashMap_find___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_HashMap_fold___rarg___boxed(lean_object*, lean_object*, lean_object*); +lean_object* l_HashMap_find_x21___rarg___closed__2; lean_object* lean_nat_mul(lean_object*, lean_object*); uint8_t l_HashMap_empty___rarg(lean_object*); lean_object* l_HashMap_fold___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_HashMapImp_mfoldBuckets___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_HashMap_HasEmptyc(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_panicWithPos___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_HashMapImp_expand___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_HashMapBucket_update___rarg(lean_object* x_1, size_t x_2, lean_object* x_3, lean_object* x_4) { _start: @@ -1273,6 +1279,65 @@ lean_dec(x_3); return x_6; } } +lean_object* _init_l_HashMap_find_x21___rarg___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("/Users/leonardodemoura/projects/lean4/library/init/data/hashmap/basic.lean"); +return x_1; +} +} +lean_object* _init_l_HashMap_find_x21___rarg___closed__2() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("key is not in the map"); +return x_1; +} +} +lean_object* l_HashMap_find_x21___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { +_start: +{ +lean_object* x_6; +x_6 = l_HashMapImp_find___rarg(x_1, x_2, x_4, x_5); +if (lean_obj_tag(x_6) == 0) +{ +lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; +x_7 = l_HashMap_find_x21___rarg___closed__1; +x_8 = lean_unsigned_to_nat(155u); +x_9 = lean_unsigned_to_nat(12u); +x_10 = l_HashMap_find_x21___rarg___closed__2; +x_11 = l_panicWithPos___rarg(x_3, x_7, x_8, x_9, x_10); +return x_11; +} +else +{ +lean_object* x_12; +lean_dec(x_3); +x_12 = lean_ctor_get(x_6, 0); +lean_inc(x_12); +lean_dec(x_6); +return x_12; +} +} +} +lean_object* l_HashMap_find_x21(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = lean_alloc_closure((void*)(l_HashMap_find_x21___rarg___boxed), 5, 0); +return x_3; +} +} +lean_object* l_HashMap_find_x21___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { +_start: +{ +lean_object* x_6; +x_6 = l_HashMap_find_x21___rarg(x_1, x_2, x_3, x_4, x_5); +lean_dec(x_4); +return x_6; +} +} uint8_t l_HashMap_contains___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { @@ -1649,6 +1714,10 @@ l_mkHashMapImp___rarg___closed__2 = _init_l_mkHashMapImp___rarg___closed__2(); lean_mark_persistent(l_mkHashMapImp___rarg___closed__2); l_HashMap_Inhabited___closed__1 = _init_l_HashMap_Inhabited___closed__1(); lean_mark_persistent(l_HashMap_Inhabited___closed__1); +l_HashMap_find_x21___rarg___closed__1 = _init_l_HashMap_find_x21___rarg___closed__1(); +lean_mark_persistent(l_HashMap_find_x21___rarg___closed__1); +l_HashMap_find_x21___rarg___closed__2 = _init_l_HashMap_find_x21___rarg___closed__2(); +lean_mark_persistent(l_HashMap_find_x21___rarg___closed__2); return w; } #ifdef __cplusplus diff --git a/src/stage0/init/data/option/basic.c b/src/stage0/init/data/option/basic.c index 1de1c351cb..853a41fb3e 100644 --- a/src/stage0/init/data/option/basic.c +++ b/src/stage0/init/data/option/basic.c @@ -18,13 +18,11 @@ lean_object* l_Option_Monad___lambda__4___boxed(lean_object*, lean_object*, lean lean_object* l_Option_Monad___closed__3; lean_object* l_Option_Alternative; lean_object* l_Option_Monad___lambda__4(lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Option_getOrElse___rarg___boxed(lean_object*, lean_object*); lean_object* l_Option_Monad___closed__6; lean_object* l_Option_Monad___closed__9; lean_object* l_Option_DecidableEq___rarg___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Option_Monad___closed__4; lean_object* l_Option_Monad; -lean_object* l_Option_get___rarg___boxed(lean_object*, lean_object*); lean_object* l_Option_HasBeq(lean_object*); lean_object* l_Option_HasLess___boxed(lean_object*, lean_object*); lean_object* l_Option_Monad___lambda__5(lean_object*, lean_object*, lean_object*, lean_object*); @@ -37,11 +35,13 @@ lean_object* l_Option_Monad___closed__1; lean_object* l_Option_toMonad___boxed(lean_object*, lean_object*); lean_object* l_Option_map___rarg(lean_object*, lean_object*); lean_object* l_Option_orelse___rarg___boxed(lean_object*, lean_object*); +lean_object* l_Option_getD___rarg___boxed(lean_object*, lean_object*); lean_object* l_Option_map(lean_object*, lean_object*); lean_object* l_Option_Monad___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*); uint8_t l_Option_toBool___rarg(lean_object*); lean_object* l_Option_HasBeq___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_Option_toMonad___rarg(lean_object*, lean_object*, lean_object*); +lean_object* l_Option_getD(lean_object*); lean_object* l_Option_HasLess(lean_object*, lean_object*); lean_object* l_Option_Monad___closed__2; lean_object* l_Option_Alternative___lambda__1(lean_object*); @@ -49,14 +49,12 @@ uint8_t l_Option_DecidableEq___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_Option_Inhabited(lean_object*); lean_object* l_Option_toBool___rarg___boxed(lean_object*); lean_object* l_Option_Monad___closed__10; -lean_object* l_Option_get(lean_object*); lean_object* l_Option_Alternative___lambda__2(lean_object*, lean_object*, lean_object*); lean_object* l_Option_Monad___closed__5; lean_object* l_Option_isSome___rarg___boxed(lean_object*); lean_object* l_Option_orelse(lean_object*); lean_object* l_Option_bind(lean_object*, lean_object*); lean_object* l_Option_Alternative___closed__3; -lean_object* l_Option_getOrElse(lean_object*); lean_object* l_Option_decidableRelLt___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_Option_isNone(lean_object*); lean_object* l_Option_orelse___rarg(lean_object*, lean_object*); @@ -67,11 +65,10 @@ lean_object* l_Option_Monad___closed__8; lean_object* l_Option_toMonad(lean_object*, lean_object*); lean_object* l_Option_DecidableEq(lean_object*); lean_object* l_Option_decidableRelLt(lean_object*, lean_object*); -lean_object* l_Option_getOrElse___rarg(lean_object*, lean_object*); -lean_object* l_Option_get___rarg(lean_object*, lean_object*); lean_object* l_Option_Alternative___closed__2; uint8_t l_Option_isSome___rarg(lean_object*); lean_object* l_Option_toBool(lean_object*); +lean_object* l_Option_getD___rarg(lean_object*, lean_object*); lean_object* l_Option_Monad___closed__7; uint8_t l_Option_isNone___rarg(lean_object*); lean_object* l_Option_toMonad___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3) { @@ -121,7 +118,7 @@ lean_dec(x_1); return x_3; } } -lean_object* l_Option_getOrElse___rarg(lean_object* x_1, lean_object* x_2) { +lean_object* l_Option_getD___rarg(lean_object* x_1, lean_object* x_2) { _start: { if (lean_obj_tag(x_1) == 0) @@ -138,54 +135,19 @@ return x_3; } } } -lean_object* l_Option_getOrElse(lean_object* x_1) { +lean_object* l_Option_getD(lean_object* x_1) { _start: { lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l_Option_getOrElse___rarg___boxed), 2, 0); +x_2 = lean_alloc_closure((void*)(l_Option_getD___rarg___boxed), 2, 0); return x_2; } } -lean_object* l_Option_getOrElse___rarg___boxed(lean_object* x_1, lean_object* x_2) { +lean_object* l_Option_getD___rarg___boxed(lean_object* x_1, lean_object* x_2) { _start: { lean_object* x_3; -x_3 = l_Option_getOrElse___rarg(x_1, x_2); -lean_dec(x_2); -lean_dec(x_1); -return x_3; -} -} -lean_object* l_Option_get___rarg(lean_object* x_1, lean_object* x_2) { -_start: -{ -if (lean_obj_tag(x_2) == 0) -{ -lean_inc(x_1); -return x_1; -} -else -{ -lean_object* x_3; -x_3 = lean_ctor_get(x_2, 0); -lean_inc(x_3); -return x_3; -} -} -} -lean_object* l_Option_get(lean_object* x_1) { -_start: -{ -lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l_Option_get___rarg___boxed), 2, 0); -return x_2; -} -} -lean_object* l_Option_get___rarg___boxed(lean_object* x_1, lean_object* x_2) { -_start: -{ -lean_object* x_3; -x_3 = l_Option_get___rarg(x_1, x_2); +x_3 = l_Option_getD___rarg(x_1, x_2); lean_dec(x_2); lean_dec(x_1); return x_3; diff --git a/src/stage0/init/data/option/basicaux.c b/src/stage0/init/data/option/basicaux.c new file mode 100644 index 0000000000..b10773564a --- /dev/null +++ b/src/stage0/init/data/option/basicaux.c @@ -0,0 +1,97 @@ +// Lean compiler output +// Module: init.data.option.basicaux +// Imports: init.data.option.basic init.util +#include "runtime/lean.h" +#if defined(__clang__) +#pragma clang diagnostic ignored "-Wunused-parameter" +#pragma clang diagnostic ignored "-Wunused-label" +#elif defined(__GNUC__) && !defined(__CLANG__) +#pragma GCC diagnostic ignored "-Wunused-parameter" +#pragma GCC diagnostic ignored "-Wunused-label" +#pragma GCC diagnostic ignored "-Wunused-but-set-variable" +#endif +#ifdef __cplusplus +extern "C" { +#endif +lean_object* l_Option_get_x21___rarg(lean_object*, lean_object*); +lean_object* l_Option_get_x21(lean_object*); +lean_object* l_Option_get_x21___rarg___closed__2; +lean_object* l_Option_get_x21___rarg___closed__1; +lean_object* l_Option_get_x21___rarg___boxed(lean_object*, lean_object*); +lean_object* l_panicWithPos___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* _init_l_Option_get_x21___rarg___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("/Users/leonardodemoura/projects/lean4/library/init/data/option/basicaux.lean"); +return x_1; +} +} +lean_object* _init_l_Option_get_x21___rarg___closed__2() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("value is none"); +return x_1; +} +} +lean_object* l_Option_get_x21___rarg(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; +x_3 = l_Option_get_x21___rarg___closed__1; +x_4 = lean_unsigned_to_nat(16u); +x_5 = lean_unsigned_to_nat(12u); +x_6 = l_Option_get_x21___rarg___closed__2; +x_7 = l_panicWithPos___rarg(x_1, x_3, x_4, x_5, x_6); +return x_7; +} +else +{ +lean_object* x_8; +lean_dec(x_1); +x_8 = lean_ctor_get(x_2, 0); +lean_inc(x_8); +return x_8; +} +} +} +lean_object* l_Option_get_x21(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_Option_get_x21___rarg___boxed), 2, 0); +return x_2; +} +} +lean_object* l_Option_get_x21___rarg___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = l_Option_get_x21___rarg(x_1, x_2); +lean_dec(x_2); +return x_3; +} +} +lean_object* initialize_init_data_option_basic(lean_object*); +lean_object* initialize_init_util(lean_object*); +static bool _G_initialized = false; +lean_object* initialize_init_data_option_basicaux(lean_object* w) { +if (_G_initialized) return w; +_G_initialized = true; +if (lean_io_result_is_error(w)) return w; +w = initialize_init_data_option_basic(w); +if (lean_io_result_is_error(w)) return w; +w = initialize_init_util(w); +if (lean_io_result_is_error(w)) return w; +l_Option_get_x21___rarg___closed__1 = _init_l_Option_get_x21___rarg___closed__1(); +lean_mark_persistent(l_Option_get_x21___rarg___closed__1); +l_Option_get_x21___rarg___closed__2 = _init_l_Option_get_x21___rarg___closed__2(); +lean_mark_persistent(l_Option_get_x21___rarg___closed__2); +return w; +} +#ifdef __cplusplus +} +#endif diff --git a/src/stage0/init/data/option/default.c b/src/stage0/init/data/option/default.c new file mode 100644 index 0000000000..abe1acfd9f --- /dev/null +++ b/src/stage0/init/data/option/default.c @@ -0,0 +1,34 @@ +// Lean compiler output +// Module: init.data.option.default +// Imports: init.data.option.basic init.data.option.basicaux init.data.option.instances +#include "runtime/lean.h" +#if defined(__clang__) +#pragma clang diagnostic ignored "-Wunused-parameter" +#pragma clang diagnostic ignored "-Wunused-label" +#elif defined(__GNUC__) && !defined(__CLANG__) +#pragma GCC diagnostic ignored "-Wunused-parameter" +#pragma GCC diagnostic ignored "-Wunused-label" +#pragma GCC diagnostic ignored "-Wunused-but-set-variable" +#endif +#ifdef __cplusplus +extern "C" { +#endif +lean_object* initialize_init_data_option_basic(lean_object*); +lean_object* initialize_init_data_option_basicaux(lean_object*); +lean_object* initialize_init_data_option_instances(lean_object*); +static bool _G_initialized = false; +lean_object* initialize_init_data_option_default(lean_object* w) { +if (_G_initialized) return w; +_G_initialized = true; +if (lean_io_result_is_error(w)) return w; +w = initialize_init_data_option_basic(w); +if (lean_io_result_is_error(w)) return w; +w = initialize_init_data_option_basicaux(w); +if (lean_io_result_is_error(w)) return w; +w = initialize_init_data_option_instances(w); +if (lean_io_result_is_error(w)) return w; +return w; +} +#ifdef __cplusplus +} +#endif diff --git a/src/stage0/init/data/persistentarray/basic.c b/src/stage0/init/data/persistentarray/basic.c index a20e6ef21f..60340632d5 100644 --- a/src/stage0/init/data/persistentarray/basic.c +++ b/src/stage0/init/data/persistentarray/basic.c @@ -16,6 +16,7 @@ extern "C" { lean_object* l_PersistentArray_empty___closed__2; lean_object* l_Array_ummapAux___main___at_PersistentArray_map___spec__4___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_PersistentArray_mmapAux___main___rarg___closed__1; +lean_object* l_mkPArray(lean_object*); lean_object* l_PersistentArray_mforAux___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_unsafeCast(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_miterateAux___main___at_PersistentArray_mfoldlFromAux___main___spec__1___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -63,8 +64,10 @@ lean_object* l_Array_miterateAux___main___at_PersistentArray_foldlFrom___spec__9 lean_object* l_Array_ummapAux___main___at_PersistentArray_map___spec__5(lean_object*, lean_object*); lean_object* l_Array_mfindRevAux___main___at_PersistentArray_findRev___spec__2___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_PersistentArray_getAux___main___rarg(lean_object*, lean_object*, size_t, size_t); +lean_object* l_Array_toPArray___rarg(lean_object*); lean_object* l_Array_ummapAux___main___at_PersistentArray_map___spec__4(lean_object*, lean_object*); size_t l_USize_shift__right(size_t, size_t); +lean_object* l_Array_miterateAux___main___at_Array_toPersistentArray___spec__1(lean_object*); lean_object* l_Array_miterateAux___main___at_PersistentArray_toList___spec__5___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_PersistentArray_mkNewPath___main(lean_object*); lean_object* l_Array_ummapAux___main___at_PersistentArray_mmap___spec__1(lean_object*, lean_object*); @@ -74,7 +77,6 @@ lean_object* l_Array_miterateAux___main___at_PersistentArray_foldl___spec__3___r lean_object* l_Array_miterateAux___main___at_PersistentArray_foldlFrom___spec__4(lean_object*, lean_object*); lean_object* l_PersistentArray_insertNewLeaf___rarg(lean_object*, size_t, size_t, lean_object*); lean_object* l_PersistentArray_mfoldlFromAux___main___at_PersistentArray_foldlFrom___spec__2___rarg(lean_object*, lean_object*, size_t, size_t, lean_object*); -lean_object* l_PersistentArray_get___rarg___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_PersistentArray_toList___rarg___boxed(lean_object*); lean_object* l_PersistentArray_mfoldl___rarg___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_List_toPersistentArrayAux___main___rarg(lean_object*, lean_object*); @@ -84,6 +86,7 @@ lean_object* l_PersistentArray_mkNewPath___rarg___boxed(lean_object*, lean_objec lean_object* l_PersistentArray_mfoldlAux___main(lean_object*, lean_object*); lean_object* l_PersistentArray_mfoldlFromAux___rarg(lean_object*, lean_object*, lean_object*, lean_object*, size_t, size_t, lean_object*); lean_object* l_PersistentArray_insertNewLeaf___main___rarg(lean_object*, size_t, size_t, lean_object*); +lean_object* l_Nat_foldAux___main___at_mkPersistentArray___spec__1(lean_object*); lean_object* l_PersistentArray_mfoldlFrom(lean_object*, lean_object*); lean_object* l_List_reverse___rarg(lean_object*); lean_object* l_Array_miterateAux___main___at_PersistentArray_foldlFrom___spec__6(lean_object*, lean_object*); @@ -118,11 +121,13 @@ lean_object* l_PersistentArray_findRev(lean_object*, lean_object*); lean_object* l_PersistentArray_push(lean_object*); lean_object* l_PersistentArray_mkNewTail___rarg(lean_object*); lean_object* l_PersistentArray_modifyAux___main___rarg(lean_object*, lean_object*, lean_object*, size_t, size_t); -lean_object* l_PersistentArray_get___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_Array_mfindRevAux___main___at_PersistentArray_findRev___spec__4(lean_object*, lean_object*); +lean_object* l_Array_toPArray___rarg___boxed(lean_object*); +lean_object* l_Array_miterateAux___main___at_Array_toPersistentArray___spec__1___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_PersistentArray_mfoldlFromAux___boxed(lean_object*, lean_object*); lean_object* l_Array_mfindAux___main___at_PersistentArray_find___spec__5(lean_object*, lean_object*); lean_object* l_Array_mfindRevAux___main___at_PersistentArray_findRev___spec__5___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_PersistentArray_get_x21___rarg___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_PersistentArray_mfoldlFromAux___main___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_miterateAux___main___at_PersistentArray_mfoldlAux___main___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_miterateAux___main___at_PersistentArray_toList___spec__3___rarg(lean_object*, lean_object*, lean_object*, lean_object*); @@ -138,12 +143,14 @@ lean_object* l_PersistentArray_collectStats___main___rarg(lean_object*, lean_obj lean_object* l_PersistentArray_mkEmptyArray(lean_object*); lean_object* l_PersistentArray_mfoldlAux___main___at_PersistentArray_toList___spec__2(lean_object*); lean_object* l_Array_miterateAux___main___at_PersistentArray_foldl___spec__5___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_toPersistentArray___rarg(lean_object*); lean_object* l_PersistentArray_mfindRev___at_PersistentArray_findRev___spec__1___rarg___boxed(lean_object*, lean_object*); lean_object* l_Array_miterateAux___main___at_PersistentArray_toList___spec__4___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_miterateAux___main___at_PersistentArray_foldl___spec__4___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_PersistentArray_pop___rarg(lean_object*); size_t l_PersistentArray_initShift; lean_object* l_PersistentArray_mfoldl___boxed(lean_object*, lean_object*); +lean_object* l_Nat_foldAux___main___at_mkPersistentArray___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_miterateAux___main___at_PersistentArray_toList___spec__5___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Nat_repr(lean_object*); lean_object* l_Array_mfindAux___main___at_PersistentArray_find___spec__4(lean_object*, lean_object*); @@ -181,7 +188,9 @@ lean_object* l_PersistentArray_mfindRevAux___main___rarg(lean_object*, lean_obje lean_object* l_Array_ummapAux___main___at_PersistentArray_mmapAux___main___spec__2___rarg___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_PersistentArray_foldl(lean_object*, lean_object*); size_t l_USize_add(size_t, size_t); +lean_object* l_Array_miterateAux___main___at_Array_toPersistentArray___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_PersistentArray_toList(lean_object*); +lean_object* l_Array_toPArray(lean_object*); lean_object* l_PersistentArray_mforAux___main___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_PersistentArray_mkNewPath___main___rarg___boxed(lean_object*, lean_object*); uint8_t lean_nat_dec_lt(lean_object*, lean_object*); @@ -235,6 +244,7 @@ size_t l_PersistentArray_mod2Shift(size_t, size_t); lean_object* l_PersistentArray_mforAux___boxed(lean_object*, lean_object*); lean_object* l_Array_miterateAux___main___at_PersistentArray_foldlFrom___spec__8(lean_object*, lean_object*); lean_object* l_PersistentArray_mmapAux___main___rarg___lambda__2(lean_object*); +lean_object* l_Array_toPersistentArray___rarg___boxed(lean_object*); lean_object* l_PersistentArray_mfindRev(lean_object*, lean_object*); lean_object* l_Array_set_x21(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_miterateAux___main___at_PersistentArray_mfoldl___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -256,7 +266,9 @@ lean_object* l_Array_mfindRevAux___main___at_PersistentArray_mfindRevAux___main_ lean_object* l_Array_ummapAux___main___at_PersistentArray_mmapAux___main___spec__1(lean_object*, lean_object*); lean_object* l_PersistentArray_popLeaf___main(lean_object*); lean_object* l_PersistentArray_Inhabited(lean_object*); +lean_object* l_Array_toPersistentArray(lean_object*); lean_object* l_PersistentArray_mfoldlFromAux___main(lean_object*, lean_object*); +lean_object* l_PersistentArray_get_x21(lean_object*); lean_object* l_PersistentArray_mfoldlAux___main___boxed(lean_object*, lean_object*); lean_object* l_PersistentArrayNode_Inhabited___closed__1; lean_object* l_PersistentArray_modify___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); @@ -283,11 +295,14 @@ lean_object* l_PersistentArray_find___rarg(lean_object*, lean_object*); lean_object* l_PersistentArray_mfoldl(lean_object*, lean_object*); lean_object* l_Array_pop(lean_object*, lean_object*); lean_object* l_Array_miterateAux___main___at_PersistentArray_foldl___spec__3___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_PersistentArray_get_x21___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_Array_miterateAux___main___at_PersistentArray_foldl___spec__4(lean_object*, lean_object*); lean_object* l_PersistentArray_mmap___rarg___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_PersistentArray_mmapAux(lean_object*, lean_object*); lean_object* l_PersistentArray_mfindRevAux___main(lean_object*, lean_object*); lean_object* l_PersistentArray_div2Shift___boxed(lean_object*, lean_object*); +lean_object* l_mkPersistentArray___rarg(lean_object*, lean_object*); +lean_object* l_mkPersistentArray(lean_object*); lean_object* l_Array_ummapAux___main___at_PersistentArray_mmapAux___main___spec__2(lean_object*, lean_object*); lean_object* l_PersistentArray_mfoldlFrom___at_PersistentArray_foldlFrom___spec__1(lean_object*, lean_object*); lean_object* l_PersistentArray_getAux___main___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); @@ -300,6 +315,7 @@ lean_object* l_PersistentArray_mfoldlFromAux___rarg___boxed(lean_object*, lean_o lean_object* l___private_init_data_persistentarray_basic_1__emptyArray(lean_object*); lean_object* l_PersistentArray_modifyAux___main___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_miterateAux___main___at_PersistentArray_toList___spec__5(lean_object*); +lean_object* l_Array_toPersistentArray___rarg___closed__1; lean_object* l_PersistentArray_mmap___rarg___lambda__1(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_PersistentArray_mfoldlFromAux(lean_object*, lean_object*); lean_object* l_Array_size(lean_object*, lean_object*); @@ -354,7 +370,6 @@ lean_object* l_Array_ummapAux___main___at_PersistentArray_mmapAux___main___spec_ lean_object* l_PersistentArray_mforAux___main___boxed(lean_object*, lean_object*); lean_object* l_Array_ummapAux___main___at_PersistentArray_map___spec__5___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_Array_ummapAux___main___at_PersistentArray_mmapAux___main___spec__2___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_PersistentArray_get(lean_object*); lean_object* l_Array_mforAux___main___at_PersistentArray_mforAux___main___spec__1(lean_object*, lean_object*); lean_object* l_Array_miterateAux___main___at_PersistentArray_foldlFrom___spec__8___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_miterateAux___main___at_PersistentArray_foldl___spec__5(lean_object*, lean_object*); @@ -371,6 +386,7 @@ lean_object* l_PersistentArray_mfindAux___main___boxed(lean_object*, lean_object lean_object* l_Array_miterateAux___main___at_PersistentArray_mfoldlFrom___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Nat_max(lean_object*, lean_object*); lean_object* l_PersistentArray_mfoldlAux___main___at_PersistentArray_foldlFrom___spec__3(lean_object*, lean_object*); +lean_object* l_Nat_foldAux___main___at_mkPersistentArray___spec__1___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_PersistentArray_mfind___at_PersistentArray_find___spec__1___rarg___boxed(lean_object*, lean_object*); lean_object* l_PersistentArray_foldlFrom___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_usize_to_nat(size_t); @@ -387,6 +403,7 @@ lean_object* l_PersistentArray_mmap___boxed(lean_object*, lean_object*); lean_object* l_PersistentArray_mkNewPath(lean_object*); lean_object* l_PersistentArray_modifyAux___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_PersistentArray_mfindRevAux___main___at_PersistentArray_findRev___spec__3(lean_object*, lean_object*); +lean_object* l_mkPArray___rarg(lean_object*, lean_object*); lean_object* l_PersistentArray_mfoldlFrom___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_PersistentArray_mfoldlAux___main___at_PersistentArray_foldlFrom___spec__3___rarg___boxed(lean_object*, lean_object*, lean_object*); uint8_t l_PersistentArray_isEmpty___rarg(lean_object*); @@ -712,7 +729,7 @@ x_7 = l_PersistentArray_getAux___rarg(x_1, x_2, x_5, x_6); return x_7; } } -lean_object* l_PersistentArray_get___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +lean_object* l_PersistentArray_get_x21___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3) { _start: { lean_object* x_4; uint8_t x_5; @@ -746,19 +763,19 @@ return x_12; } } } -lean_object* l_PersistentArray_get(lean_object* x_1) { +lean_object* l_PersistentArray_get_x21(lean_object* x_1) { _start: { lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l_PersistentArray_get___rarg___boxed), 3, 0); +x_2 = lean_alloc_closure((void*)(l_PersistentArray_get_x21___rarg___boxed), 3, 0); return x_2; } } -lean_object* l_PersistentArray_get___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +lean_object* l_PersistentArray_get_x21___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { _start: { lean_object* x_4; -x_4 = l_PersistentArray_get___rarg(x_1, x_2, x_3); +x_4 = l_PersistentArray_get_x21___rarg(x_1, x_2, x_3); lean_dec(x_3); return x_4; } @@ -6425,6 +6442,188 @@ x_2 = lean_alloc_closure((void*)(l_List_toPersistentArray___rarg), 1, 0); return x_2; } } +lean_object* l_Array_miterateAux___main___at_Array_toPersistentArray___spec__1___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; uint8_t x_6; +x_5 = lean_array_get_size(x_2); +x_6 = lean_nat_dec_lt(x_3, x_5); +lean_dec(x_5); +if (x_6 == 0) +{ +lean_dec(x_3); +return x_4; +} +else +{ +lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; +x_7 = lean_array_fget(x_2, x_3); +x_8 = l_PersistentArray_push___rarg(x_4, x_7); +x_9 = lean_unsigned_to_nat(1u); +x_10 = lean_nat_add(x_3, x_9); +lean_dec(x_3); +x_3 = x_10; +x_4 = x_8; +goto _start; +} +} +} +lean_object* l_Array_miterateAux___main___at_Array_toPersistentArray___spec__1(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_Array_miterateAux___main___at_Array_toPersistentArray___spec__1___rarg___boxed), 4, 0); +return x_2; +} +} +lean_object* _init_l_Array_toPersistentArray___rarg___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = l_PersistentArray_empty(lean_box(0)); +return x_1; +} +} +lean_object* l_Array_toPersistentArray___rarg(lean_object* x_1) { +_start: +{ +lean_object* x_2; lean_object* x_3; lean_object* x_4; +x_2 = lean_unsigned_to_nat(0u); +x_3 = l_Array_toPersistentArray___rarg___closed__1; +x_4 = l_Array_miterateAux___main___at_Array_toPersistentArray___spec__1___rarg(x_1, x_1, x_2, x_3); +return x_4; +} +} +lean_object* l_Array_toPersistentArray(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_Array_toPersistentArray___rarg___boxed), 1, 0); +return x_2; +} +} +lean_object* l_Array_miterateAux___main___at_Array_toPersistentArray___spec__1___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; +x_5 = l_Array_miterateAux___main___at_Array_toPersistentArray___spec__1___rarg(x_1, x_2, x_3, x_4); +lean_dec(x_2); +lean_dec(x_1); +return x_5; +} +} +lean_object* l_Array_toPersistentArray___rarg___boxed(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = l_Array_toPersistentArray___rarg(x_1); +lean_dec(x_1); +return x_2; +} +} +lean_object* l_Array_toPArray___rarg(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = l_Array_toPersistentArray___rarg(x_1); +return x_2; +} +} +lean_object* l_Array_toPArray(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_Array_toPArray___rarg___boxed), 1, 0); +return x_2; +} +} +lean_object* l_Array_toPArray___rarg___boxed(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = l_Array_toPArray___rarg(x_1); +lean_dec(x_1); +return x_2; +} +} +lean_object* l_Nat_foldAux___main___at_mkPersistentArray___spec__1___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; uint8_t x_6; +x_5 = lean_unsigned_to_nat(0u); +x_6 = lean_nat_dec_eq(x_3, x_5); +if (x_6 == 0) +{ +lean_object* x_7; lean_object* x_8; lean_object* x_9; +x_7 = lean_unsigned_to_nat(1u); +x_8 = lean_nat_sub(x_3, x_7); +lean_dec(x_3); +lean_inc(x_1); +x_9 = l_PersistentArray_push___rarg(x_4, x_1); +x_3 = x_8; +x_4 = x_9; +goto _start; +} +else +{ +lean_dec(x_3); +lean_dec(x_1); +return x_4; +} +} +} +lean_object* l_Nat_foldAux___main___at_mkPersistentArray___spec__1(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_Nat_foldAux___main___at_mkPersistentArray___spec__1___rarg___boxed), 4, 0); +return x_2; +} +} +lean_object* l_mkPersistentArray___rarg(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; lean_object* x_4; +x_3 = l_Array_toPersistentArray___rarg___closed__1; +lean_inc(x_1); +x_4 = l_Nat_foldAux___main___at_mkPersistentArray___spec__1___rarg(x_2, x_1, x_1, x_3); +lean_dec(x_1); +return x_4; +} +} +lean_object* l_mkPersistentArray(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_mkPersistentArray___rarg), 2, 0); +return x_2; +} +} +lean_object* l_Nat_foldAux___main___at_mkPersistentArray___spec__1___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; +x_5 = l_Nat_foldAux___main___at_mkPersistentArray___spec__1___rarg(x_1, x_2, x_3, x_4); +lean_dec(x_2); +return x_5; +} +} +lean_object* l_mkPArray___rarg(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = l_mkPersistentArray___rarg(x_1, x_2); +return x_3; +} +} +lean_object* l_mkPArray(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_mkPArray___rarg), 2, 0); +return x_2; +} +} lean_object* initialize_init_data_array_default(lean_object*); static bool _G_initialized = false; lean_object* initialize_init_data_persistentarray_basic(lean_object* w) { @@ -6467,6 +6666,8 @@ l_PersistentArray_HasToString___closed__1 = _init_l_PersistentArray_HasToString_ lean_mark_persistent(l_PersistentArray_HasToString___closed__1); l_PersistentArray_HasToString = _init_l_PersistentArray_HasToString(); lean_mark_persistent(l_PersistentArray_HasToString); +l_Array_toPersistentArray___rarg___closed__1 = _init_l_Array_toPersistentArray___rarg___closed__1(); +lean_mark_persistent(l_Array_toPersistentArray___rarg___closed__1); return w; } #ifdef __cplusplus diff --git a/src/stage0/init/data/persistenthashmap/basic.c b/src/stage0/init/data/persistenthashmap/basic.c index 93ee819839..b41dbf9df9 100644 --- a/src/stage0/init/data/persistenthashmap/basic.c +++ b/src/stage0/init/data/persistenthashmap/basic.c @@ -37,6 +37,7 @@ lean_object* l_PersistentHashMap_isUnaryEntries(lean_object*, lean_object*); lean_object* l_PersistentHashMap_HasEmptyc___closed__1; size_t l_USize_shift__right(size_t, size_t); lean_object* l_PersistentHashMap_contains(lean_object*, lean_object*); +lean_object* l_PersistentHashMap_find_x21___rarg___closed__2; lean_object* l_PersistentHashMap_findAux___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_PersistentHashMap_insert___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_miterateAux___main___at_PersistentHashMap_foldl___spec__3(lean_object*, lean_object*, lean_object*); @@ -84,6 +85,7 @@ lean_object* l_Nat_repr(lean_object*); lean_object* l_PersistentHashMap_mkCollisionNode___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_PersistentHashMap_insertAtCollisionNodeAux___main(lean_object*, lean_object*); lean_object* l_PersistentHashMap_findAux___rarg(lean_object*, lean_object*, size_t, lean_object*); +lean_object* l_PersistentHashMap_find_x21___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_PersistentHashMap_mfoldlAux___main___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_PersistentHashMap_insertAux___main___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_PersistentHashMap_mod2Shift___boxed(lean_object*, lean_object*); @@ -133,7 +135,9 @@ lean_object* l_PersistentHashMap_HasToString; size_t l_PersistentHashMap_shift; lean_object* l_Array_set_x21(lean_object*, lean_object*, lean_object*, lean_object*); size_t l_PersistentHashMap_insertAux___main___rarg___closed__2; +lean_object* l_PersistentHashMap_find_x21(lean_object*, lean_object*); lean_object* l_PersistentHashMap_mfoldlAux___main___at_PersistentHashMap_foldl___spec__2___rarg___boxed(lean_object*, lean_object*, lean_object*); +lean_object* l_PersistentHashMap_find_x21___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_miterateAux___main___at_PersistentHashMap_mfoldlAux___main___spec__2___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_PersistentHashMap_stats(lean_object*, lean_object*); lean_object* l_PersistentHashMap_eraseAux___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); @@ -145,6 +149,7 @@ lean_object* l_PersistentHashMap_mfoldl(lean_object*, lean_object*, lean_object* lean_object* l_PersistentHashMap_stats___rarg___boxed(lean_object*); lean_object* l_PersistentHashMap_insertAux___rarg(lean_object*, lean_object*, lean_object*, size_t, size_t, lean_object*, lean_object*); lean_object* l_Array_miterateAux___main___at_PersistentHashMap_toList___spec__4(lean_object*, lean_object*); +lean_object* l_PersistentHashMap_find_x21___rarg___closed__1; lean_object* l_PersistentHashMap_mfoldl___at_PersistentHashMap_toList___spec__1___rarg(lean_object*, lean_object*); lean_object* l_PersistentHashMap_find___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_PersistentHashMap_HasToString___closed__1; @@ -202,6 +207,7 @@ lean_object* l_PersistentHashMap_mfoldl___boxed(lean_object*, lean_object*, lean lean_object* l_PersistentHashMap_findD___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_PersistentHashMap_collectStats___rarg___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_PersistentHashMap_containsAux___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_panicWithPos___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_PersistentHashMap_erase(lean_object*, lean_object*); size_t l_PersistentHashMap_branching; lean_object* l_PersistentHashMap_eraseAux(lean_object*, lean_object*); @@ -1460,6 +1466,65 @@ lean_dec(x_3); return x_6; } } +lean_object* _init_l_PersistentHashMap_find_x21___rarg___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("/Users/leonardodemoura/projects/lean4/library/init/data/persistenthashmap/basic.lean"); +return x_1; +} +} +lean_object* _init_l_PersistentHashMap_find_x21___rarg___closed__2() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("key is not in the map"); +return x_1; +} +} +lean_object* l_PersistentHashMap_find_x21___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { +_start: +{ +lean_object* x_6; +x_6 = l_PersistentHashMap_find___rarg(x_1, x_2, x_4, x_5); +if (lean_obj_tag(x_6) == 0) +{ +lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; +x_7 = l_PersistentHashMap_find_x21___rarg___closed__1; +x_8 = lean_unsigned_to_nat(164u); +x_9 = lean_unsigned_to_nat(12u); +x_10 = l_PersistentHashMap_find_x21___rarg___closed__2; +x_11 = l_panicWithPos___rarg(x_3, x_7, x_8, x_9, x_10); +return x_11; +} +else +{ +lean_object* x_12; +lean_dec(x_3); +x_12 = lean_ctor_get(x_6, 0); +lean_inc(x_12); +lean_dec(x_6); +return x_12; +} +} +} +lean_object* l_PersistentHashMap_find_x21(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = lean_alloc_closure((void*)(l_PersistentHashMap_find_x21___rarg___boxed), 5, 0); +return x_3; +} +} +lean_object* l_PersistentHashMap_find_x21___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { +_start: +{ +lean_object* x_6; +x_6 = l_PersistentHashMap_find_x21___rarg(x_1, x_2, x_3, x_4, x_5); +lean_dec(x_4); +return x_6; +} +} uint8_t l_PersistentHashMap_containsAtAux___main___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { @@ -3682,6 +3747,10 @@ l_PersistentHashMap_insertAux___main___rarg___closed__1 = _init_l_PersistentHash l_PersistentHashMap_insertAux___main___rarg___closed__2 = _init_l_PersistentHashMap_insertAux___main___rarg___closed__2(); l_PersistentHashMap_insertAux___main___rarg___closed__3 = _init_l_PersistentHashMap_insertAux___main___rarg___closed__3(); lean_mark_persistent(l_PersistentHashMap_insertAux___main___rarg___closed__3); +l_PersistentHashMap_find_x21___rarg___closed__1 = _init_l_PersistentHashMap_find_x21___rarg___closed__1(); +lean_mark_persistent(l_PersistentHashMap_find_x21___rarg___closed__1); +l_PersistentHashMap_find_x21___rarg___closed__2 = _init_l_PersistentHashMap_find_x21___rarg___closed__2(); +lean_mark_persistent(l_PersistentHashMap_find_x21___rarg___closed__2); l_PersistentHashMap_stats___rarg___closed__1 = _init_l_PersistentHashMap_stats___rarg___closed__1(); lean_mark_persistent(l_PersistentHashMap_stats___rarg___closed__1); l_PersistentHashMap_Stats_toString___closed__1 = _init_l_PersistentHashMap_Stats_toString___closed__1(); diff --git a/src/stage0/init/data/queue/basic.c b/src/stage0/init/data/queue/basic.c new file mode 100644 index 0000000000..0dd40f0da1 --- /dev/null +++ b/src/stage0/init/data/queue/basic.c @@ -0,0 +1,289 @@ +// Lean compiler output +// Module: init.data.queue.basic +// Imports: init.data.array.default init.data.int.default +#include "runtime/lean.h" +#if defined(__clang__) +#pragma clang diagnostic ignored "-Wunused-parameter" +#pragma clang diagnostic ignored "-Wunused-label" +#elif defined(__GNUC__) && !defined(__CLANG__) +#pragma GCC diagnostic ignored "-Wunused-parameter" +#pragma GCC diagnostic ignored "-Wunused-label" +#pragma GCC diagnostic ignored "-Wunused-but-set-variable" +#endif +#ifdef __cplusplus +extern "C" { +#endif +lean_object* l_Queue_enqueueAll___rarg(lean_object*, lean_object*); +lean_object* l_Queue_enqueue(lean_object*); +lean_object* l_Queue_enqueue___rarg(lean_object*, lean_object*); +lean_object* l_List_reverse___rarg(lean_object*); +lean_object* l_Queue_dequeue_x3f(lean_object*); +lean_object* l_Queue_isEmpty___rarg___boxed(lean_object*); +lean_object* l_List_append___rarg(lean_object*, lean_object*); +uint8_t l_List_isEmpty___rarg(lean_object*); +uint8_t l_Queue_isEmpty___rarg(lean_object*); +lean_object* l_Queue_dequeue_x3f___rarg(lean_object*); +lean_object* l_Queue_isEmpty(lean_object*); +lean_object* l_Queue_enqueueAll(lean_object*); +lean_object* l_Queue_enqueue___rarg(lean_object* x_1, lean_object* x_2) { +_start: +{ +uint8_t x_3; +x_3 = !lean_is_exclusive(x_2); +if (x_3 == 0) +{ +lean_object* x_4; lean_object* x_5; +x_4 = lean_ctor_get(x_2, 0); +x_5 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_5, 0, x_1); +lean_ctor_set(x_5, 1, x_4); +lean_ctor_set(x_2, 0, x_5); +return x_2; +} +else +{ +lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; +x_6 = lean_ctor_get(x_2, 0); +x_7 = lean_ctor_get(x_2, 1); +lean_inc(x_7); +lean_inc(x_6); +lean_dec(x_2); +x_8 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_8, 0, x_1); +lean_ctor_set(x_8, 1, x_6); +x_9 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_9, 0, x_8); +lean_ctor_set(x_9, 1, x_7); +return x_9; +} +} +} +lean_object* l_Queue_enqueue(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_Queue_enqueue___rarg), 2, 0); +return x_2; +} +} +lean_object* l_Queue_enqueueAll___rarg(lean_object* x_1, lean_object* x_2) { +_start: +{ +uint8_t x_3; +x_3 = !lean_is_exclusive(x_2); +if (x_3 == 0) +{ +lean_object* x_4; lean_object* x_5; +x_4 = lean_ctor_get(x_2, 0); +x_5 = l_List_append___rarg(x_1, x_4); +lean_ctor_set(x_2, 0, x_5); +return x_2; +} +else +{ +lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; +x_6 = lean_ctor_get(x_2, 0); +x_7 = lean_ctor_get(x_2, 1); +lean_inc(x_7); +lean_inc(x_6); +lean_dec(x_2); +x_8 = l_List_append___rarg(x_1, x_6); +x_9 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_9, 0, x_8); +lean_ctor_set(x_9, 1, x_7); +return x_9; +} +} +} +lean_object* l_Queue_enqueueAll(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_Queue_enqueueAll___rarg), 2, 0); +return x_2; +} +} +uint8_t l_Queue_isEmpty___rarg(lean_object* x_1) { +_start: +{ +lean_object* x_2; uint8_t x_3; +x_2 = lean_ctor_get(x_1, 1); +x_3 = l_List_isEmpty___rarg(x_2); +if (x_3 == 0) +{ +uint8_t x_4; +x_4 = 0; +return x_4; +} +else +{ +lean_object* x_5; uint8_t x_6; +x_5 = lean_ctor_get(x_1, 0); +x_6 = l_List_isEmpty___rarg(x_5); +return x_6; +} +} +} +lean_object* l_Queue_isEmpty(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_Queue_isEmpty___rarg___boxed), 1, 0); +return x_2; +} +} +lean_object* l_Queue_isEmpty___rarg___boxed(lean_object* x_1) { +_start: +{ +uint8_t x_2; lean_object* x_3; +x_2 = l_Queue_isEmpty___rarg(x_1); +lean_dec(x_1); +x_3 = lean_box(x_2); +return x_3; +} +} +lean_object* l_Queue_dequeue_x3f___rarg(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_ctor_get(x_1, 1); +lean_inc(x_2); +if (lean_obj_tag(x_2) == 0) +{ +uint8_t x_3; +x_3 = !lean_is_exclusive(x_1); +if (x_3 == 0) +{ +lean_object* x_4; lean_object* x_5; lean_object* x_6; +x_4 = lean_ctor_get(x_1, 0); +x_5 = lean_ctor_get(x_1, 1); +lean_dec(x_5); +x_6 = l_List_reverse___rarg(x_4); +if (lean_obj_tag(x_6) == 0) +{ +lean_object* x_7; +lean_free_object(x_1); +x_7 = lean_box(0); +return x_7; +} +else +{ +lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; +x_8 = lean_ctor_get(x_6, 0); +lean_inc(x_8); +x_9 = lean_ctor_get(x_6, 1); +lean_inc(x_9); +lean_dec(x_6); +lean_ctor_set(x_1, 1, x_9); +lean_ctor_set(x_1, 0, x_2); +x_10 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_10, 0, x_8); +lean_ctor_set(x_10, 1, x_1); +x_11 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_11, 0, x_10); +return x_11; +} +} +else +{ +lean_object* x_12; lean_object* x_13; +x_12 = lean_ctor_get(x_1, 0); +lean_inc(x_12); +lean_dec(x_1); +x_13 = l_List_reverse___rarg(x_12); +if (lean_obj_tag(x_13) == 0) +{ +lean_object* x_14; +x_14 = lean_box(0); +return x_14; +} +else +{ +lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; +x_15 = lean_ctor_get(x_13, 0); +lean_inc(x_15); +x_16 = lean_ctor_get(x_13, 1); +lean_inc(x_16); +lean_dec(x_13); +x_17 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_17, 0, x_2); +lean_ctor_set(x_17, 1, x_16); +x_18 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_18, 0, x_15); +lean_ctor_set(x_18, 1, x_17); +x_19 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_19, 0, x_18); +return x_19; +} +} +} +else +{ +uint8_t x_20; +x_20 = !lean_is_exclusive(x_1); +if (x_20 == 0) +{ +lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; +x_21 = lean_ctor_get(x_1, 1); +lean_dec(x_21); +x_22 = lean_ctor_get(x_2, 0); +lean_inc(x_22); +x_23 = lean_ctor_get(x_2, 1); +lean_inc(x_23); +lean_dec(x_2); +lean_ctor_set(x_1, 1, x_23); +x_24 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_24, 0, x_22); +lean_ctor_set(x_24, 1, x_1); +x_25 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_25, 0, x_24); +return x_25; +} +else +{ +lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; +x_26 = lean_ctor_get(x_1, 0); +lean_inc(x_26); +lean_dec(x_1); +x_27 = lean_ctor_get(x_2, 0); +lean_inc(x_27); +x_28 = lean_ctor_get(x_2, 1); +lean_inc(x_28); +lean_dec(x_2); +x_29 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_29, 0, x_26); +lean_ctor_set(x_29, 1, x_28); +x_30 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_30, 0, x_27); +lean_ctor_set(x_30, 1, x_29); +x_31 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_31, 0, x_30); +return x_31; +} +} +} +} +lean_object* l_Queue_dequeue_x3f(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_Queue_dequeue_x3f___rarg), 1, 0); +return x_2; +} +} +lean_object* initialize_init_data_array_default(lean_object*); +lean_object* initialize_init_data_int_default(lean_object*); +static bool _G_initialized = false; +lean_object* initialize_init_data_queue_basic(lean_object* w) { +if (_G_initialized) return w; +_G_initialized = true; +if (lean_io_result_is_error(w)) return w; +w = initialize_init_data_array_default(w); +if (lean_io_result_is_error(w)) return w; +w = initialize_init_data_int_default(w); +if (lean_io_result_is_error(w)) return w; +return w; +} +#ifdef __cplusplus +} +#endif diff --git a/src/stage0/init/data/queue/default.c b/src/stage0/init/data/queue/default.c new file mode 100644 index 0000000000..1afc2d7456 --- /dev/null +++ b/src/stage0/init/data/queue/default.c @@ -0,0 +1,28 @@ +// Lean compiler output +// Module: init.data.queue.default +// Imports: init.data.queue.basic +#include "runtime/lean.h" +#if defined(__clang__) +#pragma clang diagnostic ignored "-Wunused-parameter" +#pragma clang diagnostic ignored "-Wunused-label" +#elif defined(__GNUC__) && !defined(__CLANG__) +#pragma GCC diagnostic ignored "-Wunused-parameter" +#pragma GCC diagnostic ignored "-Wunused-label" +#pragma GCC diagnostic ignored "-Wunused-but-set-variable" +#endif +#ifdef __cplusplus +extern "C" { +#endif +lean_object* initialize_init_data_queue_basic(lean_object*); +static bool _G_initialized = false; +lean_object* initialize_init_data_queue_default(lean_object* w) { +if (_G_initialized) return w; +_G_initialized = true; +if (lean_io_result_is_error(w)) return w; +w = initialize_init_data_queue_basic(w); +if (lean_io_result_is_error(w)) return w; +return w; +} +#ifdef __cplusplus +} +#endif diff --git a/src/stage0/init/data/rbmap/basicaux.c b/src/stage0/init/data/rbmap/basicaux.c new file mode 100644 index 0000000000..a1a2ca5ac2 --- /dev/null +++ b/src/stage0/init/data/rbmap/basicaux.c @@ -0,0 +1,418 @@ +// Lean compiler output +// Module: init.data.rbmap.basicaux +// Imports: init.data.rbmap.basic init.util +#include "runtime/lean.h" +#if defined(__clang__) +#pragma clang diagnostic ignored "-Wunused-parameter" +#pragma clang diagnostic ignored "-Wunused-label" +#elif defined(__GNUC__) && !defined(__CLANG__) +#pragma GCC diagnostic ignored "-Wunused-parameter" +#pragma GCC diagnostic ignored "-Wunused-label" +#pragma GCC diagnostic ignored "-Wunused-but-set-variable" +#endif +#ifdef __cplusplus +extern "C" { +#endif +lean_object* l_RBMap_max_x21(lean_object*, lean_object*, lean_object*); +lean_object* l_panicWithPos___at_RBMap_min_x21___spec__1(lean_object*, lean_object*); +lean_object* l_RBNode_min___main___rarg(lean_object*); +lean_object* l_RBNode_max___main___rarg(lean_object*); +lean_object* l_RBMap_find_x21(lean_object*, lean_object*); +lean_object* l_RBMap_max_x21___rarg(lean_object*, lean_object*, lean_object*); +lean_object* l_RBMap_max_x21___rarg___boxed(lean_object*, lean_object*, lean_object*); +lean_object* l_RBMap_max_x21___boxed(lean_object*, lean_object*, lean_object*); +lean_object* l_Nat_repr(lean_object*); +extern lean_object* l_panicWithPos___rarg___closed__3; +lean_object* l_panicWithPos___at_RBMap_min_x21___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* lean_string_append(lean_object*, lean_object*); +lean_object* l_panicWithPos___at_RBMap_max_x21___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_panicWithPos___at_RBMap_max_x21___spec__1___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_panicWithPos___at_RBMap_min_x21___spec__1___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_RBMap_min_x21(lean_object*, lean_object*, lean_object*); +extern lean_object* l_panicWithPos___rarg___closed__1; +lean_object* l_RBMap_min_x21___rarg___closed__2; +lean_object* l_RBNode_find___main___rarg(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_panicWithPos___at_RBMap_max_x21___spec__1(lean_object*, lean_object*); +lean_object* l_panic(lean_object*, lean_object*, lean_object*); +lean_object* l_RBMap_min_x21___rarg___closed__1; +lean_object* l_RBMap_find_x21___rarg___closed__1; +lean_object* l_RBMap_min_x21___boxed(lean_object*, lean_object*, lean_object*); +extern lean_object* l_panicWithPos___rarg___closed__2; +lean_object* l_RBMap_find_x21___rarg(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_RBMap_min_x21___rarg(lean_object*, lean_object*, lean_object*); +lean_object* l_RBMap_min_x21___rarg___boxed(lean_object*, lean_object*, lean_object*); +lean_object* l_panicWithPos___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_panicWithPos___at_RBMap_min_x21___spec__1___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { +_start: +{ +lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; +x_7 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_7, 0, x_1); +lean_ctor_set(x_7, 1, x_2); +x_8 = l_panicWithPos___rarg___closed__1; +x_9 = lean_string_append(x_8, x_3); +x_10 = l_panicWithPos___rarg___closed__2; +x_11 = lean_string_append(x_9, x_10); +x_12 = l_Nat_repr(x_4); +x_13 = lean_string_append(x_11, x_12); +lean_dec(x_12); +x_14 = l_panicWithPos___rarg___closed__2; +x_15 = lean_string_append(x_13, x_14); +x_16 = l_Nat_repr(x_5); +x_17 = lean_string_append(x_15, x_16); +lean_dec(x_16); +x_18 = l_panicWithPos___rarg___closed__3; +x_19 = lean_string_append(x_17, x_18); +x_20 = lean_string_append(x_19, x_6); +x_21 = lean_panic_fn(x_20); +return x_21; +} +} +lean_object* l_panicWithPos___at_RBMap_min_x21___spec__1(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = lean_alloc_closure((void*)(l_panicWithPos___at_RBMap_min_x21___spec__1___rarg___boxed), 6, 0); +return x_3; +} +} +lean_object* _init_l_RBMap_min_x21___rarg___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("/Users/leonardodemoura/projects/lean4/library/init/data/rbmap/basicaux.lean"); +return x_1; +} +} +lean_object* _init_l_RBMap_min_x21___rarg___closed__2() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("map is empty"); +return x_1; +} +} +lean_object* l_RBMap_min_x21___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; lean_object* x_12; +x_12 = l_RBNode_min___main___rarg(x_3); +if (lean_obj_tag(x_12) == 0) +{ +lean_object* x_13; +x_13 = lean_box(0); +x_4 = x_13; +goto block_11; +} +else +{ +uint8_t x_14; +x_14 = !lean_is_exclusive(x_12); +if (x_14 == 0) +{ +lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; +x_15 = lean_ctor_get(x_12, 0); +x_16 = lean_ctor_get(x_15, 0); +lean_inc(x_16); +x_17 = lean_ctor_get(x_15, 1); +lean_inc(x_17); +lean_dec(x_15); +x_18 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_18, 0, x_16); +lean_ctor_set(x_18, 1, x_17); +lean_ctor_set(x_12, 0, x_18); +x_4 = x_12; +goto block_11; +} +else +{ +lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; +x_19 = lean_ctor_get(x_12, 0); +lean_inc(x_19); +lean_dec(x_12); +x_20 = lean_ctor_get(x_19, 0); +lean_inc(x_20); +x_21 = lean_ctor_get(x_19, 1); +lean_inc(x_21); +lean_dec(x_19); +x_22 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_22, 0, x_20); +lean_ctor_set(x_22, 1, x_21); +x_23 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_23, 0, x_22); +x_4 = x_23; +goto block_11; +} +} +block_11: +{ +if (lean_obj_tag(x_4) == 0) +{ +lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; +x_5 = l_RBMap_min_x21___rarg___closed__1; +x_6 = lean_unsigned_to_nat(18u); +x_7 = lean_unsigned_to_nat(12u); +x_8 = l_RBMap_min_x21___rarg___closed__2; +x_9 = l_panicWithPos___at_RBMap_min_x21___spec__1___rarg(x_1, x_2, x_5, x_6, x_7, x_8); +return x_9; +} +else +{ +lean_object* x_10; +lean_dec(x_2); +lean_dec(x_1); +x_10 = lean_ctor_get(x_4, 0); +lean_inc(x_10); +lean_dec(x_4); +return x_10; +} +} +} +} +lean_object* l_RBMap_min_x21(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; +x_4 = lean_alloc_closure((void*)(l_RBMap_min_x21___rarg___boxed), 3, 0); +return x_4; +} +} +lean_object* l_panicWithPos___at_RBMap_min_x21___spec__1___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { +_start: +{ +lean_object* x_7; +x_7 = l_panicWithPos___at_RBMap_min_x21___spec__1___rarg(x_1, x_2, x_3, x_4, x_5, x_6); +lean_dec(x_6); +lean_dec(x_3); +return x_7; +} +} +lean_object* l_RBMap_min_x21___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; +x_4 = l_RBMap_min_x21___rarg(x_1, x_2, x_3); +lean_dec(x_3); +return x_4; +} +} +lean_object* l_RBMap_min_x21___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; +x_4 = l_RBMap_min_x21(x_1, x_2, x_3); +lean_dec(x_3); +return x_4; +} +} +lean_object* l_panicWithPos___at_RBMap_max_x21___spec__1___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { +_start: +{ +lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; +x_7 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_7, 0, x_1); +lean_ctor_set(x_7, 1, x_2); +x_8 = l_panicWithPos___rarg___closed__1; +x_9 = lean_string_append(x_8, x_3); +x_10 = l_panicWithPos___rarg___closed__2; +x_11 = lean_string_append(x_9, x_10); +x_12 = l_Nat_repr(x_4); +x_13 = lean_string_append(x_11, x_12); +lean_dec(x_12); +x_14 = l_panicWithPos___rarg___closed__2; +x_15 = lean_string_append(x_13, x_14); +x_16 = l_Nat_repr(x_5); +x_17 = lean_string_append(x_15, x_16); +lean_dec(x_16); +x_18 = l_panicWithPos___rarg___closed__3; +x_19 = lean_string_append(x_17, x_18); +x_20 = lean_string_append(x_19, x_6); +x_21 = lean_panic_fn(x_20); +return x_21; +} +} +lean_object* l_panicWithPos___at_RBMap_max_x21___spec__1(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = lean_alloc_closure((void*)(l_panicWithPos___at_RBMap_max_x21___spec__1___rarg___boxed), 6, 0); +return x_3; +} +} +lean_object* l_RBMap_max_x21___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; lean_object* x_12; +x_12 = l_RBNode_max___main___rarg(x_3); +if (lean_obj_tag(x_12) == 0) +{ +lean_object* x_13; +x_13 = lean_box(0); +x_4 = x_13; +goto block_11; +} +else +{ +uint8_t x_14; +x_14 = !lean_is_exclusive(x_12); +if (x_14 == 0) +{ +lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; +x_15 = lean_ctor_get(x_12, 0); +x_16 = lean_ctor_get(x_15, 0); +lean_inc(x_16); +x_17 = lean_ctor_get(x_15, 1); +lean_inc(x_17); +lean_dec(x_15); +x_18 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_18, 0, x_16); +lean_ctor_set(x_18, 1, x_17); +lean_ctor_set(x_12, 0, x_18); +x_4 = x_12; +goto block_11; +} +else +{ +lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; +x_19 = lean_ctor_get(x_12, 0); +lean_inc(x_19); +lean_dec(x_12); +x_20 = lean_ctor_get(x_19, 0); +lean_inc(x_20); +x_21 = lean_ctor_get(x_19, 1); +lean_inc(x_21); +lean_dec(x_19); +x_22 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_22, 0, x_20); +lean_ctor_set(x_22, 1, x_21); +x_23 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_23, 0, x_22); +x_4 = x_23; +goto block_11; +} +} +block_11: +{ +if (lean_obj_tag(x_4) == 0) +{ +lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; +x_5 = l_RBMap_min_x21___rarg___closed__1; +x_6 = lean_unsigned_to_nat(23u); +x_7 = lean_unsigned_to_nat(12u); +x_8 = l_RBMap_min_x21___rarg___closed__2; +x_9 = l_panicWithPos___at_RBMap_max_x21___spec__1___rarg(x_1, x_2, x_5, x_6, x_7, x_8); +return x_9; +} +else +{ +lean_object* x_10; +lean_dec(x_2); +lean_dec(x_1); +x_10 = lean_ctor_get(x_4, 0); +lean_inc(x_10); +lean_dec(x_4); +return x_10; +} +} +} +} +lean_object* l_RBMap_max_x21(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; +x_4 = lean_alloc_closure((void*)(l_RBMap_max_x21___rarg___boxed), 3, 0); +return x_4; +} +} +lean_object* l_panicWithPos___at_RBMap_max_x21___spec__1___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { +_start: +{ +lean_object* x_7; +x_7 = l_panicWithPos___at_RBMap_max_x21___spec__1___rarg(x_1, x_2, x_3, x_4, x_5, x_6); +lean_dec(x_6); +lean_dec(x_3); +return x_7; +} +} +lean_object* l_RBMap_max_x21___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; +x_4 = l_RBMap_max_x21___rarg(x_1, x_2, x_3); +lean_dec(x_3); +return x_4; +} +} +lean_object* l_RBMap_max_x21___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; +x_4 = l_RBMap_max_x21(x_1, x_2, x_3); +lean_dec(x_3); +return x_4; +} +} +lean_object* _init_l_RBMap_find_x21___rarg___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("key is not in the map"); +return x_1; +} +} +lean_object* l_RBMap_find_x21___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; +x_5 = l_RBNode_find___main___rarg(x_1, lean_box(0), x_3, x_4); +if (lean_obj_tag(x_5) == 0) +{ +lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; +x_6 = l_RBMap_min_x21___rarg___closed__1; +x_7 = lean_unsigned_to_nat(28u); +x_8 = lean_unsigned_to_nat(12u); +x_9 = l_RBMap_find_x21___rarg___closed__1; +x_10 = l_panicWithPos___rarg(x_2, x_6, x_7, x_8, x_9); +return x_10; +} +else +{ +lean_object* x_11; +lean_dec(x_2); +x_11 = lean_ctor_get(x_5, 0); +lean_inc(x_11); +lean_dec(x_5); +return x_11; +} +} +} +lean_object* l_RBMap_find_x21(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = lean_alloc_closure((void*)(l_RBMap_find_x21___rarg), 4, 0); +return x_3; +} +} +lean_object* initialize_init_data_rbmap_basic(lean_object*); +lean_object* initialize_init_util(lean_object*); +static bool _G_initialized = false; +lean_object* initialize_init_data_rbmap_basicaux(lean_object* w) { +if (_G_initialized) return w; +_G_initialized = true; +if (lean_io_result_is_error(w)) return w; +w = initialize_init_data_rbmap_basic(w); +if (lean_io_result_is_error(w)) return w; +w = initialize_init_util(w); +if (lean_io_result_is_error(w)) return w; +l_RBMap_min_x21___rarg___closed__1 = _init_l_RBMap_min_x21___rarg___closed__1(); +lean_mark_persistent(l_RBMap_min_x21___rarg___closed__1); +l_RBMap_min_x21___rarg___closed__2 = _init_l_RBMap_min_x21___rarg___closed__2(); +lean_mark_persistent(l_RBMap_min_x21___rarg___closed__2); +l_RBMap_find_x21___rarg___closed__1 = _init_l_RBMap_find_x21___rarg___closed__1(); +lean_mark_persistent(l_RBMap_find_x21___rarg___closed__1); +return w; +} +#ifdef __cplusplus +} +#endif diff --git a/src/stage0/init/data/rbmap/default.c b/src/stage0/init/data/rbmap/default.c index c5fdb140b0..3f03490f35 100644 --- a/src/stage0/init/data/rbmap/default.c +++ b/src/stage0/init/data/rbmap/default.c @@ -1,6 +1,6 @@ // Lean compiler output // Module: init.data.rbmap.default -// Imports: init.data.rbtree.default init.data.rbmap.basic +// Imports: init.data.rbmap.basic init.data.rbmap.basicaux #include "runtime/lean.h" #if defined(__clang__) #pragma clang diagnostic ignored "-Wunused-parameter" @@ -13,17 +13,17 @@ #ifdef __cplusplus extern "C" { #endif -lean_object* initialize_init_data_rbtree_default(lean_object*); lean_object* initialize_init_data_rbmap_basic(lean_object*); +lean_object* initialize_init_data_rbmap_basicaux(lean_object*); static bool _G_initialized = false; lean_object* initialize_init_data_rbmap_default(lean_object* w) { if (_G_initialized) return w; _G_initialized = true; if (lean_io_result_is_error(w)) return w; -w = initialize_init_data_rbtree_default(w); -if (lean_io_result_is_error(w)) return w; w = initialize_init_data_rbmap_basic(w); if (lean_io_result_is_error(w)) return w; +w = initialize_init_data_rbmap_basicaux(w); +if (lean_io_result_is_error(w)) return w; return w; } #ifdef __cplusplus diff --git a/src/stage0/init/lean/class.c b/src/stage0/init/lean/class.c index 2de55a8932..63cd7055e9 100644 --- a/src/stage0/init/lean/class.c +++ b/src/stage0/init/lean/class.c @@ -87,7 +87,6 @@ lean_object* l_Lean_Name_toStringWithSep___main(lean_object*, lean_object*); lean_object* l_HashMapImp_find___at_Lean_hasOutParams___spec__5___boxed(lean_object*, lean_object*); lean_object* l_Lean_SimplePersistentEnvExtension_getState___rarg(lean_object*, lean_object*); lean_object* l_Lean_SMap_insert___at_Lean_ClassState_addEntry___spec__1(lean_object*, lean_object*, uint8_t); -lean_object* l___private_init_lean_class_2__consumeNLambdas(lean_object*, lean_object*); lean_object* l_Array_uset(lean_object*, lean_object*, size_t, lean_object*, lean_object*); lean_object* l_Lean_registerClassAttr___closed__4; lean_object* l_Lean_registerClassAttr___closed__7; @@ -104,7 +103,6 @@ lean_object* l_PersistentHashMap_getCollisionNodeSize___rarg(lean_object*); lean_object* l_Lean_registerSimplePersistentEnvExtension___rarg___lambda__3(lean_object*, lean_object*); uint8_t l_Lean_SMap_contains___at_Lean_isClass___spec__1(lean_object*, lean_object*); lean_object* l_Lean_SMap_empty___at_Lean_ClassState_Inhabited___spec__1___closed__2; -lean_object* l___private_init_lean_class_1__isOutParam___closed__2; lean_object* lean_io_initializing(lean_object*); lean_object* l_Lean_SMap_switch___at_Lean_ClassState_switch___spec__2(lean_object*); lean_object* l_AssocList_contains___main___at_Lean_ClassState_addEntry___spec__7___boxed(lean_object*, lean_object*); @@ -121,7 +119,6 @@ lean_object* l_Lean_registerTagAttribute___lambda__5___boxed(lean_object*, lean_ lean_object* l_PersistentHashMap_find___at_Lean_hasOutParams___spec__2(lean_object*, lean_object*); lean_object* l_Lean_ClassEntry_getName(lean_object*); lean_object* l_PersistentHashMap_mkCollisionNode___rarg(lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_init_lean_class_2__consumeNLambdas___main(lean_object*, lean_object*); lean_object* l_HashMapImp_contains___at_Lean_isInstance___spec__2___boxed(lean_object*, lean_object*); lean_object* l_Lean_getClassName(lean_object*, lean_object*); lean_object* l_Lean_hasOutParams___boxed(lean_object*, lean_object*); @@ -146,7 +143,6 @@ lean_object* l_Lean_classExtension___closed__1; lean_object* l_Lean_mkClassExtension___closed__3; lean_object* l_AssocList_contains___main___at_Lean_ClassState_addEntry___spec__35___boxed(lean_object*, lean_object*); size_t l_USize_add(size_t, size_t); -lean_object* l___private_init_lean_class_1__isOutParam___closed__1; lean_object* l_PersistentHashMap_findAtAux___main___at_Lean_ClassState_addEntry___spec__15___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_registerSimplePersistentEnvExtension___rarg___lambda__1(lean_object*, lean_object*, lean_object*); lean_object* l_PersistentHashMap_insertAtCollisionNodeAux___main___at_Lean_ClassState_addEntry___spec__21(lean_object*, lean_object*, lean_object*, lean_object*); @@ -168,11 +164,13 @@ lean_object* l_mkHashMap___at_Lean_ClassState_Inhabited___spec__4(lean_object*); uint8_t lean_nat_dec_eq(lean_object*, lean_object*); uint8_t lean_has_out_params(lean_object*, lean_object*); lean_object* l_HashMapImp_expand___at_Lean_ClassState_addEntry___spec__8(lean_object*, lean_object*); +lean_object* l_Lean_isOutParam___closed__1; lean_object* l_Array_push(lean_object*, lean_object*, lean_object*); extern lean_object* l_Lean_registerSimplePersistentEnvExtension___rarg___closed__1; lean_object* l_Lean_SMap_empty___at_Lean_ClassState_Inhabited___spec__5; lean_object* l_Lean_registerInstanceAttr___lambda__1___closed__2; extern size_t l_PersistentHashMap_insertAux___main___rarg___closed__2; +lean_object* l_Lean_isOutParam___closed__2; lean_object* l_Lean_registerSimplePersistentEnvExtension___at_Lean_mkClassExtension___spec__4(lean_object*, lean_object*); lean_object* l_AssocList_find___main___at_Lean_ClassState_addEntry___spec__17___boxed(lean_object*, lean_object*); uint8_t l_HashMapImp_contains___at_Lean_isClass___spec__2(lean_object*, lean_object*); @@ -183,6 +181,7 @@ lean_object* l_Lean_classExtension___elambda__4(lean_object*); lean_object* l_AssocList_find___main___at_Lean_ClassState_addEntry___spec__17(lean_object*, lean_object*); uint8_t l_Lean_Expr_isAppOfArity___main(lean_object*, lean_object*, lean_object*); lean_object* l_Array_miterateAux___main___at_Lean_ClassState_addEntry___spec__22___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_isOutParam___boxed(lean_object*); uint8_t l_Array_anyMAux___main___at_Lean_mkClassExtension___spec__6(lean_object*, lean_object*, lean_object*); lean_object* l_mkHashMap___at_Lean_ClassState_Inhabited___spec__2(lean_object*); lean_object* l_Lean_mkStateFromImportedEntries___at_Lean_mkClassExtension___spec__1___boxed(lean_object*, lean_object*); @@ -214,11 +213,11 @@ lean_object* l_HashMapImp_expand___at_Lean_ClassState_addEntry___spec__36(lean_o lean_object* lean_get_class_instances(lean_object*, lean_object*); extern lean_object* l_PersistentHashMap_insertAux___main___rarg___closed__3; lean_object* l_Array_size(lean_object*, lean_object*); +uint8_t lean_is_out_param(lean_object*); lean_object* l_HashMapImp_find___at_Lean_ClassState_addEntry___spec__16(lean_object*, lean_object*); lean_object* l_Lean_addClass___closed__1; lean_object* l_Lean_classExtension___elambda__2___boxed(lean_object*); lean_object* l_HashMapImp_insert___at_Lean_ClassState_addEntry___spec__23(lean_object*, lean_object*, lean_object*); -lean_object* l___private_init_lean_class_1__isOutParam___boxed(lean_object*); lean_object* l_PersistentHashMap_find___at_Lean_ClassState_addEntry___spec__13___boxed(lean_object*, lean_object*); lean_object* l_Lean_SMap_empty___at_Lean_ClassState_Inhabited___spec__5___closed__2; lean_object* l_Array_get(lean_object*, lean_object*, lean_object*); @@ -239,7 +238,6 @@ extern lean_object* l_Lean_Name_toString___closed__1; lean_object* l_mkHashMap___at_Lean_ClassState_Inhabited___spec__6(lean_object*); uint8_t lean_nat_dec_le(lean_object*, lean_object*); lean_object* l_Lean_classExtension; -uint8_t lean_is_out_param(lean_object*); uint8_t lean_is_instance(lean_object*, lean_object*); lean_object* l_Lean_mkClassExtension(lean_object*); lean_object* l_PersistentHashMap_findAux___main___at_Lean_hasOutParams___spec__3___boxed(lean_object*, lean_object*, lean_object*); @@ -252,6 +250,7 @@ lean_object* l_Lean_registerInstanceAttr___closed__2; lean_object* l_Lean_classExtension___elambda__1(lean_object*); lean_object* l_Lean_registerClassAttr___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_PersistentHashMap_find___at_Lean_hasOutParams___spec__2___boxed(lean_object*, lean_object*); +lean_object* l___private_init_lean_class_1__consumeNLambdas(lean_object*, lean_object*); lean_object* l_Array_set(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_IO_ofExcept___at_Lean_registerClassAttr___spec__1___boxed(lean_object*, lean_object*); lean_object* l_Lean_SMap_find___at_Lean_hasOutParams___spec__1(lean_object*, lean_object*); @@ -280,6 +279,7 @@ extern lean_object* l___private_init_lean_environment_5__envExtensionsRef; lean_object* l_Lean_classExtension___closed__5; lean_object* l_Lean_registerInstanceAttr(lean_object*); lean_object* l_Lean_registerInstanceAttr___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_init_lean_class_1__consumeNLambdas___main(lean_object*, lean_object*); lean_object* l_HashMapImp_moveEntries___main___at_Lean_ClassState_addEntry___spec__9(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_registerTagAttribute___lambda__6___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_String_splitAux___main___closed__1; @@ -6549,7 +6549,7 @@ x_4 = lean_box(x_3); return x_4; } } -lean_object* _init_l___private_init_lean_class_1__isOutParam___closed__1() { +lean_object* _init_l_Lean_isOutParam___closed__1() { _start: { lean_object* x_1; @@ -6557,12 +6557,12 @@ x_1 = lean_mk_string("outParam"); return x_1; } } -lean_object* _init_l___private_init_lean_class_1__isOutParam___closed__2() { +lean_object* _init_l_Lean_isOutParam___closed__2() { _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = lean_box(0); -x_2 = l___private_init_lean_class_1__isOutParam___closed__1; +x_2 = l_Lean_isOutParam___closed__1; x_3 = lean_name_mk_string(x_1, x_2); return x_3; } @@ -6571,14 +6571,14 @@ uint8_t lean_is_out_param(lean_object* x_1) { _start: { lean_object* x_2; lean_object* x_3; uint8_t x_4; -x_2 = l___private_init_lean_class_1__isOutParam___closed__2; +x_2 = l_Lean_isOutParam___closed__2; x_3 = lean_unsigned_to_nat(1u); x_4 = l_Lean_Expr_isAppOfArity___main(x_1, x_2, x_3); lean_dec(x_1); return x_4; } } -lean_object* l___private_init_lean_class_1__isOutParam___boxed(lean_object* x_1) { +lean_object* l_Lean_isOutParam___boxed(lean_object* x_1) { _start: { uint8_t x_2; lean_object* x_3; @@ -6727,7 +6727,7 @@ return x_25; } } } -lean_object* l___private_init_lean_class_2__consumeNLambdas___main(lean_object* x_1, lean_object* x_2) { +lean_object* l___private_init_lean_class_1__consumeNLambdas___main(lean_object* x_1, lean_object* x_2) { _start: { lean_object* x_3; uint8_t x_4; @@ -6767,11 +6767,11 @@ return x_10; } } } -lean_object* l___private_init_lean_class_2__consumeNLambdas(lean_object* x_1, lean_object* x_2) { +lean_object* l___private_init_lean_class_1__consumeNLambdas(lean_object* x_1, lean_object* x_2) { _start: { lean_object* x_3; -x_3 = l___private_init_lean_class_2__consumeNLambdas___main(x_1, x_2); +x_3 = l___private_init_lean_class_1__consumeNLambdas___main(x_1, x_2); return x_3; } } @@ -6845,7 +6845,7 @@ lean_inc(x_14); lean_dec(x_11); x_15 = lean_unsigned_to_nat(0u); x_16 = l_Lean_Expr_getAppNumArgsAux___main(x_2, x_15); -x_17 = l___private_init_lean_class_2__consumeNLambdas___main(x_16, x_14); +x_17 = l___private_init_lean_class_1__consumeNLambdas___main(x_16, x_14); if (lean_obj_tag(x_17) == 0) { lean_object* x_18; @@ -6902,7 +6902,7 @@ lean_inc(x_26); lean_dec(x_22); x_27 = lean_unsigned_to_nat(0u); x_28 = l_Lean_Expr_getAppNumArgsAux___main(x_2, x_27); -x_29 = l___private_init_lean_class_2__consumeNLambdas___main(x_28, x_26); +x_29 = l___private_init_lean_class_1__consumeNLambdas___main(x_28, x_26); if (lean_obj_tag(x_29) == 0) { lean_object* x_30; @@ -7604,10 +7604,10 @@ w = l_Lean_mkClassExtension(w); if (lean_io_result_is_error(w)) return w; l_Lean_classExtension = lean_io_result_get_value(w); lean_mark_persistent(l_Lean_classExtension); -l___private_init_lean_class_1__isOutParam___closed__1 = _init_l___private_init_lean_class_1__isOutParam___closed__1(); -lean_mark_persistent(l___private_init_lean_class_1__isOutParam___closed__1); -l___private_init_lean_class_1__isOutParam___closed__2 = _init_l___private_init_lean_class_1__isOutParam___closed__2(); -lean_mark_persistent(l___private_init_lean_class_1__isOutParam___closed__2); +l_Lean_isOutParam___closed__1 = _init_l_Lean_isOutParam___closed__1(); +lean_mark_persistent(l_Lean_isOutParam___closed__1); +l_Lean_isOutParam___closed__2 = _init_l_Lean_isOutParam___closed__2(); +lean_mark_persistent(l_Lean_isOutParam___closed__2); l_Lean_addClass___closed__1 = _init_l_Lean_addClass___closed__1(); lean_mark_persistent(l_Lean_addClass___closed__1); l_Lean_addClass___closed__2 = _init_l_Lean_addClass___closed__2(); diff --git a/src/stage0/init/lean/compiler/ir/basic.c b/src/stage0/init/lean/compiler/ir/basic.c index 9630962dd2..709a2ba470 100644 --- a/src/stage0/init/lean/compiler/ir/basic.c +++ b/src/stage0/init/lean/compiler/ir/basic.c @@ -2152,7 +2152,7 @@ lean_dec(x_2); x_5 = l___private_init_data_array_basic_1__swapAtPanic_x21___rarg___closed__2; x_6 = lean_string_append(x_4, x_5); x_7 = l___private_init_data_array_basic_1__swapAtPanic_x21___rarg___closed__3; -x_8 = lean_unsigned_to_nat(133u); +x_8 = lean_unsigned_to_nat(140u); x_9 = lean_unsigned_to_nat(0u); x_10 = l_panicWithPos___at_Lean_IR_reshapeAux___main___spec__2(x_7, x_8, x_9, x_6); lean_dec(x_6); diff --git a/src/stage0/init/lean/compiler/ir/format.c b/src/stage0/init/lean/compiler/ir/format.c index 0f31e0342d..cf9ac0964a 100644 --- a/src/stage0/init/lean/compiler/ir/format.c +++ b/src/stage0/init/lean/compiler/ir/format.c @@ -14,135 +14,130 @@ extern "C" { #endif lean_object* l_Lean_IR_formatDecl(lean_object*, lean_object*); -lean_object* l___private_init_lean_compiler_ir_format_6__formatIRType___closed__8; lean_object* l_Lean_IR_formatAlt___closed__4; -lean_object* l___private_init_lean_compiler_ir_format_5__formatExpr___closed__10; lean_object* l_Lean_IR_formatAlt(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_IR_formatFnBody___main___closed__1; -lean_object* l___private_init_lean_compiler_ir_format_6__formatIRType___closed__2; +lean_object* l___private_init_lean_compiler_ir_format_3__formatCtorInfo___closed__1; uint8_t lean_name_dec_eq(lean_object*, lean_object*); lean_object* l_Lean_IR_formatFnBodyHead___closed__21; lean_object* l_Lean_IR_formatFnBodyHead___closed__2; lean_object* l_Lean_IR_formatFnBodyHead___closed__36; -lean_object* l___private_init_lean_compiler_ir_format_6__formatIRType___closed__12; -lean_object* l___private_init_lean_compiler_ir_format_5__formatExpr___closed__23; +lean_object* l___private_init_lean_compiler_ir_format_4__formatExpr___closed__32; +lean_object* l___private_init_lean_compiler_ir_format_4__formatExpr___closed__5; lean_object* l_Lean_formatKVMap(lean_object*); lean_object* l_Lean_IR_formatDecl___closed__3; lean_object* l_Lean_Format_pretty(lean_object*, lean_object*); -lean_object* l___private_init_lean_compiler_ir_format_7__formatParam___closed__2; lean_object* l_Lean_IR_formatFnBodyHead___closed__7; extern lean_object* l_Lean_Format_paren___closed__2; -lean_object* l___private_init_lean_compiler_ir_format_6__formatIRType___closed__13; +lean_object* l___private_init_lean_compiler_ir_format_5__formatIRType___closed__2; extern lean_object* l_Lean_IR_JoinPointId_HasToString___closed__1; lean_object* l_Lean_IR_formatFnBodyHead___closed__1; lean_object* l_Lean_IR_typeHasFormat___closed__1; +lean_object* l___private_init_lean_compiler_ir_format_4__formatExpr___closed__1; lean_object* l_Array_miterateAux___main___at_Lean_IR_formatFnBody___main___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_IR_formatAlt___closed__2; -lean_object* l___private_init_lean_compiler_ir_format_5__formatExpr___closed__4; lean_object* l_Lean_IR_argHasFormat___closed__1; lean_object* l_Lean_IR_formatAlt___closed__3; -lean_object* l___private_init_lean_compiler_ir_format_5__formatExpr___closed__13; +lean_object* l___private_init_lean_compiler_ir_format_4__formatExpr___closed__16; lean_object* l_Lean_IR_formatFnBodyHead___closed__6; +lean_object* l___private_init_lean_compiler_ir_format_4__formatExpr___closed__6; +lean_object* l___private_init_lean_compiler_ir_format_5__formatIRType___closed__4; lean_object* l_Lean_IR_formatParams___boxed(lean_object*); -lean_object* l___private_init_lean_compiler_ir_format_4__formatCtorInfo___closed__2; -lean_object* l___private_init_lean_compiler_ir_format_5__formatExpr___closed__20; -lean_object* l___private_init_lean_compiler_ir_format_6__formatIRType___boxed(lean_object*); +lean_object* l___private_init_lean_compiler_ir_format_4__formatExpr___closed__19; lean_object* l_Lean_IR_formatFnBody___main___closed__6; +lean_object* l___private_init_lean_compiler_ir_format_4__formatExpr___closed__9; lean_object* l_Lean_IR_formatFnBodyHead___closed__29; -lean_object* l___private_init_lean_compiler_ir_format_5__formatExpr___closed__26; -lean_object* l___private_init_lean_compiler_ir_format_5__formatExpr___closed__29; lean_object* l_Lean_IR_formatFnBodyHead___closed__32; -lean_object* l___private_init_lean_compiler_ir_format_5__formatExpr___closed__22; -lean_object* l___private_init_lean_compiler_ir_format_4__formatCtorInfo___closed__1; +lean_object* l___private_init_lean_compiler_ir_format_4__formatExpr___closed__12; +lean_object* l___private_init_lean_compiler_ir_format_4__formatExpr___closed__3; lean_object* lean_ir_decl_to_string(lean_object*); -lean_object* l___private_init_lean_compiler_ir_format_5__formatExpr___closed__2; lean_object* l_Lean_IR_formatFnBodyHead___closed__9; lean_object* l_Lean_Name_toStringWithSep___main(lean_object*, lean_object*); -lean_object* l___private_init_lean_compiler_ir_format_6__formatIRType___closed__14; +lean_object* l___private_init_lean_compiler_ir_format_5__formatIRType___closed__14; +lean_object* l___private_init_lean_compiler_ir_format_4__formatExpr___closed__21; extern lean_object* l_Lean_Format_sbracket___closed__1; lean_object* l_Lean_IR_formatFnBodyHead___closed__8; +lean_object* l___private_init_lean_compiler_ir_format_4__formatExpr___closed__17; +lean_object* l___private_init_lean_compiler_ir_format_4__formatExpr___closed__18; lean_object* l_Array_miterateAux___main___at_Lean_IR_formatParams___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_init_lean_compiler_ir_format_5__formatExpr___closed__14; -lean_object* l___private_init_lean_compiler_ir_format_5__formatExpr___closed__1; lean_object* l_Lean_IR_formatFnBodyHead___closed__38; lean_object* l_Lean_IR_formatFnBodyHead___closed__4; extern lean_object* l_Lean_Options_empty; -lean_object* l___private_init_lean_compiler_ir_format_5__formatExpr(lean_object*); -lean_object* l_Array_miterateAux___main___at___private_init_lean_compiler_ir_format_2__formatArray___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_init_lean_compiler_ir_format_4__formatExpr(lean_object*); lean_object* l_Lean_IR_formatFnBodyHead___closed__24; lean_object* l_Lean_IR_paramHasFormat___closed__1; +lean_object* l___private_init_lean_compiler_ir_format_5__formatIRType___closed__9; lean_object* l_Lean_IR_declHasFormat; +lean_object* l___private_init_lean_compiler_ir_format_5__formatIRType___closed__13; lean_object* l_Lean_IR_fnBodyHasFormat___closed__1; -lean_object* l___private_init_lean_compiler_ir_format_5__formatExpr___closed__21; -lean_object* l___private_init_lean_compiler_ir_format_5__formatExpr___closed__5; +lean_object* l___private_init_lean_compiler_ir_format_5__formatIRType___closed__11; +lean_object* l_Lean_IR_formatArray___at_Lean_IR_formatParams___spec__1(lean_object*); lean_object* l_Array_miterateAux___main___at_Lean_IR_formatFnBody___main___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l___private_init_lean_compiler_ir_format_6__formatIRType___closed__4; +lean_object* l___private_init_lean_compiler_ir_format_4__formatExpr___closed__8; extern lean_object* l_Lean_Format_join___closed__1; lean_object* l_Lean_IR_ctorInfoHasFormat___closed__1; -lean_object* l___private_init_lean_compiler_ir_format_6__formatIRType___closed__6; -lean_object* l___private_init_lean_compiler_ir_format_7__formatParam___closed__4; -lean_object* l___private_init_lean_compiler_ir_format_5__formatExpr___closed__16; +lean_object* l___private_init_lean_compiler_ir_format_4__formatExpr___closed__20; lean_object* l___private_init_lean_compiler_ir_format_1__formatArg(lean_object*); lean_object* l_Lean_IR_exprHasFormat___closed__1; lean_object* l_Lean_IR_formatFnBodyHead___closed__35; -lean_object* l___private_init_lean_compiler_ir_format_7__formatParam(lean_object*); +lean_object* l___private_init_lean_compiler_ir_format_4__formatExpr___closed__29; +lean_object* l___private_init_lean_compiler_ir_format_5__formatIRType(uint8_t); lean_object* l_Nat_repr(lean_object*); -lean_object* l___private_init_lean_compiler_ir_format_5__formatExpr___closed__30; extern lean_object* l_Lean_Format_sbracket___closed__2; +lean_object* l___private_init_lean_compiler_ir_format_4__formatExpr___closed__31; +lean_object* l___private_init_lean_compiler_ir_format_4__formatExpr___closed__10; lean_object* l_Lean_IR_formatFnBodyHead___closed__30; lean_object* l_Lean_IR_argHasFormat; -lean_object* l___private_init_lean_compiler_ir_format_5__formatExpr___closed__11; +lean_object* l___private_init_lean_compiler_ir_format_6__formatParam___closed__4; lean_object* l_Lean_IR_typeHasFormat; -lean_object* l___private_init_lean_compiler_ir_format_5__formatExpr___closed__9; lean_object* l_Lean_IR_formatFnBodyHead___closed__27; -lean_object* l___private_init_lean_compiler_ir_format_5__formatExpr___closed__27; -lean_object* l___private_init_lean_compiler_ir_format_7__formatParam___closed__3; +lean_object* l_Lean_IR_formatArray(lean_object*); lean_object* l_Lean_IR_formatFnBodyHead___closed__11; -lean_object* l___private_init_lean_compiler_ir_format_5__formatExpr___closed__18; -lean_object* l___private_init_lean_compiler_ir_format_5__formatExpr___closed__6; lean_object* lean_ir_format_fn_body_head(lean_object*); lean_object* lean_string_append(lean_object*, lean_object*); +lean_object* l_Array_miterateAux___main___at_Lean_IR_formatArray___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_IR_fnBodyHasFormat; +lean_object* l___private_init_lean_compiler_ir_format_4__formatExpr___closed__24; +lean_object* l___private_init_lean_compiler_ir_format_4__formatExpr___closed__25; lean_object* l_Lean_IR_formatDecl___closed__4; lean_object* l___private_init_lean_compiler_ir_format_1__formatArg___closed__2; -lean_object* l___private_init_lean_compiler_ir_format_2__formatArray___at_Lean_IR_formatParams___spec__1(lean_object*); lean_object* l_Lean_IR_formatFnBodyHead___closed__15; -lean_object* l___private_init_lean_compiler_ir_format_6__formatIRType___closed__9; -lean_object* l___private_init_lean_compiler_ir_format_6__formatIRType___closed__1; lean_object* l_Lean_IR_formatFnBody___main___closed__3; lean_object* l_Lean_IR_formatFnBodyHead___closed__13; uint8_t lean_nat_dec_lt(lean_object*, lean_object*); -lean_object* l___private_init_lean_compiler_ir_format_2__formatArray___at___private_init_lean_compiler_ir_format_5__formatExpr___spec__1___boxed(lean_object*); +lean_object* l___private_init_lean_compiler_ir_format_3__formatCtorInfo(lean_object*); lean_object* l_Lean_IR_litValHasFormat___closed__1; lean_object* l_Array_miterateAux___main___at_Lean_IR_formatParams___spec__2(lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* l_Array_miterateAux___main___at___private_init_lean_compiler_ir_format_2__formatArray___spec__1___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_IR_formatFnBodyHead___closed__10; -lean_object* l___private_init_lean_compiler_ir_format_6__formatIRType___closed__16; -lean_object* l___private_init_lean_compiler_ir_format_5__formatExpr___closed__17; -lean_object* l___private_init_lean_compiler_ir_format_5__formatExpr___closed__12; +lean_object* l_Lean_IR_formatArray___at_Lean_IR_formatParams___spec__1___boxed(lean_object*); +lean_object* l___private_init_lean_compiler_ir_format_5__formatIRType___closed__3; lean_object* lean_nat_add(lean_object*, lean_object*); extern lean_object* l_Lean_Format_paren___closed__3; +lean_object* l___private_init_lean_compiler_ir_format_5__formatIRType___closed__16; lean_object* l_Lean_IR_formatFnBodyHead___closed__16; -lean_object* l___private_init_lean_compiler_ir_format_6__formatIRType___closed__5; -lean_object* l_Array_miterateAux___main___at___private_init_lean_compiler_ir_format_5__formatExpr___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*); uint8_t lean_nat_dec_eq(lean_object*, lean_object*); -lean_object* l___private_init_lean_compiler_ir_format_5__formatExpr___closed__28; lean_object* l_Lean_IR_formatFnBodyHead___closed__23; lean_object* l_Lean_IR_declHasToString___closed__1; lean_object* l_Lean_IR_formatFnBodyHead___closed__26; lean_object* l_Lean_IR_formatFnBody___main___closed__2; -lean_object* l___private_init_lean_compiler_ir_format_3__formatLitVal(lean_object*); -lean_object* l___private_init_lean_compiler_ir_format_4__formatCtorInfo___closed__3; -lean_object* l___private_init_lean_compiler_ir_format_2__formatArray___rarg___boxed(lean_object*, lean_object*); extern lean_object* l_Lean_Format_flatten___main___closed__1; -lean_object* l_Array_miterateAux___main___at___private_init_lean_compiler_ir_format_5__formatExpr___spec__2(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l___private_init_lean_compiler_ir_format_5__formatIRType___closed__12; lean_object* l_Lean_IR_formatFnBodyHead___closed__34; +lean_object* l_Lean_IR_formatArray___at___private_init_lean_compiler_ir_format_4__formatExpr___spec__1___boxed(lean_object*); +lean_object* l___private_init_lean_compiler_ir_format_5__formatIRType___closed__8; +lean_object* l_Array_miterateAux___main___at_Lean_IR_formatArray___spec__1___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_IR_formatArray___rarg___boxed(lean_object*, lean_object*); lean_object* l_Lean_IR_declHasFormat___closed__1; +lean_object* l___private_init_lean_compiler_ir_format_4__formatExpr___closed__15; lean_object* l_Lean_IR_formatFnBodyHead___closed__12; +lean_object* l___private_init_lean_compiler_ir_format_4__formatExpr___closed__23; +lean_object* l___private_init_lean_compiler_ir_format_4__formatExpr___closed__2; +lean_object* l___private_init_lean_compiler_ir_format_5__formatIRType___closed__1; +lean_object* l___private_init_lean_compiler_ir_format_4__formatExpr___closed__14; +lean_object* l___private_init_lean_compiler_ir_format_4__formatExpr___closed__7; lean_object* l_Lean_IR_declHasToString; -lean_object* l___private_init_lean_compiler_ir_format_6__formatIRType(uint8_t); -lean_object* l___private_init_lean_compiler_ir_format_5__formatExpr___closed__15; -lean_object* l___private_init_lean_compiler_ir_format_2__formatArray___at___private_init_lean_compiler_ir_format_5__formatExpr___spec__1(lean_object*); +lean_object* l_Lean_IR_formatArray___rarg(lean_object*, lean_object*); +lean_object* l___private_init_lean_compiler_ir_format_5__formatIRType___closed__15; lean_object* l_Lean_IR_formatFnBodyHead___closed__18; extern lean_object* l_Lean_Format_sbracket___closed__3; lean_object* l_Lean_IR_formatDecl___closed__1; @@ -153,50 +148,55 @@ lean_object* l_Lean_IR_ctorInfoHasFormat; extern lean_object* l_Lean_formatKVMap___closed__1; lean_object* l___private_init_lean_compiler_ir_format_1__formatArg___closed__1; lean_object* lean_format_group(lean_object*); -lean_object* l___private_init_lean_compiler_ir_format_6__formatIRType___closed__15; -lean_object* l___private_init_lean_compiler_ir_format_2__formatArray___at_Lean_IR_formatParams___spec__1___boxed(lean_object*); -lean_object* l___private_init_lean_compiler_ir_format_5__formatExpr___closed__3; -lean_object* l___private_init_lean_compiler_ir_format_5__formatExpr___closed__31; +lean_object* l___private_init_lean_compiler_ir_format_6__formatParam___closed__3; +lean_object* l___private_init_lean_compiler_ir_format_4__formatExpr___closed__27; lean_object* l_Lean_IR_formatFnBodyHead___closed__37; +lean_object* l___private_init_lean_compiler_ir_format_5__formatIRType___closed__7; lean_object* l_Lean_IR_exprHasToString(lean_object*); -lean_object* l___private_init_lean_compiler_ir_format_2__formatArray(lean_object*); -lean_object* l___private_init_lean_compiler_ir_format_4__formatCtorInfo(lean_object*); extern lean_object* l_Lean_IR_VarId_HasToString___closed__1; -lean_object* l___private_init_lean_compiler_ir_format_5__formatExpr___closed__24; +lean_object* l___private_init_lean_compiler_ir_format_6__formatParam___closed__1; lean_object* l_Lean_IR_formatFnBodyHead___closed__14; extern lean_object* l_Lean_formatEntry___closed__2; lean_object* l_Array_size(lean_object*, lean_object*); -lean_object* l___private_init_lean_compiler_ir_format_5__formatExpr___closed__19; lean_object* l_Lean_IR_exprHasFormat; lean_object* l_Array_get(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_IR_formatParams(lean_object*); -lean_object* l___private_init_lean_compiler_ir_format_7__formatParam___closed__1; +lean_object* l___private_init_lean_compiler_ir_format_5__formatIRType___closed__6; +lean_object* l_Array_miterateAux___main___at___private_init_lean_compiler_ir_format_4__formatExpr___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_miterateAux___main___at_Lean_IR_formatArray___spec__1(lean_object*); +lean_object* l___private_init_lean_compiler_ir_format_3__formatCtorInfo___closed__3; lean_object* l_Lean_IR_formatFnBodyHead___closed__3; +lean_object* l___private_init_lean_compiler_ir_format_4__formatExpr___closed__4; +lean_object* l___private_init_lean_compiler_ir_format_4__formatExpr___closed__28; +lean_object* l___private_init_lean_compiler_ir_format_5__formatIRType___closed__10; lean_object* l_Lean_IR_formatFnBodyHead___closed__5; -lean_object* l___private_init_lean_compiler_ir_format_6__formatIRType___closed__3; -lean_object* l___private_init_lean_compiler_ir_format_2__formatArray___rarg(lean_object*, lean_object*); -lean_object* l___private_init_lean_compiler_ir_format_6__formatIRType___closed__10; lean_object* l_Lean_IR_formatFnBodyHead___closed__22; +lean_object* l___private_init_lean_compiler_ir_format_5__formatIRType___closed__5; lean_object* l_Lean_IR_litValHasFormat; lean_object* l_Lean_IR_fnBodyHasToString(lean_object*); lean_object* l_Lean_IR_formatAlt___closed__1; lean_object* l_Lean_IR_formatFnBodyHead___closed__20; lean_object* l_Lean_IR_formatFnBodyHead___closed__19; -lean_object* l___private_init_lean_compiler_ir_format_5__formatExpr___closed__7; lean_object* l_Lean_IR_formatDecl___closed__2; -lean_object* l___private_init_lean_compiler_ir_format_5__formatExpr___closed__25; +lean_object* l___private_init_lean_compiler_ir_format_4__formatExpr___closed__26; +lean_object* l___private_init_lean_compiler_ir_format_4__formatExpr___closed__13; +lean_object* l___private_init_lean_compiler_ir_format_6__formatParam(lean_object*); lean_object* l_Lean_IR_formatFnBodyHead___closed__25; -lean_object* l___private_init_lean_compiler_ir_format_5__formatExpr___closed__32; -lean_object* l_Array_miterateAux___main___at___private_init_lean_compiler_ir_format_2__formatArray___spec__1(lean_object*); +lean_object* l_Array_miterateAux___main___at___private_init_lean_compiler_ir_format_4__formatExpr___spec__2(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_String_quote(lean_object*); -lean_object* l___private_init_lean_compiler_ir_format_6__formatIRType___closed__11; -lean_object* l___private_init_lean_compiler_ir_format_6__formatIRType___closed__7; +lean_object* l___private_init_lean_compiler_ir_format_5__formatIRType___boxed(lean_object*); lean_object* l_Lean_IR_paramHasFormat; +lean_object* l___private_init_lean_compiler_ir_format_4__formatExpr___closed__30; lean_object* l_Lean_IR_formatFnBodyHead___closed__31; -lean_object* l___private_init_lean_compiler_ir_format_5__formatExpr___closed__8; +lean_object* l___private_init_lean_compiler_ir_format_4__formatExpr___closed__11; +lean_object* l___private_init_lean_compiler_ir_format_2__formatLitVal(lean_object*); +lean_object* l___private_init_lean_compiler_ir_format_4__formatExpr___closed__22; lean_object* l_Lean_IR_formatFnBody___main___closed__4; +lean_object* l_Lean_IR_formatArray___at___private_init_lean_compiler_ir_format_4__formatExpr___spec__1(lean_object*); +lean_object* l___private_init_lean_compiler_ir_format_6__formatParam___closed__2; lean_object* l_Lean_IR_formatFnBodyHead___closed__17; lean_object* l_Lean_IR_formatFnBodyHead___closed__33; +lean_object* l___private_init_lean_compiler_ir_format_3__formatCtorInfo___closed__2; lean_object* l_Lean_IR_formatFnBodyHead___closed__28; lean_object* l_Lean_IR_formatFnBody___main(lean_object*, lean_object*); lean_object* _init_l___private_init_lean_compiler_ir_format_1__formatArg___closed__1() { @@ -258,7 +258,7 @@ x_1 = l_Lean_IR_argHasFormat___closed__1; return x_1; } } -lean_object* l_Array_miterateAux___main___at___private_init_lean_compiler_ir_format_2__formatArray___spec__1___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { +lean_object* l_Array_miterateAux___main___at_Lean_IR_formatArray___spec__1___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { _start: { lean_object* x_6; uint8_t x_7; @@ -296,52 +296,52 @@ goto _start; } } } -lean_object* l_Array_miterateAux___main___at___private_init_lean_compiler_ir_format_2__formatArray___spec__1(lean_object* x_1) { +lean_object* l_Array_miterateAux___main___at_Lean_IR_formatArray___spec__1(lean_object* x_1) { _start: { lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l_Array_miterateAux___main___at___private_init_lean_compiler_ir_format_2__formatArray___spec__1___rarg___boxed), 5, 0); +x_2 = lean_alloc_closure((void*)(l_Array_miterateAux___main___at_Lean_IR_formatArray___spec__1___rarg___boxed), 5, 0); return x_2; } } -lean_object* l___private_init_lean_compiler_ir_format_2__formatArray___rarg(lean_object* x_1, lean_object* x_2) { +lean_object* l_Lean_IR_formatArray___rarg(lean_object* x_1, lean_object* x_2) { _start: { lean_object* x_3; lean_object* x_4; lean_object* x_5; x_3 = lean_unsigned_to_nat(0u); x_4 = lean_box(0); -x_5 = l_Array_miterateAux___main___at___private_init_lean_compiler_ir_format_2__formatArray___spec__1___rarg(x_1, x_2, x_2, x_3, x_4); +x_5 = l_Array_miterateAux___main___at_Lean_IR_formatArray___spec__1___rarg(x_1, x_2, x_2, x_3, x_4); return x_5; } } -lean_object* l___private_init_lean_compiler_ir_format_2__formatArray(lean_object* x_1) { +lean_object* l_Lean_IR_formatArray(lean_object* x_1) { _start: { lean_object* x_2; -x_2 = lean_alloc_closure((void*)(l___private_init_lean_compiler_ir_format_2__formatArray___rarg___boxed), 2, 0); +x_2 = lean_alloc_closure((void*)(l_Lean_IR_formatArray___rarg___boxed), 2, 0); return x_2; } } -lean_object* l_Array_miterateAux___main___at___private_init_lean_compiler_ir_format_2__formatArray___spec__1___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { +lean_object* l_Array_miterateAux___main___at_Lean_IR_formatArray___spec__1___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { _start: { lean_object* x_6; -x_6 = l_Array_miterateAux___main___at___private_init_lean_compiler_ir_format_2__formatArray___spec__1___rarg(x_1, x_2, x_3, x_4, x_5); +x_6 = l_Array_miterateAux___main___at_Lean_IR_formatArray___spec__1___rarg(x_1, x_2, x_3, x_4, x_5); lean_dec(x_3); lean_dec(x_2); return x_6; } } -lean_object* l___private_init_lean_compiler_ir_format_2__formatArray___rarg___boxed(lean_object* x_1, lean_object* x_2) { +lean_object* l_Lean_IR_formatArray___rarg___boxed(lean_object* x_1, lean_object* x_2) { _start: { lean_object* x_3; -x_3 = l___private_init_lean_compiler_ir_format_2__formatArray___rarg(x_1, x_2); +x_3 = l_Lean_IR_formatArray___rarg(x_1, x_2); lean_dec(x_2); return x_3; } } -lean_object* l___private_init_lean_compiler_ir_format_3__formatLitVal(lean_object* x_1) { +lean_object* l___private_init_lean_compiler_ir_format_2__formatLitVal(lean_object* x_1) { _start: { if (lean_obj_tag(x_1) == 0) @@ -372,7 +372,7 @@ lean_object* _init_l_Lean_IR_litValHasFormat___closed__1() { _start: { lean_object* x_1; -x_1 = lean_alloc_closure((void*)(l___private_init_lean_compiler_ir_format_3__formatLitVal), 1, 0); +x_1 = lean_alloc_closure((void*)(l___private_init_lean_compiler_ir_format_2__formatLitVal), 1, 0); return x_1; } } @@ -384,7 +384,7 @@ x_1 = l_Lean_IR_litValHasFormat___closed__1; return x_1; } } -lean_object* _init_l___private_init_lean_compiler_ir_format_4__formatCtorInfo___closed__1() { +lean_object* _init_l___private_init_lean_compiler_ir_format_3__formatCtorInfo___closed__1() { _start: { lean_object* x_1; @@ -392,17 +392,17 @@ x_1 = lean_mk_string("ctor_"); return x_1; } } -lean_object* _init_l___private_init_lean_compiler_ir_format_4__formatCtorInfo___closed__2() { +lean_object* _init_l___private_init_lean_compiler_ir_format_3__formatCtorInfo___closed__2() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l___private_init_lean_compiler_ir_format_4__formatCtorInfo___closed__1; +x_1 = l___private_init_lean_compiler_ir_format_3__formatCtorInfo___closed__1; x_2 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -lean_object* _init_l___private_init_lean_compiler_ir_format_4__formatCtorInfo___closed__3() { +lean_object* _init_l___private_init_lean_compiler_ir_format_3__formatCtorInfo___closed__3() { _start: { lean_object* x_1; lean_object* x_2; @@ -412,7 +412,7 @@ lean_ctor_set(x_2, 0, x_1); return x_2; } } -lean_object* l___private_init_lean_compiler_ir_format_4__formatCtorInfo(lean_object* x_1) { +lean_object* l___private_init_lean_compiler_ir_format_3__formatCtorInfo(lean_object* x_1) { _start: { lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; uint8_t x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; uint8_t x_12; lean_object* x_13; uint8_t x_14; @@ -429,7 +429,7 @@ x_6 = l_Nat_repr(x_3); x_7 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_7, 0, x_6); x_8 = 0; -x_9 = l___private_init_lean_compiler_ir_format_4__formatCtorInfo___closed__2; +x_9 = l___private_init_lean_compiler_ir_format_3__formatCtorInfo___closed__2; x_10 = lean_alloc_ctor(4, 2, 1); lean_ctor_set(x_10, 0, x_9); lean_ctor_set(x_10, 1, x_7); @@ -478,7 +478,7 @@ return x_10; else { lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; -x_24 = l___private_init_lean_compiler_ir_format_4__formatCtorInfo___closed__3; +x_24 = l___private_init_lean_compiler_ir_format_3__formatCtorInfo___closed__3; x_25 = lean_alloc_ctor(4, 2, 1); lean_ctor_set(x_25, 0, x_10); lean_ctor_set(x_25, 1, x_24); @@ -534,7 +534,7 @@ return x_32; else { lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; lean_object* x_48; lean_object* x_49; -x_41 = l___private_init_lean_compiler_ir_format_4__formatCtorInfo___closed__3; +x_41 = l___private_init_lean_compiler_ir_format_3__formatCtorInfo___closed__3; x_42 = lean_alloc_ctor(4, 2, 1); lean_ctor_set(x_42, 0, x_10); lean_ctor_set(x_42, 1, x_41); @@ -592,7 +592,7 @@ lean_object* _init_l_Lean_IR_ctorInfoHasFormat___closed__1() { _start: { lean_object* x_1; -x_1 = lean_alloc_closure((void*)(l___private_init_lean_compiler_ir_format_4__formatCtorInfo), 1, 0); +x_1 = lean_alloc_closure((void*)(l___private_init_lean_compiler_ir_format_3__formatCtorInfo), 1, 0); return x_1; } } @@ -604,7 +604,7 @@ x_1 = l_Lean_IR_ctorInfoHasFormat___closed__1; return x_1; } } -lean_object* l_Array_miterateAux___main___at___private_init_lean_compiler_ir_format_5__formatExpr___spec__2(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +lean_object* l_Array_miterateAux___main___at___private_init_lean_compiler_ir_format_4__formatExpr___spec__2(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { lean_object* x_5; uint8_t x_6; @@ -640,17 +640,17 @@ goto _start; } } } -lean_object* l___private_init_lean_compiler_ir_format_2__formatArray___at___private_init_lean_compiler_ir_format_5__formatExpr___spec__1(lean_object* x_1) { +lean_object* l_Lean_IR_formatArray___at___private_init_lean_compiler_ir_format_4__formatExpr___spec__1(lean_object* x_1) { _start: { lean_object* x_2; lean_object* x_3; lean_object* x_4; x_2 = lean_unsigned_to_nat(0u); x_3 = lean_box(0); -x_4 = l_Array_miterateAux___main___at___private_init_lean_compiler_ir_format_5__formatExpr___spec__2(x_1, x_1, x_2, x_3); +x_4 = l_Array_miterateAux___main___at___private_init_lean_compiler_ir_format_4__formatExpr___spec__2(x_1, x_1, x_2, x_3); return x_4; } } -lean_object* _init_l___private_init_lean_compiler_ir_format_5__formatExpr___closed__1() { +lean_object* _init_l___private_init_lean_compiler_ir_format_4__formatExpr___closed__1() { _start: { lean_object* x_1; @@ -658,17 +658,17 @@ x_1 = lean_mk_string("reset["); return x_1; } } -lean_object* _init_l___private_init_lean_compiler_ir_format_5__formatExpr___closed__2() { +lean_object* _init_l___private_init_lean_compiler_ir_format_4__formatExpr___closed__2() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l___private_init_lean_compiler_ir_format_5__formatExpr___closed__1; +x_1 = l___private_init_lean_compiler_ir_format_4__formatExpr___closed__1; x_2 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -lean_object* _init_l___private_init_lean_compiler_ir_format_5__formatExpr___closed__3() { +lean_object* _init_l___private_init_lean_compiler_ir_format_4__formatExpr___closed__3() { _start: { lean_object* x_1; @@ -676,17 +676,17 @@ x_1 = lean_mk_string("] "); return x_1; } } -lean_object* _init_l___private_init_lean_compiler_ir_format_5__formatExpr___closed__4() { +lean_object* _init_l___private_init_lean_compiler_ir_format_4__formatExpr___closed__4() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l___private_init_lean_compiler_ir_format_5__formatExpr___closed__3; +x_1 = l___private_init_lean_compiler_ir_format_4__formatExpr___closed__3; x_2 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -lean_object* _init_l___private_init_lean_compiler_ir_format_5__formatExpr___closed__5() { +lean_object* _init_l___private_init_lean_compiler_ir_format_4__formatExpr___closed__5() { _start: { lean_object* x_1; @@ -694,17 +694,17 @@ x_1 = lean_mk_string("reuse"); return x_1; } } -lean_object* _init_l___private_init_lean_compiler_ir_format_5__formatExpr___closed__6() { +lean_object* _init_l___private_init_lean_compiler_ir_format_4__formatExpr___closed__6() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l___private_init_lean_compiler_ir_format_5__formatExpr___closed__5; +x_1 = l___private_init_lean_compiler_ir_format_4__formatExpr___closed__5; x_2 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -lean_object* _init_l___private_init_lean_compiler_ir_format_5__formatExpr___closed__7() { +lean_object* _init_l___private_init_lean_compiler_ir_format_4__formatExpr___closed__7() { _start: { lean_object* x_1; @@ -712,22 +712,22 @@ x_1 = lean_mk_string(" in "); return x_1; } } -lean_object* _init_l___private_init_lean_compiler_ir_format_5__formatExpr___closed__8() { +lean_object* _init_l___private_init_lean_compiler_ir_format_4__formatExpr___closed__8() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l___private_init_lean_compiler_ir_format_5__formatExpr___closed__7; +x_1 = l___private_init_lean_compiler_ir_format_4__formatExpr___closed__7; x_2 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -lean_object* _init_l___private_init_lean_compiler_ir_format_5__formatExpr___closed__9() { +lean_object* _init_l___private_init_lean_compiler_ir_format_4__formatExpr___closed__9() { _start: { uint8_t x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; x_1 = 0; -x_2 = l___private_init_lean_compiler_ir_format_5__formatExpr___closed__6; +x_2 = l___private_init_lean_compiler_ir_format_4__formatExpr___closed__6; x_3 = l_Lean_Format_join___closed__1; x_4 = lean_alloc_ctor(4, 2, 1); lean_ctor_set(x_4, 0, x_2); @@ -736,12 +736,12 @@ lean_ctor_set_uint8(x_4, sizeof(void*)*2, x_1); return x_4; } } -lean_object* _init_l___private_init_lean_compiler_ir_format_5__formatExpr___closed__10() { +lean_object* _init_l___private_init_lean_compiler_ir_format_4__formatExpr___closed__10() { _start: { uint8_t x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; x_1 = 0; -x_2 = l___private_init_lean_compiler_ir_format_5__formatExpr___closed__9; +x_2 = l___private_init_lean_compiler_ir_format_4__formatExpr___closed__9; x_3 = l_Lean_Format_flatten___main___closed__1; x_4 = lean_alloc_ctor(4, 2, 1); lean_ctor_set(x_4, 0, x_2); @@ -750,7 +750,7 @@ lean_ctor_set_uint8(x_4, sizeof(void*)*2, x_1); return x_4; } } -lean_object* _init_l___private_init_lean_compiler_ir_format_5__formatExpr___closed__11() { +lean_object* _init_l___private_init_lean_compiler_ir_format_4__formatExpr___closed__11() { _start: { lean_object* x_1; @@ -758,23 +758,23 @@ x_1 = lean_mk_string("!"); return x_1; } } -lean_object* _init_l___private_init_lean_compiler_ir_format_5__formatExpr___closed__12() { +lean_object* _init_l___private_init_lean_compiler_ir_format_4__formatExpr___closed__12() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l___private_init_lean_compiler_ir_format_5__formatExpr___closed__11; +x_1 = l___private_init_lean_compiler_ir_format_4__formatExpr___closed__11; x_2 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -lean_object* _init_l___private_init_lean_compiler_ir_format_5__formatExpr___closed__13() { +lean_object* _init_l___private_init_lean_compiler_ir_format_4__formatExpr___closed__13() { _start: { uint8_t x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; x_1 = 0; -x_2 = l___private_init_lean_compiler_ir_format_5__formatExpr___closed__6; -x_3 = l___private_init_lean_compiler_ir_format_5__formatExpr___closed__12; +x_2 = l___private_init_lean_compiler_ir_format_4__formatExpr___closed__6; +x_3 = l___private_init_lean_compiler_ir_format_4__formatExpr___closed__12; x_4 = lean_alloc_ctor(4, 2, 1); lean_ctor_set(x_4, 0, x_2); lean_ctor_set(x_4, 1, x_3); @@ -782,12 +782,12 @@ lean_ctor_set_uint8(x_4, sizeof(void*)*2, x_1); return x_4; } } -lean_object* _init_l___private_init_lean_compiler_ir_format_5__formatExpr___closed__14() { +lean_object* _init_l___private_init_lean_compiler_ir_format_4__formatExpr___closed__14() { _start: { uint8_t x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; x_1 = 0; -x_2 = l___private_init_lean_compiler_ir_format_5__formatExpr___closed__13; +x_2 = l___private_init_lean_compiler_ir_format_4__formatExpr___closed__13; x_3 = l_Lean_Format_flatten___main___closed__1; x_4 = lean_alloc_ctor(4, 2, 1); lean_ctor_set(x_4, 0, x_2); @@ -796,7 +796,7 @@ lean_ctor_set_uint8(x_4, sizeof(void*)*2, x_1); return x_4; } } -lean_object* _init_l___private_init_lean_compiler_ir_format_5__formatExpr___closed__15() { +lean_object* _init_l___private_init_lean_compiler_ir_format_4__formatExpr___closed__15() { _start: { lean_object* x_1; @@ -804,17 +804,17 @@ x_1 = lean_mk_string("proj["); return x_1; } } -lean_object* _init_l___private_init_lean_compiler_ir_format_5__formatExpr___closed__16() { +lean_object* _init_l___private_init_lean_compiler_ir_format_4__formatExpr___closed__16() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l___private_init_lean_compiler_ir_format_5__formatExpr___closed__15; +x_1 = l___private_init_lean_compiler_ir_format_4__formatExpr___closed__15; x_2 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -lean_object* _init_l___private_init_lean_compiler_ir_format_5__formatExpr___closed__17() { +lean_object* _init_l___private_init_lean_compiler_ir_format_4__formatExpr___closed__17() { _start: { lean_object* x_1; @@ -822,17 +822,17 @@ x_1 = lean_mk_string("uproj["); return x_1; } } -lean_object* _init_l___private_init_lean_compiler_ir_format_5__formatExpr___closed__18() { +lean_object* _init_l___private_init_lean_compiler_ir_format_4__formatExpr___closed__18() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l___private_init_lean_compiler_ir_format_5__formatExpr___closed__17; +x_1 = l___private_init_lean_compiler_ir_format_4__formatExpr___closed__17; x_2 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -lean_object* _init_l___private_init_lean_compiler_ir_format_5__formatExpr___closed__19() { +lean_object* _init_l___private_init_lean_compiler_ir_format_4__formatExpr___closed__19() { _start: { lean_object* x_1; @@ -840,17 +840,17 @@ x_1 = lean_mk_string("sproj["); return x_1; } } -lean_object* _init_l___private_init_lean_compiler_ir_format_5__formatExpr___closed__20() { +lean_object* _init_l___private_init_lean_compiler_ir_format_4__formatExpr___closed__20() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l___private_init_lean_compiler_ir_format_5__formatExpr___closed__19; +x_1 = l___private_init_lean_compiler_ir_format_4__formatExpr___closed__19; x_2 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -lean_object* _init_l___private_init_lean_compiler_ir_format_5__formatExpr___closed__21() { +lean_object* _init_l___private_init_lean_compiler_ir_format_4__formatExpr___closed__21() { _start: { lean_object* x_1; @@ -858,17 +858,17 @@ x_1 = lean_mk_string("pap "); return x_1; } } -lean_object* _init_l___private_init_lean_compiler_ir_format_5__formatExpr___closed__22() { +lean_object* _init_l___private_init_lean_compiler_ir_format_4__formatExpr___closed__22() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l___private_init_lean_compiler_ir_format_5__formatExpr___closed__21; +x_1 = l___private_init_lean_compiler_ir_format_4__formatExpr___closed__21; x_2 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -lean_object* _init_l___private_init_lean_compiler_ir_format_5__formatExpr___closed__23() { +lean_object* _init_l___private_init_lean_compiler_ir_format_4__formatExpr___closed__23() { _start: { lean_object* x_1; @@ -876,17 +876,17 @@ x_1 = lean_mk_string("app "); return x_1; } } -lean_object* _init_l___private_init_lean_compiler_ir_format_5__formatExpr___closed__24() { +lean_object* _init_l___private_init_lean_compiler_ir_format_4__formatExpr___closed__24() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l___private_init_lean_compiler_ir_format_5__formatExpr___closed__23; +x_1 = l___private_init_lean_compiler_ir_format_4__formatExpr___closed__23; x_2 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -lean_object* _init_l___private_init_lean_compiler_ir_format_5__formatExpr___closed__25() { +lean_object* _init_l___private_init_lean_compiler_ir_format_4__formatExpr___closed__25() { _start: { lean_object* x_1; @@ -894,17 +894,17 @@ x_1 = lean_mk_string("box "); return x_1; } } -lean_object* _init_l___private_init_lean_compiler_ir_format_5__formatExpr___closed__26() { +lean_object* _init_l___private_init_lean_compiler_ir_format_4__formatExpr___closed__26() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l___private_init_lean_compiler_ir_format_5__formatExpr___closed__25; +x_1 = l___private_init_lean_compiler_ir_format_4__formatExpr___closed__25; x_2 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -lean_object* _init_l___private_init_lean_compiler_ir_format_5__formatExpr___closed__27() { +lean_object* _init_l___private_init_lean_compiler_ir_format_4__formatExpr___closed__27() { _start: { lean_object* x_1; @@ -912,17 +912,17 @@ x_1 = lean_mk_string("unbox "); return x_1; } } -lean_object* _init_l___private_init_lean_compiler_ir_format_5__formatExpr___closed__28() { +lean_object* _init_l___private_init_lean_compiler_ir_format_4__formatExpr___closed__28() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l___private_init_lean_compiler_ir_format_5__formatExpr___closed__27; +x_1 = l___private_init_lean_compiler_ir_format_4__formatExpr___closed__27; x_2 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -lean_object* _init_l___private_init_lean_compiler_ir_format_5__formatExpr___closed__29() { +lean_object* _init_l___private_init_lean_compiler_ir_format_4__formatExpr___closed__29() { _start: { lean_object* x_1; @@ -930,17 +930,17 @@ x_1 = lean_mk_string("isShared "); return x_1; } } -lean_object* _init_l___private_init_lean_compiler_ir_format_5__formatExpr___closed__30() { +lean_object* _init_l___private_init_lean_compiler_ir_format_4__formatExpr___closed__30() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l___private_init_lean_compiler_ir_format_5__formatExpr___closed__29; +x_1 = l___private_init_lean_compiler_ir_format_4__formatExpr___closed__29; x_2 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -lean_object* _init_l___private_init_lean_compiler_ir_format_5__formatExpr___closed__31() { +lean_object* _init_l___private_init_lean_compiler_ir_format_4__formatExpr___closed__31() { _start: { lean_object* x_1; @@ -948,17 +948,17 @@ x_1 = lean_mk_string("isTaggedPtr "); return x_1; } } -lean_object* _init_l___private_init_lean_compiler_ir_format_5__formatExpr___closed__32() { +lean_object* _init_l___private_init_lean_compiler_ir_format_4__formatExpr___closed__32() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l___private_init_lean_compiler_ir_format_5__formatExpr___closed__31; +x_1 = l___private_init_lean_compiler_ir_format_4__formatExpr___closed__31; x_2 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -lean_object* l___private_init_lean_compiler_ir_format_5__formatExpr(lean_object* x_1) { +lean_object* l___private_init_lean_compiler_ir_format_4__formatExpr(lean_object* x_1) { _start: { switch (lean_obj_tag(x_1)) { @@ -970,10 +970,10 @@ lean_inc(x_2); x_3 = lean_ctor_get(x_1, 1); lean_inc(x_3); lean_dec(x_1); -x_4 = l___private_init_lean_compiler_ir_format_4__formatCtorInfo(x_2); +x_4 = l___private_init_lean_compiler_ir_format_3__formatCtorInfo(x_2); x_5 = lean_unsigned_to_nat(0u); x_6 = lean_box(0); -x_7 = l_Array_miterateAux___main___at___private_init_lean_compiler_ir_format_5__formatExpr___spec__2(x_3, x_3, x_5, x_6); +x_7 = l_Array_miterateAux___main___at___private_init_lean_compiler_ir_format_4__formatExpr___spec__2(x_3, x_3, x_5, x_6); lean_dec(x_3); x_8 = 0; x_9 = lean_alloc_ctor(4, 2, 1); @@ -994,12 +994,12 @@ x_12 = l_Nat_repr(x_10); x_13 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_13, 0, x_12); x_14 = 0; -x_15 = l___private_init_lean_compiler_ir_format_5__formatExpr___closed__2; +x_15 = l___private_init_lean_compiler_ir_format_4__formatExpr___closed__2; x_16 = lean_alloc_ctor(4, 2, 1); lean_ctor_set(x_16, 0, x_15); lean_ctor_set(x_16, 1, x_13); lean_ctor_set_uint8(x_16, sizeof(void*)*2, x_14); -x_17 = l___private_init_lean_compiler_ir_format_5__formatExpr___closed__4; +x_17 = l___private_init_lean_compiler_ir_format_4__formatExpr___closed__4; x_18 = lean_alloc_ctor(4, 2, 1); lean_ctor_set(x_18, 0, x_16); lean_ctor_set(x_18, 1, x_17); @@ -1033,21 +1033,21 @@ x_30 = lean_string_append(x_29, x_28); lean_dec(x_28); x_31 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_31, 0, x_30); -x_32 = l___private_init_lean_compiler_ir_format_4__formatCtorInfo(x_25); +x_32 = l___private_init_lean_compiler_ir_format_3__formatCtorInfo(x_25); x_33 = lean_unsigned_to_nat(0u); x_34 = lean_box(0); -x_35 = l_Array_miterateAux___main___at___private_init_lean_compiler_ir_format_5__formatExpr___spec__2(x_27, x_27, x_33, x_34); +x_35 = l_Array_miterateAux___main___at___private_init_lean_compiler_ir_format_4__formatExpr___spec__2(x_27, x_27, x_33, x_34); lean_dec(x_27); if (x_26 == 0) { uint8_t 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; x_36 = 0; -x_37 = l___private_init_lean_compiler_ir_format_5__formatExpr___closed__10; +x_37 = l___private_init_lean_compiler_ir_format_4__formatExpr___closed__10; x_38 = lean_alloc_ctor(4, 2, 1); lean_ctor_set(x_38, 0, x_37); lean_ctor_set(x_38, 1, x_31); lean_ctor_set_uint8(x_38, sizeof(void*)*2, x_36); -x_39 = l___private_init_lean_compiler_ir_format_5__formatExpr___closed__8; +x_39 = l___private_init_lean_compiler_ir_format_4__formatExpr___closed__8; x_40 = lean_alloc_ctor(4, 2, 1); lean_ctor_set(x_40, 0, x_38); lean_ctor_set(x_40, 1, x_39); @@ -1066,12 +1066,12 @@ else { uint8_t 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; x_43 = 0; -x_44 = l___private_init_lean_compiler_ir_format_5__formatExpr___closed__14; +x_44 = l___private_init_lean_compiler_ir_format_4__formatExpr___closed__14; x_45 = lean_alloc_ctor(4, 2, 1); lean_ctor_set(x_45, 0, x_44); lean_ctor_set(x_45, 1, x_31); lean_ctor_set_uint8(x_45, sizeof(void*)*2, x_43); -x_46 = l___private_init_lean_compiler_ir_format_5__formatExpr___closed__8; +x_46 = l___private_init_lean_compiler_ir_format_4__formatExpr___closed__8; x_47 = lean_alloc_ctor(4, 2, 1); lean_ctor_set(x_47, 0, x_45); lean_ctor_set(x_47, 1, x_46); @@ -1099,12 +1099,12 @@ x_52 = l_Nat_repr(x_50); x_53 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_53, 0, x_52); x_54 = 0; -x_55 = l___private_init_lean_compiler_ir_format_5__formatExpr___closed__16; +x_55 = l___private_init_lean_compiler_ir_format_4__formatExpr___closed__16; x_56 = lean_alloc_ctor(4, 2, 1); lean_ctor_set(x_56, 0, x_55); lean_ctor_set(x_56, 1, x_53); lean_ctor_set_uint8(x_56, sizeof(void*)*2, x_54); -x_57 = l___private_init_lean_compiler_ir_format_5__formatExpr___closed__4; +x_57 = l___private_init_lean_compiler_ir_format_4__formatExpr___closed__4; x_58 = lean_alloc_ctor(4, 2, 1); lean_ctor_set(x_58, 0, x_56); lean_ctor_set(x_58, 1, x_57); @@ -1133,12 +1133,12 @@ x_66 = l_Nat_repr(x_64); x_67 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_67, 0, x_66); x_68 = 0; -x_69 = l___private_init_lean_compiler_ir_format_5__formatExpr___closed__18; +x_69 = l___private_init_lean_compiler_ir_format_4__formatExpr___closed__18; x_70 = lean_alloc_ctor(4, 2, 1); lean_ctor_set(x_70, 0, x_69); lean_ctor_set(x_70, 1, x_67); lean_ctor_set_uint8(x_70, sizeof(void*)*2, x_68); -x_71 = l___private_init_lean_compiler_ir_format_5__formatExpr___closed__4; +x_71 = l___private_init_lean_compiler_ir_format_4__formatExpr___closed__4; x_72 = lean_alloc_ctor(4, 2, 1); lean_ctor_set(x_72, 0, x_70); lean_ctor_set(x_72, 1, x_71); @@ -1169,7 +1169,7 @@ x_81 = l_Nat_repr(x_78); x_82 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_82, 0, x_81); x_83 = 0; -x_84 = l___private_init_lean_compiler_ir_format_5__formatExpr___closed__20; +x_84 = l___private_init_lean_compiler_ir_format_4__formatExpr___closed__20; x_85 = lean_alloc_ctor(4, 2, 1); lean_ctor_set(x_85, 0, x_84); lean_ctor_set(x_85, 1, x_82); @@ -1186,7 +1186,7 @@ x_90 = lean_alloc_ctor(4, 2, 1); lean_ctor_set(x_90, 0, x_87); lean_ctor_set(x_90, 1, x_89); lean_ctor_set_uint8(x_90, sizeof(void*)*2, x_83); -x_91 = l___private_init_lean_compiler_ir_format_5__formatExpr___closed__4; +x_91 = l___private_init_lean_compiler_ir_format_4__formatExpr___closed__4; x_92 = lean_alloc_ctor(4, 2, 1); lean_ctor_set(x_92, 0, x_90); lean_ctor_set(x_92, 1, x_91); @@ -1217,7 +1217,7 @@ x_102 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_102, 0, x_101); x_103 = lean_unsigned_to_nat(0u); x_104 = lean_box(0); -x_105 = l_Array_miterateAux___main___at___private_init_lean_compiler_ir_format_5__formatExpr___spec__2(x_99, x_99, x_103, x_104); +x_105 = l_Array_miterateAux___main___at___private_init_lean_compiler_ir_format_4__formatExpr___spec__2(x_99, x_99, x_103, x_104); lean_dec(x_99); x_106 = 0; x_107 = lean_alloc_ctor(4, 2, 1); @@ -1239,14 +1239,14 @@ x_111 = l_Lean_Name_toStringWithSep___main(x_110, x_108); x_112 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_112, 0, x_111); x_113 = 0; -x_114 = l___private_init_lean_compiler_ir_format_5__formatExpr___closed__22; +x_114 = l___private_init_lean_compiler_ir_format_4__formatExpr___closed__22; x_115 = lean_alloc_ctor(4, 2, 1); lean_ctor_set(x_115, 0, x_114); lean_ctor_set(x_115, 1, x_112); lean_ctor_set_uint8(x_115, sizeof(void*)*2, x_113); x_116 = lean_unsigned_to_nat(0u); x_117 = lean_box(0); -x_118 = l_Array_miterateAux___main___at___private_init_lean_compiler_ir_format_5__formatExpr___spec__2(x_109, x_109, x_116, x_117); +x_118 = l_Array_miterateAux___main___at___private_init_lean_compiler_ir_format_4__formatExpr___spec__2(x_109, x_109, x_116, x_117); lean_dec(x_109); x_119 = lean_alloc_ctor(4, 2, 1); lean_ctor_set(x_119, 0, x_115); @@ -1269,14 +1269,14 @@ lean_dec(x_122); x_125 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_125, 0, x_124); x_126 = 0; -x_127 = l___private_init_lean_compiler_ir_format_5__formatExpr___closed__24; +x_127 = l___private_init_lean_compiler_ir_format_4__formatExpr___closed__24; x_128 = lean_alloc_ctor(4, 2, 1); lean_ctor_set(x_128, 0, x_127); lean_ctor_set(x_128, 1, x_125); lean_ctor_set_uint8(x_128, sizeof(void*)*2, x_126); x_129 = lean_unsigned_to_nat(0u); x_130 = lean_box(0); -x_131 = l_Array_miterateAux___main___at___private_init_lean_compiler_ir_format_5__formatExpr___spec__2(x_121, x_121, x_129, x_130); +x_131 = l_Array_miterateAux___main___at___private_init_lean_compiler_ir_format_4__formatExpr___spec__2(x_121, x_121, x_129, x_130); lean_dec(x_121); x_132 = lean_alloc_ctor(4, 2, 1); lean_ctor_set(x_132, 0, x_128); @@ -1297,7 +1297,7 @@ lean_dec(x_134); x_137 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_137, 0, x_136); x_138 = 0; -x_139 = l___private_init_lean_compiler_ir_format_5__formatExpr___closed__26; +x_139 = l___private_init_lean_compiler_ir_format_4__formatExpr___closed__26; x_140 = lean_alloc_ctor(4, 2, 1); lean_ctor_set(x_140, 0, x_139); lean_ctor_set(x_140, 1, x_137); @@ -1317,7 +1317,7 @@ lean_dec(x_142); x_145 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_145, 0, x_144); x_146 = 0; -x_147 = l___private_init_lean_compiler_ir_format_5__formatExpr___closed__28; +x_147 = l___private_init_lean_compiler_ir_format_4__formatExpr___closed__28; x_148 = lean_alloc_ctor(4, 2, 1); lean_ctor_set(x_148, 0, x_147); lean_ctor_set(x_148, 1, x_145); @@ -1330,7 +1330,7 @@ lean_object* x_149; lean_object* x_150; x_149 = lean_ctor_get(x_1, 0); lean_inc(x_149); lean_dec(x_1); -x_150 = l___private_init_lean_compiler_ir_format_3__formatLitVal(x_149); +x_150 = l___private_init_lean_compiler_ir_format_2__formatLitVal(x_149); return x_150; } case 12: @@ -1346,7 +1346,7 @@ lean_dec(x_152); x_155 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_155, 0, x_154); x_156 = 0; -x_157 = l___private_init_lean_compiler_ir_format_5__formatExpr___closed__30; +x_157 = l___private_init_lean_compiler_ir_format_4__formatExpr___closed__30; x_158 = lean_alloc_ctor(4, 2, 1); lean_ctor_set(x_158, 0, x_157); lean_ctor_set(x_158, 1, x_155); @@ -1366,7 +1366,7 @@ lean_dec(x_160); x_163 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_163, 0, x_162); x_164 = 0; -x_165 = l___private_init_lean_compiler_ir_format_5__formatExpr___closed__32; +x_165 = l___private_init_lean_compiler_ir_format_4__formatExpr___closed__32; x_166 = lean_alloc_ctor(4, 2, 1); lean_ctor_set(x_166, 0, x_165); lean_ctor_set(x_166, 1, x_163); @@ -1376,21 +1376,21 @@ return x_166; } } } -lean_object* l_Array_miterateAux___main___at___private_init_lean_compiler_ir_format_5__formatExpr___spec__2___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +lean_object* l_Array_miterateAux___main___at___private_init_lean_compiler_ir_format_4__formatExpr___spec__2___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { lean_object* x_5; -x_5 = l_Array_miterateAux___main___at___private_init_lean_compiler_ir_format_5__formatExpr___spec__2(x_1, x_2, x_3, x_4); +x_5 = l_Array_miterateAux___main___at___private_init_lean_compiler_ir_format_4__formatExpr___spec__2(x_1, x_2, x_3, x_4); lean_dec(x_2); lean_dec(x_1); return x_5; } } -lean_object* l___private_init_lean_compiler_ir_format_2__formatArray___at___private_init_lean_compiler_ir_format_5__formatExpr___spec__1___boxed(lean_object* x_1) { +lean_object* l_Lean_IR_formatArray___at___private_init_lean_compiler_ir_format_4__formatExpr___spec__1___boxed(lean_object* x_1) { _start: { lean_object* x_2; -x_2 = l___private_init_lean_compiler_ir_format_2__formatArray___at___private_init_lean_compiler_ir_format_5__formatExpr___spec__1(x_1); +x_2 = l_Lean_IR_formatArray___at___private_init_lean_compiler_ir_format_4__formatExpr___spec__1(x_1); lean_dec(x_1); return x_2; } @@ -1399,7 +1399,7 @@ lean_object* _init_l_Lean_IR_exprHasFormat___closed__1() { _start: { lean_object* x_1; -x_1 = lean_alloc_closure((void*)(l___private_init_lean_compiler_ir_format_5__formatExpr), 1, 0); +x_1 = lean_alloc_closure((void*)(l___private_init_lean_compiler_ir_format_4__formatExpr), 1, 0); return x_1; } } @@ -1415,13 +1415,13 @@ lean_object* l_Lean_IR_exprHasToString(lean_object* x_1) { _start: { lean_object* x_2; lean_object* x_3; lean_object* x_4; -x_2 = l___private_init_lean_compiler_ir_format_5__formatExpr(x_1); +x_2 = l___private_init_lean_compiler_ir_format_4__formatExpr(x_1); x_3 = l_Lean_Options_empty; x_4 = l_Lean_Format_pretty(x_2, x_3); return x_4; } } -lean_object* _init_l___private_init_lean_compiler_ir_format_6__formatIRType___closed__1() { +lean_object* _init_l___private_init_lean_compiler_ir_format_5__formatIRType___closed__1() { _start: { lean_object* x_1; @@ -1429,17 +1429,17 @@ x_1 = lean_mk_string("float"); return x_1; } } -lean_object* _init_l___private_init_lean_compiler_ir_format_6__formatIRType___closed__2() { +lean_object* _init_l___private_init_lean_compiler_ir_format_5__formatIRType___closed__2() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l___private_init_lean_compiler_ir_format_6__formatIRType___closed__1; +x_1 = l___private_init_lean_compiler_ir_format_5__formatIRType___closed__1; x_2 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -lean_object* _init_l___private_init_lean_compiler_ir_format_6__formatIRType___closed__3() { +lean_object* _init_l___private_init_lean_compiler_ir_format_5__formatIRType___closed__3() { _start: { lean_object* x_1; @@ -1447,17 +1447,17 @@ x_1 = lean_mk_string("u8"); return x_1; } } -lean_object* _init_l___private_init_lean_compiler_ir_format_6__formatIRType___closed__4() { +lean_object* _init_l___private_init_lean_compiler_ir_format_5__formatIRType___closed__4() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l___private_init_lean_compiler_ir_format_6__formatIRType___closed__3; +x_1 = l___private_init_lean_compiler_ir_format_5__formatIRType___closed__3; x_2 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -lean_object* _init_l___private_init_lean_compiler_ir_format_6__formatIRType___closed__5() { +lean_object* _init_l___private_init_lean_compiler_ir_format_5__formatIRType___closed__5() { _start: { lean_object* x_1; @@ -1465,17 +1465,17 @@ x_1 = lean_mk_string("u16"); return x_1; } } -lean_object* _init_l___private_init_lean_compiler_ir_format_6__formatIRType___closed__6() { +lean_object* _init_l___private_init_lean_compiler_ir_format_5__formatIRType___closed__6() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l___private_init_lean_compiler_ir_format_6__formatIRType___closed__5; +x_1 = l___private_init_lean_compiler_ir_format_5__formatIRType___closed__5; x_2 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -lean_object* _init_l___private_init_lean_compiler_ir_format_6__formatIRType___closed__7() { +lean_object* _init_l___private_init_lean_compiler_ir_format_5__formatIRType___closed__7() { _start: { lean_object* x_1; @@ -1483,17 +1483,17 @@ x_1 = lean_mk_string("u32"); return x_1; } } -lean_object* _init_l___private_init_lean_compiler_ir_format_6__formatIRType___closed__8() { +lean_object* _init_l___private_init_lean_compiler_ir_format_5__formatIRType___closed__8() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l___private_init_lean_compiler_ir_format_6__formatIRType___closed__7; +x_1 = l___private_init_lean_compiler_ir_format_5__formatIRType___closed__7; x_2 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -lean_object* _init_l___private_init_lean_compiler_ir_format_6__formatIRType___closed__9() { +lean_object* _init_l___private_init_lean_compiler_ir_format_5__formatIRType___closed__9() { _start: { lean_object* x_1; @@ -1501,17 +1501,17 @@ x_1 = lean_mk_string("u64"); return x_1; } } -lean_object* _init_l___private_init_lean_compiler_ir_format_6__formatIRType___closed__10() { +lean_object* _init_l___private_init_lean_compiler_ir_format_5__formatIRType___closed__10() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l___private_init_lean_compiler_ir_format_6__formatIRType___closed__9; +x_1 = l___private_init_lean_compiler_ir_format_5__formatIRType___closed__9; x_2 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -lean_object* _init_l___private_init_lean_compiler_ir_format_6__formatIRType___closed__11() { +lean_object* _init_l___private_init_lean_compiler_ir_format_5__formatIRType___closed__11() { _start: { lean_object* x_1; @@ -1519,17 +1519,17 @@ x_1 = lean_mk_string("usize"); return x_1; } } -lean_object* _init_l___private_init_lean_compiler_ir_format_6__formatIRType___closed__12() { +lean_object* _init_l___private_init_lean_compiler_ir_format_5__formatIRType___closed__12() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l___private_init_lean_compiler_ir_format_6__formatIRType___closed__11; +x_1 = l___private_init_lean_compiler_ir_format_5__formatIRType___closed__11; x_2 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -lean_object* _init_l___private_init_lean_compiler_ir_format_6__formatIRType___closed__13() { +lean_object* _init_l___private_init_lean_compiler_ir_format_5__formatIRType___closed__13() { _start: { lean_object* x_1; @@ -1537,17 +1537,17 @@ x_1 = lean_mk_string("obj"); return x_1; } } -lean_object* _init_l___private_init_lean_compiler_ir_format_6__formatIRType___closed__14() { +lean_object* _init_l___private_init_lean_compiler_ir_format_5__formatIRType___closed__14() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l___private_init_lean_compiler_ir_format_6__formatIRType___closed__13; +x_1 = l___private_init_lean_compiler_ir_format_5__formatIRType___closed__13; x_2 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -lean_object* _init_l___private_init_lean_compiler_ir_format_6__formatIRType___closed__15() { +lean_object* _init_l___private_init_lean_compiler_ir_format_5__formatIRType___closed__15() { _start: { lean_object* x_1; @@ -1555,54 +1555,54 @@ x_1 = lean_mk_string("tobj"); return x_1; } } -lean_object* _init_l___private_init_lean_compiler_ir_format_6__formatIRType___closed__16() { +lean_object* _init_l___private_init_lean_compiler_ir_format_5__formatIRType___closed__16() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l___private_init_lean_compiler_ir_format_6__formatIRType___closed__15; +x_1 = l___private_init_lean_compiler_ir_format_5__formatIRType___closed__15; x_2 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -lean_object* l___private_init_lean_compiler_ir_format_6__formatIRType(uint8_t x_1) { +lean_object* l___private_init_lean_compiler_ir_format_5__formatIRType(uint8_t x_1) { _start: { switch (x_1) { case 0: { lean_object* x_2; -x_2 = l___private_init_lean_compiler_ir_format_6__formatIRType___closed__2; +x_2 = l___private_init_lean_compiler_ir_format_5__formatIRType___closed__2; return x_2; } case 1: { lean_object* x_3; -x_3 = l___private_init_lean_compiler_ir_format_6__formatIRType___closed__4; +x_3 = l___private_init_lean_compiler_ir_format_5__formatIRType___closed__4; return x_3; } case 2: { lean_object* x_4; -x_4 = l___private_init_lean_compiler_ir_format_6__formatIRType___closed__6; +x_4 = l___private_init_lean_compiler_ir_format_5__formatIRType___closed__6; return x_4; } case 3: { lean_object* x_5; -x_5 = l___private_init_lean_compiler_ir_format_6__formatIRType___closed__8; +x_5 = l___private_init_lean_compiler_ir_format_5__formatIRType___closed__8; return x_5; } case 4: { lean_object* x_6; -x_6 = l___private_init_lean_compiler_ir_format_6__formatIRType___closed__10; +x_6 = l___private_init_lean_compiler_ir_format_5__formatIRType___closed__10; return x_6; } case 5: { lean_object* x_7; -x_7 = l___private_init_lean_compiler_ir_format_6__formatIRType___closed__12; +x_7 = l___private_init_lean_compiler_ir_format_5__formatIRType___closed__12; return x_7; } case 6: @@ -1614,25 +1614,25 @@ return x_8; case 7: { lean_object* x_9; -x_9 = l___private_init_lean_compiler_ir_format_6__formatIRType___closed__14; +x_9 = l___private_init_lean_compiler_ir_format_5__formatIRType___closed__14; return x_9; } default: { lean_object* x_10; -x_10 = l___private_init_lean_compiler_ir_format_6__formatIRType___closed__16; +x_10 = l___private_init_lean_compiler_ir_format_5__formatIRType___closed__16; return x_10; } } } } -lean_object* l___private_init_lean_compiler_ir_format_6__formatIRType___boxed(lean_object* x_1) { +lean_object* l___private_init_lean_compiler_ir_format_5__formatIRType___boxed(lean_object* x_1) { _start: { uint8_t x_2; lean_object* x_3; x_2 = lean_unbox(x_1); lean_dec(x_1); -x_3 = l___private_init_lean_compiler_ir_format_6__formatIRType(x_2); +x_3 = l___private_init_lean_compiler_ir_format_5__formatIRType(x_2); return x_3; } } @@ -1640,7 +1640,7 @@ lean_object* _init_l_Lean_IR_typeHasFormat___closed__1() { _start: { lean_object* x_1; -x_1 = lean_alloc_closure((void*)(l___private_init_lean_compiler_ir_format_6__formatIRType___boxed), 1, 0); +x_1 = lean_alloc_closure((void*)(l___private_init_lean_compiler_ir_format_5__formatIRType___boxed), 1, 0); return x_1; } } @@ -1652,7 +1652,7 @@ x_1 = l_Lean_IR_typeHasFormat___closed__1; return x_1; } } -lean_object* _init_l___private_init_lean_compiler_ir_format_7__formatParam___closed__1() { +lean_object* _init_l___private_init_lean_compiler_ir_format_6__formatParam___closed__1() { _start: { lean_object* x_1; @@ -1660,17 +1660,17 @@ x_1 = lean_mk_string(" : "); return x_1; } } -lean_object* _init_l___private_init_lean_compiler_ir_format_7__formatParam___closed__2() { +lean_object* _init_l___private_init_lean_compiler_ir_format_6__formatParam___closed__2() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l___private_init_lean_compiler_ir_format_7__formatParam___closed__1; +x_1 = l___private_init_lean_compiler_ir_format_6__formatParam___closed__1; x_2 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -lean_object* _init_l___private_init_lean_compiler_ir_format_7__formatParam___closed__3() { +lean_object* _init_l___private_init_lean_compiler_ir_format_6__formatParam___closed__3() { _start: { lean_object* x_1; @@ -1678,17 +1678,17 @@ x_1 = lean_mk_string("@& "); return x_1; } } -lean_object* _init_l___private_init_lean_compiler_ir_format_7__formatParam___closed__4() { +lean_object* _init_l___private_init_lean_compiler_ir_format_6__formatParam___closed__4() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l___private_init_lean_compiler_ir_format_7__formatParam___closed__3; +x_1 = l___private_init_lean_compiler_ir_format_6__formatParam___closed__3; x_2 = lean_alloc_ctor(2, 1, 0); lean_ctor_set(x_2, 0, x_1); return x_2; } } -lean_object* l___private_init_lean_compiler_ir_format_7__formatParam(lean_object* x_1) { +lean_object* l___private_init_lean_compiler_ir_format_6__formatParam(lean_object* x_1) { _start: { lean_object* x_2; uint8_t x_3; uint8_t x_4; lean_object* x_5; lean_object* x_6; 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; @@ -1709,12 +1709,12 @@ x_11 = lean_alloc_ctor(4, 2, 1); lean_ctor_set(x_11, 0, x_10); lean_ctor_set(x_11, 1, x_8); lean_ctor_set_uint8(x_11, sizeof(void*)*2, x_9); -x_12 = l___private_init_lean_compiler_ir_format_7__formatParam___closed__2; +x_12 = l___private_init_lean_compiler_ir_format_6__formatParam___closed__2; x_13 = lean_alloc_ctor(4, 2, 1); lean_ctor_set(x_13, 0, x_11); lean_ctor_set(x_13, 1, x_12); lean_ctor_set_uint8(x_13, sizeof(void*)*2, x_9); -x_14 = l___private_init_lean_compiler_ir_format_6__formatIRType(x_4); +x_14 = l___private_init_lean_compiler_ir_format_5__formatIRType(x_4); if (x_3 == 0) { lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; @@ -1737,7 +1737,7 @@ return x_19; else { lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; -x_20 = l___private_init_lean_compiler_ir_format_7__formatParam___closed__4; +x_20 = l___private_init_lean_compiler_ir_format_6__formatParam___closed__4; x_21 = lean_alloc_ctor(4, 2, 1); lean_ctor_set(x_21, 0, x_13); lean_ctor_set(x_21, 1, x_20); @@ -1759,7 +1759,7 @@ lean_object* _init_l_Lean_IR_paramHasFormat___closed__1() { _start: { lean_object* x_1; -x_1 = lean_alloc_closure((void*)(l___private_init_lean_compiler_ir_format_7__formatParam), 1, 0); +x_1 = lean_alloc_closure((void*)(l___private_init_lean_compiler_ir_format_6__formatParam), 1, 0); return x_1; } } @@ -1893,7 +1893,7 @@ x_10 = lean_alloc_ctor(4, 2, 1); lean_ctor_set(x_10, 0, x_4); lean_ctor_set(x_10, 1, x_9); lean_ctor_set_uint8(x_10, sizeof(void*)*2, x_8); -x_11 = l___private_init_lean_compiler_ir_format_7__formatParam(x_7); +x_11 = l___private_init_lean_compiler_ir_format_6__formatParam(x_7); x_12 = lean_alloc_ctor(4, 2, 1); lean_ctor_set(x_12, 0, x_10); lean_ctor_set(x_12, 1, x_11); @@ -1907,7 +1907,7 @@ goto _start; } } } -lean_object* l___private_init_lean_compiler_ir_format_2__formatArray___at_Lean_IR_formatParams___spec__1(lean_object* x_1) { +lean_object* l_Lean_IR_formatArray___at_Lean_IR_formatParams___spec__1(lean_object* x_1) { _start: { lean_object* x_2; lean_object* x_3; lean_object* x_4; @@ -1937,11 +1937,11 @@ lean_dec(x_1); return x_5; } } -lean_object* l___private_init_lean_compiler_ir_format_2__formatArray___at_Lean_IR_formatParams___spec__1___boxed(lean_object* x_1) { +lean_object* l_Lean_IR_formatArray___at_Lean_IR_formatParams___spec__1___boxed(lean_object* x_1) { _start: { lean_object* x_2; -x_2 = l___private_init_lean_compiler_ir_format_2__formatArray___at_Lean_IR_formatParams___spec__1(x_1); +x_2 = l_Lean_IR_formatArray___at_Lean_IR_formatParams___spec__1(x_1); lean_dec(x_1); return x_2; } @@ -2342,12 +2342,12 @@ x_11 = lean_alloc_ctor(4, 2, 1); lean_ctor_set(x_11, 0, x_10); lean_ctor_set(x_11, 1, x_8); lean_ctor_set_uint8(x_11, sizeof(void*)*2, x_9); -x_12 = l___private_init_lean_compiler_ir_format_7__formatParam___closed__2; +x_12 = l___private_init_lean_compiler_ir_format_6__formatParam___closed__2; x_13 = lean_alloc_ctor(4, 2, 1); lean_ctor_set(x_13, 0, x_11); lean_ctor_set(x_13, 1, x_12); lean_ctor_set_uint8(x_13, sizeof(void*)*2, x_9); -x_14 = l___private_init_lean_compiler_ir_format_6__formatIRType(x_3); +x_14 = l___private_init_lean_compiler_ir_format_5__formatIRType(x_3); x_15 = lean_alloc_ctor(4, 2, 1); lean_ctor_set(x_15, 0, x_13); lean_ctor_set(x_15, 1, x_14); @@ -2357,7 +2357,7 @@ x_17 = lean_alloc_ctor(4, 2, 1); lean_ctor_set(x_17, 0, x_15); lean_ctor_set(x_17, 1, x_16); lean_ctor_set_uint8(x_17, sizeof(void*)*2, x_9); -x_18 = l___private_init_lean_compiler_ir_format_5__formatExpr(x_4); +x_18 = l___private_init_lean_compiler_ir_format_4__formatExpr(x_4); x_19 = lean_alloc_ctor(4, 2, 1); lean_ctor_set(x_19, 0, x_17); lean_ctor_set(x_19, 1, x_18); @@ -2578,7 +2578,7 @@ x_110 = lean_alloc_ctor(4, 2, 1); lean_ctor_set(x_110, 0, x_108); lean_ctor_set(x_110, 1, x_109); lean_ctor_set_uint8(x_110, sizeof(void*)*2, x_96); -x_111 = l___private_init_lean_compiler_ir_format_6__formatIRType(x_91); +x_111 = l___private_init_lean_compiler_ir_format_5__formatIRType(x_91); x_112 = lean_alloc_ctor(4, 2, 1); lean_ctor_set(x_112, 0, x_110); lean_ctor_set(x_112, 1, x_111); @@ -2830,7 +2830,7 @@ lean_ctor_set(x_207, 1, x_204); lean_ctor_set_uint8(x_207, sizeof(void*)*2, x_205); x_208 = lean_unsigned_to_nat(0u); x_209 = lean_box(0); -x_210 = l_Array_miterateAux___main___at___private_init_lean_compiler_ir_format_5__formatExpr___spec__2(x_200, x_200, x_208, x_209); +x_210 = l_Array_miterateAux___main___at___private_init_lean_compiler_ir_format_4__formatExpr___spec__2(x_200, x_200, x_208, x_209); lean_dec(x_200); x_211 = lean_alloc_ctor(4, 2, 1); lean_ctor_set(x_211, 0, x_207); @@ -2969,12 +2969,12 @@ x_13 = lean_alloc_ctor(4, 2, 1); lean_ctor_set(x_13, 0, x_12); lean_ctor_set(x_13, 1, x_10); lean_ctor_set_uint8(x_13, sizeof(void*)*2, x_11); -x_14 = l___private_init_lean_compiler_ir_format_7__formatParam___closed__2; +x_14 = l___private_init_lean_compiler_ir_format_6__formatParam___closed__2; x_15 = lean_alloc_ctor(4, 2, 1); lean_ctor_set(x_15, 0, x_13); lean_ctor_set(x_15, 1, x_14); lean_ctor_set_uint8(x_15, sizeof(void*)*2, x_11); -x_16 = l___private_init_lean_compiler_ir_format_6__formatIRType(x_4); +x_16 = l___private_init_lean_compiler_ir_format_5__formatIRType(x_4); x_17 = lean_alloc_ctor(4, 2, 1); lean_ctor_set(x_17, 0, x_15); lean_ctor_set(x_17, 1, x_16); @@ -2984,7 +2984,7 @@ x_19 = lean_alloc_ctor(4, 2, 1); lean_ctor_set(x_19, 0, x_17); lean_ctor_set(x_19, 1, x_18); lean_ctor_set_uint8(x_19, sizeof(void*)*2, x_11); -x_20 = l___private_init_lean_compiler_ir_format_5__formatExpr(x_5); +x_20 = l___private_init_lean_compiler_ir_format_4__formatExpr(x_5); x_21 = lean_alloc_ctor(4, 2, 1); lean_ctor_set(x_21, 0, x_19); lean_ctor_set(x_21, 1, x_20); @@ -3306,7 +3306,7 @@ x_152 = lean_alloc_ctor(4, 2, 1); lean_ctor_set(x_152, 0, x_150); lean_ctor_set(x_152, 1, x_151); lean_ctor_set_uint8(x_152, sizeof(void*)*2, x_138); -x_153 = l___private_init_lean_compiler_ir_format_6__formatIRType(x_132); +x_153 = l___private_init_lean_compiler_ir_format_5__formatIRType(x_132); x_154 = lean_alloc_ctor(4, 2, 1); lean_ctor_set(x_154, 0, x_152); lean_ctor_set(x_154, 1, x_153); @@ -3628,12 +3628,12 @@ x_279 = lean_alloc_ctor(4, 2, 1); lean_ctor_set(x_279, 0, x_278); lean_ctor_set(x_279, 1, x_276); lean_ctor_set_uint8(x_279, sizeof(void*)*2, x_277); -x_280 = l___private_init_lean_compiler_ir_format_7__formatParam___closed__2; +x_280 = l___private_init_lean_compiler_ir_format_6__formatParam___closed__2; x_281 = lean_alloc_ctor(4, 2, 1); lean_ctor_set(x_281, 0, x_279); lean_ctor_set(x_281, 1, x_280); lean_ctor_set_uint8(x_281, sizeof(void*)*2, x_277); -x_282 = l___private_init_lean_compiler_ir_format_6__formatIRType(x_271); +x_282 = l___private_init_lean_compiler_ir_format_5__formatIRType(x_271); x_283 = lean_alloc_ctor(4, 2, 1); lean_ctor_set(x_283, 0, x_281); lean_ctor_set(x_283, 1, x_282); @@ -3692,7 +3692,7 @@ lean_ctor_set(x_303, 1, x_300); lean_ctor_set_uint8(x_303, sizeof(void*)*2, x_301); x_304 = lean_unsigned_to_nat(0u); x_305 = lean_box(0); -x_306 = l_Array_miterateAux___main___at___private_init_lean_compiler_ir_format_5__formatExpr___spec__2(x_296, x_296, x_304, x_305); +x_306 = l_Array_miterateAux___main___at___private_init_lean_compiler_ir_format_4__formatExpr___spec__2(x_296, x_296, x_304, x_305); lean_dec(x_296); x_307 = lean_alloc_ctor(4, 2, 1); lean_ctor_set(x_307, 0, x_303); @@ -3825,12 +3825,12 @@ x_16 = lean_alloc_ctor(4, 2, 1); lean_ctor_set(x_16, 0, x_12); lean_ctor_set(x_16, 1, x_15); lean_ctor_set_uint8(x_16, sizeof(void*)*2, x_10); -x_17 = l___private_init_lean_compiler_ir_format_7__formatParam___closed__2; +x_17 = l___private_init_lean_compiler_ir_format_6__formatParam___closed__2; x_18 = lean_alloc_ctor(4, 2, 1); lean_ctor_set(x_18, 0, x_16); lean_ctor_set(x_18, 1, x_17); lean_ctor_set_uint8(x_18, sizeof(void*)*2, x_10); -x_19 = l___private_init_lean_compiler_ir_format_6__formatIRType(x_5); +x_19 = l___private_init_lean_compiler_ir_format_5__formatIRType(x_5); x_20 = lean_alloc_ctor(4, 2, 1); lean_ctor_set(x_20, 0, x_18); lean_ctor_set(x_20, 1, x_19); @@ -3884,12 +3884,12 @@ x_40 = lean_alloc_ctor(4, 2, 1); lean_ctor_set(x_40, 0, x_36); lean_ctor_set(x_40, 1, x_39); lean_ctor_set_uint8(x_40, sizeof(void*)*2, x_34); -x_41 = l___private_init_lean_compiler_ir_format_7__formatParam___closed__2; +x_41 = l___private_init_lean_compiler_ir_format_6__formatParam___closed__2; x_42 = lean_alloc_ctor(4, 2, 1); lean_ctor_set(x_42, 0, x_40); lean_ctor_set(x_42, 1, x_41); lean_ctor_set_uint8(x_42, sizeof(void*)*2, x_34); -x_43 = l___private_init_lean_compiler_ir_format_6__formatIRType(x_30); +x_43 = l___private_init_lean_compiler_ir_format_5__formatIRType(x_30); x_44 = lean_alloc_ctor(4, 2, 1); lean_ctor_set(x_44, 0, x_42); lean_ctor_set(x_44, 1, x_43); @@ -3966,128 +3966,128 @@ l_Lean_IR_litValHasFormat___closed__1 = _init_l_Lean_IR_litValHasFormat___closed lean_mark_persistent(l_Lean_IR_litValHasFormat___closed__1); l_Lean_IR_litValHasFormat = _init_l_Lean_IR_litValHasFormat(); lean_mark_persistent(l_Lean_IR_litValHasFormat); -l___private_init_lean_compiler_ir_format_4__formatCtorInfo___closed__1 = _init_l___private_init_lean_compiler_ir_format_4__formatCtorInfo___closed__1(); -lean_mark_persistent(l___private_init_lean_compiler_ir_format_4__formatCtorInfo___closed__1); -l___private_init_lean_compiler_ir_format_4__formatCtorInfo___closed__2 = _init_l___private_init_lean_compiler_ir_format_4__formatCtorInfo___closed__2(); -lean_mark_persistent(l___private_init_lean_compiler_ir_format_4__formatCtorInfo___closed__2); -l___private_init_lean_compiler_ir_format_4__formatCtorInfo___closed__3 = _init_l___private_init_lean_compiler_ir_format_4__formatCtorInfo___closed__3(); -lean_mark_persistent(l___private_init_lean_compiler_ir_format_4__formatCtorInfo___closed__3); +l___private_init_lean_compiler_ir_format_3__formatCtorInfo___closed__1 = _init_l___private_init_lean_compiler_ir_format_3__formatCtorInfo___closed__1(); +lean_mark_persistent(l___private_init_lean_compiler_ir_format_3__formatCtorInfo___closed__1); +l___private_init_lean_compiler_ir_format_3__formatCtorInfo___closed__2 = _init_l___private_init_lean_compiler_ir_format_3__formatCtorInfo___closed__2(); +lean_mark_persistent(l___private_init_lean_compiler_ir_format_3__formatCtorInfo___closed__2); +l___private_init_lean_compiler_ir_format_3__formatCtorInfo___closed__3 = _init_l___private_init_lean_compiler_ir_format_3__formatCtorInfo___closed__3(); +lean_mark_persistent(l___private_init_lean_compiler_ir_format_3__formatCtorInfo___closed__3); l_Lean_IR_ctorInfoHasFormat___closed__1 = _init_l_Lean_IR_ctorInfoHasFormat___closed__1(); lean_mark_persistent(l_Lean_IR_ctorInfoHasFormat___closed__1); l_Lean_IR_ctorInfoHasFormat = _init_l_Lean_IR_ctorInfoHasFormat(); lean_mark_persistent(l_Lean_IR_ctorInfoHasFormat); -l___private_init_lean_compiler_ir_format_5__formatExpr___closed__1 = _init_l___private_init_lean_compiler_ir_format_5__formatExpr___closed__1(); -lean_mark_persistent(l___private_init_lean_compiler_ir_format_5__formatExpr___closed__1); -l___private_init_lean_compiler_ir_format_5__formatExpr___closed__2 = _init_l___private_init_lean_compiler_ir_format_5__formatExpr___closed__2(); -lean_mark_persistent(l___private_init_lean_compiler_ir_format_5__formatExpr___closed__2); -l___private_init_lean_compiler_ir_format_5__formatExpr___closed__3 = _init_l___private_init_lean_compiler_ir_format_5__formatExpr___closed__3(); -lean_mark_persistent(l___private_init_lean_compiler_ir_format_5__formatExpr___closed__3); -l___private_init_lean_compiler_ir_format_5__formatExpr___closed__4 = _init_l___private_init_lean_compiler_ir_format_5__formatExpr___closed__4(); -lean_mark_persistent(l___private_init_lean_compiler_ir_format_5__formatExpr___closed__4); -l___private_init_lean_compiler_ir_format_5__formatExpr___closed__5 = _init_l___private_init_lean_compiler_ir_format_5__formatExpr___closed__5(); -lean_mark_persistent(l___private_init_lean_compiler_ir_format_5__formatExpr___closed__5); -l___private_init_lean_compiler_ir_format_5__formatExpr___closed__6 = _init_l___private_init_lean_compiler_ir_format_5__formatExpr___closed__6(); -lean_mark_persistent(l___private_init_lean_compiler_ir_format_5__formatExpr___closed__6); -l___private_init_lean_compiler_ir_format_5__formatExpr___closed__7 = _init_l___private_init_lean_compiler_ir_format_5__formatExpr___closed__7(); -lean_mark_persistent(l___private_init_lean_compiler_ir_format_5__formatExpr___closed__7); -l___private_init_lean_compiler_ir_format_5__formatExpr___closed__8 = _init_l___private_init_lean_compiler_ir_format_5__formatExpr___closed__8(); -lean_mark_persistent(l___private_init_lean_compiler_ir_format_5__formatExpr___closed__8); -l___private_init_lean_compiler_ir_format_5__formatExpr___closed__9 = _init_l___private_init_lean_compiler_ir_format_5__formatExpr___closed__9(); -lean_mark_persistent(l___private_init_lean_compiler_ir_format_5__formatExpr___closed__9); -l___private_init_lean_compiler_ir_format_5__formatExpr___closed__10 = _init_l___private_init_lean_compiler_ir_format_5__formatExpr___closed__10(); -lean_mark_persistent(l___private_init_lean_compiler_ir_format_5__formatExpr___closed__10); -l___private_init_lean_compiler_ir_format_5__formatExpr___closed__11 = _init_l___private_init_lean_compiler_ir_format_5__formatExpr___closed__11(); -lean_mark_persistent(l___private_init_lean_compiler_ir_format_5__formatExpr___closed__11); -l___private_init_lean_compiler_ir_format_5__formatExpr___closed__12 = _init_l___private_init_lean_compiler_ir_format_5__formatExpr___closed__12(); -lean_mark_persistent(l___private_init_lean_compiler_ir_format_5__formatExpr___closed__12); -l___private_init_lean_compiler_ir_format_5__formatExpr___closed__13 = _init_l___private_init_lean_compiler_ir_format_5__formatExpr___closed__13(); -lean_mark_persistent(l___private_init_lean_compiler_ir_format_5__formatExpr___closed__13); -l___private_init_lean_compiler_ir_format_5__formatExpr___closed__14 = _init_l___private_init_lean_compiler_ir_format_5__formatExpr___closed__14(); -lean_mark_persistent(l___private_init_lean_compiler_ir_format_5__formatExpr___closed__14); -l___private_init_lean_compiler_ir_format_5__formatExpr___closed__15 = _init_l___private_init_lean_compiler_ir_format_5__formatExpr___closed__15(); -lean_mark_persistent(l___private_init_lean_compiler_ir_format_5__formatExpr___closed__15); -l___private_init_lean_compiler_ir_format_5__formatExpr___closed__16 = _init_l___private_init_lean_compiler_ir_format_5__formatExpr___closed__16(); -lean_mark_persistent(l___private_init_lean_compiler_ir_format_5__formatExpr___closed__16); -l___private_init_lean_compiler_ir_format_5__formatExpr___closed__17 = _init_l___private_init_lean_compiler_ir_format_5__formatExpr___closed__17(); -lean_mark_persistent(l___private_init_lean_compiler_ir_format_5__formatExpr___closed__17); -l___private_init_lean_compiler_ir_format_5__formatExpr___closed__18 = _init_l___private_init_lean_compiler_ir_format_5__formatExpr___closed__18(); -lean_mark_persistent(l___private_init_lean_compiler_ir_format_5__formatExpr___closed__18); -l___private_init_lean_compiler_ir_format_5__formatExpr___closed__19 = _init_l___private_init_lean_compiler_ir_format_5__formatExpr___closed__19(); -lean_mark_persistent(l___private_init_lean_compiler_ir_format_5__formatExpr___closed__19); -l___private_init_lean_compiler_ir_format_5__formatExpr___closed__20 = _init_l___private_init_lean_compiler_ir_format_5__formatExpr___closed__20(); -lean_mark_persistent(l___private_init_lean_compiler_ir_format_5__formatExpr___closed__20); -l___private_init_lean_compiler_ir_format_5__formatExpr___closed__21 = _init_l___private_init_lean_compiler_ir_format_5__formatExpr___closed__21(); -lean_mark_persistent(l___private_init_lean_compiler_ir_format_5__formatExpr___closed__21); -l___private_init_lean_compiler_ir_format_5__formatExpr___closed__22 = _init_l___private_init_lean_compiler_ir_format_5__formatExpr___closed__22(); -lean_mark_persistent(l___private_init_lean_compiler_ir_format_5__formatExpr___closed__22); -l___private_init_lean_compiler_ir_format_5__formatExpr___closed__23 = _init_l___private_init_lean_compiler_ir_format_5__formatExpr___closed__23(); -lean_mark_persistent(l___private_init_lean_compiler_ir_format_5__formatExpr___closed__23); -l___private_init_lean_compiler_ir_format_5__formatExpr___closed__24 = _init_l___private_init_lean_compiler_ir_format_5__formatExpr___closed__24(); -lean_mark_persistent(l___private_init_lean_compiler_ir_format_5__formatExpr___closed__24); -l___private_init_lean_compiler_ir_format_5__formatExpr___closed__25 = _init_l___private_init_lean_compiler_ir_format_5__formatExpr___closed__25(); -lean_mark_persistent(l___private_init_lean_compiler_ir_format_5__formatExpr___closed__25); -l___private_init_lean_compiler_ir_format_5__formatExpr___closed__26 = _init_l___private_init_lean_compiler_ir_format_5__formatExpr___closed__26(); -lean_mark_persistent(l___private_init_lean_compiler_ir_format_5__formatExpr___closed__26); -l___private_init_lean_compiler_ir_format_5__formatExpr___closed__27 = _init_l___private_init_lean_compiler_ir_format_5__formatExpr___closed__27(); -lean_mark_persistent(l___private_init_lean_compiler_ir_format_5__formatExpr___closed__27); -l___private_init_lean_compiler_ir_format_5__formatExpr___closed__28 = _init_l___private_init_lean_compiler_ir_format_5__formatExpr___closed__28(); -lean_mark_persistent(l___private_init_lean_compiler_ir_format_5__formatExpr___closed__28); -l___private_init_lean_compiler_ir_format_5__formatExpr___closed__29 = _init_l___private_init_lean_compiler_ir_format_5__formatExpr___closed__29(); -lean_mark_persistent(l___private_init_lean_compiler_ir_format_5__formatExpr___closed__29); -l___private_init_lean_compiler_ir_format_5__formatExpr___closed__30 = _init_l___private_init_lean_compiler_ir_format_5__formatExpr___closed__30(); -lean_mark_persistent(l___private_init_lean_compiler_ir_format_5__formatExpr___closed__30); -l___private_init_lean_compiler_ir_format_5__formatExpr___closed__31 = _init_l___private_init_lean_compiler_ir_format_5__formatExpr___closed__31(); -lean_mark_persistent(l___private_init_lean_compiler_ir_format_5__formatExpr___closed__31); -l___private_init_lean_compiler_ir_format_5__formatExpr___closed__32 = _init_l___private_init_lean_compiler_ir_format_5__formatExpr___closed__32(); -lean_mark_persistent(l___private_init_lean_compiler_ir_format_5__formatExpr___closed__32); +l___private_init_lean_compiler_ir_format_4__formatExpr___closed__1 = _init_l___private_init_lean_compiler_ir_format_4__formatExpr___closed__1(); +lean_mark_persistent(l___private_init_lean_compiler_ir_format_4__formatExpr___closed__1); +l___private_init_lean_compiler_ir_format_4__formatExpr___closed__2 = _init_l___private_init_lean_compiler_ir_format_4__formatExpr___closed__2(); +lean_mark_persistent(l___private_init_lean_compiler_ir_format_4__formatExpr___closed__2); +l___private_init_lean_compiler_ir_format_4__formatExpr___closed__3 = _init_l___private_init_lean_compiler_ir_format_4__formatExpr___closed__3(); +lean_mark_persistent(l___private_init_lean_compiler_ir_format_4__formatExpr___closed__3); +l___private_init_lean_compiler_ir_format_4__formatExpr___closed__4 = _init_l___private_init_lean_compiler_ir_format_4__formatExpr___closed__4(); +lean_mark_persistent(l___private_init_lean_compiler_ir_format_4__formatExpr___closed__4); +l___private_init_lean_compiler_ir_format_4__formatExpr___closed__5 = _init_l___private_init_lean_compiler_ir_format_4__formatExpr___closed__5(); +lean_mark_persistent(l___private_init_lean_compiler_ir_format_4__formatExpr___closed__5); +l___private_init_lean_compiler_ir_format_4__formatExpr___closed__6 = _init_l___private_init_lean_compiler_ir_format_4__formatExpr___closed__6(); +lean_mark_persistent(l___private_init_lean_compiler_ir_format_4__formatExpr___closed__6); +l___private_init_lean_compiler_ir_format_4__formatExpr___closed__7 = _init_l___private_init_lean_compiler_ir_format_4__formatExpr___closed__7(); +lean_mark_persistent(l___private_init_lean_compiler_ir_format_4__formatExpr___closed__7); +l___private_init_lean_compiler_ir_format_4__formatExpr___closed__8 = _init_l___private_init_lean_compiler_ir_format_4__formatExpr___closed__8(); +lean_mark_persistent(l___private_init_lean_compiler_ir_format_4__formatExpr___closed__8); +l___private_init_lean_compiler_ir_format_4__formatExpr___closed__9 = _init_l___private_init_lean_compiler_ir_format_4__formatExpr___closed__9(); +lean_mark_persistent(l___private_init_lean_compiler_ir_format_4__formatExpr___closed__9); +l___private_init_lean_compiler_ir_format_4__formatExpr___closed__10 = _init_l___private_init_lean_compiler_ir_format_4__formatExpr___closed__10(); +lean_mark_persistent(l___private_init_lean_compiler_ir_format_4__formatExpr___closed__10); +l___private_init_lean_compiler_ir_format_4__formatExpr___closed__11 = _init_l___private_init_lean_compiler_ir_format_4__formatExpr___closed__11(); +lean_mark_persistent(l___private_init_lean_compiler_ir_format_4__formatExpr___closed__11); +l___private_init_lean_compiler_ir_format_4__formatExpr___closed__12 = _init_l___private_init_lean_compiler_ir_format_4__formatExpr___closed__12(); +lean_mark_persistent(l___private_init_lean_compiler_ir_format_4__formatExpr___closed__12); +l___private_init_lean_compiler_ir_format_4__formatExpr___closed__13 = _init_l___private_init_lean_compiler_ir_format_4__formatExpr___closed__13(); +lean_mark_persistent(l___private_init_lean_compiler_ir_format_4__formatExpr___closed__13); +l___private_init_lean_compiler_ir_format_4__formatExpr___closed__14 = _init_l___private_init_lean_compiler_ir_format_4__formatExpr___closed__14(); +lean_mark_persistent(l___private_init_lean_compiler_ir_format_4__formatExpr___closed__14); +l___private_init_lean_compiler_ir_format_4__formatExpr___closed__15 = _init_l___private_init_lean_compiler_ir_format_4__formatExpr___closed__15(); +lean_mark_persistent(l___private_init_lean_compiler_ir_format_4__formatExpr___closed__15); +l___private_init_lean_compiler_ir_format_4__formatExpr___closed__16 = _init_l___private_init_lean_compiler_ir_format_4__formatExpr___closed__16(); +lean_mark_persistent(l___private_init_lean_compiler_ir_format_4__formatExpr___closed__16); +l___private_init_lean_compiler_ir_format_4__formatExpr___closed__17 = _init_l___private_init_lean_compiler_ir_format_4__formatExpr___closed__17(); +lean_mark_persistent(l___private_init_lean_compiler_ir_format_4__formatExpr___closed__17); +l___private_init_lean_compiler_ir_format_4__formatExpr___closed__18 = _init_l___private_init_lean_compiler_ir_format_4__formatExpr___closed__18(); +lean_mark_persistent(l___private_init_lean_compiler_ir_format_4__formatExpr___closed__18); +l___private_init_lean_compiler_ir_format_4__formatExpr___closed__19 = _init_l___private_init_lean_compiler_ir_format_4__formatExpr___closed__19(); +lean_mark_persistent(l___private_init_lean_compiler_ir_format_4__formatExpr___closed__19); +l___private_init_lean_compiler_ir_format_4__formatExpr___closed__20 = _init_l___private_init_lean_compiler_ir_format_4__formatExpr___closed__20(); +lean_mark_persistent(l___private_init_lean_compiler_ir_format_4__formatExpr___closed__20); +l___private_init_lean_compiler_ir_format_4__formatExpr___closed__21 = _init_l___private_init_lean_compiler_ir_format_4__formatExpr___closed__21(); +lean_mark_persistent(l___private_init_lean_compiler_ir_format_4__formatExpr___closed__21); +l___private_init_lean_compiler_ir_format_4__formatExpr___closed__22 = _init_l___private_init_lean_compiler_ir_format_4__formatExpr___closed__22(); +lean_mark_persistent(l___private_init_lean_compiler_ir_format_4__formatExpr___closed__22); +l___private_init_lean_compiler_ir_format_4__formatExpr___closed__23 = _init_l___private_init_lean_compiler_ir_format_4__formatExpr___closed__23(); +lean_mark_persistent(l___private_init_lean_compiler_ir_format_4__formatExpr___closed__23); +l___private_init_lean_compiler_ir_format_4__formatExpr___closed__24 = _init_l___private_init_lean_compiler_ir_format_4__formatExpr___closed__24(); +lean_mark_persistent(l___private_init_lean_compiler_ir_format_4__formatExpr___closed__24); +l___private_init_lean_compiler_ir_format_4__formatExpr___closed__25 = _init_l___private_init_lean_compiler_ir_format_4__formatExpr___closed__25(); +lean_mark_persistent(l___private_init_lean_compiler_ir_format_4__formatExpr___closed__25); +l___private_init_lean_compiler_ir_format_4__formatExpr___closed__26 = _init_l___private_init_lean_compiler_ir_format_4__formatExpr___closed__26(); +lean_mark_persistent(l___private_init_lean_compiler_ir_format_4__formatExpr___closed__26); +l___private_init_lean_compiler_ir_format_4__formatExpr___closed__27 = _init_l___private_init_lean_compiler_ir_format_4__formatExpr___closed__27(); +lean_mark_persistent(l___private_init_lean_compiler_ir_format_4__formatExpr___closed__27); +l___private_init_lean_compiler_ir_format_4__formatExpr___closed__28 = _init_l___private_init_lean_compiler_ir_format_4__formatExpr___closed__28(); +lean_mark_persistent(l___private_init_lean_compiler_ir_format_4__formatExpr___closed__28); +l___private_init_lean_compiler_ir_format_4__formatExpr___closed__29 = _init_l___private_init_lean_compiler_ir_format_4__formatExpr___closed__29(); +lean_mark_persistent(l___private_init_lean_compiler_ir_format_4__formatExpr___closed__29); +l___private_init_lean_compiler_ir_format_4__formatExpr___closed__30 = _init_l___private_init_lean_compiler_ir_format_4__formatExpr___closed__30(); +lean_mark_persistent(l___private_init_lean_compiler_ir_format_4__formatExpr___closed__30); +l___private_init_lean_compiler_ir_format_4__formatExpr___closed__31 = _init_l___private_init_lean_compiler_ir_format_4__formatExpr___closed__31(); +lean_mark_persistent(l___private_init_lean_compiler_ir_format_4__formatExpr___closed__31); +l___private_init_lean_compiler_ir_format_4__formatExpr___closed__32 = _init_l___private_init_lean_compiler_ir_format_4__formatExpr___closed__32(); +lean_mark_persistent(l___private_init_lean_compiler_ir_format_4__formatExpr___closed__32); l_Lean_IR_exprHasFormat___closed__1 = _init_l_Lean_IR_exprHasFormat___closed__1(); lean_mark_persistent(l_Lean_IR_exprHasFormat___closed__1); l_Lean_IR_exprHasFormat = _init_l_Lean_IR_exprHasFormat(); lean_mark_persistent(l_Lean_IR_exprHasFormat); -l___private_init_lean_compiler_ir_format_6__formatIRType___closed__1 = _init_l___private_init_lean_compiler_ir_format_6__formatIRType___closed__1(); -lean_mark_persistent(l___private_init_lean_compiler_ir_format_6__formatIRType___closed__1); -l___private_init_lean_compiler_ir_format_6__formatIRType___closed__2 = _init_l___private_init_lean_compiler_ir_format_6__formatIRType___closed__2(); -lean_mark_persistent(l___private_init_lean_compiler_ir_format_6__formatIRType___closed__2); -l___private_init_lean_compiler_ir_format_6__formatIRType___closed__3 = _init_l___private_init_lean_compiler_ir_format_6__formatIRType___closed__3(); -lean_mark_persistent(l___private_init_lean_compiler_ir_format_6__formatIRType___closed__3); -l___private_init_lean_compiler_ir_format_6__formatIRType___closed__4 = _init_l___private_init_lean_compiler_ir_format_6__formatIRType___closed__4(); -lean_mark_persistent(l___private_init_lean_compiler_ir_format_6__formatIRType___closed__4); -l___private_init_lean_compiler_ir_format_6__formatIRType___closed__5 = _init_l___private_init_lean_compiler_ir_format_6__formatIRType___closed__5(); -lean_mark_persistent(l___private_init_lean_compiler_ir_format_6__formatIRType___closed__5); -l___private_init_lean_compiler_ir_format_6__formatIRType___closed__6 = _init_l___private_init_lean_compiler_ir_format_6__formatIRType___closed__6(); -lean_mark_persistent(l___private_init_lean_compiler_ir_format_6__formatIRType___closed__6); -l___private_init_lean_compiler_ir_format_6__formatIRType___closed__7 = _init_l___private_init_lean_compiler_ir_format_6__formatIRType___closed__7(); -lean_mark_persistent(l___private_init_lean_compiler_ir_format_6__formatIRType___closed__7); -l___private_init_lean_compiler_ir_format_6__formatIRType___closed__8 = _init_l___private_init_lean_compiler_ir_format_6__formatIRType___closed__8(); -lean_mark_persistent(l___private_init_lean_compiler_ir_format_6__formatIRType___closed__8); -l___private_init_lean_compiler_ir_format_6__formatIRType___closed__9 = _init_l___private_init_lean_compiler_ir_format_6__formatIRType___closed__9(); -lean_mark_persistent(l___private_init_lean_compiler_ir_format_6__formatIRType___closed__9); -l___private_init_lean_compiler_ir_format_6__formatIRType___closed__10 = _init_l___private_init_lean_compiler_ir_format_6__formatIRType___closed__10(); -lean_mark_persistent(l___private_init_lean_compiler_ir_format_6__formatIRType___closed__10); -l___private_init_lean_compiler_ir_format_6__formatIRType___closed__11 = _init_l___private_init_lean_compiler_ir_format_6__formatIRType___closed__11(); -lean_mark_persistent(l___private_init_lean_compiler_ir_format_6__formatIRType___closed__11); -l___private_init_lean_compiler_ir_format_6__formatIRType___closed__12 = _init_l___private_init_lean_compiler_ir_format_6__formatIRType___closed__12(); -lean_mark_persistent(l___private_init_lean_compiler_ir_format_6__formatIRType___closed__12); -l___private_init_lean_compiler_ir_format_6__formatIRType___closed__13 = _init_l___private_init_lean_compiler_ir_format_6__formatIRType___closed__13(); -lean_mark_persistent(l___private_init_lean_compiler_ir_format_6__formatIRType___closed__13); -l___private_init_lean_compiler_ir_format_6__formatIRType___closed__14 = _init_l___private_init_lean_compiler_ir_format_6__formatIRType___closed__14(); -lean_mark_persistent(l___private_init_lean_compiler_ir_format_6__formatIRType___closed__14); -l___private_init_lean_compiler_ir_format_6__formatIRType___closed__15 = _init_l___private_init_lean_compiler_ir_format_6__formatIRType___closed__15(); -lean_mark_persistent(l___private_init_lean_compiler_ir_format_6__formatIRType___closed__15); -l___private_init_lean_compiler_ir_format_6__formatIRType___closed__16 = _init_l___private_init_lean_compiler_ir_format_6__formatIRType___closed__16(); -lean_mark_persistent(l___private_init_lean_compiler_ir_format_6__formatIRType___closed__16); +l___private_init_lean_compiler_ir_format_5__formatIRType___closed__1 = _init_l___private_init_lean_compiler_ir_format_5__formatIRType___closed__1(); +lean_mark_persistent(l___private_init_lean_compiler_ir_format_5__formatIRType___closed__1); +l___private_init_lean_compiler_ir_format_5__formatIRType___closed__2 = _init_l___private_init_lean_compiler_ir_format_5__formatIRType___closed__2(); +lean_mark_persistent(l___private_init_lean_compiler_ir_format_5__formatIRType___closed__2); +l___private_init_lean_compiler_ir_format_5__formatIRType___closed__3 = _init_l___private_init_lean_compiler_ir_format_5__formatIRType___closed__3(); +lean_mark_persistent(l___private_init_lean_compiler_ir_format_5__formatIRType___closed__3); +l___private_init_lean_compiler_ir_format_5__formatIRType___closed__4 = _init_l___private_init_lean_compiler_ir_format_5__formatIRType___closed__4(); +lean_mark_persistent(l___private_init_lean_compiler_ir_format_5__formatIRType___closed__4); +l___private_init_lean_compiler_ir_format_5__formatIRType___closed__5 = _init_l___private_init_lean_compiler_ir_format_5__formatIRType___closed__5(); +lean_mark_persistent(l___private_init_lean_compiler_ir_format_5__formatIRType___closed__5); +l___private_init_lean_compiler_ir_format_5__formatIRType___closed__6 = _init_l___private_init_lean_compiler_ir_format_5__formatIRType___closed__6(); +lean_mark_persistent(l___private_init_lean_compiler_ir_format_5__formatIRType___closed__6); +l___private_init_lean_compiler_ir_format_5__formatIRType___closed__7 = _init_l___private_init_lean_compiler_ir_format_5__formatIRType___closed__7(); +lean_mark_persistent(l___private_init_lean_compiler_ir_format_5__formatIRType___closed__7); +l___private_init_lean_compiler_ir_format_5__formatIRType___closed__8 = _init_l___private_init_lean_compiler_ir_format_5__formatIRType___closed__8(); +lean_mark_persistent(l___private_init_lean_compiler_ir_format_5__formatIRType___closed__8); +l___private_init_lean_compiler_ir_format_5__formatIRType___closed__9 = _init_l___private_init_lean_compiler_ir_format_5__formatIRType___closed__9(); +lean_mark_persistent(l___private_init_lean_compiler_ir_format_5__formatIRType___closed__9); +l___private_init_lean_compiler_ir_format_5__formatIRType___closed__10 = _init_l___private_init_lean_compiler_ir_format_5__formatIRType___closed__10(); +lean_mark_persistent(l___private_init_lean_compiler_ir_format_5__formatIRType___closed__10); +l___private_init_lean_compiler_ir_format_5__formatIRType___closed__11 = _init_l___private_init_lean_compiler_ir_format_5__formatIRType___closed__11(); +lean_mark_persistent(l___private_init_lean_compiler_ir_format_5__formatIRType___closed__11); +l___private_init_lean_compiler_ir_format_5__formatIRType___closed__12 = _init_l___private_init_lean_compiler_ir_format_5__formatIRType___closed__12(); +lean_mark_persistent(l___private_init_lean_compiler_ir_format_5__formatIRType___closed__12); +l___private_init_lean_compiler_ir_format_5__formatIRType___closed__13 = _init_l___private_init_lean_compiler_ir_format_5__formatIRType___closed__13(); +lean_mark_persistent(l___private_init_lean_compiler_ir_format_5__formatIRType___closed__13); +l___private_init_lean_compiler_ir_format_5__formatIRType___closed__14 = _init_l___private_init_lean_compiler_ir_format_5__formatIRType___closed__14(); +lean_mark_persistent(l___private_init_lean_compiler_ir_format_5__formatIRType___closed__14); +l___private_init_lean_compiler_ir_format_5__formatIRType___closed__15 = _init_l___private_init_lean_compiler_ir_format_5__formatIRType___closed__15(); +lean_mark_persistent(l___private_init_lean_compiler_ir_format_5__formatIRType___closed__15); +l___private_init_lean_compiler_ir_format_5__formatIRType___closed__16 = _init_l___private_init_lean_compiler_ir_format_5__formatIRType___closed__16(); +lean_mark_persistent(l___private_init_lean_compiler_ir_format_5__formatIRType___closed__16); l_Lean_IR_typeHasFormat___closed__1 = _init_l_Lean_IR_typeHasFormat___closed__1(); lean_mark_persistent(l_Lean_IR_typeHasFormat___closed__1); l_Lean_IR_typeHasFormat = _init_l_Lean_IR_typeHasFormat(); lean_mark_persistent(l_Lean_IR_typeHasFormat); -l___private_init_lean_compiler_ir_format_7__formatParam___closed__1 = _init_l___private_init_lean_compiler_ir_format_7__formatParam___closed__1(); -lean_mark_persistent(l___private_init_lean_compiler_ir_format_7__formatParam___closed__1); -l___private_init_lean_compiler_ir_format_7__formatParam___closed__2 = _init_l___private_init_lean_compiler_ir_format_7__formatParam___closed__2(); -lean_mark_persistent(l___private_init_lean_compiler_ir_format_7__formatParam___closed__2); -l___private_init_lean_compiler_ir_format_7__formatParam___closed__3 = _init_l___private_init_lean_compiler_ir_format_7__formatParam___closed__3(); -lean_mark_persistent(l___private_init_lean_compiler_ir_format_7__formatParam___closed__3); -l___private_init_lean_compiler_ir_format_7__formatParam___closed__4 = _init_l___private_init_lean_compiler_ir_format_7__formatParam___closed__4(); -lean_mark_persistent(l___private_init_lean_compiler_ir_format_7__formatParam___closed__4); +l___private_init_lean_compiler_ir_format_6__formatParam___closed__1 = _init_l___private_init_lean_compiler_ir_format_6__formatParam___closed__1(); +lean_mark_persistent(l___private_init_lean_compiler_ir_format_6__formatParam___closed__1); +l___private_init_lean_compiler_ir_format_6__formatParam___closed__2 = _init_l___private_init_lean_compiler_ir_format_6__formatParam___closed__2(); +lean_mark_persistent(l___private_init_lean_compiler_ir_format_6__formatParam___closed__2); +l___private_init_lean_compiler_ir_format_6__formatParam___closed__3 = _init_l___private_init_lean_compiler_ir_format_6__formatParam___closed__3(); +lean_mark_persistent(l___private_init_lean_compiler_ir_format_6__formatParam___closed__3); +l___private_init_lean_compiler_ir_format_6__formatParam___closed__4 = _init_l___private_init_lean_compiler_ir_format_6__formatParam___closed__4(); +lean_mark_persistent(l___private_init_lean_compiler_ir_format_6__formatParam___closed__4); l_Lean_IR_paramHasFormat___closed__1 = _init_l_Lean_IR_paramHasFormat___closed__1(); lean_mark_persistent(l_Lean_IR_paramHasFormat___closed__1); l_Lean_IR_paramHasFormat = _init_l_Lean_IR_paramHasFormat(); diff --git a/src/stage0/init/lean/compiler/ir/unreachbranches.c b/src/stage0/init/lean/compiler/ir/unreachbranches.c new file mode 100644 index 0000000000..481304626b --- /dev/null +++ b/src/stage0/init/lean/compiler/ir/unreachbranches.c @@ -0,0 +1,7528 @@ +// Lean compiler output +// Module: init.lean.compiler.ir.unreachbranches +// Imports: init.control.reader init.data.option.default init.lean.compiler.ir.format init.lean.compiler.ir.basic +#include "runtime/lean.h" +#if defined(__clang__) +#pragma clang diagnostic ignored "-Wunused-parameter" +#pragma clang diagnostic ignored "-Wunused-label" +#elif defined(__GNUC__) && !defined(__CLANG__) +#pragma GCC diagnostic ignored "-Wunused-parameter" +#pragma GCC diagnostic ignored "-Wunused-label" +#pragma GCC diagnostic ignored "-Wunused-but-set-variable" +#endif +#ifdef __cplusplus +extern "C" { +#endif +lean_object* l_Lean_IR_UnreachableBranches_inferMain___rarg(lean_object*, lean_object*); +lean_object* l_Array_miterateAux___main___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__16___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_unsafeCast(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_HashMapImp_find___at_Lean_IR_UnreachableBranches_getFunctionSummary___spec__5___boxed(lean_object*, lean_object*); +uint8_t l_Lean_IR_UnreachableBranches_Value_beq___main(lean_object*, lean_object*); +lean_object* l_Lean_IR_UnreachableBranches_Value_addChoice___main(lean_object*, lean_object*, lean_object*); +lean_object* l_PersistentArray_get_x21___at_Lean_IR_UnreachableBranches_interpExpr___spec__3___boxed(lean_object*, lean_object*); +lean_object* l_List_foldl___main___at_Lean_IR_UnreachableBranches_Value_merge___main___spec__2___closed__1; +lean_object* l_PersistentHashMap_findAtAux___main___at_Lean_IR_UnreachableBranches_getFunctionSummary___spec__4(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +uint8_t lean_name_dec_eq(lean_object*, lean_object*); +size_t l_USize_mul(size_t, size_t); +lean_object* l_Lean_IR_UnreachableBranches_interpFnBody___main(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_IR_UnreachableBranches_inferMain___boxed(lean_object*); +extern lean_object* l_Array_empty___closed__1; +lean_object* lean_nat_sub(lean_object*, lean_object*); +extern lean_object* l_Lean_registerEnvExtensionUnsafe___rarg___closed__2; +lean_object* l_Array_get_x21(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_panicWithPos___at_Lean_IR_UnreachableBranches_interpFnBody___main___spec__3(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_registerSimplePersistentEnvExtension___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__18(lean_object*, lean_object*); +extern lean_object* l_Lean_registerPersistentEnvExtensionUnsafe___rarg___closed__2; +lean_object* l_Array_mkArray(lean_object*, lean_object*, lean_object*); +lean_object* l_List_foldr___main___at_Lean_IR_UnreachableBranches_Value_beq___main___spec__2___boxed(lean_object*, lean_object*, lean_object*); +lean_object* l_PersistentHashMap_findAux___main___at_Lean_IR_UnreachableBranches_getFunctionSummary___spec__3___boxed(lean_object*, lean_object*, lean_object*); +uint8_t l_Lean_IR_UnreachableBranches_containsCtor(lean_object*, lean_object*); +lean_object* l_Nat_mfoldAux___main___at_Lean_IR_UnreachableBranches_updateJPParamsAssignment___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_IR_LocalContext_getJPBody(lean_object*, lean_object*); +lean_object* l_Lean_IR_UnreachableBranches_Value_Lean_HasFormat; +lean_object* l_HashMapImp_insert___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__6(lean_object*, lean_object*, lean_object*); +lean_object* l_Nat_foldAux___main___at_Lean_IR_UnreachableBranches_infer___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +extern lean_object* l_Lean_EnvExtension_Inhabited___rarg___closed__1; +lean_object* l_monadInhabited___rarg(lean_object*, lean_object*); +extern lean_object* l_PersistentHashMap_HasEmptyc___closed__1; +lean_object* l_Lean_IR_UnreachableBranches_Value_HasToString___closed__1; +lean_object* l_Lean_registerEnvExtensionUnsafe___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__21___closed__2; +size_t l_USize_shift__right(size_t, size_t); +lean_object* l_Lean_IR_UnreachableBranches_inferMain___rarg___boxed(lean_object*, lean_object*); +lean_object* l_Lean_IR_UnreachableBranches_Value_format___main___closed__3; +lean_object* l_panicWithPos___at_Lean_IR_UnreachableBranches_Value_addChoice___main___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_IR_UnreachableBranches_Value_format___main___closed__4; +lean_object* l_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___lambda__2(lean_object*, lean_object*); +lean_object* l_mkHashMap___at_Lean_IR_UnreachableBranches_updateVarAssignment___spec__1(lean_object*); +lean_object* l_PersistentHashMap_find___at_Lean_IR_UnreachableBranches_getFunctionSummary___spec__2(lean_object*, lean_object*); +extern lean_object* l_Lean_List_format___rarg___closed__1; +lean_object* l_Lean_mkStateFromImportedEntries___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__14___rarg(lean_object*, lean_object*); +lean_object* l_Array_miterateAux___main___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__15___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Format_joinSep___main___at_Lean_IR_UnreachableBranches_Value_format___main___spec__5(lean_object*, lean_object*); +lean_object* l_Lean_SMap_find___at_Lean_IR_UnreachableBranches_getFunctionSummary___spec__1___boxed(lean_object*, lean_object*); +lean_object* l_Function_comp___rarg(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_IR_FnBody_body(lean_object*); +lean_object* l_panicWithPos___at_Lean_IR_UnreachableBranches_interpFnBody___main___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___closed__3; +lean_object* l_Lean_IR_UnreachableBranches_functionSummariesExt___elambda__2___boxed(lean_object*); +lean_object* l_Lean_IR_UnreachableBranches_getFunctionSummary___boxed(lean_object*, lean_object*); +size_t l_USize_sub(size_t, size_t); +lean_object* l_PersistentArray_get_x21___at_Lean_IR_UnreachableBranches_interpExpr___spec__3(lean_object*, lean_object*); +lean_object* l_Array_miterateAux___main___at_Lean_IR_UnreachableBranches_Value_format___main___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_IR_UnreachableBranches_Value_HasBeq; +lean_object* l_Lean_IR_UnreachableBranches_findVarValue___boxed(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_registerEnvExtensionUnsafe___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__21___closed__1; +lean_object* l_Array_uget(lean_object*, lean_object*, size_t, lean_object*); +extern lean_object* l_Lean_registerPersistentEnvExtensionUnsafe___rarg___closed__4; +lean_object* l_Lean_Name_toStringWithSep___main(lean_object*, lean_object*); +lean_object* l_AssocList_mfoldl___main___at_Lean_IR_UnreachableBranches_updateVarAssignment___spec__6(lean_object*, lean_object*); +lean_object* l_Lean_IR_UnreachableBranches_updateJPParamsAssignment(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_SimplePersistentEnvExtension_getState___rarg(lean_object*, lean_object*); +lean_object* l_Lean_IR_UnreachableBranches_functionSummariesExt___elambda__4(lean_object*); +extern lean_object* l_List_Monad; +extern lean_object* l_Lean_Format_sbracket___closed__1; +lean_object* l_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___closed__2; +lean_object* l_Array_uset(lean_object*, lean_object*, size_t, lean_object*, lean_object*); +uint8_t l_List_foldr___main___at_Lean_IR_UnreachableBranches_Value_beq___main___spec__2(lean_object*, uint8_t, lean_object*); +lean_object* l_Array_findIdxAux___main___at_Lean_IR_UnreachableBranches_interpExpr___spec__2(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_fmt___at_Lean_IR_UnreachableBranches_Value_format___main___spec__3(lean_object*); +lean_object* l_Nat_mfoldAux___main___at_Lean_IR_UnreachableBranches_updateJPParamsAssignment___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, uint8_t, lean_object*, lean_object*); +lean_object* l_IO_Prim_Ref_set(lean_object*, lean_object*, lean_object*, lean_object*); +uint8_t l_Lean_IR_CtorInfo_beq(lean_object*, lean_object*); +uint8_t l_List_foldr___main___at_Lean_IR_UnreachableBranches_Value_beq___main___spec__3(lean_object*, uint8_t, lean_object*); +lean_object* l_Lean_IR_UnreachableBranches_containsCtor___main___boxed(lean_object*, lean_object*); +lean_object* l_PersistentHashMap_insert___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__2(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_IR_UnreachableBranches_projValue___main(lean_object*, lean_object*); +lean_object* l_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___lambda__1(lean_object*, lean_object*); +lean_object* l_Lean_registerSimplePersistentEnvExtension___rarg___lambda__2(lean_object*, lean_object*, lean_object*); +lean_object* l_PersistentHashMap_getCollisionNodeSize___rarg(lean_object*); +lean_object* l_Lean_registerSimplePersistentEnvExtension___rarg___lambda__3(lean_object*, lean_object*); +lean_object* l_Lean_IR_UnreachableBranches_functionSummariesExt___elambda__3___boxed(lean_object*, lean_object*); +lean_object* l_Lean_IR_UnreachableBranches_Value_Inhabited; +lean_object* lean_io_initializing(lean_object*); +lean_object* l_PersistentArray_modifyAux___main___at_Lean_IR_UnreachableBranches_updateCurrFnSummary___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_IR_UnreachableBranches_updateCurrFnSummary(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_IR_UnreachableBranches_Value_merge___main(lean_object*, lean_object*); +lean_object* l_List_foldl___main___at_Lean_IR_UnreachableBranches_projValue___main___spec__1___boxed(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_SMap_insert___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__1(lean_object*, lean_object*, lean_object*); +lean_object* l_PersistentHashMap_insertAux___main___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__3(lean_object*, size_t, size_t, lean_object*, lean_object*); +lean_object* l_Nat_repr(lean_object*); +lean_object* l_PersistentHashMap_mkCollisionNode___rarg(lean_object*, lean_object*, lean_object*, lean_object*); +extern lean_object* l_Lean_Format_sbracket___closed__2; +lean_object* l_Lean_IR_LocalContext_addJP(lean_object*, lean_object*, lean_object*, lean_object*); +uint8_t l_List_foldr___main___at_Lean_IR_UnreachableBranches_Value_beq___main___spec__4(lean_object*, uint8_t, lean_object*); +extern lean_object* l_panicWithPos___rarg___closed__3; +uint8_t l_Lean_IR_UnreachableBranches_containsCtor___main(lean_object*, lean_object*); +size_t lean_name_hash_usize(lean_object*); +lean_object* l_AssocList_contains___main___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__7___boxed(lean_object*, lean_object*); +extern lean_object* l_Lean_registerPersistentEnvExtensionUnsafe___rarg___closed__3; +lean_object* l_Lean_IR_UnreachableBranches_updateVarAssignment___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_IR_UnreachableBranches_infer(lean_object*, lean_object*); +uint8_t l_Array_isEqv___at_Lean_IR_UnreachableBranches_Value_beq___main___spec__1(lean_object*, lean_object*); +lean_object* l_Array_miterateAux___main___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__5(size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_IR_UnreachableBranches_inferMain___main___boxed(lean_object*); +lean_object* l_panicWithPos___at_Lean_IR_UnreachableBranches_interpFnBody___main___spec__3___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_AssocList_mfoldl___main___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__10(lean_object*, lean_object*); +lean_object* l_HashMapImp_moveEntries___main___at_Lean_IR_UnreachableBranches_updateVarAssignment___spec__5(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_IR_UnreachableBranches_findArgValue___boxed(lean_object*, lean_object*, lean_object*); +lean_object* lean_string_append(lean_object*, lean_object*); +lean_object* l_PersistentArray_modifyAux___main___at_Lean_IR_UnreachableBranches_updateCurrFnSummary___spec__2(lean_object*, lean_object*, size_t, size_t); +lean_object* l_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___closed__1; +extern lean_object* l_Lean_IR_Decl_Inhabited; +lean_object* l_Lean_IR_UnreachableBranches_functionSummariesExt; +size_t l_USize_add(size_t, size_t); +lean_object* l_Array_getD___rarg(lean_object*, lean_object*, lean_object*); +lean_object* l_PersistentHashMap_insertAtCollisionNodeAux___main___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__4(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_IR_UnreachableBranches_updateVarAssignment(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_registerSimplePersistentEnvExtension___rarg___lambda__1(lean_object*, lean_object*, lean_object*); +lean_object* l_AssocList_replace___main___at_Lean_IR_UnreachableBranches_updateVarAssignment___spec__7(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_IR_UnreachableBranches_Value_format(lean_object*); +lean_object* l_Array_ummapAux___main___at_Lean_IR_UnreachableBranches_infer___spec__1(lean_object*, lean_object*); +uint8_t lean_nat_dec_lt(lean_object*, lean_object*); +lean_object* l_HashMapImp_find___at_Lean_IR_UnreachableBranches_findVarValue___spec__1___boxed(lean_object*, lean_object*); +uint8_t l_AssocList_contains___main___at_Lean_IR_UnreachableBranches_updateVarAssignment___spec__3(lean_object*, lean_object*); +lean_object* l_Lean_SMap_switch___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__17(lean_object*); +lean_object* l_Array_anyMAux___main___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__20___boxed(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_IR_UnreachableBranches_functionSummariesExt___elambda__1___boxed(lean_object*); +lean_object* l_AssocList_replace___main___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__11(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_IR_UnreachableBranches_Value_addChoice___main___closed__1; +lean_object* l_PersistentArray_modify___at_Lean_IR_UnreachableBranches_updateCurrFnSummary___spec__1(lean_object*, lean_object*, lean_object*); +lean_object* lean_name_mk_string(lean_object*, lean_object*); +lean_object* l_mkHashMap___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__13(lean_object*); +lean_object* l_AssocList_find___main___at_Lean_IR_UnreachableBranches_findVarValue___spec__2___boxed(lean_object*, lean_object*); +lean_object* l_Lean_IR_UnreachableBranches_functionSummariesExt___closed__4; +lean_object* l_HashMapImp_insert___at_Lean_IR_UnreachableBranches_updateVarAssignment___spec__2(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___closed__5; +lean_object* l_Lean_IR_formatArray___at_Lean_IR_UnreachableBranches_Value_format___main___spec__1(lean_object*); +lean_object* l_PersistentHashMap_findAtAux___main___at_Lean_IR_UnreachableBranches_getFunctionSummary___spec__4___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_fmt___at_Lean_LevelToFormat_Level_toResult___main___spec__1(lean_object*); +lean_object* lean_nat_add(lean_object*, lean_object*); +lean_object* l_Lean_IR_UnreachableBranches_updateCurrFnSummary___boxed(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_IR_UnreachableBranches_functionSummariesExt___closed__8; +lean_object* l_Lean_List_format___at_Lean_IR_UnreachableBranches_Value_format___main___spec__4(lean_object*); +lean_object* l_Array_mforAux___main___at_Lean_IR_UnreachableBranches_interpFnBody___main___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___closed__4; +lean_object* l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__19(lean_object*, lean_object*); +lean_object* l_AssocList_contains___main___at_Lean_IR_UnreachableBranches_updateVarAssignment___spec__3___boxed(lean_object*, lean_object*); +uint8_t lean_nat_dec_eq(lean_object*, lean_object*); +extern lean_object* l_Lean_IR_paramInh; +lean_object* l_HashMapImp_expand___at_Lean_IR_UnreachableBranches_updateVarAssignment___spec__4(lean_object*, lean_object*); +lean_object* l_Array_push(lean_object*, lean_object*, lean_object*); +lean_object* l_PersistentHashMap_find___at_Lean_IR_UnreachableBranches_getFunctionSummary___spec__2___boxed(lean_object*, lean_object*); +lean_object* l_Lean_IR_UnreachableBranches_containsCtor___boxed(lean_object*, lean_object*); +extern lean_object* l_panicWithPos___rarg___closed__1; +uint8_t l_List_foldr___main___at_Lean_IR_UnreachableBranches_containsCtor___main___spec__1(lean_object*, uint8_t, lean_object*); +lean_object* l_Array_ummapAux___main___at_Lean_IR_UnreachableBranches_interpExpr___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +extern lean_object* l_Lean_Format_flatten___main___closed__1; +lean_object* l_Nat_mfoldAux___main___at_Lean_IR_UnreachableBranches_inferStep___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_findIdxAux___main___at_Lean_IR_UnreachableBranches_interpExpr___spec__2___boxed(lean_object*, lean_object*, lean_object*); +extern lean_object* l_Lean_registerSimplePersistentEnvExtension___rarg___closed__1; +lean_object* l_List_foldr___main___at_Lean_IR_UnreachableBranches_Value_beq___main___spec__5___boxed(lean_object*, lean_object*, lean_object*); +lean_object* l_List_foldl___main___at_Lean_IR_UnreachableBranches_projValue___main___spec__1(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_IR_UnreachableBranches_addFunctionSummary(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_IR_UnreachableBranches_inferMain___main___rarg(lean_object*, lean_object*); +extern size_t l_PersistentHashMap_insertAux___main___rarg___closed__2; +lean_object* l_Lean_IR_UnreachableBranches_inferMain(lean_object*); +lean_object* l_Lean_IR_UnreachableBranches_functionSummariesExt___closed__6; +lean_object* l_Lean_IR_LocalContext_getJPParams(lean_object*, lean_object*); +lean_object* l_PersistentArray_modify___at_Lean_IR_UnreachableBranches_updateCurrFnSummary___spec__1___boxed(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension(lean_object*); +extern lean_object* l_PersistentArray_getAux___main___rarg___closed__1; +uint8_t l_AssocList_contains___main___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__7(lean_object*, lean_object*); +lean_object* l_Lean_IR_UnreachableBranches_inferStep___boxed(lean_object*, lean_object*); +lean_object* l_Lean_SMap_find___at_Lean_IR_UnreachableBranches_getFunctionSummary___spec__1(lean_object*, lean_object*); +lean_object* l_Lean_IR_UnreachableBranches_functionSummariesExt___elambda__4___boxed(lean_object*); +lean_object* l_Lean_IR_UnreachableBranches_getFunctionSummary(lean_object*, lean_object*); +uint8_t l_Lean_IR_FnBody_isTerminal(lean_object*); +lean_object* l_Lean_IR_UnreachableBranches_functionSummariesExt___closed__1; +extern lean_object* l_PersistentArrayNode_Inhabited___closed__1; +lean_object* l_Lean_IR_UnreachableBranches_functionSummariesExt___elambda__3(lean_object*, lean_object*); +lean_object* l_Lean_SMap_empty___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__12___closed__2; +lean_object* l_Lean_IR_UnreachableBranches_projValue___boxed(lean_object*, lean_object*); +lean_object* l_EState_bind___rarg(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_IR_UnreachableBranches_functionSummariesExt___closed__2; +lean_object* l_panicWithPos___at_Lean_IR_UnreachableBranches_interpFnBody___main___spec__2(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_IR_UnreachableBranches_Value_format___main(lean_object*); +lean_object* l_Lean_IR_UnreachableBranches_updateJPParamsAssignment___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_IR_UnreachableBranches_inferMain___main(lean_object*); +extern lean_object* l_Lean_Format_sbracket___closed__3; +lean_object* l_Lean_IR_UnreachableBranches_Value_format___main___closed__2; +extern lean_object* l_System_FilePath_dirName___closed__1; +lean_object* l_panic(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_IR_UnreachableBranches_functionSummariesExt___closed__9; +lean_object* l_Lean_IR_Decl_name(lean_object*); +extern lean_object* l_Lean_HasRepr___closed__1; +lean_object* l_AssocList_find___main___at_Lean_IR_UnreachableBranches_getFunctionSummary___spec__6(lean_object*, lean_object*); +lean_object* l_Lean_IR_UnreachableBranches_Value_addChoice(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_PersistentEnvExtension_addEntry___rarg(lean_object*, lean_object*, lean_object*); +lean_object* l_IO_Prim_Ref_get(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_IR_UnreachableBranches_Value_HasBeq___closed__1; +lean_object* l_Lean_IR_UnreachableBranches_functionSummariesExt___elambda__2(lean_object*); +lean_object* l_AssocList_find___main___at_Lean_IR_UnreachableBranches_findVarValue___spec__2(lean_object*, lean_object*); +lean_object* l_Lean_IR_UnreachableBranches_Value_format___main___closed__6; +size_t lean_usize_modn(size_t, lean_object*); +lean_object* lean_format_group(lean_object*); +lean_object* l_mkPersistentArray___rarg(lean_object*, lean_object*); +lean_object* l_Array_ummapAux___main___at_Lean_IR_UnreachableBranches_interpExpr___spec__1(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Nat_mfoldAux___main___at_Lean_IR_UnreachableBranches_inferStep___spec__1(lean_object*, lean_object*, lean_object*, uint8_t, lean_object*, lean_object*); +uint8_t l_Array_anyMAux___main___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__20(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_IR_UnreachableBranches_Value_format___main___closed__1; +lean_object* l_PersistentArray_getAux___main___at_Lean_IR_UnreachableBranches_interpExpr___spec__4(lean_object*, size_t, size_t); +extern lean_object* l_HashMap_Inhabited___closed__1; +lean_object* l_Lean_IR_UnreachableBranches_findVarValue(lean_object*, lean_object*, lean_object*); +extern lean_object* l_Option_get_x21___rarg___closed__2; +extern lean_object* l_PersistentHashMap_insertAux___main___rarg___closed__3; +lean_object* l_Array_size(lean_object*, lean_object*); +lean_object* l_Lean_IR_UnreachableBranches_Value_addChoice___main___closed__2; +lean_object* l_Array_isEqv___at_Lean_IR_UnreachableBranches_Value_beq___main___spec__1___closed__1; +lean_object* l_AssocList_find___main___at_Lean_IR_UnreachableBranches_getFunctionSummary___spec__6___boxed(lean_object*, lean_object*); +lean_object* l_Lean_IR_UnreachableBranches_inferMain___main___rarg___boxed(lean_object*, lean_object*); +lean_object* l_Array_get(lean_object*, lean_object*, lean_object*); +lean_object* l_mkHashMapImp___rarg(lean_object*); +lean_object* l_Lean_IR_UnreachableBranches_findArgValue(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_IR_UnreachableBranches_interpExpr(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_mkStateFromImportedEntries___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__14(lean_object*); +lean_object* l_Lean_mkStateFromImportedEntries___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__14___rarg___boxed(lean_object*, lean_object*); +uint8_t l_Array_isEqvAux___main___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +extern lean_object* l_Lean_SMap_empty___at_Lean_Environment_Inhabited___spec__2___closed__1; +lean_object* l_List_foldr___main___at_Lean_IR_UnreachableBranches_Value_beq___main___spec__3___boxed(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_IR_UnreachableBranches_interpFnBody(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_IR_UnreachableBranches_Value_merge(lean_object*, lean_object*); +extern lean_object* l_Lean_registerPersistentEnvExtensionUnsafe___rarg___closed__1; +lean_object* l_Lean_SMap_empty___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__12; +lean_object* l_Array_miterateAux___main___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__16(lean_object*, lean_object*, lean_object*, lean_object*); +uint8_t lean_nat_dec_le(lean_object*, lean_object*); +lean_object* l_HashMapImp_find___at_Lean_IR_UnreachableBranches_findVarValue___spec__1(lean_object*, lean_object*); +size_t lean_usize_of_nat(lean_object*); +lean_object* l_Nat_foldAux___main___at_Lean_IR_UnreachableBranches_Value_merge___main___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_IR_UnreachableBranches_Value_beq___boxed(lean_object*, lean_object*); +lean_object* l_Lean_IR_UnreachableBranches_Value_format___main___closed__5; +lean_object* l_panicWithPos___at_Lean_IR_UnreachableBranches_Value_addChoice___main___spec__1___closed__1; +uint8_t l_USize_decLe(size_t, size_t); +lean_object* l_Nat_foldAux___main___at_Lean_IR_UnreachableBranches_Value_merge___main___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +extern lean_object* l_panicWithPos___rarg___closed__2; +lean_object* l_Lean_IR_UnreachableBranches_projValue___main___boxed(lean_object*, lean_object*); +lean_object* l_HashMapImp_expand___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__8(lean_object*, lean_object*); +size_t l_USize_shift__left(size_t, size_t); +lean_object* l_Lean_registerEnvExtensionUnsafe___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__21(lean_object*, lean_object*); +lean_object* l_Lean_IR_UnreachableBranches_functionSummariesExt___closed__3; +lean_object* l_Lean_IR_UnreachableBranches_functionSummariesExt___elambda__1(lean_object*); +lean_object* l_Array_set(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_PersistentArray_getAux___main___at_Lean_IR_UnreachableBranches_interpExpr___spec__4___boxed(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_SMap_empty___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__12___closed__1; +lean_object* l_Lean_IR_formatArray___at_Lean_IR_UnreachableBranches_Value_format___main___spec__1___boxed(lean_object*); +extern lean_object* l_Option_get_x21___rarg___closed__1; +lean_object* l_HashMapImp_find___at_Lean_IR_UnreachableBranches_getFunctionSummary___spec__5(lean_object*, lean_object*); +lean_object* l_panicWithPos___at_Lean_IR_UnreachableBranches_Value_addChoice___main___spec__1(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_IR_UnreachableBranches_functionSummariesExt___closed__5; +lean_object* l_Nat_foldAux___main___at_Lean_IR_UnreachableBranches_infer___spec__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +extern lean_object* l___private_init_lean_environment_8__persistentEnvExtensionsRef; +lean_object* l_Lean_IR_UnreachableBranches_Value_beq___main___boxed(lean_object*, lean_object*); +size_t l_USize_land(size_t, size_t); +lean_object* l_List_foldr___main___at_Lean_IR_UnreachableBranches_Value_beq___main___spec__4___boxed(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_IR_UnreachableBranches_Value_HasToString; +lean_object* l_Lean_IR_UnreachableBranches_Value_Lean_HasFormat___closed__1; +lean_object* l_Lean_IR_UnreachableBranches_inferStep(lean_object*, lean_object*); +lean_object* l_Lean_IR_UnreachableBranches_projValue(lean_object*, lean_object*); +lean_object* lean_usize_to_nat(size_t); +lean_object* l_List_foldr___main___at_Lean_IR_UnreachableBranches_containsCtor___main___spec__1___boxed(lean_object*, lean_object*, lean_object*); +lean_object* l_HashMapImp_moveEntries___main___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__9(lean_object*, lean_object*, lean_object*); +extern lean_object* l_Lean_List_format___rarg___closed__4; +lean_object* lean_nat_mul(lean_object*, lean_object*); +lean_object* l_PersistentHashMap_findAux___main___at_Lean_IR_UnreachableBranches_getFunctionSummary___spec__3(lean_object*, size_t, lean_object*); +lean_object* l_PersistentHashMap_insertAux___main___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__3___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +extern lean_object* l_Lean_registerEnvExtensionUnsafe___rarg___closed__1; +extern lean_object* l_Lean_regNamespacesExtension___closed__5; +lean_object* l_Lean_IR_UnreachableBranches_updateVarAssignment___closed__1; +lean_object* l_List_foldl___main___at_Lean_IR_UnreachableBranches_Value_merge___main___spec__2(lean_object*, lean_object*); +lean_object* l_Array_miterateAux___main___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__5___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_IO_Prim_Ref_reset(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_IR_UnreachableBranches_functionSummariesExt___elambda__4___rarg(lean_object*); +extern lean_object* l___private_init_lean_environment_5__envExtensionsRef; +lean_object* l_Array_miterateAux___main___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__15(lean_object*, lean_object*, lean_object*, lean_object*); +extern lean_object* l_Lean_IR_Arg_Inhabited; +lean_object* l_Lean_IR_UnreachableBranches_functionSummariesExt___closed__7; +extern lean_object* l_Lean_IR_Inhabited; +uint8_t l_Lean_IR_UnreachableBranches_Value_beq(lean_object*, lean_object*); +lean_object* l_Lean_IR_UnreachableBranches_interpExpr___boxed(lean_object*, lean_object*, lean_object*); +uint8_t l_List_foldr___main___at_Lean_IR_UnreachableBranches_Value_beq___main___spec__5(lean_object*, uint8_t, lean_object*); +lean_object* l_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___lambda__2___boxed(lean_object*, lean_object*); +lean_object* l_Array_miterateAux___main___at_Lean_IR_UnreachableBranches_Value_format___main___spec__2(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_mforAux___main___at_Lean_IR_UnreachableBranches_interpFnBody___main___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +extern lean_object* l_String_splitAux___main___closed__1; +lean_object* l_Array_isEqv___at_Lean_IR_UnreachableBranches_Value_beq___main___spec__1___boxed(lean_object*, lean_object*); +lean_object* l_Lean_mkStateFromImportedEntries___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__14___boxed(lean_object*); +lean_object* _init_l_Lean_IR_UnreachableBranches_Value_Inhabited() { +_start: +{ +lean_object* x_1; +x_1 = lean_box(1); +return x_1; +} +} +lean_object* _init_l_Array_isEqv___at_Lean_IR_UnreachableBranches_Value_beq___main___spec__1___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_IR_UnreachableBranches_Value_beq___main___boxed), 2, 0); +return x_1; +} +} +uint8_t l_Array_isEqv___at_Lean_IR_UnreachableBranches_Value_beq___main___spec__1(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; lean_object* x_4; uint8_t x_5; +x_3 = lean_array_get_size(x_1); +x_4 = lean_array_get_size(x_2); +x_5 = lean_nat_dec_eq(x_3, x_4); +lean_dec(x_4); +lean_dec(x_3); +if (x_5 == 0) +{ +uint8_t x_6; +x_6 = 0; +return x_6; +} +else +{ +lean_object* x_7; lean_object* x_8; uint8_t x_9; +x_7 = l_Array_isEqv___at_Lean_IR_UnreachableBranches_Value_beq___main___spec__1___closed__1; +x_8 = lean_unsigned_to_nat(0u); +x_9 = l_Array_isEqvAux___main___rarg(x_1, x_2, lean_box(0), x_7, x_8); +return x_9; +} +} +} +uint8_t l_List_foldr___main___at_Lean_IR_UnreachableBranches_Value_beq___main___spec__2(lean_object* x_1, uint8_t x_2, lean_object* x_3) { +_start: +{ +if (lean_obj_tag(x_3) == 0) +{ +return x_2; +} +else +{ +lean_object* x_4; lean_object* x_5; uint8_t x_6; uint8_t x_7; +x_4 = lean_ctor_get(x_3, 0); +x_5 = lean_ctor_get(x_3, 1); +x_6 = l_List_foldr___main___at_Lean_IR_UnreachableBranches_Value_beq___main___spec__2(x_1, x_2, x_5); +x_7 = l_Lean_IR_UnreachableBranches_Value_beq___main(x_1, x_4); +if (x_7 == 0) +{ +return x_6; +} +else +{ +uint8_t x_8; +x_8 = 1; +return x_8; +} +} +} +} +uint8_t l_List_foldr___main___at_Lean_IR_UnreachableBranches_Value_beq___main___spec__3(lean_object* x_1, uint8_t x_2, lean_object* x_3) { +_start: +{ +if (lean_obj_tag(x_3) == 0) +{ +return x_2; +} +else +{ +lean_object* x_4; lean_object* x_5; uint8_t x_6; uint8_t x_7; uint8_t x_8; +x_4 = lean_ctor_get(x_3, 0); +x_5 = lean_ctor_get(x_3, 1); +x_6 = l_List_foldr___main___at_Lean_IR_UnreachableBranches_Value_beq___main___spec__3(x_1, x_2, x_5); +x_7 = 0; +x_8 = l_List_foldr___main___at_Lean_IR_UnreachableBranches_Value_beq___main___spec__2(x_4, x_7, x_1); +if (x_8 == 0) +{ +uint8_t x_9; +x_9 = 0; +return x_9; +} +else +{ +return x_6; +} +} +} +} +uint8_t l_List_foldr___main___at_Lean_IR_UnreachableBranches_Value_beq___main___spec__4(lean_object* x_1, uint8_t x_2, lean_object* x_3) { +_start: +{ +if (lean_obj_tag(x_3) == 0) +{ +return x_2; +} +else +{ +lean_object* x_4; lean_object* x_5; uint8_t x_6; uint8_t x_7; +x_4 = lean_ctor_get(x_3, 0); +x_5 = lean_ctor_get(x_3, 1); +x_6 = l_List_foldr___main___at_Lean_IR_UnreachableBranches_Value_beq___main___spec__4(x_1, x_2, x_5); +x_7 = l_Lean_IR_UnreachableBranches_Value_beq___main(x_4, x_1); +if (x_7 == 0) +{ +return x_6; +} +else +{ +uint8_t x_8; +x_8 = 1; +return x_8; +} +} +} +} +uint8_t l_List_foldr___main___at_Lean_IR_UnreachableBranches_Value_beq___main___spec__5(lean_object* x_1, uint8_t x_2, lean_object* x_3) { +_start: +{ +if (lean_obj_tag(x_3) == 0) +{ +return x_2; +} +else +{ +lean_object* x_4; lean_object* x_5; uint8_t x_6; uint8_t x_7; uint8_t x_8; +x_4 = lean_ctor_get(x_3, 0); +x_5 = lean_ctor_get(x_3, 1); +x_6 = l_List_foldr___main___at_Lean_IR_UnreachableBranches_Value_beq___main___spec__5(x_1, x_2, x_5); +x_7 = 0; +x_8 = l_List_foldr___main___at_Lean_IR_UnreachableBranches_Value_beq___main___spec__4(x_4, x_7, x_1); +if (x_8 == 0) +{ +uint8_t x_9; +x_9 = 0; +return x_9; +} +else +{ +return x_6; +} +} +} +} +uint8_t l_Lean_IR_UnreachableBranches_Value_beq___main(lean_object* x_1, lean_object* x_2) { +_start: +{ +switch (lean_obj_tag(x_1)) { +case 0: +{ +if (lean_obj_tag(x_2) == 0) +{ +uint8_t x_3; +x_3 = 1; +return x_3; +} +else +{ +uint8_t x_4; +x_4 = 0; +return x_4; +} +} +case 1: +{ +if (lean_obj_tag(x_2) == 1) +{ +uint8_t x_5; +x_5 = 1; +return x_5; +} +else +{ +uint8_t x_6; +x_6 = 0; +return x_6; +} +} +case 2: +{ +if (lean_obj_tag(x_2) == 2) +{ +lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; uint8_t x_11; +x_7 = lean_ctor_get(x_1, 0); +x_8 = lean_ctor_get(x_1, 1); +x_9 = lean_ctor_get(x_2, 0); +x_10 = lean_ctor_get(x_2, 1); +x_11 = l_Lean_IR_CtorInfo_beq(x_7, x_9); +if (x_11 == 0) +{ +uint8_t x_12; +x_12 = 0; +return x_12; +} +else +{ +uint8_t x_13; +x_13 = l_Array_isEqv___at_Lean_IR_UnreachableBranches_Value_beq___main___spec__1(x_8, x_10); +return x_13; +} +} +else +{ +uint8_t x_14; +x_14 = 0; +return x_14; +} +} +default: +{ +if (lean_obj_tag(x_2) == 3) +{ +lean_object* x_15; lean_object* x_16; uint8_t x_17; uint8_t x_18; +x_15 = lean_ctor_get(x_1, 0); +x_16 = lean_ctor_get(x_2, 0); +x_17 = 1; +x_18 = l_List_foldr___main___at_Lean_IR_UnreachableBranches_Value_beq___main___spec__3(x_16, x_17, x_15); +if (x_18 == 0) +{ +uint8_t x_19; +x_19 = 0; +return x_19; +} +else +{ +uint8_t x_20; +x_20 = l_List_foldr___main___at_Lean_IR_UnreachableBranches_Value_beq___main___spec__5(x_15, x_17, x_16); +return x_20; +} +} +else +{ +uint8_t x_21; +x_21 = 0; +return x_21; +} +} +} +} +} +lean_object* l_Array_isEqv___at_Lean_IR_UnreachableBranches_Value_beq___main___spec__1___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +uint8_t x_3; lean_object* x_4; +x_3 = l_Array_isEqv___at_Lean_IR_UnreachableBranches_Value_beq___main___spec__1(x_1, x_2); +lean_dec(x_2); +lean_dec(x_1); +x_4 = lean_box(x_3); +return x_4; +} +} +lean_object* l_List_foldr___main___at_Lean_IR_UnreachableBranches_Value_beq___main___spec__2___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +uint8_t x_4; uint8_t x_5; lean_object* x_6; +x_4 = lean_unbox(x_2); +lean_dec(x_2); +x_5 = l_List_foldr___main___at_Lean_IR_UnreachableBranches_Value_beq___main___spec__2(x_1, x_4, x_3); +lean_dec(x_3); +lean_dec(x_1); +x_6 = lean_box(x_5); +return x_6; +} +} +lean_object* l_List_foldr___main___at_Lean_IR_UnreachableBranches_Value_beq___main___spec__3___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +uint8_t x_4; uint8_t x_5; lean_object* x_6; +x_4 = lean_unbox(x_2); +lean_dec(x_2); +x_5 = l_List_foldr___main___at_Lean_IR_UnreachableBranches_Value_beq___main___spec__3(x_1, x_4, x_3); +lean_dec(x_3); +lean_dec(x_1); +x_6 = lean_box(x_5); +return x_6; +} +} +lean_object* l_List_foldr___main___at_Lean_IR_UnreachableBranches_Value_beq___main___spec__4___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +uint8_t x_4; uint8_t x_5; lean_object* x_6; +x_4 = lean_unbox(x_2); +lean_dec(x_2); +x_5 = l_List_foldr___main___at_Lean_IR_UnreachableBranches_Value_beq___main___spec__4(x_1, x_4, x_3); +lean_dec(x_3); +lean_dec(x_1); +x_6 = lean_box(x_5); +return x_6; +} +} +lean_object* l_List_foldr___main___at_Lean_IR_UnreachableBranches_Value_beq___main___spec__5___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +uint8_t x_4; uint8_t x_5; lean_object* x_6; +x_4 = lean_unbox(x_2); +lean_dec(x_2); +x_5 = l_List_foldr___main___at_Lean_IR_UnreachableBranches_Value_beq___main___spec__5(x_1, x_4, x_3); +lean_dec(x_3); +lean_dec(x_1); +x_6 = lean_box(x_5); +return x_6; +} +} +lean_object* l_Lean_IR_UnreachableBranches_Value_beq___main___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +uint8_t x_3; lean_object* x_4; +x_3 = l_Lean_IR_UnreachableBranches_Value_beq___main(x_1, x_2); +lean_dec(x_2); +lean_dec(x_1); +x_4 = lean_box(x_3); +return x_4; +} +} +uint8_t l_Lean_IR_UnreachableBranches_Value_beq(lean_object* x_1, lean_object* x_2) { +_start: +{ +uint8_t x_3; +x_3 = l_Lean_IR_UnreachableBranches_Value_beq___main(x_1, x_2); +return x_3; +} +} +lean_object* l_Lean_IR_UnreachableBranches_Value_beq___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +uint8_t x_3; lean_object* x_4; +x_3 = l_Lean_IR_UnreachableBranches_Value_beq(x_1, x_2); +lean_dec(x_2); +lean_dec(x_1); +x_4 = lean_box(x_3); +return x_4; +} +} +lean_object* _init_l_Lean_IR_UnreachableBranches_Value_HasBeq___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_IR_UnreachableBranches_Value_beq___boxed), 2, 0); +return x_1; +} +} +lean_object* _init_l_Lean_IR_UnreachableBranches_Value_HasBeq() { +_start: +{ +lean_object* x_1; +x_1 = l_Lean_IR_UnreachableBranches_Value_HasBeq___closed__1; +return x_1; +} +} +lean_object* _init_l_panicWithPos___at_Lean_IR_UnreachableBranches_Value_addChoice___main___spec__1___closed__1() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_List_Monad; +x_2 = l_Lean_IR_UnreachableBranches_Value_Inhabited; +x_3 = l_monadInhabited___rarg(x_1, x_2); +return x_3; +} +} +lean_object* l_panicWithPos___at_Lean_IR_UnreachableBranches_Value_addChoice___main___spec__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; +x_5 = l_panicWithPos___rarg___closed__1; +x_6 = lean_string_append(x_5, x_1); +x_7 = l_panicWithPos___rarg___closed__2; +x_8 = lean_string_append(x_6, x_7); +x_9 = l_Nat_repr(x_2); +x_10 = lean_string_append(x_8, x_9); +lean_dec(x_9); +x_11 = l_panicWithPos___rarg___closed__2; +x_12 = lean_string_append(x_10, x_11); +x_13 = l_Nat_repr(x_3); +x_14 = lean_string_append(x_12, x_13); +lean_dec(x_13); +x_15 = l_panicWithPos___rarg___closed__3; +x_16 = lean_string_append(x_14, x_15); +x_17 = lean_string_append(x_16, x_4); +x_18 = l_panicWithPos___at_Lean_IR_UnreachableBranches_Value_addChoice___main___spec__1___closed__1; +x_19 = lean_panic_fn(x_17); +return x_19; +} +} +lean_object* _init_l_Lean_IR_UnreachableBranches_Value_addChoice___main___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("/Users/leonardodemoura/projects/lean4/library/init/lean/compiler/ir/unreachbranches.lean"); +return x_1; +} +} +lean_object* _init_l_Lean_IR_UnreachableBranches_Value_addChoice___main___closed__2() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("invalid addChoice"); +return x_1; +} +} +lean_object* l_Lean_IR_UnreachableBranches_Value_addChoice___main(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +if (lean_obj_tag(x_2) == 0) +{ +lean_object* x_4; +lean_dec(x_1); +x_4 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_4, 0, x_3); +lean_ctor_set(x_4, 1, x_2); +return x_4; +} +else +{ +lean_object* x_5; +x_5 = lean_ctor_get(x_2, 0); +lean_inc(x_5); +if (lean_obj_tag(x_5) == 2) +{ +if (lean_obj_tag(x_3) == 2) +{ +uint8_t x_6; +x_6 = !lean_is_exclusive(x_2); +if (x_6 == 0) +{ +lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; uint8_t x_11; +x_7 = lean_ctor_get(x_2, 1); +x_8 = lean_ctor_get(x_2, 0); +lean_dec(x_8); +x_9 = lean_ctor_get(x_5, 0); +lean_inc(x_9); +x_10 = lean_ctor_get(x_3, 0); +lean_inc(x_10); +x_11 = l_Lean_IR_CtorInfo_beq(x_9, x_10); +lean_dec(x_10); +lean_dec(x_9); +if (x_11 == 0) +{ +lean_object* x_12; +x_12 = l_Lean_IR_UnreachableBranches_Value_addChoice___main(x_1, x_7, x_3); +lean_ctor_set(x_2, 1, x_12); +return x_2; +} +else +{ +lean_object* x_13; +x_13 = lean_apply_2(x_1, x_5, x_3); +lean_ctor_set(x_2, 0, x_13); +return x_2; +} +} +else +{ +lean_object* x_14; lean_object* x_15; lean_object* x_16; uint8_t x_17; +x_14 = lean_ctor_get(x_2, 1); +lean_inc(x_14); +lean_dec(x_2); +x_15 = lean_ctor_get(x_5, 0); +lean_inc(x_15); +x_16 = lean_ctor_get(x_3, 0); +lean_inc(x_16); +x_17 = l_Lean_IR_CtorInfo_beq(x_15, x_16); +lean_dec(x_16); +lean_dec(x_15); +if (x_17 == 0) +{ +lean_object* x_18; lean_object* x_19; +x_18 = l_Lean_IR_UnreachableBranches_Value_addChoice___main(x_1, x_14, x_3); +x_19 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_19, 0, x_5); +lean_ctor_set(x_19, 1, x_18); +return x_19; +} +else +{ +lean_object* x_20; lean_object* x_21; +x_20 = lean_apply_2(x_1, x_5, x_3); +x_21 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_21, 0, x_20); +lean_ctor_set(x_21, 1, x_14); +return x_21; +} +} +} +else +{ +lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; +lean_dec(x_5); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_22 = l_Lean_IR_UnreachableBranches_Value_addChoice___main___closed__1; +x_23 = lean_unsigned_to_nat(44u); +x_24 = lean_unsigned_to_nat(10u); +x_25 = l_Lean_IR_UnreachableBranches_Value_addChoice___main___closed__2; +x_26 = l_panicWithPos___at_Lean_IR_UnreachableBranches_Value_addChoice___main___spec__1(x_22, x_23, x_24, x_25); +return x_26; +} +} +else +{ +lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; +lean_dec(x_5); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_27 = l_Lean_IR_UnreachableBranches_Value_addChoice___main___closed__1; +x_28 = lean_unsigned_to_nat(44u); +x_29 = lean_unsigned_to_nat(10u); +x_30 = l_Lean_IR_UnreachableBranches_Value_addChoice___main___closed__2; +x_31 = l_panicWithPos___at_Lean_IR_UnreachableBranches_Value_addChoice___main___spec__1(x_27, x_28, x_29, x_30); +return x_31; +} +} +} +} +lean_object* l_panicWithPos___at_Lean_IR_UnreachableBranches_Value_addChoice___main___spec__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; +x_5 = l_panicWithPos___at_Lean_IR_UnreachableBranches_Value_addChoice___main___spec__1(x_1, x_2, x_3, x_4); +lean_dec(x_4); +lean_dec(x_1); +return x_5; +} +} +lean_object* l_Lean_IR_UnreachableBranches_Value_addChoice(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; +x_4 = l_Lean_IR_UnreachableBranches_Value_addChoice___main(x_1, x_2, x_3); +return x_4; +} +} +lean_object* l_Nat_foldAux___main___at_Lean_IR_UnreachableBranches_Value_merge___main___spec__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { +_start: +{ +lean_object* x_6; uint8_t x_7; +x_6 = lean_unsigned_to_nat(0u); +x_7 = lean_nat_dec_eq(x_4, x_6); +if (x_7 == 0) +{ +lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; +x_8 = lean_unsigned_to_nat(1u); +x_9 = lean_nat_sub(x_4, x_8); +x_10 = lean_nat_sub(x_3, x_4); +lean_dec(x_4); +x_11 = l_Lean_IR_UnreachableBranches_Value_Inhabited; +x_12 = lean_array_get(x_11, x_1, x_10); +x_13 = lean_array_get(x_11, x_2, x_10); +lean_dec(x_10); +x_14 = l_Lean_IR_UnreachableBranches_Value_merge___main(x_12, x_13); +x_15 = lean_array_push(x_5, x_14); +x_4 = x_9; +x_5 = x_15; +goto _start; +} +else +{ +lean_dec(x_4); +return x_5; +} +} +} +lean_object* _init_l_List_foldl___main___at_Lean_IR_UnreachableBranches_Value_merge___main___spec__2___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_IR_UnreachableBranches_Value_merge___main), 2, 0); +return x_1; +} +} +lean_object* l_List_foldl___main___at_Lean_IR_UnreachableBranches_Value_merge___main___spec__2(lean_object* x_1, lean_object* x_2) { +_start: +{ +if (lean_obj_tag(x_2) == 0) +{ +return x_1; +} +else +{ +lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; +x_3 = lean_ctor_get(x_2, 0); +lean_inc(x_3); +x_4 = lean_ctor_get(x_2, 1); +lean_inc(x_4); +lean_dec(x_2); +x_5 = l_List_foldl___main___at_Lean_IR_UnreachableBranches_Value_merge___main___spec__2___closed__1; +x_6 = l_Lean_IR_UnreachableBranches_Value_addChoice___main(x_5, x_1, x_3); +x_1 = x_6; +x_2 = x_4; +goto _start; +} +} +} +lean_object* l_Lean_IR_UnreachableBranches_Value_merge___main(lean_object* x_1, lean_object* x_2) { +_start: +{ +switch (lean_obj_tag(x_1)) { +case 0: +{ +return x_2; +} +case 1: +{ +if (lean_obj_tag(x_2) == 1) +{ +return x_2; +} +else +{ +lean_dec(x_2); +return x_1; +} +} +case 2: +{ +switch (lean_obj_tag(x_2)) { +case 0: +{ +return x_1; +} +case 1: +{ +lean_dec(x_1); +return x_2; +} +case 2: +{ +lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; uint8_t x_7; +x_3 = lean_ctor_get(x_1, 0); +lean_inc(x_3); +x_4 = lean_ctor_get(x_1, 1); +lean_inc(x_4); +x_5 = lean_ctor_get(x_2, 0); +lean_inc(x_5); +x_6 = lean_ctor_get(x_2, 1); +lean_inc(x_6); +x_7 = l_Lean_IR_CtorInfo_beq(x_3, x_5); +lean_dec(x_5); +if (x_7 == 0) +{ +lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; +lean_dec(x_6); +lean_dec(x_4); +lean_dec(x_3); +x_8 = lean_box(0); +x_9 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_9, 0, x_2); +lean_ctor_set(x_9, 1, x_8); +x_10 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_10, 0, x_1); +lean_ctor_set(x_10, 1, x_9); +x_11 = lean_alloc_ctor(3, 1, 0); +lean_ctor_set(x_11, 0, x_10); +return x_11; +} +else +{ +uint8_t x_12; +lean_dec(x_1); +x_12 = !lean_is_exclusive(x_2); +if (x_12 == 0) +{ +lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; +x_13 = lean_ctor_get(x_2, 1); +lean_dec(x_13); +x_14 = lean_ctor_get(x_2, 0); +lean_dec(x_14); +x_15 = lean_array_get_size(x_4); +x_16 = l_Array_empty___closed__1; +lean_inc(x_15); +x_17 = l_Nat_foldAux___main___at_Lean_IR_UnreachableBranches_Value_merge___main___spec__1(x_4, x_6, x_15, x_15, x_16); +lean_dec(x_15); +lean_dec(x_6); +lean_dec(x_4); +lean_ctor_set(x_2, 1, x_17); +lean_ctor_set(x_2, 0, x_3); +return x_2; +} +else +{ +lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; +lean_dec(x_2); +x_18 = lean_array_get_size(x_4); +x_19 = l_Array_empty___closed__1; +lean_inc(x_18); +x_20 = l_Nat_foldAux___main___at_Lean_IR_UnreachableBranches_Value_merge___main___spec__1(x_4, x_6, x_18, x_18, x_19); +lean_dec(x_18); +lean_dec(x_6); +lean_dec(x_4); +x_21 = lean_alloc_ctor(2, 2, 0); +lean_ctor_set(x_21, 0, x_3); +lean_ctor_set(x_21, 1, x_20); +return x_21; +} +} +} +default: +{ +uint8_t x_22; +x_22 = !lean_is_exclusive(x_2); +if (x_22 == 0) +{ +lean_object* x_23; lean_object* x_24; lean_object* x_25; +x_23 = lean_ctor_get(x_2, 0); +x_24 = l_List_foldl___main___at_Lean_IR_UnreachableBranches_Value_merge___main___spec__2___closed__1; +x_25 = l_Lean_IR_UnreachableBranches_Value_addChoice___main(x_24, x_23, x_1); +lean_ctor_set(x_2, 0, x_25); +return x_2; +} +else +{ +lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; +x_26 = lean_ctor_get(x_2, 0); +lean_inc(x_26); +lean_dec(x_2); +x_27 = l_List_foldl___main___at_Lean_IR_UnreachableBranches_Value_merge___main___spec__2___closed__1; +x_28 = l_Lean_IR_UnreachableBranches_Value_addChoice___main(x_27, x_26, x_1); +x_29 = lean_alloc_ctor(3, 1, 0); +lean_ctor_set(x_29, 0, x_28); +return x_29; +} +} +} +} +default: +{ +switch (lean_obj_tag(x_2)) { +case 0: +{ +return x_1; +} +case 1: +{ +lean_dec(x_1); +return x_2; +} +case 2: +{ +uint8_t x_30; +x_30 = !lean_is_exclusive(x_1); +if (x_30 == 0) +{ +lean_object* x_31; lean_object* x_32; lean_object* x_33; +x_31 = lean_ctor_get(x_1, 0); +x_32 = l_List_foldl___main___at_Lean_IR_UnreachableBranches_Value_merge___main___spec__2___closed__1; +x_33 = l_Lean_IR_UnreachableBranches_Value_addChoice___main(x_32, x_31, x_2); +lean_ctor_set(x_1, 0, x_33); +return x_1; +} +else +{ +lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; +x_34 = lean_ctor_get(x_1, 0); +lean_inc(x_34); +lean_dec(x_1); +x_35 = l_List_foldl___main___at_Lean_IR_UnreachableBranches_Value_merge___main___spec__2___closed__1; +x_36 = l_Lean_IR_UnreachableBranches_Value_addChoice___main(x_35, x_34, x_2); +x_37 = lean_alloc_ctor(3, 1, 0); +lean_ctor_set(x_37, 0, x_36); +return x_37; +} +} +default: +{ +lean_object* x_38; uint8_t x_39; +x_38 = lean_ctor_get(x_1, 0); +lean_inc(x_38); +lean_dec(x_1); +x_39 = !lean_is_exclusive(x_2); +if (x_39 == 0) +{ +lean_object* x_40; lean_object* x_41; +x_40 = lean_ctor_get(x_2, 0); +x_41 = l_List_foldl___main___at_Lean_IR_UnreachableBranches_Value_merge___main___spec__2(x_40, x_38); +lean_ctor_set(x_2, 0, x_41); +return x_2; +} +else +{ +lean_object* x_42; lean_object* x_43; lean_object* x_44; +x_42 = lean_ctor_get(x_2, 0); +lean_inc(x_42); +lean_dec(x_2); +x_43 = l_List_foldl___main___at_Lean_IR_UnreachableBranches_Value_merge___main___spec__2(x_42, x_38); +x_44 = lean_alloc_ctor(3, 1, 0); +lean_ctor_set(x_44, 0, x_43); +return x_44; +} +} +} +} +} +} +} +lean_object* l_Nat_foldAux___main___at_Lean_IR_UnreachableBranches_Value_merge___main___spec__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { +_start: +{ +lean_object* x_6; +x_6 = l_Nat_foldAux___main___at_Lean_IR_UnreachableBranches_Value_merge___main___spec__1(x_1, x_2, x_3, x_4, x_5); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +return x_6; +} +} +lean_object* l_Lean_IR_UnreachableBranches_Value_merge(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = l_Lean_IR_UnreachableBranches_Value_merge___main(x_1, x_2); +return x_3; +} +} +lean_object* l_Array_miterateAux___main___at_Lean_IR_UnreachableBranches_Value_format___main___spec__2(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; uint8_t x_6; +x_5 = lean_array_get_size(x_2); +x_6 = lean_nat_dec_lt(x_3, x_5); +lean_dec(x_5); +if (x_6 == 0) +{ +lean_dec(x_3); +return x_4; +} +else +{ +lean_object* x_7; uint8_t x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; +x_7 = lean_array_fget(x_2, x_3); +x_8 = 0; +x_9 = l_Lean_Format_flatten___main___closed__1; +x_10 = lean_alloc_ctor(4, 2, 1); +lean_ctor_set(x_10, 0, x_4); +lean_ctor_set(x_10, 1, x_9); +lean_ctor_set_uint8(x_10, sizeof(void*)*2, x_8); +x_11 = l_Lean_IR_UnreachableBranches_Value_format___main(x_7); +x_12 = lean_alloc_ctor(4, 2, 1); +lean_ctor_set(x_12, 0, x_10); +lean_ctor_set(x_12, 1, x_11); +lean_ctor_set_uint8(x_12, sizeof(void*)*2, x_8); +x_13 = lean_unsigned_to_nat(1u); +x_14 = lean_nat_add(x_3, x_13); +lean_dec(x_3); +x_3 = x_14; +x_4 = x_12; +goto _start; +} +} +} +lean_object* l_Lean_IR_formatArray___at_Lean_IR_UnreachableBranches_Value_format___main___spec__1(lean_object* x_1) { +_start: +{ +lean_object* x_2; lean_object* x_3; lean_object* x_4; +x_2 = lean_unsigned_to_nat(0u); +x_3 = lean_box(0); +x_4 = l_Array_miterateAux___main___at_Lean_IR_UnreachableBranches_Value_format___main___spec__2(x_1, x_1, x_2, x_3); +return x_4; +} +} +lean_object* l_Lean_fmt___at_Lean_IR_UnreachableBranches_Value_format___main___spec__3(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* l_Lean_Format_joinSep___main___at_Lean_IR_UnreachableBranches_Value_format___main___spec__5(lean_object* x_1, lean_object* x_2) { +_start: +{ +if (lean_obj_tag(x_1) == 0) +{ +lean_object* x_3; +lean_dec(x_2); +x_3 = lean_box(0); +return x_3; +} +else +{ +lean_object* x_4; +x_4 = lean_ctor_get(x_1, 1); +lean_inc(x_4); +if (lean_obj_tag(x_4) == 0) +{ +lean_object* x_5; lean_object* x_6; +lean_dec(x_2); +x_5 = lean_ctor_get(x_1, 0); +lean_inc(x_5); +lean_dec(x_1); +x_6 = l_Lean_IR_UnreachableBranches_Value_format___main(x_5); +return x_6; +} +else +{ +lean_object* x_7; lean_object* x_8; uint8_t x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; +x_7 = lean_ctor_get(x_1, 0); +lean_inc(x_7); +lean_dec(x_1); +x_8 = l_Lean_IR_UnreachableBranches_Value_format___main(x_7); +x_9 = 0; +lean_inc(x_2); +x_10 = lean_alloc_ctor(4, 2, 1); +lean_ctor_set(x_10, 0, x_8); +lean_ctor_set(x_10, 1, x_2); +lean_ctor_set_uint8(x_10, sizeof(void*)*2, x_9); +x_11 = l_Lean_Format_joinSep___main___at_Lean_IR_UnreachableBranches_Value_format___main___spec__5(x_4, x_2); +x_12 = lean_alloc_ctor(4, 2, 1); +lean_ctor_set(x_12, 0, x_10); +lean_ctor_set(x_12, 1, x_11); +lean_ctor_set_uint8(x_12, sizeof(void*)*2, x_9); +return x_12; +} +} +} +} +lean_object* l_Lean_List_format___at_Lean_IR_UnreachableBranches_Value_format___main___spec__4(lean_object* x_1) { +_start: +{ +if (lean_obj_tag(x_1) == 0) +{ +lean_object* x_2; +x_2 = l_Lean_List_format___rarg___closed__1; +return x_2; +} +else +{ +lean_object* x_3; lean_object* x_4; uint8_t x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; +x_3 = l_Lean_List_format___rarg___closed__4; +x_4 = l_Lean_Format_joinSep___main___at_Lean_IR_UnreachableBranches_Value_format___main___spec__5(x_1, x_3); +x_5 = 0; +x_6 = l_Lean_Format_sbracket___closed__2; +x_7 = lean_alloc_ctor(4, 2, 1); +lean_ctor_set(x_7, 0, x_6); +lean_ctor_set(x_7, 1, x_4); +lean_ctor_set_uint8(x_7, sizeof(void*)*2, x_5); +x_8 = l_Lean_Format_sbracket___closed__3; +x_9 = lean_alloc_ctor(4, 2, 1); +lean_ctor_set(x_9, 0, x_7); +lean_ctor_set(x_9, 1, x_8); +lean_ctor_set_uint8(x_9, sizeof(void*)*2, x_5); +x_10 = l_Lean_Format_sbracket___closed__1; +x_11 = lean_alloc_ctor(3, 2, 0); +lean_ctor_set(x_11, 0, x_10); +lean_ctor_set(x_11, 1, x_9); +x_12 = lean_format_group(x_11); +return x_12; +} +} +} +lean_object* _init_l_Lean_IR_UnreachableBranches_Value_format___main___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("bot"); +return x_1; +} +} +lean_object* _init_l_Lean_IR_UnreachableBranches_Value_format___main___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_IR_UnreachableBranches_Value_format___main___closed__1; +x_2 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* _init_l_Lean_IR_UnreachableBranches_Value_format___main___closed__3() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("top"); +return x_1; +} +} +lean_object* _init_l_Lean_IR_UnreachableBranches_Value_format___main___closed__4() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_IR_UnreachableBranches_Value_format___main___closed__3; +x_2 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* _init_l_Lean_IR_UnreachableBranches_Value_format___main___closed__5() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("@"); +return x_1; +} +} +lean_object* _init_l_Lean_IR_UnreachableBranches_Value_format___main___closed__6() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_IR_UnreachableBranches_Value_format___main___closed__5; +x_2 = lean_alloc_ctor(2, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* l_Lean_IR_UnreachableBranches_Value_format___main(lean_object* x_1) { +_start: +{ +switch (lean_obj_tag(x_1)) { +case 0: +{ +lean_object* x_2; +x_2 = l_Lean_IR_UnreachableBranches_Value_format___main___closed__2; +return x_2; +} +case 1: +{ +lean_object* x_3; +x_3 = l_Lean_IR_UnreachableBranches_Value_format___main___closed__4; +return x_3; +} +case 2: +{ +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; uint8_t x_11; lean_object* x_12; +x_4 = lean_ctor_get(x_1, 0); +lean_inc(x_4); +x_5 = lean_ctor_get(x_1, 1); +lean_inc(x_5); +lean_dec(x_1); +x_6 = lean_ctor_get(x_4, 0); +lean_inc(x_6); +lean_dec(x_4); +x_7 = l_Lean_fmt___at_Lean_LevelToFormat_Level_toResult___main___spec__1(x_6); +x_8 = lean_unsigned_to_nat(0u); +x_9 = lean_box(0); +x_10 = l_Array_miterateAux___main___at_Lean_IR_UnreachableBranches_Value_format___main___spec__2(x_5, x_5, x_8, x_9); +lean_dec(x_5); +x_11 = 0; +x_12 = lean_alloc_ctor(4, 2, 1); +lean_ctor_set(x_12, 0, x_7); +lean_ctor_set(x_12, 1, x_10); +lean_ctor_set_uint8(x_12, sizeof(void*)*2, x_11); +return x_12; +} +default: +{ +lean_object* x_13; lean_object* x_14; uint8_t x_15; lean_object* x_16; lean_object* x_17; +x_13 = lean_ctor_get(x_1, 0); +lean_inc(x_13); +lean_dec(x_1); +x_14 = l_Lean_List_format___at_Lean_IR_UnreachableBranches_Value_format___main___spec__4(x_13); +x_15 = 0; +x_16 = l_Lean_IR_UnreachableBranches_Value_format___main___closed__6; +x_17 = lean_alloc_ctor(4, 2, 1); +lean_ctor_set(x_17, 0, x_16); +lean_ctor_set(x_17, 1, x_14); +lean_ctor_set_uint8(x_17, sizeof(void*)*2, x_15); +return x_17; +} +} +} +} +lean_object* l_Array_miterateAux___main___at_Lean_IR_UnreachableBranches_Value_format___main___spec__2___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; +x_5 = l_Array_miterateAux___main___at_Lean_IR_UnreachableBranches_Value_format___main___spec__2(x_1, x_2, x_3, x_4); +lean_dec(x_2); +lean_dec(x_1); +return x_5; +} +} +lean_object* l_Lean_IR_formatArray___at_Lean_IR_UnreachableBranches_Value_format___main___spec__1___boxed(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = l_Lean_IR_formatArray___at_Lean_IR_UnreachableBranches_Value_format___main___spec__1(x_1); +lean_dec(x_1); +return x_2; +} +} +lean_object* l_Lean_IR_UnreachableBranches_Value_format(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = l_Lean_IR_UnreachableBranches_Value_format___main(x_1); +return x_2; +} +} +lean_object* _init_l_Lean_IR_UnreachableBranches_Value_Lean_HasFormat___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_IR_UnreachableBranches_Value_format), 1, 0); +return x_1; +} +} +lean_object* _init_l_Lean_IR_UnreachableBranches_Value_Lean_HasFormat() { +_start: +{ +lean_object* x_1; +x_1 = l_Lean_IR_UnreachableBranches_Value_Lean_HasFormat___closed__1; +return x_1; +} +} +lean_object* _init_l_Lean_IR_UnreachableBranches_Value_HasToString___closed__1() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_HasRepr___closed__1; +x_2 = l_Lean_IR_UnreachableBranches_Value_Lean_HasFormat___closed__1; +x_3 = lean_alloc_closure((void*)(l_Function_comp___rarg), 3, 2); +lean_closure_set(x_3, 0, x_1); +lean_closure_set(x_3, 1, x_2); +return x_3; +} +} +lean_object* _init_l_Lean_IR_UnreachableBranches_Value_HasToString() { +_start: +{ +lean_object* x_1; +x_1 = l_Lean_IR_UnreachableBranches_Value_HasToString___closed__1; +return x_1; +} +} +lean_object* l_PersistentHashMap_insertAtCollisionNodeAux___main___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__4(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; lean_object* x_6; lean_object* x_7; uint8_t x_8; +x_5 = lean_ctor_get(x_1, 0); +lean_inc(x_5); +x_6 = lean_ctor_get(x_1, 1); +lean_inc(x_6); +x_7 = lean_array_get_size(x_5); +x_8 = lean_nat_dec_lt(x_2, x_7); +lean_dec(x_7); +if (x_8 == 0) +{ +uint8_t x_9; +lean_dec(x_2); +x_9 = !lean_is_exclusive(x_1); +if (x_9 == 0) +{ +lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; +x_10 = lean_ctor_get(x_1, 1); +lean_dec(x_10); +x_11 = lean_ctor_get(x_1, 0); +lean_dec(x_11); +x_12 = lean_array_push(x_5, x_3); +x_13 = lean_array_push(x_6, x_4); +lean_ctor_set(x_1, 1, x_13); +lean_ctor_set(x_1, 0, x_12); +return x_1; +} +else +{ +lean_object* x_14; lean_object* x_15; lean_object* x_16; +lean_dec(x_1); +x_14 = lean_array_push(x_5, x_3); +x_15 = lean_array_push(x_6, x_4); +x_16 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_16, 0, x_14); +lean_ctor_set(x_16, 1, x_15); +return x_16; +} +} +else +{ +lean_object* x_17; uint8_t x_18; +x_17 = lean_array_fget(x_5, x_2); +x_18 = lean_name_dec_eq(x_3, x_17); +lean_dec(x_17); +if (x_18 == 0) +{ +lean_object* x_19; lean_object* x_20; +lean_dec(x_6); +lean_dec(x_5); +x_19 = lean_unsigned_to_nat(1u); +x_20 = lean_nat_add(x_2, x_19); +lean_dec(x_2); +x_2 = x_20; +goto _start; +} +else +{ +uint8_t x_22; +x_22 = !lean_is_exclusive(x_1); +if (x_22 == 0) +{ +lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; +x_23 = lean_ctor_get(x_1, 1); +lean_dec(x_23); +x_24 = lean_ctor_get(x_1, 0); +lean_dec(x_24); +x_25 = lean_array_fset(x_5, x_2, x_3); +x_26 = lean_array_fset(x_6, x_2, x_4); +lean_dec(x_2); +lean_ctor_set(x_1, 1, x_26); +lean_ctor_set(x_1, 0, x_25); +return x_1; +} +else +{ +lean_object* x_27; lean_object* x_28; lean_object* x_29; +lean_dec(x_1); +x_27 = lean_array_fset(x_5, x_2, x_3); +x_28 = lean_array_fset(x_6, x_2, x_4); +lean_dec(x_2); +x_29 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_29, 0, x_27); +lean_ctor_set(x_29, 1, x_28); +return x_29; +} +} +} +} +} +lean_object* l_Array_miterateAux___main___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__5(size_t x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { +_start: +{ +lean_object* x_7; uint8_t x_8; +x_7 = lean_array_get_size(x_4); +x_8 = lean_nat_dec_lt(x_5, x_7); +lean_dec(x_7); +if (x_8 == 0) +{ +lean_dec(x_5); +return x_6; +} +else +{ +lean_object* x_9; lean_object* x_10; size_t x_11; size_t x_12; size_t x_13; size_t x_14; size_t x_15; size_t x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; +x_9 = lean_array_fget(x_4, x_5); +x_10 = lean_array_fget(x_3, x_5); +x_11 = lean_name_hash_usize(x_9); +x_12 = 1; +x_13 = x_1 - x_12; +x_14 = 5; +x_15 = x_14 * x_13; +x_16 = x_11 >> x_15; +x_17 = l_PersistentHashMap_insertAux___main___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__3(x_6, x_16, x_1, x_9, x_10); +x_18 = lean_unsigned_to_nat(1u); +x_19 = lean_nat_add(x_5, x_18); +lean_dec(x_5); +x_5 = x_19; +x_6 = x_17; +goto _start; +} +} +} +lean_object* l_PersistentHashMap_insertAux___main___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__3(lean_object* x_1, size_t x_2, size_t x_3, lean_object* x_4, lean_object* x_5) { +_start: +{ +if (lean_obj_tag(x_1) == 0) +{ +uint8_t x_6; +x_6 = !lean_is_exclusive(x_1); +if (x_6 == 0) +{ +lean_object* x_7; size_t x_8; size_t x_9; size_t x_10; size_t x_11; lean_object* x_12; lean_object* x_13; uint8_t x_14; +x_7 = lean_ctor_get(x_1, 0); +x_8 = 1; +x_9 = 5; +x_10 = l_PersistentHashMap_insertAux___main___rarg___closed__2; +x_11 = x_2 & x_10; +x_12 = lean_usize_to_nat(x_11); +x_13 = lean_array_get_size(x_7); +x_14 = lean_nat_dec_lt(x_12, x_13); +lean_dec(x_13); +if (x_14 == 0) +{ +lean_dec(x_12); +lean_dec(x_5); +lean_dec(x_4); +return x_1; +} +else +{ +lean_object* x_15; lean_object* x_16; lean_object* x_17; +x_15 = lean_array_fget(x_7, x_12); +x_16 = lean_box(2); +x_17 = lean_array_fset(x_7, x_12, x_16); +switch (lean_obj_tag(x_15)) { +case 0: +{ +uint8_t x_18; +x_18 = !lean_is_exclusive(x_15); +if (x_18 == 0) +{ +lean_object* x_19; lean_object* x_20; uint8_t x_21; +x_19 = lean_ctor_get(x_15, 0); +x_20 = lean_ctor_get(x_15, 1); +x_21 = lean_name_dec_eq(x_4, x_19); +if (x_21 == 0) +{ +lean_object* x_22; lean_object* x_23; lean_object* x_24; +lean_free_object(x_15); +x_22 = l_PersistentHashMap_mkCollisionNode___rarg(x_19, x_20, x_4, x_5); +x_23 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_23, 0, x_22); +x_24 = lean_array_fset(x_17, x_12, x_23); +lean_dec(x_12); +lean_ctor_set(x_1, 0, x_24); +return x_1; +} +else +{ +lean_object* x_25; +lean_dec(x_20); +lean_dec(x_19); +lean_ctor_set(x_15, 1, x_5); +lean_ctor_set(x_15, 0, x_4); +x_25 = lean_array_fset(x_17, x_12, x_15); +lean_dec(x_12); +lean_ctor_set(x_1, 0, x_25); +return x_1; +} +} +else +{ +lean_object* x_26; lean_object* x_27; uint8_t x_28; +x_26 = lean_ctor_get(x_15, 0); +x_27 = lean_ctor_get(x_15, 1); +lean_inc(x_27); +lean_inc(x_26); +lean_dec(x_15); +x_28 = lean_name_dec_eq(x_4, x_26); +if (x_28 == 0) +{ +lean_object* x_29; lean_object* x_30; lean_object* x_31; +x_29 = l_PersistentHashMap_mkCollisionNode___rarg(x_26, x_27, x_4, x_5); +x_30 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_30, 0, x_29); +x_31 = lean_array_fset(x_17, x_12, x_30); +lean_dec(x_12); +lean_ctor_set(x_1, 0, x_31); +return x_1; +} +else +{ +lean_object* x_32; lean_object* x_33; +lean_dec(x_27); +lean_dec(x_26); +x_32 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_32, 0, x_4); +lean_ctor_set(x_32, 1, x_5); +x_33 = lean_array_fset(x_17, x_12, x_32); +lean_dec(x_12); +lean_ctor_set(x_1, 0, x_33); +return x_1; +} +} +} +case 1: +{ +uint8_t x_34; +x_34 = !lean_is_exclusive(x_15); +if (x_34 == 0) +{ +lean_object* x_35; size_t x_36; size_t x_37; lean_object* x_38; lean_object* x_39; +x_35 = lean_ctor_get(x_15, 0); +x_36 = x_2 >> x_9; +x_37 = x_3 + x_8; +x_38 = l_PersistentHashMap_insertAux___main___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__3(x_35, x_36, x_37, x_4, x_5); +lean_ctor_set(x_15, 0, x_38); +x_39 = lean_array_fset(x_17, x_12, x_15); +lean_dec(x_12); +lean_ctor_set(x_1, 0, x_39); +return x_1; +} +else +{ +lean_object* x_40; size_t x_41; size_t x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; +x_40 = lean_ctor_get(x_15, 0); +lean_inc(x_40); +lean_dec(x_15); +x_41 = x_2 >> x_9; +x_42 = x_3 + x_8; +x_43 = l_PersistentHashMap_insertAux___main___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__3(x_40, x_41, x_42, x_4, x_5); +x_44 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_44, 0, x_43); +x_45 = lean_array_fset(x_17, x_12, x_44); +lean_dec(x_12); +lean_ctor_set(x_1, 0, x_45); +return x_1; +} +} +default: +{ +lean_object* x_46; lean_object* x_47; +x_46 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_46, 0, x_4); +lean_ctor_set(x_46, 1, x_5); +x_47 = lean_array_fset(x_17, x_12, x_46); +lean_dec(x_12); +lean_ctor_set(x_1, 0, x_47); +return x_1; +} +} +} +} +else +{ +lean_object* x_48; size_t x_49; size_t x_50; size_t x_51; size_t x_52; lean_object* x_53; lean_object* x_54; uint8_t x_55; +x_48 = lean_ctor_get(x_1, 0); +lean_inc(x_48); +lean_dec(x_1); +x_49 = 1; +x_50 = 5; +x_51 = l_PersistentHashMap_insertAux___main___rarg___closed__2; +x_52 = x_2 & x_51; +x_53 = lean_usize_to_nat(x_52); +x_54 = lean_array_get_size(x_48); +x_55 = lean_nat_dec_lt(x_53, x_54); +lean_dec(x_54); +if (x_55 == 0) +{ +lean_object* x_56; +lean_dec(x_53); +lean_dec(x_5); +lean_dec(x_4); +x_56 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_56, 0, x_48); +return x_56; +} +else +{ +lean_object* x_57; lean_object* x_58; lean_object* x_59; +x_57 = lean_array_fget(x_48, x_53); +x_58 = lean_box(2); +x_59 = lean_array_fset(x_48, x_53, x_58); +switch (lean_obj_tag(x_57)) { +case 0: +{ +lean_object* x_60; lean_object* x_61; lean_object* x_62; uint8_t x_63; +x_60 = lean_ctor_get(x_57, 0); +lean_inc(x_60); +x_61 = lean_ctor_get(x_57, 1); +lean_inc(x_61); +if (lean_is_exclusive(x_57)) { + lean_ctor_release(x_57, 0); + lean_ctor_release(x_57, 1); + x_62 = x_57; +} else { + lean_dec_ref(x_57); + x_62 = lean_box(0); +} +x_63 = lean_name_dec_eq(x_4, x_60); +if (x_63 == 0) +{ +lean_object* x_64; lean_object* x_65; lean_object* x_66; lean_object* x_67; +lean_dec(x_62); +x_64 = l_PersistentHashMap_mkCollisionNode___rarg(x_60, x_61, x_4, x_5); +x_65 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_65, 0, x_64); +x_66 = lean_array_fset(x_59, x_53, x_65); +lean_dec(x_53); +x_67 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_67, 0, x_66); +return x_67; +} +else +{ +lean_object* x_68; lean_object* x_69; lean_object* x_70; +lean_dec(x_61); +lean_dec(x_60); +if (lean_is_scalar(x_62)) { + x_68 = lean_alloc_ctor(0, 2, 0); +} else { + x_68 = x_62; +} +lean_ctor_set(x_68, 0, x_4); +lean_ctor_set(x_68, 1, x_5); +x_69 = lean_array_fset(x_59, x_53, x_68); +lean_dec(x_53); +x_70 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_70, 0, x_69); +return x_70; +} +} +case 1: +{ +lean_object* x_71; lean_object* x_72; size_t x_73; size_t x_74; lean_object* x_75; lean_object* x_76; lean_object* x_77; lean_object* x_78; +x_71 = lean_ctor_get(x_57, 0); +lean_inc(x_71); +if (lean_is_exclusive(x_57)) { + lean_ctor_release(x_57, 0); + x_72 = x_57; +} else { + lean_dec_ref(x_57); + x_72 = lean_box(0); +} +x_73 = x_2 >> x_50; +x_74 = x_3 + x_49; +x_75 = l_PersistentHashMap_insertAux___main___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__3(x_71, x_73, x_74, x_4, x_5); +if (lean_is_scalar(x_72)) { + x_76 = lean_alloc_ctor(1, 1, 0); +} else { + x_76 = x_72; +} +lean_ctor_set(x_76, 0, x_75); +x_77 = lean_array_fset(x_59, x_53, x_76); +lean_dec(x_53); +x_78 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_78, 0, x_77); +return x_78; +} +default: +{ +lean_object* x_79; lean_object* x_80; lean_object* x_81; +x_79 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_79, 0, x_4); +lean_ctor_set(x_79, 1, x_5); +x_80 = lean_array_fset(x_59, x_53, x_79); +lean_dec(x_53); +x_81 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_81, 0, x_80); +return x_81; +} +} +} +} +} +else +{ +lean_object* x_82; lean_object* x_83; size_t x_84; uint8_t x_85; +x_82 = lean_unsigned_to_nat(0u); +x_83 = l_PersistentHashMap_insertAtCollisionNodeAux___main___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__4(x_1, x_82, x_4, x_5); +x_84 = 7; +x_85 = x_84 <= x_3; +if (x_85 == 0) +{ +lean_object* x_86; lean_object* x_87; uint8_t x_88; +x_86 = l_PersistentHashMap_getCollisionNodeSize___rarg(x_83); +x_87 = lean_unsigned_to_nat(4u); +x_88 = lean_nat_dec_lt(x_86, x_87); +lean_dec(x_86); +if (x_88 == 0) +{ +lean_object* x_89; lean_object* x_90; lean_object* x_91; lean_object* x_92; +x_89 = lean_ctor_get(x_83, 0); +lean_inc(x_89); +x_90 = lean_ctor_get(x_83, 1); +lean_inc(x_90); +lean_dec(x_83); +x_91 = l_PersistentHashMap_insertAux___main___rarg___closed__3; +x_92 = l_Array_miterateAux___main___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__5(x_3, x_89, x_90, x_89, x_82, x_91); +lean_dec(x_90); +lean_dec(x_89); +return x_92; +} +else +{ +return x_83; +} +} +else +{ +return x_83; +} +} +} +} +lean_object* l_PersistentHashMap_insert___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__2(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +uint8_t x_4; +x_4 = !lean_is_exclusive(x_1); +if (x_4 == 0) +{ +lean_object* x_5; lean_object* x_6; size_t x_7; size_t x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; +x_5 = lean_ctor_get(x_1, 0); +x_6 = lean_ctor_get(x_1, 1); +x_7 = lean_name_hash_usize(x_2); +x_8 = 1; +x_9 = l_PersistentHashMap_insertAux___main___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__3(x_5, x_7, x_8, x_2, x_3); +x_10 = lean_unsigned_to_nat(1u); +x_11 = lean_nat_add(x_6, x_10); +lean_dec(x_6); +lean_ctor_set(x_1, 1, x_11); +lean_ctor_set(x_1, 0, x_9); +return x_1; +} +else +{ +lean_object* x_12; lean_object* x_13; size_t x_14; size_t x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; +x_12 = lean_ctor_get(x_1, 0); +x_13 = lean_ctor_get(x_1, 1); +lean_inc(x_13); +lean_inc(x_12); +lean_dec(x_1); +x_14 = lean_name_hash_usize(x_2); +x_15 = 1; +x_16 = l_PersistentHashMap_insertAux___main___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__3(x_12, x_14, x_15, x_2, x_3); +x_17 = lean_unsigned_to_nat(1u); +x_18 = lean_nat_add(x_13, x_17); +lean_dec(x_13); +x_19 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_19, 0, x_16); +lean_ctor_set(x_19, 1, x_18); +return x_19; +} +} +} +uint8_t l_AssocList_contains___main___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__7(lean_object* x_1, lean_object* x_2) { +_start: +{ +if (lean_obj_tag(x_2) == 0) +{ +uint8_t x_3; +x_3 = 0; +return x_3; +} +else +{ +lean_object* x_4; lean_object* x_5; uint8_t x_6; +x_4 = lean_ctor_get(x_2, 0); +x_5 = lean_ctor_get(x_2, 2); +x_6 = lean_name_dec_eq(x_4, x_1); +if (x_6 == 0) +{ +x_2 = x_5; +goto _start; +} +else +{ +uint8_t x_8; +x_8 = 1; +return x_8; +} +} +} +} +lean_object* l_AssocList_mfoldl___main___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__10(lean_object* x_1, lean_object* x_2) { +_start: +{ +if (lean_obj_tag(x_2) == 0) +{ +return x_1; +} +else +{ +uint8_t x_3; +x_3 = !lean_is_exclusive(x_2); +if (x_3 == 0) +{ +lean_object* x_4; lean_object* x_5; lean_object* x_6; size_t x_7; size_t x_8; lean_object* x_9; lean_object* x_10; +x_4 = lean_ctor_get(x_2, 0); +x_5 = lean_ctor_get(x_2, 2); +x_6 = lean_array_get_size(x_1); +x_7 = lean_name_hash_usize(x_4); +x_8 = lean_usize_modn(x_7, x_6); +lean_dec(x_6); +x_9 = lean_array_uget(x_1, x_8); +lean_ctor_set(x_2, 2, x_9); +x_10 = lean_array_uset(x_1, x_8, x_2); +x_1 = x_10; +x_2 = x_5; +goto _start; +} +else +{ +lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; size_t x_16; size_t x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; +x_12 = lean_ctor_get(x_2, 0); +x_13 = lean_ctor_get(x_2, 1); +x_14 = lean_ctor_get(x_2, 2); +lean_inc(x_14); +lean_inc(x_13); +lean_inc(x_12); +lean_dec(x_2); +x_15 = lean_array_get_size(x_1); +x_16 = lean_name_hash_usize(x_12); +x_17 = lean_usize_modn(x_16, x_15); +lean_dec(x_15); +x_18 = lean_array_uget(x_1, x_17); +x_19 = lean_alloc_ctor(1, 3, 0); +lean_ctor_set(x_19, 0, x_12); +lean_ctor_set(x_19, 1, x_13); +lean_ctor_set(x_19, 2, x_18); +x_20 = lean_array_uset(x_1, x_17, x_19); +x_1 = x_20; +x_2 = x_14; +goto _start; +} +} +} +} +lean_object* l_HashMapImp_moveEntries___main___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__9(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; uint8_t x_5; +x_4 = lean_array_get_size(x_2); +x_5 = lean_nat_dec_lt(x_1, x_4); +lean_dec(x_4); +if (x_5 == 0) +{ +lean_dec(x_2); +lean_dec(x_1); +return x_3; +} +else +{ +lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; +x_6 = lean_array_fget(x_2, x_1); +x_7 = lean_box(0); +x_8 = lean_array_fset(x_2, x_1, x_7); +x_9 = l_AssocList_mfoldl___main___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__10(x_3, x_6); +x_10 = lean_unsigned_to_nat(1u); +x_11 = lean_nat_add(x_1, x_10); +lean_dec(x_1); +x_1 = x_11; +x_2 = x_8; +x_3 = x_9; +goto _start; +} +} +} +lean_object* l_HashMapImp_expand___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__8(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; +x_3 = lean_array_get_size(x_2); +x_4 = lean_unsigned_to_nat(2u); +x_5 = lean_nat_mul(x_3, x_4); +lean_dec(x_3); +x_6 = lean_box(0); +x_7 = lean_mk_array(x_5, x_6); +x_8 = lean_unsigned_to_nat(0u); +x_9 = l_HashMapImp_moveEntries___main___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__9(x_8, x_2, x_7); +x_10 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_10, 0, x_1); +lean_ctor_set(x_10, 1, x_9); +return x_10; +} +} +lean_object* l_AssocList_replace___main___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__11(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +if (lean_obj_tag(x_3) == 0) +{ +lean_dec(x_2); +lean_dec(x_1); +return x_3; +} +else +{ +uint8_t x_4; +x_4 = !lean_is_exclusive(x_3); +if (x_4 == 0) +{ +lean_object* x_5; lean_object* x_6; lean_object* x_7; uint8_t x_8; +x_5 = lean_ctor_get(x_3, 0); +x_6 = lean_ctor_get(x_3, 1); +x_7 = lean_ctor_get(x_3, 2); +x_8 = lean_name_dec_eq(x_5, x_1); +if (x_8 == 0) +{ +lean_object* x_9; +x_9 = l_AssocList_replace___main___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__11(x_1, x_2, x_7); +lean_ctor_set(x_3, 2, x_9); +return x_3; +} +else +{ +lean_dec(x_6); +lean_dec(x_5); +lean_ctor_set(x_3, 1, x_2); +lean_ctor_set(x_3, 0, x_1); +return x_3; +} +} +else +{ +lean_object* x_10; lean_object* x_11; lean_object* x_12; uint8_t x_13; +x_10 = lean_ctor_get(x_3, 0); +x_11 = lean_ctor_get(x_3, 1); +x_12 = lean_ctor_get(x_3, 2); +lean_inc(x_12); +lean_inc(x_11); +lean_inc(x_10); +lean_dec(x_3); +x_13 = lean_name_dec_eq(x_10, x_1); +if (x_13 == 0) +{ +lean_object* x_14; lean_object* x_15; +x_14 = l_AssocList_replace___main___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__11(x_1, x_2, x_12); +x_15 = lean_alloc_ctor(1, 3, 0); +lean_ctor_set(x_15, 0, x_10); +lean_ctor_set(x_15, 1, x_11); +lean_ctor_set(x_15, 2, x_14); +return x_15; +} +else +{ +lean_object* x_16; +lean_dec(x_11); +lean_dec(x_10); +x_16 = lean_alloc_ctor(1, 3, 0); +lean_ctor_set(x_16, 0, x_1); +lean_ctor_set(x_16, 1, x_2); +lean_ctor_set(x_16, 2, x_12); +return x_16; +} +} +} +} +} +lean_object* l_HashMapImp_insert___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__6(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +uint8_t x_4; +x_4 = !lean_is_exclusive(x_1); +if (x_4 == 0) +{ +lean_object* x_5; lean_object* x_6; lean_object* x_7; size_t x_8; size_t x_9; lean_object* x_10; uint8_t x_11; +x_5 = lean_ctor_get(x_1, 0); +x_6 = lean_ctor_get(x_1, 1); +x_7 = lean_array_get_size(x_6); +x_8 = lean_name_hash_usize(x_2); +x_9 = lean_usize_modn(x_8, x_7); +x_10 = lean_array_uget(x_6, x_9); +x_11 = l_AssocList_contains___main___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__7(x_2, x_10); +if (x_11 == 0) +{ +lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; uint8_t x_16; +x_12 = lean_unsigned_to_nat(1u); +x_13 = lean_nat_add(x_5, x_12); +lean_dec(x_5); +x_14 = lean_alloc_ctor(1, 3, 0); +lean_ctor_set(x_14, 0, x_2); +lean_ctor_set(x_14, 1, x_3); +lean_ctor_set(x_14, 2, x_10); +x_15 = lean_array_uset(x_6, x_9, x_14); +x_16 = lean_nat_dec_le(x_13, x_7); +lean_dec(x_7); +if (x_16 == 0) +{ +lean_object* x_17; +lean_free_object(x_1); +x_17 = l_HashMapImp_expand___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__8(x_13, x_15); +return x_17; +} +else +{ +lean_ctor_set(x_1, 1, x_15); +lean_ctor_set(x_1, 0, x_13); +return x_1; +} +} +else +{ +lean_object* x_18; lean_object* x_19; +lean_dec(x_7); +x_18 = l_AssocList_replace___main___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__11(x_2, x_3, x_10); +x_19 = lean_array_uset(x_6, x_9, x_18); +lean_ctor_set(x_1, 1, x_19); +return x_1; +} +} +else +{ +lean_object* x_20; lean_object* x_21; lean_object* x_22; size_t x_23; size_t x_24; lean_object* x_25; uint8_t x_26; +x_20 = lean_ctor_get(x_1, 0); +x_21 = lean_ctor_get(x_1, 1); +lean_inc(x_21); +lean_inc(x_20); +lean_dec(x_1); +x_22 = lean_array_get_size(x_21); +x_23 = lean_name_hash_usize(x_2); +x_24 = lean_usize_modn(x_23, x_22); +x_25 = lean_array_uget(x_21, x_24); +x_26 = l_AssocList_contains___main___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__7(x_2, x_25); +if (x_26 == 0) +{ +lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; uint8_t x_31; +x_27 = lean_unsigned_to_nat(1u); +x_28 = lean_nat_add(x_20, x_27); +lean_dec(x_20); +x_29 = lean_alloc_ctor(1, 3, 0); +lean_ctor_set(x_29, 0, x_2); +lean_ctor_set(x_29, 1, x_3); +lean_ctor_set(x_29, 2, x_25); +x_30 = lean_array_uset(x_21, x_24, x_29); +x_31 = lean_nat_dec_le(x_28, x_22); +lean_dec(x_22); +if (x_31 == 0) +{ +lean_object* x_32; +x_32 = l_HashMapImp_expand___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__8(x_28, x_30); +return x_32; +} +else +{ +lean_object* x_33; +x_33 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_33, 0, x_28); +lean_ctor_set(x_33, 1, x_30); +return x_33; +} +} +else +{ +lean_object* x_34; lean_object* x_35; lean_object* x_36; +lean_dec(x_22); +x_34 = l_AssocList_replace___main___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__11(x_2, x_3, x_25); +x_35 = lean_array_uset(x_21, x_24, x_34); +x_36 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_36, 0, x_20); +lean_ctor_set(x_36, 1, x_35); +return x_36; +} +} +} +} +lean_object* l_Lean_SMap_insert___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__1(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +uint8_t x_4; +x_4 = lean_ctor_get_uint8(x_1, sizeof(void*)*2); +if (x_4 == 0) +{ +uint8_t x_5; +x_5 = !lean_is_exclusive(x_1); +if (x_5 == 0) +{ +lean_object* x_6; lean_object* x_7; +x_6 = lean_ctor_get(x_1, 1); +x_7 = l_PersistentHashMap_insert___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__2(x_6, x_2, x_3); +lean_ctor_set(x_1, 1, x_7); +return x_1; +} +else +{ +lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; +x_8 = lean_ctor_get(x_1, 0); +x_9 = lean_ctor_get(x_1, 1); +lean_inc(x_9); +lean_inc(x_8); +lean_dec(x_1); +x_10 = l_PersistentHashMap_insert___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__2(x_9, x_2, x_3); +x_11 = lean_alloc_ctor(0, 2, 1); +lean_ctor_set(x_11, 0, x_8); +lean_ctor_set(x_11, 1, x_10); +lean_ctor_set_uint8(x_11, sizeof(void*)*2, x_4); +return x_11; +} +} +else +{ +uint8_t x_12; +x_12 = !lean_is_exclusive(x_1); +if (x_12 == 0) +{ +lean_object* x_13; lean_object* x_14; +x_13 = lean_ctor_get(x_1, 0); +x_14 = l_HashMapImp_insert___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__6(x_13, x_2, x_3); +lean_ctor_set(x_1, 0, x_14); +return x_1; +} +else +{ +lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; +x_15 = lean_ctor_get(x_1, 0); +x_16 = lean_ctor_get(x_1, 1); +lean_inc(x_16); +lean_inc(x_15); +lean_dec(x_1); +x_17 = l_HashMapImp_insert___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__6(x_15, x_2, x_3); +x_18 = lean_alloc_ctor(0, 2, 1); +lean_ctor_set(x_18, 0, x_17); +lean_ctor_set(x_18, 1, x_16); +lean_ctor_set_uint8(x_18, sizeof(void*)*2, x_4); +return x_18; +} +} +} +} +lean_object* l_mkHashMap___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__13(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = l_mkHashMapImp___rarg(x_1); +return x_2; +} +} +lean_object* _init_l_Lean_SMap_empty___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__12___closed__1() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = lean_unsigned_to_nat(8u); +x_2 = l_mkHashMapImp___rarg(x_1); +return x_2; +} +} +lean_object* _init_l_Lean_SMap_empty___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__12___closed__2() { +_start: +{ +uint8_t x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; +x_1 = 1; +x_2 = l_Lean_SMap_empty___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__12___closed__1; +x_3 = l_PersistentHashMap_HasEmptyc___closed__1; +x_4 = lean_alloc_ctor(0, 2, 1); +lean_ctor_set(x_4, 0, x_2); +lean_ctor_set(x_4, 1, x_3); +lean_ctor_set_uint8(x_4, sizeof(void*)*2, x_1); +return x_4; +} +} +lean_object* _init_l_Lean_SMap_empty___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__12() { +_start: +{ +lean_object* x_1; +x_1 = l_Lean_SMap_empty___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__12___closed__2; +return x_1; +} +} +lean_object* l_Array_miterateAux___main___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__15(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; uint8_t x_6; +x_5 = lean_array_get_size(x_2); +x_6 = lean_nat_dec_lt(x_3, x_5); +lean_dec(x_5); +if (x_6 == 0) +{ +lean_dec(x_3); +return x_4; +} +else +{ +lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; +x_7 = lean_array_fget(x_2, x_3); +x_8 = lean_ctor_get(x_7, 0); +lean_inc(x_8); +x_9 = lean_ctor_get(x_7, 1); +lean_inc(x_9); +lean_dec(x_7); +x_10 = l_Lean_SMap_insert___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__1(x_4, x_8, x_9); +x_11 = lean_unsigned_to_nat(1u); +x_12 = lean_nat_add(x_3, x_11); +lean_dec(x_3); +x_3 = x_12; +x_4 = x_10; +goto _start; +} +} +} +lean_object* l_Array_miterateAux___main___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__16(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; uint8_t x_6; +x_5 = lean_array_get_size(x_2); +x_6 = lean_nat_dec_lt(x_3, x_5); +lean_dec(x_5); +if (x_6 == 0) +{ +lean_dec(x_3); +return x_4; +} +else +{ +lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; +x_7 = lean_array_fget(x_2, x_3); +x_8 = lean_unsigned_to_nat(0u); +x_9 = l_Array_miterateAux___main___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__15(x_7, x_7, x_8, x_4); +lean_dec(x_7); +x_10 = lean_unsigned_to_nat(1u); +x_11 = lean_nat_add(x_3, x_10); +lean_dec(x_3); +x_3 = x_11; +x_4 = x_9; +goto _start; +} +} +} +lean_object* l_Lean_mkStateFromImportedEntries___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__14___rarg(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; lean_object* x_4; +x_3 = lean_unsigned_to_nat(0u); +x_4 = l_Array_miterateAux___main___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__16(x_2, x_2, x_3, x_1); +return x_4; +} +} +lean_object* l_Lean_mkStateFromImportedEntries___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__14(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_Lean_mkStateFromImportedEntries___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__14___rarg___boxed), 2, 0); +return x_2; +} +} +lean_object* l_Lean_SMap_switch___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__17(lean_object* x_1) { +_start: +{ +uint8_t x_2; +x_2 = lean_ctor_get_uint8(x_1, sizeof(void*)*2); +if (x_2 == 0) +{ +return x_1; +} +else +{ +uint8_t x_3; +x_3 = !lean_is_exclusive(x_1); +if (x_3 == 0) +{ +uint8_t x_4; +x_4 = 0; +lean_ctor_set_uint8(x_1, sizeof(void*)*2, x_4); +return x_1; +} +else +{ +lean_object* x_5; lean_object* x_6; uint8_t x_7; lean_object* x_8; +x_5 = lean_ctor_get(x_1, 0); +x_6 = lean_ctor_get(x_1, 1); +lean_inc(x_6); +lean_inc(x_5); +lean_dec(x_1); +x_7 = 0; +x_8 = lean_alloc_ctor(0, 2, 1); +lean_ctor_set(x_8, 0, x_5); +lean_ctor_set(x_8, 1, x_6); +lean_ctor_set_uint8(x_8, sizeof(void*)*2, x_7); +return x_8; +} +} +} +} +uint8_t l_Array_anyMAux___main___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__20(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; uint8_t x_5; +x_4 = lean_array_get_size(x_2); +x_5 = lean_nat_dec_lt(x_3, x_4); +lean_dec(x_4); +if (x_5 == 0) +{ +uint8_t x_6; +lean_dec(x_3); +x_6 = 0; +return x_6; +} +else +{ +lean_object* x_7; lean_object* x_8; lean_object* x_9; uint8_t x_10; +x_7 = lean_array_fget(x_2, x_3); +x_8 = lean_ctor_get(x_7, 1); +lean_inc(x_8); +lean_dec(x_7); +x_9 = lean_ctor_get(x_1, 0); +x_10 = lean_name_dec_eq(x_8, x_9); +lean_dec(x_8); +if (x_10 == 0) +{ +lean_object* x_11; lean_object* x_12; +x_11 = lean_unsigned_to_nat(1u); +x_12 = lean_nat_add(x_3, x_11); +lean_dec(x_3); +x_3 = x_12; +goto _start; +} +else +{ +lean_dec(x_3); +return x_10; +} +} +} +} +lean_object* _init_l_Lean_registerEnvExtensionUnsafe___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__21___closed__1() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l_Lean_SMap_empty___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__12___closed__2; +x_3 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_3, 0, x_1); +lean_ctor_set(x_3, 1, x_2); +return x_3; +} +} +lean_object* _init_l_Lean_registerEnvExtensionUnsafe___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__21___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Array_empty___closed__1; +x_2 = l_Lean_registerEnvExtensionUnsafe___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__21___closed__1; +x_3 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_3, 0, x_1); +lean_ctor_set(x_3, 1, x_2); +return x_3; +} +} +lean_object* l_Lean_registerEnvExtensionUnsafe___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__21(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = lean_io_initializing(x_2); +if (lean_obj_tag(x_3) == 0) +{ +lean_object* x_4; uint8_t x_5; +x_4 = lean_ctor_get(x_3, 0); +lean_inc(x_4); +x_5 = lean_unbox(x_4); +lean_dec(x_4); +if (x_5 == 0) +{ +uint8_t x_6; +lean_dec(x_1); +x_6 = !lean_is_exclusive(x_3); +if (x_6 == 0) +{ +lean_object* x_7; lean_object* x_8; +x_7 = lean_ctor_get(x_3, 0); +lean_dec(x_7); +x_8 = l_Lean_registerEnvExtensionUnsafe___rarg___closed__1; +lean_ctor_set_tag(x_3, 1); +lean_ctor_set(x_3, 0, x_8); +return x_3; +} +else +{ +lean_object* x_9; lean_object* x_10; lean_object* x_11; +x_9 = lean_ctor_get(x_3, 1); +lean_inc(x_9); +lean_dec(x_3); +x_10 = l_Lean_registerEnvExtensionUnsafe___rarg___closed__1; +x_11 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_11, 0, x_10); +lean_ctor_set(x_11, 1, x_9); +return x_11; +} +} +else +{ +uint8_t x_12; +x_12 = !lean_is_exclusive(x_3); +if (x_12 == 0) +{ +lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; +x_13 = lean_ctor_get(x_3, 0); +lean_dec(x_13); +x_14 = lean_box(0); +lean_ctor_set(x_3, 0, x_14); +x_15 = l___private_init_lean_environment_5__envExtensionsRef; +x_16 = lean_io_ref_get(x_15, x_3); +if (lean_obj_tag(x_16) == 0) +{ +uint8_t x_17; +x_17 = !lean_is_exclusive(x_16); +if (x_17 == 0) +{ +lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; +x_18 = lean_ctor_get(x_16, 0); +lean_ctor_set(x_16, 0, x_14); +x_19 = lean_array_get_size(x_18); +lean_dec(x_18); +x_20 = l_Lean_registerEnvExtensionUnsafe___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__21___closed__2; +x_21 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_21, 0, x_19); +lean_ctor_set(x_21, 1, x_1); +lean_ctor_set(x_21, 2, x_20); +x_22 = lean_io_ref_get(x_15, x_16); +if (lean_obj_tag(x_22) == 0) +{ +uint8_t x_23; +x_23 = !lean_is_exclusive(x_22); +if (x_23 == 0) +{ +lean_object* x_24; lean_object* x_25; +x_24 = lean_ctor_get(x_22, 0); +lean_ctor_set(x_22, 0, x_14); +x_25 = lean_io_ref_reset(x_15, x_22); +if (lean_obj_tag(x_25) == 0) +{ +uint8_t x_26; +x_26 = !lean_is_exclusive(x_25); +if (x_26 == 0) +{ +lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; +x_27 = lean_ctor_get(x_25, 0); +lean_dec(x_27); +lean_ctor_set(x_25, 0, x_14); +x_28 = l_Lean_registerEnvExtensionUnsafe___rarg___closed__2; +lean_inc(x_21); +x_29 = x_21; +x_30 = lean_array_push(x_24, x_29); +x_31 = lean_io_ref_set(x_15, x_30, x_25); +if (lean_obj_tag(x_31) == 0) +{ +uint8_t x_32; +x_32 = !lean_is_exclusive(x_31); +if (x_32 == 0) +{ +lean_object* x_33; +x_33 = lean_ctor_get(x_31, 0); +lean_dec(x_33); +lean_ctor_set(x_31, 0, x_21); +return x_31; +} +else +{ +lean_object* x_34; lean_object* x_35; +x_34 = lean_ctor_get(x_31, 1); +lean_inc(x_34); +lean_dec(x_31); +x_35 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_35, 0, x_21); +lean_ctor_set(x_35, 1, x_34); +return x_35; +} +} +else +{ +uint8_t x_36; +lean_dec(x_21); +x_36 = !lean_is_exclusive(x_31); +if (x_36 == 0) +{ +return x_31; +} +else +{ +lean_object* x_37; lean_object* x_38; lean_object* x_39; +x_37 = lean_ctor_get(x_31, 0); +x_38 = lean_ctor_get(x_31, 1); +lean_inc(x_38); +lean_inc(x_37); +lean_dec(x_31); +x_39 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_39, 0, x_37); +lean_ctor_set(x_39, 1, x_38); +return x_39; +} +} +} +else +{ +lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; +x_40 = lean_ctor_get(x_25, 1); +lean_inc(x_40); +lean_dec(x_25); +x_41 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_41, 0, x_14); +lean_ctor_set(x_41, 1, x_40); +x_42 = l_Lean_registerEnvExtensionUnsafe___rarg___closed__2; +lean_inc(x_21); +x_43 = x_21; +x_44 = lean_array_push(x_24, x_43); +x_45 = lean_io_ref_set(x_15, x_44, x_41); +if (lean_obj_tag(x_45) == 0) +{ +lean_object* x_46; lean_object* x_47; lean_object* x_48; +x_46 = lean_ctor_get(x_45, 1); +lean_inc(x_46); +if (lean_is_exclusive(x_45)) { + lean_ctor_release(x_45, 0); + lean_ctor_release(x_45, 1); + x_47 = x_45; +} else { + lean_dec_ref(x_45); + x_47 = lean_box(0); +} +if (lean_is_scalar(x_47)) { + x_48 = lean_alloc_ctor(0, 2, 0); +} else { + x_48 = x_47; +} +lean_ctor_set(x_48, 0, x_21); +lean_ctor_set(x_48, 1, x_46); +return x_48; +} +else +{ +lean_object* x_49; lean_object* x_50; lean_object* x_51; lean_object* x_52; +lean_dec(x_21); +x_49 = lean_ctor_get(x_45, 0); +lean_inc(x_49); +x_50 = lean_ctor_get(x_45, 1); +lean_inc(x_50); +if (lean_is_exclusive(x_45)) { + lean_ctor_release(x_45, 0); + lean_ctor_release(x_45, 1); + x_51 = x_45; +} else { + lean_dec_ref(x_45); + x_51 = lean_box(0); +} +if (lean_is_scalar(x_51)) { + x_52 = lean_alloc_ctor(1, 2, 0); +} else { + x_52 = x_51; +} +lean_ctor_set(x_52, 0, x_49); +lean_ctor_set(x_52, 1, x_50); +return x_52; +} +} +} +else +{ +uint8_t x_53; +lean_dec(x_24); +lean_dec(x_21); +x_53 = !lean_is_exclusive(x_25); +if (x_53 == 0) +{ +return x_25; +} +else +{ +lean_object* x_54; lean_object* x_55; lean_object* x_56; +x_54 = lean_ctor_get(x_25, 0); +x_55 = lean_ctor_get(x_25, 1); +lean_inc(x_55); +lean_inc(x_54); +lean_dec(x_25); +x_56 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_56, 0, x_54); +lean_ctor_set(x_56, 1, x_55); +return x_56; +} +} +} +else +{ +lean_object* x_57; lean_object* x_58; lean_object* x_59; lean_object* x_60; +x_57 = lean_ctor_get(x_22, 0); +x_58 = lean_ctor_get(x_22, 1); +lean_inc(x_58); +lean_inc(x_57); +lean_dec(x_22); +x_59 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_59, 0, x_14); +lean_ctor_set(x_59, 1, x_58); +x_60 = lean_io_ref_reset(x_15, x_59); +if (lean_obj_tag(x_60) == 0) +{ +lean_object* x_61; lean_object* x_62; lean_object* x_63; lean_object* x_64; lean_object* x_65; lean_object* x_66; lean_object* x_67; +x_61 = lean_ctor_get(x_60, 1); +lean_inc(x_61); +if (lean_is_exclusive(x_60)) { + lean_ctor_release(x_60, 0); + lean_ctor_release(x_60, 1); + x_62 = x_60; +} else { + lean_dec_ref(x_60); + x_62 = lean_box(0); +} +if (lean_is_scalar(x_62)) { + x_63 = lean_alloc_ctor(0, 2, 0); +} else { + x_63 = x_62; +} +lean_ctor_set(x_63, 0, x_14); +lean_ctor_set(x_63, 1, x_61); +x_64 = l_Lean_registerEnvExtensionUnsafe___rarg___closed__2; +lean_inc(x_21); +x_65 = x_21; +x_66 = lean_array_push(x_57, x_65); +x_67 = lean_io_ref_set(x_15, x_66, x_63); +if (lean_obj_tag(x_67) == 0) +{ +lean_object* x_68; lean_object* x_69; lean_object* x_70; +x_68 = lean_ctor_get(x_67, 1); +lean_inc(x_68); +if (lean_is_exclusive(x_67)) { + lean_ctor_release(x_67, 0); + lean_ctor_release(x_67, 1); + x_69 = x_67; +} else { + lean_dec_ref(x_67); + x_69 = lean_box(0); +} +if (lean_is_scalar(x_69)) { + x_70 = lean_alloc_ctor(0, 2, 0); +} else { + x_70 = x_69; +} +lean_ctor_set(x_70, 0, x_21); +lean_ctor_set(x_70, 1, x_68); +return x_70; +} +else +{ +lean_object* x_71; lean_object* x_72; lean_object* x_73; lean_object* x_74; +lean_dec(x_21); +x_71 = lean_ctor_get(x_67, 0); +lean_inc(x_71); +x_72 = lean_ctor_get(x_67, 1); +lean_inc(x_72); +if (lean_is_exclusive(x_67)) { + lean_ctor_release(x_67, 0); + lean_ctor_release(x_67, 1); + x_73 = x_67; +} else { + lean_dec_ref(x_67); + x_73 = lean_box(0); +} +if (lean_is_scalar(x_73)) { + x_74 = lean_alloc_ctor(1, 2, 0); +} else { + x_74 = x_73; +} +lean_ctor_set(x_74, 0, x_71); +lean_ctor_set(x_74, 1, x_72); +return x_74; +} +} +else +{ +lean_object* x_75; lean_object* x_76; lean_object* x_77; lean_object* x_78; +lean_dec(x_57); +lean_dec(x_21); +x_75 = lean_ctor_get(x_60, 0); +lean_inc(x_75); +x_76 = lean_ctor_get(x_60, 1); +lean_inc(x_76); +if (lean_is_exclusive(x_60)) { + lean_ctor_release(x_60, 0); + lean_ctor_release(x_60, 1); + x_77 = x_60; +} else { + lean_dec_ref(x_60); + x_77 = lean_box(0); +} +if (lean_is_scalar(x_77)) { + x_78 = lean_alloc_ctor(1, 2, 0); +} else { + x_78 = x_77; +} +lean_ctor_set(x_78, 0, x_75); +lean_ctor_set(x_78, 1, x_76); +return x_78; +} +} +} +else +{ +uint8_t x_79; +lean_dec(x_21); +x_79 = !lean_is_exclusive(x_22); +if (x_79 == 0) +{ +return x_22; +} +else +{ +lean_object* x_80; lean_object* x_81; lean_object* x_82; +x_80 = lean_ctor_get(x_22, 0); +x_81 = lean_ctor_get(x_22, 1); +lean_inc(x_81); +lean_inc(x_80); +lean_dec(x_22); +x_82 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_82, 0, x_80); +lean_ctor_set(x_82, 1, x_81); +return x_82; +} +} +} +else +{ +lean_object* x_83; lean_object* x_84; lean_object* x_85; lean_object* x_86; lean_object* x_87; lean_object* x_88; lean_object* x_89; +x_83 = lean_ctor_get(x_16, 0); +x_84 = lean_ctor_get(x_16, 1); +lean_inc(x_84); +lean_inc(x_83); +lean_dec(x_16); +x_85 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_85, 0, x_14); +lean_ctor_set(x_85, 1, x_84); +x_86 = lean_array_get_size(x_83); +lean_dec(x_83); +x_87 = l_Lean_registerEnvExtensionUnsafe___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__21___closed__2; +x_88 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_88, 0, x_86); +lean_ctor_set(x_88, 1, x_1); +lean_ctor_set(x_88, 2, x_87); +x_89 = lean_io_ref_get(x_15, x_85); +if (lean_obj_tag(x_89) == 0) +{ +lean_object* x_90; lean_object* x_91; lean_object* x_92; lean_object* x_93; lean_object* x_94; +x_90 = lean_ctor_get(x_89, 0); +lean_inc(x_90); +x_91 = lean_ctor_get(x_89, 1); +lean_inc(x_91); +if (lean_is_exclusive(x_89)) { + lean_ctor_release(x_89, 0); + lean_ctor_release(x_89, 1); + x_92 = x_89; +} else { + lean_dec_ref(x_89); + x_92 = lean_box(0); +} +if (lean_is_scalar(x_92)) { + x_93 = lean_alloc_ctor(0, 2, 0); +} else { + x_93 = x_92; +} +lean_ctor_set(x_93, 0, x_14); +lean_ctor_set(x_93, 1, x_91); +x_94 = lean_io_ref_reset(x_15, x_93); +if (lean_obj_tag(x_94) == 0) +{ +lean_object* x_95; lean_object* x_96; lean_object* x_97; lean_object* x_98; lean_object* x_99; lean_object* x_100; lean_object* x_101; +x_95 = lean_ctor_get(x_94, 1); +lean_inc(x_95); +if (lean_is_exclusive(x_94)) { + lean_ctor_release(x_94, 0); + lean_ctor_release(x_94, 1); + x_96 = x_94; +} else { + lean_dec_ref(x_94); + x_96 = lean_box(0); +} +if (lean_is_scalar(x_96)) { + x_97 = lean_alloc_ctor(0, 2, 0); +} else { + x_97 = x_96; +} +lean_ctor_set(x_97, 0, x_14); +lean_ctor_set(x_97, 1, x_95); +x_98 = l_Lean_registerEnvExtensionUnsafe___rarg___closed__2; +lean_inc(x_88); +x_99 = x_88; +x_100 = lean_array_push(x_90, x_99); +x_101 = lean_io_ref_set(x_15, x_100, x_97); +if (lean_obj_tag(x_101) == 0) +{ +lean_object* x_102; lean_object* x_103; lean_object* x_104; +x_102 = lean_ctor_get(x_101, 1); +lean_inc(x_102); +if (lean_is_exclusive(x_101)) { + lean_ctor_release(x_101, 0); + lean_ctor_release(x_101, 1); + x_103 = x_101; +} else { + lean_dec_ref(x_101); + x_103 = lean_box(0); +} +if (lean_is_scalar(x_103)) { + x_104 = lean_alloc_ctor(0, 2, 0); +} else { + x_104 = x_103; +} +lean_ctor_set(x_104, 0, x_88); +lean_ctor_set(x_104, 1, x_102); +return x_104; +} +else +{ +lean_object* x_105; lean_object* x_106; lean_object* x_107; lean_object* x_108; +lean_dec(x_88); +x_105 = lean_ctor_get(x_101, 0); +lean_inc(x_105); +x_106 = lean_ctor_get(x_101, 1); +lean_inc(x_106); +if (lean_is_exclusive(x_101)) { + lean_ctor_release(x_101, 0); + lean_ctor_release(x_101, 1); + x_107 = x_101; +} else { + lean_dec_ref(x_101); + x_107 = lean_box(0); +} +if (lean_is_scalar(x_107)) { + x_108 = lean_alloc_ctor(1, 2, 0); +} else { + x_108 = x_107; +} +lean_ctor_set(x_108, 0, x_105); +lean_ctor_set(x_108, 1, x_106); +return x_108; +} +} +else +{ +lean_object* x_109; lean_object* x_110; lean_object* x_111; lean_object* x_112; +lean_dec(x_90); +lean_dec(x_88); +x_109 = lean_ctor_get(x_94, 0); +lean_inc(x_109); +x_110 = lean_ctor_get(x_94, 1); +lean_inc(x_110); +if (lean_is_exclusive(x_94)) { + lean_ctor_release(x_94, 0); + lean_ctor_release(x_94, 1); + x_111 = x_94; +} else { + lean_dec_ref(x_94); + x_111 = lean_box(0); +} +if (lean_is_scalar(x_111)) { + x_112 = lean_alloc_ctor(1, 2, 0); +} else { + x_112 = x_111; +} +lean_ctor_set(x_112, 0, x_109); +lean_ctor_set(x_112, 1, x_110); +return x_112; +} +} +else +{ +lean_object* x_113; lean_object* x_114; lean_object* x_115; lean_object* x_116; +lean_dec(x_88); +x_113 = lean_ctor_get(x_89, 0); +lean_inc(x_113); +x_114 = lean_ctor_get(x_89, 1); +lean_inc(x_114); +if (lean_is_exclusive(x_89)) { + lean_ctor_release(x_89, 0); + lean_ctor_release(x_89, 1); + x_115 = x_89; +} else { + lean_dec_ref(x_89); + x_115 = lean_box(0); +} +if (lean_is_scalar(x_115)) { + x_116 = lean_alloc_ctor(1, 2, 0); +} else { + x_116 = x_115; +} +lean_ctor_set(x_116, 0, x_113); +lean_ctor_set(x_116, 1, x_114); +return x_116; +} +} +} +else +{ +uint8_t x_117; +lean_dec(x_1); +x_117 = !lean_is_exclusive(x_16); +if (x_117 == 0) +{ +return x_16; +} +else +{ +lean_object* x_118; lean_object* x_119; lean_object* x_120; +x_118 = lean_ctor_get(x_16, 0); +x_119 = lean_ctor_get(x_16, 1); +lean_inc(x_119); +lean_inc(x_118); +lean_dec(x_16); +x_120 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_120, 0, x_118); +lean_ctor_set(x_120, 1, x_119); +return x_120; +} +} +} +else +{ +lean_object* x_121; lean_object* x_122; lean_object* x_123; lean_object* x_124; lean_object* x_125; +x_121 = lean_ctor_get(x_3, 1); +lean_inc(x_121); +lean_dec(x_3); +x_122 = lean_box(0); +x_123 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_123, 0, x_122); +lean_ctor_set(x_123, 1, x_121); +x_124 = l___private_init_lean_environment_5__envExtensionsRef; +x_125 = lean_io_ref_get(x_124, x_123); +if (lean_obj_tag(x_125) == 0) +{ +lean_object* x_126; lean_object* x_127; lean_object* x_128; lean_object* x_129; lean_object* x_130; lean_object* x_131; lean_object* x_132; lean_object* x_133; +x_126 = lean_ctor_get(x_125, 0); +lean_inc(x_126); +x_127 = lean_ctor_get(x_125, 1); +lean_inc(x_127); +if (lean_is_exclusive(x_125)) { + lean_ctor_release(x_125, 0); + lean_ctor_release(x_125, 1); + x_128 = x_125; +} else { + lean_dec_ref(x_125); + x_128 = lean_box(0); +} +if (lean_is_scalar(x_128)) { + x_129 = lean_alloc_ctor(0, 2, 0); +} else { + x_129 = x_128; +} +lean_ctor_set(x_129, 0, x_122); +lean_ctor_set(x_129, 1, x_127); +x_130 = lean_array_get_size(x_126); +lean_dec(x_126); +x_131 = l_Lean_registerEnvExtensionUnsafe___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__21___closed__2; +x_132 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_132, 0, x_130); +lean_ctor_set(x_132, 1, x_1); +lean_ctor_set(x_132, 2, x_131); +x_133 = lean_io_ref_get(x_124, x_129); +if (lean_obj_tag(x_133) == 0) +{ +lean_object* x_134; lean_object* x_135; lean_object* x_136; lean_object* x_137; lean_object* x_138; +x_134 = lean_ctor_get(x_133, 0); +lean_inc(x_134); +x_135 = lean_ctor_get(x_133, 1); +lean_inc(x_135); +if (lean_is_exclusive(x_133)) { + lean_ctor_release(x_133, 0); + lean_ctor_release(x_133, 1); + x_136 = x_133; +} else { + lean_dec_ref(x_133); + x_136 = lean_box(0); +} +if (lean_is_scalar(x_136)) { + x_137 = lean_alloc_ctor(0, 2, 0); +} else { + x_137 = x_136; +} +lean_ctor_set(x_137, 0, x_122); +lean_ctor_set(x_137, 1, x_135); +x_138 = lean_io_ref_reset(x_124, x_137); +if (lean_obj_tag(x_138) == 0) +{ +lean_object* x_139; lean_object* x_140; lean_object* x_141; lean_object* x_142; lean_object* x_143; lean_object* x_144; lean_object* x_145; +x_139 = lean_ctor_get(x_138, 1); +lean_inc(x_139); +if (lean_is_exclusive(x_138)) { + lean_ctor_release(x_138, 0); + lean_ctor_release(x_138, 1); + x_140 = x_138; +} else { + lean_dec_ref(x_138); + x_140 = lean_box(0); +} +if (lean_is_scalar(x_140)) { + x_141 = lean_alloc_ctor(0, 2, 0); +} else { + x_141 = x_140; +} +lean_ctor_set(x_141, 0, x_122); +lean_ctor_set(x_141, 1, x_139); +x_142 = l_Lean_registerEnvExtensionUnsafe___rarg___closed__2; +lean_inc(x_132); +x_143 = x_132; +x_144 = lean_array_push(x_134, x_143); +x_145 = lean_io_ref_set(x_124, x_144, x_141); +if (lean_obj_tag(x_145) == 0) +{ +lean_object* x_146; lean_object* x_147; lean_object* x_148; +x_146 = lean_ctor_get(x_145, 1); +lean_inc(x_146); +if (lean_is_exclusive(x_145)) { + lean_ctor_release(x_145, 0); + lean_ctor_release(x_145, 1); + x_147 = x_145; +} else { + lean_dec_ref(x_145); + x_147 = lean_box(0); +} +if (lean_is_scalar(x_147)) { + x_148 = lean_alloc_ctor(0, 2, 0); +} else { + x_148 = x_147; +} +lean_ctor_set(x_148, 0, x_132); +lean_ctor_set(x_148, 1, x_146); +return x_148; +} +else +{ +lean_object* x_149; lean_object* x_150; lean_object* x_151; lean_object* x_152; +lean_dec(x_132); +x_149 = lean_ctor_get(x_145, 0); +lean_inc(x_149); +x_150 = lean_ctor_get(x_145, 1); +lean_inc(x_150); +if (lean_is_exclusive(x_145)) { + lean_ctor_release(x_145, 0); + lean_ctor_release(x_145, 1); + x_151 = x_145; +} else { + lean_dec_ref(x_145); + x_151 = lean_box(0); +} +if (lean_is_scalar(x_151)) { + x_152 = lean_alloc_ctor(1, 2, 0); +} else { + x_152 = x_151; +} +lean_ctor_set(x_152, 0, x_149); +lean_ctor_set(x_152, 1, x_150); +return x_152; +} +} +else +{ +lean_object* x_153; lean_object* x_154; lean_object* x_155; lean_object* x_156; +lean_dec(x_134); +lean_dec(x_132); +x_153 = lean_ctor_get(x_138, 0); +lean_inc(x_153); +x_154 = lean_ctor_get(x_138, 1); +lean_inc(x_154); +if (lean_is_exclusive(x_138)) { + lean_ctor_release(x_138, 0); + lean_ctor_release(x_138, 1); + x_155 = x_138; +} else { + lean_dec_ref(x_138); + x_155 = lean_box(0); +} +if (lean_is_scalar(x_155)) { + x_156 = lean_alloc_ctor(1, 2, 0); +} else { + x_156 = x_155; +} +lean_ctor_set(x_156, 0, x_153); +lean_ctor_set(x_156, 1, x_154); +return x_156; +} +} +else +{ +lean_object* x_157; lean_object* x_158; lean_object* x_159; lean_object* x_160; +lean_dec(x_132); +x_157 = lean_ctor_get(x_133, 0); +lean_inc(x_157); +x_158 = lean_ctor_get(x_133, 1); +lean_inc(x_158); +if (lean_is_exclusive(x_133)) { + lean_ctor_release(x_133, 0); + lean_ctor_release(x_133, 1); + x_159 = x_133; +} else { + lean_dec_ref(x_133); + x_159 = lean_box(0); +} +if (lean_is_scalar(x_159)) { + x_160 = lean_alloc_ctor(1, 2, 0); +} else { + x_160 = x_159; +} +lean_ctor_set(x_160, 0, x_157); +lean_ctor_set(x_160, 1, x_158); +return x_160; +} +} +else +{ +lean_object* x_161; lean_object* x_162; lean_object* x_163; lean_object* x_164; +lean_dec(x_1); +x_161 = lean_ctor_get(x_125, 0); +lean_inc(x_161); +x_162 = lean_ctor_get(x_125, 1); +lean_inc(x_162); +if (lean_is_exclusive(x_125)) { + lean_ctor_release(x_125, 0); + lean_ctor_release(x_125, 1); + x_163 = x_125; +} else { + lean_dec_ref(x_125); + x_163 = lean_box(0); +} +if (lean_is_scalar(x_163)) { + x_164 = lean_alloc_ctor(1, 2, 0); +} else { + x_164 = x_163; +} +lean_ctor_set(x_164, 0, x_161); +lean_ctor_set(x_164, 1, x_162); +return x_164; +} +} +} +} +else +{ +uint8_t x_165; +lean_dec(x_1); +x_165 = !lean_is_exclusive(x_3); +if (x_165 == 0) +{ +return x_3; +} +else +{ +lean_object* x_166; lean_object* x_167; lean_object* x_168; +x_166 = lean_ctor_get(x_3, 0); +x_167 = lean_ctor_get(x_3, 1); +lean_inc(x_167); +lean_inc(x_166); +lean_dec(x_3); +x_168 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_168, 0, x_166); +lean_ctor_set(x_168, 1, x_167); +return x_168; +} +} +} +} +lean_object* l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__19(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; lean_object* x_4; +x_3 = l___private_init_lean_environment_8__persistentEnvExtensionsRef; +x_4 = lean_io_ref_get(x_3, x_2); +if (lean_obj_tag(x_4) == 0) +{ +uint8_t x_5; +x_5 = !lean_is_exclusive(x_4); +if (x_5 == 0) +{ +lean_object* x_6; lean_object* x_7; uint8_t x_8; +x_6 = lean_ctor_get(x_4, 0); +x_7 = lean_unsigned_to_nat(0u); +x_8 = l_Array_anyMAux___main___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__20(x_1, x_6, x_7); +lean_dec(x_6); +if (x_8 == 0) +{ +lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; +x_9 = lean_box(0); +lean_ctor_set(x_4, 0, x_9); +x_10 = lean_ctor_get(x_1, 1); +lean_inc(x_10); +x_11 = l_Array_empty___closed__1; +lean_inc(x_10); +x_12 = lean_apply_1(x_10, x_11); +x_13 = l_Lean_registerPersistentEnvExtensionUnsafe___rarg___closed__1; +x_14 = lean_alloc_closure((void*)(l_EState_bind___rarg), 3, 2); +lean_closure_set(x_14, 0, x_12); +lean_closure_set(x_14, 1, x_13); +x_15 = l_Lean_registerEnvExtensionUnsafe___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__21(x_14, x_4); +if (lean_obj_tag(x_15) == 0) +{ +uint8_t x_16; +x_16 = !lean_is_exclusive(x_15); +if (x_16 == 0) +{ +lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; +x_17 = lean_ctor_get(x_15, 0); +lean_ctor_set(x_15, 0, x_9); +x_18 = lean_ctor_get(x_1, 0); +lean_inc(x_18); +x_19 = lean_ctor_get(x_1, 2); +lean_inc(x_19); +x_20 = lean_ctor_get(x_1, 3); +lean_inc(x_20); +x_21 = lean_ctor_get(x_1, 4); +lean_inc(x_21); +lean_dec(x_1); +x_22 = lean_alloc_ctor(0, 6, 0); +lean_ctor_set(x_22, 0, x_17); +lean_ctor_set(x_22, 1, x_18); +lean_ctor_set(x_22, 2, x_10); +lean_ctor_set(x_22, 3, x_19); +lean_ctor_set(x_22, 4, x_20); +lean_ctor_set(x_22, 5, x_21); +x_23 = lean_io_ref_get(x_3, x_15); +if (lean_obj_tag(x_23) == 0) +{ +uint8_t x_24; +x_24 = !lean_is_exclusive(x_23); +if (x_24 == 0) +{ +lean_object* x_25; lean_object* x_26; +x_25 = lean_ctor_get(x_23, 0); +lean_ctor_set(x_23, 0, x_9); +x_26 = lean_io_ref_reset(x_3, x_23); +if (lean_obj_tag(x_26) == 0) +{ +uint8_t x_27; +x_27 = !lean_is_exclusive(x_26); +if (x_27 == 0) +{ +lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; +x_28 = lean_ctor_get(x_26, 0); +lean_dec(x_28); +lean_ctor_set(x_26, 0, x_9); +x_29 = l_Lean_registerPersistentEnvExtensionUnsafe___rarg___closed__2; +lean_inc(x_22); +x_30 = x_22; +x_31 = lean_array_push(x_25, x_30); +x_32 = lean_io_ref_set(x_3, x_31, x_26); +if (lean_obj_tag(x_32) == 0) +{ +uint8_t x_33; +x_33 = !lean_is_exclusive(x_32); +if (x_33 == 0) +{ +lean_object* x_34; +x_34 = lean_ctor_get(x_32, 0); +lean_dec(x_34); +lean_ctor_set(x_32, 0, x_22); +return x_32; +} +else +{ +lean_object* x_35; lean_object* x_36; +x_35 = lean_ctor_get(x_32, 1); +lean_inc(x_35); +lean_dec(x_32); +x_36 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_36, 0, x_22); +lean_ctor_set(x_36, 1, x_35); +return x_36; +} +} +else +{ +uint8_t x_37; +lean_dec(x_22); +x_37 = !lean_is_exclusive(x_32); +if (x_37 == 0) +{ +return x_32; +} +else +{ +lean_object* x_38; lean_object* x_39; lean_object* x_40; +x_38 = lean_ctor_get(x_32, 0); +x_39 = lean_ctor_get(x_32, 1); +lean_inc(x_39); +lean_inc(x_38); +lean_dec(x_32); +x_40 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_40, 0, x_38); +lean_ctor_set(x_40, 1, x_39); +return x_40; +} +} +} +else +{ +lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; +x_41 = lean_ctor_get(x_26, 1); +lean_inc(x_41); +lean_dec(x_26); +x_42 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_42, 0, x_9); +lean_ctor_set(x_42, 1, x_41); +x_43 = l_Lean_registerPersistentEnvExtensionUnsafe___rarg___closed__2; +lean_inc(x_22); +x_44 = x_22; +x_45 = lean_array_push(x_25, x_44); +x_46 = lean_io_ref_set(x_3, x_45, x_42); +if (lean_obj_tag(x_46) == 0) +{ +lean_object* x_47; lean_object* x_48; lean_object* x_49; +x_47 = lean_ctor_get(x_46, 1); +lean_inc(x_47); +if (lean_is_exclusive(x_46)) { + lean_ctor_release(x_46, 0); + lean_ctor_release(x_46, 1); + x_48 = x_46; +} else { + lean_dec_ref(x_46); + x_48 = lean_box(0); +} +if (lean_is_scalar(x_48)) { + x_49 = lean_alloc_ctor(0, 2, 0); +} else { + x_49 = x_48; +} +lean_ctor_set(x_49, 0, x_22); +lean_ctor_set(x_49, 1, x_47); +return x_49; +} +else +{ +lean_object* x_50; lean_object* x_51; lean_object* x_52; lean_object* x_53; +lean_dec(x_22); +x_50 = lean_ctor_get(x_46, 0); +lean_inc(x_50); +x_51 = lean_ctor_get(x_46, 1); +lean_inc(x_51); +if (lean_is_exclusive(x_46)) { + lean_ctor_release(x_46, 0); + lean_ctor_release(x_46, 1); + x_52 = x_46; +} else { + lean_dec_ref(x_46); + x_52 = lean_box(0); +} +if (lean_is_scalar(x_52)) { + x_53 = lean_alloc_ctor(1, 2, 0); +} else { + x_53 = x_52; +} +lean_ctor_set(x_53, 0, x_50); +lean_ctor_set(x_53, 1, x_51); +return x_53; +} +} +} +else +{ +uint8_t x_54; +lean_dec(x_25); +lean_dec(x_22); +x_54 = !lean_is_exclusive(x_26); +if (x_54 == 0) +{ +return x_26; +} +else +{ +lean_object* x_55; lean_object* x_56; lean_object* x_57; +x_55 = lean_ctor_get(x_26, 0); +x_56 = lean_ctor_get(x_26, 1); +lean_inc(x_56); +lean_inc(x_55); +lean_dec(x_26); +x_57 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_57, 0, x_55); +lean_ctor_set(x_57, 1, x_56); +return x_57; +} +} +} +else +{ +lean_object* x_58; lean_object* x_59; lean_object* x_60; lean_object* x_61; +x_58 = lean_ctor_get(x_23, 0); +x_59 = lean_ctor_get(x_23, 1); +lean_inc(x_59); +lean_inc(x_58); +lean_dec(x_23); +x_60 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_60, 0, x_9); +lean_ctor_set(x_60, 1, x_59); +x_61 = lean_io_ref_reset(x_3, x_60); +if (lean_obj_tag(x_61) == 0) +{ +lean_object* x_62; lean_object* x_63; lean_object* x_64; lean_object* x_65; lean_object* x_66; lean_object* x_67; lean_object* x_68; +x_62 = lean_ctor_get(x_61, 1); +lean_inc(x_62); +if (lean_is_exclusive(x_61)) { + lean_ctor_release(x_61, 0); + lean_ctor_release(x_61, 1); + x_63 = x_61; +} else { + lean_dec_ref(x_61); + x_63 = lean_box(0); +} +if (lean_is_scalar(x_63)) { + x_64 = lean_alloc_ctor(0, 2, 0); +} else { + x_64 = x_63; +} +lean_ctor_set(x_64, 0, x_9); +lean_ctor_set(x_64, 1, x_62); +x_65 = l_Lean_registerPersistentEnvExtensionUnsafe___rarg___closed__2; +lean_inc(x_22); +x_66 = x_22; +x_67 = lean_array_push(x_58, x_66); +x_68 = lean_io_ref_set(x_3, x_67, x_64); +if (lean_obj_tag(x_68) == 0) +{ +lean_object* x_69; lean_object* x_70; lean_object* x_71; +x_69 = lean_ctor_get(x_68, 1); +lean_inc(x_69); +if (lean_is_exclusive(x_68)) { + lean_ctor_release(x_68, 0); + lean_ctor_release(x_68, 1); + x_70 = x_68; +} else { + lean_dec_ref(x_68); + x_70 = lean_box(0); +} +if (lean_is_scalar(x_70)) { + x_71 = lean_alloc_ctor(0, 2, 0); +} else { + x_71 = x_70; +} +lean_ctor_set(x_71, 0, x_22); +lean_ctor_set(x_71, 1, x_69); +return x_71; +} +else +{ +lean_object* x_72; lean_object* x_73; lean_object* x_74; lean_object* x_75; +lean_dec(x_22); +x_72 = lean_ctor_get(x_68, 0); +lean_inc(x_72); +x_73 = lean_ctor_get(x_68, 1); +lean_inc(x_73); +if (lean_is_exclusive(x_68)) { + lean_ctor_release(x_68, 0); + lean_ctor_release(x_68, 1); + x_74 = x_68; +} else { + lean_dec_ref(x_68); + x_74 = lean_box(0); +} +if (lean_is_scalar(x_74)) { + x_75 = lean_alloc_ctor(1, 2, 0); +} else { + x_75 = x_74; +} +lean_ctor_set(x_75, 0, x_72); +lean_ctor_set(x_75, 1, x_73); +return x_75; +} +} +else +{ +lean_object* x_76; lean_object* x_77; lean_object* x_78; lean_object* x_79; +lean_dec(x_58); +lean_dec(x_22); +x_76 = lean_ctor_get(x_61, 0); +lean_inc(x_76); +x_77 = lean_ctor_get(x_61, 1); +lean_inc(x_77); +if (lean_is_exclusive(x_61)) { + lean_ctor_release(x_61, 0); + lean_ctor_release(x_61, 1); + x_78 = x_61; +} else { + lean_dec_ref(x_61); + x_78 = lean_box(0); +} +if (lean_is_scalar(x_78)) { + x_79 = lean_alloc_ctor(1, 2, 0); +} else { + x_79 = x_78; +} +lean_ctor_set(x_79, 0, x_76); +lean_ctor_set(x_79, 1, x_77); +return x_79; +} +} +} +else +{ +uint8_t x_80; +lean_dec(x_22); +x_80 = !lean_is_exclusive(x_23); +if (x_80 == 0) +{ +return x_23; +} +else +{ +lean_object* x_81; lean_object* x_82; lean_object* x_83; +x_81 = lean_ctor_get(x_23, 0); +x_82 = lean_ctor_get(x_23, 1); +lean_inc(x_82); +lean_inc(x_81); +lean_dec(x_23); +x_83 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_83, 0, x_81); +lean_ctor_set(x_83, 1, x_82); +return x_83; +} +} +} +else +{ +lean_object* x_84; lean_object* x_85; lean_object* x_86; lean_object* x_87; lean_object* x_88; lean_object* x_89; lean_object* x_90; lean_object* x_91; lean_object* x_92; +x_84 = lean_ctor_get(x_15, 0); +x_85 = lean_ctor_get(x_15, 1); +lean_inc(x_85); +lean_inc(x_84); +lean_dec(x_15); +x_86 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_86, 0, x_9); +lean_ctor_set(x_86, 1, x_85); +x_87 = lean_ctor_get(x_1, 0); +lean_inc(x_87); +x_88 = lean_ctor_get(x_1, 2); +lean_inc(x_88); +x_89 = lean_ctor_get(x_1, 3); +lean_inc(x_89); +x_90 = lean_ctor_get(x_1, 4); +lean_inc(x_90); +lean_dec(x_1); +x_91 = lean_alloc_ctor(0, 6, 0); +lean_ctor_set(x_91, 0, x_84); +lean_ctor_set(x_91, 1, x_87); +lean_ctor_set(x_91, 2, x_10); +lean_ctor_set(x_91, 3, x_88); +lean_ctor_set(x_91, 4, x_89); +lean_ctor_set(x_91, 5, x_90); +x_92 = lean_io_ref_get(x_3, x_86); +if (lean_obj_tag(x_92) == 0) +{ +lean_object* x_93; lean_object* x_94; lean_object* x_95; lean_object* x_96; lean_object* x_97; +x_93 = lean_ctor_get(x_92, 0); +lean_inc(x_93); +x_94 = lean_ctor_get(x_92, 1); +lean_inc(x_94); +if (lean_is_exclusive(x_92)) { + lean_ctor_release(x_92, 0); + lean_ctor_release(x_92, 1); + x_95 = x_92; +} else { + lean_dec_ref(x_92); + x_95 = lean_box(0); +} +if (lean_is_scalar(x_95)) { + x_96 = lean_alloc_ctor(0, 2, 0); +} else { + x_96 = x_95; +} +lean_ctor_set(x_96, 0, x_9); +lean_ctor_set(x_96, 1, x_94); +x_97 = lean_io_ref_reset(x_3, x_96); +if (lean_obj_tag(x_97) == 0) +{ +lean_object* x_98; lean_object* x_99; lean_object* x_100; lean_object* x_101; lean_object* x_102; lean_object* x_103; lean_object* x_104; +x_98 = lean_ctor_get(x_97, 1); +lean_inc(x_98); +if (lean_is_exclusive(x_97)) { + lean_ctor_release(x_97, 0); + lean_ctor_release(x_97, 1); + x_99 = x_97; +} else { + lean_dec_ref(x_97); + x_99 = lean_box(0); +} +if (lean_is_scalar(x_99)) { + x_100 = lean_alloc_ctor(0, 2, 0); +} else { + x_100 = x_99; +} +lean_ctor_set(x_100, 0, x_9); +lean_ctor_set(x_100, 1, x_98); +x_101 = l_Lean_registerPersistentEnvExtensionUnsafe___rarg___closed__2; +lean_inc(x_91); +x_102 = x_91; +x_103 = lean_array_push(x_93, x_102); +x_104 = lean_io_ref_set(x_3, x_103, x_100); +if (lean_obj_tag(x_104) == 0) +{ +lean_object* x_105; lean_object* x_106; lean_object* x_107; +x_105 = lean_ctor_get(x_104, 1); +lean_inc(x_105); +if (lean_is_exclusive(x_104)) { + lean_ctor_release(x_104, 0); + lean_ctor_release(x_104, 1); + x_106 = x_104; +} else { + lean_dec_ref(x_104); + x_106 = lean_box(0); +} +if (lean_is_scalar(x_106)) { + x_107 = lean_alloc_ctor(0, 2, 0); +} else { + x_107 = x_106; +} +lean_ctor_set(x_107, 0, x_91); +lean_ctor_set(x_107, 1, x_105); +return x_107; +} +else +{ +lean_object* x_108; lean_object* x_109; lean_object* x_110; lean_object* x_111; +lean_dec(x_91); +x_108 = lean_ctor_get(x_104, 0); +lean_inc(x_108); +x_109 = lean_ctor_get(x_104, 1); +lean_inc(x_109); +if (lean_is_exclusive(x_104)) { + lean_ctor_release(x_104, 0); + lean_ctor_release(x_104, 1); + x_110 = x_104; +} else { + lean_dec_ref(x_104); + x_110 = lean_box(0); +} +if (lean_is_scalar(x_110)) { + x_111 = lean_alloc_ctor(1, 2, 0); +} else { + x_111 = x_110; +} +lean_ctor_set(x_111, 0, x_108); +lean_ctor_set(x_111, 1, x_109); +return x_111; +} +} +else +{ +lean_object* x_112; lean_object* x_113; lean_object* x_114; lean_object* x_115; +lean_dec(x_93); +lean_dec(x_91); +x_112 = lean_ctor_get(x_97, 0); +lean_inc(x_112); +x_113 = lean_ctor_get(x_97, 1); +lean_inc(x_113); +if (lean_is_exclusive(x_97)) { + lean_ctor_release(x_97, 0); + lean_ctor_release(x_97, 1); + x_114 = x_97; +} else { + lean_dec_ref(x_97); + x_114 = lean_box(0); +} +if (lean_is_scalar(x_114)) { + x_115 = lean_alloc_ctor(1, 2, 0); +} else { + x_115 = x_114; +} +lean_ctor_set(x_115, 0, x_112); +lean_ctor_set(x_115, 1, x_113); +return x_115; +} +} +else +{ +lean_object* x_116; lean_object* x_117; lean_object* x_118; lean_object* x_119; +lean_dec(x_91); +x_116 = lean_ctor_get(x_92, 0); +lean_inc(x_116); +x_117 = lean_ctor_get(x_92, 1); +lean_inc(x_117); +if (lean_is_exclusive(x_92)) { + lean_ctor_release(x_92, 0); + lean_ctor_release(x_92, 1); + x_118 = x_92; +} else { + lean_dec_ref(x_92); + x_118 = lean_box(0); +} +if (lean_is_scalar(x_118)) { + x_119 = lean_alloc_ctor(1, 2, 0); +} else { + x_119 = x_118; +} +lean_ctor_set(x_119, 0, x_116); +lean_ctor_set(x_119, 1, x_117); +return x_119; +} +} +} +else +{ +uint8_t x_120; +lean_dec(x_10); +lean_dec(x_1); +x_120 = !lean_is_exclusive(x_15); +if (x_120 == 0) +{ +return x_15; +} +else +{ +lean_object* x_121; lean_object* x_122; lean_object* x_123; +x_121 = lean_ctor_get(x_15, 0); +x_122 = lean_ctor_get(x_15, 1); +lean_inc(x_122); +lean_inc(x_121); +lean_dec(x_15); +x_123 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_123, 0, x_121); +lean_ctor_set(x_123, 1, x_122); +return x_123; +} +} +} +else +{ +lean_object* x_124; lean_object* x_125; lean_object* x_126; lean_object* x_127; lean_object* x_128; lean_object* x_129; lean_object* x_130; +x_124 = lean_ctor_get(x_1, 0); +lean_inc(x_124); +lean_dec(x_1); +x_125 = l_System_FilePath_dirName___closed__1; +x_126 = l_Lean_Name_toStringWithSep___main(x_125, x_124); +x_127 = l_Lean_registerPersistentEnvExtensionUnsafe___rarg___closed__3; +x_128 = lean_string_append(x_127, x_126); +lean_dec(x_126); +x_129 = l_Lean_registerPersistentEnvExtensionUnsafe___rarg___closed__4; +x_130 = lean_string_append(x_128, x_129); +lean_ctor_set_tag(x_4, 1); +lean_ctor_set(x_4, 0, x_130); +return x_4; +} +} +else +{ +lean_object* x_131; lean_object* x_132; lean_object* x_133; uint8_t x_134; +x_131 = lean_ctor_get(x_4, 0); +x_132 = lean_ctor_get(x_4, 1); +lean_inc(x_132); +lean_inc(x_131); +lean_dec(x_4); +x_133 = lean_unsigned_to_nat(0u); +x_134 = l_Array_anyMAux___main___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__20(x_1, x_131, x_133); +lean_dec(x_131); +if (x_134 == 0) +{ +lean_object* x_135; lean_object* x_136; lean_object* x_137; lean_object* x_138; lean_object* x_139; lean_object* x_140; lean_object* x_141; lean_object* x_142; +x_135 = lean_box(0); +x_136 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_136, 0, x_135); +lean_ctor_set(x_136, 1, x_132); +x_137 = lean_ctor_get(x_1, 1); +lean_inc(x_137); +x_138 = l_Array_empty___closed__1; +lean_inc(x_137); +x_139 = lean_apply_1(x_137, x_138); +x_140 = l_Lean_registerPersistentEnvExtensionUnsafe___rarg___closed__1; +x_141 = lean_alloc_closure((void*)(l_EState_bind___rarg), 3, 2); +lean_closure_set(x_141, 0, x_139); +lean_closure_set(x_141, 1, x_140); +x_142 = l_Lean_registerEnvExtensionUnsafe___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__21(x_141, x_136); +if (lean_obj_tag(x_142) == 0) +{ +lean_object* x_143; lean_object* x_144; lean_object* x_145; lean_object* x_146; lean_object* x_147; lean_object* x_148; lean_object* x_149; lean_object* x_150; lean_object* x_151; lean_object* x_152; +x_143 = lean_ctor_get(x_142, 0); +lean_inc(x_143); +x_144 = lean_ctor_get(x_142, 1); +lean_inc(x_144); +if (lean_is_exclusive(x_142)) { + lean_ctor_release(x_142, 0); + lean_ctor_release(x_142, 1); + x_145 = x_142; +} else { + lean_dec_ref(x_142); + x_145 = lean_box(0); +} +if (lean_is_scalar(x_145)) { + x_146 = lean_alloc_ctor(0, 2, 0); +} else { + x_146 = x_145; +} +lean_ctor_set(x_146, 0, x_135); +lean_ctor_set(x_146, 1, x_144); +x_147 = lean_ctor_get(x_1, 0); +lean_inc(x_147); +x_148 = lean_ctor_get(x_1, 2); +lean_inc(x_148); +x_149 = lean_ctor_get(x_1, 3); +lean_inc(x_149); +x_150 = lean_ctor_get(x_1, 4); +lean_inc(x_150); +lean_dec(x_1); +x_151 = lean_alloc_ctor(0, 6, 0); +lean_ctor_set(x_151, 0, x_143); +lean_ctor_set(x_151, 1, x_147); +lean_ctor_set(x_151, 2, x_137); +lean_ctor_set(x_151, 3, x_148); +lean_ctor_set(x_151, 4, x_149); +lean_ctor_set(x_151, 5, x_150); +x_152 = lean_io_ref_get(x_3, x_146); +if (lean_obj_tag(x_152) == 0) +{ +lean_object* x_153; lean_object* x_154; lean_object* x_155; lean_object* x_156; lean_object* x_157; +x_153 = lean_ctor_get(x_152, 0); +lean_inc(x_153); +x_154 = lean_ctor_get(x_152, 1); +lean_inc(x_154); +if (lean_is_exclusive(x_152)) { + lean_ctor_release(x_152, 0); + lean_ctor_release(x_152, 1); + x_155 = x_152; +} else { + lean_dec_ref(x_152); + x_155 = lean_box(0); +} +if (lean_is_scalar(x_155)) { + x_156 = lean_alloc_ctor(0, 2, 0); +} else { + x_156 = x_155; +} +lean_ctor_set(x_156, 0, x_135); +lean_ctor_set(x_156, 1, x_154); +x_157 = lean_io_ref_reset(x_3, x_156); +if (lean_obj_tag(x_157) == 0) +{ +lean_object* x_158; lean_object* x_159; lean_object* x_160; lean_object* x_161; lean_object* x_162; lean_object* x_163; lean_object* x_164; +x_158 = lean_ctor_get(x_157, 1); +lean_inc(x_158); +if (lean_is_exclusive(x_157)) { + lean_ctor_release(x_157, 0); + lean_ctor_release(x_157, 1); + x_159 = x_157; +} else { + lean_dec_ref(x_157); + x_159 = lean_box(0); +} +if (lean_is_scalar(x_159)) { + x_160 = lean_alloc_ctor(0, 2, 0); +} else { + x_160 = x_159; +} +lean_ctor_set(x_160, 0, x_135); +lean_ctor_set(x_160, 1, x_158); +x_161 = l_Lean_registerPersistentEnvExtensionUnsafe___rarg___closed__2; +lean_inc(x_151); +x_162 = x_151; +x_163 = lean_array_push(x_153, x_162); +x_164 = lean_io_ref_set(x_3, x_163, x_160); +if (lean_obj_tag(x_164) == 0) +{ +lean_object* x_165; lean_object* x_166; lean_object* x_167; +x_165 = lean_ctor_get(x_164, 1); +lean_inc(x_165); +if (lean_is_exclusive(x_164)) { + lean_ctor_release(x_164, 0); + lean_ctor_release(x_164, 1); + x_166 = x_164; +} else { + lean_dec_ref(x_164); + x_166 = lean_box(0); +} +if (lean_is_scalar(x_166)) { + x_167 = lean_alloc_ctor(0, 2, 0); +} else { + x_167 = x_166; +} +lean_ctor_set(x_167, 0, x_151); +lean_ctor_set(x_167, 1, x_165); +return x_167; +} +else +{ +lean_object* x_168; lean_object* x_169; lean_object* x_170; lean_object* x_171; +lean_dec(x_151); +x_168 = lean_ctor_get(x_164, 0); +lean_inc(x_168); +x_169 = lean_ctor_get(x_164, 1); +lean_inc(x_169); +if (lean_is_exclusive(x_164)) { + lean_ctor_release(x_164, 0); + lean_ctor_release(x_164, 1); + x_170 = x_164; +} else { + lean_dec_ref(x_164); + x_170 = lean_box(0); +} +if (lean_is_scalar(x_170)) { + x_171 = lean_alloc_ctor(1, 2, 0); +} else { + x_171 = x_170; +} +lean_ctor_set(x_171, 0, x_168); +lean_ctor_set(x_171, 1, x_169); +return x_171; +} +} +else +{ +lean_object* x_172; lean_object* x_173; lean_object* x_174; lean_object* x_175; +lean_dec(x_153); +lean_dec(x_151); +x_172 = lean_ctor_get(x_157, 0); +lean_inc(x_172); +x_173 = lean_ctor_get(x_157, 1); +lean_inc(x_173); +if (lean_is_exclusive(x_157)) { + lean_ctor_release(x_157, 0); + lean_ctor_release(x_157, 1); + x_174 = x_157; +} else { + lean_dec_ref(x_157); + x_174 = lean_box(0); +} +if (lean_is_scalar(x_174)) { + x_175 = lean_alloc_ctor(1, 2, 0); +} else { + x_175 = x_174; +} +lean_ctor_set(x_175, 0, x_172); +lean_ctor_set(x_175, 1, x_173); +return x_175; +} +} +else +{ +lean_object* x_176; lean_object* x_177; lean_object* x_178; lean_object* x_179; +lean_dec(x_151); +x_176 = lean_ctor_get(x_152, 0); +lean_inc(x_176); +x_177 = lean_ctor_get(x_152, 1); +lean_inc(x_177); +if (lean_is_exclusive(x_152)) { + lean_ctor_release(x_152, 0); + lean_ctor_release(x_152, 1); + x_178 = x_152; +} else { + lean_dec_ref(x_152); + x_178 = lean_box(0); +} +if (lean_is_scalar(x_178)) { + x_179 = lean_alloc_ctor(1, 2, 0); +} else { + x_179 = x_178; +} +lean_ctor_set(x_179, 0, x_176); +lean_ctor_set(x_179, 1, x_177); +return x_179; +} +} +else +{ +lean_object* x_180; lean_object* x_181; lean_object* x_182; lean_object* x_183; +lean_dec(x_137); +lean_dec(x_1); +x_180 = lean_ctor_get(x_142, 0); +lean_inc(x_180); +x_181 = lean_ctor_get(x_142, 1); +lean_inc(x_181); +if (lean_is_exclusive(x_142)) { + lean_ctor_release(x_142, 0); + lean_ctor_release(x_142, 1); + x_182 = x_142; +} else { + lean_dec_ref(x_142); + x_182 = lean_box(0); +} +if (lean_is_scalar(x_182)) { + x_183 = lean_alloc_ctor(1, 2, 0); +} else { + x_183 = x_182; +} +lean_ctor_set(x_183, 0, x_180); +lean_ctor_set(x_183, 1, x_181); +return x_183; +} +} +else +{ +lean_object* x_184; lean_object* x_185; lean_object* x_186; lean_object* x_187; lean_object* x_188; lean_object* x_189; lean_object* x_190; lean_object* x_191; +x_184 = lean_ctor_get(x_1, 0); +lean_inc(x_184); +lean_dec(x_1); +x_185 = l_System_FilePath_dirName___closed__1; +x_186 = l_Lean_Name_toStringWithSep___main(x_185, x_184); +x_187 = l_Lean_registerPersistentEnvExtensionUnsafe___rarg___closed__3; +x_188 = lean_string_append(x_187, x_186); +lean_dec(x_186); +x_189 = l_Lean_registerPersistentEnvExtensionUnsafe___rarg___closed__4; +x_190 = lean_string_append(x_188, x_189); +x_191 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_191, 0, x_190); +lean_ctor_set(x_191, 1, x_132); +return x_191; +} +} +} +else +{ +uint8_t x_192; +lean_dec(x_1); +x_192 = !lean_is_exclusive(x_4); +if (x_192 == 0) +{ +return x_4; +} +else +{ +lean_object* x_193; lean_object* x_194; lean_object* x_195; +x_193 = lean_ctor_get(x_4, 0); +x_194 = lean_ctor_get(x_4, 1); +lean_inc(x_194); +lean_inc(x_193); +lean_dec(x_4); +x_195 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_195, 0, x_193); +lean_ctor_set(x_195, 1, x_194); +return x_195; +} +} +} +} +lean_object* l_Lean_registerSimplePersistentEnvExtension___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__18(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; +x_3 = lean_ctor_get(x_1, 0); +lean_inc(x_3); +lean_inc(x_1); +x_4 = lean_alloc_closure((void*)(l_Lean_registerSimplePersistentEnvExtension___rarg___lambda__1), 3, 1); +lean_closure_set(x_4, 0, x_1); +lean_inc(x_1); +x_5 = lean_alloc_closure((void*)(l_Lean_registerSimplePersistentEnvExtension___rarg___lambda__2), 3, 1); +lean_closure_set(x_5, 0, x_1); +x_6 = lean_alloc_closure((void*)(l_Lean_registerSimplePersistentEnvExtension___rarg___lambda__3), 2, 1); +lean_closure_set(x_6, 0, x_1); +x_7 = l_Lean_registerSimplePersistentEnvExtension___rarg___closed__1; +x_8 = lean_alloc_ctor(0, 5, 0); +lean_ctor_set(x_8, 0, x_3); +lean_ctor_set(x_8, 1, x_4); +lean_ctor_set(x_8, 2, x_5); +lean_ctor_set(x_8, 3, x_6); +lean_ctor_set(x_8, 4, x_7); +x_9 = l_Lean_registerPersistentEnvExtensionUnsafe___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__19(x_8, x_2); +return x_9; +} +} +lean_object* l_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___lambda__1(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; lean_object* x_4; lean_object* x_5; +x_3 = lean_ctor_get(x_2, 0); +lean_inc(x_3); +x_4 = lean_ctor_get(x_2, 1); +lean_inc(x_4); +lean_dec(x_2); +x_5 = l_Lean_SMap_insert___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__1(x_1, x_3, x_4); +return x_5; +} +} +lean_object* l_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___lambda__2(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; +x_3 = lean_unsigned_to_nat(0u); +x_4 = l_Lean_SMap_empty___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__12; +x_5 = l_Array_miterateAux___main___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__16(x_2, x_2, x_3, x_4); +x_6 = l_Lean_SMap_switch___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__17(x_5); +return x_6; +} +} +lean_object* _init_l_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("unreachBranchesFunSummary"); +return x_1; +} +} +lean_object* _init_l_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* _init_l_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___closed__3() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_SMap_empty___at_Lean_Environment_Inhabited___spec__2___closed__1; +x_2 = lean_alloc_closure((void*)(l_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___lambda__2___boxed), 2, 1); +lean_closure_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* _init_l_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___closed__4() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___lambda__1), 2, 0); +return x_1; +} +} +lean_object* _init_l_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___closed__5() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; +x_1 = l_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___closed__2; +x_2 = l_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___closed__4; +x_3 = l_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___closed__3; +x_4 = l_Lean_regNamespacesExtension___closed__5; +x_5 = lean_alloc_ctor(0, 4, 0); +lean_ctor_set(x_5, 0, x_1); +lean_ctor_set(x_5, 1, x_2); +lean_ctor_set(x_5, 2, x_3); +lean_ctor_set(x_5, 3, x_4); +return x_5; +} +} +lean_object* l_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension(lean_object* x_1) { +_start: +{ +lean_object* x_2; lean_object* x_3; +x_2 = l_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___closed__5; +x_3 = l_Lean_registerSimplePersistentEnvExtension___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__18(x_2, x_1); +return x_3; +} +} +lean_object* l_Array_miterateAux___main___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__5___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: +{ +size_t x_7; lean_object* x_8; +x_7 = lean_unbox_usize(x_1); +lean_dec(x_1); +x_8 = l_Array_miterateAux___main___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__5(x_7, x_2, x_3, x_4, x_5, x_6); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +return x_8; +} +} +lean_object* l_PersistentHashMap_insertAux___main___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__3___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_2); +lean_dec(x_2); +x_7 = lean_unbox_usize(x_3); +lean_dec(x_3); +x_8 = l_PersistentHashMap_insertAux___main___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__3(x_1, x_6, x_7, x_4, x_5); +return x_8; +} +} +lean_object* l_AssocList_contains___main___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__7___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +uint8_t x_3; lean_object* x_4; +x_3 = l_AssocList_contains___main___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__7(x_1, x_2); +lean_dec(x_2); +lean_dec(x_1); +x_4 = lean_box(x_3); +return x_4; +} +} +lean_object* l_Array_miterateAux___main___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__15___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; +x_5 = l_Array_miterateAux___main___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__15(x_1, x_2, x_3, x_4); +lean_dec(x_2); +lean_dec(x_1); +return x_5; +} +} +lean_object* l_Array_miterateAux___main___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__16___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; +x_5 = l_Array_miterateAux___main___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__16(x_1, x_2, x_3, x_4); +lean_dec(x_2); +lean_dec(x_1); +return x_5; +} +} +lean_object* l_Lean_mkStateFromImportedEntries___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__14___rarg___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = l_Lean_mkStateFromImportedEntries___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__14___rarg(x_1, x_2); +lean_dec(x_2); +return x_3; +} +} +lean_object* l_Lean_mkStateFromImportedEntries___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__14___boxed(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = l_Lean_mkStateFromImportedEntries___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__14(x_1); +lean_dec(x_1); +return x_2; +} +} +lean_object* l_Array_anyMAux___main___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__20___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +uint8_t x_4; lean_object* x_5; +x_4 = l_Array_anyMAux___main___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__20(x_1, x_2, x_3); +lean_dec(x_2); +lean_dec(x_1); +x_5 = lean_box(x_4); +return x_5; +} +} +lean_object* l_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___lambda__2___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = l_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___lambda__2(x_1, x_2); +lean_dec(x_2); +lean_dec(x_1); +return x_3; +} +} +lean_object* l_Lean_IR_UnreachableBranches_functionSummariesExt___elambda__1(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_box(0); +return x_2; +} +} +lean_object* l_Lean_IR_UnreachableBranches_functionSummariesExt___elambda__2(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = l_Array_empty___closed__1; +return x_2; +} +} +lean_object* l_Lean_IR_UnreachableBranches_functionSummariesExt___elambda__3(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_inc(x_1); +return x_1; +} +} +lean_object* l_Lean_IR_UnreachableBranches_functionSummariesExt___elambda__4___rarg(lean_object* x_1) { +_start: +{ +uint8_t x_2; +x_2 = !lean_is_exclusive(x_1); +if (x_2 == 0) +{ +lean_object* x_3; lean_object* x_4; +x_3 = lean_ctor_get(x_1, 0); +lean_dec(x_3); +x_4 = l_String_splitAux___main___closed__1; +lean_ctor_set_tag(x_1, 1); +lean_ctor_set(x_1, 0, x_4); +return x_1; +} +else +{ +lean_object* x_5; lean_object* x_6; lean_object* x_7; +x_5 = lean_ctor_get(x_1, 1); +lean_inc(x_5); +lean_dec(x_1); +x_6 = l_String_splitAux___main___closed__1; +x_7 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_7, 0, x_6); +lean_ctor_set(x_7, 1, x_5); +return x_7; +} +} +} +lean_object* l_Lean_IR_UnreachableBranches_functionSummariesExt___elambda__4(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_Lean_IR_UnreachableBranches_functionSummariesExt___elambda__4___rarg), 1, 0); +return x_2; +} +} +lean_object* _init_l_Lean_IR_UnreachableBranches_functionSummariesExt___closed__1() { +_start: +{ +uint8_t x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; +x_1 = 1; +x_2 = l_HashMap_Inhabited___closed__1; +x_3 = l_PersistentHashMap_HasEmptyc___closed__1; +x_4 = lean_alloc_ctor(0, 2, 1); +lean_ctor_set(x_4, 0, x_2); +lean_ctor_set(x_4, 1, x_3); +lean_ctor_set_uint8(x_4, sizeof(void*)*2, x_1); +return x_4; +} +} +lean_object* _init_l_Lean_IR_UnreachableBranches_functionSummariesExt___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l_Lean_IR_UnreachableBranches_functionSummariesExt___closed__1; +x_3 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_3, 0, x_1); +lean_ctor_set(x_3, 1, x_2); +return x_3; +} +} +lean_object* _init_l_Lean_IR_UnreachableBranches_functionSummariesExt___closed__3() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Array_empty___closed__1; +x_2 = l_Lean_IR_UnreachableBranches_functionSummariesExt___closed__2; +x_3 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_3, 0, x_1); +lean_ctor_set(x_3, 1, x_2); +return x_3; +} +} +lean_object* _init_l_Lean_IR_UnreachableBranches_functionSummariesExt___closed__4() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; +x_1 = lean_unsigned_to_nat(0u); +x_2 = l_Lean_EnvExtension_Inhabited___rarg___closed__1; +x_3 = l_Lean_IR_UnreachableBranches_functionSummariesExt___closed__3; +x_4 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_4, 0, x_1); +lean_ctor_set(x_4, 1, x_2); +lean_ctor_set(x_4, 2, x_3); +return x_4; +} +} +lean_object* _init_l_Lean_IR_UnreachableBranches_functionSummariesExt___closed__5() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_IR_UnreachableBranches_functionSummariesExt___elambda__4___boxed), 1, 0); +return x_1; +} +} +lean_object* _init_l_Lean_IR_UnreachableBranches_functionSummariesExt___closed__6() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_IR_UnreachableBranches_functionSummariesExt___elambda__3___boxed), 2, 0); +return x_1; +} +} +lean_object* _init_l_Lean_IR_UnreachableBranches_functionSummariesExt___closed__7() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_IR_UnreachableBranches_functionSummariesExt___elambda__2___boxed), 1, 0); +return x_1; +} +} +lean_object* _init_l_Lean_IR_UnreachableBranches_functionSummariesExt___closed__8() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_IR_UnreachableBranches_functionSummariesExt___elambda__1___boxed), 1, 0); +return x_1; +} +} +lean_object* _init_l_Lean_IR_UnreachableBranches_functionSummariesExt___closed__9() { +_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; lean_object* x_7; +x_1 = l_Lean_IR_UnreachableBranches_functionSummariesExt___closed__4; +x_2 = lean_box(0); +x_3 = l_Lean_IR_UnreachableBranches_functionSummariesExt___closed__5; +x_4 = l_Lean_IR_UnreachableBranches_functionSummariesExt___closed__6; +x_5 = l_Lean_IR_UnreachableBranches_functionSummariesExt___closed__7; +x_6 = l_Lean_IR_UnreachableBranches_functionSummariesExt___closed__8; +x_7 = lean_alloc_ctor(0, 6, 0); +lean_ctor_set(x_7, 0, x_1); +lean_ctor_set(x_7, 1, x_2); +lean_ctor_set(x_7, 2, x_3); +lean_ctor_set(x_7, 3, x_4); +lean_ctor_set(x_7, 4, x_5); +lean_ctor_set(x_7, 5, x_6); +return x_7; +} +} +lean_object* l_Lean_IR_UnreachableBranches_functionSummariesExt___elambda__1___boxed(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = l_Lean_IR_UnreachableBranches_functionSummariesExt___elambda__1(x_1); +lean_dec(x_1); +return x_2; +} +} +lean_object* l_Lean_IR_UnreachableBranches_functionSummariesExt___elambda__2___boxed(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = l_Lean_IR_UnreachableBranches_functionSummariesExt___elambda__2(x_1); +lean_dec(x_1); +return x_2; +} +} +lean_object* l_Lean_IR_UnreachableBranches_functionSummariesExt___elambda__3___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = l_Lean_IR_UnreachableBranches_functionSummariesExt___elambda__3(x_1, x_2); +lean_dec(x_2); +lean_dec(x_1); +return x_3; +} +} +lean_object* l_Lean_IR_UnreachableBranches_functionSummariesExt___elambda__4___boxed(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = l_Lean_IR_UnreachableBranches_functionSummariesExt___elambda__4(x_1); +lean_dec(x_1); +return x_2; +} +} +lean_object* l_Lean_IR_UnreachableBranches_addFunctionSummary(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; +x_4 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_4, 0, x_2); +lean_ctor_set(x_4, 1, x_3); +x_5 = l_Lean_IR_UnreachableBranches_functionSummariesExt; +x_6 = l_Lean_PersistentEnvExtension_addEntry___rarg(x_5, x_1, x_4); +return x_6; +} +} +lean_object* l_PersistentHashMap_findAtAux___main___at_Lean_IR_UnreachableBranches_getFunctionSummary___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_6; uint8_t x_7; +x_6 = lean_array_get_size(x_1); +x_7 = lean_nat_dec_lt(x_4, x_6); +lean_dec(x_6); +if (x_7 == 0) +{ +lean_object* x_8; +lean_dec(x_4); +x_8 = lean_box(0); +return x_8; +} +else +{ +lean_object* x_9; uint8_t x_10; +x_9 = lean_array_fget(x_1, x_4); +x_10 = lean_name_dec_eq(x_5, x_9); +lean_dec(x_9); +if (x_10 == 0) +{ +lean_object* x_11; lean_object* x_12; +x_11 = lean_unsigned_to_nat(1u); +x_12 = lean_nat_add(x_4, x_11); +lean_dec(x_4); +x_3 = lean_box(0); +x_4 = x_12; +goto _start; +} +else +{ +lean_object* x_14; lean_object* x_15; +x_14 = lean_array_fget(x_2, x_4); +lean_dec(x_4); +x_15 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_15, 0, x_14); +return x_15; +} +} +} +} +lean_object* l_PersistentHashMap_findAux___main___at_Lean_IR_UnreachableBranches_getFunctionSummary___spec__3(lean_object* x_1, size_t x_2, lean_object* x_3) { +_start: +{ +if (lean_obj_tag(x_1) == 0) +{ +lean_object* x_4; size_t x_5; size_t x_6; size_t x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; +x_4 = lean_ctor_get(x_1, 0); +x_5 = 5; +x_6 = l_PersistentHashMap_insertAux___main___rarg___closed__2; +x_7 = x_2 & x_6; +x_8 = lean_usize_to_nat(x_7); +x_9 = lean_box(2); +x_10 = lean_array_get(x_9, x_4, x_8); +lean_dec(x_8); +switch (lean_obj_tag(x_10)) { +case 0: +{ +lean_object* x_11; lean_object* x_12; uint8_t x_13; +x_11 = lean_ctor_get(x_10, 0); +lean_inc(x_11); +x_12 = lean_ctor_get(x_10, 1); +lean_inc(x_12); +lean_dec(x_10); +x_13 = lean_name_dec_eq(x_3, x_11); +lean_dec(x_11); +if (x_13 == 0) +{ +lean_object* x_14; +lean_dec(x_12); +x_14 = lean_box(0); +return x_14; +} +else +{ +lean_object* x_15; +x_15 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_15, 0, x_12); +return x_15; +} +} +case 1: +{ +lean_object* x_16; size_t x_17; lean_object* x_18; +x_16 = lean_ctor_get(x_10, 0); +lean_inc(x_16); +lean_dec(x_10); +x_17 = x_2 >> x_5; +x_18 = l_PersistentHashMap_findAux___main___at_Lean_IR_UnreachableBranches_getFunctionSummary___spec__3(x_16, x_17, x_3); +lean_dec(x_16); +return x_18; +} +default: +{ +lean_object* x_19; +x_19 = lean_box(0); +return x_19; +} +} +} +else +{ +lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; +x_20 = lean_ctor_get(x_1, 0); +x_21 = lean_ctor_get(x_1, 1); +x_22 = lean_unsigned_to_nat(0u); +x_23 = l_PersistentHashMap_findAtAux___main___at_Lean_IR_UnreachableBranches_getFunctionSummary___spec__4(x_20, x_21, lean_box(0), x_22, x_3); +return x_23; +} +} +} +lean_object* l_PersistentHashMap_find___at_Lean_IR_UnreachableBranches_getFunctionSummary___spec__2(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; size_t x_4; lean_object* x_5; +x_3 = lean_ctor_get(x_1, 0); +x_4 = lean_name_hash_usize(x_2); +x_5 = l_PersistentHashMap_findAux___main___at_Lean_IR_UnreachableBranches_getFunctionSummary___spec__3(x_3, x_4, x_2); +return x_5; +} +} +lean_object* l_AssocList_find___main___at_Lean_IR_UnreachableBranches_getFunctionSummary___spec__6(lean_object* x_1, lean_object* x_2) { +_start: +{ +if (lean_obj_tag(x_2) == 0) +{ +lean_object* x_3; +x_3 = lean_box(0); +return x_3; +} +else +{ +lean_object* x_4; lean_object* x_5; lean_object* x_6; uint8_t x_7; +x_4 = lean_ctor_get(x_2, 0); +x_5 = lean_ctor_get(x_2, 1); +x_6 = lean_ctor_get(x_2, 2); +x_7 = lean_name_dec_eq(x_4, x_1); +if (x_7 == 0) +{ +x_2 = x_6; +goto _start; +} +else +{ +lean_object* x_9; +lean_inc(x_5); +x_9 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_9, 0, x_5); +return x_9; +} +} +} +} +lean_object* l_HashMapImp_find___at_Lean_IR_UnreachableBranches_getFunctionSummary___spec__5(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; lean_object* x_4; size_t x_5; size_t x_6; lean_object* x_7; lean_object* x_8; +x_3 = lean_ctor_get(x_1, 1); +x_4 = lean_array_get_size(x_3); +x_5 = lean_name_hash_usize(x_2); +x_6 = lean_usize_modn(x_5, x_4); +lean_dec(x_4); +x_7 = lean_array_uget(x_3, x_6); +x_8 = l_AssocList_find___main___at_Lean_IR_UnreachableBranches_getFunctionSummary___spec__6(x_2, x_7); +lean_dec(x_7); +return x_8; +} +} +lean_object* l_Lean_SMap_find___at_Lean_IR_UnreachableBranches_getFunctionSummary___spec__1(lean_object* x_1, lean_object* x_2) { +_start: +{ +uint8_t x_3; +x_3 = lean_ctor_get_uint8(x_1, sizeof(void*)*2); +if (x_3 == 0) +{ +lean_object* x_4; lean_object* x_5; lean_object* x_6; +x_4 = lean_ctor_get(x_1, 0); +x_5 = lean_ctor_get(x_1, 1); +x_6 = l_PersistentHashMap_find___at_Lean_IR_UnreachableBranches_getFunctionSummary___spec__2(x_5, x_2); +if (lean_obj_tag(x_6) == 0) +{ +lean_object* x_7; +x_7 = l_HashMapImp_find___at_Lean_IR_UnreachableBranches_getFunctionSummary___spec__5(x_4, x_2); +return x_7; +} +else +{ +return x_6; +} +} +else +{ +lean_object* x_8; lean_object* x_9; +x_8 = lean_ctor_get(x_1, 0); +x_9 = l_HashMapImp_find___at_Lean_IR_UnreachableBranches_getFunctionSummary___spec__5(x_8, x_2); +return x_9; +} +} +} +lean_object* l_Lean_IR_UnreachableBranches_getFunctionSummary(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; lean_object* x_4; lean_object* x_5; +x_3 = l_Lean_IR_UnreachableBranches_functionSummariesExt; +x_4 = l_Lean_SimplePersistentEnvExtension_getState___rarg(x_3, x_1); +x_5 = l_Lean_SMap_find___at_Lean_IR_UnreachableBranches_getFunctionSummary___spec__1(x_4, x_2); +lean_dec(x_4); +return x_5; +} +} +lean_object* l_PersistentHashMap_findAtAux___main___at_Lean_IR_UnreachableBranches_getFunctionSummary___spec__4___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { +_start: +{ +lean_object* x_6; +x_6 = l_PersistentHashMap_findAtAux___main___at_Lean_IR_UnreachableBranches_getFunctionSummary___spec__4(x_1, x_2, x_3, x_4, x_5); +lean_dec(x_5); +lean_dec(x_2); +lean_dec(x_1); +return x_6; +} +} +lean_object* l_PersistentHashMap_findAux___main___at_Lean_IR_UnreachableBranches_getFunctionSummary___spec__3___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +size_t x_4; lean_object* x_5; +x_4 = lean_unbox_usize(x_2); +lean_dec(x_2); +x_5 = l_PersistentHashMap_findAux___main___at_Lean_IR_UnreachableBranches_getFunctionSummary___spec__3(x_1, x_4, x_3); +lean_dec(x_3); +lean_dec(x_1); +return x_5; +} +} +lean_object* l_PersistentHashMap_find___at_Lean_IR_UnreachableBranches_getFunctionSummary___spec__2___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = l_PersistentHashMap_find___at_Lean_IR_UnreachableBranches_getFunctionSummary___spec__2(x_1, x_2); +lean_dec(x_2); +lean_dec(x_1); +return x_3; +} +} +lean_object* l_AssocList_find___main___at_Lean_IR_UnreachableBranches_getFunctionSummary___spec__6___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = l_AssocList_find___main___at_Lean_IR_UnreachableBranches_getFunctionSummary___spec__6(x_1, x_2); +lean_dec(x_2); +lean_dec(x_1); +return x_3; +} +} +lean_object* l_HashMapImp_find___at_Lean_IR_UnreachableBranches_getFunctionSummary___spec__5___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = l_HashMapImp_find___at_Lean_IR_UnreachableBranches_getFunctionSummary___spec__5(x_1, x_2); +lean_dec(x_2); +lean_dec(x_1); +return x_3; +} +} +lean_object* l_Lean_SMap_find___at_Lean_IR_UnreachableBranches_getFunctionSummary___spec__1___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = l_Lean_SMap_find___at_Lean_IR_UnreachableBranches_getFunctionSummary___spec__1(x_1, x_2); +lean_dec(x_2); +lean_dec(x_1); +return x_3; +} +} +lean_object* l_Lean_IR_UnreachableBranches_getFunctionSummary___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = l_Lean_IR_UnreachableBranches_getFunctionSummary(x_1, x_2); +lean_dec(x_2); +lean_dec(x_1); +return x_3; +} +} +lean_object* l_AssocList_find___main___at_Lean_IR_UnreachableBranches_findVarValue___spec__2(lean_object* x_1, lean_object* x_2) { +_start: +{ +if (lean_obj_tag(x_2) == 0) +{ +lean_object* x_3; +x_3 = lean_box(0); +return x_3; +} +else +{ +lean_object* x_4; lean_object* x_5; lean_object* x_6; uint8_t x_7; +x_4 = lean_ctor_get(x_2, 0); +x_5 = lean_ctor_get(x_2, 1); +x_6 = lean_ctor_get(x_2, 2); +x_7 = lean_nat_dec_eq(x_4, x_1); +if (x_7 == 0) +{ +x_2 = x_6; +goto _start; +} +else +{ +lean_object* x_9; +lean_inc(x_5); +x_9 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_9, 0, x_5); +return x_9; +} +} +} +} +lean_object* l_HashMapImp_find___at_Lean_IR_UnreachableBranches_findVarValue___spec__1(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; lean_object* x_4; size_t x_5; size_t x_6; lean_object* x_7; lean_object* x_8; +x_3 = lean_ctor_get(x_1, 1); +x_4 = lean_array_get_size(x_3); +x_5 = lean_usize_of_nat(x_2); +x_6 = lean_usize_modn(x_5, x_4); +lean_dec(x_4); +x_7 = lean_array_uget(x_3, x_6); +x_8 = l_AssocList_find___main___at_Lean_IR_UnreachableBranches_findVarValue___spec__2(x_2, x_7); +lean_dec(x_7); +return x_8; +} +} +lean_object* l_Lean_IR_UnreachableBranches_findVarValue(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; +x_4 = lean_ctor_get(x_3, 0); +lean_inc(x_4); +x_5 = lean_ctor_get(x_2, 0); +x_6 = l_HashMap_Inhabited___closed__1; +x_7 = lean_array_get(x_6, x_4, x_5); +lean_dec(x_4); +x_8 = l_HashMapImp_find___at_Lean_IR_UnreachableBranches_findVarValue___spec__1(x_7, x_1); +lean_dec(x_7); +if (lean_obj_tag(x_8) == 0) +{ +lean_object* x_9; lean_object* x_10; +x_9 = lean_box(1); +x_10 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_10, 0, x_9); +lean_ctor_set(x_10, 1, x_3); +return x_10; +} +else +{ +lean_object* x_11; lean_object* x_12; +x_11 = lean_ctor_get(x_8, 0); +lean_inc(x_11); +lean_dec(x_8); +x_12 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_12, 0, x_11); +lean_ctor_set(x_12, 1, x_3); +return x_12; +} +} +} +lean_object* l_AssocList_find___main___at_Lean_IR_UnreachableBranches_findVarValue___spec__2___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = l_AssocList_find___main___at_Lean_IR_UnreachableBranches_findVarValue___spec__2(x_1, x_2); +lean_dec(x_2); +lean_dec(x_1); +return x_3; +} +} +lean_object* l_HashMapImp_find___at_Lean_IR_UnreachableBranches_findVarValue___spec__1___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = l_HashMapImp_find___at_Lean_IR_UnreachableBranches_findVarValue___spec__1(x_1, x_2); +lean_dec(x_2); +lean_dec(x_1); +return x_3; +} +} +lean_object* l_Lean_IR_UnreachableBranches_findVarValue___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; +x_4 = l_Lean_IR_UnreachableBranches_findVarValue(x_1, x_2, x_3); +lean_dec(x_2); +lean_dec(x_1); +return x_4; +} +} +lean_object* l_Lean_IR_UnreachableBranches_findArgValue(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +if (lean_obj_tag(x_1) == 0) +{ +lean_object* x_4; lean_object* x_5; +x_4 = lean_ctor_get(x_1, 0); +x_5 = l_Lean_IR_UnreachableBranches_findVarValue(x_4, x_2, x_3); +return x_5; +} +else +{ +lean_object* x_6; lean_object* x_7; +x_6 = lean_box(1); +x_7 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_7, 0, x_6); +lean_ctor_set(x_7, 1, x_3); +return x_7; +} +} +} +lean_object* l_Lean_IR_UnreachableBranches_findArgValue___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; +x_4 = l_Lean_IR_UnreachableBranches_findArgValue(x_1, x_2, x_3); +lean_dec(x_2); +lean_dec(x_1); +return x_4; +} +} +lean_object* l_mkHashMap___at_Lean_IR_UnreachableBranches_updateVarAssignment___spec__1(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = l_mkHashMapImp___rarg(x_1); +return x_2; +} +} +uint8_t l_AssocList_contains___main___at_Lean_IR_UnreachableBranches_updateVarAssignment___spec__3(lean_object* x_1, lean_object* x_2) { +_start: +{ +if (lean_obj_tag(x_2) == 0) +{ +uint8_t x_3; +x_3 = 0; +return x_3; +} +else +{ +lean_object* x_4; lean_object* x_5; uint8_t x_6; +x_4 = lean_ctor_get(x_2, 0); +x_5 = lean_ctor_get(x_2, 2); +x_6 = lean_nat_dec_eq(x_4, x_1); +if (x_6 == 0) +{ +x_2 = x_5; +goto _start; +} +else +{ +uint8_t x_8; +x_8 = 1; +return x_8; +} +} +} +} +lean_object* l_AssocList_mfoldl___main___at_Lean_IR_UnreachableBranches_updateVarAssignment___spec__6(lean_object* x_1, lean_object* x_2) { +_start: +{ +if (lean_obj_tag(x_2) == 0) +{ +return x_1; +} +else +{ +uint8_t x_3; +x_3 = !lean_is_exclusive(x_2); +if (x_3 == 0) +{ +lean_object* x_4; lean_object* x_5; lean_object* x_6; size_t x_7; size_t x_8; lean_object* x_9; lean_object* x_10; +x_4 = lean_ctor_get(x_2, 0); +x_5 = lean_ctor_get(x_2, 2); +x_6 = lean_array_get_size(x_1); +x_7 = lean_usize_of_nat(x_4); +x_8 = lean_usize_modn(x_7, x_6); +lean_dec(x_6); +x_9 = lean_array_uget(x_1, x_8); +lean_ctor_set(x_2, 2, x_9); +x_10 = lean_array_uset(x_1, x_8, x_2); +x_1 = x_10; +x_2 = x_5; +goto _start; +} +else +{ +lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; size_t x_16; size_t x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; +x_12 = lean_ctor_get(x_2, 0); +x_13 = lean_ctor_get(x_2, 1); +x_14 = lean_ctor_get(x_2, 2); +lean_inc(x_14); +lean_inc(x_13); +lean_inc(x_12); +lean_dec(x_2); +x_15 = lean_array_get_size(x_1); +x_16 = lean_usize_of_nat(x_12); +x_17 = lean_usize_modn(x_16, x_15); +lean_dec(x_15); +x_18 = lean_array_uget(x_1, x_17); +x_19 = lean_alloc_ctor(1, 3, 0); +lean_ctor_set(x_19, 0, x_12); +lean_ctor_set(x_19, 1, x_13); +lean_ctor_set(x_19, 2, x_18); +x_20 = lean_array_uset(x_1, x_17, x_19); +x_1 = x_20; +x_2 = x_14; +goto _start; +} +} +} +} +lean_object* l_HashMapImp_moveEntries___main___at_Lean_IR_UnreachableBranches_updateVarAssignment___spec__5(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; uint8_t x_5; +x_4 = lean_array_get_size(x_2); +x_5 = lean_nat_dec_lt(x_1, x_4); +lean_dec(x_4); +if (x_5 == 0) +{ +lean_dec(x_2); +lean_dec(x_1); +return x_3; +} +else +{ +lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; +x_6 = lean_array_fget(x_2, x_1); +x_7 = lean_box(0); +x_8 = lean_array_fset(x_2, x_1, x_7); +x_9 = l_AssocList_mfoldl___main___at_Lean_IR_UnreachableBranches_updateVarAssignment___spec__6(x_3, x_6); +x_10 = lean_unsigned_to_nat(1u); +x_11 = lean_nat_add(x_1, x_10); +lean_dec(x_1); +x_1 = x_11; +x_2 = x_8; +x_3 = x_9; +goto _start; +} +} +} +lean_object* l_HashMapImp_expand___at_Lean_IR_UnreachableBranches_updateVarAssignment___spec__4(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; +x_3 = lean_array_get_size(x_2); +x_4 = lean_unsigned_to_nat(2u); +x_5 = lean_nat_mul(x_3, x_4); +lean_dec(x_3); +x_6 = lean_box(0); +x_7 = lean_mk_array(x_5, x_6); +x_8 = lean_unsigned_to_nat(0u); +x_9 = l_HashMapImp_moveEntries___main___at_Lean_IR_UnreachableBranches_updateVarAssignment___spec__5(x_8, x_2, x_7); +x_10 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_10, 0, x_1); +lean_ctor_set(x_10, 1, x_9); +return x_10; +} +} +lean_object* l_AssocList_replace___main___at_Lean_IR_UnreachableBranches_updateVarAssignment___spec__7(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +if (lean_obj_tag(x_3) == 0) +{ +lean_dec(x_2); +lean_dec(x_1); +return x_3; +} +else +{ +uint8_t x_4; +x_4 = !lean_is_exclusive(x_3); +if (x_4 == 0) +{ +lean_object* x_5; lean_object* x_6; lean_object* x_7; uint8_t x_8; +x_5 = lean_ctor_get(x_3, 0); +x_6 = lean_ctor_get(x_3, 1); +x_7 = lean_ctor_get(x_3, 2); +x_8 = lean_nat_dec_eq(x_5, x_1); +if (x_8 == 0) +{ +lean_object* x_9; +x_9 = l_AssocList_replace___main___at_Lean_IR_UnreachableBranches_updateVarAssignment___spec__7(x_1, x_2, x_7); +lean_ctor_set(x_3, 2, x_9); +return x_3; +} +else +{ +lean_dec(x_6); +lean_dec(x_5); +lean_ctor_set(x_3, 1, x_2); +lean_ctor_set(x_3, 0, x_1); +return x_3; +} +} +else +{ +lean_object* x_10; lean_object* x_11; lean_object* x_12; uint8_t x_13; +x_10 = lean_ctor_get(x_3, 0); +x_11 = lean_ctor_get(x_3, 1); +x_12 = lean_ctor_get(x_3, 2); +lean_inc(x_12); +lean_inc(x_11); +lean_inc(x_10); +lean_dec(x_3); +x_13 = lean_nat_dec_eq(x_10, x_1); +if (x_13 == 0) +{ +lean_object* x_14; lean_object* x_15; +x_14 = l_AssocList_replace___main___at_Lean_IR_UnreachableBranches_updateVarAssignment___spec__7(x_1, x_2, x_12); +x_15 = lean_alloc_ctor(1, 3, 0); +lean_ctor_set(x_15, 0, x_10); +lean_ctor_set(x_15, 1, x_11); +lean_ctor_set(x_15, 2, x_14); +return x_15; +} +else +{ +lean_object* x_16; +lean_dec(x_11); +lean_dec(x_10); +x_16 = lean_alloc_ctor(1, 3, 0); +lean_ctor_set(x_16, 0, x_1); +lean_ctor_set(x_16, 1, x_2); +lean_ctor_set(x_16, 2, x_12); +return x_16; +} +} +} +} +} +lean_object* l_HashMapImp_insert___at_Lean_IR_UnreachableBranches_updateVarAssignment___spec__2(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +uint8_t x_4; +x_4 = !lean_is_exclusive(x_1); +if (x_4 == 0) +{ +lean_object* x_5; lean_object* x_6; lean_object* x_7; size_t x_8; size_t x_9; lean_object* x_10; uint8_t x_11; +x_5 = lean_ctor_get(x_1, 0); +x_6 = lean_ctor_get(x_1, 1); +x_7 = lean_array_get_size(x_6); +x_8 = lean_usize_of_nat(x_2); +x_9 = lean_usize_modn(x_8, x_7); +x_10 = lean_array_uget(x_6, x_9); +x_11 = l_AssocList_contains___main___at_Lean_IR_UnreachableBranches_updateVarAssignment___spec__3(x_2, x_10); +if (x_11 == 0) +{ +lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; uint8_t x_16; +x_12 = lean_unsigned_to_nat(1u); +x_13 = lean_nat_add(x_5, x_12); +lean_dec(x_5); +x_14 = lean_alloc_ctor(1, 3, 0); +lean_ctor_set(x_14, 0, x_2); +lean_ctor_set(x_14, 1, x_3); +lean_ctor_set(x_14, 2, x_10); +x_15 = lean_array_uset(x_6, x_9, x_14); +x_16 = lean_nat_dec_le(x_13, x_7); +lean_dec(x_7); +if (x_16 == 0) +{ +lean_object* x_17; +lean_free_object(x_1); +x_17 = l_HashMapImp_expand___at_Lean_IR_UnreachableBranches_updateVarAssignment___spec__4(x_13, x_15); +return x_17; +} +else +{ +lean_ctor_set(x_1, 1, x_15); +lean_ctor_set(x_1, 0, x_13); +return x_1; +} +} +else +{ +lean_object* x_18; lean_object* x_19; +lean_dec(x_7); +x_18 = l_AssocList_replace___main___at_Lean_IR_UnreachableBranches_updateVarAssignment___spec__7(x_2, x_3, x_10); +x_19 = lean_array_uset(x_6, x_9, x_18); +lean_ctor_set(x_1, 1, x_19); +return x_1; +} +} +else +{ +lean_object* x_20; lean_object* x_21; lean_object* x_22; size_t x_23; size_t x_24; lean_object* x_25; uint8_t x_26; +x_20 = lean_ctor_get(x_1, 0); +x_21 = lean_ctor_get(x_1, 1); +lean_inc(x_21); +lean_inc(x_20); +lean_dec(x_1); +x_22 = lean_array_get_size(x_21); +x_23 = lean_usize_of_nat(x_2); +x_24 = lean_usize_modn(x_23, x_22); +x_25 = lean_array_uget(x_21, x_24); +x_26 = l_AssocList_contains___main___at_Lean_IR_UnreachableBranches_updateVarAssignment___spec__3(x_2, x_25); +if (x_26 == 0) +{ +lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; uint8_t x_31; +x_27 = lean_unsigned_to_nat(1u); +x_28 = lean_nat_add(x_20, x_27); +lean_dec(x_20); +x_29 = lean_alloc_ctor(1, 3, 0); +lean_ctor_set(x_29, 0, x_2); +lean_ctor_set(x_29, 1, x_3); +lean_ctor_set(x_29, 2, x_25); +x_30 = lean_array_uset(x_21, x_24, x_29); +x_31 = lean_nat_dec_le(x_28, x_22); +lean_dec(x_22); +if (x_31 == 0) +{ +lean_object* x_32; +x_32 = l_HashMapImp_expand___at_Lean_IR_UnreachableBranches_updateVarAssignment___spec__4(x_28, x_30); +return x_32; +} +else +{ +lean_object* x_33; +x_33 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_33, 0, x_28); +lean_ctor_set(x_33, 1, x_30); +return x_33; +} +} +else +{ +lean_object* x_34; lean_object* x_35; lean_object* x_36; +lean_dec(x_22); +x_34 = l_AssocList_replace___main___at_Lean_IR_UnreachableBranches_updateVarAssignment___spec__7(x_2, x_3, x_25); +x_35 = lean_array_uset(x_21, x_24, x_34); +x_36 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_36, 0, x_20); +lean_ctor_set(x_36, 1, x_35); +return x_36; +} +} +} +} +lean_object* _init_l_Lean_IR_UnreachableBranches_updateVarAssignment___closed__1() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = lean_unsigned_to_nat(8u); +x_2 = l_mkHashMapImp___rarg(x_1); +return x_2; +} +} +lean_object* l_Lean_IR_UnreachableBranches_updateVarAssignment(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; uint8_t x_6; +x_5 = l_Lean_IR_UnreachableBranches_findVarValue(x_1, x_3, x_4); +x_6 = !lean_is_exclusive(x_5); +if (x_6 == 0) +{ +lean_object* x_7; uint8_t x_8; +x_7 = lean_ctor_get(x_5, 1); +x_8 = !lean_is_exclusive(x_7); +if (x_8 == 0) +{ +lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; uint8_t x_13; +x_9 = lean_ctor_get(x_5, 0); +x_10 = lean_ctor_get(x_7, 0); +x_11 = lean_ctor_get(x_3, 0); +x_12 = lean_array_get_size(x_10); +x_13 = lean_nat_dec_lt(x_11, x_12); +lean_dec(x_12); +if (x_13 == 0) +{ +lean_object* x_14; +lean_dec(x_9); +lean_dec(x_2); +lean_dec(x_1); +x_14 = lean_box(0); +lean_ctor_set(x_5, 0, x_14); +return x_5; +} +else +{ +lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; +x_15 = lean_array_fget(x_10, x_11); +x_16 = l_Lean_IR_UnreachableBranches_updateVarAssignment___closed__1; +x_17 = lean_array_fset(x_10, x_11, x_16); +x_18 = l_Lean_IR_UnreachableBranches_Value_merge___main(x_2, x_9); +x_19 = l_HashMapImp_insert___at_Lean_IR_UnreachableBranches_updateVarAssignment___spec__2(x_15, x_1, x_18); +x_20 = lean_array_fset(x_17, x_11, x_19); +lean_ctor_set(x_7, 0, x_20); +x_21 = lean_box(0); +lean_ctor_set(x_5, 0, x_21); +return x_5; +} +} +else +{ +lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; uint8_t x_27; +x_22 = lean_ctor_get(x_5, 0); +x_23 = lean_ctor_get(x_7, 0); +x_24 = lean_ctor_get(x_7, 1); +lean_inc(x_24); +lean_inc(x_23); +lean_dec(x_7); +x_25 = lean_ctor_get(x_3, 0); +x_26 = lean_array_get_size(x_23); +x_27 = lean_nat_dec_lt(x_25, x_26); +lean_dec(x_26); +if (x_27 == 0) +{ +lean_object* x_28; lean_object* x_29; +lean_dec(x_22); +lean_dec(x_2); +lean_dec(x_1); +x_28 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_28, 0, x_23); +lean_ctor_set(x_28, 1, x_24); +x_29 = lean_box(0); +lean_ctor_set(x_5, 1, x_28); +lean_ctor_set(x_5, 0, x_29); +return x_5; +} +else +{ +lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; +x_30 = lean_array_fget(x_23, x_25); +x_31 = l_Lean_IR_UnreachableBranches_updateVarAssignment___closed__1; +x_32 = lean_array_fset(x_23, x_25, x_31); +x_33 = l_Lean_IR_UnreachableBranches_Value_merge___main(x_2, x_22); +x_34 = l_HashMapImp_insert___at_Lean_IR_UnreachableBranches_updateVarAssignment___spec__2(x_30, x_1, x_33); +x_35 = lean_array_fset(x_32, x_25, x_34); +x_36 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_36, 0, x_35); +lean_ctor_set(x_36, 1, x_24); +x_37 = lean_box(0); +lean_ctor_set(x_5, 1, x_36); +lean_ctor_set(x_5, 0, x_37); +return x_5; +} +} +} +else +{ +lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; uint8_t x_45; +x_38 = lean_ctor_get(x_5, 1); +x_39 = lean_ctor_get(x_5, 0); +lean_inc(x_38); +lean_inc(x_39); +lean_dec(x_5); +x_40 = lean_ctor_get(x_38, 0); +lean_inc(x_40); +x_41 = lean_ctor_get(x_38, 1); +lean_inc(x_41); +if (lean_is_exclusive(x_38)) { + lean_ctor_release(x_38, 0); + lean_ctor_release(x_38, 1); + x_42 = x_38; +} else { + lean_dec_ref(x_38); + x_42 = lean_box(0); +} +x_43 = lean_ctor_get(x_3, 0); +x_44 = lean_array_get_size(x_40); +x_45 = lean_nat_dec_lt(x_43, x_44); +lean_dec(x_44); +if (x_45 == 0) +{ +lean_object* x_46; lean_object* x_47; lean_object* x_48; +lean_dec(x_39); +lean_dec(x_2); +lean_dec(x_1); +if (lean_is_scalar(x_42)) { + x_46 = lean_alloc_ctor(0, 2, 0); +} else { + x_46 = x_42; +} +lean_ctor_set(x_46, 0, x_40); +lean_ctor_set(x_46, 1, x_41); +x_47 = lean_box(0); +x_48 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_48, 0, x_47); +lean_ctor_set(x_48, 1, x_46); +return x_48; +} +else +{ +lean_object* x_49; lean_object* x_50; lean_object* x_51; lean_object* x_52; lean_object* x_53; lean_object* x_54; lean_object* x_55; lean_object* x_56; lean_object* x_57; +x_49 = lean_array_fget(x_40, x_43); +x_50 = l_Lean_IR_UnreachableBranches_updateVarAssignment___closed__1; +x_51 = lean_array_fset(x_40, x_43, x_50); +x_52 = l_Lean_IR_UnreachableBranches_Value_merge___main(x_2, x_39); +x_53 = l_HashMapImp_insert___at_Lean_IR_UnreachableBranches_updateVarAssignment___spec__2(x_49, x_1, x_52); +x_54 = lean_array_fset(x_51, x_43, x_53); +if (lean_is_scalar(x_42)) { + x_55 = lean_alloc_ctor(0, 2, 0); +} else { + x_55 = x_42; +} +lean_ctor_set(x_55, 0, x_54); +lean_ctor_set(x_55, 1, x_41); +x_56 = lean_box(0); +x_57 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_57, 0, x_56); +lean_ctor_set(x_57, 1, x_55); +return x_57; +} +} +} +} +lean_object* l_AssocList_contains___main___at_Lean_IR_UnreachableBranches_updateVarAssignment___spec__3___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +uint8_t x_3; lean_object* x_4; +x_3 = l_AssocList_contains___main___at_Lean_IR_UnreachableBranches_updateVarAssignment___spec__3(x_1, x_2); +lean_dec(x_2); +lean_dec(x_1); +x_4 = lean_box(x_3); +return x_4; +} +} +lean_object* l_Lean_IR_UnreachableBranches_updateVarAssignment___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; +x_5 = l_Lean_IR_UnreachableBranches_updateVarAssignment(x_1, x_2, x_3, x_4); +lean_dec(x_3); +return x_5; +} +} +lean_object* l_List_foldl___main___at_Lean_IR_UnreachableBranches_projValue___main___spec__1(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +if (lean_obj_tag(x_3) == 0) +{ +return x_2; +} +else +{ +lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; +x_4 = lean_ctor_get(x_3, 0); +x_5 = lean_ctor_get(x_3, 1); +x_6 = l_Lean_IR_UnreachableBranches_projValue___main(x_4, x_1); +x_7 = l_Lean_IR_UnreachableBranches_Value_merge___main(x_2, x_6); +x_2 = x_7; +x_3 = x_5; +goto _start; +} +} +} +lean_object* l_Lean_IR_UnreachableBranches_projValue___main(lean_object* x_1, lean_object* x_2) { +_start: +{ +switch (lean_obj_tag(x_1)) { +case 2: +{ +lean_object* x_3; lean_object* x_4; lean_object* x_5; +x_3 = lean_ctor_get(x_1, 1); +x_4 = lean_box(0); +x_5 = l_Array_getD___rarg(x_3, x_2, x_4); +return x_5; +} +case 3: +{ +lean_object* x_6; lean_object* x_7; lean_object* x_8; +x_6 = lean_ctor_get(x_1, 0); +x_7 = lean_box(0); +x_8 = l_List_foldl___main___at_Lean_IR_UnreachableBranches_projValue___main___spec__1(x_2, x_7, x_6); +return x_8; +} +default: +{ +lean_inc(x_1); +return x_1; +} +} +} +} +lean_object* l_List_foldl___main___at_Lean_IR_UnreachableBranches_projValue___main___spec__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; +x_4 = l_List_foldl___main___at_Lean_IR_UnreachableBranches_projValue___main___spec__1(x_1, x_2, x_3); +lean_dec(x_3); +lean_dec(x_1); +return x_4; +} +} +lean_object* l_Lean_IR_UnreachableBranches_projValue___main___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = l_Lean_IR_UnreachableBranches_projValue___main(x_1, x_2); +lean_dec(x_2); +lean_dec(x_1); +return x_3; +} +} +lean_object* l_Lean_IR_UnreachableBranches_projValue(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = l_Lean_IR_UnreachableBranches_projValue___main(x_1, x_2); +return x_3; +} +} +lean_object* l_Lean_IR_UnreachableBranches_projValue___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = l_Lean_IR_UnreachableBranches_projValue(x_1, x_2); +lean_dec(x_2); +lean_dec(x_1); +return x_3; +} +} +lean_object* l_Array_ummapAux___main___at_Lean_IR_UnreachableBranches_interpExpr___spec__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; uint8_t x_6; +x_5 = lean_array_get_size(x_2); +x_6 = lean_nat_dec_lt(x_1, x_5); +lean_dec(x_5); +if (x_6 == 0) +{ +lean_object* x_7; lean_object* x_8; lean_object* x_9; +lean_dec(x_1); +x_7 = l_Array_empty___closed__1; +x_8 = x_2; +x_9 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_9, 0, x_8); +lean_ctor_set(x_9, 1, x_4); +return x_9; +} +else +{ +lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; +x_10 = lean_array_fget(x_2, x_1); +x_11 = lean_box(0); +lean_inc(x_10); +x_12 = x_11; +x_13 = lean_array_fset(x_2, x_1, x_12); +x_14 = l_Lean_IR_UnreachableBranches_findArgValue(x_10, x_3, x_4); +x_15 = lean_ctor_get(x_14, 0); +lean_inc(x_15); +x_16 = lean_ctor_get(x_14, 1); +lean_inc(x_16); +lean_dec(x_14); +x_17 = lean_unsigned_to_nat(1u); +x_18 = lean_nat_add(x_1, x_17); +x_19 = x_15; +x_20 = lean_array_fset(x_13, x_1, x_19); +lean_dec(x_1); +x_1 = x_18; +x_2 = x_20; +x_4 = x_16; +goto _start; +} +} +} +lean_object* l_Array_findIdxAux___main___at_Lean_IR_UnreachableBranches_interpExpr___spec__2(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; uint8_t x_5; +x_4 = lean_array_get_size(x_2); +x_5 = lean_nat_dec_lt(x_3, x_4); +lean_dec(x_4); +if (x_5 == 0) +{ +lean_object* x_6; +lean_dec(x_3); +x_6 = lean_box(0); +return x_6; +} +else +{ +lean_object* x_7; lean_object* x_8; uint8_t x_9; +x_7 = lean_array_fget(x_2, x_3); +x_8 = l_Lean_IR_Decl_name(x_7); +lean_dec(x_7); +x_9 = lean_name_dec_eq(x_8, x_1); +lean_dec(x_8); +if (x_9 == 0) +{ +lean_object* x_10; lean_object* x_11; +x_10 = lean_unsigned_to_nat(1u); +x_11 = lean_nat_add(x_3, x_10); +lean_dec(x_3); +x_3 = x_11; +goto _start; +} +else +{ +lean_object* x_13; +x_13 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_13, 0, x_3); +return x_13; +} +} +} +} +lean_object* l_PersistentArray_getAux___main___at_Lean_IR_UnreachableBranches_interpExpr___spec__4(lean_object* x_1, size_t x_2, size_t x_3) { +_start: +{ +if (lean_obj_tag(x_1) == 0) +{ +lean_object* x_4; size_t x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; size_t x_9; size_t x_10; size_t x_11; size_t x_12; size_t x_13; size_t x_14; +x_4 = lean_ctor_get(x_1, 0); +lean_inc(x_4); +lean_dec(x_1); +x_5 = x_2 >> x_3; +x_6 = lean_usize_to_nat(x_5); +x_7 = l_PersistentArray_getAux___main___rarg___closed__1; +x_8 = lean_array_get(x_7, x_4, x_6); +lean_dec(x_6); +lean_dec(x_4); +x_9 = 1; +x_10 = x_9 << x_3; +x_11 = x_10 - x_9; +x_12 = x_2 & x_11; +x_13 = 5; +x_14 = x_3 - x_13; +x_1 = x_8; +x_2 = x_12; +x_3 = x_14; +goto _start; +} +else +{ +lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; +x_16 = lean_ctor_get(x_1, 0); +lean_inc(x_16); +lean_dec(x_1); +x_17 = lean_usize_to_nat(x_2); +x_18 = l_Lean_IR_UnreachableBranches_Value_Inhabited; +x_19 = lean_array_get(x_18, x_16, x_17); +lean_dec(x_17); +lean_dec(x_16); +return x_19; +} +} +} +lean_object* l_PersistentArray_get_x21___at_Lean_IR_UnreachableBranches_interpExpr___spec__3(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; uint8_t x_4; +x_3 = lean_ctor_get(x_1, 3); +lean_inc(x_3); +x_4 = lean_nat_dec_le(x_3, x_2); +if (x_4 == 0) +{ +lean_object* x_5; size_t x_6; size_t x_7; lean_object* x_8; +lean_dec(x_3); +x_5 = lean_ctor_get(x_1, 0); +lean_inc(x_5); +x_6 = lean_usize_of_nat(x_2); +x_7 = lean_ctor_get_usize(x_1, 4); +lean_dec(x_1); +x_8 = l_PersistentArray_getAux___main___at_Lean_IR_UnreachableBranches_interpExpr___spec__4(x_5, x_6, x_7); +return x_8; +} +else +{ +lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; +x_9 = lean_ctor_get(x_1, 1); +lean_inc(x_9); +lean_dec(x_1); +x_10 = lean_nat_sub(x_2, x_3); +lean_dec(x_3); +x_11 = l_Lean_IR_UnreachableBranches_Value_Inhabited; +x_12 = lean_array_get(x_11, x_9, x_10); +lean_dec(x_10); +lean_dec(x_9); +return x_12; +} +} +} +lean_object* l_Lean_IR_UnreachableBranches_interpExpr(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +switch (lean_obj_tag(x_1)) { +case 0: +{ +lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; uint8_t x_8; +x_4 = lean_ctor_get(x_1, 0); +lean_inc(x_4); +x_5 = lean_ctor_get(x_1, 1); +lean_inc(x_5); +lean_dec(x_1); +x_6 = lean_unsigned_to_nat(0u); +x_7 = l_Array_ummapAux___main___at_Lean_IR_UnreachableBranches_interpExpr___spec__1(x_6, x_5, x_2, x_3); +x_8 = !lean_is_exclusive(x_7); +if (x_8 == 0) +{ +lean_object* x_9; lean_object* x_10; +x_9 = lean_ctor_get(x_7, 0); +x_10 = lean_alloc_ctor(2, 2, 0); +lean_ctor_set(x_10, 0, x_4); +lean_ctor_set(x_10, 1, x_9); +lean_ctor_set(x_7, 0, x_10); +return x_7; +} +else +{ +lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; +x_11 = lean_ctor_get(x_7, 0); +x_12 = lean_ctor_get(x_7, 1); +lean_inc(x_12); +lean_inc(x_11); +lean_dec(x_7); +x_13 = lean_alloc_ctor(2, 2, 0); +lean_ctor_set(x_13, 0, x_4); +lean_ctor_set(x_13, 1, x_11); +x_14 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_14, 0, x_13); +lean_ctor_set(x_14, 1, x_12); +return x_14; +} +} +case 3: +{ +lean_object* x_15; lean_object* x_16; lean_object* x_17; uint8_t x_18; +x_15 = lean_ctor_get(x_1, 0); +lean_inc(x_15); +x_16 = lean_ctor_get(x_1, 1); +lean_inc(x_16); +lean_dec(x_1); +x_17 = l_Lean_IR_UnreachableBranches_findVarValue(x_16, x_2, x_3); +lean_dec(x_16); +x_18 = !lean_is_exclusive(x_17); +if (x_18 == 0) +{ +lean_object* x_19; lean_object* x_20; +x_19 = lean_ctor_get(x_17, 0); +x_20 = l_Lean_IR_UnreachableBranches_projValue___main(x_19, x_15); +lean_dec(x_15); +lean_dec(x_19); +lean_ctor_set(x_17, 0, x_20); +return x_17; +} +else +{ +lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; +x_21 = lean_ctor_get(x_17, 0); +x_22 = lean_ctor_get(x_17, 1); +lean_inc(x_22); +lean_inc(x_21); +lean_dec(x_17); +x_23 = l_Lean_IR_UnreachableBranches_projValue___main(x_21, x_15); +lean_dec(x_15); +lean_dec(x_21); +x_24 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_24, 0, x_23); +lean_ctor_set(x_24, 1, x_22); +return x_24; +} +} +case 6: +{ +lean_object* x_25; lean_object* x_26; lean_object* x_27; +x_25 = lean_ctor_get(x_1, 0); +lean_inc(x_25); +lean_dec(x_1); +x_26 = lean_ctor_get(x_2, 2); +x_27 = l_Lean_IR_UnreachableBranches_getFunctionSummary(x_26, x_25); +if (lean_obj_tag(x_27) == 0) +{ +lean_object* x_28; lean_object* x_29; lean_object* x_30; +x_28 = lean_ctor_get(x_2, 1); +x_29 = lean_unsigned_to_nat(0u); +x_30 = l_Array_findIdxAux___main___at_Lean_IR_UnreachableBranches_interpExpr___spec__2(x_25, x_28, x_29); +lean_dec(x_25); +if (lean_obj_tag(x_30) == 0) +{ +lean_object* x_31; lean_object* x_32; +x_31 = lean_box(1); +x_32 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_32, 0, x_31); +lean_ctor_set(x_32, 1, x_3); +return x_32; +} +else +{ +lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; +x_33 = lean_ctor_get(x_30, 0); +lean_inc(x_33); +lean_dec(x_30); +x_34 = lean_ctor_get(x_3, 1); +lean_inc(x_34); +x_35 = l_PersistentArray_get_x21___at_Lean_IR_UnreachableBranches_interpExpr___spec__3(x_34, x_33); +lean_dec(x_33); +x_36 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_36, 0, x_35); +lean_ctor_set(x_36, 1, x_3); +return x_36; +} +} +else +{ +lean_object* x_37; lean_object* x_38; +lean_dec(x_25); +x_37 = lean_ctor_get(x_27, 0); +lean_inc(x_37); +lean_dec(x_27); +x_38 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_38, 0, x_37); +lean_ctor_set(x_38, 1, x_3); +return x_38; +} +} +default: +{ +lean_object* x_39; lean_object* x_40; +lean_dec(x_1); +x_39 = lean_box(1); +x_40 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_40, 0, x_39); +lean_ctor_set(x_40, 1, x_3); +return x_40; +} +} +} +} +lean_object* l_Array_ummapAux___main___at_Lean_IR_UnreachableBranches_interpExpr___spec__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; +x_5 = l_Array_ummapAux___main___at_Lean_IR_UnreachableBranches_interpExpr___spec__1(x_1, x_2, x_3, x_4); +lean_dec(x_3); +return x_5; +} +} +lean_object* l_Array_findIdxAux___main___at_Lean_IR_UnreachableBranches_interpExpr___spec__2___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; +x_4 = l_Array_findIdxAux___main___at_Lean_IR_UnreachableBranches_interpExpr___spec__2(x_1, x_2, x_3); +lean_dec(x_2); +lean_dec(x_1); +return x_4; +} +} +lean_object* l_PersistentArray_getAux___main___at_Lean_IR_UnreachableBranches_interpExpr___spec__4___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +size_t x_4; size_t x_5; lean_object* x_6; +x_4 = lean_unbox_usize(x_2); +lean_dec(x_2); +x_5 = lean_unbox_usize(x_3); +lean_dec(x_3); +x_6 = l_PersistentArray_getAux___main___at_Lean_IR_UnreachableBranches_interpExpr___spec__4(x_1, x_4, x_5); +return x_6; +} +} +lean_object* l_PersistentArray_get_x21___at_Lean_IR_UnreachableBranches_interpExpr___spec__3___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = l_PersistentArray_get_x21___at_Lean_IR_UnreachableBranches_interpExpr___spec__3(x_1, x_2); +lean_dec(x_2); +return x_3; +} +} +lean_object* l_Lean_IR_UnreachableBranches_interpExpr___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; +x_4 = l_Lean_IR_UnreachableBranches_interpExpr(x_1, x_2, x_3); +lean_dec(x_2); +return x_4; +} +} +uint8_t l_List_foldr___main___at_Lean_IR_UnreachableBranches_containsCtor___main___spec__1(lean_object* x_1, uint8_t x_2, lean_object* x_3) { +_start: +{ +if (lean_obj_tag(x_3) == 0) +{ +return x_2; +} +else +{ +lean_object* x_4; lean_object* x_5; uint8_t x_6; uint8_t x_7; +x_4 = lean_ctor_get(x_3, 0); +x_5 = lean_ctor_get(x_3, 1); +x_6 = l_List_foldr___main___at_Lean_IR_UnreachableBranches_containsCtor___main___spec__1(x_1, x_2, x_5); +x_7 = l_Lean_IR_UnreachableBranches_containsCtor___main(x_4, x_1); +if (x_7 == 0) +{ +return x_6; +} +else +{ +uint8_t x_8; +x_8 = 1; +return x_8; +} +} +} +} +uint8_t l_Lean_IR_UnreachableBranches_containsCtor___main(lean_object* x_1, lean_object* x_2) { +_start: +{ +switch (lean_obj_tag(x_1)) { +case 0: +{ +uint8_t x_3; +x_3 = 0; +return x_3; +} +case 1: +{ +uint8_t x_4; +x_4 = 1; +return x_4; +} +case 2: +{ +lean_object* x_5; uint8_t x_6; +x_5 = lean_ctor_get(x_1, 0); +x_6 = l_Lean_IR_CtorInfo_beq(x_5, x_2); +return x_6; +} +default: +{ +lean_object* x_7; uint8_t x_8; uint8_t x_9; +x_7 = lean_ctor_get(x_1, 0); +x_8 = 0; +x_9 = l_List_foldr___main___at_Lean_IR_UnreachableBranches_containsCtor___main___spec__1(x_2, x_8, x_7); +return x_9; +} +} +} +} +lean_object* l_List_foldr___main___at_Lean_IR_UnreachableBranches_containsCtor___main___spec__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +uint8_t x_4; uint8_t x_5; lean_object* x_6; +x_4 = lean_unbox(x_2); +lean_dec(x_2); +x_5 = l_List_foldr___main___at_Lean_IR_UnreachableBranches_containsCtor___main___spec__1(x_1, x_4, x_3); +lean_dec(x_3); +lean_dec(x_1); +x_6 = lean_box(x_5); +return x_6; +} +} +lean_object* l_Lean_IR_UnreachableBranches_containsCtor___main___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +uint8_t x_3; lean_object* x_4; +x_3 = l_Lean_IR_UnreachableBranches_containsCtor___main(x_1, x_2); +lean_dec(x_2); +lean_dec(x_1); +x_4 = lean_box(x_3); +return x_4; +} +} +uint8_t l_Lean_IR_UnreachableBranches_containsCtor(lean_object* x_1, lean_object* x_2) { +_start: +{ +uint8_t x_3; +x_3 = l_Lean_IR_UnreachableBranches_containsCtor___main(x_1, x_2); +return x_3; +} +} +lean_object* l_Lean_IR_UnreachableBranches_containsCtor___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +uint8_t x_3; lean_object* x_4; +x_3 = l_Lean_IR_UnreachableBranches_containsCtor(x_1, x_2); +lean_dec(x_2); +lean_dec(x_1); +x_4 = lean_box(x_3); +return x_4; +} +} +lean_object* l_PersistentArray_modifyAux___main___at_Lean_IR_UnreachableBranches_updateCurrFnSummary___spec__2(lean_object* x_1, lean_object* x_2, size_t x_3, size_t x_4) { +_start: +{ +if (lean_obj_tag(x_2) == 0) +{ +uint8_t x_5; +x_5 = !lean_is_exclusive(x_2); +if (x_5 == 0) +{ +lean_object* x_6; size_t x_7; size_t x_8; size_t x_9; size_t x_10; size_t x_11; size_t x_12; size_t x_13; lean_object* x_14; lean_object* x_15; uint8_t x_16; +x_6 = lean_ctor_get(x_2, 0); +x_7 = x_3 >> x_4; +x_8 = 1; +x_9 = x_8 << x_4; +x_10 = x_9 - x_8; +x_11 = x_3 & x_10; +x_12 = 5; +x_13 = x_4 - x_12; +x_14 = lean_usize_to_nat(x_7); +x_15 = lean_array_get_size(x_6); +x_16 = lean_nat_dec_lt(x_14, x_15); +lean_dec(x_15); +if (x_16 == 0) +{ +lean_dec(x_14); +lean_dec(x_1); +return x_2; +} +else +{ +lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; +x_17 = lean_array_fget(x_6, x_14); +x_18 = l_PersistentArrayNode_Inhabited___closed__1; +x_19 = lean_array_fset(x_6, x_14, x_18); +x_20 = l_PersistentArray_modifyAux___main___at_Lean_IR_UnreachableBranches_updateCurrFnSummary___spec__2(x_1, x_17, x_11, x_13); +x_21 = lean_array_fset(x_19, x_14, x_20); +lean_dec(x_14); +lean_ctor_set(x_2, 0, x_21); +return x_2; +} +} +else +{ +lean_object* x_22; size_t x_23; size_t x_24; size_t x_25; size_t x_26; size_t x_27; size_t x_28; size_t x_29; lean_object* x_30; lean_object* x_31; uint8_t x_32; +x_22 = lean_ctor_get(x_2, 0); +lean_inc(x_22); +lean_dec(x_2); +x_23 = x_3 >> x_4; +x_24 = 1; +x_25 = x_24 << x_4; +x_26 = x_25 - x_24; +x_27 = x_3 & x_26; +x_28 = 5; +x_29 = x_4 - x_28; +x_30 = lean_usize_to_nat(x_23); +x_31 = lean_array_get_size(x_22); +x_32 = lean_nat_dec_lt(x_30, x_31); +lean_dec(x_31); +if (x_32 == 0) +{ +lean_object* x_33; +lean_dec(x_30); +lean_dec(x_1); +x_33 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_33, 0, x_22); +return x_33; +} +else +{ +lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; +x_34 = lean_array_fget(x_22, x_30); +x_35 = l_PersistentArrayNode_Inhabited___closed__1; +x_36 = lean_array_fset(x_22, x_30, x_35); +x_37 = l_PersistentArray_modifyAux___main___at_Lean_IR_UnreachableBranches_updateCurrFnSummary___spec__2(x_1, x_34, x_27, x_29); +x_38 = lean_array_fset(x_36, x_30, x_37); +lean_dec(x_30); +x_39 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_39, 0, x_38); +return x_39; +} +} +} +else +{ +uint8_t x_40; +x_40 = !lean_is_exclusive(x_2); +if (x_40 == 0) +{ +lean_object* x_41; lean_object* x_42; lean_object* x_43; uint8_t x_44; +x_41 = lean_ctor_get(x_2, 0); +x_42 = lean_usize_to_nat(x_3); +x_43 = lean_array_get_size(x_41); +x_44 = lean_nat_dec_lt(x_42, x_43); +lean_dec(x_43); +if (x_44 == 0) +{ +lean_dec(x_42); +lean_dec(x_1); +return x_2; +} +else +{ +lean_object* x_45; lean_object* x_46; lean_object* x_47; lean_object* x_48; lean_object* x_49; +x_45 = lean_array_fget(x_41, x_42); +x_46 = lean_box(1); +x_47 = lean_array_fset(x_41, x_42, x_46); +x_48 = l_Lean_IR_UnreachableBranches_Value_merge___main(x_1, x_45); +x_49 = lean_array_fset(x_47, x_42, x_48); +lean_dec(x_42); +lean_ctor_set(x_2, 0, x_49); +return x_2; +} +} +else +{ +lean_object* x_50; lean_object* x_51; lean_object* x_52; uint8_t x_53; +x_50 = lean_ctor_get(x_2, 0); +lean_inc(x_50); +lean_dec(x_2); +x_51 = lean_usize_to_nat(x_3); +x_52 = lean_array_get_size(x_50); +x_53 = lean_nat_dec_lt(x_51, x_52); +lean_dec(x_52); +if (x_53 == 0) +{ +lean_object* x_54; +lean_dec(x_51); +lean_dec(x_1); +x_54 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_54, 0, x_50); +return x_54; +} +else +{ +lean_object* x_55; lean_object* x_56; lean_object* x_57; lean_object* x_58; lean_object* x_59; lean_object* x_60; +x_55 = lean_array_fget(x_50, x_51); +x_56 = lean_box(1); +x_57 = lean_array_fset(x_50, x_51, x_56); +x_58 = l_Lean_IR_UnreachableBranches_Value_merge___main(x_1, x_55); +x_59 = lean_array_fset(x_57, x_51, x_58); +lean_dec(x_51); +x_60 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_60, 0, x_59); +return x_60; +} +} +} +} +} +lean_object* l_PersistentArray_modify___at_Lean_IR_UnreachableBranches_updateCurrFnSummary___spec__1(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +uint8_t x_4; +x_4 = !lean_is_exclusive(x_2); +if (x_4 == 0) +{ +lean_object* x_5; lean_object* x_6; size_t x_7; lean_object* x_8; uint8_t x_9; +x_5 = lean_ctor_get(x_2, 0); +x_6 = lean_ctor_get(x_2, 1); +x_7 = lean_ctor_get_usize(x_2, 4); +x_8 = lean_ctor_get(x_2, 3); +x_9 = lean_nat_dec_le(x_8, x_3); +if (x_9 == 0) +{ +size_t x_10; lean_object* x_11; +x_10 = lean_usize_of_nat(x_3); +x_11 = l_PersistentArray_modifyAux___main___at_Lean_IR_UnreachableBranches_updateCurrFnSummary___spec__2(x_1, x_5, x_10, x_7); +lean_ctor_set(x_2, 0, x_11); +return x_2; +} +else +{ +lean_object* x_12; lean_object* x_13; uint8_t x_14; +x_12 = lean_nat_sub(x_3, x_8); +x_13 = lean_array_get_size(x_6); +x_14 = lean_nat_dec_lt(x_12, x_13); +lean_dec(x_13); +if (x_14 == 0) +{ +lean_dec(x_12); +lean_dec(x_1); +return x_2; +} +else +{ +lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; +x_15 = lean_array_fget(x_6, x_12); +x_16 = lean_box(1); +x_17 = lean_array_fset(x_6, x_12, x_16); +x_18 = l_Lean_IR_UnreachableBranches_Value_merge___main(x_1, x_15); +x_19 = lean_array_fset(x_17, x_12, x_18); +lean_dec(x_12); +lean_ctor_set(x_2, 1, x_19); +return x_2; +} +} +} +else +{ +lean_object* x_20; lean_object* x_21; lean_object* x_22; size_t x_23; lean_object* x_24; uint8_t x_25; +x_20 = lean_ctor_get(x_2, 0); +x_21 = lean_ctor_get(x_2, 1); +x_22 = lean_ctor_get(x_2, 2); +x_23 = lean_ctor_get_usize(x_2, 4); +x_24 = lean_ctor_get(x_2, 3); +lean_inc(x_24); +lean_inc(x_22); +lean_inc(x_21); +lean_inc(x_20); +lean_dec(x_2); +x_25 = lean_nat_dec_le(x_24, x_3); +if (x_25 == 0) +{ +size_t x_26; lean_object* x_27; lean_object* x_28; +x_26 = lean_usize_of_nat(x_3); +x_27 = l_PersistentArray_modifyAux___main___at_Lean_IR_UnreachableBranches_updateCurrFnSummary___spec__2(x_1, x_20, x_26, x_23); +x_28 = lean_alloc_ctor(0, 4, sizeof(size_t)*1); +lean_ctor_set(x_28, 0, x_27); +lean_ctor_set(x_28, 1, x_21); +lean_ctor_set(x_28, 2, x_22); +lean_ctor_set(x_28, 3, x_24); +lean_ctor_set_usize(x_28, 4, x_23); +return x_28; +} +else +{ +lean_object* x_29; lean_object* x_30; uint8_t x_31; +x_29 = lean_nat_sub(x_3, x_24); +x_30 = lean_array_get_size(x_21); +x_31 = lean_nat_dec_lt(x_29, x_30); +lean_dec(x_30); +if (x_31 == 0) +{ +lean_object* x_32; +lean_dec(x_29); +lean_dec(x_1); +x_32 = lean_alloc_ctor(0, 4, sizeof(size_t)*1); +lean_ctor_set(x_32, 0, x_20); +lean_ctor_set(x_32, 1, x_21); +lean_ctor_set(x_32, 2, x_22); +lean_ctor_set(x_32, 3, x_24); +lean_ctor_set_usize(x_32, 4, x_23); +return x_32; +} +else +{ +lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; +x_33 = lean_array_fget(x_21, x_29); +x_34 = lean_box(1); +x_35 = lean_array_fset(x_21, x_29, x_34); +x_36 = l_Lean_IR_UnreachableBranches_Value_merge___main(x_1, x_33); +x_37 = lean_array_fset(x_35, x_29, x_36); +lean_dec(x_29); +x_38 = lean_alloc_ctor(0, 4, sizeof(size_t)*1); +lean_ctor_set(x_38, 0, x_20); +lean_ctor_set(x_38, 1, x_37); +lean_ctor_set(x_38, 2, x_22); +lean_ctor_set(x_38, 3, x_24); +lean_ctor_set_usize(x_38, 4, x_23); +return x_38; +} +} +} +} +} +lean_object* l_Lean_IR_UnreachableBranches_updateCurrFnSummary(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +uint8_t x_4; +x_4 = !lean_is_exclusive(x_3); +if (x_4 == 0) +{ +lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; +x_5 = lean_ctor_get(x_2, 0); +x_6 = lean_ctor_get(x_3, 1); +x_7 = l_PersistentArray_modify___at_Lean_IR_UnreachableBranches_updateCurrFnSummary___spec__1(x_1, x_6, x_5); +lean_ctor_set(x_3, 1, x_7); +x_8 = lean_box(0); +x_9 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_9, 0, x_8); +lean_ctor_set(x_9, 1, x_3); +return x_9; +} +else +{ +lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; +x_10 = lean_ctor_get(x_2, 0); +x_11 = lean_ctor_get(x_3, 0); +x_12 = lean_ctor_get(x_3, 1); +lean_inc(x_12); +lean_inc(x_11); +lean_dec(x_3); +x_13 = l_PersistentArray_modify___at_Lean_IR_UnreachableBranches_updateCurrFnSummary___spec__1(x_1, x_12, x_10); +x_14 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_14, 0, x_11); +lean_ctor_set(x_14, 1, x_13); +x_15 = lean_box(0); +x_16 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_16, 0, x_15); +lean_ctor_set(x_16, 1, x_14); +return x_16; +} +} +} +lean_object* l_PersistentArray_modifyAux___main___at_Lean_IR_UnreachableBranches_updateCurrFnSummary___spec__2___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +size_t x_5; size_t x_6; lean_object* x_7; +x_5 = lean_unbox_usize(x_3); +lean_dec(x_3); +x_6 = lean_unbox_usize(x_4); +lean_dec(x_4); +x_7 = l_PersistentArray_modifyAux___main___at_Lean_IR_UnreachableBranches_updateCurrFnSummary___spec__2(x_1, x_2, x_5, x_6); +return x_7; +} +} +lean_object* l_PersistentArray_modify___at_Lean_IR_UnreachableBranches_updateCurrFnSummary___spec__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; +x_4 = l_PersistentArray_modify___at_Lean_IR_UnreachableBranches_updateCurrFnSummary___spec__1(x_1, x_2, x_3); +lean_dec(x_3); +return x_4; +} +} +lean_object* l_Lean_IR_UnreachableBranches_updateCurrFnSummary___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; +x_4 = l_Lean_IR_UnreachableBranches_updateCurrFnSummary(x_1, x_2, x_3); +lean_dec(x_2); +return x_4; +} +} +lean_object* l_Nat_mfoldAux___main___at_Lean_IR_UnreachableBranches_updateJPParamsAssignment___spec__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, uint8_t x_6, lean_object* x_7, lean_object* x_8) { +_start: +{ +lean_object* x_9; uint8_t x_10; +x_9 = lean_unsigned_to_nat(0u); +x_10 = lean_nat_dec_eq(x_5, x_9); +if (x_10 == 0) +{ +lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; uint8_t x_27; +x_11 = lean_unsigned_to_nat(1u); +x_12 = lean_nat_sub(x_5, x_11); +lean_dec(x_5); +x_13 = lean_nat_sub(x_4, x_12); +x_14 = lean_nat_sub(x_13, x_11); +lean_dec(x_13); +x_15 = l_Lean_IR_paramInh; +x_16 = lean_array_get(x_15, x_1, x_14); +x_17 = l_Lean_IR_Arg_Inhabited; +x_18 = lean_array_get(x_17, x_2, x_14); +lean_dec(x_14); +x_19 = lean_ctor_get(x_16, 0); +lean_inc(x_19); +lean_dec(x_16); +x_20 = l_Lean_IR_UnreachableBranches_findVarValue(x_19, x_7, x_8); +x_21 = lean_ctor_get(x_20, 0); +lean_inc(x_21); +x_22 = lean_ctor_get(x_20, 1); +lean_inc(x_22); +lean_dec(x_20); +x_23 = l_Lean_IR_UnreachableBranches_findArgValue(x_18, x_7, x_22); +lean_dec(x_18); +x_24 = lean_ctor_get(x_23, 0); +lean_inc(x_24); +x_25 = lean_ctor_get(x_23, 1); +lean_inc(x_25); +lean_dec(x_23); +lean_inc(x_21); +x_26 = l_Lean_IR_UnreachableBranches_Value_merge___main(x_21, x_24); +x_27 = l_Lean_IR_UnreachableBranches_Value_beq___main(x_26, x_21); +lean_dec(x_21); +if (x_27 == 0) +{ +uint8_t x_28; +x_28 = !lean_is_exclusive(x_25); +if (x_28 == 0) +{ +lean_object* x_29; lean_object* x_30; uint8_t x_31; +x_29 = lean_ctor_get(x_25, 0); +x_30 = lean_array_get_size(x_29); +x_31 = lean_nat_dec_lt(x_3, x_30); +lean_dec(x_30); +if (x_31 == 0) +{ +uint8_t x_32; +lean_dec(x_26); +lean_dec(x_19); +x_32 = 1; +x_5 = x_12; +x_6 = x_32; +x_8 = x_25; +goto _start; +} +else +{ +lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; uint8_t x_39; +x_34 = lean_array_fget(x_29, x_3); +x_35 = l_HashMap_Inhabited___closed__1; +x_36 = lean_array_fset(x_29, x_3, x_35); +x_37 = l_HashMapImp_insert___at_Lean_IR_UnreachableBranches_updateVarAssignment___spec__2(x_34, x_19, x_26); +x_38 = lean_array_fset(x_36, x_3, x_37); +lean_ctor_set(x_25, 0, x_38); +x_39 = 1; +x_5 = x_12; +x_6 = x_39; +x_8 = x_25; +goto _start; +} +} +else +{ +lean_object* x_41; lean_object* x_42; lean_object* x_43; uint8_t x_44; +x_41 = lean_ctor_get(x_25, 0); +x_42 = lean_ctor_get(x_25, 1); +lean_inc(x_42); +lean_inc(x_41); +lean_dec(x_25); +x_43 = lean_array_get_size(x_41); +x_44 = lean_nat_dec_lt(x_3, x_43); +lean_dec(x_43); +if (x_44 == 0) +{ +lean_object* x_45; uint8_t x_46; +lean_dec(x_26); +lean_dec(x_19); +x_45 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_45, 0, x_41); +lean_ctor_set(x_45, 1, x_42); +x_46 = 1; +x_5 = x_12; +x_6 = x_46; +x_8 = x_45; +goto _start; +} +else +{ +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; +x_48 = lean_array_fget(x_41, x_3); +x_49 = l_HashMap_Inhabited___closed__1; +x_50 = lean_array_fset(x_41, x_3, x_49); +x_51 = l_HashMapImp_insert___at_Lean_IR_UnreachableBranches_updateVarAssignment___spec__2(x_48, x_19, x_26); +x_52 = lean_array_fset(x_50, x_3, x_51); +x_53 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_53, 0, x_52); +lean_ctor_set(x_53, 1, x_42); +x_54 = 1; +x_5 = x_12; +x_6 = x_54; +x_8 = x_53; +goto _start; +} +} +} +else +{ +lean_dec(x_26); +lean_dec(x_19); +x_5 = x_12; +x_8 = x_25; +goto _start; +} +} +else +{ +lean_object* x_57; lean_object* x_58; +lean_dec(x_5); +x_57 = lean_box(x_6); +x_58 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_58, 0, x_57); +lean_ctor_set(x_58, 1, x_8); +return x_58; +} +} +} +lean_object* l_Lean_IR_UnreachableBranches_updateJPParamsAssignment(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; lean_object* x_6; uint8_t x_7; lean_object* x_8; +x_5 = lean_ctor_get(x_3, 0); +x_6 = lean_array_get_size(x_1); +x_7 = 0; +lean_inc(x_6); +x_8 = l_Nat_mfoldAux___main___at_Lean_IR_UnreachableBranches_updateJPParamsAssignment___spec__1(x_1, x_2, x_5, x_6, x_6, x_7, x_3, x_4); +lean_dec(x_6); +return x_8; +} +} +lean_object* l_Nat_mfoldAux___main___at_Lean_IR_UnreachableBranches_updateJPParamsAssignment___spec__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7, lean_object* x_8) { +_start: +{ +uint8_t x_9; lean_object* x_10; +x_9 = lean_unbox(x_6); +lean_dec(x_6); +x_10 = l_Nat_mfoldAux___main___at_Lean_IR_UnreachableBranches_updateJPParamsAssignment___spec__1(x_1, x_2, x_3, x_4, x_5, x_9, x_7, x_8); +lean_dec(x_7); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +return x_10; +} +} +lean_object* l_Lean_IR_UnreachableBranches_updateJPParamsAssignment___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; +x_5 = l_Lean_IR_UnreachableBranches_updateJPParamsAssignment(x_1, x_2, x_3, x_4); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +return x_5; +} +} +lean_object* l_Array_mforAux___main___at_Lean_IR_UnreachableBranches_interpFnBody___main___spec__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { +_start: +{ +lean_object* x_6; uint8_t x_7; +x_6 = lean_array_get_size(x_2); +x_7 = lean_nat_dec_lt(x_3, x_6); +lean_dec(x_6); +if (x_7 == 0) +{ +lean_object* x_8; lean_object* x_9; +lean_dec(x_4); +lean_dec(x_3); +x_8 = lean_box(0); +x_9 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_9, 0, x_8); +lean_ctor_set(x_9, 1, x_5); +return x_9; +} +else +{ +lean_object* x_10; lean_object* x_11; lean_object* x_12; +x_10 = lean_array_fget(x_2, x_3); +x_11 = lean_unsigned_to_nat(1u); +x_12 = lean_nat_add(x_3, x_11); +lean_dec(x_3); +if (lean_obj_tag(x_10) == 0) +{ +lean_object* x_13; lean_object* x_14; uint8_t x_15; +x_13 = lean_ctor_get(x_10, 0); +lean_inc(x_13); +x_14 = lean_ctor_get(x_10, 1); +lean_inc(x_14); +lean_dec(x_10); +x_15 = l_Lean_IR_UnreachableBranches_containsCtor___main(x_1, x_13); +lean_dec(x_13); +if (x_15 == 0) +{ +lean_dec(x_14); +x_3 = x_12; +goto _start; +} +else +{ +lean_object* x_17; lean_object* x_18; +lean_inc(x_4); +x_17 = l_Lean_IR_UnreachableBranches_interpFnBody___main(x_14, x_4, x_5); +x_18 = lean_ctor_get(x_17, 1); +lean_inc(x_18); +lean_dec(x_17); +x_3 = x_12; +x_5 = x_18; +goto _start; +} +} +else +{ +lean_object* x_20; lean_object* x_21; lean_object* x_22; +x_20 = lean_ctor_get(x_10, 0); +lean_inc(x_20); +lean_dec(x_10); +lean_inc(x_4); +x_21 = l_Lean_IR_UnreachableBranches_interpFnBody___main(x_20, x_4, x_5); +x_22 = lean_ctor_get(x_21, 1); +lean_inc(x_22); +lean_dec(x_21); +x_3 = x_12; +x_5 = x_22; +goto _start; +} +} +} +} +lean_object* l_panicWithPos___at_Lean_IR_UnreachableBranches_interpFnBody___main___spec__2(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; +x_5 = l_panicWithPos___rarg___closed__1; +x_6 = lean_string_append(x_5, x_1); +x_7 = l_panicWithPos___rarg___closed__2; +x_8 = lean_string_append(x_6, x_7); +x_9 = l_Nat_repr(x_2); +x_10 = lean_string_append(x_8, x_9); +lean_dec(x_9); +x_11 = l_panicWithPos___rarg___closed__2; +x_12 = lean_string_append(x_10, x_11); +x_13 = l_Nat_repr(x_3); +x_14 = lean_string_append(x_12, x_13); +lean_dec(x_13); +x_15 = l_panicWithPos___rarg___closed__3; +x_16 = lean_string_append(x_14, x_15); +x_17 = lean_string_append(x_16, x_4); +x_18 = l_Array_empty___closed__1; +x_19 = lean_panic_fn(x_17); +return x_19; +} +} +lean_object* l_panicWithPos___at_Lean_IR_UnreachableBranches_interpFnBody___main___spec__3(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; +x_5 = l_panicWithPos___rarg___closed__1; +x_6 = lean_string_append(x_5, x_1); +x_7 = l_panicWithPos___rarg___closed__2; +x_8 = lean_string_append(x_6, x_7); +x_9 = l_Nat_repr(x_2); +x_10 = lean_string_append(x_8, x_9); +lean_dec(x_9); +x_11 = l_panicWithPos___rarg___closed__2; +x_12 = lean_string_append(x_10, x_11); +x_13 = l_Nat_repr(x_3); +x_14 = lean_string_append(x_12, x_13); +lean_dec(x_13); +x_15 = l_panicWithPos___rarg___closed__3; +x_16 = lean_string_append(x_14, x_15); +x_17 = lean_string_append(x_16, x_4); +x_18 = l_Lean_IR_Inhabited; +x_19 = lean_panic_fn(x_17); +return x_19; +} +} +lean_object* l_Lean_IR_UnreachableBranches_interpFnBody___main(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; +switch (lean_obj_tag(x_1)) { +case 0: +{ +lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; +x_11 = lean_ctor_get(x_1, 0); +lean_inc(x_11); +x_12 = lean_ctor_get(x_1, 1); +lean_inc(x_12); +x_13 = lean_ctor_get(x_1, 2); +lean_inc(x_13); +lean_dec(x_1); +x_14 = l_Lean_IR_UnreachableBranches_interpExpr(x_12, x_2, x_3); +x_15 = lean_ctor_get(x_14, 0); +lean_inc(x_15); +x_16 = lean_ctor_get(x_14, 1); +lean_inc(x_16); +lean_dec(x_14); +x_17 = l_Lean_IR_UnreachableBranches_updateVarAssignment(x_11, x_15, x_2, x_16); +x_18 = lean_ctor_get(x_17, 1); +lean_inc(x_18); +lean_dec(x_17); +x_1 = x_13; +x_3 = x_18; +goto _start; +} +case 1: +{ +lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; uint8_t x_24; +x_20 = lean_ctor_get(x_1, 0); +lean_inc(x_20); +x_21 = lean_ctor_get(x_1, 1); +lean_inc(x_21); +x_22 = lean_ctor_get(x_1, 2); +lean_inc(x_22); +x_23 = lean_ctor_get(x_1, 3); +lean_inc(x_23); +lean_dec(x_1); +x_24 = !lean_is_exclusive(x_2); +if (x_24 == 0) +{ +lean_object* x_25; lean_object* x_26; +x_25 = lean_ctor_get(x_2, 3); +x_26 = l_Lean_IR_LocalContext_addJP(x_25, x_20, x_21, x_22); +lean_ctor_set(x_2, 3, x_26); +x_1 = x_23; +goto _start; +} +else +{ +lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; +x_28 = lean_ctor_get(x_2, 0); +x_29 = lean_ctor_get(x_2, 1); +x_30 = lean_ctor_get(x_2, 2); +x_31 = lean_ctor_get(x_2, 3); +lean_inc(x_31); +lean_inc(x_30); +lean_inc(x_29); +lean_inc(x_28); +lean_dec(x_2); +x_32 = l_Lean_IR_LocalContext_addJP(x_31, x_20, x_21, x_22); +x_33 = lean_alloc_ctor(0, 4, 0); +lean_ctor_set(x_33, 0, x_28); +lean_ctor_set(x_33, 1, x_29); +lean_ctor_set(x_33, 2, x_30); +lean_ctor_set(x_33, 3, x_32); +x_1 = x_23; +x_2 = x_33; +goto _start; +} +} +case 10: +{ +lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; +x_35 = lean_ctor_get(x_1, 1); +lean_inc(x_35); +x_36 = lean_ctor_get(x_1, 2); +lean_inc(x_36); +lean_dec(x_1); +x_37 = l_Lean_IR_UnreachableBranches_findVarValue(x_35, x_2, x_3); +lean_dec(x_35); +x_38 = lean_ctor_get(x_37, 0); +lean_inc(x_38); +x_39 = lean_ctor_get(x_37, 1); +lean_inc(x_39); +lean_dec(x_37); +x_40 = lean_unsigned_to_nat(0u); +x_41 = l_Array_mforAux___main___at_Lean_IR_UnreachableBranches_interpFnBody___main___spec__1(x_38, x_36, x_40, x_2, x_39); +lean_dec(x_36); +lean_dec(x_38); +return x_41; +} +case 11: +{ +lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; +x_42 = lean_ctor_get(x_1, 0); +lean_inc(x_42); +lean_dec(x_1); +x_43 = l_Lean_IR_UnreachableBranches_findArgValue(x_42, x_2, x_3); +lean_dec(x_42); +x_44 = lean_ctor_get(x_43, 0); +lean_inc(x_44); +x_45 = lean_ctor_get(x_43, 1); +lean_inc(x_45); +lean_dec(x_43); +x_46 = l_Lean_IR_UnreachableBranches_updateCurrFnSummary(x_44, x_2, x_45); +lean_dec(x_2); +return x_46; +} +case 12: +{ +lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; +x_47 = lean_ctor_get(x_1, 0); +lean_inc(x_47); +x_48 = lean_ctor_get(x_1, 1); +lean_inc(x_48); +lean_dec(x_1); +x_49 = lean_ctor_get(x_2, 3); +lean_inc(x_49); +x_50 = l_Lean_IR_LocalContext_getJPParams(x_49, x_47); +if (lean_obj_tag(x_50) == 0) +{ +lean_object* x_51; lean_object* x_52; lean_object* x_53; lean_object* x_54; lean_object* x_55; lean_object* x_56; lean_object* x_57; uint8_t x_58; +x_51 = l_Option_get_x21___rarg___closed__1; +x_52 = lean_unsigned_to_nat(16u); +x_53 = lean_unsigned_to_nat(12u); +x_54 = l_Option_get_x21___rarg___closed__2; +x_55 = l_panicWithPos___at_Lean_IR_UnreachableBranches_interpFnBody___main___spec__2(x_51, x_52, x_53, x_54); +x_56 = l_Lean_IR_UnreachableBranches_updateJPParamsAssignment(x_55, x_48, x_2, x_3); +lean_dec(x_48); +lean_dec(x_55); +x_57 = lean_ctor_get(x_56, 0); +lean_inc(x_57); +x_58 = lean_unbox(x_57); +lean_dec(x_57); +if (x_58 == 0) +{ +uint8_t x_59; +lean_dec(x_49); +lean_dec(x_47); +lean_dec(x_2); +x_59 = !lean_is_exclusive(x_56); +if (x_59 == 0) +{ +lean_object* x_60; lean_object* x_61; +x_60 = lean_ctor_get(x_56, 0); +lean_dec(x_60); +x_61 = lean_box(0); +lean_ctor_set(x_56, 0, x_61); +return x_56; +} +else +{ +lean_object* x_62; lean_object* x_63; lean_object* x_64; +x_62 = lean_ctor_get(x_56, 1); +lean_inc(x_62); +lean_dec(x_56); +x_63 = lean_box(0); +x_64 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_64, 0, x_63); +lean_ctor_set(x_64, 1, x_62); +return x_64; +} +} +else +{ +lean_object* x_65; lean_object* x_66; +x_65 = lean_ctor_get(x_56, 1); +lean_inc(x_65); +lean_dec(x_56); +x_66 = l_Lean_IR_LocalContext_getJPBody(x_49, x_47); +lean_dec(x_47); +lean_dec(x_49); +if (lean_obj_tag(x_66) == 0) +{ +lean_object* x_67; +x_67 = l_panicWithPos___at_Lean_IR_UnreachableBranches_interpFnBody___main___spec__3(x_51, x_52, x_53, x_54); +x_1 = x_67; +x_3 = x_65; +goto _start; +} +else +{ +lean_object* x_69; +x_69 = lean_ctor_get(x_66, 0); +lean_inc(x_69); +lean_dec(x_66); +x_1 = x_69; +x_3 = x_65; +goto _start; +} +} +} +else +{ +lean_object* x_71; lean_object* x_72; lean_object* x_73; uint8_t x_74; +x_71 = lean_ctor_get(x_50, 0); +lean_inc(x_71); +lean_dec(x_50); +x_72 = l_Lean_IR_UnreachableBranches_updateJPParamsAssignment(x_71, x_48, x_2, x_3); +lean_dec(x_48); +lean_dec(x_71); +x_73 = lean_ctor_get(x_72, 0); +lean_inc(x_73); +x_74 = lean_unbox(x_73); +lean_dec(x_73); +if (x_74 == 0) +{ +uint8_t x_75; +lean_dec(x_49); +lean_dec(x_47); +lean_dec(x_2); +x_75 = !lean_is_exclusive(x_72); +if (x_75 == 0) +{ +lean_object* x_76; lean_object* x_77; +x_76 = lean_ctor_get(x_72, 0); +lean_dec(x_76); +x_77 = lean_box(0); +lean_ctor_set(x_72, 0, x_77); +return x_72; +} +else +{ +lean_object* x_78; lean_object* x_79; lean_object* x_80; +x_78 = lean_ctor_get(x_72, 1); +lean_inc(x_78); +lean_dec(x_72); +x_79 = lean_box(0); +x_80 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_80, 0, x_79); +lean_ctor_set(x_80, 1, x_78); +return x_80; +} +} +else +{ +lean_object* x_81; lean_object* x_82; +x_81 = lean_ctor_get(x_72, 1); +lean_inc(x_81); +lean_dec(x_72); +x_82 = l_Lean_IR_LocalContext_getJPBody(x_49, x_47); +lean_dec(x_47); +lean_dec(x_49); +if (lean_obj_tag(x_82) == 0) +{ +lean_object* x_83; lean_object* x_84; lean_object* x_85; lean_object* x_86; lean_object* x_87; +x_83 = l_Option_get_x21___rarg___closed__1; +x_84 = lean_unsigned_to_nat(16u); +x_85 = lean_unsigned_to_nat(12u); +x_86 = l_Option_get_x21___rarg___closed__2; +x_87 = l_panicWithPos___at_Lean_IR_UnreachableBranches_interpFnBody___main___spec__3(x_83, x_84, x_85, x_86); +x_1 = x_87; +x_3 = x_81; +goto _start; +} +else +{ +lean_object* x_89; +x_89 = lean_ctor_get(x_82, 0); +lean_inc(x_89); +lean_dec(x_82); +x_1 = x_89; +x_3 = x_81; +goto _start; +} +} +} +} +default: +{ +lean_object* x_91; +x_91 = lean_box(0); +x_4 = x_91; +goto block_10; +} +} +block_10: +{ +uint8_t x_5; +lean_dec(x_4); +x_5 = l_Lean_IR_FnBody_isTerminal(x_1); +if (x_5 == 0) +{ +lean_object* x_6; +x_6 = l_Lean_IR_FnBody_body(x_1); +lean_dec(x_1); +x_1 = x_6; +goto _start; +} +else +{ +lean_object* x_8; lean_object* x_9; +lean_dec(x_2); +lean_dec(x_1); +x_8 = lean_box(0); +x_9 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_9, 0, x_8); +lean_ctor_set(x_9, 1, x_3); +return x_9; +} +} +} +} +lean_object* l_Array_mforAux___main___at_Lean_IR_UnreachableBranches_interpFnBody___main___spec__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { +_start: +{ +lean_object* x_6; +x_6 = l_Array_mforAux___main___at_Lean_IR_UnreachableBranches_interpFnBody___main___spec__1(x_1, x_2, x_3, x_4, x_5); +lean_dec(x_2); +lean_dec(x_1); +return x_6; +} +} +lean_object* l_panicWithPos___at_Lean_IR_UnreachableBranches_interpFnBody___main___spec__2___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; +x_5 = l_panicWithPos___at_Lean_IR_UnreachableBranches_interpFnBody___main___spec__2(x_1, x_2, x_3, x_4); +lean_dec(x_4); +lean_dec(x_1); +return x_5; +} +} +lean_object* l_panicWithPos___at_Lean_IR_UnreachableBranches_interpFnBody___main___spec__3___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; +x_5 = l_panicWithPos___at_Lean_IR_UnreachableBranches_interpFnBody___main___spec__3(x_1, x_2, x_3, x_4); +lean_dec(x_4); +lean_dec(x_1); +return x_5; +} +} +lean_object* l_Lean_IR_UnreachableBranches_interpFnBody(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; +x_4 = l_Lean_IR_UnreachableBranches_interpFnBody___main(x_1, x_2, x_3); +return x_4; +} +} +lean_object* l_Nat_mfoldAux___main___at_Lean_IR_UnreachableBranches_inferStep___spec__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, uint8_t x_4, lean_object* x_5, lean_object* x_6) { +_start: +{ +lean_object* x_7; uint8_t x_8; +x_7 = lean_unsigned_to_nat(0u); +x_8 = lean_nat_dec_eq(x_3, x_7); +if (x_8 == 0) +{ +lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; +x_9 = lean_unsigned_to_nat(1u); +x_10 = lean_nat_sub(x_3, x_9); +lean_dec(x_3); +x_11 = lean_nat_sub(x_2, x_10); +x_12 = lean_nat_sub(x_11, x_9); +lean_dec(x_11); +x_13 = lean_ctor_get(x_1, 1); +x_14 = l_Lean_IR_Decl_Inhabited; +x_15 = lean_array_get(x_14, x_13, x_12); +if (lean_obj_tag(x_15) == 0) +{ +lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; +x_16 = lean_ctor_get(x_15, 2); +lean_inc(x_16); +lean_dec(x_15); +x_17 = lean_ctor_get(x_6, 1); +lean_inc(x_17); +x_18 = l_PersistentArray_get_x21___at_Lean_IR_UnreachableBranches_interpExpr___spec__3(x_17, x_12); +x_19 = lean_ctor_get(x_5, 1); +x_20 = lean_ctor_get(x_5, 2); +x_21 = lean_ctor_get(x_5, 3); +lean_inc(x_21); +lean_inc(x_20); +lean_inc(x_19); +lean_inc(x_12); +x_22 = lean_alloc_ctor(0, 4, 0); +lean_ctor_set(x_22, 0, x_12); +lean_ctor_set(x_22, 1, x_19); +lean_ctor_set(x_22, 2, x_20); +lean_ctor_set(x_22, 3, x_21); +x_23 = l_Lean_IR_UnreachableBranches_interpFnBody___main(x_16, x_22, x_6); +if (x_4 == 0) +{ +lean_object* x_24; lean_object* x_25; lean_object* x_26; uint8_t x_27; +x_24 = lean_ctor_get(x_23, 1); +lean_inc(x_24); +lean_dec(x_23); +x_25 = lean_ctor_get(x_24, 1); +lean_inc(x_25); +x_26 = l_PersistentArray_get_x21___at_Lean_IR_UnreachableBranches_interpExpr___spec__3(x_25, x_12); +lean_dec(x_12); +x_27 = l_Lean_IR_UnreachableBranches_Value_beq___main(x_18, x_26); +lean_dec(x_26); +lean_dec(x_18); +if (x_27 == 0) +{ +uint8_t x_28; +x_28 = 1; +x_3 = x_10; +x_4 = x_28; +x_6 = x_24; +goto _start; +} +else +{ +uint8_t x_30; +x_30 = 0; +x_3 = x_10; +x_4 = x_30; +x_6 = x_24; +goto _start; +} +} +else +{ +lean_object* x_32; uint8_t x_33; +lean_dec(x_18); +lean_dec(x_12); +x_32 = lean_ctor_get(x_23, 1); +lean_inc(x_32); +lean_dec(x_23); +x_33 = 1; +x_3 = x_10; +x_4 = x_33; +x_6 = x_32; +goto _start; +} +} +else +{ +lean_dec(x_15); +lean_dec(x_12); +x_3 = x_10; +goto _start; +} +} +else +{ +lean_object* x_36; lean_object* x_37; +lean_dec(x_3); +x_36 = lean_box(x_4); +x_37 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_37, 0, x_36); +lean_ctor_set(x_37, 1, x_6); +return x_37; +} +} +} +lean_object* l_Lean_IR_UnreachableBranches_inferStep(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; lean_object* x_4; uint8_t x_5; lean_object* x_6; +x_3 = lean_ctor_get(x_1, 1); +x_4 = lean_array_get_size(x_3); +x_5 = 0; +lean_inc(x_4); +x_6 = l_Nat_mfoldAux___main___at_Lean_IR_UnreachableBranches_inferStep___spec__1(x_1, x_4, x_4, x_5, x_1, x_2); +lean_dec(x_4); +return x_6; +} +} +lean_object* l_Nat_mfoldAux___main___at_Lean_IR_UnreachableBranches_inferStep___spec__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { +_start: +{ +uint8_t x_7; lean_object* x_8; +x_7 = lean_unbox(x_4); +lean_dec(x_4); +x_8 = l_Nat_mfoldAux___main___at_Lean_IR_UnreachableBranches_inferStep___spec__1(x_1, x_2, x_3, x_7, x_5, x_6); +lean_dec(x_5); +lean_dec(x_2); +lean_dec(x_1); +return x_8; +} +} +lean_object* l_Lean_IR_UnreachableBranches_inferStep___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = l_Lean_IR_UnreachableBranches_inferStep(x_1, x_2); +lean_dec(x_1); +return x_3; +} +} +lean_object* l_Lean_IR_UnreachableBranches_inferMain___main___rarg(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; lean_object* x_4; uint8_t x_5; +x_3 = l_Lean_IR_UnreachableBranches_inferStep(x_1, x_2); +x_4 = lean_ctor_get(x_3, 0); +lean_inc(x_4); +x_5 = lean_unbox(x_4); +lean_dec(x_4); +if (x_5 == 0) +{ +uint8_t x_6; +x_6 = !lean_is_exclusive(x_3); +if (x_6 == 0) +{ +lean_object* x_7; lean_object* x_8; +x_7 = lean_ctor_get(x_3, 0); +lean_dec(x_7); +x_8 = lean_box(0); +lean_ctor_set(x_3, 0, x_8); +return x_3; +} +else +{ +lean_object* x_9; lean_object* x_10; lean_object* x_11; +x_9 = lean_ctor_get(x_3, 1); +lean_inc(x_9); +lean_dec(x_3); +x_10 = lean_box(0); +x_11 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_11, 0, x_10); +lean_ctor_set(x_11, 1, x_9); +return x_11; +} +} +else +{ +lean_object* x_12; +x_12 = lean_ctor_get(x_3, 1); +lean_inc(x_12); +lean_dec(x_3); +x_2 = x_12; +goto _start; +} +} +} +lean_object* l_Lean_IR_UnreachableBranches_inferMain___main(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_Lean_IR_UnreachableBranches_inferMain___main___rarg___boxed), 2, 0); +return x_2; +} +} +lean_object* l_Lean_IR_UnreachableBranches_inferMain___main___rarg___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = l_Lean_IR_UnreachableBranches_inferMain___main___rarg(x_1, x_2); +lean_dec(x_1); +return x_3; +} +} +lean_object* l_Lean_IR_UnreachableBranches_inferMain___main___boxed(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = l_Lean_IR_UnreachableBranches_inferMain___main(x_1); +lean_dec(x_1); +return x_2; +} +} +lean_object* l_Lean_IR_UnreachableBranches_inferMain___rarg(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = l_Lean_IR_UnreachableBranches_inferMain___main___rarg(x_1, x_2); +return x_3; +} +} +lean_object* l_Lean_IR_UnreachableBranches_inferMain(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_Lean_IR_UnreachableBranches_inferMain___rarg___boxed), 2, 0); +return x_2; +} +} +lean_object* l_Lean_IR_UnreachableBranches_inferMain___rarg___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = l_Lean_IR_UnreachableBranches_inferMain___rarg(x_1, x_2); +lean_dec(x_1); +return x_3; +} +} +lean_object* l_Lean_IR_UnreachableBranches_inferMain___boxed(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = l_Lean_IR_UnreachableBranches_inferMain(x_1); +lean_dec(x_1); +return x_2; +} +} +lean_object* l_Array_ummapAux___main___at_Lean_IR_UnreachableBranches_infer___spec__1(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; uint8_t x_4; +x_3 = lean_array_get_size(x_2); +x_4 = lean_nat_dec_lt(x_1, x_3); +lean_dec(x_3); +if (x_4 == 0) +{ +lean_object* x_5; lean_object* x_6; +lean_dec(x_1); +x_5 = l_Array_empty___closed__1; +x_6 = x_2; +return x_6; +} +else +{ +lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; +x_7 = lean_array_fget(x_2, x_1); +x_8 = lean_box(0); +lean_inc(x_7); +x_9 = x_8; +x_10 = lean_array_fset(x_2, x_1, x_9); +x_11 = lean_unsigned_to_nat(1u); +x_12 = lean_nat_add(x_1, x_11); +x_13 = l_HashMap_Inhabited___closed__1; +x_14 = x_13; +x_15 = lean_array_fset(x_10, x_1, x_14); +lean_dec(x_1); +x_1 = x_12; +x_2 = x_15; +goto _start; +} +} +} +lean_object* l_Nat_foldAux___main___at_Lean_IR_UnreachableBranches_infer___spec__2(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { +_start: +{ +lean_object* x_6; uint8_t x_7; +x_6 = lean_unsigned_to_nat(0u); +x_7 = lean_nat_dec_eq(x_4, x_6); +if (x_7 == 0) +{ +lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; +x_8 = lean_unsigned_to_nat(1u); +x_9 = lean_nat_sub(x_4, x_8); +x_10 = lean_nat_sub(x_3, x_4); +lean_dec(x_4); +x_11 = l_Lean_IR_Decl_Inhabited; +x_12 = lean_array_get(x_11, x_1, x_10); +x_13 = l_Lean_IR_Decl_name(x_12); +lean_dec(x_12); +lean_inc(x_2); +x_14 = l_PersistentArray_get_x21___at_Lean_IR_UnreachableBranches_interpExpr___spec__3(x_2, x_10); +lean_dec(x_10); +x_15 = l_Lean_IR_UnreachableBranches_addFunctionSummary(x_5, x_13, x_14); +x_4 = x_9; +x_5 = x_15; +goto _start; +} +else +{ +lean_dec(x_4); +lean_dec(x_2); +return x_5; +} +} +} +lean_object* l_Lean_IR_UnreachableBranches_infer(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; +x_3 = lean_unsigned_to_nat(0u); +lean_inc(x_2); +x_4 = l_Array_ummapAux___main___at_Lean_IR_UnreachableBranches_infer___spec__1(x_3, x_2); +x_5 = lean_array_get_size(x_2); +x_6 = lean_box(0); +lean_inc(x_5); +x_7 = l_mkPersistentArray___rarg(x_5, x_6); +x_8 = lean_box(0); +lean_inc(x_1); +lean_inc(x_2); +x_9 = lean_alloc_ctor(0, 4, 0); +lean_ctor_set(x_9, 0, x_3); +lean_ctor_set(x_9, 1, x_2); +lean_ctor_set(x_9, 2, x_1); +lean_ctor_set(x_9, 3, x_8); +x_10 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_10, 0, x_4); +lean_ctor_set(x_10, 1, x_7); +x_11 = l_Lean_IR_UnreachableBranches_inferMain___main___rarg(x_9, x_10); +lean_dec(x_9); +x_12 = lean_ctor_get(x_11, 1); +lean_inc(x_12); +lean_dec(x_11); +x_13 = lean_ctor_get(x_12, 1); +lean_inc(x_13); +lean_dec(x_12); +lean_inc(x_5); +x_14 = l_Nat_foldAux___main___at_Lean_IR_UnreachableBranches_infer___spec__2(x_2, x_13, x_5, x_5, x_1); +lean_dec(x_5); +lean_dec(x_2); +return x_14; +} +} +lean_object* l_Nat_foldAux___main___at_Lean_IR_UnreachableBranches_infer___spec__2___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { +_start: +{ +lean_object* x_6; +x_6 = l_Nat_foldAux___main___at_Lean_IR_UnreachableBranches_infer___spec__2(x_1, x_2, x_3, x_4, x_5); +lean_dec(x_3); +lean_dec(x_1); +return x_6; +} +} +lean_object* initialize_init_control_reader(lean_object*); +lean_object* initialize_init_data_option_default(lean_object*); +lean_object* initialize_init_lean_compiler_ir_format(lean_object*); +lean_object* initialize_init_lean_compiler_ir_basic(lean_object*); +static bool _G_initialized = false; +lean_object* initialize_init_lean_compiler_ir_unreachbranches(lean_object* w) { +if (_G_initialized) return w; +_G_initialized = true; +if (lean_io_result_is_error(w)) return w; +w = initialize_init_control_reader(w); +if (lean_io_result_is_error(w)) return w; +w = initialize_init_data_option_default(w); +if (lean_io_result_is_error(w)) return w; +w = initialize_init_lean_compiler_ir_format(w); +if (lean_io_result_is_error(w)) return w; +w = initialize_init_lean_compiler_ir_basic(w); +if (lean_io_result_is_error(w)) return w; +l_Lean_IR_UnreachableBranches_Value_Inhabited = _init_l_Lean_IR_UnreachableBranches_Value_Inhabited(); +lean_mark_persistent(l_Lean_IR_UnreachableBranches_Value_Inhabited); +l_Array_isEqv___at_Lean_IR_UnreachableBranches_Value_beq___main___spec__1___closed__1 = _init_l_Array_isEqv___at_Lean_IR_UnreachableBranches_Value_beq___main___spec__1___closed__1(); +lean_mark_persistent(l_Array_isEqv___at_Lean_IR_UnreachableBranches_Value_beq___main___spec__1___closed__1); +l_Lean_IR_UnreachableBranches_Value_HasBeq___closed__1 = _init_l_Lean_IR_UnreachableBranches_Value_HasBeq___closed__1(); +lean_mark_persistent(l_Lean_IR_UnreachableBranches_Value_HasBeq___closed__1); +l_Lean_IR_UnreachableBranches_Value_HasBeq = _init_l_Lean_IR_UnreachableBranches_Value_HasBeq(); +lean_mark_persistent(l_Lean_IR_UnreachableBranches_Value_HasBeq); +l_panicWithPos___at_Lean_IR_UnreachableBranches_Value_addChoice___main___spec__1___closed__1 = _init_l_panicWithPos___at_Lean_IR_UnreachableBranches_Value_addChoice___main___spec__1___closed__1(); +lean_mark_persistent(l_panicWithPos___at_Lean_IR_UnreachableBranches_Value_addChoice___main___spec__1___closed__1); +l_Lean_IR_UnreachableBranches_Value_addChoice___main___closed__1 = _init_l_Lean_IR_UnreachableBranches_Value_addChoice___main___closed__1(); +lean_mark_persistent(l_Lean_IR_UnreachableBranches_Value_addChoice___main___closed__1); +l_Lean_IR_UnreachableBranches_Value_addChoice___main___closed__2 = _init_l_Lean_IR_UnreachableBranches_Value_addChoice___main___closed__2(); +lean_mark_persistent(l_Lean_IR_UnreachableBranches_Value_addChoice___main___closed__2); +l_List_foldl___main___at_Lean_IR_UnreachableBranches_Value_merge___main___spec__2___closed__1 = _init_l_List_foldl___main___at_Lean_IR_UnreachableBranches_Value_merge___main___spec__2___closed__1(); +lean_mark_persistent(l_List_foldl___main___at_Lean_IR_UnreachableBranches_Value_merge___main___spec__2___closed__1); +l_Lean_IR_UnreachableBranches_Value_format___main___closed__1 = _init_l_Lean_IR_UnreachableBranches_Value_format___main___closed__1(); +lean_mark_persistent(l_Lean_IR_UnreachableBranches_Value_format___main___closed__1); +l_Lean_IR_UnreachableBranches_Value_format___main___closed__2 = _init_l_Lean_IR_UnreachableBranches_Value_format___main___closed__2(); +lean_mark_persistent(l_Lean_IR_UnreachableBranches_Value_format___main___closed__2); +l_Lean_IR_UnreachableBranches_Value_format___main___closed__3 = _init_l_Lean_IR_UnreachableBranches_Value_format___main___closed__3(); +lean_mark_persistent(l_Lean_IR_UnreachableBranches_Value_format___main___closed__3); +l_Lean_IR_UnreachableBranches_Value_format___main___closed__4 = _init_l_Lean_IR_UnreachableBranches_Value_format___main___closed__4(); +lean_mark_persistent(l_Lean_IR_UnreachableBranches_Value_format___main___closed__4); +l_Lean_IR_UnreachableBranches_Value_format___main___closed__5 = _init_l_Lean_IR_UnreachableBranches_Value_format___main___closed__5(); +lean_mark_persistent(l_Lean_IR_UnreachableBranches_Value_format___main___closed__5); +l_Lean_IR_UnreachableBranches_Value_format___main___closed__6 = _init_l_Lean_IR_UnreachableBranches_Value_format___main___closed__6(); +lean_mark_persistent(l_Lean_IR_UnreachableBranches_Value_format___main___closed__6); +l_Lean_IR_UnreachableBranches_Value_Lean_HasFormat___closed__1 = _init_l_Lean_IR_UnreachableBranches_Value_Lean_HasFormat___closed__1(); +lean_mark_persistent(l_Lean_IR_UnreachableBranches_Value_Lean_HasFormat___closed__1); +l_Lean_IR_UnreachableBranches_Value_Lean_HasFormat = _init_l_Lean_IR_UnreachableBranches_Value_Lean_HasFormat(); +lean_mark_persistent(l_Lean_IR_UnreachableBranches_Value_Lean_HasFormat); +l_Lean_IR_UnreachableBranches_Value_HasToString___closed__1 = _init_l_Lean_IR_UnreachableBranches_Value_HasToString___closed__1(); +lean_mark_persistent(l_Lean_IR_UnreachableBranches_Value_HasToString___closed__1); +l_Lean_IR_UnreachableBranches_Value_HasToString = _init_l_Lean_IR_UnreachableBranches_Value_HasToString(); +lean_mark_persistent(l_Lean_IR_UnreachableBranches_Value_HasToString); +l_Lean_SMap_empty___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__12___closed__1 = _init_l_Lean_SMap_empty___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__12___closed__1(); +lean_mark_persistent(l_Lean_SMap_empty___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__12___closed__1); +l_Lean_SMap_empty___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__12___closed__2 = _init_l_Lean_SMap_empty___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__12___closed__2(); +lean_mark_persistent(l_Lean_SMap_empty___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__12___closed__2); +l_Lean_SMap_empty___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__12 = _init_l_Lean_SMap_empty___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__12(); +lean_mark_persistent(l_Lean_SMap_empty___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__12); +l_Lean_registerEnvExtensionUnsafe___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__21___closed__1 = _init_l_Lean_registerEnvExtensionUnsafe___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__21___closed__1(); +lean_mark_persistent(l_Lean_registerEnvExtensionUnsafe___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__21___closed__1); +l_Lean_registerEnvExtensionUnsafe___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__21___closed__2 = _init_l_Lean_registerEnvExtensionUnsafe___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__21___closed__2(); +lean_mark_persistent(l_Lean_registerEnvExtensionUnsafe___at_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___spec__21___closed__2); +l_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___closed__1 = _init_l_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___closed__1(); +lean_mark_persistent(l_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___closed__1); +l_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___closed__2 = _init_l_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___closed__2(); +lean_mark_persistent(l_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___closed__2); +l_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___closed__3 = _init_l_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___closed__3(); +lean_mark_persistent(l_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___closed__3); +l_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___closed__4 = _init_l_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___closed__4(); +lean_mark_persistent(l_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___closed__4); +l_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___closed__5 = _init_l_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___closed__5(); +lean_mark_persistent(l_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension___closed__5); +l_Lean_IR_UnreachableBranches_functionSummariesExt___closed__1 = _init_l_Lean_IR_UnreachableBranches_functionSummariesExt___closed__1(); +lean_mark_persistent(l_Lean_IR_UnreachableBranches_functionSummariesExt___closed__1); +l_Lean_IR_UnreachableBranches_functionSummariesExt___closed__2 = _init_l_Lean_IR_UnreachableBranches_functionSummariesExt___closed__2(); +lean_mark_persistent(l_Lean_IR_UnreachableBranches_functionSummariesExt___closed__2); +l_Lean_IR_UnreachableBranches_functionSummariesExt___closed__3 = _init_l_Lean_IR_UnreachableBranches_functionSummariesExt___closed__3(); +lean_mark_persistent(l_Lean_IR_UnreachableBranches_functionSummariesExt___closed__3); +l_Lean_IR_UnreachableBranches_functionSummariesExt___closed__4 = _init_l_Lean_IR_UnreachableBranches_functionSummariesExt___closed__4(); +lean_mark_persistent(l_Lean_IR_UnreachableBranches_functionSummariesExt___closed__4); +l_Lean_IR_UnreachableBranches_functionSummariesExt___closed__5 = _init_l_Lean_IR_UnreachableBranches_functionSummariesExt___closed__5(); +lean_mark_persistent(l_Lean_IR_UnreachableBranches_functionSummariesExt___closed__5); +l_Lean_IR_UnreachableBranches_functionSummariesExt___closed__6 = _init_l_Lean_IR_UnreachableBranches_functionSummariesExt___closed__6(); +lean_mark_persistent(l_Lean_IR_UnreachableBranches_functionSummariesExt___closed__6); +l_Lean_IR_UnreachableBranches_functionSummariesExt___closed__7 = _init_l_Lean_IR_UnreachableBranches_functionSummariesExt___closed__7(); +lean_mark_persistent(l_Lean_IR_UnreachableBranches_functionSummariesExt___closed__7); +l_Lean_IR_UnreachableBranches_functionSummariesExt___closed__8 = _init_l_Lean_IR_UnreachableBranches_functionSummariesExt___closed__8(); +lean_mark_persistent(l_Lean_IR_UnreachableBranches_functionSummariesExt___closed__8); +l_Lean_IR_UnreachableBranches_functionSummariesExt___closed__9 = _init_l_Lean_IR_UnreachableBranches_functionSummariesExt___closed__9(); +lean_mark_persistent(l_Lean_IR_UnreachableBranches_functionSummariesExt___closed__9); +w = l_Lean_IR_UnreachableBranches_mkFunctionSummariesExtension(w); +if (lean_io_result_is_error(w)) return w; +l_Lean_IR_UnreachableBranches_functionSummariesExt = lean_io_result_get_value(w); +lean_mark_persistent(l_Lean_IR_UnreachableBranches_functionSummariesExt); +l_Lean_IR_UnreachableBranches_updateVarAssignment___closed__1 = _init_l_Lean_IR_UnreachableBranches_updateVarAssignment___closed__1(); +lean_mark_persistent(l_Lean_IR_UnreachableBranches_updateVarAssignment___closed__1); +return w; +} +#ifdef __cplusplus +} +#endif diff --git a/src/stage0/init/lean/elaborator/basic.c b/src/stage0/init/lean/elaborator/basic.c index 2a5ac5ef6d..69cf250e4c 100644 --- a/src/stage0/init/lean/elaborator/basic.c +++ b/src/stage0/init/lean/elaborator/basic.c @@ -395,7 +395,6 @@ extern lean_object* l_Lean_nameToExprAux___main___closed__4; lean_object* l_Lean_Elab_logMessage___boxed(lean_object*, lean_object*, lean_object*); uint8_t lean_nat_dec_le(lean_object*, lean_object*); lean_object* l_HashMapImp_expand___at_Lean_addBuiltinCommandElab___spec__12(lean_object*, lean_object*); -extern lean_object* l_Array_mfindAux___main___at_Lean_findFile___spec__2___closed__2; lean_object* l_AssocList_mfoldl___main___at_Lean_addBuiltinTermElab___spec__15(lean_object*, lean_object*); lean_object* l_Lean_ElabAttribute_Inhabited___rarg(lean_object*); lean_object* l_Lean_Elab_getScope___boxed(lean_object*); @@ -461,6 +460,7 @@ lean_object* l_Lean_Elab_rootNamespace___closed__1; lean_object* l_Lean_Elab_mkFreshName___rarg(lean_object*); lean_object* l_Lean_LocalContext_mkForall(lean_object*, lean_object*, lean_object*); extern lean_object* l___private_init_lean_environment_5__envExtensionsRef; +extern lean_object* l_Array_mfindAux___main___at_Lean_findFile___spec__2___closed__3; lean_object* l_Lean_Elab_processHeaderAux___closed__1; lean_object* l_Lean_Elab_runElab___at_Lean_Elab_processCommand___spec__1(lean_object*, lean_object*, lean_object*); lean_object* l_PersistentHashMap_insert___at_Lean_addBuiltinTermElab___spec__8(lean_object*, lean_object*, lean_object*); @@ -13499,7 +13499,7 @@ _start: { lean_object* x_1; lean_object* x_2; lean_object* x_3; x_1 = l_Lean_mkInitAttr___closed__2; -x_2 = l_Array_mfindAux___main___at_Lean_findFile___spec__2___closed__2; +x_2 = l_Array_mfindAux___main___at_Lean_findFile___spec__2___closed__3; x_3 = lean_name_mk_string(x_1, x_2); return x_3; } diff --git a/src/stage0/init/lean/expr.c b/src/stage0/init/lean/expr.c index c89b5b1446..a5c14946cb 100644 --- a/src/stage0/init/lean/expr.c +++ b/src/stage0/init/lean/expr.c @@ -23,24 +23,30 @@ uint8_t lean_name_dec_eq(lean_object*, lean_object*); lean_object* l_Lean_Expr_getAppFn(lean_object*); lean_object* l_Lean_mkBinApp(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_MData_empty; +lean_object* l_Lean_Expr_constName(lean_object*); lean_object* lean_expr_mk_sort(lean_object*); lean_object* l_Lean_Expr_pi___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Expr_isLambda___boxed(lean_object*); lean_object* lean_nat_sub(lean_object*, lean_object*); uint8_t l_Lean_Expr_isSort(lean_object*); uint8_t l_Lean_Expr_isConst(lean_object*); +lean_object* l_Lean_Expr_bvarIdx(lean_object*); lean_object* l_Lean_Expr_HasBeq___closed__1; lean_object* l_Lean_Expr_isAppOfArity___main___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_exprIsInhabited; size_t lean_expr_hash(lean_object*); lean_object* lean_expr_dbg_to_string(lean_object*); +lean_object* l_Lean_Expr_constName___boxed(lean_object*); lean_object* l_Lean_mkApp(lean_object*, lean_object*); lean_object* l_Lean_Expr_instantiate1___boxed(lean_object*, lean_object*); lean_object* l_Lean_Expr_eqv___boxed(lean_object*, lean_object*); lean_object* l_Lean_mkDecIsTrue___closed__4; lean_object* lean_expr_mk_pi(lean_object*, uint8_t, lean_object*, lean_object*); +lean_object* l_Lean_Expr_isBVar___boxed(lean_object*); +lean_object* l_panicWithPos___at_Lean_Expr_constName___spec__1(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_expr_instantiate(lean_object*, lean_object*); lean_object* l_Lean_Expr_getAppNumArgsAux___boxed(lean_object*, lean_object*); +lean_object* l_Lean_Expr_fvarName___closed__1; lean_object* lean_expr_local(lean_object*, lean_object*, lean_object*, uint8_t); lean_object* lean_expr_mk_app(lean_object*, lean_object*); lean_object* l_Lean_Expr_quickLt___boxed(lean_object*, lean_object*); @@ -50,8 +56,10 @@ lean_object* lean_expr_mk_let(lean_object*, lean_object*, lean_object*, lean_obj lean_object* l_Lean_BinderInfo_isInstImplicit___boxed(lean_object*); lean_object* lean_expr_instantiate1(lean_object*, lean_object*); lean_object* l_Lean_Expr_getAppFn___main(lean_object*); +extern lean_object* l_Lean_Inhabited; lean_object* l_Lean_mkDecIsFalse___closed__1; lean_object* l_Lean_Expr_isAppOfArity___boxed(lean_object*, lean_object*, lean_object*); +lean_object* l_panicWithPos___at_Lean_Expr_constLevels___spec__1(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_mkDecIsTrue___closed__3; lean_object* l_Lean_mkConst(lean_object*, lean_object*); lean_object* l_Lean_Expr_getAppNumArgsAux___main(lean_object*, lean_object*); @@ -62,18 +70,27 @@ lean_object* lean_expr_mk_fvar(lean_object*); lean_object* l_List_foldl___main___at_Lean_mkApp___spec__1(lean_object*, lean_object*); lean_object* l_Lean_BinderInfo_beq___boxed(lean_object*, lean_object*); uint8_t l_Lean_Expr_isLet(lean_object*); +lean_object* l_Lean_Expr_bvarIdx___boxed(lean_object*); +lean_object* l_Nat_repr(lean_object*); lean_object* l_Lean_Expr_getAppArgsAux(lean_object*, lean_object*); lean_object* lean_expr_mk_proj(lean_object*, lean_object*, lean_object*); +extern lean_object* l_panicWithPos___rarg___closed__3; lean_object* lean_expr_mk_const(lean_object*, lean_object*); +lean_object* l_Lean_Expr_constName___closed__1; lean_object* l_Lean_Expr_bvar___boxed(lean_object*); lean_object* l_Lean_Expr_Hashable___closed__1; uint8_t lean_expr_eqv(lean_object*, lean_object*); lean_object* l_Lean_MData_HasEmptyc; +lean_object* l_Lean_Expr_constLevels___boxed(lean_object*); lean_object* l_Lean_Expr_isApp___boxed(lean_object*); +lean_object* l_panicWithPos___at_Lean_Expr_constLevels___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Expr_bindingDomain(lean_object*); lean_object* l_Lean_BinderInfo_HasBeq; lean_object* l_Lean_Expr_dbgToString___boxed(lean_object*); lean_object* l_Lean_Expr_instantiateRev___boxed(lean_object*, lean_object*); +lean_object* lean_string_append(lean_object*, lean_object*); +lean_object* l_Lean_Expr_constLevels___closed__1; +lean_object* l_Lean_Expr_constName___closed__2; lean_object* l_Lean_Expr_getAppArgsAux___main___boxed(lean_object*, lean_object*); lean_object* l_Lean_Expr_instantiate___boxed(lean_object*, lean_object*); uint8_t l_Lean_Expr_isForall(lean_object*); @@ -90,8 +107,11 @@ uint8_t l_Lean_BinderInfo_beq(uint8_t, uint8_t); uint8_t lean_nat_dec_eq(lean_object*, lean_object*); lean_object* l_Lean_Expr_app___boxed(lean_object*, lean_object*); lean_object* l_Lean_mkDecIsTrue___closed__2; +extern lean_object* l_panicWithPos___rarg___closed__1; lean_object* l_Lean_Expr_getAppArgs(lean_object*); lean_object* l_Lean_Expr_getAppFn___main___boxed(lean_object*); +uint8_t l_Lean_Expr_isFVar(lean_object*); +lean_object* l_Lean_Expr_fvarName___boxed(lean_object*); uint8_t l_Lean_BinderInfo_isInstImplicit(uint8_t); lean_object* l_Lean_Expr_getAppArgsAux___main(lean_object*, lean_object*); lean_object* lean_expr_instantiate_rev(lean_object*, lean_object*); @@ -102,9 +122,11 @@ lean_object* l_Lean_Expr_HasToString; uint8_t l_Lean_Expr_isAppOfArity___main(lean_object*, lean_object*, lean_object*); uint8_t l_Lean_Expr_isBinding(lean_object*); lean_object* lean_expr_mk_mvar(lean_object*); +uint8_t l_Lean_Expr_isMVar(lean_object*); lean_object* lean_expr_mk_bvar(lean_object*); lean_object* l_Lean_Expr_bindingDomain___boxed(lean_object*); lean_object* lean_expr_abstract_range(lean_object*, lean_object*, lean_object*); +lean_object* l_panic(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Expr_proj___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_BinderInfo_HasBeq___closed__1; uint8_t lean_expr_lt(lean_object*, lean_object*); @@ -114,18 +136,24 @@ lean_object* l_Lean_mkDecIsTrue(lean_object*, lean_object*); lean_object* l_Lean_Expr_abstract___boxed(lean_object*, lean_object*); uint8_t l_Lean_Expr_isAppOf(lean_object*, lean_object*); lean_object* l_Lean_Expr_const___boxed(lean_object*, lean_object*); +lean_object* l_Lean_Expr_constLevels(lean_object*); uint8_t lean_expr_has_mvar(lean_object*); +lean_object* l_Lean_Expr_isFVar___boxed(lean_object*); lean_object* l_Lean_Expr_abstractRange___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Expr_fvar___boxed(lean_object*); lean_object* lean_expr_mk_lambda(lean_object*, uint8_t, lean_object*, lean_object*); lean_object* l_Lean_Expr_mdata___boxed(lean_object*, lean_object*); +lean_object* l_Lean_Expr_bvarIdx___closed__1; +extern lean_object* l_panicWithPos___rarg___closed__2; lean_object* l_Lean_Expr_HasBeq; +uint8_t l_Lean_Expr_isBVar(lean_object*); lean_object* l_Lean_Expr_isBinding___boxed(lean_object*); lean_object* l_Lean_Expr_Hashable; lean_object* l_Lean_Expr_getAppNumArgs___boxed(lean_object*); lean_object* l_Lean_Expr_bindingBody___boxed(lean_object*); lean_object* l_Lean_Expr_mvar___boxed(lean_object*); lean_object* lean_expr_abstract(lean_object*, lean_object*); +lean_object* l_Lean_Expr_fvarName(lean_object*); lean_object* l_Lean_Expr_isSort___boxed(lean_object*); lean_object* l_Lean_Expr_local___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Expr_isLet___boxed(lean_object*); @@ -133,6 +161,8 @@ lean_object* l_Lean_Expr_getAppFn___boxed(lean_object*); uint8_t l_Lean_Expr_isAppOfArity(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_Expr_isForall___boxed(lean_object*); lean_object* l_Lean_Expr_getAppNumArgsAux(lean_object*, lean_object*); +lean_object* l_Lean_Expr_isMVar___boxed(lean_object*); +lean_object* l_panicWithPos___at_Lean_Expr_constName___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_mkDecIsFalse___closed__3; lean_object* l_Lean_exprIsInhabited___closed__1; lean_object* lean_expr_mk_lit(lean_object*); @@ -141,6 +171,7 @@ lean_object* l_Lean_Expr_getAppArgs___boxed(lean_object*); lean_object* l_Lean_Expr_isConst___boxed(lean_object*); lean_object* l_Lean_Expr_lt___boxed(lean_object*, lean_object*); uint8_t l_Lean_Expr_isLambda(lean_object*); +lean_object* l_panicWithPos___at_Array_findIdx_x21___spec__1(lean_object*, lean_object*, lean_object*, lean_object*); uint8_t l_Lean_BinderInfo_isInstImplicit(uint8_t x_1) { _start: { @@ -613,6 +644,87 @@ x_3 = lean_box(x_2); return x_3; } } +uint8_t l_Lean_Expr_isBVar(lean_object* x_1) { +_start: +{ +if (lean_obj_tag(x_1) == 0) +{ +uint8_t x_2; +x_2 = 1; +return x_2; +} +else +{ +uint8_t x_3; +x_3 = 0; +return x_3; +} +} +} +lean_object* l_Lean_Expr_isBVar___boxed(lean_object* x_1) { +_start: +{ +uint8_t x_2; lean_object* x_3; +x_2 = l_Lean_Expr_isBVar(x_1); +lean_dec(x_1); +x_3 = lean_box(x_2); +return x_3; +} +} +uint8_t l_Lean_Expr_isMVar(lean_object* x_1) { +_start: +{ +if (lean_obj_tag(x_1) == 2) +{ +uint8_t x_2; +x_2 = 1; +return x_2; +} +else +{ +uint8_t x_3; +x_3 = 0; +return x_3; +} +} +} +lean_object* l_Lean_Expr_isMVar___boxed(lean_object* x_1) { +_start: +{ +uint8_t x_2; lean_object* x_3; +x_2 = l_Lean_Expr_isMVar(x_1); +lean_dec(x_1); +x_3 = lean_box(x_2); +return x_3; +} +} +uint8_t l_Lean_Expr_isFVar(lean_object* x_1) { +_start: +{ +if (lean_obj_tag(x_1) == 1) +{ +uint8_t x_2; +x_2 = 1; +return x_2; +} +else +{ +uint8_t x_3; +x_3 = 0; +return x_3; +} +} +} +lean_object* l_Lean_Expr_isFVar___boxed(lean_object* x_1) { +_start: +{ +uint8_t x_2; lean_object* x_3; +x_2 = l_Lean_Expr_isFVar(x_1); +lean_dec(x_1); +x_3 = lean_box(x_2); +return x_3; +} +} uint8_t l_Lean_Expr_isApp(lean_object* x_1) { _start: { @@ -1079,6 +1191,238 @@ x_5 = lean_box(x_4); return x_5; } } +lean_object* l_panicWithPos___at_Lean_Expr_constName___spec__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; +x_5 = l_panicWithPos___rarg___closed__1; +x_6 = lean_string_append(x_5, x_1); +x_7 = l_panicWithPos___rarg___closed__2; +x_8 = lean_string_append(x_6, x_7); +x_9 = l_Nat_repr(x_2); +x_10 = lean_string_append(x_8, x_9); +lean_dec(x_9); +x_11 = l_panicWithPos___rarg___closed__2; +x_12 = lean_string_append(x_10, x_11); +x_13 = l_Nat_repr(x_3); +x_14 = lean_string_append(x_12, x_13); +lean_dec(x_13); +x_15 = l_panicWithPos___rarg___closed__3; +x_16 = lean_string_append(x_14, x_15); +x_17 = lean_string_append(x_16, x_4); +x_18 = l_Lean_Inhabited; +x_19 = lean_panic_fn(x_17); +return x_19; +} +} +lean_object* _init_l_Lean_Expr_constName___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("/Users/leonardodemoura/projects/lean4/library/init/lean/expr.lean"); +return x_1; +} +} +lean_object* _init_l_Lean_Expr_constName___closed__2() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("constName called on non-const"); +return x_1; +} +} +lean_object* l_Lean_Expr_constName(lean_object* x_1) { +_start: +{ +if (lean_obj_tag(x_1) == 4) +{ +lean_object* x_2; +x_2 = lean_ctor_get(x_1, 0); +lean_inc(x_2); +return x_2; +} +else +{ +lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; +x_3 = l_Lean_Expr_constName___closed__1; +x_4 = lean_unsigned_to_nat(181u); +x_5 = lean_unsigned_to_nat(15u); +x_6 = l_Lean_Expr_constName___closed__2; +x_7 = l_panicWithPos___at_Lean_Expr_constName___spec__1(x_3, x_4, x_5, x_6); +return x_7; +} +} +} +lean_object* l_panicWithPos___at_Lean_Expr_constName___spec__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; +x_5 = l_panicWithPos___at_Lean_Expr_constName___spec__1(x_1, x_2, x_3, x_4); +lean_dec(x_4); +lean_dec(x_1); +return x_5; +} +} +lean_object* l_Lean_Expr_constName___boxed(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = l_Lean_Expr_constName(x_1); +lean_dec(x_1); +return x_2; +} +} +lean_object* l_panicWithPos___at_Lean_Expr_constLevels___spec__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; +x_5 = lean_box(0); +x_6 = l_panicWithPos___rarg___closed__1; +x_7 = lean_string_append(x_6, x_1); +x_8 = l_panicWithPos___rarg___closed__2; +x_9 = lean_string_append(x_7, x_8); +x_10 = l_Nat_repr(x_2); +x_11 = lean_string_append(x_9, x_10); +lean_dec(x_10); +x_12 = l_panicWithPos___rarg___closed__2; +x_13 = lean_string_append(x_11, x_12); +x_14 = l_Nat_repr(x_3); +x_15 = lean_string_append(x_13, x_14); +lean_dec(x_14); +x_16 = l_panicWithPos___rarg___closed__3; +x_17 = lean_string_append(x_15, x_16); +x_18 = lean_string_append(x_17, x_4); +x_19 = lean_panic_fn(x_18); +return x_19; +} +} +lean_object* _init_l_Lean_Expr_constLevels___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("constLevels called on non-const"); +return x_1; +} +} +lean_object* l_Lean_Expr_constLevels(lean_object* x_1) { +_start: +{ +if (lean_obj_tag(x_1) == 4) +{ +lean_object* x_2; +x_2 = lean_ctor_get(x_1, 1); +lean_inc(x_2); +return x_2; +} +else +{ +lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; +x_3 = l_Lean_Expr_constName___closed__1; +x_4 = lean_unsigned_to_nat(185u); +x_5 = lean_unsigned_to_nat(16u); +x_6 = l_Lean_Expr_constLevels___closed__1; +x_7 = l_panicWithPos___at_Lean_Expr_constLevels___spec__1(x_3, x_4, x_5, x_6); +return x_7; +} +} +} +lean_object* l_panicWithPos___at_Lean_Expr_constLevels___spec__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; +x_5 = l_panicWithPos___at_Lean_Expr_constLevels___spec__1(x_1, x_2, x_3, x_4); +lean_dec(x_4); +lean_dec(x_1); +return x_5; +} +} +lean_object* l_Lean_Expr_constLevels___boxed(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = l_Lean_Expr_constLevels(x_1); +lean_dec(x_1); +return x_2; +} +} +lean_object* _init_l_Lean_Expr_bvarIdx___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("bvarIdx called on non-bvar"); +return x_1; +} +} +lean_object* l_Lean_Expr_bvarIdx(lean_object* x_1) { +_start: +{ +if (lean_obj_tag(x_1) == 0) +{ +lean_object* x_2; +x_2 = lean_ctor_get(x_1, 0); +lean_inc(x_2); +return x_2; +} +else +{ +lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; +x_3 = l_Lean_Expr_constName___closed__1; +x_4 = lean_unsigned_to_nat(189u); +x_5 = lean_unsigned_to_nat(7u); +x_6 = l_Lean_Expr_bvarIdx___closed__1; +x_7 = l_panicWithPos___at_Array_findIdx_x21___spec__1(x_3, x_4, x_5, x_6); +return x_7; +} +} +} +lean_object* l_Lean_Expr_bvarIdx___boxed(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = l_Lean_Expr_bvarIdx(x_1); +lean_dec(x_1); +return x_2; +} +} +lean_object* _init_l_Lean_Expr_fvarName___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("fvarName called on non-fvar"); +return x_1; +} +} +lean_object* l_Lean_Expr_fvarName(lean_object* x_1) { +_start: +{ +if (lean_obj_tag(x_1) == 1) +{ +lean_object* x_2; +x_2 = lean_ctor_get(x_1, 0); +lean_inc(x_2); +return x_2; +} +else +{ +lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; +x_3 = l_Lean_Expr_constName___closed__1; +x_4 = lean_unsigned_to_nat(193u); +x_5 = lean_unsigned_to_nat(7u); +x_6 = l_Lean_Expr_fvarName___closed__1; +x_7 = l_panicWithPos___at_Lean_Expr_constName___spec__1(x_3, x_4, x_5, x_6); +return x_7; +} +} +} +lean_object* l_Lean_Expr_fvarName___boxed(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = l_Lean_Expr_fvarName(x_1); +lean_dec(x_1); +return x_2; +} +} lean_object* l_Lean_Expr_bindingDomain(lean_object* x_1) { _start: { @@ -1365,6 +1709,16 @@ l_Lean_Expr_HasBeq___closed__1 = _init_l_Lean_Expr_HasBeq___closed__1(); lean_mark_persistent(l_Lean_Expr_HasBeq___closed__1); l_Lean_Expr_HasBeq = _init_l_Lean_Expr_HasBeq(); lean_mark_persistent(l_Lean_Expr_HasBeq); +l_Lean_Expr_constName___closed__1 = _init_l_Lean_Expr_constName___closed__1(); +lean_mark_persistent(l_Lean_Expr_constName___closed__1); +l_Lean_Expr_constName___closed__2 = _init_l_Lean_Expr_constName___closed__2(); +lean_mark_persistent(l_Lean_Expr_constName___closed__2); +l_Lean_Expr_constLevels___closed__1 = _init_l_Lean_Expr_constLevels___closed__1(); +lean_mark_persistent(l_Lean_Expr_constLevels___closed__1); +l_Lean_Expr_bvarIdx___closed__1 = _init_l_Lean_Expr_bvarIdx___closed__1(); +lean_mark_persistent(l_Lean_Expr_bvarIdx___closed__1); +l_Lean_Expr_fvarName___closed__1 = _init_l_Lean_Expr_fvarName___closed__1(); +lean_mark_persistent(l_Lean_Expr_fvarName___closed__1); l_Lean_Expr_HasToString___closed__1 = _init_l_Lean_Expr_HasToString___closed__1(); lean_mark_persistent(l_Lean_Expr_HasToString___closed__1); l_Lean_Expr_HasToString = _init_l_Lean_Expr_HasToString(); diff --git a/src/stage0/init/lean/level.c b/src/stage0/init/lean/level.c index ccef03907b..a482ff7c6d 100644 --- a/src/stage0/init/lean/level.c +++ b/src/stage0/init/lean/level.c @@ -21,12 +21,15 @@ extern lean_object* l_Lean_Format_paren___closed__2; lean_object* l_Lean_Level_instantiate(lean_object*, lean_object*); lean_object* l_Lean_LevelToFormat_Result_format___main___closed__4; lean_object* l_Lean_LevelToFormat_parenIfFalse(lean_object*, uint8_t); +uint8_t l_Lean_Level_hasMVar(lean_object*); lean_object* l_Lean_Level_eqv___boxed(lean_object*, lean_object*); lean_object* l___private_init_lean_level_1__formatLst___main___at_Lean_LevelToFormat_Result_format___main___spec__2(lean_object*); +lean_object* l_Lean_Level_hasMVar___boxed(lean_object*); lean_object* l_Lean_LevelToFormat_Result_format___main___closed__3; lean_object* l_Lean_LevelToFormat_Result_max(lean_object*, lean_object*); lean_object* l_Lean_LevelToFormat_Result_format___main___closed__2; lean_object* l_Lean_LevelToFormat_Level_toResult(lean_object*); +uint8_t l_Lean_Level_hasMVar___main(lean_object*); lean_object* level_mk_mvar(lean_object*); lean_object* l_Function_comp___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_HasBeq___closed__1; @@ -87,16 +90,15 @@ lean_object* l_Lean_Level_toNat___main___closed__1; lean_object* l_Lean_LevelToFormat_Result_imax(lean_object*, lean_object*); lean_object* l_Lean_Level_addOffsetAux___main(lean_object*, lean_object*); lean_object* l_Lean_Level_addOffset(lean_object*, lean_object*); +lean_object* l_Lean_Level_hasMVar___main___boxed(lean_object*); lean_object* l_Lean_Level_succ___boxed(lean_object*); lean_object* l_Lean_LevelToFormat_levelHasFormat; lean_object* l_Lean_LevelToFormat_Result_format(lean_object*, uint8_t); -lean_object* l_Lean_Level_hasMvar___boxed(lean_object*); lean_object* l_Lean_LevelToFormat_Result_format___main___closed__6; lean_object* l_Nat_max(lean_object*, lean_object*); lean_object* l_Lean_Level_hash___boxed(lean_object*); lean_object* level_mk_max(lean_object*, lean_object*); lean_object* l_Lean_levelIsInhabited; -uint8_t l_Lean_Level_hasMvar(lean_object*); lean_object* l_Lean_Level_succ___boxed(lean_object* x_1) { _start: { @@ -252,28 +254,27 @@ x_3 = lean_box(x_2); return x_3; } } -uint8_t l_Lean_Level_hasMvar(lean_object* x_1) { +uint8_t l_Lean_Level_hasMVar___main(lean_object* x_1) { _start: { switch (lean_obj_tag(x_1)) { case 1: { -lean_object* x_2; uint8_t x_3; +lean_object* x_2; x_2 = lean_ctor_get(x_1, 0); -x_3 = l_Lean_Level_hasParam___main(x_2); -return x_3; +x_1 = x_2; +goto _start; } case 2: { lean_object* x_4; lean_object* x_5; uint8_t x_6; x_4 = lean_ctor_get(x_1, 0); x_5 = lean_ctor_get(x_1, 1); -x_6 = l_Lean_Level_hasParam___main(x_4); +x_6 = l_Lean_Level_hasMVar___main(x_4); if (x_6 == 0) { -uint8_t x_7; -x_7 = l_Lean_Level_hasParam___main(x_5); -return x_7; +x_1 = x_5; +goto _start; } else { @@ -287,12 +288,11 @@ case 3: lean_object* x_9; lean_object* x_10; uint8_t x_11; x_9 = lean_ctor_get(x_1, 0); x_10 = lean_ctor_get(x_1, 1); -x_11 = l_Lean_Level_hasParam___main(x_9); +x_11 = l_Lean_Level_hasMVar___main(x_9); if (x_11 == 0) { -uint8_t x_12; -x_12 = l_Lean_Level_hasParam___main(x_10); -return x_12; +x_1 = x_10; +goto _start; } else { @@ -316,11 +316,29 @@ return x_15; } } } -lean_object* l_Lean_Level_hasMvar___boxed(lean_object* x_1) { +lean_object* l_Lean_Level_hasMVar___main___boxed(lean_object* x_1) { _start: { uint8_t x_2; lean_object* x_3; -x_2 = l_Lean_Level_hasMvar(x_1); +x_2 = l_Lean_Level_hasMVar___main(x_1); +lean_dec(x_1); +x_3 = lean_box(x_2); +return x_3; +} +} +uint8_t l_Lean_Level_hasMVar(lean_object* x_1) { +_start: +{ +uint8_t x_2; +x_2 = l_Lean_Level_hasMVar___main(x_1); +return x_2; +} +} +lean_object* l_Lean_Level_hasMVar___boxed(lean_object* x_1) { +_start: +{ +uint8_t x_2; lean_object* x_3; +x_2 = l_Lean_Level_hasMVar(x_1); lean_dec(x_1); x_3 = lean_box(x_2); return x_3; diff --git a/src/stage0/init/lean/localcontext.c b/src/stage0/init/lean/localcontext.c index 18455468f8..7820530506 100644 --- a/src/stage0/init/lean/localcontext.c +++ b/src/stage0/init/lean/localcontext.c @@ -110,7 +110,6 @@ lean_object* l_Array_miterateAux___main___at_Lean_LocalContext_foldlFrom___spec_ lean_object* l_PersistentHashMap_getCollisionNodeSize___rarg(lean_object*); lean_object* l_Lean_LocalContext_mfindDeclRev___at_Lean_LocalContext_findDeclRev___spec__1___rarg___boxed(lean_object*, lean_object*); lean_object* l_Lean_LocalContext_mfoldl___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); -lean_object* lean_local_ctx_get(lean_object*, lean_object*); lean_object* l_PersistentHashMap_erase___at_Lean_LocalContext_erase___spec__1(lean_object*, lean_object*); lean_object* l_PersistentHashMap_insert___at_Lean_LocalContext_mkLocalDecl___spec__1(lean_object*, lean_object*, lean_object*); lean_object* l_PersistentArray_mfoldlFrom___at_Lean_LocalContext_mfoldlFrom___spec__1___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -159,6 +158,7 @@ lean_object* l_Array_miterateAux___main___at_Lean_LocalContext_foldl___spec__4__ size_t l_USize_add(size_t, size_t); lean_object* l_PersistentArray_mfoldl___at_Lean_LocalContext_foldl___spec__2___rarg(lean_object*, lean_object*, lean_object*); lean_object* l_Array_mfindAux___main___at_Lean_LocalContext_mfindDecl___spec__5___boxed(lean_object*); +lean_object* l_PersistentArray_get_x21___at___private_init_lean_localcontext_1__popTailNoneAux___main___spec__1(lean_object*, lean_object*); uint8_t lean_nat_dec_lt(lean_object*, lean_object*); lean_object* l_PersistentArray_mfindRevAux___main___at_Lean_LocalContext_findDeclRev___spec__4(lean_object*); lean_object* l_Lean_LocalContext_mfindDeclRev___rarg(lean_object*, lean_object*, lean_object*, lean_object*); @@ -184,6 +184,7 @@ uint8_t l_Lean_LocalDecl_binderInfo(lean_object*); lean_object* l_Array_mforAux___main___at_Lean_LocalContext_mfor___spec__4(lean_object*); lean_object* l_PersistentArray_mfoldlFrom___at_Lean_LocalContext_mfoldlFrom___spec__1___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* lean_nat_add(lean_object*, lean_object*); +lean_object* lean_local_ctx_get(lean_object*, lean_object*); lean_object* l_Lean_LocalContext_mkBinding___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_mfindRevAux___main___at_Lean_LocalContext_mfindDeclRev___spec__2(lean_object*); lean_object* l_PersistentHashMap_findAux___main___at_Lean_LocalContext_find___spec__2(lean_object*, size_t, lean_object*); @@ -263,7 +264,6 @@ lean_object* l_Array_miterateAux___main___at_Lean_LocalContext_mfoldl___spec__5( lean_object* l_Array_mfindRevAux___main___at_Lean_LocalContext_mfindDeclRev___spec__2___rarg___lambda__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); uint8_t l_Lean_LocalContext_isSubPrefixOf(lean_object*, lean_object*); lean_object* l_PersistentHashMap_isUnaryNode___rarg(lean_object*); -lean_object* l_PersistentArray_get___at___private_init_lean_localcontext_1__popTailNoneAux___main___spec__1___boxed(lean_object*, lean_object*); lean_object* l_Array_miterateAux___main___at_Lean_LocalContext_foldlFrom___spec__8___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_get(lean_object*, lean_object*, lean_object*); lean_object* l_Array_miterateAux___main___at_Lean_LocalContext_foldl___spec__4(lean_object*); @@ -289,7 +289,6 @@ lean_object* l_Lean_LocalContext_foldl___rarg___boxed(lean_object*, lean_object* lean_object* l_Array_miterateAux___main___at_Lean_LocalContext_foldl___spec__6___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_PersistentArray_mfindRev___at_Lean_LocalContext_findFromUserName___spec__1(lean_object*, lean_object*); lean_object* l_PersistentArray_mfindAux___main___at_Lean_LocalContext_findDecl___spec__3(lean_object*); -lean_object* l_PersistentArray_get___at___private_init_lean_localcontext_1__popTailNoneAux___main___spec__1(lean_object*, lean_object*); uint8_t lean_nat_dec_le(lean_object*, lean_object*); lean_object* l_Array_mfindRevAux___main___at_Lean_LocalContext_findDeclRev___spec__5___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_mfindAux___main___at_Lean_LocalContext_findDecl___spec__6(lean_object*); @@ -350,6 +349,7 @@ lean_object* l_Lean_LocalContext_mkForall(lean_object*, lean_object*, lean_objec extern lean_object* l_Lean_exprIsInhabited___closed__1; lean_object* l_PersistentHashMap_find___at_Lean_LocalContext_find___spec__1___boxed(lean_object*, lean_object*); lean_object* l_PersistentArray_mfindRevAux___main___at_Lean_LocalContext_findFromUserName___spec__3(lean_object*, lean_object*); +lean_object* l_PersistentArray_get_x21___at___private_init_lean_localcontext_1__popTailNoneAux___main___spec__1___boxed(lean_object*, lean_object*); lean_object* l_Array_mfindRevAux___main___at_Lean_LocalContext_findFromUserName___spec__5___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_miterateAux___main___at_Lean_LocalContext_foldlFrom___spec__10___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_mfindRevAux___main___at_Lean_LocalContext_findDeclRev___spec__3___rarg(lean_object*, lean_object*, lean_object*, lean_object*); @@ -1570,7 +1570,7 @@ return x_19; } } } -lean_object* l_PersistentArray_get___at___private_init_lean_localcontext_1__popTailNoneAux___main___spec__1(lean_object* x_1, lean_object* x_2) { +lean_object* l_PersistentArray_get_x21___at___private_init_lean_localcontext_1__popTailNoneAux___main___spec__1(lean_object* x_1, lean_object* x_2) { _start: { lean_object* x_3; lean_object* x_4; uint8_t x_5; @@ -1620,7 +1620,7 @@ x_5 = lean_unsigned_to_nat(1u); x_6 = lean_nat_sub(x_2, x_5); lean_dec(x_2); lean_inc(x_1); -x_7 = l_PersistentArray_get___at___private_init_lean_localcontext_1__popTailNoneAux___main___spec__1(x_1, x_6); +x_7 = l_PersistentArray_get_x21___at___private_init_lean_localcontext_1__popTailNoneAux___main___spec__1(x_1, x_6); lean_dec(x_6); if (lean_obj_tag(x_7) == 0) { @@ -1654,11 +1654,11 @@ x_6 = l_PersistentArray_getAux___main___at___private_init_lean_localcontext_1__p return x_6; } } -lean_object* l_PersistentArray_get___at___private_init_lean_localcontext_1__popTailNoneAux___main___spec__1___boxed(lean_object* x_1, lean_object* x_2) { +lean_object* l_PersistentArray_get_x21___at___private_init_lean_localcontext_1__popTailNoneAux___main___spec__1___boxed(lean_object* x_1, lean_object* x_2) { _start: { lean_object* x_3; -x_3 = l_PersistentArray_get___at___private_init_lean_localcontext_1__popTailNoneAux___main___spec__1(x_1, x_2); +x_3 = l_PersistentArray_get_x21___at___private_init_lean_localcontext_1__popTailNoneAux___main___spec__1(x_1, x_2); lean_dec(x_2); return x_3; } @@ -2451,7 +2451,7 @@ x_7 = lean_unsigned_to_nat(1u); x_8 = lean_nat_sub(x_4, x_7); lean_dec(x_4); lean_inc(x_3); -x_9 = l_PersistentArray_get___at___private_init_lean_localcontext_1__popTailNoneAux___main___spec__1(x_3, x_8); +x_9 = l_PersistentArray_get_x21___at___private_init_lean_localcontext_1__popTailNoneAux___main___spec__1(x_3, x_8); lean_dec(x_8); if (lean_obj_tag(x_9) == 0) { @@ -2862,7 +2862,7 @@ lean_inc(x_3); x_4 = lean_unsigned_to_nat(1u); x_5 = lean_nat_sub(x_3, x_4); lean_dec(x_3); -x_6 = l_PersistentArray_get___at___private_init_lean_localcontext_1__popTailNoneAux___main___spec__1(x_2, x_5); +x_6 = l_PersistentArray_get_x21___at___private_init_lean_localcontext_1__popTailNoneAux___main___spec__1(x_2, x_5); lean_dec(x_5); return x_6; } @@ -2986,7 +2986,7 @@ lean_object* x_3; lean_object* x_4; x_3 = lean_ctor_get(x_1, 1); lean_inc(x_3); lean_dec(x_1); -x_4 = l_PersistentArray_get___at___private_init_lean_localcontext_1__popTailNoneAux___main___spec__1(x_3, x_2); +x_4 = l_PersistentArray_get_x21___at___private_init_lean_localcontext_1__popTailNoneAux___main___spec__1(x_3, x_2); lean_dec(x_2); return x_4; } @@ -6461,7 +6461,7 @@ else { lean_object* x_11; lean_inc(x_1); -x_11 = l_PersistentArray_get___at___private_init_lean_localcontext_1__popTailNoneAux___main___spec__1(x_1, x_3); +x_11 = l_PersistentArray_get_x21___at___private_init_lean_localcontext_1__popTailNoneAux___main___spec__1(x_1, x_3); if (lean_obj_tag(x_11) == 0) { lean_object* x_12; lean_object* x_13; @@ -6478,7 +6478,7 @@ x_15 = lean_ctor_get(x_11, 0); lean_inc(x_15); lean_dec(x_11); lean_inc(x_2); -x_16 = l_PersistentArray_get___at___private_init_lean_localcontext_1__popTailNoneAux___main___spec__1(x_2, x_4); +x_16 = l_PersistentArray_get_x21___at___private_init_lean_localcontext_1__popTailNoneAux___main___spec__1(x_2, x_4); if (lean_obj_tag(x_16) == 0) { lean_object* x_17; lean_object* x_18; diff --git a/src/stage0/init/lean/path.c b/src/stage0/init/lean/path.c index 39b2ae447c..10aa994ac4 100644 --- a/src/stage0/init/lean/path.c +++ b/src/stage0/init/lean/path.c @@ -121,6 +121,7 @@ lean_object* l_String_quote(lean_object*); lean_object* l_Lean_mkSearchPathRef(lean_object*); lean_object* l_Lean_getBuiltinSearchPath___closed__3; extern lean_object* l_List_repr___rarg___closed__1; +lean_object* l_Array_mfindAux___main___at_Lean_findFile___spec__2___closed__3; lean_object* l_Lean_getBuiltinSearchPath(lean_object*); extern lean_object* l_String_splitAux___main___closed__1; lean_object* l_Array_mfindAux___main___at_Lean_findAtSearchPath___spec__1___boxed(lean_object*, lean_object*, lean_object*); @@ -1961,6 +1962,14 @@ lean_object* _init_l_Array_mfindAux___main___at_Lean_findFile___spec__2___closed _start: { lean_object* x_1; +x_1 = lean_mk_string("Default"); +return x_1; +} +} +lean_object* _init_l_Array_mfindAux___main___at_Lean_findFile___spec__2___closed__3() { +_start: +{ +lean_object* x_1; x_1 = lean_mk_string("default"); return x_1; } @@ -2001,143 +2010,224 @@ return x_22; } else { -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_49; lean_object* x_50; lean_object* x_51; lean_object* x_52; +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_69; lean_object* x_70; lean_object* x_71; lean_object* x_72; x_23 = lean_array_fget(x_3, x_4); x_24 = l___private_init_lean_path_1__pathSep; x_25 = lean_string_append(x_23, x_24); x_26 = lean_string_append(x_25, x_2); -x_49 = l_Array_mfindAux___main___at_Lean_findFile___spec__2___closed__1; +x_69 = l_Array_mfindAux___main___at_Lean_findFile___spec__2___closed__1; lean_inc(x_26); -x_50 = lean_string_append(x_26, x_49); -x_51 = lean_string_append(x_50, x_1); -x_52 = lean_io_file_exists(x_51, x_5); -if (lean_obj_tag(x_52) == 0) +x_70 = lean_string_append(x_26, x_69); +x_71 = lean_string_append(x_70, x_1); +x_72 = lean_io_file_exists(x_71, x_5); +if (lean_obj_tag(x_72) == 0) { -lean_object* x_53; uint8_t x_54; -x_53 = lean_ctor_get(x_52, 0); -lean_inc(x_53); -x_54 = lean_unbox(x_53); -lean_dec(x_53); -if (x_54 == 0) +lean_object* x_73; uint8_t x_74; +x_73 = lean_ctor_get(x_72, 0); +lean_inc(x_73); +x_74 = lean_unbox(x_73); +lean_dec(x_73); +if (x_74 == 0) { -lean_object* x_55; lean_object* x_56; -lean_dec(x_51); -x_55 = lean_ctor_get(x_52, 1); -lean_inc(x_55); -lean_dec(x_52); -x_56 = lean_box(0); -x_27 = x_56; -x_28 = x_55; -goto block_48; +lean_object* x_75; lean_object* x_76; +lean_dec(x_71); +x_75 = lean_ctor_get(x_72, 1); +lean_inc(x_75); +lean_dec(x_72); +x_76 = lean_box(0); +x_27 = x_76; +x_28 = x_75; +goto block_68; } else { -lean_object* x_57; lean_object* x_58; -x_57 = lean_ctor_get(x_52, 1); -lean_inc(x_57); -lean_dec(x_52); -x_58 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_58, 0, x_51); -x_27 = x_58; -x_28 = x_57; -goto block_48; +lean_object* x_77; lean_object* x_78; +x_77 = lean_ctor_get(x_72, 1); +lean_inc(x_77); +lean_dec(x_72); +x_78 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_78, 0, x_71); +x_27 = x_78; +x_28 = x_77; +goto block_68; } } else { -uint8_t x_59; -lean_dec(x_51); +uint8_t x_79; +lean_dec(x_71); lean_dec(x_26); lean_dec(x_4); -x_59 = !lean_is_exclusive(x_52); -if (x_59 == 0) +x_79 = !lean_is_exclusive(x_72); +if (x_79 == 0) { -return x_52; +return x_72; } else { -lean_object* x_60; lean_object* x_61; lean_object* x_62; -x_60 = lean_ctor_get(x_52, 0); -x_61 = lean_ctor_get(x_52, 1); -lean_inc(x_61); -lean_inc(x_60); -lean_dec(x_52); -x_62 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_62, 0, x_60); -lean_ctor_set(x_62, 1, x_61); -return x_62; +lean_object* x_80; lean_object* x_81; lean_object* x_82; +x_80 = lean_ctor_get(x_72, 0); +x_81 = lean_ctor_get(x_72, 1); +lean_inc(x_81); +lean_inc(x_80); +lean_dec(x_72); +x_82 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_82, 0, x_80); +lean_ctor_set(x_82, 1, x_81); +return x_82; } } -block_48: +block_68: { if (lean_obj_tag(x_27) == 0) { -lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; +lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_52; lean_object* x_53; lean_object* x_54; lean_object* x_55; lean_object* x_56; lean_object* x_57; x_29 = lean_box(0); x_30 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_30, 0, x_29); lean_ctor_set(x_30, 1, x_28); x_31 = lean_string_append(x_26, x_24); -x_32 = l_Array_mfindAux___main___at_Lean_findFile___spec__2___closed__2; -x_33 = lean_string_append(x_31, x_32); -x_34 = l_Array_mfindAux___main___at_Lean_findFile___spec__2___closed__1; -x_35 = lean_string_append(x_33, x_34); -x_36 = lean_string_append(x_35, x_1); -x_37 = lean_io_file_exists(x_36, x_30); -if (lean_obj_tag(x_37) == 0) +x_52 = l_Array_mfindAux___main___at_Lean_findFile___spec__2___closed__3; +lean_inc(x_31); +x_53 = lean_string_append(x_31, x_52); +x_54 = l_Array_mfindAux___main___at_Lean_findFile___spec__2___closed__1; +x_55 = lean_string_append(x_53, x_54); +x_56 = lean_string_append(x_55, x_1); +x_57 = lean_io_file_exists(x_56, x_30); +if (lean_obj_tag(x_57) == 0) { -lean_object* x_38; uint8_t x_39; -x_38 = lean_ctor_get(x_37, 0); -lean_inc(x_38); -x_39 = lean_unbox(x_38); -lean_dec(x_38); -if (x_39 == 0) +lean_object* x_58; uint8_t x_59; +x_58 = lean_ctor_get(x_57, 0); +lean_inc(x_58); +x_59 = lean_unbox(x_58); +lean_dec(x_58); +if (x_59 == 0) { -lean_object* x_40; lean_object* x_41; -lean_dec(x_36); -x_40 = lean_ctor_get(x_37, 1); -lean_inc(x_40); -lean_dec(x_37); -x_41 = lean_box(0); -x_6 = x_41; -x_7 = x_40; -goto block_14; +lean_object* x_60; lean_object* x_61; +lean_dec(x_56); +x_60 = lean_ctor_get(x_57, 1); +lean_inc(x_60); +lean_dec(x_57); +x_61 = lean_box(0); +x_32 = x_61; +x_33 = x_60; +goto block_51; } else { -lean_object* x_42; lean_object* x_43; -x_42 = lean_ctor_get(x_37, 1); -lean_inc(x_42); -lean_dec(x_37); -x_43 = lean_alloc_ctor(1, 1, 0); -lean_ctor_set(x_43, 0, x_36); -x_6 = x_43; -x_7 = x_42; -goto block_14; +lean_object* x_62; lean_object* x_63; +x_62 = lean_ctor_get(x_57, 1); +lean_inc(x_62); +lean_dec(x_57); +x_63 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_63, 0, x_56); +x_32 = x_63; +x_33 = x_62; +goto block_51; } } else { -uint8_t x_44; -lean_dec(x_36); +uint8_t x_64; +lean_dec(x_56); +lean_dec(x_31); lean_dec(x_4); -x_44 = !lean_is_exclusive(x_37); -if (x_44 == 0) +x_64 = !lean_is_exclusive(x_57); +if (x_64 == 0) { -return x_37; +return x_57; } else { -lean_object* x_45; lean_object* x_46; lean_object* x_47; -x_45 = lean_ctor_get(x_37, 0); -x_46 = lean_ctor_get(x_37, 1); -lean_inc(x_46); +lean_object* x_65; lean_object* x_66; lean_object* x_67; +x_65 = lean_ctor_get(x_57, 0); +x_66 = lean_ctor_get(x_57, 1); +lean_inc(x_66); +lean_inc(x_65); +lean_dec(x_57); +x_67 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_67, 0, x_65); +lean_ctor_set(x_67, 1, x_66); +return x_67; +} +} +block_51: +{ +if (lean_obj_tag(x_32) == 0) +{ +lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; +x_34 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_34, 0, x_29); +lean_ctor_set(x_34, 1, x_33); +x_35 = l_Array_mfindAux___main___at_Lean_findFile___spec__2___closed__2; +x_36 = lean_string_append(x_31, x_35); +x_37 = l_Array_mfindAux___main___at_Lean_findFile___spec__2___closed__1; +x_38 = lean_string_append(x_36, x_37); +x_39 = lean_string_append(x_38, x_1); +x_40 = lean_io_file_exists(x_39, x_34); +if (lean_obj_tag(x_40) == 0) +{ +lean_object* x_41; uint8_t x_42; +x_41 = lean_ctor_get(x_40, 0); +lean_inc(x_41); +x_42 = lean_unbox(x_41); +lean_dec(x_41); +if (x_42 == 0) +{ +lean_object* x_43; lean_object* x_44; +lean_dec(x_39); +x_43 = lean_ctor_get(x_40, 1); +lean_inc(x_43); +lean_dec(x_40); +x_44 = lean_box(0); +x_6 = x_44; +x_7 = x_43; +goto block_14; +} +else +{ +lean_object* x_45; lean_object* x_46; +x_45 = lean_ctor_get(x_40, 1); lean_inc(x_45); -lean_dec(x_37); -x_47 = lean_alloc_ctor(1, 2, 0); -lean_ctor_set(x_47, 0, x_45); -lean_ctor_set(x_47, 1, x_46); -return x_47; +lean_dec(x_40); +x_46 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_46, 0, x_39); +x_6 = x_46; +x_7 = x_45; +goto block_14; +} +} +else +{ +uint8_t x_47; +lean_dec(x_39); +lean_dec(x_4); +x_47 = !lean_is_exclusive(x_40); +if (x_47 == 0) +{ +return x_40; +} +else +{ +lean_object* x_48; lean_object* x_49; lean_object* x_50; +x_48 = lean_ctor_get(x_40, 0); +x_49 = lean_ctor_get(x_40, 1); +lean_inc(x_49); +lean_inc(x_48); +lean_dec(x_40); +x_50 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_50, 0, x_48); +lean_ctor_set(x_50, 1, x_49); +return x_50; +} +} +} +else +{ +lean_dec(x_31); +x_6 = x_32; +x_7 = x_33; +goto block_14; } } } @@ -3604,6 +3694,8 @@ l_Array_mfindAux___main___at_Lean_findFile___spec__2___closed__1 = _init_l_Array lean_mark_persistent(l_Array_mfindAux___main___at_Lean_findFile___spec__2___closed__1); l_Array_mfindAux___main___at_Lean_findFile___spec__2___closed__2 = _init_l_Array_mfindAux___main___at_Lean_findFile___spec__2___closed__2(); lean_mark_persistent(l_Array_mfindAux___main___at_Lean_findFile___spec__2___closed__2); +l_Array_mfindAux___main___at_Lean_findFile___spec__2___closed__3 = _init_l_Array_mfindAux___main___at_Lean_findFile___spec__2___closed__3(); +lean_mark_persistent(l_Array_mfindAux___main___at_Lean_findFile___spec__2___closed__3); l_Lean_findLeanFile___closed__1 = _init_l_Lean_findLeanFile___closed__1(); lean_mark_persistent(l_Lean_findLeanFile___closed__1); l_Lean_findLeanFile___closed__2 = _init_l_Lean_findLeanFile___closed__2(); diff --git a/src/stage0/init/lean/smap.c b/src/stage0/init/lean/smap.c index d4a38ad271..3cb96b4f90 100644 --- a/src/stage0/init/lean/smap.c +++ b/src/stage0/init/lean/smap.c @@ -14,12 +14,15 @@ extern "C" { #endif lean_object* l_PersistentHashMap_mfoldl___at_Lean_SMap_foldStage2___spec__1___rarg___boxed(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_SMap_find_x21___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_SMap_numBuckets___rarg(lean_object*); lean_object* l_Lean_SMap_find(lean_object*, lean_object*); lean_object* l_Array_miterateAux___main___at_Lean_SMap_foldStage2___spec__4___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_miterateAux___main___at_Lean_SMap_foldStage2___spec__3___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); extern lean_object* l_PersistentHashMap_HasEmptyc___closed__1; +lean_object* l_Lean_SMap_find_x21___rarg___closed__1; lean_object* l_Lean_SMap_foldStage2___rarg___boxed(lean_object*, lean_object*, lean_object*); +extern lean_object* l_PersistentHashMap_find_x21___rarg___closed__2; lean_object* l_PersistentHashMap_insert___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_SMap_empty___rarg(lean_object*, lean_object*); lean_object* l_Lean_SMap_insert___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); @@ -48,6 +51,7 @@ lean_object* l_Lean_SMap_find_x27(lean_object*, lean_object*); lean_object* l_PersistentHashMap_mfoldlAux___main___at_Lean_SMap_foldStage2___spec__2(lean_object*, lean_object*, lean_object*); lean_object* l_Array_miterateAux___main___at_Lean_SMap_foldStage2___spec__3___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_SMap_contains___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_SMap_find_x21___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_SMap_findD___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_SMap_size___rarg(lean_object*); lean_object* l_Lean_SMap_numBuckets___rarg___boxed(lean_object*); @@ -70,6 +74,7 @@ lean_object* l_Lean_SMap_foldStage2(lean_object*, lean_object*, lean_object*, le lean_object* l_Lean_SMap_switch___rarg___boxed(lean_object*, lean_object*, lean_object*); lean_object* l_Array_miterateAux___main___at_Lean_SMap_foldStage2___spec__3(lean_object*, lean_object*, lean_object*); lean_object* l_Lean_SMap_find___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_SMap_find_x21(lean_object*, lean_object*); lean_object* l_PersistentHashMap_contains___rarg(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_SMap_findD(lean_object*, lean_object*); lean_object* l_PersistentHashMap_mfoldlAux___main___at_Lean_SMap_foldStage2___spec__2___rarg(lean_object*, lean_object*, lean_object*); @@ -79,6 +84,7 @@ lean_object* l_Lean_SMap_numBuckets(lean_object*, lean_object*, lean_object*, le lean_object* l_Lean_SMap_empty___rarg___boxed(lean_object*, lean_object*); lean_object* l_Lean_SMap_size___boxed(lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_PersistentHashMap_mfoldlAux___main___at_Lean_SMap_foldStage2___spec__2___rarg___boxed(lean_object*, lean_object*, lean_object*); +lean_object* l_panicWithPos___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Array_miterateAux___main___at_Lean_SMap_foldStage2___spec__4___rarg___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); lean_object* l_Lean_SMap_Inhabited___rarg(lean_object* x_1, lean_object* x_2) { _start: @@ -333,6 +339,57 @@ lean_dec(x_3); return x_6; } } +lean_object* _init_l_Lean_SMap_find_x21___rarg___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("/Users/leonardodemoura/projects/lean4/library/init/lean/smap.lean"); +return x_1; +} +} +lean_object* l_Lean_SMap_find_x21___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { +_start: +{ +lean_object* x_6; +x_6 = l_Lean_SMap_find___rarg(x_1, x_2, x_4, x_5); +if (lean_obj_tag(x_6) == 0) +{ +lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; +x_7 = l_Lean_SMap_find_x21___rarg___closed__1; +x_8 = lean_unsigned_to_nat(56u); +x_9 = lean_unsigned_to_nat(12u); +x_10 = l_PersistentHashMap_find_x21___rarg___closed__2; +x_11 = l_panicWithPos___rarg(x_3, x_7, x_8, x_9, x_10); +return x_11; +} +else +{ +lean_object* x_12; +lean_dec(x_3); +x_12 = lean_ctor_get(x_6, 0); +lean_inc(x_12); +lean_dec(x_6); +return x_12; +} +} +} +lean_object* l_Lean_SMap_find_x21(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = lean_alloc_closure((void*)(l_Lean_SMap_find_x21___rarg___boxed), 5, 0); +return x_3; +} +} +lean_object* l_Lean_SMap_find_x21___rarg___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { +_start: +{ +lean_object* x_6; +x_6 = l_Lean_SMap_find_x21___rarg(x_1, x_2, x_3, x_4, x_5); +lean_dec(x_4); +return x_6; +} +} lean_object* l_Lean_SMap_contains___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { _start: { @@ -854,6 +911,8 @@ w = initialize_init_data_hashmap_default(w); if (lean_io_result_is_error(w)) return w; w = initialize_init_data_persistenthashmap_default(w); if (lean_io_result_is_error(w)) return w; +l_Lean_SMap_find_x21___rarg___closed__1 = _init_l_Lean_SMap_find_x21___rarg___closed__1(); +lean_mark_persistent(l_Lean_SMap_find_x21___rarg___closed__1); return w; } #ifdef __cplusplus diff --git a/src/stage0/init/lean/typeclass/basic.c b/src/stage0/init/lean/typeclass/basic.c index 83aaa787d3..91aa90fc2c 100644 --- a/src/stage0/init/lean/typeclass/basic.c +++ b/src/stage0/init/lean/typeclass/basic.c @@ -1,6 +1,6 @@ // Lean compiler output // Module: init.lean.typeclass.basic -// Imports: init.lean.environment +// Imports: init.lean.environment init.lean.typeclass.synth #include "runtime/lean.h" #if defined(__clang__) #pragma clang diagnostic ignored "-Wunused-parameter" @@ -13,38 +13,70 @@ #ifdef __cplusplus extern "C" { #endif -lean_object* l_Lean_TypeClass_synth__command___closed__1; -lean_object* l_Lean_TypeClass_synth__command___closed__2; +extern lean_object* l_Array_empty___closed__1; +extern lean_object* l_PersistentHashMap_HasEmptyc___closed__1; +lean_object* l_Lean_TypeClass_synthCommand___closed__1; +lean_object* l_Lean_TypeClass_synth(lean_object*, lean_object*, lean_object*); lean_object* lean_typeclass_synth_command(lean_object*, lean_object*); -lean_object* _init_l_Lean_TypeClass_synth__command___closed__1() { -_start: -{ -lean_object* x_1; -x_1 = lean_mk_string("not implemented yet"); -return x_1; -} -} -lean_object* _init_l_Lean_TypeClass_synth__command___closed__2() { +extern lean_object* l_Lean_exprIsInhabited___closed__1; +lean_object* _init_l_Lean_TypeClass_synthCommand___closed__1() { _start: { lean_object* x_1; lean_object* x_2; -x_1 = l_Lean_TypeClass_synth__command___closed__1; -x_2 = lean_alloc_ctor(0, 1, 0); +x_1 = lean_box(0); +x_2 = lean_alloc_ctor(0, 2, 0); lean_ctor_set(x_2, 0, x_1); +lean_ctor_set(x_2, 1, x_1); return x_2; } } lean_object* lean_typeclass_synth_command(lean_object* x_1, lean_object* x_2) { _start: { -lean_object* x_3; -lean_dec(x_2); -lean_dec(x_1); -x_3 = l_Lean_TypeClass_synth__command___closed__2; -return x_3; +lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; +x_3 = lean_box(0); +x_4 = l_Lean_exprIsInhabited___closed__1; +x_5 = l_Array_empty___closed__1; +x_6 = l_Lean_TypeClass_synthCommand___closed__1; +x_7 = l_PersistentHashMap_HasEmptyc___closed__1; +x_8 = lean_alloc_ctor(0, 7, 0); +lean_ctor_set(x_8, 0, x_1); +lean_ctor_set(x_8, 1, x_3); +lean_ctor_set(x_8, 2, x_4); +lean_ctor_set(x_8, 3, x_5); +lean_ctor_set(x_8, 4, x_5); +lean_ctor_set(x_8, 5, x_6); +lean_ctor_set(x_8, 6, x_7); +x_9 = lean_box(0); +x_10 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_10, 0, x_9); +lean_ctor_set(x_10, 1, x_8); +x_11 = lean_unsigned_to_nat(100000u); +x_12 = l_Lean_TypeClass_synth(x_2, x_11, x_10); +if (lean_obj_tag(x_12) == 0) +{ +lean_object* x_13; lean_object* x_14; +x_13 = lean_ctor_get(x_12, 0); +lean_inc(x_13); +lean_dec(x_12); +x_14 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_14, 0, x_13); +return x_14; +} +else +{ +lean_object* x_15; lean_object* x_16; +x_15 = lean_ctor_get(x_12, 0); +lean_inc(x_15); +lean_dec(x_12); +x_16 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_16, 0, x_15); +return x_16; +} } } lean_object* initialize_init_lean_environment(lean_object*); +lean_object* initialize_init_lean_typeclass_synth(lean_object*); static bool _G_initialized = false; lean_object* initialize_init_lean_typeclass_basic(lean_object* w) { if (_G_initialized) return w; @@ -52,10 +84,10 @@ _G_initialized = true; if (lean_io_result_is_error(w)) return w; w = initialize_init_lean_environment(w); if (lean_io_result_is_error(w)) return w; -l_Lean_TypeClass_synth__command___closed__1 = _init_l_Lean_TypeClass_synth__command___closed__1(); -lean_mark_persistent(l_Lean_TypeClass_synth__command___closed__1); -l_Lean_TypeClass_synth__command___closed__2 = _init_l_Lean_TypeClass_synth__command___closed__2(); -lean_mark_persistent(l_Lean_TypeClass_synth__command___closed__2); +w = initialize_init_lean_typeclass_synth(w); +if (lean_io_result_is_error(w)) return w; +l_Lean_TypeClass_synthCommand___closed__1 = _init_l_Lean_TypeClass_synthCommand___closed__1(); +lean_mark_persistent(l_Lean_TypeClass_synthCommand___closed__1); return w; } #ifdef __cplusplus diff --git a/src/stage0/init/lean/typeclass/context.c b/src/stage0/init/lean/typeclass/context.c new file mode 100644 index 0000000000..cbe525f5e7 --- /dev/null +++ b/src/stage0/init/lean/typeclass/context.c @@ -0,0 +1,9691 @@ +// Lean compiler output +// Module: init.lean.typeclass.context +// Imports: init.data.persistentarray.default init.lean.expr init.lean.metavarcontext +#include "runtime/lean.h" +#if defined(__clang__) +#pragma clang diagnostic ignored "-Wunused-parameter" +#pragma clang diagnostic ignored "-Wunused-label" +#elif defined(__GNUC__) && !defined(__CLANG__) +#pragma GCC diagnostic ignored "-Wunused-parameter" +#pragma GCC diagnostic ignored "-Wunused-label" +#pragma GCC diagnostic ignored "-Wunused-but-set-variable" +#endif +#ifdef __cplusplus +extern "C" { +#endif +lean_object* l_panicWithPos___at_Lean_TypeClass_Context_eInfer___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_TypeClass_Context_slowWhnf(lean_object*); +uint8_t l_Lean_TypeClass_Context_eHasETmpMVar(lean_object*); +lean_object* l_Lean_TypeClass_Context_eHasTmpMVar___closed__1; +uint8_t lean_name_dec_eq(lean_object*, lean_object*); +lean_object* l_Lean_TypeClass_Context_uMetaIdx(lean_object*); +lean_object* l_Lean_Expr_constName(lean_object*); +lean_object* l_Lean_TypeClass_Context_eOccursIn___boxed(lean_object*, lean_object*); +lean_object* lean_nat_sub(lean_object*, lean_object*); +uint8_t l_Lean_Expr_isConst(lean_object*); +lean_object* l_RBNode_insert___at_Lean_TypeClass_Context_uAlphaNormalizeCore___main___spec__2(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_TypeClass_Context_eLookupIdx___boxed(lean_object*, lean_object*); +lean_object* l_Lean_TypeClass_Context__u03b1Norm___closed__1; +lean_object* l_Lean_Format_pretty(lean_object*, lean_object*); +lean_object* l_Lean_TypeClass_Context_eInfer(lean_object*, lean_object*); +lean_object* l_Array_get_x21(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Expr_bvarIdx(lean_object*); +lean_object* l_Lean_TypeClass_Context_eMetaIdx(lean_object*); +extern lean_object* l_Lean_exprIsInhabited; +lean_object* l_List_mfor_u2082___main___at_Lean_TypeClass_Context_eUnify___main___spec__2(lean_object*, lean_object*, lean_object*); +lean_object* l_RBNode_find___main___at_Lean_TypeClass_Context_uAlphaNormalizeCore___main___spec__1___boxed(lean_object*, lean_object*); +lean_object* l_Lean_TypeClass_Context_uAssignIdx___boxed(lean_object*, lean_object*, lean_object*); +lean_object* l_monadInhabited___rarg(lean_object*, lean_object*); +lean_object* l_List_lengthAux___main___rarg(lean_object*, lean_object*); +size_t l_USize_shift__right(size_t, size_t); +lean_object* l_PersistentArray_get_x21___at_Lean_TypeClass_Context_eLookupIdx___spec__1(lean_object*, lean_object*); +lean_object* l_Lean_TypeClass_Context__u03b1Norm(lean_object*); +lean_object* lean_expr_dbg_to_string(lean_object*); +lean_object* l_Lean_TypeClass_Context_alphaMetaPrefix___closed__1; +lean_object* l_Lean_TypeClass_Context_slowWhnfApp(lean_object*, lean_object*); +lean_object* l_Lean_TypeClass_Context_uLookupIdx(lean_object*, lean_object*); +lean_object* l_StateT_Monad___rarg(lean_object*); +lean_object* lean_expr_mk_pi(lean_object*, uint8_t, lean_object*, lean_object*); +lean_object* l_Lean_TypeClass_Context_uUnify___main___closed__4; +uint8_t l_Lean_TypeClass_Context_eFind(lean_object*, lean_object*); +lean_object* l_PersistentArray_get_x21___at_Lean_TypeClass_Context_uLookupIdx___spec__1___boxed(lean_object*, lean_object*); +uint8_t l_Lean_Level_hasMVar___main(lean_object*); +lean_object* level_mk_mvar(lean_object*); +lean_object* l_Lean_TypeClass_Context_eFind___main___boxed(lean_object*, lean_object*); +lean_object* lean_expr_mk_app(lean_object*, lean_object*); +lean_object* l_Lean_TypeClass_Context_eInferIdx(lean_object*, lean_object*); +lean_object* l_panicWithPos___at_Lean_TypeClass_Context_eInfer___spec__1(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Expr_bindingBody(lean_object*); +lean_object* l_Lean_TypeClass_Context_uInstantiate___boxed(lean_object*, lean_object*); +size_t l_USize_sub(size_t, size_t); +lean_object* l_Lean_TypeClass_Context_eShallowInstantiate(lean_object*, lean_object*); +lean_object* lean_expr_instantiate1(lean_object*, lean_object*); +lean_object* l_Lean_TypeClass_Context_metaPrefix___closed__1; +uint8_t l_Lean_TypeClass_Context_uFind(lean_object*, lean_object*); +lean_object* l_Lean_Expr_getAppFn___main(lean_object*); +uint8_t l_Lean_TypeClass_Context_eOccursIn(lean_object*, lean_object*); +lean_object* l_Lean_TypeClass_Context_eAssign___boxed(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_TypeClass_Context_uAlphaNormalizeCore___main(lean_object*, lean_object*); +lean_object* l_Lean_TypeClass_Context_uNewMeta(lean_object*); +lean_object* l_Lean_TypeClass_Context_uUnify___main___closed__3; +lean_object* l_Lean_TypeClass_Context_eAssign(lean_object*, lean_object*, lean_object*); +extern lean_object* l_Lean_Options_empty; +lean_object* l_RBNode_fold___main___at_RBMap_size___spec__1___rarg(lean_object*, lean_object*); +lean_object* l_Lean_TypeClass_Context_uMetaIdx___boxed(lean_object*); +extern lean_object* l_String_Inhabited; +lean_object* l_Lean_TypeClass_Context_uShallowInstantiate(lean_object*, lean_object*); +lean_object* l_Lean_TypeClass_Context_Inhabited___closed__1; +lean_object* l_Lean_TypeClass_Context_eAssign___closed__1; +lean_object* l_List_foldl___main___at_Lean_mkApp___spec__1(lean_object*, lean_object*); +lean_object* l_PersistentArray_set___rarg(lean_object*, lean_object*, lean_object*); +extern lean_object* l_Id_Monad; +lean_object* l_Lean_TypeClass_Context_uLookupIdx___boxed(lean_object*, lean_object*); +lean_object* l_Lean_TypeClass_Context_eUnify___main___closed__1; +lean_object* l_Lean_TypeClass_Context_uFind___main___boxed(lean_object*, lean_object*); +lean_object* l_Lean_TypeClass_Context_eAlphaNormalizeCore(lean_object*, lean_object*); +lean_object* l_PersistentArray_get_x21___at_Lean_TypeClass_Context_eLookupIdx___spec__1___boxed(lean_object*, lean_object*); +lean_object* l_EState_fromState___rarg(lean_object*, lean_object*); +lean_object* l_RBNode_find___main___at_Lean_TypeClass_Context_uAlphaNormalizeCore___main___spec__1(lean_object*, lean_object*); +lean_object* l_Lean_TypeClass_Context_eHasTmpMVar___boxed(lean_object*); +lean_object* l_Lean_TypeClass_Context_slowWhnf___main___boxed(lean_object*); +lean_object* l_Nat_repr(lean_object*); +extern lean_object* l_PUnit_Inhabited; +uint8_t l_Lean_TypeClass_Context_uIsMeta(lean_object*); +lean_object* l_Lean_TypeClass_Context_Inhabited; +uint8_t l_Lean_TypeClass_Context_uFind___main(lean_object*, lean_object*); +extern lean_object* l_panicWithPos___rarg___closed__3; +uint8_t l_Lean_TypeClass_Context_eFind___main(lean_object*, lean_object*); +lean_object* lean_expr_mk_const(lean_object*, lean_object*); +lean_object* l_Lean_TypeClass_Context_eIsMeta___boxed(lean_object*); +uint8_t lean_level_eqv(lean_object*, lean_object*); +lean_object* l_Lean_TypeClass_Context_uIsMeta___boxed(lean_object*); +uint8_t lean_expr_eqv(lean_object*, lean_object*); +lean_object* l_Lean_TypeClass_Context_uInstantiate___main___boxed(lean_object*, lean_object*); +lean_object* l_List_map___main___at_Lean_TypeClass_Context_eInstantiate___main___spec__1(lean_object*, lean_object*); +lean_object* l_Lean_TypeClass_Context_uUnify___main___closed__1; +lean_object* l_Lean_LevelToFormat_Level_format(lean_object*); +lean_object* l_Lean_Expr_bindingDomain(lean_object*); +lean_object* l_Lean_TypeClass_Context_uHasTmpMVar___closed__1; +lean_object* l_Lean_TypeClass_Context_alphaMetaPrefix; +lean_object* lean_string_append(lean_object*, lean_object*); +lean_object* l_PersistentArray_push___rarg(lean_object*, lean_object*); +lean_object* l_PersistentArray_get_x21___at_Lean_TypeClass_Context_eInferIdx___spec__1___boxed(lean_object*, lean_object*); +lean_object* l_Lean_TypeClass_Context_eOccursIn___lambda__1___boxed(lean_object*, lean_object*); +lean_object* l_Lean_TypeClass_Context_eHasETmpMVar___closed__1; +uint8_t l_RBNode_isRed___rarg(lean_object*); +lean_object* l_panicWithPos___at_Lean_TypeClass_Context_eUnify___main___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_TypeClass_Context_uAssign___boxed(lean_object*, lean_object*, lean_object*); +uint8_t l_Lean_TypeClass_Context_eHasTmpMVar(lean_object*); +uint8_t l_Lean_Expr_isForall(lean_object*); +uint8_t lean_nat_dec_lt(lean_object*, lean_object*); +lean_object* l_panicWithPos___at_Lean_TypeClass_Context_eAssign___spec__1(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_TypeClass_Context_slowWhnf___boxed(lean_object*); +lean_object* l_Lean_TypeClass_Context_eInstantiate(lean_object*, lean_object*); +lean_object* l_Lean_TypeClass_Context_eMetaIdx___boxed(lean_object*); +lean_object* l_Lean_TypeClass_Context_eAssignIdx___boxed(lean_object*, lean_object*, lean_object*); +lean_object* lean_name_mk_string(lean_object*, lean_object*); +uint8_t l_List_foldr___main___at_Lean_TypeClass_Context_eHasTmpMVar___spec__1(uint8_t, lean_object*); +lean_object* l_PersistentArray_getAux___main___at_Lean_TypeClass_Context_eInferIdx___spec__2___boxed(lean_object*, lean_object*, lean_object*); +uint8_t lean_nat_dec_eq(lean_object*, lean_object*); +lean_object* l_Lean_TypeClass_Context_uUnify(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_TypeClass_Context_eUnify___main___closed__2; +lean_object* l_Lean_TypeClass_Context_alphaMetaPrefix___closed__2; +lean_object* l_panicWithPos___at_Lean_TypeClass_Context_eUnify___main___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +extern lean_object* l_panicWithPos___rarg___closed__1; +lean_object* l_PersistentArray_getAux___main___at_Lean_TypeClass_Context_eLookupIdx___spec__2(lean_object*, size_t, size_t); +lean_object* l_Lean_TypeClass_Context_eAssignIdx(lean_object*, lean_object*, lean_object*); +lean_object* level_mk_imax(lean_object*, lean_object*); +uint8_t l_Lean_Expr_isFVar(lean_object*); +lean_object* l_PersistentArray_getAux___main___at_Lean_TypeClass_Context_eInferIdx___spec__2(lean_object*, size_t, size_t); +lean_object* l_panicWithPos___at_Lean_TypeClass_Context_eAssign___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Expr_getAppArgsAux___main(lean_object*, lean_object*); +extern lean_object* l_PersistentArray_getAux___main___rarg___closed__1; +lean_object* l_Lean_TypeClass_Context_slowWhnfApp___main(lean_object*, lean_object*); +lean_object* l_Lean_TypeClass_Context_uOccursIn___lambda__1___boxed(lean_object*, lean_object*); +lean_object* lean_expr_mk_mvar(lean_object*); +lean_object* l_Lean_TypeClass_Context_eHasETmpMVar___boxed(lean_object*); +uint8_t l_Lean_Expr_isMVar(lean_object*); +lean_object* l_List_mfor_u2082___main___at_Lean_TypeClass_Context_eUnify___main___spec__3(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_TypeClass_Context_eUnify(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_TypeClass_Context_eInfer___closed__1; +lean_object* level_mk_succ(lean_object*); +lean_object* l_panic(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_TypeClass_Context_eInstantiate___main(lean_object*, lean_object*); +lean_object* l_Lean_TypeClass_Context_eAlphaNormalizeCore___main(lean_object*, lean_object*); +lean_object* l_Lean_TypeClass_Context_uAssignIdx(lean_object*, lean_object*, lean_object*); +lean_object* l_PersistentArray_getAux___main___at_Lean_TypeClass_Context_eLookupIdx___spec__2___boxed(lean_object*, lean_object*, lean_object*); +lean_object* lean_name_mk_numeral(lean_object*, lean_object*); +lean_object* l_RBNode_ins___main___at_Lean_TypeClass_Context_uAlphaNormalizeCore___main___spec__3(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_TypeClass_Context_uInstantiate___main(lean_object*, lean_object*); +uint8_t l_Lean_TypeClass_Context_uOccursIn(lean_object*, lean_object*); +lean_object* l_Lean_TypeClass_Context_eInfer___closed__2; +uint8_t l_Lean_TypeClass_Context_uOccursIn___lambda__1(lean_object*, lean_object*); +extern lean_object* l_Array_toPersistentArray___rarg___closed__1; +lean_object* l_PersistentArray_get_x21___at_Lean_TypeClass_Context_eInferIdx___spec__1(lean_object*, lean_object*); +uint8_t l_Lean_Expr_isApp(lean_object*); +uint8_t l_Lean_TypeClass_Context_uHasTmpMVar(lean_object*); +lean_object* l_Lean_TypeClass_Context_eUnify___main(lean_object*, lean_object*, lean_object*); +lean_object* l_PersistentArray_get_x21___at_Lean_TypeClass_Context_uLookupIdx___spec__1(lean_object*, lean_object*); +lean_object* l_Lean_TypeClass_Context_eInfer___boxed(lean_object*, lean_object*); +lean_object* l_Lean_TypeClass_Context_metaPrefix; +uint8_t l_Lean_TypeClass_Context_eIsMeta(lean_object*); +lean_object* l_RBNode_setBlack___rarg(lean_object*); +lean_object* l_List_foldr___main___at_Lean_TypeClass_Context_eHasTmpMVar___spec__1___boxed(lean_object*, lean_object*); +lean_object* l_Lean_TypeClass_Context_eLookupIdx(lean_object*, lean_object*); +lean_object* l_Lean_TypeClass_Context_uFind___boxed(lean_object*, lean_object*); +lean_object* l_Lean_Expr_constLevels(lean_object*); +lean_object* l_Lean_TypeClass_Context_eInferIdx___boxed(lean_object*, lean_object*); +uint8_t lean_nat_dec_le(lean_object*, lean_object*); +lean_object* l_Lean_TypeClass_Context_metaPrefix___closed__2; +lean_object* l_Lean_TypeClass_Context_eFind___boxed(lean_object*, lean_object*); +uint8_t lean_expr_has_mvar(lean_object*); +uint8_t l_Lean_TypeClass_Context_eOccursIn___lambda__1(lean_object*, lean_object*); +lean_object* l_panicWithPos___at_Lean_TypeClass_Context_eAssign___spec__1___closed__1; +size_t lean_usize_of_nat(lean_object*); +lean_object* lean_expr_mk_lambda(lean_object*, uint8_t, lean_object*, lean_object*); +lean_object* l_Lean_TypeClass_Context_eNewMeta(lean_object*, lean_object*); +lean_object* l_Lean_TypeClass_Context_uHasTmpMVar___boxed(lean_object*); +lean_object* l_panicWithPos___at_Lean_TypeClass_Context_eUnify___main___spec__1___closed__1; +lean_object* l_panicWithPos___at_Lean_TypeClass_Context_eAssign___spec__1___closed__2; +extern lean_object* l_panicWithPos___rarg___closed__2; +lean_object* l_PersistentArray_getAux___main___at_Lean_TypeClass_Context_uLookupIdx___spec__2(lean_object*, size_t, size_t); +lean_object* l_Lean_TypeClass_Context_uAssign(lean_object*, lean_object*, lean_object*); +size_t l_USize_shift__left(size_t, size_t); +uint8_t l_Lean_Expr_isBVar(lean_object*); +lean_object* l_Lean_TypeClass_Context_uAlphaNormalizeCore(lean_object*, lean_object*); +lean_object* l_PersistentArray_getAux___main___at_Lean_TypeClass_Context_uLookupIdx___spec__2___boxed(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_TypeClass_Context_uUnify___main(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Expr_fvarName(lean_object*); +size_t l_USize_land(size_t, size_t); +lean_object* l_Lean_TypeClass_Context_slowWhnf___main(lean_object*); +lean_object* lean_usize_to_nat(size_t); +lean_object* l_Lean_TypeClass_Context_uOccursIn___boxed(lean_object*, lean_object*); +lean_object* l_Lean_TypeClass_Context_uInstantiate(lean_object*, lean_object*); +lean_object* l_Lean_TypeClass_Context_uUnify___main___closed__2; +uint8_t l_Lean_TypeClass_Context_eHasTmpMVar___lambda__1(lean_object*); +lean_object* l_EState_Inhabited___rarg(lean_object*, lean_object*); +lean_object* l_Lean_TypeClass_Context_eHasTmpMVar___lambda__1___boxed(lean_object*); +lean_object* l_List_mmap___main___at_Lean_TypeClass_Context_eAlphaNormalizeCore___main___spec__1(lean_object*, lean_object*); +lean_object* level_mk_max(lean_object*, lean_object*); +lean_object* l_Lean_TypeClass_Context_uAssign___closed__1; +lean_object* l_Lean_TypeClass_Context_uUnify___main___closed__5; +lean_object* _init_l_Lean_TypeClass_Context_Inhabited___closed__1() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Array_toPersistentArray___rarg___closed__1; +x_2 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_2, 0, x_1); +lean_ctor_set(x_2, 1, x_1); +lean_ctor_set(x_2, 2, x_1); +return x_2; +} +} +lean_object* _init_l_Lean_TypeClass_Context_Inhabited() { +_start: +{ +lean_object* x_1; +x_1 = l_Lean_TypeClass_Context_Inhabited___closed__1; +return x_1; +} +} +lean_object* _init_l_Lean_TypeClass_Context_metaPrefix___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("_tc_meta"); +return x_1; +} +} +lean_object* _init_l_Lean_TypeClass_Context_metaPrefix___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l_Lean_TypeClass_Context_metaPrefix___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* _init_l_Lean_TypeClass_Context_metaPrefix() { +_start: +{ +lean_object* x_1; +x_1 = l_Lean_TypeClass_Context_metaPrefix___closed__2; +return x_1; +} +} +lean_object* _init_l_Lean_TypeClass_Context_alphaMetaPrefix___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("_tc_alpha"); +return x_1; +} +} +lean_object* _init_l_Lean_TypeClass_Context_alphaMetaPrefix___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l_Lean_TypeClass_Context_alphaMetaPrefix___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* _init_l_Lean_TypeClass_Context_alphaMetaPrefix() { +_start: +{ +lean_object* x_1; +x_1 = l_Lean_TypeClass_Context_alphaMetaPrefix___closed__2; +return x_1; +} +} +lean_object* l_Lean_TypeClass_Context_eMetaIdx(lean_object* x_1) { +_start: +{ +if (lean_obj_tag(x_1) == 2) +{ +lean_object* x_2; +x_2 = lean_ctor_get(x_1, 0); +if (lean_obj_tag(x_2) == 2) +{ +lean_object* x_3; lean_object* x_4; lean_object* x_5; uint8_t x_6; +x_3 = lean_ctor_get(x_2, 0); +x_4 = lean_ctor_get(x_2, 1); +x_5 = l_Lean_TypeClass_Context_metaPrefix; +x_6 = lean_name_dec_eq(x_3, x_5); +if (x_6 == 0) +{ +lean_object* x_7; +x_7 = lean_box(0); +return x_7; +} +else +{ +lean_object* x_8; +lean_inc(x_4); +x_8 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_8, 0, x_4); +return x_8; +} +} +else +{ +lean_object* x_9; +x_9 = lean_box(0); +return x_9; +} +} +else +{ +lean_object* x_10; +x_10 = lean_box(0); +return x_10; +} +} +} +lean_object* l_Lean_TypeClass_Context_eMetaIdx___boxed(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = l_Lean_TypeClass_Context_eMetaIdx(x_1); +lean_dec(x_1); +return x_2; +} +} +uint8_t l_Lean_TypeClass_Context_eIsMeta(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = l_Lean_TypeClass_Context_eMetaIdx(x_1); +if (lean_obj_tag(x_2) == 0) +{ +uint8_t x_3; +x_3 = 0; +return x_3; +} +else +{ +uint8_t x_4; +lean_dec(x_2); +x_4 = 1; +return x_4; +} +} +} +lean_object* l_Lean_TypeClass_Context_eIsMeta___boxed(lean_object* x_1) { +_start: +{ +uint8_t x_2; lean_object* x_3; +x_2 = l_Lean_TypeClass_Context_eIsMeta(x_1); +lean_dec(x_1); +x_3 = lean_box(x_2); +return x_3; +} +} +lean_object* l_Lean_TypeClass_Context_eNewMeta(lean_object* x_1, lean_object* x_2) { +_start: +{ +uint8_t x_3; +x_3 = !lean_is_exclusive(x_2); +if (x_3 == 0) +{ +lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; +x_4 = lean_ctor_get(x_2, 1); +x_5 = lean_ctor_get(x_2, 2); +x_6 = lean_ctor_get(x_4, 2); +lean_inc(x_6); +x_7 = l_PersistentArray_push___rarg(x_4, x_1); +x_8 = lean_box(0); +x_9 = l_PersistentArray_push___rarg(x_5, x_8); +lean_ctor_set(x_2, 2, x_9); +lean_ctor_set(x_2, 1, x_7); +x_10 = l_Lean_TypeClass_Context_metaPrefix; +x_11 = lean_name_mk_numeral(x_10, x_6); +x_12 = lean_expr_mk_mvar(x_11); +x_13 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_13, 0, x_12); +lean_ctor_set(x_13, 1, x_2); +return x_13; +} +else +{ +lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; +x_14 = lean_ctor_get(x_2, 0); +x_15 = lean_ctor_get(x_2, 1); +x_16 = lean_ctor_get(x_2, 2); +lean_inc(x_16); +lean_inc(x_15); +lean_inc(x_14); +lean_dec(x_2); +x_17 = lean_ctor_get(x_15, 2); +lean_inc(x_17); +x_18 = l_PersistentArray_push___rarg(x_15, x_1); +x_19 = lean_box(0); +x_20 = l_PersistentArray_push___rarg(x_16, x_19); +x_21 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_21, 0, x_14); +lean_ctor_set(x_21, 1, x_18); +lean_ctor_set(x_21, 2, x_20); +x_22 = l_Lean_TypeClass_Context_metaPrefix; +x_23 = lean_name_mk_numeral(x_22, x_17); +x_24 = lean_expr_mk_mvar(x_23); +x_25 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_25, 0, x_24); +lean_ctor_set(x_25, 1, x_21); +return x_25; +} +} +} +lean_object* l_PersistentArray_getAux___main___at_Lean_TypeClass_Context_eLookupIdx___spec__2(lean_object* x_1, size_t x_2, size_t x_3) { +_start: +{ +if (lean_obj_tag(x_1) == 0) +{ +lean_object* x_4; size_t x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; size_t x_9; size_t x_10; size_t x_11; size_t x_12; size_t x_13; size_t x_14; +x_4 = lean_ctor_get(x_1, 0); +lean_inc(x_4); +lean_dec(x_1); +x_5 = x_2 >> x_3; +x_6 = lean_usize_to_nat(x_5); +x_7 = l_PersistentArray_getAux___main___rarg___closed__1; +x_8 = lean_array_get(x_7, x_4, x_6); +lean_dec(x_6); +lean_dec(x_4); +x_9 = 1; +x_10 = x_9 << x_3; +x_11 = x_10 - x_9; +x_12 = x_2 & x_11; +x_13 = 5; +x_14 = x_3 - x_13; +x_1 = x_8; +x_2 = x_12; +x_3 = x_14; +goto _start; +} +else +{ +lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; +x_16 = lean_ctor_get(x_1, 0); +lean_inc(x_16); +lean_dec(x_1); +x_17 = lean_box(0); +x_18 = lean_usize_to_nat(x_2); +x_19 = lean_array_get(x_17, x_16, x_18); +lean_dec(x_18); +lean_dec(x_16); +return x_19; +} +} +} +lean_object* l_PersistentArray_get_x21___at_Lean_TypeClass_Context_eLookupIdx___spec__1(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; lean_object* x_4; uint8_t x_5; +x_3 = lean_box(0); +x_4 = lean_ctor_get(x_1, 3); +lean_inc(x_4); +x_5 = lean_nat_dec_le(x_4, x_2); +if (x_5 == 0) +{ +lean_object* x_6; size_t x_7; size_t x_8; lean_object* x_9; +lean_dec(x_4); +x_6 = lean_ctor_get(x_1, 0); +lean_inc(x_6); +x_7 = lean_usize_of_nat(x_2); +x_8 = lean_ctor_get_usize(x_1, 4); +lean_dec(x_1); +x_9 = l_PersistentArray_getAux___main___at_Lean_TypeClass_Context_eLookupIdx___spec__2(x_6, x_7, x_8); +return x_9; +} +else +{ +lean_object* x_10; lean_object* x_11; lean_object* x_12; +x_10 = lean_ctor_get(x_1, 1); +lean_inc(x_10); +lean_dec(x_1); +x_11 = lean_nat_sub(x_2, x_4); +lean_dec(x_4); +x_12 = lean_array_get(x_3, x_10, x_11); +lean_dec(x_11); +lean_dec(x_10); +return x_12; +} +} +} +lean_object* l_Lean_TypeClass_Context_eLookupIdx(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; lean_object* x_4; lean_object* x_5; +x_3 = lean_ctor_get(x_2, 2); +lean_inc(x_3); +x_4 = l_PersistentArray_get_x21___at_Lean_TypeClass_Context_eLookupIdx___spec__1(x_3, x_1); +x_5 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_5, 0, x_4); +lean_ctor_set(x_5, 1, x_2); +return x_5; +} +} +lean_object* l_PersistentArray_getAux___main___at_Lean_TypeClass_Context_eLookupIdx___spec__2___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +size_t x_4; size_t x_5; lean_object* x_6; +x_4 = lean_unbox_usize(x_2); +lean_dec(x_2); +x_5 = lean_unbox_usize(x_3); +lean_dec(x_3); +x_6 = l_PersistentArray_getAux___main___at_Lean_TypeClass_Context_eLookupIdx___spec__2(x_1, x_4, x_5); +return x_6; +} +} +lean_object* l_PersistentArray_get_x21___at_Lean_TypeClass_Context_eLookupIdx___spec__1___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = l_PersistentArray_get_x21___at_Lean_TypeClass_Context_eLookupIdx___spec__1(x_1, x_2); +lean_dec(x_2); +return x_3; +} +} +lean_object* l_Lean_TypeClass_Context_eLookupIdx___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = l_Lean_TypeClass_Context_eLookupIdx(x_1, x_2); +lean_dec(x_1); +return x_3; +} +} +lean_object* l_Lean_TypeClass_Context_eShallowInstantiate(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = l_Lean_TypeClass_Context_eMetaIdx(x_1); +if (lean_obj_tag(x_3) == 0) +{ +lean_object* x_4; +x_4 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_4, 0, x_1); +lean_ctor_set(x_4, 1, x_2); +return x_4; +} +else +{ +lean_object* x_5; lean_object* x_6; lean_object* x_7; +x_5 = lean_ctor_get(x_3, 0); +lean_inc(x_5); +lean_dec(x_3); +x_6 = lean_ctor_get(x_2, 2); +lean_inc(x_6); +x_7 = l_PersistentArray_get_x21___at_Lean_TypeClass_Context_eLookupIdx___spec__1(x_6, x_5); +lean_dec(x_5); +if (lean_obj_tag(x_7) == 0) +{ +lean_object* x_8; +x_8 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_8, 0, x_1); +lean_ctor_set(x_8, 1, x_2); +return x_8; +} +else +{ +lean_object* x_9; lean_object* x_10; +lean_dec(x_1); +x_9 = lean_ctor_get(x_7, 0); +lean_inc(x_9); +lean_dec(x_7); +x_10 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_10, 0, x_9); +lean_ctor_set(x_10, 1, x_2); +return x_10; +} +} +} +} +lean_object* l_PersistentArray_getAux___main___at_Lean_TypeClass_Context_eInferIdx___spec__2(lean_object* x_1, size_t x_2, size_t x_3) { +_start: +{ +if (lean_obj_tag(x_1) == 0) +{ +lean_object* x_4; size_t x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; size_t x_9; size_t x_10; size_t x_11; size_t x_12; size_t x_13; size_t x_14; +x_4 = lean_ctor_get(x_1, 0); +lean_inc(x_4); +lean_dec(x_1); +x_5 = x_2 >> x_3; +x_6 = lean_usize_to_nat(x_5); +x_7 = l_PersistentArray_getAux___main___rarg___closed__1; +x_8 = lean_array_get(x_7, x_4, x_6); +lean_dec(x_6); +lean_dec(x_4); +x_9 = 1; +x_10 = x_9 << x_3; +x_11 = x_10 - x_9; +x_12 = x_2 & x_11; +x_13 = 5; +x_14 = x_3 - x_13; +x_1 = x_8; +x_2 = x_12; +x_3 = x_14; +goto _start; +} +else +{ +lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; +x_16 = lean_ctor_get(x_1, 0); +lean_inc(x_16); +lean_dec(x_1); +x_17 = lean_usize_to_nat(x_2); +x_18 = l_Lean_exprIsInhabited; +x_19 = lean_array_get(x_18, x_16, x_17); +lean_dec(x_17); +lean_dec(x_16); +return x_19; +} +} +} +lean_object* l_PersistentArray_get_x21___at_Lean_TypeClass_Context_eInferIdx___spec__1(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; uint8_t x_4; +x_3 = lean_ctor_get(x_1, 3); +lean_inc(x_3); +x_4 = lean_nat_dec_le(x_3, x_2); +if (x_4 == 0) +{ +lean_object* x_5; size_t x_6; size_t x_7; lean_object* x_8; +lean_dec(x_3); +x_5 = lean_ctor_get(x_1, 0); +lean_inc(x_5); +x_6 = lean_usize_of_nat(x_2); +x_7 = lean_ctor_get_usize(x_1, 4); +lean_dec(x_1); +x_8 = l_PersistentArray_getAux___main___at_Lean_TypeClass_Context_eInferIdx___spec__2(x_5, x_6, x_7); +return x_8; +} +else +{ +lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; +x_9 = lean_ctor_get(x_1, 1); +lean_inc(x_9); +lean_dec(x_1); +x_10 = lean_nat_sub(x_2, x_3); +lean_dec(x_3); +x_11 = l_Lean_exprIsInhabited; +x_12 = lean_array_get(x_11, x_9, x_10); +lean_dec(x_10); +lean_dec(x_9); +return x_12; +} +} +} +lean_object* l_Lean_TypeClass_Context_eInferIdx(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; lean_object* x_4; lean_object* x_5; +x_3 = lean_ctor_get(x_2, 1); +lean_inc(x_3); +x_4 = l_PersistentArray_get_x21___at_Lean_TypeClass_Context_eInferIdx___spec__1(x_3, x_1); +x_5 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_5, 0, x_4); +lean_ctor_set(x_5, 1, x_2); +return x_5; +} +} +lean_object* l_PersistentArray_getAux___main___at_Lean_TypeClass_Context_eInferIdx___spec__2___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +size_t x_4; size_t x_5; lean_object* x_6; +x_4 = lean_unbox_usize(x_2); +lean_dec(x_2); +x_5 = lean_unbox_usize(x_3); +lean_dec(x_3); +x_6 = l_PersistentArray_getAux___main___at_Lean_TypeClass_Context_eInferIdx___spec__2(x_1, x_4, x_5); +return x_6; +} +} +lean_object* l_PersistentArray_get_x21___at_Lean_TypeClass_Context_eInferIdx___spec__1___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = l_PersistentArray_get_x21___at_Lean_TypeClass_Context_eInferIdx___spec__1(x_1, x_2); +lean_dec(x_2); +return x_3; +} +} +lean_object* l_Lean_TypeClass_Context_eInferIdx___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = l_Lean_TypeClass_Context_eInferIdx(x_1, x_2); +lean_dec(x_1); +return x_3; +} +} +lean_object* l_panicWithPos___at_Lean_TypeClass_Context_eInfer___spec__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; +x_5 = l_panicWithPos___rarg___closed__1; +x_6 = lean_string_append(x_5, x_1); +x_7 = l_panicWithPos___rarg___closed__2; +x_8 = lean_string_append(x_6, x_7); +x_9 = l_Nat_repr(x_2); +x_10 = lean_string_append(x_8, x_9); +lean_dec(x_9); +x_11 = l_panicWithPos___rarg___closed__2; +x_12 = lean_string_append(x_10, x_11); +x_13 = l_Nat_repr(x_3); +x_14 = lean_string_append(x_12, x_13); +lean_dec(x_13); +x_15 = l_panicWithPos___rarg___closed__3; +x_16 = lean_string_append(x_14, x_15); +x_17 = lean_string_append(x_16, x_4); +x_18 = l_Lean_exprIsInhabited; +x_19 = lean_panic_fn(x_17); +return x_19; +} +} +lean_object* _init_l_Lean_TypeClass_Context_eInfer___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("/Users/leonardodemoura/projects/lean4/library/init/lean/typeclass/context.lean"); +return x_1; +} +} +lean_object* _init_l_Lean_TypeClass_Context_eInfer___closed__2() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("eInfer called on non-(tmp-)mvar"); +return x_1; +} +} +lean_object* l_Lean_TypeClass_Context_eInfer(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = l_Lean_TypeClass_Context_eMetaIdx(x_2); +if (lean_obj_tag(x_3) == 0) +{ +lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; +lean_dec(x_1); +x_4 = l_Lean_TypeClass_Context_eInfer___closed__1; +x_5 = lean_unsigned_to_nat(69u); +x_6 = lean_unsigned_to_nat(14u); +x_7 = l_Lean_TypeClass_Context_eInfer___closed__2; +x_8 = l_panicWithPos___at_Lean_TypeClass_Context_eInfer___spec__1(x_4, x_5, x_6, x_7); +return x_8; +} +else +{ +lean_object* x_9; lean_object* x_10; lean_object* x_11; +x_9 = lean_ctor_get(x_3, 0); +lean_inc(x_9); +lean_dec(x_3); +x_10 = lean_ctor_get(x_1, 1); +lean_inc(x_10); +lean_dec(x_1); +x_11 = l_PersistentArray_get_x21___at_Lean_TypeClass_Context_eInferIdx___spec__1(x_10, x_9); +lean_dec(x_9); +return x_11; +} +} +} +lean_object* l_panicWithPos___at_Lean_TypeClass_Context_eInfer___spec__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; +x_5 = l_panicWithPos___at_Lean_TypeClass_Context_eInfer___spec__1(x_1, x_2, x_3, x_4); +lean_dec(x_4); +lean_dec(x_1); +return x_5; +} +} +lean_object* l_Lean_TypeClass_Context_eInfer___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = l_Lean_TypeClass_Context_eInfer(x_1, x_2); +lean_dec(x_2); +return x_3; +} +} +lean_object* l_Lean_TypeClass_Context_eAssignIdx(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +uint8_t x_4; +x_4 = !lean_is_exclusive(x_3); +if (x_4 == 0) +{ +lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; +x_5 = lean_ctor_get(x_3, 2); +x_6 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_6, 0, x_2); +x_7 = l_PersistentArray_set___rarg(x_5, x_1, x_6); +lean_ctor_set(x_3, 2, x_7); +x_8 = lean_box(0); +x_9 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_9, 0, x_8); +lean_ctor_set(x_9, 1, x_3); +return x_9; +} +else +{ +lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; +x_10 = lean_ctor_get(x_3, 0); +x_11 = lean_ctor_get(x_3, 1); +x_12 = lean_ctor_get(x_3, 2); +lean_inc(x_12); +lean_inc(x_11); +lean_inc(x_10); +lean_dec(x_3); +x_13 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_13, 0, x_2); +x_14 = l_PersistentArray_set___rarg(x_12, x_1, x_13); +x_15 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_15, 0, x_10); +lean_ctor_set(x_15, 1, x_11); +lean_ctor_set(x_15, 2, x_14); +x_16 = lean_box(0); +x_17 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_17, 0, x_16); +lean_ctor_set(x_17, 1, x_15); +return x_17; +} +} +} +lean_object* l_Lean_TypeClass_Context_eAssignIdx___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; +x_4 = l_Lean_TypeClass_Context_eAssignIdx(x_1, x_2, x_3); +lean_dec(x_1); +return x_4; +} +} +lean_object* _init_l_panicWithPos___at_Lean_TypeClass_Context_eAssign___spec__1___closed__1() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Id_Monad; +x_2 = l_StateT_Monad___rarg(x_1); +return x_2; +} +} +lean_object* _init_l_panicWithPos___at_Lean_TypeClass_Context_eAssign___spec__1___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_panicWithPos___at_Lean_TypeClass_Context_eAssign___spec__1___closed__1; +x_2 = l_PUnit_Inhabited; +x_3 = l_monadInhabited___rarg(x_1, x_2); +return x_3; +} +} +lean_object* l_panicWithPos___at_Lean_TypeClass_Context_eAssign___spec__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { +_start: +{ +lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; +x_6 = l_panicWithPos___rarg___closed__1; +x_7 = lean_string_append(x_6, x_1); +x_8 = l_panicWithPos___rarg___closed__2; +x_9 = lean_string_append(x_7, x_8); +x_10 = l_Nat_repr(x_2); +x_11 = lean_string_append(x_9, x_10); +lean_dec(x_10); +x_12 = l_panicWithPos___rarg___closed__2; +x_13 = lean_string_append(x_11, x_12); +x_14 = l_Nat_repr(x_3); +x_15 = lean_string_append(x_13, x_14); +lean_dec(x_14); +x_16 = l_panicWithPos___rarg___closed__3; +x_17 = lean_string_append(x_15, x_16); +x_18 = lean_string_append(x_17, x_4); +x_19 = l_panicWithPos___at_Lean_TypeClass_Context_eAssign___spec__1___closed__2; +x_20 = lean_panic_fn(x_18); +x_21 = lean_apply_1(x_20, x_5); +return x_21; +} +} +lean_object* _init_l_Lean_TypeClass_Context_eAssign___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("eAssign called on non-(tmp-)mvar"); +return x_1; +} +} +lean_object* l_Lean_TypeClass_Context_eAssign(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; +x_4 = l_Lean_TypeClass_Context_eMetaIdx(x_1); +if (lean_obj_tag(x_4) == 0) +{ +lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; +lean_dec(x_2); +x_5 = l_Lean_TypeClass_Context_eInfer___closed__1; +x_6 = lean_unsigned_to_nat(77u); +x_7 = lean_unsigned_to_nat(14u); +x_8 = l_Lean_TypeClass_Context_eAssign___closed__1; +x_9 = l_panicWithPos___at_Lean_TypeClass_Context_eAssign___spec__1(x_5, x_6, x_7, x_8, x_3); +return x_9; +} +else +{ +uint8_t x_10; +x_10 = !lean_is_exclusive(x_4); +if (x_10 == 0) +{ +uint8_t x_11; +x_11 = !lean_is_exclusive(x_3); +if (x_11 == 0) +{ +lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; +x_12 = lean_ctor_get(x_4, 0); +x_13 = lean_ctor_get(x_3, 2); +lean_ctor_set(x_4, 0, x_2); +x_14 = l_PersistentArray_set___rarg(x_13, x_12, x_4); +lean_dec(x_12); +lean_ctor_set(x_3, 2, x_14); +x_15 = lean_box(0); +x_16 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_16, 0, x_15); +lean_ctor_set(x_16, 1, x_3); +return x_16; +} +else +{ +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; +x_17 = lean_ctor_get(x_4, 0); +x_18 = lean_ctor_get(x_3, 0); +x_19 = lean_ctor_get(x_3, 1); +x_20 = lean_ctor_get(x_3, 2); +lean_inc(x_20); +lean_inc(x_19); +lean_inc(x_18); +lean_dec(x_3); +lean_ctor_set(x_4, 0, x_2); +x_21 = l_PersistentArray_set___rarg(x_20, x_17, x_4); +lean_dec(x_17); +x_22 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_22, 0, x_18); +lean_ctor_set(x_22, 1, x_19); +lean_ctor_set(x_22, 2, x_21); +x_23 = lean_box(0); +x_24 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_24, 0, x_23); +lean_ctor_set(x_24, 1, x_22); +return x_24; +} +} +else +{ +lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; +x_25 = lean_ctor_get(x_4, 0); +lean_inc(x_25); +lean_dec(x_4); +x_26 = lean_ctor_get(x_3, 0); +lean_inc(x_26); +x_27 = lean_ctor_get(x_3, 1); +lean_inc(x_27); +x_28 = lean_ctor_get(x_3, 2); +lean_inc(x_28); +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_29 = x_3; +} else { + lean_dec_ref(x_3); + x_29 = lean_box(0); +} +x_30 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_30, 0, x_2); +x_31 = l_PersistentArray_set___rarg(x_28, x_25, x_30); +lean_dec(x_25); +if (lean_is_scalar(x_29)) { + x_32 = lean_alloc_ctor(0, 3, 0); +} else { + x_32 = x_29; +} +lean_ctor_set(x_32, 0, x_26); +lean_ctor_set(x_32, 1, x_27); +lean_ctor_set(x_32, 2, x_31); +x_33 = lean_box(0); +x_34 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_34, 0, x_33); +lean_ctor_set(x_34, 1, x_32); +return x_34; +} +} +} +} +lean_object* l_panicWithPos___at_Lean_TypeClass_Context_eAssign___spec__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { +_start: +{ +lean_object* x_6; +x_6 = l_panicWithPos___at_Lean_TypeClass_Context_eAssign___spec__1(x_1, x_2, x_3, x_4, x_5); +lean_dec(x_4); +lean_dec(x_1); +return x_6; +} +} +lean_object* l_Lean_TypeClass_Context_eAssign___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; +x_4 = l_Lean_TypeClass_Context_eAssign(x_1, x_2, x_3); +lean_dec(x_1); +return x_4; +} +} +uint8_t l_Lean_TypeClass_Context_eFind___main(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; uint8_t x_4; +lean_inc(x_1); +lean_inc(x_2); +x_3 = lean_apply_1(x_1, x_2); +x_4 = lean_unbox(x_3); +lean_dec(x_3); +if (x_4 == 0) +{ +switch (lean_obj_tag(x_2)) { +case 5: +{ +lean_object* x_5; lean_object* x_6; uint8_t x_7; +x_5 = lean_ctor_get(x_2, 0); +lean_inc(x_5); +x_6 = lean_ctor_get(x_2, 1); +lean_inc(x_6); +lean_dec(x_2); +lean_inc(x_1); +x_7 = l_Lean_TypeClass_Context_eFind___main(x_1, x_5); +if (x_7 == 0) +{ +x_2 = x_6; +goto _start; +} +else +{ +uint8_t x_9; +lean_dec(x_6); +lean_dec(x_1); +x_9 = 1; +return x_9; +} +} +case 7: +{ +lean_object* x_10; lean_object* x_11; uint8_t x_12; +x_10 = lean_ctor_get(x_2, 1); +lean_inc(x_10); +x_11 = lean_ctor_get(x_2, 2); +lean_inc(x_11); +lean_dec(x_2); +lean_inc(x_1); +x_12 = l_Lean_TypeClass_Context_eFind___main(x_1, x_10); +if (x_12 == 0) +{ +x_2 = x_11; +goto _start; +} +else +{ +uint8_t x_14; +lean_dec(x_11); +lean_dec(x_1); +x_14 = 1; +return x_14; +} +} +default: +{ +uint8_t x_15; +lean_dec(x_2); +lean_dec(x_1); +x_15 = 0; +return x_15; +} +} +} +else +{ +uint8_t x_16; +lean_dec(x_2); +lean_dec(x_1); +x_16 = 1; +return x_16; +} +} +} +lean_object* l_Lean_TypeClass_Context_eFind___main___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +uint8_t x_3; lean_object* x_4; +x_3 = l_Lean_TypeClass_Context_eFind___main(x_1, x_2); +x_4 = lean_box(x_3); +return x_4; +} +} +uint8_t l_Lean_TypeClass_Context_eFind(lean_object* x_1, lean_object* x_2) { +_start: +{ +uint8_t x_3; +x_3 = l_Lean_TypeClass_Context_eFind___main(x_1, x_2); +return x_3; +} +} +lean_object* l_Lean_TypeClass_Context_eFind___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +uint8_t x_3; lean_object* x_4; +x_3 = l_Lean_TypeClass_Context_eFind(x_1, x_2); +x_4 = lean_box(x_3); +return x_4; +} +} +uint8_t l_Lean_TypeClass_Context_eOccursIn___lambda__1(lean_object* x_1, lean_object* x_2) { +_start: +{ +uint8_t x_3; +x_3 = lean_expr_eqv(x_2, x_1); +return x_3; +} +} +uint8_t l_Lean_TypeClass_Context_eOccursIn(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; uint8_t x_4; +x_3 = lean_alloc_closure((void*)(l_Lean_TypeClass_Context_eOccursIn___lambda__1___boxed), 2, 1); +lean_closure_set(x_3, 0, x_1); +x_4 = l_Lean_TypeClass_Context_eFind___main(x_3, x_2); +return x_4; +} +} +lean_object* l_Lean_TypeClass_Context_eOccursIn___lambda__1___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +uint8_t x_3; lean_object* x_4; +x_3 = l_Lean_TypeClass_Context_eOccursIn___lambda__1(x_1, x_2); +lean_dec(x_2); +lean_dec(x_1); +x_4 = lean_box(x_3); +return x_4; +} +} +lean_object* l_Lean_TypeClass_Context_eOccursIn___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +uint8_t x_3; lean_object* x_4; +x_3 = l_Lean_TypeClass_Context_eOccursIn(x_1, x_2); +x_4 = lean_box(x_3); +return x_4; +} +} +lean_object* _init_l_Lean_TypeClass_Context_eHasETmpMVar___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_TypeClass_Context_eIsMeta___boxed), 1, 0); +return x_1; +} +} +uint8_t l_Lean_TypeClass_Context_eHasETmpMVar(lean_object* x_1) { +_start: +{ +lean_object* x_2; uint8_t x_3; +x_2 = l_Lean_TypeClass_Context_eHasETmpMVar___closed__1; +x_3 = l_Lean_TypeClass_Context_eFind___main(x_2, x_1); +return x_3; +} +} +lean_object* l_Lean_TypeClass_Context_eHasETmpMVar___boxed(lean_object* x_1) { +_start: +{ +uint8_t x_2; lean_object* x_3; +x_2 = l_Lean_TypeClass_Context_eHasETmpMVar(x_1); +x_3 = lean_box(x_2); +return x_3; +} +} +lean_object* l_Lean_TypeClass_Context_uMetaIdx(lean_object* x_1) { +_start: +{ +if (lean_obj_tag(x_1) == 5) +{ +lean_object* x_2; +x_2 = lean_ctor_get(x_1, 0); +if (lean_obj_tag(x_2) == 2) +{ +lean_object* x_3; lean_object* x_4; lean_object* x_5; uint8_t x_6; +x_3 = lean_ctor_get(x_2, 0); +x_4 = lean_ctor_get(x_2, 1); +x_5 = l_Lean_TypeClass_Context_metaPrefix; +x_6 = lean_name_dec_eq(x_3, x_5); +if (x_6 == 0) +{ +lean_object* x_7; +x_7 = lean_box(0); +return x_7; +} +else +{ +lean_object* x_8; +lean_inc(x_4); +x_8 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_8, 0, x_4); +return x_8; +} +} +else +{ +lean_object* x_9; +x_9 = lean_box(0); +return x_9; +} +} +else +{ +lean_object* x_10; +x_10 = lean_box(0); +return x_10; +} +} +} +lean_object* l_Lean_TypeClass_Context_uMetaIdx___boxed(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = l_Lean_TypeClass_Context_uMetaIdx(x_1); +lean_dec(x_1); +return x_2; +} +} +uint8_t l_Lean_TypeClass_Context_uIsMeta(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = l_Lean_TypeClass_Context_uMetaIdx(x_1); +if (lean_obj_tag(x_2) == 0) +{ +uint8_t x_3; +x_3 = 0; +return x_3; +} +else +{ +uint8_t x_4; +lean_dec(x_2); +x_4 = 1; +return x_4; +} +} +} +lean_object* l_Lean_TypeClass_Context_uIsMeta___boxed(lean_object* x_1) { +_start: +{ +uint8_t x_2; lean_object* x_3; +x_2 = l_Lean_TypeClass_Context_uIsMeta(x_1); +lean_dec(x_1); +x_3 = lean_box(x_2); +return x_3; +} +} +lean_object* l_Lean_TypeClass_Context_uNewMeta(lean_object* x_1) { +_start: +{ +uint8_t x_2; +x_2 = !lean_is_exclusive(x_1); +if (x_2 == 0) +{ +lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; +x_3 = lean_ctor_get(x_1, 0); +x_4 = lean_ctor_get(x_3, 2); +lean_inc(x_4); +x_5 = lean_box(0); +x_6 = l_PersistentArray_push___rarg(x_3, x_5); +lean_ctor_set(x_1, 0, x_6); +x_7 = l_Lean_TypeClass_Context_metaPrefix; +x_8 = lean_name_mk_numeral(x_7, x_4); +x_9 = level_mk_mvar(x_8); +x_10 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_10, 0, x_9); +lean_ctor_set(x_10, 1, x_1); +return x_10; +} +else +{ +lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; +x_11 = lean_ctor_get(x_1, 0); +x_12 = lean_ctor_get(x_1, 1); +x_13 = lean_ctor_get(x_1, 2); +lean_inc(x_13); +lean_inc(x_12); +lean_inc(x_11); +lean_dec(x_1); +x_14 = lean_ctor_get(x_11, 2); +lean_inc(x_14); +x_15 = lean_box(0); +x_16 = l_PersistentArray_push___rarg(x_11, x_15); +x_17 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_17, 0, x_16); +lean_ctor_set(x_17, 1, x_12); +lean_ctor_set(x_17, 2, x_13); +x_18 = l_Lean_TypeClass_Context_metaPrefix; +x_19 = lean_name_mk_numeral(x_18, x_14); +x_20 = level_mk_mvar(x_19); +x_21 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_21, 0, x_20); +lean_ctor_set(x_21, 1, x_17); +return x_21; +} +} +} +lean_object* l_PersistentArray_getAux___main___at_Lean_TypeClass_Context_uLookupIdx___spec__2(lean_object* x_1, size_t x_2, size_t x_3) { +_start: +{ +if (lean_obj_tag(x_1) == 0) +{ +lean_object* x_4; size_t x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; size_t x_9; size_t x_10; size_t x_11; size_t x_12; size_t x_13; size_t x_14; +x_4 = lean_ctor_get(x_1, 0); +lean_inc(x_4); +lean_dec(x_1); +x_5 = x_2 >> x_3; +x_6 = lean_usize_to_nat(x_5); +x_7 = l_PersistentArray_getAux___main___rarg___closed__1; +x_8 = lean_array_get(x_7, x_4, x_6); +lean_dec(x_6); +lean_dec(x_4); +x_9 = 1; +x_10 = x_9 << x_3; +x_11 = x_10 - x_9; +x_12 = x_2 & x_11; +x_13 = 5; +x_14 = x_3 - x_13; +x_1 = x_8; +x_2 = x_12; +x_3 = x_14; +goto _start; +} +else +{ +lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; +x_16 = lean_ctor_get(x_1, 0); +lean_inc(x_16); +lean_dec(x_1); +x_17 = lean_box(0); +x_18 = lean_usize_to_nat(x_2); +x_19 = lean_array_get(x_17, x_16, x_18); +lean_dec(x_18); +lean_dec(x_16); +return x_19; +} +} +} +lean_object* l_PersistentArray_get_x21___at_Lean_TypeClass_Context_uLookupIdx___spec__1(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; lean_object* x_4; uint8_t x_5; +x_3 = lean_box(0); +x_4 = lean_ctor_get(x_1, 3); +lean_inc(x_4); +x_5 = lean_nat_dec_le(x_4, x_2); +if (x_5 == 0) +{ +lean_object* x_6; size_t x_7; size_t x_8; lean_object* x_9; +lean_dec(x_4); +x_6 = lean_ctor_get(x_1, 0); +lean_inc(x_6); +x_7 = lean_usize_of_nat(x_2); +x_8 = lean_ctor_get_usize(x_1, 4); +lean_dec(x_1); +x_9 = l_PersistentArray_getAux___main___at_Lean_TypeClass_Context_uLookupIdx___spec__2(x_6, x_7, x_8); +return x_9; +} +else +{ +lean_object* x_10; lean_object* x_11; lean_object* x_12; +x_10 = lean_ctor_get(x_1, 1); +lean_inc(x_10); +lean_dec(x_1); +x_11 = lean_nat_sub(x_2, x_4); +lean_dec(x_4); +x_12 = lean_array_get(x_3, x_10, x_11); +lean_dec(x_11); +lean_dec(x_10); +return x_12; +} +} +} +lean_object* l_Lean_TypeClass_Context_uLookupIdx(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; lean_object* x_4; lean_object* x_5; +x_3 = lean_ctor_get(x_2, 0); +lean_inc(x_3); +x_4 = l_PersistentArray_get_x21___at_Lean_TypeClass_Context_uLookupIdx___spec__1(x_3, x_1); +x_5 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_5, 0, x_4); +lean_ctor_set(x_5, 1, x_2); +return x_5; +} +} +lean_object* l_PersistentArray_getAux___main___at_Lean_TypeClass_Context_uLookupIdx___spec__2___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +size_t x_4; size_t x_5; lean_object* x_6; +x_4 = lean_unbox_usize(x_2); +lean_dec(x_2); +x_5 = lean_unbox_usize(x_3); +lean_dec(x_3); +x_6 = l_PersistentArray_getAux___main___at_Lean_TypeClass_Context_uLookupIdx___spec__2(x_1, x_4, x_5); +return x_6; +} +} +lean_object* l_PersistentArray_get_x21___at_Lean_TypeClass_Context_uLookupIdx___spec__1___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = l_PersistentArray_get_x21___at_Lean_TypeClass_Context_uLookupIdx___spec__1(x_1, x_2); +lean_dec(x_2); +return x_3; +} +} +lean_object* l_Lean_TypeClass_Context_uLookupIdx___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = l_Lean_TypeClass_Context_uLookupIdx(x_1, x_2); +lean_dec(x_1); +return x_3; +} +} +lean_object* l_Lean_TypeClass_Context_uShallowInstantiate(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = l_Lean_TypeClass_Context_uMetaIdx(x_1); +if (lean_obj_tag(x_3) == 0) +{ +lean_object* x_4; +x_4 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_4, 0, x_1); +lean_ctor_set(x_4, 1, x_2); +return x_4; +} +else +{ +lean_object* x_5; lean_object* x_6; lean_object* x_7; +x_5 = lean_ctor_get(x_3, 0); +lean_inc(x_5); +lean_dec(x_3); +x_6 = lean_ctor_get(x_2, 0); +lean_inc(x_6); +x_7 = l_PersistentArray_get_x21___at_Lean_TypeClass_Context_uLookupIdx___spec__1(x_6, x_5); +lean_dec(x_5); +if (lean_obj_tag(x_7) == 0) +{ +lean_object* x_8; +x_8 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_8, 0, x_1); +lean_ctor_set(x_8, 1, x_2); +return x_8; +} +else +{ +lean_object* x_9; lean_object* x_10; +lean_dec(x_1); +x_9 = lean_ctor_get(x_7, 0); +lean_inc(x_9); +lean_dec(x_7); +x_10 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_10, 0, x_9); +lean_ctor_set(x_10, 1, x_2); +return x_10; +} +} +} +} +lean_object* l_Lean_TypeClass_Context_uAssignIdx(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +uint8_t x_4; +x_4 = !lean_is_exclusive(x_3); +if (x_4 == 0) +{ +lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; +x_5 = lean_ctor_get(x_3, 0); +x_6 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_6, 0, x_2); +x_7 = l_PersistentArray_set___rarg(x_5, x_1, x_6); +lean_ctor_set(x_3, 0, x_7); +x_8 = lean_box(0); +x_9 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_9, 0, x_8); +lean_ctor_set(x_9, 1, x_3); +return x_9; +} +else +{ +lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; +x_10 = lean_ctor_get(x_3, 0); +x_11 = lean_ctor_get(x_3, 1); +x_12 = lean_ctor_get(x_3, 2); +lean_inc(x_12); +lean_inc(x_11); +lean_inc(x_10); +lean_dec(x_3); +x_13 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_13, 0, x_2); +x_14 = l_PersistentArray_set___rarg(x_10, x_1, x_13); +x_15 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_15, 0, x_14); +lean_ctor_set(x_15, 1, x_11); +lean_ctor_set(x_15, 2, x_12); +x_16 = lean_box(0); +x_17 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_17, 0, x_16); +lean_ctor_set(x_17, 1, x_15); +return x_17; +} +} +} +lean_object* l_Lean_TypeClass_Context_uAssignIdx___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; +x_4 = l_Lean_TypeClass_Context_uAssignIdx(x_1, x_2, x_3); +lean_dec(x_1); +return x_4; +} +} +lean_object* _init_l_Lean_TypeClass_Context_uAssign___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("uassign called on non-(tmp-)mvar"); +return x_1; +} +} +lean_object* l_Lean_TypeClass_Context_uAssign(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; +x_4 = l_Lean_TypeClass_Context_uMetaIdx(x_1); +if (lean_obj_tag(x_4) == 0) +{ +lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; +lean_dec(x_2); +x_5 = l_Lean_TypeClass_Context_eInfer___closed__1; +x_6 = lean_unsigned_to_nat(126u); +x_7 = lean_unsigned_to_nat(14u); +x_8 = l_Lean_TypeClass_Context_uAssign___closed__1; +x_9 = l_panicWithPos___at_Lean_TypeClass_Context_eAssign___spec__1(x_5, x_6, x_7, x_8, x_3); +return x_9; +} +else +{ +uint8_t x_10; +x_10 = !lean_is_exclusive(x_4); +if (x_10 == 0) +{ +uint8_t x_11; +x_11 = !lean_is_exclusive(x_3); +if (x_11 == 0) +{ +lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; +x_12 = lean_ctor_get(x_4, 0); +x_13 = lean_ctor_get(x_3, 0); +lean_ctor_set(x_4, 0, x_2); +x_14 = l_PersistentArray_set___rarg(x_13, x_12, x_4); +lean_dec(x_12); +lean_ctor_set(x_3, 0, x_14); +x_15 = lean_box(0); +x_16 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_16, 0, x_15); +lean_ctor_set(x_16, 1, x_3); +return x_16; +} +else +{ +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; +x_17 = lean_ctor_get(x_4, 0); +x_18 = lean_ctor_get(x_3, 0); +x_19 = lean_ctor_get(x_3, 1); +x_20 = lean_ctor_get(x_3, 2); +lean_inc(x_20); +lean_inc(x_19); +lean_inc(x_18); +lean_dec(x_3); +lean_ctor_set(x_4, 0, x_2); +x_21 = l_PersistentArray_set___rarg(x_18, x_17, x_4); +lean_dec(x_17); +x_22 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_22, 0, x_21); +lean_ctor_set(x_22, 1, x_19); +lean_ctor_set(x_22, 2, x_20); +x_23 = lean_box(0); +x_24 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_24, 0, x_23); +lean_ctor_set(x_24, 1, x_22); +return x_24; +} +} +else +{ +lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; +x_25 = lean_ctor_get(x_4, 0); +lean_inc(x_25); +lean_dec(x_4); +x_26 = lean_ctor_get(x_3, 0); +lean_inc(x_26); +x_27 = lean_ctor_get(x_3, 1); +lean_inc(x_27); +x_28 = lean_ctor_get(x_3, 2); +lean_inc(x_28); +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_29 = x_3; +} else { + lean_dec_ref(x_3); + x_29 = lean_box(0); +} +x_30 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_30, 0, x_2); +x_31 = l_PersistentArray_set___rarg(x_26, x_25, x_30); +lean_dec(x_25); +if (lean_is_scalar(x_29)) { + x_32 = lean_alloc_ctor(0, 3, 0); +} else { + x_32 = x_29; +} +lean_ctor_set(x_32, 0, x_31); +lean_ctor_set(x_32, 1, x_27); +lean_ctor_set(x_32, 2, x_28); +x_33 = lean_box(0); +x_34 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_34, 0, x_33); +lean_ctor_set(x_34, 1, x_32); +return x_34; +} +} +} +} +lean_object* l_Lean_TypeClass_Context_uAssign___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; +x_4 = l_Lean_TypeClass_Context_uAssign(x_1, x_2, x_3); +lean_dec(x_1); +return x_4; +} +} +uint8_t l_Lean_TypeClass_Context_uFind___main(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; uint8_t x_4; +lean_inc(x_1); +lean_inc(x_2); +x_3 = lean_apply_1(x_1, x_2); +x_4 = lean_unbox(x_3); +lean_dec(x_3); +if (x_4 == 0) +{ +switch (lean_obj_tag(x_2)) { +case 1: +{ +lean_object* x_5; +x_5 = lean_ctor_get(x_2, 0); +lean_inc(x_5); +lean_dec(x_2); +x_2 = x_5; +goto _start; +} +case 2: +{ +lean_object* x_7; lean_object* x_8; uint8_t x_9; +x_7 = lean_ctor_get(x_2, 0); +lean_inc(x_7); +x_8 = lean_ctor_get(x_2, 1); +lean_inc(x_8); +lean_dec(x_2); +lean_inc(x_1); +x_9 = l_Lean_TypeClass_Context_uFind___main(x_1, x_7); +if (x_9 == 0) +{ +x_2 = x_8; +goto _start; +} +else +{ +uint8_t x_11; +lean_dec(x_8); +lean_dec(x_1); +x_11 = 1; +return x_11; +} +} +case 3: +{ +lean_object* x_12; lean_object* x_13; uint8_t x_14; +x_12 = lean_ctor_get(x_2, 0); +lean_inc(x_12); +x_13 = lean_ctor_get(x_2, 1); +lean_inc(x_13); +lean_dec(x_2); +lean_inc(x_1); +x_14 = l_Lean_TypeClass_Context_uFind___main(x_1, x_12); +if (x_14 == 0) +{ +x_2 = x_13; +goto _start; +} +else +{ +uint8_t x_16; +lean_dec(x_13); +lean_dec(x_1); +x_16 = 1; +return x_16; +} +} +default: +{ +uint8_t x_17; +lean_dec(x_2); +lean_dec(x_1); +x_17 = 0; +return x_17; +} +} +} +else +{ +uint8_t x_18; +lean_dec(x_2); +lean_dec(x_1); +x_18 = 1; +return x_18; +} +} +} +lean_object* l_Lean_TypeClass_Context_uFind___main___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +uint8_t x_3; lean_object* x_4; +x_3 = l_Lean_TypeClass_Context_uFind___main(x_1, x_2); +x_4 = lean_box(x_3); +return x_4; +} +} +uint8_t l_Lean_TypeClass_Context_uFind(lean_object* x_1, lean_object* x_2) { +_start: +{ +uint8_t x_3; +x_3 = l_Lean_TypeClass_Context_uFind___main(x_1, x_2); +return x_3; +} +} +lean_object* l_Lean_TypeClass_Context_uFind___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +uint8_t x_3; lean_object* x_4; +x_3 = l_Lean_TypeClass_Context_uFind(x_1, x_2); +x_4 = lean_box(x_3); +return x_4; +} +} +uint8_t l_Lean_TypeClass_Context_uOccursIn___lambda__1(lean_object* x_1, lean_object* x_2) { +_start: +{ +uint8_t x_3; +x_3 = lean_level_eqv(x_2, x_1); +return x_3; +} +} +uint8_t l_Lean_TypeClass_Context_uOccursIn(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; uint8_t x_4; +x_3 = lean_alloc_closure((void*)(l_Lean_TypeClass_Context_uOccursIn___lambda__1___boxed), 2, 1); +lean_closure_set(x_3, 0, x_1); +x_4 = l_Lean_TypeClass_Context_uFind___main(x_3, x_2); +return x_4; +} +} +lean_object* l_Lean_TypeClass_Context_uOccursIn___lambda__1___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +uint8_t x_3; lean_object* x_4; +x_3 = l_Lean_TypeClass_Context_uOccursIn___lambda__1(x_1, x_2); +lean_dec(x_2); +lean_dec(x_1); +x_4 = lean_box(x_3); +return x_4; +} +} +lean_object* l_Lean_TypeClass_Context_uOccursIn___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +uint8_t x_3; lean_object* x_4; +x_3 = l_Lean_TypeClass_Context_uOccursIn(x_1, x_2); +x_4 = lean_box(x_3); +return x_4; +} +} +lean_object* _init_l_Lean_TypeClass_Context_uHasTmpMVar___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_TypeClass_Context_uIsMeta___boxed), 1, 0); +return x_1; +} +} +uint8_t l_Lean_TypeClass_Context_uHasTmpMVar(lean_object* x_1) { +_start: +{ +lean_object* x_2; uint8_t x_3; +x_2 = l_Lean_TypeClass_Context_uHasTmpMVar___closed__1; +x_3 = l_Lean_TypeClass_Context_uFind___main(x_2, x_1); +return x_3; +} +} +lean_object* l_Lean_TypeClass_Context_uHasTmpMVar___boxed(lean_object* x_1) { +_start: +{ +uint8_t x_2; lean_object* x_3; +x_2 = l_Lean_TypeClass_Context_uHasTmpMVar(x_1); +x_3 = lean_box(x_2); +return x_3; +} +} +lean_object* _init_l_Lean_TypeClass_Context_uUnify___main___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("lUnify: "); +return x_1; +} +} +lean_object* _init_l_Lean_TypeClass_Context_uUnify___main___closed__2() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string(" !=?= "); +return x_1; +} +} +lean_object* _init_l_Lean_TypeClass_Context_uUnify___main___closed__3() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("Level.param clash"); +return x_1; +} +} +lean_object* _init_l_Lean_TypeClass_Context_uUnify___main___closed__4() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("Level.mvar clash"); +return x_1; +} +} +lean_object* _init_l_Lean_TypeClass_Context_uUnify___main___closed__5() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("occurs"); +return x_1; +} +} +lean_object* l_Lean_TypeClass_Context_uUnify___main(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; lean_object* x_5; +x_4 = lean_alloc_closure((void*)(l_Lean_TypeClass_Context_uShallowInstantiate), 2, 1); +lean_closure_set(x_4, 0, x_1); +x_5 = l_EState_fromState___rarg(x_4, x_3); +if (lean_obj_tag(x_5) == 0) +{ +uint8_t x_6; +x_6 = !lean_is_exclusive(x_5); +if (x_6 == 0) +{ +lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; +x_7 = lean_ctor_get(x_5, 0); +x_8 = lean_box(0); +lean_ctor_set(x_5, 0, x_8); +x_9 = lean_alloc_closure((void*)(l_Lean_TypeClass_Context_uShallowInstantiate), 2, 1); +lean_closure_set(x_9, 0, x_2); +x_10 = l_EState_fromState___rarg(x_9, x_5); +if (lean_obj_tag(x_10) == 0) +{ +uint8_t x_11; +x_11 = !lean_is_exclusive(x_10); +if (x_11 == 0) +{ +lean_object* x_12; lean_object* x_13; lean_object* x_14; uint8_t x_122; +x_12 = lean_ctor_get(x_10, 0); +x_13 = lean_ctor_get(x_10, 1); +lean_inc(x_13); +lean_ctor_set(x_10, 0, x_8); +x_122 = l_Lean_TypeClass_Context_uIsMeta(x_12); +if (x_122 == 0) +{ +x_14 = x_8; +goto block_121; +} +else +{ +uint8_t x_123; +x_123 = l_Lean_TypeClass_Context_uIsMeta(x_7); +if (x_123 == 0) +{ +lean_dec(x_13); +x_1 = x_12; +x_2 = x_7; +x_3 = x_10; +goto _start; +} +else +{ +x_14 = x_8; +goto block_121; +} +} +block_121: +{ +lean_dec(x_14); +switch (lean_obj_tag(x_7)) { +case 0: +{ +lean_dec(x_10); +if (lean_obj_tag(x_12) == 0) +{ +lean_object* x_15; +x_15 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_15, 0, x_8); +lean_ctor_set(x_15, 1, x_13); +return x_15; +} +else +{ +lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; +x_16 = l_Lean_LevelToFormat_Level_format(x_7); +x_17 = l_Lean_Options_empty; +x_18 = l_Lean_Format_pretty(x_16, x_17); +x_19 = l_Lean_TypeClass_Context_uUnify___main___closed__1; +x_20 = lean_string_append(x_19, x_18); +lean_dec(x_18); +x_21 = l_Lean_TypeClass_Context_uUnify___main___closed__2; +x_22 = lean_string_append(x_20, x_21); +x_23 = l_Lean_LevelToFormat_Level_format(x_12); +x_24 = l_Lean_Format_pretty(x_23, x_17); +x_25 = lean_string_append(x_22, x_24); +lean_dec(x_24); +x_26 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_26, 0, x_25); +lean_ctor_set(x_26, 1, x_13); +return x_26; +} +} +case 1: +{ +if (lean_obj_tag(x_12) == 1) +{ +lean_object* x_27; lean_object* x_28; +lean_dec(x_13); +x_27 = lean_ctor_get(x_7, 0); +lean_inc(x_27); +lean_dec(x_7); +x_28 = lean_ctor_get(x_12, 0); +lean_inc(x_28); +lean_dec(x_12); +x_1 = x_27; +x_2 = x_28; +x_3 = x_10; +goto _start; +} +else +{ +lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; +lean_dec(x_10); +x_30 = l_Lean_LevelToFormat_Level_format(x_7); +x_31 = l_Lean_Options_empty; +x_32 = l_Lean_Format_pretty(x_30, x_31); +x_33 = l_Lean_TypeClass_Context_uUnify___main___closed__1; +x_34 = lean_string_append(x_33, x_32); +lean_dec(x_32); +x_35 = l_Lean_TypeClass_Context_uUnify___main___closed__2; +x_36 = lean_string_append(x_34, x_35); +x_37 = l_Lean_LevelToFormat_Level_format(x_12); +x_38 = l_Lean_Format_pretty(x_37, x_31); +x_39 = lean_string_append(x_36, x_38); +lean_dec(x_38); +x_40 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_40, 0, x_39); +lean_ctor_set(x_40, 1, x_13); +return x_40; +} +} +case 2: +{ +if (lean_obj_tag(x_12) == 2) +{ +lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; +lean_dec(x_13); +x_41 = lean_ctor_get(x_7, 0); +lean_inc(x_41); +x_42 = lean_ctor_get(x_7, 1); +lean_inc(x_42); +lean_dec(x_7); +x_43 = lean_ctor_get(x_12, 0); +lean_inc(x_43); +x_44 = lean_ctor_get(x_12, 1); +lean_inc(x_44); +lean_dec(x_12); +x_45 = l_Lean_TypeClass_Context_uUnify___main(x_41, x_43, x_10); +if (lean_obj_tag(x_45) == 0) +{ +uint8_t x_46; +x_46 = !lean_is_exclusive(x_45); +if (x_46 == 0) +{ +lean_object* x_47; +x_47 = lean_ctor_get(x_45, 0); +lean_dec(x_47); +lean_ctor_set(x_45, 0, x_8); +x_1 = x_42; +x_2 = x_44; +x_3 = x_45; +goto _start; +} +else +{ +lean_object* x_49; lean_object* x_50; +x_49 = lean_ctor_get(x_45, 1); +lean_inc(x_49); +lean_dec(x_45); +x_50 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_50, 0, x_8); +lean_ctor_set(x_50, 1, x_49); +x_1 = x_42; +x_2 = x_44; +x_3 = x_50; +goto _start; +} +} +else +{ +uint8_t x_52; +lean_dec(x_44); +lean_dec(x_42); +x_52 = !lean_is_exclusive(x_45); +if (x_52 == 0) +{ +return x_45; +} +else +{ +lean_object* x_53; lean_object* x_54; lean_object* x_55; +x_53 = lean_ctor_get(x_45, 0); +x_54 = lean_ctor_get(x_45, 1); +lean_inc(x_54); +lean_inc(x_53); +lean_dec(x_45); +x_55 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_55, 0, x_53); +lean_ctor_set(x_55, 1, x_54); +return x_55; +} +} +} +else +{ +lean_object* x_56; lean_object* x_57; lean_object* x_58; lean_object* x_59; lean_object* x_60; lean_object* x_61; lean_object* x_62; lean_object* x_63; lean_object* x_64; lean_object* x_65; lean_object* x_66; +lean_dec(x_10); +x_56 = l_Lean_LevelToFormat_Level_format(x_7); +x_57 = l_Lean_Options_empty; +x_58 = l_Lean_Format_pretty(x_56, x_57); +x_59 = l_Lean_TypeClass_Context_uUnify___main___closed__1; +x_60 = lean_string_append(x_59, x_58); +lean_dec(x_58); +x_61 = l_Lean_TypeClass_Context_uUnify___main___closed__2; +x_62 = lean_string_append(x_60, x_61); +x_63 = l_Lean_LevelToFormat_Level_format(x_12); +x_64 = l_Lean_Format_pretty(x_63, x_57); +x_65 = lean_string_append(x_62, x_64); +lean_dec(x_64); +x_66 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_66, 0, x_65); +lean_ctor_set(x_66, 1, x_13); +return x_66; +} +} +case 3: +{ +if (lean_obj_tag(x_12) == 3) +{ +lean_object* x_67; lean_object* x_68; lean_object* x_69; lean_object* x_70; lean_object* x_71; +lean_dec(x_13); +x_67 = lean_ctor_get(x_7, 0); +lean_inc(x_67); +x_68 = lean_ctor_get(x_7, 1); +lean_inc(x_68); +lean_dec(x_7); +x_69 = lean_ctor_get(x_12, 0); +lean_inc(x_69); +x_70 = lean_ctor_get(x_12, 1); +lean_inc(x_70); +lean_dec(x_12); +x_71 = l_Lean_TypeClass_Context_uUnify___main(x_67, x_69, x_10); +if (lean_obj_tag(x_71) == 0) +{ +uint8_t x_72; +x_72 = !lean_is_exclusive(x_71); +if (x_72 == 0) +{ +lean_object* x_73; +x_73 = lean_ctor_get(x_71, 0); +lean_dec(x_73); +lean_ctor_set(x_71, 0, x_8); +x_1 = x_68; +x_2 = x_70; +x_3 = x_71; +goto _start; +} +else +{ +lean_object* x_75; lean_object* x_76; +x_75 = lean_ctor_get(x_71, 1); +lean_inc(x_75); +lean_dec(x_71); +x_76 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_76, 0, x_8); +lean_ctor_set(x_76, 1, x_75); +x_1 = x_68; +x_2 = x_70; +x_3 = x_76; +goto _start; +} +} +else +{ +uint8_t x_78; +lean_dec(x_70); +lean_dec(x_68); +x_78 = !lean_is_exclusive(x_71); +if (x_78 == 0) +{ +return x_71; +} +else +{ +lean_object* x_79; lean_object* x_80; lean_object* x_81; +x_79 = lean_ctor_get(x_71, 0); +x_80 = lean_ctor_get(x_71, 1); +lean_inc(x_80); +lean_inc(x_79); +lean_dec(x_71); +x_81 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_81, 0, x_79); +lean_ctor_set(x_81, 1, x_80); +return x_81; +} +} +} +else +{ +lean_object* x_82; lean_object* x_83; lean_object* x_84; lean_object* x_85; lean_object* x_86; lean_object* x_87; lean_object* x_88; lean_object* x_89; lean_object* x_90; lean_object* x_91; lean_object* x_92; +lean_dec(x_10); +x_82 = l_Lean_LevelToFormat_Level_format(x_7); +x_83 = l_Lean_Options_empty; +x_84 = l_Lean_Format_pretty(x_82, x_83); +x_85 = l_Lean_TypeClass_Context_uUnify___main___closed__1; +x_86 = lean_string_append(x_85, x_84); +lean_dec(x_84); +x_87 = l_Lean_TypeClass_Context_uUnify___main___closed__2; +x_88 = lean_string_append(x_86, x_87); +x_89 = l_Lean_LevelToFormat_Level_format(x_12); +x_90 = l_Lean_Format_pretty(x_89, x_83); +x_91 = lean_string_append(x_88, x_90); +lean_dec(x_90); +x_92 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_92, 0, x_91); +lean_ctor_set(x_92, 1, x_13); +return x_92; +} +} +case 4: +{ +lean_dec(x_10); +if (lean_obj_tag(x_12) == 4) +{ +lean_object* x_93; lean_object* x_94; uint8_t x_95; +x_93 = lean_ctor_get(x_7, 0); +lean_inc(x_93); +lean_dec(x_7); +x_94 = lean_ctor_get(x_12, 0); +lean_inc(x_94); +lean_dec(x_12); +x_95 = lean_name_dec_eq(x_93, x_94); +lean_dec(x_94); +lean_dec(x_93); +if (x_95 == 0) +{ +lean_object* x_96; lean_object* x_97; +x_96 = l_Lean_TypeClass_Context_uUnify___main___closed__3; +x_97 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_97, 0, x_96); +lean_ctor_set(x_97, 1, x_13); +return x_97; +} +else +{ +lean_object* x_98; +x_98 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_98, 0, x_8); +lean_ctor_set(x_98, 1, x_13); +return x_98; +} +} +else +{ +lean_object* x_99; lean_object* x_100; lean_object* x_101; lean_object* x_102; lean_object* x_103; lean_object* x_104; lean_object* x_105; lean_object* x_106; lean_object* x_107; lean_object* x_108; lean_object* x_109; +x_99 = l_Lean_LevelToFormat_Level_format(x_7); +x_100 = l_Lean_Options_empty; +x_101 = l_Lean_Format_pretty(x_99, x_100); +x_102 = l_Lean_TypeClass_Context_uUnify___main___closed__1; +x_103 = lean_string_append(x_102, x_101); +lean_dec(x_101); +x_104 = l_Lean_TypeClass_Context_uUnify___main___closed__2; +x_105 = lean_string_append(x_103, x_104); +x_106 = l_Lean_LevelToFormat_Level_format(x_12); +x_107 = l_Lean_Format_pretty(x_106, x_100); +x_108 = lean_string_append(x_105, x_107); +lean_dec(x_107); +x_109 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_109, 0, x_108); +lean_ctor_set(x_109, 1, x_13); +return x_109; +} +} +default: +{ +lean_object* x_110; +x_110 = l_Lean_TypeClass_Context_uMetaIdx(x_7); +if (lean_obj_tag(x_110) == 0) +{ +uint8_t x_111; +lean_dec(x_10); +x_111 = lean_level_eqv(x_7, x_12); +lean_dec(x_12); +lean_dec(x_7); +if (x_111 == 0) +{ +lean_object* x_112; lean_object* x_113; +x_112 = l_Lean_TypeClass_Context_uUnify___main___closed__4; +x_113 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_113, 0, x_112); +lean_ctor_set(x_113, 1, x_13); +return x_113; +} +else +{ +lean_object* x_114; +x_114 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_114, 0, x_8); +lean_ctor_set(x_114, 1, x_13); +return x_114; +} +} +else +{ +lean_object* x_115; uint8_t x_116; +x_115 = lean_ctor_get(x_110, 0); +lean_inc(x_115); +lean_dec(x_110); +lean_inc(x_12); +x_116 = l_Lean_TypeClass_Context_uOccursIn(x_7, x_12); +if (x_116 == 0) +{ +lean_object* x_117; lean_object* x_118; +lean_dec(x_13); +x_117 = lean_alloc_closure((void*)(l_Lean_TypeClass_Context_uAssignIdx___boxed), 3, 2); +lean_closure_set(x_117, 0, x_115); +lean_closure_set(x_117, 1, x_12); +x_118 = l_EState_fromState___rarg(x_117, x_10); +return x_118; +} +else +{ +lean_object* x_119; lean_object* x_120; +lean_dec(x_115); +lean_dec(x_10); +lean_dec(x_12); +x_119 = l_Lean_TypeClass_Context_uUnify___main___closed__5; +x_120 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_120, 0, x_119); +lean_ctor_set(x_120, 1, x_13); +return x_120; +} +} +} +} +} +} +else +{ +lean_object* x_125; lean_object* x_126; lean_object* x_127; lean_object* x_128; uint8_t x_232; +x_125 = lean_ctor_get(x_10, 0); +x_126 = lean_ctor_get(x_10, 1); +lean_inc(x_126); +lean_inc(x_125); +lean_dec(x_10); +lean_inc(x_126); +x_127 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_127, 0, x_8); +lean_ctor_set(x_127, 1, x_126); +x_232 = l_Lean_TypeClass_Context_uIsMeta(x_125); +if (x_232 == 0) +{ +x_128 = x_8; +goto block_231; +} +else +{ +uint8_t x_233; +x_233 = l_Lean_TypeClass_Context_uIsMeta(x_7); +if (x_233 == 0) +{ +lean_dec(x_126); +x_1 = x_125; +x_2 = x_7; +x_3 = x_127; +goto _start; +} +else +{ +x_128 = x_8; +goto block_231; +} +} +block_231: +{ +lean_dec(x_128); +switch (lean_obj_tag(x_7)) { +case 0: +{ +lean_dec(x_127); +if (lean_obj_tag(x_125) == 0) +{ +lean_object* x_129; +x_129 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_129, 0, x_8); +lean_ctor_set(x_129, 1, x_126); +return x_129; +} +else +{ +lean_object* x_130; lean_object* x_131; lean_object* x_132; lean_object* x_133; lean_object* x_134; lean_object* x_135; lean_object* x_136; lean_object* x_137; lean_object* x_138; lean_object* x_139; lean_object* x_140; +x_130 = l_Lean_LevelToFormat_Level_format(x_7); +x_131 = l_Lean_Options_empty; +x_132 = l_Lean_Format_pretty(x_130, x_131); +x_133 = l_Lean_TypeClass_Context_uUnify___main___closed__1; +x_134 = lean_string_append(x_133, x_132); +lean_dec(x_132); +x_135 = l_Lean_TypeClass_Context_uUnify___main___closed__2; +x_136 = lean_string_append(x_134, x_135); +x_137 = l_Lean_LevelToFormat_Level_format(x_125); +x_138 = l_Lean_Format_pretty(x_137, x_131); +x_139 = lean_string_append(x_136, x_138); +lean_dec(x_138); +x_140 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_140, 0, x_139); +lean_ctor_set(x_140, 1, x_126); +return x_140; +} +} +case 1: +{ +if (lean_obj_tag(x_125) == 1) +{ +lean_object* x_141; lean_object* x_142; +lean_dec(x_126); +x_141 = lean_ctor_get(x_7, 0); +lean_inc(x_141); +lean_dec(x_7); +x_142 = lean_ctor_get(x_125, 0); +lean_inc(x_142); +lean_dec(x_125); +x_1 = x_141; +x_2 = x_142; +x_3 = x_127; +goto _start; +} +else +{ +lean_object* x_144; lean_object* x_145; lean_object* x_146; lean_object* x_147; lean_object* x_148; lean_object* x_149; lean_object* x_150; lean_object* x_151; lean_object* x_152; lean_object* x_153; lean_object* x_154; +lean_dec(x_127); +x_144 = l_Lean_LevelToFormat_Level_format(x_7); +x_145 = l_Lean_Options_empty; +x_146 = l_Lean_Format_pretty(x_144, x_145); +x_147 = l_Lean_TypeClass_Context_uUnify___main___closed__1; +x_148 = lean_string_append(x_147, x_146); +lean_dec(x_146); +x_149 = l_Lean_TypeClass_Context_uUnify___main___closed__2; +x_150 = lean_string_append(x_148, x_149); +x_151 = l_Lean_LevelToFormat_Level_format(x_125); +x_152 = l_Lean_Format_pretty(x_151, x_145); +x_153 = lean_string_append(x_150, x_152); +lean_dec(x_152); +x_154 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_154, 0, x_153); +lean_ctor_set(x_154, 1, x_126); +return x_154; +} +} +case 2: +{ +if (lean_obj_tag(x_125) == 2) +{ +lean_object* x_155; lean_object* x_156; lean_object* x_157; lean_object* x_158; lean_object* x_159; +lean_dec(x_126); +x_155 = lean_ctor_get(x_7, 0); +lean_inc(x_155); +x_156 = lean_ctor_get(x_7, 1); +lean_inc(x_156); +lean_dec(x_7); +x_157 = lean_ctor_get(x_125, 0); +lean_inc(x_157); +x_158 = lean_ctor_get(x_125, 1); +lean_inc(x_158); +lean_dec(x_125); +x_159 = l_Lean_TypeClass_Context_uUnify___main(x_155, x_157, x_127); +if (lean_obj_tag(x_159) == 0) +{ +lean_object* x_160; lean_object* x_161; lean_object* x_162; +x_160 = lean_ctor_get(x_159, 1); +lean_inc(x_160); +if (lean_is_exclusive(x_159)) { + lean_ctor_release(x_159, 0); + lean_ctor_release(x_159, 1); + x_161 = x_159; +} else { + lean_dec_ref(x_159); + x_161 = lean_box(0); +} +if (lean_is_scalar(x_161)) { + x_162 = lean_alloc_ctor(0, 2, 0); +} else { + x_162 = x_161; +} +lean_ctor_set(x_162, 0, x_8); +lean_ctor_set(x_162, 1, x_160); +x_1 = x_156; +x_2 = x_158; +x_3 = x_162; +goto _start; +} +else +{ +lean_object* x_164; lean_object* x_165; lean_object* x_166; lean_object* x_167; +lean_dec(x_158); +lean_dec(x_156); +x_164 = lean_ctor_get(x_159, 0); +lean_inc(x_164); +x_165 = lean_ctor_get(x_159, 1); +lean_inc(x_165); +if (lean_is_exclusive(x_159)) { + lean_ctor_release(x_159, 0); + lean_ctor_release(x_159, 1); + x_166 = x_159; +} else { + lean_dec_ref(x_159); + x_166 = lean_box(0); +} +if (lean_is_scalar(x_166)) { + x_167 = lean_alloc_ctor(1, 2, 0); +} else { + x_167 = x_166; +} +lean_ctor_set(x_167, 0, x_164); +lean_ctor_set(x_167, 1, x_165); +return x_167; +} +} +else +{ +lean_object* x_168; lean_object* x_169; lean_object* x_170; lean_object* x_171; lean_object* x_172; lean_object* x_173; lean_object* x_174; lean_object* x_175; lean_object* x_176; lean_object* x_177; lean_object* x_178; +lean_dec(x_127); +x_168 = l_Lean_LevelToFormat_Level_format(x_7); +x_169 = l_Lean_Options_empty; +x_170 = l_Lean_Format_pretty(x_168, x_169); +x_171 = l_Lean_TypeClass_Context_uUnify___main___closed__1; +x_172 = lean_string_append(x_171, x_170); +lean_dec(x_170); +x_173 = l_Lean_TypeClass_Context_uUnify___main___closed__2; +x_174 = lean_string_append(x_172, x_173); +x_175 = l_Lean_LevelToFormat_Level_format(x_125); +x_176 = l_Lean_Format_pretty(x_175, x_169); +x_177 = lean_string_append(x_174, x_176); +lean_dec(x_176); +x_178 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_178, 0, x_177); +lean_ctor_set(x_178, 1, x_126); +return x_178; +} +} +case 3: +{ +if (lean_obj_tag(x_125) == 3) +{ +lean_object* x_179; lean_object* x_180; lean_object* x_181; lean_object* x_182; lean_object* x_183; +lean_dec(x_126); +x_179 = lean_ctor_get(x_7, 0); +lean_inc(x_179); +x_180 = lean_ctor_get(x_7, 1); +lean_inc(x_180); +lean_dec(x_7); +x_181 = lean_ctor_get(x_125, 0); +lean_inc(x_181); +x_182 = lean_ctor_get(x_125, 1); +lean_inc(x_182); +lean_dec(x_125); +x_183 = l_Lean_TypeClass_Context_uUnify___main(x_179, x_181, x_127); +if (lean_obj_tag(x_183) == 0) +{ +lean_object* x_184; lean_object* x_185; lean_object* x_186; +x_184 = lean_ctor_get(x_183, 1); +lean_inc(x_184); +if (lean_is_exclusive(x_183)) { + lean_ctor_release(x_183, 0); + lean_ctor_release(x_183, 1); + x_185 = x_183; +} else { + lean_dec_ref(x_183); + x_185 = lean_box(0); +} +if (lean_is_scalar(x_185)) { + x_186 = lean_alloc_ctor(0, 2, 0); +} else { + x_186 = x_185; +} +lean_ctor_set(x_186, 0, x_8); +lean_ctor_set(x_186, 1, x_184); +x_1 = x_180; +x_2 = x_182; +x_3 = x_186; +goto _start; +} +else +{ +lean_object* x_188; lean_object* x_189; lean_object* x_190; lean_object* x_191; +lean_dec(x_182); +lean_dec(x_180); +x_188 = lean_ctor_get(x_183, 0); +lean_inc(x_188); +x_189 = lean_ctor_get(x_183, 1); +lean_inc(x_189); +if (lean_is_exclusive(x_183)) { + lean_ctor_release(x_183, 0); + lean_ctor_release(x_183, 1); + x_190 = x_183; +} else { + lean_dec_ref(x_183); + x_190 = lean_box(0); +} +if (lean_is_scalar(x_190)) { + x_191 = lean_alloc_ctor(1, 2, 0); +} else { + x_191 = x_190; +} +lean_ctor_set(x_191, 0, x_188); +lean_ctor_set(x_191, 1, x_189); +return x_191; +} +} +else +{ +lean_object* x_192; lean_object* x_193; lean_object* x_194; lean_object* x_195; lean_object* x_196; lean_object* x_197; lean_object* x_198; lean_object* x_199; lean_object* x_200; lean_object* x_201; lean_object* x_202; +lean_dec(x_127); +x_192 = l_Lean_LevelToFormat_Level_format(x_7); +x_193 = l_Lean_Options_empty; +x_194 = l_Lean_Format_pretty(x_192, x_193); +x_195 = l_Lean_TypeClass_Context_uUnify___main___closed__1; +x_196 = lean_string_append(x_195, x_194); +lean_dec(x_194); +x_197 = l_Lean_TypeClass_Context_uUnify___main___closed__2; +x_198 = lean_string_append(x_196, x_197); +x_199 = l_Lean_LevelToFormat_Level_format(x_125); +x_200 = l_Lean_Format_pretty(x_199, x_193); +x_201 = lean_string_append(x_198, x_200); +lean_dec(x_200); +x_202 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_202, 0, x_201); +lean_ctor_set(x_202, 1, x_126); +return x_202; +} +} +case 4: +{ +lean_dec(x_127); +if (lean_obj_tag(x_125) == 4) +{ +lean_object* x_203; lean_object* x_204; uint8_t x_205; +x_203 = lean_ctor_get(x_7, 0); +lean_inc(x_203); +lean_dec(x_7); +x_204 = lean_ctor_get(x_125, 0); +lean_inc(x_204); +lean_dec(x_125); +x_205 = lean_name_dec_eq(x_203, x_204); +lean_dec(x_204); +lean_dec(x_203); +if (x_205 == 0) +{ +lean_object* x_206; lean_object* x_207; +x_206 = l_Lean_TypeClass_Context_uUnify___main___closed__3; +x_207 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_207, 0, x_206); +lean_ctor_set(x_207, 1, x_126); +return x_207; +} +else +{ +lean_object* x_208; +x_208 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_208, 0, x_8); +lean_ctor_set(x_208, 1, x_126); +return x_208; +} +} +else +{ +lean_object* x_209; lean_object* x_210; lean_object* x_211; lean_object* x_212; lean_object* x_213; lean_object* x_214; lean_object* x_215; lean_object* x_216; lean_object* x_217; lean_object* x_218; lean_object* x_219; +x_209 = l_Lean_LevelToFormat_Level_format(x_7); +x_210 = l_Lean_Options_empty; +x_211 = l_Lean_Format_pretty(x_209, x_210); +x_212 = l_Lean_TypeClass_Context_uUnify___main___closed__1; +x_213 = lean_string_append(x_212, x_211); +lean_dec(x_211); +x_214 = l_Lean_TypeClass_Context_uUnify___main___closed__2; +x_215 = lean_string_append(x_213, x_214); +x_216 = l_Lean_LevelToFormat_Level_format(x_125); +x_217 = l_Lean_Format_pretty(x_216, x_210); +x_218 = lean_string_append(x_215, x_217); +lean_dec(x_217); +x_219 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_219, 0, x_218); +lean_ctor_set(x_219, 1, x_126); +return x_219; +} +} +default: +{ +lean_object* x_220; +x_220 = l_Lean_TypeClass_Context_uMetaIdx(x_7); +if (lean_obj_tag(x_220) == 0) +{ +uint8_t x_221; +lean_dec(x_127); +x_221 = lean_level_eqv(x_7, x_125); +lean_dec(x_125); +lean_dec(x_7); +if (x_221 == 0) +{ +lean_object* x_222; lean_object* x_223; +x_222 = l_Lean_TypeClass_Context_uUnify___main___closed__4; +x_223 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_223, 0, x_222); +lean_ctor_set(x_223, 1, x_126); +return x_223; +} +else +{ +lean_object* x_224; +x_224 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_224, 0, x_8); +lean_ctor_set(x_224, 1, x_126); +return x_224; +} +} +else +{ +lean_object* x_225; uint8_t x_226; +x_225 = lean_ctor_get(x_220, 0); +lean_inc(x_225); +lean_dec(x_220); +lean_inc(x_125); +x_226 = l_Lean_TypeClass_Context_uOccursIn(x_7, x_125); +if (x_226 == 0) +{ +lean_object* x_227; lean_object* x_228; +lean_dec(x_126); +x_227 = lean_alloc_closure((void*)(l_Lean_TypeClass_Context_uAssignIdx___boxed), 3, 2); +lean_closure_set(x_227, 0, x_225); +lean_closure_set(x_227, 1, x_125); +x_228 = l_EState_fromState___rarg(x_227, x_127); +return x_228; +} +else +{ +lean_object* x_229; lean_object* x_230; +lean_dec(x_225); +lean_dec(x_127); +lean_dec(x_125); +x_229 = l_Lean_TypeClass_Context_uUnify___main___closed__5; +x_230 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_230, 0, x_229); +lean_ctor_set(x_230, 1, x_126); +return x_230; +} +} +} +} +} +} +} +else +{ +uint8_t x_235; +lean_dec(x_7); +x_235 = !lean_is_exclusive(x_10); +if (x_235 == 0) +{ +return x_10; +} +else +{ +lean_object* x_236; lean_object* x_237; lean_object* x_238; +x_236 = lean_ctor_get(x_10, 0); +x_237 = lean_ctor_get(x_10, 1); +lean_inc(x_237); +lean_inc(x_236); +lean_dec(x_10); +x_238 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_238, 0, x_236); +lean_ctor_set(x_238, 1, x_237); +return x_238; +} +} +} +else +{ +lean_object* x_239; lean_object* x_240; lean_object* x_241; lean_object* x_242; lean_object* x_243; lean_object* x_244; +x_239 = lean_ctor_get(x_5, 0); +x_240 = lean_ctor_get(x_5, 1); +lean_inc(x_240); +lean_inc(x_239); +lean_dec(x_5); +x_241 = lean_box(0); +x_242 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_242, 0, x_241); +lean_ctor_set(x_242, 1, x_240); +x_243 = lean_alloc_closure((void*)(l_Lean_TypeClass_Context_uShallowInstantiate), 2, 1); +lean_closure_set(x_243, 0, x_2); +x_244 = l_EState_fromState___rarg(x_243, x_242); +if (lean_obj_tag(x_244) == 0) +{ +lean_object* x_245; lean_object* x_246; lean_object* x_247; lean_object* x_248; lean_object* x_249; uint8_t x_353; +x_245 = lean_ctor_get(x_244, 0); +lean_inc(x_245); +x_246 = lean_ctor_get(x_244, 1); +lean_inc(x_246); +if (lean_is_exclusive(x_244)) { + lean_ctor_release(x_244, 0); + lean_ctor_release(x_244, 1); + x_247 = x_244; +} else { + lean_dec_ref(x_244); + x_247 = lean_box(0); +} +lean_inc(x_246); +if (lean_is_scalar(x_247)) { + x_248 = lean_alloc_ctor(0, 2, 0); +} else { + x_248 = x_247; +} +lean_ctor_set(x_248, 0, x_241); +lean_ctor_set(x_248, 1, x_246); +x_353 = l_Lean_TypeClass_Context_uIsMeta(x_245); +if (x_353 == 0) +{ +x_249 = x_241; +goto block_352; +} +else +{ +uint8_t x_354; +x_354 = l_Lean_TypeClass_Context_uIsMeta(x_239); +if (x_354 == 0) +{ +lean_dec(x_246); +x_1 = x_245; +x_2 = x_239; +x_3 = x_248; +goto _start; +} +else +{ +x_249 = x_241; +goto block_352; +} +} +block_352: +{ +lean_dec(x_249); +switch (lean_obj_tag(x_239)) { +case 0: +{ +lean_dec(x_248); +if (lean_obj_tag(x_245) == 0) +{ +lean_object* x_250; +x_250 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_250, 0, x_241); +lean_ctor_set(x_250, 1, x_246); +return x_250; +} +else +{ +lean_object* x_251; lean_object* x_252; lean_object* x_253; lean_object* x_254; lean_object* x_255; lean_object* x_256; lean_object* x_257; lean_object* x_258; lean_object* x_259; lean_object* x_260; lean_object* x_261; +x_251 = l_Lean_LevelToFormat_Level_format(x_239); +x_252 = l_Lean_Options_empty; +x_253 = l_Lean_Format_pretty(x_251, x_252); +x_254 = l_Lean_TypeClass_Context_uUnify___main___closed__1; +x_255 = lean_string_append(x_254, x_253); +lean_dec(x_253); +x_256 = l_Lean_TypeClass_Context_uUnify___main___closed__2; +x_257 = lean_string_append(x_255, x_256); +x_258 = l_Lean_LevelToFormat_Level_format(x_245); +x_259 = l_Lean_Format_pretty(x_258, x_252); +x_260 = lean_string_append(x_257, x_259); +lean_dec(x_259); +x_261 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_261, 0, x_260); +lean_ctor_set(x_261, 1, x_246); +return x_261; +} +} +case 1: +{ +if (lean_obj_tag(x_245) == 1) +{ +lean_object* x_262; lean_object* x_263; +lean_dec(x_246); +x_262 = lean_ctor_get(x_239, 0); +lean_inc(x_262); +lean_dec(x_239); +x_263 = lean_ctor_get(x_245, 0); +lean_inc(x_263); +lean_dec(x_245); +x_1 = x_262; +x_2 = x_263; +x_3 = x_248; +goto _start; +} +else +{ +lean_object* x_265; lean_object* x_266; lean_object* x_267; lean_object* x_268; lean_object* x_269; lean_object* x_270; lean_object* x_271; lean_object* x_272; lean_object* x_273; lean_object* x_274; lean_object* x_275; +lean_dec(x_248); +x_265 = l_Lean_LevelToFormat_Level_format(x_239); +x_266 = l_Lean_Options_empty; +x_267 = l_Lean_Format_pretty(x_265, x_266); +x_268 = l_Lean_TypeClass_Context_uUnify___main___closed__1; +x_269 = lean_string_append(x_268, x_267); +lean_dec(x_267); +x_270 = l_Lean_TypeClass_Context_uUnify___main___closed__2; +x_271 = lean_string_append(x_269, x_270); +x_272 = l_Lean_LevelToFormat_Level_format(x_245); +x_273 = l_Lean_Format_pretty(x_272, x_266); +x_274 = lean_string_append(x_271, x_273); +lean_dec(x_273); +x_275 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_275, 0, x_274); +lean_ctor_set(x_275, 1, x_246); +return x_275; +} +} +case 2: +{ +if (lean_obj_tag(x_245) == 2) +{ +lean_object* x_276; lean_object* x_277; lean_object* x_278; lean_object* x_279; lean_object* x_280; +lean_dec(x_246); +x_276 = lean_ctor_get(x_239, 0); +lean_inc(x_276); +x_277 = lean_ctor_get(x_239, 1); +lean_inc(x_277); +lean_dec(x_239); +x_278 = lean_ctor_get(x_245, 0); +lean_inc(x_278); +x_279 = lean_ctor_get(x_245, 1); +lean_inc(x_279); +lean_dec(x_245); +x_280 = l_Lean_TypeClass_Context_uUnify___main(x_276, x_278, x_248); +if (lean_obj_tag(x_280) == 0) +{ +lean_object* x_281; lean_object* x_282; lean_object* x_283; +x_281 = lean_ctor_get(x_280, 1); +lean_inc(x_281); +if (lean_is_exclusive(x_280)) { + lean_ctor_release(x_280, 0); + lean_ctor_release(x_280, 1); + x_282 = x_280; +} else { + lean_dec_ref(x_280); + x_282 = lean_box(0); +} +if (lean_is_scalar(x_282)) { + x_283 = lean_alloc_ctor(0, 2, 0); +} else { + x_283 = x_282; +} +lean_ctor_set(x_283, 0, x_241); +lean_ctor_set(x_283, 1, x_281); +x_1 = x_277; +x_2 = x_279; +x_3 = x_283; +goto _start; +} +else +{ +lean_object* x_285; lean_object* x_286; lean_object* x_287; lean_object* x_288; +lean_dec(x_279); +lean_dec(x_277); +x_285 = lean_ctor_get(x_280, 0); +lean_inc(x_285); +x_286 = lean_ctor_get(x_280, 1); +lean_inc(x_286); +if (lean_is_exclusive(x_280)) { + lean_ctor_release(x_280, 0); + lean_ctor_release(x_280, 1); + x_287 = x_280; +} else { + lean_dec_ref(x_280); + x_287 = lean_box(0); +} +if (lean_is_scalar(x_287)) { + x_288 = lean_alloc_ctor(1, 2, 0); +} else { + x_288 = x_287; +} +lean_ctor_set(x_288, 0, x_285); +lean_ctor_set(x_288, 1, x_286); +return x_288; +} +} +else +{ +lean_object* x_289; lean_object* x_290; lean_object* x_291; lean_object* x_292; lean_object* x_293; lean_object* x_294; lean_object* x_295; lean_object* x_296; lean_object* x_297; lean_object* x_298; lean_object* x_299; +lean_dec(x_248); +x_289 = l_Lean_LevelToFormat_Level_format(x_239); +x_290 = l_Lean_Options_empty; +x_291 = l_Lean_Format_pretty(x_289, x_290); +x_292 = l_Lean_TypeClass_Context_uUnify___main___closed__1; +x_293 = lean_string_append(x_292, x_291); +lean_dec(x_291); +x_294 = l_Lean_TypeClass_Context_uUnify___main___closed__2; +x_295 = lean_string_append(x_293, x_294); +x_296 = l_Lean_LevelToFormat_Level_format(x_245); +x_297 = l_Lean_Format_pretty(x_296, x_290); +x_298 = lean_string_append(x_295, x_297); +lean_dec(x_297); +x_299 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_299, 0, x_298); +lean_ctor_set(x_299, 1, x_246); +return x_299; +} +} +case 3: +{ +if (lean_obj_tag(x_245) == 3) +{ +lean_object* x_300; lean_object* x_301; lean_object* x_302; lean_object* x_303; lean_object* x_304; +lean_dec(x_246); +x_300 = lean_ctor_get(x_239, 0); +lean_inc(x_300); +x_301 = lean_ctor_get(x_239, 1); +lean_inc(x_301); +lean_dec(x_239); +x_302 = lean_ctor_get(x_245, 0); +lean_inc(x_302); +x_303 = lean_ctor_get(x_245, 1); +lean_inc(x_303); +lean_dec(x_245); +x_304 = l_Lean_TypeClass_Context_uUnify___main(x_300, x_302, x_248); +if (lean_obj_tag(x_304) == 0) +{ +lean_object* x_305; lean_object* x_306; lean_object* x_307; +x_305 = lean_ctor_get(x_304, 1); +lean_inc(x_305); +if (lean_is_exclusive(x_304)) { + lean_ctor_release(x_304, 0); + lean_ctor_release(x_304, 1); + x_306 = x_304; +} else { + lean_dec_ref(x_304); + x_306 = lean_box(0); +} +if (lean_is_scalar(x_306)) { + x_307 = lean_alloc_ctor(0, 2, 0); +} else { + x_307 = x_306; +} +lean_ctor_set(x_307, 0, x_241); +lean_ctor_set(x_307, 1, x_305); +x_1 = x_301; +x_2 = x_303; +x_3 = x_307; +goto _start; +} +else +{ +lean_object* x_309; lean_object* x_310; lean_object* x_311; lean_object* x_312; +lean_dec(x_303); +lean_dec(x_301); +x_309 = lean_ctor_get(x_304, 0); +lean_inc(x_309); +x_310 = lean_ctor_get(x_304, 1); +lean_inc(x_310); +if (lean_is_exclusive(x_304)) { + lean_ctor_release(x_304, 0); + lean_ctor_release(x_304, 1); + x_311 = x_304; +} else { + lean_dec_ref(x_304); + x_311 = lean_box(0); +} +if (lean_is_scalar(x_311)) { + x_312 = lean_alloc_ctor(1, 2, 0); +} else { + x_312 = x_311; +} +lean_ctor_set(x_312, 0, x_309); +lean_ctor_set(x_312, 1, x_310); +return x_312; +} +} +else +{ +lean_object* x_313; lean_object* x_314; lean_object* x_315; lean_object* x_316; lean_object* x_317; lean_object* x_318; lean_object* x_319; lean_object* x_320; lean_object* x_321; lean_object* x_322; lean_object* x_323; +lean_dec(x_248); +x_313 = l_Lean_LevelToFormat_Level_format(x_239); +x_314 = l_Lean_Options_empty; +x_315 = l_Lean_Format_pretty(x_313, x_314); +x_316 = l_Lean_TypeClass_Context_uUnify___main___closed__1; +x_317 = lean_string_append(x_316, x_315); +lean_dec(x_315); +x_318 = l_Lean_TypeClass_Context_uUnify___main___closed__2; +x_319 = lean_string_append(x_317, x_318); +x_320 = l_Lean_LevelToFormat_Level_format(x_245); +x_321 = l_Lean_Format_pretty(x_320, x_314); +x_322 = lean_string_append(x_319, x_321); +lean_dec(x_321); +x_323 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_323, 0, x_322); +lean_ctor_set(x_323, 1, x_246); +return x_323; +} +} +case 4: +{ +lean_dec(x_248); +if (lean_obj_tag(x_245) == 4) +{ +lean_object* x_324; lean_object* x_325; uint8_t x_326; +x_324 = lean_ctor_get(x_239, 0); +lean_inc(x_324); +lean_dec(x_239); +x_325 = lean_ctor_get(x_245, 0); +lean_inc(x_325); +lean_dec(x_245); +x_326 = lean_name_dec_eq(x_324, x_325); +lean_dec(x_325); +lean_dec(x_324); +if (x_326 == 0) +{ +lean_object* x_327; lean_object* x_328; +x_327 = l_Lean_TypeClass_Context_uUnify___main___closed__3; +x_328 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_328, 0, x_327); +lean_ctor_set(x_328, 1, x_246); +return x_328; +} +else +{ +lean_object* x_329; +x_329 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_329, 0, x_241); +lean_ctor_set(x_329, 1, x_246); +return x_329; +} +} +else +{ +lean_object* x_330; lean_object* x_331; lean_object* x_332; lean_object* x_333; lean_object* x_334; lean_object* x_335; lean_object* x_336; lean_object* x_337; lean_object* x_338; lean_object* x_339; lean_object* x_340; +x_330 = l_Lean_LevelToFormat_Level_format(x_239); +x_331 = l_Lean_Options_empty; +x_332 = l_Lean_Format_pretty(x_330, x_331); +x_333 = l_Lean_TypeClass_Context_uUnify___main___closed__1; +x_334 = lean_string_append(x_333, x_332); +lean_dec(x_332); +x_335 = l_Lean_TypeClass_Context_uUnify___main___closed__2; +x_336 = lean_string_append(x_334, x_335); +x_337 = l_Lean_LevelToFormat_Level_format(x_245); +x_338 = l_Lean_Format_pretty(x_337, x_331); +x_339 = lean_string_append(x_336, x_338); +lean_dec(x_338); +x_340 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_340, 0, x_339); +lean_ctor_set(x_340, 1, x_246); +return x_340; +} +} +default: +{ +lean_object* x_341; +x_341 = l_Lean_TypeClass_Context_uMetaIdx(x_239); +if (lean_obj_tag(x_341) == 0) +{ +uint8_t x_342; +lean_dec(x_248); +x_342 = lean_level_eqv(x_239, x_245); +lean_dec(x_245); +lean_dec(x_239); +if (x_342 == 0) +{ +lean_object* x_343; lean_object* x_344; +x_343 = l_Lean_TypeClass_Context_uUnify___main___closed__4; +x_344 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_344, 0, x_343); +lean_ctor_set(x_344, 1, x_246); +return x_344; +} +else +{ +lean_object* x_345; +x_345 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_345, 0, x_241); +lean_ctor_set(x_345, 1, x_246); +return x_345; +} +} +else +{ +lean_object* x_346; uint8_t x_347; +x_346 = lean_ctor_get(x_341, 0); +lean_inc(x_346); +lean_dec(x_341); +lean_inc(x_245); +x_347 = l_Lean_TypeClass_Context_uOccursIn(x_239, x_245); +if (x_347 == 0) +{ +lean_object* x_348; lean_object* x_349; +lean_dec(x_246); +x_348 = lean_alloc_closure((void*)(l_Lean_TypeClass_Context_uAssignIdx___boxed), 3, 2); +lean_closure_set(x_348, 0, x_346); +lean_closure_set(x_348, 1, x_245); +x_349 = l_EState_fromState___rarg(x_348, x_248); +return x_349; +} +else +{ +lean_object* x_350; lean_object* x_351; +lean_dec(x_346); +lean_dec(x_248); +lean_dec(x_245); +x_350 = l_Lean_TypeClass_Context_uUnify___main___closed__5; +x_351 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_351, 0, x_350); +lean_ctor_set(x_351, 1, x_246); +return x_351; +} +} +} +} +} +} +else +{ +lean_object* x_356; lean_object* x_357; lean_object* x_358; lean_object* x_359; +lean_dec(x_239); +x_356 = lean_ctor_get(x_244, 0); +lean_inc(x_356); +x_357 = lean_ctor_get(x_244, 1); +lean_inc(x_357); +if (lean_is_exclusive(x_244)) { + lean_ctor_release(x_244, 0); + lean_ctor_release(x_244, 1); + x_358 = x_244; +} else { + lean_dec_ref(x_244); + x_358 = lean_box(0); +} +if (lean_is_scalar(x_358)) { + x_359 = lean_alloc_ctor(1, 2, 0); +} else { + x_359 = x_358; +} +lean_ctor_set(x_359, 0, x_356); +lean_ctor_set(x_359, 1, x_357); +return x_359; +} +} +} +else +{ +uint8_t x_360; +lean_dec(x_2); +x_360 = !lean_is_exclusive(x_5); +if (x_360 == 0) +{ +return x_5; +} +else +{ +lean_object* x_361; lean_object* x_362; lean_object* x_363; +x_361 = lean_ctor_get(x_5, 0); +x_362 = lean_ctor_get(x_5, 1); +lean_inc(x_362); +lean_inc(x_361); +lean_dec(x_5); +x_363 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_363, 0, x_361); +lean_ctor_set(x_363, 1, x_362); +return x_363; +} +} +} +} +lean_object* l_Lean_TypeClass_Context_uUnify(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; +x_4 = l_Lean_TypeClass_Context_uUnify___main(x_1, x_2, x_3); +return x_4; +} +} +lean_object* l_Lean_TypeClass_Context_uInstantiate___main(lean_object* x_1, lean_object* x_2) { +_start: +{ +uint8_t x_3; +x_3 = l_Lean_Level_hasMVar___main(x_2); +if (x_3 == 0) +{ +lean_dec(x_1); +lean_inc(x_2); +return x_2; +} +else +{ +lean_object* x_4; +x_4 = l_Lean_TypeClass_Context_uMetaIdx(x_2); +if (lean_obj_tag(x_4) == 0) +{ +switch (lean_obj_tag(x_2)) { +case 1: +{ +lean_object* x_5; lean_object* x_6; lean_object* x_7; +x_5 = lean_ctor_get(x_2, 0); +x_6 = l_Lean_TypeClass_Context_uInstantiate___main(x_1, x_5); +x_7 = level_mk_succ(x_6); +return x_7; +} +case 2: +{ +lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; +x_8 = lean_ctor_get(x_2, 0); +x_9 = lean_ctor_get(x_2, 1); +lean_inc(x_1); +x_10 = l_Lean_TypeClass_Context_uInstantiate___main(x_1, x_8); +x_11 = l_Lean_TypeClass_Context_uInstantiate___main(x_1, x_9); +x_12 = level_mk_max(x_10, x_11); +return x_12; +} +case 3: +{ +lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; +x_13 = lean_ctor_get(x_2, 0); +x_14 = lean_ctor_get(x_2, 1); +lean_inc(x_1); +x_15 = l_Lean_TypeClass_Context_uInstantiate___main(x_1, x_13); +x_16 = l_Lean_TypeClass_Context_uInstantiate___main(x_1, x_14); +x_17 = level_mk_imax(x_15, x_16); +return x_17; +} +default: +{ +lean_dec(x_1); +lean_inc(x_2); +return x_2; +} +} +} +else +{ +lean_object* x_18; lean_object* x_19; lean_object* x_20; +x_18 = lean_ctor_get(x_4, 0); +lean_inc(x_18); +lean_dec(x_4); +lean_inc(x_1); +x_19 = l_Lean_TypeClass_Context_uLookupIdx(x_18, x_1); +lean_dec(x_18); +x_20 = lean_ctor_get(x_19, 0); +lean_inc(x_20); +lean_dec(x_19); +if (lean_obj_tag(x_20) == 0) +{ +lean_dec(x_1); +lean_inc(x_2); +return x_2; +} +else +{ +lean_object* x_21; lean_object* x_22; +x_21 = lean_ctor_get(x_20, 0); +lean_inc(x_21); +lean_dec(x_20); +x_22 = l_Lean_TypeClass_Context_uInstantiate___main(x_1, x_21); +lean_dec(x_21); +return x_22; +} +} +} +} +} +lean_object* l_Lean_TypeClass_Context_uInstantiate___main___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = l_Lean_TypeClass_Context_uInstantiate___main(x_1, x_2); +lean_dec(x_2); +return x_3; +} +} +lean_object* l_Lean_TypeClass_Context_uInstantiate(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = l_Lean_TypeClass_Context_uInstantiate___main(x_1, x_2); +return x_3; +} +} +lean_object* l_Lean_TypeClass_Context_uInstantiate___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = l_Lean_TypeClass_Context_uInstantiate(x_1, x_2); +lean_dec(x_2); +return x_3; +} +} +uint8_t l_List_foldr___main___at_Lean_TypeClass_Context_eHasTmpMVar___spec__1(uint8_t x_1, lean_object* x_2) { +_start: +{ +if (lean_obj_tag(x_2) == 0) +{ +return x_1; +} +else +{ +lean_object* x_3; lean_object* x_4; uint8_t x_5; lean_object* x_6; uint8_t x_7; +x_3 = lean_ctor_get(x_2, 0); +lean_inc(x_3); +x_4 = lean_ctor_get(x_2, 1); +lean_inc(x_4); +lean_dec(x_2); +x_5 = l_List_foldr___main___at_Lean_TypeClass_Context_eHasTmpMVar___spec__1(x_1, x_4); +x_6 = l_Lean_TypeClass_Context_uHasTmpMVar___closed__1; +x_7 = l_Lean_TypeClass_Context_uFind___main(x_6, x_3); +if (x_7 == 0) +{ +return x_5; +} +else +{ +uint8_t x_8; +x_8 = 1; +return x_8; +} +} +} +} +uint8_t l_Lean_TypeClass_Context_eHasTmpMVar___lambda__1(lean_object* x_1) { +_start: +{ +uint8_t x_2; +x_2 = l_Lean_TypeClass_Context_eIsMeta(x_1); +if (x_2 == 0) +{ +uint8_t x_3; +x_3 = l_Lean_Expr_isConst(x_1); +if (x_3 == 0) +{ +return x_2; +} +else +{ +lean_object* x_4; uint8_t x_5; uint8_t x_6; +x_4 = l_Lean_Expr_constLevels(x_1); +x_5 = 0; +x_6 = l_List_foldr___main___at_Lean_TypeClass_Context_eHasTmpMVar___spec__1(x_5, x_4); +return x_6; +} +} +else +{ +uint8_t x_7; +x_7 = 1; +return x_7; +} +} +} +lean_object* _init_l_Lean_TypeClass_Context_eHasTmpMVar___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_alloc_closure((void*)(l_Lean_TypeClass_Context_eHasTmpMVar___lambda__1___boxed), 1, 0); +return x_1; +} +} +uint8_t l_Lean_TypeClass_Context_eHasTmpMVar(lean_object* x_1) { +_start: +{ +uint8_t x_2; +x_2 = lean_expr_has_mvar(x_1); +if (x_2 == 0) +{ +uint8_t x_3; +lean_dec(x_1); +x_3 = 0; +return x_3; +} +else +{ +lean_object* x_4; uint8_t x_5; +x_4 = l_Lean_TypeClass_Context_eHasTmpMVar___closed__1; +x_5 = l_Lean_TypeClass_Context_eFind___main(x_4, x_1); +return x_5; +} +} +} +lean_object* l_List_foldr___main___at_Lean_TypeClass_Context_eHasTmpMVar___spec__1___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +uint8_t x_3; uint8_t x_4; lean_object* x_5; +x_3 = lean_unbox(x_1); +lean_dec(x_1); +x_4 = l_List_foldr___main___at_Lean_TypeClass_Context_eHasTmpMVar___spec__1(x_3, x_2); +x_5 = lean_box(x_4); +return x_5; +} +} +lean_object* l_Lean_TypeClass_Context_eHasTmpMVar___lambda__1___boxed(lean_object* x_1) { +_start: +{ +uint8_t x_2; lean_object* x_3; +x_2 = l_Lean_TypeClass_Context_eHasTmpMVar___lambda__1(x_1); +lean_dec(x_1); +x_3 = lean_box(x_2); +return x_3; +} +} +lean_object* l_Lean_TypeClass_Context_eHasTmpMVar___boxed(lean_object* x_1) { +_start: +{ +uint8_t x_2; lean_object* x_3; +x_2 = l_Lean_TypeClass_Context_eHasTmpMVar(x_1); +x_3 = lean_box(x_2); +return x_3; +} +} +lean_object* l_Lean_TypeClass_Context_slowWhnfApp___main(lean_object* x_1, lean_object* x_2) { +_start: +{ +if (lean_obj_tag(x_1) == 6) +{ +if (lean_obj_tag(x_2) == 0) +{ +lean_object* x_3; +x_3 = l_List_foldl___main___at_Lean_mkApp___spec__1(x_1, x_2); +return x_3; +} +else +{ +lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; +x_4 = lean_ctor_get(x_1, 2); +lean_inc(x_4); +lean_dec(x_1); +x_5 = lean_ctor_get(x_2, 0); +lean_inc(x_5); +x_6 = lean_ctor_get(x_2, 1); +lean_inc(x_6); +lean_dec(x_2); +x_7 = lean_expr_instantiate1(x_4, x_5); +x_1 = x_7; +x_2 = x_6; +goto _start; +} +} +else +{ +lean_object* x_9; +x_9 = l_List_foldl___main___at_Lean_mkApp___spec__1(x_1, x_2); +return x_9; +} +} +} +lean_object* l_Lean_TypeClass_Context_slowWhnfApp(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = l_Lean_TypeClass_Context_slowWhnfApp___main(x_1, x_2); +return x_3; +} +} +lean_object* l_Lean_TypeClass_Context_slowWhnf___main(lean_object* x_1) { +_start: +{ +uint8_t x_2; +x_2 = l_Lean_Expr_isApp(x_1); +if (x_2 == 0) +{ +lean_inc(x_1); +return x_1; +} +else +{ +lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; +x_3 = l_Lean_Expr_getAppFn___main(x_1); +x_4 = l_Lean_TypeClass_Context_slowWhnf___main(x_3); +lean_dec(x_3); +x_5 = lean_box(0); +x_6 = l_Lean_Expr_getAppArgsAux___main(x_1, x_5); +x_7 = l_Lean_TypeClass_Context_slowWhnfApp___main(x_4, x_6); +return x_7; +} +} +} +lean_object* l_Lean_TypeClass_Context_slowWhnf___main___boxed(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = l_Lean_TypeClass_Context_slowWhnf___main(x_1); +lean_dec(x_1); +return x_2; +} +} +lean_object* l_Lean_TypeClass_Context_slowWhnf(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = l_Lean_TypeClass_Context_slowWhnf___main(x_1); +return x_2; +} +} +lean_object* l_Lean_TypeClass_Context_slowWhnf___boxed(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = l_Lean_TypeClass_Context_slowWhnf(x_1); +lean_dec(x_1); +return x_2; +} +} +lean_object* _init_l_panicWithPos___at_Lean_TypeClass_Context_eUnify___main___spec__1___closed__1() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_String_Inhabited; +x_2 = lean_alloc_closure((void*)(l_EState_Inhabited___rarg), 2, 1); +lean_closure_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* l_panicWithPos___at_Lean_TypeClass_Context_eUnify___main___spec__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { +_start: +{ +lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; +x_6 = l_panicWithPos___rarg___closed__1; +x_7 = lean_string_append(x_6, x_1); +x_8 = l_panicWithPos___rarg___closed__2; +x_9 = lean_string_append(x_7, x_8); +x_10 = l_Nat_repr(x_2); +x_11 = lean_string_append(x_9, x_10); +lean_dec(x_10); +x_12 = l_panicWithPos___rarg___closed__2; +x_13 = lean_string_append(x_11, x_12); +x_14 = l_Nat_repr(x_3); +x_15 = lean_string_append(x_13, x_14); +lean_dec(x_14); +x_16 = l_panicWithPos___rarg___closed__3; +x_17 = lean_string_append(x_15, x_16); +x_18 = lean_string_append(x_17, x_4); +x_19 = l_panicWithPos___at_Lean_TypeClass_Context_eUnify___main___spec__1___closed__1; +x_20 = lean_panic_fn(x_18); +x_21 = lean_apply_1(x_20, x_5); +return x_21; +} +} +lean_object* l_List_mfor_u2082___main___at_Lean_TypeClass_Context_eUnify___main___spec__2(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; +if (lean_obj_tag(x_1) == 0) +{ +lean_object* x_12; +lean_dec(x_2); +x_12 = lean_box(0); +x_4 = x_12; +goto block_11; +} +else +{ +if (lean_obj_tag(x_2) == 0) +{ +lean_object* x_13; +lean_dec(x_1); +x_13 = lean_box(0); +x_4 = x_13; +goto block_11; +} +else +{ +lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; +x_14 = lean_ctor_get(x_1, 0); +lean_inc(x_14); +x_15 = lean_ctor_get(x_1, 1); +lean_inc(x_15); +lean_dec(x_1); +x_16 = lean_ctor_get(x_2, 0); +lean_inc(x_16); +x_17 = lean_ctor_get(x_2, 1); +lean_inc(x_17); +lean_dec(x_2); +x_18 = l_Lean_TypeClass_Context_eUnify___main(x_14, x_16, x_3); +if (lean_obj_tag(x_18) == 0) +{ +uint8_t x_19; +x_19 = !lean_is_exclusive(x_18); +if (x_19 == 0) +{ +lean_object* x_20; lean_object* x_21; +x_20 = lean_ctor_get(x_18, 0); +lean_dec(x_20); +x_21 = lean_box(0); +lean_ctor_set(x_18, 0, x_21); +x_1 = x_15; +x_2 = x_17; +x_3 = x_18; +goto _start; +} +else +{ +lean_object* x_23; lean_object* x_24; lean_object* x_25; +x_23 = lean_ctor_get(x_18, 1); +lean_inc(x_23); +lean_dec(x_18); +x_24 = lean_box(0); +x_25 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_25, 0, x_24); +lean_ctor_set(x_25, 1, x_23); +x_1 = x_15; +x_2 = x_17; +x_3 = x_25; +goto _start; +} +} +else +{ +uint8_t x_27; +lean_dec(x_17); +lean_dec(x_15); +x_27 = !lean_is_exclusive(x_18); +if (x_27 == 0) +{ +return x_18; +} +else +{ +lean_object* x_28; lean_object* x_29; lean_object* x_30; +x_28 = lean_ctor_get(x_18, 0); +x_29 = lean_ctor_get(x_18, 1); +lean_inc(x_29); +lean_inc(x_28); +lean_dec(x_18); +x_30 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_30, 0, x_28); +lean_ctor_set(x_30, 1, x_29); +return x_30; +} +} +} +} +block_11: +{ +uint8_t x_5; +lean_dec(x_4); +x_5 = !lean_is_exclusive(x_3); +if (x_5 == 0) +{ +lean_object* x_6; lean_object* x_7; +x_6 = lean_ctor_get(x_3, 0); +lean_dec(x_6); +x_7 = lean_box(0); +lean_ctor_set(x_3, 0, x_7); +return x_3; +} +else +{ +lean_object* x_8; lean_object* x_9; lean_object* x_10; +x_8 = lean_ctor_get(x_3, 1); +lean_inc(x_8); +lean_dec(x_3); +x_9 = lean_box(0); +x_10 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_10, 0, x_9); +lean_ctor_set(x_10, 1, x_8); +return x_10; +} +} +} +} +lean_object* l_List_mfor_u2082___main___at_Lean_TypeClass_Context_eUnify___main___spec__3(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; +if (lean_obj_tag(x_1) == 0) +{ +lean_object* x_12; +lean_dec(x_2); +x_12 = lean_box(0); +x_4 = x_12; +goto block_11; +} +else +{ +if (lean_obj_tag(x_2) == 0) +{ +lean_object* x_13; +lean_dec(x_1); +x_13 = lean_box(0); +x_4 = x_13; +goto block_11; +} +else +{ +lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; +x_14 = lean_ctor_get(x_1, 0); +lean_inc(x_14); +x_15 = lean_ctor_get(x_1, 1); +lean_inc(x_15); +lean_dec(x_1); +x_16 = lean_ctor_get(x_2, 0); +lean_inc(x_16); +x_17 = lean_ctor_get(x_2, 1); +lean_inc(x_17); +lean_dec(x_2); +x_18 = l_Lean_TypeClass_Context_uUnify___main(x_14, x_16, x_3); +if (lean_obj_tag(x_18) == 0) +{ +uint8_t x_19; +x_19 = !lean_is_exclusive(x_18); +if (x_19 == 0) +{ +lean_object* x_20; lean_object* x_21; +x_20 = lean_ctor_get(x_18, 0); +lean_dec(x_20); +x_21 = lean_box(0); +lean_ctor_set(x_18, 0, x_21); +x_1 = x_15; +x_2 = x_17; +x_3 = x_18; +goto _start; +} +else +{ +lean_object* x_23; lean_object* x_24; lean_object* x_25; +x_23 = lean_ctor_get(x_18, 1); +lean_inc(x_23); +lean_dec(x_18); +x_24 = lean_box(0); +x_25 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_25, 0, x_24); +lean_ctor_set(x_25, 1, x_23); +x_1 = x_15; +x_2 = x_17; +x_3 = x_25; +goto _start; +} +} +else +{ +uint8_t x_27; +lean_dec(x_17); +lean_dec(x_15); +x_27 = !lean_is_exclusive(x_18); +if (x_27 == 0) +{ +return x_18; +} +else +{ +lean_object* x_28; lean_object* x_29; lean_object* x_30; +x_28 = lean_ctor_get(x_18, 0); +x_29 = lean_ctor_get(x_18, 1); +lean_inc(x_29); +lean_inc(x_28); +lean_dec(x_18); +x_30 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_30, 0, x_28); +lean_ctor_set(x_30, 1, x_29); +return x_30; +} +} +} +} +block_11: +{ +uint8_t x_5; +lean_dec(x_4); +x_5 = !lean_is_exclusive(x_3); +if (x_5 == 0) +{ +lean_object* x_6; lean_object* x_7; +x_6 = lean_ctor_get(x_3, 0); +lean_dec(x_6); +x_7 = lean_box(0); +lean_ctor_set(x_3, 0, x_7); +return x_3; +} +else +{ +lean_object* x_8; lean_object* x_9; lean_object* x_10; +x_8 = lean_ctor_get(x_3, 1); +lean_inc(x_8); +lean_dec(x_3); +x_9 = lean_box(0); +x_10 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_10, 0, x_9); +lean_ctor_set(x_10, 1, x_8); +return x_10; +} +} +} +} +lean_object* _init_l_Lean_TypeClass_Context_eUnify___main___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("eUnify: "); +return x_1; +} +} +lean_object* _init_l_Lean_TypeClass_Context_eUnify___main___closed__2() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("UNREACHABLE"); +return x_1; +} +} +lean_object* l_Lean_TypeClass_Context_eUnify___main(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; uint8_t x_507; +x_507 = lean_expr_has_mvar(x_1); +if (x_507 == 0) +{ +uint8_t x_508; +x_508 = lean_expr_has_mvar(x_2); +if (x_508 == 0) +{ +uint8_t x_509; +x_509 = lean_expr_eqv(x_1, x_2); +if (x_509 == 0) +{ +uint8_t x_510; +x_510 = !lean_is_exclusive(x_3); +if (x_510 == 0) +{ +lean_object* x_511; lean_object* x_512; lean_object* x_513; lean_object* x_514; lean_object* x_515; lean_object* x_516; lean_object* x_517; lean_object* x_518; +x_511 = lean_ctor_get(x_3, 0); +lean_dec(x_511); +x_512 = lean_expr_dbg_to_string(x_1); +lean_dec(x_1); +x_513 = l_Lean_TypeClass_Context_eUnify___main___closed__1; +x_514 = lean_string_append(x_513, x_512); +lean_dec(x_512); +x_515 = l_Lean_TypeClass_Context_uUnify___main___closed__2; +x_516 = lean_string_append(x_514, x_515); +x_517 = lean_expr_dbg_to_string(x_2); +lean_dec(x_2); +x_518 = lean_string_append(x_516, x_517); +lean_dec(x_517); +lean_ctor_set_tag(x_3, 1); +lean_ctor_set(x_3, 0, x_518); +return x_3; +} +else +{ +lean_object* x_519; lean_object* x_520; lean_object* x_521; lean_object* x_522; lean_object* x_523; lean_object* x_524; lean_object* x_525; lean_object* x_526; lean_object* x_527; +x_519 = lean_ctor_get(x_3, 1); +lean_inc(x_519); +lean_dec(x_3); +x_520 = lean_expr_dbg_to_string(x_1); +lean_dec(x_1); +x_521 = l_Lean_TypeClass_Context_eUnify___main___closed__1; +x_522 = lean_string_append(x_521, x_520); +lean_dec(x_520); +x_523 = l_Lean_TypeClass_Context_uUnify___main___closed__2; +x_524 = lean_string_append(x_522, x_523); +x_525 = lean_expr_dbg_to_string(x_2); +lean_dec(x_2); +x_526 = lean_string_append(x_524, x_525); +lean_dec(x_525); +x_527 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_527, 0, x_526); +lean_ctor_set(x_527, 1, x_519); +return x_527; +} +} +else +{ +uint8_t x_528; +lean_dec(x_2); +lean_dec(x_1); +x_528 = !lean_is_exclusive(x_3); +if (x_528 == 0) +{ +lean_object* x_529; lean_object* x_530; +x_529 = lean_ctor_get(x_3, 0); +lean_dec(x_529); +x_530 = lean_box(0); +lean_ctor_set(x_3, 0, x_530); +return x_3; +} +else +{ +lean_object* x_531; lean_object* x_532; lean_object* x_533; +x_531 = lean_ctor_get(x_3, 1); +lean_inc(x_531); +lean_dec(x_3); +x_532 = lean_box(0); +x_533 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_533, 0, x_532); +lean_ctor_set(x_533, 1, x_531); +return x_533; +} +} +} +else +{ +lean_object* x_534; +x_534 = lean_box(0); +x_4 = x_534; +goto block_506; +} +} +else +{ +lean_object* x_535; +x_535 = lean_box(0); +x_4 = x_535; +goto block_506; +} +block_506: +{ +lean_object* x_5; lean_object* x_6; +lean_dec(x_4); +x_5 = lean_alloc_closure((void*)(l_Lean_TypeClass_Context_eShallowInstantiate), 2, 1); +lean_closure_set(x_5, 0, x_1); +x_6 = l_EState_fromState___rarg(x_5, x_3); +if (lean_obj_tag(x_6) == 0) +{ +uint8_t x_7; +x_7 = !lean_is_exclusive(x_6); +if (x_7 == 0) +{ +lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; +x_8 = lean_ctor_get(x_6, 0); +x_9 = l_Lean_TypeClass_Context_slowWhnf___main(x_8); +lean_dec(x_8); +x_10 = lean_box(0); +lean_ctor_set(x_6, 0, x_10); +x_11 = lean_alloc_closure((void*)(l_Lean_TypeClass_Context_eShallowInstantiate), 2, 1); +lean_closure_set(x_11, 0, x_2); +x_12 = l_EState_fromState___rarg(x_11, x_6); +if (lean_obj_tag(x_12) == 0) +{ +uint8_t x_13; +x_13 = !lean_is_exclusive(x_12); +if (x_13 == 0) +{ +lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_46; lean_object* x_127; lean_object* x_159; uint8_t x_167; +x_14 = lean_ctor_get(x_12, 0); +x_15 = lean_ctor_get(x_12, 1); +x_16 = l_Lean_TypeClass_Context_slowWhnf___main(x_14); +lean_dec(x_14); +lean_inc(x_15); +lean_ctor_set(x_12, 0, x_10); +x_167 = l_Lean_Expr_isMVar(x_9); +if (x_167 == 0) +{ +uint8_t x_168; +x_168 = l_Lean_TypeClass_Context_eIsMeta(x_16); +if (x_168 == 0) +{ +x_159 = x_10; +goto block_166; +} +else +{ +uint8_t x_169; +x_169 = l_Lean_TypeClass_Context_eIsMeta(x_9); +if (x_169 == 0) +{ +lean_dec(x_15); +x_1 = x_16; +x_2 = x_9; +x_3 = x_12; +goto _start; +} +else +{ +x_159 = x_10; +goto block_166; +} +} +} +else +{ +uint8_t x_171; +x_171 = l_Lean_Expr_isMVar(x_16); +if (x_171 == 0) +{ +uint8_t x_172; +x_172 = l_Lean_TypeClass_Context_eIsMeta(x_16); +if (x_172 == 0) +{ +x_159 = x_10; +goto block_166; +} +else +{ +uint8_t x_173; +x_173 = l_Lean_TypeClass_Context_eIsMeta(x_9); +if (x_173 == 0) +{ +lean_dec(x_15); +x_1 = x_16; +x_2 = x_9; +x_3 = x_12; +goto _start; +} +else +{ +x_159 = x_10; +goto block_166; +} +} +} +else +{ +uint8_t x_175; +x_175 = lean_expr_eqv(x_9, x_16); +if (x_175 == 0) +{ +uint8_t x_176; +x_176 = l_Lean_TypeClass_Context_eIsMeta(x_16); +if (x_176 == 0) +{ +x_159 = x_10; +goto block_166; +} +else +{ +uint8_t x_177; +x_177 = l_Lean_TypeClass_Context_eIsMeta(x_9); +if (x_177 == 0) +{ +lean_dec(x_15); +x_1 = x_16; +x_2 = x_9; +x_3 = x_12; +goto _start; +} +else +{ +x_159 = x_10; +goto block_166; +} +} +} +else +{ +lean_object* x_179; +lean_dec(x_12); +lean_dec(x_16); +lean_dec(x_9); +x_179 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_179, 0, x_10); +lean_ctor_set(x_179, 1, x_15); +return x_179; +} +} +} +block_45: +{ +uint8_t x_18; +lean_dec(x_17); +x_18 = l_Lean_TypeClass_Context_eIsMeta(x_9); +if (x_18 == 0) +{ +lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; +lean_dec(x_12); +x_19 = lean_expr_dbg_to_string(x_9); +lean_dec(x_9); +x_20 = l_Lean_TypeClass_Context_eUnify___main___closed__1; +x_21 = lean_string_append(x_20, x_19); +lean_dec(x_19); +x_22 = l_Lean_TypeClass_Context_uUnify___main___closed__2; +x_23 = lean_string_append(x_21, x_22); +x_24 = lean_expr_dbg_to_string(x_16); +lean_dec(x_16); +x_25 = lean_string_append(x_23, x_24); +lean_dec(x_24); +x_26 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_26, 0, x_25); +lean_ctor_set(x_26, 1, x_15); +return x_26; +} +else +{ +uint8_t x_27; +lean_inc(x_9); +lean_inc(x_16); +x_27 = l_Lean_TypeClass_Context_eOccursIn(x_16, x_9); +if (x_27 == 0) +{ +lean_object* x_28; +lean_dec(x_15); +x_28 = l_Lean_TypeClass_Context_eMetaIdx(x_9); +lean_dec(x_9); +if (lean_obj_tag(x_28) == 0) +{ +lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; +lean_dec(x_16); +x_29 = l_Lean_TypeClass_Context_eInfer___closed__1; +x_30 = lean_unsigned_to_nat(215u); +x_31 = lean_unsigned_to_nat(20u); +x_32 = l_Lean_TypeClass_Context_eUnify___main___closed__2; +x_33 = l_panicWithPos___at_Lean_TypeClass_Context_eUnify___main___spec__1(x_29, x_30, x_31, x_32, x_12); +return x_33; +} +else +{ +lean_object* x_34; lean_object* x_35; lean_object* x_36; +x_34 = lean_ctor_get(x_28, 0); +lean_inc(x_34); +lean_dec(x_28); +x_35 = lean_alloc_closure((void*)(l_Lean_TypeClass_Context_eAssignIdx___boxed), 3, 2); +lean_closure_set(x_35, 0, x_34); +lean_closure_set(x_35, 1, x_16); +x_36 = l_EState_fromState___rarg(x_35, x_12); +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_dec(x_12); +x_37 = lean_expr_dbg_to_string(x_9); +lean_dec(x_9); +x_38 = l_Lean_TypeClass_Context_eUnify___main___closed__1; +x_39 = lean_string_append(x_38, x_37); +lean_dec(x_37); +x_40 = l_Lean_TypeClass_Context_uUnify___main___closed__2; +x_41 = lean_string_append(x_39, x_40); +x_42 = lean_expr_dbg_to_string(x_16); +lean_dec(x_16); +x_43 = lean_string_append(x_41, x_42); +lean_dec(x_42); +x_44 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_44, 0, x_43); +lean_ctor_set(x_44, 1, x_15); +return x_44; +} +} +} +block_126: +{ +uint8_t x_47; +lean_dec(x_46); +x_47 = l_Lean_Expr_isApp(x_9); +if (x_47 == 0) +{ +uint8_t x_48; +x_48 = l_Lean_Expr_isForall(x_9); +if (x_48 == 0) +{ +x_17 = x_10; +goto block_45; +} +else +{ +uint8_t x_49; +x_49 = l_Lean_Expr_isForall(x_16); +if (x_49 == 0) +{ +x_17 = x_10; +goto block_45; +} +else +{ +lean_object* x_50; lean_object* x_51; lean_object* x_52; +lean_dec(x_15); +x_50 = l_Lean_Expr_bindingDomain(x_9); +x_51 = l_Lean_Expr_bindingDomain(x_16); +x_52 = l_Lean_TypeClass_Context_eUnify___main(x_50, x_51, x_12); +if (lean_obj_tag(x_52) == 0) +{ +uint8_t x_53; +x_53 = !lean_is_exclusive(x_52); +if (x_53 == 0) +{ +lean_object* x_54; lean_object* x_55; lean_object* x_56; +x_54 = lean_ctor_get(x_52, 0); +lean_dec(x_54); +lean_ctor_set(x_52, 0, x_10); +x_55 = l_Lean_Expr_bindingBody(x_9); +lean_dec(x_9); +x_56 = l_Lean_Expr_bindingBody(x_16); +lean_dec(x_16); +x_1 = x_55; +x_2 = x_56; +x_3 = x_52; +goto _start; +} +else +{ +lean_object* x_58; lean_object* x_59; lean_object* x_60; lean_object* x_61; +x_58 = lean_ctor_get(x_52, 1); +lean_inc(x_58); +lean_dec(x_52); +x_59 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_59, 0, x_10); +lean_ctor_set(x_59, 1, x_58); +x_60 = l_Lean_Expr_bindingBody(x_9); +lean_dec(x_9); +x_61 = l_Lean_Expr_bindingBody(x_16); +lean_dec(x_16); +x_1 = x_60; +x_2 = x_61; +x_3 = x_59; +goto _start; +} +} +else +{ +uint8_t x_63; +lean_dec(x_16); +lean_dec(x_9); +x_63 = !lean_is_exclusive(x_52); +if (x_63 == 0) +{ +return x_52; +} +else +{ +lean_object* x_64; lean_object* x_65; lean_object* x_66; +x_64 = lean_ctor_get(x_52, 0); +x_65 = lean_ctor_get(x_52, 1); +lean_inc(x_65); +lean_inc(x_64); +lean_dec(x_52); +x_66 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_66, 0, x_64); +lean_ctor_set(x_66, 1, x_65); +return x_66; +} +} +} +} +} +else +{ +uint8_t x_67; +x_67 = l_Lean_Expr_isApp(x_16); +if (x_67 == 0) +{ +uint8_t x_68; +x_68 = l_Lean_Expr_isForall(x_9); +if (x_68 == 0) +{ +x_17 = x_10; +goto block_45; +} +else +{ +uint8_t x_69; +x_69 = l_Lean_Expr_isForall(x_16); +if (x_69 == 0) +{ +x_17 = x_10; +goto block_45; +} +else +{ +lean_object* x_70; lean_object* x_71; lean_object* x_72; +lean_dec(x_15); +x_70 = l_Lean_Expr_bindingDomain(x_9); +x_71 = l_Lean_Expr_bindingDomain(x_16); +x_72 = l_Lean_TypeClass_Context_eUnify___main(x_70, x_71, x_12); +if (lean_obj_tag(x_72) == 0) +{ +uint8_t x_73; +x_73 = !lean_is_exclusive(x_72); +if (x_73 == 0) +{ +lean_object* x_74; lean_object* x_75; lean_object* x_76; +x_74 = lean_ctor_get(x_72, 0); +lean_dec(x_74); +lean_ctor_set(x_72, 0, x_10); +x_75 = l_Lean_Expr_bindingBody(x_9); +lean_dec(x_9); +x_76 = l_Lean_Expr_bindingBody(x_16); +lean_dec(x_16); +x_1 = x_75; +x_2 = x_76; +x_3 = x_72; +goto _start; +} +else +{ +lean_object* x_78; lean_object* x_79; lean_object* x_80; lean_object* x_81; +x_78 = lean_ctor_get(x_72, 1); +lean_inc(x_78); +lean_dec(x_72); +x_79 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_79, 0, x_10); +lean_ctor_set(x_79, 1, x_78); +x_80 = l_Lean_Expr_bindingBody(x_9); +lean_dec(x_9); +x_81 = l_Lean_Expr_bindingBody(x_16); +lean_dec(x_16); +x_1 = x_80; +x_2 = x_81; +x_3 = x_79; +goto _start; +} +} +else +{ +uint8_t x_83; +lean_dec(x_16); +lean_dec(x_9); +x_83 = !lean_is_exclusive(x_72); +if (x_83 == 0) +{ +return x_72; +} +else +{ +lean_object* x_84; lean_object* x_85; lean_object* x_86; +x_84 = lean_ctor_get(x_72, 0); +x_85 = lean_ctor_get(x_72, 1); +lean_inc(x_85); +lean_inc(x_84); +lean_dec(x_72); +x_86 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_86, 0, x_84); +lean_ctor_set(x_86, 1, x_85); +return x_86; +} +} +} +} +} +else +{ +lean_object* x_87; lean_object* x_88; lean_object* x_89; lean_object* x_90; lean_object* x_91; lean_object* x_92; uint8_t x_93; +x_87 = lean_box(0); +x_88 = l_Lean_Expr_getAppArgsAux___main(x_9, x_87); +x_89 = lean_unsigned_to_nat(0u); +x_90 = l_List_lengthAux___main___rarg(x_88, x_89); +x_91 = l_Lean_Expr_getAppArgsAux___main(x_16, x_87); +x_92 = l_List_lengthAux___main___rarg(x_91, x_89); +x_93 = lean_nat_dec_eq(x_90, x_92); +lean_dec(x_92); +lean_dec(x_90); +if (x_93 == 0) +{ +uint8_t x_94; +lean_dec(x_91); +lean_dec(x_88); +x_94 = l_Lean_Expr_isForall(x_9); +if (x_94 == 0) +{ +x_17 = x_10; +goto block_45; +} +else +{ +uint8_t x_95; +x_95 = l_Lean_Expr_isForall(x_16); +if (x_95 == 0) +{ +x_17 = x_10; +goto block_45; +} +else +{ +lean_object* x_96; lean_object* x_97; lean_object* x_98; +lean_dec(x_15); +x_96 = l_Lean_Expr_bindingDomain(x_9); +x_97 = l_Lean_Expr_bindingDomain(x_16); +x_98 = l_Lean_TypeClass_Context_eUnify___main(x_96, x_97, x_12); +if (lean_obj_tag(x_98) == 0) +{ +uint8_t x_99; +x_99 = !lean_is_exclusive(x_98); +if (x_99 == 0) +{ +lean_object* x_100; lean_object* x_101; lean_object* x_102; +x_100 = lean_ctor_get(x_98, 0); +lean_dec(x_100); +lean_ctor_set(x_98, 0, x_10); +x_101 = l_Lean_Expr_bindingBody(x_9); +lean_dec(x_9); +x_102 = l_Lean_Expr_bindingBody(x_16); +lean_dec(x_16); +x_1 = x_101; +x_2 = x_102; +x_3 = x_98; +goto _start; +} +else +{ +lean_object* x_104; lean_object* x_105; lean_object* x_106; lean_object* x_107; +x_104 = lean_ctor_get(x_98, 1); +lean_inc(x_104); +lean_dec(x_98); +x_105 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_105, 0, x_10); +lean_ctor_set(x_105, 1, x_104); +x_106 = l_Lean_Expr_bindingBody(x_9); +lean_dec(x_9); +x_107 = l_Lean_Expr_bindingBody(x_16); +lean_dec(x_16); +x_1 = x_106; +x_2 = x_107; +x_3 = x_105; +goto _start; +} +} +else +{ +uint8_t x_109; +lean_dec(x_16); +lean_dec(x_9); +x_109 = !lean_is_exclusive(x_98); +if (x_109 == 0) +{ +return x_98; +} +else +{ +lean_object* x_110; lean_object* x_111; lean_object* x_112; +x_110 = lean_ctor_get(x_98, 0); +x_111 = lean_ctor_get(x_98, 1); +lean_inc(x_111); +lean_inc(x_110); +lean_dec(x_98); +x_112 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_112, 0, x_110); +lean_ctor_set(x_112, 1, x_111); +return x_112; +} +} +} +} +} +else +{ +lean_object* x_113; lean_object* x_114; lean_object* x_115; +lean_dec(x_15); +x_113 = l_Lean_Expr_getAppFn___main(x_9); +lean_dec(x_9); +x_114 = l_Lean_Expr_getAppFn___main(x_16); +lean_dec(x_16); +x_115 = l_Lean_TypeClass_Context_eUnify___main(x_113, x_114, x_12); +if (lean_obj_tag(x_115) == 0) +{ +uint8_t x_116; +x_116 = !lean_is_exclusive(x_115); +if (x_116 == 0) +{ +lean_object* x_117; lean_object* x_118; +x_117 = lean_ctor_get(x_115, 0); +lean_dec(x_117); +lean_ctor_set(x_115, 0, x_10); +x_118 = l_List_mfor_u2082___main___at_Lean_TypeClass_Context_eUnify___main___spec__2(x_88, x_91, x_115); +return x_118; +} +else +{ +lean_object* x_119; lean_object* x_120; lean_object* x_121; +x_119 = lean_ctor_get(x_115, 1); +lean_inc(x_119); +lean_dec(x_115); +x_120 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_120, 0, x_10); +lean_ctor_set(x_120, 1, x_119); +x_121 = l_List_mfor_u2082___main___at_Lean_TypeClass_Context_eUnify___main___spec__2(x_88, x_91, x_120); +return x_121; +} +} +else +{ +uint8_t x_122; +lean_dec(x_91); +lean_dec(x_88); +x_122 = !lean_is_exclusive(x_115); +if (x_122 == 0) +{ +return x_115; +} +else +{ +lean_object* x_123; lean_object* x_124; lean_object* x_125; +x_123 = lean_ctor_get(x_115, 0); +x_124 = lean_ctor_get(x_115, 1); +lean_inc(x_124); +lean_inc(x_123); +lean_dec(x_115); +x_125 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_125, 0, x_123); +lean_ctor_set(x_125, 1, x_124); +return x_125; +} +} +} +} +} +} +block_158: +{ +uint8_t x_128; +lean_dec(x_127); +x_128 = l_Lean_Expr_isFVar(x_9); +if (x_128 == 0) +{ +uint8_t x_129; +x_129 = l_Lean_Expr_isConst(x_9); +if (x_129 == 0) +{ +x_46 = x_10; +goto block_126; +} +else +{ +uint8_t x_130; +x_130 = l_Lean_Expr_isConst(x_16); +if (x_130 == 0) +{ +x_46 = x_10; +goto block_126; +} +else +{ +lean_object* x_131; lean_object* x_132; uint8_t x_133; +x_131 = l_Lean_Expr_constName(x_9); +x_132 = l_Lean_Expr_constName(x_16); +x_133 = lean_name_dec_eq(x_131, x_132); +lean_dec(x_132); +lean_dec(x_131); +if (x_133 == 0) +{ +x_46 = x_10; +goto block_126; +} +else +{ +lean_object* x_134; lean_object* x_135; lean_object* x_136; +lean_dec(x_15); +x_134 = l_Lean_Expr_constLevels(x_9); +lean_dec(x_9); +x_135 = l_Lean_Expr_constLevels(x_16); +lean_dec(x_16); +x_136 = l_List_mfor_u2082___main___at_Lean_TypeClass_Context_eUnify___main___spec__3(x_134, x_135, x_12); +return x_136; +} +} +} +} +else +{ +uint8_t x_137; +x_137 = l_Lean_Expr_isFVar(x_16); +if (x_137 == 0) +{ +uint8_t x_138; +x_138 = l_Lean_Expr_isConst(x_9); +if (x_138 == 0) +{ +x_46 = x_10; +goto block_126; +} +else +{ +uint8_t x_139; +x_139 = l_Lean_Expr_isConst(x_16); +if (x_139 == 0) +{ +x_46 = x_10; +goto block_126; +} +else +{ +lean_object* x_140; lean_object* x_141; uint8_t x_142; +x_140 = l_Lean_Expr_constName(x_9); +x_141 = l_Lean_Expr_constName(x_16); +x_142 = lean_name_dec_eq(x_140, x_141); +lean_dec(x_141); +lean_dec(x_140); +if (x_142 == 0) +{ +x_46 = x_10; +goto block_126; +} +else +{ +lean_object* x_143; lean_object* x_144; lean_object* x_145; +lean_dec(x_15); +x_143 = l_Lean_Expr_constLevels(x_9); +lean_dec(x_9); +x_144 = l_Lean_Expr_constLevels(x_16); +lean_dec(x_16); +x_145 = l_List_mfor_u2082___main___at_Lean_TypeClass_Context_eUnify___main___spec__3(x_143, x_144, x_12); +return x_145; +} +} +} +} +else +{ +lean_object* x_146; lean_object* x_147; uint8_t x_148; +x_146 = l_Lean_Expr_fvarName(x_9); +x_147 = l_Lean_Expr_fvarName(x_16); +x_148 = lean_name_dec_eq(x_146, x_147); +lean_dec(x_147); +lean_dec(x_146); +if (x_148 == 0) +{ +uint8_t x_149; +x_149 = l_Lean_Expr_isConst(x_9); +if (x_149 == 0) +{ +x_46 = x_10; +goto block_126; +} +else +{ +uint8_t x_150; +x_150 = l_Lean_Expr_isConst(x_16); +if (x_150 == 0) +{ +x_46 = x_10; +goto block_126; +} +else +{ +lean_object* x_151; lean_object* x_152; uint8_t x_153; +x_151 = l_Lean_Expr_constName(x_9); +x_152 = l_Lean_Expr_constName(x_16); +x_153 = lean_name_dec_eq(x_151, x_152); +lean_dec(x_152); +lean_dec(x_151); +if (x_153 == 0) +{ +x_46 = x_10; +goto block_126; +} +else +{ +lean_object* x_154; lean_object* x_155; lean_object* x_156; +lean_dec(x_15); +x_154 = l_Lean_Expr_constLevels(x_9); +lean_dec(x_9); +x_155 = l_Lean_Expr_constLevels(x_16); +lean_dec(x_16); +x_156 = l_List_mfor_u2082___main___at_Lean_TypeClass_Context_eUnify___main___spec__3(x_154, x_155, x_12); +return x_156; +} +} +} +} +else +{ +lean_object* x_157; +lean_dec(x_12); +lean_dec(x_16); +lean_dec(x_9); +x_157 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_157, 0, x_10); +lean_ctor_set(x_157, 1, x_15); +return x_157; +} +} +} +} +block_166: +{ +uint8_t x_160; +lean_dec(x_159); +x_160 = l_Lean_Expr_isBVar(x_9); +if (x_160 == 0) +{ +x_127 = x_10; +goto block_158; +} +else +{ +uint8_t x_161; +x_161 = l_Lean_Expr_isBVar(x_16); +if (x_161 == 0) +{ +x_127 = x_10; +goto block_158; +} +else +{ +lean_object* x_162; lean_object* x_163; uint8_t x_164; +x_162 = l_Lean_Expr_bvarIdx(x_9); +x_163 = l_Lean_Expr_bvarIdx(x_16); +x_164 = lean_nat_dec_eq(x_162, x_163); +lean_dec(x_163); +lean_dec(x_162); +if (x_164 == 0) +{ +x_127 = x_10; +goto block_158; +} +else +{ +lean_object* x_165; +lean_dec(x_12); +lean_dec(x_16); +lean_dec(x_9); +x_165 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_165, 0, x_10); +lean_ctor_set(x_165, 1, x_15); +return x_165; +} +} +} +} +} +else +{ +lean_object* x_180; lean_object* x_181; lean_object* x_182; lean_object* x_183; lean_object* x_184; lean_object* x_213; lean_object* x_280; lean_object* x_312; uint8_t x_320; +x_180 = lean_ctor_get(x_12, 0); +x_181 = lean_ctor_get(x_12, 1); +lean_inc(x_181); +lean_inc(x_180); +lean_dec(x_12); +x_182 = l_Lean_TypeClass_Context_slowWhnf___main(x_180); +lean_dec(x_180); +lean_inc(x_181); +x_183 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_183, 0, x_10); +lean_ctor_set(x_183, 1, x_181); +x_320 = l_Lean_Expr_isMVar(x_9); +if (x_320 == 0) +{ +uint8_t x_321; +x_321 = l_Lean_TypeClass_Context_eIsMeta(x_182); +if (x_321 == 0) +{ +x_312 = x_10; +goto block_319; +} +else +{ +uint8_t x_322; +x_322 = l_Lean_TypeClass_Context_eIsMeta(x_9); +if (x_322 == 0) +{ +lean_dec(x_181); +x_1 = x_182; +x_2 = x_9; +x_3 = x_183; +goto _start; +} +else +{ +x_312 = x_10; +goto block_319; +} +} +} +else +{ +uint8_t x_324; +x_324 = l_Lean_Expr_isMVar(x_182); +if (x_324 == 0) +{ +uint8_t x_325; +x_325 = l_Lean_TypeClass_Context_eIsMeta(x_182); +if (x_325 == 0) +{ +x_312 = x_10; +goto block_319; +} +else +{ +uint8_t x_326; +x_326 = l_Lean_TypeClass_Context_eIsMeta(x_9); +if (x_326 == 0) +{ +lean_dec(x_181); +x_1 = x_182; +x_2 = x_9; +x_3 = x_183; +goto _start; +} +else +{ +x_312 = x_10; +goto block_319; +} +} +} +else +{ +uint8_t x_328; +x_328 = lean_expr_eqv(x_9, x_182); +if (x_328 == 0) +{ +uint8_t x_329; +x_329 = l_Lean_TypeClass_Context_eIsMeta(x_182); +if (x_329 == 0) +{ +x_312 = x_10; +goto block_319; +} +else +{ +uint8_t x_330; +x_330 = l_Lean_TypeClass_Context_eIsMeta(x_9); +if (x_330 == 0) +{ +lean_dec(x_181); +x_1 = x_182; +x_2 = x_9; +x_3 = x_183; +goto _start; +} +else +{ +x_312 = x_10; +goto block_319; +} +} +} +else +{ +lean_object* x_332; +lean_dec(x_183); +lean_dec(x_182); +lean_dec(x_9); +x_332 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_332, 0, x_10); +lean_ctor_set(x_332, 1, x_181); +return x_332; +} +} +} +block_212: +{ +uint8_t x_185; +lean_dec(x_184); +x_185 = l_Lean_TypeClass_Context_eIsMeta(x_9); +if (x_185 == 0) +{ +lean_object* x_186; lean_object* x_187; lean_object* x_188; lean_object* x_189; lean_object* x_190; lean_object* x_191; lean_object* x_192; lean_object* x_193; +lean_dec(x_183); +x_186 = lean_expr_dbg_to_string(x_9); +lean_dec(x_9); +x_187 = l_Lean_TypeClass_Context_eUnify___main___closed__1; +x_188 = lean_string_append(x_187, x_186); +lean_dec(x_186); +x_189 = l_Lean_TypeClass_Context_uUnify___main___closed__2; +x_190 = lean_string_append(x_188, x_189); +x_191 = lean_expr_dbg_to_string(x_182); +lean_dec(x_182); +x_192 = lean_string_append(x_190, x_191); +lean_dec(x_191); +x_193 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_193, 0, x_192); +lean_ctor_set(x_193, 1, x_181); +return x_193; +} +else +{ +uint8_t x_194; +lean_inc(x_9); +lean_inc(x_182); +x_194 = l_Lean_TypeClass_Context_eOccursIn(x_182, x_9); +if (x_194 == 0) +{ +lean_object* x_195; +lean_dec(x_181); +x_195 = l_Lean_TypeClass_Context_eMetaIdx(x_9); +lean_dec(x_9); +if (lean_obj_tag(x_195) == 0) +{ +lean_object* x_196; lean_object* x_197; lean_object* x_198; lean_object* x_199; lean_object* x_200; +lean_dec(x_182); +x_196 = l_Lean_TypeClass_Context_eInfer___closed__1; +x_197 = lean_unsigned_to_nat(215u); +x_198 = lean_unsigned_to_nat(20u); +x_199 = l_Lean_TypeClass_Context_eUnify___main___closed__2; +x_200 = l_panicWithPos___at_Lean_TypeClass_Context_eUnify___main___spec__1(x_196, x_197, x_198, x_199, x_183); +return x_200; +} +else +{ +lean_object* x_201; lean_object* x_202; lean_object* x_203; +x_201 = lean_ctor_get(x_195, 0); +lean_inc(x_201); +lean_dec(x_195); +x_202 = lean_alloc_closure((void*)(l_Lean_TypeClass_Context_eAssignIdx___boxed), 3, 2); +lean_closure_set(x_202, 0, x_201); +lean_closure_set(x_202, 1, x_182); +x_203 = l_EState_fromState___rarg(x_202, x_183); +return x_203; +} +} +else +{ +lean_object* x_204; lean_object* x_205; lean_object* x_206; lean_object* x_207; lean_object* x_208; lean_object* x_209; lean_object* x_210; lean_object* x_211; +lean_dec(x_183); +x_204 = lean_expr_dbg_to_string(x_9); +lean_dec(x_9); +x_205 = l_Lean_TypeClass_Context_eUnify___main___closed__1; +x_206 = lean_string_append(x_205, x_204); +lean_dec(x_204); +x_207 = l_Lean_TypeClass_Context_uUnify___main___closed__2; +x_208 = lean_string_append(x_206, x_207); +x_209 = lean_expr_dbg_to_string(x_182); +lean_dec(x_182); +x_210 = lean_string_append(x_208, x_209); +lean_dec(x_209); +x_211 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_211, 0, x_210); +lean_ctor_set(x_211, 1, x_181); +return x_211; +} +} +} +block_279: +{ +uint8_t x_214; +lean_dec(x_213); +x_214 = l_Lean_Expr_isApp(x_9); +if (x_214 == 0) +{ +uint8_t x_215; +x_215 = l_Lean_Expr_isForall(x_9); +if (x_215 == 0) +{ +x_184 = x_10; +goto block_212; +} +else +{ +uint8_t x_216; +x_216 = l_Lean_Expr_isForall(x_182); +if (x_216 == 0) +{ +x_184 = x_10; +goto block_212; +} +else +{ +lean_object* x_217; lean_object* x_218; lean_object* x_219; +lean_dec(x_181); +x_217 = l_Lean_Expr_bindingDomain(x_9); +x_218 = l_Lean_Expr_bindingDomain(x_182); +x_219 = l_Lean_TypeClass_Context_eUnify___main(x_217, x_218, x_183); +if (lean_obj_tag(x_219) == 0) +{ +lean_object* x_220; lean_object* x_221; lean_object* x_222; lean_object* x_223; lean_object* x_224; +x_220 = lean_ctor_get(x_219, 1); +lean_inc(x_220); +if (lean_is_exclusive(x_219)) { + lean_ctor_release(x_219, 0); + lean_ctor_release(x_219, 1); + x_221 = x_219; +} else { + lean_dec_ref(x_219); + x_221 = lean_box(0); +} +if (lean_is_scalar(x_221)) { + x_222 = lean_alloc_ctor(0, 2, 0); +} else { + x_222 = x_221; +} +lean_ctor_set(x_222, 0, x_10); +lean_ctor_set(x_222, 1, x_220); +x_223 = l_Lean_Expr_bindingBody(x_9); +lean_dec(x_9); +x_224 = l_Lean_Expr_bindingBody(x_182); +lean_dec(x_182); +x_1 = x_223; +x_2 = x_224; +x_3 = x_222; +goto _start; +} +else +{ +lean_object* x_226; lean_object* x_227; lean_object* x_228; lean_object* x_229; +lean_dec(x_182); +lean_dec(x_9); +x_226 = lean_ctor_get(x_219, 0); +lean_inc(x_226); +x_227 = lean_ctor_get(x_219, 1); +lean_inc(x_227); +if (lean_is_exclusive(x_219)) { + lean_ctor_release(x_219, 0); + lean_ctor_release(x_219, 1); + x_228 = x_219; +} else { + lean_dec_ref(x_219); + x_228 = lean_box(0); +} +if (lean_is_scalar(x_228)) { + x_229 = lean_alloc_ctor(1, 2, 0); +} else { + x_229 = x_228; +} +lean_ctor_set(x_229, 0, x_226); +lean_ctor_set(x_229, 1, x_227); +return x_229; +} +} +} +} +else +{ +uint8_t x_230; +x_230 = l_Lean_Expr_isApp(x_182); +if (x_230 == 0) +{ +uint8_t x_231; +x_231 = l_Lean_Expr_isForall(x_9); +if (x_231 == 0) +{ +x_184 = x_10; +goto block_212; +} +else +{ +uint8_t x_232; +x_232 = l_Lean_Expr_isForall(x_182); +if (x_232 == 0) +{ +x_184 = x_10; +goto block_212; +} +else +{ +lean_object* x_233; lean_object* x_234; lean_object* x_235; +lean_dec(x_181); +x_233 = l_Lean_Expr_bindingDomain(x_9); +x_234 = l_Lean_Expr_bindingDomain(x_182); +x_235 = l_Lean_TypeClass_Context_eUnify___main(x_233, x_234, x_183); +if (lean_obj_tag(x_235) == 0) +{ +lean_object* x_236; lean_object* x_237; lean_object* x_238; lean_object* x_239; lean_object* x_240; +x_236 = lean_ctor_get(x_235, 1); +lean_inc(x_236); +if (lean_is_exclusive(x_235)) { + lean_ctor_release(x_235, 0); + lean_ctor_release(x_235, 1); + x_237 = x_235; +} else { + lean_dec_ref(x_235); + x_237 = lean_box(0); +} +if (lean_is_scalar(x_237)) { + x_238 = lean_alloc_ctor(0, 2, 0); +} else { + x_238 = x_237; +} +lean_ctor_set(x_238, 0, x_10); +lean_ctor_set(x_238, 1, x_236); +x_239 = l_Lean_Expr_bindingBody(x_9); +lean_dec(x_9); +x_240 = l_Lean_Expr_bindingBody(x_182); +lean_dec(x_182); +x_1 = x_239; +x_2 = x_240; +x_3 = x_238; +goto _start; +} +else +{ +lean_object* x_242; lean_object* x_243; lean_object* x_244; lean_object* x_245; +lean_dec(x_182); +lean_dec(x_9); +x_242 = lean_ctor_get(x_235, 0); +lean_inc(x_242); +x_243 = lean_ctor_get(x_235, 1); +lean_inc(x_243); +if (lean_is_exclusive(x_235)) { + lean_ctor_release(x_235, 0); + lean_ctor_release(x_235, 1); + x_244 = x_235; +} else { + lean_dec_ref(x_235); + x_244 = lean_box(0); +} +if (lean_is_scalar(x_244)) { + x_245 = lean_alloc_ctor(1, 2, 0); +} else { + x_245 = x_244; +} +lean_ctor_set(x_245, 0, x_242); +lean_ctor_set(x_245, 1, x_243); +return x_245; +} +} +} +} +else +{ +lean_object* x_246; lean_object* x_247; lean_object* x_248; lean_object* x_249; lean_object* x_250; lean_object* x_251; uint8_t x_252; +x_246 = lean_box(0); +x_247 = l_Lean_Expr_getAppArgsAux___main(x_9, x_246); +x_248 = lean_unsigned_to_nat(0u); +x_249 = l_List_lengthAux___main___rarg(x_247, x_248); +x_250 = l_Lean_Expr_getAppArgsAux___main(x_182, x_246); +x_251 = l_List_lengthAux___main___rarg(x_250, x_248); +x_252 = lean_nat_dec_eq(x_249, x_251); +lean_dec(x_251); +lean_dec(x_249); +if (x_252 == 0) +{ +uint8_t x_253; +lean_dec(x_250); +lean_dec(x_247); +x_253 = l_Lean_Expr_isForall(x_9); +if (x_253 == 0) +{ +x_184 = x_10; +goto block_212; +} +else +{ +uint8_t x_254; +x_254 = l_Lean_Expr_isForall(x_182); +if (x_254 == 0) +{ +x_184 = x_10; +goto block_212; +} +else +{ +lean_object* x_255; lean_object* x_256; lean_object* x_257; +lean_dec(x_181); +x_255 = l_Lean_Expr_bindingDomain(x_9); +x_256 = l_Lean_Expr_bindingDomain(x_182); +x_257 = l_Lean_TypeClass_Context_eUnify___main(x_255, x_256, x_183); +if (lean_obj_tag(x_257) == 0) +{ +lean_object* x_258; lean_object* x_259; lean_object* x_260; lean_object* x_261; lean_object* x_262; +x_258 = lean_ctor_get(x_257, 1); +lean_inc(x_258); +if (lean_is_exclusive(x_257)) { + lean_ctor_release(x_257, 0); + lean_ctor_release(x_257, 1); + x_259 = x_257; +} else { + lean_dec_ref(x_257); + x_259 = lean_box(0); +} +if (lean_is_scalar(x_259)) { + x_260 = lean_alloc_ctor(0, 2, 0); +} else { + x_260 = x_259; +} +lean_ctor_set(x_260, 0, x_10); +lean_ctor_set(x_260, 1, x_258); +x_261 = l_Lean_Expr_bindingBody(x_9); +lean_dec(x_9); +x_262 = l_Lean_Expr_bindingBody(x_182); +lean_dec(x_182); +x_1 = x_261; +x_2 = x_262; +x_3 = x_260; +goto _start; +} +else +{ +lean_object* x_264; lean_object* x_265; lean_object* x_266; lean_object* x_267; +lean_dec(x_182); +lean_dec(x_9); +x_264 = lean_ctor_get(x_257, 0); +lean_inc(x_264); +x_265 = lean_ctor_get(x_257, 1); +lean_inc(x_265); +if (lean_is_exclusive(x_257)) { + lean_ctor_release(x_257, 0); + lean_ctor_release(x_257, 1); + x_266 = x_257; +} else { + lean_dec_ref(x_257); + x_266 = lean_box(0); +} +if (lean_is_scalar(x_266)) { + x_267 = lean_alloc_ctor(1, 2, 0); +} else { + x_267 = x_266; +} +lean_ctor_set(x_267, 0, x_264); +lean_ctor_set(x_267, 1, x_265); +return x_267; +} +} +} +} +else +{ +lean_object* x_268; lean_object* x_269; lean_object* x_270; +lean_dec(x_181); +x_268 = l_Lean_Expr_getAppFn___main(x_9); +lean_dec(x_9); +x_269 = l_Lean_Expr_getAppFn___main(x_182); +lean_dec(x_182); +x_270 = l_Lean_TypeClass_Context_eUnify___main(x_268, x_269, x_183); +if (lean_obj_tag(x_270) == 0) +{ +lean_object* x_271; lean_object* x_272; lean_object* x_273; lean_object* x_274; +x_271 = lean_ctor_get(x_270, 1); +lean_inc(x_271); +if (lean_is_exclusive(x_270)) { + lean_ctor_release(x_270, 0); + lean_ctor_release(x_270, 1); + x_272 = x_270; +} else { + lean_dec_ref(x_270); + x_272 = lean_box(0); +} +if (lean_is_scalar(x_272)) { + x_273 = lean_alloc_ctor(0, 2, 0); +} else { + x_273 = x_272; +} +lean_ctor_set(x_273, 0, x_10); +lean_ctor_set(x_273, 1, x_271); +x_274 = l_List_mfor_u2082___main___at_Lean_TypeClass_Context_eUnify___main___spec__2(x_247, x_250, x_273); +return x_274; +} +else +{ +lean_object* x_275; lean_object* x_276; lean_object* x_277; lean_object* x_278; +lean_dec(x_250); +lean_dec(x_247); +x_275 = lean_ctor_get(x_270, 0); +lean_inc(x_275); +x_276 = lean_ctor_get(x_270, 1); +lean_inc(x_276); +if (lean_is_exclusive(x_270)) { + lean_ctor_release(x_270, 0); + lean_ctor_release(x_270, 1); + x_277 = x_270; +} else { + lean_dec_ref(x_270); + x_277 = lean_box(0); +} +if (lean_is_scalar(x_277)) { + x_278 = lean_alloc_ctor(1, 2, 0); +} else { + x_278 = x_277; +} +lean_ctor_set(x_278, 0, x_275); +lean_ctor_set(x_278, 1, x_276); +return x_278; +} +} +} +} +} +block_311: +{ +uint8_t x_281; +lean_dec(x_280); +x_281 = l_Lean_Expr_isFVar(x_9); +if (x_281 == 0) +{ +uint8_t x_282; +x_282 = l_Lean_Expr_isConst(x_9); +if (x_282 == 0) +{ +x_213 = x_10; +goto block_279; +} +else +{ +uint8_t x_283; +x_283 = l_Lean_Expr_isConst(x_182); +if (x_283 == 0) +{ +x_213 = x_10; +goto block_279; +} +else +{ +lean_object* x_284; lean_object* x_285; uint8_t x_286; +x_284 = l_Lean_Expr_constName(x_9); +x_285 = l_Lean_Expr_constName(x_182); +x_286 = lean_name_dec_eq(x_284, x_285); +lean_dec(x_285); +lean_dec(x_284); +if (x_286 == 0) +{ +x_213 = x_10; +goto block_279; +} +else +{ +lean_object* x_287; lean_object* x_288; lean_object* x_289; +lean_dec(x_181); +x_287 = l_Lean_Expr_constLevels(x_9); +lean_dec(x_9); +x_288 = l_Lean_Expr_constLevels(x_182); +lean_dec(x_182); +x_289 = l_List_mfor_u2082___main___at_Lean_TypeClass_Context_eUnify___main___spec__3(x_287, x_288, x_183); +return x_289; +} +} +} +} +else +{ +uint8_t x_290; +x_290 = l_Lean_Expr_isFVar(x_182); +if (x_290 == 0) +{ +uint8_t x_291; +x_291 = l_Lean_Expr_isConst(x_9); +if (x_291 == 0) +{ +x_213 = x_10; +goto block_279; +} +else +{ +uint8_t x_292; +x_292 = l_Lean_Expr_isConst(x_182); +if (x_292 == 0) +{ +x_213 = x_10; +goto block_279; +} +else +{ +lean_object* x_293; lean_object* x_294; uint8_t x_295; +x_293 = l_Lean_Expr_constName(x_9); +x_294 = l_Lean_Expr_constName(x_182); +x_295 = lean_name_dec_eq(x_293, x_294); +lean_dec(x_294); +lean_dec(x_293); +if (x_295 == 0) +{ +x_213 = x_10; +goto block_279; +} +else +{ +lean_object* x_296; lean_object* x_297; lean_object* x_298; +lean_dec(x_181); +x_296 = l_Lean_Expr_constLevels(x_9); +lean_dec(x_9); +x_297 = l_Lean_Expr_constLevels(x_182); +lean_dec(x_182); +x_298 = l_List_mfor_u2082___main___at_Lean_TypeClass_Context_eUnify___main___spec__3(x_296, x_297, x_183); +return x_298; +} +} +} +} +else +{ +lean_object* x_299; lean_object* x_300; uint8_t x_301; +x_299 = l_Lean_Expr_fvarName(x_9); +x_300 = l_Lean_Expr_fvarName(x_182); +x_301 = lean_name_dec_eq(x_299, x_300); +lean_dec(x_300); +lean_dec(x_299); +if (x_301 == 0) +{ +uint8_t x_302; +x_302 = l_Lean_Expr_isConst(x_9); +if (x_302 == 0) +{ +x_213 = x_10; +goto block_279; +} +else +{ +uint8_t x_303; +x_303 = l_Lean_Expr_isConst(x_182); +if (x_303 == 0) +{ +x_213 = x_10; +goto block_279; +} +else +{ +lean_object* x_304; lean_object* x_305; uint8_t x_306; +x_304 = l_Lean_Expr_constName(x_9); +x_305 = l_Lean_Expr_constName(x_182); +x_306 = lean_name_dec_eq(x_304, x_305); +lean_dec(x_305); +lean_dec(x_304); +if (x_306 == 0) +{ +x_213 = x_10; +goto block_279; +} +else +{ +lean_object* x_307; lean_object* x_308; lean_object* x_309; +lean_dec(x_181); +x_307 = l_Lean_Expr_constLevels(x_9); +lean_dec(x_9); +x_308 = l_Lean_Expr_constLevels(x_182); +lean_dec(x_182); +x_309 = l_List_mfor_u2082___main___at_Lean_TypeClass_Context_eUnify___main___spec__3(x_307, x_308, x_183); +return x_309; +} +} +} +} +else +{ +lean_object* x_310; +lean_dec(x_183); +lean_dec(x_182); +lean_dec(x_9); +x_310 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_310, 0, x_10); +lean_ctor_set(x_310, 1, x_181); +return x_310; +} +} +} +} +block_319: +{ +uint8_t x_313; +lean_dec(x_312); +x_313 = l_Lean_Expr_isBVar(x_9); +if (x_313 == 0) +{ +x_280 = x_10; +goto block_311; +} +else +{ +uint8_t x_314; +x_314 = l_Lean_Expr_isBVar(x_182); +if (x_314 == 0) +{ +x_280 = x_10; +goto block_311; +} +else +{ +lean_object* x_315; lean_object* x_316; uint8_t x_317; +x_315 = l_Lean_Expr_bvarIdx(x_9); +x_316 = l_Lean_Expr_bvarIdx(x_182); +x_317 = lean_nat_dec_eq(x_315, x_316); +lean_dec(x_316); +lean_dec(x_315); +if (x_317 == 0) +{ +x_280 = x_10; +goto block_311; +} +else +{ +lean_object* x_318; +lean_dec(x_183); +lean_dec(x_182); +lean_dec(x_9); +x_318 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_318, 0, x_10); +lean_ctor_set(x_318, 1, x_181); +return x_318; +} +} +} +} +} +} +else +{ +uint8_t x_333; +lean_dec(x_9); +x_333 = !lean_is_exclusive(x_12); +if (x_333 == 0) +{ +return x_12; +} +else +{ +lean_object* x_334; lean_object* x_335; lean_object* x_336; +x_334 = lean_ctor_get(x_12, 0); +x_335 = lean_ctor_get(x_12, 1); +lean_inc(x_335); +lean_inc(x_334); +lean_dec(x_12); +x_336 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_336, 0, x_334); +lean_ctor_set(x_336, 1, x_335); +return x_336; +} +} +} +else +{ +lean_object* x_337; lean_object* x_338; lean_object* x_339; lean_object* x_340; lean_object* x_341; lean_object* x_342; lean_object* x_343; +x_337 = lean_ctor_get(x_6, 0); +x_338 = lean_ctor_get(x_6, 1); +lean_inc(x_338); +lean_inc(x_337); +lean_dec(x_6); +x_339 = l_Lean_TypeClass_Context_slowWhnf___main(x_337); +lean_dec(x_337); +x_340 = lean_box(0); +x_341 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_341, 0, x_340); +lean_ctor_set(x_341, 1, x_338); +x_342 = lean_alloc_closure((void*)(l_Lean_TypeClass_Context_eShallowInstantiate), 2, 1); +lean_closure_set(x_342, 0, x_2); +x_343 = l_EState_fromState___rarg(x_342, x_341); +if (lean_obj_tag(x_343) == 0) +{ +lean_object* x_344; lean_object* x_345; lean_object* x_346; lean_object* x_347; lean_object* x_348; lean_object* x_349; lean_object* x_378; lean_object* x_445; lean_object* x_477; uint8_t x_485; +x_344 = lean_ctor_get(x_343, 0); +lean_inc(x_344); +x_345 = lean_ctor_get(x_343, 1); +lean_inc(x_345); +if (lean_is_exclusive(x_343)) { + lean_ctor_release(x_343, 0); + lean_ctor_release(x_343, 1); + x_346 = x_343; +} else { + lean_dec_ref(x_343); + x_346 = lean_box(0); +} +x_347 = l_Lean_TypeClass_Context_slowWhnf___main(x_344); +lean_dec(x_344); +lean_inc(x_345); +if (lean_is_scalar(x_346)) { + x_348 = lean_alloc_ctor(0, 2, 0); +} else { + x_348 = x_346; +} +lean_ctor_set(x_348, 0, x_340); +lean_ctor_set(x_348, 1, x_345); +x_485 = l_Lean_Expr_isMVar(x_339); +if (x_485 == 0) +{ +uint8_t x_486; +x_486 = l_Lean_TypeClass_Context_eIsMeta(x_347); +if (x_486 == 0) +{ +x_477 = x_340; +goto block_484; +} +else +{ +uint8_t x_487; +x_487 = l_Lean_TypeClass_Context_eIsMeta(x_339); +if (x_487 == 0) +{ +lean_dec(x_345); +x_1 = x_347; +x_2 = x_339; +x_3 = x_348; +goto _start; +} +else +{ +x_477 = x_340; +goto block_484; +} +} +} +else +{ +uint8_t x_489; +x_489 = l_Lean_Expr_isMVar(x_347); +if (x_489 == 0) +{ +uint8_t x_490; +x_490 = l_Lean_TypeClass_Context_eIsMeta(x_347); +if (x_490 == 0) +{ +x_477 = x_340; +goto block_484; +} +else +{ +uint8_t x_491; +x_491 = l_Lean_TypeClass_Context_eIsMeta(x_339); +if (x_491 == 0) +{ +lean_dec(x_345); +x_1 = x_347; +x_2 = x_339; +x_3 = x_348; +goto _start; +} +else +{ +x_477 = x_340; +goto block_484; +} +} +} +else +{ +uint8_t x_493; +x_493 = lean_expr_eqv(x_339, x_347); +if (x_493 == 0) +{ +uint8_t x_494; +x_494 = l_Lean_TypeClass_Context_eIsMeta(x_347); +if (x_494 == 0) +{ +x_477 = x_340; +goto block_484; +} +else +{ +uint8_t x_495; +x_495 = l_Lean_TypeClass_Context_eIsMeta(x_339); +if (x_495 == 0) +{ +lean_dec(x_345); +x_1 = x_347; +x_2 = x_339; +x_3 = x_348; +goto _start; +} +else +{ +x_477 = x_340; +goto block_484; +} +} +} +else +{ +lean_object* x_497; +lean_dec(x_348); +lean_dec(x_347); +lean_dec(x_339); +x_497 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_497, 0, x_340); +lean_ctor_set(x_497, 1, x_345); +return x_497; +} +} +} +block_377: +{ +uint8_t x_350; +lean_dec(x_349); +x_350 = l_Lean_TypeClass_Context_eIsMeta(x_339); +if (x_350 == 0) +{ +lean_object* x_351; lean_object* x_352; lean_object* x_353; lean_object* x_354; lean_object* x_355; lean_object* x_356; lean_object* x_357; lean_object* x_358; +lean_dec(x_348); +x_351 = lean_expr_dbg_to_string(x_339); +lean_dec(x_339); +x_352 = l_Lean_TypeClass_Context_eUnify___main___closed__1; +x_353 = lean_string_append(x_352, x_351); +lean_dec(x_351); +x_354 = l_Lean_TypeClass_Context_uUnify___main___closed__2; +x_355 = lean_string_append(x_353, x_354); +x_356 = lean_expr_dbg_to_string(x_347); +lean_dec(x_347); +x_357 = lean_string_append(x_355, x_356); +lean_dec(x_356); +x_358 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_358, 0, x_357); +lean_ctor_set(x_358, 1, x_345); +return x_358; +} +else +{ +uint8_t x_359; +lean_inc(x_339); +lean_inc(x_347); +x_359 = l_Lean_TypeClass_Context_eOccursIn(x_347, x_339); +if (x_359 == 0) +{ +lean_object* x_360; +lean_dec(x_345); +x_360 = l_Lean_TypeClass_Context_eMetaIdx(x_339); +lean_dec(x_339); +if (lean_obj_tag(x_360) == 0) +{ +lean_object* x_361; lean_object* x_362; lean_object* x_363; lean_object* x_364; lean_object* x_365; +lean_dec(x_347); +x_361 = l_Lean_TypeClass_Context_eInfer___closed__1; +x_362 = lean_unsigned_to_nat(215u); +x_363 = lean_unsigned_to_nat(20u); +x_364 = l_Lean_TypeClass_Context_eUnify___main___closed__2; +x_365 = l_panicWithPos___at_Lean_TypeClass_Context_eUnify___main___spec__1(x_361, x_362, x_363, x_364, x_348); +return x_365; +} +else +{ +lean_object* x_366; lean_object* x_367; lean_object* x_368; +x_366 = lean_ctor_get(x_360, 0); +lean_inc(x_366); +lean_dec(x_360); +x_367 = lean_alloc_closure((void*)(l_Lean_TypeClass_Context_eAssignIdx___boxed), 3, 2); +lean_closure_set(x_367, 0, x_366); +lean_closure_set(x_367, 1, x_347); +x_368 = l_EState_fromState___rarg(x_367, x_348); +return x_368; +} +} +else +{ +lean_object* x_369; lean_object* x_370; lean_object* x_371; lean_object* x_372; lean_object* x_373; lean_object* x_374; lean_object* x_375; lean_object* x_376; +lean_dec(x_348); +x_369 = lean_expr_dbg_to_string(x_339); +lean_dec(x_339); +x_370 = l_Lean_TypeClass_Context_eUnify___main___closed__1; +x_371 = lean_string_append(x_370, x_369); +lean_dec(x_369); +x_372 = l_Lean_TypeClass_Context_uUnify___main___closed__2; +x_373 = lean_string_append(x_371, x_372); +x_374 = lean_expr_dbg_to_string(x_347); +lean_dec(x_347); +x_375 = lean_string_append(x_373, x_374); +lean_dec(x_374); +x_376 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_376, 0, x_375); +lean_ctor_set(x_376, 1, x_345); +return x_376; +} +} +} +block_444: +{ +uint8_t x_379; +lean_dec(x_378); +x_379 = l_Lean_Expr_isApp(x_339); +if (x_379 == 0) +{ +uint8_t x_380; +x_380 = l_Lean_Expr_isForall(x_339); +if (x_380 == 0) +{ +x_349 = x_340; +goto block_377; +} +else +{ +uint8_t x_381; +x_381 = l_Lean_Expr_isForall(x_347); +if (x_381 == 0) +{ +x_349 = x_340; +goto block_377; +} +else +{ +lean_object* x_382; lean_object* x_383; lean_object* x_384; +lean_dec(x_345); +x_382 = l_Lean_Expr_bindingDomain(x_339); +x_383 = l_Lean_Expr_bindingDomain(x_347); +x_384 = l_Lean_TypeClass_Context_eUnify___main(x_382, x_383, x_348); +if (lean_obj_tag(x_384) == 0) +{ +lean_object* x_385; lean_object* x_386; lean_object* x_387; lean_object* x_388; lean_object* x_389; +x_385 = lean_ctor_get(x_384, 1); +lean_inc(x_385); +if (lean_is_exclusive(x_384)) { + lean_ctor_release(x_384, 0); + lean_ctor_release(x_384, 1); + x_386 = x_384; +} else { + lean_dec_ref(x_384); + x_386 = lean_box(0); +} +if (lean_is_scalar(x_386)) { + x_387 = lean_alloc_ctor(0, 2, 0); +} else { + x_387 = x_386; +} +lean_ctor_set(x_387, 0, x_340); +lean_ctor_set(x_387, 1, x_385); +x_388 = l_Lean_Expr_bindingBody(x_339); +lean_dec(x_339); +x_389 = l_Lean_Expr_bindingBody(x_347); +lean_dec(x_347); +x_1 = x_388; +x_2 = x_389; +x_3 = x_387; +goto _start; +} +else +{ +lean_object* x_391; lean_object* x_392; lean_object* x_393; lean_object* x_394; +lean_dec(x_347); +lean_dec(x_339); +x_391 = lean_ctor_get(x_384, 0); +lean_inc(x_391); +x_392 = lean_ctor_get(x_384, 1); +lean_inc(x_392); +if (lean_is_exclusive(x_384)) { + lean_ctor_release(x_384, 0); + lean_ctor_release(x_384, 1); + x_393 = x_384; +} else { + lean_dec_ref(x_384); + x_393 = lean_box(0); +} +if (lean_is_scalar(x_393)) { + x_394 = lean_alloc_ctor(1, 2, 0); +} else { + x_394 = x_393; +} +lean_ctor_set(x_394, 0, x_391); +lean_ctor_set(x_394, 1, x_392); +return x_394; +} +} +} +} +else +{ +uint8_t x_395; +x_395 = l_Lean_Expr_isApp(x_347); +if (x_395 == 0) +{ +uint8_t x_396; +x_396 = l_Lean_Expr_isForall(x_339); +if (x_396 == 0) +{ +x_349 = x_340; +goto block_377; +} +else +{ +uint8_t x_397; +x_397 = l_Lean_Expr_isForall(x_347); +if (x_397 == 0) +{ +x_349 = x_340; +goto block_377; +} +else +{ +lean_object* x_398; lean_object* x_399; lean_object* x_400; +lean_dec(x_345); +x_398 = l_Lean_Expr_bindingDomain(x_339); +x_399 = l_Lean_Expr_bindingDomain(x_347); +x_400 = l_Lean_TypeClass_Context_eUnify___main(x_398, x_399, x_348); +if (lean_obj_tag(x_400) == 0) +{ +lean_object* x_401; lean_object* x_402; lean_object* x_403; lean_object* x_404; lean_object* x_405; +x_401 = lean_ctor_get(x_400, 1); +lean_inc(x_401); +if (lean_is_exclusive(x_400)) { + lean_ctor_release(x_400, 0); + lean_ctor_release(x_400, 1); + x_402 = x_400; +} else { + lean_dec_ref(x_400); + x_402 = lean_box(0); +} +if (lean_is_scalar(x_402)) { + x_403 = lean_alloc_ctor(0, 2, 0); +} else { + x_403 = x_402; +} +lean_ctor_set(x_403, 0, x_340); +lean_ctor_set(x_403, 1, x_401); +x_404 = l_Lean_Expr_bindingBody(x_339); +lean_dec(x_339); +x_405 = l_Lean_Expr_bindingBody(x_347); +lean_dec(x_347); +x_1 = x_404; +x_2 = x_405; +x_3 = x_403; +goto _start; +} +else +{ +lean_object* x_407; lean_object* x_408; lean_object* x_409; lean_object* x_410; +lean_dec(x_347); +lean_dec(x_339); +x_407 = lean_ctor_get(x_400, 0); +lean_inc(x_407); +x_408 = lean_ctor_get(x_400, 1); +lean_inc(x_408); +if (lean_is_exclusive(x_400)) { + lean_ctor_release(x_400, 0); + lean_ctor_release(x_400, 1); + x_409 = x_400; +} else { + lean_dec_ref(x_400); + x_409 = lean_box(0); +} +if (lean_is_scalar(x_409)) { + x_410 = lean_alloc_ctor(1, 2, 0); +} else { + x_410 = x_409; +} +lean_ctor_set(x_410, 0, x_407); +lean_ctor_set(x_410, 1, x_408); +return x_410; +} +} +} +} +else +{ +lean_object* x_411; lean_object* x_412; lean_object* x_413; lean_object* x_414; lean_object* x_415; lean_object* x_416; uint8_t x_417; +x_411 = lean_box(0); +x_412 = l_Lean_Expr_getAppArgsAux___main(x_339, x_411); +x_413 = lean_unsigned_to_nat(0u); +x_414 = l_List_lengthAux___main___rarg(x_412, x_413); +x_415 = l_Lean_Expr_getAppArgsAux___main(x_347, x_411); +x_416 = l_List_lengthAux___main___rarg(x_415, x_413); +x_417 = lean_nat_dec_eq(x_414, x_416); +lean_dec(x_416); +lean_dec(x_414); +if (x_417 == 0) +{ +uint8_t x_418; +lean_dec(x_415); +lean_dec(x_412); +x_418 = l_Lean_Expr_isForall(x_339); +if (x_418 == 0) +{ +x_349 = x_340; +goto block_377; +} +else +{ +uint8_t x_419; +x_419 = l_Lean_Expr_isForall(x_347); +if (x_419 == 0) +{ +x_349 = x_340; +goto block_377; +} +else +{ +lean_object* x_420; lean_object* x_421; lean_object* x_422; +lean_dec(x_345); +x_420 = l_Lean_Expr_bindingDomain(x_339); +x_421 = l_Lean_Expr_bindingDomain(x_347); +x_422 = l_Lean_TypeClass_Context_eUnify___main(x_420, x_421, x_348); +if (lean_obj_tag(x_422) == 0) +{ +lean_object* x_423; lean_object* x_424; lean_object* x_425; lean_object* x_426; lean_object* x_427; +x_423 = lean_ctor_get(x_422, 1); +lean_inc(x_423); +if (lean_is_exclusive(x_422)) { + lean_ctor_release(x_422, 0); + lean_ctor_release(x_422, 1); + x_424 = x_422; +} else { + lean_dec_ref(x_422); + x_424 = lean_box(0); +} +if (lean_is_scalar(x_424)) { + x_425 = lean_alloc_ctor(0, 2, 0); +} else { + x_425 = x_424; +} +lean_ctor_set(x_425, 0, x_340); +lean_ctor_set(x_425, 1, x_423); +x_426 = l_Lean_Expr_bindingBody(x_339); +lean_dec(x_339); +x_427 = l_Lean_Expr_bindingBody(x_347); +lean_dec(x_347); +x_1 = x_426; +x_2 = x_427; +x_3 = x_425; +goto _start; +} +else +{ +lean_object* x_429; lean_object* x_430; lean_object* x_431; lean_object* x_432; +lean_dec(x_347); +lean_dec(x_339); +x_429 = lean_ctor_get(x_422, 0); +lean_inc(x_429); +x_430 = lean_ctor_get(x_422, 1); +lean_inc(x_430); +if (lean_is_exclusive(x_422)) { + lean_ctor_release(x_422, 0); + lean_ctor_release(x_422, 1); + x_431 = x_422; +} else { + lean_dec_ref(x_422); + x_431 = lean_box(0); +} +if (lean_is_scalar(x_431)) { + x_432 = lean_alloc_ctor(1, 2, 0); +} else { + x_432 = x_431; +} +lean_ctor_set(x_432, 0, x_429); +lean_ctor_set(x_432, 1, x_430); +return x_432; +} +} +} +} +else +{ +lean_object* x_433; lean_object* x_434; lean_object* x_435; +lean_dec(x_345); +x_433 = l_Lean_Expr_getAppFn___main(x_339); +lean_dec(x_339); +x_434 = l_Lean_Expr_getAppFn___main(x_347); +lean_dec(x_347); +x_435 = l_Lean_TypeClass_Context_eUnify___main(x_433, x_434, x_348); +if (lean_obj_tag(x_435) == 0) +{ +lean_object* x_436; lean_object* x_437; lean_object* x_438; lean_object* x_439; +x_436 = lean_ctor_get(x_435, 1); +lean_inc(x_436); +if (lean_is_exclusive(x_435)) { + lean_ctor_release(x_435, 0); + lean_ctor_release(x_435, 1); + x_437 = x_435; +} else { + lean_dec_ref(x_435); + x_437 = lean_box(0); +} +if (lean_is_scalar(x_437)) { + x_438 = lean_alloc_ctor(0, 2, 0); +} else { + x_438 = x_437; +} +lean_ctor_set(x_438, 0, x_340); +lean_ctor_set(x_438, 1, x_436); +x_439 = l_List_mfor_u2082___main___at_Lean_TypeClass_Context_eUnify___main___spec__2(x_412, x_415, x_438); +return x_439; +} +else +{ +lean_object* x_440; lean_object* x_441; lean_object* x_442; lean_object* x_443; +lean_dec(x_415); +lean_dec(x_412); +x_440 = lean_ctor_get(x_435, 0); +lean_inc(x_440); +x_441 = lean_ctor_get(x_435, 1); +lean_inc(x_441); +if (lean_is_exclusive(x_435)) { + lean_ctor_release(x_435, 0); + lean_ctor_release(x_435, 1); + x_442 = x_435; +} else { + lean_dec_ref(x_435); + x_442 = lean_box(0); +} +if (lean_is_scalar(x_442)) { + x_443 = lean_alloc_ctor(1, 2, 0); +} else { + x_443 = x_442; +} +lean_ctor_set(x_443, 0, x_440); +lean_ctor_set(x_443, 1, x_441); +return x_443; +} +} +} +} +} +block_476: +{ +uint8_t x_446; +lean_dec(x_445); +x_446 = l_Lean_Expr_isFVar(x_339); +if (x_446 == 0) +{ +uint8_t x_447; +x_447 = l_Lean_Expr_isConst(x_339); +if (x_447 == 0) +{ +x_378 = x_340; +goto block_444; +} +else +{ +uint8_t x_448; +x_448 = l_Lean_Expr_isConst(x_347); +if (x_448 == 0) +{ +x_378 = x_340; +goto block_444; +} +else +{ +lean_object* x_449; lean_object* x_450; uint8_t x_451; +x_449 = l_Lean_Expr_constName(x_339); +x_450 = l_Lean_Expr_constName(x_347); +x_451 = lean_name_dec_eq(x_449, x_450); +lean_dec(x_450); +lean_dec(x_449); +if (x_451 == 0) +{ +x_378 = x_340; +goto block_444; +} +else +{ +lean_object* x_452; lean_object* x_453; lean_object* x_454; +lean_dec(x_345); +x_452 = l_Lean_Expr_constLevels(x_339); +lean_dec(x_339); +x_453 = l_Lean_Expr_constLevels(x_347); +lean_dec(x_347); +x_454 = l_List_mfor_u2082___main___at_Lean_TypeClass_Context_eUnify___main___spec__3(x_452, x_453, x_348); +return x_454; +} +} +} +} +else +{ +uint8_t x_455; +x_455 = l_Lean_Expr_isFVar(x_347); +if (x_455 == 0) +{ +uint8_t x_456; +x_456 = l_Lean_Expr_isConst(x_339); +if (x_456 == 0) +{ +x_378 = x_340; +goto block_444; +} +else +{ +uint8_t x_457; +x_457 = l_Lean_Expr_isConst(x_347); +if (x_457 == 0) +{ +x_378 = x_340; +goto block_444; +} +else +{ +lean_object* x_458; lean_object* x_459; uint8_t x_460; +x_458 = l_Lean_Expr_constName(x_339); +x_459 = l_Lean_Expr_constName(x_347); +x_460 = lean_name_dec_eq(x_458, x_459); +lean_dec(x_459); +lean_dec(x_458); +if (x_460 == 0) +{ +x_378 = x_340; +goto block_444; +} +else +{ +lean_object* x_461; lean_object* x_462; lean_object* x_463; +lean_dec(x_345); +x_461 = l_Lean_Expr_constLevels(x_339); +lean_dec(x_339); +x_462 = l_Lean_Expr_constLevels(x_347); +lean_dec(x_347); +x_463 = l_List_mfor_u2082___main___at_Lean_TypeClass_Context_eUnify___main___spec__3(x_461, x_462, x_348); +return x_463; +} +} +} +} +else +{ +lean_object* x_464; lean_object* x_465; uint8_t x_466; +x_464 = l_Lean_Expr_fvarName(x_339); +x_465 = l_Lean_Expr_fvarName(x_347); +x_466 = lean_name_dec_eq(x_464, x_465); +lean_dec(x_465); +lean_dec(x_464); +if (x_466 == 0) +{ +uint8_t x_467; +x_467 = l_Lean_Expr_isConst(x_339); +if (x_467 == 0) +{ +x_378 = x_340; +goto block_444; +} +else +{ +uint8_t x_468; +x_468 = l_Lean_Expr_isConst(x_347); +if (x_468 == 0) +{ +x_378 = x_340; +goto block_444; +} +else +{ +lean_object* x_469; lean_object* x_470; uint8_t x_471; +x_469 = l_Lean_Expr_constName(x_339); +x_470 = l_Lean_Expr_constName(x_347); +x_471 = lean_name_dec_eq(x_469, x_470); +lean_dec(x_470); +lean_dec(x_469); +if (x_471 == 0) +{ +x_378 = x_340; +goto block_444; +} +else +{ +lean_object* x_472; lean_object* x_473; lean_object* x_474; +lean_dec(x_345); +x_472 = l_Lean_Expr_constLevels(x_339); +lean_dec(x_339); +x_473 = l_Lean_Expr_constLevels(x_347); +lean_dec(x_347); +x_474 = l_List_mfor_u2082___main___at_Lean_TypeClass_Context_eUnify___main___spec__3(x_472, x_473, x_348); +return x_474; +} +} +} +} +else +{ +lean_object* x_475; +lean_dec(x_348); +lean_dec(x_347); +lean_dec(x_339); +x_475 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_475, 0, x_340); +lean_ctor_set(x_475, 1, x_345); +return x_475; +} +} +} +} +block_484: +{ +uint8_t x_478; +lean_dec(x_477); +x_478 = l_Lean_Expr_isBVar(x_339); +if (x_478 == 0) +{ +x_445 = x_340; +goto block_476; +} +else +{ +uint8_t x_479; +x_479 = l_Lean_Expr_isBVar(x_347); +if (x_479 == 0) +{ +x_445 = x_340; +goto block_476; +} +else +{ +lean_object* x_480; lean_object* x_481; uint8_t x_482; +x_480 = l_Lean_Expr_bvarIdx(x_339); +x_481 = l_Lean_Expr_bvarIdx(x_347); +x_482 = lean_nat_dec_eq(x_480, x_481); +lean_dec(x_481); +lean_dec(x_480); +if (x_482 == 0) +{ +x_445 = x_340; +goto block_476; +} +else +{ +lean_object* x_483; +lean_dec(x_348); +lean_dec(x_347); +lean_dec(x_339); +x_483 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_483, 0, x_340); +lean_ctor_set(x_483, 1, x_345); +return x_483; +} +} +} +} +} +else +{ +lean_object* x_498; lean_object* x_499; lean_object* x_500; lean_object* x_501; +lean_dec(x_339); +x_498 = lean_ctor_get(x_343, 0); +lean_inc(x_498); +x_499 = lean_ctor_get(x_343, 1); +lean_inc(x_499); +if (lean_is_exclusive(x_343)) { + lean_ctor_release(x_343, 0); + lean_ctor_release(x_343, 1); + x_500 = x_343; +} else { + lean_dec_ref(x_343); + x_500 = lean_box(0); +} +if (lean_is_scalar(x_500)) { + x_501 = lean_alloc_ctor(1, 2, 0); +} else { + x_501 = x_500; +} +lean_ctor_set(x_501, 0, x_498); +lean_ctor_set(x_501, 1, x_499); +return x_501; +} +} +} +else +{ +uint8_t x_502; +lean_dec(x_2); +x_502 = !lean_is_exclusive(x_6); +if (x_502 == 0) +{ +return x_6; +} +else +{ +lean_object* x_503; lean_object* x_504; lean_object* x_505; +x_503 = lean_ctor_get(x_6, 0); +x_504 = lean_ctor_get(x_6, 1); +lean_inc(x_504); +lean_inc(x_503); +lean_dec(x_6); +x_505 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_505, 0, x_503); +lean_ctor_set(x_505, 1, x_504); +return x_505; +} +} +} +} +} +lean_object* l_panicWithPos___at_Lean_TypeClass_Context_eUnify___main___spec__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { +_start: +{ +lean_object* x_6; +x_6 = l_panicWithPos___at_Lean_TypeClass_Context_eUnify___main___spec__1(x_1, x_2, x_3, x_4, x_5); +lean_dec(x_4); +lean_dec(x_1); +return x_6; +} +} +lean_object* l_Lean_TypeClass_Context_eUnify(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; +x_4 = l_Lean_TypeClass_Context_eUnify___main(x_1, x_2, x_3); +return x_4; +} +} +lean_object* l_List_map___main___at_Lean_TypeClass_Context_eInstantiate___main___spec__1(lean_object* x_1, lean_object* x_2) { +_start: +{ +if (lean_obj_tag(x_2) == 0) +{ +lean_object* x_3; +lean_dec(x_1); +x_3 = lean_box(0); +return x_3; +} +else +{ +uint8_t x_4; +x_4 = !lean_is_exclusive(x_2); +if (x_4 == 0) +{ +lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; +x_5 = lean_ctor_get(x_2, 0); +x_6 = lean_ctor_get(x_2, 1); +lean_inc(x_1); +x_7 = l_Lean_TypeClass_Context_uInstantiate___main(x_1, x_5); +lean_dec(x_5); +x_8 = l_List_map___main___at_Lean_TypeClass_Context_eInstantiate___main___spec__1(x_1, x_6); +lean_ctor_set(x_2, 1, x_8); +lean_ctor_set(x_2, 0, x_7); +return x_2; +} +else +{ +lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; +x_9 = lean_ctor_get(x_2, 0); +x_10 = lean_ctor_get(x_2, 1); +lean_inc(x_10); +lean_inc(x_9); +lean_dec(x_2); +lean_inc(x_1); +x_11 = l_Lean_TypeClass_Context_uInstantiate___main(x_1, x_9); +lean_dec(x_9); +x_12 = l_List_map___main___at_Lean_TypeClass_Context_eInstantiate___main___spec__1(x_1, x_10); +x_13 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_13, 0, x_11); +lean_ctor_set(x_13, 1, x_12); +return x_13; +} +} +} +} +lean_object* l_Lean_TypeClass_Context_eInstantiate___main(lean_object* x_1, lean_object* x_2) { +_start: +{ +uint8_t x_3; +x_3 = lean_expr_has_mvar(x_2); +if (x_3 == 0) +{ +lean_dec(x_1); +return x_2; +} +else +{ +switch (lean_obj_tag(x_2)) { +case 4: +{ +lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; +x_4 = lean_ctor_get(x_2, 0); +lean_inc(x_4); +x_5 = lean_ctor_get(x_2, 1); +lean_inc(x_5); +lean_dec(x_2); +x_6 = l_List_map___main___at_Lean_TypeClass_Context_eInstantiate___main___spec__1(x_1, x_5); +x_7 = lean_expr_mk_const(x_4, x_6); +return x_7; +} +case 5: +{ +lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; +x_8 = lean_ctor_get(x_2, 0); +lean_inc(x_8); +x_9 = lean_ctor_get(x_2, 1); +lean_inc(x_9); +lean_dec(x_2); +lean_inc(x_1); +x_10 = l_Lean_TypeClass_Context_eInstantiate___main(x_1, x_8); +x_11 = l_Lean_TypeClass_Context_eInstantiate___main(x_1, x_9); +x_12 = lean_expr_mk_app(x_10, x_11); +return x_12; +} +case 6: +{ +lean_object* x_13; uint8_t x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; +x_13 = lean_ctor_get(x_2, 0); +lean_inc(x_13); +x_14 = lean_ctor_get_uint8(x_2, sizeof(void*)*3); +x_15 = lean_ctor_get(x_2, 1); +lean_inc(x_15); +x_16 = lean_ctor_get(x_2, 2); +lean_inc(x_16); +lean_dec(x_2); +lean_inc(x_1); +x_17 = l_Lean_TypeClass_Context_eInstantiate___main(x_1, x_15); +x_18 = l_Lean_TypeClass_Context_eInstantiate___main(x_1, x_16); +x_19 = lean_expr_mk_lambda(x_13, x_14, x_17, x_18); +return x_19; +} +case 7: +{ +lean_object* x_20; uint8_t x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; +x_20 = lean_ctor_get(x_2, 0); +lean_inc(x_20); +x_21 = lean_ctor_get_uint8(x_2, sizeof(void*)*3); +x_22 = lean_ctor_get(x_2, 1); +lean_inc(x_22); +x_23 = lean_ctor_get(x_2, 2); +lean_inc(x_23); +lean_dec(x_2); +lean_inc(x_1); +x_24 = l_Lean_TypeClass_Context_eInstantiate___main(x_1, x_22); +x_25 = l_Lean_TypeClass_Context_eInstantiate___main(x_1, x_23); +x_26 = lean_expr_mk_pi(x_20, x_21, x_24, x_25); +return x_26; +} +default: +{ +lean_object* x_27; +x_27 = l_Lean_TypeClass_Context_eMetaIdx(x_2); +if (lean_obj_tag(x_27) == 0) +{ +lean_dec(x_1); +return x_2; +} +else +{ +lean_object* x_28; lean_object* x_29; lean_object* x_30; +x_28 = lean_ctor_get(x_27, 0); +lean_inc(x_28); +lean_dec(x_27); +lean_inc(x_1); +x_29 = l_Lean_TypeClass_Context_eLookupIdx(x_28, x_1); +lean_dec(x_28); +x_30 = lean_ctor_get(x_29, 0); +lean_inc(x_30); +lean_dec(x_29); +if (lean_obj_tag(x_30) == 0) +{ +lean_dec(x_1); +return x_2; +} +else +{ +lean_object* x_31; +lean_dec(x_2); +x_31 = lean_ctor_get(x_30, 0); +lean_inc(x_31); +lean_dec(x_30); +x_2 = x_31; +goto _start; +} +} +} +} +} +} +} +lean_object* l_Lean_TypeClass_Context_eInstantiate(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = l_Lean_TypeClass_Context_eInstantiate___main(x_1, x_2); +return x_3; +} +} +lean_object* l_RBNode_find___main___at_Lean_TypeClass_Context_uAlphaNormalizeCore___main___spec__1(lean_object* x_1, lean_object* x_2) { +_start: +{ +if (lean_obj_tag(x_1) == 0) +{ +lean_object* x_3; +x_3 = lean_box(0); +return x_3; +} +else +{ +lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; uint8_t x_8; +x_4 = lean_ctor_get(x_1, 0); +x_5 = lean_ctor_get(x_1, 1); +x_6 = lean_ctor_get(x_1, 2); +x_7 = lean_ctor_get(x_1, 3); +x_8 = lean_nat_dec_lt(x_2, x_5); +if (x_8 == 0) +{ +uint8_t x_9; +x_9 = lean_nat_dec_lt(x_5, x_2); +if (x_9 == 0) +{ +lean_object* x_10; +lean_inc(x_6); +x_10 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_10, 0, x_6); +return x_10; +} +else +{ +x_1 = x_7; +goto _start; +} +} +else +{ +x_1 = x_4; +goto _start; +} +} +} +} +lean_object* l_RBNode_ins___main___at_Lean_TypeClass_Context_uAlphaNormalizeCore___main___spec__3(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +if (lean_obj_tag(x_1) == 0) +{ +uint8_t x_4; lean_object* x_5; +x_4 = 0; +x_5 = lean_alloc_ctor(1, 4, 1); +lean_ctor_set(x_5, 0, x_1); +lean_ctor_set(x_5, 1, x_2); +lean_ctor_set(x_5, 2, x_3); +lean_ctor_set(x_5, 3, x_1); +lean_ctor_set_uint8(x_5, sizeof(void*)*4, x_4); +return x_5; +} +else +{ +uint8_t x_6; +x_6 = lean_ctor_get_uint8(x_1, sizeof(void*)*4); +if (x_6 == 0) +{ +uint8_t x_7; +x_7 = !lean_is_exclusive(x_1); +if (x_7 == 0) +{ +lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; uint8_t x_12; +x_8 = lean_ctor_get(x_1, 0); +x_9 = lean_ctor_get(x_1, 1); +x_10 = lean_ctor_get(x_1, 2); +x_11 = lean_ctor_get(x_1, 3); +x_12 = lean_nat_dec_lt(x_2, x_9); +if (x_12 == 0) +{ +uint8_t x_13; +x_13 = lean_nat_dec_lt(x_9, x_2); +if (x_13 == 0) +{ +lean_dec(x_10); +lean_dec(x_9); +lean_ctor_set(x_1, 2, x_3); +lean_ctor_set(x_1, 1, x_2); +return x_1; +} +else +{ +lean_object* x_14; +x_14 = l_RBNode_ins___main___at_Lean_TypeClass_Context_uAlphaNormalizeCore___main___spec__3(x_11, x_2, x_3); +lean_ctor_set(x_1, 3, x_14); +return x_1; +} +} +else +{ +lean_object* x_15; +x_15 = l_RBNode_ins___main___at_Lean_TypeClass_Context_uAlphaNormalizeCore___main___spec__3(x_8, x_2, x_3); +lean_ctor_set(x_1, 0, x_15); +return x_1; +} +} +else +{ +lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; uint8_t x_20; +x_16 = lean_ctor_get(x_1, 0); +x_17 = lean_ctor_get(x_1, 1); +x_18 = lean_ctor_get(x_1, 2); +x_19 = lean_ctor_get(x_1, 3); +lean_inc(x_19); +lean_inc(x_18); +lean_inc(x_17); +lean_inc(x_16); +lean_dec(x_1); +x_20 = lean_nat_dec_lt(x_2, x_17); +if (x_20 == 0) +{ +uint8_t x_21; +x_21 = lean_nat_dec_lt(x_17, x_2); +if (x_21 == 0) +{ +lean_object* x_22; +lean_dec(x_18); +lean_dec(x_17); +x_22 = lean_alloc_ctor(1, 4, 1); +lean_ctor_set(x_22, 0, x_16); +lean_ctor_set(x_22, 1, x_2); +lean_ctor_set(x_22, 2, x_3); +lean_ctor_set(x_22, 3, x_19); +lean_ctor_set_uint8(x_22, sizeof(void*)*4, x_6); +return x_22; +} +else +{ +lean_object* x_23; lean_object* x_24; +x_23 = l_RBNode_ins___main___at_Lean_TypeClass_Context_uAlphaNormalizeCore___main___spec__3(x_19, x_2, x_3); +x_24 = lean_alloc_ctor(1, 4, 1); +lean_ctor_set(x_24, 0, x_16); +lean_ctor_set(x_24, 1, x_17); +lean_ctor_set(x_24, 2, x_18); +lean_ctor_set(x_24, 3, x_23); +lean_ctor_set_uint8(x_24, sizeof(void*)*4, x_6); +return x_24; +} +} +else +{ +lean_object* x_25; lean_object* x_26; +x_25 = l_RBNode_ins___main___at_Lean_TypeClass_Context_uAlphaNormalizeCore___main___spec__3(x_16, x_2, x_3); +x_26 = lean_alloc_ctor(1, 4, 1); +lean_ctor_set(x_26, 0, x_25); +lean_ctor_set(x_26, 1, x_17); +lean_ctor_set(x_26, 2, x_18); +lean_ctor_set(x_26, 3, x_19); +lean_ctor_set_uint8(x_26, sizeof(void*)*4, x_6); +return x_26; +} +} +} +else +{ +uint8_t x_27; +x_27 = !lean_is_exclusive(x_1); +if (x_27 == 0) +{ +lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; uint8_t x_32; +x_28 = lean_ctor_get(x_1, 0); +x_29 = lean_ctor_get(x_1, 1); +x_30 = lean_ctor_get(x_1, 2); +x_31 = lean_ctor_get(x_1, 3); +x_32 = lean_nat_dec_lt(x_2, x_29); +if (x_32 == 0) +{ +uint8_t x_33; +x_33 = lean_nat_dec_lt(x_29, x_2); +if (x_33 == 0) +{ +lean_dec(x_30); +lean_dec(x_29); +lean_ctor_set(x_1, 2, x_3); +lean_ctor_set(x_1, 1, x_2); +return x_1; +} +else +{ +uint8_t x_34; +x_34 = l_RBNode_isRed___rarg(x_31); +if (x_34 == 0) +{ +lean_object* x_35; +x_35 = l_RBNode_ins___main___at_Lean_TypeClass_Context_uAlphaNormalizeCore___main___spec__3(x_31, x_2, x_3); +lean_ctor_set(x_1, 3, x_35); +return x_1; +} +else +{ +lean_object* x_36; +x_36 = l_RBNode_ins___main___at_Lean_TypeClass_Context_uAlphaNormalizeCore___main___spec__3(x_31, x_2, x_3); +if (lean_obj_tag(x_36) == 0) +{ +lean_free_object(x_1); +lean_dec(x_30); +lean_dec(x_29); +lean_dec(x_28); +return x_36; +} +else +{ +lean_object* x_37; +x_37 = lean_ctor_get(x_36, 0); +lean_inc(x_37); +if (lean_obj_tag(x_37) == 0) +{ +lean_object* x_38; +x_38 = lean_ctor_get(x_36, 3); +lean_inc(x_38); +if (lean_obj_tag(x_38) == 0) +{ +uint8_t x_39; +x_39 = !lean_is_exclusive(x_36); +if (x_39 == 0) +{ +lean_object* x_40; lean_object* x_41; uint8_t x_42; uint8_t x_43; +x_40 = lean_ctor_get(x_36, 3); +lean_dec(x_40); +x_41 = lean_ctor_get(x_36, 0); +lean_dec(x_41); +x_42 = 0; +lean_ctor_set(x_36, 0, x_38); +lean_ctor_set_uint8(x_36, sizeof(void*)*4, x_42); +x_43 = 1; +lean_ctor_set(x_1, 3, x_36); +lean_ctor_set_uint8(x_1, sizeof(void*)*4, x_43); +return x_1; +} +else +{ +lean_object* x_44; lean_object* x_45; uint8_t x_46; lean_object* x_47; uint8_t x_48; +x_44 = lean_ctor_get(x_36, 1); +x_45 = lean_ctor_get(x_36, 2); +lean_inc(x_45); +lean_inc(x_44); +lean_dec(x_36); +x_46 = 0; +x_47 = lean_alloc_ctor(1, 4, 1); +lean_ctor_set(x_47, 0, x_38); +lean_ctor_set(x_47, 1, x_44); +lean_ctor_set(x_47, 2, x_45); +lean_ctor_set(x_47, 3, x_38); +lean_ctor_set_uint8(x_47, sizeof(void*)*4, x_46); +x_48 = 1; +lean_ctor_set(x_1, 3, x_47); +lean_ctor_set_uint8(x_1, sizeof(void*)*4, x_48); +return x_1; +} +} +else +{ +uint8_t x_49; +x_49 = lean_ctor_get_uint8(x_38, sizeof(void*)*4); +if (x_49 == 0) +{ +uint8_t x_50; +x_50 = !lean_is_exclusive(x_36); +if (x_50 == 0) +{ +lean_object* x_51; lean_object* x_52; lean_object* x_53; lean_object* x_54; uint8_t x_55; +x_51 = lean_ctor_get(x_36, 1); +x_52 = lean_ctor_get(x_36, 2); +x_53 = lean_ctor_get(x_36, 3); +lean_dec(x_53); +x_54 = lean_ctor_get(x_36, 0); +lean_dec(x_54); +x_55 = !lean_is_exclusive(x_38); +if (x_55 == 0) +{ +lean_object* x_56; lean_object* x_57; lean_object* x_58; lean_object* x_59; uint8_t x_60; +x_56 = lean_ctor_get(x_38, 0); +x_57 = lean_ctor_get(x_38, 1); +x_58 = lean_ctor_get(x_38, 2); +x_59 = lean_ctor_get(x_38, 3); +x_60 = 1; +lean_ctor_set(x_38, 3, x_37); +lean_ctor_set(x_38, 2, x_30); +lean_ctor_set(x_38, 1, x_29); +lean_ctor_set(x_38, 0, x_28); +lean_ctor_set_uint8(x_38, sizeof(void*)*4, x_60); +lean_ctor_set(x_36, 3, x_59); +lean_ctor_set(x_36, 2, x_58); +lean_ctor_set(x_36, 1, x_57); +lean_ctor_set(x_36, 0, x_56); +lean_ctor_set_uint8(x_36, sizeof(void*)*4, x_60); +lean_ctor_set(x_1, 3, x_36); +lean_ctor_set(x_1, 2, x_52); +lean_ctor_set(x_1, 1, x_51); +lean_ctor_set(x_1, 0, x_38); +lean_ctor_set_uint8(x_1, sizeof(void*)*4, x_49); +return x_1; +} +else +{ +lean_object* x_61; lean_object* x_62; lean_object* x_63; lean_object* x_64; uint8_t x_65; lean_object* x_66; +x_61 = lean_ctor_get(x_38, 0); +x_62 = lean_ctor_get(x_38, 1); +x_63 = lean_ctor_get(x_38, 2); +x_64 = lean_ctor_get(x_38, 3); +lean_inc(x_64); +lean_inc(x_63); +lean_inc(x_62); +lean_inc(x_61); +lean_dec(x_38); +x_65 = 1; +x_66 = lean_alloc_ctor(1, 4, 1); +lean_ctor_set(x_66, 0, x_28); +lean_ctor_set(x_66, 1, x_29); +lean_ctor_set(x_66, 2, x_30); +lean_ctor_set(x_66, 3, x_37); +lean_ctor_set_uint8(x_66, sizeof(void*)*4, x_65); +lean_ctor_set(x_36, 3, x_64); +lean_ctor_set(x_36, 2, x_63); +lean_ctor_set(x_36, 1, x_62); +lean_ctor_set(x_36, 0, x_61); +lean_ctor_set_uint8(x_36, sizeof(void*)*4, x_65); +lean_ctor_set(x_1, 3, x_36); +lean_ctor_set(x_1, 2, x_52); +lean_ctor_set(x_1, 1, x_51); +lean_ctor_set(x_1, 0, x_66); +lean_ctor_set_uint8(x_1, sizeof(void*)*4, x_49); +return x_1; +} +} +else +{ +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; uint8_t x_74; lean_object* x_75; lean_object* x_76; +x_67 = lean_ctor_get(x_36, 1); +x_68 = lean_ctor_get(x_36, 2); +lean_inc(x_68); +lean_inc(x_67); +lean_dec(x_36); +x_69 = lean_ctor_get(x_38, 0); +lean_inc(x_69); +x_70 = lean_ctor_get(x_38, 1); +lean_inc(x_70); +x_71 = lean_ctor_get(x_38, 2); +lean_inc(x_71); +x_72 = lean_ctor_get(x_38, 3); +lean_inc(x_72); +if (lean_is_exclusive(x_38)) { + lean_ctor_release(x_38, 0); + lean_ctor_release(x_38, 1); + lean_ctor_release(x_38, 2); + lean_ctor_release(x_38, 3); + x_73 = x_38; +} else { + lean_dec_ref(x_38); + x_73 = lean_box(0); +} +x_74 = 1; +if (lean_is_scalar(x_73)) { + x_75 = lean_alloc_ctor(1, 4, 1); +} else { + x_75 = x_73; +} +lean_ctor_set(x_75, 0, x_28); +lean_ctor_set(x_75, 1, x_29); +lean_ctor_set(x_75, 2, x_30); +lean_ctor_set(x_75, 3, x_37); +lean_ctor_set_uint8(x_75, sizeof(void*)*4, x_74); +x_76 = lean_alloc_ctor(1, 4, 1); +lean_ctor_set(x_76, 0, x_69); +lean_ctor_set(x_76, 1, x_70); +lean_ctor_set(x_76, 2, x_71); +lean_ctor_set(x_76, 3, x_72); +lean_ctor_set_uint8(x_76, sizeof(void*)*4, x_74); +lean_ctor_set(x_1, 3, x_76); +lean_ctor_set(x_1, 2, x_68); +lean_ctor_set(x_1, 1, x_67); +lean_ctor_set(x_1, 0, x_75); +lean_ctor_set_uint8(x_1, sizeof(void*)*4, x_49); +return x_1; +} +} +else +{ +uint8_t x_77; +x_77 = !lean_is_exclusive(x_36); +if (x_77 == 0) +{ +lean_object* x_78; lean_object* x_79; uint8_t x_80; +x_78 = lean_ctor_get(x_36, 3); +lean_dec(x_78); +x_79 = lean_ctor_get(x_36, 0); +lean_dec(x_79); +x_80 = 0; +lean_ctor_set_uint8(x_36, sizeof(void*)*4, x_80); +lean_ctor_set(x_1, 3, x_36); +lean_ctor_set_uint8(x_1, sizeof(void*)*4, x_49); +return x_1; +} +else +{ +lean_object* x_81; lean_object* x_82; uint8_t x_83; lean_object* x_84; +x_81 = lean_ctor_get(x_36, 1); +x_82 = lean_ctor_get(x_36, 2); +lean_inc(x_82); +lean_inc(x_81); +lean_dec(x_36); +x_83 = 0; +x_84 = lean_alloc_ctor(1, 4, 1); +lean_ctor_set(x_84, 0, x_37); +lean_ctor_set(x_84, 1, x_81); +lean_ctor_set(x_84, 2, x_82); +lean_ctor_set(x_84, 3, x_38); +lean_ctor_set_uint8(x_84, sizeof(void*)*4, x_83); +lean_ctor_set(x_1, 3, x_84); +lean_ctor_set_uint8(x_1, sizeof(void*)*4, x_49); +return x_1; +} +} +} +} +else +{ +uint8_t x_85; +x_85 = lean_ctor_get_uint8(x_37, sizeof(void*)*4); +if (x_85 == 0) +{ +uint8_t x_86; +x_86 = !lean_is_exclusive(x_36); +if (x_86 == 0) +{ +lean_object* x_87; uint8_t x_88; +x_87 = lean_ctor_get(x_36, 0); +lean_dec(x_87); +x_88 = !lean_is_exclusive(x_37); +if (x_88 == 0) +{ +lean_object* x_89; lean_object* x_90; lean_object* x_91; lean_object* x_92; uint8_t x_93; +x_89 = lean_ctor_get(x_37, 0); +x_90 = lean_ctor_get(x_37, 1); +x_91 = lean_ctor_get(x_37, 2); +x_92 = lean_ctor_get(x_37, 3); +x_93 = 1; +lean_ctor_set(x_37, 3, x_89); +lean_ctor_set(x_37, 2, x_30); +lean_ctor_set(x_37, 1, x_29); +lean_ctor_set(x_37, 0, x_28); +lean_ctor_set_uint8(x_37, sizeof(void*)*4, x_93); +lean_ctor_set(x_36, 0, x_92); +lean_ctor_set_uint8(x_36, sizeof(void*)*4, x_93); +lean_ctor_set(x_1, 3, x_36); +lean_ctor_set(x_1, 2, x_91); +lean_ctor_set(x_1, 1, x_90); +lean_ctor_set(x_1, 0, x_37); +lean_ctor_set_uint8(x_1, sizeof(void*)*4, x_85); +return x_1; +} +else +{ +lean_object* x_94; lean_object* x_95; lean_object* x_96; lean_object* x_97; uint8_t x_98; lean_object* x_99; +x_94 = lean_ctor_get(x_37, 0); +x_95 = lean_ctor_get(x_37, 1); +x_96 = lean_ctor_get(x_37, 2); +x_97 = lean_ctor_get(x_37, 3); +lean_inc(x_97); +lean_inc(x_96); +lean_inc(x_95); +lean_inc(x_94); +lean_dec(x_37); +x_98 = 1; +x_99 = lean_alloc_ctor(1, 4, 1); +lean_ctor_set(x_99, 0, x_28); +lean_ctor_set(x_99, 1, x_29); +lean_ctor_set(x_99, 2, x_30); +lean_ctor_set(x_99, 3, x_94); +lean_ctor_set_uint8(x_99, sizeof(void*)*4, x_98); +lean_ctor_set(x_36, 0, x_97); +lean_ctor_set_uint8(x_36, sizeof(void*)*4, x_98); +lean_ctor_set(x_1, 3, x_36); +lean_ctor_set(x_1, 2, x_96); +lean_ctor_set(x_1, 1, x_95); +lean_ctor_set(x_1, 0, x_99); +lean_ctor_set_uint8(x_1, sizeof(void*)*4, x_85); +return x_1; +} +} +else +{ +lean_object* x_100; lean_object* x_101; lean_object* x_102; lean_object* x_103; lean_object* x_104; lean_object* x_105; lean_object* x_106; lean_object* x_107; uint8_t x_108; lean_object* x_109; lean_object* x_110; +x_100 = lean_ctor_get(x_36, 1); +x_101 = lean_ctor_get(x_36, 2); +x_102 = lean_ctor_get(x_36, 3); +lean_inc(x_102); +lean_inc(x_101); +lean_inc(x_100); +lean_dec(x_36); +x_103 = lean_ctor_get(x_37, 0); +lean_inc(x_103); +x_104 = lean_ctor_get(x_37, 1); +lean_inc(x_104); +x_105 = lean_ctor_get(x_37, 2); +lean_inc(x_105); +x_106 = lean_ctor_get(x_37, 3); +lean_inc(x_106); +if (lean_is_exclusive(x_37)) { + lean_ctor_release(x_37, 0); + lean_ctor_release(x_37, 1); + lean_ctor_release(x_37, 2); + lean_ctor_release(x_37, 3); + x_107 = x_37; +} else { + lean_dec_ref(x_37); + x_107 = lean_box(0); +} +x_108 = 1; +if (lean_is_scalar(x_107)) { + x_109 = lean_alloc_ctor(1, 4, 1); +} else { + x_109 = x_107; +} +lean_ctor_set(x_109, 0, x_28); +lean_ctor_set(x_109, 1, x_29); +lean_ctor_set(x_109, 2, x_30); +lean_ctor_set(x_109, 3, x_103); +lean_ctor_set_uint8(x_109, sizeof(void*)*4, x_108); +x_110 = lean_alloc_ctor(1, 4, 1); +lean_ctor_set(x_110, 0, x_106); +lean_ctor_set(x_110, 1, x_100); +lean_ctor_set(x_110, 2, x_101); +lean_ctor_set(x_110, 3, x_102); +lean_ctor_set_uint8(x_110, sizeof(void*)*4, x_108); +lean_ctor_set(x_1, 3, x_110); +lean_ctor_set(x_1, 2, x_105); +lean_ctor_set(x_1, 1, x_104); +lean_ctor_set(x_1, 0, x_109); +lean_ctor_set_uint8(x_1, sizeof(void*)*4, x_85); +return x_1; +} +} +else +{ +lean_object* x_111; +x_111 = lean_ctor_get(x_36, 3); +lean_inc(x_111); +if (lean_obj_tag(x_111) == 0) +{ +uint8_t x_112; +x_112 = !lean_is_exclusive(x_36); +if (x_112 == 0) +{ +lean_object* x_113; lean_object* x_114; uint8_t x_115; +x_113 = lean_ctor_get(x_36, 3); +lean_dec(x_113); +x_114 = lean_ctor_get(x_36, 0); +lean_dec(x_114); +x_115 = 0; +lean_ctor_set_uint8(x_36, sizeof(void*)*4, x_115); +lean_ctor_set(x_1, 3, x_36); +lean_ctor_set_uint8(x_1, sizeof(void*)*4, x_85); +return x_1; +} +else +{ +lean_object* x_116; lean_object* x_117; uint8_t x_118; lean_object* x_119; +x_116 = lean_ctor_get(x_36, 1); +x_117 = lean_ctor_get(x_36, 2); +lean_inc(x_117); +lean_inc(x_116); +lean_dec(x_36); +x_118 = 0; +x_119 = lean_alloc_ctor(1, 4, 1); +lean_ctor_set(x_119, 0, x_37); +lean_ctor_set(x_119, 1, x_116); +lean_ctor_set(x_119, 2, x_117); +lean_ctor_set(x_119, 3, x_111); +lean_ctor_set_uint8(x_119, sizeof(void*)*4, x_118); +lean_ctor_set(x_1, 3, x_119); +lean_ctor_set_uint8(x_1, sizeof(void*)*4, x_85); +return x_1; +} +} +else +{ +uint8_t x_120; +x_120 = lean_ctor_get_uint8(x_111, sizeof(void*)*4); +if (x_120 == 0) +{ +uint8_t x_121; +lean_free_object(x_1); +x_121 = !lean_is_exclusive(x_36); +if (x_121 == 0) +{ +lean_object* x_122; lean_object* x_123; uint8_t x_124; +x_122 = lean_ctor_get(x_36, 3); +lean_dec(x_122); +x_123 = lean_ctor_get(x_36, 0); +lean_dec(x_123); +x_124 = !lean_is_exclusive(x_111); +if (x_124 == 0) +{ +lean_object* x_125; lean_object* x_126; lean_object* x_127; lean_object* x_128; uint8_t x_129; +x_125 = lean_ctor_get(x_111, 0); +x_126 = lean_ctor_get(x_111, 1); +x_127 = lean_ctor_get(x_111, 2); +x_128 = lean_ctor_get(x_111, 3); +lean_inc(x_37); +lean_ctor_set(x_111, 3, x_37); +lean_ctor_set(x_111, 2, x_30); +lean_ctor_set(x_111, 1, x_29); +lean_ctor_set(x_111, 0, x_28); +x_129 = !lean_is_exclusive(x_37); +if (x_129 == 0) +{ +lean_object* x_130; lean_object* x_131; lean_object* x_132; lean_object* x_133; +x_130 = lean_ctor_get(x_37, 3); +lean_dec(x_130); +x_131 = lean_ctor_get(x_37, 2); +lean_dec(x_131); +x_132 = lean_ctor_get(x_37, 1); +lean_dec(x_132); +x_133 = lean_ctor_get(x_37, 0); +lean_dec(x_133); +lean_ctor_set_uint8(x_111, sizeof(void*)*4, x_85); +lean_ctor_set(x_37, 3, x_128); +lean_ctor_set(x_37, 2, x_127); +lean_ctor_set(x_37, 1, x_126); +lean_ctor_set(x_37, 0, x_125); +lean_ctor_set(x_36, 3, x_37); +lean_ctor_set(x_36, 0, x_111); +lean_ctor_set_uint8(x_36, sizeof(void*)*4, x_120); +return x_36; +} +else +{ +lean_object* x_134; +lean_dec(x_37); +lean_ctor_set_uint8(x_111, sizeof(void*)*4, x_85); +x_134 = lean_alloc_ctor(1, 4, 1); +lean_ctor_set(x_134, 0, x_125); +lean_ctor_set(x_134, 1, x_126); +lean_ctor_set(x_134, 2, x_127); +lean_ctor_set(x_134, 3, x_128); +lean_ctor_set_uint8(x_134, sizeof(void*)*4, x_85); +lean_ctor_set(x_36, 3, x_134); +lean_ctor_set(x_36, 0, x_111); +lean_ctor_set_uint8(x_36, sizeof(void*)*4, x_120); +return x_36; +} +} +else +{ +lean_object* x_135; lean_object* x_136; lean_object* x_137; lean_object* x_138; lean_object* x_139; lean_object* x_140; lean_object* x_141; +x_135 = lean_ctor_get(x_111, 0); +x_136 = lean_ctor_get(x_111, 1); +x_137 = lean_ctor_get(x_111, 2); +x_138 = lean_ctor_get(x_111, 3); +lean_inc(x_138); +lean_inc(x_137); +lean_inc(x_136); +lean_inc(x_135); +lean_dec(x_111); +lean_inc(x_37); +x_139 = lean_alloc_ctor(1, 4, 1); +lean_ctor_set(x_139, 0, x_28); +lean_ctor_set(x_139, 1, x_29); +lean_ctor_set(x_139, 2, x_30); +lean_ctor_set(x_139, 3, x_37); +if (lean_is_exclusive(x_37)) { + lean_ctor_release(x_37, 0); + lean_ctor_release(x_37, 1); + lean_ctor_release(x_37, 2); + lean_ctor_release(x_37, 3); + x_140 = x_37; +} else { + lean_dec_ref(x_37); + x_140 = lean_box(0); +} +lean_ctor_set_uint8(x_139, sizeof(void*)*4, x_85); +if (lean_is_scalar(x_140)) { + x_141 = lean_alloc_ctor(1, 4, 1); +} else { + x_141 = x_140; +} +lean_ctor_set(x_141, 0, x_135); +lean_ctor_set(x_141, 1, x_136); +lean_ctor_set(x_141, 2, x_137); +lean_ctor_set(x_141, 3, x_138); +lean_ctor_set_uint8(x_141, sizeof(void*)*4, x_85); +lean_ctor_set(x_36, 3, x_141); +lean_ctor_set(x_36, 0, x_139); +lean_ctor_set_uint8(x_36, sizeof(void*)*4, x_120); +return x_36; +} +} +else +{ +lean_object* x_142; lean_object* x_143; lean_object* x_144; lean_object* x_145; lean_object* x_146; lean_object* x_147; lean_object* x_148; lean_object* x_149; lean_object* x_150; lean_object* x_151; lean_object* x_152; +x_142 = lean_ctor_get(x_36, 1); +x_143 = lean_ctor_get(x_36, 2); +lean_inc(x_143); +lean_inc(x_142); +lean_dec(x_36); +x_144 = lean_ctor_get(x_111, 0); +lean_inc(x_144); +x_145 = lean_ctor_get(x_111, 1); +lean_inc(x_145); +x_146 = lean_ctor_get(x_111, 2); +lean_inc(x_146); +x_147 = lean_ctor_get(x_111, 3); +lean_inc(x_147); +if (lean_is_exclusive(x_111)) { + lean_ctor_release(x_111, 0); + lean_ctor_release(x_111, 1); + lean_ctor_release(x_111, 2); + lean_ctor_release(x_111, 3); + x_148 = x_111; +} else { + lean_dec_ref(x_111); + x_148 = lean_box(0); +} +lean_inc(x_37); +if (lean_is_scalar(x_148)) { + x_149 = lean_alloc_ctor(1, 4, 1); +} else { + x_149 = x_148; +} +lean_ctor_set(x_149, 0, x_28); +lean_ctor_set(x_149, 1, x_29); +lean_ctor_set(x_149, 2, x_30); +lean_ctor_set(x_149, 3, x_37); +if (lean_is_exclusive(x_37)) { + lean_ctor_release(x_37, 0); + lean_ctor_release(x_37, 1); + lean_ctor_release(x_37, 2); + lean_ctor_release(x_37, 3); + x_150 = x_37; +} else { + lean_dec_ref(x_37); + x_150 = lean_box(0); +} +lean_ctor_set_uint8(x_149, sizeof(void*)*4, x_85); +if (lean_is_scalar(x_150)) { + x_151 = lean_alloc_ctor(1, 4, 1); +} else { + x_151 = x_150; +} +lean_ctor_set(x_151, 0, x_144); +lean_ctor_set(x_151, 1, x_145); +lean_ctor_set(x_151, 2, x_146); +lean_ctor_set(x_151, 3, x_147); +lean_ctor_set_uint8(x_151, sizeof(void*)*4, x_85); +x_152 = lean_alloc_ctor(1, 4, 1); +lean_ctor_set(x_152, 0, x_149); +lean_ctor_set(x_152, 1, x_142); +lean_ctor_set(x_152, 2, x_143); +lean_ctor_set(x_152, 3, x_151); +lean_ctor_set_uint8(x_152, sizeof(void*)*4, x_120); +return x_152; +} +} +else +{ +uint8_t x_153; +x_153 = !lean_is_exclusive(x_36); +if (x_153 == 0) +{ +lean_object* x_154; lean_object* x_155; uint8_t x_156; +x_154 = lean_ctor_get(x_36, 3); +lean_dec(x_154); +x_155 = lean_ctor_get(x_36, 0); +lean_dec(x_155); +x_156 = !lean_is_exclusive(x_37); +if (x_156 == 0) +{ +uint8_t x_157; +lean_ctor_set_uint8(x_37, sizeof(void*)*4, x_120); +x_157 = 0; +lean_ctor_set_uint8(x_36, sizeof(void*)*4, x_157); +lean_ctor_set(x_1, 3, x_36); +lean_ctor_set_uint8(x_1, sizeof(void*)*4, x_120); +return x_1; +} +else +{ +lean_object* x_158; lean_object* x_159; lean_object* x_160; lean_object* x_161; lean_object* x_162; uint8_t x_163; +x_158 = lean_ctor_get(x_37, 0); +x_159 = lean_ctor_get(x_37, 1); +x_160 = lean_ctor_get(x_37, 2); +x_161 = lean_ctor_get(x_37, 3); +lean_inc(x_161); +lean_inc(x_160); +lean_inc(x_159); +lean_inc(x_158); +lean_dec(x_37); +x_162 = lean_alloc_ctor(1, 4, 1); +lean_ctor_set(x_162, 0, x_158); +lean_ctor_set(x_162, 1, x_159); +lean_ctor_set(x_162, 2, x_160); +lean_ctor_set(x_162, 3, x_161); +lean_ctor_set_uint8(x_162, sizeof(void*)*4, x_120); +x_163 = 0; +lean_ctor_set(x_36, 0, x_162); +lean_ctor_set_uint8(x_36, sizeof(void*)*4, x_163); +lean_ctor_set(x_1, 3, x_36); +lean_ctor_set_uint8(x_1, sizeof(void*)*4, x_120); +return x_1; +} +} +else +{ +lean_object* x_164; lean_object* x_165; lean_object* x_166; lean_object* x_167; lean_object* x_168; lean_object* x_169; lean_object* x_170; lean_object* x_171; uint8_t x_172; lean_object* x_173; +x_164 = lean_ctor_get(x_36, 1); +x_165 = lean_ctor_get(x_36, 2); +lean_inc(x_165); +lean_inc(x_164); +lean_dec(x_36); +x_166 = lean_ctor_get(x_37, 0); +lean_inc(x_166); +x_167 = lean_ctor_get(x_37, 1); +lean_inc(x_167); +x_168 = lean_ctor_get(x_37, 2); +lean_inc(x_168); +x_169 = lean_ctor_get(x_37, 3); +lean_inc(x_169); +if (lean_is_exclusive(x_37)) { + lean_ctor_release(x_37, 0); + lean_ctor_release(x_37, 1); + lean_ctor_release(x_37, 2); + lean_ctor_release(x_37, 3); + x_170 = x_37; +} else { + lean_dec_ref(x_37); + x_170 = lean_box(0); +} +if (lean_is_scalar(x_170)) { + x_171 = lean_alloc_ctor(1, 4, 1); +} else { + x_171 = x_170; +} +lean_ctor_set(x_171, 0, x_166); +lean_ctor_set(x_171, 1, x_167); +lean_ctor_set(x_171, 2, x_168); +lean_ctor_set(x_171, 3, x_169); +lean_ctor_set_uint8(x_171, sizeof(void*)*4, x_120); +x_172 = 0; +x_173 = lean_alloc_ctor(1, 4, 1); +lean_ctor_set(x_173, 0, x_171); +lean_ctor_set(x_173, 1, x_164); +lean_ctor_set(x_173, 2, x_165); +lean_ctor_set(x_173, 3, x_111); +lean_ctor_set_uint8(x_173, sizeof(void*)*4, x_172); +lean_ctor_set(x_1, 3, x_173); +lean_ctor_set_uint8(x_1, sizeof(void*)*4, x_120); +return x_1; +} +} +} +} +} +} +} +} +} +else +{ +uint8_t x_174; +x_174 = l_RBNode_isRed___rarg(x_28); +if (x_174 == 0) +{ +lean_object* x_175; +x_175 = l_RBNode_ins___main___at_Lean_TypeClass_Context_uAlphaNormalizeCore___main___spec__3(x_28, x_2, x_3); +lean_ctor_set(x_1, 0, x_175); +return x_1; +} +else +{ +lean_object* x_176; +x_176 = l_RBNode_ins___main___at_Lean_TypeClass_Context_uAlphaNormalizeCore___main___spec__3(x_28, x_2, x_3); +if (lean_obj_tag(x_176) == 0) +{ +lean_free_object(x_1); +lean_dec(x_31); +lean_dec(x_30); +lean_dec(x_29); +return x_176; +} +else +{ +lean_object* x_177; +x_177 = lean_ctor_get(x_176, 0); +lean_inc(x_177); +if (lean_obj_tag(x_177) == 0) +{ +lean_object* x_178; +x_178 = lean_ctor_get(x_176, 3); +lean_inc(x_178); +if (lean_obj_tag(x_178) == 0) +{ +uint8_t x_179; +x_179 = !lean_is_exclusive(x_176); +if (x_179 == 0) +{ +lean_object* x_180; lean_object* x_181; uint8_t x_182; uint8_t x_183; +x_180 = lean_ctor_get(x_176, 3); +lean_dec(x_180); +x_181 = lean_ctor_get(x_176, 0); +lean_dec(x_181); +x_182 = 0; +lean_ctor_set(x_176, 0, x_178); +lean_ctor_set_uint8(x_176, sizeof(void*)*4, x_182); +x_183 = 1; +lean_ctor_set(x_1, 0, x_176); +lean_ctor_set_uint8(x_1, sizeof(void*)*4, x_183); +return x_1; +} +else +{ +lean_object* x_184; lean_object* x_185; uint8_t x_186; lean_object* x_187; uint8_t x_188; +x_184 = lean_ctor_get(x_176, 1); +x_185 = lean_ctor_get(x_176, 2); +lean_inc(x_185); +lean_inc(x_184); +lean_dec(x_176); +x_186 = 0; +x_187 = lean_alloc_ctor(1, 4, 1); +lean_ctor_set(x_187, 0, x_178); +lean_ctor_set(x_187, 1, x_184); +lean_ctor_set(x_187, 2, x_185); +lean_ctor_set(x_187, 3, x_178); +lean_ctor_set_uint8(x_187, sizeof(void*)*4, x_186); +x_188 = 1; +lean_ctor_set(x_1, 0, x_187); +lean_ctor_set_uint8(x_1, sizeof(void*)*4, x_188); +return x_1; +} +} +else +{ +uint8_t x_189; +x_189 = lean_ctor_get_uint8(x_178, sizeof(void*)*4); +if (x_189 == 0) +{ +uint8_t x_190; +x_190 = !lean_is_exclusive(x_176); +if (x_190 == 0) +{ +lean_object* x_191; lean_object* x_192; lean_object* x_193; lean_object* x_194; uint8_t x_195; +x_191 = lean_ctor_get(x_176, 1); +x_192 = lean_ctor_get(x_176, 2); +x_193 = lean_ctor_get(x_176, 3); +lean_dec(x_193); +x_194 = lean_ctor_get(x_176, 0); +lean_dec(x_194); +x_195 = !lean_is_exclusive(x_178); +if (x_195 == 0) +{ +lean_object* x_196; lean_object* x_197; lean_object* x_198; lean_object* x_199; uint8_t x_200; +x_196 = lean_ctor_get(x_178, 0); +x_197 = lean_ctor_get(x_178, 1); +x_198 = lean_ctor_get(x_178, 2); +x_199 = lean_ctor_get(x_178, 3); +x_200 = 1; +lean_ctor_set(x_178, 3, x_196); +lean_ctor_set(x_178, 2, x_192); +lean_ctor_set(x_178, 1, x_191); +lean_ctor_set(x_178, 0, x_177); +lean_ctor_set_uint8(x_178, sizeof(void*)*4, x_200); +lean_ctor_set(x_176, 3, x_31); +lean_ctor_set(x_176, 2, x_30); +lean_ctor_set(x_176, 1, x_29); +lean_ctor_set(x_176, 0, x_199); +lean_ctor_set_uint8(x_176, sizeof(void*)*4, x_200); +lean_ctor_set(x_1, 3, x_176); +lean_ctor_set(x_1, 2, x_198); +lean_ctor_set(x_1, 1, x_197); +lean_ctor_set(x_1, 0, x_178); +lean_ctor_set_uint8(x_1, sizeof(void*)*4, x_189); +return x_1; +} +else +{ +lean_object* x_201; lean_object* x_202; lean_object* x_203; lean_object* x_204; uint8_t x_205; lean_object* x_206; +x_201 = lean_ctor_get(x_178, 0); +x_202 = lean_ctor_get(x_178, 1); +x_203 = lean_ctor_get(x_178, 2); +x_204 = lean_ctor_get(x_178, 3); +lean_inc(x_204); +lean_inc(x_203); +lean_inc(x_202); +lean_inc(x_201); +lean_dec(x_178); +x_205 = 1; +x_206 = lean_alloc_ctor(1, 4, 1); +lean_ctor_set(x_206, 0, x_177); +lean_ctor_set(x_206, 1, x_191); +lean_ctor_set(x_206, 2, x_192); +lean_ctor_set(x_206, 3, x_201); +lean_ctor_set_uint8(x_206, sizeof(void*)*4, x_205); +lean_ctor_set(x_176, 3, x_31); +lean_ctor_set(x_176, 2, x_30); +lean_ctor_set(x_176, 1, x_29); +lean_ctor_set(x_176, 0, x_204); +lean_ctor_set_uint8(x_176, sizeof(void*)*4, x_205); +lean_ctor_set(x_1, 3, x_176); +lean_ctor_set(x_1, 2, x_203); +lean_ctor_set(x_1, 1, x_202); +lean_ctor_set(x_1, 0, x_206); +lean_ctor_set_uint8(x_1, sizeof(void*)*4, x_189); +return x_1; +} +} +else +{ +lean_object* x_207; lean_object* x_208; lean_object* x_209; lean_object* x_210; lean_object* x_211; lean_object* x_212; lean_object* x_213; uint8_t x_214; lean_object* x_215; lean_object* x_216; +x_207 = lean_ctor_get(x_176, 1); +x_208 = lean_ctor_get(x_176, 2); +lean_inc(x_208); +lean_inc(x_207); +lean_dec(x_176); +x_209 = lean_ctor_get(x_178, 0); +lean_inc(x_209); +x_210 = lean_ctor_get(x_178, 1); +lean_inc(x_210); +x_211 = lean_ctor_get(x_178, 2); +lean_inc(x_211); +x_212 = lean_ctor_get(x_178, 3); +lean_inc(x_212); +if (lean_is_exclusive(x_178)) { + lean_ctor_release(x_178, 0); + lean_ctor_release(x_178, 1); + lean_ctor_release(x_178, 2); + lean_ctor_release(x_178, 3); + x_213 = x_178; +} else { + lean_dec_ref(x_178); + x_213 = lean_box(0); +} +x_214 = 1; +if (lean_is_scalar(x_213)) { + x_215 = lean_alloc_ctor(1, 4, 1); +} else { + x_215 = x_213; +} +lean_ctor_set(x_215, 0, x_177); +lean_ctor_set(x_215, 1, x_207); +lean_ctor_set(x_215, 2, x_208); +lean_ctor_set(x_215, 3, x_209); +lean_ctor_set_uint8(x_215, sizeof(void*)*4, x_214); +x_216 = lean_alloc_ctor(1, 4, 1); +lean_ctor_set(x_216, 0, x_212); +lean_ctor_set(x_216, 1, x_29); +lean_ctor_set(x_216, 2, x_30); +lean_ctor_set(x_216, 3, x_31); +lean_ctor_set_uint8(x_216, sizeof(void*)*4, x_214); +lean_ctor_set(x_1, 3, x_216); +lean_ctor_set(x_1, 2, x_211); +lean_ctor_set(x_1, 1, x_210); +lean_ctor_set(x_1, 0, x_215); +lean_ctor_set_uint8(x_1, sizeof(void*)*4, x_189); +return x_1; +} +} +else +{ +uint8_t x_217; +x_217 = !lean_is_exclusive(x_176); +if (x_217 == 0) +{ +lean_object* x_218; lean_object* x_219; uint8_t x_220; +x_218 = lean_ctor_get(x_176, 3); +lean_dec(x_218); +x_219 = lean_ctor_get(x_176, 0); +lean_dec(x_219); +x_220 = 0; +lean_ctor_set_uint8(x_176, sizeof(void*)*4, x_220); +lean_ctor_set(x_1, 0, x_176); +lean_ctor_set_uint8(x_1, sizeof(void*)*4, x_189); +return x_1; +} +else +{ +lean_object* x_221; lean_object* x_222; uint8_t x_223; lean_object* x_224; +x_221 = lean_ctor_get(x_176, 1); +x_222 = lean_ctor_get(x_176, 2); +lean_inc(x_222); +lean_inc(x_221); +lean_dec(x_176); +x_223 = 0; +x_224 = lean_alloc_ctor(1, 4, 1); +lean_ctor_set(x_224, 0, x_177); +lean_ctor_set(x_224, 1, x_221); +lean_ctor_set(x_224, 2, x_222); +lean_ctor_set(x_224, 3, x_178); +lean_ctor_set_uint8(x_224, sizeof(void*)*4, x_223); +lean_ctor_set(x_1, 0, x_224); +lean_ctor_set_uint8(x_1, sizeof(void*)*4, x_189); +return x_1; +} +} +} +} +else +{ +uint8_t x_225; +x_225 = lean_ctor_get_uint8(x_177, sizeof(void*)*4); +if (x_225 == 0) +{ +uint8_t x_226; +x_226 = !lean_is_exclusive(x_176); +if (x_226 == 0) +{ +lean_object* x_227; lean_object* x_228; lean_object* x_229; lean_object* x_230; uint8_t x_231; +x_227 = lean_ctor_get(x_176, 1); +x_228 = lean_ctor_get(x_176, 2); +x_229 = lean_ctor_get(x_176, 3); +x_230 = lean_ctor_get(x_176, 0); +lean_dec(x_230); +x_231 = !lean_is_exclusive(x_177); +if (x_231 == 0) +{ +uint8_t x_232; +x_232 = 1; +lean_ctor_set_uint8(x_177, sizeof(void*)*4, x_232); +lean_ctor_set(x_176, 3, x_31); +lean_ctor_set(x_176, 2, x_30); +lean_ctor_set(x_176, 1, x_29); +lean_ctor_set(x_176, 0, x_229); +lean_ctor_set_uint8(x_176, sizeof(void*)*4, x_232); +lean_ctor_set(x_1, 3, x_176); +lean_ctor_set(x_1, 2, x_228); +lean_ctor_set(x_1, 1, x_227); +lean_ctor_set(x_1, 0, x_177); +lean_ctor_set_uint8(x_1, sizeof(void*)*4, x_225); +return x_1; +} +else +{ +lean_object* x_233; lean_object* x_234; lean_object* x_235; lean_object* x_236; uint8_t x_237; lean_object* x_238; +x_233 = lean_ctor_get(x_177, 0); +x_234 = lean_ctor_get(x_177, 1); +x_235 = lean_ctor_get(x_177, 2); +x_236 = lean_ctor_get(x_177, 3); +lean_inc(x_236); +lean_inc(x_235); +lean_inc(x_234); +lean_inc(x_233); +lean_dec(x_177); +x_237 = 1; +x_238 = lean_alloc_ctor(1, 4, 1); +lean_ctor_set(x_238, 0, x_233); +lean_ctor_set(x_238, 1, x_234); +lean_ctor_set(x_238, 2, x_235); +lean_ctor_set(x_238, 3, x_236); +lean_ctor_set_uint8(x_238, sizeof(void*)*4, x_237); +lean_ctor_set(x_176, 3, x_31); +lean_ctor_set(x_176, 2, x_30); +lean_ctor_set(x_176, 1, x_29); +lean_ctor_set(x_176, 0, x_229); +lean_ctor_set_uint8(x_176, sizeof(void*)*4, x_237); +lean_ctor_set(x_1, 3, x_176); +lean_ctor_set(x_1, 2, x_228); +lean_ctor_set(x_1, 1, x_227); +lean_ctor_set(x_1, 0, x_238); +lean_ctor_set_uint8(x_1, sizeof(void*)*4, x_225); +return x_1; +} +} +else +{ +lean_object* x_239; lean_object* x_240; lean_object* x_241; lean_object* x_242; lean_object* x_243; lean_object* x_244; lean_object* x_245; lean_object* x_246; uint8_t x_247; lean_object* x_248; lean_object* x_249; +x_239 = lean_ctor_get(x_176, 1); +x_240 = lean_ctor_get(x_176, 2); +x_241 = lean_ctor_get(x_176, 3); +lean_inc(x_241); +lean_inc(x_240); +lean_inc(x_239); +lean_dec(x_176); +x_242 = lean_ctor_get(x_177, 0); +lean_inc(x_242); +x_243 = lean_ctor_get(x_177, 1); +lean_inc(x_243); +x_244 = lean_ctor_get(x_177, 2); +lean_inc(x_244); +x_245 = lean_ctor_get(x_177, 3); +lean_inc(x_245); +if (lean_is_exclusive(x_177)) { + lean_ctor_release(x_177, 0); + lean_ctor_release(x_177, 1); + lean_ctor_release(x_177, 2); + lean_ctor_release(x_177, 3); + x_246 = x_177; +} else { + lean_dec_ref(x_177); + x_246 = lean_box(0); +} +x_247 = 1; +if (lean_is_scalar(x_246)) { + x_248 = lean_alloc_ctor(1, 4, 1); +} else { + x_248 = x_246; +} +lean_ctor_set(x_248, 0, x_242); +lean_ctor_set(x_248, 1, x_243); +lean_ctor_set(x_248, 2, x_244); +lean_ctor_set(x_248, 3, x_245); +lean_ctor_set_uint8(x_248, sizeof(void*)*4, x_247); +x_249 = lean_alloc_ctor(1, 4, 1); +lean_ctor_set(x_249, 0, x_241); +lean_ctor_set(x_249, 1, x_29); +lean_ctor_set(x_249, 2, x_30); +lean_ctor_set(x_249, 3, x_31); +lean_ctor_set_uint8(x_249, sizeof(void*)*4, x_247); +lean_ctor_set(x_1, 3, x_249); +lean_ctor_set(x_1, 2, x_240); +lean_ctor_set(x_1, 1, x_239); +lean_ctor_set(x_1, 0, x_248); +lean_ctor_set_uint8(x_1, sizeof(void*)*4, x_225); +return x_1; +} +} +else +{ +lean_object* x_250; +x_250 = lean_ctor_get(x_176, 3); +lean_inc(x_250); +if (lean_obj_tag(x_250) == 0) +{ +uint8_t x_251; +x_251 = !lean_is_exclusive(x_176); +if (x_251 == 0) +{ +lean_object* x_252; lean_object* x_253; uint8_t x_254; +x_252 = lean_ctor_get(x_176, 3); +lean_dec(x_252); +x_253 = lean_ctor_get(x_176, 0); +lean_dec(x_253); +x_254 = 0; +lean_ctor_set_uint8(x_176, sizeof(void*)*4, x_254); +lean_ctor_set(x_1, 0, x_176); +lean_ctor_set_uint8(x_1, sizeof(void*)*4, x_225); +return x_1; +} +else +{ +lean_object* x_255; lean_object* x_256; uint8_t x_257; lean_object* x_258; +x_255 = lean_ctor_get(x_176, 1); +x_256 = lean_ctor_get(x_176, 2); +lean_inc(x_256); +lean_inc(x_255); +lean_dec(x_176); +x_257 = 0; +x_258 = lean_alloc_ctor(1, 4, 1); +lean_ctor_set(x_258, 0, x_177); +lean_ctor_set(x_258, 1, x_255); +lean_ctor_set(x_258, 2, x_256); +lean_ctor_set(x_258, 3, x_250); +lean_ctor_set_uint8(x_258, sizeof(void*)*4, x_257); +lean_ctor_set(x_1, 0, x_258); +lean_ctor_set_uint8(x_1, sizeof(void*)*4, x_225); +return x_1; +} +} +else +{ +uint8_t x_259; +x_259 = lean_ctor_get_uint8(x_250, sizeof(void*)*4); +if (x_259 == 0) +{ +uint8_t x_260; +lean_free_object(x_1); +x_260 = !lean_is_exclusive(x_176); +if (x_260 == 0) +{ +lean_object* x_261; lean_object* x_262; lean_object* x_263; lean_object* x_264; uint8_t x_265; +x_261 = lean_ctor_get(x_176, 1); +x_262 = lean_ctor_get(x_176, 2); +x_263 = lean_ctor_get(x_176, 3); +lean_dec(x_263); +x_264 = lean_ctor_get(x_176, 0); +lean_dec(x_264); +x_265 = !lean_is_exclusive(x_250); +if (x_265 == 0) +{ +lean_object* x_266; lean_object* x_267; lean_object* x_268; lean_object* x_269; uint8_t x_270; +x_266 = lean_ctor_get(x_250, 0); +x_267 = lean_ctor_get(x_250, 1); +x_268 = lean_ctor_get(x_250, 2); +x_269 = lean_ctor_get(x_250, 3); +lean_inc(x_177); +lean_ctor_set(x_250, 3, x_266); +lean_ctor_set(x_250, 2, x_262); +lean_ctor_set(x_250, 1, x_261); +lean_ctor_set(x_250, 0, x_177); +x_270 = !lean_is_exclusive(x_177); +if (x_270 == 0) +{ +lean_object* x_271; lean_object* x_272; lean_object* x_273; lean_object* x_274; +x_271 = lean_ctor_get(x_177, 3); +lean_dec(x_271); +x_272 = lean_ctor_get(x_177, 2); +lean_dec(x_272); +x_273 = lean_ctor_get(x_177, 1); +lean_dec(x_273); +x_274 = lean_ctor_get(x_177, 0); +lean_dec(x_274); +lean_ctor_set_uint8(x_250, sizeof(void*)*4, x_225); +lean_ctor_set(x_177, 3, x_31); +lean_ctor_set(x_177, 2, x_30); +lean_ctor_set(x_177, 1, x_29); +lean_ctor_set(x_177, 0, x_269); +lean_ctor_set(x_176, 3, x_177); +lean_ctor_set(x_176, 2, x_268); +lean_ctor_set(x_176, 1, x_267); +lean_ctor_set(x_176, 0, x_250); +lean_ctor_set_uint8(x_176, sizeof(void*)*4, x_259); +return x_176; +} +else +{ +lean_object* x_275; +lean_dec(x_177); +lean_ctor_set_uint8(x_250, sizeof(void*)*4, x_225); +x_275 = lean_alloc_ctor(1, 4, 1); +lean_ctor_set(x_275, 0, x_269); +lean_ctor_set(x_275, 1, x_29); +lean_ctor_set(x_275, 2, x_30); +lean_ctor_set(x_275, 3, x_31); +lean_ctor_set_uint8(x_275, sizeof(void*)*4, x_225); +lean_ctor_set(x_176, 3, x_275); +lean_ctor_set(x_176, 2, x_268); +lean_ctor_set(x_176, 1, x_267); +lean_ctor_set(x_176, 0, x_250); +lean_ctor_set_uint8(x_176, sizeof(void*)*4, x_259); +return x_176; +} +} +else +{ +lean_object* x_276; lean_object* x_277; lean_object* x_278; lean_object* x_279; lean_object* x_280; lean_object* x_281; lean_object* x_282; +x_276 = lean_ctor_get(x_250, 0); +x_277 = lean_ctor_get(x_250, 1); +x_278 = lean_ctor_get(x_250, 2); +x_279 = lean_ctor_get(x_250, 3); +lean_inc(x_279); +lean_inc(x_278); +lean_inc(x_277); +lean_inc(x_276); +lean_dec(x_250); +lean_inc(x_177); +x_280 = lean_alloc_ctor(1, 4, 1); +lean_ctor_set(x_280, 0, x_177); +lean_ctor_set(x_280, 1, x_261); +lean_ctor_set(x_280, 2, x_262); +lean_ctor_set(x_280, 3, x_276); +if (lean_is_exclusive(x_177)) { + lean_ctor_release(x_177, 0); + lean_ctor_release(x_177, 1); + lean_ctor_release(x_177, 2); + lean_ctor_release(x_177, 3); + x_281 = x_177; +} else { + lean_dec_ref(x_177); + x_281 = lean_box(0); +} +lean_ctor_set_uint8(x_280, sizeof(void*)*4, x_225); +if (lean_is_scalar(x_281)) { + x_282 = lean_alloc_ctor(1, 4, 1); +} else { + x_282 = x_281; +} +lean_ctor_set(x_282, 0, x_279); +lean_ctor_set(x_282, 1, x_29); +lean_ctor_set(x_282, 2, x_30); +lean_ctor_set(x_282, 3, x_31); +lean_ctor_set_uint8(x_282, sizeof(void*)*4, x_225); +lean_ctor_set(x_176, 3, x_282); +lean_ctor_set(x_176, 2, x_278); +lean_ctor_set(x_176, 1, x_277); +lean_ctor_set(x_176, 0, x_280); +lean_ctor_set_uint8(x_176, sizeof(void*)*4, x_259); +return x_176; +} +} +else +{ +lean_object* x_283; lean_object* x_284; lean_object* x_285; lean_object* x_286; lean_object* x_287; lean_object* x_288; lean_object* x_289; lean_object* x_290; lean_object* x_291; lean_object* x_292; lean_object* x_293; +x_283 = lean_ctor_get(x_176, 1); +x_284 = lean_ctor_get(x_176, 2); +lean_inc(x_284); +lean_inc(x_283); +lean_dec(x_176); +x_285 = lean_ctor_get(x_250, 0); +lean_inc(x_285); +x_286 = lean_ctor_get(x_250, 1); +lean_inc(x_286); +x_287 = lean_ctor_get(x_250, 2); +lean_inc(x_287); +x_288 = lean_ctor_get(x_250, 3); +lean_inc(x_288); +if (lean_is_exclusive(x_250)) { + lean_ctor_release(x_250, 0); + lean_ctor_release(x_250, 1); + lean_ctor_release(x_250, 2); + lean_ctor_release(x_250, 3); + x_289 = x_250; +} else { + lean_dec_ref(x_250); + x_289 = lean_box(0); +} +lean_inc(x_177); +if (lean_is_scalar(x_289)) { + x_290 = lean_alloc_ctor(1, 4, 1); +} else { + x_290 = x_289; +} +lean_ctor_set(x_290, 0, x_177); +lean_ctor_set(x_290, 1, x_283); +lean_ctor_set(x_290, 2, x_284); +lean_ctor_set(x_290, 3, x_285); +if (lean_is_exclusive(x_177)) { + lean_ctor_release(x_177, 0); + lean_ctor_release(x_177, 1); + lean_ctor_release(x_177, 2); + lean_ctor_release(x_177, 3); + x_291 = x_177; +} else { + lean_dec_ref(x_177); + x_291 = lean_box(0); +} +lean_ctor_set_uint8(x_290, sizeof(void*)*4, x_225); +if (lean_is_scalar(x_291)) { + x_292 = lean_alloc_ctor(1, 4, 1); +} else { + x_292 = x_291; +} +lean_ctor_set(x_292, 0, x_288); +lean_ctor_set(x_292, 1, x_29); +lean_ctor_set(x_292, 2, x_30); +lean_ctor_set(x_292, 3, x_31); +lean_ctor_set_uint8(x_292, sizeof(void*)*4, x_225); +x_293 = lean_alloc_ctor(1, 4, 1); +lean_ctor_set(x_293, 0, x_290); +lean_ctor_set(x_293, 1, x_286); +lean_ctor_set(x_293, 2, x_287); +lean_ctor_set(x_293, 3, x_292); +lean_ctor_set_uint8(x_293, sizeof(void*)*4, x_259); +return x_293; +} +} +else +{ +uint8_t x_294; +x_294 = !lean_is_exclusive(x_176); +if (x_294 == 0) +{ +lean_object* x_295; lean_object* x_296; uint8_t x_297; +x_295 = lean_ctor_get(x_176, 3); +lean_dec(x_295); +x_296 = lean_ctor_get(x_176, 0); +lean_dec(x_296); +x_297 = !lean_is_exclusive(x_177); +if (x_297 == 0) +{ +uint8_t x_298; +lean_ctor_set_uint8(x_177, sizeof(void*)*4, x_259); +x_298 = 0; +lean_ctor_set_uint8(x_176, sizeof(void*)*4, x_298); +lean_ctor_set(x_1, 0, x_176); +lean_ctor_set_uint8(x_1, sizeof(void*)*4, x_259); +return x_1; +} +else +{ +lean_object* x_299; lean_object* x_300; lean_object* x_301; lean_object* x_302; lean_object* x_303; uint8_t x_304; +x_299 = lean_ctor_get(x_177, 0); +x_300 = lean_ctor_get(x_177, 1); +x_301 = lean_ctor_get(x_177, 2); +x_302 = lean_ctor_get(x_177, 3); +lean_inc(x_302); +lean_inc(x_301); +lean_inc(x_300); +lean_inc(x_299); +lean_dec(x_177); +x_303 = lean_alloc_ctor(1, 4, 1); +lean_ctor_set(x_303, 0, x_299); +lean_ctor_set(x_303, 1, x_300); +lean_ctor_set(x_303, 2, x_301); +lean_ctor_set(x_303, 3, x_302); +lean_ctor_set_uint8(x_303, sizeof(void*)*4, x_259); +x_304 = 0; +lean_ctor_set(x_176, 0, x_303); +lean_ctor_set_uint8(x_176, sizeof(void*)*4, x_304); +lean_ctor_set(x_1, 0, x_176); +lean_ctor_set_uint8(x_1, sizeof(void*)*4, x_259); +return x_1; +} +} +else +{ +lean_object* x_305; lean_object* x_306; lean_object* x_307; lean_object* x_308; lean_object* x_309; lean_object* x_310; lean_object* x_311; lean_object* x_312; uint8_t x_313; lean_object* x_314; +x_305 = lean_ctor_get(x_176, 1); +x_306 = lean_ctor_get(x_176, 2); +lean_inc(x_306); +lean_inc(x_305); +lean_dec(x_176); +x_307 = lean_ctor_get(x_177, 0); +lean_inc(x_307); +x_308 = lean_ctor_get(x_177, 1); +lean_inc(x_308); +x_309 = lean_ctor_get(x_177, 2); +lean_inc(x_309); +x_310 = lean_ctor_get(x_177, 3); +lean_inc(x_310); +if (lean_is_exclusive(x_177)) { + lean_ctor_release(x_177, 0); + lean_ctor_release(x_177, 1); + lean_ctor_release(x_177, 2); + lean_ctor_release(x_177, 3); + x_311 = x_177; +} else { + lean_dec_ref(x_177); + x_311 = lean_box(0); +} +if (lean_is_scalar(x_311)) { + x_312 = lean_alloc_ctor(1, 4, 1); +} else { + x_312 = x_311; +} +lean_ctor_set(x_312, 0, x_307); +lean_ctor_set(x_312, 1, x_308); +lean_ctor_set(x_312, 2, x_309); +lean_ctor_set(x_312, 3, x_310); +lean_ctor_set_uint8(x_312, sizeof(void*)*4, x_259); +x_313 = 0; +x_314 = lean_alloc_ctor(1, 4, 1); +lean_ctor_set(x_314, 0, x_312); +lean_ctor_set(x_314, 1, x_305); +lean_ctor_set(x_314, 2, x_306); +lean_ctor_set(x_314, 3, x_250); +lean_ctor_set_uint8(x_314, sizeof(void*)*4, x_313); +lean_ctor_set(x_1, 0, x_314); +lean_ctor_set_uint8(x_1, sizeof(void*)*4, x_259); +return x_1; +} +} +} +} +} +} +} +} +} +else +{ +lean_object* x_315; lean_object* x_316; lean_object* x_317; lean_object* x_318; uint8_t x_319; +x_315 = lean_ctor_get(x_1, 0); +x_316 = lean_ctor_get(x_1, 1); +x_317 = lean_ctor_get(x_1, 2); +x_318 = lean_ctor_get(x_1, 3); +lean_inc(x_318); +lean_inc(x_317); +lean_inc(x_316); +lean_inc(x_315); +lean_dec(x_1); +x_319 = lean_nat_dec_lt(x_2, x_316); +if (x_319 == 0) +{ +uint8_t x_320; +x_320 = lean_nat_dec_lt(x_316, x_2); +if (x_320 == 0) +{ +lean_object* x_321; +lean_dec(x_317); +lean_dec(x_316); +x_321 = lean_alloc_ctor(1, 4, 1); +lean_ctor_set(x_321, 0, x_315); +lean_ctor_set(x_321, 1, x_2); +lean_ctor_set(x_321, 2, x_3); +lean_ctor_set(x_321, 3, x_318); +lean_ctor_set_uint8(x_321, sizeof(void*)*4, x_6); +return x_321; +} +else +{ +uint8_t x_322; +x_322 = l_RBNode_isRed___rarg(x_318); +if (x_322 == 0) +{ +lean_object* x_323; lean_object* x_324; +x_323 = l_RBNode_ins___main___at_Lean_TypeClass_Context_uAlphaNormalizeCore___main___spec__3(x_318, x_2, x_3); +x_324 = lean_alloc_ctor(1, 4, 1); +lean_ctor_set(x_324, 0, x_315); +lean_ctor_set(x_324, 1, x_316); +lean_ctor_set(x_324, 2, x_317); +lean_ctor_set(x_324, 3, x_323); +lean_ctor_set_uint8(x_324, sizeof(void*)*4, x_6); +return x_324; +} +else +{ +lean_object* x_325; +x_325 = l_RBNode_ins___main___at_Lean_TypeClass_Context_uAlphaNormalizeCore___main___spec__3(x_318, x_2, x_3); +if (lean_obj_tag(x_325) == 0) +{ +lean_dec(x_317); +lean_dec(x_316); +lean_dec(x_315); +return x_325; +} +else +{ +lean_object* x_326; +x_326 = lean_ctor_get(x_325, 0); +lean_inc(x_326); +if (lean_obj_tag(x_326) == 0) +{ +lean_object* x_327; +x_327 = lean_ctor_get(x_325, 3); +lean_inc(x_327); +if (lean_obj_tag(x_327) == 0) +{ +lean_object* x_328; lean_object* x_329; lean_object* x_330; uint8_t x_331; lean_object* x_332; uint8_t x_333; lean_object* x_334; +x_328 = lean_ctor_get(x_325, 1); +lean_inc(x_328); +x_329 = lean_ctor_get(x_325, 2); +lean_inc(x_329); +if (lean_is_exclusive(x_325)) { + lean_ctor_release(x_325, 0); + lean_ctor_release(x_325, 1); + lean_ctor_release(x_325, 2); + lean_ctor_release(x_325, 3); + x_330 = x_325; +} else { + lean_dec_ref(x_325); + x_330 = lean_box(0); +} +x_331 = 0; +if (lean_is_scalar(x_330)) { + x_332 = lean_alloc_ctor(1, 4, 1); +} else { + x_332 = x_330; +} +lean_ctor_set(x_332, 0, x_327); +lean_ctor_set(x_332, 1, x_328); +lean_ctor_set(x_332, 2, x_329); +lean_ctor_set(x_332, 3, x_327); +lean_ctor_set_uint8(x_332, sizeof(void*)*4, x_331); +x_333 = 1; +x_334 = lean_alloc_ctor(1, 4, 1); +lean_ctor_set(x_334, 0, x_315); +lean_ctor_set(x_334, 1, x_316); +lean_ctor_set(x_334, 2, x_317); +lean_ctor_set(x_334, 3, x_332); +lean_ctor_set_uint8(x_334, sizeof(void*)*4, x_333); +return x_334; +} +else +{ +uint8_t x_335; +x_335 = lean_ctor_get_uint8(x_327, sizeof(void*)*4); +if (x_335 == 0) +{ +lean_object* x_336; lean_object* x_337; lean_object* x_338; lean_object* x_339; lean_object* x_340; lean_object* x_341; lean_object* x_342; lean_object* x_343; uint8_t x_344; lean_object* x_345; lean_object* x_346; lean_object* x_347; +x_336 = lean_ctor_get(x_325, 1); +lean_inc(x_336); +x_337 = lean_ctor_get(x_325, 2); +lean_inc(x_337); +if (lean_is_exclusive(x_325)) { + lean_ctor_release(x_325, 0); + lean_ctor_release(x_325, 1); + lean_ctor_release(x_325, 2); + lean_ctor_release(x_325, 3); + x_338 = x_325; +} else { + lean_dec_ref(x_325); + x_338 = lean_box(0); +} +x_339 = lean_ctor_get(x_327, 0); +lean_inc(x_339); +x_340 = lean_ctor_get(x_327, 1); +lean_inc(x_340); +x_341 = lean_ctor_get(x_327, 2); +lean_inc(x_341); +x_342 = lean_ctor_get(x_327, 3); +lean_inc(x_342); +if (lean_is_exclusive(x_327)) { + lean_ctor_release(x_327, 0); + lean_ctor_release(x_327, 1); + lean_ctor_release(x_327, 2); + lean_ctor_release(x_327, 3); + x_343 = x_327; +} else { + lean_dec_ref(x_327); + x_343 = lean_box(0); +} +x_344 = 1; +if (lean_is_scalar(x_343)) { + x_345 = lean_alloc_ctor(1, 4, 1); +} else { + x_345 = x_343; +} +lean_ctor_set(x_345, 0, x_315); +lean_ctor_set(x_345, 1, x_316); +lean_ctor_set(x_345, 2, x_317); +lean_ctor_set(x_345, 3, x_326); +lean_ctor_set_uint8(x_345, sizeof(void*)*4, x_344); +if (lean_is_scalar(x_338)) { + x_346 = lean_alloc_ctor(1, 4, 1); +} else { + x_346 = x_338; +} +lean_ctor_set(x_346, 0, x_339); +lean_ctor_set(x_346, 1, x_340); +lean_ctor_set(x_346, 2, x_341); +lean_ctor_set(x_346, 3, x_342); +lean_ctor_set_uint8(x_346, sizeof(void*)*4, x_344); +x_347 = lean_alloc_ctor(1, 4, 1); +lean_ctor_set(x_347, 0, x_345); +lean_ctor_set(x_347, 1, x_336); +lean_ctor_set(x_347, 2, x_337); +lean_ctor_set(x_347, 3, x_346); +lean_ctor_set_uint8(x_347, sizeof(void*)*4, x_335); +return x_347; +} +else +{ +lean_object* x_348; lean_object* x_349; lean_object* x_350; uint8_t x_351; lean_object* x_352; lean_object* x_353; +x_348 = lean_ctor_get(x_325, 1); +lean_inc(x_348); +x_349 = lean_ctor_get(x_325, 2); +lean_inc(x_349); +if (lean_is_exclusive(x_325)) { + lean_ctor_release(x_325, 0); + lean_ctor_release(x_325, 1); + lean_ctor_release(x_325, 2); + lean_ctor_release(x_325, 3); + x_350 = x_325; +} else { + lean_dec_ref(x_325); + x_350 = lean_box(0); +} +x_351 = 0; +if (lean_is_scalar(x_350)) { + x_352 = lean_alloc_ctor(1, 4, 1); +} else { + x_352 = x_350; +} +lean_ctor_set(x_352, 0, x_326); +lean_ctor_set(x_352, 1, x_348); +lean_ctor_set(x_352, 2, x_349); +lean_ctor_set(x_352, 3, x_327); +lean_ctor_set_uint8(x_352, sizeof(void*)*4, x_351); +x_353 = lean_alloc_ctor(1, 4, 1); +lean_ctor_set(x_353, 0, x_315); +lean_ctor_set(x_353, 1, x_316); +lean_ctor_set(x_353, 2, x_317); +lean_ctor_set(x_353, 3, x_352); +lean_ctor_set_uint8(x_353, sizeof(void*)*4, x_335); +return x_353; +} +} +} +else +{ +uint8_t x_354; +x_354 = lean_ctor_get_uint8(x_326, sizeof(void*)*4); +if (x_354 == 0) +{ +lean_object* x_355; lean_object* x_356; lean_object* x_357; lean_object* x_358; lean_object* x_359; lean_object* x_360; lean_object* x_361; lean_object* x_362; lean_object* x_363; uint8_t x_364; lean_object* x_365; lean_object* x_366; lean_object* x_367; +x_355 = lean_ctor_get(x_325, 1); +lean_inc(x_355); +x_356 = lean_ctor_get(x_325, 2); +lean_inc(x_356); +x_357 = lean_ctor_get(x_325, 3); +lean_inc(x_357); +if (lean_is_exclusive(x_325)) { + lean_ctor_release(x_325, 0); + lean_ctor_release(x_325, 1); + lean_ctor_release(x_325, 2); + lean_ctor_release(x_325, 3); + x_358 = x_325; +} else { + lean_dec_ref(x_325); + x_358 = lean_box(0); +} +x_359 = lean_ctor_get(x_326, 0); +lean_inc(x_359); +x_360 = lean_ctor_get(x_326, 1); +lean_inc(x_360); +x_361 = lean_ctor_get(x_326, 2); +lean_inc(x_361); +x_362 = lean_ctor_get(x_326, 3); +lean_inc(x_362); +if (lean_is_exclusive(x_326)) { + lean_ctor_release(x_326, 0); + lean_ctor_release(x_326, 1); + lean_ctor_release(x_326, 2); + lean_ctor_release(x_326, 3); + x_363 = x_326; +} else { + lean_dec_ref(x_326); + x_363 = lean_box(0); +} +x_364 = 1; +if (lean_is_scalar(x_363)) { + x_365 = lean_alloc_ctor(1, 4, 1); +} else { + x_365 = x_363; +} +lean_ctor_set(x_365, 0, x_315); +lean_ctor_set(x_365, 1, x_316); +lean_ctor_set(x_365, 2, x_317); +lean_ctor_set(x_365, 3, x_359); +lean_ctor_set_uint8(x_365, sizeof(void*)*4, x_364); +if (lean_is_scalar(x_358)) { + x_366 = lean_alloc_ctor(1, 4, 1); +} else { + x_366 = x_358; +} +lean_ctor_set(x_366, 0, x_362); +lean_ctor_set(x_366, 1, x_355); +lean_ctor_set(x_366, 2, x_356); +lean_ctor_set(x_366, 3, x_357); +lean_ctor_set_uint8(x_366, sizeof(void*)*4, x_364); +x_367 = lean_alloc_ctor(1, 4, 1); +lean_ctor_set(x_367, 0, x_365); +lean_ctor_set(x_367, 1, x_360); +lean_ctor_set(x_367, 2, x_361); +lean_ctor_set(x_367, 3, x_366); +lean_ctor_set_uint8(x_367, sizeof(void*)*4, x_354); +return x_367; +} +else +{ +lean_object* x_368; +x_368 = lean_ctor_get(x_325, 3); +lean_inc(x_368); +if (lean_obj_tag(x_368) == 0) +{ +lean_object* x_369; lean_object* x_370; lean_object* x_371; uint8_t x_372; lean_object* x_373; lean_object* x_374; +x_369 = lean_ctor_get(x_325, 1); +lean_inc(x_369); +x_370 = lean_ctor_get(x_325, 2); +lean_inc(x_370); +if (lean_is_exclusive(x_325)) { + lean_ctor_release(x_325, 0); + lean_ctor_release(x_325, 1); + lean_ctor_release(x_325, 2); + lean_ctor_release(x_325, 3); + x_371 = x_325; +} else { + lean_dec_ref(x_325); + x_371 = lean_box(0); +} +x_372 = 0; +if (lean_is_scalar(x_371)) { + x_373 = lean_alloc_ctor(1, 4, 1); +} else { + x_373 = x_371; +} +lean_ctor_set(x_373, 0, x_326); +lean_ctor_set(x_373, 1, x_369); +lean_ctor_set(x_373, 2, x_370); +lean_ctor_set(x_373, 3, x_368); +lean_ctor_set_uint8(x_373, sizeof(void*)*4, x_372); +x_374 = lean_alloc_ctor(1, 4, 1); +lean_ctor_set(x_374, 0, x_315); +lean_ctor_set(x_374, 1, x_316); +lean_ctor_set(x_374, 2, x_317); +lean_ctor_set(x_374, 3, x_373); +lean_ctor_set_uint8(x_374, sizeof(void*)*4, x_354); +return x_374; +} +else +{ +uint8_t x_375; +x_375 = lean_ctor_get_uint8(x_368, sizeof(void*)*4); +if (x_375 == 0) +{ +lean_object* x_376; lean_object* x_377; lean_object* x_378; lean_object* x_379; lean_object* x_380; lean_object* x_381; lean_object* x_382; lean_object* x_383; lean_object* x_384; lean_object* x_385; lean_object* x_386; lean_object* x_387; +x_376 = lean_ctor_get(x_325, 1); +lean_inc(x_376); +x_377 = lean_ctor_get(x_325, 2); +lean_inc(x_377); +if (lean_is_exclusive(x_325)) { + lean_ctor_release(x_325, 0); + lean_ctor_release(x_325, 1); + lean_ctor_release(x_325, 2); + lean_ctor_release(x_325, 3); + x_378 = x_325; +} else { + lean_dec_ref(x_325); + x_378 = lean_box(0); +} +x_379 = lean_ctor_get(x_368, 0); +lean_inc(x_379); +x_380 = lean_ctor_get(x_368, 1); +lean_inc(x_380); +x_381 = lean_ctor_get(x_368, 2); +lean_inc(x_381); +x_382 = lean_ctor_get(x_368, 3); +lean_inc(x_382); +if (lean_is_exclusive(x_368)) { + lean_ctor_release(x_368, 0); + lean_ctor_release(x_368, 1); + lean_ctor_release(x_368, 2); + lean_ctor_release(x_368, 3); + x_383 = x_368; +} else { + lean_dec_ref(x_368); + x_383 = lean_box(0); +} +lean_inc(x_326); +if (lean_is_scalar(x_383)) { + x_384 = lean_alloc_ctor(1, 4, 1); +} else { + x_384 = x_383; +} +lean_ctor_set(x_384, 0, x_315); +lean_ctor_set(x_384, 1, x_316); +lean_ctor_set(x_384, 2, x_317); +lean_ctor_set(x_384, 3, x_326); +if (lean_is_exclusive(x_326)) { + lean_ctor_release(x_326, 0); + lean_ctor_release(x_326, 1); + lean_ctor_release(x_326, 2); + lean_ctor_release(x_326, 3); + x_385 = x_326; +} else { + lean_dec_ref(x_326); + x_385 = lean_box(0); +} +lean_ctor_set_uint8(x_384, sizeof(void*)*4, x_354); +if (lean_is_scalar(x_385)) { + x_386 = lean_alloc_ctor(1, 4, 1); +} else { + x_386 = x_385; +} +lean_ctor_set(x_386, 0, x_379); +lean_ctor_set(x_386, 1, x_380); +lean_ctor_set(x_386, 2, x_381); +lean_ctor_set(x_386, 3, x_382); +lean_ctor_set_uint8(x_386, sizeof(void*)*4, x_354); +if (lean_is_scalar(x_378)) { + x_387 = lean_alloc_ctor(1, 4, 1); +} else { + x_387 = x_378; +} +lean_ctor_set(x_387, 0, x_384); +lean_ctor_set(x_387, 1, x_376); +lean_ctor_set(x_387, 2, x_377); +lean_ctor_set(x_387, 3, x_386); +lean_ctor_set_uint8(x_387, sizeof(void*)*4, x_375); +return x_387; +} +else +{ +lean_object* x_388; lean_object* x_389; lean_object* x_390; lean_object* x_391; lean_object* x_392; lean_object* x_393; lean_object* x_394; lean_object* x_395; lean_object* x_396; uint8_t x_397; lean_object* x_398; lean_object* x_399; +x_388 = lean_ctor_get(x_325, 1); +lean_inc(x_388); +x_389 = lean_ctor_get(x_325, 2); +lean_inc(x_389); +if (lean_is_exclusive(x_325)) { + lean_ctor_release(x_325, 0); + lean_ctor_release(x_325, 1); + lean_ctor_release(x_325, 2); + lean_ctor_release(x_325, 3); + x_390 = x_325; +} else { + lean_dec_ref(x_325); + x_390 = lean_box(0); +} +x_391 = lean_ctor_get(x_326, 0); +lean_inc(x_391); +x_392 = lean_ctor_get(x_326, 1); +lean_inc(x_392); +x_393 = lean_ctor_get(x_326, 2); +lean_inc(x_393); +x_394 = lean_ctor_get(x_326, 3); +lean_inc(x_394); +if (lean_is_exclusive(x_326)) { + lean_ctor_release(x_326, 0); + lean_ctor_release(x_326, 1); + lean_ctor_release(x_326, 2); + lean_ctor_release(x_326, 3); + x_395 = x_326; +} else { + lean_dec_ref(x_326); + x_395 = lean_box(0); +} +if (lean_is_scalar(x_395)) { + x_396 = lean_alloc_ctor(1, 4, 1); +} else { + x_396 = x_395; +} +lean_ctor_set(x_396, 0, x_391); +lean_ctor_set(x_396, 1, x_392); +lean_ctor_set(x_396, 2, x_393); +lean_ctor_set(x_396, 3, x_394); +lean_ctor_set_uint8(x_396, sizeof(void*)*4, x_375); +x_397 = 0; +if (lean_is_scalar(x_390)) { + x_398 = lean_alloc_ctor(1, 4, 1); +} else { + x_398 = x_390; +} +lean_ctor_set(x_398, 0, x_396); +lean_ctor_set(x_398, 1, x_388); +lean_ctor_set(x_398, 2, x_389); +lean_ctor_set(x_398, 3, x_368); +lean_ctor_set_uint8(x_398, sizeof(void*)*4, x_397); +x_399 = lean_alloc_ctor(1, 4, 1); +lean_ctor_set(x_399, 0, x_315); +lean_ctor_set(x_399, 1, x_316); +lean_ctor_set(x_399, 2, x_317); +lean_ctor_set(x_399, 3, x_398); +lean_ctor_set_uint8(x_399, sizeof(void*)*4, x_375); +return x_399; +} +} +} +} +} +} +} +} +else +{ +uint8_t x_400; +x_400 = l_RBNode_isRed___rarg(x_315); +if (x_400 == 0) +{ +lean_object* x_401; lean_object* x_402; +x_401 = l_RBNode_ins___main___at_Lean_TypeClass_Context_uAlphaNormalizeCore___main___spec__3(x_315, x_2, x_3); +x_402 = lean_alloc_ctor(1, 4, 1); +lean_ctor_set(x_402, 0, x_401); +lean_ctor_set(x_402, 1, x_316); +lean_ctor_set(x_402, 2, x_317); +lean_ctor_set(x_402, 3, x_318); +lean_ctor_set_uint8(x_402, sizeof(void*)*4, x_6); +return x_402; +} +else +{ +lean_object* x_403; +x_403 = l_RBNode_ins___main___at_Lean_TypeClass_Context_uAlphaNormalizeCore___main___spec__3(x_315, x_2, x_3); +if (lean_obj_tag(x_403) == 0) +{ +lean_dec(x_318); +lean_dec(x_317); +lean_dec(x_316); +return x_403; +} +else +{ +lean_object* x_404; +x_404 = lean_ctor_get(x_403, 0); +lean_inc(x_404); +if (lean_obj_tag(x_404) == 0) +{ +lean_object* x_405; +x_405 = lean_ctor_get(x_403, 3); +lean_inc(x_405); +if (lean_obj_tag(x_405) == 0) +{ +lean_object* x_406; lean_object* x_407; lean_object* x_408; uint8_t x_409; lean_object* x_410; uint8_t x_411; lean_object* x_412; +x_406 = lean_ctor_get(x_403, 1); +lean_inc(x_406); +x_407 = lean_ctor_get(x_403, 2); +lean_inc(x_407); +if (lean_is_exclusive(x_403)) { + lean_ctor_release(x_403, 0); + lean_ctor_release(x_403, 1); + lean_ctor_release(x_403, 2); + lean_ctor_release(x_403, 3); + x_408 = x_403; +} else { + lean_dec_ref(x_403); + x_408 = lean_box(0); +} +x_409 = 0; +if (lean_is_scalar(x_408)) { + x_410 = lean_alloc_ctor(1, 4, 1); +} else { + x_410 = x_408; +} +lean_ctor_set(x_410, 0, x_405); +lean_ctor_set(x_410, 1, x_406); +lean_ctor_set(x_410, 2, x_407); +lean_ctor_set(x_410, 3, x_405); +lean_ctor_set_uint8(x_410, sizeof(void*)*4, x_409); +x_411 = 1; +x_412 = lean_alloc_ctor(1, 4, 1); +lean_ctor_set(x_412, 0, x_410); +lean_ctor_set(x_412, 1, x_316); +lean_ctor_set(x_412, 2, x_317); +lean_ctor_set(x_412, 3, x_318); +lean_ctor_set_uint8(x_412, sizeof(void*)*4, x_411); +return x_412; +} +else +{ +uint8_t x_413; +x_413 = lean_ctor_get_uint8(x_405, sizeof(void*)*4); +if (x_413 == 0) +{ +lean_object* x_414; lean_object* x_415; lean_object* x_416; lean_object* x_417; lean_object* x_418; lean_object* x_419; lean_object* x_420; lean_object* x_421; uint8_t x_422; lean_object* x_423; lean_object* x_424; lean_object* x_425; +x_414 = lean_ctor_get(x_403, 1); +lean_inc(x_414); +x_415 = lean_ctor_get(x_403, 2); +lean_inc(x_415); +if (lean_is_exclusive(x_403)) { + lean_ctor_release(x_403, 0); + lean_ctor_release(x_403, 1); + lean_ctor_release(x_403, 2); + lean_ctor_release(x_403, 3); + x_416 = x_403; +} else { + lean_dec_ref(x_403); + x_416 = lean_box(0); +} +x_417 = lean_ctor_get(x_405, 0); +lean_inc(x_417); +x_418 = lean_ctor_get(x_405, 1); +lean_inc(x_418); +x_419 = lean_ctor_get(x_405, 2); +lean_inc(x_419); +x_420 = lean_ctor_get(x_405, 3); +lean_inc(x_420); +if (lean_is_exclusive(x_405)) { + lean_ctor_release(x_405, 0); + lean_ctor_release(x_405, 1); + lean_ctor_release(x_405, 2); + lean_ctor_release(x_405, 3); + x_421 = x_405; +} else { + lean_dec_ref(x_405); + x_421 = lean_box(0); +} +x_422 = 1; +if (lean_is_scalar(x_421)) { + x_423 = lean_alloc_ctor(1, 4, 1); +} else { + x_423 = x_421; +} +lean_ctor_set(x_423, 0, x_404); +lean_ctor_set(x_423, 1, x_414); +lean_ctor_set(x_423, 2, x_415); +lean_ctor_set(x_423, 3, x_417); +lean_ctor_set_uint8(x_423, sizeof(void*)*4, x_422); +if (lean_is_scalar(x_416)) { + x_424 = lean_alloc_ctor(1, 4, 1); +} else { + x_424 = x_416; +} +lean_ctor_set(x_424, 0, x_420); +lean_ctor_set(x_424, 1, x_316); +lean_ctor_set(x_424, 2, x_317); +lean_ctor_set(x_424, 3, x_318); +lean_ctor_set_uint8(x_424, sizeof(void*)*4, x_422); +x_425 = lean_alloc_ctor(1, 4, 1); +lean_ctor_set(x_425, 0, x_423); +lean_ctor_set(x_425, 1, x_418); +lean_ctor_set(x_425, 2, x_419); +lean_ctor_set(x_425, 3, x_424); +lean_ctor_set_uint8(x_425, sizeof(void*)*4, x_413); +return x_425; +} +else +{ +lean_object* x_426; lean_object* x_427; lean_object* x_428; uint8_t x_429; lean_object* x_430; lean_object* x_431; +x_426 = lean_ctor_get(x_403, 1); +lean_inc(x_426); +x_427 = lean_ctor_get(x_403, 2); +lean_inc(x_427); +if (lean_is_exclusive(x_403)) { + lean_ctor_release(x_403, 0); + lean_ctor_release(x_403, 1); + lean_ctor_release(x_403, 2); + lean_ctor_release(x_403, 3); + x_428 = x_403; +} else { + lean_dec_ref(x_403); + x_428 = lean_box(0); +} +x_429 = 0; +if (lean_is_scalar(x_428)) { + x_430 = lean_alloc_ctor(1, 4, 1); +} else { + x_430 = x_428; +} +lean_ctor_set(x_430, 0, x_404); +lean_ctor_set(x_430, 1, x_426); +lean_ctor_set(x_430, 2, x_427); +lean_ctor_set(x_430, 3, x_405); +lean_ctor_set_uint8(x_430, sizeof(void*)*4, x_429); +x_431 = lean_alloc_ctor(1, 4, 1); +lean_ctor_set(x_431, 0, x_430); +lean_ctor_set(x_431, 1, x_316); +lean_ctor_set(x_431, 2, x_317); +lean_ctor_set(x_431, 3, x_318); +lean_ctor_set_uint8(x_431, sizeof(void*)*4, x_413); +return x_431; +} +} +} +else +{ +uint8_t x_432; +x_432 = lean_ctor_get_uint8(x_404, sizeof(void*)*4); +if (x_432 == 0) +{ +lean_object* x_433; lean_object* x_434; lean_object* x_435; lean_object* x_436; lean_object* x_437; lean_object* x_438; lean_object* x_439; lean_object* x_440; lean_object* x_441; uint8_t x_442; lean_object* x_443; lean_object* x_444; lean_object* x_445; +x_433 = lean_ctor_get(x_403, 1); +lean_inc(x_433); +x_434 = lean_ctor_get(x_403, 2); +lean_inc(x_434); +x_435 = lean_ctor_get(x_403, 3); +lean_inc(x_435); +if (lean_is_exclusive(x_403)) { + lean_ctor_release(x_403, 0); + lean_ctor_release(x_403, 1); + lean_ctor_release(x_403, 2); + lean_ctor_release(x_403, 3); + x_436 = x_403; +} else { + lean_dec_ref(x_403); + x_436 = lean_box(0); +} +x_437 = lean_ctor_get(x_404, 0); +lean_inc(x_437); +x_438 = lean_ctor_get(x_404, 1); +lean_inc(x_438); +x_439 = lean_ctor_get(x_404, 2); +lean_inc(x_439); +x_440 = lean_ctor_get(x_404, 3); +lean_inc(x_440); +if (lean_is_exclusive(x_404)) { + lean_ctor_release(x_404, 0); + lean_ctor_release(x_404, 1); + lean_ctor_release(x_404, 2); + lean_ctor_release(x_404, 3); + x_441 = x_404; +} else { + lean_dec_ref(x_404); + x_441 = lean_box(0); +} +x_442 = 1; +if (lean_is_scalar(x_441)) { + x_443 = lean_alloc_ctor(1, 4, 1); +} else { + x_443 = x_441; +} +lean_ctor_set(x_443, 0, x_437); +lean_ctor_set(x_443, 1, x_438); +lean_ctor_set(x_443, 2, x_439); +lean_ctor_set(x_443, 3, x_440); +lean_ctor_set_uint8(x_443, sizeof(void*)*4, x_442); +if (lean_is_scalar(x_436)) { + x_444 = lean_alloc_ctor(1, 4, 1); +} else { + x_444 = x_436; +} +lean_ctor_set(x_444, 0, x_435); +lean_ctor_set(x_444, 1, x_316); +lean_ctor_set(x_444, 2, x_317); +lean_ctor_set(x_444, 3, x_318); +lean_ctor_set_uint8(x_444, sizeof(void*)*4, x_442); +x_445 = lean_alloc_ctor(1, 4, 1); +lean_ctor_set(x_445, 0, x_443); +lean_ctor_set(x_445, 1, x_433); +lean_ctor_set(x_445, 2, x_434); +lean_ctor_set(x_445, 3, x_444); +lean_ctor_set_uint8(x_445, sizeof(void*)*4, x_432); +return x_445; +} +else +{ +lean_object* x_446; +x_446 = lean_ctor_get(x_403, 3); +lean_inc(x_446); +if (lean_obj_tag(x_446) == 0) +{ +lean_object* x_447; lean_object* x_448; lean_object* x_449; uint8_t x_450; lean_object* x_451; lean_object* x_452; +x_447 = lean_ctor_get(x_403, 1); +lean_inc(x_447); +x_448 = lean_ctor_get(x_403, 2); +lean_inc(x_448); +if (lean_is_exclusive(x_403)) { + lean_ctor_release(x_403, 0); + lean_ctor_release(x_403, 1); + lean_ctor_release(x_403, 2); + lean_ctor_release(x_403, 3); + x_449 = x_403; +} else { + lean_dec_ref(x_403); + x_449 = lean_box(0); +} +x_450 = 0; +if (lean_is_scalar(x_449)) { + x_451 = lean_alloc_ctor(1, 4, 1); +} else { + x_451 = x_449; +} +lean_ctor_set(x_451, 0, x_404); +lean_ctor_set(x_451, 1, x_447); +lean_ctor_set(x_451, 2, x_448); +lean_ctor_set(x_451, 3, x_446); +lean_ctor_set_uint8(x_451, sizeof(void*)*4, x_450); +x_452 = lean_alloc_ctor(1, 4, 1); +lean_ctor_set(x_452, 0, x_451); +lean_ctor_set(x_452, 1, x_316); +lean_ctor_set(x_452, 2, x_317); +lean_ctor_set(x_452, 3, x_318); +lean_ctor_set_uint8(x_452, sizeof(void*)*4, x_432); +return x_452; +} +else +{ +uint8_t x_453; +x_453 = lean_ctor_get_uint8(x_446, sizeof(void*)*4); +if (x_453 == 0) +{ +lean_object* x_454; lean_object* x_455; lean_object* x_456; lean_object* x_457; lean_object* x_458; lean_object* x_459; lean_object* x_460; lean_object* x_461; lean_object* x_462; lean_object* x_463; lean_object* x_464; lean_object* x_465; +x_454 = lean_ctor_get(x_403, 1); +lean_inc(x_454); +x_455 = lean_ctor_get(x_403, 2); +lean_inc(x_455); +if (lean_is_exclusive(x_403)) { + lean_ctor_release(x_403, 0); + lean_ctor_release(x_403, 1); + lean_ctor_release(x_403, 2); + lean_ctor_release(x_403, 3); + x_456 = x_403; +} else { + lean_dec_ref(x_403); + x_456 = lean_box(0); +} +x_457 = lean_ctor_get(x_446, 0); +lean_inc(x_457); +x_458 = lean_ctor_get(x_446, 1); +lean_inc(x_458); +x_459 = lean_ctor_get(x_446, 2); +lean_inc(x_459); +x_460 = lean_ctor_get(x_446, 3); +lean_inc(x_460); +if (lean_is_exclusive(x_446)) { + lean_ctor_release(x_446, 0); + lean_ctor_release(x_446, 1); + lean_ctor_release(x_446, 2); + lean_ctor_release(x_446, 3); + x_461 = x_446; +} else { + lean_dec_ref(x_446); + x_461 = lean_box(0); +} +lean_inc(x_404); +if (lean_is_scalar(x_461)) { + x_462 = lean_alloc_ctor(1, 4, 1); +} else { + x_462 = x_461; +} +lean_ctor_set(x_462, 0, x_404); +lean_ctor_set(x_462, 1, x_454); +lean_ctor_set(x_462, 2, x_455); +lean_ctor_set(x_462, 3, x_457); +if (lean_is_exclusive(x_404)) { + lean_ctor_release(x_404, 0); + lean_ctor_release(x_404, 1); + lean_ctor_release(x_404, 2); + lean_ctor_release(x_404, 3); + x_463 = x_404; +} else { + lean_dec_ref(x_404); + x_463 = lean_box(0); +} +lean_ctor_set_uint8(x_462, sizeof(void*)*4, x_432); +if (lean_is_scalar(x_463)) { + x_464 = lean_alloc_ctor(1, 4, 1); +} else { + x_464 = x_463; +} +lean_ctor_set(x_464, 0, x_460); +lean_ctor_set(x_464, 1, x_316); +lean_ctor_set(x_464, 2, x_317); +lean_ctor_set(x_464, 3, x_318); +lean_ctor_set_uint8(x_464, sizeof(void*)*4, x_432); +if (lean_is_scalar(x_456)) { + x_465 = lean_alloc_ctor(1, 4, 1); +} else { + x_465 = x_456; +} +lean_ctor_set(x_465, 0, x_462); +lean_ctor_set(x_465, 1, x_458); +lean_ctor_set(x_465, 2, x_459); +lean_ctor_set(x_465, 3, x_464); +lean_ctor_set_uint8(x_465, sizeof(void*)*4, x_453); +return x_465; +} +else +{ +lean_object* x_466; lean_object* x_467; lean_object* x_468; lean_object* x_469; lean_object* x_470; lean_object* x_471; lean_object* x_472; lean_object* x_473; lean_object* x_474; uint8_t x_475; lean_object* x_476; lean_object* x_477; +x_466 = lean_ctor_get(x_403, 1); +lean_inc(x_466); +x_467 = lean_ctor_get(x_403, 2); +lean_inc(x_467); +if (lean_is_exclusive(x_403)) { + lean_ctor_release(x_403, 0); + lean_ctor_release(x_403, 1); + lean_ctor_release(x_403, 2); + lean_ctor_release(x_403, 3); + x_468 = x_403; +} else { + lean_dec_ref(x_403); + x_468 = lean_box(0); +} +x_469 = lean_ctor_get(x_404, 0); +lean_inc(x_469); +x_470 = lean_ctor_get(x_404, 1); +lean_inc(x_470); +x_471 = lean_ctor_get(x_404, 2); +lean_inc(x_471); +x_472 = lean_ctor_get(x_404, 3); +lean_inc(x_472); +if (lean_is_exclusive(x_404)) { + lean_ctor_release(x_404, 0); + lean_ctor_release(x_404, 1); + lean_ctor_release(x_404, 2); + lean_ctor_release(x_404, 3); + x_473 = x_404; +} else { + lean_dec_ref(x_404); + x_473 = lean_box(0); +} +if (lean_is_scalar(x_473)) { + x_474 = lean_alloc_ctor(1, 4, 1); +} else { + x_474 = x_473; +} +lean_ctor_set(x_474, 0, x_469); +lean_ctor_set(x_474, 1, x_470); +lean_ctor_set(x_474, 2, x_471); +lean_ctor_set(x_474, 3, x_472); +lean_ctor_set_uint8(x_474, sizeof(void*)*4, x_453); +x_475 = 0; +if (lean_is_scalar(x_468)) { + x_476 = lean_alloc_ctor(1, 4, 1); +} else { + x_476 = x_468; +} +lean_ctor_set(x_476, 0, x_474); +lean_ctor_set(x_476, 1, x_466); +lean_ctor_set(x_476, 2, x_467); +lean_ctor_set(x_476, 3, x_446); +lean_ctor_set_uint8(x_476, sizeof(void*)*4, x_475); +x_477 = lean_alloc_ctor(1, 4, 1); +lean_ctor_set(x_477, 0, x_476); +lean_ctor_set(x_477, 1, x_316); +lean_ctor_set(x_477, 2, x_317); +lean_ctor_set(x_477, 3, x_318); +lean_ctor_set_uint8(x_477, sizeof(void*)*4, x_453); +return x_477; +} +} +} +} +} +} +} +} +} +} +} +} +lean_object* l_RBNode_insert___at_Lean_TypeClass_Context_uAlphaNormalizeCore___main___spec__2(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +uint8_t x_4; +x_4 = l_RBNode_isRed___rarg(x_1); +if (x_4 == 0) +{ +lean_object* x_5; +x_5 = l_RBNode_ins___main___at_Lean_TypeClass_Context_uAlphaNormalizeCore___main___spec__3(x_1, x_2, x_3); +return x_5; +} +else +{ +lean_object* x_6; lean_object* x_7; +x_6 = l_RBNode_ins___main___at_Lean_TypeClass_Context_uAlphaNormalizeCore___main___spec__3(x_1, x_2, x_3); +x_7 = l_RBNode_setBlack___rarg(x_6); +return x_7; +} +} +} +lean_object* l_Lean_TypeClass_Context_uAlphaNormalizeCore___main(lean_object* x_1, lean_object* x_2) { +_start: +{ +switch (lean_obj_tag(x_1)) { +case 1: +{ +lean_object* x_3; lean_object* x_4; uint8_t x_5; +x_3 = lean_ctor_get(x_1, 0); +lean_inc(x_3); +lean_dec(x_1); +x_4 = l_Lean_TypeClass_Context_uAlphaNormalizeCore___main(x_3, x_2); +x_5 = !lean_is_exclusive(x_4); +if (x_5 == 0) +{ +lean_object* x_6; lean_object* x_7; +x_6 = lean_ctor_get(x_4, 0); +x_7 = level_mk_succ(x_6); +lean_ctor_set(x_4, 0, x_7); +return x_4; +} +else +{ +lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; +x_8 = lean_ctor_get(x_4, 0); +x_9 = lean_ctor_get(x_4, 1); +lean_inc(x_9); +lean_inc(x_8); +lean_dec(x_4); +x_10 = level_mk_succ(x_8); +x_11 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_11, 0, x_10); +lean_ctor_set(x_11, 1, x_9); +return x_11; +} +} +case 2: +{ +lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; uint8_t x_18; +x_12 = lean_ctor_get(x_1, 0); +lean_inc(x_12); +x_13 = lean_ctor_get(x_1, 1); +lean_inc(x_13); +lean_dec(x_1); +x_14 = l_Lean_TypeClass_Context_uAlphaNormalizeCore___main(x_12, x_2); +x_15 = lean_ctor_get(x_14, 0); +lean_inc(x_15); +x_16 = lean_ctor_get(x_14, 1); +lean_inc(x_16); +lean_dec(x_14); +x_17 = l_Lean_TypeClass_Context_uAlphaNormalizeCore___main(x_13, x_16); +x_18 = !lean_is_exclusive(x_17); +if (x_18 == 0) +{ +lean_object* x_19; lean_object* x_20; +x_19 = lean_ctor_get(x_17, 0); +x_20 = level_mk_max(x_15, x_19); +lean_ctor_set(x_17, 0, x_20); +return x_17; +} +else +{ +lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; +x_21 = lean_ctor_get(x_17, 0); +x_22 = lean_ctor_get(x_17, 1); +lean_inc(x_22); +lean_inc(x_21); +lean_dec(x_17); +x_23 = level_mk_max(x_15, x_21); +x_24 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_24, 0, x_23); +lean_ctor_set(x_24, 1, x_22); +return x_24; +} +} +case 3: +{ +lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; uint8_t x_31; +x_25 = lean_ctor_get(x_1, 0); +lean_inc(x_25); +x_26 = lean_ctor_get(x_1, 1); +lean_inc(x_26); +lean_dec(x_1); +x_27 = l_Lean_TypeClass_Context_uAlphaNormalizeCore___main(x_25, x_2); +x_28 = lean_ctor_get(x_27, 0); +lean_inc(x_28); +x_29 = lean_ctor_get(x_27, 1); +lean_inc(x_29); +lean_dec(x_27); +x_30 = l_Lean_TypeClass_Context_uAlphaNormalizeCore___main(x_26, x_29); +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); +x_33 = level_mk_imax(x_28, x_32); +lean_ctor_set(x_30, 0, x_33); +return x_30; +} +else +{ +lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; +x_34 = lean_ctor_get(x_30, 0); +x_35 = lean_ctor_get(x_30, 1); +lean_inc(x_35); +lean_inc(x_34); +lean_dec(x_30); +x_36 = level_mk_imax(x_28, x_34); +x_37 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_37, 0, x_36); +lean_ctor_set(x_37, 1, x_35); +return x_37; +} +} +case 5: +{ +lean_object* x_38; +x_38 = l_Lean_TypeClass_Context_uMetaIdx(x_1); +if (lean_obj_tag(x_38) == 0) +{ +lean_object* x_39; +x_39 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_39, 0, x_1); +lean_ctor_set(x_39, 1, x_2); +return x_39; +} +else +{ +lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; +lean_dec(x_1); +x_40 = lean_ctor_get(x_38, 0); +lean_inc(x_40); +lean_dec(x_38); +x_41 = lean_ctor_get(x_2, 0); +lean_inc(x_41); +x_42 = lean_ctor_get(x_2, 1); +lean_inc(x_42); +x_43 = l_RBNode_find___main___at_Lean_TypeClass_Context_uAlphaNormalizeCore___main___spec__1(x_42, x_40); +if (lean_obj_tag(x_43) == 0) +{ +uint8_t x_44; +x_44 = !lean_is_exclusive(x_2); +if (x_44 == 0) +{ +lean_object* x_45; lean_object* x_46; lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_object* x_51; lean_object* x_52; lean_object* x_53; +x_45 = lean_ctor_get(x_2, 1); +lean_dec(x_45); +x_46 = lean_ctor_get(x_2, 0); +lean_dec(x_46); +x_47 = lean_unsigned_to_nat(0u); +x_48 = l_RBNode_fold___main___at_RBMap_size___spec__1___rarg(x_47, x_42); +x_49 = l_Lean_TypeClass_Context_alphaMetaPrefix; +lean_inc(x_48); +x_50 = lean_name_mk_numeral(x_49, x_48); +x_51 = level_mk_mvar(x_50); +x_52 = l_RBNode_insert___at_Lean_TypeClass_Context_uAlphaNormalizeCore___main___spec__2(x_42, x_40, x_48); +lean_ctor_set(x_2, 1, x_52); +x_53 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_53, 0, x_51); +lean_ctor_set(x_53, 1, x_2); +return x_53; +} +else +{ +lean_object* x_54; lean_object* x_55; lean_object* x_56; lean_object* x_57; lean_object* x_58; lean_object* x_59; lean_object* x_60; lean_object* x_61; +lean_dec(x_2); +x_54 = lean_unsigned_to_nat(0u); +x_55 = l_RBNode_fold___main___at_RBMap_size___spec__1___rarg(x_54, x_42); +x_56 = l_Lean_TypeClass_Context_alphaMetaPrefix; +lean_inc(x_55); +x_57 = lean_name_mk_numeral(x_56, x_55); +x_58 = level_mk_mvar(x_57); +x_59 = l_RBNode_insert___at_Lean_TypeClass_Context_uAlphaNormalizeCore___main___spec__2(x_42, x_40, x_55); +x_60 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_60, 0, x_41); +lean_ctor_set(x_60, 1, x_59); +x_61 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_61, 0, x_58); +lean_ctor_set(x_61, 1, x_60); +return x_61; +} +} +else +{ +lean_object* x_62; lean_object* x_63; lean_object* x_64; lean_object* x_65; lean_object* x_66; +lean_dec(x_42); +lean_dec(x_41); +lean_dec(x_40); +x_62 = lean_ctor_get(x_43, 0); +lean_inc(x_62); +lean_dec(x_43); +x_63 = l_Lean_TypeClass_Context_alphaMetaPrefix; +x_64 = lean_name_mk_numeral(x_63, x_62); +x_65 = level_mk_mvar(x_64); +x_66 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_66, 0, x_65); +lean_ctor_set(x_66, 1, x_2); +return x_66; +} +} +} +default: +{ +lean_object* x_67; +x_67 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_67, 0, x_1); +lean_ctor_set(x_67, 1, x_2); +return x_67; +} +} +} +} +lean_object* l_RBNode_find___main___at_Lean_TypeClass_Context_uAlphaNormalizeCore___main___spec__1___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = l_RBNode_find___main___at_Lean_TypeClass_Context_uAlphaNormalizeCore___main___spec__1(x_1, x_2); +lean_dec(x_2); +lean_dec(x_1); +return x_3; +} +} +lean_object* l_Lean_TypeClass_Context_uAlphaNormalizeCore(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = l_Lean_TypeClass_Context_uAlphaNormalizeCore___main(x_1, x_2); +return x_3; +} +} +lean_object* l_List_mmap___main___at_Lean_TypeClass_Context_eAlphaNormalizeCore___main___spec__1(lean_object* x_1, lean_object* x_2) { +_start: +{ +if (lean_obj_tag(x_1) == 0) +{ +lean_object* x_3; lean_object* x_4; +x_3 = lean_box(0); +x_4 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_4, 0, x_3); +lean_ctor_set(x_4, 1, x_2); +return x_4; +} +else +{ +uint8_t x_5; +x_5 = !lean_is_exclusive(x_1); +if (x_5 == 0) +{ +lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; uint8_t x_12; +x_6 = lean_ctor_get(x_1, 0); +x_7 = lean_ctor_get(x_1, 1); +x_8 = l_Lean_TypeClass_Context_eAlphaNormalizeCore___main(x_6, x_2); +x_9 = lean_ctor_get(x_8, 0); +lean_inc(x_9); +x_10 = lean_ctor_get(x_8, 1); +lean_inc(x_10); +lean_dec(x_8); +x_11 = l_List_mmap___main___at_Lean_TypeClass_Context_eAlphaNormalizeCore___main___spec__1(x_7, x_10); +x_12 = !lean_is_exclusive(x_11); +if (x_12 == 0) +{ +lean_object* x_13; +x_13 = lean_ctor_get(x_11, 0); +lean_ctor_set(x_1, 1, x_13); +lean_ctor_set(x_1, 0, x_9); +lean_ctor_set(x_11, 0, x_1); +return x_11; +} +else +{ +lean_object* x_14; lean_object* x_15; lean_object* x_16; +x_14 = lean_ctor_get(x_11, 0); +x_15 = lean_ctor_get(x_11, 1); +lean_inc(x_15); +lean_inc(x_14); +lean_dec(x_11); +lean_ctor_set(x_1, 1, x_14); +lean_ctor_set(x_1, 0, x_9); +x_16 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_16, 0, x_1); +lean_ctor_set(x_16, 1, x_15); +return x_16; +} +} +else +{ +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; +x_17 = lean_ctor_get(x_1, 0); +x_18 = lean_ctor_get(x_1, 1); +lean_inc(x_18); +lean_inc(x_17); +lean_dec(x_1); +x_19 = l_Lean_TypeClass_Context_eAlphaNormalizeCore___main(x_17, x_2); +x_20 = lean_ctor_get(x_19, 0); +lean_inc(x_20); +x_21 = lean_ctor_get(x_19, 1); +lean_inc(x_21); +lean_dec(x_19); +x_22 = l_List_mmap___main___at_Lean_TypeClass_Context_eAlphaNormalizeCore___main___spec__1(x_18, x_21); +x_23 = lean_ctor_get(x_22, 0); +lean_inc(x_23); +x_24 = lean_ctor_get(x_22, 1); +lean_inc(x_24); +if (lean_is_exclusive(x_22)) { + lean_ctor_release(x_22, 0); + lean_ctor_release(x_22, 1); + x_25 = x_22; +} else { + lean_dec_ref(x_22); + x_25 = lean_box(0); +} +x_26 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_26, 0, x_20); +lean_ctor_set(x_26, 1, x_23); +if (lean_is_scalar(x_25)) { + x_27 = lean_alloc_ctor(0, 2, 0); +} else { + x_27 = x_25; +} +lean_ctor_set(x_27, 0, x_26); +lean_ctor_set(x_27, 1, x_24); +return x_27; +} +} +} +} +lean_object* l_Lean_TypeClass_Context_eAlphaNormalizeCore___main(lean_object* x_1, lean_object* x_2) { +_start: +{ +uint8_t x_3; +x_3 = l_Lean_Expr_isConst(x_1); +if (x_3 == 0) +{ +uint8_t x_4; +x_4 = l_Lean_Expr_isFVar(x_1); +if (x_4 == 0) +{ +uint8_t x_5; +x_5 = l_Lean_Expr_isApp(x_1); +if (x_5 == 0) +{ +if (lean_obj_tag(x_1) == 7) +{ +lean_object* x_6; uint8_t x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; uint8_t x_14; +x_6 = lean_ctor_get(x_1, 0); +lean_inc(x_6); +x_7 = lean_ctor_get_uint8(x_1, sizeof(void*)*3); +x_8 = lean_ctor_get(x_1, 1); +lean_inc(x_8); +x_9 = lean_ctor_get(x_1, 2); +lean_inc(x_9); +lean_dec(x_1); +x_10 = l_Lean_TypeClass_Context_eAlphaNormalizeCore___main(x_8, x_2); +x_11 = lean_ctor_get(x_10, 0); +lean_inc(x_11); +x_12 = lean_ctor_get(x_10, 1); +lean_inc(x_12); +lean_dec(x_10); +x_13 = l_Lean_TypeClass_Context_eAlphaNormalizeCore___main(x_9, x_12); +x_14 = !lean_is_exclusive(x_13); +if (x_14 == 0) +{ +lean_object* x_15; lean_object* x_16; +x_15 = lean_ctor_get(x_13, 0); +x_16 = lean_expr_mk_pi(x_6, x_7, x_11, x_15); +lean_ctor_set(x_13, 0, x_16); +return x_13; +} +else +{ +lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; +x_17 = lean_ctor_get(x_13, 0); +x_18 = lean_ctor_get(x_13, 1); +lean_inc(x_18); +lean_inc(x_17); +lean_dec(x_13); +x_19 = lean_expr_mk_pi(x_6, x_7, x_11, x_17); +x_20 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_20, 0, x_19); +lean_ctor_set(x_20, 1, x_18); +return x_20; +} +} +else +{ +lean_object* x_21; +x_21 = l_Lean_TypeClass_Context_eMetaIdx(x_1); +if (lean_obj_tag(x_21) == 0) +{ +lean_object* x_22; +x_22 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_22, 0, x_1); +lean_ctor_set(x_22, 1, x_2); +return x_22; +} +else +{ +lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; +lean_dec(x_1); +x_23 = lean_ctor_get(x_21, 0); +lean_inc(x_23); +lean_dec(x_21); +x_24 = lean_ctor_get(x_2, 0); +lean_inc(x_24); +x_25 = lean_ctor_get(x_2, 1); +lean_inc(x_25); +x_26 = l_RBNode_find___main___at_Lean_TypeClass_Context_uAlphaNormalizeCore___main___spec__1(x_24, x_23); +if (lean_obj_tag(x_26) == 0) +{ +uint8_t x_27; +x_27 = !lean_is_exclusive(x_2); +if (x_27 == 0) +{ +lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; +x_28 = lean_ctor_get(x_2, 1); +lean_dec(x_28); +x_29 = lean_ctor_get(x_2, 0); +lean_dec(x_29); +x_30 = lean_unsigned_to_nat(0u); +x_31 = l_RBNode_fold___main___at_RBMap_size___spec__1___rarg(x_30, x_24); +x_32 = l_Lean_TypeClass_Context_alphaMetaPrefix; +lean_inc(x_31); +x_33 = lean_name_mk_numeral(x_32, x_31); +x_34 = lean_expr_mk_mvar(x_33); +x_35 = l_RBNode_insert___at_Lean_TypeClass_Context_uAlphaNormalizeCore___main___spec__2(x_24, x_23, x_31); +lean_ctor_set(x_2, 0, x_35); +x_36 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_36, 0, x_34); +lean_ctor_set(x_36, 1, x_2); +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_dec(x_2); +x_37 = lean_unsigned_to_nat(0u); +x_38 = l_RBNode_fold___main___at_RBMap_size___spec__1___rarg(x_37, x_24); +x_39 = l_Lean_TypeClass_Context_alphaMetaPrefix; +lean_inc(x_38); +x_40 = lean_name_mk_numeral(x_39, x_38); +x_41 = lean_expr_mk_mvar(x_40); +x_42 = l_RBNode_insert___at_Lean_TypeClass_Context_uAlphaNormalizeCore___main___spec__2(x_24, x_23, x_38); +x_43 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_43, 0, x_42); +lean_ctor_set(x_43, 1, x_25); +x_44 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_44, 0, x_41); +lean_ctor_set(x_44, 1, x_43); +return x_44; +} +} +else +{ +lean_object* x_45; lean_object* x_46; lean_object* x_47; lean_object* x_48; lean_object* x_49; +lean_dec(x_25); +lean_dec(x_24); +lean_dec(x_23); +x_45 = lean_ctor_get(x_26, 0); +lean_inc(x_45); +lean_dec(x_26); +x_46 = l_Lean_TypeClass_Context_alphaMetaPrefix; +x_47 = lean_name_mk_numeral(x_46, x_45); +x_48 = lean_expr_mk_mvar(x_47); +x_49 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_49, 0, x_48); +lean_ctor_set(x_49, 1, x_2); +return x_49; +} +} +} +} +else +{ +lean_object* x_50; lean_object* x_51; lean_object* x_52; uint8_t x_53; +x_50 = lean_box(0); +x_51 = l_Lean_Expr_getAppArgsAux___main(x_1, x_50); +x_52 = l_List_mmap___main___at_Lean_TypeClass_Context_eAlphaNormalizeCore___main___spec__1(x_51, x_2); +x_53 = !lean_is_exclusive(x_52); +if (x_53 == 0) +{ +lean_object* x_54; lean_object* x_55; lean_object* x_56; +x_54 = lean_ctor_get(x_52, 0); +x_55 = l_Lean_Expr_getAppFn___main(x_1); +lean_dec(x_1); +x_56 = l_List_foldl___main___at_Lean_mkApp___spec__1(x_55, x_54); +lean_ctor_set(x_52, 0, x_56); +return x_52; +} +else +{ +lean_object* x_57; lean_object* x_58; lean_object* x_59; lean_object* x_60; lean_object* x_61; +x_57 = lean_ctor_get(x_52, 0); +x_58 = lean_ctor_get(x_52, 1); +lean_inc(x_58); +lean_inc(x_57); +lean_dec(x_52); +x_59 = l_Lean_Expr_getAppFn___main(x_1); +lean_dec(x_1); +x_60 = l_List_foldl___main___at_Lean_mkApp___spec__1(x_59, x_57); +x_61 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_61, 0, x_60); +lean_ctor_set(x_61, 1, x_58); +return x_61; +} +} +} +else +{ +lean_object* x_62; +x_62 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_62, 0, x_1); +lean_ctor_set(x_62, 1, x_2); +return x_62; +} +} +else +{ +lean_object* x_63; +x_63 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_63, 0, x_1); +lean_ctor_set(x_63, 1, x_2); +return x_63; +} +} +} +lean_object* l_Lean_TypeClass_Context_eAlphaNormalizeCore(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = l_Lean_TypeClass_Context_eAlphaNormalizeCore___main(x_1, x_2); +return x_3; +} +} +lean_object* _init_l_Lean_TypeClass_Context__u03b1Norm___closed__1() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = lean_box(0); +x_2 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_2, 0, x_1); +lean_ctor_set(x_2, 1, x_1); +return x_2; +} +} +lean_object* l_Lean_TypeClass_Context__u03b1Norm(lean_object* x_1) { +_start: +{ +lean_object* x_2; lean_object* x_3; lean_object* x_4; +x_2 = l_Lean_TypeClass_Context__u03b1Norm___closed__1; +x_3 = l_Lean_TypeClass_Context_eAlphaNormalizeCore___main(x_1, x_2); +x_4 = lean_ctor_get(x_3, 0); +lean_inc(x_4); +lean_dec(x_3); +return x_4; +} +} +lean_object* initialize_init_data_persistentarray_default(lean_object*); +lean_object* initialize_init_lean_expr(lean_object*); +lean_object* initialize_init_lean_metavarcontext(lean_object*); +static bool _G_initialized = false; +lean_object* initialize_init_lean_typeclass_context(lean_object* w) { +if (_G_initialized) return w; +_G_initialized = true; +if (lean_io_result_is_error(w)) return w; +w = initialize_init_data_persistentarray_default(w); +if (lean_io_result_is_error(w)) return w; +w = initialize_init_lean_expr(w); +if (lean_io_result_is_error(w)) return w; +w = initialize_init_lean_metavarcontext(w); +if (lean_io_result_is_error(w)) return w; +l_Lean_TypeClass_Context_Inhabited___closed__1 = _init_l_Lean_TypeClass_Context_Inhabited___closed__1(); +lean_mark_persistent(l_Lean_TypeClass_Context_Inhabited___closed__1); +l_Lean_TypeClass_Context_Inhabited = _init_l_Lean_TypeClass_Context_Inhabited(); +lean_mark_persistent(l_Lean_TypeClass_Context_Inhabited); +l_Lean_TypeClass_Context_metaPrefix___closed__1 = _init_l_Lean_TypeClass_Context_metaPrefix___closed__1(); +lean_mark_persistent(l_Lean_TypeClass_Context_metaPrefix___closed__1); +l_Lean_TypeClass_Context_metaPrefix___closed__2 = _init_l_Lean_TypeClass_Context_metaPrefix___closed__2(); +lean_mark_persistent(l_Lean_TypeClass_Context_metaPrefix___closed__2); +l_Lean_TypeClass_Context_metaPrefix = _init_l_Lean_TypeClass_Context_metaPrefix(); +lean_mark_persistent(l_Lean_TypeClass_Context_metaPrefix); +l_Lean_TypeClass_Context_alphaMetaPrefix___closed__1 = _init_l_Lean_TypeClass_Context_alphaMetaPrefix___closed__1(); +lean_mark_persistent(l_Lean_TypeClass_Context_alphaMetaPrefix___closed__1); +l_Lean_TypeClass_Context_alphaMetaPrefix___closed__2 = _init_l_Lean_TypeClass_Context_alphaMetaPrefix___closed__2(); +lean_mark_persistent(l_Lean_TypeClass_Context_alphaMetaPrefix___closed__2); +l_Lean_TypeClass_Context_alphaMetaPrefix = _init_l_Lean_TypeClass_Context_alphaMetaPrefix(); +lean_mark_persistent(l_Lean_TypeClass_Context_alphaMetaPrefix); +l_Lean_TypeClass_Context_eInfer___closed__1 = _init_l_Lean_TypeClass_Context_eInfer___closed__1(); +lean_mark_persistent(l_Lean_TypeClass_Context_eInfer___closed__1); +l_Lean_TypeClass_Context_eInfer___closed__2 = _init_l_Lean_TypeClass_Context_eInfer___closed__2(); +lean_mark_persistent(l_Lean_TypeClass_Context_eInfer___closed__2); +l_panicWithPos___at_Lean_TypeClass_Context_eAssign___spec__1___closed__1 = _init_l_panicWithPos___at_Lean_TypeClass_Context_eAssign___spec__1___closed__1(); +lean_mark_persistent(l_panicWithPos___at_Lean_TypeClass_Context_eAssign___spec__1___closed__1); +l_panicWithPos___at_Lean_TypeClass_Context_eAssign___spec__1___closed__2 = _init_l_panicWithPos___at_Lean_TypeClass_Context_eAssign___spec__1___closed__2(); +lean_mark_persistent(l_panicWithPos___at_Lean_TypeClass_Context_eAssign___spec__1___closed__2); +l_Lean_TypeClass_Context_eAssign___closed__1 = _init_l_Lean_TypeClass_Context_eAssign___closed__1(); +lean_mark_persistent(l_Lean_TypeClass_Context_eAssign___closed__1); +l_Lean_TypeClass_Context_eHasETmpMVar___closed__1 = _init_l_Lean_TypeClass_Context_eHasETmpMVar___closed__1(); +lean_mark_persistent(l_Lean_TypeClass_Context_eHasETmpMVar___closed__1); +l_Lean_TypeClass_Context_uAssign___closed__1 = _init_l_Lean_TypeClass_Context_uAssign___closed__1(); +lean_mark_persistent(l_Lean_TypeClass_Context_uAssign___closed__1); +l_Lean_TypeClass_Context_uHasTmpMVar___closed__1 = _init_l_Lean_TypeClass_Context_uHasTmpMVar___closed__1(); +lean_mark_persistent(l_Lean_TypeClass_Context_uHasTmpMVar___closed__1); +l_Lean_TypeClass_Context_uUnify___main___closed__1 = _init_l_Lean_TypeClass_Context_uUnify___main___closed__1(); +lean_mark_persistent(l_Lean_TypeClass_Context_uUnify___main___closed__1); +l_Lean_TypeClass_Context_uUnify___main___closed__2 = _init_l_Lean_TypeClass_Context_uUnify___main___closed__2(); +lean_mark_persistent(l_Lean_TypeClass_Context_uUnify___main___closed__2); +l_Lean_TypeClass_Context_uUnify___main___closed__3 = _init_l_Lean_TypeClass_Context_uUnify___main___closed__3(); +lean_mark_persistent(l_Lean_TypeClass_Context_uUnify___main___closed__3); +l_Lean_TypeClass_Context_uUnify___main___closed__4 = _init_l_Lean_TypeClass_Context_uUnify___main___closed__4(); +lean_mark_persistent(l_Lean_TypeClass_Context_uUnify___main___closed__4); +l_Lean_TypeClass_Context_uUnify___main___closed__5 = _init_l_Lean_TypeClass_Context_uUnify___main___closed__5(); +lean_mark_persistent(l_Lean_TypeClass_Context_uUnify___main___closed__5); +l_Lean_TypeClass_Context_eHasTmpMVar___closed__1 = _init_l_Lean_TypeClass_Context_eHasTmpMVar___closed__1(); +lean_mark_persistent(l_Lean_TypeClass_Context_eHasTmpMVar___closed__1); +l_panicWithPos___at_Lean_TypeClass_Context_eUnify___main___spec__1___closed__1 = _init_l_panicWithPos___at_Lean_TypeClass_Context_eUnify___main___spec__1___closed__1(); +lean_mark_persistent(l_panicWithPos___at_Lean_TypeClass_Context_eUnify___main___spec__1___closed__1); +l_Lean_TypeClass_Context_eUnify___main___closed__1 = _init_l_Lean_TypeClass_Context_eUnify___main___closed__1(); +lean_mark_persistent(l_Lean_TypeClass_Context_eUnify___main___closed__1); +l_Lean_TypeClass_Context_eUnify___main___closed__2 = _init_l_Lean_TypeClass_Context_eUnify___main___closed__2(); +lean_mark_persistent(l_Lean_TypeClass_Context_eUnify___main___closed__2); +l_Lean_TypeClass_Context__u03b1Norm___closed__1 = _init_l_Lean_TypeClass_Context__u03b1Norm___closed__1(); +lean_mark_persistent(l_Lean_TypeClass_Context__u03b1Norm___closed__1); +return w; +} +#ifdef __cplusplus +} +#endif diff --git a/src/stage0/init/lean/typeclass/synth.c b/src/stage0/init/lean/typeclass/synth.c new file mode 100644 index 0000000000..d1265dd3bb --- /dev/null +++ b/src/stage0/init/lean/typeclass/synth.c @@ -0,0 +1,8188 @@ +// Lean compiler output +// Module: init.lean.typeclass.synth +// Imports: init.lean.expr init.lean.environment init.lean.class init.lean.metavarcontext init.lean.typeclass.context init.data.persistenthashmap.default init.data.queue.default +#include "runtime/lean.h" +#if defined(__clang__) +#pragma clang diagnostic ignored "-Wunused-parameter" +#pragma clang diagnostic ignored "-Wunused-label" +#elif defined(__GNUC__) && !defined(__CLANG__) +#pragma GCC diagnostic ignored "-Wunused-parameter" +#pragma GCC diagnostic ignored "-Wunused-label" +#pragma GCC diagnostic ignored "-Wunused-but-set-variable" +#endif +#ifdef __cplusplus +extern "C" { +#endif +lean_object* l_panicWithPos___at_Lean_TypeClass_collectEReplacements___main___spec__1___closed__2; +lean_object* l_PersistentHashMap_insertAux___main___at_Lean_TypeClass_newSubgoal___spec__3(lean_object*, size_t, size_t, lean_object*, lean_object*); +lean_object* l_Array_back___at_Lean_TypeClass_consume___spec__1(lean_object*); +lean_object* l_Lean_TypeClass_introduceLocals(lean_object*, lean_object*, lean_object*, lean_object*); +size_t l_USize_mul(size_t, size_t); +lean_object* l_Lean_TypeClass_synth___closed__2; +lean_object* l_Lean_Expr_constName(lean_object*); +extern lean_object* l_Array_empty___closed__1; +lean_object* lean_nat_sub(lean_object*, lean_object*); +uint8_t l_Lean_Expr_isConst(lean_object*); +lean_object* l_panicWithPos___at_Lean_TypeClass_collectEReplacements___main___spec__1___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_TypeClass_Context_eInfer(lean_object*, lean_object*); +lean_object* l_Array_get_x21(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_TypeClass_synthCore___rarg(lean_object*, lean_object*); +lean_object* l_PersistentHashMap_findAux___main___at_Lean_TypeClass_newAnswer___spec__2___boxed(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_TypeClass_synthCore___main(lean_object*, lean_object*); +size_t lean_expr_hash(lean_object*); +size_t l_USize_shift__right(size_t, size_t); +lean_object* l_PersistentHashMap_find___at_Lean_TypeClass_newAnswer___spec__1___boxed(lean_object*, lean_object*); +lean_object* l_Lean_TypeClass_ConsumerNode_Inhabited; +lean_object* l_Lean_TypeClass_Context__u03b1Norm(lean_object*); +lean_object* lean_expr_dbg_to_string(lean_object*); +lean_object* l_Queue_enqueue___rarg(lean_object*, lean_object*); +lean_object* l_panicWithPos___at_Lean_TypeClass_collectEReplacements___main___spec__1(lean_object*, lean_object*, lean_object*, lean_object*); +extern lean_object* l_Lean_LocalContext_Inhabited___closed__1; +lean_object* l_Lean_TypeClass_introduceLocals___main___closed__2; +uint8_t l_Lean_Level_hasMVar___main(lean_object*); +lean_object* l_Lean_TypeClass_newAnswer(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_TypeClass_synthCore___main___closed__1; +lean_object* lean_expr_mk_app(lean_object*, lean_object*); +lean_object* l_panicWithPos___at_Lean_TypeClass_Context_eInfer___spec__1(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_TypeClass_wakeUp(lean_object*, lean_object*, lean_object*); +size_t l_USize_sub(size_t, size_t); +lean_object* lean_expr_instantiate1(lean_object*, lean_object*); +lean_object* l_Lean_TypeClass_TypedExpr_Inhabited___closed__1; +lean_object* l_Lean_Expr_getAppFn___main(lean_object*); +lean_object* l_Lean_Name_toStringWithSep___main(lean_object*, lean_object*); +lean_object* l_Lean_TypeClass_collectEReplacements___boxed(lean_object*); +lean_object* l_panicWithPos___at_Lean_TypeClass_collectEReplacements___main___spec__1___closed__1; +lean_object* l_Lean_TypeClass_Context_uNewMeta(lean_object*); +lean_object* l_Array_back___at_Lean_TypeClass_generate___spec__1(lean_object*); +lean_object* l_Lean_TypeClass_TypedExpr_HasToString___boxed(lean_object*); +lean_object* l_Lean_TypeClass_TypedExpr_HasToString___closed__1; +extern lean_object* l_Lean_formatDataValue___closed__1; +lean_object* l_Array_miterateAux___main___at_Lean_TypeClass_newSubgoal___spec__5(size_t, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_TypeClass_TypedExpr_Inhabited; +lean_object* l_Lean_TypeClass_preprocessForOutParams___closed__1; +lean_object* l_Lean_TypeClass_step(lean_object*); +lean_object* l_List_map___main___at_Lean_TypeClass_newSubgoal___spec__1(lean_object*); +lean_object* l_PersistentHashMap_getCollisionNodeSize___rarg(lean_object*); +lean_object* l_Lean_TypeClass_wakeUp___boxed(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_TypeClass_quickIsClass___main(lean_object*, lean_object*); +extern lean_object* l_Lean_TypeClass_Context_Inhabited___closed__1; +lean_object* l_Lean_TypeClass_constNameToTypedExpr___closed__1; +lean_object* l_Lean_TypeClass_synthCore___boxed(lean_object*, lean_object*); +lean_object* lean_expr_mk_fvar(lean_object*); +lean_object* lean_local_ctx_mk_local_decl(lean_object*, lean_object*, lean_object*, lean_object*, uint8_t); +lean_object* l_Array_mkEmpty(lean_object*, lean_object*); +lean_object* l_List_foldl___main___at_Lean_mkApp___spec__1(lean_object*, lean_object*); +lean_object* l_Array_anyMAux___main___at_Lean_TypeClass_newAnswer___spec__4___boxed(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_LocalContext_mkLambda(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_ConstantInfo_lparams(lean_object*); +lean_object* l_Array_toList___rarg(lean_object*); +lean_object* l_Lean_TypeClass_quickIsClass___main___closed__1; +lean_object* l_Nat_repr(lean_object*); +lean_object* l_PersistentHashMap_insertAux___main___at_Lean_TypeClass_newSubgoal___spec__3___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_PersistentHashMap_mkCollisionNode___rarg(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_TypeClass_Node_Inhabited___closed__1; +extern lean_object* l_Lean_TypeClass_Context_Inhabited; +lean_object* l_Array_miterateAux___main___at_Lean_TypeClass_consume___spec__2___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +extern lean_object* l_panicWithPos___rarg___closed__3; +lean_object* lean_expr_mk_const(lean_object*, lean_object*); +lean_object* l_Lean_TypeClass_constNameToTypedExpr(lean_object*, lean_object*, lean_object*); +lean_object* l_PersistentHashMap_findAtAux___main___at_Lean_TypeClass_newAnswer___spec__3___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +uint8_t lean_expr_eqv(lean_object*, lean_object*); +lean_object* l_Lean_TypeClass_synthCore(lean_object*, lean_object*); +lean_object* l_Lean_TypeClass_Node_Inhabited; +lean_object* l_Array_back___at_Lean_TypeClass_consume___spec__1___boxed(lean_object*); +lean_object* l_Lean_TypeClass_resume___closed__1; +lean_object* l_Lean_TypeClass_synth___closed__1; +lean_object* lean_string_append(lean_object*, lean_object*); +uint8_t l_Array_anyMAux___main___at_Lean_TypeClass_newAnswer___spec__4(lean_object*, lean_object*, lean_object*); +extern lean_object* l_List_reprAux___main___rarg___closed__1; +size_t l_USize_add(size_t, size_t); +lean_object* l_Lean_TypeClass_introduceLocals___main(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_TypeClass_introduceLocals___main___closed__1; +uint8_t l_Lean_TypeClass_Context_eHasTmpMVar(lean_object*); +extern lean_object* l_Option_HasRepr___rarg___closed__3; +uint8_t lean_nat_dec_lt(lean_object*, lean_object*); +lean_object* l_Lean_TypeClass_collectEReplacements(lean_object*); +lean_object* l_List_append___rarg(lean_object*, lean_object*); +lean_object* lean_name_mk_string(lean_object*, lean_object*); +lean_object* l_Lean_TypeClass_collectEReplacements___main___closed__2; +lean_object* l_Lean_TypeClass_ConsumerNode_Inhabited___closed__1; +lean_object* lean_nat_add(lean_object*, lean_object*); +lean_object* l_PersistentHashMap_insert___at_Lean_TypeClass_newSubgoal___spec__2(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_TypeClass_generate___closed__2; +uint8_t lean_nat_dec_eq(lean_object*, lean_object*); +uint8_t lean_has_out_params(lean_object*, lean_object*); +lean_object* l_Lean_TypeClass_generate(lean_object*); +lean_object* l_Lean_TypeClass_newSubgoal___closed__4; +uint8_t l_Array_isEmpty___rarg(lean_object*); +lean_object* lean_instantiate_type_lparams(lean_object*, lean_object*); +lean_object* l_Array_push(lean_object*, lean_object*, lean_object*); +uint8_t l_List_isEmpty___rarg(lean_object*); +extern lean_object* l_panicWithPos___rarg___closed__1; +lean_object* l_Lean_TypeClass_GeneratorNode_Inhabited; +extern size_t l_PersistentHashMap_insertAux___main___rarg___closed__2; +lean_object* l_Array_mforAux___main___at_Lean_TypeClass_newAnswer___spec__5(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_TypeClass_introduceMVars(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +uint8_t l_Lean_BinderInfo_isInstImplicit(uint8_t); +lean_object* l_Lean_TypeClass_collectUReplacements(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Expr_getAppArgsAux___main(lean_object*, lean_object*); +lean_object* l_PersistentHashMap_insertAtCollisionNodeAux___main___at_Lean_TypeClass_newSubgoal___spec__4(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_TypeClass_consume___closed__2; +lean_object* l_PersistentHashMap_find___at_Lean_TypeClass_newAnswer___spec__1(lean_object*, lean_object*); +lean_object* l_Lean_TypeClass_newSubgoal___closed__2; +lean_object* l_Array_mforAux___main___at_Lean_TypeClass_newAnswer___spec__5___boxed(lean_object*, lean_object*, lean_object*, lean_object*); +uint8_t l_Queue_isEmpty___rarg(lean_object*); +extern lean_object* l_System_FilePath_dirName___closed__1; +lean_object* l_panic(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_TypeClass_newConsumerNode(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_TypeClass_Context_eInstantiate___main(lean_object*, lean_object*); +lean_object* l_Lean_TypeClass_generate___closed__1; +lean_object* l_Array_pop(lean_object*, lean_object*); +lean_object* l_Lean_TypeClass_newSubgoal___closed__3; +lean_object* l_Lean_TypeClass_preprocessForOutParams(lean_object*, lean_object*); +lean_object* lean_name_mk_numeral(lean_object*, lean_object*); +lean_object* lean_environment_find(lean_object*, lean_object*); +lean_object* l_Lean_TypeClass_collectEReplacements___rarg(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +uint8_t lean_is_class(lean_object*, lean_object*); +lean_object* l_Lean_TypeClass_consume___closed__1; +lean_object* l_Lean_TypeClass_collectEReplacements___main___closed__1; +lean_object* l_Lean_TypeClass_resume___closed__2; +lean_object* l_PersistentHashMap_findAtAux___main___at_Lean_TypeClass_newAnswer___spec__3(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Queue_dequeue_x3f___rarg(lean_object*); +lean_object* lean_get_class_instances(lean_object*, lean_object*); +extern lean_object* l_PersistentHashMap_insertAux___main___rarg___closed__3; +lean_object* l_Array_size(lean_object*, lean_object*); +lean_object* l_Lean_TypeClass_consume(lean_object*); +uint8_t lean_is_out_param(lean_object*); +lean_object* l_Lean_TypeClass_Context_eUnify___main(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_TypeClass_synth(lean_object*, lean_object*, lean_object*); +lean_object* l_Array_get(lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_TypeClass_TypedExpr_HasToString(lean_object*); +lean_object* l_Array_miterateAux___main___at_Lean_TypeClass_newSubgoal___spec__5___boxed(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_Expr_constLevels(lean_object*); +lean_object* l_Lean_TypeClass_introduceMVars___main(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +uint8_t lean_expr_has_mvar(lean_object*); +lean_object* l_Lean_TypeClass_newSubgoal___closed__1; +lean_object* l_Lean_TypeClass_Context_eNewMeta(lean_object*, lean_object*); +uint8_t l_USize_decLe(size_t, size_t); +lean_object* l_Lean_TypeClass_resume(lean_object*); +extern lean_object* l_panicWithPos___rarg___closed__2; +lean_object* l_Lean_TypeClass_collectUReplacements___main(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_TypeClass_newAnswer___closed__1; +lean_object* l_List_foldl___main___at_Lean_TypeClass_constNameToTypedExpr___spec__1(lean_object*, lean_object*); +lean_object* l_Array_set(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Array_miterateAux___main___at_Lean_TypeClass_consume___spec__2(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_TypeClass_quickIsClass(lean_object*, lean_object*); +size_t l_USize_land(size_t, size_t); +lean_object* l_Lean_TypeClass_newAnswer___closed__2; +lean_object* l_Lean_TypeClass_GeneratorNode_Inhabited___closed__1; +lean_object* lean_usize_to_nat(size_t); +lean_object* l_PersistentHashMap_findAux___main___at_Lean_TypeClass_newAnswer___spec__2(lean_object*, size_t, lean_object*); +lean_object* l_Lean_TypeClass_step___closed__1; +lean_object* l_Lean_TypeClass_tryResolve(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_TypeClass_collectEReplacements___main(lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_TypeClass_newSubgoal(lean_object*, lean_object*, lean_object*, lean_object*); +lean_object* l_Lean_LocalContext_mkForall(lean_object*, lean_object*, lean_object*); +extern lean_object* l_Lean_exprIsInhabited___closed__1; +lean_object* l_Array_back___at_Lean_TypeClass_generate___spec__1___boxed(lean_object*); +lean_object* l_Lean_TypeClass_synth___closed__3; +lean_object* l_Lean_TypeClass_constNameToTypedExpr___closed__2; +uint8_t l_Lean_Expr_isLambda(lean_object*); +lean_object* _init_l_Lean_TypeClass_TypedExpr_HasToString___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("TypedExpr("); +return x_1; +} +} +lean_object* l_Lean_TypeClass_TypedExpr_HasToString(lean_object* x_1) { +_start: +{ +lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; +x_2 = lean_ctor_get(x_1, 0); +x_3 = lean_ctor_get(x_1, 1); +x_4 = lean_expr_dbg_to_string(x_2); +x_5 = l_Lean_TypeClass_TypedExpr_HasToString___closed__1; +x_6 = lean_string_append(x_5, x_4); +lean_dec(x_4); +x_7 = l_List_reprAux___main___rarg___closed__1; +x_8 = lean_string_append(x_6, x_7); +x_9 = lean_expr_dbg_to_string(x_3); +x_10 = lean_string_append(x_8, x_9); +lean_dec(x_9); +x_11 = l_Option_HasRepr___rarg___closed__3; +x_12 = lean_string_append(x_10, x_11); +return x_12; +} +} +lean_object* l_Lean_TypeClass_TypedExpr_HasToString___boxed(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = l_Lean_TypeClass_TypedExpr_HasToString(x_1); +lean_dec(x_1); +return x_2; +} +} +lean_object* _init_l_Lean_TypeClass_TypedExpr_Inhabited___closed__1() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Lean_exprIsInhabited___closed__1; +x_2 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_2, 0, x_1); +lean_ctor_set(x_2, 1, x_1); +return x_2; +} +} +lean_object* _init_l_Lean_TypeClass_TypedExpr_Inhabited() { +_start: +{ +lean_object* x_1; +x_1 = l_Lean_TypeClass_TypedExpr_Inhabited___closed__1; +return x_1; +} +} +lean_object* _init_l_Lean_TypeClass_Node_Inhabited___closed__1() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; lean_object* x_4; +x_1 = l_Lean_exprIsInhabited___closed__1; +x_2 = l_Lean_TypeClass_Context_Inhabited___closed__1; +x_3 = l_Lean_TypeClass_TypedExpr_Inhabited___closed__1; +x_4 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_4, 0, x_1); +lean_ctor_set(x_4, 1, x_2); +lean_ctor_set(x_4, 2, x_3); +return x_4; +} +} +lean_object* _init_l_Lean_TypeClass_Node_Inhabited() { +_start: +{ +lean_object* x_1; +x_1 = l_Lean_TypeClass_Node_Inhabited___closed__1; +return x_1; +} +} +lean_object* _init_l_Lean_TypeClass_ConsumerNode_Inhabited___closed__1() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l_Lean_TypeClass_Node_Inhabited___closed__1; +x_3 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_3, 0, x_2); +lean_ctor_set(x_3, 1, x_1); +return x_3; +} +} +lean_object* _init_l_Lean_TypeClass_ConsumerNode_Inhabited() { +_start: +{ +lean_object* x_1; +x_1 = l_Lean_TypeClass_ConsumerNode_Inhabited___closed__1; +return x_1; +} +} +lean_object* _init_l_Lean_TypeClass_GeneratorNode_Inhabited___closed__1() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l_Lean_TypeClass_Node_Inhabited___closed__1; +x_3 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_3, 0, x_2); +lean_ctor_set(x_3, 1, x_1); +return x_3; +} +} +lean_object* _init_l_Lean_TypeClass_GeneratorNode_Inhabited() { +_start: +{ +lean_object* x_1; +x_1 = l_Lean_TypeClass_GeneratorNode_Inhabited___closed__1; +return x_1; +} +} +lean_object* _init_l_Lean_TypeClass_quickIsClass___main___closed__1() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = lean_box(0); +x_2 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_2, 0, x_1); +return x_2; +} +} +lean_object* l_Lean_TypeClass_quickIsClass___main(lean_object* x_1, lean_object* x_2) { +_start: +{ +switch (lean_obj_tag(x_2)) { +case 4: +{ +lean_object* x_3; uint8_t x_4; +x_3 = lean_ctor_get(x_2, 0); +lean_inc(x_3); +lean_dec(x_2); +lean_inc(x_3); +x_4 = lean_is_class(x_1, x_3); +if (x_4 == 0) +{ +lean_object* x_5; +lean_dec(x_3); +x_5 = lean_box(0); +return x_5; +} +else +{ +lean_object* x_6; lean_object* x_7; +x_6 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_6, 0, x_3); +x_7 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_7, 0, x_6); +return x_7; +} +} +case 5: +{ +lean_object* x_8; lean_object* x_9; uint8_t x_10; +x_8 = lean_ctor_get(x_2, 0); +lean_inc(x_8); +lean_dec(x_2); +x_9 = l_Lean_Expr_getAppFn___main(x_8); +lean_dec(x_8); +x_10 = l_Lean_Expr_isConst(x_9); +if (x_10 == 0) +{ +uint8_t x_11; +lean_dec(x_1); +x_11 = l_Lean_Expr_isLambda(x_9); +lean_dec(x_9); +if (x_11 == 0) +{ +lean_object* x_12; +x_12 = l_Lean_TypeClass_quickIsClass___main___closed__1; +return x_12; +} +else +{ +lean_object* x_13; +x_13 = lean_box(0); +return x_13; +} +} +else +{ +lean_object* x_14; uint8_t x_15; +x_14 = l_Lean_Expr_constName(x_9); +lean_inc(x_14); +x_15 = lean_is_class(x_1, x_14); +if (x_15 == 0) +{ +uint8_t x_16; +lean_dec(x_14); +x_16 = l_Lean_Expr_isLambda(x_9); +lean_dec(x_9); +if (x_16 == 0) +{ +lean_object* x_17; +x_17 = l_Lean_TypeClass_quickIsClass___main___closed__1; +return x_17; +} +else +{ +lean_object* x_18; +x_18 = lean_box(0); +return x_18; +} +} +else +{ +lean_object* x_19; lean_object* x_20; +lean_dec(x_9); +x_19 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_19, 0, x_14); +x_20 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_20, 0, x_19); +return x_20; +} +} +} +case 7: +{ +lean_object* x_21; +x_21 = lean_ctor_get(x_2, 2); +lean_inc(x_21); +lean_dec(x_2); +x_2 = x_21; +goto _start; +} +case 8: +{ +lean_object* x_23; +lean_dec(x_2); +lean_dec(x_1); +x_23 = lean_box(0); +return x_23; +} +case 10: +{ +lean_object* x_24; +x_24 = lean_ctor_get(x_2, 1); +lean_inc(x_24); +lean_dec(x_2); +x_2 = x_24; +goto _start; +} +case 11: +{ +lean_object* x_26; +lean_dec(x_2); +lean_dec(x_1); +x_26 = lean_box(0); +return x_26; +} +default: +{ +lean_object* x_27; +lean_dec(x_2); +lean_dec(x_1); +x_27 = l_Lean_TypeClass_quickIsClass___main___closed__1; +return x_27; +} +} +} +} +lean_object* l_Lean_TypeClass_quickIsClass(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = l_Lean_TypeClass_quickIsClass___main(x_1, x_2); +return x_3; +} +} +lean_object* l_List_map___main___at_Lean_TypeClass_newSubgoal___spec__1(lean_object* x_1) { +_start: +{ +if (lean_obj_tag(x_1) == 0) +{ +lean_object* x_2; +x_2 = lean_box(0); +return x_2; +} +else +{ +uint8_t x_3; +x_3 = !lean_is_exclusive(x_1); +if (x_3 == 0) +{ +lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; +x_4 = lean_ctor_get(x_1, 0); +x_5 = lean_ctor_get(x_1, 1); +x_6 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_6, 0, x_4); +x_7 = l_List_map___main___at_Lean_TypeClass_newSubgoal___spec__1(x_5); +lean_ctor_set(x_1, 1, x_7); +lean_ctor_set(x_1, 0, x_6); +return x_1; +} +else +{ +lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; +x_8 = lean_ctor_get(x_1, 0); +x_9 = lean_ctor_get(x_1, 1); +lean_inc(x_9); +lean_inc(x_8); +lean_dec(x_1); +x_10 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_10, 0, x_8); +x_11 = l_List_map___main___at_Lean_TypeClass_newSubgoal___spec__1(x_9); +x_12 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_12, 0, x_10); +lean_ctor_set(x_12, 1, x_11); +return x_12; +} +} +} +} +lean_object* l_PersistentHashMap_insertAtCollisionNodeAux___main___at_Lean_TypeClass_newSubgoal___spec__4(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; lean_object* x_6; lean_object* x_7; uint8_t x_8; +x_5 = lean_ctor_get(x_1, 0); +lean_inc(x_5); +x_6 = lean_ctor_get(x_1, 1); +lean_inc(x_6); +x_7 = lean_array_get_size(x_5); +x_8 = lean_nat_dec_lt(x_2, x_7); +lean_dec(x_7); +if (x_8 == 0) +{ +uint8_t x_9; +lean_dec(x_2); +x_9 = !lean_is_exclusive(x_1); +if (x_9 == 0) +{ +lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; +x_10 = lean_ctor_get(x_1, 1); +lean_dec(x_10); +x_11 = lean_ctor_get(x_1, 0); +lean_dec(x_11); +x_12 = lean_array_push(x_5, x_3); +x_13 = lean_array_push(x_6, x_4); +lean_ctor_set(x_1, 1, x_13); +lean_ctor_set(x_1, 0, x_12); +return x_1; +} +else +{ +lean_object* x_14; lean_object* x_15; lean_object* x_16; +lean_dec(x_1); +x_14 = lean_array_push(x_5, x_3); +x_15 = lean_array_push(x_6, x_4); +x_16 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_16, 0, x_14); +lean_ctor_set(x_16, 1, x_15); +return x_16; +} +} +else +{ +lean_object* x_17; uint8_t x_18; +x_17 = lean_array_fget(x_5, x_2); +x_18 = lean_expr_eqv(x_3, x_17); +lean_dec(x_17); +if (x_18 == 0) +{ +lean_object* x_19; lean_object* x_20; +lean_dec(x_6); +lean_dec(x_5); +x_19 = lean_unsigned_to_nat(1u); +x_20 = lean_nat_add(x_2, x_19); +lean_dec(x_2); +x_2 = x_20; +goto _start; +} +else +{ +uint8_t x_22; +x_22 = !lean_is_exclusive(x_1); +if (x_22 == 0) +{ +lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; +x_23 = lean_ctor_get(x_1, 1); +lean_dec(x_23); +x_24 = lean_ctor_get(x_1, 0); +lean_dec(x_24); +x_25 = lean_array_fset(x_5, x_2, x_3); +x_26 = lean_array_fset(x_6, x_2, x_4); +lean_dec(x_2); +lean_ctor_set(x_1, 1, x_26); +lean_ctor_set(x_1, 0, x_25); +return x_1; +} +else +{ +lean_object* x_27; lean_object* x_28; lean_object* x_29; +lean_dec(x_1); +x_27 = lean_array_fset(x_5, x_2, x_3); +x_28 = lean_array_fset(x_6, x_2, x_4); +lean_dec(x_2); +x_29 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_29, 0, x_27); +lean_ctor_set(x_29, 1, x_28); +return x_29; +} +} +} +} +} +lean_object* l_Array_miterateAux___main___at_Lean_TypeClass_newSubgoal___spec__5(size_t x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { +_start: +{ +lean_object* x_7; uint8_t x_8; +x_7 = lean_array_get_size(x_4); +x_8 = lean_nat_dec_lt(x_5, x_7); +lean_dec(x_7); +if (x_8 == 0) +{ +lean_dec(x_5); +return x_6; +} +else +{ +lean_object* x_9; lean_object* x_10; size_t x_11; size_t x_12; size_t x_13; size_t x_14; size_t x_15; size_t x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; +x_9 = lean_array_fget(x_4, x_5); +x_10 = lean_array_fget(x_3, x_5); +x_11 = lean_expr_hash(x_9); +x_12 = 1; +x_13 = x_1 - x_12; +x_14 = 5; +x_15 = x_14 * x_13; +x_16 = x_11 >> x_15; +x_17 = l_PersistentHashMap_insertAux___main___at_Lean_TypeClass_newSubgoal___spec__3(x_6, x_16, x_1, x_9, x_10); +x_18 = lean_unsigned_to_nat(1u); +x_19 = lean_nat_add(x_5, x_18); +lean_dec(x_5); +x_5 = x_19; +x_6 = x_17; +goto _start; +} +} +} +lean_object* l_PersistentHashMap_insertAux___main___at_Lean_TypeClass_newSubgoal___spec__3(lean_object* x_1, size_t x_2, size_t x_3, lean_object* x_4, lean_object* x_5) { +_start: +{ +if (lean_obj_tag(x_1) == 0) +{ +uint8_t x_6; +x_6 = !lean_is_exclusive(x_1); +if (x_6 == 0) +{ +lean_object* x_7; size_t x_8; size_t x_9; size_t x_10; size_t x_11; lean_object* x_12; lean_object* x_13; uint8_t x_14; +x_7 = lean_ctor_get(x_1, 0); +x_8 = 1; +x_9 = 5; +x_10 = l_PersistentHashMap_insertAux___main___rarg___closed__2; +x_11 = x_2 & x_10; +x_12 = lean_usize_to_nat(x_11); +x_13 = lean_array_get_size(x_7); +x_14 = lean_nat_dec_lt(x_12, x_13); +lean_dec(x_13); +if (x_14 == 0) +{ +lean_dec(x_12); +lean_dec(x_5); +lean_dec(x_4); +return x_1; +} +else +{ +lean_object* x_15; lean_object* x_16; lean_object* x_17; +x_15 = lean_array_fget(x_7, x_12); +x_16 = lean_box(2); +x_17 = lean_array_fset(x_7, x_12, x_16); +switch (lean_obj_tag(x_15)) { +case 0: +{ +uint8_t x_18; +x_18 = !lean_is_exclusive(x_15); +if (x_18 == 0) +{ +lean_object* x_19; lean_object* x_20; uint8_t x_21; +x_19 = lean_ctor_get(x_15, 0); +x_20 = lean_ctor_get(x_15, 1); +x_21 = lean_expr_eqv(x_4, x_19); +if (x_21 == 0) +{ +lean_object* x_22; lean_object* x_23; lean_object* x_24; +lean_free_object(x_15); +x_22 = l_PersistentHashMap_mkCollisionNode___rarg(x_19, x_20, x_4, x_5); +x_23 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_23, 0, x_22); +x_24 = lean_array_fset(x_17, x_12, x_23); +lean_dec(x_12); +lean_ctor_set(x_1, 0, x_24); +return x_1; +} +else +{ +lean_object* x_25; +lean_dec(x_20); +lean_dec(x_19); +lean_ctor_set(x_15, 1, x_5); +lean_ctor_set(x_15, 0, x_4); +x_25 = lean_array_fset(x_17, x_12, x_15); +lean_dec(x_12); +lean_ctor_set(x_1, 0, x_25); +return x_1; +} +} +else +{ +lean_object* x_26; lean_object* x_27; uint8_t x_28; +x_26 = lean_ctor_get(x_15, 0); +x_27 = lean_ctor_get(x_15, 1); +lean_inc(x_27); +lean_inc(x_26); +lean_dec(x_15); +x_28 = lean_expr_eqv(x_4, x_26); +if (x_28 == 0) +{ +lean_object* x_29; lean_object* x_30; lean_object* x_31; +x_29 = l_PersistentHashMap_mkCollisionNode___rarg(x_26, x_27, x_4, x_5); +x_30 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_30, 0, x_29); +x_31 = lean_array_fset(x_17, x_12, x_30); +lean_dec(x_12); +lean_ctor_set(x_1, 0, x_31); +return x_1; +} +else +{ +lean_object* x_32; lean_object* x_33; +lean_dec(x_27); +lean_dec(x_26); +x_32 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_32, 0, x_4); +lean_ctor_set(x_32, 1, x_5); +x_33 = lean_array_fset(x_17, x_12, x_32); +lean_dec(x_12); +lean_ctor_set(x_1, 0, x_33); +return x_1; +} +} +} +case 1: +{ +uint8_t x_34; +x_34 = !lean_is_exclusive(x_15); +if (x_34 == 0) +{ +lean_object* x_35; size_t x_36; size_t x_37; lean_object* x_38; lean_object* x_39; +x_35 = lean_ctor_get(x_15, 0); +x_36 = x_2 >> x_9; +x_37 = x_3 + x_8; +x_38 = l_PersistentHashMap_insertAux___main___at_Lean_TypeClass_newSubgoal___spec__3(x_35, x_36, x_37, x_4, x_5); +lean_ctor_set(x_15, 0, x_38); +x_39 = lean_array_fset(x_17, x_12, x_15); +lean_dec(x_12); +lean_ctor_set(x_1, 0, x_39); +return x_1; +} +else +{ +lean_object* x_40; size_t x_41; size_t x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; +x_40 = lean_ctor_get(x_15, 0); +lean_inc(x_40); +lean_dec(x_15); +x_41 = x_2 >> x_9; +x_42 = x_3 + x_8; +x_43 = l_PersistentHashMap_insertAux___main___at_Lean_TypeClass_newSubgoal___spec__3(x_40, x_41, x_42, x_4, x_5); +x_44 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_44, 0, x_43); +x_45 = lean_array_fset(x_17, x_12, x_44); +lean_dec(x_12); +lean_ctor_set(x_1, 0, x_45); +return x_1; +} +} +default: +{ +lean_object* x_46; lean_object* x_47; +x_46 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_46, 0, x_4); +lean_ctor_set(x_46, 1, x_5); +x_47 = lean_array_fset(x_17, x_12, x_46); +lean_dec(x_12); +lean_ctor_set(x_1, 0, x_47); +return x_1; +} +} +} +} +else +{ +lean_object* x_48; size_t x_49; size_t x_50; size_t x_51; size_t x_52; lean_object* x_53; lean_object* x_54; uint8_t x_55; +x_48 = lean_ctor_get(x_1, 0); +lean_inc(x_48); +lean_dec(x_1); +x_49 = 1; +x_50 = 5; +x_51 = l_PersistentHashMap_insertAux___main___rarg___closed__2; +x_52 = x_2 & x_51; +x_53 = lean_usize_to_nat(x_52); +x_54 = lean_array_get_size(x_48); +x_55 = lean_nat_dec_lt(x_53, x_54); +lean_dec(x_54); +if (x_55 == 0) +{ +lean_object* x_56; +lean_dec(x_53); +lean_dec(x_5); +lean_dec(x_4); +x_56 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_56, 0, x_48); +return x_56; +} +else +{ +lean_object* x_57; lean_object* x_58; lean_object* x_59; +x_57 = lean_array_fget(x_48, x_53); +x_58 = lean_box(2); +x_59 = lean_array_fset(x_48, x_53, x_58); +switch (lean_obj_tag(x_57)) { +case 0: +{ +lean_object* x_60; lean_object* x_61; lean_object* x_62; uint8_t x_63; +x_60 = lean_ctor_get(x_57, 0); +lean_inc(x_60); +x_61 = lean_ctor_get(x_57, 1); +lean_inc(x_61); +if (lean_is_exclusive(x_57)) { + lean_ctor_release(x_57, 0); + lean_ctor_release(x_57, 1); + x_62 = x_57; +} else { + lean_dec_ref(x_57); + x_62 = lean_box(0); +} +x_63 = lean_expr_eqv(x_4, x_60); +if (x_63 == 0) +{ +lean_object* x_64; lean_object* x_65; lean_object* x_66; lean_object* x_67; +lean_dec(x_62); +x_64 = l_PersistentHashMap_mkCollisionNode___rarg(x_60, x_61, x_4, x_5); +x_65 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_65, 0, x_64); +x_66 = lean_array_fset(x_59, x_53, x_65); +lean_dec(x_53); +x_67 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_67, 0, x_66); +return x_67; +} +else +{ +lean_object* x_68; lean_object* x_69; lean_object* x_70; +lean_dec(x_61); +lean_dec(x_60); +if (lean_is_scalar(x_62)) { + x_68 = lean_alloc_ctor(0, 2, 0); +} else { + x_68 = x_62; +} +lean_ctor_set(x_68, 0, x_4); +lean_ctor_set(x_68, 1, x_5); +x_69 = lean_array_fset(x_59, x_53, x_68); +lean_dec(x_53); +x_70 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_70, 0, x_69); +return x_70; +} +} +case 1: +{ +lean_object* x_71; lean_object* x_72; size_t x_73; size_t x_74; lean_object* x_75; lean_object* x_76; lean_object* x_77; lean_object* x_78; +x_71 = lean_ctor_get(x_57, 0); +lean_inc(x_71); +if (lean_is_exclusive(x_57)) { + lean_ctor_release(x_57, 0); + x_72 = x_57; +} else { + lean_dec_ref(x_57); + x_72 = lean_box(0); +} +x_73 = x_2 >> x_50; +x_74 = x_3 + x_49; +x_75 = l_PersistentHashMap_insertAux___main___at_Lean_TypeClass_newSubgoal___spec__3(x_71, x_73, x_74, x_4, x_5); +if (lean_is_scalar(x_72)) { + x_76 = lean_alloc_ctor(1, 1, 0); +} else { + x_76 = x_72; +} +lean_ctor_set(x_76, 0, x_75); +x_77 = lean_array_fset(x_59, x_53, x_76); +lean_dec(x_53); +x_78 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_78, 0, x_77); +return x_78; +} +default: +{ +lean_object* x_79; lean_object* x_80; lean_object* x_81; +x_79 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_79, 0, x_4); +lean_ctor_set(x_79, 1, x_5); +x_80 = lean_array_fset(x_59, x_53, x_79); +lean_dec(x_53); +x_81 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_81, 0, x_80); +return x_81; +} +} +} +} +} +else +{ +lean_object* x_82; lean_object* x_83; size_t x_84; uint8_t x_85; +x_82 = lean_unsigned_to_nat(0u); +x_83 = l_PersistentHashMap_insertAtCollisionNodeAux___main___at_Lean_TypeClass_newSubgoal___spec__4(x_1, x_82, x_4, x_5); +x_84 = 7; +x_85 = x_84 <= x_3; +if (x_85 == 0) +{ +lean_object* x_86; lean_object* x_87; uint8_t x_88; +x_86 = l_PersistentHashMap_getCollisionNodeSize___rarg(x_83); +x_87 = lean_unsigned_to_nat(4u); +x_88 = lean_nat_dec_lt(x_86, x_87); +lean_dec(x_86); +if (x_88 == 0) +{ +lean_object* x_89; lean_object* x_90; lean_object* x_91; lean_object* x_92; +x_89 = lean_ctor_get(x_83, 0); +lean_inc(x_89); +x_90 = lean_ctor_get(x_83, 1); +lean_inc(x_90); +lean_dec(x_83); +x_91 = l_PersistentHashMap_insertAux___main___rarg___closed__3; +x_92 = l_Array_miterateAux___main___at_Lean_TypeClass_newSubgoal___spec__5(x_3, x_89, x_90, x_89, x_82, x_91); +lean_dec(x_90); +lean_dec(x_89); +return x_92; +} +else +{ +return x_83; +} +} +else +{ +return x_83; +} +} +} +} +lean_object* l_PersistentHashMap_insert___at_Lean_TypeClass_newSubgoal___spec__2(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +uint8_t x_4; +x_4 = !lean_is_exclusive(x_1); +if (x_4 == 0) +{ +lean_object* x_5; lean_object* x_6; size_t x_7; size_t x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; +x_5 = lean_ctor_get(x_1, 0); +x_6 = lean_ctor_get(x_1, 1); +x_7 = lean_expr_hash(x_2); +x_8 = 1; +x_9 = l_PersistentHashMap_insertAux___main___at_Lean_TypeClass_newSubgoal___spec__3(x_5, x_7, x_8, x_2, x_3); +x_10 = lean_unsigned_to_nat(1u); +x_11 = lean_nat_add(x_6, x_10); +lean_dec(x_6); +lean_ctor_set(x_1, 1, x_11); +lean_ctor_set(x_1, 0, x_9); +return x_1; +} +else +{ +lean_object* x_12; lean_object* x_13; size_t x_14; size_t x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; +x_12 = lean_ctor_get(x_1, 0); +x_13 = lean_ctor_get(x_1, 1); +lean_inc(x_13); +lean_inc(x_12); +lean_dec(x_1); +x_14 = lean_expr_hash(x_2); +x_15 = 1; +x_16 = l_PersistentHashMap_insertAux___main___at_Lean_TypeClass_newSubgoal___spec__3(x_12, x_14, x_15, x_2, x_3); +x_17 = lean_unsigned_to_nat(1u); +x_18 = lean_nat_add(x_13, x_17); +lean_dec(x_13); +x_19 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_19, 0, x_16); +lean_ctor_set(x_19, 1, x_18); +return x_19; +} +} +} +lean_object* _init_l_Lean_TypeClass_newSubgoal___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("quickIsClass not sufficient to show `"); +return x_1; +} +} +lean_object* _init_l_Lean_TypeClass_newSubgoal___closed__2() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("` is a class"); +return x_1; +} +} +lean_object* _init_l_Lean_TypeClass_newSubgoal___closed__3() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("found non-class goal `"); +return x_1; +} +} +lean_object* _init_l_Lean_TypeClass_newSubgoal___closed__4() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = lean_unsigned_to_nat(1u); +x_2 = lean_mk_empty_array_with_capacity(x_1); +return x_2; +} +} +lean_object* l_Lean_TypeClass_newSubgoal(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +uint8_t x_5; +x_5 = !lean_is_exclusive(x_4); +if (x_5 == 0) +{ +lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; +x_6 = lean_ctor_get(x_4, 1); +x_7 = lean_ctor_get(x_4, 0); +lean_dec(x_7); +lean_inc(x_2); +x_8 = l_Lean_TypeClass_Context_eInfer(x_2, x_3); +x_9 = lean_ctor_get(x_6, 0); +lean_inc(x_9); +x_10 = lean_ctor_get(x_6, 1); +lean_inc(x_10); +x_11 = lean_ctor_get(x_6, 2); +lean_inc(x_11); +x_12 = lean_ctor_get(x_6, 3); +lean_inc(x_12); +x_13 = lean_ctor_get(x_6, 4); +lean_inc(x_13); +x_14 = lean_ctor_get(x_6, 5); +lean_inc(x_14); +x_15 = lean_ctor_get(x_6, 6); +lean_inc(x_15); +lean_inc(x_8); +lean_inc(x_9); +x_16 = l_Lean_TypeClass_quickIsClass___main(x_9, x_8); +if (lean_obj_tag(x_16) == 0) +{ +lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; +lean_dec(x_15); +lean_dec(x_14); +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_17 = lean_expr_dbg_to_string(x_8); +lean_dec(x_8); +x_18 = l_Lean_TypeClass_newSubgoal___closed__1; +x_19 = lean_string_append(x_18, x_17); +lean_dec(x_17); +x_20 = l_Lean_TypeClass_newSubgoal___closed__2; +x_21 = lean_string_append(x_19, x_20); +lean_ctor_set_tag(x_4, 1); +lean_ctor_set(x_4, 0, x_21); +return x_4; +} +else +{ +lean_object* x_22; +x_22 = lean_ctor_get(x_16, 0); +lean_inc(x_22); +lean_dec(x_16); +if (lean_obj_tag(x_22) == 0) +{ +lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; +lean_dec(x_15); +lean_dec(x_14); +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_23 = lean_expr_dbg_to_string(x_8); +lean_dec(x_8); +x_24 = l_Lean_TypeClass_newSubgoal___closed__3; +x_25 = lean_string_append(x_24, x_23); +lean_dec(x_23); +x_26 = l_Lean_formatDataValue___closed__1; +x_27 = lean_string_append(x_25, x_26); +lean_ctor_set_tag(x_4, 1); +lean_ctor_set(x_4, 0, x_27); +return x_4; +} +else +{ +uint8_t x_28; +x_28 = !lean_is_exclusive(x_6); +if (x_28 == 0) +{ +lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_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; +x_29 = lean_ctor_get(x_6, 6); +lean_dec(x_29); +x_30 = lean_ctor_get(x_6, 5); +lean_dec(x_30); +x_31 = lean_ctor_get(x_6, 4); +lean_dec(x_31); +x_32 = lean_ctor_get(x_6, 3); +lean_dec(x_32); +x_33 = lean_ctor_get(x_6, 2); +lean_dec(x_33); +x_34 = lean_ctor_get(x_6, 1); +lean_dec(x_34); +x_35 = lean_ctor_get(x_6, 0); +lean_dec(x_35); +x_36 = lean_ctor_get(x_22, 0); +lean_inc(x_36); +lean_dec(x_22); +lean_inc(x_8); +lean_inc(x_2); +x_37 = l_Lean_TypeClass_Context_eInstantiate___main(x_2, x_8); +x_38 = l_Lean_TypeClass_Context__u03b1Norm(x_37); +x_39 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_39, 0, x_3); +lean_ctor_set(x_39, 1, x_8); +lean_inc(x_38); +x_40 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_40, 0, x_38); +lean_ctor_set(x_40, 1, x_2); +lean_ctor_set(x_40, 2, x_39); +lean_inc(x_9); +x_41 = lean_get_class_instances(x_9, x_36); +x_42 = l_List_map___main___at_Lean_TypeClass_newSubgoal___spec__1(x_41); +x_43 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_43, 0, x_40); +lean_ctor_set(x_43, 1, x_42); +x_44 = l_Lean_TypeClass_newSubgoal___closed__4; +x_45 = lean_array_push(x_44, x_1); +x_46 = l_Array_empty___closed__1; +x_47 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_47, 0, x_45); +lean_ctor_set(x_47, 1, x_46); +x_48 = lean_array_push(x_12, x_43); +x_49 = l_PersistentHashMap_insert___at_Lean_TypeClass_newSubgoal___spec__2(x_15, x_38, x_47); +lean_ctor_set(x_6, 6, x_49); +lean_ctor_set(x_6, 3, x_48); +x_50 = lean_box(0); +lean_ctor_set(x_4, 0, x_50); +return x_4; +} +else +{ +lean_object* x_51; lean_object* x_52; lean_object* x_53; lean_object* x_54; lean_object* x_55; lean_object* x_56; lean_object* x_57; lean_object* x_58; lean_object* x_59; lean_object* x_60; lean_object* x_61; lean_object* x_62; lean_object* x_63; lean_object* x_64; lean_object* x_65; lean_object* x_66; +lean_dec(x_6); +x_51 = lean_ctor_get(x_22, 0); +lean_inc(x_51); +lean_dec(x_22); +lean_inc(x_8); +lean_inc(x_2); +x_52 = l_Lean_TypeClass_Context_eInstantiate___main(x_2, x_8); +x_53 = l_Lean_TypeClass_Context__u03b1Norm(x_52); +x_54 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_54, 0, x_3); +lean_ctor_set(x_54, 1, x_8); +lean_inc(x_53); +x_55 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_55, 0, x_53); +lean_ctor_set(x_55, 1, x_2); +lean_ctor_set(x_55, 2, x_54); +lean_inc(x_9); +x_56 = lean_get_class_instances(x_9, x_51); +x_57 = l_List_map___main___at_Lean_TypeClass_newSubgoal___spec__1(x_56); +x_58 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_58, 0, x_55); +lean_ctor_set(x_58, 1, x_57); +x_59 = l_Lean_TypeClass_newSubgoal___closed__4; +x_60 = lean_array_push(x_59, x_1); +x_61 = l_Array_empty___closed__1; +x_62 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_62, 0, x_60); +lean_ctor_set(x_62, 1, x_61); +x_63 = lean_array_push(x_12, x_58); +x_64 = l_PersistentHashMap_insert___at_Lean_TypeClass_newSubgoal___spec__2(x_15, x_53, x_62); +x_65 = lean_alloc_ctor(0, 7, 0); +lean_ctor_set(x_65, 0, x_9); +lean_ctor_set(x_65, 1, x_10); +lean_ctor_set(x_65, 2, x_11); +lean_ctor_set(x_65, 3, x_63); +lean_ctor_set(x_65, 4, x_13); +lean_ctor_set(x_65, 5, x_14); +lean_ctor_set(x_65, 6, x_64); +x_66 = lean_box(0); +lean_ctor_set(x_4, 1, x_65); +lean_ctor_set(x_4, 0, x_66); +return x_4; +} +} +} +} +else +{ +lean_object* x_67; lean_object* x_68; lean_object* x_69; lean_object* x_70; lean_object* x_71; lean_object* x_72; lean_object* x_73; lean_object* x_74; lean_object* x_75; lean_object* x_76; +x_67 = lean_ctor_get(x_4, 1); +lean_inc(x_67); +lean_dec(x_4); +lean_inc(x_2); +x_68 = l_Lean_TypeClass_Context_eInfer(x_2, x_3); +x_69 = lean_ctor_get(x_67, 0); +lean_inc(x_69); +x_70 = lean_ctor_get(x_67, 1); +lean_inc(x_70); +x_71 = lean_ctor_get(x_67, 2); +lean_inc(x_71); +x_72 = lean_ctor_get(x_67, 3); +lean_inc(x_72); +x_73 = lean_ctor_get(x_67, 4); +lean_inc(x_73); +x_74 = lean_ctor_get(x_67, 5); +lean_inc(x_74); +x_75 = lean_ctor_get(x_67, 6); +lean_inc(x_75); +lean_inc(x_68); +lean_inc(x_69); +x_76 = l_Lean_TypeClass_quickIsClass___main(x_69, x_68); +if (lean_obj_tag(x_76) == 0) +{ +lean_object* x_77; lean_object* x_78; lean_object* x_79; lean_object* x_80; lean_object* x_81; lean_object* x_82; +lean_dec(x_75); +lean_dec(x_74); +lean_dec(x_73); +lean_dec(x_72); +lean_dec(x_71); +lean_dec(x_70); +lean_dec(x_69); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_77 = lean_expr_dbg_to_string(x_68); +lean_dec(x_68); +x_78 = l_Lean_TypeClass_newSubgoal___closed__1; +x_79 = lean_string_append(x_78, x_77); +lean_dec(x_77); +x_80 = l_Lean_TypeClass_newSubgoal___closed__2; +x_81 = lean_string_append(x_79, x_80); +x_82 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_82, 0, x_81); +lean_ctor_set(x_82, 1, x_67); +return x_82; +} +else +{ +lean_object* x_83; +x_83 = lean_ctor_get(x_76, 0); +lean_inc(x_83); +lean_dec(x_76); +if (lean_obj_tag(x_83) == 0) +{ +lean_object* x_84; lean_object* x_85; lean_object* x_86; lean_object* x_87; lean_object* x_88; lean_object* x_89; +lean_dec(x_75); +lean_dec(x_74); +lean_dec(x_73); +lean_dec(x_72); +lean_dec(x_71); +lean_dec(x_70); +lean_dec(x_69); +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_84 = lean_expr_dbg_to_string(x_68); +lean_dec(x_68); +x_85 = l_Lean_TypeClass_newSubgoal___closed__3; +x_86 = lean_string_append(x_85, x_84); +lean_dec(x_84); +x_87 = l_Lean_formatDataValue___closed__1; +x_88 = lean_string_append(x_86, x_87); +x_89 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_89, 0, x_88); +lean_ctor_set(x_89, 1, x_67); +return x_89; +} +else +{ +lean_object* x_90; lean_object* x_91; lean_object* x_92; lean_object* x_93; lean_object* x_94; lean_object* x_95; lean_object* x_96; lean_object* x_97; lean_object* x_98; lean_object* x_99; lean_object* x_100; lean_object* x_101; lean_object* x_102; lean_object* x_103; lean_object* x_104; lean_object* x_105; lean_object* x_106; lean_object* x_107; +if (lean_is_exclusive(x_67)) { + lean_ctor_release(x_67, 0); + lean_ctor_release(x_67, 1); + lean_ctor_release(x_67, 2); + lean_ctor_release(x_67, 3); + lean_ctor_release(x_67, 4); + lean_ctor_release(x_67, 5); + lean_ctor_release(x_67, 6); + x_90 = x_67; +} else { + lean_dec_ref(x_67); + x_90 = lean_box(0); +} +x_91 = lean_ctor_get(x_83, 0); +lean_inc(x_91); +lean_dec(x_83); +lean_inc(x_68); +lean_inc(x_2); +x_92 = l_Lean_TypeClass_Context_eInstantiate___main(x_2, x_68); +x_93 = l_Lean_TypeClass_Context__u03b1Norm(x_92); +x_94 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_94, 0, x_3); +lean_ctor_set(x_94, 1, x_68); +lean_inc(x_93); +x_95 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_95, 0, x_93); +lean_ctor_set(x_95, 1, x_2); +lean_ctor_set(x_95, 2, x_94); +lean_inc(x_69); +x_96 = lean_get_class_instances(x_69, x_91); +x_97 = l_List_map___main___at_Lean_TypeClass_newSubgoal___spec__1(x_96); +x_98 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_98, 0, x_95); +lean_ctor_set(x_98, 1, x_97); +x_99 = l_Lean_TypeClass_newSubgoal___closed__4; +x_100 = lean_array_push(x_99, x_1); +x_101 = l_Array_empty___closed__1; +x_102 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_102, 0, x_100); +lean_ctor_set(x_102, 1, x_101); +x_103 = lean_array_push(x_72, x_98); +x_104 = l_PersistentHashMap_insert___at_Lean_TypeClass_newSubgoal___spec__2(x_75, x_93, x_102); +if (lean_is_scalar(x_90)) { + x_105 = lean_alloc_ctor(0, 7, 0); +} else { + x_105 = x_90; +} +lean_ctor_set(x_105, 0, x_69); +lean_ctor_set(x_105, 1, x_70); +lean_ctor_set(x_105, 2, x_71); +lean_ctor_set(x_105, 3, x_103); +lean_ctor_set(x_105, 4, x_73); +lean_ctor_set(x_105, 5, x_74); +lean_ctor_set(x_105, 6, x_104); +x_106 = lean_box(0); +x_107 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_107, 0, x_106); +lean_ctor_set(x_107, 1, x_105); +return x_107; +} +} +} +} +} +lean_object* l_Array_miterateAux___main___at_Lean_TypeClass_newSubgoal___spec__5___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: +{ +size_t x_7; lean_object* x_8; +x_7 = lean_unbox_usize(x_1); +lean_dec(x_1); +x_8 = l_Array_miterateAux___main___at_Lean_TypeClass_newSubgoal___spec__5(x_7, x_2, x_3, x_4, x_5, x_6); +lean_dec(x_4); +lean_dec(x_3); +lean_dec(x_2); +return x_8; +} +} +lean_object* l_PersistentHashMap_insertAux___main___at_Lean_TypeClass_newSubgoal___spec__3___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_2); +lean_dec(x_2); +x_7 = lean_unbox_usize(x_3); +lean_dec(x_3); +x_8 = l_PersistentHashMap_insertAux___main___at_Lean_TypeClass_newSubgoal___spec__3(x_1, x_6, x_7, x_4, x_5); +return x_8; +} +} +lean_object* l_Lean_TypeClass_introduceMVars___main(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6) { +_start: +{ +lean_object* x_7; +if (lean_obj_tag(x_5) == 7) +{ +uint8_t 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; uint8_t x_23; +x_12 = lean_ctor_get_uint8(x_5, sizeof(void*)*3); +x_13 = lean_ctor_get(x_5, 1); +lean_inc(x_13); +x_14 = lean_ctor_get(x_5, 2); +lean_inc(x_14); +lean_dec(x_5); +lean_inc(x_2); +lean_inc(x_1); +x_15 = l_Lean_LocalContext_mkForall(x_1, x_2, x_13); +x_16 = l_Lean_TypeClass_Context_eNewMeta(x_15, x_3); +x_17 = lean_ctor_get(x_16, 0); +lean_inc(x_17); +x_18 = lean_ctor_get(x_16, 1); +lean_inc(x_18); +lean_dec(x_16); +x_19 = l_Array_toList___rarg(x_2); +lean_inc(x_17); +x_20 = l_List_foldl___main___at_Lean_mkApp___spec__1(x_17, x_19); +lean_inc(x_20); +x_21 = lean_expr_mk_app(x_4, x_20); +x_22 = lean_expr_instantiate1(x_14, x_20); +x_23 = l_Lean_BinderInfo_isInstImplicit(x_12); +if (x_23 == 0) +{ +lean_dec(x_17); +x_3 = x_18; +x_4 = x_21; +x_5 = x_22; +goto _start; +} +else +{ +lean_object* x_25; +x_25 = lean_array_push(x_6, x_17); +x_3 = x_18; +x_4 = x_21; +x_5 = x_22; +x_6 = x_25; +goto _start; +} +} +else +{ +lean_object* x_27; +lean_dec(x_2); +lean_dec(x_1); +x_27 = lean_box(0); +x_7 = x_27; +goto block_11; +} +block_11: +{ +lean_object* x_8; lean_object* x_9; lean_object* x_10; +lean_dec(x_7); +x_8 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_8, 0, x_5); +lean_ctor_set(x_8, 1, x_6); +x_9 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_9, 0, x_4); +lean_ctor_set(x_9, 1, x_8); +x_10 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_10, 0, x_3); +lean_ctor_set(x_10, 1, x_9); +return x_10; +} +} +} +lean_object* l_Lean_TypeClass_introduceMVars(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_TypeClass_introduceMVars___main(x_1, x_2, x_3, x_4, x_5, x_6); +return x_7; +} +} +lean_object* _init_l_Lean_TypeClass_introduceLocals___main___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("_tmp"); +return x_1; +} +} +lean_object* _init_l_Lean_TypeClass_introduceLocals___main___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = lean_box(0); +x_2 = l_Lean_TypeClass_introduceLocals___main___closed__1; +x_3 = lean_name_mk_string(x_1, x_2); +return x_3; +} +} +lean_object* l_Lean_TypeClass_introduceLocals___main(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +if (lean_obj_tag(x_4) == 7) +{ +lean_object* x_5; uint8_t x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; +x_5 = lean_ctor_get(x_4, 0); +lean_inc(x_5); +x_6 = lean_ctor_get_uint8(x_4, sizeof(void*)*3); +x_7 = lean_ctor_get(x_4, 1); +lean_inc(x_7); +x_8 = lean_ctor_get(x_4, 2); +lean_inc(x_8); +lean_dec(x_4); +x_9 = l_Lean_TypeClass_introduceLocals___main___closed__2; +lean_inc(x_1); +x_10 = lean_name_mk_numeral(x_9, x_1); +lean_inc(x_10); +x_11 = lean_local_ctx_mk_local_decl(x_2, x_10, x_5, x_7, x_6); +x_12 = lean_ctor_get(x_11, 1); +lean_inc(x_12); +lean_dec(x_11); +x_13 = lean_expr_mk_fvar(x_10); +x_14 = lean_unsigned_to_nat(1u); +x_15 = lean_nat_add(x_1, x_14); +lean_dec(x_1); +lean_inc(x_13); +x_16 = lean_array_push(x_3, x_13); +x_17 = lean_expr_instantiate1(x_8, x_13); +x_1 = x_15; +x_2 = x_12; +x_3 = x_16; +x_4 = x_17; +goto _start; +} +else +{ +lean_object* x_19; lean_object* x_20; +lean_dec(x_1); +x_19 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_19, 0, x_4); +lean_ctor_set(x_19, 1, x_3); +x_20 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_20, 0, x_2); +lean_ctor_set(x_20, 1, x_19); +return x_20; +} +} +} +lean_object* l_Lean_TypeClass_introduceLocals(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_TypeClass_introduceLocals___main(x_1, x_2, x_3, x_4); +return x_5; +} +} +lean_object* l_Lean_TypeClass_tryResolve(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; uint8_t x_22; +x_5 = lean_ctor_get(x_2, 0); +lean_inc(x_5); +x_6 = lean_ctor_get(x_2, 1); +lean_inc(x_6); +lean_dec(x_2); +x_7 = lean_ctor_get(x_3, 0); +lean_inc(x_7); +x_8 = lean_ctor_get(x_3, 1); +lean_inc(x_8); +lean_dec(x_3); +x_9 = lean_unsigned_to_nat(0u); +x_10 = l_Lean_LocalContext_Inhabited___closed__1; +x_11 = l_Array_empty___closed__1; +x_12 = l_Lean_TypeClass_introduceLocals___main(x_9, x_10, x_11, x_6); +x_13 = lean_ctor_get(x_12, 1); +lean_inc(x_13); +x_14 = lean_ctor_get(x_12, 0); +lean_inc(x_14); +lean_dec(x_12); +x_15 = lean_ctor_get(x_13, 0); +lean_inc(x_15); +x_16 = lean_ctor_get(x_13, 1); +lean_inc(x_16); +lean_dec(x_13); +lean_inc(x_16); +lean_inc(x_14); +x_17 = l_Lean_TypeClass_introduceMVars___main(x_14, x_16, x_1, x_7, x_8, x_11); +x_18 = lean_ctor_get(x_17, 1); +lean_inc(x_18); +x_19 = lean_ctor_get(x_18, 1); +lean_inc(x_19); +x_20 = lean_ctor_get(x_17, 0); +lean_inc(x_20); +lean_dec(x_17); +x_21 = lean_ctor_get(x_18, 0); +lean_inc(x_21); +lean_dec(x_18); +x_22 = !lean_is_exclusive(x_19); +if (x_22 == 0) +{ +lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; +x_23 = lean_ctor_get(x_19, 0); +x_24 = lean_ctor_get(x_19, 1); +x_25 = l_Lean_LocalContext_mkLambda(x_14, x_16, x_21); +x_26 = lean_box(0); +x_27 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_27, 0, x_26); +lean_ctor_set(x_27, 1, x_20); +x_28 = l_Lean_TypeClass_Context_eUnify___main(x_15, x_23, x_27); +if (lean_obj_tag(x_28) == 0) +{ +uint8_t x_29; +x_29 = !lean_is_exclusive(x_28); +if (x_29 == 0) +{ +lean_object* x_30; lean_object* x_31; +x_30 = lean_ctor_get(x_28, 0); +lean_dec(x_30); +lean_ctor_set(x_28, 0, x_26); +x_31 = l_Lean_TypeClass_Context_eUnify___main(x_5, x_25, x_28); +if (lean_obj_tag(x_31) == 0) +{ +lean_object* x_32; uint8_t x_33; +x_32 = lean_ctor_get(x_31, 1); +lean_inc(x_32); +lean_dec(x_31); +x_33 = !lean_is_exclusive(x_4); +if (x_33 == 0) +{ +lean_object* x_34; lean_object* x_35; lean_object* x_36; +x_34 = lean_ctor_get(x_4, 0); +lean_dec(x_34); +x_35 = l_Array_toList___rarg(x_24); +lean_dec(x_24); +lean_ctor_set(x_19, 1, x_35); +lean_ctor_set(x_19, 0, x_32); +x_36 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_36, 0, x_19); +lean_ctor_set(x_4, 0, x_36); +return x_4; +} +else +{ +lean_object* x_37; lean_object* x_38; lean_object* x_39; lean_object* x_40; +x_37 = lean_ctor_get(x_4, 1); +lean_inc(x_37); +lean_dec(x_4); +x_38 = l_Array_toList___rarg(x_24); +lean_dec(x_24); +lean_ctor_set(x_19, 1, x_38); +lean_ctor_set(x_19, 0, x_32); +x_39 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_39, 0, x_19); +x_40 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_40, 0, x_39); +lean_ctor_set(x_40, 1, x_37); +return x_40; +} +} +else +{ +uint8_t x_41; +lean_dec(x_31); +lean_free_object(x_19); +lean_dec(x_24); +x_41 = !lean_is_exclusive(x_4); +if (x_41 == 0) +{ +lean_object* x_42; lean_object* x_43; +x_42 = lean_ctor_get(x_4, 0); +lean_dec(x_42); +x_43 = lean_box(0); +lean_ctor_set(x_4, 0, x_43); +return x_4; +} +else +{ +lean_object* x_44; lean_object* x_45; lean_object* x_46; +x_44 = lean_ctor_get(x_4, 1); +lean_inc(x_44); +lean_dec(x_4); +x_45 = lean_box(0); +x_46 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_46, 0, x_45); +lean_ctor_set(x_46, 1, x_44); +return x_46; +} +} +} +else +{ +lean_object* x_47; lean_object* x_48; lean_object* x_49; +x_47 = lean_ctor_get(x_28, 1); +lean_inc(x_47); +lean_dec(x_28); +x_48 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_48, 0, x_26); +lean_ctor_set(x_48, 1, x_47); +x_49 = l_Lean_TypeClass_Context_eUnify___main(x_5, x_25, x_48); +if (lean_obj_tag(x_49) == 0) +{ +lean_object* x_50; lean_object* x_51; lean_object* x_52; lean_object* x_53; lean_object* x_54; lean_object* x_55; +x_50 = lean_ctor_get(x_49, 1); +lean_inc(x_50); +lean_dec(x_49); +x_51 = lean_ctor_get(x_4, 1); +lean_inc(x_51); +if (lean_is_exclusive(x_4)) { + lean_ctor_release(x_4, 0); + lean_ctor_release(x_4, 1); + x_52 = x_4; +} else { + lean_dec_ref(x_4); + x_52 = lean_box(0); +} +x_53 = l_Array_toList___rarg(x_24); +lean_dec(x_24); +lean_ctor_set(x_19, 1, x_53); +lean_ctor_set(x_19, 0, x_50); +x_54 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_54, 0, x_19); +if (lean_is_scalar(x_52)) { + x_55 = lean_alloc_ctor(0, 2, 0); +} else { + x_55 = x_52; +} +lean_ctor_set(x_55, 0, x_54); +lean_ctor_set(x_55, 1, x_51); +return x_55; +} +else +{ +lean_object* x_56; lean_object* x_57; lean_object* x_58; lean_object* x_59; +lean_dec(x_49); +lean_free_object(x_19); +lean_dec(x_24); +x_56 = lean_ctor_get(x_4, 1); +lean_inc(x_56); +if (lean_is_exclusive(x_4)) { + lean_ctor_release(x_4, 0); + lean_ctor_release(x_4, 1); + x_57 = x_4; +} else { + lean_dec_ref(x_4); + x_57 = lean_box(0); +} +x_58 = lean_box(0); +if (lean_is_scalar(x_57)) { + x_59 = lean_alloc_ctor(0, 2, 0); +} else { + x_59 = x_57; +} +lean_ctor_set(x_59, 0, x_58); +lean_ctor_set(x_59, 1, x_56); +return x_59; +} +} +} +else +{ +uint8_t x_60; +lean_dec(x_28); +lean_dec(x_25); +lean_free_object(x_19); +lean_dec(x_24); +lean_dec(x_5); +x_60 = !lean_is_exclusive(x_4); +if (x_60 == 0) +{ +lean_object* x_61; lean_object* x_62; +x_61 = lean_ctor_get(x_4, 0); +lean_dec(x_61); +x_62 = lean_box(0); +lean_ctor_set(x_4, 0, x_62); +return x_4; +} +else +{ +lean_object* x_63; lean_object* x_64; lean_object* x_65; +x_63 = lean_ctor_get(x_4, 1); +lean_inc(x_63); +lean_dec(x_4); +x_64 = lean_box(0); +x_65 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_65, 0, x_64); +lean_ctor_set(x_65, 1, x_63); +return x_65; +} +} +} +else +{ +lean_object* x_66; lean_object* x_67; lean_object* x_68; lean_object* x_69; lean_object* x_70; lean_object* x_71; +x_66 = lean_ctor_get(x_19, 0); +x_67 = lean_ctor_get(x_19, 1); +lean_inc(x_67); +lean_inc(x_66); +lean_dec(x_19); +x_68 = l_Lean_LocalContext_mkLambda(x_14, x_16, x_21); +x_69 = lean_box(0); +x_70 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_70, 0, x_69); +lean_ctor_set(x_70, 1, x_20); +x_71 = l_Lean_TypeClass_Context_eUnify___main(x_15, x_66, x_70); +if (lean_obj_tag(x_71) == 0) +{ +lean_object* x_72; lean_object* x_73; lean_object* x_74; lean_object* x_75; +x_72 = lean_ctor_get(x_71, 1); +lean_inc(x_72); +if (lean_is_exclusive(x_71)) { + lean_ctor_release(x_71, 0); + lean_ctor_release(x_71, 1); + x_73 = x_71; +} else { + lean_dec_ref(x_71); + x_73 = lean_box(0); +} +if (lean_is_scalar(x_73)) { + x_74 = lean_alloc_ctor(0, 2, 0); +} else { + x_74 = x_73; +} +lean_ctor_set(x_74, 0, x_69); +lean_ctor_set(x_74, 1, x_72); +x_75 = l_Lean_TypeClass_Context_eUnify___main(x_5, x_68, x_74); +if (lean_obj_tag(x_75) == 0) +{ +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; +x_76 = lean_ctor_get(x_75, 1); +lean_inc(x_76); +lean_dec(x_75); +x_77 = lean_ctor_get(x_4, 1); +lean_inc(x_77); +if (lean_is_exclusive(x_4)) { + lean_ctor_release(x_4, 0); + lean_ctor_release(x_4, 1); + x_78 = x_4; +} else { + lean_dec_ref(x_4); + x_78 = lean_box(0); +} +x_79 = l_Array_toList___rarg(x_67); +lean_dec(x_67); +x_80 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_80, 0, x_76); +lean_ctor_set(x_80, 1, x_79); +x_81 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_81, 0, x_80); +if (lean_is_scalar(x_78)) { + x_82 = lean_alloc_ctor(0, 2, 0); +} else { + x_82 = x_78; +} +lean_ctor_set(x_82, 0, x_81); +lean_ctor_set(x_82, 1, x_77); +return x_82; +} +else +{ +lean_object* x_83; lean_object* x_84; lean_object* x_85; lean_object* x_86; +lean_dec(x_75); +lean_dec(x_67); +x_83 = lean_ctor_get(x_4, 1); +lean_inc(x_83); +if (lean_is_exclusive(x_4)) { + lean_ctor_release(x_4, 0); + lean_ctor_release(x_4, 1); + x_84 = x_4; +} else { + lean_dec_ref(x_4); + x_84 = lean_box(0); +} +x_85 = lean_box(0); +if (lean_is_scalar(x_84)) { + x_86 = lean_alloc_ctor(0, 2, 0); +} else { + x_86 = x_84; +} +lean_ctor_set(x_86, 0, x_85); +lean_ctor_set(x_86, 1, x_83); +return x_86; +} +} +else +{ +lean_object* x_87; lean_object* x_88; lean_object* x_89; lean_object* x_90; +lean_dec(x_71); +lean_dec(x_68); +lean_dec(x_67); +lean_dec(x_5); +x_87 = lean_ctor_get(x_4, 1); +lean_inc(x_87); +if (lean_is_exclusive(x_4)) { + lean_ctor_release(x_4, 0); + lean_ctor_release(x_4, 1); + x_88 = x_4; +} else { + lean_dec_ref(x_4); + x_88 = lean_box(0); +} +x_89 = lean_box(0); +if (lean_is_scalar(x_88)) { + x_90 = lean_alloc_ctor(0, 2, 0); +} else { + x_90 = x_88; +} +lean_ctor_set(x_90, 0, x_89); +lean_ctor_set(x_90, 1, x_87); +return x_90; +} +} +} +} +lean_object* l_Lean_TypeClass_newConsumerNode(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +uint8_t x_5; +x_5 = !lean_is_exclusive(x_1); +if (x_5 == 0) +{ +lean_object* x_6; uint8_t x_7; +x_6 = lean_ctor_get(x_1, 1); +lean_dec(x_6); +x_7 = !lean_is_exclusive(x_4); +if (x_7 == 0) +{ +lean_object* x_8; lean_object* x_9; lean_object* x_10; uint8_t x_11; +x_8 = lean_ctor_get(x_4, 1); +x_9 = lean_ctor_get(x_4, 0); +lean_dec(x_9); +lean_ctor_set(x_1, 1, x_2); +x_10 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_10, 0, x_1); +lean_ctor_set(x_10, 1, x_3); +x_11 = !lean_is_exclusive(x_8); +if (x_11 == 0) +{ +lean_object* x_12; lean_object* x_13; lean_object* x_14; +x_12 = lean_ctor_get(x_8, 4); +x_13 = lean_array_push(x_12, x_10); +lean_ctor_set(x_8, 4, x_13); +x_14 = lean_box(0); +lean_ctor_set(x_4, 0, x_14); +return x_4; +} +else +{ +lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; +x_15 = lean_ctor_get(x_8, 0); +x_16 = lean_ctor_get(x_8, 1); +x_17 = lean_ctor_get(x_8, 2); +x_18 = lean_ctor_get(x_8, 3); +x_19 = lean_ctor_get(x_8, 4); +x_20 = lean_ctor_get(x_8, 5); +x_21 = lean_ctor_get(x_8, 6); +lean_inc(x_21); +lean_inc(x_20); +lean_inc(x_19); +lean_inc(x_18); +lean_inc(x_17); +lean_inc(x_16); +lean_inc(x_15); +lean_dec(x_8); +x_22 = lean_array_push(x_19, x_10); +x_23 = lean_alloc_ctor(0, 7, 0); +lean_ctor_set(x_23, 0, x_15); +lean_ctor_set(x_23, 1, x_16); +lean_ctor_set(x_23, 2, x_17); +lean_ctor_set(x_23, 3, x_18); +lean_ctor_set(x_23, 4, x_22); +lean_ctor_set(x_23, 5, x_20); +lean_ctor_set(x_23, 6, x_21); +x_24 = lean_box(0); +lean_ctor_set(x_4, 1, x_23); +lean_ctor_set(x_4, 0, x_24); +return x_4; +} +} +else +{ +lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; +x_25 = lean_ctor_get(x_4, 1); +lean_inc(x_25); +lean_dec(x_4); +lean_ctor_set(x_1, 1, x_2); +x_26 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_26, 0, x_1); +lean_ctor_set(x_26, 1, x_3); +x_27 = lean_ctor_get(x_25, 0); +lean_inc(x_27); +x_28 = lean_ctor_get(x_25, 1); +lean_inc(x_28); +x_29 = lean_ctor_get(x_25, 2); +lean_inc(x_29); +x_30 = lean_ctor_get(x_25, 3); +lean_inc(x_30); +x_31 = lean_ctor_get(x_25, 4); +lean_inc(x_31); +x_32 = lean_ctor_get(x_25, 5); +lean_inc(x_32); +x_33 = lean_ctor_get(x_25, 6); +lean_inc(x_33); +if (lean_is_exclusive(x_25)) { + lean_ctor_release(x_25, 0); + lean_ctor_release(x_25, 1); + lean_ctor_release(x_25, 2); + lean_ctor_release(x_25, 3); + lean_ctor_release(x_25, 4); + lean_ctor_release(x_25, 5); + lean_ctor_release(x_25, 6); + x_34 = x_25; +} else { + lean_dec_ref(x_25); + x_34 = lean_box(0); +} +x_35 = lean_array_push(x_31, x_26); +if (lean_is_scalar(x_34)) { + x_36 = lean_alloc_ctor(0, 7, 0); +} else { + x_36 = x_34; +} +lean_ctor_set(x_36, 0, x_27); +lean_ctor_set(x_36, 1, x_28); +lean_ctor_set(x_36, 2, x_29); +lean_ctor_set(x_36, 3, x_30); +lean_ctor_set(x_36, 4, x_35); +lean_ctor_set(x_36, 5, x_32); +lean_ctor_set(x_36, 6, x_33); +x_37 = lean_box(0); +x_38 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_38, 0, x_37); +lean_ctor_set(x_38, 1, x_36); +return x_38; +} +} +else +{ +lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_object* x_51; lean_object* x_52; lean_object* x_53; lean_object* x_54; lean_object* x_55; lean_object* x_56; +x_39 = lean_ctor_get(x_1, 0); +x_40 = lean_ctor_get(x_1, 2); +lean_inc(x_40); +lean_inc(x_39); +lean_dec(x_1); +x_41 = lean_ctor_get(x_4, 1); +lean_inc(x_41); +if (lean_is_exclusive(x_4)) { + lean_ctor_release(x_4, 0); + lean_ctor_release(x_4, 1); + x_42 = x_4; +} else { + lean_dec_ref(x_4); + x_42 = lean_box(0); +} +x_43 = lean_alloc_ctor(0, 3, 0); +lean_ctor_set(x_43, 0, x_39); +lean_ctor_set(x_43, 1, x_2); +lean_ctor_set(x_43, 2, x_40); +x_44 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_44, 0, x_43); +lean_ctor_set(x_44, 1, x_3); +x_45 = lean_ctor_get(x_41, 0); +lean_inc(x_45); +x_46 = lean_ctor_get(x_41, 1); +lean_inc(x_46); +x_47 = lean_ctor_get(x_41, 2); +lean_inc(x_47); +x_48 = lean_ctor_get(x_41, 3); +lean_inc(x_48); +x_49 = lean_ctor_get(x_41, 4); +lean_inc(x_49); +x_50 = lean_ctor_get(x_41, 5); +lean_inc(x_50); +x_51 = lean_ctor_get(x_41, 6); +lean_inc(x_51); +if (lean_is_exclusive(x_41)) { + lean_ctor_release(x_41, 0); + lean_ctor_release(x_41, 1); + lean_ctor_release(x_41, 2); + lean_ctor_release(x_41, 3); + lean_ctor_release(x_41, 4); + lean_ctor_release(x_41, 5); + lean_ctor_release(x_41, 6); + x_52 = x_41; +} else { + lean_dec_ref(x_41); + x_52 = lean_box(0); +} +x_53 = lean_array_push(x_49, x_44); +if (lean_is_scalar(x_52)) { + x_54 = lean_alloc_ctor(0, 7, 0); +} else { + x_54 = x_52; +} +lean_ctor_set(x_54, 0, x_45); +lean_ctor_set(x_54, 1, x_46); +lean_ctor_set(x_54, 2, x_47); +lean_ctor_set(x_54, 3, x_48); +lean_ctor_set(x_54, 4, x_53); +lean_ctor_set(x_54, 5, x_50); +lean_ctor_set(x_54, 6, x_51); +x_55 = lean_box(0); +if (lean_is_scalar(x_42)) { + x_56 = lean_alloc_ctor(0, 2, 0); +} else { + x_56 = x_42; +} +lean_ctor_set(x_56, 0, x_55); +lean_ctor_set(x_56, 1, x_54); +return x_56; +} +} +} +lean_object* _init_l_Lean_TypeClass_resume___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("resume found nothing to resume"); +return x_1; +} +} +lean_object* _init_l_Lean_TypeClass_resume___closed__2() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("resume found no remaining subgoals"); +return x_1; +} +} +lean_object* l_Lean_TypeClass_resume(lean_object* x_1) { +_start: +{ +uint8_t x_2; +x_2 = !lean_is_exclusive(x_1); +if (x_2 == 0) +{ +lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; +x_3 = lean_ctor_get(x_1, 1); +x_4 = lean_ctor_get(x_1, 0); +lean_dec(x_4); +x_5 = lean_ctor_get(x_3, 5); +lean_inc(x_5); +x_6 = l_Queue_dequeue_x3f___rarg(x_5); +if (lean_obj_tag(x_6) == 0) +{ +lean_object* x_7; +x_7 = l_Lean_TypeClass_resume___closed__1; +lean_ctor_set_tag(x_1, 1); +lean_ctor_set(x_1, 0, x_7); +return x_1; +} +else +{ +lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; +x_8 = lean_ctor_get(x_6, 0); +lean_inc(x_8); +lean_dec(x_6); +x_9 = lean_box(0); +lean_inc(x_3); +lean_ctor_set(x_1, 0, x_9); +x_10 = lean_ctor_get(x_8, 0); +lean_inc(x_10); +x_11 = lean_ctor_get(x_10, 0); +lean_inc(x_11); +x_12 = lean_ctor_get(x_11, 1); +lean_inc(x_12); +if (lean_obj_tag(x_12) == 0) +{ +lean_object* x_13; lean_object* x_14; +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_1); +lean_dec(x_8); +x_13 = l_Lean_TypeClass_resume___closed__2; +x_14 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_14, 0, x_13); +lean_ctor_set(x_14, 1, x_3); +return x_14; +} +else +{ +lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; +lean_dec(x_3); +x_15 = lean_ctor_get(x_8, 1); +lean_inc(x_15); +lean_dec(x_8); +x_16 = lean_ctor_get(x_10, 1); +lean_inc(x_16); +lean_dec(x_10); +x_17 = lean_ctor_get(x_12, 0); +lean_inc(x_17); +x_18 = lean_ctor_get(x_12, 1); +lean_inc(x_18); +lean_dec(x_12); +x_19 = lean_ctor_get(x_11, 0); +lean_inc(x_19); +lean_dec(x_11); +x_20 = lean_ctor_get(x_19, 1); +lean_inc(x_20); +lean_inc(x_20); +x_21 = l_Lean_TypeClass_Context_eInfer(x_20, x_17); +x_22 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_22, 0, x_17); +lean_ctor_set(x_22, 1, x_21); +x_23 = l_Lean_TypeClass_tryResolve(x_20, x_22, x_16, x_1); +if (lean_obj_tag(x_23) == 0) +{ +uint8_t x_24; +x_24 = !lean_is_exclusive(x_23); +if (x_24 == 0) +{ +lean_object* x_25; uint8_t x_26; +x_25 = lean_ctor_get(x_23, 1); +x_26 = !lean_is_exclusive(x_25); +if (x_26 == 0) +{ +lean_object* x_27; lean_object* x_28; +x_27 = lean_ctor_get(x_23, 0); +x_28 = lean_ctor_get(x_25, 5); +lean_dec(x_28); +lean_ctor_set(x_25, 5, x_15); +if (lean_obj_tag(x_27) == 0) +{ +lean_dec(x_19); +lean_dec(x_18); +lean_ctor_set(x_23, 0, x_9); +return x_23; +} +else +{ +lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; +x_29 = lean_ctor_get(x_27, 0); +lean_inc(x_29); +lean_dec(x_27); +lean_ctor_set(x_23, 0, x_9); +x_30 = lean_ctor_get(x_29, 0); +lean_inc(x_30); +x_31 = lean_ctor_get(x_29, 1); +lean_inc(x_31); +lean_dec(x_29); +x_32 = l_List_append___rarg(x_31, x_18); +x_33 = l_Lean_TypeClass_newConsumerNode(x_19, x_30, x_32, x_23); +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; +x_34 = lean_ctor_get(x_23, 0); +x_35 = lean_ctor_get(x_25, 0); +x_36 = lean_ctor_get(x_25, 1); +x_37 = lean_ctor_get(x_25, 2); +x_38 = lean_ctor_get(x_25, 3); +x_39 = lean_ctor_get(x_25, 4); +x_40 = lean_ctor_get(x_25, 6); +lean_inc(x_40); +lean_inc(x_39); +lean_inc(x_38); +lean_inc(x_37); +lean_inc(x_36); +lean_inc(x_35); +lean_dec(x_25); +x_41 = lean_alloc_ctor(0, 7, 0); +lean_ctor_set(x_41, 0, x_35); +lean_ctor_set(x_41, 1, x_36); +lean_ctor_set(x_41, 2, x_37); +lean_ctor_set(x_41, 3, x_38); +lean_ctor_set(x_41, 4, x_39); +lean_ctor_set(x_41, 5, x_15); +lean_ctor_set(x_41, 6, x_40); +if (lean_obj_tag(x_34) == 0) +{ +lean_dec(x_19); +lean_dec(x_18); +lean_ctor_set(x_23, 1, x_41); +lean_ctor_set(x_23, 0, x_9); +return x_23; +} +else +{ +lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; +x_42 = lean_ctor_get(x_34, 0); +lean_inc(x_42); +lean_dec(x_34); +lean_ctor_set(x_23, 1, x_41); +lean_ctor_set(x_23, 0, x_9); +x_43 = lean_ctor_get(x_42, 0); +lean_inc(x_43); +x_44 = lean_ctor_get(x_42, 1); +lean_inc(x_44); +lean_dec(x_42); +x_45 = l_List_append___rarg(x_44, x_18); +x_46 = l_Lean_TypeClass_newConsumerNode(x_19, x_43, x_45, x_23); +return x_46; +} +} +} +else +{ +lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_object* x_51; lean_object* x_52; lean_object* x_53; lean_object* x_54; lean_object* x_55; lean_object* x_56; +x_47 = lean_ctor_get(x_23, 1); +x_48 = lean_ctor_get(x_23, 0); +lean_inc(x_47); +lean_inc(x_48); +lean_dec(x_23); +x_49 = lean_ctor_get(x_47, 0); +lean_inc(x_49); +x_50 = lean_ctor_get(x_47, 1); +lean_inc(x_50); +x_51 = lean_ctor_get(x_47, 2); +lean_inc(x_51); +x_52 = lean_ctor_get(x_47, 3); +lean_inc(x_52); +x_53 = lean_ctor_get(x_47, 4); +lean_inc(x_53); +x_54 = lean_ctor_get(x_47, 6); +lean_inc(x_54); +if (lean_is_exclusive(x_47)) { + lean_ctor_release(x_47, 0); + lean_ctor_release(x_47, 1); + lean_ctor_release(x_47, 2); + lean_ctor_release(x_47, 3); + lean_ctor_release(x_47, 4); + lean_ctor_release(x_47, 5); + lean_ctor_release(x_47, 6); + x_55 = x_47; +} else { + lean_dec_ref(x_47); + x_55 = lean_box(0); +} +if (lean_is_scalar(x_55)) { + x_56 = lean_alloc_ctor(0, 7, 0); +} else { + x_56 = x_55; +} +lean_ctor_set(x_56, 0, x_49); +lean_ctor_set(x_56, 1, x_50); +lean_ctor_set(x_56, 2, x_51); +lean_ctor_set(x_56, 3, x_52); +lean_ctor_set(x_56, 4, x_53); +lean_ctor_set(x_56, 5, x_15); +lean_ctor_set(x_56, 6, x_54); +if (lean_obj_tag(x_48) == 0) +{ +lean_object* x_57; +lean_dec(x_19); +lean_dec(x_18); +x_57 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_57, 0, x_9); +lean_ctor_set(x_57, 1, x_56); +return x_57; +} +else +{ +lean_object* x_58; lean_object* x_59; lean_object* x_60; lean_object* x_61; lean_object* x_62; lean_object* x_63; +x_58 = lean_ctor_get(x_48, 0); +lean_inc(x_58); +lean_dec(x_48); +x_59 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_59, 0, x_9); +lean_ctor_set(x_59, 1, x_56); +x_60 = lean_ctor_get(x_58, 0); +lean_inc(x_60); +x_61 = lean_ctor_get(x_58, 1); +lean_inc(x_61); +lean_dec(x_58); +x_62 = l_List_append___rarg(x_61, x_18); +x_63 = l_Lean_TypeClass_newConsumerNode(x_19, x_60, x_62, x_59); +return x_63; +} +} +} +else +{ +uint8_t x_64; +lean_dec(x_19); +lean_dec(x_18); +lean_dec(x_15); +x_64 = !lean_is_exclusive(x_23); +if (x_64 == 0) +{ +return x_23; +} +else +{ +lean_object* x_65; lean_object* x_66; lean_object* x_67; +x_65 = lean_ctor_get(x_23, 0); +x_66 = lean_ctor_get(x_23, 1); +lean_inc(x_66); +lean_inc(x_65); +lean_dec(x_23); +x_67 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_67, 0, x_65); +lean_ctor_set(x_67, 1, x_66); +return x_67; +} +} +} +} +} +else +{ +lean_object* x_68; lean_object* x_69; lean_object* x_70; +x_68 = lean_ctor_get(x_1, 1); +lean_inc(x_68); +lean_dec(x_1); +x_69 = lean_ctor_get(x_68, 5); +lean_inc(x_69); +x_70 = l_Queue_dequeue_x3f___rarg(x_69); +if (lean_obj_tag(x_70) == 0) +{ +lean_object* x_71; lean_object* x_72; +x_71 = l_Lean_TypeClass_resume___closed__1; +x_72 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_72, 0, x_71); +lean_ctor_set(x_72, 1, x_68); +return x_72; +} +else +{ +lean_object* x_73; lean_object* x_74; lean_object* x_75; lean_object* x_76; lean_object* x_77; lean_object* x_78; +x_73 = lean_ctor_get(x_70, 0); +lean_inc(x_73); +lean_dec(x_70); +x_74 = lean_box(0); +lean_inc(x_68); +x_75 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_75, 0, x_74); +lean_ctor_set(x_75, 1, x_68); +x_76 = lean_ctor_get(x_73, 0); +lean_inc(x_76); +x_77 = lean_ctor_get(x_76, 0); +lean_inc(x_77); +x_78 = lean_ctor_get(x_77, 1); +lean_inc(x_78); +if (lean_obj_tag(x_78) == 0) +{ +lean_object* x_79; lean_object* x_80; +lean_dec(x_77); +lean_dec(x_76); +lean_dec(x_75); +lean_dec(x_73); +x_79 = l_Lean_TypeClass_resume___closed__2; +x_80 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_80, 0, x_79); +lean_ctor_set(x_80, 1, x_68); +return x_80; +} +else +{ +lean_object* x_81; lean_object* x_82; lean_object* x_83; lean_object* x_84; lean_object* x_85; lean_object* x_86; lean_object* x_87; lean_object* x_88; lean_object* x_89; +lean_dec(x_68); +x_81 = lean_ctor_get(x_73, 1); +lean_inc(x_81); +lean_dec(x_73); +x_82 = lean_ctor_get(x_76, 1); +lean_inc(x_82); +lean_dec(x_76); +x_83 = lean_ctor_get(x_78, 0); +lean_inc(x_83); +x_84 = lean_ctor_get(x_78, 1); +lean_inc(x_84); +lean_dec(x_78); +x_85 = lean_ctor_get(x_77, 0); +lean_inc(x_85); +lean_dec(x_77); +x_86 = lean_ctor_get(x_85, 1); +lean_inc(x_86); +lean_inc(x_86); +x_87 = l_Lean_TypeClass_Context_eInfer(x_86, x_83); +x_88 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_88, 0, x_83); +lean_ctor_set(x_88, 1, x_87); +x_89 = l_Lean_TypeClass_tryResolve(x_86, x_88, x_82, x_75); +if (lean_obj_tag(x_89) == 0) +{ +lean_object* x_90; lean_object* x_91; lean_object* x_92; lean_object* x_93; lean_object* x_94; lean_object* x_95; lean_object* x_96; lean_object* x_97; lean_object* x_98; lean_object* x_99; lean_object* x_100; +x_90 = lean_ctor_get(x_89, 1); +lean_inc(x_90); +x_91 = lean_ctor_get(x_89, 0); +lean_inc(x_91); +if (lean_is_exclusive(x_89)) { + lean_ctor_release(x_89, 0); + lean_ctor_release(x_89, 1); + x_92 = x_89; +} else { + lean_dec_ref(x_89); + x_92 = lean_box(0); +} +x_93 = lean_ctor_get(x_90, 0); +lean_inc(x_93); +x_94 = lean_ctor_get(x_90, 1); +lean_inc(x_94); +x_95 = lean_ctor_get(x_90, 2); +lean_inc(x_95); +x_96 = lean_ctor_get(x_90, 3); +lean_inc(x_96); +x_97 = lean_ctor_get(x_90, 4); +lean_inc(x_97); +x_98 = lean_ctor_get(x_90, 6); +lean_inc(x_98); +if (lean_is_exclusive(x_90)) { + lean_ctor_release(x_90, 0); + lean_ctor_release(x_90, 1); + lean_ctor_release(x_90, 2); + lean_ctor_release(x_90, 3); + lean_ctor_release(x_90, 4); + lean_ctor_release(x_90, 5); + lean_ctor_release(x_90, 6); + x_99 = x_90; +} else { + lean_dec_ref(x_90); + x_99 = lean_box(0); +} +if (lean_is_scalar(x_99)) { + x_100 = lean_alloc_ctor(0, 7, 0); +} else { + x_100 = x_99; +} +lean_ctor_set(x_100, 0, x_93); +lean_ctor_set(x_100, 1, x_94); +lean_ctor_set(x_100, 2, x_95); +lean_ctor_set(x_100, 3, x_96); +lean_ctor_set(x_100, 4, x_97); +lean_ctor_set(x_100, 5, x_81); +lean_ctor_set(x_100, 6, x_98); +if (lean_obj_tag(x_91) == 0) +{ +lean_object* x_101; +lean_dec(x_85); +lean_dec(x_84); +if (lean_is_scalar(x_92)) { + x_101 = lean_alloc_ctor(0, 2, 0); +} else { + x_101 = x_92; +} +lean_ctor_set(x_101, 0, x_74); +lean_ctor_set(x_101, 1, x_100); +return x_101; +} +else +{ +lean_object* x_102; lean_object* x_103; lean_object* x_104; lean_object* x_105; lean_object* x_106; lean_object* x_107; +x_102 = lean_ctor_get(x_91, 0); +lean_inc(x_102); +lean_dec(x_91); +if (lean_is_scalar(x_92)) { + x_103 = lean_alloc_ctor(0, 2, 0); +} else { + x_103 = x_92; +} +lean_ctor_set(x_103, 0, x_74); +lean_ctor_set(x_103, 1, x_100); +x_104 = lean_ctor_get(x_102, 0); +lean_inc(x_104); +x_105 = lean_ctor_get(x_102, 1); +lean_inc(x_105); +lean_dec(x_102); +x_106 = l_List_append___rarg(x_105, x_84); +x_107 = l_Lean_TypeClass_newConsumerNode(x_85, x_104, x_106, x_103); +return x_107; +} +} +else +{ +lean_object* x_108; lean_object* x_109; lean_object* x_110; lean_object* x_111; +lean_dec(x_85); +lean_dec(x_84); +lean_dec(x_81); +x_108 = lean_ctor_get(x_89, 0); +lean_inc(x_108); +x_109 = lean_ctor_get(x_89, 1); +lean_inc(x_109); +if (lean_is_exclusive(x_89)) { + lean_ctor_release(x_89, 0); + lean_ctor_release(x_89, 1); + x_110 = x_89; +} else { + lean_dec_ref(x_89); + x_110 = lean_box(0); +} +if (lean_is_scalar(x_110)) { + x_111 = lean_alloc_ctor(1, 2, 0); +} else { + x_111 = x_110; +} +lean_ctor_set(x_111, 0, x_108); +lean_ctor_set(x_111, 1, x_109); +return x_111; +} +} +} +} +} +} +lean_object* l_Lean_TypeClass_wakeUp(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +if (lean_obj_tag(x_2) == 0) +{ +uint8_t x_4; +x_4 = !lean_is_exclusive(x_3); +if (x_4 == 0) +{ +lean_object* x_5; lean_object* x_6; uint8_t x_7; +x_5 = lean_ctor_get(x_3, 1); +x_6 = lean_ctor_get(x_3, 0); +lean_dec(x_6); +x_7 = !lean_is_exclusive(x_5); +if (x_7 == 0) +{ +lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; +x_8 = lean_ctor_get(x_2, 0); +x_9 = lean_ctor_get(x_5, 5); +lean_inc(x_8); +x_10 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_10, 0, x_8); +lean_ctor_set(x_10, 1, x_1); +x_11 = l_Queue_enqueue___rarg(x_10, x_9); +lean_ctor_set(x_5, 5, x_11); +x_12 = lean_box(0); +lean_ctor_set(x_3, 0, x_12); +return x_3; +} +else +{ +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; +x_13 = lean_ctor_get(x_2, 0); +x_14 = lean_ctor_get(x_5, 0); +x_15 = lean_ctor_get(x_5, 1); +x_16 = lean_ctor_get(x_5, 2); +x_17 = lean_ctor_get(x_5, 3); +x_18 = lean_ctor_get(x_5, 4); +x_19 = lean_ctor_get(x_5, 5); +x_20 = lean_ctor_get(x_5, 6); +lean_inc(x_20); +lean_inc(x_19); +lean_inc(x_18); +lean_inc(x_17); +lean_inc(x_16); +lean_inc(x_15); +lean_inc(x_14); +lean_dec(x_5); +lean_inc(x_13); +x_21 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_21, 0, x_13); +lean_ctor_set(x_21, 1, x_1); +x_22 = l_Queue_enqueue___rarg(x_21, x_19); +x_23 = lean_alloc_ctor(0, 7, 0); +lean_ctor_set(x_23, 0, x_14); +lean_ctor_set(x_23, 1, x_15); +lean_ctor_set(x_23, 2, x_16); +lean_ctor_set(x_23, 3, x_17); +lean_ctor_set(x_23, 4, x_18); +lean_ctor_set(x_23, 5, x_22); +lean_ctor_set(x_23, 6, x_20); +x_24 = lean_box(0); +lean_ctor_set(x_3, 1, x_23); +lean_ctor_set(x_3, 0, x_24); +return x_3; +} +} +else +{ +lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; lean_object* x_38; lean_object* x_39; +x_25 = lean_ctor_get(x_3, 1); +lean_inc(x_25); +lean_dec(x_3); +x_26 = lean_ctor_get(x_2, 0); +x_27 = lean_ctor_get(x_25, 0); +lean_inc(x_27); +x_28 = lean_ctor_get(x_25, 1); +lean_inc(x_28); +x_29 = lean_ctor_get(x_25, 2); +lean_inc(x_29); +x_30 = lean_ctor_get(x_25, 3); +lean_inc(x_30); +x_31 = lean_ctor_get(x_25, 4); +lean_inc(x_31); +x_32 = lean_ctor_get(x_25, 5); +lean_inc(x_32); +x_33 = lean_ctor_get(x_25, 6); +lean_inc(x_33); +if (lean_is_exclusive(x_25)) { + lean_ctor_release(x_25, 0); + lean_ctor_release(x_25, 1); + lean_ctor_release(x_25, 2); + lean_ctor_release(x_25, 3); + lean_ctor_release(x_25, 4); + lean_ctor_release(x_25, 5); + lean_ctor_release(x_25, 6); + x_34 = x_25; +} else { + lean_dec_ref(x_25); + x_34 = lean_box(0); +} +lean_inc(x_26); +x_35 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_35, 0, x_26); +lean_ctor_set(x_35, 1, x_1); +x_36 = l_Queue_enqueue___rarg(x_35, x_32); +if (lean_is_scalar(x_34)) { + x_37 = lean_alloc_ctor(0, 7, 0); +} else { + x_37 = x_34; +} +lean_ctor_set(x_37, 0, x_27); +lean_ctor_set(x_37, 1, x_28); +lean_ctor_set(x_37, 2, x_29); +lean_ctor_set(x_37, 3, x_30); +lean_ctor_set(x_37, 4, x_31); +lean_ctor_set(x_37, 5, x_36); +lean_ctor_set(x_37, 6, x_33); +x_38 = lean_box(0); +x_39 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_39, 0, x_38); +lean_ctor_set(x_39, 1, x_37); +return x_39; +} +} +else +{ +uint8_t x_40; +x_40 = !lean_is_exclusive(x_3); +if (x_40 == 0) +{ +lean_object* x_41; lean_object* x_42; uint8_t x_43; +x_41 = lean_ctor_get(x_3, 1); +x_42 = lean_ctor_get(x_3, 0); +lean_dec(x_42); +x_43 = !lean_is_exclusive(x_41); +if (x_43 == 0) +{ +lean_object* x_44; lean_object* x_45; lean_object* x_46; +x_44 = lean_ctor_get(x_41, 1); +lean_dec(x_44); +x_45 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_45, 0, x_1); +lean_ctor_set(x_41, 1, x_45); +x_46 = lean_box(0); +lean_ctor_set(x_3, 0, x_46); +return x_3; +} +else +{ +lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_object* x_51; lean_object* x_52; lean_object* x_53; lean_object* x_54; lean_object* x_55; +x_47 = lean_ctor_get(x_41, 0); +x_48 = lean_ctor_get(x_41, 2); +x_49 = lean_ctor_get(x_41, 3); +x_50 = lean_ctor_get(x_41, 4); +x_51 = lean_ctor_get(x_41, 5); +x_52 = lean_ctor_get(x_41, 6); +lean_inc(x_52); +lean_inc(x_51); +lean_inc(x_50); +lean_inc(x_49); +lean_inc(x_48); +lean_inc(x_47); +lean_dec(x_41); +x_53 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_53, 0, x_1); +x_54 = lean_alloc_ctor(0, 7, 0); +lean_ctor_set(x_54, 0, x_47); +lean_ctor_set(x_54, 1, x_53); +lean_ctor_set(x_54, 2, x_48); +lean_ctor_set(x_54, 3, x_49); +lean_ctor_set(x_54, 4, x_50); +lean_ctor_set(x_54, 5, x_51); +lean_ctor_set(x_54, 6, x_52); +x_55 = lean_box(0); +lean_ctor_set(x_3, 1, x_54); +lean_ctor_set(x_3, 0, x_55); +return x_3; +} +} +else +{ +lean_object* x_56; lean_object* x_57; lean_object* x_58; lean_object* x_59; lean_object* x_60; lean_object* x_61; lean_object* x_62; lean_object* x_63; lean_object* x_64; lean_object* x_65; lean_object* x_66; lean_object* x_67; +x_56 = lean_ctor_get(x_3, 1); +lean_inc(x_56); +lean_dec(x_3); +x_57 = lean_ctor_get(x_56, 0); +lean_inc(x_57); +x_58 = lean_ctor_get(x_56, 2); +lean_inc(x_58); +x_59 = lean_ctor_get(x_56, 3); +lean_inc(x_59); +x_60 = lean_ctor_get(x_56, 4); +lean_inc(x_60); +x_61 = lean_ctor_get(x_56, 5); +lean_inc(x_61); +x_62 = lean_ctor_get(x_56, 6); +lean_inc(x_62); +if (lean_is_exclusive(x_56)) { + lean_ctor_release(x_56, 0); + lean_ctor_release(x_56, 1); + lean_ctor_release(x_56, 2); + lean_ctor_release(x_56, 3); + lean_ctor_release(x_56, 4); + lean_ctor_release(x_56, 5); + lean_ctor_release(x_56, 6); + x_63 = x_56; +} else { + lean_dec_ref(x_56); + x_63 = lean_box(0); +} +x_64 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_64, 0, x_1); +if (lean_is_scalar(x_63)) { + x_65 = lean_alloc_ctor(0, 7, 0); +} else { + x_65 = x_63; +} +lean_ctor_set(x_65, 0, x_57); +lean_ctor_set(x_65, 1, x_64); +lean_ctor_set(x_65, 2, x_58); +lean_ctor_set(x_65, 3, x_59); +lean_ctor_set(x_65, 4, x_60); +lean_ctor_set(x_65, 5, x_61); +lean_ctor_set(x_65, 6, x_62); +x_66 = lean_box(0); +x_67 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_67, 0, x_66); +lean_ctor_set(x_67, 1, x_65); +return x_67; +} +} +} +} +lean_object* l_Lean_TypeClass_wakeUp___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; +x_4 = l_Lean_TypeClass_wakeUp(x_1, x_2, x_3); +lean_dec(x_2); +return x_4; +} +} +lean_object* l_PersistentHashMap_findAtAux___main___at_Lean_TypeClass_newAnswer___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_6; uint8_t x_7; +x_6 = lean_array_get_size(x_1); +x_7 = lean_nat_dec_lt(x_4, x_6); +lean_dec(x_6); +if (x_7 == 0) +{ +lean_object* x_8; +lean_dec(x_4); +x_8 = lean_box(0); +return x_8; +} +else +{ +lean_object* x_9; uint8_t x_10; +x_9 = lean_array_fget(x_1, x_4); +x_10 = lean_expr_eqv(x_5, x_9); +lean_dec(x_9); +if (x_10 == 0) +{ +lean_object* x_11; lean_object* x_12; +x_11 = lean_unsigned_to_nat(1u); +x_12 = lean_nat_add(x_4, x_11); +lean_dec(x_4); +x_3 = lean_box(0); +x_4 = x_12; +goto _start; +} +else +{ +lean_object* x_14; lean_object* x_15; +x_14 = lean_array_fget(x_2, x_4); +lean_dec(x_4); +x_15 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_15, 0, x_14); +return x_15; +} +} +} +} +lean_object* l_PersistentHashMap_findAux___main___at_Lean_TypeClass_newAnswer___spec__2(lean_object* x_1, size_t x_2, lean_object* x_3) { +_start: +{ +if (lean_obj_tag(x_1) == 0) +{ +lean_object* x_4; size_t x_5; size_t x_6; size_t x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; +x_4 = lean_ctor_get(x_1, 0); +x_5 = 5; +x_6 = l_PersistentHashMap_insertAux___main___rarg___closed__2; +x_7 = x_2 & x_6; +x_8 = lean_usize_to_nat(x_7); +x_9 = lean_box(2); +x_10 = lean_array_get(x_9, x_4, x_8); +lean_dec(x_8); +switch (lean_obj_tag(x_10)) { +case 0: +{ +lean_object* x_11; lean_object* x_12; uint8_t x_13; +x_11 = lean_ctor_get(x_10, 0); +lean_inc(x_11); +x_12 = lean_ctor_get(x_10, 1); +lean_inc(x_12); +lean_dec(x_10); +x_13 = lean_expr_eqv(x_3, x_11); +lean_dec(x_11); +if (x_13 == 0) +{ +lean_object* x_14; +lean_dec(x_12); +x_14 = lean_box(0); +return x_14; +} +else +{ +lean_object* x_15; +x_15 = lean_alloc_ctor(1, 1, 0); +lean_ctor_set(x_15, 0, x_12); +return x_15; +} +} +case 1: +{ +lean_object* x_16; size_t x_17; lean_object* x_18; +x_16 = lean_ctor_get(x_10, 0); +lean_inc(x_16); +lean_dec(x_10); +x_17 = x_2 >> x_5; +x_18 = l_PersistentHashMap_findAux___main___at_Lean_TypeClass_newAnswer___spec__2(x_16, x_17, x_3); +lean_dec(x_16); +return x_18; +} +default: +{ +lean_object* x_19; +x_19 = lean_box(0); +return x_19; +} +} +} +else +{ +lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; +x_20 = lean_ctor_get(x_1, 0); +x_21 = lean_ctor_get(x_1, 1); +x_22 = lean_unsigned_to_nat(0u); +x_23 = l_PersistentHashMap_findAtAux___main___at_Lean_TypeClass_newAnswer___spec__3(x_20, x_21, lean_box(0), x_22, x_3); +return x_23; +} +} +} +lean_object* l_PersistentHashMap_find___at_Lean_TypeClass_newAnswer___spec__1(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; size_t x_4; lean_object* x_5; +x_3 = lean_ctor_get(x_1, 0); +x_4 = lean_expr_hash(x_2); +x_5 = l_PersistentHashMap_findAux___main___at_Lean_TypeClass_newAnswer___spec__2(x_3, x_4, x_2); +return x_5; +} +} +uint8_t l_Array_anyMAux___main___at_Lean_TypeClass_newAnswer___spec__4(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +lean_object* x_4; uint8_t x_5; +x_4 = lean_array_get_size(x_2); +x_5 = lean_nat_dec_lt(x_3, x_4); +lean_dec(x_4); +if (x_5 == 0) +{ +uint8_t x_6; +lean_dec(x_3); +x_6 = 0; +return x_6; +} +else +{ +lean_object* x_7; lean_object* x_8; lean_object* x_9; uint8_t x_10; +x_7 = lean_array_fget(x_2, x_3); +x_8 = lean_ctor_get(x_7, 1); +lean_inc(x_8); +lean_dec(x_7); +x_9 = lean_ctor_get(x_1, 1); +x_10 = lean_expr_eqv(x_8, x_9); +lean_dec(x_8); +if (x_10 == 0) +{ +lean_object* x_11; lean_object* x_12; +x_11 = lean_unsigned_to_nat(1u); +x_12 = lean_nat_add(x_3, x_11); +lean_dec(x_3); +x_3 = x_12; +goto _start; +} +else +{ +lean_dec(x_3); +return x_10; +} +} +} +} +lean_object* l_Array_mforAux___main___at_Lean_TypeClass_newAnswer___spec__5(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; uint8_t x_6; +x_5 = lean_array_get_size(x_2); +x_6 = lean_nat_dec_lt(x_3, x_5); +lean_dec(x_5); +if (x_6 == 0) +{ +uint8_t x_7; +lean_dec(x_3); +lean_dec(x_1); +x_7 = !lean_is_exclusive(x_4); +if (x_7 == 0) +{ +lean_object* x_8; lean_object* x_9; +x_8 = lean_ctor_get(x_4, 0); +lean_dec(x_8); +x_9 = lean_box(0); +lean_ctor_set(x_4, 0, x_9); +return x_4; +} +else +{ +lean_object* x_10; lean_object* x_11; lean_object* x_12; +x_10 = lean_ctor_get(x_4, 1); +lean_inc(x_10); +lean_dec(x_4); +x_11 = lean_box(0); +x_12 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_12, 0, x_11); +lean_ctor_set(x_12, 1, x_10); +return x_12; +} +} +else +{ +lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; +x_13 = lean_array_fget(x_2, x_3); +x_14 = lean_unsigned_to_nat(1u); +x_15 = lean_nat_add(x_3, x_14); +lean_dec(x_3); +lean_inc(x_1); +x_16 = l_Lean_TypeClass_wakeUp(x_1, x_13, x_4); +lean_dec(x_13); +if (lean_obj_tag(x_16) == 0) +{ +uint8_t x_17; +x_17 = !lean_is_exclusive(x_16); +if (x_17 == 0) +{ +lean_object* x_18; lean_object* x_19; +x_18 = lean_ctor_get(x_16, 0); +lean_dec(x_18); +x_19 = lean_box(0); +lean_ctor_set(x_16, 0, x_19); +x_3 = x_15; +x_4 = x_16; +goto _start; +} +else +{ +lean_object* x_21; lean_object* x_22; lean_object* x_23; +x_21 = lean_ctor_get(x_16, 1); +lean_inc(x_21); +lean_dec(x_16); +x_22 = lean_box(0); +x_23 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_23, 0, x_22); +lean_ctor_set(x_23, 1, x_21); +x_3 = x_15; +x_4 = x_23; +goto _start; +} +} +else +{ +uint8_t x_25; +lean_dec(x_15); +lean_dec(x_1); +x_25 = !lean_is_exclusive(x_16); +if (x_25 == 0) +{ +return x_16; +} +else +{ +lean_object* x_26; lean_object* x_27; lean_object* x_28; +x_26 = lean_ctor_get(x_16, 0); +x_27 = lean_ctor_get(x_16, 1); +lean_inc(x_27); +lean_inc(x_26); +lean_dec(x_16); +x_28 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_28, 0, x_26); +lean_ctor_set(x_28, 1, x_27); +return x_28; +} +} +} +} +} +lean_object* _init_l_Lean_TypeClass_newAnswer___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("[newAnswer]: "); +return x_1; +} +} +lean_object* _init_l_Lean_TypeClass_newAnswer___closed__2() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string(" not found in table!"); +return x_1; +} +} +lean_object* l_Lean_TypeClass_newAnswer(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +uint8_t x_4; +x_4 = !lean_is_exclusive(x_3); +if (x_4 == 0) +{ +lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; +x_5 = lean_ctor_get(x_3, 1); +x_6 = lean_ctor_get(x_3, 0); +lean_dec(x_6); +x_7 = lean_ctor_get(x_5, 0); +lean_inc(x_7); +x_8 = lean_ctor_get(x_5, 1); +lean_inc(x_8); +x_9 = lean_ctor_get(x_5, 2); +lean_inc(x_9); +x_10 = lean_ctor_get(x_5, 3); +lean_inc(x_10); +x_11 = lean_ctor_get(x_5, 4); +lean_inc(x_11); +x_12 = lean_ctor_get(x_5, 5); +lean_inc(x_12); +x_13 = lean_ctor_get(x_5, 6); +lean_inc(x_13); +x_14 = l_PersistentHashMap_find___at_Lean_TypeClass_newAnswer___spec__1(x_13, x_1); +if (lean_obj_tag(x_14) == 0) +{ +lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_2); +x_15 = lean_expr_dbg_to_string(x_1); +lean_dec(x_1); +x_16 = l_Lean_TypeClass_newAnswer___closed__1; +x_17 = lean_string_append(x_16, x_15); +lean_dec(x_15); +x_18 = l_Lean_TypeClass_newAnswer___closed__2; +x_19 = lean_string_append(x_17, x_18); +lean_ctor_set_tag(x_3, 1); +lean_ctor_set(x_3, 0, x_19); +return x_3; +} +else +{ +lean_object* x_20; uint8_t x_21; +x_20 = lean_ctor_get(x_14, 0); +lean_inc(x_20); +lean_dec(x_14); +x_21 = !lean_is_exclusive(x_20); +if (x_21 == 0) +{ +lean_object* x_22; lean_object* x_23; lean_object* x_24; uint8_t x_25; +x_22 = lean_ctor_get(x_20, 0); +x_23 = lean_ctor_get(x_20, 1); +x_24 = lean_unsigned_to_nat(0u); +x_25 = l_Array_anyMAux___main___at_Lean_TypeClass_newAnswer___spec__4(x_2, x_23, x_24); +if (x_25 == 0) +{ +uint8_t x_26; +x_26 = !lean_is_exclusive(x_5); +if (x_26 == 0) +{ +lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; +x_27 = lean_ctor_get(x_5, 6); +lean_dec(x_27); +x_28 = lean_ctor_get(x_5, 5); +lean_dec(x_28); +x_29 = lean_ctor_get(x_5, 4); +lean_dec(x_29); +x_30 = lean_ctor_get(x_5, 3); +lean_dec(x_30); +x_31 = lean_ctor_get(x_5, 2); +lean_dec(x_31); +x_32 = lean_ctor_get(x_5, 1); +lean_dec(x_32); +x_33 = lean_ctor_get(x_5, 0); +lean_dec(x_33); +lean_inc(x_2); +x_34 = lean_array_push(x_23, x_2); +lean_inc(x_22); +lean_ctor_set(x_20, 1, x_34); +x_35 = l_PersistentHashMap_insert___at_Lean_TypeClass_newSubgoal___spec__2(x_13, x_1, x_20); +lean_ctor_set(x_5, 6, x_35); +x_36 = lean_box(0); +lean_ctor_set(x_3, 0, x_36); +x_37 = l_Array_mforAux___main___at_Lean_TypeClass_newAnswer___spec__5(x_2, x_22, x_24, x_3); +lean_dec(x_22); +return x_37; +} +else +{ +lean_object* x_38; lean_object* x_39; lean_object* x_40; lean_object* x_41; lean_object* x_42; +lean_dec(x_5); +lean_inc(x_2); +x_38 = lean_array_push(x_23, x_2); +lean_inc(x_22); +lean_ctor_set(x_20, 1, x_38); +x_39 = l_PersistentHashMap_insert___at_Lean_TypeClass_newSubgoal___spec__2(x_13, x_1, x_20); +x_40 = lean_alloc_ctor(0, 7, 0); +lean_ctor_set(x_40, 0, x_7); +lean_ctor_set(x_40, 1, x_8); +lean_ctor_set(x_40, 2, x_9); +lean_ctor_set(x_40, 3, x_10); +lean_ctor_set(x_40, 4, x_11); +lean_ctor_set(x_40, 5, x_12); +lean_ctor_set(x_40, 6, x_39); +x_41 = lean_box(0); +lean_ctor_set(x_3, 1, x_40); +lean_ctor_set(x_3, 0, x_41); +x_42 = l_Array_mforAux___main___at_Lean_TypeClass_newAnswer___spec__5(x_2, x_22, x_24, x_3); +lean_dec(x_22); +return x_42; +} +} +else +{ +lean_object* x_43; +lean_free_object(x_20); +lean_dec(x_23); +lean_dec(x_22); +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_2); +lean_dec(x_1); +x_43 = lean_box(0); +lean_ctor_set(x_3, 0, x_43); +return x_3; +} +} +else +{ +lean_object* x_44; lean_object* x_45; lean_object* x_46; uint8_t x_47; +x_44 = lean_ctor_get(x_20, 0); +x_45 = lean_ctor_get(x_20, 1); +lean_inc(x_45); +lean_inc(x_44); +lean_dec(x_20); +x_46 = lean_unsigned_to_nat(0u); +x_47 = l_Array_anyMAux___main___at_Lean_TypeClass_newAnswer___spec__4(x_2, x_45, x_46); +if (x_47 == 0) +{ +lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_object* x_51; lean_object* x_52; lean_object* x_53; lean_object* x_54; +if (lean_is_exclusive(x_5)) { + lean_ctor_release(x_5, 0); + lean_ctor_release(x_5, 1); + lean_ctor_release(x_5, 2); + lean_ctor_release(x_5, 3); + lean_ctor_release(x_5, 4); + lean_ctor_release(x_5, 5); + lean_ctor_release(x_5, 6); + x_48 = x_5; +} else { + lean_dec_ref(x_5); + x_48 = lean_box(0); +} +lean_inc(x_2); +x_49 = lean_array_push(x_45, x_2); +lean_inc(x_44); +x_50 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_50, 0, x_44); +lean_ctor_set(x_50, 1, x_49); +x_51 = l_PersistentHashMap_insert___at_Lean_TypeClass_newSubgoal___spec__2(x_13, x_1, x_50); +if (lean_is_scalar(x_48)) { + x_52 = lean_alloc_ctor(0, 7, 0); +} else { + x_52 = x_48; +} +lean_ctor_set(x_52, 0, x_7); +lean_ctor_set(x_52, 1, x_8); +lean_ctor_set(x_52, 2, x_9); +lean_ctor_set(x_52, 3, x_10); +lean_ctor_set(x_52, 4, x_11); +lean_ctor_set(x_52, 5, x_12); +lean_ctor_set(x_52, 6, x_51); +x_53 = lean_box(0); +lean_ctor_set(x_3, 1, x_52); +lean_ctor_set(x_3, 0, x_53); +x_54 = l_Array_mforAux___main___at_Lean_TypeClass_newAnswer___spec__5(x_2, x_44, x_46, x_3); +lean_dec(x_44); +return x_54; +} +else +{ +lean_object* x_55; +lean_dec(x_45); +lean_dec(x_44); +lean_dec(x_13); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_2); +lean_dec(x_1); +x_55 = lean_box(0); +lean_ctor_set(x_3, 0, x_55); +return x_3; +} +} +} +} +else +{ +lean_object* x_56; lean_object* x_57; lean_object* x_58; lean_object* x_59; lean_object* x_60; lean_object* x_61; lean_object* x_62; lean_object* x_63; lean_object* x_64; +x_56 = lean_ctor_get(x_3, 1); +lean_inc(x_56); +lean_dec(x_3); +x_57 = lean_ctor_get(x_56, 0); +lean_inc(x_57); +x_58 = lean_ctor_get(x_56, 1); +lean_inc(x_58); +x_59 = lean_ctor_get(x_56, 2); +lean_inc(x_59); +x_60 = lean_ctor_get(x_56, 3); +lean_inc(x_60); +x_61 = lean_ctor_get(x_56, 4); +lean_inc(x_61); +x_62 = lean_ctor_get(x_56, 5); +lean_inc(x_62); +x_63 = lean_ctor_get(x_56, 6); +lean_inc(x_63); +x_64 = l_PersistentHashMap_find___at_Lean_TypeClass_newAnswer___spec__1(x_63, x_1); +if (lean_obj_tag(x_64) == 0) +{ +lean_object* x_65; lean_object* x_66; lean_object* x_67; lean_object* x_68; lean_object* x_69; lean_object* x_70; +lean_dec(x_63); +lean_dec(x_62); +lean_dec(x_61); +lean_dec(x_60); +lean_dec(x_59); +lean_dec(x_58); +lean_dec(x_57); +lean_dec(x_2); +x_65 = lean_expr_dbg_to_string(x_1); +lean_dec(x_1); +x_66 = l_Lean_TypeClass_newAnswer___closed__1; +x_67 = lean_string_append(x_66, x_65); +lean_dec(x_65); +x_68 = l_Lean_TypeClass_newAnswer___closed__2; +x_69 = lean_string_append(x_67, x_68); +x_70 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_70, 0, x_69); +lean_ctor_set(x_70, 1, x_56); +return x_70; +} +else +{ +lean_object* x_71; lean_object* x_72; lean_object* x_73; lean_object* x_74; lean_object* x_75; uint8_t x_76; +x_71 = lean_ctor_get(x_64, 0); +lean_inc(x_71); +lean_dec(x_64); +x_72 = lean_ctor_get(x_71, 0); +lean_inc(x_72); +x_73 = lean_ctor_get(x_71, 1); +lean_inc(x_73); +if (lean_is_exclusive(x_71)) { + lean_ctor_release(x_71, 0); + lean_ctor_release(x_71, 1); + x_74 = x_71; +} else { + lean_dec_ref(x_71); + x_74 = lean_box(0); +} +x_75 = lean_unsigned_to_nat(0u); +x_76 = l_Array_anyMAux___main___at_Lean_TypeClass_newAnswer___spec__4(x_2, x_73, x_75); +if (x_76 == 0) +{ +lean_object* x_77; lean_object* x_78; lean_object* x_79; lean_object* x_80; lean_object* x_81; lean_object* x_82; lean_object* x_83; lean_object* x_84; +if (lean_is_exclusive(x_56)) { + lean_ctor_release(x_56, 0); + lean_ctor_release(x_56, 1); + lean_ctor_release(x_56, 2); + lean_ctor_release(x_56, 3); + lean_ctor_release(x_56, 4); + lean_ctor_release(x_56, 5); + lean_ctor_release(x_56, 6); + x_77 = x_56; +} else { + lean_dec_ref(x_56); + x_77 = lean_box(0); +} +lean_inc(x_2); +x_78 = lean_array_push(x_73, x_2); +lean_inc(x_72); +if (lean_is_scalar(x_74)) { + x_79 = lean_alloc_ctor(0, 2, 0); +} else { + x_79 = x_74; +} +lean_ctor_set(x_79, 0, x_72); +lean_ctor_set(x_79, 1, x_78); +x_80 = l_PersistentHashMap_insert___at_Lean_TypeClass_newSubgoal___spec__2(x_63, x_1, x_79); +if (lean_is_scalar(x_77)) { + x_81 = lean_alloc_ctor(0, 7, 0); +} else { + x_81 = x_77; +} +lean_ctor_set(x_81, 0, x_57); +lean_ctor_set(x_81, 1, x_58); +lean_ctor_set(x_81, 2, x_59); +lean_ctor_set(x_81, 3, x_60); +lean_ctor_set(x_81, 4, x_61); +lean_ctor_set(x_81, 5, x_62); +lean_ctor_set(x_81, 6, x_80); +x_82 = lean_box(0); +x_83 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_83, 0, x_82); +lean_ctor_set(x_83, 1, x_81); +x_84 = l_Array_mforAux___main___at_Lean_TypeClass_newAnswer___spec__5(x_2, x_72, x_75, x_83); +lean_dec(x_72); +return x_84; +} +else +{ +lean_object* x_85; lean_object* x_86; +lean_dec(x_74); +lean_dec(x_73); +lean_dec(x_72); +lean_dec(x_63); +lean_dec(x_62); +lean_dec(x_61); +lean_dec(x_60); +lean_dec(x_59); +lean_dec(x_58); +lean_dec(x_57); +lean_dec(x_2); +lean_dec(x_1); +x_85 = lean_box(0); +x_86 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_86, 0, x_85); +lean_ctor_set(x_86, 1, x_56); +return x_86; +} +} +} +} +} +lean_object* l_PersistentHashMap_findAtAux___main___at_Lean_TypeClass_newAnswer___spec__3___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { +_start: +{ +lean_object* x_6; +x_6 = l_PersistentHashMap_findAtAux___main___at_Lean_TypeClass_newAnswer___spec__3(x_1, x_2, x_3, x_4, x_5); +lean_dec(x_5); +lean_dec(x_2); +lean_dec(x_1); +return x_6; +} +} +lean_object* l_PersistentHashMap_findAux___main___at_Lean_TypeClass_newAnswer___spec__2___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +size_t x_4; lean_object* x_5; +x_4 = lean_unbox_usize(x_2); +lean_dec(x_2); +x_5 = l_PersistentHashMap_findAux___main___at_Lean_TypeClass_newAnswer___spec__2(x_1, x_4, x_3); +lean_dec(x_3); +lean_dec(x_1); +return x_5; +} +} +lean_object* l_PersistentHashMap_find___at_Lean_TypeClass_newAnswer___spec__1___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = l_PersistentHashMap_find___at_Lean_TypeClass_newAnswer___spec__1(x_1, x_2); +lean_dec(x_2); +lean_dec(x_1); +return x_3; +} +} +lean_object* l_Array_anyMAux___main___at_Lean_TypeClass_newAnswer___spec__4___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +uint8_t x_4; lean_object* x_5; +x_4 = l_Array_anyMAux___main___at_Lean_TypeClass_newAnswer___spec__4(x_1, x_2, x_3); +lean_dec(x_2); +lean_dec(x_1); +x_5 = lean_box(x_4); +return x_5; +} +} +lean_object* l_Array_mforAux___main___at_Lean_TypeClass_newAnswer___spec__5___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; +x_5 = l_Array_mforAux___main___at_Lean_TypeClass_newAnswer___spec__5(x_1, x_2, x_3, x_4); +lean_dec(x_2); +return x_5; +} +} +lean_object* l_Array_back___at_Lean_TypeClass_consume___spec__1(lean_object* x_1) { +_start: +{ +lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; +x_2 = lean_array_get_size(x_1); +x_3 = lean_unsigned_to_nat(1u); +x_4 = lean_nat_sub(x_2, x_3); +lean_dec(x_2); +x_5 = l_Lean_TypeClass_ConsumerNode_Inhabited; +x_6 = lean_array_get(x_5, x_1, x_4); +lean_dec(x_4); +return x_6; +} +} +lean_object* l_Array_miterateAux___main___at_Lean_TypeClass_consume___spec__2(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { +_start: +{ +lean_object* x_6; uint8_t x_7; +x_6 = lean_array_get_size(x_3); +x_7 = lean_nat_dec_lt(x_4, x_6); +lean_dec(x_6); +if (x_7 == 0) +{ +lean_dec(x_4); +lean_dec(x_1); +return x_5; +} +else +{ +lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; +x_8 = lean_array_fget(x_3, x_4); +lean_inc(x_1); +x_9 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_9, 0, x_1); +lean_ctor_set(x_9, 1, x_8); +x_10 = l_Queue_enqueue___rarg(x_9, x_5); +x_11 = lean_unsigned_to_nat(1u); +x_12 = lean_nat_add(x_4, x_11); +lean_dec(x_4); +x_4 = x_12; +x_5 = x_10; +goto _start; +} +} +} +lean_object* _init_l_Lean_TypeClass_consume___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("answer "); +return x_1; +} +} +lean_object* _init_l_Lean_TypeClass_consume___closed__2() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string(" not fully instantiated"); +return x_1; +} +} +lean_object* l_Lean_TypeClass_consume(lean_object* x_1) { +_start: +{ +uint8_t x_2; +x_2 = !lean_is_exclusive(x_1); +if (x_2 == 0) +{ +lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; +x_3 = lean_ctor_get(x_1, 1); +x_4 = lean_ctor_get(x_1, 0); +lean_dec(x_4); +x_5 = lean_ctor_get(x_3, 0); +lean_inc(x_5); +x_6 = lean_ctor_get(x_3, 1); +lean_inc(x_6); +x_7 = lean_ctor_get(x_3, 2); +lean_inc(x_7); +x_8 = lean_ctor_get(x_3, 3); +lean_inc(x_8); +x_9 = lean_ctor_get(x_3, 4); +lean_inc(x_9); +x_10 = lean_ctor_get(x_3, 5); +lean_inc(x_10); +x_11 = lean_ctor_get(x_3, 6); +lean_inc(x_11); +x_12 = l_Array_back___at_Lean_TypeClass_consume___spec__1(x_9); +x_13 = lean_ctor_get(x_12, 1); +lean_inc(x_13); +if (lean_obj_tag(x_13) == 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; lean_object* x_20; lean_object* x_21; uint8_t x_22; +x_14 = lean_ctor_get(x_12, 0); +lean_inc(x_14); +lean_dec(x_12); +x_15 = lean_ctor_get(x_14, 1); +lean_inc(x_15); +x_16 = lean_ctor_get(x_14, 2); +lean_inc(x_16); +x_17 = lean_ctor_get(x_16, 0); +lean_inc(x_17); +lean_inc(x_15); +x_18 = l_Lean_TypeClass_Context_eInstantiate___main(x_15, x_17); +x_19 = lean_ctor_get(x_16, 1); +lean_inc(x_19); +lean_dec(x_16); +x_20 = l_Lean_TypeClass_Context_eInstantiate___main(x_15, x_19); +lean_inc(x_20); +lean_inc(x_18); +x_21 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_21, 0, x_18); +lean_ctor_set(x_21, 1, x_20); +lean_inc(x_18); +x_22 = l_Lean_TypeClass_Context_eHasTmpMVar(x_18); +if (x_22 == 0) +{ +uint8_t x_23; +lean_inc(x_20); +x_23 = l_Lean_TypeClass_Context_eHasTmpMVar(x_20); +if (x_23 == 0) +{ +uint8_t x_24; +lean_dec(x_20); +lean_dec(x_18); +x_24 = !lean_is_exclusive(x_3); +if (x_24 == 0) +{ +lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; +x_25 = lean_ctor_get(x_3, 6); +lean_dec(x_25); +x_26 = lean_ctor_get(x_3, 5); +lean_dec(x_26); +x_27 = lean_ctor_get(x_3, 4); +lean_dec(x_27); +x_28 = lean_ctor_get(x_3, 3); +lean_dec(x_28); +x_29 = lean_ctor_get(x_3, 2); +lean_dec(x_29); +x_30 = lean_ctor_get(x_3, 1); +lean_dec(x_30); +x_31 = lean_ctor_get(x_3, 0); +lean_dec(x_31); +x_32 = lean_array_pop(x_9); +lean_ctor_set(x_3, 4, x_32); +x_33 = lean_box(0); +lean_ctor_set(x_1, 0, x_33); +x_34 = lean_ctor_get(x_14, 0); +lean_inc(x_34); +lean_dec(x_14); +x_35 = l_Lean_TypeClass_newAnswer(x_34, x_21, x_1); +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_dec(x_3); +x_36 = lean_array_pop(x_9); +x_37 = lean_alloc_ctor(0, 7, 0); +lean_ctor_set(x_37, 0, x_5); +lean_ctor_set(x_37, 1, x_6); +lean_ctor_set(x_37, 2, x_7); +lean_ctor_set(x_37, 3, x_8); +lean_ctor_set(x_37, 4, x_36); +lean_ctor_set(x_37, 5, x_10); +lean_ctor_set(x_37, 6, x_11); +x_38 = lean_box(0); +lean_ctor_set(x_1, 1, x_37); +lean_ctor_set(x_1, 0, x_38); +x_39 = lean_ctor_get(x_14, 0); +lean_inc(x_39); +lean_dec(x_14); +x_40 = l_Lean_TypeClass_newAnswer(x_39, x_21, x_1); +return x_40; +} +} +else +{ +lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_object* x_51; lean_object* x_52; lean_object* x_53; +lean_dec(x_21); +lean_dec(x_14); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +x_41 = lean_expr_dbg_to_string(x_18); +lean_dec(x_18); +x_42 = l_Lean_TypeClass_TypedExpr_HasToString___closed__1; +x_43 = lean_string_append(x_42, x_41); +lean_dec(x_41); +x_44 = l_List_reprAux___main___rarg___closed__1; +x_45 = lean_string_append(x_43, x_44); +x_46 = lean_expr_dbg_to_string(x_20); +lean_dec(x_20); +x_47 = lean_string_append(x_45, x_46); +lean_dec(x_46); +x_48 = l_Option_HasRepr___rarg___closed__3; +x_49 = lean_string_append(x_47, x_48); +x_50 = l_Lean_TypeClass_consume___closed__1; +x_51 = lean_string_append(x_50, x_49); +lean_dec(x_49); +x_52 = l_Lean_TypeClass_consume___closed__2; +x_53 = lean_string_append(x_51, x_52); +lean_ctor_set_tag(x_1, 1); +lean_ctor_set(x_1, 0, x_53); +return x_1; +} +} +else +{ +lean_object* x_54; lean_object* x_55; lean_object* x_56; lean_object* x_57; lean_object* x_58; lean_object* x_59; lean_object* x_60; lean_object* x_61; lean_object* x_62; lean_object* x_63; lean_object* x_64; lean_object* x_65; lean_object* x_66; +lean_dec(x_21); +lean_dec(x_14); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +x_54 = lean_expr_dbg_to_string(x_18); +lean_dec(x_18); +x_55 = l_Lean_TypeClass_TypedExpr_HasToString___closed__1; +x_56 = lean_string_append(x_55, x_54); +lean_dec(x_54); +x_57 = l_List_reprAux___main___rarg___closed__1; +x_58 = lean_string_append(x_56, x_57); +x_59 = lean_expr_dbg_to_string(x_20); +lean_dec(x_20); +x_60 = lean_string_append(x_58, x_59); +lean_dec(x_59); +x_61 = l_Option_HasRepr___rarg___closed__3; +x_62 = lean_string_append(x_60, x_61); +x_63 = l_Lean_TypeClass_consume___closed__1; +x_64 = lean_string_append(x_63, x_62); +lean_dec(x_62); +x_65 = l_Lean_TypeClass_consume___closed__2; +x_66 = lean_string_append(x_64, x_65); +lean_ctor_set_tag(x_1, 1); +lean_ctor_set(x_1, 0, x_66); +return x_1; +} +} +else +{ +lean_object* x_67; lean_object* x_68; lean_object* x_69; lean_object* x_70; lean_object* x_71; lean_object* x_72; lean_object* x_73; lean_object* x_74; +x_67 = lean_ctor_get(x_13, 0); +lean_inc(x_67); +lean_dec(x_13); +x_68 = lean_ctor_get(x_12, 0); +lean_inc(x_68); +x_69 = lean_ctor_get(x_68, 1); +lean_inc(x_69); +lean_dec(x_68); +lean_inc(x_69); +x_70 = l_Lean_TypeClass_Context_eInfer(x_69, x_67); +lean_inc(x_69); +x_71 = l_Lean_TypeClass_Context_eInstantiate___main(x_69, x_70); +x_72 = l_Lean_TypeClass_Context__u03b1Norm(x_71); +lean_inc(x_12); +x_73 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_73, 0, x_12); +x_74 = l_PersistentHashMap_find___at_Lean_TypeClass_newAnswer___spec__1(x_11, x_72); +if (lean_obj_tag(x_74) == 0) +{ +lean_object* x_75; lean_object* x_76; +lean_dec(x_72); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_10); +lean_dec(x_9); +lean_dec(x_8); +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +x_75 = lean_box(0); +lean_ctor_set(x_1, 0, x_75); +x_76 = l_Lean_TypeClass_newSubgoal(x_73, x_69, x_67, x_1); +if (lean_obj_tag(x_76) == 0) +{ +uint8_t x_77; +x_77 = !lean_is_exclusive(x_76); +if (x_77 == 0) +{ +lean_object* x_78; lean_object* x_79; uint8_t x_80; +x_78 = lean_ctor_get(x_76, 1); +x_79 = lean_ctor_get(x_76, 0); +lean_dec(x_79); +x_80 = !lean_is_exclusive(x_78); +if (x_80 == 0) +{ +lean_object* x_81; lean_object* x_82; +x_81 = lean_ctor_get(x_78, 4); +x_82 = lean_array_pop(x_81); +lean_ctor_set(x_78, 4, x_82); +lean_ctor_set(x_76, 0, x_75); +return x_76; +} +else +{ +lean_object* x_83; lean_object* x_84; lean_object* x_85; lean_object* x_86; lean_object* x_87; lean_object* x_88; lean_object* x_89; lean_object* x_90; lean_object* x_91; +x_83 = lean_ctor_get(x_78, 0); +x_84 = lean_ctor_get(x_78, 1); +x_85 = lean_ctor_get(x_78, 2); +x_86 = lean_ctor_get(x_78, 3); +x_87 = lean_ctor_get(x_78, 4); +x_88 = lean_ctor_get(x_78, 5); +x_89 = lean_ctor_get(x_78, 6); +lean_inc(x_89); +lean_inc(x_88); +lean_inc(x_87); +lean_inc(x_86); +lean_inc(x_85); +lean_inc(x_84); +lean_inc(x_83); +lean_dec(x_78); +x_90 = lean_array_pop(x_87); +x_91 = lean_alloc_ctor(0, 7, 0); +lean_ctor_set(x_91, 0, x_83); +lean_ctor_set(x_91, 1, x_84); +lean_ctor_set(x_91, 2, x_85); +lean_ctor_set(x_91, 3, x_86); +lean_ctor_set(x_91, 4, x_90); +lean_ctor_set(x_91, 5, x_88); +lean_ctor_set(x_91, 6, x_89); +lean_ctor_set(x_76, 1, x_91); +lean_ctor_set(x_76, 0, x_75); +return x_76; +} +} +else +{ +lean_object* x_92; lean_object* x_93; lean_object* x_94; lean_object* x_95; lean_object* x_96; lean_object* x_97; lean_object* x_98; lean_object* x_99; lean_object* x_100; lean_object* x_101; lean_object* x_102; lean_object* x_103; +x_92 = lean_ctor_get(x_76, 1); +lean_inc(x_92); +lean_dec(x_76); +x_93 = lean_ctor_get(x_92, 0); +lean_inc(x_93); +x_94 = lean_ctor_get(x_92, 1); +lean_inc(x_94); +x_95 = lean_ctor_get(x_92, 2); +lean_inc(x_95); +x_96 = lean_ctor_get(x_92, 3); +lean_inc(x_96); +x_97 = lean_ctor_get(x_92, 4); +lean_inc(x_97); +x_98 = lean_ctor_get(x_92, 5); +lean_inc(x_98); +x_99 = lean_ctor_get(x_92, 6); +lean_inc(x_99); +if (lean_is_exclusive(x_92)) { + lean_ctor_release(x_92, 0); + lean_ctor_release(x_92, 1); + lean_ctor_release(x_92, 2); + lean_ctor_release(x_92, 3); + lean_ctor_release(x_92, 4); + lean_ctor_release(x_92, 5); + lean_ctor_release(x_92, 6); + x_100 = x_92; +} else { + lean_dec_ref(x_92); + x_100 = lean_box(0); +} +x_101 = lean_array_pop(x_97); +if (lean_is_scalar(x_100)) { + x_102 = lean_alloc_ctor(0, 7, 0); +} else { + x_102 = x_100; +} +lean_ctor_set(x_102, 0, x_93); +lean_ctor_set(x_102, 1, x_94); +lean_ctor_set(x_102, 2, x_95); +lean_ctor_set(x_102, 3, x_96); +lean_ctor_set(x_102, 4, x_101); +lean_ctor_set(x_102, 5, x_98); +lean_ctor_set(x_102, 6, x_99); +x_103 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_103, 0, x_75); +lean_ctor_set(x_103, 1, x_102); +return x_103; +} +} +else +{ +uint8_t x_104; +x_104 = !lean_is_exclusive(x_76); +if (x_104 == 0) +{ +return x_76; +} +else +{ +lean_object* x_105; lean_object* x_106; lean_object* x_107; +x_105 = lean_ctor_get(x_76, 0); +x_106 = lean_ctor_get(x_76, 1); +lean_inc(x_106); +lean_inc(x_105); +lean_dec(x_76); +x_107 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_107, 0, x_105); +lean_ctor_set(x_107, 1, x_106); +return x_107; +} +} +} +else +{ +uint8_t x_108; +lean_dec(x_69); +lean_dec(x_67); +x_108 = !lean_is_exclusive(x_3); +if (x_108 == 0) +{ +lean_object* x_109; lean_object* x_110; lean_object* x_111; lean_object* x_112; lean_object* x_113; lean_object* x_114; lean_object* x_115; lean_object* x_116; lean_object* x_117; lean_object* x_118; lean_object* x_119; lean_object* x_120; lean_object* x_121; uint8_t x_122; +x_109 = lean_ctor_get(x_3, 6); +lean_dec(x_109); +x_110 = lean_ctor_get(x_3, 5); +lean_dec(x_110); +x_111 = lean_ctor_get(x_3, 4); +lean_dec(x_111); +x_112 = lean_ctor_get(x_3, 3); +lean_dec(x_112); +x_113 = lean_ctor_get(x_3, 2); +lean_dec(x_113); +x_114 = lean_ctor_get(x_3, 1); +lean_dec(x_114); +x_115 = lean_ctor_get(x_3, 0); +lean_dec(x_115); +x_116 = lean_ctor_get(x_74, 0); +lean_inc(x_116); +lean_dec(x_74); +x_117 = lean_array_pop(x_9); +x_118 = lean_ctor_get(x_116, 0); +lean_inc(x_118); +x_119 = lean_ctor_get(x_116, 1); +lean_inc(x_119); +x_120 = lean_unsigned_to_nat(0u); +x_121 = l_Array_miterateAux___main___at_Lean_TypeClass_consume___spec__2(x_12, x_116, x_119, x_120, x_10); +x_122 = !lean_is_exclusive(x_116); +if (x_122 == 0) +{ +lean_object* x_123; lean_object* x_124; lean_object* x_125; lean_object* x_126; lean_object* x_127; +x_123 = lean_ctor_get(x_116, 1); +lean_dec(x_123); +x_124 = lean_ctor_get(x_116, 0); +lean_dec(x_124); +x_125 = lean_array_push(x_118, x_73); +lean_ctor_set(x_116, 0, x_125); +x_126 = l_PersistentHashMap_insert___at_Lean_TypeClass_newSubgoal___spec__2(x_11, x_72, x_116); +lean_ctor_set(x_3, 6, x_126); +lean_ctor_set(x_3, 5, x_121); +lean_ctor_set(x_3, 4, x_117); +x_127 = lean_box(0); +lean_ctor_set(x_1, 0, x_127); +return x_1; +} +else +{ +lean_object* x_128; lean_object* x_129; lean_object* x_130; lean_object* x_131; +lean_dec(x_116); +x_128 = lean_array_push(x_118, x_73); +x_129 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_129, 0, x_128); +lean_ctor_set(x_129, 1, x_119); +x_130 = l_PersistentHashMap_insert___at_Lean_TypeClass_newSubgoal___spec__2(x_11, x_72, x_129); +lean_ctor_set(x_3, 6, x_130); +lean_ctor_set(x_3, 5, x_121); +lean_ctor_set(x_3, 4, x_117); +x_131 = lean_box(0); +lean_ctor_set(x_1, 0, x_131); +return x_1; +} +} +else +{ +lean_object* x_132; lean_object* x_133; lean_object* x_134; lean_object* x_135; lean_object* x_136; lean_object* x_137; lean_object* x_138; lean_object* x_139; lean_object* x_140; lean_object* x_141; lean_object* x_142; lean_object* x_143; +lean_dec(x_3); +x_132 = lean_ctor_get(x_74, 0); +lean_inc(x_132); +lean_dec(x_74); +x_133 = lean_array_pop(x_9); +x_134 = lean_ctor_get(x_132, 0); +lean_inc(x_134); +x_135 = lean_ctor_get(x_132, 1); +lean_inc(x_135); +x_136 = lean_unsigned_to_nat(0u); +x_137 = l_Array_miterateAux___main___at_Lean_TypeClass_consume___spec__2(x_12, x_132, x_135, x_136, x_10); +if (lean_is_exclusive(x_132)) { + lean_ctor_release(x_132, 0); + lean_ctor_release(x_132, 1); + x_138 = x_132; +} else { + lean_dec_ref(x_132); + x_138 = lean_box(0); +} +x_139 = lean_array_push(x_134, x_73); +if (lean_is_scalar(x_138)) { + x_140 = lean_alloc_ctor(0, 2, 0); +} else { + x_140 = x_138; +} +lean_ctor_set(x_140, 0, x_139); +lean_ctor_set(x_140, 1, x_135); +x_141 = l_PersistentHashMap_insert___at_Lean_TypeClass_newSubgoal___spec__2(x_11, x_72, x_140); +x_142 = lean_alloc_ctor(0, 7, 0); +lean_ctor_set(x_142, 0, x_5); +lean_ctor_set(x_142, 1, x_6); +lean_ctor_set(x_142, 2, x_7); +lean_ctor_set(x_142, 3, x_8); +lean_ctor_set(x_142, 4, x_133); +lean_ctor_set(x_142, 5, x_137); +lean_ctor_set(x_142, 6, x_141); +x_143 = lean_box(0); +lean_ctor_set(x_1, 1, x_142); +lean_ctor_set(x_1, 0, x_143); +return x_1; +} +} +} +} +else +{ +lean_object* x_144; lean_object* x_145; lean_object* x_146; lean_object* x_147; lean_object* x_148; lean_object* x_149; lean_object* x_150; lean_object* x_151; lean_object* x_152; lean_object* x_153; +x_144 = lean_ctor_get(x_1, 1); +lean_inc(x_144); +lean_dec(x_1); +x_145 = lean_ctor_get(x_144, 0); +lean_inc(x_145); +x_146 = lean_ctor_get(x_144, 1); +lean_inc(x_146); +x_147 = lean_ctor_get(x_144, 2); +lean_inc(x_147); +x_148 = lean_ctor_get(x_144, 3); +lean_inc(x_148); +x_149 = lean_ctor_get(x_144, 4); +lean_inc(x_149); +x_150 = lean_ctor_get(x_144, 5); +lean_inc(x_150); +x_151 = lean_ctor_get(x_144, 6); +lean_inc(x_151); +x_152 = l_Array_back___at_Lean_TypeClass_consume___spec__1(x_149); +x_153 = lean_ctor_get(x_152, 1); +lean_inc(x_153); +if (lean_obj_tag(x_153) == 0) +{ +lean_object* x_154; lean_object* x_155; lean_object* x_156; lean_object* x_157; lean_object* x_158; lean_object* x_159; lean_object* x_160; lean_object* x_161; uint8_t x_162; +x_154 = lean_ctor_get(x_152, 0); +lean_inc(x_154); +lean_dec(x_152); +x_155 = lean_ctor_get(x_154, 1); +lean_inc(x_155); +x_156 = lean_ctor_get(x_154, 2); +lean_inc(x_156); +x_157 = lean_ctor_get(x_156, 0); +lean_inc(x_157); +lean_inc(x_155); +x_158 = l_Lean_TypeClass_Context_eInstantiate___main(x_155, x_157); +x_159 = lean_ctor_get(x_156, 1); +lean_inc(x_159); +lean_dec(x_156); +x_160 = l_Lean_TypeClass_Context_eInstantiate___main(x_155, x_159); +lean_inc(x_160); +lean_inc(x_158); +x_161 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_161, 0, x_158); +lean_ctor_set(x_161, 1, x_160); +lean_inc(x_158); +x_162 = l_Lean_TypeClass_Context_eHasTmpMVar(x_158); +if (x_162 == 0) +{ +uint8_t x_163; +lean_inc(x_160); +x_163 = l_Lean_TypeClass_Context_eHasTmpMVar(x_160); +if (x_163 == 0) +{ +lean_object* x_164; lean_object* x_165; lean_object* x_166; lean_object* x_167; lean_object* x_168; lean_object* x_169; lean_object* x_170; +lean_dec(x_160); +lean_dec(x_158); +if (lean_is_exclusive(x_144)) { + lean_ctor_release(x_144, 0); + lean_ctor_release(x_144, 1); + lean_ctor_release(x_144, 2); + lean_ctor_release(x_144, 3); + lean_ctor_release(x_144, 4); + lean_ctor_release(x_144, 5); + lean_ctor_release(x_144, 6); + x_164 = x_144; +} else { + lean_dec_ref(x_144); + x_164 = lean_box(0); +} +x_165 = lean_array_pop(x_149); +if (lean_is_scalar(x_164)) { + x_166 = lean_alloc_ctor(0, 7, 0); +} else { + x_166 = x_164; +} +lean_ctor_set(x_166, 0, x_145); +lean_ctor_set(x_166, 1, x_146); +lean_ctor_set(x_166, 2, x_147); +lean_ctor_set(x_166, 3, x_148); +lean_ctor_set(x_166, 4, x_165); +lean_ctor_set(x_166, 5, x_150); +lean_ctor_set(x_166, 6, x_151); +x_167 = lean_box(0); +x_168 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_168, 0, x_167); +lean_ctor_set(x_168, 1, x_166); +x_169 = lean_ctor_get(x_154, 0); +lean_inc(x_169); +lean_dec(x_154); +x_170 = l_Lean_TypeClass_newAnswer(x_169, x_161, x_168); +return x_170; +} +else +{ +lean_object* x_171; lean_object* x_172; lean_object* x_173; lean_object* x_174; lean_object* x_175; lean_object* x_176; lean_object* x_177; lean_object* x_178; lean_object* x_179; lean_object* x_180; lean_object* x_181; lean_object* x_182; lean_object* x_183; lean_object* x_184; +lean_dec(x_161); +lean_dec(x_154); +lean_dec(x_151); +lean_dec(x_150); +lean_dec(x_149); +lean_dec(x_148); +lean_dec(x_147); +lean_dec(x_146); +lean_dec(x_145); +x_171 = lean_expr_dbg_to_string(x_158); +lean_dec(x_158); +x_172 = l_Lean_TypeClass_TypedExpr_HasToString___closed__1; +x_173 = lean_string_append(x_172, x_171); +lean_dec(x_171); +x_174 = l_List_reprAux___main___rarg___closed__1; +x_175 = lean_string_append(x_173, x_174); +x_176 = lean_expr_dbg_to_string(x_160); +lean_dec(x_160); +x_177 = lean_string_append(x_175, x_176); +lean_dec(x_176); +x_178 = l_Option_HasRepr___rarg___closed__3; +x_179 = lean_string_append(x_177, x_178); +x_180 = l_Lean_TypeClass_consume___closed__1; +x_181 = lean_string_append(x_180, x_179); +lean_dec(x_179); +x_182 = l_Lean_TypeClass_consume___closed__2; +x_183 = lean_string_append(x_181, x_182); +x_184 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_184, 0, x_183); +lean_ctor_set(x_184, 1, x_144); +return x_184; +} +} +else +{ +lean_object* x_185; lean_object* x_186; lean_object* x_187; lean_object* x_188; lean_object* x_189; lean_object* x_190; lean_object* x_191; lean_object* x_192; lean_object* x_193; lean_object* x_194; lean_object* x_195; lean_object* x_196; lean_object* x_197; lean_object* x_198; +lean_dec(x_161); +lean_dec(x_154); +lean_dec(x_151); +lean_dec(x_150); +lean_dec(x_149); +lean_dec(x_148); +lean_dec(x_147); +lean_dec(x_146); +lean_dec(x_145); +x_185 = lean_expr_dbg_to_string(x_158); +lean_dec(x_158); +x_186 = l_Lean_TypeClass_TypedExpr_HasToString___closed__1; +x_187 = lean_string_append(x_186, x_185); +lean_dec(x_185); +x_188 = l_List_reprAux___main___rarg___closed__1; +x_189 = lean_string_append(x_187, x_188); +x_190 = lean_expr_dbg_to_string(x_160); +lean_dec(x_160); +x_191 = lean_string_append(x_189, x_190); +lean_dec(x_190); +x_192 = l_Option_HasRepr___rarg___closed__3; +x_193 = lean_string_append(x_191, x_192); +x_194 = l_Lean_TypeClass_consume___closed__1; +x_195 = lean_string_append(x_194, x_193); +lean_dec(x_193); +x_196 = l_Lean_TypeClass_consume___closed__2; +x_197 = lean_string_append(x_195, x_196); +x_198 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_198, 0, x_197); +lean_ctor_set(x_198, 1, x_144); +return x_198; +} +} +else +{ +lean_object* x_199; lean_object* x_200; lean_object* x_201; lean_object* x_202; lean_object* x_203; lean_object* x_204; lean_object* x_205; lean_object* x_206; +x_199 = lean_ctor_get(x_153, 0); +lean_inc(x_199); +lean_dec(x_153); +x_200 = lean_ctor_get(x_152, 0); +lean_inc(x_200); +x_201 = lean_ctor_get(x_200, 1); +lean_inc(x_201); +lean_dec(x_200); +lean_inc(x_201); +x_202 = l_Lean_TypeClass_Context_eInfer(x_201, x_199); +lean_inc(x_201); +x_203 = l_Lean_TypeClass_Context_eInstantiate___main(x_201, x_202); +x_204 = l_Lean_TypeClass_Context__u03b1Norm(x_203); +lean_inc(x_152); +x_205 = lean_alloc_ctor(0, 1, 0); +lean_ctor_set(x_205, 0, x_152); +x_206 = l_PersistentHashMap_find___at_Lean_TypeClass_newAnswer___spec__1(x_151, x_204); +if (lean_obj_tag(x_206) == 0) +{ +lean_object* x_207; lean_object* x_208; lean_object* x_209; +lean_dec(x_204); +lean_dec(x_152); +lean_dec(x_151); +lean_dec(x_150); +lean_dec(x_149); +lean_dec(x_148); +lean_dec(x_147); +lean_dec(x_146); +lean_dec(x_145); +x_207 = lean_box(0); +x_208 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_208, 0, x_207); +lean_ctor_set(x_208, 1, x_144); +x_209 = l_Lean_TypeClass_newSubgoal(x_205, x_201, x_199, x_208); +if (lean_obj_tag(x_209) == 0) +{ +lean_object* x_210; lean_object* x_211; lean_object* x_212; lean_object* x_213; lean_object* x_214; lean_object* x_215; lean_object* x_216; lean_object* x_217; lean_object* x_218; lean_object* x_219; lean_object* x_220; lean_object* x_221; lean_object* x_222; +x_210 = lean_ctor_get(x_209, 1); +lean_inc(x_210); +if (lean_is_exclusive(x_209)) { + lean_ctor_release(x_209, 0); + lean_ctor_release(x_209, 1); + x_211 = x_209; +} else { + lean_dec_ref(x_209); + x_211 = lean_box(0); +} +x_212 = lean_ctor_get(x_210, 0); +lean_inc(x_212); +x_213 = lean_ctor_get(x_210, 1); +lean_inc(x_213); +x_214 = lean_ctor_get(x_210, 2); +lean_inc(x_214); +x_215 = lean_ctor_get(x_210, 3); +lean_inc(x_215); +x_216 = lean_ctor_get(x_210, 4); +lean_inc(x_216); +x_217 = lean_ctor_get(x_210, 5); +lean_inc(x_217); +x_218 = lean_ctor_get(x_210, 6); +lean_inc(x_218); +if (lean_is_exclusive(x_210)) { + lean_ctor_release(x_210, 0); + lean_ctor_release(x_210, 1); + lean_ctor_release(x_210, 2); + lean_ctor_release(x_210, 3); + lean_ctor_release(x_210, 4); + lean_ctor_release(x_210, 5); + lean_ctor_release(x_210, 6); + x_219 = x_210; +} else { + lean_dec_ref(x_210); + x_219 = lean_box(0); +} +x_220 = lean_array_pop(x_216); +if (lean_is_scalar(x_219)) { + x_221 = lean_alloc_ctor(0, 7, 0); +} else { + x_221 = x_219; +} +lean_ctor_set(x_221, 0, x_212); +lean_ctor_set(x_221, 1, x_213); +lean_ctor_set(x_221, 2, x_214); +lean_ctor_set(x_221, 3, x_215); +lean_ctor_set(x_221, 4, x_220); +lean_ctor_set(x_221, 5, x_217); +lean_ctor_set(x_221, 6, x_218); +if (lean_is_scalar(x_211)) { + x_222 = lean_alloc_ctor(0, 2, 0); +} else { + x_222 = x_211; +} +lean_ctor_set(x_222, 0, x_207); +lean_ctor_set(x_222, 1, x_221); +return x_222; +} +else +{ +lean_object* x_223; lean_object* x_224; lean_object* x_225; lean_object* x_226; +x_223 = lean_ctor_get(x_209, 0); +lean_inc(x_223); +x_224 = lean_ctor_get(x_209, 1); +lean_inc(x_224); +if (lean_is_exclusive(x_209)) { + lean_ctor_release(x_209, 0); + lean_ctor_release(x_209, 1); + x_225 = x_209; +} else { + lean_dec_ref(x_209); + x_225 = lean_box(0); +} +if (lean_is_scalar(x_225)) { + x_226 = lean_alloc_ctor(1, 2, 0); +} else { + x_226 = x_225; +} +lean_ctor_set(x_226, 0, x_223); +lean_ctor_set(x_226, 1, x_224); +return x_226; +} +} +else +{ +lean_object* x_227; lean_object* x_228; lean_object* x_229; lean_object* x_230; lean_object* x_231; lean_object* x_232; lean_object* x_233; lean_object* x_234; lean_object* x_235; lean_object* x_236; lean_object* x_237; lean_object* x_238; lean_object* x_239; lean_object* x_240; +lean_dec(x_201); +lean_dec(x_199); +if (lean_is_exclusive(x_144)) { + lean_ctor_release(x_144, 0); + lean_ctor_release(x_144, 1); + lean_ctor_release(x_144, 2); + lean_ctor_release(x_144, 3); + lean_ctor_release(x_144, 4); + lean_ctor_release(x_144, 5); + lean_ctor_release(x_144, 6); + x_227 = x_144; +} else { + lean_dec_ref(x_144); + x_227 = lean_box(0); +} +x_228 = lean_ctor_get(x_206, 0); +lean_inc(x_228); +lean_dec(x_206); +x_229 = lean_array_pop(x_149); +x_230 = lean_ctor_get(x_228, 0); +lean_inc(x_230); +x_231 = lean_ctor_get(x_228, 1); +lean_inc(x_231); +x_232 = lean_unsigned_to_nat(0u); +x_233 = l_Array_miterateAux___main___at_Lean_TypeClass_consume___spec__2(x_152, x_228, x_231, x_232, x_150); +if (lean_is_exclusive(x_228)) { + lean_ctor_release(x_228, 0); + lean_ctor_release(x_228, 1); + x_234 = x_228; +} else { + lean_dec_ref(x_228); + x_234 = lean_box(0); +} +x_235 = lean_array_push(x_230, x_205); +if (lean_is_scalar(x_234)) { + x_236 = lean_alloc_ctor(0, 2, 0); +} else { + x_236 = x_234; +} +lean_ctor_set(x_236, 0, x_235); +lean_ctor_set(x_236, 1, x_231); +x_237 = l_PersistentHashMap_insert___at_Lean_TypeClass_newSubgoal___spec__2(x_151, x_204, x_236); +if (lean_is_scalar(x_227)) { + x_238 = lean_alloc_ctor(0, 7, 0); +} else { + x_238 = x_227; +} +lean_ctor_set(x_238, 0, x_145); +lean_ctor_set(x_238, 1, x_146); +lean_ctor_set(x_238, 2, x_147); +lean_ctor_set(x_238, 3, x_148); +lean_ctor_set(x_238, 4, x_229); +lean_ctor_set(x_238, 5, x_233); +lean_ctor_set(x_238, 6, x_237); +x_239 = lean_box(0); +x_240 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_240, 0, x_239); +lean_ctor_set(x_240, 1, x_238); +return x_240; +} +} +} +} +} +lean_object* l_Array_back___at_Lean_TypeClass_consume___spec__1___boxed(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = l_Array_back___at_Lean_TypeClass_consume___spec__1(x_1); +lean_dec(x_1); +return x_2; +} +} +lean_object* l_Array_miterateAux___main___at_Lean_TypeClass_consume___spec__2___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5) { +_start: +{ +lean_object* x_6; +x_6 = l_Array_miterateAux___main___at_Lean_TypeClass_consume___spec__2(x_1, x_2, x_3, x_4, x_5); +lean_dec(x_3); +lean_dec(x_2); +return x_6; +} +} +lean_object* l_List_foldl___main___at_Lean_TypeClass_constNameToTypedExpr___spec__1(lean_object* x_1, lean_object* x_2) { +_start: +{ +if (lean_obj_tag(x_2) == 0) +{ +return x_1; +} +else +{ +uint8_t x_3; +x_3 = !lean_is_exclusive(x_2); +if (x_3 == 0) +{ +lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; uint8_t x_9; +x_4 = lean_ctor_get(x_2, 1); +x_5 = lean_ctor_get(x_2, 0); +lean_dec(x_5); +x_6 = lean_ctor_get(x_1, 0); +lean_inc(x_6); +x_7 = lean_ctor_get(x_1, 1); +lean_inc(x_7); +lean_dec(x_1); +x_8 = l_Lean_TypeClass_Context_uNewMeta(x_7); +x_9 = !lean_is_exclusive(x_8); +if (x_9 == 0) +{ +lean_object* x_10; +x_10 = lean_ctor_get(x_8, 0); +lean_ctor_set(x_2, 1, x_6); +lean_ctor_set(x_2, 0, x_10); +lean_ctor_set(x_8, 0, x_2); +x_1 = x_8; +x_2 = x_4; +goto _start; +} +else +{ +lean_object* x_12; lean_object* x_13; lean_object* x_14; +x_12 = lean_ctor_get(x_8, 0); +x_13 = lean_ctor_get(x_8, 1); +lean_inc(x_13); +lean_inc(x_12); +lean_dec(x_8); +lean_ctor_set(x_2, 1, x_6); +lean_ctor_set(x_2, 0, x_12); +x_14 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_14, 0, x_2); +lean_ctor_set(x_14, 1, x_13); +x_1 = x_14; +x_2 = x_4; +goto _start; +} +} +else +{ +lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; +x_16 = lean_ctor_get(x_2, 1); +lean_inc(x_16); +lean_dec(x_2); +x_17 = lean_ctor_get(x_1, 0); +lean_inc(x_17); +x_18 = lean_ctor_get(x_1, 1); +lean_inc(x_18); +lean_dec(x_1); +x_19 = l_Lean_TypeClass_Context_uNewMeta(x_18); +x_20 = lean_ctor_get(x_19, 0); +lean_inc(x_20); +x_21 = lean_ctor_get(x_19, 1); +lean_inc(x_21); +if (lean_is_exclusive(x_19)) { + lean_ctor_release(x_19, 0); + lean_ctor_release(x_19, 1); + x_22 = x_19; +} else { + lean_dec_ref(x_19); + x_22 = lean_box(0); +} +x_23 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_23, 0, x_20); +lean_ctor_set(x_23, 1, x_17); +if (lean_is_scalar(x_22)) { + x_24 = lean_alloc_ctor(0, 2, 0); +} else { + x_24 = x_22; +} +lean_ctor_set(x_24, 0, x_23); +lean_ctor_set(x_24, 1, x_21); +x_1 = x_24; +x_2 = x_16; +goto _start; +} +} +} +} +lean_object* _init_l_Lean_TypeClass_constNameToTypedExpr___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("instance "); +return x_1; +} +} +lean_object* _init_l_Lean_TypeClass_constNameToTypedExpr___closed__2() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string(" not found in env"); +return x_1; +} +} +lean_object* l_Lean_TypeClass_constNameToTypedExpr(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +uint8_t x_4; +x_4 = !lean_is_exclusive(x_3); +if (x_4 == 0) +{ +lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; +x_5 = lean_ctor_get(x_3, 1); +x_6 = lean_ctor_get(x_3, 0); +lean_dec(x_6); +x_7 = lean_ctor_get(x_5, 0); +lean_inc(x_7); +lean_inc(x_2); +x_8 = lean_environment_find(x_7, x_2); +if (lean_obj_tag(x_8) == 0) +{ +lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; +lean_dec(x_1); +x_9 = l_System_FilePath_dirName___closed__1; +x_10 = l_Lean_Name_toStringWithSep___main(x_9, x_2); +x_11 = l_Lean_TypeClass_constNameToTypedExpr___closed__1; +x_12 = lean_string_append(x_11, x_10); +lean_dec(x_10); +x_13 = l_Lean_TypeClass_constNameToTypedExpr___closed__2; +x_14 = lean_string_append(x_12, x_13); +lean_ctor_set_tag(x_3, 1); +lean_ctor_set(x_3, 0, x_14); +return x_3; +} +else +{ +lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; uint8_t x_20; +x_15 = lean_ctor_get(x_8, 0); +lean_inc(x_15); +lean_dec(x_8); +x_16 = lean_box(0); +x_17 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_17, 0, x_16); +lean_ctor_set(x_17, 1, x_1); +x_18 = l_Lean_ConstantInfo_lparams(x_15); +x_19 = l_List_foldl___main___at_Lean_TypeClass_constNameToTypedExpr___spec__1(x_17, x_18); +x_20 = !lean_is_exclusive(x_19); +if (x_20 == 0) +{ +lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; +x_21 = lean_ctor_get(x_19, 0); +lean_inc(x_21); +x_22 = lean_expr_mk_const(x_2, x_21); +x_23 = lean_instantiate_type_lparams(x_15, x_21); +x_24 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_24, 0, x_22); +lean_ctor_set(x_24, 1, x_23); +lean_ctor_set(x_19, 0, x_24); +lean_ctor_set(x_3, 0, x_19); +return x_3; +} +else +{ +lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; +x_25 = lean_ctor_get(x_19, 0); +x_26 = lean_ctor_get(x_19, 1); +lean_inc(x_26); +lean_inc(x_25); +lean_dec(x_19); +lean_inc(x_25); +x_27 = lean_expr_mk_const(x_2, x_25); +x_28 = lean_instantiate_type_lparams(x_15, x_25); +x_29 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_29, 0, x_27); +lean_ctor_set(x_29, 1, x_28); +x_30 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_30, 0, x_29); +lean_ctor_set(x_30, 1, x_26); +lean_ctor_set(x_3, 0, x_30); +return x_3; +} +} +} +else +{ +lean_object* x_31; lean_object* x_32; lean_object* x_33; +x_31 = lean_ctor_get(x_3, 1); +lean_inc(x_31); +lean_dec(x_3); +x_32 = lean_ctor_get(x_31, 0); +lean_inc(x_32); +lean_inc(x_2); +x_33 = lean_environment_find(x_32, x_2); +if (lean_obj_tag(x_33) == 0) +{ +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_dec(x_1); +x_34 = l_System_FilePath_dirName___closed__1; +x_35 = l_Lean_Name_toStringWithSep___main(x_34, x_2); +x_36 = l_Lean_TypeClass_constNameToTypedExpr___closed__1; +x_37 = lean_string_append(x_36, x_35); +lean_dec(x_35); +x_38 = l_Lean_TypeClass_constNameToTypedExpr___closed__2; +x_39 = lean_string_append(x_37, x_38); +x_40 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_40, 0, x_39); +lean_ctor_set(x_40, 1, x_31); +return x_40; +} +else +{ +lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_object* x_51; lean_object* x_52; lean_object* x_53; +x_41 = lean_ctor_get(x_33, 0); +lean_inc(x_41); +lean_dec(x_33); +x_42 = lean_box(0); +x_43 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_43, 0, x_42); +lean_ctor_set(x_43, 1, x_1); +x_44 = l_Lean_ConstantInfo_lparams(x_41); +x_45 = l_List_foldl___main___at_Lean_TypeClass_constNameToTypedExpr___spec__1(x_43, x_44); +x_46 = lean_ctor_get(x_45, 0); +lean_inc(x_46); +x_47 = lean_ctor_get(x_45, 1); +lean_inc(x_47); +if (lean_is_exclusive(x_45)) { + lean_ctor_release(x_45, 0); + lean_ctor_release(x_45, 1); + x_48 = x_45; +} else { + lean_dec_ref(x_45); + x_48 = lean_box(0); +} +lean_inc(x_46); +x_49 = lean_expr_mk_const(x_2, x_46); +x_50 = lean_instantiate_type_lparams(x_41, x_46); +x_51 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_51, 0, x_49); +lean_ctor_set(x_51, 1, x_50); +if (lean_is_scalar(x_48)) { + x_52 = lean_alloc_ctor(0, 2, 0); +} else { + x_52 = x_48; +} +lean_ctor_set(x_52, 0, x_51); +lean_ctor_set(x_52, 1, x_47); +x_53 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_53, 0, x_52); +lean_ctor_set(x_53, 1, x_31); +return x_53; +} +} +} +} +lean_object* l_Array_back___at_Lean_TypeClass_generate___spec__1(lean_object* x_1) { +_start: +{ +lean_object* x_2; lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; +x_2 = lean_array_get_size(x_1); +x_3 = lean_unsigned_to_nat(1u); +x_4 = lean_nat_sub(x_2, x_3); +lean_dec(x_2); +x_5 = l_Lean_TypeClass_GeneratorNode_Inhabited; +x_6 = lean_array_get(x_5, x_1, x_4); +lean_dec(x_4); +return x_6; +} +} +lean_object* _init_l_Lean_TypeClass_generate___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("[generate] gNode.remainingInstances.isEmpty"); +return x_1; +} +} +lean_object* _init_l_Lean_TypeClass_generate___closed__2() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("local instances not yet supported"); +return x_1; +} +} +lean_object* l_Lean_TypeClass_generate(lean_object* x_1) { +_start: +{ +uint8_t x_2; +x_2 = !lean_is_exclusive(x_1); +if (x_2 == 0) +{ +lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; +x_3 = lean_ctor_get(x_1, 1); +x_4 = lean_ctor_get(x_1, 0); +lean_dec(x_4); +x_5 = lean_ctor_get(x_3, 3); +lean_inc(x_5); +x_6 = l_Array_back___at_Lean_TypeClass_generate___spec__1(x_5); +lean_dec(x_5); +x_7 = lean_ctor_get(x_6, 1); +lean_inc(x_7); +if (lean_obj_tag(x_7) == 0) +{ +lean_object* x_8; +lean_dec(x_6); +x_8 = l_Lean_TypeClass_generate___closed__1; +lean_ctor_set_tag(x_1, 1); +lean_ctor_set(x_1, 0, x_8); +return x_1; +} +else +{ +lean_object* x_9; +x_9 = lean_ctor_get(x_7, 0); +lean_inc(x_9); +if (lean_obj_tag(x_9) == 0) +{ +lean_object* x_10; +lean_dec(x_9); +lean_dec(x_7); +lean_dec(x_6); +x_10 = l_Lean_TypeClass_generate___closed__2; +lean_ctor_set_tag(x_1, 1); +lean_ctor_set(x_1, 0, x_10); +return x_1; +} +else +{ +lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; +x_11 = lean_ctor_get(x_7, 1); +lean_inc(x_11); +lean_dec(x_7); +x_12 = lean_ctor_get(x_9, 0); +lean_inc(x_12); +lean_dec(x_9); +x_13 = lean_box(0); +lean_ctor_set(x_1, 0, x_13); +x_14 = lean_ctor_get(x_6, 0); +lean_inc(x_14); +lean_dec(x_6); +x_15 = lean_ctor_get(x_14, 1); +lean_inc(x_15); +x_16 = l_Lean_TypeClass_constNameToTypedExpr(x_15, x_12, x_1); +if (lean_obj_tag(x_16) == 0) +{ +uint8_t x_17; +x_17 = !lean_is_exclusive(x_16); +if (x_17 == 0) +{ +lean_object* x_18; lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; +x_18 = lean_ctor_get(x_16, 0); +lean_ctor_set(x_16, 0, x_13); +x_19 = lean_ctor_get(x_18, 0); +lean_inc(x_19); +x_20 = lean_ctor_get(x_18, 1); +lean_inc(x_20); +lean_dec(x_18); +x_21 = lean_ctor_get(x_14, 2); +lean_inc(x_21); +x_22 = l_Lean_TypeClass_tryResolve(x_20, x_21, x_19, x_16); +if (lean_obj_tag(x_22) == 0) +{ +lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; uint8_t x_50; +x_23 = lean_ctor_get(x_22, 0); +lean_inc(x_23); +x_24 = lean_ctor_get(x_22, 1); +lean_inc(x_24); +if (lean_is_exclusive(x_22)) { + lean_ctor_release(x_22, 0); + lean_ctor_release(x_22, 1); + x_25 = x_22; +} else { + lean_dec_ref(x_22); + x_25 = lean_box(0); +} +x_50 = l_List_isEmpty___rarg(x_11); +if (x_50 == 0) +{ +lean_object* x_51; lean_object* x_52; lean_object* x_53; lean_object* x_54; uint8_t x_55; +x_51 = lean_ctor_get(x_24, 3); +lean_inc(x_51); +x_52 = lean_array_get_size(x_51); +x_53 = lean_unsigned_to_nat(1u); +x_54 = lean_nat_sub(x_52, x_53); +x_55 = lean_nat_dec_lt(x_54, x_52); +lean_dec(x_52); +if (x_55 == 0) +{ +lean_dec(x_54); +lean_dec(x_11); +x_26 = x_51; +x_27 = x_24; +goto block_49; +} +else +{ +lean_object* x_56; lean_object* x_57; lean_object* x_58; uint8_t x_59; +x_56 = lean_array_fget(x_51, x_54); +x_57 = l_Lean_TypeClass_GeneratorNode_Inhabited___closed__1; +x_58 = lean_array_fset(x_51, x_54, x_57); +x_59 = !lean_is_exclusive(x_56); +if (x_59 == 0) +{ +lean_object* x_60; lean_object* x_61; +x_60 = lean_ctor_get(x_56, 1); +lean_dec(x_60); +lean_ctor_set(x_56, 1, x_11); +x_61 = lean_array_fset(x_58, x_54, x_56); +lean_dec(x_54); +x_26 = x_61; +x_27 = x_24; +goto block_49; +} +else +{ +lean_object* x_62; lean_object* x_63; lean_object* x_64; +x_62 = lean_ctor_get(x_56, 0); +lean_inc(x_62); +lean_dec(x_56); +x_63 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_63, 0, x_62); +lean_ctor_set(x_63, 1, x_11); +x_64 = lean_array_fset(x_58, x_54, x_63); +lean_dec(x_54); +x_26 = x_64; +x_27 = x_24; +goto block_49; +} +} +} +else +{ +lean_object* x_65; lean_object* x_66; +lean_dec(x_11); +x_65 = lean_ctor_get(x_24, 3); +lean_inc(x_65); +x_66 = lean_array_pop(x_65); +x_26 = x_66; +x_27 = x_24; +goto block_49; +} +block_49: +{ +uint8_t x_28; +x_28 = !lean_is_exclusive(x_27); +if (x_28 == 0) +{ +lean_object* x_29; +x_29 = lean_ctor_get(x_27, 3); +lean_dec(x_29); +lean_ctor_set(x_27, 3, x_26); +if (lean_obj_tag(x_23) == 0) +{ +lean_object* x_30; +lean_dec(x_14); +if (lean_is_scalar(x_25)) { + x_30 = lean_alloc_ctor(0, 2, 0); +} else { + x_30 = x_25; +} +lean_ctor_set(x_30, 0, x_13); +lean_ctor_set(x_30, 1, x_27); +return x_30; +} +else +{ +lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; +x_31 = lean_ctor_get(x_23, 0); +lean_inc(x_31); +lean_dec(x_23); +if (lean_is_scalar(x_25)) { + x_32 = lean_alloc_ctor(0, 2, 0); +} else { + x_32 = x_25; +} +lean_ctor_set(x_32, 0, x_13); +lean_ctor_set(x_32, 1, x_27); +x_33 = lean_ctor_get(x_31, 0); +lean_inc(x_33); +x_34 = lean_ctor_get(x_31, 1); +lean_inc(x_34); +lean_dec(x_31); +x_35 = l_Lean_TypeClass_newConsumerNode(x_14, x_33, x_34, x_32); +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; +x_36 = lean_ctor_get(x_27, 0); +x_37 = lean_ctor_get(x_27, 1); +x_38 = lean_ctor_get(x_27, 2); +x_39 = lean_ctor_get(x_27, 4); +x_40 = lean_ctor_get(x_27, 5); +x_41 = lean_ctor_get(x_27, 6); +lean_inc(x_41); +lean_inc(x_40); +lean_inc(x_39); +lean_inc(x_38); +lean_inc(x_37); +lean_inc(x_36); +lean_dec(x_27); +x_42 = lean_alloc_ctor(0, 7, 0); +lean_ctor_set(x_42, 0, x_36); +lean_ctor_set(x_42, 1, x_37); +lean_ctor_set(x_42, 2, x_38); +lean_ctor_set(x_42, 3, x_26); +lean_ctor_set(x_42, 4, x_39); +lean_ctor_set(x_42, 5, x_40); +lean_ctor_set(x_42, 6, x_41); +if (lean_obj_tag(x_23) == 0) +{ +lean_object* x_43; +lean_dec(x_14); +if (lean_is_scalar(x_25)) { + x_43 = lean_alloc_ctor(0, 2, 0); +} else { + x_43 = x_25; +} +lean_ctor_set(x_43, 0, x_13); +lean_ctor_set(x_43, 1, x_42); +return x_43; +} +else +{ +lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; lean_object* x_48; +x_44 = lean_ctor_get(x_23, 0); +lean_inc(x_44); +lean_dec(x_23); +if (lean_is_scalar(x_25)) { + x_45 = lean_alloc_ctor(0, 2, 0); +} else { + x_45 = x_25; +} +lean_ctor_set(x_45, 0, x_13); +lean_ctor_set(x_45, 1, x_42); +x_46 = lean_ctor_get(x_44, 0); +lean_inc(x_46); +x_47 = lean_ctor_get(x_44, 1); +lean_inc(x_47); +lean_dec(x_44); +x_48 = l_Lean_TypeClass_newConsumerNode(x_14, x_46, x_47, x_45); +return x_48; +} +} +} +} +else +{ +uint8_t x_67; +lean_dec(x_14); +lean_dec(x_11); +x_67 = !lean_is_exclusive(x_22); +if (x_67 == 0) +{ +return x_22; +} +else +{ +lean_object* x_68; lean_object* x_69; lean_object* x_70; +x_68 = lean_ctor_get(x_22, 0); +x_69 = lean_ctor_get(x_22, 1); +lean_inc(x_69); +lean_inc(x_68); +lean_dec(x_22); +x_70 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_70, 0, x_68); +lean_ctor_set(x_70, 1, x_69); +return x_70; +} +} +} +else +{ +lean_object* x_71; lean_object* x_72; lean_object* x_73; lean_object* x_74; lean_object* x_75; lean_object* x_76; lean_object* x_77; +x_71 = lean_ctor_get(x_16, 0); +x_72 = lean_ctor_get(x_16, 1); +lean_inc(x_72); +lean_inc(x_71); +lean_dec(x_16); +x_73 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_73, 0, x_13); +lean_ctor_set(x_73, 1, x_72); +x_74 = lean_ctor_get(x_71, 0); +lean_inc(x_74); +x_75 = lean_ctor_get(x_71, 1); +lean_inc(x_75); +lean_dec(x_71); +x_76 = lean_ctor_get(x_14, 2); +lean_inc(x_76); +x_77 = l_Lean_TypeClass_tryResolve(x_75, x_76, x_74, x_73); +if (lean_obj_tag(x_77) == 0) +{ +lean_object* x_78; lean_object* x_79; lean_object* x_80; lean_object* x_81; lean_object* x_82; uint8_t x_98; +x_78 = lean_ctor_get(x_77, 0); +lean_inc(x_78); +x_79 = lean_ctor_get(x_77, 1); +lean_inc(x_79); +if (lean_is_exclusive(x_77)) { + lean_ctor_release(x_77, 0); + lean_ctor_release(x_77, 1); + x_80 = x_77; +} else { + lean_dec_ref(x_77); + x_80 = lean_box(0); +} +x_98 = l_List_isEmpty___rarg(x_11); +if (x_98 == 0) +{ +lean_object* x_99; lean_object* x_100; lean_object* x_101; lean_object* x_102; uint8_t x_103; +x_99 = lean_ctor_get(x_79, 3); +lean_inc(x_99); +x_100 = lean_array_get_size(x_99); +x_101 = lean_unsigned_to_nat(1u); +x_102 = lean_nat_sub(x_100, x_101); +x_103 = lean_nat_dec_lt(x_102, x_100); +lean_dec(x_100); +if (x_103 == 0) +{ +lean_dec(x_102); +lean_dec(x_11); +x_81 = x_99; +x_82 = x_79; +goto block_97; +} +else +{ +lean_object* x_104; lean_object* x_105; lean_object* x_106; lean_object* x_107; lean_object* x_108; lean_object* x_109; lean_object* x_110; +x_104 = lean_array_fget(x_99, x_102); +x_105 = l_Lean_TypeClass_GeneratorNode_Inhabited___closed__1; +x_106 = lean_array_fset(x_99, x_102, x_105); +x_107 = lean_ctor_get(x_104, 0); +lean_inc(x_107); +if (lean_is_exclusive(x_104)) { + lean_ctor_release(x_104, 0); + lean_ctor_release(x_104, 1); + x_108 = x_104; +} else { + lean_dec_ref(x_104); + x_108 = lean_box(0); +} +if (lean_is_scalar(x_108)) { + x_109 = lean_alloc_ctor(0, 2, 0); +} else { + x_109 = x_108; +} +lean_ctor_set(x_109, 0, x_107); +lean_ctor_set(x_109, 1, x_11); +x_110 = lean_array_fset(x_106, x_102, x_109); +lean_dec(x_102); +x_81 = x_110; +x_82 = x_79; +goto block_97; +} +} +else +{ +lean_object* x_111; lean_object* x_112; +lean_dec(x_11); +x_111 = lean_ctor_get(x_79, 3); +lean_inc(x_111); +x_112 = lean_array_pop(x_111); +x_81 = x_112; +x_82 = x_79; +goto block_97; +} +block_97: +{ +lean_object* x_83; lean_object* x_84; lean_object* x_85; lean_object* x_86; lean_object* x_87; lean_object* x_88; lean_object* x_89; lean_object* x_90; +x_83 = lean_ctor_get(x_82, 0); +lean_inc(x_83); +x_84 = lean_ctor_get(x_82, 1); +lean_inc(x_84); +x_85 = lean_ctor_get(x_82, 2); +lean_inc(x_85); +x_86 = lean_ctor_get(x_82, 4); +lean_inc(x_86); +x_87 = lean_ctor_get(x_82, 5); +lean_inc(x_87); +x_88 = lean_ctor_get(x_82, 6); +lean_inc(x_88); +if (lean_is_exclusive(x_82)) { + lean_ctor_release(x_82, 0); + lean_ctor_release(x_82, 1); + lean_ctor_release(x_82, 2); + lean_ctor_release(x_82, 3); + lean_ctor_release(x_82, 4); + lean_ctor_release(x_82, 5); + lean_ctor_release(x_82, 6); + x_89 = x_82; +} else { + lean_dec_ref(x_82); + x_89 = lean_box(0); +} +if (lean_is_scalar(x_89)) { + x_90 = lean_alloc_ctor(0, 7, 0); +} else { + x_90 = x_89; +} +lean_ctor_set(x_90, 0, x_83); +lean_ctor_set(x_90, 1, x_84); +lean_ctor_set(x_90, 2, x_85); +lean_ctor_set(x_90, 3, x_81); +lean_ctor_set(x_90, 4, x_86); +lean_ctor_set(x_90, 5, x_87); +lean_ctor_set(x_90, 6, x_88); +if (lean_obj_tag(x_78) == 0) +{ +lean_object* x_91; +lean_dec(x_14); +if (lean_is_scalar(x_80)) { + x_91 = lean_alloc_ctor(0, 2, 0); +} else { + x_91 = x_80; +} +lean_ctor_set(x_91, 0, x_13); +lean_ctor_set(x_91, 1, x_90); +return x_91; +} +else +{ +lean_object* x_92; lean_object* x_93; lean_object* x_94; lean_object* x_95; lean_object* x_96; +x_92 = lean_ctor_get(x_78, 0); +lean_inc(x_92); +lean_dec(x_78); +if (lean_is_scalar(x_80)) { + x_93 = lean_alloc_ctor(0, 2, 0); +} else { + x_93 = x_80; +} +lean_ctor_set(x_93, 0, x_13); +lean_ctor_set(x_93, 1, x_90); +x_94 = lean_ctor_get(x_92, 0); +lean_inc(x_94); +x_95 = lean_ctor_get(x_92, 1); +lean_inc(x_95); +lean_dec(x_92); +x_96 = l_Lean_TypeClass_newConsumerNode(x_14, x_94, x_95, x_93); +return x_96; +} +} +} +else +{ +lean_object* x_113; lean_object* x_114; lean_object* x_115; lean_object* x_116; +lean_dec(x_14); +lean_dec(x_11); +x_113 = lean_ctor_get(x_77, 0); +lean_inc(x_113); +x_114 = lean_ctor_get(x_77, 1); +lean_inc(x_114); +if (lean_is_exclusive(x_77)) { + lean_ctor_release(x_77, 0); + lean_ctor_release(x_77, 1); + x_115 = x_77; +} else { + lean_dec_ref(x_77); + x_115 = lean_box(0); +} +if (lean_is_scalar(x_115)) { + x_116 = lean_alloc_ctor(1, 2, 0); +} else { + x_116 = x_115; +} +lean_ctor_set(x_116, 0, x_113); +lean_ctor_set(x_116, 1, x_114); +return x_116; +} +} +} +else +{ +uint8_t x_117; +lean_dec(x_14); +lean_dec(x_11); +x_117 = !lean_is_exclusive(x_16); +if (x_117 == 0) +{ +return x_16; +} +else +{ +lean_object* x_118; lean_object* x_119; lean_object* x_120; +x_118 = lean_ctor_get(x_16, 0); +x_119 = lean_ctor_get(x_16, 1); +lean_inc(x_119); +lean_inc(x_118); +lean_dec(x_16); +x_120 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_120, 0, x_118); +lean_ctor_set(x_120, 1, x_119); +return x_120; +} +} +} +} +} +else +{ +lean_object* x_121; lean_object* x_122; lean_object* x_123; lean_object* x_124; +x_121 = lean_ctor_get(x_1, 1); +lean_inc(x_121); +lean_dec(x_1); +x_122 = lean_ctor_get(x_121, 3); +lean_inc(x_122); +x_123 = l_Array_back___at_Lean_TypeClass_generate___spec__1(x_122); +lean_dec(x_122); +x_124 = lean_ctor_get(x_123, 1); +lean_inc(x_124); +if (lean_obj_tag(x_124) == 0) +{ +lean_object* x_125; lean_object* x_126; +lean_dec(x_123); +x_125 = l_Lean_TypeClass_generate___closed__1; +x_126 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_126, 0, x_125); +lean_ctor_set(x_126, 1, x_121); +return x_126; +} +else +{ +lean_object* x_127; +x_127 = lean_ctor_get(x_124, 0); +lean_inc(x_127); +if (lean_obj_tag(x_127) == 0) +{ +lean_object* x_128; lean_object* x_129; +lean_dec(x_127); +lean_dec(x_124); +lean_dec(x_123); +x_128 = l_Lean_TypeClass_generate___closed__2; +x_129 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_129, 0, x_128); +lean_ctor_set(x_129, 1, x_121); +return x_129; +} +else +{ +lean_object* x_130; lean_object* x_131; lean_object* x_132; lean_object* x_133; lean_object* x_134; lean_object* x_135; lean_object* x_136; +x_130 = lean_ctor_get(x_124, 1); +lean_inc(x_130); +lean_dec(x_124); +x_131 = lean_ctor_get(x_127, 0); +lean_inc(x_131); +lean_dec(x_127); +x_132 = lean_box(0); +x_133 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_133, 0, x_132); +lean_ctor_set(x_133, 1, x_121); +x_134 = lean_ctor_get(x_123, 0); +lean_inc(x_134); +lean_dec(x_123); +x_135 = lean_ctor_get(x_134, 1); +lean_inc(x_135); +x_136 = l_Lean_TypeClass_constNameToTypedExpr(x_135, x_131, x_133); +if (lean_obj_tag(x_136) == 0) +{ +lean_object* x_137; lean_object* x_138; lean_object* x_139; lean_object* x_140; lean_object* x_141; lean_object* x_142; lean_object* x_143; lean_object* x_144; +x_137 = lean_ctor_get(x_136, 0); +lean_inc(x_137); +x_138 = lean_ctor_get(x_136, 1); +lean_inc(x_138); +if (lean_is_exclusive(x_136)) { + lean_ctor_release(x_136, 0); + lean_ctor_release(x_136, 1); + x_139 = x_136; +} else { + lean_dec_ref(x_136); + x_139 = lean_box(0); +} +if (lean_is_scalar(x_139)) { + x_140 = lean_alloc_ctor(0, 2, 0); +} else { + x_140 = x_139; +} +lean_ctor_set(x_140, 0, x_132); +lean_ctor_set(x_140, 1, x_138); +x_141 = lean_ctor_get(x_137, 0); +lean_inc(x_141); +x_142 = lean_ctor_get(x_137, 1); +lean_inc(x_142); +lean_dec(x_137); +x_143 = lean_ctor_get(x_134, 2); +lean_inc(x_143); +x_144 = l_Lean_TypeClass_tryResolve(x_142, x_143, x_141, x_140); +if (lean_obj_tag(x_144) == 0) +{ +lean_object* x_145; lean_object* x_146; lean_object* x_147; lean_object* x_148; lean_object* x_149; uint8_t x_165; +x_145 = lean_ctor_get(x_144, 0); +lean_inc(x_145); +x_146 = lean_ctor_get(x_144, 1); +lean_inc(x_146); +if (lean_is_exclusive(x_144)) { + lean_ctor_release(x_144, 0); + lean_ctor_release(x_144, 1); + x_147 = x_144; +} else { + lean_dec_ref(x_144); + x_147 = lean_box(0); +} +x_165 = l_List_isEmpty___rarg(x_130); +if (x_165 == 0) +{ +lean_object* x_166; lean_object* x_167; lean_object* x_168; lean_object* x_169; uint8_t x_170; +x_166 = lean_ctor_get(x_146, 3); +lean_inc(x_166); +x_167 = lean_array_get_size(x_166); +x_168 = lean_unsigned_to_nat(1u); +x_169 = lean_nat_sub(x_167, x_168); +x_170 = lean_nat_dec_lt(x_169, x_167); +lean_dec(x_167); +if (x_170 == 0) +{ +lean_dec(x_169); +lean_dec(x_130); +x_148 = x_166; +x_149 = x_146; +goto block_164; +} +else +{ +lean_object* x_171; lean_object* x_172; lean_object* x_173; lean_object* x_174; lean_object* x_175; lean_object* x_176; lean_object* x_177; +x_171 = lean_array_fget(x_166, x_169); +x_172 = l_Lean_TypeClass_GeneratorNode_Inhabited___closed__1; +x_173 = lean_array_fset(x_166, x_169, x_172); +x_174 = lean_ctor_get(x_171, 0); +lean_inc(x_174); +if (lean_is_exclusive(x_171)) { + lean_ctor_release(x_171, 0); + lean_ctor_release(x_171, 1); + x_175 = x_171; +} else { + lean_dec_ref(x_171); + x_175 = lean_box(0); +} +if (lean_is_scalar(x_175)) { + x_176 = lean_alloc_ctor(0, 2, 0); +} else { + x_176 = x_175; +} +lean_ctor_set(x_176, 0, x_174); +lean_ctor_set(x_176, 1, x_130); +x_177 = lean_array_fset(x_173, x_169, x_176); +lean_dec(x_169); +x_148 = x_177; +x_149 = x_146; +goto block_164; +} +} +else +{ +lean_object* x_178; lean_object* x_179; +lean_dec(x_130); +x_178 = lean_ctor_get(x_146, 3); +lean_inc(x_178); +x_179 = lean_array_pop(x_178); +x_148 = x_179; +x_149 = x_146; +goto block_164; +} +block_164: +{ +lean_object* x_150; lean_object* x_151; lean_object* x_152; lean_object* x_153; lean_object* x_154; lean_object* x_155; lean_object* x_156; lean_object* x_157; +x_150 = lean_ctor_get(x_149, 0); +lean_inc(x_150); +x_151 = lean_ctor_get(x_149, 1); +lean_inc(x_151); +x_152 = lean_ctor_get(x_149, 2); +lean_inc(x_152); +x_153 = lean_ctor_get(x_149, 4); +lean_inc(x_153); +x_154 = lean_ctor_get(x_149, 5); +lean_inc(x_154); +x_155 = lean_ctor_get(x_149, 6); +lean_inc(x_155); +if (lean_is_exclusive(x_149)) { + lean_ctor_release(x_149, 0); + lean_ctor_release(x_149, 1); + lean_ctor_release(x_149, 2); + lean_ctor_release(x_149, 3); + lean_ctor_release(x_149, 4); + lean_ctor_release(x_149, 5); + lean_ctor_release(x_149, 6); + x_156 = x_149; +} else { + lean_dec_ref(x_149); + x_156 = lean_box(0); +} +if (lean_is_scalar(x_156)) { + x_157 = lean_alloc_ctor(0, 7, 0); +} else { + x_157 = x_156; +} +lean_ctor_set(x_157, 0, x_150); +lean_ctor_set(x_157, 1, x_151); +lean_ctor_set(x_157, 2, x_152); +lean_ctor_set(x_157, 3, x_148); +lean_ctor_set(x_157, 4, x_153); +lean_ctor_set(x_157, 5, x_154); +lean_ctor_set(x_157, 6, x_155); +if (lean_obj_tag(x_145) == 0) +{ +lean_object* x_158; +lean_dec(x_134); +if (lean_is_scalar(x_147)) { + x_158 = lean_alloc_ctor(0, 2, 0); +} else { + x_158 = x_147; +} +lean_ctor_set(x_158, 0, x_132); +lean_ctor_set(x_158, 1, x_157); +return x_158; +} +else +{ +lean_object* x_159; lean_object* x_160; lean_object* x_161; lean_object* x_162; lean_object* x_163; +x_159 = lean_ctor_get(x_145, 0); +lean_inc(x_159); +lean_dec(x_145); +if (lean_is_scalar(x_147)) { + x_160 = lean_alloc_ctor(0, 2, 0); +} else { + x_160 = x_147; +} +lean_ctor_set(x_160, 0, x_132); +lean_ctor_set(x_160, 1, x_157); +x_161 = lean_ctor_get(x_159, 0); +lean_inc(x_161); +x_162 = lean_ctor_get(x_159, 1); +lean_inc(x_162); +lean_dec(x_159); +x_163 = l_Lean_TypeClass_newConsumerNode(x_134, x_161, x_162, x_160); +return x_163; +} +} +} +else +{ +lean_object* x_180; lean_object* x_181; lean_object* x_182; lean_object* x_183; +lean_dec(x_134); +lean_dec(x_130); +x_180 = lean_ctor_get(x_144, 0); +lean_inc(x_180); +x_181 = lean_ctor_get(x_144, 1); +lean_inc(x_181); +if (lean_is_exclusive(x_144)) { + lean_ctor_release(x_144, 0); + lean_ctor_release(x_144, 1); + x_182 = x_144; +} else { + lean_dec_ref(x_144); + x_182 = lean_box(0); +} +if (lean_is_scalar(x_182)) { + x_183 = lean_alloc_ctor(1, 2, 0); +} else { + x_183 = x_182; +} +lean_ctor_set(x_183, 0, x_180); +lean_ctor_set(x_183, 1, x_181); +return x_183; +} +} +else +{ +lean_object* x_184; lean_object* x_185; lean_object* x_186; lean_object* x_187; +lean_dec(x_134); +lean_dec(x_130); +x_184 = lean_ctor_get(x_136, 0); +lean_inc(x_184); +x_185 = lean_ctor_get(x_136, 1); +lean_inc(x_185); +if (lean_is_exclusive(x_136)) { + lean_ctor_release(x_136, 0); + lean_ctor_release(x_136, 1); + x_186 = x_136; +} else { + lean_dec_ref(x_136); + x_186 = lean_box(0); +} +if (lean_is_scalar(x_186)) { + x_187 = lean_alloc_ctor(1, 2, 0); +} else { + x_187 = x_186; +} +lean_ctor_set(x_187, 0, x_184); +lean_ctor_set(x_187, 1, x_185); +return x_187; +} +} +} +} +} +} +lean_object* l_Array_back___at_Lean_TypeClass_generate___spec__1___boxed(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = l_Array_back___at_Lean_TypeClass_generate___spec__1(x_1); +lean_dec(x_1); +return x_2; +} +} +lean_object* _init_l_Lean_TypeClass_step___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("FAILED TO SYNTHESIZE"); +return x_1; +} +} +lean_object* l_Lean_TypeClass_step(lean_object* x_1) { +_start: +{ +uint8_t x_2; +x_2 = !lean_is_exclusive(x_1); +if (x_2 == 0) +{ +lean_object* x_3; lean_object* x_4; lean_object* x_5; lean_object* x_6; uint8_t x_7; +x_3 = lean_ctor_get(x_1, 1); +x_4 = lean_ctor_get(x_1, 0); +lean_dec(x_4); +x_5 = lean_box(0); +lean_inc(x_3); +lean_ctor_set(x_1, 0, x_5); +x_6 = lean_ctor_get(x_3, 5); +lean_inc(x_6); +x_7 = l_Queue_isEmpty___rarg(x_6); +lean_dec(x_6); +if (x_7 == 0) +{ +lean_object* x_8; +lean_dec(x_3); +x_8 = l_Lean_TypeClass_resume(x_1); +return x_8; +} +else +{ +lean_object* x_9; uint8_t x_10; +x_9 = lean_ctor_get(x_3, 4); +lean_inc(x_9); +x_10 = l_Array_isEmpty___rarg(x_9); +lean_dec(x_9); +if (x_10 == 0) +{ +lean_object* x_11; +lean_dec(x_3); +x_11 = l_Lean_TypeClass_consume(x_1); +return x_11; +} +else +{ +lean_object* x_12; uint8_t x_13; +x_12 = lean_ctor_get(x_3, 3); +lean_inc(x_12); +x_13 = l_Array_isEmpty___rarg(x_12); +lean_dec(x_12); +if (x_13 == 0) +{ +lean_object* x_14; +lean_dec(x_3); +x_14 = l_Lean_TypeClass_generate(x_1); +return x_14; +} +else +{ +lean_object* x_15; lean_object* x_16; +lean_dec(x_1); +x_15 = l_Lean_TypeClass_step___closed__1; +x_16 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_16, 0, x_15); +lean_ctor_set(x_16, 1, x_3); +return x_16; +} +} +} +} +else +{ +lean_object* x_17; lean_object* x_18; lean_object* x_19; lean_object* x_20; uint8_t x_21; +x_17 = lean_ctor_get(x_1, 1); +lean_inc(x_17); +lean_dec(x_1); +x_18 = lean_box(0); +lean_inc(x_17); +x_19 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_19, 0, x_18); +lean_ctor_set(x_19, 1, x_17); +x_20 = lean_ctor_get(x_17, 5); +lean_inc(x_20); +x_21 = l_Queue_isEmpty___rarg(x_20); +lean_dec(x_20); +if (x_21 == 0) +{ +lean_object* x_22; +lean_dec(x_17); +x_22 = l_Lean_TypeClass_resume(x_19); +return x_22; +} +else +{ +lean_object* x_23; uint8_t x_24; +x_23 = lean_ctor_get(x_17, 4); +lean_inc(x_23); +x_24 = l_Array_isEmpty___rarg(x_23); +lean_dec(x_23); +if (x_24 == 0) +{ +lean_object* x_25; +lean_dec(x_17); +x_25 = l_Lean_TypeClass_consume(x_19); +return x_25; +} +else +{ +lean_object* x_26; uint8_t x_27; +x_26 = lean_ctor_get(x_17, 3); +lean_inc(x_26); +x_27 = l_Array_isEmpty___rarg(x_26); +lean_dec(x_26); +if (x_27 == 0) +{ +lean_object* x_28; +lean_dec(x_17); +x_28 = l_Lean_TypeClass_generate(x_19); +return x_28; +} +else +{ +lean_object* x_29; lean_object* x_30; +lean_dec(x_19); +x_29 = l_Lean_TypeClass_step___closed__1; +x_30 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_30, 0, x_29); +lean_ctor_set(x_30, 1, x_17); +return x_30; +} +} +} +} +} +} +lean_object* _init_l_Lean_TypeClass_synthCore___main___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("[synthCore] out of fuel"); +return x_1; +} +} +lean_object* l_Lean_TypeClass_synthCore___main(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; uint8_t x_4; +x_3 = lean_unsigned_to_nat(0u); +x_4 = lean_nat_dec_eq(x_1, x_3); +if (x_4 == 0) +{ +lean_object* x_5; lean_object* x_6; lean_object* x_7; +x_5 = lean_unsigned_to_nat(1u); +x_6 = lean_nat_sub(x_1, x_5); +lean_dec(x_1); +x_7 = l_Lean_TypeClass_step(x_2); +if (lean_obj_tag(x_7) == 0) +{ +uint8_t x_8; +x_8 = !lean_is_exclusive(x_7); +if (x_8 == 0) +{ +lean_object* x_9; lean_object* x_10; lean_object* x_11; +x_9 = lean_ctor_get(x_7, 1); +x_10 = lean_ctor_get(x_7, 0); +lean_dec(x_10); +x_11 = lean_ctor_get(x_9, 1); +lean_inc(x_11); +if (lean_obj_tag(x_11) == 0) +{ +lean_object* x_12; +x_12 = lean_box(0); +lean_ctor_set(x_7, 0, x_12); +x_1 = x_6; +x_2 = x_7; +goto _start; +} +else +{ +lean_object* x_14; +lean_dec(x_6); +x_14 = lean_ctor_get(x_11, 0); +lean_inc(x_14); +lean_dec(x_11); +lean_ctor_set(x_7, 0, x_14); +return x_7; +} +} +else +{ +lean_object* x_15; lean_object* x_16; +x_15 = lean_ctor_get(x_7, 1); +lean_inc(x_15); +lean_dec(x_7); +x_16 = lean_ctor_get(x_15, 1); +lean_inc(x_16); +if (lean_obj_tag(x_16) == 0) +{ +lean_object* x_17; lean_object* x_18; +x_17 = lean_box(0); +x_18 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_18, 0, x_17); +lean_ctor_set(x_18, 1, x_15); +x_1 = x_6; +x_2 = x_18; +goto _start; +} +else +{ +lean_object* x_20; lean_object* x_21; +lean_dec(x_6); +x_20 = lean_ctor_get(x_16, 0); +lean_inc(x_20); +lean_dec(x_16); +x_21 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_21, 0, x_20); +lean_ctor_set(x_21, 1, x_15); +return x_21; +} +} +} +else +{ +uint8_t x_22; +lean_dec(x_6); +x_22 = !lean_is_exclusive(x_7); +if (x_22 == 0) +{ +return x_7; +} +else +{ +lean_object* x_23; lean_object* x_24; lean_object* x_25; +x_23 = lean_ctor_get(x_7, 0); +x_24 = lean_ctor_get(x_7, 1); +lean_inc(x_24); +lean_inc(x_23); +lean_dec(x_7); +x_25 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_25, 0, x_23); +lean_ctor_set(x_25, 1, x_24); +return x_25; +} +} +} +else +{ +uint8_t x_26; +lean_dec(x_1); +x_26 = !lean_is_exclusive(x_2); +if (x_26 == 0) +{ +lean_object* x_27; lean_object* x_28; +x_27 = lean_ctor_get(x_2, 0); +lean_dec(x_27); +x_28 = l_Lean_TypeClass_synthCore___main___closed__1; +lean_ctor_set_tag(x_2, 1); +lean_ctor_set(x_2, 0, x_28); +return x_2; +} +else +{ +lean_object* x_29; lean_object* x_30; lean_object* x_31; +x_29 = lean_ctor_get(x_2, 1); +lean_inc(x_29); +lean_dec(x_2); +x_30 = l_Lean_TypeClass_synthCore___main___closed__1; +x_31 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_31, 0, x_30); +lean_ctor_set(x_31, 1, x_29); +return x_31; +} +} +} +} +lean_object* l_Lean_TypeClass_synthCore___rarg(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = l_Lean_TypeClass_synthCore___main(x_1, x_2); +return x_3; +} +} +lean_object* l_Lean_TypeClass_synthCore(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = lean_alloc_closure((void*)(l_Lean_TypeClass_synthCore___rarg), 2, 0); +return x_3; +} +} +lean_object* l_Lean_TypeClass_synthCore___boxed(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; +x_3 = l_Lean_TypeClass_synthCore(x_1, x_2); +lean_dec(x_2); +lean_dec(x_1); +return x_3; +} +} +lean_object* l_Lean_TypeClass_collectUReplacements___main(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +if (lean_obj_tag(x_1) == 0) +{ +lean_object* x_5; lean_object* x_6; +x_5 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_5, 0, x_3); +lean_ctor_set(x_5, 1, x_4); +x_6 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_6, 0, x_2); +lean_ctor_set(x_6, 1, x_5); +return x_6; +} +else +{ +lean_object* x_7; lean_object* x_8; uint8_t x_9; +x_7 = lean_ctor_get(x_1, 0); +lean_inc(x_7); +x_8 = lean_ctor_get(x_1, 1); +lean_inc(x_8); +lean_dec(x_1); +x_9 = l_Lean_Level_hasMVar___main(x_7); +if (x_9 == 0) +{ +lean_object* x_10; +x_10 = lean_array_push(x_4, x_7); +x_1 = x_8; +x_4 = x_10; +goto _start; +} +else +{ +lean_object* x_12; uint8_t x_13; +x_12 = l_Lean_TypeClass_Context_uNewMeta(x_2); +x_13 = !lean_is_exclusive(x_12); +if (x_13 == 0) +{ +lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; +x_14 = lean_ctor_get(x_12, 0); +x_15 = lean_ctor_get(x_12, 1); +lean_inc(x_14); +lean_ctor_set(x_12, 1, x_7); +x_16 = lean_array_push(x_3, x_12); +x_17 = lean_array_push(x_4, x_14); +x_1 = x_8; +x_2 = x_15; +x_3 = x_16; +x_4 = x_17; +goto _start; +} +else +{ +lean_object* x_19; lean_object* x_20; lean_object* x_21; lean_object* x_22; lean_object* x_23; +x_19 = lean_ctor_get(x_12, 0); +x_20 = lean_ctor_get(x_12, 1); +lean_inc(x_20); +lean_inc(x_19); +lean_dec(x_12); +lean_inc(x_19); +x_21 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_21, 0, x_19); +lean_ctor_set(x_21, 1, x_7); +x_22 = lean_array_push(x_3, x_21); +x_23 = lean_array_push(x_4, x_19); +x_1 = x_8; +x_2 = x_20; +x_3 = x_22; +x_4 = x_23; +goto _start; +} +} +} +} +} +lean_object* l_Lean_TypeClass_collectUReplacements(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_TypeClass_collectUReplacements___main(x_1, x_2, x_3, x_4); +return x_5; +} +} +lean_object* _init_l_panicWithPos___at_Lean_TypeClass_collectEReplacements___main___spec__1___closed__1() { +_start: +{ +lean_object* x_1; lean_object* x_2; +x_1 = l_Array_empty___closed__1; +x_2 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_2, 0, x_1); +lean_ctor_set(x_2, 1, x_1); +return x_2; +} +} +lean_object* _init_l_panicWithPos___at_Lean_TypeClass_collectEReplacements___main___spec__1___closed__2() { +_start: +{ +lean_object* x_1; lean_object* x_2; lean_object* x_3; +x_1 = l_Lean_TypeClass_Context_Inhabited; +x_2 = l_panicWithPos___at_Lean_TypeClass_collectEReplacements___main___spec__1___closed__1; +x_3 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_3, 0, x_1); +lean_ctor_set(x_3, 1, x_2); +return x_3; +} +} +lean_object* l_panicWithPos___at_Lean_TypeClass_collectEReplacements___main___spec__1(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; lean_object* x_18; lean_object* x_19; +x_5 = l_panicWithPos___rarg___closed__1; +x_6 = lean_string_append(x_5, x_1); +x_7 = l_panicWithPos___rarg___closed__2; +x_8 = lean_string_append(x_6, x_7); +x_9 = l_Nat_repr(x_2); +x_10 = lean_string_append(x_8, x_9); +lean_dec(x_9); +x_11 = l_panicWithPos___rarg___closed__2; +x_12 = lean_string_append(x_10, x_11); +x_13 = l_Nat_repr(x_3); +x_14 = lean_string_append(x_12, x_13); +lean_dec(x_13); +x_15 = l_panicWithPos___rarg___closed__3; +x_16 = lean_string_append(x_14, x_15); +x_17 = lean_string_append(x_16, x_4); +x_18 = l_panicWithPos___at_Lean_TypeClass_collectEReplacements___main___spec__1___closed__2; +x_19 = lean_panic_fn(x_17); +return x_19; +} +} +lean_object* _init_l_Lean_TypeClass_collectEReplacements___main___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("/Users/leonardodemoura/projects/lean4/library/init/lean/typeclass/synth.lean"); +return x_1; +} +} +lean_object* _init_l_Lean_TypeClass_collectEReplacements___main___closed__2() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("TODO(dselsam): this case not yet handled"); +return x_1; +} +} +lean_object* l_Lean_TypeClass_collectEReplacements___main(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { +_start: +{ +if (lean_obj_tag(x_3) == 7) +{ +if (lean_obj_tag(x_4) == 0) +{ +lean_object* x_8; lean_object* x_9; +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +x_8 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_8, 0, x_6); +lean_ctor_set(x_8, 1, x_7); +x_9 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_9, 0, x_5); +lean_ctor_set(x_9, 1, x_8); +return x_9; +} +else +{ +lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; uint8_t x_14; +x_10 = lean_ctor_get(x_3, 1); +lean_inc(x_10); +x_11 = lean_ctor_get(x_3, 2); +lean_inc(x_11); +lean_dec(x_3); +x_12 = lean_ctor_get(x_4, 0); +lean_inc(x_12); +x_13 = lean_ctor_get(x_4, 1); +lean_inc(x_13); +lean_dec(x_4); +lean_inc(x_10); +x_14 = lean_is_out_param(x_10); +if (x_14 == 0) +{ +lean_object* x_15; lean_object* x_16; +lean_dec(x_10); +lean_inc(x_12); +x_15 = lean_expr_instantiate1(x_11, x_12); +x_16 = lean_array_push(x_7, x_12); +x_3 = x_15; +x_4 = x_13; +x_7 = x_16; +goto _start; +} +else +{ +lean_object* x_18; lean_object* x_19; uint8_t x_20; +lean_inc(x_2); +lean_inc(x_1); +x_18 = l_Lean_LocalContext_mkForall(x_1, x_2, x_10); +x_19 = l_Lean_TypeClass_Context_eNewMeta(x_18, x_5); +x_20 = !lean_is_exclusive(x_19); +if (x_20 == 0) +{ +lean_object* x_21; lean_object* x_22; lean_object* x_23; lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; +x_21 = lean_ctor_get(x_19, 0); +x_22 = lean_ctor_get(x_19, 1); +x_23 = l_Array_toList___rarg(x_2); +lean_inc(x_21); +x_24 = l_List_foldl___main___at_Lean_mkApp___spec__1(x_21, x_23); +lean_inc(x_24); +x_25 = lean_expr_instantiate1(x_11, x_24); +lean_ctor_set(x_19, 1, x_12); +x_26 = lean_array_push(x_6, x_19); +x_27 = lean_array_push(x_7, x_24); +x_3 = x_25; +x_4 = x_13; +x_5 = x_22; +x_6 = x_26; +x_7 = x_27; +goto _start; +} +else +{ +lean_object* x_29; lean_object* x_30; lean_object* x_31; lean_object* x_32; lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; +x_29 = lean_ctor_get(x_19, 0); +x_30 = lean_ctor_get(x_19, 1); +lean_inc(x_30); +lean_inc(x_29); +lean_dec(x_19); +x_31 = l_Array_toList___rarg(x_2); +lean_inc(x_29); +x_32 = l_List_foldl___main___at_Lean_mkApp___spec__1(x_29, x_31); +lean_inc(x_32); +x_33 = lean_expr_instantiate1(x_11, x_32); +x_34 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_34, 0, x_29); +lean_ctor_set(x_34, 1, x_12); +x_35 = lean_array_push(x_6, x_34); +x_36 = lean_array_push(x_7, x_32); +x_3 = x_33; +x_4 = x_13; +x_5 = x_30; +x_6 = x_35; +x_7 = x_36; +goto _start; +} +} +} +} +else +{ +lean_dec(x_3); +lean_dec(x_2); +lean_dec(x_1); +if (lean_obj_tag(x_4) == 0) +{ +lean_object* x_38; lean_object* x_39; +x_38 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_38, 0, x_6); +lean_ctor_set(x_38, 1, x_7); +x_39 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_39, 0, x_5); +lean_ctor_set(x_39, 1, x_38); +return x_39; +} +else +{ +lean_object* x_40; lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; +lean_dec(x_7); +lean_dec(x_6); +lean_dec(x_5); +lean_dec(x_4); +x_40 = l_Lean_TypeClass_collectEReplacements___main___closed__1; +x_41 = lean_unsigned_to_nat(276u); +x_42 = lean_unsigned_to_nat(27u); +x_43 = l_Lean_TypeClass_collectEReplacements___main___closed__2; +x_44 = l_panicWithPos___at_Lean_TypeClass_collectEReplacements___main___spec__1(x_40, x_41, x_42, x_43); +return x_44; +} +} +} +} +lean_object* l_panicWithPos___at_Lean_TypeClass_collectEReplacements___main___spec__1___boxed(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4) { +_start: +{ +lean_object* x_5; +x_5 = l_panicWithPos___at_Lean_TypeClass_collectEReplacements___main___spec__1(x_1, x_2, x_3, x_4); +lean_dec(x_4); +lean_dec(x_1); +return x_5; +} +} +lean_object* l_Lean_TypeClass_collectEReplacements___rarg(lean_object* x_1, lean_object* x_2, lean_object* x_3, lean_object* x_4, lean_object* x_5, lean_object* x_6, lean_object* x_7) { +_start: +{ +lean_object* x_8; +x_8 = l_Lean_TypeClass_collectEReplacements___main(x_1, x_2, x_3, x_4, x_5, x_6, x_7); +return x_8; +} +} +lean_object* l_Lean_TypeClass_collectEReplacements(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = lean_alloc_closure((void*)(l_Lean_TypeClass_collectEReplacements___rarg), 7, 0); +return x_2; +} +} +lean_object* l_Lean_TypeClass_collectEReplacements___boxed(lean_object* x_1) { +_start: +{ +lean_object* x_2; +x_2 = l_Lean_TypeClass_collectEReplacements(x_1); +lean_dec(x_1); +return x_2; +} +} +lean_object* _init_l_Lean_TypeClass_preprocessForOutParams___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("found constant not in the environment"); +return x_1; +} +} +lean_object* l_Lean_TypeClass_preprocessForOutParams(lean_object* x_1, lean_object* x_2) { +_start: +{ +lean_object* x_3; uint8_t x_274; +x_274 = lean_expr_has_mvar(x_2); +if (x_274 == 0) +{ +lean_object* x_275; uint8_t x_276; +x_275 = l_Lean_Expr_getAppFn___main(x_2); +x_276 = l_Lean_Expr_isConst(x_275); +if (x_276 == 0) +{ +lean_object* x_277; +lean_dec(x_275); +x_277 = lean_box(0); +x_3 = x_277; +goto block_273; +} +else +{ +lean_object* x_278; uint8_t x_279; +x_278 = l_Lean_Expr_constName(x_275); +lean_dec(x_275); +lean_inc(x_1); +x_279 = lean_has_out_params(x_1, x_278); +if (x_279 == 0) +{ +lean_object* x_280; lean_object* x_281; lean_object* x_282; lean_object* x_283; +lean_dec(x_1); +x_280 = l_panicWithPos___at_Lean_TypeClass_collectEReplacements___main___spec__1___closed__1; +x_281 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_281, 0, x_2); +lean_ctor_set(x_281, 1, x_280); +x_282 = l_Lean_TypeClass_Context_Inhabited___closed__1; +x_283 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_283, 0, x_282); +lean_ctor_set(x_283, 1, x_281); +return x_283; +} +else +{ +lean_object* x_284; +x_284 = lean_box(0); +x_3 = x_284; +goto block_273; +} +} +} +else +{ +lean_object* x_285; +x_285 = lean_box(0); +x_3 = x_285; +goto block_273; +} +block_273: +{ +lean_object* x_4; lean_object* x_5; lean_object* x_6; lean_object* x_7; uint8_t x_8; +lean_dec(x_3); +x_4 = lean_unsigned_to_nat(0u); +x_5 = l_Lean_LocalContext_Inhabited___closed__1; +x_6 = l_Array_empty___closed__1; +lean_inc(x_2); +x_7 = l_Lean_TypeClass_introduceLocals___main(x_4, x_5, x_6, x_2); +x_8 = !lean_is_exclusive(x_7); +if (x_8 == 0) +{ +lean_object* x_9; uint8_t x_10; +x_9 = lean_ctor_get(x_7, 1); +x_10 = !lean_is_exclusive(x_9); +if (x_10 == 0) +{ +lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; uint8_t x_17; +x_11 = lean_ctor_get(x_7, 0); +x_12 = lean_ctor_get(x_9, 1); +x_13 = lean_ctor_get(x_9, 0); +lean_dec(x_13); +x_14 = l_Lean_Expr_getAppFn___main(x_2); +x_15 = lean_box(0); +x_16 = l_Lean_Expr_getAppArgsAux___main(x_2, x_15); +x_17 = l_Lean_Expr_isConst(x_14); +if (x_17 == 0) +{ +lean_object* x_18; lean_object* x_19; +lean_dec(x_16); +lean_dec(x_14); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_1); +x_18 = l_panicWithPos___at_Lean_TypeClass_collectEReplacements___main___spec__1___closed__1; +lean_ctor_set(x_9, 1, x_18); +lean_ctor_set(x_9, 0, x_2); +x_19 = l_Lean_TypeClass_Context_Inhabited___closed__1; +lean_ctor_set(x_7, 0, x_19); +return x_7; +} +else +{ +lean_object* x_20; uint8_t x_21; +x_20 = l_Lean_Expr_constName(x_14); +lean_inc(x_20); +lean_inc(x_1); +x_21 = lean_is_class(x_1, x_20); +if (x_21 == 0) +{ +lean_object* x_22; lean_object* x_23; +lean_dec(x_20); +lean_dec(x_16); +lean_dec(x_14); +lean_dec(x_12); +lean_dec(x_11); +lean_dec(x_1); +x_22 = l_panicWithPos___at_Lean_TypeClass_collectEReplacements___main___spec__1___closed__1; +lean_ctor_set(x_9, 1, x_22); +lean_ctor_set(x_9, 0, x_2); +x_23 = l_Lean_TypeClass_Context_Inhabited___closed__1; +lean_ctor_set(x_7, 0, x_23); +return x_7; +} +else +{ +lean_object* x_24; lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; lean_object* x_30; lean_object* x_31; uint8_t x_32; +lean_free_object(x_9); +lean_free_object(x_7); +lean_dec(x_2); +x_24 = l_Lean_Expr_constLevels(x_14); +x_25 = l_Lean_TypeClass_Context_Inhabited___closed__1; +x_26 = l_Lean_TypeClass_collectUReplacements___main(x_24, x_25, x_6, x_6); +x_27 = lean_ctor_get(x_26, 1); +lean_inc(x_27); +x_28 = lean_ctor_get(x_26, 0); +lean_inc(x_28); +lean_dec(x_26); +x_29 = lean_ctor_get(x_27, 0); +lean_inc(x_29); +x_30 = lean_ctor_get(x_27, 1); +lean_inc(x_30); +if (lean_is_exclusive(x_27)) { + lean_ctor_release(x_27, 0); + lean_ctor_release(x_27, 1); + x_31 = x_27; +} else { + lean_dec_ref(x_27); + x_31 = lean_box(0); +} +x_32 = l_Array_isEmpty___rarg(x_29); +if (x_32 == 0) +{ +lean_object* x_33; lean_object* x_34; lean_object* x_35; lean_object* x_36; lean_object* x_37; +lean_dec(x_14); +x_33 = l_Array_toList___rarg(x_30); +lean_dec(x_30); +lean_inc(x_33); +x_34 = lean_expr_mk_const(x_20, x_33); +x_35 = l_Lean_Expr_constName(x_34); +x_36 = lean_environment_find(x_1, x_35); +if (lean_obj_tag(x_36) == 0) +{ +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_dec(x_33); +x_68 = l_Lean_TypeClass_collectEReplacements___main___closed__1; +x_69 = lean_unsigned_to_nat(292u); +x_70 = lean_unsigned_to_nat(16u); +x_71 = l_Lean_TypeClass_preprocessForOutParams___closed__1; +x_72 = l_panicWithPos___at_Lean_TypeClass_Context_eInfer___spec__1(x_68, x_69, x_70, x_71); +lean_inc(x_12); +lean_inc(x_11); +x_73 = l_Lean_TypeClass_collectEReplacements___main(x_11, x_12, x_72, x_16, x_28, x_6, x_6); +x_37 = x_73; +goto block_67; +} +else +{ +lean_object* x_74; lean_object* x_75; lean_object* x_76; +x_74 = lean_ctor_get(x_36, 0); +lean_inc(x_74); +lean_dec(x_36); +x_75 = lean_instantiate_type_lparams(x_74, x_33); +lean_inc(x_12); +lean_inc(x_11); +x_76 = l_Lean_TypeClass_collectEReplacements___main(x_11, x_12, x_75, x_16, x_28, x_6, x_6); +x_37 = x_76; +goto block_67; +} +block_67: +{ +uint8_t x_38; +x_38 = !lean_is_exclusive(x_37); +if (x_38 == 0) +{ +lean_object* x_39; uint8_t x_40; +x_39 = lean_ctor_get(x_37, 1); +x_40 = !lean_is_exclusive(x_39); +if (x_40 == 0) +{ +lean_object* x_41; lean_object* x_42; lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; +x_41 = lean_ctor_get(x_37, 0); +x_42 = lean_ctor_get(x_39, 0); +x_43 = lean_ctor_get(x_39, 1); +x_44 = l_Array_toList___rarg(x_43); +lean_dec(x_43); +x_45 = l_List_foldl___main___at_Lean_mkApp___spec__1(x_34, x_44); +x_46 = l_Lean_LocalContext_mkForall(x_11, x_12, x_45); +lean_ctor_set(x_39, 1, x_42); +lean_ctor_set(x_39, 0, x_29); +lean_ctor_set(x_37, 0, x_46); +if (lean_is_scalar(x_31)) { + x_47 = lean_alloc_ctor(0, 2, 0); +} else { + x_47 = x_31; +} +lean_ctor_set(x_47, 0, x_41); +lean_ctor_set(x_47, 1, x_37); +return x_47; +} +else +{ +lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_object* x_51; lean_object* x_52; lean_object* x_53; lean_object* x_54; lean_object* x_55; +x_48 = lean_ctor_get(x_37, 0); +x_49 = lean_ctor_get(x_39, 0); +x_50 = lean_ctor_get(x_39, 1); +lean_inc(x_50); +lean_inc(x_49); +lean_dec(x_39); +x_51 = l_Array_toList___rarg(x_50); +lean_dec(x_50); +x_52 = l_List_foldl___main___at_Lean_mkApp___spec__1(x_34, x_51); +x_53 = l_Lean_LocalContext_mkForall(x_11, x_12, x_52); +x_54 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_54, 0, x_29); +lean_ctor_set(x_54, 1, x_49); +lean_ctor_set(x_37, 1, x_54); +lean_ctor_set(x_37, 0, x_53); +if (lean_is_scalar(x_31)) { + x_55 = lean_alloc_ctor(0, 2, 0); +} else { + x_55 = x_31; +} +lean_ctor_set(x_55, 0, x_48); +lean_ctor_set(x_55, 1, x_37); +return x_55; +} +} +else +{ +lean_object* x_56; lean_object* x_57; lean_object* x_58; lean_object* x_59; lean_object* x_60; lean_object* x_61; lean_object* x_62; lean_object* x_63; lean_object* x_64; lean_object* x_65; lean_object* x_66; +x_56 = lean_ctor_get(x_37, 1); +x_57 = lean_ctor_get(x_37, 0); +lean_inc(x_56); +lean_inc(x_57); +lean_dec(x_37); +x_58 = lean_ctor_get(x_56, 0); +lean_inc(x_58); +x_59 = lean_ctor_get(x_56, 1); +lean_inc(x_59); +if (lean_is_exclusive(x_56)) { + lean_ctor_release(x_56, 0); + lean_ctor_release(x_56, 1); + x_60 = x_56; +} else { + lean_dec_ref(x_56); + x_60 = lean_box(0); +} +x_61 = l_Array_toList___rarg(x_59); +lean_dec(x_59); +x_62 = l_List_foldl___main___at_Lean_mkApp___spec__1(x_34, x_61); +x_63 = l_Lean_LocalContext_mkForall(x_11, x_12, x_62); +if (lean_is_scalar(x_60)) { + x_64 = lean_alloc_ctor(0, 2, 0); +} else { + x_64 = x_60; +} +lean_ctor_set(x_64, 0, x_29); +lean_ctor_set(x_64, 1, x_58); +x_65 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_65, 0, x_63); +lean_ctor_set(x_65, 1, x_64); +if (lean_is_scalar(x_31)) { + x_66 = lean_alloc_ctor(0, 2, 0); +} else { + x_66 = x_31; +} +lean_ctor_set(x_66, 0, x_57); +lean_ctor_set(x_66, 1, x_65); +return x_66; +} +} +} +else +{ +lean_object* x_77; lean_object* x_78; +x_77 = lean_environment_find(x_1, x_20); +if (lean_obj_tag(x_77) == 0) +{ +lean_object* x_109; lean_object* x_110; lean_object* x_111; lean_object* x_112; lean_object* x_113; lean_object* x_114; +lean_dec(x_30); +x_109 = l_Lean_TypeClass_collectEReplacements___main___closed__1; +x_110 = lean_unsigned_to_nat(292u); +x_111 = lean_unsigned_to_nat(16u); +x_112 = l_Lean_TypeClass_preprocessForOutParams___closed__1; +x_113 = l_panicWithPos___at_Lean_TypeClass_Context_eInfer___spec__1(x_109, x_110, x_111, x_112); +lean_inc(x_12); +lean_inc(x_11); +x_114 = l_Lean_TypeClass_collectEReplacements___main(x_11, x_12, x_113, x_16, x_28, x_6, x_6); +x_78 = x_114; +goto block_108; +} +else +{ +lean_object* x_115; lean_object* x_116; lean_object* x_117; lean_object* x_118; +x_115 = lean_ctor_get(x_77, 0); +lean_inc(x_115); +lean_dec(x_77); +x_116 = l_Array_toList___rarg(x_30); +lean_dec(x_30); +x_117 = lean_instantiate_type_lparams(x_115, x_116); +lean_inc(x_12); +lean_inc(x_11); +x_118 = l_Lean_TypeClass_collectEReplacements___main(x_11, x_12, x_117, x_16, x_28, x_6, x_6); +x_78 = x_118; +goto block_108; +} +block_108: +{ +uint8_t x_79; +x_79 = !lean_is_exclusive(x_78); +if (x_79 == 0) +{ +lean_object* x_80; uint8_t x_81; +x_80 = lean_ctor_get(x_78, 1); +x_81 = !lean_is_exclusive(x_80); +if (x_81 == 0) +{ +lean_object* x_82; lean_object* x_83; lean_object* x_84; lean_object* x_85; lean_object* x_86; lean_object* x_87; lean_object* x_88; +x_82 = lean_ctor_get(x_78, 0); +x_83 = lean_ctor_get(x_80, 0); +x_84 = lean_ctor_get(x_80, 1); +x_85 = l_Array_toList___rarg(x_84); +lean_dec(x_84); +x_86 = l_List_foldl___main___at_Lean_mkApp___spec__1(x_14, x_85); +x_87 = l_Lean_LocalContext_mkForall(x_11, x_12, x_86); +lean_ctor_set(x_80, 1, x_83); +lean_ctor_set(x_80, 0, x_29); +lean_ctor_set(x_78, 0, x_87); +if (lean_is_scalar(x_31)) { + x_88 = lean_alloc_ctor(0, 2, 0); +} else { + x_88 = x_31; +} +lean_ctor_set(x_88, 0, x_82); +lean_ctor_set(x_88, 1, x_78); +return x_88; +} +else +{ +lean_object* x_89; lean_object* x_90; lean_object* x_91; lean_object* x_92; lean_object* x_93; lean_object* x_94; lean_object* x_95; lean_object* x_96; +x_89 = lean_ctor_get(x_78, 0); +x_90 = lean_ctor_get(x_80, 0); +x_91 = lean_ctor_get(x_80, 1); +lean_inc(x_91); +lean_inc(x_90); +lean_dec(x_80); +x_92 = l_Array_toList___rarg(x_91); +lean_dec(x_91); +x_93 = l_List_foldl___main___at_Lean_mkApp___spec__1(x_14, x_92); +x_94 = l_Lean_LocalContext_mkForall(x_11, x_12, x_93); +x_95 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_95, 0, x_29); +lean_ctor_set(x_95, 1, x_90); +lean_ctor_set(x_78, 1, x_95); +lean_ctor_set(x_78, 0, x_94); +if (lean_is_scalar(x_31)) { + x_96 = lean_alloc_ctor(0, 2, 0); +} else { + x_96 = x_31; +} +lean_ctor_set(x_96, 0, x_89); +lean_ctor_set(x_96, 1, x_78); +return x_96; +} +} +else +{ +lean_object* x_97; lean_object* x_98; lean_object* x_99; lean_object* x_100; lean_object* x_101; lean_object* x_102; lean_object* x_103; lean_object* x_104; lean_object* x_105; lean_object* x_106; lean_object* x_107; +x_97 = lean_ctor_get(x_78, 1); +x_98 = lean_ctor_get(x_78, 0); +lean_inc(x_97); +lean_inc(x_98); +lean_dec(x_78); +x_99 = lean_ctor_get(x_97, 0); +lean_inc(x_99); +x_100 = lean_ctor_get(x_97, 1); +lean_inc(x_100); +if (lean_is_exclusive(x_97)) { + lean_ctor_release(x_97, 0); + lean_ctor_release(x_97, 1); + x_101 = x_97; +} else { + lean_dec_ref(x_97); + x_101 = lean_box(0); +} +x_102 = l_Array_toList___rarg(x_100); +lean_dec(x_100); +x_103 = l_List_foldl___main___at_Lean_mkApp___spec__1(x_14, x_102); +x_104 = l_Lean_LocalContext_mkForall(x_11, x_12, x_103); +if (lean_is_scalar(x_101)) { + x_105 = lean_alloc_ctor(0, 2, 0); +} else { + x_105 = x_101; +} +lean_ctor_set(x_105, 0, x_29); +lean_ctor_set(x_105, 1, x_99); +x_106 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_106, 0, x_104); +lean_ctor_set(x_106, 1, x_105); +if (lean_is_scalar(x_31)) { + x_107 = lean_alloc_ctor(0, 2, 0); +} else { + x_107 = x_31; +} +lean_ctor_set(x_107, 0, x_98); +lean_ctor_set(x_107, 1, x_106); +return x_107; +} +} +} +} +} +} +else +{ +lean_object* x_119; lean_object* x_120; lean_object* x_121; lean_object* x_122; lean_object* x_123; uint8_t x_124; +x_119 = lean_ctor_get(x_7, 0); +x_120 = lean_ctor_get(x_9, 1); +lean_inc(x_120); +lean_dec(x_9); +x_121 = l_Lean_Expr_getAppFn___main(x_2); +x_122 = lean_box(0); +x_123 = l_Lean_Expr_getAppArgsAux___main(x_2, x_122); +x_124 = l_Lean_Expr_isConst(x_121); +if (x_124 == 0) +{ +lean_object* x_125; lean_object* x_126; lean_object* x_127; +lean_dec(x_123); +lean_dec(x_121); +lean_dec(x_120); +lean_dec(x_119); +lean_dec(x_1); +x_125 = l_panicWithPos___at_Lean_TypeClass_collectEReplacements___main___spec__1___closed__1; +x_126 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_126, 0, x_2); +lean_ctor_set(x_126, 1, x_125); +x_127 = l_Lean_TypeClass_Context_Inhabited___closed__1; +lean_ctor_set(x_7, 1, x_126); +lean_ctor_set(x_7, 0, x_127); +return x_7; +} +else +{ +lean_object* x_128; uint8_t x_129; +x_128 = l_Lean_Expr_constName(x_121); +lean_inc(x_128); +lean_inc(x_1); +x_129 = lean_is_class(x_1, x_128); +if (x_129 == 0) +{ +lean_object* x_130; lean_object* x_131; lean_object* x_132; +lean_dec(x_128); +lean_dec(x_123); +lean_dec(x_121); +lean_dec(x_120); +lean_dec(x_119); +lean_dec(x_1); +x_130 = l_panicWithPos___at_Lean_TypeClass_collectEReplacements___main___spec__1___closed__1; +x_131 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_131, 0, x_2); +lean_ctor_set(x_131, 1, x_130); +x_132 = l_Lean_TypeClass_Context_Inhabited___closed__1; +lean_ctor_set(x_7, 1, x_131); +lean_ctor_set(x_7, 0, x_132); +return x_7; +} +else +{ +lean_object* x_133; lean_object* x_134; lean_object* x_135; lean_object* x_136; lean_object* x_137; lean_object* x_138; lean_object* x_139; lean_object* x_140; uint8_t x_141; +lean_free_object(x_7); +lean_dec(x_2); +x_133 = l_Lean_Expr_constLevels(x_121); +x_134 = l_Lean_TypeClass_Context_Inhabited___closed__1; +x_135 = l_Lean_TypeClass_collectUReplacements___main(x_133, x_134, x_6, x_6); +x_136 = lean_ctor_get(x_135, 1); +lean_inc(x_136); +x_137 = lean_ctor_get(x_135, 0); +lean_inc(x_137); +lean_dec(x_135); +x_138 = lean_ctor_get(x_136, 0); +lean_inc(x_138); +x_139 = lean_ctor_get(x_136, 1); +lean_inc(x_139); +if (lean_is_exclusive(x_136)) { + lean_ctor_release(x_136, 0); + lean_ctor_release(x_136, 1); + x_140 = x_136; +} else { + lean_dec_ref(x_136); + x_140 = lean_box(0); +} +x_141 = l_Array_isEmpty___rarg(x_138); +if (x_141 == 0) +{ +lean_object* x_142; lean_object* x_143; lean_object* x_144; lean_object* x_145; lean_object* x_146; +lean_dec(x_121); +x_142 = l_Array_toList___rarg(x_139); +lean_dec(x_139); +lean_inc(x_142); +x_143 = lean_expr_mk_const(x_128, x_142); +x_144 = l_Lean_Expr_constName(x_143); +x_145 = lean_environment_find(x_1, x_144); +if (lean_obj_tag(x_145) == 0) +{ +lean_object* x_160; lean_object* x_161; lean_object* x_162; lean_object* x_163; lean_object* x_164; lean_object* x_165; +lean_dec(x_142); +x_160 = l_Lean_TypeClass_collectEReplacements___main___closed__1; +x_161 = lean_unsigned_to_nat(292u); +x_162 = lean_unsigned_to_nat(16u); +x_163 = l_Lean_TypeClass_preprocessForOutParams___closed__1; +x_164 = l_panicWithPos___at_Lean_TypeClass_Context_eInfer___spec__1(x_160, x_161, x_162, x_163); +lean_inc(x_120); +lean_inc(x_119); +x_165 = l_Lean_TypeClass_collectEReplacements___main(x_119, x_120, x_164, x_123, x_137, x_6, x_6); +x_146 = x_165; +goto block_159; +} +else +{ +lean_object* x_166; lean_object* x_167; lean_object* x_168; +x_166 = lean_ctor_get(x_145, 0); +lean_inc(x_166); +lean_dec(x_145); +x_167 = lean_instantiate_type_lparams(x_166, x_142); +lean_inc(x_120); +lean_inc(x_119); +x_168 = l_Lean_TypeClass_collectEReplacements___main(x_119, x_120, x_167, x_123, x_137, x_6, x_6); +x_146 = x_168; +goto block_159; +} +block_159: +{ +lean_object* x_147; lean_object* x_148; lean_object* x_149; lean_object* x_150; lean_object* x_151; lean_object* x_152; lean_object* x_153; lean_object* x_154; lean_object* x_155; lean_object* x_156; lean_object* x_157; lean_object* x_158; +x_147 = lean_ctor_get(x_146, 1); +lean_inc(x_147); +x_148 = lean_ctor_get(x_146, 0); +lean_inc(x_148); +if (lean_is_exclusive(x_146)) { + lean_ctor_release(x_146, 0); + lean_ctor_release(x_146, 1); + x_149 = x_146; +} else { + lean_dec_ref(x_146); + x_149 = lean_box(0); +} +x_150 = lean_ctor_get(x_147, 0); +lean_inc(x_150); +x_151 = lean_ctor_get(x_147, 1); +lean_inc(x_151); +if (lean_is_exclusive(x_147)) { + lean_ctor_release(x_147, 0); + lean_ctor_release(x_147, 1); + x_152 = x_147; +} else { + lean_dec_ref(x_147); + x_152 = lean_box(0); +} +x_153 = l_Array_toList___rarg(x_151); +lean_dec(x_151); +x_154 = l_List_foldl___main___at_Lean_mkApp___spec__1(x_143, x_153); +x_155 = l_Lean_LocalContext_mkForall(x_119, x_120, x_154); +if (lean_is_scalar(x_152)) { + x_156 = lean_alloc_ctor(0, 2, 0); +} else { + x_156 = x_152; +} +lean_ctor_set(x_156, 0, x_138); +lean_ctor_set(x_156, 1, x_150); +if (lean_is_scalar(x_149)) { + x_157 = lean_alloc_ctor(0, 2, 0); +} else { + x_157 = x_149; +} +lean_ctor_set(x_157, 0, x_155); +lean_ctor_set(x_157, 1, x_156); +if (lean_is_scalar(x_140)) { + x_158 = lean_alloc_ctor(0, 2, 0); +} else { + x_158 = x_140; +} +lean_ctor_set(x_158, 0, x_148); +lean_ctor_set(x_158, 1, x_157); +return x_158; +} +} +else +{ +lean_object* x_169; lean_object* x_170; +x_169 = lean_environment_find(x_1, x_128); +if (lean_obj_tag(x_169) == 0) +{ +lean_object* x_184; lean_object* x_185; lean_object* x_186; lean_object* x_187; lean_object* x_188; lean_object* x_189; +lean_dec(x_139); +x_184 = l_Lean_TypeClass_collectEReplacements___main___closed__1; +x_185 = lean_unsigned_to_nat(292u); +x_186 = lean_unsigned_to_nat(16u); +x_187 = l_Lean_TypeClass_preprocessForOutParams___closed__1; +x_188 = l_panicWithPos___at_Lean_TypeClass_Context_eInfer___spec__1(x_184, x_185, x_186, x_187); +lean_inc(x_120); +lean_inc(x_119); +x_189 = l_Lean_TypeClass_collectEReplacements___main(x_119, x_120, x_188, x_123, x_137, x_6, x_6); +x_170 = x_189; +goto block_183; +} +else +{ +lean_object* x_190; lean_object* x_191; lean_object* x_192; lean_object* x_193; +x_190 = lean_ctor_get(x_169, 0); +lean_inc(x_190); +lean_dec(x_169); +x_191 = l_Array_toList___rarg(x_139); +lean_dec(x_139); +x_192 = lean_instantiate_type_lparams(x_190, x_191); +lean_inc(x_120); +lean_inc(x_119); +x_193 = l_Lean_TypeClass_collectEReplacements___main(x_119, x_120, x_192, x_123, x_137, x_6, x_6); +x_170 = x_193; +goto block_183; +} +block_183: +{ +lean_object* x_171; lean_object* x_172; lean_object* x_173; lean_object* x_174; lean_object* x_175; lean_object* x_176; lean_object* x_177; lean_object* x_178; lean_object* x_179; lean_object* x_180; lean_object* x_181; lean_object* x_182; +x_171 = lean_ctor_get(x_170, 1); +lean_inc(x_171); +x_172 = lean_ctor_get(x_170, 0); +lean_inc(x_172); +if (lean_is_exclusive(x_170)) { + lean_ctor_release(x_170, 0); + lean_ctor_release(x_170, 1); + x_173 = x_170; +} else { + lean_dec_ref(x_170); + x_173 = lean_box(0); +} +x_174 = lean_ctor_get(x_171, 0); +lean_inc(x_174); +x_175 = lean_ctor_get(x_171, 1); +lean_inc(x_175); +if (lean_is_exclusive(x_171)) { + lean_ctor_release(x_171, 0); + lean_ctor_release(x_171, 1); + x_176 = x_171; +} else { + lean_dec_ref(x_171); + x_176 = lean_box(0); +} +x_177 = l_Array_toList___rarg(x_175); +lean_dec(x_175); +x_178 = l_List_foldl___main___at_Lean_mkApp___spec__1(x_121, x_177); +x_179 = l_Lean_LocalContext_mkForall(x_119, x_120, x_178); +if (lean_is_scalar(x_176)) { + x_180 = lean_alloc_ctor(0, 2, 0); +} else { + x_180 = x_176; +} +lean_ctor_set(x_180, 0, x_138); +lean_ctor_set(x_180, 1, x_174); +if (lean_is_scalar(x_173)) { + x_181 = lean_alloc_ctor(0, 2, 0); +} else { + x_181 = x_173; +} +lean_ctor_set(x_181, 0, x_179); +lean_ctor_set(x_181, 1, x_180); +if (lean_is_scalar(x_140)) { + x_182 = lean_alloc_ctor(0, 2, 0); +} else { + x_182 = x_140; +} +lean_ctor_set(x_182, 0, x_172); +lean_ctor_set(x_182, 1, x_181); +return x_182; +} +} +} +} +} +} +else +{ +lean_object* x_194; lean_object* x_195; lean_object* x_196; lean_object* x_197; lean_object* x_198; lean_object* x_199; lean_object* x_200; uint8_t x_201; +x_194 = lean_ctor_get(x_7, 1); +x_195 = lean_ctor_get(x_7, 0); +lean_inc(x_194); +lean_inc(x_195); +lean_dec(x_7); +x_196 = lean_ctor_get(x_194, 1); +lean_inc(x_196); +if (lean_is_exclusive(x_194)) { + lean_ctor_release(x_194, 0); + lean_ctor_release(x_194, 1); + x_197 = x_194; +} else { + lean_dec_ref(x_194); + x_197 = lean_box(0); +} +x_198 = l_Lean_Expr_getAppFn___main(x_2); +x_199 = lean_box(0); +x_200 = l_Lean_Expr_getAppArgsAux___main(x_2, x_199); +x_201 = l_Lean_Expr_isConst(x_198); +if (x_201 == 0) +{ +lean_object* x_202; lean_object* x_203; lean_object* x_204; lean_object* x_205; +lean_dec(x_200); +lean_dec(x_198); +lean_dec(x_196); +lean_dec(x_195); +lean_dec(x_1); +x_202 = l_panicWithPos___at_Lean_TypeClass_collectEReplacements___main___spec__1___closed__1; +if (lean_is_scalar(x_197)) { + x_203 = lean_alloc_ctor(0, 2, 0); +} else { + x_203 = x_197; +} +lean_ctor_set(x_203, 0, x_2); +lean_ctor_set(x_203, 1, x_202); +x_204 = l_Lean_TypeClass_Context_Inhabited___closed__1; +x_205 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_205, 0, x_204); +lean_ctor_set(x_205, 1, x_203); +return x_205; +} +else +{ +lean_object* x_206; uint8_t x_207; +x_206 = l_Lean_Expr_constName(x_198); +lean_inc(x_206); +lean_inc(x_1); +x_207 = lean_is_class(x_1, x_206); +if (x_207 == 0) +{ +lean_object* x_208; lean_object* x_209; lean_object* x_210; lean_object* x_211; +lean_dec(x_206); +lean_dec(x_200); +lean_dec(x_198); +lean_dec(x_196); +lean_dec(x_195); +lean_dec(x_1); +x_208 = l_panicWithPos___at_Lean_TypeClass_collectEReplacements___main___spec__1___closed__1; +if (lean_is_scalar(x_197)) { + x_209 = lean_alloc_ctor(0, 2, 0); +} else { + x_209 = x_197; +} +lean_ctor_set(x_209, 0, x_2); +lean_ctor_set(x_209, 1, x_208); +x_210 = l_Lean_TypeClass_Context_Inhabited___closed__1; +x_211 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_211, 0, x_210); +lean_ctor_set(x_211, 1, x_209); +return x_211; +} +else +{ +lean_object* x_212; lean_object* x_213; lean_object* x_214; lean_object* x_215; lean_object* x_216; lean_object* x_217; lean_object* x_218; lean_object* x_219; uint8_t x_220; +lean_dec(x_197); +lean_dec(x_2); +x_212 = l_Lean_Expr_constLevels(x_198); +x_213 = l_Lean_TypeClass_Context_Inhabited___closed__1; +x_214 = l_Lean_TypeClass_collectUReplacements___main(x_212, x_213, x_6, x_6); +x_215 = lean_ctor_get(x_214, 1); +lean_inc(x_215); +x_216 = lean_ctor_get(x_214, 0); +lean_inc(x_216); +lean_dec(x_214); +x_217 = lean_ctor_get(x_215, 0); +lean_inc(x_217); +x_218 = lean_ctor_get(x_215, 1); +lean_inc(x_218); +if (lean_is_exclusive(x_215)) { + lean_ctor_release(x_215, 0); + lean_ctor_release(x_215, 1); + x_219 = x_215; +} else { + lean_dec_ref(x_215); + x_219 = lean_box(0); +} +x_220 = l_Array_isEmpty___rarg(x_217); +if (x_220 == 0) +{ +lean_object* x_221; lean_object* x_222; lean_object* x_223; lean_object* x_224; lean_object* x_225; +lean_dec(x_198); +x_221 = l_Array_toList___rarg(x_218); +lean_dec(x_218); +lean_inc(x_221); +x_222 = lean_expr_mk_const(x_206, x_221); +x_223 = l_Lean_Expr_constName(x_222); +x_224 = lean_environment_find(x_1, x_223); +if (lean_obj_tag(x_224) == 0) +{ +lean_object* x_239; lean_object* x_240; lean_object* x_241; lean_object* x_242; lean_object* x_243; lean_object* x_244; +lean_dec(x_221); +x_239 = l_Lean_TypeClass_collectEReplacements___main___closed__1; +x_240 = lean_unsigned_to_nat(292u); +x_241 = lean_unsigned_to_nat(16u); +x_242 = l_Lean_TypeClass_preprocessForOutParams___closed__1; +x_243 = l_panicWithPos___at_Lean_TypeClass_Context_eInfer___spec__1(x_239, x_240, x_241, x_242); +lean_inc(x_196); +lean_inc(x_195); +x_244 = l_Lean_TypeClass_collectEReplacements___main(x_195, x_196, x_243, x_200, x_216, x_6, x_6); +x_225 = x_244; +goto block_238; +} +else +{ +lean_object* x_245; lean_object* x_246; lean_object* x_247; +x_245 = lean_ctor_get(x_224, 0); +lean_inc(x_245); +lean_dec(x_224); +x_246 = lean_instantiate_type_lparams(x_245, x_221); +lean_inc(x_196); +lean_inc(x_195); +x_247 = l_Lean_TypeClass_collectEReplacements___main(x_195, x_196, x_246, x_200, x_216, x_6, x_6); +x_225 = x_247; +goto block_238; +} +block_238: +{ +lean_object* x_226; lean_object* x_227; lean_object* x_228; lean_object* x_229; lean_object* x_230; lean_object* x_231; lean_object* x_232; lean_object* x_233; lean_object* x_234; lean_object* x_235; lean_object* x_236; lean_object* x_237; +x_226 = lean_ctor_get(x_225, 1); +lean_inc(x_226); +x_227 = lean_ctor_get(x_225, 0); +lean_inc(x_227); +if (lean_is_exclusive(x_225)) { + lean_ctor_release(x_225, 0); + lean_ctor_release(x_225, 1); + x_228 = x_225; +} else { + lean_dec_ref(x_225); + x_228 = lean_box(0); +} +x_229 = lean_ctor_get(x_226, 0); +lean_inc(x_229); +x_230 = lean_ctor_get(x_226, 1); +lean_inc(x_230); +if (lean_is_exclusive(x_226)) { + lean_ctor_release(x_226, 0); + lean_ctor_release(x_226, 1); + x_231 = x_226; +} else { + lean_dec_ref(x_226); + x_231 = lean_box(0); +} +x_232 = l_Array_toList___rarg(x_230); +lean_dec(x_230); +x_233 = l_List_foldl___main___at_Lean_mkApp___spec__1(x_222, x_232); +x_234 = l_Lean_LocalContext_mkForall(x_195, x_196, x_233); +if (lean_is_scalar(x_231)) { + x_235 = lean_alloc_ctor(0, 2, 0); +} else { + x_235 = x_231; +} +lean_ctor_set(x_235, 0, x_217); +lean_ctor_set(x_235, 1, x_229); +if (lean_is_scalar(x_228)) { + x_236 = lean_alloc_ctor(0, 2, 0); +} else { + x_236 = x_228; +} +lean_ctor_set(x_236, 0, x_234); +lean_ctor_set(x_236, 1, x_235); +if (lean_is_scalar(x_219)) { + x_237 = lean_alloc_ctor(0, 2, 0); +} else { + x_237 = x_219; +} +lean_ctor_set(x_237, 0, x_227); +lean_ctor_set(x_237, 1, x_236); +return x_237; +} +} +else +{ +lean_object* x_248; lean_object* x_249; +x_248 = lean_environment_find(x_1, x_206); +if (lean_obj_tag(x_248) == 0) +{ +lean_object* x_263; lean_object* x_264; lean_object* x_265; lean_object* x_266; lean_object* x_267; lean_object* x_268; +lean_dec(x_218); +x_263 = l_Lean_TypeClass_collectEReplacements___main___closed__1; +x_264 = lean_unsigned_to_nat(292u); +x_265 = lean_unsigned_to_nat(16u); +x_266 = l_Lean_TypeClass_preprocessForOutParams___closed__1; +x_267 = l_panicWithPos___at_Lean_TypeClass_Context_eInfer___spec__1(x_263, x_264, x_265, x_266); +lean_inc(x_196); +lean_inc(x_195); +x_268 = l_Lean_TypeClass_collectEReplacements___main(x_195, x_196, x_267, x_200, x_216, x_6, x_6); +x_249 = x_268; +goto block_262; +} +else +{ +lean_object* x_269; lean_object* x_270; lean_object* x_271; lean_object* x_272; +x_269 = lean_ctor_get(x_248, 0); +lean_inc(x_269); +lean_dec(x_248); +x_270 = l_Array_toList___rarg(x_218); +lean_dec(x_218); +x_271 = lean_instantiate_type_lparams(x_269, x_270); +lean_inc(x_196); +lean_inc(x_195); +x_272 = l_Lean_TypeClass_collectEReplacements___main(x_195, x_196, x_271, x_200, x_216, x_6, x_6); +x_249 = x_272; +goto block_262; +} +block_262: +{ +lean_object* x_250; lean_object* x_251; lean_object* x_252; lean_object* x_253; lean_object* x_254; lean_object* x_255; lean_object* x_256; lean_object* x_257; lean_object* x_258; lean_object* x_259; lean_object* x_260; lean_object* x_261; +x_250 = lean_ctor_get(x_249, 1); +lean_inc(x_250); +x_251 = lean_ctor_get(x_249, 0); +lean_inc(x_251); +if (lean_is_exclusive(x_249)) { + lean_ctor_release(x_249, 0); + lean_ctor_release(x_249, 1); + x_252 = x_249; +} else { + lean_dec_ref(x_249); + x_252 = lean_box(0); +} +x_253 = lean_ctor_get(x_250, 0); +lean_inc(x_253); +x_254 = lean_ctor_get(x_250, 1); +lean_inc(x_254); +if (lean_is_exclusive(x_250)) { + lean_ctor_release(x_250, 0); + lean_ctor_release(x_250, 1); + x_255 = x_250; +} else { + lean_dec_ref(x_250); + x_255 = lean_box(0); +} +x_256 = l_Array_toList___rarg(x_254); +lean_dec(x_254); +x_257 = l_List_foldl___main___at_Lean_mkApp___spec__1(x_198, x_256); +x_258 = l_Lean_LocalContext_mkForall(x_195, x_196, x_257); +if (lean_is_scalar(x_255)) { + x_259 = lean_alloc_ctor(0, 2, 0); +} else { + x_259 = x_255; +} +lean_ctor_set(x_259, 0, x_217); +lean_ctor_set(x_259, 1, x_253); +if (lean_is_scalar(x_252)) { + x_260 = lean_alloc_ctor(0, 2, 0); +} else { + x_260 = x_252; +} +lean_ctor_set(x_260, 0, x_258); +lean_ctor_set(x_260, 1, x_259); +if (lean_is_scalar(x_219)) { + x_261 = lean_alloc_ctor(0, 2, 0); +} else { + x_261 = x_219; +} +lean_ctor_set(x_261, 0, x_251); +lean_ctor_set(x_261, 1, x_260); +return x_261; +} +} +} +} +} +} +} +} +lean_object* _init_l_Lean_TypeClass_synth___closed__1() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("synthesized instance has mvar"); +return x_1; +} +} +lean_object* _init_l_Lean_TypeClass_synth___closed__2() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string("outParams do not match: "); +return x_1; +} +} +lean_object* _init_l_Lean_TypeClass_synth___closed__3() { +_start: +{ +lean_object* x_1; +x_1 = lean_mk_string(" ≠ "); +return x_1; +} +} +lean_object* l_Lean_TypeClass_synth(lean_object* x_1, lean_object* x_2, lean_object* x_3) { +_start: +{ +uint8_t x_4; +x_4 = !lean_is_exclusive(x_3); +if (x_4 == 0) +{ +lean_object* x_5; lean_object* x_6; lean_object* x_7; lean_object* x_8; lean_object* x_9; lean_object* x_10; lean_object* x_11; lean_object* x_12; lean_object* x_13; lean_object* x_14; lean_object* x_15; lean_object* x_16; lean_object* x_17; +x_5 = lean_ctor_get(x_3, 1); +x_6 = lean_ctor_get(x_3, 0); +lean_dec(x_6); +x_7 = lean_ctor_get(x_5, 0); +lean_inc(x_7); +x_8 = lean_box(0); +lean_ctor_set(x_3, 0, x_8); +lean_inc(x_1); +x_9 = l_Lean_TypeClass_preprocessForOutParams(x_7, x_1); +x_10 = lean_ctor_get(x_9, 1); +lean_inc(x_10); +x_11 = lean_ctor_get(x_9, 0); +lean_inc(x_11); +lean_dec(x_9); +x_12 = lean_ctor_get(x_10, 0); +lean_inc(x_12); +lean_dec(x_10); +x_13 = l_Lean_TypeClass_Context_eNewMeta(x_12, x_11); +x_14 = lean_ctor_get(x_13, 0); +lean_inc(x_14); +x_15 = lean_ctor_get(x_13, 1); +lean_inc(x_15); +lean_dec(x_13); +x_16 = lean_box(1); +lean_inc(x_14); +lean_inc(x_15); +x_17 = l_Lean_TypeClass_newSubgoal(x_16, x_15, x_14, x_3); +if (lean_obj_tag(x_17) == 0) +{ +uint8_t x_18; +x_18 = !lean_is_exclusive(x_17); +if (x_18 == 0) +{ +lean_object* x_19; lean_object* x_20; uint8_t x_21; +x_19 = lean_ctor_get(x_17, 1); +x_20 = lean_ctor_get(x_17, 0); +lean_dec(x_20); +x_21 = !lean_is_exclusive(x_19); +if (x_21 == 0) +{ +lean_object* x_22; lean_object* x_23; +x_22 = lean_ctor_get(x_19, 2); +lean_dec(x_22); +lean_ctor_set(x_19, 2, x_14); +lean_ctor_set(x_17, 0, x_8); +x_23 = l_Lean_TypeClass_synthCore___main(x_2, x_17); +if (lean_obj_tag(x_23) == 0) +{ +uint8_t x_24; +x_24 = !lean_is_exclusive(x_23); +if (x_24 == 0) +{ +lean_object* x_25; lean_object* x_26; lean_object* x_27; lean_object* x_28; lean_object* x_29; +x_25 = lean_ctor_get(x_23, 0); +x_26 = lean_ctor_get(x_23, 1); +x_27 = lean_ctor_get(x_25, 0); +lean_inc(x_27); +x_28 = lean_ctor_get(x_25, 1); +lean_inc(x_28); +lean_dec(x_25); +lean_ctor_set(x_23, 1, x_15); +lean_ctor_set(x_23, 0, x_8); +lean_inc(x_28); +lean_inc(x_1); +x_29 = l_Lean_TypeClass_Context_eUnify___main(x_1, x_28, x_23); +if (lean_obj_tag(x_29) == 0) +{ +uint8_t x_30; +lean_dec(x_28); +lean_dec(x_1); +x_30 = !lean_is_exclusive(x_29); +if (x_30 == 0) +{ +lean_object* x_31; lean_object* x_32; lean_object* x_33; uint8_t x_34; +x_31 = lean_ctor_get(x_29, 1); +x_32 = lean_ctor_get(x_29, 0); +lean_dec(x_32); +x_33 = l_Lean_TypeClass_Context_eInstantiate___main(x_31, x_27); +lean_inc(x_33); +x_34 = l_Lean_TypeClass_Context_eHasTmpMVar(x_33); +if (x_34 == 0) +{ +lean_ctor_set(x_29, 1, x_26); +lean_ctor_set(x_29, 0, x_33); +return x_29; +} +else +{ +lean_object* x_35; +lean_dec(x_33); +x_35 = l_Lean_TypeClass_synth___closed__1; +lean_ctor_set_tag(x_29, 1); +lean_ctor_set(x_29, 1, x_26); +lean_ctor_set(x_29, 0, x_35); +return x_29; +} +} +else +{ +lean_object* x_36; lean_object* x_37; uint8_t x_38; +x_36 = lean_ctor_get(x_29, 1); +lean_inc(x_36); +lean_dec(x_29); +x_37 = l_Lean_TypeClass_Context_eInstantiate___main(x_36, x_27); +lean_inc(x_37); +x_38 = l_Lean_TypeClass_Context_eHasTmpMVar(x_37); +if (x_38 == 0) +{ +lean_object* x_39; +x_39 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_39, 0, x_37); +lean_ctor_set(x_39, 1, x_26); +return x_39; +} +else +{ +lean_object* x_40; lean_object* x_41; +lean_dec(x_37); +x_40 = l_Lean_TypeClass_synth___closed__1; +x_41 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_41, 0, x_40); +lean_ctor_set(x_41, 1, x_26); +return x_41; +} +} +} +else +{ +uint8_t x_42; +lean_dec(x_27); +x_42 = !lean_is_exclusive(x_29); +if (x_42 == 0) +{ +lean_object* x_43; lean_object* x_44; lean_object* x_45; lean_object* x_46; lean_object* x_47; lean_object* x_48; lean_object* x_49; lean_object* x_50; lean_object* x_51; +x_43 = lean_ctor_get(x_29, 1); +lean_dec(x_43); +x_44 = lean_ctor_get(x_29, 0); +lean_dec(x_44); +x_45 = lean_expr_dbg_to_string(x_1); +lean_dec(x_1); +x_46 = l_Lean_TypeClass_synth___closed__2; +x_47 = lean_string_append(x_46, x_45); +lean_dec(x_45); +x_48 = l_Lean_TypeClass_synth___closed__3; +x_49 = lean_string_append(x_47, x_48); +x_50 = lean_expr_dbg_to_string(x_28); +lean_dec(x_28); +x_51 = lean_string_append(x_49, x_50); +lean_dec(x_50); +lean_ctor_set(x_29, 1, x_26); +lean_ctor_set(x_29, 0, x_51); +return x_29; +} +else +{ +lean_object* x_52; lean_object* x_53; lean_object* x_54; lean_object* x_55; lean_object* x_56; lean_object* x_57; lean_object* x_58; lean_object* x_59; +lean_dec(x_29); +x_52 = lean_expr_dbg_to_string(x_1); +lean_dec(x_1); +x_53 = l_Lean_TypeClass_synth___closed__2; +x_54 = lean_string_append(x_53, x_52); +lean_dec(x_52); +x_55 = l_Lean_TypeClass_synth___closed__3; +x_56 = lean_string_append(x_54, x_55); +x_57 = lean_expr_dbg_to_string(x_28); +lean_dec(x_28); +x_58 = lean_string_append(x_56, x_57); +lean_dec(x_57); +x_59 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_59, 0, x_58); +lean_ctor_set(x_59, 1, x_26); +return x_59; +} +} +} +else +{ +lean_object* x_60; lean_object* x_61; lean_object* x_62; lean_object* x_63; lean_object* x_64; lean_object* x_65; +x_60 = lean_ctor_get(x_23, 0); +x_61 = lean_ctor_get(x_23, 1); +lean_inc(x_61); +lean_inc(x_60); +lean_dec(x_23); +x_62 = lean_ctor_get(x_60, 0); +lean_inc(x_62); +x_63 = lean_ctor_get(x_60, 1); +lean_inc(x_63); +lean_dec(x_60); +x_64 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_64, 0, x_8); +lean_ctor_set(x_64, 1, x_15); +lean_inc(x_63); +lean_inc(x_1); +x_65 = l_Lean_TypeClass_Context_eUnify___main(x_1, x_63, x_64); +if (lean_obj_tag(x_65) == 0) +{ +lean_object* x_66; lean_object* x_67; lean_object* x_68; uint8_t x_69; +lean_dec(x_63); +lean_dec(x_1); +x_66 = lean_ctor_get(x_65, 1); +lean_inc(x_66); +if (lean_is_exclusive(x_65)) { + lean_ctor_release(x_65, 0); + lean_ctor_release(x_65, 1); + x_67 = x_65; +} else { + lean_dec_ref(x_65); + x_67 = lean_box(0); +} +x_68 = l_Lean_TypeClass_Context_eInstantiate___main(x_66, x_62); +lean_inc(x_68); +x_69 = l_Lean_TypeClass_Context_eHasTmpMVar(x_68); +if (x_69 == 0) +{ +lean_object* x_70; +if (lean_is_scalar(x_67)) { + x_70 = lean_alloc_ctor(0, 2, 0); +} else { + x_70 = x_67; +} +lean_ctor_set(x_70, 0, x_68); +lean_ctor_set(x_70, 1, x_61); +return x_70; +} +else +{ +lean_object* x_71; lean_object* x_72; +lean_dec(x_68); +x_71 = l_Lean_TypeClass_synth___closed__1; +if (lean_is_scalar(x_67)) { + x_72 = lean_alloc_ctor(1, 2, 0); +} else { + x_72 = x_67; + lean_ctor_set_tag(x_72, 1); +} +lean_ctor_set(x_72, 0, x_71); +lean_ctor_set(x_72, 1, x_61); +return x_72; +} +} +else +{ +lean_object* x_73; lean_object* x_74; lean_object* x_75; lean_object* x_76; lean_object* x_77; lean_object* x_78; lean_object* x_79; lean_object* x_80; lean_object* x_81; +lean_dec(x_62); +if (lean_is_exclusive(x_65)) { + lean_ctor_release(x_65, 0); + lean_ctor_release(x_65, 1); + x_73 = x_65; +} else { + lean_dec_ref(x_65); + x_73 = lean_box(0); +} +x_74 = lean_expr_dbg_to_string(x_1); +lean_dec(x_1); +x_75 = l_Lean_TypeClass_synth___closed__2; +x_76 = lean_string_append(x_75, x_74); +lean_dec(x_74); +x_77 = l_Lean_TypeClass_synth___closed__3; +x_78 = lean_string_append(x_76, x_77); +x_79 = lean_expr_dbg_to_string(x_63); +lean_dec(x_63); +x_80 = lean_string_append(x_78, x_79); +lean_dec(x_79); +if (lean_is_scalar(x_73)) { + x_81 = lean_alloc_ctor(1, 2, 0); +} else { + x_81 = x_73; +} +lean_ctor_set(x_81, 0, x_80); +lean_ctor_set(x_81, 1, x_61); +return x_81; +} +} +} +else +{ +uint8_t x_82; +lean_dec(x_15); +lean_dec(x_1); +x_82 = !lean_is_exclusive(x_23); +if (x_82 == 0) +{ +return x_23; +} +else +{ +lean_object* x_83; lean_object* x_84; lean_object* x_85; +x_83 = lean_ctor_get(x_23, 0); +x_84 = lean_ctor_get(x_23, 1); +lean_inc(x_84); +lean_inc(x_83); +lean_dec(x_23); +x_85 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_85, 0, x_83); +lean_ctor_set(x_85, 1, x_84); +return x_85; +} +} +} +else +{ +lean_object* x_86; lean_object* x_87; lean_object* x_88; lean_object* x_89; lean_object* x_90; lean_object* x_91; lean_object* x_92; lean_object* x_93; +x_86 = lean_ctor_get(x_19, 0); +x_87 = lean_ctor_get(x_19, 1); +x_88 = lean_ctor_get(x_19, 3); +x_89 = lean_ctor_get(x_19, 4); +x_90 = lean_ctor_get(x_19, 5); +x_91 = lean_ctor_get(x_19, 6); +lean_inc(x_91); +lean_inc(x_90); +lean_inc(x_89); +lean_inc(x_88); +lean_inc(x_87); +lean_inc(x_86); +lean_dec(x_19); +x_92 = lean_alloc_ctor(0, 7, 0); +lean_ctor_set(x_92, 0, x_86); +lean_ctor_set(x_92, 1, x_87); +lean_ctor_set(x_92, 2, x_14); +lean_ctor_set(x_92, 3, x_88); +lean_ctor_set(x_92, 4, x_89); +lean_ctor_set(x_92, 5, x_90); +lean_ctor_set(x_92, 6, x_91); +lean_ctor_set(x_17, 1, x_92); +lean_ctor_set(x_17, 0, x_8); +x_93 = l_Lean_TypeClass_synthCore___main(x_2, x_17); +if (lean_obj_tag(x_93) == 0) +{ +lean_object* x_94; lean_object* x_95; lean_object* x_96; lean_object* x_97; lean_object* x_98; lean_object* x_99; lean_object* x_100; +x_94 = lean_ctor_get(x_93, 0); +lean_inc(x_94); +x_95 = lean_ctor_get(x_93, 1); +lean_inc(x_95); +if (lean_is_exclusive(x_93)) { + lean_ctor_release(x_93, 0); + lean_ctor_release(x_93, 1); + x_96 = x_93; +} else { + lean_dec_ref(x_93); + x_96 = lean_box(0); +} +x_97 = lean_ctor_get(x_94, 0); +lean_inc(x_97); +x_98 = lean_ctor_get(x_94, 1); +lean_inc(x_98); +lean_dec(x_94); +if (lean_is_scalar(x_96)) { + x_99 = lean_alloc_ctor(0, 2, 0); +} else { + x_99 = x_96; +} +lean_ctor_set(x_99, 0, x_8); +lean_ctor_set(x_99, 1, x_15); +lean_inc(x_98); +lean_inc(x_1); +x_100 = l_Lean_TypeClass_Context_eUnify___main(x_1, x_98, x_99); +if (lean_obj_tag(x_100) == 0) +{ +lean_object* x_101; lean_object* x_102; lean_object* x_103; uint8_t x_104; +lean_dec(x_98); +lean_dec(x_1); +x_101 = lean_ctor_get(x_100, 1); +lean_inc(x_101); +if (lean_is_exclusive(x_100)) { + lean_ctor_release(x_100, 0); + lean_ctor_release(x_100, 1); + x_102 = x_100; +} else { + lean_dec_ref(x_100); + x_102 = lean_box(0); +} +x_103 = l_Lean_TypeClass_Context_eInstantiate___main(x_101, x_97); +lean_inc(x_103); +x_104 = l_Lean_TypeClass_Context_eHasTmpMVar(x_103); +if (x_104 == 0) +{ +lean_object* x_105; +if (lean_is_scalar(x_102)) { + x_105 = lean_alloc_ctor(0, 2, 0); +} else { + x_105 = x_102; +} +lean_ctor_set(x_105, 0, x_103); +lean_ctor_set(x_105, 1, x_95); +return x_105; +} +else +{ +lean_object* x_106; lean_object* x_107; +lean_dec(x_103); +x_106 = l_Lean_TypeClass_synth___closed__1; +if (lean_is_scalar(x_102)) { + x_107 = lean_alloc_ctor(1, 2, 0); +} else { + x_107 = x_102; + lean_ctor_set_tag(x_107, 1); +} +lean_ctor_set(x_107, 0, x_106); +lean_ctor_set(x_107, 1, x_95); +return x_107; +} +} +else +{ +lean_object* x_108; lean_object* x_109; lean_object* x_110; lean_object* x_111; lean_object* x_112; lean_object* x_113; lean_object* x_114; lean_object* x_115; lean_object* x_116; +lean_dec(x_97); +if (lean_is_exclusive(x_100)) { + lean_ctor_release(x_100, 0); + lean_ctor_release(x_100, 1); + x_108 = x_100; +} else { + lean_dec_ref(x_100); + x_108 = lean_box(0); +} +x_109 = lean_expr_dbg_to_string(x_1); +lean_dec(x_1); +x_110 = l_Lean_TypeClass_synth___closed__2; +x_111 = lean_string_append(x_110, x_109); +lean_dec(x_109); +x_112 = l_Lean_TypeClass_synth___closed__3; +x_113 = lean_string_append(x_111, x_112); +x_114 = lean_expr_dbg_to_string(x_98); +lean_dec(x_98); +x_115 = lean_string_append(x_113, x_114); +lean_dec(x_114); +if (lean_is_scalar(x_108)) { + x_116 = lean_alloc_ctor(1, 2, 0); +} else { + x_116 = x_108; +} +lean_ctor_set(x_116, 0, x_115); +lean_ctor_set(x_116, 1, x_95); +return x_116; +} +} +else +{ +lean_object* x_117; lean_object* x_118; lean_object* x_119; lean_object* x_120; +lean_dec(x_15); +lean_dec(x_1); +x_117 = lean_ctor_get(x_93, 0); +lean_inc(x_117); +x_118 = lean_ctor_get(x_93, 1); +lean_inc(x_118); +if (lean_is_exclusive(x_93)) { + lean_ctor_release(x_93, 0); + lean_ctor_release(x_93, 1); + x_119 = x_93; +} else { + lean_dec_ref(x_93); + x_119 = lean_box(0); +} +if (lean_is_scalar(x_119)) { + x_120 = lean_alloc_ctor(1, 2, 0); +} else { + x_120 = x_119; +} +lean_ctor_set(x_120, 0, x_117); +lean_ctor_set(x_120, 1, x_118); +return x_120; +} +} +} +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; lean_object* x_129; lean_object* x_130; lean_object* x_131; +x_121 = lean_ctor_get(x_17, 1); +lean_inc(x_121); +lean_dec(x_17); +x_122 = lean_ctor_get(x_121, 0); +lean_inc(x_122); +x_123 = lean_ctor_get(x_121, 1); +lean_inc(x_123); +x_124 = lean_ctor_get(x_121, 3); +lean_inc(x_124); +x_125 = lean_ctor_get(x_121, 4); +lean_inc(x_125); +x_126 = lean_ctor_get(x_121, 5); +lean_inc(x_126); +x_127 = lean_ctor_get(x_121, 6); +lean_inc(x_127); +if (lean_is_exclusive(x_121)) { + lean_ctor_release(x_121, 0); + lean_ctor_release(x_121, 1); + lean_ctor_release(x_121, 2); + lean_ctor_release(x_121, 3); + lean_ctor_release(x_121, 4); + lean_ctor_release(x_121, 5); + lean_ctor_release(x_121, 6); + x_128 = x_121; +} else { + lean_dec_ref(x_121); + x_128 = lean_box(0); +} +if (lean_is_scalar(x_128)) { + x_129 = lean_alloc_ctor(0, 7, 0); +} else { + x_129 = x_128; +} +lean_ctor_set(x_129, 0, x_122); +lean_ctor_set(x_129, 1, x_123); +lean_ctor_set(x_129, 2, x_14); +lean_ctor_set(x_129, 3, x_124); +lean_ctor_set(x_129, 4, x_125); +lean_ctor_set(x_129, 5, x_126); +lean_ctor_set(x_129, 6, x_127); +x_130 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_130, 0, x_8); +lean_ctor_set(x_130, 1, x_129); +x_131 = l_Lean_TypeClass_synthCore___main(x_2, x_130); +if (lean_obj_tag(x_131) == 0) +{ +lean_object* x_132; lean_object* x_133; lean_object* x_134; lean_object* x_135; lean_object* x_136; lean_object* x_137; lean_object* x_138; +x_132 = lean_ctor_get(x_131, 0); +lean_inc(x_132); +x_133 = lean_ctor_get(x_131, 1); +lean_inc(x_133); +if (lean_is_exclusive(x_131)) { + lean_ctor_release(x_131, 0); + lean_ctor_release(x_131, 1); + x_134 = x_131; +} else { + lean_dec_ref(x_131); + x_134 = lean_box(0); +} +x_135 = lean_ctor_get(x_132, 0); +lean_inc(x_135); +x_136 = lean_ctor_get(x_132, 1); +lean_inc(x_136); +lean_dec(x_132); +if (lean_is_scalar(x_134)) { + x_137 = lean_alloc_ctor(0, 2, 0); +} else { + x_137 = x_134; +} +lean_ctor_set(x_137, 0, x_8); +lean_ctor_set(x_137, 1, x_15); +lean_inc(x_136); +lean_inc(x_1); +x_138 = l_Lean_TypeClass_Context_eUnify___main(x_1, x_136, x_137); +if (lean_obj_tag(x_138) == 0) +{ +lean_object* x_139; lean_object* x_140; lean_object* x_141; uint8_t x_142; +lean_dec(x_136); +lean_dec(x_1); +x_139 = lean_ctor_get(x_138, 1); +lean_inc(x_139); +if (lean_is_exclusive(x_138)) { + lean_ctor_release(x_138, 0); + lean_ctor_release(x_138, 1); + x_140 = x_138; +} else { + lean_dec_ref(x_138); + x_140 = lean_box(0); +} +x_141 = l_Lean_TypeClass_Context_eInstantiate___main(x_139, x_135); +lean_inc(x_141); +x_142 = l_Lean_TypeClass_Context_eHasTmpMVar(x_141); +if (x_142 == 0) +{ +lean_object* x_143; +if (lean_is_scalar(x_140)) { + x_143 = lean_alloc_ctor(0, 2, 0); +} else { + x_143 = x_140; +} +lean_ctor_set(x_143, 0, x_141); +lean_ctor_set(x_143, 1, x_133); +return x_143; +} +else +{ +lean_object* x_144; lean_object* x_145; +lean_dec(x_141); +x_144 = l_Lean_TypeClass_synth___closed__1; +if (lean_is_scalar(x_140)) { + x_145 = lean_alloc_ctor(1, 2, 0); +} else { + x_145 = x_140; + lean_ctor_set_tag(x_145, 1); +} +lean_ctor_set(x_145, 0, x_144); +lean_ctor_set(x_145, 1, x_133); +return x_145; +} +} +else +{ +lean_object* x_146; lean_object* x_147; lean_object* x_148; lean_object* x_149; lean_object* x_150; lean_object* x_151; lean_object* x_152; lean_object* x_153; lean_object* x_154; +lean_dec(x_135); +if (lean_is_exclusive(x_138)) { + lean_ctor_release(x_138, 0); + lean_ctor_release(x_138, 1); + x_146 = x_138; +} else { + lean_dec_ref(x_138); + x_146 = lean_box(0); +} +x_147 = lean_expr_dbg_to_string(x_1); +lean_dec(x_1); +x_148 = l_Lean_TypeClass_synth___closed__2; +x_149 = lean_string_append(x_148, x_147); +lean_dec(x_147); +x_150 = l_Lean_TypeClass_synth___closed__3; +x_151 = lean_string_append(x_149, x_150); +x_152 = lean_expr_dbg_to_string(x_136); +lean_dec(x_136); +x_153 = lean_string_append(x_151, x_152); +lean_dec(x_152); +if (lean_is_scalar(x_146)) { + x_154 = lean_alloc_ctor(1, 2, 0); +} else { + x_154 = x_146; +} +lean_ctor_set(x_154, 0, x_153); +lean_ctor_set(x_154, 1, x_133); +return x_154; +} +} +else +{ +lean_object* x_155; lean_object* x_156; lean_object* x_157; lean_object* x_158; +lean_dec(x_15); +lean_dec(x_1); +x_155 = lean_ctor_get(x_131, 0); +lean_inc(x_155); +x_156 = lean_ctor_get(x_131, 1); +lean_inc(x_156); +if (lean_is_exclusive(x_131)) { + lean_ctor_release(x_131, 0); + lean_ctor_release(x_131, 1); + x_157 = x_131; +} else { + lean_dec_ref(x_131); + x_157 = lean_box(0); +} +if (lean_is_scalar(x_157)) { + x_158 = lean_alloc_ctor(1, 2, 0); +} else { + x_158 = x_157; +} +lean_ctor_set(x_158, 0, x_155); +lean_ctor_set(x_158, 1, x_156); +return x_158; +} +} +} +else +{ +uint8_t x_159; +lean_dec(x_15); +lean_dec(x_14); +lean_dec(x_2); +lean_dec(x_1); +x_159 = !lean_is_exclusive(x_17); +if (x_159 == 0) +{ +return x_17; +} +else +{ +lean_object* x_160; lean_object* x_161; lean_object* x_162; +x_160 = lean_ctor_get(x_17, 0); +x_161 = lean_ctor_get(x_17, 1); +lean_inc(x_161); +lean_inc(x_160); +lean_dec(x_17); +x_162 = lean_alloc_ctor(1, 2, 0); +lean_ctor_set(x_162, 0, x_160); +lean_ctor_set(x_162, 1, x_161); +return x_162; +} +} +} +else +{ +lean_object* x_163; lean_object* x_164; lean_object* x_165; lean_object* x_166; lean_object* x_167; lean_object* x_168; lean_object* x_169; lean_object* x_170; lean_object* x_171; lean_object* x_172; lean_object* x_173; lean_object* x_174; lean_object* x_175; +x_163 = lean_ctor_get(x_3, 1); +lean_inc(x_163); +lean_dec(x_3); +x_164 = lean_ctor_get(x_163, 0); +lean_inc(x_164); +x_165 = lean_box(0); +x_166 = lean_alloc_ctor(0, 2, 0); +lean_ctor_set(x_166, 0, x_165); +lean_ctor_set(x_166, 1, x_163); +lean_inc(x_1); +x_167 = l_Lean_TypeClass_preprocessForOutParams(x_164, x_1); +x_168 = lean_ctor_get(x_167, 1); +lean_inc(x_168); +x_169 = lean_ctor_get(x_167, 0); +lean_inc(x_169); +lean_dec(x_167); +x_170 = lean_ctor_get(x_168, 0); +lean_inc(x_170); +lean_dec(x_168); +x_171 = l_Lean_TypeClass_Context_eNewMeta(x_170, x_169); +x_172 = lean_ctor_get(x_171, 0); +lean_inc(x_172); +x_173 = lean_ctor_get(x_171, 1); +lean_inc(x_173); +lean_dec(x_171); +x_174 = lean_box(1); +lean_inc(x_172); +lean_inc(x_173); +x_175 = l_Lean_TypeClass_newSubgoal(x_174, x_173, x_172, x_166); +if (lean_obj_tag(x_175) == 0) +{ +lean_object* x_176; lean_object* x_177; lean_object* x_178; lean_object* x_179; lean_object* x_180; lean_object* x_181; lean_object* x_182; lean_object* x_183; lean_object* x_184; lean_object* x_185; lean_object* x_186; lean_object* x_187; +x_176 = lean_ctor_get(x_175, 1); +lean_inc(x_176); +if (lean_is_exclusive(x_175)) { + lean_ctor_release(x_175, 0); + lean_ctor_release(x_175, 1); + x_177 = x_175; +} else { + lean_dec_ref(x_175); + x_177 = lean_box(0); +} +x_178 = lean_ctor_get(x_176, 0); +lean_inc(x_178); +x_179 = lean_ctor_get(x_176, 1); +lean_inc(x_179); +x_180 = lean_ctor_get(x_176, 3); +lean_inc(x_180); +x_181 = lean_ctor_get(x_176, 4); +lean_inc(x_181); +x_182 = lean_ctor_get(x_176, 5); +lean_inc(x_182); +x_183 = lean_ctor_get(x_176, 6); +lean_inc(x_183); +if (lean_is_exclusive(x_176)) { + lean_ctor_release(x_176, 0); + lean_ctor_release(x_176, 1); + lean_ctor_release(x_176, 2); + lean_ctor_release(x_176, 3); + lean_ctor_release(x_176, 4); + lean_ctor_release(x_176, 5); + lean_ctor_release(x_176, 6); + x_184 = x_176; +} else { + lean_dec_ref(x_176); + x_184 = lean_box(0); +} +if (lean_is_scalar(x_184)) { + x_185 = lean_alloc_ctor(0, 7, 0); +} else { + x_185 = x_184; +} +lean_ctor_set(x_185, 0, x_178); +lean_ctor_set(x_185, 1, x_179); +lean_ctor_set(x_185, 2, x_172); +lean_ctor_set(x_185, 3, x_180); +lean_ctor_set(x_185, 4, x_181); +lean_ctor_set(x_185, 5, x_182); +lean_ctor_set(x_185, 6, x_183); +if (lean_is_scalar(x_177)) { + x_186 = lean_alloc_ctor(0, 2, 0); +} else { + x_186 = x_177; +} +lean_ctor_set(x_186, 0, x_165); +lean_ctor_set(x_186, 1, x_185); +x_187 = l_Lean_TypeClass_synthCore___main(x_2, x_186); +if (lean_obj_tag(x_187) == 0) +{ +lean_object* x_188; lean_object* x_189; lean_object* x_190; lean_object* x_191; lean_object* x_192; lean_object* x_193; lean_object* x_194; +x_188 = lean_ctor_get(x_187, 0); +lean_inc(x_188); +x_189 = lean_ctor_get(x_187, 1); +lean_inc(x_189); +if (lean_is_exclusive(x_187)) { + lean_ctor_release(x_187, 0); + lean_ctor_release(x_187, 1); + x_190 = x_187; +} else { + lean_dec_ref(x_187); + x_190 = lean_box(0); +} +x_191 = lean_ctor_get(x_188, 0); +lean_inc(x_191); +x_192 = lean_ctor_get(x_188, 1); +lean_inc(x_192); +lean_dec(x_188); +if (lean_is_scalar(x_190)) { + x_193 = lean_alloc_ctor(0, 2, 0); +} else { + x_193 = x_190; +} +lean_ctor_set(x_193, 0, x_165); +lean_ctor_set(x_193, 1, x_173); +lean_inc(x_192); +lean_inc(x_1); +x_194 = l_Lean_TypeClass_Context_eUnify___main(x_1, x_192, x_193); +if (lean_obj_tag(x_194) == 0) +{ +lean_object* x_195; lean_object* x_196; lean_object* x_197; uint8_t x_198; +lean_dec(x_192); +lean_dec(x_1); +x_195 = lean_ctor_get(x_194, 1); +lean_inc(x_195); +if (lean_is_exclusive(x_194)) { + lean_ctor_release(x_194, 0); + lean_ctor_release(x_194, 1); + x_196 = x_194; +} else { + lean_dec_ref(x_194); + x_196 = lean_box(0); +} +x_197 = l_Lean_TypeClass_Context_eInstantiate___main(x_195, x_191); +lean_inc(x_197); +x_198 = l_Lean_TypeClass_Context_eHasTmpMVar(x_197); +if (x_198 == 0) +{ +lean_object* x_199; +if (lean_is_scalar(x_196)) { + x_199 = lean_alloc_ctor(0, 2, 0); +} else { + x_199 = x_196; +} +lean_ctor_set(x_199, 0, x_197); +lean_ctor_set(x_199, 1, x_189); +return x_199; +} +else +{ +lean_object* x_200; lean_object* x_201; +lean_dec(x_197); +x_200 = l_Lean_TypeClass_synth___closed__1; +if (lean_is_scalar(x_196)) { + x_201 = lean_alloc_ctor(1, 2, 0); +} else { + x_201 = x_196; + lean_ctor_set_tag(x_201, 1); +} +lean_ctor_set(x_201, 0, x_200); +lean_ctor_set(x_201, 1, x_189); +return x_201; +} +} +else +{ +lean_object* x_202; lean_object* x_203; lean_object* x_204; lean_object* x_205; lean_object* x_206; lean_object* x_207; lean_object* x_208; lean_object* x_209; lean_object* x_210; +lean_dec(x_191); +if (lean_is_exclusive(x_194)) { + lean_ctor_release(x_194, 0); + lean_ctor_release(x_194, 1); + x_202 = x_194; +} else { + lean_dec_ref(x_194); + x_202 = lean_box(0); +} +x_203 = lean_expr_dbg_to_string(x_1); +lean_dec(x_1); +x_204 = l_Lean_TypeClass_synth___closed__2; +x_205 = lean_string_append(x_204, x_203); +lean_dec(x_203); +x_206 = l_Lean_TypeClass_synth___closed__3; +x_207 = lean_string_append(x_205, x_206); +x_208 = lean_expr_dbg_to_string(x_192); +lean_dec(x_192); +x_209 = lean_string_append(x_207, x_208); +lean_dec(x_208); +if (lean_is_scalar(x_202)) { + x_210 = lean_alloc_ctor(1, 2, 0); +} else { + x_210 = x_202; +} +lean_ctor_set(x_210, 0, x_209); +lean_ctor_set(x_210, 1, x_189); +return x_210; +} +} +else +{ +lean_object* x_211; lean_object* x_212; lean_object* x_213; lean_object* x_214; +lean_dec(x_173); +lean_dec(x_1); +x_211 = lean_ctor_get(x_187, 0); +lean_inc(x_211); +x_212 = lean_ctor_get(x_187, 1); +lean_inc(x_212); +if (lean_is_exclusive(x_187)) { + lean_ctor_release(x_187, 0); + lean_ctor_release(x_187, 1); + x_213 = x_187; +} else { + lean_dec_ref(x_187); + x_213 = lean_box(0); +} +if (lean_is_scalar(x_213)) { + x_214 = lean_alloc_ctor(1, 2, 0); +} else { + x_214 = x_213; +} +lean_ctor_set(x_214, 0, x_211); +lean_ctor_set(x_214, 1, x_212); +return x_214; +} +} +else +{ +lean_object* x_215; lean_object* x_216; lean_object* x_217; lean_object* x_218; +lean_dec(x_173); +lean_dec(x_172); +lean_dec(x_2); +lean_dec(x_1); +x_215 = lean_ctor_get(x_175, 0); +lean_inc(x_215); +x_216 = lean_ctor_get(x_175, 1); +lean_inc(x_216); +if (lean_is_exclusive(x_175)) { + lean_ctor_release(x_175, 0); + lean_ctor_release(x_175, 1); + x_217 = x_175; +} else { + lean_dec_ref(x_175); + x_217 = lean_box(0); +} +if (lean_is_scalar(x_217)) { + x_218 = lean_alloc_ctor(1, 2, 0); +} else { + x_218 = x_217; +} +lean_ctor_set(x_218, 0, x_215); +lean_ctor_set(x_218, 1, x_216); +return x_218; +} +} +} +} +lean_object* initialize_init_lean_expr(lean_object*); +lean_object* initialize_init_lean_environment(lean_object*); +lean_object* initialize_init_lean_class(lean_object*); +lean_object* initialize_init_lean_metavarcontext(lean_object*); +lean_object* initialize_init_lean_typeclass_context(lean_object*); +lean_object* initialize_init_data_persistenthashmap_default(lean_object*); +lean_object* initialize_init_data_queue_default(lean_object*); +static bool _G_initialized = false; +lean_object* initialize_init_lean_typeclass_synth(lean_object* w) { +if (_G_initialized) return w; +_G_initialized = true; +if (lean_io_result_is_error(w)) return w; +w = initialize_init_lean_expr(w); +if (lean_io_result_is_error(w)) return w; +w = initialize_init_lean_environment(w); +if (lean_io_result_is_error(w)) return w; +w = initialize_init_lean_class(w); +if (lean_io_result_is_error(w)) return w; +w = initialize_init_lean_metavarcontext(w); +if (lean_io_result_is_error(w)) return w; +w = initialize_init_lean_typeclass_context(w); +if (lean_io_result_is_error(w)) return w; +w = initialize_init_data_persistenthashmap_default(w); +if (lean_io_result_is_error(w)) return w; +w = initialize_init_data_queue_default(w); +if (lean_io_result_is_error(w)) return w; +l_Lean_TypeClass_TypedExpr_HasToString___closed__1 = _init_l_Lean_TypeClass_TypedExpr_HasToString___closed__1(); +lean_mark_persistent(l_Lean_TypeClass_TypedExpr_HasToString___closed__1); +l_Lean_TypeClass_TypedExpr_Inhabited___closed__1 = _init_l_Lean_TypeClass_TypedExpr_Inhabited___closed__1(); +lean_mark_persistent(l_Lean_TypeClass_TypedExpr_Inhabited___closed__1); +l_Lean_TypeClass_TypedExpr_Inhabited = _init_l_Lean_TypeClass_TypedExpr_Inhabited(); +lean_mark_persistent(l_Lean_TypeClass_TypedExpr_Inhabited); +l_Lean_TypeClass_Node_Inhabited___closed__1 = _init_l_Lean_TypeClass_Node_Inhabited___closed__1(); +lean_mark_persistent(l_Lean_TypeClass_Node_Inhabited___closed__1); +l_Lean_TypeClass_Node_Inhabited = _init_l_Lean_TypeClass_Node_Inhabited(); +lean_mark_persistent(l_Lean_TypeClass_Node_Inhabited); +l_Lean_TypeClass_ConsumerNode_Inhabited___closed__1 = _init_l_Lean_TypeClass_ConsumerNode_Inhabited___closed__1(); +lean_mark_persistent(l_Lean_TypeClass_ConsumerNode_Inhabited___closed__1); +l_Lean_TypeClass_ConsumerNode_Inhabited = _init_l_Lean_TypeClass_ConsumerNode_Inhabited(); +lean_mark_persistent(l_Lean_TypeClass_ConsumerNode_Inhabited); +l_Lean_TypeClass_GeneratorNode_Inhabited___closed__1 = _init_l_Lean_TypeClass_GeneratorNode_Inhabited___closed__1(); +lean_mark_persistent(l_Lean_TypeClass_GeneratorNode_Inhabited___closed__1); +l_Lean_TypeClass_GeneratorNode_Inhabited = _init_l_Lean_TypeClass_GeneratorNode_Inhabited(); +lean_mark_persistent(l_Lean_TypeClass_GeneratorNode_Inhabited); +l_Lean_TypeClass_quickIsClass___main___closed__1 = _init_l_Lean_TypeClass_quickIsClass___main___closed__1(); +lean_mark_persistent(l_Lean_TypeClass_quickIsClass___main___closed__1); +l_Lean_TypeClass_newSubgoal___closed__1 = _init_l_Lean_TypeClass_newSubgoal___closed__1(); +lean_mark_persistent(l_Lean_TypeClass_newSubgoal___closed__1); +l_Lean_TypeClass_newSubgoal___closed__2 = _init_l_Lean_TypeClass_newSubgoal___closed__2(); +lean_mark_persistent(l_Lean_TypeClass_newSubgoal___closed__2); +l_Lean_TypeClass_newSubgoal___closed__3 = _init_l_Lean_TypeClass_newSubgoal___closed__3(); +lean_mark_persistent(l_Lean_TypeClass_newSubgoal___closed__3); +l_Lean_TypeClass_newSubgoal___closed__4 = _init_l_Lean_TypeClass_newSubgoal___closed__4(); +lean_mark_persistent(l_Lean_TypeClass_newSubgoal___closed__4); +l_Lean_TypeClass_introduceLocals___main___closed__1 = _init_l_Lean_TypeClass_introduceLocals___main___closed__1(); +lean_mark_persistent(l_Lean_TypeClass_introduceLocals___main___closed__1); +l_Lean_TypeClass_introduceLocals___main___closed__2 = _init_l_Lean_TypeClass_introduceLocals___main___closed__2(); +lean_mark_persistent(l_Lean_TypeClass_introduceLocals___main___closed__2); +l_Lean_TypeClass_resume___closed__1 = _init_l_Lean_TypeClass_resume___closed__1(); +lean_mark_persistent(l_Lean_TypeClass_resume___closed__1); +l_Lean_TypeClass_resume___closed__2 = _init_l_Lean_TypeClass_resume___closed__2(); +lean_mark_persistent(l_Lean_TypeClass_resume___closed__2); +l_Lean_TypeClass_newAnswer___closed__1 = _init_l_Lean_TypeClass_newAnswer___closed__1(); +lean_mark_persistent(l_Lean_TypeClass_newAnswer___closed__1); +l_Lean_TypeClass_newAnswer___closed__2 = _init_l_Lean_TypeClass_newAnswer___closed__2(); +lean_mark_persistent(l_Lean_TypeClass_newAnswer___closed__2); +l_Lean_TypeClass_consume___closed__1 = _init_l_Lean_TypeClass_consume___closed__1(); +lean_mark_persistent(l_Lean_TypeClass_consume___closed__1); +l_Lean_TypeClass_consume___closed__2 = _init_l_Lean_TypeClass_consume___closed__2(); +lean_mark_persistent(l_Lean_TypeClass_consume___closed__2); +l_Lean_TypeClass_constNameToTypedExpr___closed__1 = _init_l_Lean_TypeClass_constNameToTypedExpr___closed__1(); +lean_mark_persistent(l_Lean_TypeClass_constNameToTypedExpr___closed__1); +l_Lean_TypeClass_constNameToTypedExpr___closed__2 = _init_l_Lean_TypeClass_constNameToTypedExpr___closed__2(); +lean_mark_persistent(l_Lean_TypeClass_constNameToTypedExpr___closed__2); +l_Lean_TypeClass_generate___closed__1 = _init_l_Lean_TypeClass_generate___closed__1(); +lean_mark_persistent(l_Lean_TypeClass_generate___closed__1); +l_Lean_TypeClass_generate___closed__2 = _init_l_Lean_TypeClass_generate___closed__2(); +lean_mark_persistent(l_Lean_TypeClass_generate___closed__2); +l_Lean_TypeClass_step___closed__1 = _init_l_Lean_TypeClass_step___closed__1(); +lean_mark_persistent(l_Lean_TypeClass_step___closed__1); +l_Lean_TypeClass_synthCore___main___closed__1 = _init_l_Lean_TypeClass_synthCore___main___closed__1(); +lean_mark_persistent(l_Lean_TypeClass_synthCore___main___closed__1); +l_panicWithPos___at_Lean_TypeClass_collectEReplacements___main___spec__1___closed__1 = _init_l_panicWithPos___at_Lean_TypeClass_collectEReplacements___main___spec__1___closed__1(); +lean_mark_persistent(l_panicWithPos___at_Lean_TypeClass_collectEReplacements___main___spec__1___closed__1); +l_panicWithPos___at_Lean_TypeClass_collectEReplacements___main___spec__1___closed__2 = _init_l_panicWithPos___at_Lean_TypeClass_collectEReplacements___main___spec__1___closed__2(); +lean_mark_persistent(l_panicWithPos___at_Lean_TypeClass_collectEReplacements___main___spec__1___closed__2); +l_Lean_TypeClass_collectEReplacements___main___closed__1 = _init_l_Lean_TypeClass_collectEReplacements___main___closed__1(); +lean_mark_persistent(l_Lean_TypeClass_collectEReplacements___main___closed__1); +l_Lean_TypeClass_collectEReplacements___main___closed__2 = _init_l_Lean_TypeClass_collectEReplacements___main___closed__2(); +lean_mark_persistent(l_Lean_TypeClass_collectEReplacements___main___closed__2); +l_Lean_TypeClass_preprocessForOutParams___closed__1 = _init_l_Lean_TypeClass_preprocessForOutParams___closed__1(); +lean_mark_persistent(l_Lean_TypeClass_preprocessForOutParams___closed__1); +l_Lean_TypeClass_synth___closed__1 = _init_l_Lean_TypeClass_synth___closed__1(); +lean_mark_persistent(l_Lean_TypeClass_synth___closed__1); +l_Lean_TypeClass_synth___closed__2 = _init_l_Lean_TypeClass_synth___closed__2(); +lean_mark_persistent(l_Lean_TypeClass_synth___closed__2); +l_Lean_TypeClass_synth___closed__3 = _init_l_Lean_TypeClass_synth___closed__3(); +lean_mark_persistent(l_Lean_TypeClass_synth___closed__3); +return w; +} +#ifdef __cplusplus +} +#endif diff --git a/src/stage0/init/system/filepath.c b/src/stage0/init/system/filepath.c index 32aec3cffe..7a4104a442 100644 --- a/src/stage0/init/system/filepath.c +++ b/src/stage0/init/system/filepath.c @@ -41,7 +41,6 @@ uint32_t l_System_FilePath_pathSeparator; lean_object* lean_string_utf8_next(lean_object*, lean_object*); lean_object* lean_string_utf8_extract(lean_object*, lean_object*, lean_object*); lean_object* l_System_FilePath_pathSeparators___closed__1___boxed__const__1; -uint32_t l_Char_toLower(uint32_t); uint8_t l_System_FilePath_normalizePath___closed__2; lean_object* l_System_FilePath_normalizePath___closed__1; uint8_t l_List_foldr___main___at_System_FilePath_normalizePath___spec__1(uint32_t, uint8_t, lean_object*); @@ -250,39 +249,23 @@ x_6 = l_System_FilePath_pathSeparators; x_7 = l_List_foldr___main___at_System_FilePath_normalizePath___spec__1(x_4, x_5, x_6); if (x_7 == 0) { -uint8_t x_8; -x_8 = l_System_FilePath_isCaseInsensitive; -if (x_8 == 0) -{ -lean_object* x_9; lean_object* x_10; -x_9 = lean_string_utf8_set(x_2, x_1, x_4); -x_10 = lean_string_utf8_next(x_9, x_1); +lean_object* x_8; lean_object* x_9; +x_8 = lean_string_utf8_set(x_2, x_1, x_4); +x_9 = lean_string_utf8_next(x_8, x_1); lean_dec(x_1); -x_1 = x_10; -x_2 = x_9; +x_1 = x_9; +x_2 = x_8; goto _start; } else { -uint32_t x_12; lean_object* x_13; lean_object* x_14; -x_12 = l_Char_toLower(x_4); -x_13 = lean_string_utf8_set(x_2, x_1, x_12); -x_14 = lean_string_utf8_next(x_13, x_1); +uint32_t x_11; lean_object* x_12; lean_object* x_13; +x_11 = l_System_FilePath_pathSeparator; +x_12 = lean_string_utf8_set(x_2, x_1, x_11); +x_13 = lean_string_utf8_next(x_12, x_1); lean_dec(x_1); -x_1 = x_14; -x_2 = x_13; -goto _start; -} -} -else -{ -uint32_t x_16; lean_object* x_17; lean_object* x_18; -x_16 = l_System_FilePath_pathSeparator; -x_17 = lean_string_utf8_set(x_2, x_1, x_16); -x_18 = lean_string_utf8_next(x_17, x_1); -lean_dec(x_1); -x_1 = x_18; -x_2 = x_17; +x_1 = x_13; +x_2 = x_12; goto _start; } }